WebSVN – eFlore/Projets.eflore-projets – Diff – /trunk/services/modules/0.1/coste/Textes.php


<?php
/*
 * @copyright 2013 Tela Botanica (accueil@tela-botanica.org)
 * @author Raphaël Droz <raphael@tela-botanica.org>
 * @license GPL v3 <http://www.gnu.org/licenses/gpl.txt>
 * @license CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>
 *
 * pattern: /service:eflore:0.1/coste/textes/bdtfx.nn:182
 * params: txt.format=(htm|txt) ,  retour.champs=(titre,texte,...) , retour.format=(min|max), ...
 *
 * Ce webservice est censé pouvoir:
 * 1) retourner des informations (choisies) à propos d'un taxon donné (à partir de son numéro nomenclatural
 * 2) retourner des informations (choisies) à propos de taxons recherchés (à partir de divers critères)
 *
 * TODO: masque.titre => masque.tag
 *
 */
 
// affecte le nombre d'ids autorisés dans le dernier segment d'URL
// *et* la valeur maximale autorisée pour navigation.limite.
define('_COSTE_TEXTE_MAX_RESULT_LIMIT', 500);
 
/*restore_error_handler();
  error_reporting(E_ALL);*/
class Textes {
	// paramètres autorisés
	static $allow_params = array(
		'txt.format', 'retour.format', 'retour.champs',
		'recherche',
		'masque.ns', 'masque.txt', 'masque.page', 'masque.tome', 'masque.famille',
		'masque.titre', // masque sur titre de la page wiki correspondante (page "clef" OR page "description")
		'navigation.depart', 'navigation.limite');
	// et valeurs par défaut
	static $default_params = array('txt.format' => 'txt', 'retour.format' => 'max', 'recherche' => 'stricte',
								   'retour.champs' => 'titre,texte,determination,tag',
								   'navigation.depart' => 0, 'navigation.limite' => 50);
 
	// les champs de base de coste_v2_00
	// mysql -N tb_eflore<<<"SHOW FIELDS FROM coste_v2_00"|egrep -v 'page_'|awk '{print $1}'|xargs -i -n1 printf "'%s' => 'c.%s',\n" {} {}
	static $allow_champs = array(
		'num_nom' => 'c.num_nom',
		'num_nom_retenu' => 'c.num_nom_retenu',
		'num_tax_sup' => 'c.num_tax_sup',
		'rang' => 'c.rang',
		'nom_sci' => 'c.nom_sci',
		'nom_supra_generique' => 'c.nom_supra_generique',
		'genre' => 'c.genre',
		'epithete_infra_generique' => 'c.epithete_infra_generique',
		'epithete_sp' => 'c.epithete_sp',
		'type_epithete' => 'c.type_epithete',
		'epithete_infra_sp' => 'c.epithete_infra_sp',
		'cultivar_groupe' => 'c.cultivar_groupe',
		'cultivar' => 'c.cultivar',
		'nom_commercial' => 'c.nom_commercial',
		'auteur' => 'c.auteur',
		'annee' => 'c.annee',
		'biblio_origine' => 'c.biblio_origine',
		'notes' => 'c.notes',
		'nom_addendum' => 'c.nom_addendum',
		'nom_francais' => 'c.nom_francais',
		'nom_coste' => 'c.nom_coste',
		'auteur_coste' => 'c.auteur_coste',
		'biblio_coste' => 'c.biblio_coste',
		'num_nom_coste' => 'c.num_nom_coste',
		'num_nom_retenu_coste' => 'c.num_nom_retenu_coste',
		'num_tax_sup_coste' => 'c.num_tax_sup_coste',
		'synonymie_coste' => 'c.synonymie_coste',
		'tome' => 'c.tome',
		'page' => 'c.page',
		'nbre_taxons' => 'c.nbre_taxons',
		'flore_bdtfx_nn' => 'c.flore_bdtfx_nn',
		'flore_bdtfx_nt' => 'c.flore_bdtfx_nt',
		'image' => 'c.image',
		'image_auteur' => 'c.image_auteur',
		'nom_sci_html' => 'c.nom_sci_html',
 
		// handly duplicate (redirigé vers nom_sci ou nom_sci_html selon que txt.format vaut "txt" ou "htm"
		'titre' => 'c.nom_sci',
 
		// champs spécifiques (et étrangères)
		'texte' => 'dsc.body',
		'determination' => 'cle.body',
		'tag' => 'dsc.tag',
		'famille' => 'b.famille', // cf sqlAddJoins()
		'*' => 'XXX' // spécial
	);
 
