Subversion Repositories eFlore/Projets.eflore-projets

Rev

Rev 864 | Rev 933 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 864 Rev 918
1
<?php
1
<?php
2
/*
2
/*
3
 * @copyright 2013 Tela Botanica (accueil@tela-botanica.org)
3
 * @copyright 2013 Tela Botanica (accueil@tela-botanica.org)
4
 * @author Raphaël Droz <raphael@tela-botanica.org>
4
 * @author Raphaël Droz <raphael@tela-botanica.org>
5
 * @license GPL v3 <http://www.gnu.org/licenses/gpl.txt>
5
 * @license GPL v3 <http://www.gnu.org/licenses/gpl.txt>
6
 * @license CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>
6
 * @license CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>
7
 *
7
 *
8
 * pattern: /service:eflore:0.1/coste/textes/bdtfx.nn:182,631
8
 * pattern: /service:eflore:0.1/coste/textes/bdtfx.nn:182,631
9
 * params: txt.format=(htm|txt) ,  retour.champs=(titre,texte,...) , retour.format=(min|max), ...
9
 * params: txt.format=(htm|txt) ,  retour.champs=(titre,texte,...) , retour.format=(min|max), ...
10
 *
10
 *
11
 * Ce webservice est censé pouvoir:
11
 * Ce webservice est censé pouvoir:
12
 * 1) retourner des informations (choisies) à propos d'un ou plusieurs taxon(s) donné(s)
12
 * 1) retourner des informations (choisies) à propos d'un ou plusieurs taxon(s) donné(s)
13
 *	  (à partir de son numéro nomenclatural
13
 *	  (à partir de son numéro nomenclatural
14
 * 2) retourner des informations (choisies) à propos de taxons recherchés
14
 * 2) retourner des informations (choisies) à propos de taxons recherchés
15
 *	  (à partir de divers critères)
15
 *	  (à partir de divers critères)
16
 *
16
 *
17
 * TODO: masque.titre => masque.tag
17
 * TODO: masque.titre => masque.tag
18
 * TODO: clarifier l'attribut "tag" retourné (tag de la description ou des clefs de détermination)
18
 * TODO: clarifier l'attribut "tag" retourné (tag de la description ou des clefs de détermination)
19
 *
19
 *
20
 */
20
 */
21
 
21
 
22
// affecte le nombre d'ids autorisés dans le dernier segment d'URL
22
// affecte le nombre d'ids autorisés dans le dernier segment d'URL
23
// *et* la valeur maximale autorisée pour navigation.limite.
23
// *et* la valeur maximale autorisée pour navigation.limite.
24
define('_COSTE_TEXTE_MAX_RESULT_LIMIT', 500);
24
define('_COSTE_TEXTE_MAX_RESULT_LIMIT', 500);
25
 
25
 
26
// simplifie et accélère la sanitization de l'input:
26
// simplifie et accélère la sanitization de l'input:
27
// SELECT MAX(num_nom) FROM coste_v2_00;
27
// SELECT MAX(num_nom) FROM coste_v2_00;
28
define('_COSTE_TEXTE_MAX_COSTE_NN', 7015 + 1000);
28
define('_COSTE_TEXTE_MAX_COSTE_NN', 7015 + 1000);
29
// SELECT MAX(page) FROM coste_v2_00;
29
// SELECT MAX(page) FROM coste_v2_00;
30
define('_COSTE_TEXTE_MAX_COSTE_PAGE', 4126);
30
define('_COSTE_TEXTE_MAX_COSTE_PAGE', 4126);
31
// SELECT MAX(tome) FROM coste_v2_00;
31
// SELECT MAX(tome) FROM coste_v2_00;
32
define('_COSTE_TEXTE_MAX_COSTE_TOME', 3);
32
define('_COSTE_TEXTE_MAX_COSTE_TOME', 3);
33
// SELECT MAX(num_taxonomique) FROM coste_v2_00;
33
// SELECT MAX(num_taxonomique) FROM coste_v2_00;
34
define('_COSTE_TEXTE_MAX_BDTFX_NT', 37809);
34
define('_COSTE_TEXTE_MAX_BDTFX_NT', 37809);
35
// SELECT MAX(num_nom) FROM bdtfx_v1_02;
35
// SELECT MAX(num_nom) FROM bdtfx_v1_02;
36
define('_COSTE_TEXTE_MAX_BDTFX_NN', 103386 + 10000);
36
define('_COSTE_TEXTE_MAX_BDTFX_NN', 103386 + 10000);
37
 
37
 
38
/* restore_error_handler();
38
/* restore_error_handler();
39
   error_reporting(E_ALL); */
39
   error_reporting(E_ALL); */
