<? // THUMBNAIL v2.06 (30.8.2002)
// src = jmeno souboru (povinny parametr)
// max = velikost delsi strany nahledu
// maxx = šířka
// maxy = výška
// typ = typ nahledu (jpg,gif,png)
// kva = kvalita obrazku pro JPEG v procentech
// dyn = yes pokud chces pokazde prepocitat (standardne generuje hlavicku Last-Modified)
// sam = no pokud chces resizing misto resamplingu (standardne se provadi kvalitnejsi resampling)

$maxx=200;
$maxy=160;

$dyn = "yes";
$sam = "yes";
define ("DMX", 80);   // bezna velikost thumbnailu

if (!File_Exists($src)) die('Not found');
if (Empty($max)) $max=DMX;
if (Empty($typ)) $typ=ERegI_Replace('.*\.([^\.]*)','\\1',$src);

if (EregI('\.jp(e)?g$',$src)) $vstup=ImageCreateFromJpeg($src);
  elseif (EregI('\.gif$',$src)) $vstup=ImageCreateFromGif($src);
  elseif (EregI('\.png$',$src)) $vstup=ImageCreateFromPng($src);
  elseif (EregI('\.wbmp$',$src)) $vstup=ImageCreateFromWbmp($src);

$x=ImageSX($vstup);
$y=ImageSY($vstup);
if ($x<=$max && $y<=$max):
   $xx=$x;
   $yy=$y;
  else:

      if($maxx AND $maxy){
              $xx=$maxx;
              $yy=$maxy;        
         }else{
       
           if ($x>$y):
              $xx=$max;
              $yy=$max*$y/$x;
             else:
              $yy=$max;
              $xx=$max*$x/$y;
              endif;
        }

endif;


if ($dyn=='yes'):
   Header ("Pragma: no-cache");
   Header ("Cache-Control: no-store, no-cache, must-revalidate, post-check=0, pre-check=0");
   Header ("Expires: ".GMDate("D, d M Y H:i:s",Time()-31536000)." GMT");
  else:
   $info=stat($src);
   Header ('Last-Modified: '.Date("D, j M Y H:i:s",$info[9]).' GMT');
   endif;

if ($sam=='no'):
   $vystup=ImageCreate($xx,$yy);
   ImageCopyResized  ($vystup,$vstup,0,0,0,0,$xx,$yy,$x,$y);
  else:
   $vystup=ImageCreateTrueColor($xx,$yy);
   ImageCopyResampled($vystup,$vstup,0,0,0,0,$xx,$yy,$x,$y);
   endif;
$typ=StrToLower($typ);

if ($typ=='jpg' || $typ=='jpeg'):
   Header ("Content-type: image/jpeg");
   if (Empty($kva)) ImageJpeg($vystup);
               else ImageJpeg($vystup,'',$kva);
   endif;
if ($typ=='gif'):
   Header ("Content-type: image/gif");
   ImageGif($vystup);
   endif;
if ($typ=='png'):
   Header ("Content-type: image/png");
   ImagePng($vystup);
   endif;
ImageDestroy($vstup);
ImageDestroy($vystup);
?>