<?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

    $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]; // seleciona a fonte
    // 28, 29, 32
    }
        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 = 8;

    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');
    //    $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();

    ?>