40
class Textes {
40
class Textes {
41
	// paramètres autorisés
41
	// paramètres autorisés
42
	static $allow_params = array(
42
	static $allow_params = array(
43
		'txt.format', 'retour.format', 'retour.champs', 'retour.indexBy',
43
		'txt.format', 'retour.format', 'retour.champs', 'retour.indexBy',
44
		'recherche',
44
		'recherche',
45
		'masque.ns', 'masque.txt', 'masque.page', 'masque.tome', 'masque.famille', 'masque.nt',
45
		'masque.ns', 'masque.txt', 'masque.page', 'masque.tome', 'masque.famille', 'masque.nt',
46
		'masque.titre', // masque sur titre de la page wiki correspondante (page "clef" OR page "description")
46
		'masque.titre', // masque sur titre de la page wiki correspondante (page "clef" OR page "description")
47
		'navigation.depart', 'navigation.limite');
47
		'navigation.depart', 'navigation.limite');
48
	// et valeurs par défaut
48
	// et valeurs par défaut
49
	static $default_params = array('txt.format' => 'txt', 'retour.format' => 'max', 'retour.indexBy' => 'coste',
49
	static $default_params = array('txt.format' => 'txt', 'retour.format' => 'max', 'retour.indexBy' => 'coste',
50
								   'recherche' => 'stricte',
50
								   'recherche' => 'stricte',
51
								   'retour.champs' => 'titre,texte,determination,tag',
51
								   'retour.champs' => 'titre,texte,determination,tag',
52
								   'navigation.depart' => 0, 'navigation.limite' => 50);
52
								   'navigation.depart' => 0, 'navigation.limite' => 50);
53
 
53
 
54
	// les champs de base de coste_v2_00
54
	// les champs de base de coste_v2_00
55
	// mysql -N tb_eflore<<<"SHOW FIELDS FROM coste_v2_00"|egrep -v 'page_'|awk '{print $1}'|xargs -i -n1 printf "'%s' => 'c.%s',\n" {} {}
55
	// mysql -N tb_eflore<<<"SHOW FIELDS FROM coste_v2_00"|egrep -v 'page_'|awk '{print $1}'|xargs -i -n1 printf "'%s' => 'c.%s',\n" {} {}
56
	static $allow_champs = array(
56
	static $allow_champs = array(
57
		'coste:nn' => 'c.num_nom',
57
		'coste:nn' => 'c.num_nom',
58
		'bdtfx:nn' => 'IF(c.flore_bdtfx_nn = "",NULL,c.flore_bdtfx_nn)',
58
		'bdtfx:nn' => 'IF(c.flore_bdtfx_nn = "",NULL,c.flore_bdtfx_nn)',
59
		'bdtfx:nt' => 'c.flore_bdtfx_nt',
59
		'bdtfx:nt' => 'c.flore_bdtfx_nt',
60
		'num_nom' => 'c.num_nom',
60
		'num_nom' => 'c.num_nom',
61
		'num_nom_retenu' => 'c.num_nom_retenu',
61
		'num_nom_retenu' => 'c.num_nom_retenu',
62
		'num_tax_sup' => 'c.num_tax_sup',
62
		'num_tax_sup' => 'c.num_tax_sup',
63
		'rang' => 'c.rang',
63
		'rang' => 'c.rang',
64
		'nom_sci' => 'c.nom_sci',
64
		'nom_sci' => 'c.nom_sci',
65
		'nom_supra_generique' => 'c.nom_supra_generique',
65
		'nom_supra_generique' => 'c.nom_supra_generique',
66
		'genre' => 'c.genre',
66
		'genre' => 'c.genre',
67
		'epithete_infra_generique' => 'c.epithete_infra_generique',
67
		'epithete_infra_generique' => 'c.epithete_infra_generique',
68
		'epithete_sp' => 'c.epithete_sp',
68
		'epithete_sp' => 'c.epithete_sp',
69
		'type_epithete' => 'c.type_epithete',
69
		'type_epithete' => 'c.type_epithete',
70
		'epithete_infra_sp' => 'c.epithete_infra_sp',
70
		'epithete_infra_sp' => 'c.epithete_infra_sp',
71
		'cultivar_groupe' => 'c.cultivar_groupe',
71
		'cultivar_groupe' => 'c.cultivar_groupe',
72
		'cultivar' => 'c.cultivar',
72
		'cultivar' => 'c.cultivar',
73
		'nom_commercial' => 'c.nom_commercial',
73
		'nom_commercial' => 'c.nom_commercial',
74
		'auteur' => 'c.auteur',
74
		'auteur' => 'c.auteur',
75
		'annee' => 'c.annee',
75
		'annee' => 'c.annee',
76
		'biblio_origine' => 'c.biblio_origine',
76
		'biblio_origine' => 'c.biblio_origine',
77
		'notes' => 'c.notes',
77
		'notes' => 'c.notes',
78
		'nom_addendum' => 'c.nom_addendum',
78
		'nom_addendum' => 'c.nom_addendum',
79
		'nom_francais' => 'c.nom_francais',
79
		'nom_francais' => 'c.nom_francais',
80
		'nom_coste' => 'c.nom_coste',
80
		'nom_coste' => 'c.nom_coste',
81
		'auteur_coste' => 'c.auteur_coste',
81
		'auteur_coste' => 'c.auteur_coste',
82
		'biblio_coste' => 'c.biblio_coste',
82
		'biblio_coste' => 'c.biblio_coste',
83
		'num_nom_coste' => 'c.num_nom_coste',
83
		'num_nom_coste' => 'c.num_nom_coste',
84
		'num_nom_retenu_coste' => 'c.num_nom_retenu_coste',
84
		'num_nom_retenu_coste' => 'c.num_nom_retenu_coste',
85
		'num_tax_sup_coste' => 'c.num_tax_sup_coste',
85
		'num_tax_sup_coste' => 'c.num_tax_sup_coste',
86
		'synonymie_coste' => 'c.synonymie_coste',
86
		'synonymie_coste' => 'c.synonymie_coste',
87
		'tome' => 'c.tome',
87
		'tome' => 'c.tome',
88
		'page' => 'c.page',
88
		'page' => 'c.page',
89
		'nbre_taxons' => 'c.nbre_taxons',
89
		'nbre_taxons' => 'c.nbre_taxons',
90
		'flore_bdtfx_nn' => 'c.flore_bdtfx_nn',
90
		'flore_bdtfx_nn' => 'c.flore_bdtfx_nn',
91
		'flore_bdtfx_nt' => 'c.flore_bdtfx_nt',
91
		'flore_bdtfx_nt' => 'c.flore_bdtfx_nt',
92
		'image' => 'c.image',
92
		'image' => 'c.image',
93
		'image_auteur' => 'c.image_auteur',
93
		'image_auteur' => 'c.image_auteur',
94
		'nom_sci_html' => 'c.nom_sci_html',
94
		'nom_sci_html' => 'c.nom_sci_html',
95
 
95
 
96
		// handly duplicate (redirigé vers nom_sci ou nom_sci_html selon que txt.format vaut "txt" ou "htm"
96
		// handly duplicate (redirigé vers nom_sci ou nom_sci_html selon que txt.format vaut "txt" ou "htm"
97
		'titre' => 'c.nom_sci',
97
		'titre' => 'c.nom_sci',
98
 
98
 
99
		// champs spécifiques (et étrangères)
99
		// champs spécifiques (et étrangères)
100
		'texte' => 'dsc.body',
100
		'texte' => 'dsc.body',
101
		'determination' => 'cle.body',
101
		'determination' => 'cle.body',
102
		'tag' => 'dsc.tag',
102
		'tag' => 'dsc.tag',
103
		'famille' => 'b.famille', // cf sqlAddJoins()
103
		'famille' => 'b.famille', // cf sqlAddJoins()
104
		'*' => 'XXX' // spécial
104
		'*' => 'XXX' // spécial
105
	);
105
	);
106
 
106
 
107
	// les champs suivants disparaissent de la liste utilisée pour former la requête SQL
107
	// les champs suivants disparaissent de la liste utilisée pour former la requête SQL
108
	// (ils sont exclue lorsque '*' est utilisée, ce sont généralement des synonymes)
108
	// (ils sont exclue lorsque '*' est utilisée, ce sont généralement des synonymes)
109
	static $special_champs = array('nom_sci_html', 'nom_sci', '*', 'flore_bdtfx_nn', 'flore_bdtfx_nt', 'num_nom');
109
	static $special_champs = array('nom_sci_html', 'nom_sci', '*', 'flore_bdtfx_nn', 'flore_bdtfx_nt', 'num_nom');
110
 
110
 
111
	// ces champs sont toujours dans les résultats (cf sqlSelectFields()
111
	// ces champs sont toujours dans les résultats (cf sqlSelectFields()
112
	static $champs_obligatoires = array('coste:nn', 'bdtfx:nn');
112
	static $champs_obligatoires = array('coste:nn', 'bdtfx:nn');
113
 
113
 
114
 
114
 
115
	// le pattern utilisé pour la recherche dite "floue"
115
	// le pattern utilisé pour la recherche dite "floue"
116
	static $soundex_scheme = '(%1$s LIKE %2$s OR SOUNDEX(%1$s) = SOUNDEX(%2$s) OR SOUNDEX(REVERSE(%1$s)) = SOUNDEX(REVERSE(%2$s)))';
116
	static $soundex_scheme = '(%1$s LIKE %2$s OR SOUNDEX(%1$s) = SOUNDEX(%2$s) OR SOUNDEX(REVERSE(%1$s)) = SOUNDEX(REVERSE(%2$s)))';
117
 
117
 
118
	// contrainte du point d'entrée d'API webservice Tela lors d'un GET
118
	// contrainte du point d'entrée d'API webservice Tela lors d'un GET
119
	public function consulter($ressources, $parametres, $db = NULL) {
119
	public function consulter($ressources, $parametres, $db = NULL) {
120
		if(!$db) {
120
		if (!$db) {
121
			// http_response_code(500);
121
			// http_response_code(500);
122
			throw new Exception('no DB', 500);
122
			throw new Exception('no DB', 500);
123
		}
123
		}
124
 
124
 
125
		// parser la requête et filtrer les paramètres valides
125
		// parser la requête et filtrer les paramètres valides
126
		// en cas d'accès HTTP
126
		// en cas d'accès HTTP
127
		if(array_key_exists('QUERY_STRING', $_SERVER)) {
127
		if (array_key_exists('QUERY_STRING', $_SERVER)) {
128
			self::requestParse($uri, $params);
128
			self::requestParse($uri, $params);
129
		}
-
 
130
		// en cas d'accès phpunit
129
		} else {// en cas d'accès phpunit
131
		else {
-
 
132
			$uri = $ressources;
130
			$uri = $ressources;
133
		}
131
		}
134
 
132
 
135
		// renvoie du plain/text d'aide (cf fin de programme)
133
		// renvoie du plain/text d'aide (cf fin de programme)
136
		if(count($uri) == 1 && $uri[0] == 'aide') return self::aide();
134
		if (count($uri) == 1 && $uri[0] == 'aide') {
-
 
135
			return self::aide();
-
 
136
		}
137
 
137
 
-
 
138
 
-
 
139
		if (is_null($parametres)) {
138
 
140
			$parametres = Array();
139
		if(is_null($parametres)) $parametres = Array();
141
		}
140
		$params = self::requestFilterParams($parametres);
142
		$params = self::requestFilterParams($parametres);
141
		// les contraintes liées aux ids (passés comme composants d'URL)
143
		// les contraintes liées aux ids (passés comme composants d'URL)
142
		// sont ajoutées aux params [sans être accepté comme paramètre d'URL]
144
		// sont ajoutées aux params [sans être accepté comme paramètre d'URL]
143
		$params['_ids'] = self::requestFilterIds($uri);
145
		$params['_ids'] = self::requestFilterIds($uri);
144
 
146
 
145
		// XXX: temporaires, passage de $db aux fonctions
147
		// XXX: temporaires, passage de $db aux fonctions
146
		// de toolkits
148
		// de toolkits
147
		$req = self::getCosteInfo($params, $db);
149
		$req = self::getCosteInfo($params, $db);
148
 
150
 
149
		$res = $db->recupererTous($req);
151
		$res = $db->recupererTous($req);
150
		$err = mysql_error();
152
		$err = mysql_error();
151
		if(!$res && $err) {
153
		if (!$res && $err) {
152
			// http_response_code(400);
154
			// http_response_code(400);
153
			// if(defined('DEBUG') && DEBUG) header("X-Debug: $req");
155
			// if(defined('DEBUG') && DEBUG) header("X-Debug: $req");
154
			throw new Exception('not found', 400);
156
			throw new Exception('not found', 400);
155
		}
157
		}
156
 
158
 
157
		// rapide formatage des résultats:
159
		// rapide formatage des résultats:
158
		$matches = 0;
160
		$matches = 0;
159
 
161
 
160
		if($res) {
162
		if ($res) {
161
			// nombre de matches (sans LIMIT) utilisé pour l'en-tête
163
			// nombre de matches (sans LIMIT) utilisé pour l'en-tête
162
			$matches = $db->recuperer('SELECT FOUND_ROWS() AS total');
164
			$matches = $db->recuperer('SELECT FOUND_ROWS() AS total');
163
			$matches = intval($matches['total']);
165
			$matches = intval($matches['total']);
164
		}
166
		}
165
 
167
 
166
		// reformate les résultats pour les indexer par coste:nn par défaut
168
		// reformate les résultats pour les indexer par coste:nn par défaut
167
		// cependant le paramètre retour.indexBy permet de choisir une indexation par num_nom de bdtfx
169
		// cependant le paramètre retour.indexBy permet de choisir une indexation par num_nom de bdtfx
168
		$clef_index = $params['retour.indexBy'] == 'coste' ? 'coste:nn' : 'bdtfx:nn';
170
		$clef_index = $params['retour.indexBy'] == 'coste' ? 'coste:nn' : 'bdtfx:nn';
169
		$res2 = array();
171
		$res2 = array();
170
		foreach($res as $v) {
172
		foreach ($res as $v) {
-
 
173
			if (!$v[$clef_index]) {
171
			if(!$v[$clef_index]) throw new Exception('format error: index NULL, use retour.indexBy=coste', 409);
174
				throw new Exception('format error: index NULL, use retour.indexBy=coste', 409);
-
 
175
			}
172
			$res2[$v[$clef_index]] = $v;
176
			$res2[$v[$clef_index]] = $v;
173
		}
177
		}
174
 
178
 
175
		// l'appelant s'occupera du json_encode()
179
		// l'appelant s'occupera du json_encode()
176
		// même si ça démange d'exit'er ici
180
		// même si ça démange d'exit'er ici
177
		header("Content-Type: application/json; charset=utf-8");
181
		header("Content-Type: application/json; charset=utf-8");
-
 
182
		return array('entete' => array(
178
		return array('entete' => array('depart' => $params['navigation.depart'],
183
			'depart' => $params['navigation.depart'],
179
									   'limite' => $params['navigation.limite'],
184
			'limite' => $params['navigation.limite'],
180
									   'total' => count($res2),
185
			'total' => count($res2),
181
									   'match' => $matches),
186
			'match' => $matches),
182
					 'resultats' => $res2);
187
			'resultats' => $res2);
183
 
188
 
184
	}
189
	}
185
 
190
 
186
 
191
 
187
	// la fonction centrale: récupère les infos à partir de paramètres
192
	// la fonction centrale: récupère les infos à partir de paramètres
188
	// et une optionnelle contrainte sur coste:nn ou bdtfx:nn
193
	// et une optionnelle contrainte sur coste:nn ou bdtfx:nn
189
	static function getCosteInfo(array $params, $db) {
194
	static function getCosteInfo(array $params, $db) {
190
		// contraintes (WHERE):
195
		// contraintes (WHERE):
191
		$constraints = self::sqlAddConstraint($params, $db);
196
		$constraints = self::sqlAddConstraint($params, $db);
192
		// XXX: que faire en l'absence de contrainte ? pour l'instant : "WHERE 1"
197
		// XXX: que faire en l'absence de contrainte ? pour l'instant : "WHERE 1"
193
 
198
 
194
		// champs:
199
		// champs:
195
		$champs_valides_non_formattes = NULL;
200
		$champs_valides_non_formattes = NULL;
196
		$champs_valides = self::sqlSelectFields($params, $champs_valides_non_formattes);
201
		$champs_valides = self::sqlSelectFields($params, $champs_valides_non_formattes);
197
 
202
 
198
		// joins:
203
		// joins:
199
		$other_join = self::sqlAddJoins($params, $champs_valides_non_formattes);
204
		$other_join = self::sqlAddJoins($params, $champs_valides_non_formattes);
200
		$req = sprintf(<<<EOF
-
 
201
SELECT SQL_CALC_FOUND_ROWS  %s
205
		$requete_tpl = "SELECT SQL_CALC_FOUND_ROWS  %s".
202
FROM tb_eflore.coste_v2_00 c
206
			"FROM tb_eflore.coste_v2_00 c ".
203
LEFT JOIN tela_prod_wikini.florecoste_pages dsc ON c.page_wiki_dsc = dsc.tag AND dsc.latest = 'Y'
207
			"	LEFT JOIN tela_prod_wikini.florecoste_pages dsc ON c.page_wiki_dsc = dsc.tag AND dsc.latest = 'Y' ".
204
LEFT JOIN tela_prod_wikini.florecoste_pages cle ON c.page_wiki_cle = cle.tag AND cle.latest = 'Y'
208
			"	LEFT JOIN tela_prod_wikini.florecoste_pages cle ON c.page_wiki_cle = cle.tag AND cle.latest = 'Y' ".
205
%s
209
			" %s ".
206
WHERE %s ORDER BY c.num_nom LIMIT %u, %u -- %s
210
			"WHERE %s ORDER BY c.num_nom LIMIT %u, %u -- %s ";
207
EOF
-
 
208
					   ,
211
		$req = sprintf($requete_tpl,
209
					   $champs_valides, // dans le SELECT (parmi champs coste_v2_00)
212
			$champs_valides, // dans le SELECT (parmi champs coste_v2_00)
210
					   // autre join, si nécessaire
213
			// autre join, si nécessaire
211
					   $other_join ? $other_join : '',
214
			$other_join ? $other_join : '',
-
 
215
 
212
					   // where
216
			// where
213
					   $constraints ? implode(' AND ', $constraints) : '1',
217
			$constraints ? implode(' AND ', $constraints) : '1',
214
 
218
 
215
					   // limit
219
			// limit
216
					   $params['navigation.depart'],
220
			$params['navigation.depart'],
217
					   $params['navigation.limite'],
221
			$params['navigation.limite'],
218
					   __FILE__ . ':' . __LINE__);
222
			__FILE__ . ':' . __LINE__);
219
		
223
 
220
		return $req;
224
		return $req;
221
	}
225
	}
222
 
-
 
223
 
-
 
224
 
-
 
225
 
226
 
226
	// SQL helpers
227
	// SQL helpers
227
	// le préfix de coste_v2_00 est "c"
228
	// le préfix de coste_v2_00 est "c"
228
	// le préfix de florecoste_pages sur la description est est "dsc"
229
	// le préfix de florecoste_pages sur la description est est "dsc"
229
	// le préfix de florecoste_pages sur la clef de détermination est est "cle"
230
	// le préfix de florecoste_pages sur la clef de détermination est est "cle"
230
	static function sqlAddConstraint($params, $db) {
231
	static function sqlAddConstraint($params, $db) {
231
		$stack = array();
232
		$stack = array();
232
		if(!empty($params['masque.ns'])) {
233
		if (!empty($params['masque.ns'])) {
233
			if($params['recherche'] == 'etendue')
234
			if ($params['recherche'] == 'etendue') {
234
				$stack[] = 'c.nom_sci LIKE ' . $db->proteger('%' . trim($params['masque.ns']) . '%');
235
				$stack[] = 'c.nom_sci LIKE '.$db->proteger('%' . trim($params['masque.ns']).'%');
235
			elseif($params['recherche'] == 'floue')
236
			} elseif($params['recherche'] == 'floue') {
236
				$stack[] = sprintf(self::$soundex_scheme,
237
				$stack[] = sprintf(self::$soundex_scheme,
237
								   'c.nom_sci',
238
					'c.nom_sci',
238
								   $db->proteger('%' . trim($params['masque.ns']) . '%'));
239
					$db->proteger('%'.trim($params['masque.ns']).'%'));
239
			else
240
			} else {
240
				$stack[] = 'c.nom_sci = ' . $db->proteger(trim($params['masque.ns']));
241
				$stack[] = 'c.nom_sci = '.$db->proteger(trim($params['masque.ns']));
-
 
242
			}
241
		}
243
		}
242
 
244
 
243
		// le masque sur texte est toujours un LIKE() "étendue", sauf si "floue" spécifié
245
		// le masque sur texte est toujours un LIKE() "étendue", sauf si "floue" spécifié
244
		if(!empty($params['masque.txt'])) {
246
		if(!empty($params['masque.txt'])) {
245
			if($params['recherche'] == 'floue') {
247
			if($params['recherche'] == 'floue') {
246
				$stack[] = sprintf(self::$soundex_scheme,
248
				$stack[] = sprintf(self::$soundex_scheme,
247
								   'dsc.body',
249
					'dsc.body',
248
								   $db->proteger('%' . trim($params['masque.txt']) . '%'));
250
					$db->proteger('%'.trim($params['masque.txt']).'%'));
249
			}
251
			}
250
			else {
252
			else {
251
				$stack[] = 'dsc.body LIKE ' . $db->proteger('%' . trim($params['masque.txt']) . '%');
253
				$stack[] = 'dsc.body LIKE '.$db->proteger('%'.trim($params['masque.txt']).'%');
252
			}
254
			}
253
		}
255
		}
254
 
256
 
255
		if(!empty($params['masque.titre'])) {
257
		if(!empty($params['masque.titre'])) {
256
			if($params['recherche'] == 'stricte') {
258
			if($params['recherche'] == 'stricte') {
257
				$stack[] = sprintf('(dsc.tag = %1$s OR cle.tag = %1$s)',
259
				$stack[] = sprintf('(dsc.tag = %1$s OR cle.tag = %1$s)',
258
								   $db->proteger(trim($params['masque.titre'])));
260
					$db->proteger(trim($params['masque.titre'])));
259
			}
261
			}
260
			else {
262
			else {
261
				$stack[] = sprintf('(dsc.tag LIKE %1$s OR cle.tag LIKE %1$s)',
263
				$stack[] = sprintf('(dsc.tag LIKE %1$s OR cle.tag LIKE %1$s)',
262
								   $db->proteger('%' .  trim($params['masque.titre']) . '%'));
264
					$db->proteger('%'.trim($params['masque.titre']).'%'));
263
			}
265
			}
264
		}
266
		}
265
 
267
 
266
		if(array_key_exists('masque.famille', $params)) {
268
		if(array_key_exists('masque.famille', $params)) {
267
			$stack[] = 'b.famille LIKE ' . $db->proteger(trim($params['masque.famille']));
269
			$stack[] = 'b.famille LIKE '.$db->proteger(trim($params['masque.famille']));
268
		}
270
		}
269
 
271
 
270
		if(array_key_exists('masque.page', $params)) {
272
		if(array_key_exists('masque.page', $params)) {
271
			$stack[] = 'c.page = ' . intval($params['masque.page']);
273
			$stack[] = 'c.page = '.intval($params['masque.page']);
272
		}
274
		}
273
 
275
 
274
		if(array_key_exists('masque.tome', $params)) {
276
		if(array_key_exists('masque.tome', $params)) {
275
			$stack[] = 'c.tome = ' . intval($params['masque.tome']);
277
			$stack[] = 'c.tome = '.intval($params['masque.tome']);
276
		}
278
		}
277
 
279
 
278
		if(array_key_exists('masque.nt', $params)) {
280
		if(array_key_exists('masque.nt', $params)) {
279
			$stack[] = 'c.flore_bdtfx_nt = ' . intval($params['masque.nt']);
281
			$stack[] = 'c.flore_bdtfx_nt = '.intval($params['masque.nt']);
280
		}
282
		}
281
 
283
 
282
		// ajout de la contrainte sur coste:nn ou bdtfx:nn si un composant d'URL supplémentaire
284
		// ajout de la contrainte sur coste:nn ou bdtfx:nn si un composant d'URL supplémentaire
283
		// comportant un #id existe, cf self::requestFilterIds()
285
		// comportant un #id existe, cf self::requestFilterIds()
284
		$o_stack = array();
286
		$o_stack = array();
285
		if(array_key_exists('_ids', $params) && $params['_ids']) {
287
		if (array_key_exists('_ids', $params) && $params['_ids']) {
286
			if($params['_ids']['coste']) {
288
			if ($params['_ids']['coste']) {
287
				$o_stack[] = sprintf("c.num_nom IN (%s)", implode(',', $params['_ids']['coste']));
289
				$o_stack[] = sprintf("c.num_nom IN (%s)", implode(',', $params['_ids']['coste']));
288
			}
290
			}
289
			if($params['_ids']['bdtfx']) {
291
			if ($params['_ids']['bdtfx']) {
290
				$o_stack[] = sprintf("c.flore_bdtfx_nn IN (%s)", implode(',', $params['_ids']['bdtfx']));
292
				$o_stack[] = sprintf("c.flore_bdtfx_nn IN (%s)", implode(',', $params['_ids']['bdtfx']));
291
			}
293
			}
292
		}
294
		}
-
 
295
		if ($o_stack) {
293
		if($o_stack) $stack[] = '(' . implode(' OR ', $o_stack) . ')';
296
			$stack[] = '(' . implode(' OR ', $o_stack) . ')';
-
 
297
		}
294
 
298
 
295
		return $stack;
299
		return $stack;
296
	}
300
	}
297
 
301
 
298
 
302
 
299
	// $unmerged contient la même liste de champs que celle renvoyée
303
	// $unmerged contient la même liste de champs que celle renvoyée
300
	// à la différence que celle-ci n'est pas reformatée et s'avère donc
304
	// à la différence que celle-ci n'est pas reformatée et s'avère donc
301
	// utilisable plus aisément dans sqlAddJoins() qui peut en avoir besoin
305
	// utilisable plus aisément dans sqlAddJoins() qui peut en avoir besoin
302
	static function sqlSelectFields($params, &$unmerged) {
306
	static function sqlSelectFields($params, &$unmerged) {
303
		$champs = $params['retour.champs'];
307
		$champs = $params['retour.champs'];
304
		// champs coste_v2_00
308
		// champs coste_v2_00
305
		$c = self::addSQLToFieldSynonym(explode(',', $champs));
309
		$c = self::addSQLToFieldSynonym(explode(',', $champs));
306
		if(isset($c['*'])) {
310
		if (isset($c['*'])) {
307
			$t = array_diff_key(self::$allow_champs, array_flip(self::$special_champs));
311
			$t = array_diff_key(self::$allow_champs, array_flip(self::$special_champs));
308
		}
-
 
309
		else {
312
		} else {
310
			// just loop below
313
			// just loop below
311
			$t = $c;
314
			$t = $c;
312
		}
315
		}
313
 
316
 
314
		// si aucun des champs fournis n'est valide
317
		// si aucun des champs fournis n'est valide
315
		// on se rappelle nous-même après avoir réinitialisé retour.champs
318
		// on se rappelle nous-même après avoir réinitialisé retour.champs
316
		// avec les champs par défaut
319
		// avec les champs par défaut
317
		if(!$t) {
320
		if(!$t) {
318
			$params['retour.champs'] = self::$default_params['retour.champs'];
321
			$params['retour.champs'] = self::$default_params['retour.champs'];
319
			return self::sqlSelectFields($params);
322
			return self::sqlSelectFields($params);
320
		}
323
		}
321
 
324
 
322
		if(array_key_exists('titre', $t))
325
		if(array_key_exists('titre', $t))
323
			$t['titre'] = $params['txt.format'] == 'txt' ? 'c.nom_sci' : 'c.nom_sci_html';
326
			$t['titre'] = $params['txt.format'] == 'txt' ? 'c.nom_sci' : 'c.nom_sci_html';
324
 
327
 
325
		// champs obligatoires:
328
		// champs obligatoires:
326
		$t = array_merge($t, self::addSQLToFieldSynonym(self::$champs_obligatoires));
329
		$t = array_merge($t, self::addSQLToFieldSynonym(self::$champs_obligatoires));
327
		$unmerged = $t;
330
		$unmerged = $t;
328
 
331
 
329
		// XXX: PHP-5.3
332
		// XXX: PHP-5.3
330
		$ret = array();
333
		$ret = array();
331
		foreach($t as $k => $v) {
334
		foreach($t as $k => $v) {
332
			if(strpos($k, ':') !== FALSE) {
335
			if (strpos($k, ':') !== FALSE) {
333
				$ret[] = "$v AS \"$k\"";
336
				$ret[] = "$v AS \"$k\"";
334
			} else {
337
			} else {
335
				$ret[] = "$v AS $k";
338
				$ret[] = "$v AS $k";
336
			}
339
			}
337
		}
340
		}
338
		return implode(',',$ret);
341
		return implode(',',$ret);
339
	}
342
	}
340
 
343
 
341
	static function sqlAddJoins($params, $champs) {
344
	static function sqlAddJoins($params, $champs) {
342
		$j = '';
345
		$j = '';
343
		// ces tests doivent correspondre aux champs générés par sqlSelectFields()
346
		// ces tests doivent correspondre aux champs générés par sqlSelectFields()
344
		// ou contraintes générées par sqlAddConstraint()
347
		// ou contraintes générées par sqlAddConstraint()
345
		if(array_key_exists('masque.famille', $params) ||
348
		if(array_key_exists('masque.famille', $params) ||
346
		   array_key_exists('famille', $champs)) {
349
		   array_key_exists('famille', $champs)) {
347
			$j .= 'LEFT JOIN tb_eflore.bdtfx_v1_02 b ON c.flore_bdtfx_nn = b.num_nom';
350
			$j .= 'LEFT JOIN tb_eflore.bdtfx_v1_02 b ON c.flore_bdtfx_nn = b.num_nom';
348
		}
351
		}
349
 
352
 
350
		return $j;
353
		return $j;
351
	}
354
	}
352
 
355
 
353
	// d'un tableau de type array("coste:nn", "type_epithete")
356
	// d'un tableau de type array("coste:nn", "type_epithete")
354
	// retourne
357
	// retourne
355
	// un tableau de type array("coste:nn" => "c.num_nom", "type_epithete" => "c.type_epithete")
358
	// un tableau de type array("coste:nn" => "c.num_nom", "type_epithete" => "c.type_epithete")
356
	// basé sur self::$allow_champs
359
	// basé sur self::$allow_champs
357
	static function addSQLToFieldSynonym(Array $syno) {
360
	static function addSQLToFieldSynonym(Array $syno) {
358
		return array_intersect_key(self::$allow_champs, array_flip($syno));
361
		return array_intersect_key(self::$allow_champs, array_flip($syno));
359
	}
362
	}
360
 
363
 
361
	// request handler
364
	// request handler
362
	static function requestParse(&$ressource, &$params) {
365
	static function requestParse(&$ressource, &$params) {
363
		$uri = explode('/', $_SERVER['REDIRECT_URL']);
366
		$uri = explode('/', $_SERVER['REDIRECT_URL']);
364
		if(!empty($_SERVER['QUERY_STRING']))
367
		if(!empty($_SERVER['QUERY_STRING']))
365
			parse_str($_SERVER['REDIRECT_QUERY_STRING'], $params);
368
			parse_str($_SERVER['REDIRECT_QUERY_STRING'], $params);
366
		$ressource = array_slice($uri, array_search('textes', $uri) + 1, 3);
369
		$ressource = array_slice($uri, array_search('textes', $uri) + 1, 3);
367
	}
370
	}
368
 
371
 
369
	// supprime l'index du tableau des paramètres si sa valeur ne correspond pas
372
	// supprime l'index du tableau des paramètres si sa valeur ne correspond pas
370
	// au spectre passé par $values.
373
	// au spectre passé par $values.
371
	static function unsetIfInvalid(&$var, $index, $values) {
374
	static function unsetIfInvalid(&$var, $index, $values) {
372
		if(array_key_exists($index, $var) && !in_array($var[$index], $values))
375
		if(array_key_exists($index, $var) && !in_array($var[$index], $values))
373
			unset($var[$index]);
376
			unset($var[$index]);
374
	}
377
	}
375
 
378
 
376
	static function requestFilterParams(Array $params) {
379
	static function requestFilterParams(Array $params) {
377
		$p = array_intersect_key($params, array_flip(self::$allow_params));
380
		$p = array_intersect_key($params, array_flip(self::$allow_params));
378
		self::unsetIfInvalid($p, 'txt.format', array('txt', 'htm'));
381
		self::unsetIfInvalid($p, 'txt.format', array('txt', 'htm'));
379
		self::unsetIfInvalid($p, 'retour.format', array('min','max'));
382
		self::unsetIfInvalid($p, 'retour.format', array('min','max'));
380
		self::unsetIfInvalid($p, 'retour.indexBy', array('coste', 'bdtfx'));
383
		self::unsetIfInvalid($p, 'retour.indexBy', array('coste', 'bdtfx'));
381
		self::unsetIfInvalid($p, 'recherche', array('stricte','etendue','floue'));
384
		self::unsetIfInvalid($p, 'recherche', array('stricte','etendue','floue'));
382
 
385
 
383
		if(isset($params['masque.ns'])) $p['masque.ns'] = trim($params['masque.ns']);
386
		if(isset($params['masque.ns'])) $p['masque.ns'] = trim($params['masque.ns']);
384
		if(isset($params['masque.texte'])) $p['masque.texte'] = trim($params['masque.texte']);
387
		if(isset($params['masque.texte'])) $p['masque.texte'] = trim($params['masque.texte']);
385
 
388
 
386
		if(isset($params['masque.famille'])) {
389
		if(isset($params['masque.famille'])) {
387
			// mysql -N<<<"SELECT DISTINCT famille FROM bdtfx_v1_02;"|sed -r "s/(.)/\1\n/g"|sort -u|tr -d "\n"
390
			// mysql -N<<<"SELECT DISTINCT famille FROM bdtfx_v1_02;"|sed -r "s/(.)/\1\n/g"|sort -u|tr -d "\n"
388
			$p['masque.famille'] = preg_replace('/[^a-zA-Z %_]/', '', iconv("UTF-8",
391
			$p['masque.famille'] = preg_replace('/[^a-zA-Z %_]/', '', iconv("UTF-8",
389
																			"ASCII//TRANSLIT",
392
																			"ASCII//TRANSLIT",
390
																			$params['masque.famille']));
393
																			$params['masque.famille']));
391
		}
394
		}
392
 
395
 
393
		// TODO: use filter_input(INPUT_GET);
396
		// TODO: use filter_input(INPUT_GET);
394
		// renvoie FALSE ou NULL si absent ou invalide
397
		// renvoie FALSE ou NULL si absent ou invalide
395
		$p['navigation.limite'] = filter_var(@$params['navigation.limite'],
398
		$p['navigation.limite'] = filter_var(@$params['navigation.limite'],
396
												  FILTER_VALIDATE_INT,
399
			FILTER_VALIDATE_INT,
397
												  array('options' => array('default' => NULL,
400
			array('options' => array(
-
 
401
				'default' => NULL,
398
																		   'min_range' => 1,
402
				'min_range' => 1,
399
																		   'max_range' => _COSTE_TEXTE_MAX_RESULT_LIMIT)));
403
				'max_range' => _COSTE_TEXTE_MAX_RESULT_LIMIT)));
400
		$p['navigation.depart'] = filter_var(@$params['navigation.depart'],
404
		$p['navigation.depart'] = filter_var(@$params['navigation.depart'],
401
												  FILTER_VALIDATE_INT,
405
			FILTER_VALIDATE_INT,
402
												  array('options' => array('default' => NULL,
406
			array('options' => array(
-
 
407
				'default' => NULL,
403
																		   'min_range' => 0,
408
				'min_range' => 0,
404
																		   'max_range' => _COSTE_TEXTE_MAX_COSTE_NN)));
409
				'max_range' => _COSTE_TEXTE_MAX_COSTE_NN)));
405
		$p['masque.page'] = filter_var(@$params['masque.page'],
410
		$p['masque.page'] = filter_var(@$params['masque.page'],
406
												  FILTER_VALIDATE_INT,
411
			FILTER_VALIDATE_INT,
407
												  array('options' => array('default' => NULL,
412
			array('options' => array(
-
 
413
				'default' => NULL,
408
																		   'min_range' => 0,
414
				'min_range' => 0,
409
																		   'max_range' => _COSTE_TEXTE_MAX_COSTE_PAGE)));
415
				'max_range' => _COSTE_TEXTE_MAX_COSTE_PAGE)));
410
		$p['masque.tome'] = filter_var(@$params['masque.tome'],
416
		$p['masque.tome'] = filter_var(@$params['masque.tome'],
411
												  FILTER_VALIDATE_INT,
417
			FILTER_VALIDATE_INT,
412
												  array('options' => array('default' => NULL,
418
			array('options' => array(
-
 
419
				'default' => NULL,
413
																		   'min_range' => 0,
420
				'min_range' => 0,
414
																		   'max_range' => _COSTE_TEXTE_MAX_COSTE_TOME)));
421
				'max_range' => _COSTE_TEXTE_MAX_COSTE_TOME)));
415
		$p['masque.nt'] = filter_var(@$params['masque.nt'],
422
		$p['masque.nt'] = filter_var(@$params['masque.nt'],
416
												  FILTER_VALIDATE_INT,
423
			FILTER_VALIDATE_INT,
417
												  array('options' => array('default' => NULL,
424
			array('options' => array(
-
 
425
				'default' => NULL,
418
																		   'min_range' => 0,
426
				'min_range' => 0,
419
																		   'max_range' => _COSTE_TEXTE_MAX_BDTFX_NT)));
427
				'max_range' => _COSTE_TEXTE_MAX_BDTFX_NT)));
420
 
428
 
421
		// on filtre les NULL, FALSE et '', mais pas les 0, d'où le callback()
429
		// on filtre les NULL, FALSE et '', mais pas les 0, d'où le callback()
422
		// TODO: PHP-5.3
430
		// TODO: PHP-5.3
423
		$p = array_filter($p, create_function('$a','return !in_array($a, array("",false,null),true);'));
431
		$p = array_filter($p, create_function('$a','return !in_array($a, array("",false,null),true);'));
424
		$p = array_merge(self::$default_params, $p);
432
		$p = array_merge(self::$default_params, $p);
425
 
433
 
426
		return $p;
434
		return $p;
427
	}
435
	}
428
 
436
 
429
	static function requestFilterIds($uri) {
437
	static function requestFilterIds($uri) {
430
		if(count($uri) != 1) return NULL;
438
		if(count($uri) != 1) return NULL;
431
 
439
 
432
		// getNN* renvoient le num_nom passé comme segment d'URI:
440
		// getNN* renvoient le num_nom passé comme segment d'URI:
433
		// - soit un id selon coste (num_nom dans coste_v2_00)
441
		// - soit un id selon coste (num_nom dans coste_v2_00)
434
		// - soit un id selon bdtfx (num_nom dans bdtfx_v1_02)
442
		// - soit un id selon bdtfx (num_nom dans bdtfx_v1_02)
435
		// ou bien l'extrait du pattern bdtfx.nn:(#id)
443
		// ou bien l'extrait du pattern bdtfx.nn:(#id)
436
		$ids_coste = array_filter(array_map(array(__CLASS__, 'getNNCoste'), explode(',', $uri[0])));
444
		$ids_coste = array_filter(array_map(array(__CLASS__, 'getNNCoste'), explode(',', $uri[0])));
437
		$ids_bdtfx = array_filter(array_map(array(__CLASS__, 'getNNBdtfx'), explode(',', $uri[0])));
445
		$ids_bdtfx = array_filter(array_map(array(__CLASS__, 'getNNBdtfx'), explode(',', $uri[0])));
438
 
446
 
439
		// en cas d'échec (tous les id sont invalides), bail-out
447
		// en cas d'échec (tous les id sont invalides), bail-out
440
		if(!$ids_bdtfx && !$ids_coste) {
448
		if(!$ids_bdtfx && !$ids_coste) {
441
			// http_response_code(500);
449
			// http_response_code(500);
442
			throw new Exception('not supported', 500);
450
			throw new Exception('not supported', 500);
443
		}
451
		}
444
 
452
 
445
		return array(
453
		return array(
446
			'coste' => array_slice($ids_coste, 0, intval(_COSTE_TEXTE_MAX_RESULT_LIMIT/2) ),
454
			'coste' => array_slice($ids_coste, 0, intval(_COSTE_TEXTE_MAX_RESULT_LIMIT / 2) ),
447
			'bdtfx' => array_slice($ids_bdtfx, 0, intval(_COSTE_TEXTE_MAX_RESULT_LIMIT/2) )
455
			'bdtfx' => array_slice($ids_bdtfx, 0, intval(_COSTE_TEXTE_MAX_RESULT_LIMIT / 2) )
448
		);
456
		);
449
	}
457
	}
450
 
458
 
451
	static function aide() {
459
	static function aide() {
452
		header("Content-Type: text/plain; charset=utf-8");
460
		header("Content-Type: text/plain; charset=utf-8");
453
		return sprintf("
461
		return sprintf("
454
Service coste/textes:
462
Service coste/textes:
455
Retourne des informations (choisies) à propos d'un taxon donné (à partir de son numéro nomenclatural
463
Retourne des informations (choisies) à propos d'un taxon donné (à partir de son numéro nomenclatural
456
Retourne des informations (choisies) à propos de taxons recherchés (à partir de divers critères)
464
Retourne des informations (choisies) à propos de taxons recherchés (à partir de divers critères)
457
Les résultats sont indexés. La clef par défaut est le num_nom d'après coste (attribut \"coste:nn\")
465
Les résultats sont indexés. La clef par défaut est le num_nom d'après coste (attribut \"coste:nn\")
458
Usage:
466
Usage:
459
			coste/textes/<liste-num_nom>?<params>
467
			coste/textes/<liste-num_nom>?<params>
460
* <liste-num_nom> étant une liste de numéros nomenclaturaux de taxons séparés par des virgules au format:
468
* <liste-num_nom> étant une liste de numéros nomenclaturaux de taxons séparés par des virgules au format:
461
 - <#id>: un numéro nomenclatural dans la base coste
469
 - <#id>: un numéro nomenclatural dans la base coste
462
 - <bdtfx.nn:#id>: un numéro nomenclatural dans la base bdtfx
470
 - <bdtfx.nn:#id>: un numéro nomenclatural dans la base bdtfx
463
* retour.champs une liste de champs séparés par des virgules parmi *,%s
471
* retour.champs une liste de champs séparés par des virgules parmi *,%s
464
* les paramètres acceptés sont les suivants: %s
472
* les paramètres acceptés sont les suivants: %s
465
* les champs retournés par défaut sont les suivants: %s
473
* les champs retournés par défaut sont les suivants: %s
466
* le paramètre \"recherche\" affecte les masques \"ns\" et \"texte\"
474
* le paramètre \"recherche\" affecte les masques \"ns\" et \"texte\"
467
* le paramètre \"famille\" est traité via LIKE et accepte les caractères '_' et '%'
475
* le paramètre \"famille\" est traité via LIKE et accepte les caractères '_' et '%'
468
* le paramètre \"retour.format\" est inutilisé pour l'instant",
476
* le paramètre \"retour.format\" est inutilisé pour l'instant",
469
					   implode(',', array_keys(self::$allow_champs)),
477
			implode(',', array_keys(self::$allow_champs)),
470
					   implode(',', self::$allow_params),
478
			implode(',', self::$allow_params),
471
					   self::$default_params['retour.champs']
479
			self::$default_params['retour.champs']
472
		);
480
		);
473
	}
481
	}
474
 
482
 
475
	static function getNNCoste($refnn) {
483
	static function getNNCoste($refnn) {
476
		if(is_numeric($refnn)) {
484
		if (is_numeric($refnn)) {
477
			$t = intval($refnn);
485
			$t = intval($refnn);
478
			if($t >= 1 && $t < _COSTE_TEXTE_MAX_COSTE_NN) return $t;
486
			if ($t >= 1 && $t < _COSTE_TEXTE_MAX_COSTE_NN) return $t;
479
		}
487
		}
480
		return FALSE;
488
		return FALSE;
481
	}
489
	}
482
 
490
 
483
	static function getNNBdtfx($refnn) {
491
	static function getNNBdtfx($refnn) {
484
		if(strpos($refnn, 'bdtfx.nn:') !== 0) return FALSE;
492
		if(strpos($refnn, 'bdtfx.nn:') !== 0) return FALSE;
485
		$t = intval(str_replace('bdtfx.nn:', '', $refnn));
493
		$t = intval(str_replace('bdtfx.nn:', '', $refnn));
486
		if($t >= 1 && $t < _COSTE_TEXTE_MAX_BDTFX_NN) return $t;
494
		if($t >= 1 && $t < _COSTE_TEXTE_MAX_BDTFX_NN) return $t;
487
		return FALSE;
495
		return FALSE;
488
	}
496
	}
489
}
497
}