Subversion Repositories eFlore/Applications.cel

Rev

Rev 423 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
416 aurelien 1
<?php
2
// in : utf8
3
// out : utf8
4
 
5
/**
6
 
7
 David Delon david.delon@clapas.net 2007
8
 
9
 Ce logiciel est r�gi par la licence CeCILL soumise au droit fran�ais et
10
 respectant les principes de diffusion des logiciels libres. Vous pouvez
11
 utiliser, modifier et/ou redistribuer ce programme sous les conditions
12
 de la licence CeCILL telle que diffus�e par le CEA, le CNRS et l'INRIA
13
 sur le site "http://www.cecill.info".
14
 En contrepartie de l'accessibilit� au code source et des droits de copie,
15
 de modification et de redistribution accord�s par cette licence, il n'est
16
 offert aux utilisateurs qu'une garantie limit�e.  Pour les m�mes raisons,
17
 seule une responsabilit� restreinte p�se sur l'auteur du programme,  le
18
 titulaire des droits patrimoniaux et les conc�dants successifs.
19
 
20
 A cet �gard  l'attention de l'utilisateur est attir�e sur les risques
21
 associ�s au chargement,  � l'utilisation,  � la modification et/ou au
22
 d�veloppement et � la reproduction du logiciel par l'utilisateur �tant
23
 donn� sa sp�cificit� de logiciel libre, qui peut le rendre complexe �
24
 manipuler et qui le r�serve donc � des d�veloppeurs et des professionnels
25
 avertis poss�dant  des  connaissances  informatiques approfondies.  Les
26
 utilisateurs sont donc invit�s � charger  et  tester  l'ad�quation  du
27
 logiciel � leurs besoins dans des conditions permettant d'assurer la
28
 s�curit� de leurs syst�mes et ou de leurs donn�es et, plus g�n�ralement,
29
 � l'utiliser et l'exploiter dans les m�mes conditions de s�curit�.
30
 
31
 Le fait que vous puissiez acc�der � cet en-t�te signifie que vous avez
32
 pris connaissance de la licence CeCILL, et que vous en avez accept� les
33
 termes.
34
 
35
 */
36
 
37
 
38
 /*
39
 * Informations recues en iso8859-1
40
 * NameSearch.php
41
 *
42
 * Cas d'utilisation :
43
 * Service completion nom scientifique
44
 *
45
 * 1 : L'application recoit un debut de nom scientifique
46
 * 2 : Si le genre recu est >1, l'application retourne les 50 premieres genre commencant par ce prefixe
47
 * 3 : Si l'espece est presente  l'application retourne les 50 premieres genre+espece commencant par ce prefixe
48
 */
49
 
50
 
