<CENTER><TABLE BORDER=0
<TR>
<?
$showdate = 0;
$showname = 1;
$showsize = 1;
$numcols = 4;
$imageborders = 1;
$chosen = "christia agulara";
$dir = getcwd() . "/" . $chosen ;
if (! is_dir($dir)) {
echo "error. choice not directory. exit.<BR>";
} else {
$dirhandle = opendir("$dir");
$cols = 0;
while($filename = readdir($dirhandle)) {
if (! (ereg(".", $filename) || ereg("t", $filename) || ereg(".cgi$", $filename) || ereg("html$", $filename) ||
ereg("txt", $filename))) {
if ($cols == $numcols) {
echo "</TR>\n<TR>\n";
$cols = 0;
}
echo "<TD ALIGN=\"center\" VALIGN=\"bottom\">";
echo "<A HREF=\"", $chosen, "/", $filename, "\">";
if (! (file_exists("$chosen/t$filename"))) {
$cmd = "/usr/bin/X11/convert -sample 80x80 $dir/$filename $dir/t$filename";
system($cmd);
}
echo "<IMG SRC=\"$chosen/t$filename\" ALT=\"$filename\"";
if ($imageborders == 0)
echo " BORDER=0";
echo ">";
if ($showname == 1)
echo "<BR>$filename";
echo "</A>\n";
if (($showsize == 1 ) || ($showdate == 1))
$fileinfo = stat("$chosen/$filename");
if ($showsize == 1) {
echo "<BR>", round($fileinfo[7] / 1024), " k";
}
if ($showdate == 1) {
echo "<BR>", date("M d, Y", $fileinfo[9]), "\n";
}
echo "</TD>\n";
++ $cols;
}
}
}
?>
</TR>
</TABLE>
<P><HR><P>
<A HREF="./">Home</A>
</CENTER>
</BODY>