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

 // *et* la valeur maximale autorisée pour navigation.limite.
 define('_COSTE_TEXTE_MAX_RESULT_LIMIT', 500);
 // simplifie et accélère la sanitization de l'input:
 // SELECT MAX(num_nom) FROM coste_v2_00;
+define('_COSTE_TEXTE_MAX_COSTE_NN', 7015 + 1000);
+// SELECT MAX(num_nom) FROM bdtfx_v1_02;
-define('_COSTE_TEXTE_MAX_NUM_NOM', 7015 + 1000);
+define('_COSTE_TEXTE_MAX_BDTFX_NN', 103386 + 10000);
 /*restore_error_handler();
   error_reporting(E_ALL);*/
 								   '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(
+		'coste:nn' => 'c.num_nom',
+		'bdtfx:nn' => 'IF(c.flore_bdtfx_nn = "",NULL,c.flore_bdtfx_nn)',
-	static $allow_champs = array(
+		'bdtfx:nt' => 'c.flore_bdtfx_nt',
 		'num_nom' => 'c.num_nom',
 		'num_nom_retenu' => 'c.num_nom_retenu',
 		'num_tax_sup' => 'c.num_tax_sup',
 		'rang' => 'c.rang',
 		'famille' => 'b.famille', // cf sqlAddJoins()
 		'*' => 'XXX' // spécial
 	);
+	// les champs suivants disparaissent de la liste utilisée pour former la requête SQL
-	// les champs suivants disparaissent de la liste utilisée pour former la requête SQL
+	// (ils sont exclue lorsque '*' est utilisée, ce sont généralement des synonymes)
+	static $special_champs = array('nom_sci_html', 'nom_sci', '*', 'flore_bdtfx_nn', 'flore_bdtfx_nt', 'num_nom');
+	// ces champs sont toujours dans les résultats (cf sqlSelectFields()
+	static $champs_obligatoires = array('coste:nn', 'bdtfx:nn');
 	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)))';
 			// 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
+		// reformate les résultats pour les indexer par coste:nn
 		$res2 = array();
 		foreach($res as $v) {
-			$res2[$v['num_nom']] = $v;
+			$res2[$v['coste:nn']] = $v;
+		}
 		// l'appelant s'occupera du json_encode()
 					 'resultats' => $res2);
 	}
-	// la fonction central: récupère les infos à partir de paramètres
+	// la fonction centrale: récupère les infos à partir de paramètres
-	// et une optionnel contrainte de num_nom
+	// et une optionnelle contrainte sur coste:nn ou bdtfx:nn
 	static function getCosteInfo(array $params, $db) {
 		$champs_valides_non_formattes = NULL;
 		$champs_valides = self::sqlSelectFields($params, $champs_valides_non_formattes);
 		// joins:
-		$other_join = self::sqlAddJoins($params, $champs_valides_non_formattes);
 		$other_join = self::sqlAddJoins($params, $champs_valides_non_formattes);
 		$req = sprintf(<<<EOF
-SELECT SQL_CALC_FOUND_ROWS c.num_nom, %s
+SELECT SQL_CALC_FOUND_ROWS  %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
 		if(array_key_exists('masque.tome', $params)) {
 			$stack[] = 'c.tome = ' . intval($params['masque.tome']);
 		}
+		// ajout de la contrainte sur coste:nn ou bdtfx:nn si un composant d'URL supplémentaire
-		// ajout de la contrainte sur num_nom si un composant d'URL supplémentaire
+		// comportant un #id existe, cf self::requestFilterIds()
+		$o_stack = array();
-		// comportant un #id existe, cf self::requestFilterIds()
+		if(array_key_exists('_ids', $params) && $params['_ids']) {
+			if($params['_ids']['coste']) {
+				$o_stack[] = sprintf("c.num_nom IN (%s)", implode(',', $params['_ids']['coste']));
+			}
+			if($params['_ids']['bdtfx']) {
-		if(array_key_exists('_ids', $params) && $params['_ids']) {
+				$o_stack[] = sprintf("c.flore_bdtfx_nn IN (%s)", implode(',', $params['_ids']['bdtfx']));
+			}
 			$stack[] = sprintf("c.num_nom IN (%s)", implode(',', $params['_ids']));
 		if($o_stack) $stack[] = '(' . implode(' OR ', $o_stack) . ')';
 	// à 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)));
+		$c = self::addSQLToFieldSynonym(explode(',', $champs));
 		if(isset($c['*'])) {
 			$t = array_diff_key(self::$allow_champs, array_flip(self::$special_champs));
+		}
 		else {
 			// just loop below
+		}
 		if(array_key_exists('titre', $t))
+			$t['titre'] = $params['txt.format'] == 'txt' ? 'c.nom_sci' : 'c.nom_sci_html';
-			$t['titre'] = $params['txt.format'] == 'txt' ? 'c.nom_sci' : 'c.nom_sci_html';
+		// champs obligatoires:
 		$t = array_merge($t, self::addSQLToFieldSynonym(self::$champs_obligatoires));
 		$unmerged = $t;
+		// XXX: PHP-5.3
+		$ret = array();
+		foreach($t as $k => $v) {
-		// XXX: PHP-5.3
+			if(strpos($k, ':') !== FALSE) {
+				$ret[] = "$v AS \"$k\"";
-		$ret = array();
+			} else {
-		foreach($t as $k => $v) {
+				$ret[] = "$v AS $k";
 			$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.flore_bdtfx_nn = b.num_nom';
+		}
+		return $j;
+	}
+	// d'un tableau de type array("coste:nn", "type_epithete")
+	// retourne
-			$j .= 'LEFT JOIN tb_eflore.bdtfx_v1_02 b ON c.num_nom = b.num_nom';
+	// un tableau de type array("coste:nn" => "c.num_nom", "type_epithete" => "c.type_epithete")
 	// basé sur self::$allow_champs
 	static function addSQLToFieldSynonym(Array $syno) {
-		return $j;
+		return array_intersect_key(self::$allow_champs, array_flip($syno));
+	}
 																		   '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' => _COSTE_TEXTE_MAX_NUM_NOM)));
+																		   'max_range' => _COSTE_TEXTE_MAX_COSTE_NN)));
 		// 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);'));
