/ThinkPHP/Extend/Engine/Cluster/DefaultApp/Lib/ORG/Image.class.php

<?php

// +----------------------------------------------------------------------

// | ThinkPHP [ WE CAN DO IT JUST THINK IT ]

// +----------------------------------------------------------------------

// | Copyright (c) 2009 http://thinkphp.cn All rights reserved.

// +----------------------------------------------------------------------

// | Licensed ( http://www.apache.org/licenses/LICENSE-2.0 )

// +----------------------------------------------------------------------

// | Author: liu21st <liu21st@gmail.com>

// +----------------------------------------------------------------------



/**

 * 图像操作类库

 * @category   ORG

 * @package  ORG

 * @subpackage  Util

 * @author    liu21st <liu21st@gmail.com>

 */

class Image {



    /**

     * 取得图像信息

     * @static

     * @access public

     * @param string $image 图像文件名

     * @return mixed

     */



    static function getImageInfo($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;

        }

    }



    /**

     * 为图片添加水印

     * @static public

     * @param string $source 原文件名

     * @param string $water  水印图片

     * @param string $$savename  添加水印后的图片名

     * @param string $alpha  水印的透明度

     * @return void

     */

    static public function water($source, $water, $savename=null, $alpha=80,$get_source=true) {

		//[cluster] 

		if($get_source){

			$source_tmp_name=tempnam(sys_get_temp_dir(),'tp_');

			file_put_contents($source_tmp_name,file_get($source));

			$origin_savename=is_null($savename)?$source:$savename;

			$source=$source_tmp_name;

		}

        //检查文件是否存在

        if (!file_exists($source) || !file_exists($water))

            return false;



        //图片信息

        $sInfo = self::getImageInfo($source);

        $wInfo = self::getImageInfo($water);



        //如果图片小于水印图片，不生成图片

        if ($sInfo["width"] < $wInfo["width"] || $sInfo['height'] < $wInfo['height'])

            return false;



        //建立图像

        $sCreateFun = "imagecreatefrom" . $sInfo['type'];

        $sImage = $sCreateFun($source);

        $wCreateFun = "imagecreatefrom" . $wInfo['type'];

        $wImage = $wCreateFun($water);



        //设定图像的混色模式

        imagealphablending($wImage, true);



        //图像位置,默认为右下角右对齐

        $posY = $sInfo["height"] - $wInfo["height"];

        $posX = $sInfo["width"] - $wInfo["width"];



        //生成混合图像

        imagecopymerge($sImage, $wImage, $posX, $posY, 0, 0, $wInfo['width'], $wInfo['height'], $alpha);



        //输出图像

        $ImageFun = 'Image' . $sInfo['type'];

        //如果没有给出保存文件名，默认为原图像名

        if (!$savename) {

            $savename = $source;

            @unlink($source);

        }elseif($get_source){

			//[cluster] 临时保存文件

			$savename=tempnam(sys_get_temp_dir(),'tp_');

			@unlink($source);

		}

        //保存图像

        $ImageFun($sImage, $savename);

        imagedestroy($sImage);

		//[cluster] 上传文件

		if($get_source){

			file_upload($savename,$origin_savename);

			@unlink($savename);

		}

    }



    function showImg($imgFile, $text='', $x='10', $y='10', $alpha='50') {

        //获取图像文件信息

        //2007/6/26 增加图片水印输出，$text为图片的完整路径即可

        $info = Image::getImageInfo($imgFile);

        if ($info !== false) {

            $createFun = str_replace('/', 'createfrom', $info['mime']);

            $im = $createFun($imgFile);

            if ($im) {

                $ImageFun = str_replace('/', '', $info['mime']);

                //水印开始

                if (!empty($text)) {

                    $tc = imagecolorallocate($im, 0, 0, 0);

                    if (is_file($text) && file_exists($text)) {//判断$text是否是图片路径

                        // 取得水印信息

                        $textInfo = Image::getImageInfo($text);

                        $createFun2 = str_replace('/', 'createfrom', $textInfo['mime']);

                        $waterMark = $createFun2($text);

                        //$waterMark=imagecolorallocatealpha($text,255,255,0,50);

                        $imgW = $info["width"];

                        $imgH = $info["width"] * $textInfo["height"] / $textInfo["width"];

                        //$y	=	($info["height"]-$textInfo["height"])/2;

                        //设置水印的显示位置和透明度支持各种图片格式

                        imagecopymerge($im, $waterMark, $x, $y, 0, 0, $textInfo['width'], $textInfo['height'], $alpha);

                    } else {

                        imagestring($im, 80, $x, $y, $text, $tc);

                    }

                    //ImageDestroy($tc);

                }

                //水印结束

                if ($info['type'] == 'png' || $info['type'] == 'gif') {

                    imagealphablending($im, FALSE); //取消默认的混色模式

                    imagesavealpha($im, TRUE); //设定保存完整的 alpha 通道信息

                }

                Header("Content-type: " . $info['mime']);

                $ImageFun($im);

                @ImageDestroy($im);

                return;

            }



            //保存图像

            $ImageFun($sImage, $savename);

            imagedestroy($sImage);

            //获取或者创建图像文件失败则生成空白PNG图片

            $im = imagecreatetruecolor(80, 30);

            $bgc = imagecolorallocate($im, 255, 255, 255);

            $tc = imagecolorallocate($im, 0, 0, 0);

            imagefilledrectangle($im, 0, 0, 150, 30, $bgc);

            imagestring($im, 4, 5, 5, "no pic", $tc);

            Image::output($im);

            return;

        }

    }



    /**

     * 生成缩略图

     * @static

     * @access public

     * @param string $image  原图

     * @param string $type 图像格式

     * @param string $thumbname 缩略图文件名

     * @param string $maxWidth  宽度

     * @param string $maxHeight  高度

     * @param string $position 缩略图保存目录

     * @param boolean $interlace 启用隔行扫描

     * @return void

     */

    static function thumb($image, $thumbname, $type='', $maxWidth=200, $maxHeight=50, $interlace=true) {

        // 获取原图信息

        $info = Image::getImageInfo($image);

        if ($info !== false) {

            $srcWidth = $info['width'];

            $srcHeight = $info['height'];

            $type = empty($type) ? $info['type'] : $type;

            $type = strtolower($type);

            $interlace = $interlace ? 1 : 0;

            unset($info);

            $scale = min($maxWidth / $srcWidth, $maxHeight / $srcHeight); // 计算缩放比例

            if ($scale >= 1) {

                // 超过原图大小不再缩略

                $width = $srcWidth;

                $height = $srcHeight;

            } else {

                // 缩略图尺寸

                $width = (int) ($srcWidth * $scale);

                $height = (int) ($srcHeight * $scale);

            }



            // 载入原图

            $createFun = 'ImageCreateFrom' . ($type == 'jpg' ? 'jpeg' : $type);

            if(!function_exists($createFun)) {

                return false;

            }

            $srcImg = $createFun($image);



            //创建缩略图

            if ($type != 'gif' && function_exists('imagecreatetruecolor'))

                $thumbImg = imagecreatetruecolor($width, $height);

            else

                $thumbImg = imagecreate($width, $height);

              //png和gif的透明处理 by luofei614

            if('png'==$type){

                imagealphablending($thumbImg, false);//取消默认的混色模式（为解决阴影为绿色的问题）

                imagesavealpha($thumbImg,true);//设定保存完整的 alpha 通道信息（为解决阴影为绿色的问题）    

            }elseif('gif'==$type){

                $trnprt_indx = imagecolortransparent($srcImg);

                 if ($trnprt_indx >= 0) {

                        //its transparent

                       $trnprt_color = imagecolorsforindex($srcImg , $trnprt_indx);

                       $trnprt_indx = imagecolorallocate($thumbImg, $trnprt_color['red'], $trnprt_color['green'], $trnprt_color['blue']);

                       imagefill($thumbImg, 0, 0, $trnprt_indx);

                       imagecolortransparent($thumbImg, $trnprt_indx);

              }

            }

            // 复制图片

            if (function_exists("ImageCopyResampled"))

                imagecopyresampled($thumbImg, $srcImg, 0, 0, 0, 0, $width, $height, $srcWidth, $srcHeight);

            else

                imagecopyresized($thumbImg, $srcImg, 0, 0, 0, 0, $width, $height, $srcWidth, $srcHeight);



            // 对jpeg图形设置隔行扫描

            if ('jpg' == $type || 'jpeg' == $type)

                imageinterlace($thumbImg, $interlace);



            // 生成图片

            $imageFun = 'image' . ($type == 'jpg' ? 'jpeg' : $type);

            $imageFun($thumbImg, $thumbname);

            imagedestroy($thumbImg);

            imagedestroy($srcImg);

            return $thumbname;

        }

        return false;

    }



    /**

     * 根据给定的字符串生成图像

     * @static

     * @access public

     * @param string $string  字符串

     * @param string $size  图像大小 width,height 或者 array(width,height)

     * @param string $font  字体信息 fontface,fontsize 或者 array(fontface,fontsize)

     * @param string $type 图像格式 默认PNG

     * @param integer $disturb 是否干扰 1 点干扰 2 线干扰 3 复合干扰 0 无干扰

     * @param bool $border  是否加边框 array(color)

     * @return string

     */

    static function buildString($string, $rgb=array(), $filename='', $type='png', $disturb=1, $border=true) {

        if (is_string($size))

            $size = explode(',', $size);

        $width = $size[0];

        $height = $size[1];

        if (is_string($font))

            $font = explode(',', $font);

        $fontface = $font[0];

        $fontsize = $font[1];

        $length = strlen($string);

        $width = ($length * 9 + 10) > $width ? $length * 9 + 10 : $width;

        $height = 22;

        if ($type != 'gif' && function_exists('imagecreatetruecolor')) {

            $im = @imagecreatetruecolor($width, $height);

        } else {

            $im = @imagecreate($width, $height);

        }

        if (empty($rgb)) {

            $color = imagecolorallocate($im, 102, 104, 104);

        } else {

            $color = imagecolorallocate($im, $rgb[0], $rgb[1], $rgb[2]);

        }

        $backColor = imagecolorallocate($im, 255, 255, 255);    //背景色（随机）

        $borderColor = imagecolorallocate($im, 100, 100, 100);                    //边框色

        $pointColor = imagecolorallocate($im, mt_rand(0, 255), mt_rand(0, 255), mt_rand(0, 255));                 //点颜色



        @imagefilledrectangle($im, 0, 0, $width - 1, $height - 1, $backColor);

        @imagerectangle($im, 0, 0, $width - 1, $height - 1, $borderColor);

        @imagestring($im, 5, 5, 3, $string, $color);

        if (!empty($disturb)) {

            // 添加干扰

            if ($disturb = 1 || $disturb = 3) {

                for ($i = 0; $i < 25; $i++) {

                    imagesetpixel($im, mt_rand(0, $width), mt_rand(0, $height), $pointColor);

                }

            } elseif ($disturb = 2 || $disturb = 3) {

                for ($i = 0; $i < 10; $i++) {

                    imagearc($im, mt_rand(-10, $width), mt_rand(-10, $height), mt_rand(30, 300), mt_rand(20, 200), 55, 44, $pointColor);

                }

            }

        }

        Image::output($im, $type, $filename);

    }



    /**

     * 生成图像验证码

     * @static

     * @access public

     * @param string $length  位数

     * @param string $mode  类型

     * @param string $type 图像格式

     * @param string $width  宽度

     * @param string $height  高度

     * @return string

     */

    static function buildImageVerify($length=4, $mode=1, $type='png', $width=48, $height=22, $verifyName='verify') {

        import('ORG.Util.String');

        $randval = String::randString($length, $mode);

        session($verifyName, md5($randval));

        $width = ($length * 10 + 10) > $width ? $length * 10 + 10 : $width;

        if ($type != 'gif' && function_exists('imagecreatetruecolor')) {

            $im = imagecreatetruecolor($width, $height);

        } else {

            $im = imagecreate($width, $height);

        }

        $r = Array(225, 255, 255, 223);

        $g = Array(225, 236, 237, 255);

        $b = Array(225, 236, 166, 125);

        $key = mt_rand(0, 3);



        $backColor = imagecolorallocate($im, $r[$key], $g[$key], $b[$key]);    //背景色（随机）

        $borderColor = imagecolorallocate($im, 100, 100, 100);                    //边框色

        imagefilledrectangle($im, 0, 0, $width - 1, $height - 1, $backColor);

        imagerectangle($im, 0, 0, $width - 1, $height - 1, $borderColor);

        $stringColor = imagecolorallocate($im, mt_rand(0, 200), mt_rand(0, 120), mt_rand(0, 120));

        // 干扰

        for ($i = 0; $i < 10; $i++) {

            imagearc($im, mt_rand(-10, $width), mt_rand(-10, $height), mt_rand(30, 300), mt_rand(20, 200), 55, 44, $stringColor);

        }

        for ($i = 0; $i < 25; $i++) {

            imagesetpixel($im, mt_rand(0, $width), mt_rand(0, $height), $stringColor);

        }

        for ($i = 0; $i < $length; $i++) {

            imagestring($im, 5, $i * 10 + 5, mt_rand(1, 8), $randval{$i}, $stringColor);

        }

        Image::output($im, $type);

    }



    // 中文验证码

    static function GBVerify($length=4, $type='png', $width=180, $height=50, $fontface='simhei.ttf', $verifyName='verify') {

        import('ORG.Util.String');

        $code = String::randString($length, 4);

        $width = ($length * 45) > $width ? $length * 45 : $width;

        session($verifyName, md5($code));

        $im = imagecreatetruecolor($width, $height);

        $borderColor = imagecolorallocate($im, 100, 100, 100);                    //边框色

        $bkcolor = imagecolorallocate($im, 250, 250, 250);

        imagefill($im, 0, 0, $bkcolor);

        @imagerectangle($im, 0, 0, $width - 1, $height - 1, $borderColor);

        // 干扰

        for ($i = 0; $i < 15; $i++) {

            $fontcolor = imagecolorallocate($im, mt_rand(0, 255), mt_rand(0, 255), mt_rand(0, 255));

            imagearc($im, mt_rand(-10, $width), mt_rand(-10, $height), mt_rand(30, 300), mt_rand(20, 200), 55, 44, $fontcolor);

        }

        for ($i = 0; $i < 255; $i++) {

            $fontcolor = imagecolorallocate($im, mt_rand(0, 255), mt_rand(0, 255), mt_rand(0, 255));

            imagesetpixel($im, mt_rand(0, $width), mt_rand(0, $height), $fontcolor);

        }

        if (!is_file($fontface)) {

            $fontface = dirname(__FILE__) . "/" . $fontface;

        }

        for ($i = 0; $i < $length; $i++) {

            $fontcolor = imagecolorallocate($im, mt_rand(0, 120), mt_rand(0, 120), mt_rand(0, 120)); //这样保证随机出来的颜色较深。

            $codex = String::msubstr($code, $i, 1);

            imagettftext($im, mt_rand(16, 20), mt_rand(-60, 60), 40 * $i + 20, mt_rand(30, 35), $fontcolor, $fontface, $codex);

        }

        Image::output($im, $type);

    }



    /**

     * 把图像转换成字符显示

     * @static

     * @access public

     * @param string $image  要显示的图像

     * @param string $type  图像类型，默认自动获取

     * @return string

     */

    static function showASCIIImg($image, $string='', $type='') {

        $info = Image::getImageInfo($image);

        if ($info !== false) {

            $type = empty($type) ? $info['type'] : $type;

            unset($info);

            // 载入原图

            $createFun = 'ImageCreateFrom' . ($type == 'jpg' ? 'jpeg' : $type);

            $im = $createFun($image);

            $dx = imagesx($im);

            $dy = imagesy($im);

            $i = 0;

            $out = '<span style="padding:0px;margin:0;line-height:100%;font-size:1px;">';

            set_time_limit(0);

            for ($y = 0; $y < $dy; $y++) {

                for ($x = 0; $x < $dx; $x++) {

                    $col = imagecolorat($im, $x, $y);

                    $rgb = imagecolorsforindex($im, $col);

                    $str = empty($string) ? '*' : $string[$i++];

                    $out .= sprintf('<span style="margin:0px;color:#%02x%02x%02x">' . $str . '</span>', $rgb['red'], $rgb['green'], $rgb['blue']);

                }

                $out .= "<br>\n";

            }

            $out .= '</span>';

            imagedestroy($im);

            return $out;

        }

        return false;

    }



    /**

     * 生成UPC-A条形码

     * @static

     * @param string $type 图像格式

     * @param string $type 图像格式

     * @param string $lw  单元宽度

     * @param string $hi   条码高度

     * @return string

     */

    static function UPCA($code, $type='png', $lw=2, $hi=100) {

        static $Lencode = array('0001101', '0011001', '0010011', '0111101', '0100011',

    '0110001', '0101111', '0111011', '0110111', '0001011');

        static $Rencode = array('1110010', '1100110', '1101100', '1000010', '1011100',

    '1001110', '1010000', '1000100', '1001000', '1110100');

        $ends = '101';

        $center = '01010';

        /* UPC-A Must be 11 digits, we compute the checksum. */

        if (strlen($code) != 11) {

            die("UPC-A Must be 11 digits.");

        }

        /* Compute the EAN-13 Checksum digit */

        $ncode = '0' . $code;

        $even = 0;

        $odd = 0;

        for ($x = 0; $x < 12; $x++) {

            if ($x % 2) {

                $odd += $ncode[$x];

            } else {

                $even += $ncode[$x];

            }

        }

        $code.= ( 10 - (($odd * 3 + $even) % 10)) % 10;

        /* Create the bar encoding using a binary string */

        $bars = $ends;

        $bars.=$Lencode[$code[0]];

        for ($x = 1; $x < 6; $x++) {

            $bars.=$Lencode[$code[$x]];

        }

        $bars.=$center;

        for ($x = 6; $x < 12; $x++) {

            $bars.=$Rencode[$code[$x]];

        }

        $bars.=$ends;

        /* Generate the Barcode Image */

        if ($type != 'gif' && function_exists('imagecreatetruecolor')) {

            $im = imagecreatetruecolor($lw * 95 + 30, $hi + 30);

        } else {

            $im = imagecreate($lw * 95 + 30, $hi + 30);

        }

        $fg = ImageColorAllocate($im, 0, 0, 0);

        $bg = ImageColorAllocate($im, 255, 255, 255);

        ImageFilledRectangle($im, 0, 0, $lw * 95 + 30, $hi + 30, $bg);

        $shift = 10;

        for ($x = 0; $x < strlen($bars); $x++) {

            if (($x < 10) || ($x >= 45 && $x < 50) || ($x >= 85)) {

                $sh = 10;

            } else {

                $sh = 0;

            }

            if ($bars[$x] == '1') {

                $color = $fg;

            } else {

                $color = $bg;

            }

            ImageFilledRectangle($im, ($x * $lw) + 15, 5, ($x + 1) * $lw + 14, $hi + 5 + $sh, $color);

        }

        /* Add the Human Readable Label */

        ImageString($im, 4, 5, $hi - 5, $code[0], $fg);

        for ($x = 0; $x < 5; $x++) {

            ImageString($im, 5, $lw * (13 + $x * 6) + 15, $hi + 5, $code[$x + 1], $fg);

            ImageString($im, 5, $lw * (53 + $x * 6) + 15, $hi + 5, $code[$x + 6], $fg);

        }

        ImageString($im, 4, $lw * 95 + 17, $hi - 5, $code[11], $fg);

        /* Output the Header and Content. */

        Image::output($im, $type);

    }



    static function output($im, $type='png', $filename='') {

        header("Content-type: image/" . $type);

        $ImageFun = 'image' . $type;

        if (empty($filename)) {

            $ImageFun($im);

        } else {

            $ImageFun($im, $filename);

        }

        imagedestroy($im);

    }



}