<?php
//  _     ___ __  __            ____       _ _
// | |   |_ _|  \/  |          / ___| __ _| | | ___ _ __ _   _
// | |    | || |\/| |  _____  | |  _ / _` | | |/ _ \ '__| | | |
// | |___ | || |  | | |_____| | |_| | (_| | | |  __/ |  | |_| |
// |_____|___|_|  |_|          \____|\__,_|_|_|\___|_|   \__, |
//                                                       |___/
//
// The LIM Gallery - Less Is More lightweight PHP Photogallery Program
// Copyright (C) 2005 LIMG-Kickass-Development Team
// 
// Free for all users, but leave this text in the header. 
// 
// Last modification: 24.01.2006
// Description: Generates thumbnails and pictures with different sizes.

if($_GET['pic']){
  session_start();
  $ge_pic = $_GET['pic'];
  $ge_picWidth = $_GET['picWidth'];
  $ge_th = $_GET['th'];
  $ge_ls = $_GET['ls'];
  $album = $_GET['album'];
  mkThumb(&$ge_pic, &$ge_picWidth, &$ge_th, &$ge_ls, &$album, 1);
}

function mkThumb($ge_pic, $ge_picWidth, $ge_th, $ge_ls, $album, $out){
  $path2thumb = "../thumbs/th_".$album."_".$ge_pic;
  if(!$ge_picWidth){
    $ext_picWidth = $_SESSION['pic_width'];
  }else{
    $ext_picWidth = ceil($ge_picWidth);
  }
    
  if(!$ge_pic){
    $sourceImage = "ERROR";
  }else{
    $sourceImage = $ge_pic;
  }

  // if it is a thumbnail, get the th-quality
  // else get the normal pic-quality
  $imagePath = "../".$album."/";
  $thumbExists = 0;
  
  if($ge_th == 1){
    //if the filesize is under 10bytes (because earlier touch) delete file!
    if(file_exists($path2thumb) && filesize($path2thumb)<=10 ){
      unlink($path2thumb); //delete "corrupt" file
    }
    // check whether thumbnail exists already
    if(file_exists($path2thumb)){
      //$imagePath = "thumbs/$album/";
      $imagePath = "../thumbs/";
      $thumbExists = 1;
      //$sourceImage = "th_".$ge_pic;
      $sourceImage = "th_".$album."_".$ge_pic;
    } else { 
      require("../gconfig.php");
      $ext_picWidth = $thumbDefSize; // set default local-thumb size  
    }
    $se_quality = $_SESSION['thumb_quali'];
  }else{
    $se_quality = $_SESSION['pic_quali'];
  }
    
  $info = getimagesize($imagePath.$sourceImage);
  $oldWidth = $info[0];
  $oldHeight = $info[1];

  //ls (landscape)=> if it is not landscape format, calculate new height&width
  //to fit the new format ...
  if($ge_th == 1){ //if it is a thumbnail
    if($ge_ls == 2){ //not landscape
      $height = $ext_picWidth; 
      $ext_picWidth = ceil($oldWidth*$height/$oldHeight);
    }else{ //if landscape, then only reset the height
      $height = ceil($oldHeight*$ext_picWidth/$oldWidth);
    }
  } else { // for large pics
    if($ge_ls == 2){
      $height = $ext_picWidth; 
      $ext_picWidth = ceil($oldWidth*$ext_picWidth/$oldHeight);
    }else{ //if landscape, then only reset the height
      $height = ceil($oldHeight*$ext_picWidth/$oldWidth);
    }
  }

  switch($info[2]){ //info[2] has img type info
    case 1:
      $oldImage = imagecreatefrompng($imagePath.$sourceImage);
      break;
    case 2;
      $oldImage = imagecreatefromjpeg($imagePath.$sourceImage);
      break;
  }
  //create the image object (true color, with different size parameters)  
  $newImage = imagecreatetruecolor($ext_picWidth, $height);
  //resize the image
  imagecopyresized($newImage, $oldImage, 0, 0, 0, 0, $ext_picWidth, $height, $oldWidth, $oldHeight);
    

  //generate a local image
  if(($thumbExists == 0) && ($ge_th == 1)){
    if(!file_exists("../thumbs/$album".".albfile")){
      //generate file in the thumbs folder to note that the album exists
      touch("../thumbs/$album".".albfile");
      //change mode of the *.albfile to 777
      chmod("../thumbs/$album".".albfile", 0777);
    }
    //touch-solution from posts in: http://www.php.net/manual/en/function.imagejpeg.php 
    touch($path2thumb);
    //create a local image from $newImage to the thumbs folder
    imagejpeg($newImage,$path2thumb, $thumbDefQuality);
    chmod($path2thumb, 0777);
  }
 if($out == 1){
    //send header
    header("Content-Type: image/jpeg");
    //output the picture
 
  if($_SESSION[grayscale]==1)
    greyscaleFast(&$newImage);
  if($_SESSION[grayscale]==2)
    greyscaleGood(&$newImage);
    
    imagejpeg($newImage,"",$se_quality);
    imagedestroy($newImage);
    imagedestroy($oldImage);
 }
}


  function greyscaleGood (&$image) {
    $imagex = imagesx($image);
    $imagey = imagesy($image);

    for ($x = 0; $x <$imagex; ++$x) {
      for ($y = 0; $y <$imagey; ++$y) {
         $rgb = imagecolorat($image, $x, $y);
         $red = ($rgb >> 16) & 255;
         $green = ($rgb >> 8) & 255;
         $blue = $rgb & 255;
         $grey = (int)(($red+$green+$blue)/3);
         $newcol = imagecolorallocate($image, $grey,$grey,$grey);
         imagesetpixel($image, $x, $y, $newcol);
      }
    }
  }


  function greyscaleFast(&$img, $dither=1) { 
    if (!($t = imagecolorstotal($img))) {
       $t = 256;
       imagetruecolortopalette($img, $dither, $t);   
    }
       //$t = 256;
       //imagetruecolortopalette($img, $dither, $t);  
    for ($c = 0; $c < $t; $c++) {   
       $col = imagecolorsforindex($img, $c);
       $min = min($col['red'],$col['green'],$col['blue']);
       $max = max($col['red'],$col['green'],$col['blue']);
       $i = ($max+$min)/2;
       imagecolorset($img, $c, $i, $i, $i);
    }
  }

?>