<?php

// -----------------------------------------------
// Cryptographp v1.2
// (c) 2006 Sylvain BRISON
//
// www.cryptographp.com
// cryptographp@alphpa.com
//
// Licence CeCILL (Voir Licence_CeCILL_V2-fr.txt)
//
// 19/08/2006: Adaptation pour Phortail 2.0 (phortail.free.fr)
// - Support des noms de session personnalisés
// - Test du support des sessions (au lieu de celui des cookies)
// - Correction des variables de session non initialisées
// - Utilisation de mt_rand() au lieu de rand() pour la génération du code
//
// 25/10/2006: Intégration de certaines améliorations de Cryptographp v1.3
//
// -----------------------------------------------

include_once("../../include/fonctions.php");

$cryptsessionname = "";

// N'accepte que les fichiers de config du même répertoire
if (isset($_GET['config']) and is_file($_GET['config']) and dirname($_GET['config']) == '.' and
  preg_match('/^[\w-.]+\.php$/', $_GET['config'])) require($_GET['config']);
else require("config.inc.php");

if (empty($cryptsessionname)) $cryptsessionname = "PHPSESSID";

demarrer_session($cryptsessionname);  // Nom du cookie de session

// Vérifie si les sessions sont supportées

if (!isset($_SESSION['cryptsessiontest'])) {
  header("Content-type: image/png");
  readfile('images/erreur3.png');
  exit;
}

// Vérifie si l'utilisateur a le droit de (re)générer un cryptogramme

if (!isset($_SESSION['cryptcptuse'])) $_SESSION['cryptcptuse'] = 0;

if ($_SESSION['cryptcptuse'] >= $cryptusemax) {
  header("Content-type: image/png");
  readfile('images/erreur1.png');
  exit;
}

if (isset($_SESSION['crypttime'])) {
  $delai = time()-$_SESSION['crypttime'];
  if ($delai < $cryptusetimer) {
     switch ($cryptusertimererror) {
            case 2  : header("Content-type: image/png");
                      readfile('images/erreur2.png');
                      exit;
            case 3  : sleep ($cryptusetimer-$delai);
                      break; // Fait une pause
            case 1  :
            default : exit;  // Quitte le script sans rien faire
            }
     }
}

// Création du cryptogramme temporaire

$imgtmp = imagecreatetruecolor($cryptwidth,$cryptheight);
$blank  = imagecolorallocate($imgtmp,255,255,255);
$black   = imagecolorallocate($imgtmp,0,0,0);
imagefill($imgtmp,0,0,$blank);

$word ='';
$x = 10;
$pair = rand(0,1);
$charnb = rand($charnbmin,$charnbmax);
for ($i=1;$i<= $charnb;$i++) {
     $tword[$i]['font'] =  $tfont[array_rand($tfont,1)];
     $tword[$i]['angle'] = (rand(1,2)==1)?rand(0,$charanglemax):rand(360-$charanglemax,360);

     if ($crypteasy) $tword[$i]['element'] =(!$pair)?$charelc{mt_rand(0,strlen($charelc)-1)}:$charelv{mt_rand(0,strlen($charelv)-1)};
        else $tword[$i]['element'] = $charel{mt_rand(0,strlen($charel)-1)};

     $pair=!$pair;
     $tword[$i]['size'] = rand($charsizemin,$charsizemax);
     $tword[$i]['y'] = ($charup?($cryptheight/2)+rand(0,($cryptheight/5)):($cryptheight/1.5));
     $word .=$tword[$i]['element'];
     imagettftext($imgtmp,$tword[$i]['size'],$tword[$i]['angle'],$x,$tword[$i]['y'],$black,$tword[$i]['font'],$tword[$i]['element']);
     $x +=$charspace;
     }

// Calcul du recadrage horizontal du cryptogramme temporaire

$xbegin=0;
$x=0;
while (($x<$cryptwidth)and(!$xbegin)) {
     $y=0;
     while (($y<$cryptheight)and(!$xbegin)) {
           if (imagecolorat($imgtmp,$x,$y) != $blank) $xbegin = $x;
           $y++;
           }
     $x++;
     }

$xend=0;
$x=$cryptwidth-1;
while (($x>0)and(!$xend)) {
     $y=0;
     while (($y<$cryptheight)and(!$xend)) {
           if (imagecolorat($imgtmp,$x,$y) != $blank) $xend = $x;
           $y++;
           }
     $x--;
     }

$xvariation = round(($cryptwidth/2)-(($xend-$xbegin)/2));
imagedestroy ($imgtmp);


// Création du cryptogramme définitif

// Création du fond

$img = imagecreatetruecolor($cryptwidth,$cryptheight);

