read()) if ($list!="." && $list!=="..") if (is_dir($dir_name.$list)) { $output[$i]=check_slash($list); $i++; } $d->close(); if (is_array($output)) sort ($output); return $output; } function BrowseFile($dir_name="./") { if (substr($dir_name,-1)!="/") $dir_name.="/"; unset ($output); $i=0; $d = dir($dir_name); while($list=$d->read()) if ($list!="." && $list!=="..") if (is_file($dir_name.$list)) { $output[$i]=$list; $i++; } $d->close(); if (is_array($output)) sort ($output); return $output; } function read_dir($dir_name="./",$url_relative="") { $this_dir = check_slash($dir_name); if (!is_dir($this_dir)) $this_dir = "./"; $rel_url = $url_relative; if ($this_dir=="./" || !is_dir($rel_url)) $rel_url=""; $x=BrowseDir($this_dir); sort($x); for ($i=0; $i".substr($x[$i],0,-1)."]"; send_output($x); $x=BrowseFile($this_dir); sort($x); for ($i=0; $i".$x[$i].""; send_output($x); } function send_output($input) { $list = $input; if (is_array($list)) for ($i=0; $i\n"; } $i++; } else if (is_file($base_dir.$header_txt)) { @include $base_dir.$header_txt; echo "\n
\n"; } } echo " OdyDasa - $dir_name \n"; header_txt($base_dir); echo "
\n";
echo "Content of: ".check_slash($dir_name)."\n";
read_dir($base_dir, check_slash($dir_name));
?>