<?php

/**
 * 类库：图像处理
 * @copyright (C)2011 Cenwor Inc.
 * @author Moyo <dev@uuland.org>
 * @package handler
 * @name image.han.php
 * @version 1.1
 */

class ImageHandler
{
	var $dst_img;	var $h_src; 	var $h_dst;	var $h_mask;	var $img_create_quality = 100;	var $img_display_quality = 75;	var $img_scale = 0;	var $src_w = 0;	var $src_h = 0;	var $dst_w = 0;	var $dst_h = 0;	var $fill_w;	var $fill_h;	var $copy_w;	var $copy_h;	var $src_x = 0;	var $src_y = 0;	var $start_x;	var $start_y;	var $mask_word;	var $mask_img;	var $mask_type=0;	var $mask_pos_x = 0;	var $mask_pos_y = 0;	var $mask_offset_x = 10;	var $mask_offset_y = 10;	var $font_offset_y = 10;	var $font_w;	var $font_h;	var $mask_w;	var $mask_h;	var $mask_font_color = "#ffffff";	var $mask_font = 2;	var $font_size;	var $mask_position = 0;	var $mask_img_pct = 50;	var $mask_txt_pct = 50;	var $img_border_size = 0;	var $img_border_color;	var $_flip_x=0;	var $_flip_y=0;
	var $cut_type=0;

