Subversion Repositories eFlore/Applications.coel-consultation

Rev

Rev 177 | Go to most recent revision | Details | Compare with Previous | 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: aControleur.php 231 2014-07-17 12:23:56Z mathias $
13 
 */
114 jpm 14 
abstract class aControleur 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;
169 jpm 39 
	protected $registre = array();
9 jpm 40 
 
41 
	public function __construct()  {
169 jpm 42 
		$this->registre = Registre::getInstance();
43 
		$this->parametres = $this->registre->get('parametres');
9 jpm 44 
		$this->url = $this->parametres['url'];
45 
		parent::__construct();
46 
	}
47 
 
48 
	/**
82 jpm 49 
	 * Attribue une position de sortie à un contenu.
9 jpm 50 
	 */
51 
	protected function setSortie($position, $contenu, $fusionner = false) {
82 jpm 52 
		if ($this->verifierExistenceTypeSortie($position)) {
9 jpm 53 
			if ($fusionner) {
54 
				$this->sortie[$position] .= $contenu;
55 
			} else {
56 
				$this->sortie[$position] = $contenu;
57 
			}
58 
		}
59 
	}
11 jpm 60 
 
61 
	/**
82 jpm 62 
	 * Vérifie l'existence du type de sortie indiqué pour son utilisation dans le tableau de sortie.
63 
	 * @param string le type de sortie à tester.
64 
	 * @return bool true si le type de sortie est valide, sinon false.
11 jpm 65 
	 */
82 jpm 66 
	private function verifierExistenceTypeSortie($type) {
11 jpm 67 
		$existe = true;
82 jpm 68 
		if ($type != self::RENDU_TETE &&
69 
			$type != self::RENDU_CORPS &&
70 
			$type != self::RENDU_PIED &&
71 
			$type != self::META_TITRE &&
72 
			$type != self::META_DESCRIPTION &&
73 
			$type != self::META_TAGS) {
74 
			trigger_error("Le type de sortie '$type' n'est pas une valeur prédéfinie.", E_USER_WARNING);
11 jpm 75 
			$existe = false;
76 
		}
77 
		return $existe;
78 
	}
79 
 
80 
	/**
81 
	 * Retourne le tableau de sortie à utiliser dans le controleur principal de l'application.
82 
	 */
9 jpm 83 
	public function getSortie() {
84 
		return $this->sortie;
85 
	}
86 
 
11 jpm 87 
	/**
88 
	 * Execute l'action d'un module donnée et fusionne le résultat avec le tableau de sortie.
89 
	 */
90 
	protected function executerAction($ClasseModule, $action) {
91 
		$module = new $ClasseModule();
92 
		$module->$action();
93 
		$this->fusionnerSortie($module->getSortie());
94 
 
95 
	}
9 jpm 96 
 
11 jpm 97 
	/**
98 
	 * Fusionne un tableau de sortie par défaut avec le tableau passé en paramêtre.
99 
	 * @param array le tableau à fusionner
100 
	 */
101 
	private function fusionnerSortie($sortie) {
102 
		$this->sortie = array_merge($this->sortie, $sortie);
103 
	}
104 
 
16 jpm 105 
	protected function construireTxtTruckSimple($chaine_a_analyser) {
106 
		return $this->construireTxtTruck($chaine_a_analyser, false, false);
107 
	}
108 
 
15 jpm 109 
	protected function construireTxtTruckSansMajuscule($chaine_a_analyser) {
93 jpm 110 
		return $this->construireTxtTruck($chaine_a_analyser, false, true);
15 jpm 111 
	}
112 
 
16 jpm 113 
	protected function construireTxtTruckSansPointFinal($chaine_a_analyser) {
114 
		return $this->construireTxtTruck($chaine_a_analyser, true, false);
115 
	}
116 
 
117 
	protected function construireTxtTruck($chaine_a_analyser, $majuscule = true, $point_final = true) {
93 jpm 118 
		$termes = $this->traiterTxtTruck($chaine_a_analyser);
119 
		$chaine_a_retourner = $this->formaterTableauDeTxt($termes, $majuscule, $point_final);
120 
		return $chaine_a_retourner;
121 
	}
122 
 
