Subversion Repositories eFlore/Applications.coel-consultation

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
9 jpm 1
<?php
2
// declare(encoding='UTF-8');
3
/**
4
 * Classe Controleur générale de l'application Collection.
5
 *
6
 * @category	php5.2
7
 * @package		Collection
8
 * @author		Jean-Pascal MILCENT <jpm@tela-botanica.org>
9
 * @copyright	2010 Tela-Botanica
10
 * @license		http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL
11
 * @license		http://www.gnu.org/licenses/gpl.html Licence GNU-GPL
12
 * @version		SVN: $Id: ColControleur.php 112 2010-06-28 09:29:46Z jpm $
13
 */
11 jpm 14
abstract class ColControleur extends Controleur {
55 jpm 15
 
89 jpm 16
	const FMT_DATE = '%d/%m/%Y';// Supporte les formats de dates non valides (1989-00-00)
69 jpm 17
	const FMT_DATE_TXT = '%A %d %B %Y';
89 jpm 18
	const FMT_DATE_HEURE = '%d/%m/%Y %H:%i:%s';// Supporte les formats de dates non valides (1989-00-00 00:00:00)
55 jpm 19
	const FMT_DATE_HEURE_TXT = '%A %d %B %Y à %H:%M';
20
 
82 jpm 21
	const META_TITRE = 'titre';
22
	const META_DESCRIPTION = 'description';
23
	const META_TAGS = 'tags';
9 jpm 24
	const RENDU_TETE = 'tete';
25
	const RENDU_CORPS = 'corps';
26
	const RENDU_PIED = 'pied';
82 jpm 27
 
15 jpm 28
	const TYPE_AUTRE = 'AUTRE';
29
	const TYPE_TOTAL = 'TOTAL';
30
	const SEPARATEUR_TYPE_VALEUR = '##';
31
	const SEPARATEUR_VALEURS = ';;';
32
	const SEPARATEUR_DONNEES = '||';
33
	const VALEUR_NULL = 'NC';
9 jpm 34
 
35
	private $sortie = array();
36
	private $parametres = array();
11 jpm 37
	// FIXME : voir s'il est plus intéressant d'utiliser une méthode dans les classes filles
38
	protected $url = null;
9 jpm 39
 
40
	public function __construct()  {
41
		$registre = Registre::getInstance();
42
		$this->parametres = $registre->get('parametres');
43
		$this->url = $this->parametres['url'];
44
		parent::__construct();
45
	}
46
 
47
	/**
82 jpm 48
	 * Attribue une position de sortie à un contenu.
9 jpm 49
	 */
50
	protected function setSortie($position, $contenu, $fusionner = false) {
82 jpm 51
		if ($this->verifierExistenceTypeSortie($position)) {
9 jpm 52
			if ($fusionner) {
53
				$this->sortie[$position] .= $contenu;
54
			} else {
55
				$this->sortie[$position] = $contenu;
56
			}
57
		}
58
	}
11 jpm 59
 
60
	/**
82 jpm 61
	 * Vérifie l'existence du type de sortie indiqué pour son utilisation dans le tableau de sortie.
62
	 * @param string le type de sortie à tester.
63
	 * @return bool true si le type de sortie est valide, sinon false.
11 jpm 64
	 */
82 jpm 65
	private function verifierExistenceTypeSortie($type) {
11 jpm 66
		$existe = true;
82 jpm 67
		if ($type != self::RENDU_TETE &&
68
			$type != self::RENDU_CORPS &&
69
			$type != self::RENDU_PIED &&
70
			$type != self::META_TITRE &&
71
			$type != self::META_DESCRIPTION &&
72
			$type != self::META_TAGS) {
73
			trigger_error("Le type de sortie '$type' n'est pas une valeur prédéfinie.", E_USER_WARNING);
11 jpm 74
			$existe = false;
75
		}
76
		return $existe;
77
	}
78
 
79
	/**
80
	 * Retourne le tableau de sortie à utiliser dans le controleur principal de l'application.
81
	 */
9 jpm 82
	public function getSortie() {
83
		return $this->sortie;
84
	}
85
 
11 jpm 86
	/**
87
	 * Execute l'action d'un module donnée et fusionne le résultat avec le tableau de sortie.
88
	 */
89
	protected function executerAction($ClasseModule, $action) {
90
		$module = new $ClasseModule();
91
		$module->$action();
92
		$this->fusionnerSortie($module->getSortie());
93
 
94
	}
9 jpm 95
 
11 jpm 96
	/**
97
	 * Fusionne un tableau de sortie par défaut avec le tableau passé en paramêtre.
98
	 * @param array le tableau à fusionner
99
	 */
100
	private function fusionnerSortie($sortie) {
101
		$this->sortie = array_merge($this->sortie, $sortie);
102
	}
103
 
16 jpm 104
	protected function construireTxtTruckSimple($chaine_a_analyser) {
105
		return $this->construireTxtTruck($chaine_a_analyser, false, false);
106
	}
107
 
15 jpm 108
	protected function construireTxtTruckSansMajuscule($chaine_a_analyser) {
93 jpm 109
		return $this->construireTxtTruck($chaine_a_analyser, false, true);
15 jpm 110
	}
111
 
16 jpm 112
	protected function construireTxtTruckSansPointFinal($chaine_a_analyser) {
113
		return $this->construireTxtTruck($chaine_a_analyser, true, false);
114
	}
115
 
116
	protected function construireTxtTruck($chaine_a_analyser, $majuscule = true, $point_final = true) {
93 jpm 117
		$termes = $this->traiterTxtTruck($chaine_a_analyser);
118
		$chaine_a_retourner = $this->formaterTableauDeTxt($termes, $majuscule, $point_final);
119
		return $chaine_a_retourner;
120
	}
121
 
122
	protected function traiterTxtTruck($chaine_a_analyser) {
15 jpm 123
		$termes = array();
124
		if ((!is_null($chaine_a_analyser)) && (trim($chaine_a_analyser) != ''))	{
125
			$valeurs = explode(self::SEPARATEUR_VALEURS, $chaine_a_analyser);
126
			$nbre_valeurs = count($valeurs);
127
			if ($nbre_valeurs > 0) {
128
				for ($i = 0; $i < $nbre_valeurs; $i++)	{
129
					$valeur = trim($valeurs[$i]);
130
					if ($valeur != '') {
131
						$valeur_formatee = $this->formaterValeurTruck($valeur);
132
						$termes[] = $valeur_formatee;
133
					}
134
				}
135
			}
136
		}
93 jpm 137
		return $termes;
15 jpm 138
	}
139
 
55 jpm 140
	protected function getTxtTruckParPosition($chaine_a_analyser, $position = 1) {
141
		$retour = '';
142
		if ((!is_null($chaine_a_analyser)) && (trim($chaine_a_analyser) != ''))	{
143
			$valeurs = explode(self::SEPARATEUR_VALEURS, $chaine_a_analyser);
144
			$nbre_valeurs = count($valeurs);
145
			if ($nbre_valeurs > 0) {
146
				$position = $position - 1;
147
				$valeur = trim($valeurs[$position]);
148
				if ($valeur != '') {
149
					$retour = $this->formaterValeurTruck($valeur);
150
				}
151
			}
152
		}
153
		return $retour;
154
	}
155
 
156
	protected function getTableauTruck($chaine_a_analyser) {
157
		$tableau_retour = array();
158
		if ((!is_null($chaine_a_analyser)) && (trim($chaine_a_analyser) != ''))	{
159
			$valeurs = explode(self::SEPARATEUR_VALEURS, $chaine_a_analyser);
160
			$nbre_valeurs = count($valeurs);
161
			if ($nbre_valeurs > 0) {
162
				for ($i = 0; $i < $nbre_valeurs; $i++)	{
163
					$valeur = trim($valeurs[$i]);
164
					if ($valeur != '') {
165
						$tableau_retour[] = $valeur;
166
					}
167
				}
168
			}
169
		}
170
		return $tableau_retour;
171
	}
172
 
15 jpm 173
	private function formaterValeurTruck($valeur) {
174
		$chaine_a_retourner = '';
175
 
176
		if (preg_match('/^[^#]+##[^$]+$/', $valeur))	{
177
			$cle_valeur = explode(self::SEPARATEUR_TYPE_VALEUR, $valeur);
178
			$chaine_a_retourner = (($cle_valeur[1] == '' || $cle_valeur[1] == 'null') ? self::VALEUR_NULL : $cle_valeur[1]);
179
			$chaine_a_retourner .= ' '.$this->formaterParenthese($cle_valeur[0]);
180
		} else if ($valeur != '')	{
181
			$chaine_a_retourner = $valeur;
182
		} else {
183
			trigger_error("Valeur truck posant problème :$valeur", E_USER_NOTICE);
184
		}
185
 
186
		return $chaine_a_retourner;
187
	}
188
 
189
	protected function formaterParenthese($chaine_a_afficher) {
190
		if ($chaine_a_afficher != '') {
191
			$chaine_a_afficher = '('.$chaine_a_afficher.')';
192
		}
193
		return $chaine_a_afficher;
194
	}
195
 
196
	protected function formaterSautDeLigne($chaine_a_formater) {
197
		$txt_a_retourner = preg_replace('/\n/', '<br />', $chaine_a_formater);
198
		return $txt_a_retourner;
199
	}
200
 
16 jpm 201
	protected function formaterTableauDeTxt($tableau_de_txt, $majuscule = true, $point_final = true) {
15 jpm 202
		$chaine_a_afficher = '';
203
		$taille_du_tableau = count($tableau_de_txt);
204
		if ($taille_du_tableau > 0) {
205
			$index_avt_dernier = $taille_du_tableau - 1;
206
			for ($i = 0; $i < $taille_du_tableau; $i++)	{
207
				$mot = $tableau_de_txt[$i];
208
				if ($i != $index_avt_dernier) {
209
					$chaine_a_afficher .= $mot.', ';
210
				} else {
16 jpm 211
					$chaine_a_afficher .= $this->nettoyerPointFinal($mot);
212
					if ($point_final) {
213
						$chaine_a_afficher .= '.';
214
					}
15 jpm 215
				}
216
			}
217
		}
218
		if ($majuscule) {
219
			$chaine_a_afficher = ucfirst($chaine_a_afficher);
220
		}
221
		return $chaine_a_afficher;
222
	}
223
 
224
	protected function formaterAutre($chaine_a_afficher) {
225
		if ($chaine_a_afficher != '') {
226
			$chaine_a_afficher = ' [Autre : '.$chaine_a_afficher.']';
227
		}
228
		return $chaine_a_afficher;
229
	}
230
 
231
	protected function formaterOuiNon($chaine_a_formater) {
232
		$txt_a_retourner = '';
233
		if ($chaine_a_formater == '0') {
234
			$txt_a_retourner = 'non';
235
		} else if ($chaine_a_formater == '1') {
236
			$txt_a_retourner = 'oui';
237
		}
238
		return $txt_a_retourner;
239
	}
240
 
55 jpm 241
	protected function formaterDate($date, $format = self::FMT_DATE_HEURE) {
17 jpm 242
		if ($date == '' || $date == '0000-00-00' || $date == '0000-00-00 00:00:00') {
243
			$date = 'Inconnue';
55 jpm 244
		} else {
89 jpm 245
			if (preg_match('/^([0-9]{4})-([0-9]{2})-([0-9]{2})(?: ([0-9]{2}):([0-9]{2}):([0-9]{2})|)$/', $date, $match)) {// Date Heure
246
				$annee = $match[1];
247
				$mois = $match[2];
248
				$jour = $match[3];
249
				$heure = (isset($match[4])) ? $match[4] : '00';
250
				$minute = (isset($match[5])) ? $match[5] : '00';
251
				$seconde = (isset($match[6])) ? $match[6] : '00';
252
				if ($format == self::FMT_DATE && $jour == '00' && $mois == '00') {
253
					$date = $annee;
254
				} else if ($format == self::FMT_DATE && $jour == '00') {
255
					$date = strftime('%b', mktime(0, 0, 0, $mois, 1)).' '.$annee;
256
				} else {
257
					$timestamp = strtotime($date);
258
					if ($timestamp !== false) {
259
						$date = strftime($format, $timestamp);
260
					}
261
				}
262
			} else {
263
				$e = "La chaine '$date' n'est pas reconnue.";
264
				trigger_error($e, E_USER_WARNING);
265
			}
17 jpm 266
		}
267
		return $date;
268
	}
269
 
93 jpm 270
	protected function formaterCourriels($courriels) {
97 jpm 271
		$fmt_courriels = '';
272
		if (!empty($courriels)) {
273
			$courriels = (is_array($courriels)) ? $courriels : array($courriels);
274
			foreach ($courriels as $cle => $courriel) {
275
				$courriel = preg_replace('/@/', ' [arrobase] ', $courriel);
276
				$courriel = preg_replace('/[.]([^.]+)$/', " [point] $1", $courriel);
277
				$fmt_courriels[] = $this->getVue('courriel', array('courriel' => $courriel));
278
			}
279
			$fmt_courriels = implode(', ', $fmt_courriels);
93 jpm 280
		}
281
		return $fmt_courriels;
282
	}
283
 
15 jpm 284
	protected function nettoyerPointFinal($mot) {
285
		$mot = preg_replace('/[.]$/', '', $mot);
286
		return $mot;
287
	}
288
 
289
	public function construireTxtListeOntologie($chaineAAnalyser, $valeurEstOntologie = true, $typeEstOntologie = true, $donneeEstOntologie = false) {
290
		$termes = array();
291
		$autres = array();
292
		$chaineAAnalyser = trim($chaineAAnalyser);
293
		if ($chaineAAnalyser != '') {
294
			$valeurs = explode(self::SEPARATEUR_VALEURS, $chaineAAnalyser);
295
			$nbreValeurs = count($valeurs);
296
			if ($nbreValeurs > 0)	{
297
				for ($i = 0; $i < $nbreValeurs; $i++)	{
298
					$valeur = $valeurs[$i];
299
 
300
					// VALEUR SANS TYPE
301
					// La valeur sans type est une entrée de l'ontologie
80 jpm 302
					if ($valeurEstOntologie && preg_match('/^[0-9]+$/u', $valeur)) {
15 jpm 303
						if ($valeur == '0') {
304
							$valeur = '';
305
						} else {
306
							$valeurOntologie = Ontologie::getValeur($valeur);
307
							if ($valeurOntologie != '') {
308
								$valeur = $valeurOntologie['nom'];
309
							}
310
						}
311
					}
312
 
313
					// VALEUR AVEC TYPE
314
					// Type : AUTRE
315
					$valeurTypeAutre = self::TYPE_AUTRE.self::SEPARATEUR_TYPE_VALEUR;
80 jpm 316
					if (preg_match('/^'.$valeurTypeAutre.'.+$/u', $valeur)) {
317
						$txtAutre = preg_replace('/^'.$valeurTypeAutre.'/u', '', $valeur);
15 jpm 318
						if ($txtAutre != '') {
319
							$autres[] = $txtAutre;
320
						}
321
						$valeur = '';
322
					}
323
					// Type correspondant à une entrée de l'ontologie
324
					if ($typeEstOntologie) {
19 jpm 325
						$valeurTypeOntologie = '([0-9]+)'.self::SEPARATEUR_TYPE_VALEUR;
80 jpm 326
						$valeurTypeAutre = '([[:alnum:]]+)'.self::SEPARATEUR_TYPE_VALEUR;
327
						if (preg_match('/^'.$valeurTypeOntologie.'.*$/u', $valeur, $match)) {// Cas type : réf. numérique
19 jpm 328
							$type = $match[1];
329
							$valeurOntologieNom = Ontologie::getValeurNom($type);
330
							if ($valeurOntologieNom !== false) {
80 jpm 331
								$valeurOntologieNom .= ' : ';
332
								$valeur = preg_replace('/^'.$type.'/u', $valeurOntologieNom, $valeur);
15 jpm 333
							}
80 jpm 334
						} else if (preg_match('/^'.$valeurTypeAutre.'.*$/u', $valeur, $match)) {// Cas type : AUTRE
335
							$type = $match[1];
336
							$valeur = preg_replace('/^'.$type.'/u', $type.' : ', $valeur);
15 jpm 337
						}
338
					}
339
					// Donnée correspondant à une entrée de l'ontologie
340
					if ($donneeEstOntologie) {
341
						$donneeOntologie = self::SEPARATEUR_TYPE_VALEUR.'([0-9]+)';
80 jpm 342
						if (preg_match('/^.+'.$donneeOntologie.'$/u', $valeur, $match)) {
15 jpm 343
							$donnee = $match[1];
344
							$donnee = str_replace(self::SEPARATEUR_TYPE_VALEUR, '', $donnee);
19 jpm 345
							$valeurOntologieNom = Ontologie::getValeurNom($donnee);
346
							if ($valeurOntologieNom !== false) {
80 jpm 347
								$valeur = preg_replace('/'.$donnee.'$/u', $valeurOntologieNom, $valeur);
15 jpm 348
							}
349
						}
350
					}
351
 
352
					// Nettoyage final
353
					$valeur = preg_replace('/'.self::SEPARATEUR_TYPE_VALEUR.'/', '', $valeur);
354
 
355
					if ($valeur != '') {
356
						$termes[] = $valeur;
357
					}
358
				}
359
			}
360
		}
361
 
362
		$chaineTermes = $this->formaterTableauDeTxt($termes);
363
		$chaineAutres = $this->formaterTableauDeTxt($autres);
364
		$chaineARetourner = $chaineTermes.$this->formaterAutre($chaineAutres);
365
 
366
		return $chaineARetourner;
367
	}
368
 
112 jpm 369
	protected function obtenirUrlRecherche($txt = null) {
370
		$this->url->setRequete(false);
371
		$this->url->setVariableRequete('module', 'Recherche');
372
		$this->url->setVariableRequete('action', 'rechercher');
373
		if (!is_null($txt)) {
374
			$this->url->setVariableRequete('recherche', $txt);
375
		}
376
		$url = $this->url->getURL();
377
		$this->url->unsetVariablesRequete(array('module', 'action', 'recherche'));
378
		return $url;
379
	}
380
 
18 jpm 381
	protected function obtenirUrlFicheStructure($id_structure) {
112 jpm 382
		$this->url->setRequete(false);
383
		$this->url->setVariableRequete('module', 'FicheStructure');
18 jpm 384
		$this->url->setVariableRequete('id', $id_structure);
385
		$url = $this->url->getURL();
112 jpm 386
		$this->url->unsetVariablesRequete(array('module', 'id'));
18 jpm 387
		return $url;
388
	}
389
 
55 jpm 390
	protected function obtenirUrlFicheCollection($id_collection) {
112 jpm 391
		$this->url->setRequete(false);
392
		$this->url->setVariableRequete('module', 'FicheCollection');
18 jpm 393
		$this->url->setVariableRequete('id', $id_collection);
394
		$url = $this->url->getURL();
112 jpm 395
		$this->url->unsetVariablesRequete(array('module', 'id'));
18 jpm 396
		return $url;
397
	}
19 jpm 398
 
55 jpm 399
	protected function obtenirUrlFichePersonne($id_personne) {
112 jpm 400
		$this->url->setRequete(false);
401
		$this->url->setVariableRequete('module', 'FichePersonne');
55 jpm 402
		$this->url->setVariableRequete('id', $id_personne);
403
		$url = $this->url->getURL();
112 jpm 404
		$this->url->unsetVariablesRequete(array('module', 'id'));
55 jpm 405
		return $url;
406
	}
407
 
19 jpm 408
	protected function postraiterDonnees(&$tableau) {
409
		if (count($tableau) > 0) {
410
			foreach ($tableau as $cle => &$valeur) {
411
				if ($valeur == '') {
412
					$valeur = '&nbsp;';
413
				} else if (is_string($valeur)) {
414
					$valeur = preg_replace('/&(?!amp;)/i', '&amp;', $valeur, -1);
415
				} else if (is_array($valeur)) {
416
					$this->postraiterDonnees($valeur);
417
				}
418
			}
419
		}
420
	}
85 jpm 421
 
422
	protected function chargerPiedDePage() {
91 jpm 423
		$donnees['appli'] = Application::getInfo();
424
		$this->setSortie(self::RENDU_PIED, $this->getVue('pied', $donnees));
85 jpm 425
	}
9 jpm 426
}