	var $img_type;
		var $all_type = array(
        "jpg"  => array("output"=>"imagejpeg", "create"=>"imagecreatefromjpeg"),
        "gif"  => array("output"=>"imagegif", "create"=>"imagecreatefromgif"),
        "png"  => array("output"=>"imagepng", "create"=>"imagecreatefrompng"),
        "wbmp" => array("output"=>"image2wbmp", "create"=>"imagecreatefromwbmp"),
        "jpeg" => array("output"=>"imagejpeg", "create"=>"imagecreatefromjpeg")
	);

	
	function ThumbHandler()
	{
		$this->mask_font_color = "#ffffff";
		$this->font = 5;
		$this->font_size = 12;
	}

	
	function Info($img)
	{
		$imageInfo = getimagesize($img);
        if ($imageInfo !== false) {
            $imageType = strtolower(substr(image_type_to_extension($imageInfo[2]), 1));
            $imageSize = filesize($img);
            $info = array(
                "width" => $imageInfo[0],
                "height" => $imageInfo[1],
                "type" => $imageType,
                "size" => $imageSize,
                "mime" => $imageInfo['mime']
            );
            return $info;
        } else {
            return false;
        }
	}

	
	function getImgWidth($src)
	{
		return imagesx($src);
	}

	
	function getImgHeight($src)
	{
		return imagesy($src);
	}

	
	function setSrcImg($src_img, $img_type=null)
	{
		if(!is_file($src_img))
		{
			return false;
					}

		if(!empty($img_type))
		{
			$this->img_type = $img_type;
		}
		else
		{
			$this->img_type = $this->_getImgType($src_img);
		}

		$this->_checkValid($this->img_type);

		

		$img_type  = $this->img_type;
		$func_name = $this->all_type[$img_type]['create'];
		if(function_exists($func_name)) {
			$im = @$func_name($src_img);
		} else {
			return;
		}
				$this->h_src = $im;		$this->src_w = $this->getImgWidth($this->h_src);
		$this->src_h = $this->getImgHeight($this->h_src);
	}

	
	function setDstImg($dst_img)
	{

		$arr  = explode('/',$dst_img);
		$last = array_pop($arr);
		$path = implode('/',$arr);
		$this->_mkdirs($path);
		$this->dst_img = $dst_img;
	}

	
	function setImgDisplayQuality($n)
	{
		$this->img_display_quality = (int)$n;
	}

	
	function setImgCreateQuality($n)
	{
		$this->img_create_quality = (int)$n;
	}

	
	function setMaskWord($word)
	{
		$this->mask_word .= $word;
	}

	
	function setMaskFontColor($color="#ffffff")
	{
		$this->mask_font_color = $color;
	}

	
	function setMaskFont($font=2)
	{
		if(!is_numeric($font) && !is_file($font))
		{
			return false;
					}
		$this->font = $font;
		$this->font_offset_y += $this->font_size;
	}

	
	function setMaskFontSize($size = "12")
	{
		$this->font_size = $size;
	}

	
	function setMaskImg($img)
	{
		$this->mask_img = $img;
	}

	
	function setMaskOffsetX($x)
	{
		$this->mask_offset_x = (int)$x;
	}

	
	function setMaskOffsetY($y)
	{
		$this->mask_offset_y = (int)$y;
	}

	
	function setMaskPosition($position = 0)
	{
		$this->mask_position = ($position < 0 ? rand(1,4) : (int) ($position % 4));
	}

	
	function setMaskImgPct($n)
	{
		$this->mask_img_pct = (int)$n;
	}

	
	function setMaskTxtPct($n)
	{
		$this->mask_txt_pct = (int)$n;
	}

	
	function setDstImgBorder($size=1, $color="#000000")
	{
		$this->img_border_size  = (int)$size;
		$this->img_border_color = $color;
	}

	
	function flipH()
	{
		$this->_flip_x++;
	}

	
	function flipV()
	{
		$this->_flip_y++;
	}

	
	function setCutType($type)
	{
		$this->cut_type = (int)$type;
	}

	
	function setRectangleCut($width, $height)
	{
		$this->fill_w = (int)$width;
		$this->fill_h = (int)$height;
	}

	
	function setSrcCutPosition($x, $y)
	{
		$this->src_x  = (int)$x;
		$this->src_y  = (int)$y;
	}

	
	function createImg($a, $b=null)
	{
		$num = func_num_args();
		if(1 == $num)
		{
			$r = (int)$a;
			if($r < 1)
			{
				return false;
							}
			$this->img_scale = $r;
			$this->_setNewImgSize($r);
		}

		if(2 == $num)
		{
			$w = (int)$a;
			$h = (int)$b;
			if(0 == $w)
			{
				return false;
							}
			if(0 == $h)
			{
				return false;
							}
			$this->_setNewImgSize($w, $h);
		}

		if($this->_flip_x%2!=0)
		{
			$this->_flipH($this->h_src);
		}

		if($this->_flip_y%2!=0)
		{
			$this->_flipV($this->h_src);
		}
		
		if($this->_createMask()) {
			$this->_output();
		}

				if(@imagedestroy($this->h_src) && @imagedestroy($this->h_dst))
		{
			Return true;
		}
		else
		{
			Return false;
		}
	}

	
	function _createMask()
	{
		if($this->mask_word)
		{
						$this->_setFontInfo();

			if($this->_isFull())
			{
				
				return false;
			}
			else
			{
				$this->h_dst = imagecreatetruecolor($this->dst_w, $this->dst_h);
				$white = ImageColorAllocate($this->h_dst,255,255,255);
				imagefilledrectangle($this->h_dst,0,0,$this->dst_w,$this->dst_h,$white);				$this->_drawBorder();
				imagecopyresampled( $this->h_dst, $this->h_src,
				$this->start_x, $this->start_y,
				$this->src_x, $this->src_y,
				$this->fill_w, $this->fill_h,
				$this->copy_w, $this->copy_h);
				$this->_createMaskWord($this->h_dst);
			}
		}

		if($this->mask_img)
		{
			$this->_loadMaskImg();			if(false == $this->_checkMaskValid()) {
				return false;
			}

			if($this->_isFull())
			{
								$this->_createMaskImg($this->h_src);
				$this->h_dst = imagecreatetruecolor($this->dst_w, $this->dst_h);
				$white = ImageColorAllocate($this->h_dst,255,255,255);
				imagefilledrectangle($this->h_dst,0,0,$this->dst_w,$this->dst_h,$white);				$this->_drawBorder();
				imagecopyresampled( $this->h_dst, $this->h_src,
				$this->start_x, $this->start_y,
				$this->src_x, $this->src_y,
				$this->fill_w, $this->start_y,
				$this->copy_w, $this->copy_h);
			}
			else
			{
								$this->h_dst = imagecreatetruecolor($this->dst_w, $this->dst_h);
				$white = ImageColorAllocate($this->h_dst,255,255,255);
				imagefilledrectangle($this->h_dst,0,0,$this->dst_w,$this->dst_h,$white);				$this->_drawBorder();
				imagecopyresampled( $this->h_dst, $this->h_src,
				$this->start_x, $this->start_y,
				$this->src_x, $this->src_y,
				$this->fill_w, $this->fill_h,
				$this->copy_w, $this->copy_h);
				$this->_createMaskImg($this->h_dst);
			}
		}

		if(empty($this->mask_word) && empty($this->mask_img))
		{
			$this->h_dst = imagecreatetruecolor($this->dst_w, $this->dst_h);
			$white = ImageColorAllocate($this->h_dst,255,255,255);
			imagefilledrectangle($this->h_dst,0,0,$this->dst_w,$this->dst_h,$white);			$this->_drawBorder();

			imagecopyresampled( $this->h_dst, $this->h_src,
			$this->start_x, $this->start_y,
			$this->src_x, $this->src_y,
			$this->fill_w, $this->fill_h,
			$this->copy_w, $this->copy_h);
		}

		return true;
	}

	
	function _drawBorder()
	{
		if(!empty($this->img_border_size))
		{
			$c = $this->_parseColor($this->img_border_color);
			$color = ImageColorAllocate($this->h_src,$c[0], $c[1], $c[2]);
			imagefilledrectangle($this->h_dst,0,0,$this->dst_w,$this->dst_h,$color);		}
	}

	
	function _createMaskWord($src)
	{
		$this->_countMaskPos();
		$this->_checkMaskValid();

		$c = $this->_parseColor($this->mask_font_color);
		$color = imagecolorallocatealpha($src, $c[0], $c[1], $c[2], $this->mask_txt_pct);
				$c2 = $this->_parseColor('#999999');
		$color2 = imagecolorallocatealpha($src, $c2[0], $c2[1], $c2[2], $this->mask_txt_pct);

		if(is_numeric($this->font))
		{
			imagestring($src,
			$this->font,
			$this->mask_pos_x, $this->mask_pos_y,
			$this->mask_word,
			$color);
		}
		else
		{
			imagettftext($src,
			$this->font_size, 0,
			$this->mask_pos_x, $this->mask_pos_y,
			$color,
			$this->font,
			$this->mask_word);
						imagettftext($src,
			$this->font_size, 0,
			$this->mask_pos_x +0.5, $this->mask_pos_y +0.5,
			$color,
			$this->font,
			$this->mask_word);
						imagettftext($src,
			$this->font_size, 0,
			$this->mask_pos_x +1, $this->mask_pos_y +1,
			$color2,
			$this->font,
			$this->mask_word);
						if(isset($this->mask_word2))
			{
				imagettftext($src,
				$this->font_size, 0,
				$this->mask_pos_x, $this->mask_pos_y-$this->font_size-$this->font_size*0.2,
				$color,
				$this->font,
				$this->mask_word2);
			}
		}
	}

	
	function _createMaskImg($src)
	{
		$this->_countMaskPos();
		$this->_checkMaskValid();
		if($this->img_type)
		{
			imagecopy($src,
			$this->h_mask,
			$this->mask_pos_x ,$this->mask_pos_y,
			0, 0,
			$this->mask_w, $this->mask_h);
		}
		else
		{
			imagecopymerge($src,
			$this->h_mask,
			$this->mask_pos_x ,$this->mask_pos_y,
			0, 0,
			$this->mask_w, $this->mask_h,
			$this->mask_img_pct);
		}

		imagedestroy($this->h_mask);
	}

	
	function _loadMaskImg()
	{
		$mask_type = $this->_getImgType($this->mask_img);
		$this->_checkValid($mask_type);

				$src = '';
		if(function_exists("file_get_contents"))
		{
			$src = file_get_contents($this->mask_img);
		}
		else
		{
			$handle = fopen ($this->mask_img, "r");
			while (!feof ($handle))
			{
				$src .= fgets($handle, 4096);
			}
			fclose ($handle);
		}
		if(empty($this->mask_img))
		{
			return false;
					}
		$this->h_mask = ImageCreateFromString($src);
		$this->mask_w = $this->getImgWidth($this->h_mask);
		$this->mask_h = $this->getImgHeight($this->h_mask);
	}

	
	function _output()
	{
		$img_type  = $this->img_type;
		$func_name = $this->all_type[$img_type]['output'];
		if($this->h_dst && $this->dst_img && function_exists($func_name)) {			
						if('imagejpeg' == $func_name) {
				$func_name($this->h_dst, $this->dst_img, $this->img_create_quality);
			} else {
				$func_name($this->h_dst, $this->dst_img);
			}
		} else {
			Return false;
		}
	}

	
	function _parseColor($color)
	{
		$arr = array();
		for($ii=1; $ii<strlen($color); $ii++)
		{
			$arr[] = hexdec(substr($color,$ii,2));
			$ii++;
		}

		Return $arr;
	}

	
	function _countMaskPos()
	{
		if($this->_isFull())
		{
			switch($this->mask_position)
			{
				case 1:
										$this->mask_pos_x = $this->mask_offset_x + $this->img_border_size;
					$this->mask_pos_y = $this->mask_offset_y + $this->img_border_size + $this->font_offset_y;
					break;

				case 2:
										$this->mask_pos_x = $this->mask_offset_x + $this->img_border_size;
					$this->mask_pos_y = $this->src_h - $this->mask_h - $this->mask_offset_y;
					break;

				case 3:
										$this->mask_pos_x = $this->src_w - $this->mask_w - $this->mask_offset_x;
					$this->mask_pos_y = $this->mask_offset_y + $this->img_border_size + $this->font_offset_y;
					break;

				case 4:
										$this->mask_pos_x = $this->src_w - $this->mask_w - $this->mask_offset_x;
					$this->mask_pos_y = $this->src_h - $this->mask_h - $this->mask_offset_y;
					break;

				case 5:
										$this->mask_pos_x = rand(($this->mask_offset_x + $this->img_border_size),($this->dst_w - $this->mask_w - $this->mask_offset_x - $this->img_border_size));
					$this->mask_pos_y = rand(($this->mask_offset_y + $this->img_border_size),($this->dst_h - $this->mask_h - $this->mask_offset_y - $this->img_border_size));
					break;

				default:
										$this->mask_pos_x = $this->src_w - $this->mask_w - $this->mask_offset_x;
					$this->mask_pos_y = $this->src_h - $this->mask_h - $this->mask_offset_y;
					break;
			}
		}
		else
		{
			switch($this->mask_position)
			{
				case 1:
										$this->mask_pos_x = $this->mask_offset_x + $this->img_border_size;
					$this->mask_pos_y = $this->mask_offset_y + $this->img_border_size + $this->font_offset_y;
					break;

				case 2:
										$this->mask_pos_x = $this->mask_offset_x + $this->img_border_size;
					$this->mask_pos_y = $this->dst_h - $this->mask_h - $this->mask_offset_y - $this->img_border_size + $this->font_offset_y;
					break;

				case 3:
										$this->mask_pos_x = $this->dst_w - $this->mask_w - $this->mask_offset_x - $this->img_border_size;
					$this->mask_pos_y = $this->mask_offset_y + $this->img_border_size + $this->font_offset_y;
					break;

				case 4:
										$this->mask_pos_x = $this->dst_w - $this->mask_w - $this->mask_offset_x - $this->img_border_size;
					$this->mask_pos_y = $this->dst_h - $this->mask_h - $this->mask_offset_y - $this->img_border_size + $this->font_offset_y;
					break;

				case 5:
										$this->mask_pos_x = rand(($this->mask_offset_x + $this->img_border_size),($this->dst_w - $this->mask_w - $this->mask_offset_x - $this->img_border_size));
					$this->mask_pos_y = rand(($this->mask_offset_y + $this->img_border_size),($this->dst_h - $this->mask_h - $this->mask_offset_y - $this->img_border_size));
					break;

				default:
										$this->mask_pos_x = $this->dst_w - $this->mask_w - $this->mask_offset_x - $this->img_border_size;
					$this->mask_pos_y = $this->dst_h - $this->mask_h - $this->mask_offset_y - $this->img_border_size + $this->font_offset_y;
					break;
			}
		}
	}

	
	function _setFontInfo()
	{
		if(is_numeric($this->font))
		{
			$this->font_w  = imagefontwidth($this->font);
			$this->font_h  = imagefontheight($this->font);

						$word_length   = strlen($this->mask_word);
			$this->mask_w  = $this->font_w*$word_length;
			$this->mask_h  = $this->font_h;
		}
		else
		{
			$arr = imagettfbbox ($this->font_size,0, $this->font,$this->mask_word);
			$this->mask_w  = abs($arr[0] - $arr[2]);
			$this->mask_h  = abs($arr[7] - $arr[1]);
		}
	}

	
	function _setNewImgSize($img_w, $img_h=null)
	{
		$num = func_num_args();
		if(1 == $num)
		{
			$this->img_scale = $img_w;			$this->fill_w = round($this->src_w * $this->img_scale / 100) - $this->img_border_size*2;
			$this->fill_h = round($this->src_h * $this->img_scale / 100) - $this->img_border_size*2;

						$this->src_x  = 0;
			$this->src_y  = 0;
			$this->copy_w = $this->src_w;
			$this->copy_h = $this->src_h;

						$this->dst_w   = $this->fill_w + $this->img_border_size*2;
			$this->dst_h   = $this->fill_h + $this->img_border_size*2;
		}

		if(2 == $num)
		{
			$fill_w   = (int)$img_w - $this->img_border_size*2;
			$fill_h   = (int)$img_h - $this->img_border_size*2;
			if($fill_w < 0 || $fill_h < 0)
			{
				return false;
							}
			$rate_w = $this->src_w/$fill_w;
			$rate_h = $this->src_h/$fill_h;

			switch($this->cut_type)
			{
				case 0:
										if($rate_w < 1 && $rate_h < 1)
					{
						$this->fill_w = (int)$this->src_w;
						$this->fill_h = (int)$this->src_h;
					}
					else
					{
						if($rate_w >= $rate_h)
						{
							$this->fill_w = (int)$fill_w;
							$this->fill_h = round($this->src_h/$rate_w);
						}
						else
						{
							$this->fill_w = round($this->src_w/$rate_h);
							$this->fill_h = (int)$fill_h;
						}
					}

					$this->src_x  = 0;
					$this->src_y  = 0;

					$this->copy_w = $this->src_w;
					$this->copy_h = $this->src_h;

					
										$this->dst_w = $img_w + $this->img_border_size * 2;
					$this->dst_h = $img_h + $this->img_border_size * 2;
					$this->start_x = ($img_w - $this->fill_w) / 2;
					$this->start_y = ($img_h - $this->fill_h) / 2;
					return;
					break;

									case 1:
										if($rate_w >= 1 && $rate_h >=1)
					{
						if($this->src_w > $this->src_h)
						{
							$src_x = round($this->src_w-$this->src_h)/2;
							$this->setSrcCutPosition($src_x, 0);
							$this->setRectangleCut($fill_h, $fill_h);

							$this->copy_w = $this->src_h;
							$this->copy_h = $this->src_h;

						}
						elseif($this->src_w < $this->src_h)
						{
							$src_y = round($this->src_h-$this->src_w)/2;
							$this->setSrcCutPosition(0, $src_y);
							$this->setRectangleCut($fill_w, $fill_h);

							$this->copy_w = $this->src_w;
							$this->copy_h = $this->src_w;
						}
						else
						{
							$this->setSrcCutPosition(0, 0);
							$this->copy_w = $this->src_w;
							$this->copy_h = $this->src_w;
							$this->setRectangleCut($fill_w, $fill_h);
						}
					}
					else
					{
						$this->setSrcCutPosition(0, 0);
						$this->setRectangleCut($this->src_w, $this->src_h);

						$this->copy_w = $this->src_w;
						$this->copy_h = $this->src_h;
					}

										$this->dst_w   = $this->fill_w + $this->img_border_size*2;
					$this->dst_h   = $this->fill_h + $this->img_border_size*2;
					break;

									case 2:
					$this->copy_w = $this->fill_w;
					$this->copy_h = $this->fill_h;

										$this->dst_w   = $this->fill_w + $this->img_border_size*2;
					$this->dst_h   = $this->fill_h + $this->img_border_size*2;

					break;
				default:
					break;

			}
		}

				$this->start_x = $this->img_border_size;
		$this->start_y = $this->img_border_size;
	}

	
	function _isFull()
	{
		Return (   $this->mask_w + $this->mask_offset_x > $this->fill_w
		|| $this->mask_h + $this->mask_offset_y > $this->fill_h)
		?true:false;
	}

	
	function _checkMaskValid()
	{
		if($this->mask_w + $this->mask_offset_x > $this->src_w
		|| $this->mask_h + $this->mask_offset_y > $this->src_h)
		{
						return false;
		}
		return true;
	}

	
	function _getImgType($file_path)
	{
		$type_list = array("1"=>"gif","2"=>"jpg","3"=>"png","4"=>"swf","5" => "psd","6"=>"bmp","15"=>"wbmp");
		if(is_file($file_path))
		{
			$img_info = @getimagesize($file_path);
			if(isset($type_list[$img_info[2]]))
			{
				Return $type_list[$img_info[2]];
			}
		}
		else
		{
			return false;
					}
	}

	
	function _checkValid($img_type)
	{
		if(!array_key_exists($img_type, $this->all_type))
		{
			Return false;
		}
	}

	
	function _mkdirs($path)
	{
		$adir = explode('/',$path);
		$dirlist = '';
		$rootdir = array_shift($adir);
		if(($rootdir!='.'||$rootdir!='..')&&!is_dir($rootdir))
		{
			@mkdir($rootdir, 0777);
		}
		 
		foreach($adir as $key=>$val)
		{
			 
			if($val!='.'&&$val!='..')
			{
				$dirlist .= "/".$val;
				$dirpath = $rootdir.$dirlist;
				if(!is_dir($dirpath))
				{
					@mkdir($dirpath, 0777);
					@chmod($dirpath,0777);
				}
				 
			}
		}
	}

	
	function _flipV($src)
	{
		$src_x = $this->getImgWidth($src);
		$src_y = $this->getImgHeight($src);

		$new_im = imagecreatetruecolor($src_x, $src_y);
		for ($y = 0; $y < $src_y; $y++)
		{
			imagecopy($new_im, $src, 0, $src_y - $y - 1, 0, $y, $src_x, 1);
		}
		$this->h_src = $new_im;
	}

	
	function _flipH($src)
	{
		$src_x = $this->getImgWidth($src);
		$src_y = $this->getImgHeight($src);

		$new_im = imagecreatetruecolor($src_x, $src_y);
		for ($x = 0; $x < $src_x; $x++)
		{
			imagecopy($new_im, $src, $src_x - $x - 1, 0, $x, 0, 1, $src_y);
		}
		$this->h_src = $new_im;
	}
}

?>