Subversion Repositories eFlore/Applications.cel

<?php
// declare(encoding='UTF-8');
/**
 * Cette classe est un quasi copier-coller de la classe éponyme dans
 * le dossier lib de jrest mais pas de mécanisme commun pour les classes
 *
 * @category   CEL
 * @package    Scripts
 * @subpackage Génération Images
 * @author     Mathias CHOUET <mathias@tela-botanica.org>
 * @author     Jean-Pascal MILCENT <jpm@tela-botanica.org>
 * @author     Aurelien PERONNET <aurelien@tela-botanica.org>
 * @license    GPL v3 <http://www.gnu.org/licenses/gpl.txt>
 * @license    CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>
 * @copyright  1999-2014 Tela Botanica <accueil@tela-botanica.org>
 */
// TODO: utiliser la même classe pour jrest ainsi que les scripts => créer un projet cel-commun (même principe que del-commun)
Class ImageRecreation {

        private $droits = 0755;
        private $formats = array('CRX2S','CRXS','CXS','CS','CRS','XS','S','M','L','XL','X2L','X3L');
        const MODE_GD = 'gd';
        const MODE_IMAGEMAGICK = 'imagemagick';
        private $mode;

        private $verbose = true;

        public function __construct() {
                if (extension_loaded('imagick')) {
                        $this->mode = self::MODE_IMAGEMAGICK;
                } else {
                        $this->mode = self::MODE_GD;
                }
        }

        public function recreerMiniaturesRecursivement() {
                $this->itererRecursivement(Config::get('dossierImages'));
        }

        public function regenererMiniaturesIntervalle($params) {
                $id_debut = $params[0];
                $id_fin = $params[1];

                if (is_numeric($id_debut) && is_numeric($id_fin)) {
                        for ($i = $id_debut; $i <= $id_fin; $i++) {;
                                $tab_param = array($i);
                                $this->regenererMiniaturesPourId($tab_param);
                        }
                }
        }

        public function regenererMiniaturesPourId($params) {
                $id = $params[0];

                if (!is_numeric($id)) {
                      return;
                }

                $dossier_fichier = $this->obtenirDossierPourFormat($id, 'O');
                $nom_fichier = $this->convertirIdBddVersNomFichier($id, 'O');

                $chemin_fichier = $dossier_fichier.'/'.$nom_fichier;

                if (file_exists($chemin_fichier)) {
                        $infos_image_originale = $this->obtenirImageEtInfosPourChemin($chemin_fichier);
                        // obtention d'un verrou sur le fichier original pour empecher d'autres scripts
                        // d'effectuer la création des miniatures
                        $fp = fopen($chemin_fichier, "r");
                        $verrou = flock($fp, LOCK_EX);
                        // creation de miniatures pour chacuns des formats définis
                        foreach ($this->formats as $format) {
                                $this->creerEtStockerMiniatureFichierImageSelonFormat($id, $infos_image_originale, $format);
                        };
                        $verrou = flock($fp, LOCK_UN);
                        fclose($fp);
                }
        }

        public function itererRecursivement($dossier) {
                // on ne parse que le dossier des images originales
                $dossiers_a_exclure = $this->getFormats();

                foreach (new DirectoryIterator($dossier) as $fichier_ou_dossier) {
                        if ($fichier_ou_dossier->isDot()) {
                                continue;
                        }

                        if (in_array($fichier_ou_dossier->getBasename(), $dossiers_a_exclure)) {
                                continue;
                        }

                        if ($fichier_ou_dossier->isDir()) {
                                $this->itererRecursivement($fichier_ou_dossier->getPathname());
                        } else {
                                $nom_fichier = $fichier_ou_dossier->getFilename();

                                $infos_image_originale = $this->obtenirImageEtInfosPourChemin($fichier_ou_dossier->getPathname());
                                $id = $this->convertirBaseNomFichierVersIdBdd($nom_fichier, $this->formats);

                                // creation de miniatures pour chacuns des formats définis
                                foreach ($this->formats as $format) {
                                        $this->creerEtStockerMiniatureFichierImageSelonFormat($id, $infos_image_originale, $format);
                                }
                        }
                }
        }

        public function creerOuRenvoyerImage($id, $format) {
                $dossier = $this->obtenirDossierPourFormat($id, $format);
                $nom_fichier = $this->convertirIdBddVersNomFichier($id, $format);
                $chemin_image = $dossier.'/'.$nom_fichier;

                $image = false;
                if(!file_exists($chemin_image)) {
                        $infos_image_originale = $this->obtenirImageEtInfosPourChemin($this->obtenirCheminImageOriginale($id));
                        if($infos_image_originale) {
                                $debut = microtime();
                                $this->creerEtStockerMiniatureFichierImageSelonFormat($id, $infos_image_originale, $format);

                                $image = file_get_contents($chemin_image);
                        }
                } else {
                        $image = file_get_contents($chemin_image);
                }

                return $image;
        }

        public function creerMiniatureImageSelonFormat($infos_image_originale, $format = 'O') {
                if ($format == 'O') {
                        // format original : rien à faire
                        $image_redimensionnee = $infos_image_originale['image'];

                } else {
                         if ($this->estUnFormatRogne($format)) {
                                if ($this->mode == self::MODE_IMAGEMAGICK) {
                                        // si l'on dispose de la librairie imageMagick
                                        // on applique l'algorithme d'auto détection de sujets
                                        // qui centre la miniature sur le sujet de l'image
                                        $image_redimensionnee = $this->opticrop($infos_image_originale, $format);
                                } else {
                                        // si l'on ne dispose que de gd
                                        // la minature est une image redimensionnée rognée au centre
                                        $image_redimensionnee = $this->creerMiniatureCarreeRognee($infos_image_originale, $format);
                                }
                        } else if ($this->estUnFormatCarre($format)) {
                                // le format carre et une image redimensionnée en gardant son ratio, insérée dans un carré blanc
                                $image_redimensionnee = $this->creerMiniatureCarree($infos_image_originale, $format);
                        } else {
                                $image_redimensionnee = $this->creerMiniature($infos_image_originale, $format);
                        }
                }

                return $image_redimensionnee;
        }

        public function stockerFichierOriginal($fichier, $id) {
                $chemin_fichier_origine = is_array($fichier) ? $fichier['tmp_name'] : $fichier;

                $chemin_base_fichier = $this->creerSiNecessaireEtRenvoyerCheminStockageFichierPourIdEtFormat($id, 'O');
                $nom_fichier = $this->convertirIdBddVersNomFichier($id, 'O');

                $chemin_fichier = $chemin_base_fichier.'/'.$nom_fichier;

                $deplacement_fichier = $this->stockerImageExterne($chemin_fichier_origine, $chemin_fichier);

                if ($deplacement_fichier) {
                        $infos_image_originale = $this->obtenirImageEtInfosPourChemin($chemin_fichier);
                        $taux_compression = $this->renvoyerTauxCompressionPourPoids($infos_image_originale['poids_octets']);

                        if ($taux_compression < 100 && $this->mode == self::MODE_IMAGEMAGICK) {
                                $this->ecrireImageSurDisqueAvecMeta($chemin_fichier, $taux_compression);
                        }

                        return $infos_image_originale;

                } else {
                        $erreur =  'ERROR : probleme durant le déplacement du fichier temporaire \n' ;
                        $this->logger('CEL_bugs',$erreur);
                        return false ;
                }
        }

        public function stockerFichierEtCreerMiniatures($fichier, $id) {

                $infos_image_originale_stockee = $this->stockerFichierOriginal($fichier, $id);
                if($infos_image_originale_stockee) {
                        $formats = $this->getFormats();

                        // creation de miniatures pour chacuns des formats définis
                        foreach($formats as $format) {
                                $this->creerEtStockerMiniatureFichierImageSelonFormat($id, $infos_image_originale_stockee, $format);
                        }
                } else {
                        $erreur =  'ERROR : impossible d\'obtenir les informations sur l\'image originale \n' ;
                        $this->logger('CEL_bugs',$erreur);
                        return false ;
                }

                return true ;
        }

        public function creerEtStockerMiniatureFichierImageSelonFormat($id ,$infos_image_originale, $format = 'O') {
                $image_redimensionnee = $this->creerMiniatureImageSelonFormat($infos_image_originale, $format);

                $taux_compression = $this->renvoyerTauxCompressionPourPoids($infos_image_originale['poids_octets']);
                $this->ecrireImageSurDisque($image_redimensionnee, $id, $format, $taux_compression);

                return true;
        }

        public function creerImageRedimensionnee($infos_image_originale, $hauteur_redimension, $largeur_redimension) {
                $image_redimensionnee = imagecreatetruecolor($largeur_redimension, $hauteur_redimension);

                imagecopyresampled($image_redimensionnee,
                        $infos_image_originale['image'],
                        0, 0,
                        0, 0,
                        $largeur_redimension,
                        $hauteur_redimension,
                        $infos_image_originale['largeur'],
                        $infos_image_originale['hauteur']
                );

                return $image_redimensionnee;
        }

        public function creerMiniature($informations_images, $format) {
                $taille_reference_pour_format = $this->obtenirDimensionsPourFormat($format);

                $taille_image_redimensionnee = $this->calculerTailleImage($informations_images, $taille_reference_pour_format['hauteur']);
                $image_redimensionnee = $this->creerImageRedimensionnee($informations_images, $taille_image_redimensionnee['hauteur'], $taille_image_redimensionnee['largeur']);

                return $image_redimensionnee;
        }

        public function creerMiniatureCarree($informations_image, $format) {
                $taille_reference_pour_format = $this->obtenirDimensionsPourFormat($format);
                $cote_carre = $taille_reference_pour_format['largeur'];

                $image_redimensionnee_avec_rapport = $this->creerMiniature($informations_image, $format);
                $taille_redimensionnee_avec_rapport = $this->calculerTailleImage($informations_image, $taille_reference_pour_format['hauteur']);

                if ($this->estPaysage($informations_image)) {
                        $debut_largeur_a_copier = 0 ;
                        $debut_hauteur_a_copier = ($cote_carre - $taille_redimensionnee_avec_rapport['hauteur'])/2 ;
                } else {
                        $debut_largeur_a_copier = ($cote_carre - $taille_redimensionnee_avec_rapport['largeur'])/2 ;
                        $debut_hauteur_a_copier = 0 ;
                }

                $image_carre_blanc_cible = $this->renvoyerEtCreerImageCarreeBlancheSelonFormat($cote_carre);

                imagecopy($image_carre_blanc_cible, $image_redimensionnee_avec_rapport,
                        $debut_largeur_a_copier ,$debut_hauteur_a_copier, 0, 0,
                        $taille_redimensionnee_avec_rapport['largeur'], $taille_redimensionnee_avec_rapport['hauteur']
                );

                return $image_carre_blanc_cible;
        }

        public function creerMiniatureCarreeRognee($informations_image, $format) {
                $taille_reference_pour_format = $this->obtenirDimensionsPourFormat($format);
                $cote_carre = $taille_reference_pour_format['largeur'];
                $cote_carre_non_redimensionne = 0;

                if ($this->estPaysage($informations_image)) {
                        $cote_carre_non_redimensionne = $informations_image['hauteur'];
                        $debut_largeur_a_copier = ($informations_image['hauteur'] - $cote_carre)/2 ;
                        $debut_hauteur_a_copier = 0;

                        if($debut_largeur_a_copier <= 0) {
                                $debut_largeur_a_copier = 0;
                        }

                        $nb_pixels_largeur_a_copier = $cote_carre_non_redimensionne;
                        $nb_pixels_hauteur_a_copier = $cote_carre_non_redimensionne;
                } else {
                        $cote_carre_non_redimensionne = $informations_image['largeur'];
                        $debut_largeur_a_copier = 0 ;
                        $debut_hauteur_a_copier = ($informations_image['largeur'] - $cote_carre)/2;

                        if ($debut_hauteur_a_copier <= 0) {
                                $debut_hauteur_a_copier = 0;
                        }

                        $nb_pixels_largeur_a_copier = $cote_carre_non_redimensionne;
                        $nb_pixels_hauteur_a_copier = $cote_carre_non_redimensionne;
                }

                $image_carre_temporaire = imagecreatetruecolor($cote_carre_non_redimensionne, $cote_carre_non_redimensionne);

                imagecopyresampled($image_carre_temporaire,
                        $informations_image['image'],
                        0, 0,
                        $debut_largeur_a_copier,
                        $debut_hauteur_a_copier,
                        $cote_carre_non_redimensionne,
                        $cote_carre_non_redimensionne,
                        $nb_pixels_largeur_a_copier,
                        $nb_pixels_hauteur_a_copier
                );

                $image_redimensionnee = imagecreatetruecolor($cote_carre, $cote_carre);

                imagecopyresampled($image_redimensionnee,
                        $image_carre_temporaire,
                        0, 0,
                        0, 0,
                        $cote_carre,
                        $cote_carre,
                        $cote_carre_non_redimensionne,
                        $cote_carre_non_redimensionne
                );

                return $image_redimensionnee;
        }

        public function stockerImageExterne($chemin_fichier_temp, $chemin_destination) {
                if (is_uploaded_file($chemin_fichier_temp)) {
                        $deplacement = move_uploaded_file($chemin_fichier_temp, $chemin_destination);
                } else {
                        $deplacement = rename($chemin_fichier_temp, $chemin_destination);
                }

                return $deplacement;
        }

        public function creerSiNecessaireEtRenvoyerCheminStockageFichierPourIdEtFormat($id, $format) {
                $chemin_sur_serveur_final = $this->obtenirDossierPourFormat($id, $format);

                if (!file_exists($chemin_sur_serveur_final)) {
                        umask(0);
                        if (!mkdir($chemin_sur_serveur_final, $this->droits, true)) {
                                $erreur =  'ERROR : probleme durant l\'écriture du dossier '.$format.' \n' ;
                                $this->logger('CEL_bugs', $erreur);
                                return false;
                        }
                }

                return $chemin_sur_serveur_final;
        }

        public function obtenirDossierPourFormat($id, $format) {
                $chemin_base = Config::get('dossierImages');

                $chemin_sur_serveur = $chemin_base;

                $id = sprintf('%09s', $id);
                $id = wordwrap($id, 3 , '_', true);

                list($dossierNiveau1, $dossierNiveau2) = explode('_', $id);

                $chemin_sur_serveur_final = $chemin_sur_serveur.'/'.$dossierNiveau1.'/'.$dossierNiveau2.'/'.$format;

                return $chemin_sur_serveur_final;
        }

        public function obtenirCheminImageOriginale($id_image) {
                $nom = $this->convertirIdBddVersNomFichier($id_image, 'O');
                $dossier = $this->obtenirDossierPourFormat($id_image,'O');

                return $dossier.'/'.$nom;
        }

        public function obtenirImageEtInfosPourId($id_image) {
                $chemin_image_o = $this->obtenirCheminImageOriginale($id_image);
                return $this->obtenirImageEtInfosPourChemin($chemin_image_o);
        }

        public function obtenirImageEtInfosPourChemin($chemin_fichier) {
                $image_et_infos = false;

                if (file_exists($chemin_fichier)) {
                        $image_et_infos = array();
                        list($image_et_infos['largeur'], $image_et_infos['hauteur'], $image_et_infos['imagetype']) = getimagesize($chemin_fichier);
                        $image_et_infos['poids_octets'] = filesize($chemin_fichier);
                        $image_et_infos['chemin'] = $chemin_fichier;

                        switch (image_type_to_mime_type($image_et_infos['imagetype'])) {
                                case 'image/jpeg':
                                        $image_et_infos['image'] = imagecreatefromjpeg($chemin_fichier);
                                        break;
                                case 'image/png':
                                        $image_et_infos['image'] = imagecreatefrompng($chemin_fichier);
                                        break;
                                default:
                                        // ni jpeg ni png donc pas supporté, ça dégage
                                        return false;
                        }
                }

                return $image_et_infos;
        }

        public function obtenirDimensionsPourFormat($format) {
                $dimensions = array('largeur' => 0, 'hauteur' => 0);

                if (Config::get('format_'.$format) != null) {
                        list($dimensions['largeur'], $dimensions['hauteur']) = explode('_', Config::get('format_'.$format));
                }

                return $dimensions;
        }

        public function calculerTailleImage($informations_images, $taille_max) {
                $HL_redimension = array();

                if ($this->estPaysage($informations_images)) {
                        $rapport = $informations_images['hauteur']/$informations_images['largeur'] ;
                        $HL_redimension['largeur'] = round($taille_max) ;
                        $HL_redimension['hauteur'] = round($taille_max*$rapport) ;
                } else {
                        $rapport = $informations_images['largeur']/$informations_images['hauteur'] ;
                        $HL_redimension['hauteur'] = round($taille_max) ;
                        $HL_redimension['largeur'] = round($taille_max*$rapport) ;
                }

                return $HL_redimension;
        }

        public function getFormats() {
                return $this->formats;
        }

        public function estUnFormatCarre($format) {
                return (strpos($format,'C') === 0);
        }

        public function estUnFormatRogne($format) {
                return (strpos($format,'R') === 1);
        }

        public function estPaysage($informations_images) {
                return $informations_images['largeur'] > $informations_images['hauteur'];
        }

        public function estPortait($informations_images) {
                return $informations_images['largeur'] < $informations_images['hauteur'];
        }

        public function renvoyerTauxCompressionPourPoids($poids_octets) {
                $poids_max_octets = Config::get('tailleMaxImages');

                $ratio_compression = 100 ;

                if ($poids_octets >= $poids_max_octets) {
                        $ratio_compression = 75 ;
                }

                return $ratio_compression;
        }

        public function convertirIdBddVersNomFichier($id, $format, $extension = 'jpg') {
                // creation du format original
                $id_avec_zeros = sprintf('%09s', $id) ;
                $id_avec_zeros_underscores = wordwrap($id_avec_zeros, 3 , '_', true) ;

                $nom_fichier = $id_avec_zeros_underscores.'_'.$format.'.'.$extension;

                return $nom_fichier;
        }

        public function convertirBaseNomFichierVersIdBdd($nom_fichier, $formats) {
                $nom_fichier_sans_extension = trim($nom_fichier, '.jpg');

                foreach($formats as $format) {
                        $nom_fichier_sans_extension = trim($nom_fichier_sans_extension, '_'.$format);
                }

                $id_image = str_replace('_', '', $nom_fichier_sans_extension);

                // suppression des 0 devant
                $id_image += 0;

                return $id_image;
        }

        public function ecrireImageSurDisque($image_binaire, $id, $format, $compression = 100) {
                umask(0);

                $chemin_sur_serveur_final = $this->creerSiNecessaireEtRenvoyerCheminStockageFichierPourIdEtFormat($id, $format);
                $nom_fichier = $this->convertirIdBddVersNomFichier($id, $format);

                if (file_exists($chemin_sur_serveur_final.'/'.$nom_fichier)) {
                        unlink($chemin_sur_serveur_final.'/'.$nom_fichier);
                }

                // attention, ceci ne preserve pas les metadonnées
                imagejpeg($image_binaire, $chemin_sur_serveur_final.'/'.$nom_fichier, $compression);
                chmod($chemin_sur_serveur_final.'/'.$nom_fichier,$this->droits);
        }

        public function ecrireImageSurDisqueAvecMeta($chemin_image_a_stocker, $compression = 100) {
                $img = new Imagick($chemin_image_a_stocker);

                // l'utilisation d'image magick préserve les métadonnées lors d'une recompression
                $img->setformat("jpeg");
                $img->setImageCompression(imagick::COMPRESSION_JPEG);
                $img->setCompressionQuality($compression);
                $img->writeImage($chemin_image_a_stocker);
                $img->destroy();

                chmod($chemin_image_a_stocker, $this->droits);
        }

        public function renvoyerEtCreerImageCarreeBlancheSelonFormat($cote) {
                $image_blanche = imagecreatetruecolor($cote, $cote);
                $blanc = imagecolorallocate($image_blanche, 255, 255, 255);
                imagefilledrectangle($image_blanche, 0, 0, $cote, $cote, $blanc);

                return $image_blanche;
        }

        public function detruireImageEnMemoire($image) {
                imagedestroy($image);
        }

        public function detruireImageSurDisque($id) {
                $formats = $this->getFormats();

                // on detruit aussi l'image originale
                $formats[] = 'O';

                $destruction_formats_fichier = false;

                // destructions de chacuns des formats définis
                foreach($formats as $format) {

                        $dossier_format = $this->obtenirDossierPourFormat($id, $format);
                        $nom_fichier = $this->convertirIdBddVersNomFichier($id, $format);

                        if (file_exists($dossier_format.'/'.$nom_fichier)) {
                                $destruction_formats_fichier = unlink($dossier_format.'/'.$nom_fichier);
                        } else {
                                $destruction_formats_fichier = true;
                        }
                }

                return $destruction_formats_fichier;
        }

        /*
         * edge-maximizing crop
         * determines center-of-edginess, then tries different-sized crops around it.
         * picks the crop with the highest normalized edginess.
         * see documentation on how to tune the algorithm
         *
         * $informations_image - le tableau d'informations sur l'image tel que renvoyé par la fonction obtenirImageEtInfosPourChemin
         * $format - le format (ex. : CS, XS, XL, CRS)
        */
        public function opticrop($informations_image, $format) {
                umask(0);

                $nom_temp = md5(time());
                $chemin_temp =

                $out = Config::get('dossierImagesStockageTemp').'/'.$nom_temp;

                $dimension_vignettes = $this->obtenirDimensionsPourFormat($format);

                $largeur_vignette = $dimension_vignettes['largeur'];
                $hauteur_vignette = $dimension_vignettes['hauteur'];

                // source dimensions
                $largeur_image_originale = $informations_image['largeur'];
                $hauteur_image_originale = $informations_image['hauteur'];

                $chemin_image = $informations_image['chemin'];

                //if ($largeur_vignette > $largeur_image_originale || $hauteur_vignette > $hauteur_image_originale)
                //    die("Target dimensions must be smaller or equal to source dimensions.");

                // parameters for the edge-maximizing crop algorithm
                $r = 1; // radius of edge filter
                $nk = 9; // scale count: number of crop sizes to try
                $gamma = 0.2; // edge normalization parameter -- see documentation
                $ar = $largeur_vignette/$hauteur_vignette;    // target aspect ratio (AR)
                $ar0 = $largeur_image_originale/$hauteur_image_originale;    // original aspect ratio (AR)

                $img = new Imagick($chemin_image);
                $imgcp = clone $img;

                // compute center of edginess
                $img->edgeImage($r);
                $img->modulateImage(100,0,100); // grayscale
                $img->blackThresholdImage("#0f0f0f");
                $img->writeImage($out);
                // use gd for random pixel access
                $im = ImageCreateFromJpeg($out);
                $xcenter = 0;
                $ycenter = 0;
                $sum = 0;
                $n = 100000;
                for ($k=0; $k<$n; $k++) {
                        $i = mt_rand(0,$largeur_image_originale-1);
                        $j = mt_rand(0,$hauteur_image_originale-1);
                        $val = imagecolorat($im, $i, $j) & 0xFF;
                        $sum += $val;
                        $xcenter += ($i+1)*$val;
                        $ycenter += ($j+1)*$val;
                }
                $xcenter /= $sum;
                $ycenter /= $sum;

                // crop source img to target AR
                if ($largeur_image_originale/$hauteur_image_originale > $ar) {
                        // source AR wider than target
                        // crop width to target AR
                        $wcrop0 = round($ar*$hauteur_image_originale);
                        $hcrop0 = $hauteur_image_originale;
                } else {
                        // crop height to target AR
                        $wcrop0 = $largeur_image_originale;
                        $hcrop0 = round($largeur_image_originale/$ar);
                }

                // crop parameters for all scales and translations
                $params = array();

                // crop at different scales
                $hgap = $hcrop0 - $hauteur_vignette;
                $hinc = ($nk == 1) ? 0 : $hgap / ($nk - 1);
                $wgap = $wcrop0 - $largeur_vignette;
                $winc = ($nk == 1) ? 0 : $wgap / ($nk - 1);

                // find window with highest normalized edginess
                $n = 10000;
                $maxbetanorm = 0;
                $maxfile = '';
                $maxparam = array('w'=>0, 'h'=>0, 'x'=>0, 'y'=>0);

                for ($k = 0; $k < $nk; $k++) {
                        $hcrop = round($hcrop0 - $k*$hinc);
                        $wcrop = round($wcrop0 - $k*$winc);
                        $xcrop = $xcenter - $wcrop / 2;
                        $ycrop = $ycenter - $hcrop / 2;
                        //echo("crop: $wcrop, $hcrop, $xcrop, $ycrop");

                        if ($xcrop < 0) $xcrop = 0;
                        if ($xcrop+$wcrop > $largeur_image_originale) $xcrop = $largeur_image_originale-$wcrop;
                        if ($ycrop < 0) $ycrop = 0;
                        if ($ycrop+$hcrop > $hauteur_image_originale) $ycrop = $hauteur_image_originale-$hcrop;

                        $beta = 0;
                        for ($c=0; $c<$n; $c++) {
                                $i = mt_rand(0,$wcrop-1);
                                $j = mt_rand(0,$hcrop-1);
                                $beta += imagecolorat($im, $xcrop+$i, $ycrop+$j) & 0xFF;
                        }
                        $area = $wcrop * $hcrop;
                        $betanorm = $beta / ($n*pow($area, $gamma-1));
                        // echo("beta: $beta; betan: $betanorm");
                        // echo("image$k.jpg:<br/>\n<img src=\"$currfile\"/>");
                        // best image found, save it

                        if ($betanorm > $maxbetanorm) {

                                $maxbetanorm = $betanorm;
                                $maxparam['w'] = $wcrop;
                                $maxparam['h'] = $hcrop;
                                $maxparam['x'] = $xcrop;
                                $maxparam['y'] = $ycrop;
                        }
                }

                // return image
                $imgcp->cropImage($maxparam['w'], $maxparam['h'], $maxparam['x'], $maxparam['y']);
                $imgcp->scaleImage($largeur_vignette, $hauteur_vignette);
                $imgcp->writeImage($out);
                chmod($out, 0777);
                $img->destroy();
                $imgcp->destroy();

                $image_sortie = ImageCreateFromJpeg($out);
                unlink($out);

                return $image_sortie;
        }
}