<div class="content">
<div class="title">pkSML.net's Directory Listing</div>
<div class="the_body" style="text-align: left;">
<P class=bodyText>Demo: <a href="http://files.calvarybucyrus.org">http://files.calvarybucyrus.org/</a><P>
<P class=bodyText>This script was created from scratch to imitate Evoluted New Media's <A HREF="http://www.evoluted.net/community/code/directorylisting.php">Directory Listing Script</A>.</P>
<P class=bodyText>This script was created to be used exclusively in the <A HREF="http://www.aprelium.com/abyssws/">Abyss Web Server</A>.<BR>

<P class=bodyText>
Save the following code as <b><code>dir_list.php</code></b> in your server's root folder.</P>
<P class=bodyText><a href="download.php?file=code10.txt&name=dir_list.php">[Download]</a></P>
<P><TEXTAREA rows=20 style="width: 730px;" wrap=off>
&lt;?php
// Redirect back home if trying to access script directly
if (!$_POST) {header(&quot;Location: http://{$_SERVER[HTTP_HOST]}/&quot;, true, 301); exit();}

$time_start = microtime(true);

/* Configuration  Start*/
$show_mime = 1; // Show MIME type
$nice_date = 1; // Format date according to $nice_date_style 
$nice_date_style = &quot;M j, Y&quot;;
$nice_size = 1; // Format filesize from bytes to KB, MB, GB...
$show_thumbnails = 1; // Show thumbnails for supported filetypes
$extended_icons = 1; // A much larger icon set
$chop_name = &quot;40&quot;; // Chop filenames longer than x characters - if number too large, will destroy layout

//Column Widths
$file_width = &#039;360&#039;;
$size_width = &#039;75&#039;;
$date_width = &#039;100&#039;; // May need adjusting considering $nice_date_style
$mime_width = &#039;170&#039;;

// For embedded images (for file icons)
$supportedimages = array(&#039;gif&#039;, &#039;png&#039;, &#039;jpeg&#039;, &#039;jpg&#039;);
if( ( eregi(&quot;.gif|.png|.jpg|.jpeg&quot;, $_GET[&#039;image&#039;]) ) &amp;&amp; ( $_GET[&#039;embedded&#039;]) ) {
emb_imgs($_GET[&#039;image&#039;]);
exit();}

// For thumbnail images (for image files)
if( ( eregi(&quot;.gif|.png|.jpg|.jpeg&quot;, $_GET[&#039;image&#039;]) ) &amp;&amp; ( $_GET[&#039;embedded&#039;] == 0 ) ) {
make_thumb($_GET[&#039;image&#039;]);
exit();}

$icons = array();
$icons[&#039;png&#039;] = &quot;/?embedded=1&amp;image=jpg.gif&quot;;
$icons[&#039;gif&#039;] = &quot;/?embedded=1&amp;image=gif.gif&quot;;
$icons[&#039;jpg&#039;] = &quot;/?embedded=1&amp;image=jpg.gif&quot;;
$icons[&#039;jpeg&#039;] = &quot;/?embedded=1&amp;image=jpg.gif&quot;;
$icons[&#039;bmp&#039;] = &quot;/?embedded=1&amp;image=jpg.gif&quot;;
$icons[&#039;exe&#039;] = &quot;/?embedded=1&amp;image=exe.gif&quot;;
$icons[&#039;txt&#039;] = &quot;/?embedded=1&amp;image=text.png&quot;;
$icons[&#039;htm&#039;] = &quot;/?embedded=1&amp;image=html.png&quot;;
$icons[&#039;html&#039;] = &quot;/?embedded=1&amp;image=html.png&quot;;

if($extended_icons) {
$path = &quot;aHR0cDovL3Brc21sLm5ldC9pY29uPw==&quot;;
$ipath = base64_decode($path);
$icons[&#039;setup&#039;] = &quot;{$ipath}setup.gif&quot;;
$icons[&#039;url&#039;] = &quot;{$ipath}html.gif&quot;;
$icons[&#039;fla&#039;] = &quot;{$ipath}fla.gif&quot;;
$icons[&#039;swf&#039;] = &quot;{$ipath}swf.gif&quot;;
$icons[&#039;xls&#039;] = &quot;{$ipath}xls.gif&quot;;
$icons[&#039;doc&#039;] = &quot;{$ipath}doc.gif&quot;;
$icons[&#039;sig&#039;] = &quot;{$ipath}sig.gif&quot;;
$icons[&#039;fh10&#039;] = &quot;{$ipath}fh10.gif&quot;;
$icons[&#039;pdf&#039;] = &quot;{$ipath}pdf.gif&quot;;
$icons[&#039;psd&#039;] = &quot;{$ipath}psd.gif&quot;;
$icons[&#039;rm&#039;] = &quot;{$ipath}real.gif&quot;;
$icons[&#039;mpg&#039;] = &quot;{$ipath}video.gif&quot;;
$icons[&#039;mpeg&#039;] = &quot;{$ipath}video.gif&quot;;
$icons[&#039;mov&#039;] = &quot;{$ipath}video2.gif&quot;;
$icons[&#039;avi&#039;] = &quot;{$ipath}video.gif&quot;;
$icons[&#039;eps&#039;] = &quot;{$ipath}eps.gif&quot;;
$icons[&#039;gz&#039;] = &quot;{$ipath}archive.png&quot;;
$icons[&#039;asc&#039;] = &quot;{$ipath}sig.gif&quot;;
$icons[&#039;mht&#039;] = &quot;{$ipath}sig.gif&quot;;
$icons[&#039;zip&#039;] = &quot;{$ipath}archive.png&quot;;
$icons[&#039;rar&#039;] = &quot;{$ipath}archive.png&quot;;
$icons[&#039;php&#039;] = &quot;{$ipath}php.png&quot;;
$icons[&#039;xml&#039;] = &quot;{$ipath}xml.png&quot;;
$icons[&#039;cgi&#039;] = &quot;{$ipath}pl.png&quot;;
$icons[&#039;pl&#039;] = &quot;{$ipath}pl.png&quot;;
$icons[&#039;mht&#039;] = &quot;{$ipath}mht.png&quot;;
$icons[&#039;tar&#039;] = &quot;{$ipath}tar.png&quot;;
$icons[&#039;js&#039;] = &quot;{$ipath}js.png&quot;;
$icons[&#039;tgz&#039;] = &quot;{$ipath}tgz.png&quot;;
$icons[&#039;conf&#039;] = &quot;{$ipath}conf.png&quot;;
$icons[&#039;rar&#039;] = &quot;{$ipath}rar.png&quot;;
$icons[&#039;mp3&#039;] = &quot;{$ipath}mp3.png&quot;;
$icons[&#039;wav&#039;] = &quot;{$ipath}wav.png&quot;;
$icons[&#039;log&#039;] = &quot;{$ipath}text.png&quot;;
$icons[&#039;iso&#039;] = &quot;{$ipath}iso.png&quot;;
}
/* Configuration  End*/

$data = explode(&quot;\n&quot;, $_POST[&#039;files&#039;]);

// Set Defaults
if (!$_GET[&#039;s&#039;]) {$sort = &quot;name&quot;;} else {$sort = $_GET[&#039;s&#039;];}
if (!$_GET[&#039;o&#039;]) {$order = &quot;asc&quot;;} else {$order = $_GET[&#039;o&#039;];}
?&gt;
&lt;!DOCTYPE html PUBLIC &quot;-//W3C//DTD XHTML 1.0 Transitional//EN&quot; &quot;http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd&quot;&gt;
&lt;html xmlns=&quot;http://www.w3.org/1999/xhtml&quot;&gt;
&lt;head&gt;
&lt;meta http-equiv=&quot;Content-Type&quot; content=&quot;text/html; charset=iso-8859-1&quot; /&gt;
&lt;title&gt;Directory Listing of &lt;?php echo $_POST[&#039;path&#039;];?&gt;&lt;/title&gt;
&lt;?php
if($show_thumbnails) {
?&gt;
&lt;script language=&quot;javascript&quot; type=&quot;text/javascript&quot;&gt;
&lt;!--
function o(n, i) {document.images[&#039;thumb&#039;+n].src = &#039;./?embedded=0&amp;image=&#039;+i;}
function f(n) {document.images[&#039;thumb&#039;+n].src = &#039;./?embedded=1&amp;image=trans.gif&#039;;}
//--&gt;
&lt;/script&gt;
&lt;?php
}
?&gt;
&lt;style type=&quot;text/css&quot;&gt;
&lt;?php css(); ?&gt;
&lt;/style&gt;
&lt;/head&gt;
&lt;body&gt;
&lt;div id=&quot;container&quot;&gt;
  &lt;h1&gt;Directory Listing of &lt;?php echo $_POST[&#039;path&#039;];?&gt;&lt;/h1&gt;
  &lt;div id=&quot;breadcrumbs&quot;&gt;
  &lt;?php $parts = explode(&quot;/&quot;, $_POST[path]); // Links to pieces of current path
echo &quot;&lt;a href=\&quot;/\&quot;&gt;home&lt;/a&gt;&quot;;
$link = &quot;/&quot;;
foreach($parts as $part){if( strlen($part) &gt; 0 ) {$link .= $part . &quot;/&quot;; echo &quot; &gt; &lt;a href=\&quot;{$link}\&quot;&gt;{$part}&lt;/a&gt;&quot;;}}
?&gt;
&lt;/div&gt;
&lt;?php
$total_filesize = &quot;0&quot;;
// Build directory array and file array
$dir_list = array();
$file_list = array();

foreach ($data as $line =&gt; $value) {
  list($name, $url, $size, $mdate, $mime) = explode(&quot;\t&quot;, &quot;$value&quot;);
$total_filesize = $total_filesize + $size;
	if ( preg_match(&quot;@/@i&quot;, $name, $matches) ) {
		$dir_list[$line] = $$sort;
	}
	else {
		$file_list[$line] = $$sort;
	}
}

// Now sort our arrays;
if ( ($order == &quot;asc&quot;) &amp;&amp; ( ($sort == &quot;name&quot;) || ($sort == &quot;mdate&quot;) ) ) {natcasesort($dir_list);} // Sorted in ascending order
if ( ($order == &quot;dec&quot;) &amp;&amp; ( ($sort == &quot;name&quot;) || ($sort == &quot;mdate&quot;) ) ) {natcasesort($dir_list); $dir_list = array_reverse($dir_list, true);} // Sorted in reverse order

natcasesort($file_list);
if ($order == &quot;dec&quot;) {$file_list = array_reverse($file_list, true);} // Sorted in reverse order

$sorted_dir = array();

foreach ($dir_list as $line =&gt; $value) {
list($name, $url, $size, $mdate, $mime) = explode(&quot;\t&quot;, $data[$line]);
$sorted_dir_names = &quot;{$name}\t{$url}\t-\t{$mdate}\t&lt;i&gt;Directory&lt;/i&gt;&quot;;
$sorted_dir[] = $sorted_dir_names . &quot;\n&quot;;
}
foreach ($file_list as $line =&gt; $value) {$sorted_dir[] = $data[$line] . &quot;\n&quot;;}

// Create sortable links
$name_query = &quot;?s=name&quot;;
$size_query = &quot;?s=size&quot;;
$mdate_query = &quot;?s=mdate&quot;;
$mime_query = &quot;?s=mime&quot;;

if( ($sort == &quot;name&quot;) &amp;&amp; ($order == &quot;asc&quot;) ) {$name_query = &quot;?s=name&amp;o=dec&quot;;}
if( ($sort == &quot;size&quot;) &amp;&amp; ($order == &quot;asc&quot;) ) {$size_query = &quot;?s=size&amp;o=dec&quot;;}
if( ($sort == &quot;mdate&quot;) &amp;&amp; ($order == &quot;asc&quot;) ) {$mdate_query = &quot;?s=mdate&amp;o=dec&quot;;}
if( ($sort == &quot;mime&quot;) &amp;&amp; ($order == &quot;asc&quot;) ) {$mime_query = &quot;?s=mime&amp;o=dec&quot;;}
?&gt;
  &lt;div id=&quot;listingcontainer&quot;&gt;
  &lt;div id=&quot;listingheader&quot;&gt; 
	   &lt;div id=&quot;headerfile&quot;&gt;&lt;a href=&quot;&lt;?php echo $_SERVER[&#039;PHP_SELF&#039;] . $name_query; ?&gt;&quot;&gt;File&lt;/a&gt;&lt;/div&gt;&lt;span style=&quot;float: left;width: 20px;&quot;&gt;&amp;nbsp;&lt;/span&gt;
	   &lt;div id=&quot;headersize&quot;&gt;&lt;a href=&quot;&lt;?php echo $_SERVER[&#039;PHP_SELF&#039;] . $size_query; ?&gt;&quot;&gt;Size&lt;/a&gt;&lt;/div&gt;
	   &lt;div id=&quot;headermodified&quot;&gt;&lt;a href=&quot;&lt;?php echo $_SERVER[&#039;PHP_SELF&#039;] . $mdate_query; ?&gt;&quot;&gt;Last Modified&lt;/a&gt;&lt;/div&gt;
&lt;?php if($show_mime) {?&gt;	   &lt;div style=&quot;padding-left: 10px;&quot; id=&quot;headermime&quot;&gt;&lt;a href=&quot;&lt;?php echo $_SERVER[&#039;PHP_SELF&#039;] . $mime_query; ?&gt;&quot;&gt;MIME Type&lt;/a&gt;&lt;/div&gt;&lt;?php } ?&gt;	
	&lt;/div&gt;
    &lt;div id=&quot;listing&quot; style=&quot;clear: both;&quot;&gt;
         &lt;?php
           $background = &quot;w&quot;; // blue background which alternates
             
           /* Split and get the lines */
           $lines = $sorted_dir;
           /* For each line do... */
           foreach ($lines as $i =&gt; $line)
           {
             if($background == &quot;w&quot;) {$background = &quot;b&quot;;} else {$background = &quot;w&quot;;}
             /* Split the line and get the file information */
             list($name, $url, $size, $date, $mimetype) = explode(&quot;\t&quot;, $line);

             $is_dir = 0; if ($mimetype == &quot;&lt;i&gt;Directory&lt;/i&gt;\n&quot; ) {$is_dir = 1;}

             echo &quot;&lt;div style=\&quot;clear: right;\&quot;&gt;&quot;;
             echo &quot;&lt;a class=\&quot;{$background}\&quot; href=\&quot;{$url}\&quot; alt=\&quot;File icon\&quot;&quot; . img_prev( strtolower(substr($name, strrpos($name, &#039;.&#039;)+1)), true, $i, $name ) . &quot;&gt;&quot;;
             if($is_dir &amp;&amp; ($name == &quot;../&quot;) ) {$not_home = 0; echo &quot;&lt;img height=\&quot;16\&quot; width=\&quot;16\&quot; src=\&quot;/?embedded=1&amp;image=dirup.png\&quot;&gt;&quot;;} // If dir link is for folder up -&gt; ..
             elseif($is_dir) {echo &quot;&lt;img height=\&quot;16\&quot; width=\&quot;16\&quot; src=\&quot;/?embedded=1&amp;image=folder.png\&quot;&gt;&quot;;} // If link is for a directory
             else {file_icons( strtolower(substr($name, strrpos($name, &#039;.&#039;)+1)), $icons );} // If link is for regular file
             echo &quot;&lt;strong&gt;&quot; . file_display($name, $chop_name) . &quot;&lt;/strong&gt;&quot;; // Filename link
             echo &quot;&lt;em&gt;&quot; . nicesize($size, $nice_size, $is_dir) . &quot;&lt;/em&gt;&quot;; // Filesize
             if($show_mime) {echo &quot;&lt;div class=\&quot;modtime\&quot;&gt;&quot; . modtime($date, $nice_date, $nice_date_style) . &quot;&lt;/div&gt;&quot;;} // Last Modified Time
             else {echo modtime($date, $nice_date, $nice_date_style);} // Last Modified Time
             echo img_prev( strtolower(substr($name, strrpos($name, &#039;.&#039;)+1)), false, $i, $name );
             if ($show_mime) {echo &quot;&lt;div style=\&quot;text-align: left;\&quot; class=\&quot;mimetype\&quot;&gt;&quot; . trim($mimetype) . &quot;&lt;/div&gt;&quot;;} // MIME type 
             echo &quot;&lt;/a&gt;&lt;/div&gt;\n&quot;;
           }
        ?&gt;
        &lt;/div&gt;
&lt;?php
// Miscellaneous Functions
function file_display($name, $cut_num) {
$name = htmlentities($name);
$parts = pathinfo($name);
$ext = ($parts[&#039;extension&#039;]);
$ext_length = strlen($parts[&#039;extension&#039;]);
if ($ext_length == 0) { // Either directory or filename w/o extension
	//return strlen($name);
  if ( strlen($name) &gt; $cut_num) {return substr($name, 0, $cut_num) . &quot;...&quot;;}
	else {return $name;}
}
else { // Regular file w/ extension
  $filename_allowed_length = ($cut_num - $ext_length); // How long the filename (w/o extension) can be
  //$filename_length = (strlen($name) );
  if (strlen($name) &gt; $cut_num) {return substr($name, 0, $filename_allowed_length) . &quot;...{$ext}&quot;;} // Too long filename+ext
  else {return $name;} // Filename+ext not too long
}
}

function img_prev($ext, $a, $i, $name){
global $show_thumbnails, $supportedimages;

if($show_thumbnails &amp;&amp; in_array($ext, $supportedimages)) {
$thumb = &#039;&lt;span&gt;&lt;img src=&quot;/?embedded=1&amp;image=trans.gif&quot; alt=&quot;&#039;.$name.&#039;&quot; name=&quot;thumb&#039;.$i.&#039;&quot; /&gt;&lt;/span&gt;&#039;;
$thumb2 = &#039; onmouseover=&quot;o(&#039;.$i.&#039;, \&#039;&#039;.urlencode($name).&#039;\&#039;);&quot; onmouseout=&quot;f(&#039;.$i.&#039;);&quot;&#039;;}

if($a){return $thumb2;} else {return $thumb;}
}

function file_icons($ext, $icon_array) {
if( array_key_exists($ext, $icon_array) ) {echo &quot;&lt;img height=\&quot;16\&quot; width=\&quot;16\&quot; src=\&quot;{$icon_array[$ext]}\&quot;&gt;&quot;;}
else {echo &quot;&lt;img height=\&quot;16\&quot; width=\&quot;16\&quot; src=\&quot;/?embedded=1&amp;image=unknown.png\&quot;&gt;&quot;;}
}

function nicesize($bytes, $change, $isdir) {
if($isdir == 1) {return &quot;-&quot;;}
if($change == false) {return $bytes;}

if($bytes &lt; 100) {return $bytes . &quot; b&quot;;}
elseif($bytes &lt; (1024 * 1024)) {return number_format($bytes / 1024, 1) . &quot; kb&quot;;}
elseif($bytes &lt; (1024 * 1024 * 1024)) {return number_format($bytes / (1024 * 1024), 2) . &quot; mb&quot;;}
elseif($bytes &lt; (1024 * 1024 * 1024 * 1024)) {return number_format($bytes / (1024 * 1024 * 1024), 3) . &quot; gb&quot;;}
}
function modtime($date, $nice_date, $nice_date_style) {
if($nice_date == false) {return $date;}

$datetime = date($nice_date_style, mktime(substr($date, 11, 2), substr($date, 14, 2), substr($date, 17, 2), substr($date, 5, 2), substr($date, 8, 2), substr($date, 0, 4)));
return $datetime;
}

function css() {
global $file_width, $size_width, $date_width, $mime_width, $show_mime;

if($show_mime) {$container_width = ($file_width + $size_width + $date_width + $mime_width + 30);}
else {$container_width = ($file_width + $size_width + $date_width + 50);}

echo &quot;body {background-color: #E6E6E6;}

h1 {
	color: #6699FF;
	font-family: Arial, Helvetica, sans-serif;
	font-weight:bold;
	font-size: medium;
	margin: 0 0 10px 8px;
	padding:0;}

img {border: 0;}

form {margin: 0; padding: 0;}

#container {
	width: {$container_width}px;
	margin-left:auto;
	margin-right:auto;
	border: 1px solid #CCCCCC;
	padding: 9px;
	background-color:#FFFFFF;}

#breadcrumbs {
	color: #6699FF;
	font-family: Arial, Helvetica, sans-serif;
	font-size:small;
	margin: 0 0 8px 8px;}

#breadcrumbs a, #breadcrumbs a:visited, #breadcrumbs a:link, #breadcrumbs a:active {
	color: #6699FF;
	text-decoration:none;}

#breadcrumbs a:hover {
	text-decoration:underline;}

#listingcontainer {
	background-image:url(/?embedded=1&amp;image=bg.gif);
	padding: 10px;
	background-color:#E0DEDE;}

#listingheader {
	color: #476BB3;
	font-weight:bold;
	font-family:Arial, Helvetica, sans-serif;
	font-size:small;
	text-align: right;}

#listingheader a, #listingheader a:active, #listingheader a:visited, #listingheader a:link {
	text-decoration: none;
	color: #476BB3;}

#listingheader a:hover {
	text-decoration: underline;
	color: #476BB3;}

#headerfile {
	text-align:left;
	float: left;
	width: {$file_width}px;}

#headersize {
	text-align:right;
	width: {$size_width}px;
	float: left;}

#headermime {
  text-align: left;
  float: left;
}

#listing {border: 1px solid #A7C5FF;}

#listing a {
	display:block;
	padding: 2px 5px 2px 5px;
	font-size:small;
	color: #6285CA;
	font-family:Arial, Helvetica, sans-serif;
	text-decoration:none;
	}

#listing a:hover {
	background-color:#DBE6FE;}

#listing a img {
	float:left;
	margin-right: 4px;}

#listing a strong {
	width: {$file_width}px;
	float:left;
	cursor:hand;
	cursor:pointer;
	text-align:left;}

#listing a em {
	padding-right: 5px;
  float: left;
	width: {$size_width}px;
	text-align:right;
	cursor:hand;
	cursor:pointer;}

.modtime {
  float: left;
  display: inline;
  width: {$date_width}px;}

.mimetype {
  display: inline;
  width: {$mime_width}px;}

#listing a span {
	position: absolute;
	margin-left: -151px;
	margin-top: -2px;}

#listing a span img {
	width: 150px;
	background-color:#CCCCCC;
	visibility: hidden;}

#listing a:hover span img {
	border: 1px solid #666666;
	visibility: visible;}

.copy {
	width: 600px;
	margin-left:auto;
	margin-right:auto;
	text-align:center;
	font-size:x-small;
	color: #666666;
	font-family:Arial, Helvetica, sans-serif;}

.copy a {
	text-decoration: underline;
	color: #666666;}

.b {background-color: #E9F0FF;}
.w {background-color:#FFFFFF;}
.mod {float:right;}
.size {float:right;}&quot;;
if($show_mime){echo &quot;\n#headermodified {
	width: {$date_width}px;
	float: left;}&quot;;}
}

function make_thumb($img_name){
$filename = $_SERVER[&#039;REDIRECT_SCRIPT_FILENAME&#039;] . $img_name;

if(!file_exists($filename)) die(&quot;Error: File &lt;B&gt;{$filename}&lt;/B&gt; does not exist&quot;);
if(!function_exists(&#039;imagecreatetruecolor&#039;)) die(&#039;Error: GD2 not installed / configured&#039;);

$fn_array = explode(&#039;.&#039;, $filename); 
$type = strtolower(end($fn_array));

if ($type == &#039;jpg&#039; || $type == &#039;jpeg&#039;) $img = @imagecreatefromjpeg($filename);
elseif ($type == &#039;png&#039;) $img = @imagecreatefrompng($filename);
elseif ($type == &#039;gif&#039;)  {
	if(!function_exists(&#039;imagecreatefromgif&#039;)) die(&#039;Error: Your version of GD does not support GIFs&#039;);
	$img = @imagecreatefromgif($filename);
}
else die(&quot;Error: Image type not supported&quot;);

$x = imagesx($img);
$y = imagesy($img);

$width = 150;
$height = round(($y/$x) * $width);

$tmpimage = imagecreatetruecolor($width, $height);
imagecopyresampled($tmpimage, $img, 0, 0, 0, 0, $width, $height, $x, $y);
imagedestroy($img);
$img = $tmpimage;

if ($type == &#039;jpg&#039; || $type == &#039;jpeg&#039;) {
	header(&quot;Content-type: image/jpeg&quot;);
	header(&quot;Cache-control: max-age=300&quot;);
  imagejpeg($img, &#039;&#039;, 65);} 
elseif ($type == &#039;png&#039;) {
	header(&quot;Content-type: image/png&quot;);
	header(&quot;Cache-control: max-age=300&quot;);
	imagetruecolortopalette($img, false, 128);
	imagepng($img);} 
elseif ($type == &#039;gif&#039;) {
	header(&quot;Content-type: image/png&quot;);
	header(&quot;Cache-control: max-age=300&quot;);
	imagetruecolortopalette($img, false, 128);
	imagepng($img);}
}

function emb_imgs($img_name) {
$images = array();

$images[&#039;bg.gif&#039;] = &#039;R0lGODlhCAAIAIAAAAAAAP///yH5BAkAAAAALAAAAAAIAAgAAAINBGJnuO2pHIuTVfhCAQA7&#039;;

$images[&#039;exe.gif&#039;] = &#039;R0lGODlhEAAQAOYAAFYtQOLj/DxQ/y1B4pugyJKXutne+5GUp+&#039;.&#039;vu/2JuqipIyiU/rFFy/0VarkZv/05z/0hann2Y/5mv/1+G/6W7&#039;.
&#039;/4Oi/z5NdYqZwpeiw5ulw9LY6lGB/zZIdj5PekVcj7vO+eTp9D&#039;.&#039;1VhUFXhGB4qVdsl4ig0rHK/7vN89Hg//L2/uzt77zQ9cXZ/8nc&#039;.
&#039;/7TA1c/Z7OTt/e70/16Gw9/n8vP4/6CwwCxJY+bz/1xqdnuSmU&#039;.&#039;hnWF1tYytrFI2qg0qAJ8Dcq3imRHGTSGedJXWeQ67ibKfSb5Pm&#039;.
&#039;FmSFMJ//AJz0AIrdApzuE4fKC3+7D4rCIoqzPoa9F56xblxkLo&#039;.&#039;SJVf/rAP/hApF5Af/UBN7AJ9W5K+zMML2kMffGBP/QEOjEIOy5&#039;.
&#039;ANSmANSvMd6kBI+Lf25TLP/Db/+UH8B+M/+uVf+YK/F6CPyRLt&#039;.&#039;6aXP+KJ/+zcf+LNtdnGv9sEf5WAqw2Fno+LdOtpdgkAv///7Oz&#039;.
&#039;s////wAAAAAAAAAAAAAAAAAAAAAAACH5BAEAAHkALAAAAAAQAB&#039;.&#039;AAAAe9gHmCeSSFhoWDiYR3jIwpiIqLNCmUICQ3JJEkd5QxMTOH&#039;.
&#039;iW5sb3UwAQgGGi80JHiCa21ocXM9RT9ELih3roJmaWhydD5NS0&#039;.&#039;YZLbyvZWpncHZkQkxJTgXJvTUJMhAAPFBKSEME168TGyYMCkdB&#039;.
&#039;QE9TGOR5DhUUAjZiXlpdByfxDxIRBkgBw6VKlgsrWCjLgWNHgw&#039;.&#039;VWvlyhsqXEB4W9BumIEsYLljEq7tBQlmiEhw4WOIgQEcLQq0R4&#039;.
&#039;YsqciScQADs=&#039;;

$images[&#039;gif.gif&#039;] = &#039;R0lGODlhEAAQAOYAANTJ1llDl0ZGrP39/q2w/JOWwYWKtJOazG&#039;.&#039;x0pZOaxImRuczV/3WEt5im05ShynmNwLvL87HF8XuUx4KczDxs&#039;.
&#039;vYKg06O85rPK8Yep3Iiq3MLb/yNv1ajK9ZzG9cvj/uPs9pnL/K&#039;.&#039;PR/qrU/rLY/bLV+rrb/tPd50KW5Xi38sLh/tPp/tvt/uPx/ur0&#039;.
&#039;/UOm91Kr9vP5/guL8YjI+wiU8gCZ/trk6e7w8Q6n4ubo6FfwT2&#039;.&#039;r6Md3jxr/DgeXUCNzJI+fGJu7XY/3MAPDMKf4zAO80DsZ6evPz&#039;.
&#039;82ZmZv///wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA&#039;.&#039;AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA&#039;.
&#039;AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA&#039;.&#039;AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA&#039;.
&#039;AAAAAAAAAAAAAAAAAAAAAAAAAAAAACH5BAEAAEgALAAAAAAQAB&#039;.&#039;AAAAexgEgYg4QZFRgMSIqLGAOOjzAYKEeLio2PAzAwLi4nlIyY&#039;.
&#039;mi0LCwQMn4IDQ6tFKSssKyoQqBhGq0MUNDQyKh6zjLZDARu6NC&#039;.&#039;W+tDZDRALEujIaF6gVHwAAMTM3uiDRqBM4sDI5OjQvIyURqBI1&#039;.
&#039;KytAQT0+HSUkHKgP7DtCP/w8IvWoGJjoVWIECREIRVgIaMKDhx&#039;.&#039;QlCooIwWHhIgQNMjZwcCBBggIKDKBCcqSkyZMlFQUCADs=&#039;;

$images[&#039;jpg.gif&#039;] = &#039;R0lGODlhEAAQAOYAAFNAQqWSl6aFlamUqJaCpod1pYqCs2pntp&#039;.&#039;WXw6ux+GxzpYqStpil1XSEtrvK+nuNwnqTxoObycPW/JOny6O8&#039;.
&#039;5Yao2LfX/ent8nKm4nim2qXL9JbG96jS/YeqzMbi/tXp/tPd59&#039;.&#039;3k6+Xm50CS4Haz6ujz/UOm9/r8/fnlhf/hevnUeenHe+bIgf/d&#039;.
&#039;mv3FYvXFdNi3g/S6ZP22WaloJ/2oUteldviVRbV3RdOdceuFOY&#039;.&#039;pYMOKSU9uRWfyKQ2VDLfuDO8iTdP1zNrNZMf2VZvxtM/2GVLeD&#039;.
&#039;b+ZXJ7I0EtlJIbyJe9JBHWg0J8g1GMCblbeYk60yLWZmZv///w&#039;.&#039;AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA&#039;.
&#039;AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA&#039;.&#039;AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA&#039;.
&#039;AAAAAAAAAAAAAAAAAAAAAAAAAAAAACH5BAEAAFIALAAAAAAQAB&#039;.&#039;AAAAeygFIVg4SEUVKIiRUnjI0nFSSHiYKOjSYmI5KIi5UlEhIJ&#039;.
&#039;DZqLQ0RBPTQuJR8fDqMnRUJBNjItLzQTroonUExITUtHR0kRup&#039;.&#039;slOzozOT8xPzkdxoIXNTc+PDsqKjwV0hEiTkoARjgsK0AZ0hAh&#039;.
&#039;AwUHAiwoKU8ZGpoPIQgGBAQBMCsEMNhL1ADEBw4cNGjYwJADBU&#039;.&#039;0FP3iYaKEiwoeJFDDYyGACgo8IFhjQJCWKyZMoTSIKBAA7&#039;;

$images[&#039;trans.gif&#039;] = &#039;R0lGODlhCgAKAIAAAP///8DAwCH5BAEAAAEALAAAAAAKAAoAAA&#039;.
&#039;IIjI+py+0PYysAOw==&#039;;

$images[&#039;dirup.png&#039;] = &#039;iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAMAAAAoLQ9TAAABSl&#039;.&#039;BMVEX/////8oz/6IPo2KQRfAk+ij112kLs2Z9nzDR/40xs0Tk0&#039;.
&#039;sxtspWr//8bMmQEMeQfs2Zn//9HbvFv81IP133nsxk43egv//9&#039;.&#039;n8+c/y1WQigRffvlFRjikIdwTv4HvmvFH//sf/+KaO9Fy30rPv&#039;.
&#039;36snjBv/8qlOj0H16sHm0pWBrEeF6lPUqy7ixnEZmA2KtoYxgR&#039;.&#039;s8oR/ewWrr3bPW49FgxUDm0WPRpR/H2cLyzFsnjBQBZwEnjxQW&#039;.
&#039;fAz//+f/6pXWpRf/24n///LmwkS5nBH//6ziuEN7rXg8hS7/5q&#039;.&#039;Df5q8coA8vlB/myXnfujzv9bxXxCzgxGvetTbqwFd02EchfCBh&#039;.
&#039;ky5BjD5EtyL85Hwmixry5qT//74XeRNZvjkUjAtDrSL/3HcRcA&#039;.&#039;oIbgXf7IZJvSX/9MjmvD4vgS6PvIcgeB/drzX//5n/+ZM2id9Q&#039;.
&#039;AAAAAXRSTlMAQObYZgAAAAFiS0dEbbsGAK0AAAAWdEVYdFNvZn&#039;.&#039;R3YXJlAGdpZjJwbmcgMi40LjakM4MXAAAAuUlEQVR42mNggAAe&#039;.
&#039;VhMGZKAsqxerjywQ6s0dYZNhAefzxHOnBnAYJruDednZ2db8LA&#039;.&#039;kcXFksLGC+gIQ/UMyKi40VojxbIScnRpDXlo3TAyqgmAsE2WKc&#039;.
&#039;IerZ2WAB+0hJZz/2cO24TKdAsICjm4qdOK+UUpRXNDNYQFjXNS&#039;.&#039;cnxcc0TE0aYkawBiMjo5aqgZyIJkRAPo2JiSlJxkw0CGqLr2ei&#039;.
&#039;ZboLn7kQM1SA3YFPx4gZ4a/sbGNkbwIA830ixvT5AmIAAAAASU&#039;.&#039;VORK5CYII=&#039;;

$images[&#039;folder.png&#039;] = &#039;iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAMAAAAoLQ9TAAAAkF&#039;.&#039;BMVEX////MmTT/zGezgRvLmDN/f3/AjSi6hyK9iiWgbghra2vC&#039;.
&#039;jyr/5oGufBbHlC+jcQuwfhiIiIjJljGcagS1gh24hSCebAaZZw&#039;.&#039;GaaAK0gRzvvFfcqUT4xWC8iSRKSkqreRPCwsK/jCeodhDms06l&#039;.
&#039;cw23hB/ToDv/1G//4HvFki3/64X/95Fqamr//////5n/9I54UB&#039;.&#039;IWAAAAAXRSTlMAQObYZgAAAAFiS0dELc3aQT0AAAAWdEVYdFNv&#039;.
&#039;ZnR3YXJlAGdpZjJwbmcgMi40LjakM4MXAAAAiUlEQVR42oXOxx&#039;.&#039;KCMBgE4CWhVwEp9i4Ekt/3fzuDE0YdD3633dnDAr8su0i/stKi&#039;.
&#039;40cmTfnebckXU2GPj8k0U0mui2KIxYu7q1acA2kv1CxWWQ7RWT&#039;.&#039;TbUhAiYjaNxppqCZcJGowLlRI+O1FvbKiV8FhFnXGnJgT0n+Rw&#039;.
&#039;vmZBXbbN3tFPHPnm4L8nl3EWVP90I8IAAAAASUVORK5CYII=&#039;;

$images[&#039;html.png&#039;] = &#039;iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAMAAAAoLQ9TAAABhl&#039;.&#039;BMVEX///+hxOZ/rscyiM3K2P9LiLSYwtUzmOyCtdC/v7+pzv+7&#039;.
&#039;zuMmisJSUoNqa5tuxOu+yv9Dqv50gLIpRV+6yv/W1tZtwebs9f&#039;.&#039;96fqcpluW62/t1sd0iRGqtzf/I1v0wc7JAZImIq96ftNg/qfc7&#039;.
&#039;ue8oPVuU6fzb7f9HeKUxle0voutoapdIbIlRpuVLbIh0lLRVVo&#039;.&#039;ZhY5CEo9Zvcp7T6f/z+f+q0Ou/3/+lueHo8Pe00vD9/v8ztPB0&#039;.
&#039;eKMxqvJbXIvJ1/5WVoe0zP8/uu57zfgyj9jb6vjG1fsmnOXs9v&#039;.&#039;8jkdIon+bL6vawzf8mRGYzqd1xo8i91+YfcZ6ZqrwqbKx1qN59&#039;.
&#039;gat/osA/eLFLwfmnsb41kdkqe8TJ2P+3zP+9yv9xgbJ9zvsyXY&#039;.&#039;9CleSUt9ZVlcCoxuOit95jbZyhuMo9y/6zxezB0PYznOxLga7G&#039;.
&#039;1fzh7PY9oNrk8v9Jpuarzf+22OlJisRr8/87mOrE4v/M5f8eYJ&#039;.&#039;qHqdxZlrxYWYmQkJD////39/c1+Qs8AAAAAXRSTlMAQObYZgAA&#039;.
&#039;AAFiS0dEgGW9nmgAAAAWdEVYdFNvZnR3YXJlAGdpZjJwbmcgMi&#039;.&#039;40LjakM4MXAAAA2klEQVR42mNgYGCoAQNFIyFRBgiosW4AA6EA&#039;.
&#039;TqhAQ4NlIAdHaYJAMkSkphYEGpwz+PjC6oF8tlq18iyV1AaxAl&#039;.&#039;MBiXoQ38efh8dbK6/BUzzeFihQ28gUxNgQIxit71YkYlwP4tt4&#039;.
&#039;Feu6sgtqcKvHadczNDJFelSDgQK3iZNhPUOmi51kNWMVCKRV+d&#039;.&#039;rXM7AWRuRqyjMyMzPrWFXKOgIFgqNCKtiV+fmFU6TMS3jrGRLD&#039;.
&#039;G8uSZPxU9ZRyHFi4gAIMZtKhchbp2fnusSwsXAYglzLUIQGwAE&#039;.&#039;M9EgAANINGWfF9t2oAAAAASUVORK5CYII=&#039;;

$images[&#039;text.png&#039;] = &#039;iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAMAAAAoLQ9TAAAAsV&#039;.&#039;BMVEX///+GaULUv0uQazF4eMGdgl2UlJSjo6NpaWnBz9br9fNy&#039;.
&#039;cnLJyeN+goLh4eGcoqK/yti+0NGEbm29wMvBztm/ztW8qpG/zd&#039;.&#039;W9m06khT2NjY2ipaTX19eQkZG+tLrCwsK8zNSAgICNeW+2ys68&#039;.
&#039;wMDDycjs9fS7zdC+zdSUfmO5ttOpkG9rbW3b29ufn5/ExuLx+P&#039;.&#039;f8/f3s9vT3+/pxcXHW1tZ4eMB+f3/p9PL///+7vb1gNwqKAAAA&#039;.
&#039;AXRSTlMAQObYZgAAAAFiS0dEOdcAlUAAAAAWdEVYdFNvZnR3YX&#039;.&#039;JlAGdpZjJwbmcgMi40LjakM4MXAAAAf0lEQVR42mNgwAIkmJgl&#039;.
&#039;mTSZhFhNIXweFhZmMSUtbTlWdj6wgJk+owWjEaMxo6WJDERA3c&#039;.&#039;LCwsjA2NDSBKLHjBNdQNTC3NzcCklAHF2FIEiFuZUlXEADXYUA&#039;.
&#039;ugoRdBUKFuZWKALKFhZcaqoq0rJsuhDPCPPz6nBwK0rpyWPzOg&#039;.&#039;DQNxtNkr7BnAAAAABJRU5ErkJggg==&#039;;

$images[&#039;unknown.png&#039;] = &#039;iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAMAAAAoLQ9TAAAAM1&#039;.&#039;BMVEX///8AgAD//wD/AAAA////zDPLy8sICAjn59ZVVVWGhoYA&#039;.
&#039;AP+ZmZnMzMwAAJn///+AAADJQpymAAAAAXRSTlMAQObYZgAAAA&#039;.&#039;FiS0dEDxi6ANkAAAAWdEVYdFNvZnR3YXJlAGdpZjJwbmcgMi40&#039;.
&#039;LjakM4MXAAAAVklEQVR42l3OWw7AIAhEUexLUeu4/9XaUlHq/T&#039;.&#039;whE4jiKJMUg5b5A2gZvAAzC4wRf3UoZ5E8FMoCfSNM2CqQLNQd&#039;.
&#039;6UgG8Fw4N0FfVfCjDiaB2/QC/6IGC9YJmappnzcAAAAASUVORK&#039;.&#039;5CYII=&#039;;

if( preg_match(&quot;/.gif/&quot;, $img_name) &amp;&amp; array_key_exists($img_name, $images) ) {
header(&quot;Content-type: image/gif&quot;);
header(&quot;Cache-control: max-age=300&quot;);
$size = ( (strlen($images[$img_name]) / 4) * 3 );
header(&quot;Content-length: {$size}&quot;);
echo base64_decode($images[$img_name]);
exit();}

elseif( preg_match(&quot;/.png/&quot;, $img_name) &amp;&amp; array_key_exists($img_name, $images) ) {
header(&quot;Content-type: image/png&quot;);
header(&quot;Cache-control: max-age=300&quot;);
$size = ( (strlen($images[$img_name]) / 4) * 3 );
header(&quot;Content-length: {$size}&quot;);
echo base64_decode($images[$img_name]);
exit();}
}
?&gt;
	  &lt;/div&gt;
&lt;div class=&quot;copy&quot; style=&quot;text-align: center; background: transparent; margin-top: 5px; margin-bottom: 0px; height: 15px;&quot;&gt;
&lt;div style=&quot;margin-right: 15px; float: left;&quot;&gt;Subfolders: &lt;?php
if($nothome) {echo count($dir_list);} else echo (count($dir_list) - 1) ?&gt;&lt;/div&gt;
&lt;div style=&quot;margin-right: 15px; float: left;&quot;&gt;Files: &lt;?php echo count($file_list); ?&gt;&lt;/div&gt;
&lt;div style=&quot;margin-right: 15px; float: left;&quot;&gt;Total bytes: &lt;?php echo nicesize($total_filesize, 1, 0); ?&gt;&lt;/div&gt;
&lt;/div&gt;
&lt;/div&gt;
&lt;div class=&quot;copy&quot; style=&quot;clear: both;&quot;&gt;Directory Listing Script for Abyss - &amp;copy; 2008 &lt;a href=&quot;http://pksml.net/&quot;&gt;pkSML&lt;/a&gt; - Design by &lt;a href=&quot;http://www.tenka.co.uk/&quot;&gt;Manny&lt;/a&gt;.&lt;BR&gt;
Page generation :: &lt;?php
$time_end = microtime(true);
$time = $time_end - $time_start;
$time = number_format($time, 3, &#039;.&#039;, &#039;&#039;);

echo &quot;{$time} seconds&quot;;
?&gt;&lt;/div&gt;
&lt;/body&gt;
&lt;/html&gt;
</TEXTAREA>
</P>
<div class="tutorial">
<h2 style="text-align: center;">To install on Abyss Web Server</h2>
<P class=bodyText>1. Open the console
<br><center><img src="./image/code10-0.png"></center></P>
<P class=bodyText>2. Click 'Configure' for the appropriate host
<br><center><img src="./image/code10-1.png"></center></P>
<P class=bodyText>3. Click 'Directory Listing'
<br><center><img src="./image/code10-2.png"></center></P>
<P class=bodyText>4. Set 'Type' to 'From Script'
<br><center><img src="./image/code10-3.png"></center></P>
<P class=bodyText>5. Set 'Script' to <b><code>/dir_list.php</code></b> and click 'OK'
<br><center><img src="./image/code10-4.png"></center></P>
<P class=bodyText>6. Click 'Restart' 
<br><center><img src="./image/code10-5.png"></center></P>
</div>

</P>
<P class=bodyText>
<font color=red>Note: You use this script at your own risk!</font></P>
<P class=bodyText>
Bugs, comments, questions? <a href="/contact">Contact Me</a></P>
</div><!-- the_body -->
</div><!-- content -->