sorting)
$othumbdir = dir($thumbdir);
$pictures = array();
$period = ".";
require("Contents.php");
echo "\n";
echo "
$hometitle\n";
echo '';
echo '';
echo '';
echo '';
// Hit and visitor counter
$browser = $HTTP_USER_AGENT;
$date = date("F jS Y, h:iA");
// Check if the referer is your site if not then add record
if (preg_match ("/www.baconcake.org/i", "$HTTP_REFERER")) {
# mysql_close($connection);
} else {
// If you cant resolve domain use IP address
if ($REMOTE_HOST == "") {
$host = $REMOTE_ADDR;
} else {
$host = $REMOTE_HOST;
}
if( empty( $HTTP_REFERER ) or '' == $HTTP_REFERER ) {
$HTTP_REFERER = 'No Referer';
}
$fh = fopen("./bin/track.txt", "a");
fwrite($fh, "$host, $date, $HTTP_REFERER\r\n");
fclose($fh);
}
Echo "";
Echo "
The Old Baconcake.com HomePage
";
Echo "";
Echo "";
Echo "Newest pictures and work in progress...
";
Echo "
The new look at Baconcake.com...
";
function get_menuinfo($menu)
{
global $menufile;
# Read the menufile
$menufile = "Menu.ini";
$fp=fopen($menufile,"r");
$contents=fread($fp, filesize($menufile));
fclose($fp);
$start = strpos($contents,$menu) + strlen($menu);
$tmpstr = substr($contents,$start,strlen($contents));
$stop = strpos($tmpstr, "\n");
$pictinfo = substr($contents,$start,$stop);
return $pictinfo;
}
$entry = ".";
while($entry = $othumbdir->read())
{
if(! is_file("$entry") )
{
# Echo "Raw - $entry
";
SWitch ($entry)
{
Case ".";
#Echo " -One Dot-
";
Break;
Case "..";
#Echo " -Two Dot-
";
Break;
Case "bin";
#Echo " -Two Dot-
";
Break;
Case "Sites";
Break;
Case "mig";
#Echo " -Two Dot-
";
Break;
Case "oth";
#Echo " -Two Dot-
";
Break;
Case "Pops_Slides";
#Echo " -Two Dot-
";
Break;
Case "Home_Pics";
#Echo " -Two Dot-
";
Break;
Case "vogue";
#Echo " -Two Dot-
";
Break;
Case "family";
#Echo " -Two Dot-
";
Break;
Case "perl";
#Echo " -Two Dot-
";
Break;
Default:
# Echo "$entry is NOT file
";
# Echo "
$entry... ";
Echo "" .
get_menuinfo($entry) . "
";
}
}
}
if ($links=="Yes")
{
Echo "
";
Echo "Links to other sites";
Echo "
Courtney and Dioneia's Homepage...";
Echo "
Goodbye Pop";
Echo "
Goodbye Grampa Don";
Echo "
The Ole Sharkman Website";
Echo "
Ryan's Fishing Adventures with his new boat";
Echo "
Marc's Welding Homepage...";
Echo "
Leo's California Helitech Homepage...";
Echo "
Steve's Roofing Homepage ...";
Echo "
Panorama link page...";
Echo "
Family Tree still in Progress...";
echo "";
}
# Echo "End of File";
Echo "
";
global $memo_file;
$memo_file="bin/Count.txt";
include ("bin/textcount.php");
Echo "
© 2003 by Jim G. All rights reserved.
";
Echo "Drop me a line...
";
Echo "Webalizer Stats...";
Echo "";
Echo "";
echo "";
?>