	// les champs suivants disparaissent de la liste utilisée pour former la requête SQL
	static $special_champs = array('nom_sci_html', 'nom_sci', '*');
	// le pattern utilisé pour la recherche dite "floue"
	static $soundex_scheme = '(%1$s LIKE %2$s OR SOUNDEX(%1$s) = SOUNDEX(%2$s) OR SOUNDEX(REVERSE(%1$s)) = SOUNDEX(REVERSE(%2$s)))';
 
	// contrainte du point d'entrée d'API webservice Tela lors d'un GET
	public function consulter($ressources, $parametres, $db = NULL) {
		if(!$db) {
			// http_response_code(500);
			throw new Exception('no DB', 500);
		}
 
		// parser la requête et filtrer les paramètres valides
		// en cas d'accès HTTP
		if(array_key_exists('QUERY_STRING', $_SERVER)) {
			self::requestParse($uri, $params);
		}
		// en cas d'accès phpunit
		else {
			$uri = $ressources;
		}
 
 
 
 
		// renvoie du plain/text d'aide (cf fin de programme)
 
 
 
 
 
		if(count($uri) == 1 && $uri[0] == 'aide') return self::aide();
 
 
		if(is_null($parametres)) $parametres = Array();
		$params = self::requestFilterParams($parametres);
		// les contraintes liées aux ids (passés comme composants d'URL)
		// sont ajoutées aux params [sans être accepté comme paramètre d'URL]
		$params['_ids'] = self::requestFilterIds($uri);
 
 
 
 
 
 
		// XXX: temporaires, passage de $db aux fonctions
		// de toolkits
		$req = self::getCosteInfo($params, $db);
 
		$res = $db->recupererTous($req);
		$err = mysql_error();
		if(!$res && $err) {
			// http_response_code(400);
			// if(defined('DEBUG') && DEBUG) header("X-Debug: $req");
			throw new Exception('not found', 400);
		}
 
		// rapide formatage des résultats:
		$matches = 0;
 
		if($res) {
			// nombre de matches (sans LIMIT) utilisé pour l'en-tête
			$matches = $db->recuperer('SELECT FOUND_ROWS() AS total');
			$matches = intval($matches['total']);
		}
 
		// reformate les résultats pour les indexer par num_nom
		$res2 = array();
		foreach($res as $v) {
			$res2[$v['num_nom']] = $v;
		}
 
		// l'appelant s'occupera du json_encode()
		// même si ça démange d'exit'er ici
		header("Content-Type: application/json; charset=utf-8");
		return array('entete' => array('depart' => $params['navigation.depart'],
									   'limite' => $params['navigation.limite'],
									   'total' => count($res2),
									   'match' => $matches),
					 'resultats' => $res2);
 
	}
 
 
	// la fonction central: récupère les infos à partir de paramètres
	// et une optionnel contrainte de num_nom
	static function getCosteInfo(array $params, $db) {
 
 
		// contraintes (WHERE):
		$constraints = self::sqlAddConstraint($params, $db);
		// XXX: que faire en l'absence de contrainte ? pour l'instant : "WHERE 1"
 
 
 
 
		// champs:
		$champs_valides_non_formattes = NULL;
		$champs_valides = self::sqlSelectFields($params, $champs_valides_non_formattes);
 
		// joins:
		$other_join = self::sqlAddJoins($params, $champs_valides_non_formattes);
 
		$req = sprintf(<<<EOF
SELECT SQL_CALC_FOUND_ROWS c.num_nom, %s
FROM tb_eflore.coste_v2_00 c
LEFT JOIN tela_prod_wikini.florecoste_pages dsc ON c.page_wiki_dsc = dsc.tag AND dsc.latest = 'Y'
LEFT JOIN tela_prod_wikini.florecoste_pages cle ON c.page_wiki_cle = cle.tag AND cle.latest = 'Y'
%s
WHERE %s ORDER BY c.num_nom LIMIT %u, %u -- %s
EOF
					   ,
					   $champs_valides, // dans le SELECT (parmi champs coste_v2_00)
					   // autre join, si nécessaire
					   $other_join ? $other_join : '',
					   // where
					   $constraints ? implode(' AND ', $constraints) : '1',
 
					   // limit
					   $params['navigation.depart'],
					   $params['navigation.limite'],
					   __FILE__ . ':' . __LINE__);
		
		return $req;
	}
 
 
 
 
	// SQL helpers
	// le préfix de coste_v2_00 est "c"
	// le préfix de florecoste_pages sur la description est est "dsc"
	// le préfix de florecoste_pages sur la clef de détermination est est "cle"
	static function sqlAddConstraint($params, $db) {
 
 
		$stack = array();
		if(!empty($params['masque.ns'])) {
			if($params['recherche'] == 'etendue')
				$stack[] = 'c.nom_sci LIKE ' . $db->proteger('%' . trim($params['masque.ns']) . '%');
			elseif($params['recherche'] == 'floue')
				$stack[] = sprintf(self::$soundex_scheme,
								   'c.nom_sci',
								   $db->proteger('%' . trim($params['masque.ns']) . '%'));
			else
				$stack[] = 'c.nom_sci = ' . $db->proteger(trim($params['masque.ns']));
		}
 
		// le masque sur texte est toujours un LIKE() "étendue", sauf si "floue" spécifié
		if(!empty($params['masque.txt'])) {
			if($params['recherche'] == 'floue') {
				$stack[] = sprintf(self::$soundex_scheme,
								   'dsc.body',
								   $db->proteger('%' . trim($params['masque.txt']) . '%'));
			}
			else {
				$stack[] = 'dsc.body LIKE ' . $db->proteger('%' . trim($params['masque.txt']) . '%');
			}
		}
 
		if(!empty($params['masque.titre'])) {
			if($params['recherche'] == 'stricte') {
				$stack[] = sprintf('(dsc.tag = %1$s OR cle.tag = %1$s)',
								   $db->proteger(trim($params['masque.titre'])));
			}
			else {
				$stack[] = sprintf('(dsc.tag LIKE %1$s OR cle.tag LIKE %1$s)',
								   $db->proteger('%' .  trim($params['masque.titre']) . '%'));
			}
		}
 
		if(array_key_exists('masque.famille', $params)) {
			$stack[] = 'b.famille LIKE ' . $db->proteger(trim($params['masque.famille']));
		}
 
		if(array_key_exists('masque.page', $params)) {
			$stack[] = 'c.page = ' . intval($params['masque.page']);
		}
 
		if(array_key_exists('masque.tome', $params)) {
			$stack[] = 'c.tome = ' . intval($params['masque.tome']);
		}
 
		// ajout de la contrainte sur num_nom si un composant d'URL supplémentaire
		// comportant un #id existe, cf self::requestFilterIds()
		if(array_key_exists('_ids', $params) && $params['_ids']) {
			$stack[] = sprintf("c.num_nom IN (%s)", implode(',', $params['_ids']));
		}
 
		return $stack;
	}
 
 
	// $unmerged contient la même liste de champs que celle renvoyée
	// à la différence que celle-ci n'est pas reformatée et s'avère donc
	// utilisable plus aisément dans sqlAddJoins() qui peut en avoir besoin
	static function sqlSelectFields($params, &$unmerged) {
		$champs = $params['retour.champs'];
		// champs coste_v2_00
		$c = array_intersect_key(self::$allow_champs, array_flip(explode(',', $champs)));
		if(isset($c['*'])) {
			$t = array_diff_key(self::$allow_champs, array_flip(self::$special_champs));
		}
		else {
			// just loop below
			$t = $c;
		}
 
		// si aucun des champs fournis n'est valide
		// on se rappelle nous-même après avoir réinitialisé retour.champs
		// avec les champs par défaut
		if(!$t) {
			$params['retour.champs'] = self::$default_params['retour.champs'];
			return self::sqlSelectFields($params);
		}
 
		if(array_key_exists('titre', $t))
			$t['titre'] = $params['txt.format'] == 'txt' ? 'c.nom_sci' : 'c.nom_sci_html';
 
		$unmerged = $t;
 
		// XXX: PHP-5.3
		$ret = array();
		foreach($t as $k => $v) {
			$ret[] = "$v AS $k";
		}
		return implode(',',$ret);
	}
 
