Subversion Repositories eFlore/Applications.coel-consultation

Rev

Go to most recent revision | 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 16 2010-03-22 11:25:21Z jpm $
13
 */
11 jpm 14
abstract class ColControleur extends Controleur {
9 jpm 15
 
16
	const RENDU_TETE = 'tete';
17
	const RENDU_CORPS = 'corps';
18
	const RENDU_PIED = 'pied';
15 jpm 19
	const TYPE_AUTRE = 'AUTRE';
20
	const TYPE_TOTAL = 'TOTAL';
21
	const SEPARATEUR_TYPE_VALEUR = '##';
22
	const SEPARATEUR_VALEURS = ';;';
23
	const SEPARATEUR_DONNEES = '||';
24
	const VALEUR_NULL = 'NC';
9 jpm 25
 
26
	private $sortie = array();
27
	private $parametres = array();
11 jpm 28
	// FIXME : voir s'il est plus intéressant d'utiliser une méthode dans les classes filles
29
	protected $url = null;
9 jpm 30
 
31
	public function __construct()  {
32
		$registre = Registre::getInstance();
33
		$this->parametres = $registre->get('parametres');
34
		$this->url = $this->parametres['url'];
35
		parent::__construct();
36
	}
37
 
38
	/**
11 jpm 39
	 * Attribue à la bonne position de sortie un contenu.
9 jpm 40
	 */
41
	protected function setSortie($position, $contenu, $fusionner = false) {
11 jpm 42
		if ($this->verifierExistencePosition($position)) {
9 jpm 43
			if ($fusionner) {
44
				$this->sortie[$position] .= $contenu;
45
			} else {
46
				$this->sortie[$position] = $contenu;
47
			}
48
		}
49
	}
11 jpm 50
 
51
	/**
52
	 * Vérifie l'existence de la position indiquée pour son utilisation dans le tableau de sortie.
53
	 * @param string la position à tester.
54
	 * @return bool true si la position est valide, sinon false.
55
	 */
56
	private function verifierExistencePosition($position) {
57
		$existe = true;
58
		if ($position != self::RENDU_TETE &&
59
			$position != self::RENDU_CORPS &&
60
			$position != self::RENDU_PIED) {
61
			trigger_error("La position '$position' n'est pas une valeur prédéfinie.", E_USER_WARNING);
62
			$existe = false;
63
		}
64
		return $existe;
65
	}
66
 
67
	/**
68
	 * Retourne le tableau de sortie à utiliser dans le controleur principal de l'application.
69
	 */
9 jpm 70
	public function getSortie() {
71
		return $this->sortie;
72
	}
73
 
11 jpm 74
	/**
75
	 * Execute l'action d'un module donnée et fusionne le résultat avec le tableau de sortie.
76
	 */
77
	protected function executerAction($ClasseModule, $action) {
78
		$module = new $ClasseModule();
79
		$module->$action();
80
		$this->fusionnerSortie($module->getSortie());
81
 
82
	}
9 jpm 83
 
11 jpm 84
	/**
85
	 * Fusionne un tableau de sortie par défaut avec le tableau passé en paramêtre.
86
	 * @param array le tableau à fusionner
87
	 */
88
	private function fusionnerSortie($sortie) {
89
		$this->sortie = array_merge($this->sortie, $sortie);
90
	}
91
 
16 jpm 92
	protected function construireTxtTruckSimple($chaine_a_analyser) {
93
		return $this->construireTxtTruck($chaine_a_analyser, false, false);
94
	}
95
 
15 jpm 96
	protected function construireTxtTruckSansMajuscule($chaine_a_analyser) {
97
		return $this->construireTxtTruck($chaine_a_analyser, false);
98
	}
99
 
16 jpm 100
	protected function construireTxtTruckSansPointFinal($chaine_a_analyser) {
101
		return $this->construireTxtTruck($chaine_a_analyser, true, false);
102
	}
103
 
104
	protected function construireTxtTruck($chaine_a_analyser, $majuscule = true, $point_final = true) {
15 jpm 105
		$termes = array();
106
		if ((!is_null($chaine_a_analyser)) && (trim($chaine_a_analyser) != ''))	{
107
			$valeurs = explode(self::SEPARATEUR_VALEURS, $chaine_a_analyser);
108
			$nbre_valeurs = count($valeurs);
109
			if ($nbre_valeurs > 0) {
110
				for ($i = 0; $i < $nbre_valeurs; $i++)	{
111
					$valeur = trim($valeurs[$i]);
112
					if ($valeur != '') {
113
						$valeur_formatee = $this->formaterValeurTruck($valeur);
114
						$termes[] = $valeur_formatee;
115
					}
116
				}
117
			}
118
		}
119
 
16 jpm 120
		$chaine_a_retourner = $this->formaterTableauDeTxt($termes, $majuscule, $point_final);
15 jpm 121
		return $chaine_a_retourner;
122
	}
123
 
124
	private function formaterValeurTruck($valeur) {
125
		$chaine_a_retourner = '';
126
 
127
		if (preg_match('/^[^#]+##[^$]+$/', $valeur))	{
128
			$cle_valeur = explode(self::SEPARATEUR_TYPE_VALEUR, $valeur);
129
			$chaine_a_retourner = (($cle_valeur[1] == '' || $cle_valeur[1] == 'null') ? self::VALEUR_NULL : $cle_valeur[1]);
130
			$chaine_a_retourner .= ' '.$this->formaterParenthese($cle_valeur[0]);
131
		} else if ($valeur != '')	{
132
			$chaine_a_retourner = $valeur;
133
		} else {
134
			trigger_error("Valeur truck posant problème :$valeur", E_USER_NOTICE);
135
		}
136
 
137
		return $chaine_a_retourner;
138
	}
139
 
140
	protected function formaterParenthese($chaine_a_afficher) {
141
		if ($chaine_a_afficher != '') {
142
			$chaine_a_afficher = '('.$chaine_a_afficher.')';
143
		}
144
		return $chaine_a_afficher;
145
	}
146
 
147
	protected function formaterSautDeLigne($chaine_a_formater) {
148
		$txt_a_retourner = preg_replace('/\n/', '<br />', $chaine_a_formater);
149
		return $txt_a_retourner;
150
	}
151
 
16 jpm 152
	protected function formaterTableauDeTxt($tableau_de_txt, $majuscule = true, $point_final = true) {
15 jpm 153
		$chaine_a_afficher = '';
154
		$taille_du_tableau = count($tableau_de_txt);
155
		if ($taille_du_tableau > 0) {
156
			$index_avt_dernier = $taille_du_tableau - 1;
157
			for ($i = 0; $i < $taille_du_tableau; $i++)	{
158
				$mot = $tableau_de_txt[$i];
159
				if ($i != $index_avt_dernier) {
160
					$chaine_a_afficher .= $mot.', ';
161
				} else {
16 jpm 162
					$chaine_a_afficher .= $this->nettoyerPointFinal($mot);
163
					if ($point_final) {
164
						$chaine_a_afficher .= '.';
165
					}
15 jpm 166
				}
167
			}
168
		}
169
		if ($majuscule) {
170
			$chaine_a_afficher = ucfirst($chaine_a_afficher);
171
		}
172
		return $chaine_a_afficher;
173
	}
174
 
175
	protected function formaterAutre($chaine_a_afficher) {
176
		if ($chaine_a_afficher != '') {
177
			$chaine_a_afficher = ' [Autre : '.$chaine_a_afficher.']';
178
		}
179
		return $chaine_a_afficher;
180
	}
181
 
182
	protected function formaterOuiNon($chaine_a_formater) {
183
		$txt_a_retourner = '';
184
		if ($chaine_a_formater == '0') {
185
			$txt_a_retourner = 'non';
186
		} else if ($chaine_a_formater == '1') {
187
			$txt_a_retourner = 'oui';
188
		}
189
		return $txt_a_retourner;
190
	}
191
 
192
	protected function nettoyerPointFinal($mot) {
193
		$mot = preg_replace('/[.]$/', '', $mot);
194
		return $mot;
195
	}
196
 
197
	public function construireTxtListeOntologie($chaineAAnalyser, $valeurEstOntologie = true, $typeEstOntologie = true, $donneeEstOntologie = false) {
198
		$termes = array();
199
		$autres = array();
200
		$chaineAAnalyser = trim($chaineAAnalyser);
201
		if ($chaineAAnalyser != '') {
202
			$valeurs = explode(self::SEPARATEUR_VALEURS, $chaineAAnalyser);
203
			$nbreValeurs = count($valeurs);
204
			if ($nbreValeurs > 0)	{
205
				for ($i = 0; $i < $nbreValeurs; $i++)	{
206
					$valeur = $valeurs[$i];
207
 
208
					// VALEUR SANS TYPE
209
					// La valeur sans type est une entrée de l'ontologie
210
					if ($valeurEstOntologie && preg_match('/^[0-9]+$/', $valeur)) {
211
						if ($valeur == '0') {
212
							$valeur = '';
213
						} else {
214
							$valeurOntologie = Ontologie::getValeur($valeur);
215
							if ($valeurOntologie != '') {
216
								$valeur = $valeurOntologie['nom'];
217
							}
218
						}
219
					}
220
 
221
					// VALEUR AVEC TYPE
222
					// Type : AUTRE
223
					$valeurTypeAutre = self::TYPE_AUTRE.self::SEPARATEUR_TYPE_VALEUR;
224
					if (preg_match('/^'.$valeurTypeAutre.'.+$/', $valeur)) {
225
						$txtAutre = preg_replace('/^'.$valeurTypeAutre.'/', '', $valeur);
226
						if ($txtAutre != '') {
227
							$autres[] = $txtAutre;
228
						}
229
						$valeur = '';
230
					}
231
					// Type correspondant à une entrée de l'ontologie
232
					if ($typeEstOntologie) {
233
						$valeurTypeOntologie = '[0-9]+'.self::SEPARATEUR_TYPE_VALEUR;
234
						if (preg_match('/^'.$valeurTypeOntologie.'.+$/', $valeur)) {
235
							$type = substr($valeur, 0, strripos($valeur, self::SEPARATEUR_TYPE_VALEUR));
236
							$valeurOntologie = Ontologie::getValeur($type);
237
							if ($valeurOntologie != '') {
238
								$valeurOntologieNom = $valeurOntologie['nom'];
239
								$valeur = preg_replace('/^'.$type.'/', $valeurOntologieNom.': ', $valeur);
240
							}
241
						}
242
					}
243
					// Donnée correspondant à une entrée de l'ontologie
244
					if ($donneeEstOntologie) {
245
						$donneeOntologie = self::SEPARATEUR_TYPE_VALEUR.'([0-9]+)';
246
						if (preg_match('/^.+'.$donneeOntologie.'$/', $valeur, $match)) {
247
							$donnee = $match[1];
248
							$donnee = str_replace(self::SEPARATEUR_TYPE_VALEUR, '', $donnee);
249
							$valeurOntologie = Ontologie::getValeur($donnee);
250
							if ($valeurOntologie != '') {
251
								$valeurOntologieNom = $valeurOntologie['nom'];
252
								$valeur = preg_replace('/'.$donnee.'$/', $valeurOntologieNom, $valeur);
253
							}
254
						}
255
					}
256
 
257
					// Nettoyage final
258
					$valeur = preg_replace('/'.self::SEPARATEUR_TYPE_VALEUR.'/', '', $valeur);
259
 
260
					if ($valeur != '') {
261
						$termes[] = $valeur;
262
					}
263
				}
264
			}
265
		}
266
 
267
		$chaineTermes = $this->formaterTableauDeTxt($termes);
268
		$chaineAutres = $this->formaterTableauDeTxt($autres);
269
		$chaineARetourner = $chaineTermes.$this->formaterAutre($chaineAutres);
270
 
271
		return $chaineARetourner;
272
	}
273
 
9 jpm 274
}