<?PHP
  function getFileList($dir)
  {
    // array to hold return value
    $retval = [];

    // add trailing slash if missing
    if(substr($dir, -1) != "/") {
      $dir .= "/";
    }

    // open pointer to directory and read list of files
    $d = @dir($dir) or die("getFileList: Failed opening directory {$dir} for reading");
    while(FALSE !== ($entry = $d->read())) {
      // skip hidden files
      if($entry{0} == ".") continue;
      if(is_dir("{$dir}{$entry}")) {
        $retval[] = [
          'name' => "{$dir}{$entry}/",
          'type' => filetype("{$dir}{$entry}"),
          'size' => 0,
          'lastmod' => filemtime("{$dir}{$entry}")
        ];
      } elseif(is_readable("{$dir}{$entry}")) {
        $retval[] = [
          'name' => "{$dir}{$entry}",
          'type' => mime_content_type("{$dir}{$entry}"),
          'size' => filesize("{$dir}{$entry}"),
          'lastmod' => filemtime("{$dir}{$entry}")
        ];
      }
    }
    $d->close();

    return $retval;
  }

$path_parts = pathinfo('/www/htdocs/index.html');

//echo $path_parts['dirname'], "\n";
//echo $path_parts['basename'], "\n";
//echo $path_parts['extension'], "\n";
//echo $path_parts['filename'], "\n"; // filename is only since PHP 5.2.0

/* 
 // list files in the current directory
  $dirlist = getFileList(".");

  // a subdirectory of the current directory called images
  $dirlist = getFileList("images");
  $dirlist = getFileList("images/");
  $dirlist = getFileList("./images");
  $dirlist = getFileList("./images/");

  // using an absolute path
  $dirlist = getFileList("{$_SERVER['DOCUMENT_ROOT']}/images");
  $dirlist = getFileList("{$_SERVER['DOCUMENT_ROOT']}/images/");
  $dirlist = getFileList("{$_SERVER['DOCUMENT_ROOT']}/");
*/


$dirlist = getFileList(".");

/* sample output
  echo "<pre>",print_r($dirlist),"</pre>";

  Array
  (
    [0] => Array
        (
            [name] => images/background0.jpg
            [type] => image/jpeg
            [size] => 86920
            [lastmod] => 1077461701
        )

    [1] => ...
  )


  // output file list in HTML TABLE format
  echo "<table border=\"1\">\n";
  echo "<thead>\n";
  echo "<tr><th>Name</th><th>Type</th><th>Size</th><th>Last Modified</th></tr>\n";
  echo "</thead>\n";
  echo "<tbody>\n";
  foreach($dirlist as $file) {
    echo "<tr>\n";
    echo "<td>{$file['name']}</td>\n";
    echo "<td>{$file['type']}</td>\n";
    echo "<td>{$file['size']}</td>\n";
    echo "<td>",date('r', $file['lastmod']),"</td>\n";
    echo "</tr>\n";
  }
  echo "</tbody>\n";

*/


$fn=dirname(__FILE__);
$position = strpos($fn, '/', 20);
$text=explode('/',$fn);
$size=count($text);
$result = $text[$size-1];
  // output file list as HTML table
  echo "<table border=\"0\">\n";
  echo "<thead>\n";
//  echo "<tr><th></th><th>Name</th><th>Type</th><th>Size</th><th>Last Modified</th></tr>\n";
  echo "<tr><th> Fire: $result </th></tr>\n";
  echo "</thead>\n";
  echo "<tbody>\n";
  foreach($dirlist as $file) {
  //  if(!preg_match("/\.jpg$/", $file['name'])) {
   //   continue;
    //}
    echo "<tr>\n";
//    echo "<td><img src=\"{$file['name']}\" width=\"64\" alt=\"\"></td>\n";
echo "<td><a href=\"{$file['name']}\">",basename($file['name']),"</a></td>\n";
 //   echo "<td>{$file['name']}</td>\n";
 //   echo "<td>{$file['type']}</td>\n";
 //   echo "<td>{$file['size']}</td>\n";
 //   echo "<td>",date('r', $file['lastmod']),"</td>\n";
    echo "</tr>\n";
  }
  echo "</tbody>\n";
  echo "</table>\n\n";

?>
