Untitled Page

<?PHP

$title = ""; // Title for the overall web page
$marginsize = 200; // Size of the side frame, and thumbnails
$marginside = "left"; // Margin frame location: "left" or "right"

$thumb = "thumb"; // Sub-directory where thumbnails are stored
$imagequality = 100; // Quality of reduced images, range 0 - 100
$fullwindow = true; // Display images to fill browser window?

$imageresize = 0; // You can rescale all images to fit within
// a boundary square of this size (eg 800).
// These rescaled images are cached on disk.
// To just use original images, specify 0

$pagecolor = "#FFFFFF"; // Background color of all pages
$margincolor = "#FFFFFF"; // Used if set, else margincolor = pagecolor
$textcolor = "#000000"; // Text color for all pages
$linkcolor = "#000000"; // Link color for all pages
$vlinkcolor = "#000000"; // Visited link color for all pages
$background = ""; // Background image for all pages
$stylesheet = ""; // Full URL to a stylesheet for all pages.
// HTML text tags used: <H1>,<P>,<TD>,<A>

$lang = "de"; // Language: de/en

$introfile = "intro.html"; // If it exists, will be displayed up front
$headerfile = "header.html"; // If it exists, will be included at top
$footerfile = "footer.html"; // If it exists, will be included at bottom

$sortfile = "sortfile"; // If it exists, contains filenames in order
$sortreverse = false; // If true, then the sort order is reversed
$datenames = false; // If true, then assumes the filenames have
// been named starting with the date YYYYMMDD

$password = "xxx"; // This password enables admin mode, for
// editing captions, deleting guest comments,
// uploading new images, deleting images etc
// If left blank "" then admin is disabled
$moderate = false; // If true, then guest comments will not be
// automatically added to the pages. Only
// the admin user will be able to see them
// and they have a little "approve" link to
// release them to the public. This only
// works if $password and $guestcomment are on

$guestcomment = true; // If true, then guests can leave comments
$recentcount = 100; // How many 'recent' comments to show
$email = "chaos.the.5th@gmail.com"; // If you put your email address here then
// new guest comments will be mailed to you
// ... PHP must already support mail.
$timeoffset = 0; // By how many hours do you want to offset the
// the server time when displaying messages.
// 0 = server time, "8.5" = add 8:30, "-4" = subtract 4:00

$imagemethod = "manual"; // gd1, gd2, imagemagick, manual, none
// gd1 - gd 1.* compiled into PHP
// gd2 - gd 2.* compiled into PHP 4.0.6 or later
// imagemagick - use imagemagick "convert" and "identify"
// manual - create your own thumbnails elsewhere
// none - don't use thumbnail images

$captionmethod = "capfile"; // rdjpgcom, imagemagick, capfile, filename, none
// rdjpgcom - use rdjpgcom program, part of libjpeg
// imagemagick - use imagemagick program "identify"
// capfile - use thumb/filename.jpg.cap files
// filename - just use the filename as the caption
// none - don't use any captions on images

// Depending on what you chose for $imagemethod and $captionmethod, set these:
$convert = "/usr/bin/convert"; // Path to Imagemagick "convert" program
$identify = "/usr/bin/identify"; // Path to Imagemagick "identify" program
$rdjpgcom = "/usr/bin/rdjpgcom"; // Path to rdjpgcom program, if needed.
$wrjpgcom = "/usr/bin/wrjpgcom"; // If you are using rdjpgcom, set this too
// so admin can update (write) image captions

////////////////////////////////////////////////////////////////////////////////

////////////////////////////////////////////////////////////////////////////////
/// Normally, you won't need to change anything below here
////////////////////////////////////////////////////////////////////////////////

if (file_exists("config.php")) { // Settings in here will override defaults
include("config.php");
}

if (isset($HTTP_SERVER_VARS["PATH_TRANSLATED"])) { // Name of this file
$scriptname = basename($HTTP_SERVER_VARS["PATH_TRANSLATED"]);
} else {
$scriptname = "index.php";
}

/// Language Strings ///

// English - en
$ss["en"]["next"] = "Next";
$ss["en"]["prev"] = "Previous";
$ss["en"]["slide"] = "Slideshow";
$ss["en"]["comments"]= "Comments";
$ss["en"]["name"] = "Name";
$ss["en"]["message"] = "Message";
$ss["en"]["add"] = "Add my message to this page";
$ss["en"]["start"] = "Back to the start";
$ss["en"]["selectl"] = "Select images from the left";
$ss["en"]["selectr"] = "Select images from the right";
$ss["en"]["from"] = "From";
$ss["en"]["recent"] = "most recent guest comments";
$ss["en"]["seconds"] = "seconds";
$ss["en"]["original"]= "Click here to see the full-sized version of this image";

// Deutsch - de
$ss["de"]["next"] = "Nächstes";
$ss["de"]["prev"] = "Vorheriges";
$ss["de"]["slide"] = "Slideshow";
$ss["de"]["comments"]= "Kommentare";
$ss["de"]["name"] = "Name";
$ss["de"]["message"] = "Kommentar";
$ss["de"]["add"] = "Meinen Kommentar abschicken";
$ss["de"]["start"] = "zum Anfang";
$ss["de"]["selectl"] = "Bitte wählen sie links ein Bild aus";
$ss["de"]["selectr"] = "Bitte wählen sie rechts ein Bild aus";
$ss["de"]["from"] = "Von";
$ss["de"]["recent"] = "neueste Gastanmerkungen";
$ss["de"]["seconds"] = "Sekunden";
$ss["de"]["original"]= "hier klicken um das Bild in Originalgösse zu sehen";

// Please send me more translations! :-)
////////////////////////////////////////////////////////////////////////////////

/// Convert any external variables into internal ones
/// (avoids warnings on secure installations)

