Added lot of junk laying around on harvie.cz
[mirrors/Programs.git] / php / skripty / dir_tree.php
1 <?php
2
3 //Rekurzivní výpis souborù a adresáøù v podadresáøích
4 //Demonstrace rekurzivní funkce
5 //Author: <-Harvie 2oo7
6
7 function dir_tree($directory, $level) {
8
9 //$num = "1";
10
11 //echo ("<b>Soubory v $directory :</b><br /><br />\n<ul>");
12
13 $dirfp = opendir ($directory);
14 $leveli = $level;
15 while($leveli) { echo("-"); $leveli--; }
16 echo "[DIR] $directory\n";
17 while (false!==($file = readdir($dirfp)))
18 {
19 if ($file != "." && $file != "..")
20 {
21 if (is_dir($directory.$file))
22 {
23 echo("\n");
24 $leveli = $level;
25 while($leveli < 0) { echo("-"); $leveli--; }
26 //echo "-[DIR] $file\n";
27 dir_tree("$directory$file\\", ($level+2));
28 echo("\n");
29 }
30 else
31 {
32 $leveli = $level;
33 while($leveli + 1) { echo("-"); $leveli--; }
34 echo "$file - ($directory$file)\n";
35 //$num = ($num + 1);
36 }
37 }
38 }
39 closedir($dirfp);
40
41 }
42
43 //CODE
44
45 $dir = ("D:\\Webdesign\\");
46 echo("FreeSpace: ".(disk_free_space($dir)/1000000)." MB /".(disk_total_space($dir)/1000000)." MB\n");
47 dir_tree($dir, 0);
48
49 ?>
This page took 2.614023 seconds and 4 git commands to generate.