Subversion Repositories eFlore/Applications.cel

Rev

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

Rev Author Line No. Line
1425 aurelien 1
<?php
2
/**
3
* PHP Version 5
4
*
5
* @category  PHP
6
* @package   jrest
7
* @author    David Delon <david@tela-botania.org>
8
* @author    Aurélien Peronnet <aurelien@tela-botania.org>
9
* @copyright 2010 Tela-Botanica
10
* @license   http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL
11
* @version   SVN: <svn_id>
12
* @link      /doc/jrest/
13
*/
14
 
15
/**
16
 *
17
 * La classe appelle les web service d'eflore pour éviter que le code client
18
 * ne soit dépendant de la version d'eflore
19
 */
20
class RechercheInfosTaxonBeta extends Cel {
21
 
1427 aurelien 22
	private $url_service_nom = null;
23
	private $url_service_taxon = null;
24
	private $url_service_chorologie = null;
25
 
1425 aurelien 26
	public function RechercheInfosTaxonBeta($config) {
27
		parent::__construct($config);
1427 aurelien 28
		$this->url_service_nom = $config['eflore']['url_service_nom'];
29
		$this->url_service_taxon = $config['eflore']['url_service_taxon'];
30
		$this->url_service_chorologie_obs = $config['eflore']['url_service_chorologie_obs'];
1425 aurelien 31
	}
32
 
33
	public function rechercherGenreEspeceSurPrefixe($genre = null, $espece = null) {
34
 
35
		$liste_genre_espece = array();
36
		$masque = urlencode(trim(trim($genre).' '.trim($espece,' *')));
1427 aurelien 37
		$requete = @file_get_contents($this->url_service_nom.'?masque='.$masque.'&recherche=etendue&retour.format=min&navigation.limite=50&ns.structure=au');
1425 aurelien 38
 
39
		if($requete != '') {
40
			$requete = json_decode($requete);
41
			if(is_object($requete) && isset($requete->resultat)) {
42
				foreach ($requete->resultat as $id => $res) {
1427 aurelien 43
					$retenu = ($res->retenu == "true") ? '3' : '4';
1425 aurelien 44
					$liste_genre_espece[] = array($res->nom_sci_complet, $id, $retenu);
45
				}
46
			}
1427 aurelien 47
			usort($liste_genre_espece, array($this, 'comparerParRetenuPuisNom'));
1425 aurelien 48
		}
49
		return $liste_genre_espece;
50
	}
51
 
1427 aurelien 52
	function comparerParRetenuPuisNom($a, $b) {
53
		if($a[2] == 3 && $b[2] != 3) {
54
			return -1;
55
		} elseif($a[2] != 3 && $b[2] == 3) {
56
			return 1;
57
		} else {
58
			return strnatcmp($a[0], $b[0]);
59
		}
1425 aurelien 60
	}
61
 
62
	public function effectuerRequeteInfosComplementairesEtFormaterNom($numNom) {
63
 
64
		$resultat_infos_complementaires = (array)$this->effectuerRequeteInfosComplementairesSurNumNom($numNom);
65
		$retour_infos_complementaires = array();
66
		if (isset($resultat_infos_complementaires['nom_retenu_complet']) && $resultat_infos_complementaires['nom_retenu_complet'] != '') {
67
           	$retour_infos_complementaires=array(($this->supprimerBiblio($resultat_infos_complementaires['nom_retenu_complet'])));
68
	    }
69
 
70
		return $retour_infos_complementaires;
71
	}
72
 
73
	public function rechercherInformationsComplementairesSurNom($nom_saisi) {
1486 aurelien 74
		$nom_saisi = trim($this->supprimerAccents($nom_saisi));
75
		// Essai de recherche sur le nom saisi tel quel
76
		$liste_genre_espece = $this->effectuerRequeteUrlRecherche($nom_saisi, true);
77
		if(empty($liste_genre_espece)) {
78
			// Essai de recherche stricte en tentant de supprimer le nom d'auteur
79
			$nom_saisi_sans_auteur = $this->supprimerAuteur($nom_saisi);
80
			$liste_genre_espece = $this->effectuerRequeteUrlRecherche($nom_saisi_sans_auteur, true);
81
			if(empty($liste_genre_espece)) {
82
				// Dernière tentative : essai de recherche étendue
83
				$liste_genre_espece = $this->effectuerRequeteUrlRecherche($nom_saisi, false);
84
			}
85
		}
86
		return $liste_genre_espece;
87
	}
88
 
89
	private function effectuerRequeteUrlRecherche($nom_saisi, $stricte = true) {
90
		$url_recherche = $this->getUrlRechercheInfosComplementaires($nom_saisi, $stricte);
91
		$resultat = @file_get_contents($url_recherche);
92
		$liste_genre_espece = array();
93
		if($resultat != '') {
94
			$liste_genre_espece = $this->parserResultatRechercheTaxon($resultat);
95
		}
96
		return $liste_genre_espece;
97
	}
98
 
99
	private function getUrlRechercheInfosComplementaires($nom_saisi, $stricte = true) {
100
		$type_recherche = $stricte ? 'stricte' : 'etendue';
101
		return $url_recherche_etendue = $this->url_service_nom.'?masque='.urlencode($nom_saisi).'&recherche='.$type_recherche.'&ns.format=txt&retour.champs=nom_sci,auteur,nom_retenu.id&navigation.limite=1';
102
	}
103
 
104
	//TODO: déplacer les fonctions ci dessus et dessous dans une classe
105
	// utilitaire
106
	private function supprimerAccents($str, $charset = 'UTF-8')
107
	{
108
		$str = htmlentities($str, ENT_NOQUOTES, $charset);
109
		$str = preg_replace('#&([A-za-z])(?:acute|cedil|circ|grave|orn|ring|slash|th|tilde|uml);#', '\1', $str);
110
		$str = preg_replace('#&([A-za-z]{2})(?:lig);#', '\1', $str); // pour les ligatures e.g. '&oelig;'
111
		$str = preg_replace('#&[^;]+;#', '', $str); // supprime les autres caractères
112
 
113
		return $str;
114
	}
115
 
116
	private function supprimerAuteur($nom_saisi) {
117
		// Attention le parseur de nom n'est pas fiable à 100%
118
		// mais ça marche dans la plupart des cas
119
		// à part les formules d'hybridité saisies avec un auteur
120
		// TODO: gérer les hybrides
1425 aurelien 121
		$nameparser = new NameParser();
1486 aurelien 122
		if($this->estUnHybride($nom_saisi) || $this->estUneFormuleHybridite($nom_saisi)) {
123
			$nom_decoupe = explode(' ', $nom_saisi);
124
			$derniere_position_hybride = end(array_keys($nom_decoupe, 'x'));
125
			$nom_saisi_sans_auteur = implode(' ',array_slice($nom_decoupe, 0, $derniere_position_hybride + 2));
126
		} else {
127
			$auteur = $nameparser->parse_auth($nom_saisi);
128
			$nom_saisi_sans_auteur = str_replace($auteur, '', $nom_saisi);
129
		}
130
 
131
		$nom_saisi_sans_auteur = trim($nom_saisi_sans_auteur);
132
		return $nom_saisi_sans_auteur;
133
	}
134
 
135
	private function estUneFormuleHybridite($nom_saisi) {
136
		return strpos($nom_saisi,' x ') !== false;
137
	}
138
 
139
	private function estUnHybride($nom_saisi) {
140
		return strpos($nom_saisi,'x ') === 0;
141
	}
142
 
143
	private function parserResultatRechercheTaxon($resultat) {
1425 aurelien 144
		$liste_genre_espece = array();
1486 aurelien 145
		$resultat = json_decode($resultat);
146
		if(is_object($resultat) && isset($resultat->resultat)) {
147
			foreach ($resultat->resultat as $id => $res) {
148
				$nom_complet = $res->{'nom_sci'}.' '.$res->auteur;
149
				$liste_genre_espece[] = array($id,$nom_complet);
1425 aurelien 150
			}
1486 aurelien 151
		}
1425 aurelien 152
		return $liste_genre_espece;
153
	}
154
 
155
	public function rechercherInformationsComplementairesSurNumNom($num_nom) {
156
		$infos_formatees = array();
157
		$infos = $this->effectuerRequeteInfosComplementairesSurNumNom($num_nom);
158
		if(is_object($infos)) {
159
			$infos_formatees = $this->formaterInfosComplementairesSurNumNom($infos);
160
		}
161
		return $infos_formatees;
162
	}
163
 
164
	public function effectuerRequeteInfosComplementairesSurNumNom($num_nom) {
165
		$infos = array();
1432 aurelien 166
		$url = $this->url_service_nom.'/'.$num_nom.'?retour.champs=nom_sci,auteur,id,nom_retenu_complet,nom_retenu.id,num_taxonomique,famille';
1425 aurelien 167
		$resultat = @file_get_contents($url);
168
		if($resultat != '') {
169
			$infos = json_decode($resultat);
170
		}
171
		return $infos;
172
	}
173
 
174
	private function formaterInfosComplementairesSurNumNom($infos) {
175
		$infos = (array)$infos;
176
		return $infos_formatees = array(
177
			'Nom_Retenu' => $this->supprimerBiblio($infos['nom_retenu_complet']),
178
			'Num_Nom_Retenu' => $infos['nom_retenu.id'],
179
			'Num_Taxon' => $infos['num_taxonomique'],
180
			'Famille' => $infos['famille']
181
		);
182
	}
183
 
184
	private function supprimerBiblio($nom) {
185
		return preg_replace('/ \[.*\]/','',$nom);
186
	}
187
 
188
	public function rechercherNumTaxSurNumNom($num_nom) {
189
 
190
		$nt = null;
1427 aurelien 191
		$url = $this->url_service_nom."/".$num_nom.'?retour.champs=num_taxonomique';
1425 aurelien 192
		$resultat = @file_get_contents($url);
193
		if($resultat != '') {
194
			$infos = json_decode($resultat);
195
			$nt = $infos->num_taxonomique;
196
		}
197
 
198
		return $nt;
199
	}
200
 
201
	public function taxonEstPresentDansDepartement($num_taxon,$code_departement) {
202
		$presence_taxon = false;
1427 aurelien 203
		$url = $this->url_service_chorologie_obs.'?masque.departement='.$code_departement.'&masque.determination.nt='.$num_taxon.'&navigation.limite=1';
1425 aurelien 204
		$resultat = @file_get_contents($url);
205
		if($resultat != '') {
206
			$resultat = json_decode($resultat);
207
			if(is_object($resultat) && isset($resultat->resultat) && count($resultat->resultat) > 0) {
208
				$presence_taxon = true;
209
			}
210
		}
211
		return $presence_taxon;
212
	}
213
 
214
	public function effectuerRequeteInfosComplementairesSurNumTax($numTax) {
215
 
1426 aurelien 216
		$infos = array();
217
		//TODO: retourner moins de champs grâce au paramètre retour.champs
1427 aurelien 218
		$url = $this->url_service_taxon."/nt:".$numTax;
1426 aurelien 219
		$resultat = @file_get_contents($url);
220
		if($resultat != '') {
221
			$infos = json_decode($resultat);
222
		}
223
 
224
		return $infos;
1425 aurelien 225
	}
226
 
227
	function rechercherInfosSurTexteCodeOuNumTax($identifiant_espece) {
228
		// texte libre, nom scientifique,
229
		// ou code nomenclatural (format BDNFFnn999999)
230
		// ou code taxonomique (format BDNFFnt999999)
231
		$identifiant_espece=trim($identifiant_espece);
232
		$identifiant_espece=utf8_encode($identifiant_espece);
1426 aurelien 233
 
1425 aurelien 234
		$retour = array();
235
 
236
		preg_match('/BDNFFnn([0-9][0-9]*)/',$identifiant_espece, $elements);
237
		if (isset($elements[1])) {
238
			// Numero nomenclatural
239
			$infos_taxon = $this->rechercherInformationsComplementairesSurNumNom($elements[1]);
1426 aurelien 240
			$retour = array("nom_sel" => $infos_taxon['Nom_Retenu'], "en_id_nom" => $elements[1]);
1425 aurelien 241
		} else {
242
			//  Numero taxonomique ou nom scientifique
243
			preg_match('/BDNFFnt([0-9][0-9]*)/', $identifiant_espece, $elements);
244
			if (isset($elements[1])) {
245
				// Numero taxonomique
1426 aurelien 246
				$infos_taxon = (array)$this->effectuerRequeteInfosComplementairesSurNumTax($elements[1]);
247
				if(isset($infos_taxon['nom_retenu.libelle']) && isset($infos_taxon['id'])) {
248
					$nom = $infos_taxon['nom_retenu.libelle'];
249
					$nom .= (isset($infos_taxon['auteur'])) ? ' '.$infos_taxon['auteur'] : '';
250
					$retour = array("nom_sel" => $nom,
251
									"en_id_nom" => $infos_taxon['id']);
252
				}
1425 aurelien 253
			} else {
254
				// Nom scientifique
1426 aurelien 255
				$id_nom = $this->rechercherInformationsComplementairesSurNom($identifiant_espece);
1425 aurelien 256
				// Recherche du nom associe
257
				$retour = array("nom_sel" => $identifiant_espece);
1432 aurelien 258
				if(is_array($id_nom) && count($id_nom) > 0 && isset($id_nom[0][0]) && isset($id_nom[0][1])) {
1426 aurelien 259
					$nn = $id_nom[0][0];
1432 aurelien 260
					$retour = array("nom_sel" => $id_nom[0][1], "en_id_nom" => $id_nom[0][0]);
1425 aurelien 261
				}
262
			}
263
		}
264
 
265
		return $retour;
266
	}
267
}
268
?>