123 
	protected function traiterTxtTruck($chaine_a_analyser) {
15 jpm 124 
		$termes = array();
125 
		if ((!is_null($chaine_a_analyser)) && (trim($chaine_a_analyser) != ''))	{
126 
			$valeurs = explode(self::SEPARATEUR_VALEURS, $chaine_a_analyser);
127 
			$nbre_valeurs = count($valeurs);
128 
			if ($nbre_valeurs > 0) {
129 
				for ($i = 0; $i < $nbre_valeurs; $i++)	{
130 
					$valeur = trim($valeurs[$i]);
131 
					if ($valeur != '') {
132 
						$valeur_formatee = $this->formaterValeurTruck($valeur);
133 
						$termes[] = $valeur_formatee;
134 
					}
135 
				}
136 
			}
137 
		}
93 jpm 138 
		return $termes;
15 jpm 139 
	}
140 
 
55 jpm 141 
	protected function getTxtTruckParPosition($chaine_a_analyser, $position = 1) {
142 
		$retour = '';
143 
		if ((!is_null($chaine_a_analyser)) && (trim($chaine_a_analyser) != ''))	{
144 
			$valeurs = explode(self::SEPARATEUR_VALEURS, $chaine_a_analyser);
145 
			$nbre_valeurs = count($valeurs);
146 
			if ($nbre_valeurs > 0) {
147 
				$position = $position - 1;
148 
				$valeur = trim($valeurs[$position]);
149 
				if ($valeur != '') {
150 
					$retour = $this->formaterValeurTruck($valeur);
151 
				}
152 
			}
153 
		}
154 
		return $retour;
155 
	}
156 
 
157 
	protected function getTableauTruck($chaine_a_analyser) {
158 
		$tableau_retour = array();
159 
		if ((!is_null($chaine_a_analyser)) && (trim($chaine_a_analyser) != ''))	{
160 
			$valeurs = explode(self::SEPARATEUR_VALEURS, $chaine_a_analyser);
161 
			$nbre_valeurs = count($valeurs);
162 
			if ($nbre_valeurs > 0) {
163 
				for ($i = 0; $i < $nbre_valeurs; $i++)	{
164 
					$valeur = trim($valeurs[$i]);
165 
					if ($valeur != '') {
166 
						$tableau_retour[] = $valeur;
167 
					}
168 
				}
169 
			}
170 
		}
171 
		return $tableau_retour;
172 
	}
173 
 
15 jpm 174 
	private function formaterValeurTruck($valeur) {
175 
		$chaine_a_retourner = '';
176 
 
177 
		if (preg_match('/^[^#]+##[^$]+$/', $valeur))	{
178 
			$cle_valeur = explode(self::SEPARATEUR_TYPE_VALEUR, $valeur);
179 
			$chaine_a_retourner = (($cle_valeur[1] == '' || $cle_valeur[1] == 'null') ? self::VALEUR_NULL : $cle_valeur[1]);
180 
			$chaine_a_retourner .= ' '.$this->formaterParenthese($cle_valeur[0]);
181 
		} else if ($valeur != '')	{
182 
			$chaine_a_retourner = $valeur;
183 
		} else {
184 
			trigger_error("Valeur truck posant problème :$valeur", E_USER_NOTICE);
185 
		}
186 
 
187 
		return $chaine_a_retourner;
188 
	}
189 
 
190 
	protected function formaterParenthese($chaine_a_afficher) {
191 
		if ($chaine_a_afficher != '') {
192 
			$chaine_a_afficher = '('.$chaine_a_afficher.')';
193 
		}
194 
		return $chaine_a_afficher;
195 
	}
196 
 
197 
	protected function formaterSautDeLigne($chaine_a_formater) {
198 
		$txt_a_retourner = preg_replace('/\n/', '<br />', $chaine_a_formater);
199 
		return $txt_a_retourner;
200 
	}
201 
 
16 jpm 202 
	protected function formaterTableauDeTxt($tableau_de_txt, $majuscule = true, $point_final = true) {
15 jpm 203 
		$chaine_a_afficher = '';
204 
		$taille_du_tableau = count($tableau_de_txt);
205 
		if ($taille_du_tableau > 0) {
206 
			$index_avt_dernier = $taille_du_tableau - 1;
207 
			for ($i = 0; $i < $taille_du_tableau; $i++)	{
208 
				$mot = $tableau_de_txt[$i];
209 
				if ($i != $index_avt_dernier) {
210 
					$chaine_a_afficher .= $mot.', ';
211 
				} else {
16 jpm 212 
					$chaine_a_afficher .= $this->nettoyerPointFinal($mot);
213 
					if ($point_final) {
214 
						$chaine_a_afficher .= '.';
215 
					}
15 jpm 216 
				}
217 
			}
218 
		}
219 
		if ($majuscule) {
220 
			$chaine_a_afficher = ucfirst($chaine_a_afficher);
221 
		}
222 
		return $chaine_a_afficher;
223 
	}
