<?php


# SSFPPG - a simple single file PHP pictures gallery
#
# Gabriel Bouvigne - 2008-2011
#
# Put it in a directory with some jpeg files, and it will automatically create a web gallery
#
# features:
# automatic thumbnails generation
# automatic pictures resizing and sharpening
# navigation interface generation with user selectable number of thumbnails
# preloading of a low quality picture in order to improve speed
#

# first part: borrowed functions
# second part: HTML template
# third part: gallery engine


//borrowed function
//resampling
function fastimagecopyresampled (&$dst_image, $src_image, $dst_x, $dst_y, $src_x, $src_y, $dst_w, $dst_h, $src_w, $src_h, $quality = 3) {
  // Plug-and-Play fastimagecopyresampled function replaces much slower imagecopyresampled.
  // Just include this function and change all "imagecopyresampled" references to "fastimagecopyresampled".
  // Typically from 30 to 60 times faster when reducing high resolution images down to thumbnail size using the default quality setting.
  // Author: Tim Eckel - Date: 09/07/07 - Version: 1.1 - Project: FreeRingers.net - Freely distributable - These comments must remain.
		  //
  // Optional "quality" parameter (defaults is 3). Fractional values are allowed, for example 1.5. Must be greater than zero.
  // Between 0 and 1 = Fast, but mosaic results, closer to 0 increases the mosaic effect.
  // 1 = Up to 350 times faster. Poor results, looks very similar to imagecopyresized.
  // 2 = Up to 95 times faster.  Images appear a little sharp, some prefer this over a quality of 3.
  // 3 = Up to 60 times faster.  Will give high quality smooth results very close to imagecopyresampled, just faster.
  // 4 = Up to 25 times faster.  Almost identical to imagecopyresampled for most images.
  // 5 = No speedup. Just uses imagecopyresampled, no advantage over imagecopyresampled.

	if (empty($src_image) || empty($dst_image) || $quality <= 0) { return false; }
	if ($quality < 5 && (($dst_w * $quality) < $src_w || ($dst_h * $quality) < $src_h)) {
	  	$temp = imagecreatetruecolor ($dst_w * $quality + 1, $dst_h * $quality + 1);
	  	imagecopyresized ($temp, $src_image, 0, 0, $src_x, $src_y, $dst_w * $quality + 1, $dst_h * $quality + 1, $src_w, $src_h);
	  	imagecopyresampled ($dst_image, $temp, $dst_x, $dst_y, 0, 0, $dst_w, $dst_h, $dst_w * $quality, $dst_h * $quality);
	  	imagedestroy ($temp);
  	} else
		imagecopyresampled ($dst_image, $src_image, $dst_x, $dst_y, $src_x, $src_y, $dst_w, $dst_h, $src_w, $src_h);
  	return true;
}

//unsharpen mask
/*
New: 
- In version 2.1 (February 26 2007) Tom Bishop has done some important speed enhancements.
- From version 2 (July 17 2006) the script uses the imageconvolution function in PHP 
version >= 5.1, which improves the performance considerably.


Unsharp masking is a traditional darkroom technique that has proven very suitable for 
digital imaging. The principle of unsharp masking is to create a blurred copy of the image
and compare it to the underlying original. The difference in colour values
between the two images is greatest for the pixels near sharp edges. When this 
difference is subtracted from the original image, the edges will be
accentuated. 

The Amount parameter simply says how much of the effect you want. 100 is 'normal'.
Radius is the radius of the blurring circle of the mask. 'Threshold' is the least
difference in colour values that is allowed between the original and the mask. In practice
this means that low-contrast areas of the picture are left unrendered whereas edges
are treated normally. This is good for pictures of e.g. skin or blue skies.

Any suggenstions for improvement of the algorithm, expecially regarding the speed
and the roundoff errors in the Gaussian blur process, are welcome.
*/

