<?php
/*
phpDIRList 2.0 - (c)2005 Ulrich S. Kapp :: Systemberatung :: web-programmierung
All rights reserved.

Redistribution and use in source and binary forms, with or without modification,
are permitted provided that the following conditions are met:

Redistributions of source code must retain the above copyright notice, this list
of conditions and the following disclaimer.

Redistributions in binary form must reproduce the above copyright notice, this
list of conditions and the following disclaimer in the documentation and/or
other materials provided with the distribution.

Neither the name of the Ulrich S. Kapp nor the names of its contributors may be
used to endorse or promote products derived from this software without specific
prior written permission.

THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS ``AS IS''
AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE FOR ANY
DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
(INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON
ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*/


// -- Configuration -- //

// Table heading values
$file_name = "Filename";
$file_size = "Size in Bytes";
$file_date = "Last Modified";

// Page title, please edit only the string before '.str_replace ...'.
$title = "Index of ".str_replace (substr (strrchr ($_SERVER["SCRIPT_NAME"] , "/"), 1), "", $_SERVER["SCRIPT_NAME"]);

$search_type = "exclude"; // include or exclude

/* If you configure '$search_type' to include, then phpDIRList 2.0 will
only show the files configured in the '$valid_files' array.

Caution: never change the first element of this array. */
$valid_files = array ("\\/", "pdf", "jpeg", "gif");

/* If you configure '$search_type' to exclude, then phpDIRList 2.0 will show
ALL files except the files configured in the '$invalid_files' array.

Caution: never change the first element of this array. */
$invalid_files = array ("\\/", "inc", "conf");

/* '$show_hidden' decides if phpDIRList 2.0 shows hidden files.

Caution: if set to TRUE, phpDIRList 2.0 will show ALL secret files like
a .htaccess or .htpasswd file, if there is one in the folder. */
$show_hidden = FALSE; // TRUE or FALSE

// '$show_folders' tells phpDIRList 2.0 to show subdirectories.
$show_folders = TRUE; // TRUE or FALSE

// '$show_uplink' makes phpDIRList 2.0 to display the directory uplink.
$show_uplink = TRUE; // TRUE or FALSE

// '$show_executables' tells phpDIRList 2.0 to display executables.
$show_executables = FALSE; // TRUE or FALSE

// -- End Configuration -- //

function test_ext ($file) { // This is the function to check the validity of a directory entry.

    // Global all necessary variables
    global $valid_files;
    global $invalid_files;
    global $search_type;
    global $show_hidden;
    global $show_folders;
    global $show_uplink;
    global $show_executables;
   
    // Check '$search_type' and set initial value for '$create_entry'.
    if ($search_type == "exclude") {   
        $create_entry = TRUE;
    } else $create_entry = FALSE;
   
    // Check if show_folder is set or else it is not a folder
    if (!$show_folders AND is_dir( $file)) {
        $create_entry = FALSE;
        if ($show_uplink AND preg_match("/^[\.]{1,2}$/", $file)) $create_entry = TRUE;
    } else if ($show_folders AND is_dir( $file)) {
        $create_entry = TRUE;
        if (!$show_uplink AND preg_match("/^[\.]{1,2}$/", $file)) $create_entry = FALSE;
    }
   
    // Check if show_folder is set or else it is not a folder
    if ($show_executables AND is_file($file) AND is_executable( $file)) {
        $create_entry = TRUE;
    } else if (!$show_executables AND is_file($file) AND is_executable( $file)) {
        $create_entry = FALSE;
    }

    // Check for valid or invalid file types.
    if ($search_type == "include") {
        if ($ext = substr (strrchr ($file, "."), 1)) {
            if (array_search ($ext, $valid_files)) $create_entry = TRUE;
        }
    } else if ($search_type == "exclude") {
        if ($ext = substr (strrchr ($file, "."), 1)) {
            if (array_search ($ext, $invalid_files)) $create_entry = FALSE;
        }
    }


    // At last check if show_hidden is set or else it is not a hidden file
    if (!$show_hidden AND preg_match("/^\./", $file)) {
        $create_entry = FALSE;
        if ($show_uplink AND preg_match("/^[\.]{1,2}$/", $file)) $create_entry = TRUE;
    } else if ($show_hidden AND preg_match("/^\./", $file)) {
        $create_entry = TRUE;
        if (!$show_uplink AND preg_match("/^[\.]{1,2}$/", $file)) $create_entry = FALSE;
    }

    // Finally return if an entry should be created or not.
    return ($create_entry);
}

