Subversion Repositories Applications.referentiel

Rev

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

Rev Author Line No. Line
71 delphine 1 
<?php
2 
/**
3 
 * Service fournissant des informations sur les référentiels répondant aux critères de recherche
4 
 * fournis en paramètre.
5 
 * Encodage en entrée : utf8
6 
 * Encodage en sortie : utf8
72 delphine 7 
 * @author		Delphine CAUQUIL <delphine@tela-botanica.org>
8 
 * @author 		Jean-Pascal MILCENT <jpm@tela-botanica.org>
71 delphine 9 
 * @license		http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL
10 
 * @license		http://www.gnu.org/licenses/gpl.html Licence GNU-GPL
72 delphine 11 
 * @version		$Id$
71 delphine 12 
 * @copyright	2010 Tela-Botanica
13 
 */
72 delphine 14 
 
71 delphine 15 
class Recherche extends Ref {
16 
 
17 
	/**
18 
	 * Méthode principale appelée avec une requête de type GET.
19 
	 * Elle sert d'aiguilleur pour appeller la méthode correspondant au type de recherche passé en paramêtre.
20 
	 */
21 
	public function getElement($param = array()) {
22 
		// Initialisation des variables
23 
		$info = array();
24 
 
72 delphine 25 
		// Nous recherchons le type de requête demandé
71 delphine 26 
		$type = $param[0];
27 
 
28 
		$methode = 'getElement'.$type;
29 
		if (method_exists($this, $methode)) {
30 
			array_shift($param);
31 
			$info = $this->$methode($param);
32 
		} else {
33 
			$this->messages[] = "Le type de recherche demandé '$type' n'est pas disponible.";
34 
		}
35 
 
36 
		// Envoie sur la sortie standard
37 
		$this->envoyer($info);
38 
	}
39 
 
72 delphine 40 
/* Méthode pour récupérer le nombre de taxons répondant à la requête
41 
	 * Appelée avec les paramètres d'url suivant :
42 
	 * /Recherche/Nombre/_
43 
	 * ou les _ représentent dans l'ordre : référentiel, mots, paramétres avancés
44 
	 * Si un des paramètres est absent, il prendre la valeur *
45 
	 */
46 
	public function getElementNombre($param) {
47 
		// Initialisation des variables
48 
		$info = array();
49 
 
50 
		// Pré traitement des paramètres
51 
		$p = $this->pretraiterParametresUrl($param);
52 
		$referentiel = substr($p['ref'], 2, -2);
53 
 
54 
		// Construction de la requête
55 
		// Il est important de compter le nombre de taxons pour l'affichage
56 
		$requete = 	(($this->distinct) ? 'SELECT DISTINCT' : 'SELECT').' COUNT(num_nom) AS nbre FROM '.$referentiel.
57 
					$this->construireWhere($p).' ';
58 
 
59 
		// Récupération des résultats
60 
		try {
61 
			$donnees = $this->bdd->query($requete)->fetch(PDO::FETCH_ASSOC);
62 
			if ($donnees === false) {
235 delphine 63 
				$this->messages[] = "La requête a retourné aucun résultat : $requete";
72 delphine 64 
			} else {
65 
				$info = $donnees['nbre'];
66 
			}
67 
		} catch (PDOException $e) {
235 delphine 68 
			$this->messages[] = sprintf($this->getTxt('sql_erreur'), $e->getFile(), $e->getLine(), $e->getMessage()).$requete;
72 delphine 69 
		}
70 
 
71 
		return $info;
72 
	}
73 
 
74 
 	/* Méthode pour récupérer une liste de taxons
71 delphine 75 
	 * Appelée avec les paramêtres d'url suivant :
72 delphine 76 
	 * /Recherche/ParDefaut/_
77 
	 * ou les _ représentent dans l'ordre : référentiel, mots, paramétres avancés
78 
	 * Si un des paramètres est absent, il prendre la valeur *
71 delphine 79 
	 */
80 
	public function getElementParDefaut($param) {
81 
		// Initialisation des variables
82 
		$info = array();
83 
 
72 delphine 84 
		// Pré traitement des paramètres
71 delphine 85 
		$p = $this->pretraiterParametresUrl($param);
86 
		$referentiel = substr($p['ref'], 2, -2);
87 
 
72 delphine 88 
		// Construction de la requête
149 jpm 89 
		$requete = 	(($this->distinct) ? 'SELECT DISTINCT' : 'SELECT').' num_nom, nom_sci, auteur, annee, '.
251 delphine 90 
				'biblio_origine, nom_addendum, num_nom_retenu, presence, exclure_taxref'.
91 
				' FROM '.$referentiel.$this->construireWhere($p).
282 delphine 92 
				'ORDER BY '.((!is_null($this->orderby)) ? $this->orderby  : 'nom_sci ASC').' '.
72 delphine 93 
				"LIMIT $this->start, $this->limit ";
71 delphine 94 
 
72 delphine 95 
		// Récupération des résultats
96 
		try {
97 
			$donnees = $this->bdd->query($requete)->fetchAll(PDO::FETCH_ASSOC);
98 
			if ($donnees === false) {
235 delphine 99 
				$this->messages[] = "La requête a retourné aucun résultat : $requete";
72 delphine 100 
			} else {
101 
				$info = $donnees;
71 delphine 102 
			}
72 delphine 103 
		} catch (PDOException $e) {
235 delphine 104 
			$this->messages[] = sprintf($this->getTxt('sql_erreur'), $e->getFile(), $e->getLine(), $e->getMessage()).$requete;
71 delphine 105 
		}
72 delphine 106 
		return $info;
71 delphine 107 
	}
108 
 
72 delphine 109 
 
110 
	/* Méthode pour récupérer le nombre de taxons répondant à une requête sur la synonymie
111 
	 * Appelée avec les paramètres d'url suivant :
112 
	 * /Recherche/Nombre/_
113 
	 * ou les _ représentent dans l'ordre : référentiel, mots, paramétres avancés
114 
	 * Si un des paramètres est absent, il prendre la valeur *
71 delphine 115 
	 */
72 delphine 116 
	public function getElementNombreTaxon($param) {
71 delphine 117 
		// Initialisation des variables
118 
		$info = array();
119 
 
72 delphine 120 
		// Pré traitement des paramètres
71 delphine 121 
		$p = $this->pretraiterParametresUrl($param);
122 
		$referentiel = substr($p['ref'], 2, -2);
123 
 
72 delphine 124 
 
71 delphine 125 
		// Construction de la requête
72 delphine 126 
		// Il est important de compter le nombre de taxons pour l'affichage
127 
		$requete = 	'SELECT count(DISTINCT num_nom_retenu) as nbr FROM '.$referentiel.$this->construireWhere($p).';';
71 delphine 128 
 
129 
		// Récupération des résultats
130 
		try {
131 
			$donnees = $this->bdd->query($requete)->fetch(PDO::FETCH_ASSOC);
132 
			if ($donnees === false) {
133 
				$this->messages[] = "La requête a retourné aucun résultat.";
134 
			} else {
72 delphine 135 
				$info = $donnees['nbr'];
71 delphine 136 
			}
137 
		} catch (PDOException $e) {
138 
			$this->messages[] = sprintf($this->getTxt('sql_erreur'), $e->getFile(), $e->getLine(), $e->getMessage());
139 
		}
140 
 
141 
		return $info;
142 
	}
143 
 
72 delphine 144 
 	/* Méthode pour récupérer une liste de taxons
145 
	 * Appelée avec les paramêtres d'url suivant :
146 
	 * /Recherche/ParDefaut/_
147 
	 * ou les _ représentent dans l'ordre : référentiel, mots, paramétres avancés
148 
	 * Si un des paramètres est absent, il prendre la valeur *
149 
	 */
150 
	public function getElementParTaxon($param) {
151 
		// Initialisation des variables
88 delphine 152 
		$info = '';
72 delphine 153 
 
154 
		// Pré traitement des paramètres
155 
		$p = $this->pretraiterParametresUrl($param);
156 
		$referentiel = substr($p['ref'], 2, -2);
157 
 
158 
		$liste_nom = $this->getNomRetenu($param);
88 delphine 159 
		if ($liste_nom != '') {
160 
			// Construction de la requête
161 
			// si recherche des synonymes
149 jpm 162 
			$requete = (($this->distinct) ? 'SELECT DISTINCT' : 'SELECT').' num_nom, nom_sci, auteur, annee, '.
281 delphine 163 
						'biblio_origine, nom_addendum, num_nom_retenu, basionyme, synonyme_mal_applique, presence, exclure_taxref '.
242 delphine 164 
							' FROM '.$referentiel.' WHERE num_nom_retenu IN ('.$liste_nom.') '.
284 delphine 165 
							'ORDER BY nom_sci ASC ';
88 delphine 166 
			try {
167 
				$donnees = $this->bdd->query($requete)->fetchAll(PDO::FETCH_ASSOC);
168 
				$info = $donnees;
169 
			} catch (PDOException $e) {
170 
				$this->messages[] = sprintf($this->getTxt('sql_erreur'), $e->getFile(), $e->getLine(), $e->getMessage());
171 
			}
284 delphine 172 
		}
72 delphine 173 
		return $info;
88 delphine 174 
 
72 delphine 175 
	}
176 
 
177 
	/* Méthode pour récupérer une liste de noms retenus
178 
	 */
179 
	public function getNomRetenu($param) {
180 
		// Initialisation des variables
181 
		$info = array();
182 
 
183 
		// Pré traitement des paramètres
184 
		$p = $this->pretraiterParametresUrl($param);
185 
		$referentiel = substr($p['ref'], 2, -2);
186 
 
187 
		// Construction de la requête
188 
		// si recherche des synonymes
189 
		$requete_nom_retenu =	'SELECT DISTINCT num_nom_retenu FROM '.$referentiel.$this->construireWhere($p)
284 delphine 190 
			."AND num_nom=num_nom_retenu ORDER BY nom_sci ASC LIMIT $this->start, $this->limit ".';';
72 delphine 191 
		try {
192 
			$info = '';
193 
			$donnees_nom_retenu = $this->bdd->query($requete_nom_retenu)->fetchAll(PDO::FETCH_ASSOC);
194 
 
195 
			if ($donnees_nom_retenu === false) {
196 
				$this->messages[] = "La requête n'a retourné aucun résultat.";
197 
			} else {
198 
				$liste_nom = '';
199 
				foreach ($donnees_nom_retenu as $donnees_nom) {
200 
					if ($donnees_nom['num_nom_retenu'] != '') {
201 
						$liste_nom .= (!empty($liste_nom) ? ', ' : '').'"'.$donnees_nom['num_nom_retenu'].'"';
202 
					}
203 
				}
204 
				$info = $liste_nom;
205 
			}
206 
		} catch (PDOException $e) {
207 
			$this->messages[] = sprintf($this->getTxt('sql_erreur'), $e->getFile(), $e->getLine(), $e->getMessage());
208 
		}
209 
		return $info;
210 
	}
211 
 
71 delphine 212 
	private function pretraiterParametresUrl($param) {
72 delphine 213 
		// Tableau des paramètres qui peuvent être passés dans l'url
71 delphine 214 
		$params_passes = array('ref' => 'str',
215 
			'mots' => 'str',
132 delphine 216 
			'sg' => 'str_exact',
217 
			'gen' => 'str_exact',
218 
			'sp' => 'str_exact',
219 
			'ssp' => 'str_exact',
71 delphine 220 
			'au' => 'str',
221 
			'an' => 'str',
222 
			'nn' => 'int',
223 
			'bib' => 'str',
224 
			'nr' => 'bool',
235 delphine 225 
			'tax' => 'bool',
226 
			'pre' => 'bool',
227 
			'taxref' => 'bool');
71 delphine 228 
 
229 
		$p = $this->traiterParametresUrl(array_keys($params_passes), $param, false);
109 jpm 230 
		//$this->debug[] = $param;
71 delphine 231 
		foreach ($params_passes as $param_passe => $type) {
232 
			if (isset($p[$param_passe])) {
233 
				// Suppression des éventuels espaces en début et fin de chaine
234 
				$valeur = trim($p[$param_passe]);
235 
 
72 delphine 236 
				// Type de paramètre chaine
71 delphine 237 
				if ($type == 'str') {
238 
					// Suppression des slash
239 
					$valeur = stripslashes($valeur);
240 
 
241 
					// Utilisation d'une recherche de chaîne exacte
242 
					if (preg_match('/^"(.*)"$/', $valeur, $match)) {
243 
						$valeur = '%'.$match[1].'%';
244 
					} else {
245 
						// Recherche de mots non liés
246 
						$mots = explode(' ', $valeur);
247 
						$valeur = '%'.implode ('%', $mots).'%';
248 
					}
72 delphine 249 
					// Mise en place des quotes pour l'interrogation dans la bdd
71 delphine 250 
					$valeur = $this->bdd->quote($valeur);
251 
				}
132 delphine 252 
				// Type de paramètre chaine exacte
253 
				if ($type == 'str_exact') {
254 
					// Suppression des slash
255 
					$valeur = stripslashes($valeur);
256 
 
257 
					// Utilisation d'une recherche de chaîne exacte
258 
					if (preg_match('/^"(.*)"$/', $valeur, $match)) {
282 delphine 259 
						$valeur = $match[1];
132 delphine 260 
					} else {
261 
						// Recherche de mots non liés
262 
						$mots = explode(' ', $valeur);
282 delphine 263 
						$valeur = implode (' ', $mots);
132 delphine 264 
					}
265 
					// Mise en place des quotes pour l'interrogation dans la bdd
266 
					$valeur = $this->bdd->quote($valeur);
267 
				}
72 delphine 268 
				// Type de paramètre booléen
71 delphine 269 
				if ($type == 'bool') {
270 
					if (preg_match('/^[0]$/', $valeur)) {
271 
						$valeur = false;
272 
					} else if (preg_match('/^[1]$/', $valeur)) {
273 
						$valeur = true;
274 
					} else {
72 delphine 275 
						$this->messages[] = "Le paramètre '$param_passe' attend une valeur de type 0 ou 1 et non '$valeur'.";
71 delphine 276 
						$valeur = null;
277 
					}
278 
 
279 
				}
72 delphine 280 
				// Type de paramètre entier
71 delphine 281 
				if ($type == 'int') {
282 
					if (!preg_match('/^(?:[0-9]+,\s*)*[0-9]+$/', $valeur)) {
72 delphine 283 
						$this->messages[] = "Le paramètre '$param_passe' attend une ou plusieurs valeurs de type entiers ".
71 delphine 284 
							"séparés par des virgules et non '$valeur'.";
285 
						$valeur = null;
286 
					}
287 
				}
288 
 
289 
				$p[$param_passe] = $valeur;
290 
			}
291 
		}
292 
 
293 
		return $p;
294 
	}
295 
 
72 delphine 296 
	private function construireWhere($p) {
71 delphine 297 
		// Initialisation de variables
298 
		$where = ' WHERE ';
299 
 
72 delphine 300 
		// Construire where en fonction des paramêtres
71 delphine 301 
		if (isset($p['mots'])) {
302 
			$where .= 'AND ('.
303 
				" num_nom LIKE {$p['mots']} ".
304 
				" OR num_nom_retenu LIKE {$p['mots']} ".
305 
				" OR num_tax_sup LIKE {$p['mots']} ".
306 
				" OR rang LIKE {$p['mots']} ".
149 jpm 307 
				" OR nom_sci LIKE {$p['mots']} ".
71 delphine 308 
				" OR nom_supra_generique LIKE {$p['mots']} ".
309 
				" OR genre LIKE {$p['mots']} ".
310 
				" OR epithete_infra_generique LIKE {$p['mots']} ".
311 
				" OR epithete_sp LIKE {$p['mots']} ".
312 
				" OR type_epithete LIKE {$p['mots']} ".
313 
				" OR epithete_infra_sp LIKE {$p['mots']} ".
314 
				" OR cultivar_groupe LIKE {$p['mots']} ".
315 
				" OR cultivar LIKE {$p['mots']} ".
316 
				" OR nom_commercial LIKE {$p['mots']} ".
317 
				" OR auteur LIKE {$p['mots']} ".
318 
				" OR annee LIKE {$p['mots']} ".
319 
				" OR biblio_origine LIKE {$p['mots']} ".
320 
				" OR notes LIKE {$p['mots']} ".
321 
				" OR nom_addendum LIKE {$p['mots']} ".
322 
				" OR homonyme LIKE {$p['mots']} ".
323 
				" OR basionyme LIKE {$p['mots']} ".
324 
				" OR synonyme_proparte LIKE {$p['mots']} ".
325 
				" OR synonyme_douteux LIKE {$p['mots']} ".
326 
				" OR synonyme_mal_applique LIKE {$p['mots']} ".
327 
				" OR synonyme_orthographique LIKE {$p['mots']} ".
328 
				" OR hybride_parent_01 LIKE {$p['mots']} ".
329 
				" OR hybride_parent_01_notes LIKE {$p['mots']} ".
330 
				" OR hybride_parent_02 LIKE {$p['mots']} ".
331 
				" OR hybride_parent_02_notes LIKE {$p['mots']} ".
332 
				" OR nom_francais LIKE {$p['mots']} ".
333 
				" OR presence LIKE {$p['mots']} ".
334 
				" OR statut_origine LIKE {$p['mots']} ".
335 
				" OR statut_introduction LIKE {$p['mots']} ".
336 
				" OR statut_culture LIKE {$p['mots']} ".
337 
				') ';
338 
		}
339 
		if (isset($p['sg'])) {
340 
			$where .= "AND nom_supra_generique LIKE {$p['sg']} ";
341 
		}
342 
		if (isset($p['gen'])) {
343 
			$where .= "AND genre LIKE ({$p['gen']}) ";
344 
		}
345 
		if (isset($p['sp'])) {
346 
			$where .= "AND epithete_sp LIKE {$p['sp']} ";
347 
		}
348 
		if (isset($p['ssp'])) {
72 delphine 349 
			$where .= "AND epithete_infra_sp LIKE {$p['ssp']} ";
71 delphine 350 
		}
351 
		if (isset($p['au'])) {
352 
			$where .= "AND auteur LIKE {$p['au']} ";
353 
		}
354 
		if (isset($p['an'])) {
355 
			$where .= "AND annee LIKE ({$p['an']}) ";
356 
		}
357 
		if (isset($p['nn'])) {
109 jpm 358 
			$where .= "AND num_nom IN ({$p['nn']}) ";
71 delphine 359 
		}
360 
		if (isset($p['bib'])) {
361 
			$where .= "AND biblio_origine LIKE ({$p['bib']}) ";
362 
		}
363 
		if (isset($p['nr']) && $p['nr'] == true) {
364 
			$where .= "AND num_nom_retenu = num_nom ";
365 
		}
235 delphine 366 
		if (isset($p['pre']) && $p['pre'] == true) {
274 delphine 367 
			$where .= "AND presence NOT IN ('A', '') ";
368 
		} elseif(isset($p['pre']) && $p['pre'] != true) {
369 
			$where .= "AND presence IN ('A', '') ";
370 
 
235 delphine 371 
		}
372 
		if (isset($p['taxref'])) {
373 
			$where .= "AND exclure_taxref =";
374 
			$where .= ($p['taxref'] == true) ? " 0 " : " 1 ";
375 
		}
71 delphine 376 
 
377 
 
378 
		$where = str_replace('WHERE AND', ' WHERE ', $where);
379 
 
380 
 
72 delphine 381 
		// Retour du Where associé
71 delphine 382 
		if (count($p) == 0) {
72 delphine 383 
			$where = "";
71 delphine 384 
		}
72 delphine 385 
		return $where;
71 delphine 386 
	}
387 
}
388 
?>