	static function sqlAddJoins($params, $champs) {
		$j = '';
		// ces tests doivent correspondre aux champs générés par sqlSelectFields()
		// ou contraintes générées par sqlAddConstraint()
		if(array_key_exists('masque.famille', $params) ||
		   array_key_exists('famille', $champs)) {
			$j .= 'LEFT JOIN tb_eflore.bdtfx_v1_02 b ON c.num_nom = b.num_nom';
		}
 
		return $j;
	}
 
	// request handler
	static function requestParse(&$ressource, &$params) {
		$uri = explode('/', $_SERVER['REDIRECT_URL']);
		if(!empty($_SERVER['QUERY_STRING']))
			parse_str($_SERVER['REDIRECT_QUERY_STRING'], $params);
		$ressource = array_slice($uri, array_search('textes', $uri) + 1, 3);
	}
 
	// supprime l'index du tableau des paramètres si sa valeur ne correspond pas
	// au spectre passé par $values.
	static function unsetIfInvalid(&$var, $index, $values) {
		if(array_key_exists($index, $var) && !in_array($var[$index], $values))
			unset($var[$index]);
	}
 
	static function requestFilterParams(Array $params) {
		$p = array_intersect_key($params, array_flip(self::$allow_params));
		self::unsetIfInvalid($p, 'txt.format', array('txt', 'htm'));
		self::unsetIfInvalid($p, 'retour.format', array('min','max'));
		self::unsetIfInvalid($p, 'recherche', array('stricte','etendue','floue'));
 
		if(isset($params['masque.ns'])) $p['masque.ns'] = trim($params['masque.ns']);
		if(isset($params['masque.texte'])) $p['masque.texte'] = trim($params['masque.texte']);
 
		if(isset($params['masque.famille'])) {
			// mysql -N<<<"SELECT DISTINCT famille FROM bdtfx_v1_02;"|sed -r "s/(.)/\1\n/g"|sort -u|tr -d "\n"
			$p['masque.famille'] = preg_replace('/[^a-zA-Z %_]/', '', iconv("UTF-8",
																			"ASCII//TRANSLIT",
																			$params['masque.famille']));
		}
 
		// TODO: use filter_input(INPUT_GET);
		// renvoie FALSE ou NULL si absent ou invalide
		$p['navigation.limite'] = filter_var(@$params['navigation.limite'],
												  FILTER_VALIDATE_INT,
												  array('options' => array('default' => NULL,
																		   'min_range' => 1,
																		   'max_range' => _COSTE_TEXTE_MAX_RESULT_LIMIT)));
		$p['navigation.depart'] = filter_var(@$params['navigation.depart'],
												  FILTER_VALIDATE_INT,
												  array('options' => array('default' => NULL,
																		   'min_range' => 0,
																		   'max_range' => 10000))); // count(1) from coste_v2_00
 
		// on filtre les NULL, FALSE et '', mais pas les 0, d'où le callback()
		// TODO: PHP-5.3
		$p = array_filter($p, create_function('$a','return !in_array($a, array("",false,null),true);'));
		$p = array_merge(self::$default_params, $p);
 
		return $p;
	}
 