function UnsharpMask($img, $amount, $radius, $threshold)    { 

////////////////////////////////////////////////////////////////////////////////////////////////  
////  
////                  Unsharp Mask for PHP - version 2.1.1  
////  
////    Unsharp mask algorithm by Torstein Hønsi 2003-07.  
////             thoensi_at_netcom_dot_no.  
////               Please leave this notice.  
////  
///////////////////////////////////////////////////////////////////////////////////////////////  


    // $img is an image that is already created within php using 
    // imgcreatetruecolor. No url! $img must be a truecolor image. 

    // Attempt to calibrate the parameters to Photoshop: 
    if ($amount > 500)    $amount = 500; 
    $amount = $amount * 0.016; 
    if ($radius > 50)    $radius = 50; 
    $radius = $radius * 2; 
    if ($threshold > 255)    $threshold = 255; 
     
    $radius = abs(round($radius));     // Only integers make sense. 
    if ($radius == 0) { 
        return $img; imagedestroy($img); break;        } 
    $w = imagesx($img); $h = imagesy($img); 
    $imgCanvas = imagecreatetruecolor($w, $h); 
    $imgBlur = imagecreatetruecolor($w, $h); 
     

    // Gaussian blur matrix: 
    //                         
    //    1    2    1         
    //    2    4    2         
    //    1    2    1         
    //                         
    ////////////////////////////////////////////////// 
         

    if (function_exists('imageconvolution')) { // PHP >= 5.1  
            $matrix = array(  
            array( 1, 2, 1 ),  
            array( 2, 4, 2 ),  
            array( 1, 2, 1 )  
        );  
        imagecopy ($imgBlur, $img, 0, 0, 0, 0, $w, $h); 
        imageconvolution($imgBlur, $matrix, 16, 0);  
    }  
    else {  

    // Move copies of the image around one pixel at the time and merge them with weight 
    // according to the matrix. The same matrix is simply repeated for higher radii. 
        for ($i = 0; $i < $radius; $i++)    { 
            imagecopy ($imgBlur, $img, 0, 0, 1, 0, $w - 1, $h); // left 
            imagecopymerge ($imgBlur, $img, 1, 0, 0, 0, $w, $h, 50); // right 
            imagecopymerge ($imgBlur, $img, 0, 0, 0, 0, $w, $h, 50); // center 
            imagecopy ($imgCanvas, $imgBlur, 0, 0, 0, 0, $w, $h); 

            imagecopymerge ($imgBlur, $imgCanvas, 0, 0, 0, 1, $w, $h - 1, 33.33333 ); // up 
            imagecopymerge ($imgBlur, $imgCanvas, 0, 1, 0, 0, $w, $h, 25); // down 
        } 
    } 

    if($threshold>0){ 
        // Calculate the difference between the blurred pixels and the original 
        // and set the pixels 
        for ($x = 0; $x < $w-1; $x++)    { // each row
            for ($y = 0; $y < $h; $y++)    { // each pixel 
                     
                $rgbOrig = ImageColorAt($img, $x, $y); 
                $rOrig = (($rgbOrig >> 16) & 0xFF); 
                $gOrig = (($rgbOrig >> 8) & 0xFF); 
                $bOrig = ($rgbOrig & 0xFF); 
                 
                $rgbBlur = ImageColorAt($imgBlur, $x, $y); 
                 
                $rBlur = (($rgbBlur >> 16) & 0xFF); 
                $gBlur = (($rgbBlur >> 8) & 0xFF); 
                $bBlur = ($rgbBlur & 0xFF); 
                 
                // When the masked pixels differ less from the original 
                // than the threshold specifies, they are set to their original value. 
                $rNew = (abs($rOrig - $rBlur) >= $threshold)  
                    ? max(0, min(255, ($amount * ($rOrig - $rBlur)) + $rOrig))  
                    : $rOrig; 
                $gNew = (abs($gOrig - $gBlur) >= $threshold)  
                    ? max(0, min(255, ($amount * ($gOrig - $gBlur)) + $gOrig))  
                    : $gOrig; 
                $bNew = (abs($bOrig - $bBlur) >= $threshold)  
                    ? max(0, min(255, ($amount * ($bOrig - $bBlur)) + $bOrig))  
                    : $bOrig; 
                 
                 
                if (($rOrig != $rNew) || ($gOrig != $gNew) || ($bOrig != $bNew)) { 
                        $pixCol = ImageColorAllocate($img, $rNew, $gNew, $bNew); 
                        ImageSetPixel($img, $x, $y, $pixCol); 
                    } 
            } 
        } 
    } 
    else{ 
        for ($x = 0; $x < $w; $x++)    { // each row 
            for ($y = 0; $y < $h; $y++)    { // each pixel 
                $rgbOrig = ImageColorAt($img, $x, $y); 
                $rOrig = (($rgbOrig >> 16) & 0xFF); 
                $gOrig = (($rgbOrig >> 8) & 0xFF); 
                $bOrig = ($rgbOrig & 0xFF); 
                 
                $rgbBlur = ImageColorAt($imgBlur, $x, $y); 
                 
                $rBlur = (($rgbBlur >> 16) & 0xFF); 
                $gBlur = (($rgbBlur >> 8) & 0xFF); 
                $bBlur = ($rgbBlur & 0xFF); 
                 
                $rNew = ($amount * ($rOrig - $rBlur)) + $rOrig; 
                    if($rNew>255){$rNew=255;} 
                    elseif($rNew<0){$rNew=0;} 
                $gNew = ($amount * ($gOrig - $gBlur)) + $gOrig; 
                    if($gNew>255){$gNew=255;} 
                    elseif($gNew<0){$gNew=0;} 
                $bNew = ($amount * ($bOrig - $bBlur)) + $bOrig; 
                    if($bNew>255){$bNew=255;} 
                    elseif($bNew<0){$bNew=0;} 
                $rgbNew = ($rNew << 16) + ($gNew <<8) + $bNew; 
                    ImageSetPixel($img, $x, $y, $rgbNew); 
            } 
        } 
    } 
    imagedestroy($imgCanvas); 
    imagedestroy($imgBlur); 
     
    return $img; 

}

