<?php
/**
 * Tiny - A PHP Framework For Web Artisans
 * @author Tiny <tinylofty@gmail.com>
 * @copyright Copyright(c) 2010-2014 http://www.tinyrise.com All rights reserved
 * @version 1.0
 */
/**
 * 验证码图片生成
 * 
 * @author Tiny
 * @class Captcha
 */
class Captcha
{
    /** Width of the image */
    public $width  = 200;

    /** Height of the image */
    public $height = 70;

    /**
     * Path for resource files (fonts, words, etc.)
     * "resources" by default. For security reasons, is better move this
     * directory to another location outise the web server
     */

    /** Min word length (for non-dictionary random text generation) */
    public $minWordLength = 4;

    /**
     * Max word length (for non-dictionary random text generation)
     * Used for dictionary words indicating the word-length
     * for font-size modification purposes
     */
    public $maxWordLength = 5;

    /** Sessionname to store the original text */
    public $session_var = 'captcha';

    /** Background color in RGB-array */
    public $backgroundColor = array(255, 255, 255);

    /** Foreground colors in RGB-array */
    public $colors = array(
        array(27,78,181), // blue
        array(22,163,35), // green
        array(214,36,7),  // red
    );
    
    public $color = null;

    /** Shadow color in RGB-array or null */
    public $shadowColor = null; //array(0, 0, 0);

    public $fontSize    = 25;

    /**
     * Font configuration
     * - font: TTF file
     * - spacing: relative pixel space between character
     * - minSize: min font size
     * - maxSize: max font size
     */
    public $fonts = array(
       	'Time'    => array('spacing' => -1, 'minSize' => 28, 'maxSize' => 42, 'font' => 'font.ttf'),
    );

    /** Wave configuracion in X and Y axes */
    public $Yperiod    = 7;
    public $Yamplitude = 9;
    public $Xperiod    = 11;
    public $Xamplitude = 5;

    /** letter rotation clockwise */
    public $maxRotation = 8;

    /**
     * Internal image size factor (for better image quality)
     * 1: low, 2: medium, 3: high
     */
    public $scale = 3;

    /**
     * Blur effect for better image quality (but slower image processing).
     * Better image results with scale=3
     */
    public $blur = false;

    /** Debug? */
    public $debug = false;

    /** Image format: jpeg or png */
    public $imageFormat = 'jpeg';

    /** GD image */
    public $im;

    public function __construct($width=220,$height=70,$num=5,$bgcolor=array(255,255,255),$color=null)
    {
        $this->width =$width;
		$this->height = $height;
		$this->setBackColor($bgcolor);
        $this->setColor($color);
        $this->maxWordLength = $this->minWordLength = $num;
    }

	public function setBackColor($color)
	{
		if(is_array($color)) $this->backgroundColor = $color;
		else if(preg_match('/#[0-9A-Fa-f]{6}/',$color))
		{
			$this->backgroundColor =array(hexdec(substr($color,1,2)),hexdec(substr($color,3,2)),hexdec(substr($color,5,2)));
		}
	}
    public function setColor($color)
	{
		if(is_array($color)) $this->color = $color;
		else if(preg_match('/#[0-9A-Fa-f]{6}/',$color))
		{
			$this->color =array(hexdec(substr($color,1,2)),hexdec(substr($color,3,2)),hexdec(substr($color,5,2)));
		}
        else $this->color = $this->colors[mt_rand(0, sizeof($this->colors)-1)];
	}
    public function createImage(&$text='') {
        $ini = microtime(true);

        /** Initialization */
        $this->ImageAllocate();

        /** Text insertion */
        $text = $this->GetCaptchaText();
        $fontcfg  = $this->fonts[array_rand($this->fonts)];
        $this->WriteText($text, $fontcfg);

        /** Transformations */
        $this->WaveImage();
        if ($this->blur && function_exists('imagefilter'))
		{
            imagefilter($this->im, IMG_FILTER_GAUSSIAN_BLUR);
        }
        $this->ReduceImage();

        if ($this->debug)
		{
            imagestring($this->im, 1, 1, $this->height-8,
                "$text {$fontcfg['font']} ".round((microtime(true)-$ini)*1000)."ms",
                $this->GdFgColor
            );
        }


        /** Output */
        $this->WriteImage();
        $this->Cleanup();
    }

    /**
     * Creates the image resources
     */
    protected function ImageAllocate()
	{
        // Cleanup
        if (!empty($this->im))
		{
            imagedestroy($this->im);
        }

        $this->im = imagecreatetruecolor($this->width*$this->scale, $this->height*$this->scale);

        // Background color
        $this->GdBgColor = imagecolorallocate($this->im,
            $this->backgroundColor[0],
            $this->backgroundColor[1],
            $this->backgroundColor[2]
        );
        imagefilledrectangle($this->im, 0, 0, $this->width*$this->scale, $this->height*$this->scale, $this->GdBgColor);

        // Foreground color
        $color           = $this->color;//s[mt_rand(0, sizeof($this->colors)-1)];
        $this->GdFgColor = imagecolorallocate($this->im, $color[0], $color[1], $color[2]);

        // Shadow color
        if (!empty($this->shadowColor) && is_array($this->shadowColor) && sizeof($this->shadowColor) >= 3)
		{
            $this->GdShadowColor = imagecolorallocate($this->im,
                $this->shadowColor[0],
                $this->shadowColor[1],
                $this->shadowColor[2]
            );
        }
    }