224 
 
225 
	protected function formaterAutre($chaine_a_afficher) {
226 
		if ($chaine_a_afficher != '') {
227 
			$chaine_a_afficher = ' [Autre : '.$chaine_a_afficher.']';
228 
		}
229 
		return $chaine_a_afficher;
230 
	}
231 
 
232 
	protected function formaterOuiNon($chaine_a_formater) {
233 
		$txt_a_retourner = '';
234 
		if ($chaine_a_formater == '0') {
235 
			$txt_a_retourner = 'non';
236 
		} else if ($chaine_a_formater == '1') {
237 
			$txt_a_retourner = 'oui';
238 
		}
239 
		return $txt_a_retourner;
240 
	}
241 
 
175 mathias 242 
	protected function formaterDate($date, $format = self::FMT_DATE_HEURE, $chaineSiVide = 'Inconnue') {
17 jpm 243 
		if ($date == '' || $date == '0000-00-00' || $date == '0000-00-00 00:00:00') {
175 mathias 244 
			$date = $chaineSiVide;
55 jpm 245 
		} else {
89 jpm 246 
			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
247 
				$annee = $match[1];
248 
				$mois = $match[2];
249 
				$jour = $match[3];
250 
				$heure = (isset($match[4])) ? $match[4] : '00';
251 
				$minute = (isset($match[5])) ? $match[5] : '00';
252 
				$seconde = (isset($match[6])) ? $match[6] : '00';
253 
				if ($format == self::FMT_DATE && $jour == '00' && $mois == '00') {
254 
					$date = $annee;
255 
				} else if ($format == self::FMT_DATE && $jour == '00') {
256 
					$date = strftime('%b', mktime(0, 0, 0, $mois, 1)).' '.$annee;
257 
				} else {
258 
					$timestamp = strtotime($date);
259 
					if ($timestamp !== false) {
260 
						$date = strftime($format, $timestamp);
261 
					}
262 
				}
263 
			} else {
264 
				$e = "La chaine '$date' n'est pas reconnue.";
265 
				trigger_error($e, E_USER_WARNING);
266 
			}
17 jpm 267 
		}
268 
		return $date;
269 
	}
270 
 
93 jpm 271 
	protected function formaterCourriels($courriels) {
97 jpm 272 
		$fmt_courriels = '';
273 
		if (!empty($courriels)) {
274 
			$courriels = (is_array($courriels)) ? $courriels : array($courriels);
275 
			foreach ($courriels as $cle => $courriel) {
276 
				$courriel = preg_replace('/@/', ' [arrobase] ', $courriel);
277 
				$courriel = preg_replace('/[.]([^.]+)$/', " [point] $1", $courriel);
278 
				$fmt_courriels[] = $this->getVue('courriel', array('courriel' => $courriel));
279 
			}
280 
			$fmt_courriels = implode(', ', $fmt_courriels);
93 jpm 281 
		}
282 
		return $fmt_courriels;
283 
	}
284 
 
15 jpm 285 
	protected function nettoyerPointFinal($mot) {
286 
		$mot = preg_replace('/[.]$/', '', $mot);
287 
		return $mot;
288 
	}
289 
 
