Subversion Repositories Applications.referentiel

Rev

Rev 281 | Rev 284 | 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.') '.
282 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
			}
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)
282 delphine 190
			."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
?>