    /**
     * Text generation
     *
     * @return string Text
     */
    protected function GetCaptchaText()
	{
        $text = $this->GetRandomCaptchaText();
        return $text;
    }

    /**
     * Random text generation
     * @return string Text
     */
    protected function GetRandomCaptchaText($length = null)
	{
        if (empty($length))
		{
            $length = rand($this->minWordLength, $this->maxWordLength);
        }
        
        $words  = "bcdfghjklmnpqrstuvwxyz";
        $vocals = "aeiou";

        $text  = "";
        $vocal = mt_rand(0, 1);
        for ($i=0; $i<$length; $i++)
		{
           if ($vocal)
			{
                $text .= substr($vocals, mt_rand(0, 4), 1);
            }
			else
			{
                $text .= substr($words, mt_rand(0, 21), 1);
            }
            $vocal = !$vocal;
        }
        return $text;
    }


    /**
     * Text insertion
     */
    protected function WriteText($text, $fontcfg = array())
	{
        if (empty($fontcfg))
		{
            // Select the font configuration
            $fontcfg  = $this->fonts[array_rand($this->fonts)];
        }

        // Full path of font file
        $fontfile = dirname(__FILE__).'/'.$fontcfg['font'];

        /** Increase font-size for shortest words: 9% for each glyp missing */
        $lettersMissing = $this->maxWordLength-strlen($text);
        $fontSizefactor = 1+($lettersMissing*0.09);

		//$fontspace = $this->width/strlen($text)-2;
		//$minSize = $fontspace;
		//$maxSize= $fontspace;

        // Text generation (char by char)
        $x      = 20*$this->scale;
        $y      = round(($this->height*0.78)*$this->scale);
        $length = strlen($text);
        for ($i=0; $i<$length; $i++)
		{
            $degree   = rand($this->maxRotation*-1, $this->maxRotation);
            $fontsize = rand($this->fontSize+1, $this->fontSize-1)*$this->scale*$fontSizefactor;
			//$fontsize = $maxSize*$this->scale*$fontSizefactor;
            $letter   = substr($text, $i, 1);

            if ($this->shadowColor)
			{
                $coords = imagettftext($this->im, $fontsize, $degree,
                    $x+$this->scale, $y+$this->scale,
                    $this->GdShadowColor, $fontfile, $letter);
            }
            $coords = imagettftext($this->im, $fontsize, $degree,
                $x, $y,
                $this->GdFgColor, $fontfile, $letter);
            $x += ($coords[2]-$x) + ($fontcfg['spacing']*$this->scale);
        }
    }

    /**
     * Wave filter
     */
    protected function WaveImage()
	{
        // X-axis wave generation
        $xp = $this->scale*$this->Xperiod*rand(1,3);
        $k = rand(0, 100);
        for ($i = 0; $i < ($this->width*$this->scale); $i++)
		{
            imagecopy($this->im, $this->im,
                $i-1, sin($k+$i/$xp) * ($this->scale*$this->Xamplitude),
                $i, 0, 1, $this->height*$this->scale);
        }

        // Y-axis wave generation
        $k = rand(0, 100);
        $yp = $this->scale*$this->Yperiod*rand(1,2);
        for ($i = 0; $i < ($this->height*$this->scale); $i++)
		{
            imagecopy($this->im, $this->im,
                sin($k+$i/$yp) * ($this->scale*$this->Yamplitude), $i-1,
                0, $i, $this->width*$this->scale, 1);
        }
    }

    /**
     * Reduce the image to the final size
     */
    protected function ReduceImage()
	{
        $imResampled = imagecreatetruecolor($this->width, $this->height);
        imagecopyresampled($imResampled, $this->im,
            0, 0, 0, 0,
            $this->width, $this->height,
            $this->width*$this->scale, $this->height*$this->scale
        );
        imagedestroy($this->im);
        $this->im = $imResampled;
    }

    /**
     * File generation
     */
    protected function WriteImage()
	{
        if ($this->imageFormat == 'png' && function_exists('imagepng'))
		{
            header("Content-type: image/png");
            imagepng($this->im);
        }
		else
		{
            header("Content-type: image/jpeg");
            imagejpeg($this->im, null, 90);
        }
    }

    /**
     * Cleanup
     */
    protected function Cleanup()
	{
        imagedestroy($this->im);
    }
}
?>