function exif_get_float($value) {
  $pos = strpos($value, '/');
  if ($pos === false) return (float) $value;
  $a = (float) substr($value, 0, $pos);
  $b = (float) substr($value, $pos+1);
  return ($b == 0) ? ($a) : ($a / $b);
}

function exif_get_shutter(&$exif) {
  if (isset($exif['ExposureTime'])) {
      $shutter = exif_get_float($exif['ExposureTime']);
  } else {
      if (!isset($exif['ShutterSpeedValue'])) return false;
      $apex = exif_get_float($exif['ShutterSpeedValue']);
      $shutter = pow(2, -$apex);
  }
  if ($shutter == 0) return false;
  if ($shutter >= 1) return round($shutter) . 's';
  $shutter_denom = round(1 / $shutter);
  // round up to multiple of 5 if not yet
  if ($shutter_denom % 5 != 0)	{
      if ($shutter_denom <= 100 ) {
	  // round up to multiple of 5 if not yet...
	  $shutter_denom_round = 5 * round($shutter_denom / 5);
      } else {
	  // ... or  even to multiple of 10
	  $shutter_denom_round = 10 * round($shutter_denom / 10);
      } 
      // if the rounded value is close enough, let's use it
      if ((50 * round($shutter_denom / 50)) == (50 * round($shutter_denom_round / 50))) $shutter_denom = $shutter_denom_round;
  }
  return '1/' . $shutter_denom . 's';
}


//template for the HTML page
$html_template = "
<!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0 Strict//EN' 'http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd'>
<html xmlns='http://www.w3.org/1999/xhtml' xml:lang='en' lang='en'>
<head>
<meta http-equiv='Content-Type' content='text/html; charset=utf-8'/>
<title>Pic a Day 2011 - Gabriel Bouvigne</title>	

<style type='text/css'>

html, body, div, span, applet, object, iframe,
h1, h2, h3, h4, h5, h6, p, blockquote, pre,
a, abbr, acronym, address, big, cite, code,
del, dfn, em, font, img, ins, kbd, q, s, samp,
small, strike, strong, sub, sup, tt, var,
dl, dt, dd, ol, ul, li,
fieldset, form, label, legend,
table, caption, tbody, tfoot, thead, tr, th, td {
	margin: 0;
	padding: 0;
	border: 0;
	outline: 0;
	font-weight: inherit;
	font-style: inherit;
	font-size: 100%;
	font-family: inherit;
	vertical-align: baseline;
}

body {
	color: #DDDDDD ;
	background: #353535;
}

h1 {
	padding: 0.5em;
	padding-top: 0.8em;
	font-size: 1em;
	font-weight: bold;
	font-family:helvetica new, sans-serif;
	letter-spacing: 0.2em;
	text-transform: uppercase;
}

p {
	padding: 0.2em;
}

input {
	background-color: #252525;	
	color: #CCCCCC;
	border: 1px solid #444444 ;	
}