290 
	public function construireTxtListeOntologie($chaineAAnalyser, $valeurEstOntologie = true, $typeEstOntologie = true, $donneeEstOntologie = false) {
291 
		$termes = array();
292 
		$autres = array();
293 
		$chaineAAnalyser = trim($chaineAAnalyser);
294 
		if ($chaineAAnalyser != '') {
295 
			$valeurs = explode(self::SEPARATEUR_VALEURS, $chaineAAnalyser);
296 
			$nbreValeurs = count($valeurs);
297 
			if ($nbreValeurs > 0)	{
298 
				for ($i = 0; $i < $nbreValeurs; $i++)	{
299 
					$valeur = $valeurs[$i];
300 
 
301 
					// VALEUR SANS TYPE
302 
					// La valeur sans type est une entrée de l'ontologie
80 jpm 303 
					if ($valeurEstOntologie && preg_match('/^[0-9]+$/u', $valeur)) {
15 jpm 304 
						if ($valeur == '0') {
305 
							$valeur = '';
306 
						} else {
307 
							$valeurOntologie = Ontologie::getValeur($valeur);
308 
							if ($valeurOntologie != '') {
309 
								$valeur = $valeurOntologie['nom'];
310 
							}
311 
						}
312 
					}
313 
 
314 
					// VALEUR AVEC TYPE
315 
					// Type : AUTRE
316 
					$valeurTypeAutre = self::TYPE_AUTRE.self::SEPARATEUR_TYPE_VALEUR;
80 jpm 317 
					if (preg_match('/^'.$valeurTypeAutre.'.+$/u', $valeur)) {
318 
						$txtAutre = preg_replace('/^'.$valeurTypeAutre.'/u', '', $valeur);
15 jpm 319 
						if ($txtAutre != '') {
320 
							$autres[] = $txtAutre;
321 
						}
322 
						$valeur = '';
323 
					}
324 
					// Type correspondant à une entrée de l'ontologie
325 
					if ($typeEstOntologie) {
19 jpm 326 
						$valeurTypeOntologie = '([0-9]+)'.self::SEPARATEUR_TYPE_VALEUR;
80 jpm 327 
						$valeurTypeAutre = '([[:alnum:]]+)'.self::SEPARATEUR_TYPE_VALEUR;
328 
						if (preg_match('/^'.$valeurTypeOntologie.'.*$/u', $valeur, $match)) {// Cas type : réf. numérique
19 jpm 329 
							$type = $match[1];
330 
							$valeurOntologieNom = Ontologie::getValeurNom($type);
331 
							if ($valeurOntologieNom !== false) {
80 jpm 332 
								$valeurOntologieNom .= ' : ';
333 
								$valeur = preg_replace('/^'.$type.'/u', $valeurOntologieNom, $valeur);
15 jpm 334 
							}
80 jpm 335 
						} else if (preg_match('/^'.$valeurTypeAutre.'.*$/u', $valeur, $match)) {// Cas type : AUTRE
336 
							$type = $match[1];
337 
							$valeur = preg_replace('/^'.$type.'/u', $type.' : ', $valeur);
15 jpm 338 
						}
339 
					}
340 
					// Donnée correspondant à une entrée de l'ontologie
341 
					if ($donneeEstOntologie) {
342 
						$donneeOntologie = self::SEPARATEUR_TYPE_VALEUR.'([0-9]+)';
80 jpm 343 
						if (preg_match('/^.+'.$donneeOntologie.'$/u', $valeur, $match)) {
15 jpm 344 
							$donnee = $match[1];
345 
							$donnee = str_replace(self::SEPARATEUR_TYPE_VALEUR, '', $donnee);
19 jpm 346 
							$valeurOntologieNom = Ontologie::getValeurNom($donnee);
347 
							if ($valeurOntologieNom !== false) {
80 jpm 348 
								$valeur = preg_replace('/'.$donnee.'$/u', $valeurOntologieNom, $valeur);
15 jpm 349 
							}
350 
						}
351 
					}
352 
 
353 
					// Nettoyage final
354 
					$valeur = preg_replace('/'.self::SEPARATEUR_TYPE_VALEUR.'/', '', $valeur);
355 
 
356 
					if ($valeur != '') {
357 
						$termes[] = $valeur;
358 
					}
359 
				}
360 
			}
361 
		}
362 
 
363 
		$chaineTermes = $this->formaterTableauDeTxt($termes);
364 
		$chaineAutres = $this->formaterTableauDeTxt($autres);
365 
		$chaineARetourner = $chaineTermes.$this->formaterAutre($chaineAutres);
366 
 
367 
		return $chaineARetourner;
368 
	}
369 
 
112 jpm 370 
	protected function obtenirUrlRecherche($txt = null) {
371 
		$this->url->setRequete(false);
169 jpm 372 
		if (!is_null($this->registre->get('contexte'))) {
373 
			$this->url->setVariableRequete('contexte', $this->registre->get('contexte'));
374 
		}
112 jpm 375 
		$this->url->setVariableRequete('module', 'Recherche');
376 
		$this->url->setVariableRequete('action', 'rechercher');
377 
		if (!is_null($txt)) {
378 
			$this->url->setVariableRequete('recherche', $txt);
379 
		}
380 
		$url = $this->url->getURL();
381 
		$this->url->unsetVariablesRequete(array('module', 'action', 'recherche'));
382 
		return $url;
383 
	}
384 
 
18 jpm 385 
	protected function obtenirUrlFicheStructure($id_structure) {
150 jpm 386 
		$url = $this->obtenirObjetUrlFicheStructure($id_structure);
387 
		return $url->getURL();
388 
	}
