/tools/captcha/captchac_code.php

<?php



// -------------------------------------------------------------------------------------

// Captcha Creator PHP Image Displaying Script.

// Copyright (c) 2007 Alexandru Marias. All rights reserved

// Web: http://www.captchacreator.com

// Phone: +40722486348

// ----------------------------------------------------------------



// Define the characters that can make up the Turing string

// Mixed-case is apparently a bit of a problem,

// so lets pick one or the other



include_once('captchac_config.php'); // Security functions

include_once('captchac_lib.php'); // Security functions



session_start();



$turing = RandomCode($CMinSize,$CMaxSize);



// Put it in session

$_SESSION['turing_string'] = $turing;

                   

switch ($captcha_type) {

case 1:

    

if ($CFontUsed == 1 ) {

$i=0;

if ($handle = opendir($fonts_dir)) 

	{

    	while (false !== ($file = readdir($handle))) 

        	if ($file != "." && $file != "..") {

            	$fontl[$i] = $fonts_dir . '/' . $file;

		$i++;

        	}   

	closedir($handle);

    	}

$FontsNo=$i;



$fontno = mt_rand(0,$FontsNo-1);

$font = $fontl[$fontno];

}

	else $font = $CFontURL;

                 

/* initialize variables */



$length = strlen($turing);

$data = array();

$image_width = $image_height = 0;





/* build the data array of the characters, size, placement, etc. */



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



  $char = substr($turing, $i, 1);



  $size = mt_rand($CFontSizeMin, $CFontSizeMax);

  $angle = mt_rand($CFontRotMin, $CFontRotMax);



  $bbox = ImageTTFBBox( $size, $angle, $font, $char );



  $char_width = max($bbox[2], $bbox[4]) - min($bbox[0], $bbox[6]);

  $char_height = max($bbox[1], $bbox[3]) - min($bbox[7], $bbox[5]);



  $image_width += $char_width + $CFontPadding;

  $image_height = max($image_height, $char_height);



  $data[] = array(

    'char'    => $char,

    'size'    => $size,

    'angle'    => $angle,

    'height'  => $char_height,

    'width'    => $char_width,

  );

}



/* calculate the final image size, adding some padding */



$x_padding = 12;



if ( $CSize == 1 )

	{

	$image_width += ($x_padding * 2);

	$image_height = ($image_height * 1.5) + 2;

	}

   else {

	$image_width = $CSizeWidth;

	$image_height = $CSizeHeight;

	}





/* build the image, and allocte the colors */



$im = ImageCreate($image_width, $image_height);

$cs = mt_rand(1,3);



if ($CBackgroundType == 2)

	{

	$r = hexdec(substr($CBackgroundColor,1,2));

	$g = hexdec(substr($CBackgroundColor,3,2));

	$b = hexdec(substr($CBackgroundColor,5,2));

	}



else

	{



$d1 = $d2 = $d3 = 0;

while ( ($d1<50) AND ($d2<50) AND ($d3<50) )

	{

	$r = mt_rand(200,255);

	$g = mt_rand(200,255);

	$b = mt_rand(200,255);



	$d1 = abs($r-$g);

	$d2 = abs($r-$b);

	$d3 = abs($g-$b);

	}

	}



$color_bg    = ImageColorAllocate($im, $r, $g, $b );



$color_border  = ImageColorAllocate($im, round($r/2), round($g/2), round($b/2));



$color_line0  = ImageColorAllocate($im, round($r*0.85), round($g*0.85), round($b*0.85) );



$color_elipse0  = ImageColorAllocate($im, round($r*0.95), round($g*0.95), round($b*0.95) );

$color_elipse1  = ImageColorAllocate($im, round($r*0.90), round($g*0.90), round($b*0.90) );



	$d1 = mt_rand(0,50);

	$d2 = mt_rand(0,50);

	$d3 = mt_rand(0,50);



$color_line1  = ImageColorAllocate($im, $r-$d1, $g-$d2, $b-$d3 );



$d1 = $d2 = $d3 = 0;

while ( ($d1<100) AND ($d2<100) AND (d3<100) )

	{

	$r = mt_rand(0,150);

	$g = mt_rand(0,150);

	$b = mt_rand(0,150);



	$d1 = abs($r-$g);

	$d2 = abs($r-$b);

	$d3 = abs($g-$b);

	}



switch ( $CFontColorType ) 

	{

	case 1 : $color_text    = ImageColorAllocate($im, $r, $g, $b );

		break;

	case 2 : $color_text    = ImageColorAllocate($im, 0, 0, 0 );

		break;

	case 3 : $color_text    = ImageColorAllocate($im, 255, 255, 255 );

		break;

	case 4 : $color_text    = ImageColorAllocate($im, $color_text_r, $color_text_g, $color_text_b );

		break;

	}



$noiset = mt_rand(1,2);



if ( $CBackgroundType == 1 )

	{



switch ($noiset) {

	case '1' :

		/* make the random background elipses */

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



  		$c = 'color_elipse' . ($l%2);



		$cx = mt_rand(0, $image_width);

  		$cy = mt_rand(0, $image_width);

  		$rx = mt_rand(10, $image_width);

  		$ry = mt_rand(10, $image_width);



		ImageFilledEllipse($im, $cx, $cy, $rx, $ry, $$c );

  		}; break;

	case '2' :

		/* make the random background lines */

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



		$c = 'color_line' . ($l%2);



 	  	$lx = mt_rand(0, $image_width+$image_height);

  		$lw = mt_rand(0,3);

  		if ($lx > $image_width) {

    		  $lx -= $image_width;

    		  ImageFilledRectangle($im, 0, $lx, $image_width-1, $lx+$lw, $c );

  		   } else ImageFilledRectangle($im, $lx, 0, $lx+$lw, $image_height-1, $c );

  		}; break;

	} // end switch  



	}



if ( $CBackgroundType == 0 )

	{

  	$image_data=getimagesize($CBackgroundFile);



  	$image_type=$image_data[2];



  	if($image_type==1) $img_src=imagecreatefromgif($CBackgroundFile);

  	elseif($image_type==2) $img_src=imagecreatefromjpeg($CBackgroundFile);

  	elseif($image_type==3) $img_src=imagecreatefrompng($CBackgroundFile);



		if ( $CBackgroundFillType == 1 ) {

					  imagesettile($im,$img_src);

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

					}

		else imagecopyresampled($im,$img_src,0,0,0,0,$image_width,$image_height,$image_data[0],$image_data[1]);

	

	}



/* output each character */



$pos_x = $x_padding + ($CFontPadding / 2);

foreach($data as $d) {



  $pos_y = ( ( $image_height + $d['height'] ) / 2 );

  ImageTTFText($im, $d['size'], $d['angle'], $pos_x, $pos_y, $color_text, $font, $d['char'] );



  $pos_x += $d['width'] + $CFontPadding;



}

/*

  $sr = array('68', '101', '109', '111', '32', '86', '101', '114', '115', '105', '111', '110');



for ($i=0;$i<=count($sr);$i++)

  ImageTTFText($im, 12, 0, 10+ ($i*10), 10, $color_text, $font, chr($sr[$i]) );



*/

/* a nice border */



ImageRectangle($im, 0, 0, $image_width-1, $image_height-1, $color_border);



/* display it */

  

switch ($output_type) {

 case 'jpeg':

  Header('Content-type: image/jpeg');

  ImageJPEG($im,NULL,100);

  break;



 case 'png':

 default:

  Header('Content-type: image/png');

  ImagePNG($im);

  break;

}

ImageDestroy($im);



break;



case 2:



break;



}



session_write_close();





?>