// Try to get a directory handle and continue if it returns TRUE.
if ($dir = @opendir("./")) {
    $output = ""; // Empty the HTML-output variable.
    while (($file = readdir($dir)) !== FALSE) { // Read the directory step by step and process the data.
        if (test_ext ($file)) { // Check if the entry should be displayed or not and continue if TRUE.
            $stats = @stat ( "./".$file); // Get the file stats.
            // And append a table row to the output variable.
            $output .= '
        <tr class="line">
            <td class="col1">
                <h2><a title="'.$file.'" href="'.$file.'">'.$file.'</a></h2>
            </td>
            <td class="col2">'.number_format ($stats[7], 0, ",", ".").'</td>
            <td class="col3">'.str_replace (" ", " · ", date ("d.m.Y H:i", $stats[9])).'</td>
        </tr>'."\n";
        }
    } 
    closedir($dir); // Close the directory handle.
} else {
    $output = "<tr><td colspan=\"3\"><h1>Cannot open Directory!</h1></td></tr>"; // Display error message if there was no directory handle returned in the leading condition.
}
?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
        "http://www.w3.org/TR/2000/REC-xhtml1-20000126/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="de" lang="de">
    <head>
        <meta http-equiv="content-type" content="text/html; charset=iso-8859-1" />
        <title><?php echo $title ?></title>
        <style type="text/css" media="screen">
    /* <![CDATA[ */
    h1 { font-family: Myriad Pro, Verdana, Geneva, Helvetica, Arial, Sans-Serif; font-size: small; padding: 0; margin: 0 }
    h2 { font-family: Myriad Pro, Verdana, Geneva, Helvetica, Arial, Sans-Serif; font-size: x-small; padding: 0; margin: 0 }
    p, a, div, td  { font-family: Myriad Pro, Verdana, Geneva, Helvetica, Arial, Sans-Serif; font-size: x-small }
    th {font-family: Myriad Pro, Verdana, Geneva, Helvetica, Arial, Sans-Serif; font-size: small; text-align: left }
    caption { font-family: Myriad Pro, Verdana, Geneva, Helvetica, Arial, Sans-Serif; font-size: medium; font-weight: bold; text-align: left; min-width: 28em; margin-bottom: 1em }
    address  { font-family: Myriad Pro, Verdana, Geneva, Helvetica, Arial, Sans-Serif; font-size: x-small }
    hr { width: 100%; height: 1px }
    .dirlist { min-width: 28em }
    .col1 { width: 20em; min-width: 14em; font-weight: bold; padding-right: 1em }
    .col2 { width: 10em; min-width: 7em; text-align: right; font-weight: bold; padding-right: 2em }
    .col3 { width: 10em; min-width: 7em; font-weight: bold }
    .subline { font-size: xx-small }
    .subline a { font-size: xx-small }
/* ]]> */
        </style>
    </head>
    <body>
        <table class="dirlist">
            <caption><?php echo $title; ?></caption>
            <tr>
                <th class="col1"><h1><?php echo $file_name; ?></h1></th>
                <th class="col2"><?php echo $file_size; ?></th>
                <th class="col3"><?php echo $file_date; ?></th>
            </tr>
            <tr><td colspan="3"><hr /></td></tr>
            <?php echo $output; ?>
            <tr><td colspan="3"><hr /></td></tr>
        </table>
        <?php echo str_replace ("ADDRESS", "address", $_SERVER["SERVER_SIGNATURE"]); ?>
        <p class="subline">CAPS Automation Solutions</p>
    </body>
</html>