389 
 
390 
	protected function obtenirObjetUrlFicheStructure($id_structure) {
112 jpm 391 
		$this->url->setRequete(false);
169 jpm 392 
		if (!is_null($this->registre->get('contexte'))) {
393 
			$this->url->setVariableRequete('contexte', $this->registre->get('contexte'));
394 
		}
112 jpm 395 
		$this->url->setVariableRequete('module', 'FicheStructure');
18 jpm 396 
		$this->url->setVariableRequete('id', $id_structure);
150 jpm 397 
		$url = clone $this->url;
112 jpm 398 
		$this->url->unsetVariablesRequete(array('module', 'id'));
18 jpm 399 
		return $url;
400 
	}
401 
 
55 jpm 402 
	protected function obtenirUrlFicheCollection($id_collection) {
144 jpm 403 
		$url = $this->obtenirObjetUrlFicheCollection($id_collection);
404 
		return $url->getURL();
405 
	}
406 
 
407 
	protected function obtenirObjetUrlFicheCollection($id_collection) {
112 jpm 408 
		$this->url->setRequete(false);
169 jpm 409 
		if (!is_null($this->registre->get('contexte'))) {
410 
			$this->url->setVariableRequete('contexte', $this->registre->get('contexte'));
411 
		}
112 jpm 412 
		$this->url->setVariableRequete('module', 'FicheCollection');
18 jpm 413 
		$this->url->setVariableRequete('id', $id_collection);
144 jpm 414 
		$url = clone $this->url;
112 jpm 415 
		$this->url->unsetVariablesRequete(array('module', 'id'));
18 jpm 416 
		return $url;
417 
	}
19 jpm 418 
 
55 jpm 419 
	protected function obtenirUrlFichePersonne($id_personne) {
152 jpm 420 
		$url = $this->obtenirObjetUrlFichePersonne($id_personne);
421 
		return $url->getURL();
422 
	}
423 
 
424 
	protected function obtenirObjetUrlFichePersonne($id_personne) {
112 jpm 425 
		$this->url->setRequete(false);
169 jpm 426 
		if (!is_null($this->registre->get('contexte'))) {
427 
			$this->url->setVariableRequete('contexte', $this->registre->get('contexte'));
428 
		}
112 jpm 429 
		$this->url->setVariableRequete('module', 'FichePersonne');
55 jpm 430 
		$this->url->setVariableRequete('id', $id_personne);
152 jpm 431 
		$url = clone $this->url;
112 jpm 432 
		$this->url->unsetVariablesRequete(array('module', 'id'));
55 jpm 433 
		return $url;
434 
	}
435 
 
132 jpm 436 
	protected function obtenirPermalienGuid($guid) {
437 
		$url = Config::get('url_base_permalien');
438 
		$url .= (substr($url, -1, 1) == '/') ? '' : '/';
439 
		$url .= $guid;
440 
		return $url;
441 
	}
442 
 
19 jpm 443 
	protected function postraiterDonnees(&$tableau) {
444 
		if (count($tableau) > 0) {
445 
			foreach ($tableau as $cle => &$valeur) {
177 mathias 446 
				// ajout d'un nbsp pour ne pas fausser l'affichage du template
447 
				// afin que les <dd> et <dt> aient la même largeur
19 jpm 448 
				if ($valeur == '') {
449 
					$valeur = '&nbsp;';
450 
				} else if (is_string($valeur)) {
144 jpm 451 
					$valeur = $this->remplacerEsperluette($valeur);
19 jpm 452 
				} else if (is_array($valeur)) {
453 
					$this->postraiterDonnees($valeur);
454 
				}
455 
			}
456 
		}
457 
	}
85 jpm 458 
 
144 jpm 459 
	private function remplacerEsperluette($txt) {
460 
		$txt = preg_replace('/&(?!([a-z]+|#[0-9]+|#x[0-9a-f]+);)/i', '&amp;', $txt, -1);
461 
		return $txt;
462 
	}
463 
 
85 jpm 464 
	protected function chargerPiedDePage() {
91 jpm 465 
		$donnees['appli'] = Application::getInfo();
231 mathias 466 
		$donnees['url_base_widget_remarques'] = Config::get('url_base_widget_remarques');
91 jpm 467 
		$this->setSortie(self::RENDU_PIED, $this->getVue('pied', $donnees));
85 jpm 468 
	}
9 jpm 469 
}