rendered paste body//funkcia nacita zoznam zakazanych mien (napr. index.php), nazov suboru ban.lis, jeden nazov na riadok
function ban($path){
$handle=fopen($path."/ban.lis","r");
$contents = fread($handle, filesize($path."/ban.lis"));
$names=explode("\n",$contents);
return $names;
}
///definicia funkcie
function show($dir,$path) {
$names=ban($dir);
$count=0;
if (is_dir($dir)) {
if ($dh = opendir($dir)) {
while (($file = readdir($dh)) !== false) {
foreach ($names as $name)
{//ci zakazany subor
if($name==$file)
continue;
}
if(is_dir($file)){
if( $file == "." || $file == ".." )
continue;
$send=$path.$file."/";
$count=$count+show($file,$names,$send);
}
else
{
$name=explode(".",$file);
list($check,$ext)=$name;
if($ext != "lis")
{
if($ext != "zip")
$target=" target=\"_blank\" ";
else
$target="";
$name=$dir."/".$check.".lis";
if(file_exists($name))
{
$handle=fopen($name,"r");
$text=fread($handle,filesize($name));
fclose($handle);
}
else
$text="No commentary available";
echo "<a ".$target." href=".$path.$file.">".$file."</a><br>";
echo "<p class='text'>".$text."</p>";
$count++;
}
}
}
closedir($dh);
}
}
return $count;
}
//volanie funkcie
if(show("./adresar","adresar/")==0) //dvojte zadanie adresara nechcem vediet...
echo "<p class='text'>Directory is empty</p>";