.thumb {
	border: solid 6px #E7E7E7;
	margin: 4px;
	box-shadow: 2px 2px 9px #000000;
}
.thumb:hover {
	border: solid 8px #FEFEFE;
	margin: 2px;
	box-shadow: 6px 6px 15px #000000;
}

.main_pic {
	border: solid 8px #FEFEFE;
	box-shadow: 6px 6px 15px #000000;
	cursor:pointer;
}
.main_pic:hover {
	border: solid 9px #FEFEFE;
	box-shadow: 9px 9px 25px #000000;
}

.pic_title,
.exifs ul,
.navigation,
.footer {
	text-align: center;
	background-color: #2A2A2A;
	border-radius: 5px;
	box-shadow: inset 1px 1px 5px #000000;
}

input {
	background-color: #2A2A2A;
	border-radius: 5px;
}

.pic_title {
	font-family:helvetica new, sans-serif;
	font-size: 0.9em;
	letter-spacing: 0.1em;
	margin: 1.5em;
	margin-top: 1.6em;
}

.exifs ul li{
	display: inline;
	padding: .2em 1em;
}

.navigation {
	font-family: 'Courier New',
             Courier,
             monospace;
	font-size: 150%;
	font-weight: bolder;
	letter-spacing: -0.1em;
	width: 100%;
	padding-top: 0.3em;
	padding-bottom: 0.3em;
	margin: 0.9em;
}

A:link {
	text-decoration: none;
	color: #CCCCCC;
}
A:visited {
	text-decoration: none;
	color: #CCCCCC;
}
A:active {
	text-decoration: none;
}

.thumbs_td {
	padding: 2em;
	vertical-align: top;
}

.mainpic_td {
	padding: 2em;
	padding-left: 2.5em;
	padding-right: 2.5em;
}

.footer {
	font-family: sans-serif;
	font-size: 0.5em;
	margin-top: 2em;
	width: 20%;
	margin-left: 40%;
	margin-right: 40%;
}

#overlay {
	z-index:1000;
	position:fixed;
	top:0px;
	left:0px;
	width:100%; height:100%;
	text-align:center;
	cursor:pointer;
	background-color: #151515;
}

#main_pic_overlay {
	position:relative;
	border: solid 8px #FEFEFE;
	box-shadow: 6px 6px 15px #000000;
	-moz-box-shadow: 6px 6px 15px #000000;
}

</style>


</head>
<body>

<script type='text/javascript'>
/* <![CDATA[ */

window.onload = onloadHandler;