$admin = isset($HTTP_GET_VARS["admin"]) ? $HTTP_GET_VARS["admin"] : "";
if (! $admin) {
$admin = isset($HTTP_POST_VARS["admin"]) ? $HTTP_POST_VARS["admin"] : "";
}
$editcaption = isset($HTTP_GET_VARS["editcaption"]) ? $HTTP_GET_VARS["editcaption"] : "";
if (! $editcaption) {
$editcaption = isset($HTTP_POST_VARS["editcaption"]) ? $HTTP_POST_VARS["editcaption"] : "";
}
$newcaption = isset($HTTP_POST_VARS["newcaption"]) ? $HTTP_POST_VARS["newcaption"] : "";
$upload = isset($HTTP_POST_VARS["upload"]) ? $HTTP_POST_VARS["upload"] : "";
$uploadcount = isset($HTTP_POST_VARS["uploadcount"]) ? $HTTP_POST_VARS["uploadcount"] : 0;
$imagefile = isset($HTTP_POST_FILES["imagefile"]) ? $HTTP_POST_FILES["imagefile"] : "";
$logout = isset($HTTP_GET_VARS["logout"]) ? $HTTP_GET_VARS["logout"] : "";
$intro = isset($HTTP_GET_VARS["intro"]) ? $HTTP_GET_VARS["intro"] : "";
$recent = isset($HTTP_GET_VARS["recent"]) ? $HTTP_GET_VARS["recent"] : "";
$margin = isset($HTTP_GET_VARS["margin"]) ? $HTTP_GET_VARS["margin"] : "";
$image = isset($HTTP_GET_VARS["image"]) ? $HTTP_GET_VARS["image"] : "";
$deleteimage = isset($HTTP_GET_VARS["deleteimage"]) ? $HTTP_GET_VARS["deleteimage"] : "";
$dcomment = isset($HTTP_GET_VARS["dcomment"]) ? $HTTP_GET_VARS["dcomment"] : "";
$ctype = isset($HTTP_GET_VARS["ctype"]) ? $HTTP_GET_VARS["ctype"] : "";
$acomment = isset($HTTP_GET_VARS["acomment"]) ? $HTTP_GET_VARS["acomment"] : "";
$originalimage = isset($HTTP_GET_VARS["originalimage"]) ? $HTTP_GET_VARS["originalimage"] : "";
$slide = isset($HTTP_GET_VARS["slide"]) ? $HTTP_GET_VARS["slide"] : "0";

$comment = isset($HTTP_POST_VARS["comment"]) ? $HTTP_POST_VARS["comment"] : "";
$name = isset($HTTP_POST_VARS["name"]) ? $HTTP_POST_VARS["name"] : "";
$message = isset($HTTP_POST_VARS["message"]) ? $HTTP_POST_VARS["message"] : "";
$PFCOOKIE = isset($HTTP_COOKIE_VARS["PFCOOKIE"]) ? $HTTP_COOKIE_VARS["PFCOOKIE"] : "";

/// Check that Image processing is available ///