if ($bgimg) {
            list($getwidth, $getheight, $gettype, $getattr) = getimagesize($bgimg);
            switch ($gettype) {
                   case "1": $imgread = imagecreatefromgif($bgimg); break;
			    case "2": $imgread = imagecreatefromjpeg($bgimg); break;
			    case "3": $imgread = imagecreatefrompng($bgimg); break;
                   }
	       imagecopyresized ($img, $imgread, 0,0,0,0,$cryptwidth,$cryptheight,$getwidth,$getheight);
		  imagedestroy ($imgread);
            }
            else {
                 $bg = imagecolorallocate($img,$bgR,$bgG,$bgB);
                 imagefill($img,0,0,$bg);
                 if ($bgclear) imagecolortransparent($img,$bg);
                 }


// Création de l'écriture

if (function_exists ('imagecolorallocatealpha')) $ink = imagecolorallocatealpha($img,$charR,$charG,$charB,$charclear);
   else $ink = imagecolorallocate ($img,$charR,$charG,$charB);

$x = $xvariation;
for ($i=1;$i<= $charnb;$i++) {

    if ($charcolorrnd){   // Choisit des couleurs au hasard
       $ok = false;
       do {
          $rndR = rand(0,255); $rndG = rand(0,255); $rndB = rand(0,255);
          $rndcolor = $rndR+$rndG+$rndB;
          switch ($charcolorrndlevel) {
                 case 1  : if ($rndcolor<200) $ok=true; break; // tres sombre
                 case 2  : if ($rndcolor<400) $ok=true; break; // sombre
                 case 3  : if ($rndcolor>500) $ok=true; break; // claires
                 case 4  : if ($rndcolor>650) $ok=true; break; // très claires
                 default : $ok=true;
                 }
          } while (!$ok);

      if (function_exists ('imagecolorallocatealpha')) $rndink = imagecolorallocatealpha($img,$rndR,$rndG,$rndB,$charclear);
          else $rndink = imagecolorallocate ($img,$rndR,$rndG,$rndB);
       }

    imagettftext($img,$tword[$i]['size'],$tword[$i]['angle'],$x,$tword[$i]['y'],$charcolorrnd?$rndink:$ink,$tword[$i]['font'],$tword[$i]['element']);
    $x +=$charspace;
    }


// Ajout de bruits: point et lignes aléatoires

$noisecol = $noisecolorchar?$ink:$bg;
$nbpx = rand($noisepxmin,$noisepxmax);
$nbline = rand($noiselinemin,$noiselinemax);
for ($i=1;$i<$nbpx;$i++) imagesetpixel ($img,rand(0,$cryptwidth-1),rand(0,$cryptheight-1),$noisecol);
for ($i=1;$i<=$nbline;$i++) imageline($img,rand(0,$cryptwidth-1),rand(0,$cryptheight-1),rand(0,$cryptwidth-1),rand(0,$cryptheight-1),$noisecol);


// Création du cadre

if ($bgframe) {
            $framecol = imagecolorallocate($img,($bgR*3+$charR)/4,($bgG*3+$charG)/4,($bgB*3+$charB)/4);
            imagerectangle($img,0,0,$cryptwidth-1,$cryptheight-1,$framecol);
            }


// Transformations supplémentaires: Grayscale et Brouillage
// Vérifie si la fonction existe dans la version PHP installée

if (function_exists('imagefilter')) {
   if ($cryptgrayscal) imagefilter ( $img,IMG_FILTER_GRAYSCALE);
   if ($cryptgaussianblur) imagefilter ( $img,IMG_FILTER_GAUSSIAN_BLUR);
   }


// Retourne 2 informations dans la session:
// - Le code du cryptogramme (crypté ou pas)
// - La Date/Heure de la création du cryptogramme au format integer "TimeStamp"

switch (strtoupper($cryptsecure)) {
       case "MD5"  : $_SESSION['cryptcode'] = md5($word); break;
       case "SHA1" : $_SESSION['cryptcode'] = sha1($word); break;
       default     : $_SESSION['cryptcode'] = $word; break;
       }
$_SESSION['crypttime'] = time();
$_SESSION['cryptcptuse']++;


// Envoi de l'image finale au navigateur

switch (strtoupper($cryptformat)) {
       case "JPG"  :
	  case "JPEG" : if (imagetypes() & IMG_JPG)  {
                        header("Content-type: image/jpeg");
                        imagejpeg($img, "", 80);
                        }
                     break;
	  case "GIF"  : if (imagetypes() & IMG_GIF)  {
                        header("Content-type: image/gif");
                        imagegif($img);
                        }
                     break;
	  case "PNG"  :
	  default     : if (imagetypes() & IMG_PNG)  {
                         header("Content-type: image/png");
                         imagepng($img);
                         }
       }

imagedestroy ($img);
unset ($word,$tword);
unset ($_SESSION['cryptreload']); // variable de session
?>