function fadeIn(objId,opacity, speed) {
	if (document.getElementById) {
		obj = document.getElementById(objId);
    		if (opacity <= 100) {
			obj.style.opacity = opacity/100;
			opacity += 10;
			window.setTimeout(\"fadeIn('\"+objId+\"',\"+opacity+\",\"+speed+\")\", speed);
		}
	}
}		

function fadeOut(objId,opacity, speed) {
	if (document.getElementById) {
		obj = document.getElementById(objId);
    		if (opacity >= 0) {
			obj.style.opacity = opacity/100;
			opacity -= 10;
			window.setTimeout(\"fadeOut('\"+objId+\"',\"+opacity+\",\"+speed+\")\", speed);
		}
	}
}		

function fades() {
	fadeIn('pic_title', 0, 40);
	fadeIn('main_pic', 0, 40);
	fadeIn('navigation', 0, 30)
	fadeIn('config', 0, 15);
}

function hq_picture() {
	document.getElementById('main_pic').src = <!-- *main_pic_hq* -->;
	document.getElementById('main_pic_overlay').src = document.getElementById('main_pic').src;
}

function onloadHandler() {
	fades();
	hq_picture();
}

function showexifs() {
	document.getElementById('exifs').style.display = 'block';
	fadeIn('exifs', 0, 40);
}

function hideexifs() {
	fadeOut('exifs', 100, 20);
	window.setTimeout(\"document.getElementById('exifs').style.display = 'none'\", (100/10)*20);
}

function showoverlay() {
	document.getElementById('overlay').style.display = 'block';
	fadeIn('overlay', 0, 60);

	cur_width = document.getElementById('main_pic').width;
	cur_height = document.getElementById('main_pic').height;

	//get viewport size
	if (typeof window.innerWidth != 'undefined') {
	      // CSS 2.1 way
	      viewport_width = window.innerWidth,
	      viewport_height = window.innerHeight
	} else if (typeof document.documentElement != 'undefined'
	    && typeof document.documentElement.clientWidth !=
	    'undefined' && document.documentElement.clientWidth != 0) {
	      // IE6 in standards compliant mode (i.e. with a valid doctype as the first line in the document)
	      viewport_width = document.documentElement.clientWidth,
	      viewport_height = document.documentElement.clientHeight
	}

	//add some space
	viewport_width = Math.round(viewport_width * 0.9);
	viewport_height = Math.round(viewport_height * 0.9);

	target_width = viewport_width;
	target_height = Math.round((cur_height * target_width) / cur_width);
	if (target_height > viewport_height) {
	    target_height = viewport_height;
	    target_width = Math.round((cur_width * target_height) / cur_height);
	}

	target_size = Math.max(target_width, target_height);
	var main_pic_overlay;
	main_pic_overlay = document.getElementById('main_pic_overlay');
	if (target_size == target_height) {
	    main_pic_overlay.removeAttribute('width');
	    main_pic_overlay.height = target_height;
	} else {
	    main_pic_overlay.width = target_width;
	    main_pic_overlay.removeAttribute('height');
	}

	main_pic_overlay.src = document.getElementById('main_pic').src + '&size=' + target_size;
}

function hideoverlay() {
	fadeOut('overlay', 100, 20);
	window.setTimeout(\"document.getElementById('overlay').style.display = 'none'\", (100/10)*20);
}


/* ]]> */
</script>
<div id='overlay' style='opacity:O;display:none' onclick='hideoverlay()'>
<table width='100%' height='100%'>
<tr height='5%'><td>
</td></tr>
<tr><td height='1%'>
	<img id='main_pic_overlay' src=<!-- *main_pic_overlay* --> />
</td></tr>
<tr height='4%'><td>
</td></tr>
</table>
</div>		
<h1>Picture a Day 2011 gallery - work in progress</h1>
	
<table width='100%' cellspacing='50%'>
<!-- *content* -->
</table>

<div class='footer'>
<a href='?mode=source' title='download source code'>powered by SSFPPG</a>
</div>

</body>
</html>
";

$html_dual_panel = "
<tr>
<td valign='top' class='thumbs_td'>
	<!-- *thumbs* -->
	<p id='pic_title' class='pic_title' style='opacity:0'>
	<!-- *pic_title* -->
	</p>
	<!-- *navigation* -->
	<!-- *config* -->
	
</td>
<td align='center' valign='top' style='width:50%' class='mainpic_td'>
	<img id='main_pic' <!-- *main_pic* --> style='opacity:0' class='main_pic' onclick='showoverlay()' onmouseover='showexifs()' onmouseout='hideexifs()'/>
	<div id='exifs' class='exifs' style='opacity:O;display:none'><ul><!-- *exifs* --></ul></div>
</td>
</tr>
";

$html_single_panel = "
<tr>
<td valign='top' class='thumbs_td'>
	<!-- *thumbs* -->
</td>
</tr>
";


define("MODE_PIC","pic"); 
define("MODE_GALLERY","gallery"); 
define("MODE_THUMB","thumb"); 
define("MODE_THUMBS","thumbs"); 
define("MODE_SOURCE","source"); 
define("DEFAULT_COLS",3); 
define("DEFAULT_ROWS",3); 
define("DEFAULT_QUAL",98); 
define("DEFAULT_SIZE",700); 

class PhotoGallery
{
###############
## Variables ##
###############
var $_rt = './'; // Where the base "root" of our photos are
var $lst = array(); // Will hold our list of files
var $current_lst = array(); // Will hold our list of neighbors files
var $allowed_ext = array(); //list of allowed file extensions
var $jpg_preview_quality = 80;
var $jpg_thumb_quality = 90;
var $thumb_coverage = 95;
var $thumb_size = 96;
var $html;
var $current_pic_name = ''; //current picture;
var $current_pic_width = '';
var $current_pic_height = '';


###################################################################
## user definable Variables, which can be defined within the URL ##
###################################################################
var $current_pic = ''; //current picture;
var $mode = MODE_GALLERY; //MODE_PIC/MODE_GALLERY/MODE_THUMB - script working mode
var $cols = DEFAULT_COLS; // How many thumbnails columns there will be
var $rows = DEFAULT_ROWS; // How many thumbnails rows there will be across
var $size = DEFAULT_SIZE; // main picture size (highest value within width and height)
var $jpg_quality = DEFAULT_QUAL; //main picture quality value, from 1 to 100


###############
## Functions ##
###############

	function PhotoGallery()
	{
		global $html_template;
		$this->html = $html_template;
		array_push($this->allowed_ext, 'jpg');
		array_push($this->allowed_ext, 'jpeg');

		//try to retrieve arguments
		if (array_key_exists('mode', $_GET)) {
			$mode = $_GET['mode'];
			if ($mode == MODE_PIC || $mode == MODE_THUMB || $mode == MODE_THUMBS || $mode == MODE_SOURCE) {
				$this->mode = $mode;
			}
		}
		if (array_key_exists('cols', $_GET) && is_numeric ($_GET['cols'])) {
			$this->cols = abs(intval($_GET['cols']));
		}
		if (array_key_exists('rows', $_GET) && is_numeric ($_GET['rows'])) {
			$this->rows = abs(intval($_GET['rows']));
		}
		if (array_key_exists('size', $_GET) && is_numeric ($_GET['size'])) {
			$this->size = abs(intval($_GET['size']));
		}
		if (array_key_exists('qual', $_GET) && is_numeric ($_GET['qual'])) {
			$this->jpg_quality = abs(intval($_GET['qual']));
			$this->jpg_quality = min($this->jpg_quality, 100);
			$this->jpg_quality = max($this->jpg_quality, 1);
			$this->jpg_preview_quality = min($this->jpg_preview_quality, $this->jpg_quality);
		}


		$this->current_pic = $_GET['pic']; //try to retrieve current picture from arguments
	}

	function file_ext($file) {
		$fileExp = explode('.', $file); // make array off the periods
		return $fileExp[count($fileExp) -1]; // file extension will be last index in array, -1 for 0-based indexes
	}
	
	function get_extra_params()
	{
		$extra_params = "";
		if ($this->cols != DEFAULT_COLS)
			$extra_params .= "&amp;cols=$this->cols";
		if ($this->rows != DEFAULT_ROWS)
			$extra_params .= "&amp;rows=$this->rows";
		if ($this->size != DEFAULT_SIZE)
			$extra_params .= "&amp;size=$this->size";
		if ($this->jpg_quality != DEFAULT_QUAL)
			$extra_params .= "&amp;qual=$this->jpg_quality";
		return $extra_params;
	}
	
	function exif_date($file)
	{
		$exif = exif_read_data($file);
			
		// Date/time
		$date="";
		if (isset($exif['DateTimeOriginal']))
			$date=$exif['DateTimeOriginal'];
		if (empty($date) && isset($exif['DateTime']))
			$date=$exif['DateTime'];
		
		return $date;
	}
	
	function file_date($file)
	{
		$date = $this->exif_date($file);
		if (!empty($date)) {
			$date = strtotime($date);
		}
		return $date;
	}

	function read_directory()
	{
		//using the opendir function
		$dir_handle = @opendir($this->_rt) or die("Unable to open $this->_rt");
		
		while ($file = readdir($dir_handle)) 
		{
			$ext = $this->file_ext($file);
			$ext = strtolower($ext);
			if(in_array($ext, $this->allowed_ext)) {
				$this->lst[$this->file_date($file)] = $file;
			}
		}
		
		//closing the directory
		closedir($dir_handle);
		
		//sort by date
		ksort($this->lst);
	}

	function date_to_string($date)
	{
		return date("Y/m/d", $date);
	}
	
	function create_exifs()
	{
		$exif = exif_read_data($this->current_pic);
		$exifs_str = "";

		if (isset($exif['FocalLength']))
			$exifs_str .='<li>' . round(exif_get_float($exif['FocalLength'])) . 'mm</li>';
		if (isset($exif['ShutterSpeedValue']))
			$exifs_str .='<li>' . exif_get_shutter($exif) . '</li>';
		if (isset($exif['ISOSpeedRatings']))
			$exifs_str .='<li>ISO ' . $exif['ISOSpeedRatings'] . '</li>';
		if (isset($exif['Model']))
			$exifs_str .='<li>' . $exif['Model'] . '</li>';

		$this->html = str_replace("<!-- *exifs* -->", $exifs_str, $this->html);
	}
	
	function create_thumbs_list()
	{
		$idx = 1;
		$thumbs = "";
		$extra_params = $this->get_extra_params();

		foreach ($this->current_lst as $date => $file) {
			$date = $this->date_to_string($date);

			$thumbs .= "<a href='?pic=$file$extra_params'><img src='?pic=$file&amp;mode=thumb' title='$date' alt='$date thumbnail' width='$this->thumb_size' height='$this->thumb_size' class='thumb' /></a>\n";
			if ($this->mode != MODE_THUMBS && $idx%$this->cols == 0) {
				$thumbs .= "<br/>\n";
			}
			$idx++;
		}
		$this->html = str_replace("<!-- *thumbs* -->", $thumbs, $this->html);
	}
	
	function create_navigation()
	{
		$extra_params = $this->get_extra_params();

		reset($this->lst);
		$first = $this->lst[key($this->lst)];
		end($this->lst);
		$last = $this->lst[key($this->lst)];
		$rand_val = $this->lst[array_rand($this->lst)];

		$navi = "
			<table class='navigation' id='navigation' style='opacity:0'>
			<tr>
			<td><a href='?pic=$first$extra_params' title='first picture'>|&lt;</a></td>
			<td><a href='?pic=$rand_val$extra_params' title='random picture'>(¿?)</a></td>
			<td><a href='?pic=$last$extra_params' title='last picture'>>|</a></td>
			</tr>
			<tr>
			<td colspan='3'><a href='?pic=$last$extra_params&mode=thumbs' title='all thumbnails'>[::]</a></td>
			</tr>
			</table>
			";
		$this->html = str_replace("<!-- *navigation* -->", $navi, $this->html);

		$wh = "
			<form action='' method='get' id='config' class='config' style='opacity:0'>
			<div>
			<input type='hidden' name='pic' value='$this->current_pic' />
			columns:
			<input type='text' name='cols' size='2' maxlength='2' value='$this->cols' /> &nbsp;
			rows:
			<input type='text' name='rows' size='2' maxlength='2' value='$this->rows' /> &nbsp;
			<input type='submit' value='apply' />
			</div>
			</form>
			";
		$this->html = str_replace("<!-- *config* -->", $wh, $this->html);
	}

	function create_page()
	{
		global $html_dual_panel;
		$this->html = str_replace("<!-- *content* -->", $html_dual_panel, $this->html);
		$main_pic = " src='?pic=$this->current_pic&amp;mode=pic&amp;size=$this->size&amp;qual=$this->jpg_preview_quality' width='$this->current_pic_width' height='$this->current_pic_height' alt='$this->current_pic_name' ";
		$this->html = str_replace("<!-- *main_pic* -->", $main_pic, $this->html);
		$main_pic_hq = "'?pic=$this->current_pic&mode=pic&size=$this->size&qual=$this->jpg_quality'";
		$this->html = str_replace("<!-- *main_pic_hq* -->", $main_pic_hq, $this->html);
		$main_pic_overlay = "'?pic=$this->current_pic&amp;mode=pic&amp;size=$this->size&amp;qual=$this->jpg_preview_quality'";
		$this->html = str_replace("<!-- *main_pic_overlay* -->", $main_pic_overlay, $this->html);
		$this->html = str_replace("<!-- *pic_title* -->", $this->current_pic_name, $this->html);
		$this->create_thumbs_list();
		$this->create_exifs();
		$this->create_navigation();
		
		echo $this->html;
	}

	function create_thumbs_page()
	{
		global $html_single_panel;
		$this->html = str_replace("<!-- *content* -->", $html_single_panel, $this->html);
		$this->create_thumbs_list();
		
		echo $this->html;
	}

	function sharpen($img, $resampling_ratio = 1, $fast=false)
	{
		if ($fast)
		{
			if (function_exists('imageconvolution') && $resampling_ratio != 1) {
				$sharpness = 6;
				$sharpenMatrix	= array(
					array(-1, -1, -1),
					array(-1, $sharpness + 9, -1),
					array(-1, -1, -1)
				);
				$divisor = 1+$sharpness;
				$offset = 0;
				imageconvolution($img, $sharpenMatrix, $divisor, $offset);
			}
		} else {
			if (function_exists('imageconvolution')) {
				UnsharpMask($img, 90, 0.5, 3);
			}
		}
	}
	
	function create_pic()
	{
		$image = imageCreateFromJPEG($this->current_pic);
		$width_orig = imageSX($image);
		$height_orig = imageSY($image);
		$max_length = max($width_orig, $height_orig);
		$ratio = $this->size/$max_length;
		$width_dest = $width_orig*$ratio;
		$height_dest = $height_orig*$ratio;
		
		$img_new = imagecreatetruecolor($width_dest, $height_dest);
		
		imagecopyresampled($img_new, $image,
				   0, 0,
       				   0, 0,
       				   $width_dest, $height_dest,
	     			   $width_orig, $height_orig);
		ImageDestroy($image);

		//retrieve resulting output dimensions, as they might be +-1 pixel off from target
		$width_dest = imageSX($img_new);
		$height_dest = imageSY($img_new);
		$new_size = max($width_dest, $height_dest);
		$ratio = $new_size/$max_length;
		$fast = false;
		if ($this->jpg_quality == $this->jpg_preview_quality) {
			$fast = true;
		}

		$this->sharpen($img_new, $ratio, $fast);

		//Tell the browser what kind of file is come in
		header("Content-Type: image/jpeg");
		//Output the newly created image in jpeg format
		ImageInterlace($img_new, false);
		ImageJpeg($img_new, '', $this->jpg_quality);

		ImageDestroy($img_new); 
	}
	
	function create_thumb()
	{
		$image = imageCreateFromJPEG($this->current_pic);
		$width_orig = imageSX($image);
		$height_orig = imageSY($image);
		$min_length = min($width_orig, $height_orig);
		$extracted_size = $min_length*$this->thumb_coverage/100;
		
		$img_new = imagecreatetruecolor($this->thumb_size, $this->thumb_size);
		
		fastimagecopyresampled($img_new, $image,
				   0, 0,
       				   ($width_orig-$extracted_size)/2, ($height_orig-$extracted_size)/2,
       				   $this->thumb_size, $this->thumb_size,
	     			   $extracted_size, $extracted_size);
		ImageDestroy($image); 
		
		//Tell the browser what kind of file is come in
		header("Content-Type: image/jpeg");
		//Output the newly created image in jpeg format
		ImageInterlace($img_new, false);
		ImageJpeg($img_new, '', $this->jpg_thumb_quality);

		ImageDestroy($img_new); 
	}
	
	function current_pic_data()
	{
		//check if current_pic is correct
		if (!in_array($this->current_pic, $this->lst)) {
			$this->current_pic = '';
		}		
		if (empty($this->current_pic)) {
			$this->current_pic = end($this->lst); //default: last picture
		}
		$this->current_pic_name = $this->date_to_string($this->file_date($this->current_pic));
		list($width_orig, $height_orig) = getimagesize($this->current_pic);
		$max_length = max($width_orig, $height_orig);

		$this->current_pic_width = round($width_orig*$this->size/$max_length);
		$this->current_pic_height = round($height_orig*$this->size/$max_length);

		$idx = count($this->lst);
		end($this->lst);
		While ($idx > 0) {
			$idx--;
			if (current($this->lst) == $this->current_pic)
				break;
			prev($this->lst);
		}

		$current_index = $idx;
		$num_pics = $this->rows * $this->cols;
		$first_index = floor($num_pics/2);
		$first_index = $current_index - $first_index;
		$first_index = max(0, $first_index);
		$this->current_lst = array_slice($this->lst, $first_index, $num_pics, true);
	}

	function thumbs_data()
	{
		$this->current_lst = $this->lst;
	}

	function get_src()
	{
		header('Content-Type: text/plain');
		$currentFile = $_SERVER["SCRIPT_NAME"];
		$parts = Explode('/', $currentFile);
		$currentFile = $parts[count($parts) - 1];
		$source = file_get_contents($currentFile);
		echo $source;
	}
}

$pg = new PhotoGallery();

if ($pg->mode == MODE_GALLERY) {
	$pg->read_directory();
	$pg->current_pic_data();
	$pg->create_page();
} else if ($pg->mode == MODE_PIC) {
	$pg->create_pic();
} else if ($pg->mode == MODE_THUMB) {
	$pg->create_thumb();
} else if ($pg->mode == MODE_THUMBS) {
	$pg->read_directory();
	$pg->thumbs_data();
	$pg->create_thumbs_page();
} else if ($pg->mode == MODE_SOURCE) {
	$pg->get_src();
}

?>