switch ($imagemethod) {
case "imagemagick":
if (!is_executable("$convert")) {
PrintHeader();
PrintError("Sorry, but I couldn't find the Imagemagick program that
you specified to convert images ($convert).<BR>
Check the configuration of this script and your server.");
die;
}
if (!is_executable("$identify")) {
PrintHeader();
PrintError("Sorry, but I couldn't find the Imagemagick program that
you specified to identify images ($identify).<BR>
Check the configuration of this script and your server.");
die;
}
break;
case "gd2":
if (!function_exists("ImageCreateTrueColor")) {
PrintHeader();
PrintError("Sorry, but I couldn't find the GD 2.* functions that
I need to convert images. Check the configuration of
this script (imagemethod variable) or your system.
Make sure that your copy of PHP has been compiled with
GD support and native JPEG support eg<BR>
configure --with-gd --with-jpeg ...");
die;
}
break;
case "gd1":
if (!function_exists("ImageCreate")) {
PrintHeader();
PrintError("Sorry, but I couldn't find the GD 1.* functions that
I need to convert images. Check the configuration of
this script (imagemethod variable) or your system.
Make sure that your copy of PHP has been compiled with
GD support and native JPEG support eg<BR>
configure --with-gd --with-jpeg ...");
die;
}
break;
}

/// Check that support for reading image captions is available

switch ($captionmethod) {
case "imagemagick":
if (!is_executable("$identify")) {
PrintHeader();
PrintError("Sorry, but I couldn't find the Imagemagick program that
you specified to read image captions ($identify).<BR>
Check the configuration of this script and your server.<BR>
Maybe you just want to change the captionmethod variable to \"capfile\"");
die;
}
break;
case "rdjpgcom":
if (!is_executable("$rdjpgcom")) {
PrintHeader();
PrintError("Sorry, but I couldn't find the program that
you specified to read image captions ($rdjpgcom).<BR>
Check the configuration of this script and your server.<BR>
Maybe you just want to change the captionmethod variable to \"capfile\"");
die;
}
break;
}

/// Functions ///

function RemoveNewLines (&$item, $key) {
$item = chop($item);
}

function GetFileList( $dirname="." ) { // Finds all the images
// First check to see if there's a file called $sortfile
// that contains a sorted list of filenames, one per line
// otherwise, will default to all files in alphabetical order
global $sortfile, $sortreverse;

$files = array();

if (file_exists($sortfile)) {
$files = file($sortfile);
array_walk($files, 'RemoveNewLines');
} else {
$dir = opendir( $dirname );
while( $file = readdir( $dir ) ) {
if (eregi("\.jpe?g$", $file) ||
eregi("\.gif$", $file) ||
eregi("\.png$", $file)) {
$files[] = $file;
}
}
if ($sortreverse) {
rsort($files);
} else {
sort($files);
}
}
return $files;
}

}

function PrintError($message) {
echo "<P ALIGN=CENTER><FONT COLOR=RED>Error: $message</FONT></P>";
}

function PrintHeader($pagetitle="", $meta="") {
// Special case when meta = "margin"
global $headerfile;
global $stylesheet;
global $lang;
global $pagecolor, $margincolor, $textcolor, $linkcolor, $vlinkcolor, $background;

echo "<HEAD>\n";
echo "<TITLE>$pagetitle</TITLE>\n";
echo "<META HTTP-EQUIV=\"content-language\" CONTENT=\"$lang\">\n";
if ($meta and $meta != "margin") {
echo "$meta\n";
}
if ($stylesheet) {
echo "<LINK REL=\"stylesheet\" HREF=\"$stylesheet\">";
}
echo "</HEAD>\n";

if ($meta == "margin" and $margincolor) {
echo "<BODY BGCOLOR=\"$margincolor\" TEXT=\"$textcolor\" ";
} else {
echo "<BODY BGCOLOR=\"$pagecolor\" TEXT=\"$textcolor\" ";
}
echo " LINK=\"$linkcolor\" VLINK=\"$vlinkcolor\" BACKGROUND=\"$background\">\n";

if ($meta != "margin" && file_exists($headerfile)) {
include($headerfile);
}
}

function PrintFooter() {
global $footerfile;
global $title;

if (file_exists($footerfile)) {
include($footerfile);
} else {
echo "<CENTER><BR><P><FONT SIZE=-1>";
echo "<A TITLE=\"Back to the introduction page\" TARGET=_parent HREF=\".\" >$title</A></P>\n";
}
echo "</BODY>";
}

function PrintRecentComments($recent) {
global $thumb, $marginsize, $marginside, $scriptname;
global $ss, $lang, $timeoffset;

if (! $recent) {
return;
}

$imagelist = GetFileList();

$comments = array();

foreach ($imagelist as $filename) {
$commentfile = "$thumb/$filename.txt";
if (file_exists($commentfile)) {
$file = file($commentfile);
foreach ($file as $line) {
$line = chop($line)."###$filename";
$comments[] = $line;
}
}
}
rsort($comments);
$count = 0;

echo "</CENTER></P>"; // Just in case;
echo "<BR><H3 ALIGN=CENTER>$recent ".$ss[$lang]["recent"].":</H3>";
foreach ($comments as $comment) {
$comm = explode ("###", $comment);
$image = $comm[3];
$caption = GetImageCaption($image, $clean=true);
$thumbimage = "$thumb/$image";
$image = rawurlencode($image);

echo "<TABLE ALIGN=CENTER WIDTH=\"90%\"><TR><TD COLSPAN=2><HR></TD></TR>";
echo "<TR>";
if ($marginside != "right") {
echo "<TD VALIGN=TOP WIDTH=\"100%\">";
echo "<FONT SIZE=2>";
echo $ss[$lang]["from"].": <B>".$comm[1]."</B>, <I>".date("l, j F Y, g:i A", $comm[0]+($timeoffset*3600))."</I><BR>";
echo "<UL>".$comm[2]."</UL></FONT>";
if (isadmin()) {
echo "<P ALIGN=right><FONT SIZE=1><A HREF=\"$scriptname?image=$image&dcomment=".$comm[0]."\">delete</A></FONT></P>";
}
echo "</TD>";
}

echo "<TD WIDTH=\"$marginsize\">";
echo "<A TITLE=\"$caption\" HREF=\"$scriptname?image=$image&d=d.html\" TARGET=imain>";
if (file_exists($thumbimage)) {
echo "<IMG HSPACE=10 ALT=\"$caption\" SRC=\"$thumb/$image\" BORDER=0>";
} else {
echo "<FONT SIZE=1>$caption</FONT>";
}
echo "</A>";
echo "</TD>";

if ($marginside == "right") {
echo "<TD VALIGN=TOP WIDTH=\"100%\">";
echo "<FONT SIZE=2>";
echo $ss[$lang]["from"].": <B>".$comm[1]."</B>, <I>".date("l, j F Y, g:i A", $comm[0]+($timeoffset*3600))."</I><BR>";
echo "<UL>".$comm[2]."</UL></FONT>";
if (isadmin()) {
echo "<P ALIGN=right><FONT SIZE=1><A HREF=\"$scriptname?image=$image&dcomment=".$comm[0]."\">delete</A></FONT></P>";
}
echo "</TD>";
}

echo "</TR></TABLE>\n";

$count++;
if ($count >= $recent) {
break;
}
}
echo "<HR>\n";
}

function PrintComments($imagefile) {
// Given an image imagefile, finds, reads and formats the
// associated file of guest comments
global $thumb, $ss, $lang, $timeoffset, $scriptname, $moderate;

$commentfiles["main"] = "$thumb/$imagefile.txt";
if ($moderate) {
$commentfiles["unmoderated"] = "$thumb/$imagefile.mod";
}

$filename = rawurlencode($imagefile);

echo "<BLOCKQUOTE><BLOCKQUOTE><HR>\n";

foreach ($commentfiles as $commenttype => $commentfile) {
if ($commenttype == "unmoderated" and !isadmin()) {
continue;
}
if (file_exists($commentfile)) {
$comments = file($commentfile);
foreach ($comments as $comment) {

$comm = explode ("###", $comment);

echo "<FONT SIZE=2>";
echo $ss[$lang]["from"].": <B>".$comm[1]."</B>, <I>".date("l, j F Y, g:i A", $comm[0]+($timeoffset*3600))."</I><BR>";
echo "<UL>".$comm[2]."</UL></FONT>\n";
if (isadmin()) {
echo "<P ALIGN=right><FONT SIZE=1>";
if ($commenttype == "unmoderated") {
echo "<A HREF=\"$scriptname?image=$filename&acomment=".$comm[0]."\">approve</A> ";
echo "<A HREF=\"$scriptname?image=$filename&dcomment=".$comm[0]."&ctype=mod\">delete</A>";
} else {
echo "<A HREF=\"$scriptname?image=$filename&dcomment=".$comm[0]."\">delete</A>";
}
echo "</FONT></P>";
}
echo "<HR SIZE=1>\n";
}
}
}
echo "</BLOCKQUOTE></BLOCKQUOTE><BR>\n";

}

function DeleteComment($filename, $dcomment, $ctype="") {
// Given an image filename and a comment ID (time) to
// delete, it reads the file and rewrites it, leaving
// out the specified line. Returns the deleted line.

global $thumb, $ss, $lang, $timeoffset, $scriptname;

if ($ctype == "mod") {
$commentfile = "$thumb/$filename.mod";
} else {
$commentfile = "$thumb/$filename.txt";
}

$len = strlen($dcomment);

if (file_exists($commentfile)) {
$comments = file($commentfile);
rename($commentfile, $commentfile.".bak");
if ($file = fopen ($commentfile, "a")) {
foreach ($comments as $comment) {
if (substr($comment, 0, $len) == $dcomment) {
$deletedcomment = $comment;
} else {
fwrite($file, "$comment");
}
}
unlink($commentfile.".bak");
} else { // some error occurred ... try to undo the mess
PrintError("Could not delete comment from file!");
rename($commentfile.".bak", $commentfile);
}
} else {
PrintError("No comments exist for this image! ($filename)");
}

return $deletedcomment;

}

function ApproveComment($filename, $commentid) {
// Given an image filename and a comment ID (time) to
// approve, it moves the comment from the .mod file
// to the .txt file

if ($commentline = DeleteComment($filename, $commentid, "mod")) {
AddComment($filename, "", "", $commentline);
echo "<P ALIGN=CENTER>That message has been approved</P>";
}
}

function PrintCommentForm($filename) {
global $scriptname, $textcolor, $pagecolor;
global $ss, $lang;

<FORM ACTION=<?=$scriptname?> METHOD=POST>
<INPUT TYPE=hidden NAME=comment VALUE="<?=$filename?>">
<TABLE BORDER=0 CELLPADDING=2 CELLSPACING=0 ALIGN=CENTER BGCOLOR=#BBBBBB>
<TR><TD><TABLE BORDER=0 CELLPADDING=5 CELLSPACING=0 WIDTH="100%" BGCOLOR="<?=$pagecolor?>">
<TR>
<TD ALIGN=right><FONT SIZE=2 COLOR="<?=$textcolor?>">
<B><?=$ss[$lang]["name"] ?>:</B></FONT></TD>
<TD><FONT SIZE=2 COLOR="<?=$textcolor?>">
<INPUT size=50 type=text name="name"></FONT></TD>
</TR>
<TR>
<TD ALIGN=right valign=top><FONT SIZE=2 COLOR="<?=$textcolor?>">
<B><?=$ss[$lang]["message"] ?>:</B></FONT></TD>
<TD><FONT SIZE=2 COLOR="<?=$textcolor?>">
<TEXTAREA name="message" rows=4 cols=40></TEXTAREA></FONT></TD>
</TR>
<TR>
<TD ALIGN=CENTER COLSPAN=2>
<FONT SIZE=2 COLOR="<?=$textcolor?>">
<INPUT type=submit value="<?=$ss[$lang]["add"] ?>"></FONT>
</TD>
</TR>
</TABLE></TD></TR></TABLE>
</FORM>

<?
}

function AddComment($filename, $name, $message, $messageline="") {
// Clean up a given comment and add to the appropriate database
global $thumb, $email, $title, $moderate, $HTTP_SERVER_VARS;

if (!$REMOTE_HOST = $HTTP_SERVER_VARS["REMOTE_HOST"]) {
$REMOTE_HOST = $HTTP_SERVER_VARS["REMOTE_ADDR"];
}
$SERVER_NAME = $HTTP_SERVER_VARS["SERVER_NAME"];
$REQUEST_URI = $HTTP_SERVER_VARS["REQUEST_URI"];

if (ereg( "\\.\\.", $filename)) { // using ".." in the filename
PrintError("That filename ($filename) was not secure.");
return;
}

if (!$name and !$messageline) {
PrintError("You need to fill out your name.");
return;
}
if (!$message and !$messageline) {
PrintError("There was no message to post.");
return;
}

if ($moderate and !$messageline) {
$commentfile = "$thumb/$filename.mod";
} else {
$commentfile = "$thumb/$filename.txt";
}

if ($file = fopen ($commentfile, "a") ) {
if ($messageline) {
fwrite($file, "$messageline");

} else {
$timenow = time();
$name = strip_tags($name);
$message = stripslashes(strip_tags($message, "<a><b>"));

if ($email) { // Try and send the comment via email
$urlstart = "http://$SERVER_NAME$REQUEST_URI?image=".rawurlencode($filename);
if ($moderate) {
$approveurl = "Approve: $urlstart&acomment=$timenow\n\n";
$deleteurl = "Delete: $urlstart&dcomment=$timenow&ctype=mod\n\n";
} else {
$deleteurl = "Delete: $urlstart&dcomment=$timenow\n\n";
}
mail($email, "Comment added: $title",
"From: $name ($REMOTE_HOST)\n\n".
"$message\n\n".
"http://$SERVER_NAME$REQUEST_URI?image=".rawurlencode($filename)."\n\n".
$approveurl . $deleteurl,
"From: $email");
}

$message = nl2br($message);
$message = strtr($message, "\r", " ");
$message = strtr($message, "\n", " ");
fwrite($file, "$timenow###$name###$message\n");
}
fclose($file);

} else {
PrintError("Could not add comment for $filename");
}
}

function CleanCaption ($caption) {
$caption = strtr($caption, "\r", " ");
$caption = strtr($caption, "\n", " ");
$caption = htmlentities(strip_tags($caption));
return $caption;
}

function GetImageCaption($image, $clean=false) {
global $thumb, $captionmethod, $rdjpgcom, $identify;

switch ($captionmethod) {
case "imagemagick":
if (file_exists($image)) {
Exec("$identify -ping -format \"%c\" \"$image\"", $captionlines);
} else {
return "";
}
break;
case "rdjpgcom":
if (file_exists($image)) {
Exec("$rdjpgcom \"$image\"", $captionlines);
} else {
return "";
}
break;
case "capfile":
$capfile = "$thumb/$image".".cap";
if (file_exists($capfile)) {
$captionlines = file($capfile);
} else {
return "";
}
break;
case "filename":
return $image;
break;
default:
return "";
break;
}

foreach ($captionlines as $captionline) {
$caption .= "$captionline ";
}

$caption = stripslashes($caption);

if ($clean) {
$caption = CleanCaption($caption);
}

return $caption;
}

function SetImageCaption($image, $caption) {
global $thumb, $captionmethod, $wrjpgcom;

$TEMPFILE = "$thumb/ttttmpfile.jpg";

if (file_exists($TEMPFILE)) {
unlink($TEMPFILE);
}

$caption = stripslashes($caption);

switch ($captionmethod) {
case "rdjpgcom":
if (!eregi("\.jpe?g$", $image)) {
PrintError("$image is probably not a JPEG file");
return false;
}
$command = "$wrjpgcom -replace -comment ".EscapeShellArg($caption)." ".EscapeShellArg($image);
Exec("$command > $TEMPFILE");
if (file_exists($TEMPFILE) and filesize($TEMPFILE) > 0) {
return rename($TEMPFILE, $image);
}
break;
case "capfile":
$capfile = "$thumb/$image".".cap";
if (! $file = fopen ($capfile, "w")) {
PrintError("Could not open the caption file $capfile");
return false;
}
if (! fwrite($file, $caption)) {
PrintError("Could not write the caption to the caption file $capfile");
return false;
}
return true;
break;
}

return false;
}

function ReadImageFromFile($filename, $type) {
$imagetypes = ImageTypes();

switch ($type) {
case 1 :
if ($imagetypes & IMG_GIF)
return $im = ImageCreateFromGIF($filename);
break;
case 2 :
if ($imagetypes & IMG_JPEG)
return ImageCreateFromJPEG($filename);
break;
case 3 :
if ($imagetypes & IMG_PNG)
return ImageCreateFromPNG($filename);
break;
default:
return 0;
}
}

function WriteImageToFile($im, $filename, $type) {
global $imagequality;

switch ($type) {
case 1 :
return ImageGIF($im, $filename);
case 2 :
return ImageJpeg($im, $filename, $imagequality);
case 3 :
return ImagePNG($im, $filename);
default:
return false;
}
}

function ResizeImage($image, $newimage, $newwidth, $newheight=0) {
// Returns true if new image was created, else false
// If newheight is not specified then image is scaled in proportion
// to newwidth. If newheight is specified, then newheight and newwidth
// represent a bounding box to fit image into
global $imagemethod;

switch ($imagemethod) {
case "imagemagick":
return ResizeImageUsingIM($image, $newimage, $newwidth, $newheight);
break;
case "gd1":
case "gd2":
return ResizeImageUsingGD($image, $newimage, $newwidth, $newheight);
break;
case "manual":
return true;
break;
default:
return false;
break;
}
}

function ResizeImageUsingGD($image, $newimage, $newwidth, $newheight) {
global $imagemethod;

$size = GetImageSize($image);
$width = $size[0];
$height = $size[1];
$type = $size[2];

if ($im = ReadImageFromFile($image, $type)) {
if ($newheight && ($width < $height)) {
$newwidth = ($newheight / $height) * $width;
} else {
$newheight = ($newwidth / $width) * $height;
}
if ($imagemethod == "gd2") {
$im2 = ImageCreateTrueColor($newwidth,$newheight);
} else {
$im2 = ImageCreate($newwidth,$newheight);
}
if ($imagemethod == "gd2") {
ImageCopyResampled($im2,$im,0,0,0,0,$newwidth,$newheight,$width,$height);
} else {
ImageCopyResized($im2,$im,0,0,0,0,$newwidth,$newheight,$width,$height);
}

if (WriteImageToFile($im2, $newimage, $type)) {
return true;
}
}
return false;
}

function ResizeImageUsingIM($image, $newimage, $newwidth, $newheight) {
global $identify, $convert, $imagequality;

if (! $sizeinfo = Exec("$identify -ping -format \"%w %h\" \"$image\"")) {
return false;
}
$size = explode(" ", $sizeinfo);
$width = $size[0];
$height = $size[1];

if (!$width) {
return false;
}

if ($newheight && ($width < $height)) {
$newwidth = ($newheight / $height) * $width;
} else {
$newheight = ($newwidth / $width) * $height;
}

Exec("$convert -geometry \"$newwidth"."x"."$newheight\" -quality \"$imagequality\" \"$image\" \"$newimage\"");

return file_exists($newimage);
}

function PrintSlideshowForm ($nextimage, $slide=0) {
global $scriptname;
global $ss, $lang;

$common = "$scriptname?image=$nextimage&slide=";
$options = array (2 => "2 ".$ss[$lang]["seconds"],
5 => "5 ".$ss[$lang]["seconds"],
7 => "7 ".$ss[$lang]["seconds"],
10 => "10 ".$ss[$lang]["seconds"],
20 => "20 ".$ss[$lang]["seconds"],
30 => "30 ".$ss[$lang]["seconds"],
40 => "40 ".$ss[$lang]["seconds"],
50 => "50 ".$ss[$lang]["seconds"],
60 => "60 ".$ss[$lang]["seconds"]);

echo "<FORM NAME=auto>";
echo "<SELECT NAME=popup onChange=\"window.location=document.auto.popup.options[document.auto.popup.selectedIndex].value\">\n";

echo " <OPTION VALUE=\"javascript:void(0)\">".$ss[$lang]["slide"]."...</OPTION>\n";
foreach ($options as $value => $label) {
echo " <OPTION VALUE=\"$common$value\"";
if ($value == $slide) {
echo " SELECTED";
}
if ($label) {
echo ">$label</OPTION>\n";
} else {
echo ">$value</OPTION>\n";
}
}
echo "</SELECT></FORM>";
}

function isadmin() {
global $password, $PFCOOKIE;

if ($password and isset($PFCOOKIE)) {
if ($PFCOOKIE == md5($password) ) {
return true;
}
}
return false;
}

function clean_filename($string) {
$string = eregi_replace("\.\.", "", $string);
$string = eregi_replace("[^([:alnum:]|\.)]", "_", $string);
return eregi_replace("_+", "_", $string);
}

/// Individual pages are created here ///

if ($admin) {
if (isadmin()) {
$intro = "true";

} else if ($admin == $password) {
$seconds = 60*60*24*354;
setCookie ('PFCOOKIE', "", time() - 3600, "/");
setCookie ('PFCOOKIE', md5($admin), time()+$seconds, "/");
$PFCOOKIE = md5($admin);
$intro = "true";

} else {
PrintHeader("Administrator Login");
echo "<CENTER>";
echo "<P> </P>";
echo "<FORM METHOD=POST ACTION=\"$scriptname\">";
echo "Admin Password: <INPUT NAME=admin TYPE=password SIZE=20>";
echo "<INPUT TYPE=submit VALUE=\"Enter\">";
echo "</FORM>";
}
}

if ($logout) {
if (isadmin()) {
$seconds = 60*60*24*354;
setCookie ('PFCOOKIE', "", time() - 3600, "/");
$PFCOOKIE = NULL;
}
$intro = "true";
}

if ($editcaption) {
PrintHeader("Editing a caption");

$image = urldecode($editcaption);

if (!isadmin()) {
PrintError("This is an admin-only function");
die;
}
if (ereg( "\\.\\.", $image)) { // using ".." in the filename
PrintError("That filename ($image) was not secure.");
die;
}
if ($captionmethod == "rdjpgcom" or $captionmethod == "capfile") {
if ($newcaption) {
if (! SetImageCaption($image, $newcaption)) {
PrintError("Could not save the new caption, sorry");
}
echo "<CENTER>";
echo "<P> </P>";
echo "<P>Caption saved.</P>";
echo "<P><A HREF=\"$scriptname?image=$editcaption\">Continue</A></P>";
} else {
$caption = stripslashes(GetImageCaption($image));
echo "<CENTER>";
echo "<P> </P>";
echo "<P>Caption for \"$image\"</P>";
echo "<FORM ACTION=$scriptname METHOD=post>";
echo "<TEXTAREA NAME=newcaption ROWS=3 COLS=50>$caption</TEXTAREA><BR>";
echo "<INPUT TYPE=hidden NAME=editcaption value=\"$editcaption\">";
echo "<INPUT TYPE=submit VALUE=\"Save caption\">";
echo "</FORM>";
}

} else {
PrintError("You can't edit captions unless $captionmethod is rdjpgcom or capfile");
}
die;
}

if ($deleteimage) {
PrintHeader("Deleting an image");

if (!isadmin()) {
PrintError("This is an admin-only function");
die;
}
if (ereg( "\\.\\.", $deleteimage)) { // using ".." in the filename
PrintError("That filename ($deleteimage) was not secure.");
die;
}

if (! unlink($deleteimage) ) {
PrintError("An error occurred while deleting the image - try doing it manually.");
} else {
echo "<P ALIGN=CENTER>Image deleted</P>";
}

if (file_exists("$thumb/$deleteimage")) {
if (! unlink("$thumb/$deleteimage")) {
PrintError("An error occurred while deleting the thumbnail ($thumb/$deleteimage)");
} else {
echo "<P ALIGN=CENTER>Thumbnail image deleted</P>";
}
}
if (file_exists("$thumb/$imageresize$deleteimage")) {
if (! unlink("$thumb/$imageresize$deleteimage")) {
PrintError("An error occurred while deleting the reduced image ($thumb/$imageresize$deleteimage)");
} else {
echo "<P ALIGN=CENTER>Reduced size image deleted</P>";
}
}
if (file_exists("$thumb/$deleteimage.txt")) {
if (! unlink("$thumb/$deleteimage.txt")) {
PrintError("An error occurred while deleting the comments ($thumb/$deleteimage.txt)");
} else {
echo "<P ALIGN=CENTER>Guest comments deleted</P>";
}
}
if (file_exists("$thumb/$deleteimage.cap")) {
if (! unlink("$thumb/$deleteimage.cap")) {
PrintError("An error occurred while deleting the caption ($thumb/$deleteimage.cap)");
} else {
echo "<P ALIGN=CENTER>Caption file deleted</P>";
}
}

echo "<P ALIGN=CENTER><A TARGET=_parent HREF=\"$scriptname\">Continue</A></P>";
die;
}

if ($uploadcount) {
$uploadcount = (int)$uploadcount;
PrintHeader("Choosing $uploadcount files");
if (!isadmin()) {
PrintError("This is an admin-only function");
die;
}
echo "<TABLE ALIGN=CENTER><TR><TD>";
echo "<FORM ENCTYPE=\"multipart/form-data\" METHOD=\"post\" ACTION=\"$scriptname\">";
echo "<INPUT TYPE=hidden NAME=MAX_FILE_SIZE value=5000000>";
echo "<INPUT TYPE=hidden NAME=upload value=true>";
echo "<DIV ALIGN=RIGHT>";
for ($i=1; $i<=$uploadcount; $i++) {
echo " $i. <INPUT NAME=imagefile[] TYPE=file size=30><BR>";
}
echo "</DIV><DIV ALIGN=CENTER>";
echo "<BR><BR><INPUT TYPE=submit NAME=save VALUE=\"Upload these files\">";
echo "</DIV>";
echo "</FORM>";
echo "</TD></TR></TABLE>";
echo "<P ALIGN=CENTER><A TARGET=_parent HREF=\"$scriptname\">Cancel</A></P>";
die;
}

if ($upload) {
PrintHeader("Uploading and storing files");
if (!isadmin()) {
PrintError("This is an admin-only function");
die;
}
if (count($imagefile['name'])) {
foreach ($imagefile['name'] as $key => $name) {
if (is_uploaded_file($imagefile['tmp_name'][$key]) and $imagefile['size'][$key] > 0) {
$imagefile_name = clean_filename($name);
if ($imagefile_name) {
if (move_uploaded_file($imagefile['tmp_name'][$key], $imagefile_name)) {
echo "<P ALIGN=CENTER>Uploaded $imagefile_name [".$imagefile['type'][$key]."]</P>";
} else {
PrintError("Could not store $imagefile_name in this directory");
}
} else {
PrintError("This file had a wierd filename");
}
}
}
echo "<P ALIGN=CENTER><A TARGET=_parent HREF=\"$scriptname\">Continue</A></P>";
die;
}

$intro = "true";
}

if ($intro) { // Print initial info in main frame
PrintHeader($title);
if (file_exists($introfile)) {
include($introfile);
} else {
echo "<CENTER><H1>$title</H1>";
if ($marginside == "right") {
echo "<P>". $ss[$lang]["selectr"] ."</P>";
} else {
echo "<P>". $ss[$lang]["selectl"] ."</P>";
}
}
if ($guestcomment && $recentcount) {
echo "<BR>";
echo "<P align=center><A HREF=\"$scriptname?recent=$recentcount\">";
echo "$recentcount ". $ss[$lang]["recent"];
echo "</A></P>";
}
if (isadmin()) {
echo "<HR>";
echo "<CENTER><P align=center>You are logged in as administrator</P>";
echo "<FORM METHOD=\"post\" ACTION=\"$scriptname\">";
echo "Upload <SELECT NAME=uploadcount>\n";

echo "<OPTION VALUE=\"1\">1 file</OPTION>\n";
for ($i=2; $i<100; $i++) {
echo "<OPTION VALUE=\"$i\">$i files</OPTION>\n";
}
echo "</SELECT><INPUT TYPE=submit VALUE=\"now\">";

echo "</FORM>";
echo "<HR><P><A HREF=\"$scriptname?logout=true\">Log out</A></P>";
echo "<HR>";
echo "</CENTER>";
}

PrintFooter();
die;
}

if ($recent) {
if ($guestcomment) {
PrintHeader("$title: Recent Comments");
PrintRecentComments($recent);
}
echo "<P ALIGN=CENTER><A HREF=\"$scriptname?intro=true\">".$ss[$lang]["start"]."</A></P>";
die;
}

if ($margin) { // Create a list of thumbnails
if (!file_exists($thumb)) {
if ( ! mkdir($thumb, 0755)) {
PrintError("Could not create thumb dir - check write permissions");
die;
}
}

PrintHeader("$title: Thumbnails", "margin");

$imagelist = GetFileList();

echo "<P ALIGN=CENTER>\n";
foreach ($imagelist as $image) {

$thumbimage = $thumb."/".$image;
$thumb_exists = file_exists($thumbimage);

if (!$thumb_exists) { // Try to create the thumbnail
set_time_limit(30);
$thumbwidth = $margin - 20;

$thumb_exists = ResizeImage($image, $thumbimage, $thumbwidth);
}

$caption = GetImageCaption($image, $clean=true);
$image = rawurlencode($image);
$thumbimage = $thumb."/".$image;

if ($datenames) { // Add date to comments
$imageyear = substr($image, 0, 4);
$imagemonth = substr($image, 4, 2);
$imageday = substr($image, 6, 2);
$caption = date("j-M-y ", mktime (0, 0, 0, $imagemonth, $imageday, $imageyear)) . $caption;
}

// The d=d.html was added to help dumb caches
echo "<A TITLE=\"$caption\" HREF=\"$scriptname?image=$image&d=d.html\" TARGET=imain>";
if ($thumb_exists) {
echo "<IMG SRC=\"$thumbimage\" BORDER=0 ALT=\"$caption\">";
} else {
echo "<FONT SIZE=1>$caption</FONT>";
}
echo "</A><BR><BR>\n";
}
echo "</P>\n";

echo "<P ALIGN=CENTER><FONT SIZE=1><A TARGET=_parent HREF=\".\" >".$ss[$lang]["start"]."</A></FONT></P>\n";

if ($password) {
echo "<P ALIGN=CENTER><BR><FONT SIZE=1>";
if (!isadmin()) {
echo "<A TITLE=\"Log in to modify this site\" TARGET=imain HREF=\"$scriptname?admin=true\">Admin</A>";
} else {
echo "<A TITLE=\"Log out as administrator\" TARGET=imain HREF=\"$scriptname?logout=true\">Logout</A>";
}
echo "</FONT></P>\n";
}
echo "<P ALIGN=CENTER><BR><FONT SIZE=1>";
echo "<A TARGET=_top TITLE=\meine Seite:\" HREF=\"http://florian.ch.gg/\">florian.ch.gg</A></FONT></P>\n";

die;
}

if ($comment) {
AddComment($comment, $name, $message);
if ($moderate) {
echo "<P ALIGN=CENTER>Your comment was stored and is awaiting moderation</P>";
}
$image = $comment;
}

if ($image) {
if (ereg( "\\.\\.", $image)) { // using ".." in the filename
PrintError("That filename ($image) was not secure.");
die;
}

$cleanimage = $image;
$image = urldecode($image);

if (!file_exists($image)) {
PrintError("Strangely, that picture doesn't exist");
die;
}

$imagelist = GetFileList();
GetNeighbours($imagelist, $image, $previmage, $nextimage);

$caption = GetImageCaption($image);

if ($slide && $nextimage) {
$meta="<META HTTP-EQUIV=REFRESH CONTENT=\"$slide;URL=$scriptname?image=$nextimage&slide=$slide\">";
} else {
$meta = "";
$slide = "0";
}

PrintHeader(CleanCaption($caption), $meta);

echo "<TABLE ALIGN=RIGHT CELLPADDING=0 CELLSPACING=0><TR>";
if ($previmage) {
echo "<TD><FORM ACTION=\"$scriptname\">
<INPUT TYPE=hidden name=image value=\"$previmage\">
<INPUT TYPE=submit VALUE=".$ss[$lang]["prev"]."></FORM></TD>";
}
if ($nextimage) {
echo "<TD><FORM ACTION=\"$scriptname\">
<INPUT TYPE=hidden name=image value=\"$nextimage\">
<INPUT TYPE=submit VALUE=".$ss[$lang]["next"]."></FORM></TD>";

echo "<TD>";
PrintSlideshowForm($nextimage, $slide);
echo "</TD>";
}
echo "</TR></TABLE>\n";

echo "<H3 align=left>".stripslashes($caption);
if (isadmin() and ($captionmethod == "rdjpgcom" or $captionmethod == "capfile") ) {
echo "<FONT SIZE=1>(<A HREF=\"$scriptname?editcaption=$cleanimage\">edit caption</A>)</FONT>";
}
echo "</H3>";

if ($fullwindow) {
$imagewidth = "HEIGHT=90%";
} else {
$imagewidth = "";
}

echo "<BR CLEAR=ALL><CENTER><P>\n";

if ($imageresize && ! $originalimage) {
$rimage = "$thumb/$imageresize$image";
$cleanrimage = "$thumb/$imageresize".rawurlencode("$image");
if (! file_exists("$rimage")) {
$imageresize = ResizeImage($image, $rimage, $imageresize, $imageresize);
}
if ($imageresize) {
$filesize = (integer) (filesize($image) / 1024);
echo "<A HREF=\"$scriptname?image=$cleanimage&originalimage=true&d=d.html\" ";
echo " TITLE=\"".$ss[$lang]["original"]." ($filesize kb)\">";
echo "<IMG BORDER=0 $imagewidth SRC=\"$cleanrimage\">";
echo "</A>\n";
} else {
echo "<IMG $imagewidth SRC=\"$cleanimage\">\n";
}

} else {
echo "<IMG $imagewidth SRC=\"$cleanimage\">\n";
}

if ($datenames) {
$imageyear = substr($image, 0, 4);
$imagemonth = substr($image, 4, 2);
$imageday = substr($image, 6, 2);
echo "<BR><FONT SIZE=1>";
echo date("j F, Y", mktime (0, 0, 0, $imagemonth, $imageday, $imageyear));
echo "</FONT><BR>\n";
}

if (isadmin()) {
echo "<BR><FONT SIZE=1><A TITLE=\"Are you sure? No second chances!\" HREF=\"$scriptname?deleteimage=$cleanimage\">Delete this image and all comments</A></FONT>";
}

echo "</P></CENTER>";

if ($dcomment) {
DeleteComment($image, $dcomment, $ctype);
}

if ($acomment) {
ApproveComment($image, $acomment);
}

if ($guestcomment) {
echo "<P ALIGN=CENTER><BR><BR><B>".$ss[$lang]["comments"]."</B></P>";
PrintComments($image);
PrintCommentForm($image);
}

PrintFooter();
die;
}

?>
<HTML>
<HEAD>
<TITLE><? echo $title ?></TITLE>
</HEAD>
<?
if ($marginside == "right") {
?>
<FRAMESET COLS="*,<?=$marginsize?>" BORDER=1>
<FRAME NAME=imain SRC="<?=$scriptname?>?intro=1" FRAMEBORDER=0 SCROLLING=AUTO>
<FRAME NAME=imargin SRC="<?=$scriptname?>?margin=<?=$marginsize?>" FRAMEBORDER=0
marginwidth="0" marginheight="0" noresize SCROLLING=AUTO>
<?
} else {
?>
<FRAMESET COLS="<?=$marginsize?>,*" BORDER=1>
<FRAME NAME=imargin SRC="<?=$scriptname?>?margin=<?=$marginsize?>" FRAMEBORDER=0
marginwidth="0" marginheight="0" noresize SCROLLING=AUTO>
<FRAME NAME=imain SRC="<?=$scriptname?>?intro=1" FRAMEBORDER=0 SCROLLING=AUTO>
<?
}
?>
<NOFRAMES>
This site works best with frames, which your browser doesn't support.
You can still browse this photo album, though, by starting
<A HREF="<?=$scriptname?>?margin=<?=$marginsize?>">here</A>
</NOFRAMES>
</FRAMESET>
</HTML>