51
Class NameSearch extends DBAccessor {
52
 
53
 
54
	var $config;
55
 
56
	function NameSearch($config) {
57
 
58
		$this->config=$config;
59
	}
60
 
61
 
62
	function getElement($uid){
63
 
64
			$value=array();
65
 
66
			// Genre et Espece
67
			if (isset($uid[1]) && isset($uid[0])) {
68
				$genre=$uid[0];
69
				$espece=$uid[1];
70
                if (strlen($espece) > 0 ) {
71
					$espece=ereg_replace('\*+','%',$espece);
72
					$DB=$this->connectDB($this->config);
73
        	       	$query="SELECT DISTINCT en_nom_genre, en_epithete_espece, en_nom_supra_generique, en_epithete_infra_generique,".
74
        	       			"   auteur_bex.enaia_intitule_abrege AS abreviation_auteur_basio_ex ".
75
        	       			" , auteur_b.enaia_intitule_abrege AS abreviation_auteur_basio ".
76
        	       			" , auteur_mex.enaia_intitule_abrege AS abreviation_auteur_modif_ex ".
77
        	       			" , auteur_m.enaia_intitule_abrege AS abreviation_auteur_modif ".
78
        	       			" , en_epithete_espece, en_epithete_infra_specifique, enrg_abreviation_rang, en_id_nom, esn_ce_statut" .
79
        	       			" FROM eflore_nom, eflore_nom_rang, " .
80
        	       			"  	  eflore_naturaliste_intitule_abreviation AS auteur_bex ".
81
        	       			"   , eflore_naturaliste_intitule_abreviation AS auteur_b ".
82
        	       			"   , eflore_naturaliste_intitule_abreviation AS auteur_mex ".
83
        	       			"   , eflore_naturaliste_intitule_abreviation AS auteur_m ".
84
        	       	     	"   , eflore_selection_nom".
85
        	       			" WHERE en_id_version_projet_nom = '25' AND en_nom_genre LIKE '".$DB->escapeSimple($genre)."%' " .
86
        	       			" AND en_ce_rang > 160 " .
87
        	       			" AND en_epithete_espece like '".$DB->escapeSimple($espece)."%' AND en_ce_rang = enrg_id_rang " .
88
        	       			" AND en_ce_auteur_basio_ex = auteur_bex.enaia_id_intitule_naturaliste_abrege ".
89
        	       			" AND en_ce_auteur_basio = auteur_b.enaia_id_intitule_naturaliste_abrege  ".
90
        	       			" AND en_ce_auteur_modif_ex = auteur_mex.enaia_id_intitule_naturaliste_abrege ".
91
        	       			" AND en_ce_auteur_modif = auteur_m.enaia_id_intitule_naturaliste_abrege ".
92
        	       			" AND esn_id_version_projet_taxon=en_id_version_projet_nom " .
93
        	       			" AND esn_id_nom= en_id_nom ".
94
        	       			" ORDER BY esn_ce_statut, en_ce_rang, en_epithete_espece, en_nom_genre LIMIT 50";
95
 
96
                }
97
                else {
98
                	print "[]";
99
                	return;
100
                }
101
			}
102
			else {
103
				if (isset($uid[0])) {
104
					$genre=$uid[0];
105
					$genre=ereg_replace('\*+','%',$genre);
106
		            if ((strlen($genre) > 1) && ($genre != '%')) {
107
						$DB=$this->connectDB($this->config);
108
					    $query="SELECT DISTINCT en_nom_genre, en_id_nom, 0 as esn_ce_statut FROM  eflore_nom WHERE en_id_version_projet_nom = '25'" .
109
					    "AND en_ce_rang = 160 " .
110
					    "AND en_nom_genre LIKE '".$DB->escapeSimple($genre)."%' ORDER BY esn_ce_statut, en_nom_genre LIMIT 50";
111
		            }
112
		            else {
113
						print "[]";
114
                		return ;
115
					}
116
				}
117
				else {
118
					print "[]";
119
                	return ;
120
				}
121
			}
122
 
123
 
124
		    $res =& $DB->query($query);
125
 
126
 
127
	        if (DB::isError($res)) {
128
    	        die($res->getMessage());
129
        	}
130
 
131
	        while ($row =& $res->fetchrow(DB_FETCHMODE_ASSOC)) {
132
	        	$value[]=array($this->formaterNom($row),$row['en_id_nom'], $row['esn_ce_statut']);
133
 
134
	        }
135
 
423 aurelien 136
			$output = json_encode($value);
416 aurelien 137
			print($output);
138
 
139
 
140
	}
141
 
142
	function getRessource(){
143
 
144
			print "[]";
145
            return;
146
	}
147
 
148
 
149
	 function formaterNom($rawnom) {
150
                // Constitution du nom:
151
                $nom = '';
152
 
153
                if ($rawnom['en_nom_supra_generique'] != '') {
154
                    $nom .= $rawnom['en_nom_supra_generique'];
155
                } else if ($rawnom['en_epithete_infra_generique'] != '') {
156
                    $nom .= $rawnom['en_epithete_infra_generique'];
157
                } else {
158
                        if ($rawnom['en_nom_genre'] != '') {
159
                            $nom .=  $rawnom['en_nom_genre'];
160
                        }
161
                        if ($rawnom['en_epithete_espece']!= '') {
162
                            $nom .= ' '.$rawnom['en_epithete_espece'];
163
                        }
164
                        if ($rawnom['en_epithete_infra_specifique'] != '') {
165
                                if (!empty($rawnom['enrg_abreviation_rang'])) {
166
                                        $nom .= ' '.$rawnom['enrg_abreviation_rang'].'';
167
                                }
168
                                $nom .= ' '.$rawnom['en_epithete_infra_specifique'];
169
                        }
170
 
171
                }
172
                return $nom .retournerAuteur($rawnom) ;
173
	 }
174
}
175
 
176
 
177
 
178
	function retournerAuteur($rawnom) {
179
		$auteurs = '';
180
		$auteur_basio = '';
181
		$auteur_modif = '';
182
		if (!empty($rawnom['abreviation_auteur_basio_ex']) && $rawnom['abreviation_auteur_basio_ex']!='-' )  {
183
		    $auteur_basio .= $rawnom['abreviation_auteur_basio_ex'];
184
		    if (!empty($rawnom['abreviation_auteur_basio']) && $rawnom['abreviation_auteur_basio']!='-') {
185
		        $auteur_basio .= ' ex '.$rawnom['abreviation_auteur_basio'];
186
		    }
187
		} else if (!empty($rawnom['abreviation_auteur_basio']) && $rawnom['abreviation_auteur_basio']!='-') {
188
		    $auteur_basio .= $rawnom['abreviation_auteur_basio'];
189
		}
190
 
191
		if (!empty($rawnom['abreviation_auteur_modif_ex']) && $rawnom['abreviation_auteur_modif_ex']!='-') {
192
		    $auteur_modif .= $rawnom['abreviation_auteur_modif_ex'];
193
		    if (!empty($rawnom['abreviation_auteur_modif']) && $rawnom['abreviation_auteur_modif']!='-') {
194
		        $auteur_modif .= ' ex '.$rawnom['abreviation_auteur_modif'];
195
		    }
196
		} else if (!empty($rawnom['abreviation_auteur_modif']) && $rawnom['abreviation_auteur_modif']!='-')  {
197
		    $auteur_modif .= $rawnom['abreviation_auteur_modif'];
198
		}
199
 
200
		if (!empty($auteur_modif)) {
201
		    $auteurs = ' ('.$auteur_basio.') '.$auteur_modif;
202
		} elseif (!empty($auteur_basio)) {
203
		    $auteurs = ' '.$auteur_basio;
204
		}
205
 
206
		return $auteurs ;
207
	}
208
 
209
/* +--Fin du code ---------------------------------------------------------------------------------------+
210
* $Log$
211
* Revision 1.6  2008-01-30 08:57:28  ddelon
212
* fin mise en place mygwt
213
*
214
* Revision 1.5  2007-05-21 18:13:30  ddelon
215
* Refactoring et documentation
216
*
217
*
218
*/
219
 
220
 
221
 
222
?>