Subversion Repositories eFlore/Projets.eflore-projets

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
701 aurelien 1
<?php
2
// declare(encoding='UTF-8');
3
/**
4
* Gère le sous-service Taxons de Cartes.
5
*
6
* @see http://www.tela-botanica.org/wikini/eflore/wakka.php?wiki=EfloreApi01Cartes
7
*
8
* @package eFlore/services
9
* @author Jean-Pascal MILCENT <jpm@tela-botanica.org>
10
* @license GPL v3 <http://www.gnu.org/licenses/gpl.txt>
11
* @license CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>
12
* @version 1.0
13
* @copyright 1999-2012 Tela Botanica (accueil@tela-botanica.org)
14
*/
15
// TODO : Config et Outils sont des classes statiques qui doivent poser des pb pour les tests...
16
class TaxonsCartes {
17
 
18
	private $parametres = array();
19
	private $ressources = array();
20
 
21
	const CODE_REFTAX_DEFAUT = 'bdtxa';
22
	const TYPE_ID_DEFAUT = 'nn';
23
	const CARTE_DEFAUT = 'antilles';
24
	const FORMAT_DEFAUT = '587x550';
25
	const VERSION_DEFAUT = '+';
26
	const MIME_SVG = 'image/svg+xml';
27
	const MIME_PNG = 'image/png';
28
	const PRESENCE_CHOROLOGIE = '15';
29
 
30
	private $config = array();
31
	private $convertisseur = '';
32
	private $cheminCartesBase = '';
33
	private $formatsSupportes = array(self::MIME_SVG, self::MIME_PNG);
34
	private $reftaxSupportes = array(self::CODE_REFTAX_DEFAUT);
35
	private $UrlNavigation = null;
36
	private $taxonsDemandes = array();
37
	private $imgLargeur = 0;
38
	private $imgHauteur = 0;
39
	private $tableMeta = '';
40
	private $tableOntologie = '';
41
	private $tableChorodep = '';
42
	private $metadonnees = '';
43
	private $ontologies = '';
44
	private $priorites = '';
45
	private $version = '';
46
	private $legende = array();
47
	private $donnees = array();
48
 
49
 
50
	public function __construct(Conteneur $conteneur) {
51
		$this->Bdd = $conteneur->getBdd();
52
		$this->tableOntologie = $conteneur->getParametre('bdd_table_ontologies');
53
		$this->config = $conteneur->getParametre('Cartes');
54
		$this->convertisseur = $this->config['convertisseur'];
55
		$this->tableMeta = $conteneur->getParametre('bdd_table_meta');
56
		$this->tableOntologie = $conteneur->getParametre('bdd_table_ontologies');
57
		$this->cheminCartesBase = $this->config['chemin'];
58
		$cacheOptions = array('mise_en_cache' => $this->config['cache']['miseEnCache'],
59
					'stockage_chemin' => $this->config['cache']['stockageChemin'],
60
					'duree_de_vie' => $this->config['cache']['dureeDeVie']);
61
		$this->cache = $conteneur->getCacheSimple($cacheOptions);
62
	}
63
 
64
	public function consulter($ressources, $parametres) {
65
		$this->parametres = $parametres;
66
		$this->ressources = $ressources;
67
 
68
		$this->definirValeurParDefautDesParametres();
69
		$this->verifierParametres();
70
 
71
		$resultat = $this->obtenirResultat();
72
 
73
		return $resultat;
74
	}
75
 
76
	private function definirValeurParDefautDesParametres() {
77
		if (isset($this->parametres['retour']) == false) {
78
			$this->parametres['retour'] = self::MIME_SVG;
79
		}
80
		if (isset($this->parametres['retour.format']) == false) {
81
			$this->parametres['retour.format'] = self::FORMAT_DEFAUT;
82
		}
83
		if (isset($this->parametres['version.projet']) == false) {
84
			$this->parametres['version.projet'] = self::VERSION_DEFAUT;
85
		}
86
	}
87
 
88
	private function verifierParametres() {
89
		$erreurs = array();
90
 
91
		if (isset($this->parametres['retour']) == false) {
92
			$erreurs[] = "Le paramètre type de retour 'retour' est obligatoire.";
93
		}
94
		if ($this->verifierValeurParametreRetour() == false) {
95
			$erreurs[] = "Le type de retour '{$this->parametres['retour']}' n'est pas supporté.";
96
		}
97
		if (isset($this->parametres['retour.format']) == false) {
98
			$erreurs[] = "Le paramètre de format de retour 'retour.format' est obligatoire.";
99
		}
100
		if ($this->verifierValeurParametreFormat() == false) {
101
			$erreurs[] = "Le type de format '{$this->parametres['retour.format']}' n'est pas supporté.".
102
				"Veuillez indiquer un nombre entier correspondant à la largeur désirée pour la carte.";
103
		}
104
		if ($this->verifierValeurParametreVersionProjet() == false) {
105
			$erreurs[] = "Le format de version.projet '{$this->parametres['version.projet']}' n'est pas supporté.".
106
				"Veuillez indiquer le code '+' (=dernière version) ou une année sur 4 chiffres séparé d'un mois ".
107
				"sur deux chiffres par un point. Ex. : 2012.01";
108
		}
109
 
110
		if (count($erreurs) > 0) {
111
			$message = implode('<br />', $erreurs);
112
			$code = RestServeur::HTTP_CODE_MAUVAISE_REQUETE;
113
			throw new Exception($message, $code);
114
		}
115
	}
116
 
117
	private function verifierValeurParametreRetour() {
118
		return in_array($this->parametres['retour'], $this->formatsSupportes);
119
	}
120
 
121
	private function verifierValeurParametreFormat() {
122
		if ($ok = preg_match('/^([0-9]+)$/', $this->parametres['retour.format'], $match)) {
123
			$this->imgLargeur = $match[1];
124
		} else if ($ok = preg_match('/^([0-9]+)x([0-9]+)$/', $this->parametres['retour.format'], $match)) {
125
			$this->imgLargeur = $match[1];
126
			$this->imgHauteur = $match[2];
127
		}
128
		return $ok;
129
	}
130
	private function verifierValeurParametreVersionProjet() {
131
		$ok = (preg_match('/^(?:[+]|[0-9]{4}\.[0-9]{2})$/', $this->parametres['version.projet']) == 0) ? false : true;
132
		return $ok;
133
	}
134
 
135
	private function obtenirResultat() {
136
		$this->analyserIdentifiants();
137
		$this->verifierIdentifiants();
138
 
139
		$this->chargerMetadonnees();
140
		$this->definirVersion();
141
		$this->tableChorodep = 'bdtxa_v'.str_replace('.', '_', $this->version);
142
		$this->chargerOntologies();
143
		$this->chargerLegende();
144
		$this->chargerPrioritesLegende();
145
		$this->chargerDonnees();
146
		$svg = $this->genererSVG();
147
		$img = ($this->parametres['retour'] == self::MIME_PNG) ? $this->convertirEnPNG($svg) : $svg;
148
 
149
		$resultat = new ResultatService();
150
		$resultat->corps = $img;
151
		$resultat->mime = $this->parametres['retour'];
152
 
153
		return $resultat;
154
	}
155
 
156
	private function analyserIdentifiants() {
157
		$ids = $this->ressources[0];
158
		if (preg_match('/^[0-9]+$/', $ids)) {
159
			$this->taxonsDemandes[self::CODE_REFTAX_DEFAUT]['nn'][] = $ids;
160
		} else {
161
			// ceci contient potentiellement des formes ref_tax1.nn:1,2;ref_tax2.nt:3,4
162
			$projetsListeEtNumNoms = explode(';', $ids);
163
			if (count($projetsListeEtNumNoms) > 0) {
164
				foreach ($projetsListeEtNumNoms as $projetEtNumNoms) {
165
					$projetEtNumNoms = (strpos($projetEtNumNoms, ':')) ? $projetEtNumNoms : self::CODE_REFTAX_DEFAUT.'.nn:'.$projetEtNumNoms;
166
					list($projetEtType, $numNoms) = explode(':', $projetEtNumNoms);
167
 
168
					$projetEtType = (strpos($projetEtType, '.')) ? $projetEtType : self::CODE_REFTAX_DEFAUT.'.'.$projetEtType;
169
					list($projet, $type) = explode('.', $projetEtType);
170
 
171
					$this->taxonsDemandes[$projet][$type] = explode(',', $numNoms);
172
				}
173
			}
174
		}
175
	}
176
 
177
	private function verifierIdentifiants() {
178
		foreach (array_keys($this->taxonsDemandes) as $reftax) {
179
			$ok = in_array($reftax, $this->reftaxSupportes);
180
			if ($ok == false) {
181
				$message = "Le reférentiel taxonomique '$reftax' n'est pas pris en compte par ce projet.";
182
				$code = RestServeur::HTTP_CODE_MAUVAISE_REQUETE;
183
				throw new Exception($message, $code);
184
			}
185
		}
186
	}
187
 
188
	private function chargerMetadonnees() {
189
		$requete = 'SELECT * '.
190
			"FROM {$this->tableMeta} ".
191
			"ORDER BY date_creation DESC ";
192
		$resultats = $this->Bdd->recupererTous($requete);
193
 
194
		if (!is_array($resultats) || count($resultats) <= 0) {
195
			$message = "Les méta-données n'ont pu être chargée pour la ressource demandée";
196
			$code = RestServeur::HTTP_CODE_RESSOURCE_INTROUVABLE;
197
			throw new Exception($message, $code);
198
		}
199
 
200
		$this->metadonnees = $resultats;
201
	}
202
 
203
	private function definirVersion() {
204
		if ($this->parametres['version.projet'] == '+') {
205
			$this->version = $this->metadonnees[0]['version'];
206
		} else {
207
			$this->version = $this->parametres['version.projet'];
208
		}
209
	}
210
 
211
	private function chargerOntologies() {
212
		$requete = 'SELECT * '.
213
			"FROM {$this->tableOntologie} WHERE classe_id = (SELECT id FROM eflore_ontologies WHERE code ='presenceChorologie')";
214
		$resultats = $this->Bdd->recupererTous($requete);
215
 
216
		if (!is_array($resultats) || count($resultats) <= 0) {
217
			$message = "Les données de légende n'ont pu être chargées pour la ressource demandée";
218
			$code = RestServeur::HTTP_CODE_RESSOURCE_INTROUVABLE;
219
			throw new Exception($message, $code);
220
		}
221
 
222
		foreach ($resultats as $ontologie) {
223
			$this->ontologies[$ontologie['id']] = $this->extraireComplementsOntologies($ontologie);
224
		}
225
	}
226
 
227
 
228
	private function extraireComplementsOntologies($ontologie) {
229
		if ($ontologie['complements'] != '') {
230
			$complements = explode(',', trim($ontologie['complements']));
231
			foreach ($complements as $complement) {
232
				list($cle, $val) = explode('=', trim($complement));
233
				$ontologie[trim($cle)] = trim($val);
234
			}
235
		}
236
		return $ontologie;
237
	}
238
 
239
	private function chargerLegende() {
240
		foreach ($this->ontologies as $ontologie) {
241
			if ($ontologie['classe_id'] == self::PRESENCE_CHOROLOGIE) {
242
				$this->legende[$ontologie['code']] = $ontologie['legende'];
243
			}
244
		}
245
	}
246
 
247
	private function chargerPrioritesLegende() {
248
		foreach ($this->ontologies as $ontologie) {
249
			if ($ontologie['classe_id'] == self::PRESENCE_CHOROLOGIE && isset($ontologie['priorite'])) {
250
				$this->priorites[$ontologie['code']] = $ontologie['priorite'];
251
			}
252
		}
253
	}
254
 
255
	private function chargerDonnees() {
256
		$conditions = $this->getConditions();
257
		$requete = 'SELECT nom_sci, `presence_Guadeloupe`, `presence_Martinique`, `presence_Saint_Martin`, '.
258
		            "`presence_La_Desirade`, `presence_Saint_Barthelemy`, `presence_Marie_Galante`, ".
259
		            "`presence_Les-Saintes` ".
260
					"FROM {$this->tableChorodep} ".
261
		(isset($conditions) ? 'WHERE '.implode(' AND ', $conditions) : '');
262
		$resultat = $this->Bdd->recupererTous($requete);
263
		$this->donnees = $resultat;
264
	}
265
 
266
	private function getConditions() {
267
		$conditions = null;
268
		if ($nnListe = $this->getListeNumNom()) {
269
			$conditions[] = "num_nom IN ($nnListe) ";
270
		}
271
		if ($ntListe = $this->getListeNumTax()) {
272
			$conditions[] = "num_tax IN ($ntListe) ";
273
		}
274
		return $conditions;
275
	}
276
 
277
	private function getListeNumNom() {
278
		$nnListe = null;
279
		$refTax = self::CODE_REFTAX_DEFAUT;
280
		if (isset($this->taxonsDemandes[$refTax])) {
281
			$nnProteges = array();
282
			if (isset($this->taxonsDemandes[$refTax]['nn'])) {
283
				foreach ($this->taxonsDemandes[$refTax]['nn'] as $nn) {
284
					$nnProteges[] = $this->Bdd->proteger($nn);
285
				}
286
				$nnListe = implode(',', $nnProteges);
287
			}
288
		}
289
		return $nnListe;
290
	}
291
 
292
	private function getListeNumTax() {
293
		$ntListe = null;
294
		$refTax = self::CODE_REFTAX_DEFAUT;
295
		if (isset($this->taxonsDemandes[$refTax])) {
296
			$ntProteges = array();
297
			if (isset($this->taxonsDemandes[$refTax]['nt'])) {
298
				foreach ($this->taxonsDemandes[$refTax]['nt'] as $nt) {
299
					$ntProteges[] = $this->Bdd->proteger($nt);
300
				}
301
				$ntListe = implode(',', $ntProteges);
302
			}
303
		}
304
		return $ntListe;
305
	}
306
 
307
	private function genererSVG() {
308
		$dom = new DOMDocument('1.0', 'UTF-8');
309
		$dom->validateOnParse = true;
310
 
311
		$fichierCarteSvg = $this->cheminCartesBase.self::CARTE_DEFAUT.'.svg';
312
		$dom->load($fichierCarteSvg);
313
 
314
		$racineElement = $dom->documentElement;
315
		$racineElement->setAttribute('width', $this->imgLargeur);
316
		if ($this->imgHauteur != 0) {
317
			$racineElement->setAttribute('height', $this->imgHauteur);
318
		}
319
 
320
		$css = $this->creerCssCarte();
321
		$styleElement = $dom->getElementsByTagName('style')->item(0);
322
		$css = $styleElement->nodeValue.$css;
323
		$txtCss = $dom->createCDATASection($css);
324
		$styleElement->nodeValue = '';
325
		$styleElement->appendChild($txtCss);
326
 
327
		$titre = $this->creerTitre();
328
		$titreCdata = $dom->createCDATASection($titre);
329
		$titreElement = $dom->getElementsByTagName('title')->item(0);
330
		$titreElement->nodeValue = '';
331
		$titreElement->appendChild($titreCdata);
332
 
333
		$taxonTitre = $this->creerTitreTaxon();
334
		$taxonCdata = $dom->createCDATASection($taxonTitre);
335
		$xpath = new DOMXPath($dom);
336
		$taxonTitreEl = $xpath->query("//*[@id='titre-taxon']")->item(0);
337
		$taxonTitreEl->nodeValue = '';
338
		$taxonTitreEl->setAttribute('title', $taxonTitre);
339
		$taxonTitreEl->appendChild($taxonCdata);
340
 
341
		$svg = $dom->saveXML();
342
		return $svg;
343
	}
344
 
345
	private function creerCssCarte() {
346
		$css = '';
347
		$this->getZonesPriorites();
348
		$zonesCouleurs = $this->getZonesCouleurs();
349
		foreach ($zonesCouleurs as $couleur => $zonesClasses) {
350
			$classes = implode(', ', $zonesClasses);
351
			$css .= "$classes{\nfill:$couleur !important;\n}\n";
352
		}
353
		return $css;
354
	}
355
 
356
	private function getZonesPriorites() {
357
		$this->zones = array();
358
		$zonesPrioritaires = array();
359
		foreach ($this->donnees as $donnee) {
360
			foreach ($donnee as $zoneId => $codeLegende) {
361
				if (preg_match('/^presence_(.)*$/i', $zoneId)) {
362
					$zoneId = $this->formaterZoneId($zoneId);
363
					if (array_key_exists($codeLegende, $this->priorites)) {
364
						$priorite = $this->priorites[$codeLegende];
365
						if (array_key_exists($zoneId, $zonesPrioritaires) == false) {
366
							$zonesPrioritaires[$zoneId] = 0;
367
						}
368
						if ($priorite > $zonesPrioritaires[$zoneId]) {
369
							$zonesPrioritaires[$zoneId] = $priorite;
370
							$this->zones[$zoneId] = $codeLegende;
371
						}
372
					}
373
				}
374
			}
375
		}
376
	}
377
 
378
	private function formaterZoneId($zoneId) {
379
		$zoneId = strtolower(str_replace('presence_', '', $zoneId));
380
		$zoneId = str_replace('-', '_', $zoneId);
381
		return $zoneId;
382
	}
383
 
384
	private function getZonesCouleurs() {
385
		$zones = array();
386
		ksort($this->zones);
387
		foreach ($this->zones as $zoneId => $codeLegende) {
388
			if (array_key_exists($codeLegende, $this->legende)) {
389
				$couleur = $this->legende[$codeLegende];
390
				$zones[$couleur][] = strtolower('#'.sprintf('%02s', $zoneId));
391
			}
392
		}
393
		return $zones;
394
	}
395
 
396
	private function creerTitre() {
397
		$titre = "Carte en cours d'élaboration";
398
		if ($this->donnees != array()) {
399
			$titre .= ' pour '.$this->creerTitreTaxon();
400
		}
401
		return $titre;
402
	}
403
 
404
	private function creerTitreTaxon() {
405
		$titre = '';
406
		$noms = array();
407
		foreach ($this->donnees as $donnee) {
408
			$noms[] = $donnee['nom_sci'];
409
		}
410
		$titre = implode(', ', $noms);
411
		return $titre;
412
	}
413
 
414
	private function convertirEnPNG($svg) {
415
		$png = null;
416
		if (isset($this->convertisseur)) {
417
			if ($this->convertisseur == 'imagick') {
418
				if (extension_loaded('imagick')) {
419
					$png = $this->convertirEnPNGAvecImageMagick($svg);
420
				} else {
421
					$message = "Impossible de générer l'image sur le serveur. Extenssion ImageMagick abscente.";
422
					$code = RestServeur::HTTP_CODE_ERREUR;
423
					throw new Exception($message, $code);
424
				}
425
			} else if ($this->convertisseur == 'rsvg') {
426
				$png = $this->convertirEnPNGAvecRsvg($svg);
427
			} else {
428
				$message = "Le convertisseur indiqué '{$this->convertisseur}' ne fait pas parti de la liste ".
429
					"des convertisseurs disponibles : imagick, rsvg.";
430
				$code = RestServeur::HTTP_CODE_ERREUR;
431
				throw new Exception($message, $code);
432
			}
433
		} else {
434
			$message = "Veuillez indiquer le convertisseur de svg à utiliser pour le service.";
435
			$code = RestServeur::HTTP_CODE_ERREUR;
436
			throw new Exception($message, $code);
437
		}
438
		return $png;
439
	}
440
 
441
	private function convertirEnPNGAvecImageMagick($svg) {
442
		$convertisseur = new Imagick();
443
		$convertisseur->setBackgroundColor(new ImagickPixel('transparent'));
444
		$convertisseur->readImageBlob($svg);
445
		$convertisseur->setImageFormat('png32');
446
		$convertisseur->resizeImage($this->imgLargeur, $this->imgHauteur, imagick::FILTER_LANCZOS, 0, true);
447
		$png = $convertisseur->getImageBlob();
448
		$convertisseur->clear();
449
		$convertisseur->destroy();
450
		return $png;
451
	}
452
 
453
	private function convertirEnPNGAvecRsvg($svg) {
454
		$idFichier = $this->getIdFichier();
455
		$fichierPng = $this->config['cache']['stockageChemin'].$idFichier.'.png';
456
		$fichierSvg = $this->config['cache']['stockageChemin'].$idFichier.'.svg';
457
		file_put_contents($fichierSvg, $svg);
458
		$commande = "rsvg-convert $fichierSvg -d 75 -p 75 -o $fichierPng";
459
		$rsvg = exec($commande);
460
 
461
		$this->indexerFichierPng($fichierPng);
462
		$png = file_get_contents($fichierPng);
463
		return $png;
464
	}
465
 
466
	private function indexerFichierPng($fichierPng) {
467
		$img = imagecreatefrompng($fichierPng);
468
		imagetruecolortopalette($img, false, 32);
469
		$blanc = imagecolorallocate($img, 255, 255, 255);
470
		imagefill($img, 0, 0, $blanc);
471
		imagepng($img, $fichierPng, 9, PNG_ALL_FILTERS);
472
	}
473
 
474
	private function getIdFichier() {
475
		$id = '';
476
		foreach ($this->taxonsDemandes as $reftax => $ids) {
477
			$id[] = $reftax;
478
			foreach ($ids as $type => $vals) {
479
				$id[] = $type;
480
				$id[] = implode('-', $vals);
481
			}
482
		}
483
		$id = implode('-', $id);
484
		return $id;
485
	}
486
 
487
	public function getParametreTableau($cle) {
488
		$tableau = array();
489
		$parametre = $this->config[$cle];
490
		if (empty($parametre) === false) {
491
			$tableauPartiel = explode(',', $parametre);
492
			$tableauPartiel = array_map('trim', $tableauPartiel);
493
			foreach ($tableauPartiel as $champ) {
494
				if (strpos($champ, '=') === false) {
495
					$tableau[] = trim($champ);
496
				} else {
497
					list($cle, $val) = explode('=', $champ);
498
					$tableau[trim($cle)] = trim($val);
499
				}
500
			}
501
		}
502
		return $tableau;
503
	}
504
}
505
?>