Subversion Repositories eFlore/Applications.cel

Rev

Rev 3057 | Rev 3460 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
591 aurelien 1 
<?php
2462 jpm 2 
// declare(encoding='UTF-8');
3 
/**
4 
 * Classe de manipulation des fichiers images JPEG.
5 
 *
6 
 * @internal   Mininum PHP version : 5.2
7 
 * @category   CEL
8 
 * @package    Services
9 
 * @subpackage Bibliothèques
10 
 * @version    0.1
11 
 * @author     Mathias CHOUET <mathias@tela-botanica.org>
12 
 * @author     Jean-Pascal MILCENT <jpm@tela-botanica.org>
13 
 * @author     Aurelien PERONNET <aurelien@tela-botanica.org>
14 
 * @license    GPL v3 <http://www.gnu.org/licenses/gpl.txt>
15 
 * @license    CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>
16 
 * @copyright  1999-2014 Tela Botanica <accueil@tela-botanica.org>
17 
 */
632 aurelien 18 
Class ImageRecreation {
1154 jpm 19 
 
1883 mathias 20 
	private $droits = 0755;
1874 aurelien 21 
	private $formats = array('CRX2S','CRXS','CXS','CS','CRS','XS','S','M','L','XL','X2L','X3L');
632 aurelien 22 
	const MODE_GD = 'gd';
23 
	const MODE_IMAGEMAGICK = 'imagemagick';
24 
	private $mode;
1154 jpm 25 
 
632 aurelien 26 
	private $verbose = true;
591 aurelien 27 
 
672 jpm 28 
	public function __construct($config) {
29 
		$this->config = $config;
1154 jpm 30 
 
632 aurelien 31 
		if (extension_loaded('imagick')) {
32 
			$this->mode = self::MODE_IMAGEMAGICK;
1154 jpm 33 
		} else {
34 
			$this->mode = self::MODE_GD;
632 aurelien 35 
		}
591 aurelien 36 
	}
1154 jpm 37 
 
632 aurelien 38 
	public function recreerMiniaturesRecursivement() {
970 aurelien 39 
		$this->itererRecursivement($this->config['cel']['chemin_images']);
632 aurelien 40 
	}
1154 jpm 41 
 
632 aurelien 42 
	public function regenererMiniaturesIntervalle($params) {
43 
		$id_debut = $params[0];
44 
		$id_fin = $params[1];
45 
 
46 
		if (is_numeric($id_debut) && is_numeric($id_fin)) {
668 aurelien 47 
			for ($i = $id_debut; $i <= $id_fin; $i++) {;
632 aurelien 48 
			    $tab_param = array($i);
49 
			    $this->regenererMiniaturesPourId($tab_param);
50 
			}
51 
		}
591 aurelien 52 
	}
1154 jpm 53 
 
2939 mathias 54 
	/**
55 
	 * params[0] doit contenir un seul identifiant d'image; les miniatures
56 
	 * seront regénérée pour cette image
57 
	 */
632 aurelien 58 
	public function regenererMiniaturesPourId($params) {
59 
		$id = $params[0];
60 
 
61 
		if (!is_numeric($id)) {
2462 jpm 62 
			return;
632 aurelien 63 
		}
64 
 
65 
		$dossier_fichier = $this->obtenirDossierPourFormat($id, 'O');
66 
		$nom_fichier = $this->convertirIdBddVersNomFichier($id, 'O');
1154 jpm 67 
 
632 aurelien 68 
		$chemin_fichier = $dossier_fichier.'/'.$nom_fichier;
69 
 
1154 jpm 70 
		if (file_exists($chemin_fichier)) {
632 aurelien 71 
			$infos_image_originale = $this->obtenirImageEtInfosPourChemin($chemin_fichier);
1154 jpm 72 
 
632 aurelien 73 
			// creation de miniatures pour chacuns des formats définis
1154 jpm 74 
			foreach ($this->formats as $format) {
632 aurelien 75 
				$this->creerEtStockerMiniatureFichierImageSelonFormat($id, $infos_image_originale, $format);
668 aurelien 76 
			};
632 aurelien 77 
		}
621 aurelien 78 
	}
1154 jpm 79 
 
605 aurelien 80 
	public function itererRecursivement($dossier) {
591 aurelien 81 
		// on ne parse que le dossier des images originales
82 
		$dossiers_a_exclure = $this->getFormats();
1154 jpm 83 
 
591 aurelien 84 
		foreach (new DirectoryIterator($dossier) as $fichier_ou_dossier) {
632 aurelien 85 
			if ($fichier_ou_dossier->isDot()) {
591 aurelien 86 
				continue;
87 
			}
1154 jpm 88 
 
632 aurelien 89 
			if (in_array($fichier_ou_dossier->getBasename(), $dossiers_a_exclure)) {
591 aurelien 90 
				continue;
91 
			}
1154 jpm 92 
 
2462 jpm 93 
			if ($fichier_ou_dossier->isDir()) {
94 
				$this->itererRecursivement($fichier_ou_dossier->getPathname());
95 
			} else {
96 
				$nom_fichier = $fichier_ou_dossier->getFilename();
1154 jpm 97 
 
591 aurelien 98 
				$infos_image_originale = $this->obtenirImageEtInfosPourChemin($fichier_ou_dossier->getPathname());
2462 jpm 99 
				$id = $this->convertirBaseNomFichierVersIdBdd($nom_fichier, $this->formats);
1154 jpm 100 
 
2462 jpm 101 
				// creation de miniatures pour chacuns des formats définis
1154 jpm 102 
				foreach ($this->formats as $format) {
591 aurelien 103 
					$this->creerEtStockerMiniatureFichierImageSelonFormat($id, $infos_image_originale, $format);
104 
				}
2462 jpm 105 
			}
591 aurelien 106 
		}
107 
	}
2462 jpm 108 
 
2083 aurelien 109 
	public function creerOuRenvoyerImage($id, $format) {
110 
		$dossier = $this->obtenirDossierPourFormat($id, $format);
111 
		$nom_fichier = $this->convertirIdBddVersNomFichier($id, $format);
2462 jpm 112 
		$chemin_image = $dossier.'/'.$nom_fichier;
1154 jpm 113 
 
2083 aurelien 114 
		$image = false;
2462 jpm 115 
		if (!file_exists($chemin_image)) {
2133 aurelien 116 
			$chemin_image_originale = $this->obtenirCheminImageOriginale($id);
117 
			$infos_image_originale = $this->obtenirImageEtInfosPourChemin($chemin_image_originale);
2083 aurelien 118 
			if($infos_image_originale) {
2133 aurelien 119 
				// le verrou est là dans le (rare) cas où l'image est déjà en train
2462 jpm 120 
				// d'être générée par le script de création des miniatures ou bien
2133 aurelien 121 
				// un autre instance de cette classe appelée par le web service
122 
				$fp = fopen($chemin_image_originale, "r");
2462 jpm 123 
				// si le fichier est verrouillé, flock attendra qu'il se libère
2133 aurelien 124 
				$verrou = flock($fp, LOCK_EX);
125 
				if(!file_exists($chemin_image)) {
126 
					// si le fichier a été locké alors l'image était en train d'être générée
127 
					// et donc il n'est pas nécéssaire de la créer (d'où le 2eme test sur file exists)
128 
					$this->creerEtStockerMiniatureFichierImageSelonFormat($id, $infos_image_originale, $format);
129 
				}
130 
				$verrou = flock($fp, LOCK_UN);
131 
				fclose($fp);
2083 aurelien 132 
				$image = file_get_contents($chemin_image);
133 
			}
134 
		} else {
135 
			$image = file_get_contents($chemin_image);
136 
		}
137 
		return $image;
138 
	}
139 
 
668 aurelien 140 
	public function creerMiniatureImageSelonFormat($infos_image_originale, $format = 'O') {
2238 mathias 141 
		$image_redimensionnee = false;
1154 jpm 142 
		if ($format == 'O') {
591 aurelien 143 
			// format original : rien à faire
144 
			$image_redimensionnee = $infos_image_originale['image'];
145 
		} else {
632 aurelien 146 
			 if ($this->estUnFormatRogne($format)) {
147 
			 	if ($this->mode == self::MODE_IMAGEMAGICK) {
148 
			 		// si l'on dispose de la librairie imageMagick
149 
			 		// on applique l'algorithme d'auto détection de sujets
150 
			 		// qui centre la miniature sur le sujet de l'image
151 
			 		$image_redimensionnee = $this->opticrop($infos_image_originale, $format);
2238 mathias 152 
			 	}
153 
			 	if ($image_redimensionnee === false) {
154 
			 		// si l'on ne dispose que de gd ou bien que Imagick a échoué
632 aurelien 155 
					// la minature est une image redimensionnée rognée au centre
1154 jpm 156 
					$image_redimensionnee = $this->creerMiniatureCarreeRognee($infos_image_originale, $format);
157 
			 	}
632 aurelien 158 
			} else if ($this->estUnFormatCarre($format)) {
591 aurelien 159 
				// le format carre et une image redimensionnée en gardant son ratio, insérée dans un carré blanc
1154 jpm 160 
				$image_redimensionnee = $this->creerMiniatureCarree($infos_image_originale, $format);
591 aurelien 161 
			} else {
1154 jpm 162 
				$image_redimensionnee = $this->creerMiniature($infos_image_originale, $format);
591 aurelien 163 
			}
164 
		}
668 aurelien 165 
		return $image_redimensionnee;
166 
	}
2370 mathias 167 
 
168 
	/**
169 
	 * Déplace une image temporaire uploadée vers le répertoire de stockage d'images,
170 
	 * en enregistrant les métadonnées et tout le tintouin.
171 
	 * Si $conserverFichiersTemporaires vaut true, l'image est copiée et non déplacée.
2462 jpm 172 
	 *
2370 mathias 173 
	 * @param unknown $fichier
174 
	 * @param unknown $id
175 
	 * @param unknown $conserverFichiersTemporaires
176 
	 * @return Ambigous <multitype:, boolean>|boolean
177 
	 */
178 
	public function stockerFichierOriginal($fichier, $id, $conserverFichiersTemporaires=false) {
2083 aurelien 179 
		$chemin_fichier_origine = is_array($fichier) ? $fichier['tmp_name'] : $fichier;
2462 jpm 180 
 
2704 mathias 181 
		$tailleFichierOrigine = filesize($chemin_fichier_origine);
182 
 
2083 aurelien 183 
		$chemin_base_fichier = $this->creerSiNecessaireEtRenvoyerCheminStockageFichierPourIdEtFormat($id, 'O');
184 
		$nom_fichier = $this->convertirIdBddVersNomFichier($id, 'O');
2462 jpm 185 
 
2083 aurelien 186 
		$chemin_fichier = $chemin_base_fichier.'/'.$nom_fichier;
2462 jpm 187 
 
2370 mathias 188 
		$deplacement_fichier = $this->stockerImageExterne($chemin_fichier_origine, $chemin_fichier, $conserverFichiersTemporaires);
2704 mathias 189 
		if ($tailleFichierOrigine == 0) {
190 
			$erreur =  'ERREUR : fichier image original [' . $chemin_fichier . '] de taille nulle (0) \n' ;
191 
			$this->logger('CEL_bugs',$erreur);
192 
			return false;
193 
		}
2462 jpm 194 
 
2083 aurelien 195 
		if ($deplacement_fichier) {
196 
			$infos_image_originale = $this->obtenirImageEtInfosPourChemin($chemin_fichier);
197 
			$taux_compression = $this->renvoyerTauxCompressionPourPoids($infos_image_originale['poids_octets']);
2462 jpm 198 
 
2704 mathias 199 
			$ecritureOK = true;
2083 aurelien 200 
			if ($taux_compression < 100 && $this->mode == self::MODE_IMAGEMAGICK) {
2704 mathias 201 
				$ecritureOK = $this->ecrireImageSurDisqueAvecMeta($chemin_fichier, $taux_compression);
2083 aurelien 202 
			}
1154 jpm 203 
 
2704 mathias 204 
			if ($ecritureOK) {
205 
				return $infos_image_originale;
206 
			} else {
207 
				$erreur =  'ERREUR : probleme durant la recompression du fichier image original \n' ;
208 
				$this->logger('CEL_bugs',$erreur);
209 
				return false ;
210 
			}
2083 aurelien 211 
		} else {
2704 mathias 212 
			$erreur =  'ERREUR : probleme durant le déplacement du fichier temporaire \n' ;
2083 aurelien 213 
			$this->logger('CEL_bugs',$erreur);
214 
			return false ;
215 
		}
216 
	}
2462 jpm 217 
 
2083 aurelien 218 
	public function stockerFichierEtCreerMiniatures($fichier, $id) {
219 
		$infos_image_originale_stockee = $this->stockerFichierOriginal($fichier, $id);
2462 jpm 220 
		if ($infos_image_originale_stockee) {
2083 aurelien 221 
			$formats = $this->getFormats();
2462 jpm 222 
 
2083 aurelien 223 
			// creation de miniatures pour chacuns des formats définis
224 
			foreach($formats as $format) {
225 
				$this->creerEtStockerMiniatureFichierImageSelonFormat($id, $infos_image_originale_stockee, $format);
226 
			}
227 
		} else {
228 
			$erreur =  'ERROR : impossible d\'obtenir les informations sur l\'image originale \n' ;
229 
			$this->logger('CEL_bugs',$erreur);
230 
			return false ;
231 
		}
232 
		return true ;
233 
	}
234 
 
668 aurelien 235 
	public function creerEtStockerMiniatureFichierImageSelonFormat($id ,$infos_image_originale, $format = 'O') {
236 
		$image_redimensionnee = $this->creerMiniatureImageSelonFormat($infos_image_originale, $format);
591 aurelien 237 
		$taux_compression = $this->renvoyerTauxCompressionPourPoids($infos_image_originale['poids_octets']);
238 
		$this->ecrireImageSurDisque($image_redimensionnee, $id, $format, $taux_compression);
239 
		return true;
240 
	}
1154 jpm 241 
 
591 aurelien 242 
	public function creerImageRedimensionnee($infos_image_originale, $hauteur_redimension, $largeur_redimension) {
243 
		$image_redimensionnee = imagecreatetruecolor($largeur_redimension, $hauteur_redimension);
1154 jpm 244 
 
245 
		imagecopyresampled($image_redimensionnee,
246 
			$infos_image_originale['image'],
247 
			0, 0,
248 
			0, 0,
249 
			$largeur_redimension,
250 
			$hauteur_redimension,
251 
			$infos_image_originale['largeur'],
672 jpm 252 
			$infos_image_originale['hauteur']
591 aurelien 253 
		);
254 
		return $image_redimensionnee;
255 
	}
1154 jpm 256 
 
591 aurelien 257 
	public function creerMiniature($informations_images, $format) {
258 
		$taille_reference_pour_format = $this->obtenirDimensionsPourFormat($format);
1154 jpm 259 
 
591 aurelien 260 
		$taille_image_redimensionnee = $this->calculerTailleImage($informations_images, $taille_reference_pour_format['hauteur']);
261 
		$image_redimensionnee = $this->creerImageRedimensionnee($informations_images, $taille_image_redimensionnee['hauteur'], $taille_image_redimensionnee['largeur']);
1154 jpm 262 
 
591 aurelien 263 
		return $image_redimensionnee;
264 
	}
1154 jpm 265 
 
591 aurelien 266 
	public function creerMiniatureCarree($informations_image, $format) {
267 
		$taille_reference_pour_format = $this->obtenirDimensionsPourFormat($format);
268 
		$cote_carre = $taille_reference_pour_format['largeur'];
1154 jpm 269 
 
591 aurelien 270 
		$image_redimensionnee_avec_rapport = $this->creerMiniature($informations_image, $format);
271 
		$taille_redimensionnee_avec_rapport = $this->calculerTailleImage($informations_image, $taille_reference_pour_format['hauteur']);
1154 jpm 272 
 
273 
		if ($this->estPaysage($informations_image)) {
672 jpm 274 
			$debut_largeur_a_copier = 0 ;
1154 jpm 275 
			$debut_hauteur_a_copier = ($cote_carre - $taille_redimensionnee_avec_rapport['hauteur'])/2 ;
591 aurelien 276 
		} else {
672 jpm 277 
			$debut_largeur_a_copier = ($cote_carre - $taille_redimensionnee_avec_rapport['largeur'])/2 ;
1154 jpm 278 
			$debut_hauteur_a_copier = 0 ;
591 aurelien 279 
		}
1154 jpm 280 
 
591 aurelien 281 
		$image_carre_blanc_cible = $this->renvoyerEtCreerImageCarreeBlancheSelonFormat($cote_carre);
1154 jpm 282 
 
591 aurelien 283 
		imagecopy($image_carre_blanc_cible, $image_redimensionnee_avec_rapport,
672 jpm 284 
			$debut_largeur_a_copier ,$debut_hauteur_a_copier, 0, 0,
285 
			$taille_redimensionnee_avec_rapport['largeur'], $taille_redimensionnee_avec_rapport['hauteur']
591 aurelien 286 
		);
287 
 
288 
		return $image_carre_blanc_cible;
289 
	}
1154 jpm 290 
 
591 aurelien 291 
	public function creerMiniatureCarreeRognee($informations_image, $format) {
292 
		$taille_reference_pour_format = $this->obtenirDimensionsPourFormat($format);
293 
		$cote_carre = $taille_reference_pour_format['largeur'];
294 
		$cote_carre_non_redimensionne = 0;
1154 jpm 295 
 
296 
		if ($this->estPaysage($informations_image)) {
297 
			$cote_carre_non_redimensionne = $informations_image['hauteur'];
2238 mathias 298 
			$debut_largeur_a_copier = ($informations_image['largeur'] / 2) - ($informations_image['hauteur'] / 2);
672 jpm 299 
			$debut_hauteur_a_copier = 0;
1154 jpm 300 
 
672 jpm 301 
			if($debut_largeur_a_copier <= 0) {
302 
				$debut_largeur_a_copier = 0;
303 
			}
1154 jpm 304 
 
672 jpm 305 
			$nb_pixels_largeur_a_copier = $cote_carre_non_redimensionne;
306 
			$nb_pixels_hauteur_a_copier = $cote_carre_non_redimensionne;
307 
		} else {
308 
			$cote_carre_non_redimensionne = $informations_image['largeur'];
309 
			$debut_largeur_a_copier = 0 ;
2238 mathias 310 
			$debut_hauteur_a_copier = ($informations_image['hauteur'] / 2) - ($informations_image['largeur'] / 2);
1154 jpm 311 
 
672 jpm 312 
			if($debut_hauteur_a_copier <= 0) {
591 aurelien 313 
				$debut_hauteur_a_copier = 0;
672 jpm 314 
			}
1154 jpm 315 
 
672 jpm 316 
			$nb_pixels_largeur_a_copier = $cote_carre_non_redimensionne;
317 
			$nb_pixels_hauteur_a_copier = $cote_carre_non_redimensionne;
591 aurelien 318 
		}
1154 jpm 319 
 
591 aurelien 320 
		$image_carre_temporaire = imagecreatetruecolor($cote_carre_non_redimensionne, $cote_carre_non_redimensionne);
1154 jpm 321 
 
322 
		imagecopyresampled($image_carre_temporaire,
323 
			$informations_image['image'],
324 
			0, 0,
672 jpm 325 
			$debut_largeur_a_copier,
1154 jpm 326 
			$debut_hauteur_a_copier,
327 
			$cote_carre_non_redimensionne,
328 
			$cote_carre_non_redimensionne,
329 
			$nb_pixels_largeur_a_copier,
672 jpm 330 
			$nb_pixels_hauteur_a_copier
591 aurelien 331 
		);
1154 jpm 332 
 
591 aurelien 333 
		$image_redimensionnee = imagecreatetruecolor($cote_carre, $cote_carre);
1154 jpm 334 
 
335 
		imagecopyresampled($image_redimensionnee,
336 
			$image_carre_temporaire,
337 
			0, 0,
338 
			0, 0,
339 
			$cote_carre,
340 
			$cote_carre,
341 
			$cote_carre_non_redimensionne,
672 jpm 342 
			$cote_carre_non_redimensionne
591 aurelien 343 
		);
344 
 
345 
		return $image_redimensionnee;
346 
	}
1154 jpm 347 
 
2370 mathias 348 
	/**
349 
	 * Déplace un fichier temporaire vers une destination donnée. Si
350 
	 * $conserverFichiersTemporaires vaut true, le fichier est copié et non déplacé.
2462 jpm 351 
	 *
2370 mathias 352 
	 * @param unknown $chemin_fichier_temp
353 
	 * @param unknown $chemin_destination
354 
	 * @param string $conserverFichiersTemporaires
355 
	 * @return boolean
356 
	 */
357 
	public function stockerImageExterne($chemin_fichier_temp, $chemin_destination, $conserverFichiersTemporaires=false) {
358 
		if ($conserverFichiersTemporaires === true) {
359 
			// copie du fichier
360 
			$deplacement = copy($chemin_fichier_temp, $chemin_destination);
632 aurelien 361 
		} else {
2370 mathias 362 
			if (is_uploaded_file($chemin_fichier_temp)) {
363 
				$deplacement = move_uploaded_file($chemin_fichier_temp, $chemin_destination);
364 
			} else {
365 
				$deplacement = rename($chemin_fichier_temp, $chemin_destination);
366 
			}
632 aurelien 367 
		}
1154 jpm 368 
 
632 aurelien 369 
		return $deplacement;
370 
	}
1154 jpm 371 
 
591 aurelien 372 
	public function creerSiNecessaireEtRenvoyerCheminStockageFichierPourIdEtFormat($id, $format) {
672 jpm 373 
		$chemin_sur_serveur_final = $this->obtenirDossierPourFormat($id, $format);
1154 jpm 374 
 
672 jpm 375 
		if (!file_exists($chemin_sur_serveur_final)) {
668 aurelien 376 
			umask(0);
672 jpm 377 
			if (!mkdir($chemin_sur_serveur_final, $this->droits, true)) {
591 aurelien 378 
				$erreur =  'ERROR : probleme durant l\'écriture du dossier '.$format.' \n' ;
672 jpm 379 
				$this->logger('CEL_bugs', $erreur);
591 aurelien 380 
				return false;
381 
			}
382 
		}
1154 jpm 383 
 
591 aurelien 384 
		return $chemin_sur_serveur_final;
385 
	}
1154 jpm 386 
 
591 aurelien 387 
	public function obtenirDossierPourFormat($id, $format) {
970 aurelien 388 
		$chemin_base = $this->config['cel']['chemin_images'];
1154 jpm 389 
 
672 jpm 390 
		$chemin_sur_serveur = $chemin_base;
1154 jpm 391 
 
672 jpm 392 
		$id = sprintf('%09s', $id);
393 
		$id = wordwrap($id, 3 , '_', true);
1154 jpm 394 
 
672 jpm 395 
		list($dossierNiveau1, $dossierNiveau2) = explode('_', $id);
1154 jpm 396 
 
591 aurelien 397 
		$chemin_sur_serveur_final = $chemin_sur_serveur.'/'.$dossierNiveau1.'/'.$dossierNiveau2.'/'.$format;
1154 jpm 398 
 
591 aurelien 399 
		return $chemin_sur_serveur_final;
400 
	}
1154 jpm 401 
 
668 aurelien 402 
	public function obtenirCheminImageOriginale($id_image) {
403 
		$nom = $this->convertirIdBddVersNomFichier($id_image, 'O');
404 
		$dossier = $this->obtenirDossierPourFormat($id_image,'O');
1154 jpm 405 
 
668 aurelien 406 
		return $dossier.'/'.$nom;
407 
	}
1154 jpm 408 
 
668 aurelien 409 
	public function obtenirImageEtInfosPourId($id_image) {
410 
		$chemin_image_o = $this->obtenirCheminImageOriginale($id_image);
411 
		return $this->obtenirImageEtInfosPourChemin($chemin_image_o);
412 
	}
1154 jpm 413 
 
591 aurelien 414 
	public function obtenirImageEtInfosPourChemin($chemin_fichier) {
668 aurelien 415 
		$image_et_infos = false;
1154 jpm 416 
 
417 
		if (file_exists($chemin_fichier)) {
668 aurelien 418 
			$image_et_infos = array();
1154 jpm 419 
			list($image_et_infos['largeur'], $image_et_infos['hauteur']) = getimagesize($chemin_fichier);
668 aurelien 420 
			$image_et_infos['poids_octets'] = filesize($chemin_fichier);
2662 mathias 421 
			// @TODO Se protéger contre les images vides, non-JPEG, ou invalides / incomplètes
668 aurelien 422 
			$image_et_infos['image'] = imagecreatefromjpeg($chemin_fichier);
423 
			$image_et_infos['chemin'] = $chemin_fichier;
424 
		}
1154 jpm 425 
 
591 aurelien 426 
		return $image_et_infos;
427 
	}
1154 jpm 428 
 
591 aurelien 429 
	public function obtenirDimensionsPourFormat($format) {
672 jpm 430 
		$dimensions = array('largeur' => 0, 'hauteur' => 0);
1154 jpm 431 
 
970 aurelien 432 
		if (isset($this->config['cel']['format_'.$format])) {
433 
			list($dimensions['largeur'], $dimensions['hauteur']) = explode('_', $this->config['cel']['format_'.$format]);
591 aurelien 434 
		}
1154 jpm 435 
 
591 aurelien 436 
		return $dimensions;
437 
	}
1154 jpm 438 
 
591 aurelien 439 
	public function calculerTailleImage($informations_images, $taille_max) {
2462 jpm 440 
		$HL_redimension = array();
1154 jpm 441 
 
2462 jpm 442 
		if ($this->estPaysage($informations_images)) {
443 
			$rapport = $informations_images['hauteur']/$informations_images['largeur'] ;
444 
			$HL_redimension['largeur'] = round($taille_max) ;
445 
			$HL_redimension['hauteur'] = round($taille_max*$rapport) ;
1154 jpm 446 
 
2462 jpm 447 
		} else {
2662 mathias 448 
			// protection contre division par 0 - prob. symptôme d'un autre pb : image vide ou mal transmise,
449 
			// voir TODO dans obtenirImageEtInfosPourChemin()
450 
			$rapport = $informations_images['hauteur'] == 0 ? 0 : $informations_images['largeur'] / $informations_images['hauteur'];
2462 jpm 451 
			$HL_redimension['hauteur'] = round($taille_max) ;
452 
			$HL_redimension['largeur'] = round($taille_max*$rapport) ;
453 
		}
1154 jpm 454 
 
2462 jpm 455 
		return $HL_redimension;
591 aurelien 456 
	}
1154 jpm 457 
 
591 aurelien 458 
	public function getFormats() {
459 
		return $this->formats;
460 
	}
1154 jpm 461 
 
591 aurelien 462 
	public function estUnFormatCarre($format) {
1154 jpm 463 
		return (strpos($format,'C') === 0);
591 aurelien 464 
	}
1154 jpm 465 
 
591 aurelien 466 
	public function estUnFormatRogne($format) {
1154 jpm 467 
		return (strpos($format,'R') === 1);
591 aurelien 468 
	}
1154 jpm 469 
 
591 aurelien 470 
	public function estPaysage($informations_images) {
471 
		return $informations_images['largeur'] > $informations_images['hauteur'];
472 
	}
1154 jpm 473 
 
591 aurelien 474 
	public function estPortait($informations_images) {
475 
		return $informations_images['largeur'] < $informations_images['hauteur'];
476 
	}
1154 jpm 477 
 
591 aurelien 478 
	public function renvoyerTauxCompressionPourPoids($poids_octets) {
970 aurelien 479 
		$poids_max_octets = $this->config['cel']['taille_max'];
1154 jpm 480 
 
591 aurelien 481 
		$ratio_compression = 100 ;
1154 jpm 482 
 
2462 jpm 483 
		if ($poids_octets >= $poids_max_octets) {
484 
			$ratio_compression = 75 ;
485 
		}
1154 jpm 486 
 
2462 jpm 487 
		return $ratio_compression;
591 aurelien 488 
	}
1154 jpm 489 
 
591 aurelien 490 
	public function convertirIdBddVersNomFichier($id, $format, $extension = 'jpg') {
672 jpm 491 
		// creation du format original
3459 killian 492 
		$id_avec_zeros = sprintf('%09s', $id);
493 
		$id_avec_zeros_underscores = wordwrap($id_avec_zeros, 3 , '_', true);
1154 jpm 494 
 
3459 killian 495 
		// déterminationnage de l'extension
496 
		$path = $this->obtenirDossierPourFormat($id, $format);
497 
		foreach(['jpg', 'JPG', 'png', 'PNG'] as $ext) {
498 
			if (file_exists($path.'/'.$id_avec_zeros_underscores.'_'.$format.'.'.$ext)) {
499 
				$extension = $ext;
500 
				break;
501 
			}
502 
		}
503 
 
591 aurelien 504 
		$nom_fichier = $id_avec_zeros_underscores.'_'.$format.'.'.$extension;
1154 jpm 505 
 
591 aurelien 506 
		return $nom_fichier;
507 
	}
1154 jpm 508 
 
591 aurelien 509 
	public function convertirBaseNomFichierVersIdBdd($nom_fichier, $formats) {
510 
		$nom_fichier_sans_extension = trim($nom_fichier, '.jpg');
1154 jpm 511 
 
2462 jpm 512 
		foreach ($formats as $format) {
591 aurelien 513 
			$nom_fichier_sans_extension = trim($nom_fichier_sans_extension, '_'.$format);
514 
		}
515 
		$id_image = str_replace('_', '', $nom_fichier_sans_extension);
1154 jpm 516 
 
591 aurelien 517 
		// suppression des 0 devant
518 
		$id_image += 0;
1154 jpm 519 
 
591 aurelien 520 
		return $id_image;
521 
	}
1154 jpm 522 
 
632 aurelien 523 
	public function ecrireImageSurDisque($image_binaire, $id, $format, $compression = 100) {
591 aurelien 524 
		umask(0);
1154 jpm 525 
 
591 aurelien 526 
		$chemin_sur_serveur_final = $this->creerSiNecessaireEtRenvoyerCheminStockageFichierPourIdEtFormat($id, $format);
527 
		$nom_fichier = $this->convertirIdBddVersNomFichier($id, $format);
1154 jpm 528 
 
632 aurelien 529 
		if (file_exists($chemin_sur_serveur_final.'/'.$nom_fichier)) {
591 aurelien 530 
			unlink($chemin_sur_serveur_final.'/'.$nom_fichier);
531 
		}
1154 jpm 532 
 
668 aurelien 533 
		// attention, ceci ne preserve pas les metadonnées
632 aurelien 534 
		imagejpeg($image_binaire, $chemin_sur_serveur_final.'/'.$nom_fichier, $compression);
591 aurelien 535 
		chmod($chemin_sur_serveur_final.'/'.$nom_fichier,$this->droits);
536 
	}
1154 jpm 537 
 
538 
	public function ecrireImageSurDisqueAvecMeta($chemin_image_a_stocker, $compression = 100) {
2704 mathias 539 
		try {
540 
			$img = new Imagick($chemin_image_a_stocker);
1154 jpm 541 
 
2704 mathias 542 
			// l'utilisation d'image magick préserve les métadonnées lors d'une recompression
543 
			$img->setformat('jpeg');
544 
			$img->setImageCompression(imagick::COMPRESSION_JPEG);
545 
			$img->setCompressionQuality($compression);
546 
			$img->writeImage($chemin_image_a_stocker);
547 
			$img->destroy();
548 
 
549 
			chmod($chemin_image_a_stocker, $this->droits);
550 
			return true;
551 
		} catch (ImagickException $e) {
552 
			return false;
553 
		}
591 aurelien 554 
	}
1154 jpm 555 
 
591 aurelien 556 
	public function renvoyerEtCreerImageCarreeBlancheSelonFormat($cote) {
1154 jpm 557 
		$image_blanche = imagecreatetruecolor($cote, $cote);
591 aurelien 558 
		$blanc = imagecolorallocate($image_blanche, 255, 255, 255);
559 
		imagefilledrectangle($image_blanche, 0, 0, $cote, $cote, $blanc);
560 
		return $image_blanche;
561 
	}
1154 jpm 562 
 
563 
	public function detruireImageEnMemoire($image) {
591 aurelien 564 
		imagedestroy($image);
565 
	}
1154 jpm 566 
 
2370 mathias 567 
	/**
568 
	 * Supprime une image du disque, ainsi que tous les formats générés
2462 jpm 569 
	 *
2370 mathias 570 
	 * @param Integer $id
571 
	 * @return boolean true si tous les formats y compris l'original ont été détruits, false s'il en reste au moins un
572 
	 */
591 aurelien 573 
	public function detruireImageSurDisque($id) {
574 
		$formats = $this->getFormats();
575 
		// on detruit aussi l'image originale
576 
		$formats[] = 'O';
1154 jpm 577 
 
2370 mathias 578 
		$destruction_formats_fichier = true;
579 
		// destructions de chacun des formats définis
591 aurelien 580 
		foreach($formats as $format) {
581 
			$dossier_format = $this->obtenirDossierPourFormat($id, $format);
582 
			$nom_fichier = $this->convertirIdBddVersNomFichier($id, $format);
1154 jpm 583 
 
632 aurelien 584 
			if (file_exists($dossier_format.'/'.$nom_fichier)) {
2370 mathias 585 
				$detruit = unlink($dossier_format.'/'.$nom_fichier);
586 
				$destruction_formats_fichier = ($destruction_formats_fichier && $detruit);
621 aurelien 587 
			}
591 aurelien 588 
		}
1154 jpm 589 
 
621 aurelien 590 
		return $destruction_formats_fichier;
591 aurelien 591 
	}
1154 jpm 592 
 
1755 raphael 593 
	// recopie de Cel->logger() (pas d'extends pour ça)
594 
	public function logger($index,$chaine) {
2462 jpm 595 
		if (!class_exists('Log')) {
1755 raphael 596 
			Log::getInstance();
597 
		}
598 
 
599 
		Log::setCheminLog($this->config['log']['cheminlog']);
600 
		Log::setTimeZone($this->config['log']['timezone']);
601 
		Log::setTailleMax($this->config['log']['taillemax']);
602 
 
603 
		Log::ajouterEntree($index,$chaine);
604 
	}
605 
 
1154 jpm 606 
	/*
632 aurelien 607 
	 * edge-maximizing crop
1154 jpm 608 
	 * determines center-of-edginess, then tries different-sized crops around it.
632 aurelien 609 
	 * picks the crop with the highest normalized edginess.
610 
	 * see documentation on how to tune the algorithm
611 
	 *
612 
	 * $informations_image - le tableau d'informations sur l'image tel que renvoyé par la fonction obtenirImageEtInfosPourChemin
613 
	 * $format - le format (ex. : CS, XS, XL, CRS)
614 
	*/
672 jpm 615 
	public function opticrop($informations_image, $format) {
632 aurelien 616 
		umask(0);
2238 mathias 617 
		$erreur_ecriture = false;
1154 jpm 618 
 
632 aurelien 619 
		$nom_temp = md5(time());
1154 jpm 620 
		$chemin_temp =
621 
 
970 aurelien 622 
		$out = $this->config['cel']['chemin_stockage_temp'].'/'.$nom_temp;
1154 jpm 623 
 
632 aurelien 624 
		$dimension_vignettes = $this->obtenirDimensionsPourFormat($format);
1154 jpm 625 
 
632 aurelien 626 
		$largeur_vignette = $dimension_vignettes['largeur'];
627 
		$hauteur_vignette = $dimension_vignettes['hauteur'];
1154 jpm 628 
 
2462 jpm 629 
		// source dimensions
630 
		$largeur_image_originale = $informations_image['largeur'];
631 
		$hauteur_image_originale = $informations_image['hauteur'];
1154 jpm 632 
 
2462 jpm 633 
		$chemin_image = $informations_image['chemin'];
1154 jpm 634 
 
2462 jpm 635 
		// parameters for the edge-maximizing crop algorithm
636 
		$r = 1;         // radius of edge filter
637 
		$nk = 9;        // scale count: number of crop sizes to try
638 
		$gamma = 0.2;   // edge normalization parameter -- see documentation
639 
		$ar = $largeur_vignette/$hauteur_vignette;    // target aspect ratio (AR)
640 
		$ar0 = $largeur_image_originale/$hauteur_image_originale;    // original aspect ratio (AR)
1154 jpm 641 
 
2462 jpm 642 
		//echo("$chemin_image: $largeur_image_originale x $hauteur_image_originale => $largeur_vignette x $hauteur_vignette");
2698 mathias 643 
		try {
644 
			$img = new Imagick($chemin_image); // ce machin jette une ImagickException si le fichier est vide
2702 mathias 645 
			$imgcp = clone $img;
2698 mathias 646 
			// compute center of edginess
647 
			$img->edgeImage($r);
648 
			$img->modulateImage(100,0,100); // grayscale
649 
			$img->blackThresholdImage("#0f0f0f");
650 
			$retour_ecriture_img = $img->writeImage($out);
3056 mathias 651 
 
2698 mathias 652 
			if ($retour_ecriture_img !== true) {
653 
				error_log("Erreur d'écriture Imagick : [" . $chemin_image . "] vers [" . $out . "]");
654 
				$erreur_ecriture = true;
655 
			}
656 
			// use gd for random pixel access
657 
			$im = ImageCreateFromJpeg($out);
658 
 
659 
			if ($im === false) {
660 
				error_log("GD ne peut pas lire l'image créée par Imagick : [" . $chemin_image . "] vers [" . $out . "]");
661 
				$erreur_ecriture = true;
662 
			}
663 
		} catch (ImagickException $e) {
664 
			// En principe si on se trouve ici c'est que l'image est vide
2462 jpm 665 
			$erreur_ecriture = true;
2698 mathias 666 
			$image_sortie = false;
2462 jpm 667 
		}
2238 mathias 668 
 
2462 jpm 669 
		if (! $erreur_ecriture) {
670 
			$xcenter = 0;
671 
			$ycenter = 0;
672 
			$sum = 0;
673 
			$n = 100000;
674 
			for ($k=0; $k<$n; $k++) {
675 
				$i = mt_rand(0,$largeur_image_originale-1);
676 
				$j = mt_rand(0,$hauteur_image_originale-1);
677 
				$val = imagecolorat($im, $i, $j) & 0xFF;
678 
				$sum += $val;
679 
				$xcenter += ($i+1)*$val;
680 
				$ycenter += ($j+1)*$val;
681 
			}
682 
			$xcenter /= $sum;
683 
			$ycenter /= $sum;
1154 jpm 684 
 
2462 jpm 685 
			// crop source img to target AR
686 
			if ($largeur_image_originale/$hauteur_image_originale > $ar) {
687 
				// source AR wider than target
688 
				// crop width to target AR
689 
				$wcrop0 = round($ar*$hauteur_image_originale);
690 
				$hcrop0 = $hauteur_image_originale;
691 
			} else {
3056 mathias 692 
				// source AR wider than target
2462 jpm 693 
				// crop height to target AR
694 
				$wcrop0 = $largeur_image_originale;
695 
				$hcrop0 = round($largeur_image_originale/$ar);
696 
			}
1154 jpm 697 
 
2462 jpm 698 
			// crop parameters for all scales and translations
699 
			$params = array();
1154 jpm 700 
 
2462 jpm 701 
			// crop at different scales
702 
			$hgap = $hcrop0 - $hauteur_vignette;
703 
			$hinc = ($nk == 1) ? 0 : $hgap / ($nk - 1);
704 
			$wgap = $wcrop0 - $largeur_vignette;
705 
			$winc = ($nk == 1) ? 0 : $wgap / ($nk - 1);
706 
 
707 
			// find window with highest normalized edginess
708 
			$n = 10000;
709 
			$maxbetanorm = 0;
710 
			$maxfile = '';
711 
			$maxparam = array('w'=>0, 'h'=>0, 'x'=>0, 'y'=>0);
712 
 
713 
			for ($k = 0; $k < $nk; $k++) {
714 
				$hcrop = round($hcrop0 - $k*$hinc);
715 
				$wcrop = round($wcrop0 - $k*$winc);
716 
				$xcrop = $xcenter - $wcrop / 2;
717 
				$ycrop = $ycenter - $hcrop / 2;
718 
				//echo("crop: $wcrop, $hcrop, $xcrop, $ycrop");
719 
 
720 
				if ($xcrop < 0) $xcrop = 0;
721 
				if ($xcrop+$wcrop > $largeur_image_originale) $xcrop = $largeur_image_originale-$wcrop;
722 
				if ($ycrop < 0) $ycrop = 0;
723 
				if ($ycrop+$hcrop > $hauteur_image_originale) $ycrop = $hauteur_image_originale-$hcrop;
724 
 
725 
				$beta = 0;
726 
				for ($c=0; $c<$n; $c++) {
727 
					$i = mt_rand(0,$wcrop-1);
728 
					$j = mt_rand(0,$hcrop-1);
729 
					$beta += imagecolorat($im, $xcrop+$i, $ycrop+$j) & 0xFF;
730 
				}
731 
				$area = $wcrop * $hcrop;
732 
				$betanorm = $beta / ($n*pow($area, $gamma-1));
733 
				// echo("beta: $beta; betan: $betanorm");
734 
				// echo("image$k.jpg:<br/>\n<img src=\"$currfile\"/>");
735 
				// best image found, save it
736 
 
737 
				if ($betanorm > $maxbetanorm) {
738 
 
739 
					$maxbetanorm = $betanorm;
740 
					$maxparam['w'] = $wcrop;
741 
					$maxparam['h'] = $hcrop;
742 
					$maxparam['x'] = $xcrop;
743 
					$maxparam['y'] = $ycrop;
744 
					// $maxfile = $currfile;
745 
				}
746 
			}
747 
 
748 
			// écrasement de l'image par la version "croppée"
749 
			$imgcp->cropImage($maxparam['w'], $maxparam['h'], $maxparam['x'], $maxparam['y']);
3056 mathias 750 
			// retailler correctement si au moins une des dimensions de l'image produite est
751 
			// inférieure aux dimensions demandées
752 
			$geo = $imgcp->getImageGeometry();
753 
			$ratio_la = $geo['width'] / $largeur_vignette;
754 
			$ratio_ha = $geo['height'] / $hauteur_vignette;
755 
			if ($ratio_la < 1 || $ratio_ha < 1) {
756 
				// cas kipu - on agrandit au max la dimension ayant le ratio le plus faible
757 
				// (= le plus d'écart avec la taille attendue)
758 
				if ($ratio_la < $ratio_ha) {
759 
					$imgcp->scaleImage($largeur_vignette, 0);
760 
				} else {
761 
					$imgcp->scaleImage(0, $hauteur_vignette);
762 
				}
763 
				// puis on recoupe en centrant à l'arrache - bizarre que le script ne fasse pas ça de base :-/
764 
				$geo = $imgcp->getImageGeometry();
765 
				$imgcp->cropImage($largeur_vignette, $hauteur_vignette, max(0, floor($geo['width'] / 2 - $largeur_vignette / 2)), max(0, floor($geo['height'] / 2 - $hauteur_vignette / 2)));
766 
			} else {
767 
				// cas général
768 
				$imgcp->scaleImage($largeur_vignette, $hauteur_vignette, false);
769 
			}
2462 jpm 770 
			$imgcp->writeImage($out);
771 
 
772 
			// return image
773 
			chmod($out, 0777);
774 
			$img->destroy();
775 
			$imgcp->destroy();
776 
			$image_sortie = ImageCreateFromJpeg($out);
777 
		} else {
778 
			// image n'a pas pu être croppée - on retourne l'originale
779 
			//$image_sortie = ImageCreateFromJpeg($chemin_image);
780 
			$image_sortie = false;
781 
		}
782 
 
783 
		// destruction fichier temporaire dans tous les cas
784 
		unlink($out);
785 
 
786 
		return $image_sortie;
632 aurelien 787 
	}
3056 mathias 788 
}