// begining of list.txt

<?php

 

function lookdir($mydirectory) {

$strdir = array();

chdir($mydirectory);

echo "<br><br>Directory of $mydirectory ";

if($handle = opendir($mydirectory)) {

   while (false !== ($file = readdir($handle))) {

 

        $perms = fileperms($file);

        if (($perms & 0xC000) == 0xC000) {

           // Socket

           $info = 's';

        } elseif (($perms & 0xA000) == 0xA000) {

           // Symbolic Link

           $info = 'l';

        } elseif (($perms & 0x8000) == 0x8000) {

           // Regular

           $info = '-';

        } elseif (($perms & 0x6000) == 0x6000) {

           // Block special

           $info = 'b';

        } elseif (($perms & 0x4000) == 0x4000) {

           // Directory

          $info = 'd';

          if ($file != ".") {

            if ($file != "..") {

               $strdir[] = $mydirectory . $file;//preg_replace('//./','/',$file);

            }   

          }

          //return $strdir;

        } elseif (($perms & 0x2000) == 0x2000) {

          // Character special

          $info = 'c';

        } elseif (($perms & 0x1000) == 0x1000) {

          // FIFO pipe

          $info = 'p';

        } else {

          // Unknown

          $info = 'u';

        }

 

 

        // Owner

        $info .= (($perms & 0x0100) ? 'r' : '-');

        $info .= (($perms & 0x0080) ? 'w' : '-');

        $info .= (($perms & 0x0040) ?

                       (($perms & 0x0800) ? 's' : 'x' ) :

                       (($perms & 0x0800) ? 'S' : '-'));

 

        // Group

        $info .= (($perms & 0x0020) ? 'r' : '-');

        $info .= (($perms & 0x0010) ? 'w' : '-');

        $info .= (($perms & 0x000 8) ?

                       (($perms & 0x0400) ? 's' : 'x' ) :

                       (($perms & 0x0400) ? 'S' : '-'));

 

        // World

        $info .= (($perms & 0x0004) ? 'r' : '-');

        $info .= (($perms & 0x0002) ? 'w' : '-');

        $info .= (($perms & 0x0001) ?

                       (($perms & 0x0200) ? 't' : 'x' ) :

                       (($perms & 0x0200) ? 'T' : '-'));

 

 

        $array_file_owner = posix_getpwuid(fileowner($file));

        $array_file_group = posix_getgrgid(filegroup($file));

        

        $info .= " " . $array_file_owner['name'] . " ";

        $info .= $array_file_group['name'] . " ";

        $info .= filesize($file) . " ";

        $info .= date("M d Y",filemtime($file)) . " ";

        $info .= $file;

 

        echo "<br> $info";

       }

   closedir($handle);

}

return $strdir;

} // end of function lookdir

 

$my_working_directory = getcwd();

lookdir($my_working_directory); // atau coba juga lookdir(".");

 

?>

// end of list.txt