+	}
 	static function requestFilterIds($uri) {
 		if(count($uri) != 1) return NULL;
+		// getNN* renvoient le num_nom passé comme segment d'URI:
 		// - soit un id selon coste (num_nom dans coste_v2_00)
+		// - soit un id selon bdtfx (num_nom dans bdtfx_v1_02)
-		// getNN renvoie le num_nom passé comme segment d'URI
+		// ou bien l'extrait du pattern bdtfx.nn:(#id)
-		// ou bien l'extrait du pattern bdtfx.nn:(#id)
+		$ids_coste = array_filter(array_map(array(__CLASS__, 'getNNCoste'), explode(',', $uri[0])));
-		$ids = array_filter(array_map(array(__CLASS__, 'getNN'), explode(',', $uri[0])));
+		$ids_bdtfx = array_filter(array_map(array(__CLASS__, 'getNNBdtfx'), explode(',', $uri[0])));
 		// en cas d'échec (tous les id sont invalides), bail-out
-		if(!$ids) {
+		if(!$ids_bdtfx && !$ids_coste) {
+			// http_response_code(500);
+			throw new Exception('not supported', 500);
-			// http_response_code(500);
+		}
-			throw new Exception('not supported', 500);
+		return array(
 			'coste' => array_slice($ids_coste, 0, intval(_COSTE_TEXTE_MAX_RESULT_LIMIT/2) ),
 			'bdtfx' => array_slice($ids_bdtfx, 0, intval(_COSTE_TEXTE_MAX_RESULT_LIMIT/2) )
-		return array_slice($ids, 0, _COSTE_TEXTE_MAX_RESULT_LIMIT);
+		);
+	}
 	static function aide() {
-		header("Content-Type: text/plain; charset=utf-8");
+		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)
+Les résultats sont indexés. La clef par défaut est le num_nom d'après coste (attribut \"coste:nn\")
 Usage:
-Usage:
+			coste/textes/<liste-num_nom>?<params>
-			coste/textes/<liste-num_nom>?<params>
+* <liste-num_nom> étant une liste de numéros nomenclaturaux de taxons séparés par des virgules au format:
-* <liste-num_nom> étant une liste de numéros nomenclaturaux de taxons bdtfx séparés par des virgules
+ - <#id>: un numéro nomenclatural dans la base coste
-  au format <#id> ou <bdtfx.nn:#id>
+ - <bdtfx.nn:#id>: un numéro nomenclatural dans la base bdtfx
 					   implode(',', self::$allow_params),
 					   self::$default_params['retour.champs']
 		);
+	}
-	static function getNN($refnn) {
+	static function getNNCoste($refnn) {
 		if(is_numeric($refnn)) {
 			$t = intval($refnn);
-			if($t >= 1 && $t < _COSTE_TEXTE_MAX_NUM_NOM) return $t;
-			return FALSE;
+			if($t >= 1 && $t < _COSTE_TEXTE_MAX_COSTE_NN) return $t;
+		}
+		return FALSE;
+	}
 	static function getNNBdtfx($refnn) {
 		if(strpos($refnn, 'bdtfx.nn:') !== 0) return FALSE;
+		$t = intval(str_replace('bdtfx.nn:', '', $refnn));
+		if($t >= 1 && $t < _COSTE_TEXTE_MAX_BDTFX_NN) return $t;
-		return intval(str_replace('bdtfx.nn:', '', $refnn));
+		return FALSE;
+	}

Subversion Repositories eFlore/Projets.eflore-projets

(root)/trunk/services/modules/0.1/coste/Textes.php – Rev 859 → 861