SDL2 example

[mirrors/Programs.git] / php / skripty / find_recursive.php

<pre>\r
<?php\r
\r
//\r
function dir_scan($directory, $slash="/") {\r
\r
	if($GLOBALS["num"] == 0) echo("<title>$directory</title>\n<h1><a href=\"file:///$directory\">$directory</a></h1>\n");\r
	$files=opendir ($directory); \r
		while (false!==($file = readdir($files))) \r
		{ \r
				if ($file != "." && $file != "..") \r
				{ \r
						if(is_dir($directory.$file)) echo("[DIR] ");\r
						//echo "$directory$file\n"; \r
						echo "<a href=\"file:///$directory$file\">$directory$file</a>\n"; \r
            $GLOBALS["num"] = ($GLOBALS["num"] + 1);\r
						if(is_dir($directory.$file)) dir_scan($directory.$file.$slash,$slash);\r
				} \r
		}\r
		closedir($files); \r
\r
}\r
\r
///CODE////////////////////////\r
$num = "0";\r
dir_scan("x:\\", "\\");\r
echo("\nTotal: $num\n");\r
?>\r
</pre>\r