	static function requestFilterIds($uri) {
		if(count($uri) != 1) return NULL;
 
		// getNN renvoie le num_nom passé comme segment d'URI
		// ou bien l'extrait du pattern bdtfx.nn:(#id)
		$ids = array_filter(array_map(array(__CLASS__, 'getNN'), explode(',', $uri[0])));
 
		// en cas d'échec (tous les id sont invalides), bail-out
		if(!$ids) {
			// http_response_code(500);
			throw new Exception('not supported', 500);
		}
 
		return array_slice($ids, 0, _COSTE_TEXTE_MAX_RESULT_LIMIT);
	}
 
	static function aide() {
		header("Content-Type: text/plain; charset=utf-8");
		return sprintf("
Service coste/textes:
Retourne des informations (choisies) à propos d'un taxon donné (à partir de son numéro nomenclatural
Retourne des informations (choisies) à propos de taxons recherchés (à partir de divers critères)
 
Usage:
			coste/textes/<liste-num_nom>?<params>
* <liste-num_nom> étant une liste de numéros nomenclaturaux de taxons bdtfx séparés par des virgules
 
  au format <#id> ou <bdtfx.nn:#id>
* retour.champs une liste de champs séparés par des virgules parmi *,%s
* les paramètres acceptés sont les suivants: %s
* les champs retournés par défaut sont les suivants: %s
* le paramètre \"recherche\" affecte les masques \"ns\" et \"texte\"
* le paramètre \"famille\" est traité via LIKE et accepte les caractères '_' et '%'
* le paramètre \"retour.format\" est inutilisé pour l'instant",
					   implode(',', array_keys(self::$allow_champs)),
					   implode(',', self::$allow_params),
					   self::$default_params['retour.champs']
		);
	}
 
	static function getNN($refnn) {
		if(is_numeric($refnn) && intval($refnn) >= 1) return intval($refnn);
		if(strpos($refnn, 'bdtfx.nn:') !== 0) return FALSE;
		return intval(str_replace('bdtfx.nn:', '', $refnn));
	}
}

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

Subversion Repositories eFlore/Projets.eflore-projets

(root)/trunk/services/modules/0.1/coste/Textes.php @ 1171 – Rev 856 → 858