<?php
// ------------------------------------------------------------------------- //
// Contenu récursif d'un dossier //
// ------------------------------------------------------------------------- //
// Auteur: François BAUD //
// Email: Hazzel_Thorn@hotmail.com //
// Web: //
// ------------------------------------------------------------------------- //
$VAL = 0;
function space ($VAL)
{
for ($i = 0 ; $i <= $VAL ; $i++)
{
print ("\t") ;
}
}
function recurse_dir ($DIR, $CORE)
{
global $VAL ;
space ($VAL) ;
printf ("<B>%s</B><BR>", $CORE) ;
if ($ODIR = opendir($DIR))
{
while ($FILE = readdir($ODIR))
{
if ( ($FILE != ".") && ($FILE != "..") )
{
$TMP = $DIR."/".$FILE ;
if (is_dir($TMP))
{
$VAL++ ;
recurse_dir ($TMP, $FILE) ;
$VAL-- ;
}
else
{
space ($VAL+1) ;
printf ("%s - Size: %s<BR>", $FILE, filesize ($TMP)) ;
}
}
}
}
else
{
printf ("Unable to open directory") ;
}
}
recurse_dir(getcwd(), "/") ;
?>