Subversion Repositories eFlore/Applications.del

Rev

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

Rev Author Line No. Line
1390 raphael 1
<?php
2
/**
3
 * @author		Raphaël Droz <raphael@tela-botanica.org>
4
 * @copyright	Copyright (c) 2013, Tela Botanica (accueil@tela-botanica.org)
5
 * @license	http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL
6
 * @license	http://www.gnu.org/licenses/gpl.html Licence GNU-GPL
7
 * @see http://www.tela-botanica.org/wikini/eflore/wakka.php?wiki=ApiIdentiplante01Images
1495 raphael 8
 * @see http://www.tela-botanica.org/wikini/identiplante/wakka.php?wiki=IdentiPlante_PictoFlora_MoteurRecherche
1422 raphael 9
 *
10
 * Backend pour PictoFlora (del.html#page_recherche_images)
11
 *
12
 *
13
 * == Notes ==
14
 *
15
 * tri=votes et tri=tags: affectent le choix des images affichées (donc getIdImages())
16
 * Cependant ce total ne nous intéresse même pas (MoyenneVotePresenteur.java s'en occupe).
17
 * Seul tri=date_transmission nous évite l'AVG() + GROUP BY
18
 *
19
 * protocole: il affecte l'affichage des information, mais le JSON contient déjà
20
 * l'intégralité (chercher les données de vote pour 1 ou plusieurs protocoles) est quasi-identique.
21
 * Par contre, le tri par moyenne des votes, sous-entend "pour un protocole donné".
22
 * Dès lors le choix d'un protocole doit avoir été fait afin de régler le JOIN et ainsi l'ORDER BY.
23
 * (cf requestFilterParams())
24
 *
25
 * Histoire: auparavant (pré-r142x) un AVG + GROUP BY étaient utilisés pour générer on-the-fly les valeurs
1490 raphael 26
 * utilisées ensuite pour l'ORDER BY. La situation à base de del_image_stat
27
 * est déjà bien meilleure sans être pour autant optimale. cf commentaire de sqlAddConstraint()
1422 raphael 28
 *
29
 *
30
 * Tags:
31
 * Le comportement habituel dans le masque *général*: les mots sont séparés par des espaces,
32
 * implod()ed par des AND (tous les mots doivent matcher).
33
 * Et le test effectué doit matcher sur:
34
 * %(les tags d'observations)% *OU* %(les tags d'images)% *OU* %(les tags publics)%
35
 *
36
 * Le comportement habituel dans le masque *tag*: les mots ne sont *pas* splittés (1 seule expression),
37
 * Et le test effectué doit matcher sur:
38
 * ^(expression)% *OU* %(expression)% [cf getConditionsImages()]
39
 *
40
 * Par défaut les tags sont comma-separated (OU logique).
41
 * Cependant pour conserver le comportement du masque général qui sous-entend un ET logique sur
1604 jpm 42
 * des tags séparés par des espaces recherche
1422 raphael 43
 *
44
 * TODO:
45
 * -affiner la gestion de passage de mots-clefs dans le masque général.
46
 * - subqueries dans le FROM pour les critère WHERE portant directement sur v_del_image
47
 * plutôt que dans WHERE (qui nécessite dès lors un FULL-JOIN)
48
 * (http://www.mysqlperformanceblog.com/2007/04/06/using-delayed-join-to-optimize-count-and-limit-queries/)
49
 * - éviter de dépendre d'une jointure systématique sur `cel_obs`, uniquement pour `(date_)transmission
50
 * (cf VIEW del_image)
1492 raphael 51
 * - poursuivre la réorganisation des méthodes statiques parmis Observation, ListeObservations et ListeImages2
1422 raphael 52
 * - *peut-être*: passer requestFilterParams() en méthode de classe
53
 *
1438 raphael 54
 *
55
 * MySQL sux:
56
 * EXPLAIN SELECT  id_image FROM v_del_image vdi WHERE vdi.id_image IN (SELECT ce_image FROM del_image_tag WHERE actif = 1 LIMIT 1);
1486 raphael 57
 *	MySQL doesn't yet support 'LIMIT & IN/ALL/ANY/SOME subquery
1438 raphael 58
 * EXPLAIN SELECT * FROM del_image WHERE id_image IN (SELECT 3);
1486 raphael 59
 *	PRIMARY
1438 raphael 60
 * EXPLAIN SELECT * FROM del_image WHERE id_image IN (SELECT MIN(3));
1486 raphael 61
 *	DEPENDENT SUBQUERY ... ... ... mwarf !
1438 raphael 62
 * EXPLAIN SELECT  id_image FROM v_del_image vdi WHERE vdi.id_image IN (SELECT ce_image FROM del_image_tag WHERE actif = 1);
1486 raphael 63
 *	5.5: MATERIALIZED		del_image_tag	ALL				ce_image NULL NULL NULL 38276 Using where
64
 *	5.1: DEPENDENT SUBQUERY	del_image_tag	index_subquery	ce_image ce_image 8 func 1 Using where
1438 raphael 65
 * FORCE INDEX/IGNORE INDEX semble incapable de résoudre le problème de l'optimiseur MySQL
66
 *
1390 raphael 67
 */
68
 
1490 raphael 69
require_once(dirname(__FILE__) . '/../DelTk.php');
1390 raphael 70
require_once(dirname(__FILE__) . '/../observations/Observation.php');
71
restore_error_handler();
72
restore_exception_handler();
73
error_reporting(E_ALL);
74
 
1422 raphael 75
// del/services/0.1/images?navigation.depart=0&navigation.limite=12&tri=votes&ordre=desc
76
// del/services/0.1/images?navigation.depart=0&navigation.limite=12&tri=votes&ordre=desc&masque=plop
77
// del/services/0.1/images?navigation.depart=0&navigation.limite=12&tri=votes&ordre=desc&protocole=3
78
// del/services/0.1/images?navigation.depart=0&navigation.limite=12&tri=votes&ordre=desc&protocole=3&masque=plop
79
 
1514 aurelien 80
class ListeImages {
1390 raphael 81
 
1604 jpm 82
	// TODO: PHP-x.y, ces variables devrait être des "const"
83
	static $format_image_possible = array('O','CRX2S','CRS','CXS','CS','XS','S','M','L','XL','X2L','X3L');
1390 raphael 84
 
1604 jpm 85
	static $tri_possible = array('date_transmission', 'date_observation', 'votes', 'tags', 'points');
1390 raphael 86
 
1604 jpm 87
	// en plus de ceux dans DelTk
88
	static $parametres_autorises = array('protocole', 'masque.tag_cel', 'masque.tag_pictoflora', 'masque.milieu');
1422 raphael 89
 
1604 jpm 90
	static $default_params = array('navigation.depart' => 0, 'navigation.limite' => 10,
91
		'tri' => 'date_transmission', 'ordre' => 'desc',
92
		// spécifiques à PictoFlora:
93
		'format' => 'XL');
1422 raphael 94
 
1604 jpm 95
	static $default_proto = 3; // proto par défaut: capitalisation d'img (utilisé uniquement pour tri=(tags|votes|points))
1422 raphael 96
 
1604 jpm 97
	static $mappings = array(
98
		'observations' => array( // v_del_image
99
			"id_observation" => 1,
100
			"date_observation" => 1,
101
			"date_transmission" => 1,
102
			"famille" => "determination.famille",
103
			"nom_sel" => "determination.ns",
104
			"nom_sel_nn" => "determination.nn",
105
			"nom_referentiel" => "determination.referentiel",
106
			"nt" => "determination.nt",
107
			"ce_zone_geo" => "id_zone_geo",
108
			"zone_geo" => 1,
109
			"lieudit" => 1,
110
			"station" => 1,
111
			"milieu" => 1,
112
			"mots_cles_texte" => "mots_cles_texte",
113
			"commentaire" => 1,
114
			"ce_utilisateur" => "auteur.id",
115
			"nom_utilisateur" => "auteur.nom",
1666 jpm 116
			"prenom_utilisateur" => "auteur.prenom",
117
			"courriel_utilisateur" => "auteur.courriel",),
1604 jpm 118
		'images' => array( // v_del_image
119
			'id_image' => 1,
120
			// l'alias suivant est particulier: in-fine il doit s'appeler mots_cles_texte
121
			// mais nous afin d'éviter un conflit d'alias nous le renommons plus tard (reformateImagesDoubleIndex)
122
			'i_mots_cles_texte' => 1)
123
	);
1422 raphael 124
 
1604 jpm 125
	public function __construct(Conteneur $conteneur = null) {
1564 mathias 126
		$this->conteneur = $conteneur == null ? new Conteneur() : $conteneur;
127
		$this->conteneur->chargerConfiguration('config_images.ini');
1604 jpm 128
		$this->bdd = $conteneur->getGestionBdd()->getBdd();
129
	}
1390 raphael 130
 
1604 jpm 131
	public function consulter($ressources, $parametres) {
132
		/* Certes nous sélectionnons ici (nom|prenom|courriel)_utilisateur de cel_obs, mais il ne nous intéressent pas
133
		Par contre, ci-dessous nous prenons i_(nom|prenom|courriel)_utilisateur.
134
		Notons cependant qu'aucun moyen ne devrait permettre que i_*_utilisateur != *_utilisateur
135
		Le propriétaire d'une obs et de l'image associée est *toujours* le même. */
136
		array_walk(self::$mappings['observations'], create_function('&$val, $k', 'if($val==1) $val = $k;'));
137
		array_walk(self::$mappings['images'], create_function('&$val, $k', 'if($val==1) $val = $k;'));
138
		// pour les votes, les mappings de "Observation" nous suffisent
139
		array_walk(Observation::$mappings['votes'], create_function('&$val, $k', 'if($val==1) $val = $k;'));
1390 raphael 140
 
1604 jpm 141
		// la nécessité du 'groupby' dépend des 'join's utilisés (LEFT ou INNER) ainsi que de la cardinalité
142
		// de `ce_image` dans ces tables jointes.
143
		// Contrairement à IdentiPlantes, nous n'avons de HAVING pour PictoFlora, mais par contre un ORDER BY
144
		$req = array('select' => array(), 'join' => array(), 'where' => array(), 'groupby' => array(), 'orderby' => array());
1422 raphael 145
 
1604 jpm 146
		$db = $this->bdd;
1422 raphael 147
 
1604 jpm 148
		// filtrage de l'INPUT général, on réutilise 90% de identiplante en terme de paramètres autorisés
149
		// ($parametres_autorises) sauf... masque.type qui fait des modif' de WHERE sur les mots-clefs.
150
		// Évitons ce genre de chose pour PictoFlora et les risques de conflits avec masque.tag
151
		// même si ceux-ci sont improbables (pas d'<input> pour cela).
152
		$params_ip = DelTk::requestFilterParams($parametres,
153
			array_diff(DelTk::$parametres_autorises, array('masque.type')),
154
			$this->conteneur);
1390 raphael 155
 
1604 jpm 156
		// notre propre filtrage sur l'INPUT
157
		$params_pf = self::requestFilterParams($parametres,
158
			array_merge(DelTk::$parametres_autorises, self::$parametres_autorises));
1422 raphael 159
 
1604 jpm 160
		/* filtrage des tags + sémantique des valeurs multiples:
161
		Lorsqu'on utilise masque.tag* pour chercher des tags, ils sont
162
		postulés comme séparés par des virgule, et l'un au moins des tags doit matcher. */
163
		$params_pf['masque.tag_cel'] = DelTk::buildTagsAST(@$parametres['masque.tag_cel'], 'OR', ',');
1390 raphael 164
 
1604 jpm 165
		if(!isset($parametres['masque.tag_pictoflora']) && isset($parametres['masque.tag'])) {
166
			$parametres['masque.tag_pictoflora'] = $parametres['masque.tag'];
167
		}
168
		$params_pf['masque.tag_pictoflora'] = DelTk::buildTagsAST(@$parametres['masque.tag_pictoflora'], 'OR', ',');
1390 raphael 169
 
1604 jpm 170
		$params = array_merge(
171
			DelTk::$default_params, // paramètre par défaut Identiplante
172
			self::$default_params, // paramètres par défaut PictoFlora
173
			$params_ip, // les paramètres passés, traités par Identiplante
174
			$params_pf); // les paramètres passés, traités par PictoFlora
1390 raphael 175
 
1604 jpm 176
		if (isset($parametres['format'])) {
177
			$params['format'] = $parametres['format'];
178
		}
1422 raphael 179
 
1604 jpm 180
		// création des contraintes (génériques de DelTk)
181
		DelTk::sqlAddConstraint($params, $db, $req);
182
		// création des contraintes spécifiques (sur les tags essentiellement)
183
		self::sqlAddConstraint($params, $db, $req, $this->conteneur);
184
		// création des contraintes spécifiques impliquées par le masque général
185
		self::sqlAddMasqueConstraint($params, $db, $req, $this->conteneur);
186
		// l'ORDER BY s'avére complexe
187
		self::sqlOrderBy($params, $db, $req);
1390 raphael 188
 
1604 jpm 189
		// 1) grunt-work: *la* requête de récupération des id valides (+ SQL_CALC_FOUND_ROWS)
190
		// $idobs_tab = ListeObservations::getIdObs($params, $req, $db);
191
		$idobs_tab = self::getIdImages($params, $req, $db);
1390 raphael 192
 
1604 jpm 193
		// Ce n'est pas la peine de continuer s'il n'y a pas eu de résultats dans la table del_obs_images
194
		if (!$idobs_tab) {
195
			$resultat = new ResultatService();
196
			$resultat->corps = array('entete' => DelTk::makeJSONHeader(0, $params, Config::get('url_service')),
197
				'resultats' => array());
198
			return $resultat;
199
		}
1390 raphael 200
 
1604 jpm 201
		// idobs est une liste (toujours ordonnée) des id d'observations recherchées
202
		$idobs = array_values(array_map(create_function('$a', 'return $a["id_image"];'), $idobs_tab));
203
		$total = $db->recuperer('SELECT FOUND_ROWS() AS c'); $total = intval($total['c']);
1390 raphael 204
 
1604 jpm 205
		$liaisons = self::chargerImages($db, $idobs);
1390 raphael 206
 
1604 jpm 207
		list($images, $images_keyed_by_id_image) = self::reformateImagesDoubleIndex(
208
			$liaisons,
209
			$this->conteneur->getParametre('images.url_images'),
210
			$params['format']);
1422 raphael 211
 
1604 jpm 212
		// on charge les votes pour ces images et pour *tous* les protocoles
213
		$votes = Observation::chargerVotesImage($db, $liaisons, NULL);
1422 raphael 214
 
1604 jpm 215
		// subtilité, nous passons ici le tableau d'images indexé par id_image qui est bien plus pratique pour
216
		// associer les vote à un tableau, puisque nous ne connaissons pas les id d'observation.
217
		// Mais magiquement (par référence), cela va remplir notre tableau indexé par couple d'id (id_image, id_observation)
218
		// cf reformateImagesDoubleIndex() à qui revient la tâche de créer ces deux versions simultanément lorsque
219
		// c'est encore possible.
220
		if ($votes) {
221
			Observation::mapVotesToImages($votes, $images_keyed_by_id_image);
222
		}
1422 raphael 223
 
1604 jpm 224
		// les deux masques de tags sont transformés en AST dans le processus de construction de la requête.
225
		// Reprenous les paramètres originaux non-nettoyés (ils sont valables car le nettoyage est déterministe)
226
		$params_header = array_merge($params, array_filter(array('masque.tag_cel' => @$parametres['masque.tag_cel'],
227
			'masque.tag_pictoflora' => @$parametres['masque.tag_pictoflora'])));
228
		$resultat = new ResultatService();
229
		$resultat->corps = array(
230
			'entete' => DelTk::makeJSONHeader($total, $params_header, Config::get('url_service')),
231
			'resultats' => $images);
232
		return $resultat;
233
	}
1495 raphael 234
 
1690 jpm 235
 
236
	/**
237
	 * Supprime une image directement dans le CEL en faisant un appel à un web service du CEL.
238
	 * Utilisé uniquement par les admins.
239
	 *
240
	 * @param array		$ressources tableau des informations contenues dans l'url après le nom du service
241
	 * @param array		$parametres contenu du post
242
	 * @return mixed	Chaine "OK" (en majuscule) en cas de succès, booléen "false" en cas d'échec
243
	 */
1604 jpm 244
	public function supprimer($ressources) {
245
		$controlAcces = $this->conteneur->getControleAcces();
1690 jpm 246
		$controlAcces->controlerIpAutorisees();
247
		$controlAcces->etreUtilisateurAvecDroitAdmin();
1604 jpm 248
 
1690 jpm 249
		$urlServiceBase = $this->conteneur->getParametre('urlServiceCelImage');
250
		$idImage = $ressources[0];
251
		$url = $urlServiceBase.$idImage;
1604 jpm 252
 
1690 jpm 253
		$clientHttp = $this->conteneur->getRestClient();
254
		$retourCel = $clientHttp->supprimer($url);
255
		$retour = preg_match('/^OK$/i', $retourCel) ? 'OK' : false;
1604 jpm 256
		return $retour;
257
	}
258
 
259
	/**
260
	 * TODO: partie spécifique liées à la complexité de PictoFlora:
261
	 * génération de la clause ORDER BY (génère la valeur de la clef orderby' de $req)
262
	 * nécessaire ? tableau sprintf(key (tri) => value (ordre), key => value ...).
263
	 * Cependant il est impensable de joindre sur un AVG() des valeurs des votes pour
264
	 * *chaque* couple (id_image, protocole) de la base afin de trouver les images
265
	 * les "mieux notées", ou bien les images ayant le "plus de tags" (COUNT())
266
	 */
267
	static function sqlOrderBy($p, $db, &$req) {
1564 mathias 268
		// parmi self::$tri_possible
1604 jpm 269
		if ($p['tri'] == 'votes') { // LEFT JOIN sur "dis" ci-dessous
270
			$req['orderby'] = 'dis.moyenne ' . $p['ordre'] . ', dis.nb_votes ' . $p['ordre'];
271
			return;
1564 mathias 272
		}
1604 jpm 273
 
274
		if ($p['tri'] == 'points') { // LEFT JOIN sur "dis" ci-dessous
275
			$req['orderby'] = 'dis.nb_points ' . $p['ordre'] . ', dis.moyenne ' . $p['ordre'] . ', dis.nb_votes ' . $p['ordre'];
276
			return;
1564 mathias 277
		}
1604 jpm 278
 
279
		if ($p['tri'] == 'tags') { // LEFT JOIN sur "dis" ci-dessous
280
			$req['orderby'] = 'dis.nb_tags ' . $p['ordre'];
281
			return;
1564 mathias 282
		}
1604 jpm 283
 
284
		if ($p['tri'] == 'date_observation') {
285
			$req['orderby'] = 'date_observation ' . $p['ordre'] . ', id_observation ' . $p['ordre'];
286
			return;
1564 mathias 287
		}
1604 jpm 288
 
1564 mathias 289
		// tri == 'date_transmission'
290
		// avant cel:r1860, date_transmission pouvait être NULL
291
		// or nous voulons de la cohérence (notamment pour phpunit)
292
		$req['orderby'] = 'date_transmission ' . $p['ordre'] . ', id_observation ' . $p['ordre'];
1604 jpm 293
	}
1495 raphael 294
 
1604 jpm 295
	/*
296
	 * in $p: un tableau de paramètres, dont:
297
	 * - 'masque.tag_cel': *tableau* de mots-clefs à chercher parmi cel_image.mots_clefs_texte
298
	 * - 'masque.tag_pictoflora': *tableau* de mots-clefs à chercher parmi del_image_tag.tag_normalise
299
	 * - 'tag_explode_semantic': défini si les éléments sont tous recherchés ou NON
300
	 *
301
	 * in/ou: $req: un tableau de structure de requête MySQL
302
	 *
303
	 * Attention, le fait que nous cherchions masque.tag_cel OU/ET masque.tag_cel
304
	 * ne dépend pas de nous, mais du niveau supérieur de construction de la requête:
305
	 * Soit directement $this->consulter() si des masque.tag* sont passés
306
	 * (split sur ",", "AND" entre chaque condition, "OR" pour chaque valeur de tag)
307
	 * Soit via sqlAddMasqueConstraint():
308
	 * (pas de split, "OR" entre chaque condition) [ comportement historique ]
309
	 * équivalent à:
310
	 * (split sur " ", "OR" entre chaque condition, "AND" pour chaque valeur de tag)
311
	 *
312
	 */
313
	static function sqlAddConstraint($p, $db, &$req, Conteneur $c = NULL) {
1584 mathias 314
		// TODO implement dans DelTk ?
1604 jpm 315
		if (!empty($p['masque.milieu'])) {
316
			$req['where'][] = 'vdi.milieu LIKE '.$db->proteger('%' . $p['masque.milieu'].'%');
1584 mathias 317
		}
1604 jpm 318
 
1584 mathias 319
		/* Pour le tri par AVG() des votes nous avons toujours un protocole donné,
1604 jpm 320
			celui-ci indique sur quels votes porte l'AVG.
321
			(c'est un *vote* qui porte sur un protocole et non l'image elle-même) */
1584 mathias 322
		/* TODO: perf problème:
1604 jpm 323
			1) SQL_CALC_FOUND_ROWS: fixable en:
324
				- dissociant le comptage de la récup d'id + javascript async
325
				- ou ne rafraîchir le total *que* pour les requête impliquant un changement de pagination
326
				(paramètre booléen "with-total" par exemple)
327
			2) jointure forcées: en utilisant `del_imagè`, nous forçons les 2 premiers
328
				JOIN sur cel_obs_images et cel_obs pour filtrer sur "transmission".
329
				Dénormaliser cette valeur et l'intégrer à `cel_images` ferait économiser cette couteuse
330
				jointure, ... lorsqu'aucun masque portant sur `cel_obs` n'est utilisé
331
			3) non-problème: l'ordre des joins est forcé par l'usage de la vue:
332
				(cel_images/cel_obs_images/cel_obs/del_image_stat)
333
				Cependant c'est à l'optimiseur de définir son ordre préféré. */
334
		if ($p['tri'] == 'votes' || $p['tri'] == 'points') {
335
			// $p['protocole'] *est* défini (cf requestFilterParams())
336
			// petite optimisation: INNER JOIN si ordre DESC car les 0 à la fin
337
			if($p['ordre'] == 'desc') {
1584 mathias 338
				// pas de group by nécessaire pour cette jointure
339
				// PRIMARY KEY (`ce_image`, `ce_protocole`)
340
				$req['join']['dis'] = sprintf('INNER JOIN del_image_stat dis'.
1604 jpm 341
					 ' ON vdi.id_image = dis.ce_image'.
342
					 ' AND dis.ce_protocole = %d',
343
					 $p['protocole']);
344
			} else {
1584 mathias 345
				$req['join']['dis'] = sprintf('LEFT JOIN del_image_stat dis'.
1604 jpm 346
					 ' ON vdi.id_image = dis.ce_image'.
347
					 ' AND dis.ce_protocole = %d',
348
					 $p['protocole']);
1584 mathias 349
				// nécessaire (dup ce_image dans del_image_stat)
350
				$req['groupby'][] = 'vdi.id_observation';
1604 jpm 351
			}
1584 mathias 352
		}
1604 jpm 353
 
354
		if ($p['tri'] == 'tags') {
355
			$req['join'][] = sprintf('%s JOIN del_image_stat dis ON vdi.id_image = dis.ce_image',
356
				($p['ordre'] == 'desc') ? 'INNER' : 'LEFT');
357
			// nécessaire (dup ce_image dans del_image_stat)
358
			$req['groupby'][] = 'vdi.id_observation';
1584 mathias 359
		}
1604 jpm 360
 
1584 mathias 361
		// car il ne sont pas traités par la générique requestFilterParams() les clefs "masque.tag_*"
362
		// sont toujours présentes; bien que parfois NULL.
1604 jpm 363
		if ($p['masque.tag_cel']) {
364
			if (isset($p['masque.tag_cel']['AND'])) {
365
				// TODO: utiliser les tables de mots clefs normaliées dans tb_cel ?
366
				// et auquel cas laisser au client le choix du couteux "%" ?
367
				$tags = $p['masque.tag_cel']['AND'];
368
				array_walk($tags, create_function('&$val, $k, $db',
1655 mathias 369
					'$val = sprintf("CONCAT(IFNULL(vdi.mots_cles_texte,\'\'),IFNULL(vdi.i_mots_cles_texte,\'\')) LIKE %s",
1604 jpm 370
					$db->proteger("%".$val."%"));'),
371
					$db);
372
				$req['where'][] = '(' . implode(' AND ', $tags) . ')';
373
			} else {
1669 mathias 374
				$req['where'][] = sprintf("CONCAT(IFNULL(vdi.mots_cles_texte,''),IFNULL(vdi.i_mots_cles_texte,'')) REGEXP %s",
1604 jpm 375
					$db->proteger(implode('|', $p['masque.tag_cel']['OR'])));
376
			}
1584 mathias 377
		}
1604 jpm 378
 
379
		if ($p['masque.tag_pictoflora']) {
380
			// inutilisable pour l'instant
381
			// self::sqlAddPictoFloraTagConstraint1($p, $db, $req);
382
 
383
			// intéressante, mais problème d'optimiseur MySQL 5.5 (dependant subquery)
384
			// self::sqlAddPictoFloraTagConstraint2($p, $db, $req);
385
 
386
			// approche fiable mais sous-optimale
387
			self::sqlAddPictoFloraTagConstraint3($p, $db, $req);
1584 mathias 388
		}
1604 jpm 389
	}
1486 raphael 390
 
1604 jpm 391
	/* approche intéressante si les deux problèmes suivants peuvent être résolu:
392
		- LEFT JOIN => dup => *gestion de multiples GROUP BY* (car in-fine un LIMIT est utilisé)
393
		- dans le cas d'un ET logique, comment chercher les observations correspondantes ? */
394
	static function sqlAddPictoFloraTagConstraint1($p, $db, &$req) {
395
		// XXX: utiliser tag plutôt que tag_normalise ?
396
		$req['join'][] = 'LEFT JOIN del_image_tag dit ON dit.ce_image = vdi.id_image';
397
		$req['where'][] = 'dit.actif = 1';
398
		$req['groupby'][] = 'vdi.id_image'; // TODO: nécessaire (car dup') mais risque de conflict en cas de tri (multiple GROUP BY)
399
		// XXX: en cas de ET, possibilité du GROUP_CONCAT(), mais probablement sans grand intérêt, d'où une boucle
400
		if (isset($p['masque.tag_pictoflora']['AND'])) {
401
			// TODO/XXX : comment matcher les observations ayant tous les mots-clef passés ?
402
			// ... le LEFT-JOIN n'y semble pas adapté
403
		} else {
404
			$protected_tags = array();
405
			foreach ($p['masque.tag_pictoflora']['OR'] as $tag) {
406
				$protected_tags[] = $db->proteger(strtolower($tag));
407
			}
408
			$req['where'][] = sprintf('tag_normalise IN (%s)', implode(',', $protected_tags));
409
		}
1495 raphael 410
	}
1486 raphael 411
 
1604 jpm 412
	// inutilisé pour l'instant pour cause de soucis d'optimiseur MySQL (cf commentaire en intro)
413
	static function sqlAddPictoFloraTagConstraint2($p, $db, &$req) {
414
		// Note à propos des 4 "@ instruction" ci-dessous (notamment sur recupererTous())
415
		// REGEXP permet un puissant mécanisme de sélection des obs/image à qui sait
416
		// l'utiliser, mais peut sortir une erreur en cas de REGEXP invalide
417
		// ex: REGEX "^(".
418
		// Pour l'heure nous ignorons ce type d'erreur car aucun de nos champ de recherche
419
		// ne peuvent (ou ne devrait) comporter des meta-caractères
420
		// ([])?*+\\
421
		if (isset($p['masque.tag_pictoflora']['AND'])) {
422
			// optimsation: en cas de "AND" on sort() l'input et le GROUP_CONCAT()
423
			// donc nous utilisons des ".*" plutôt que de multiples conditions et "|"
424
			sort($p['masque.tag_pictoflora']['AND']);
425
			$req['where'][] = sprintf("vdi.id_image IN (SELECT ce_image FROM del_image_tag WHERE actif = 1".
426
				" GROUP BY ce_image".
427
				" HAVING GROUP_CONCAT(tag_normalise ORDER BY tag_normalise) REGEXP %s)",
428
				$db->proteger(implode('.*', $p['masque.tag_pictoflora']['AND'])));
429
		} else {
430
			$req['where'][] = sprintf("vdi.id_image IN (SELECT ce_image FROM del_image_tag WHERE actif = 1".
431
				" GROUP BY ce_image".
432
				" HAVING GROUP_CONCAT(tag_normalise) REGEXP %s)",
433
				$db->proteger(implode('|', $p['masque.tag_pictoflora']['OR'])));
434
		}
1495 raphael 435
	}
1491 raphael 436
 
1604 jpm 437
	// si l'on est bassiné par les "DEPENDENT SUBQUERY", nous la faisons donc indépendemment via cette fonction
438
	static function sqlAddPictoFloraTagConstraint3($p, $db, &$req) {
439
		if (isset($p['masque.tag_pictoflora']['AND'])) {
440
			// optimsation: en cas de "AND" on sort() l'input et le GROUP_CONCAT()
441
			// donc nous utilisons des ".*" plutôt que de multiples conditions et "|"
442
			sort($p['masque.tag_pictoflora']['AND']);
1486 raphael 443
 
1604 jpm 444
			// plutôt que db->connexion->query->fetchColumn(), une API pourrie nous oblige à ...
445
			$ids = @$db->recupererTous(sprintf(
446
			"SELECT ce_image FROM del_image_tag WHERE actif = 1".
447
			" GROUP BY ce_image".
448
			" HAVING GROUP_CONCAT(tag_normalise ORDER BY tag_normalise) REGEXP %s",
449
			$db->proteger(implode('.*', $p['masque.tag_pictoflora']['AND']))));
1486 raphael 450
 
1604 jpm 451
			// puis:
452
			$ids = @array_map(create_function('$e', 'return $e["ce_image"];'), $ids);
453
			$ids = !empty($ids) ? implode(',', $ids) : 'SELECT ce_image FROM del_image_tag  WHERE false';
454
			$req['where'][] = sprintf("vdi.id_image IN (%s)", $ids);
455
		} else {
456
			$ids = @$db->recupererTous(sprintf(
457
				"SELECT ce_image FROM del_image_tag WHERE actif = 1".
458
				" GROUP BY ce_image".
459
				" HAVING GROUP_CONCAT(tag_normalise) REGEXP %s",
460
				$db->proteger(implode('|', $p['masque.tag_pictoflora']['OR']))));
1491 raphael 461
 
1604 jpm 462
			$ids = @array_map(create_function('$e', 'return $e["ce_image"];'), $ids);
463
			$ids = !empty($ids) ? implode(',', $ids) : 'SELECT ce_image FROM del_image_tag  WHERE false';
464
			$req['where'][] = sprintf("vdi.id_image IN (%s)", $ids);
465
		}
1495 raphael 466
	}
1486 raphael 467
 
1604 jpm 468
	static function getIdImages($p, $req, $db) {
1669 mathias 469
		$req = sprintf(
1604 jpm 470
			'SELECT SQL_CALC_FOUND_ROWS id_image' .
471
			//', dis.moyenne, dis.nb_points, dis.nb_votes' . // debug
472
			' FROM v_del_image vdi'.
473
			' %s' . // LEFT JOIN if any
474
			' WHERE %s'. // where-clause ou TRUE
475
			' %s'. // group-by
476
			' ORDER BY %s'.
477
			' LIMIT %d, %d -- %s',
478
 
479
			$req['join'] ? implode(' ', array_unique($req['join'])) : '',
480
			$req['where'] ? implode(' AND ', $req['where']) : 'TRUE',
481
 
482
			$req['groupby'] ? ('GROUP BY ' . implode(', ', array_unique($req['groupby']))) : '',
483
 
484
			$req['orderby'],
485
 
1669 mathias 486
			$p['navigation.depart'], $p['navigation.limite'], __FILE__ . ':' . __LINE__);
487
		return $db->recupererTous($req);
1422 raphael 488
	}
489
 
1604 jpm 490
	static function chargerImages($db, $idImg) {
1564 mathias 491
		$obs_fields = DelTk::sqlFieldsToAlias(self::$mappings['observations'], NULL);
492
		$image_fields = DelTk::sqlFieldsToAlias(self::$mappings['images'], NULL);
1604 jpm 493
 
1564 mathias 494
		return $db->recupererTous(sprintf('SELECT '.
1604 jpm 495
			' CONCAT(id_image, "-", id_observation) AS jsonindex,'.
496
			' %1$s, %2$s FROM v_del_image '.
497
			' WHERE %3$s'.
498
			' ORDER BY %4$s'. // important car MySQL ne conserve par l'ordre du IN()
499
			' -- %5$s',
500
			$obs_fields, $image_fields,
501
			sprintf('id_image IN (%s)', implode(',', $idImg)),
502
			sprintf('FIELD(id_image, %s)', implode(',', $idImg)),
503
			__FILE__ . ':' . __LINE__));
504
	}
1422 raphael 505
 
1604 jpm 506
	/* "masque" ne fait jamais que faire une requête sur la plupart des champs, (presque) tous traités
507
		de manière identique à la seule différence que:
508
		1) ils sont combinés par des "OU" logiques plutôt que des "ET".
509
		2) les tags sont traités différemment pour conserver la compatibilité avec l'utilisation historique:
510
		Tous les mots-clefs doivent matcher et sont séparés par des espaces
511
		(dit autrement, str_replace(" ", ".*", $mots-clefs-requête) =~ $mots-clefs-mysql)
512
		Pour plus d'information: (ListeObservations|DelTk)::sqlAddMasqueConstraint() */
513
	static function sqlAddMasqueConstraint($p, $db, &$req, Conteneur $c = NULL) {
514
		if (!empty($p['masque'])) {
515
			$or_params = array('masque.auteur' => $p['masque'],
516
				'masque.departement' => $p['masque'],
517
				'masque.commune' => $p['masque'], // TODO/XXX ?
518
				'masque.id_zone_geo' => $p['masque'],
1422 raphael 519
 
1604 jpm 520
				/* tous-deux remplacent masque.tag
521
				mais sont traité séparément des requestFilterParams() */
522
				// 'masque.tag_cel' => $p['masque'],
523
				// 'masque.tag_pictoflora' => $p['masque'],
524
 
525
				'masque.ns' => $p['masque'],
526
				'masque.famille' => $p['masque'],
527
				'masque.date' => $p['masque'],
528
				'masque.genre' => $p['masque'],
529
				'masque.milieu' => $p['masque'],
530
				'masque.tag_cel' => $p['masque'],
531
				'masque.tag_pictoflora' => $p['masque'],
532
 
533
				// tri est aussi nécessaire car affecte les contraintes de JOIN
534
				'tri' => $p['tri'],
535
				'ordre' => $p['ordre']);
536
			if (array_key_exists('protocole', $p)) {
537
				$or_params['protocole'] = $p['protocole'];
538
			}
539
 
540
			/* Cependant les champs spécifiques ont priorité sur le masque général.
541
				Pour cette raison nous supprimons la génération de SQL du masque général sur les
542
				champ spécifiques qui feront l'objet d'un traitement avec une valeur propre. */
543
			if(isset($p['masque.auteur'])) unset($or_params['masque.auteur']);
544
			if(isset($p['masque.departement'])) unset($or_params['masque.departement']);
545
			if(isset($p['masque.commune'])) unset($or_params['masque.commune']);
546
			if(isset($p['masque.id_zone_geo'])) unset($or_params['masque.id_zone_geo']);
547
			if(isset($p['masque.ns'])) unset($or_params['masque.ns']);
548
			if(isset($p['masque.famille'])) unset($or_params['masque.famille']);
549
			if(isset($p['masque.date'])) unset($or_params['masque.date']);
550
			if(isset($p['masque.genre'])) unset($or_params['masque.genre']);
551
			if(isset($p['masque.milieu'])) unset($or_params['masque.milieu']);
552
			if(isset($p['masque.tag_cel'])) unset($or_params['masque.tag_cel']);
553
			if(isset($p['masque.tag_pictoflora'])) unset($or_params['masque.tag_pictoflora']);
554
 
555
			$or_masque = array_merge(
1584 mathias 556
				DelTk::requestFilterParams($or_params, NULL, $c /* pour masque.departement */),
557
				self::requestFilterParams($or_params)
1604 jpm 558
			);
559
 
560
			/* Lorsqu'on utilise le masque général pour chercher des tags, ils sont
561
				postulés comme séparés par des espaces, et doivent être tous matchés. */
562
			if (isset($or_params['masque.tag_cel'])) {
563
				$or_masque['masque.tag_cel'] = DelTk::buildTagsAST($p['masque'], 'AND', ' ');
564
			}
565
			if (isset($or_params['masque.tag_pictoflora'])) {
566
				$or_masque['masque.tag_pictoflora'] = DelTk::buildTagsAST($p['masque'], 'AND', ' ');
567
			}
568
 
569
			// pas de select, groupby & co ici: uniquement 'join' et 'where'
570
			$or_req = array('join' => array(), 'where' => array());
571
			DelTk::sqlAddConstraint($or_masque, $db, $or_req);
572
 
573
			self::sqlAddConstraint($or_masque, $db, $or_req);
574
 
575
			if ($or_req['where']) {
576
				$req['where'][] = '(' . implode(' OR ', $or_req['where']) . ')';
577
				// utile au cas ou des jointures seraient rajoutées
578
				$req['join'] = array_unique(array_merge($req['join'], $or_req['join']));
579
			}
1584 mathias 580
		}
1604 jpm 581
	}
1422 raphael 582
 
1490 raphael 583
 
1604 jpm 584
	// cf Observation::reformateObservationSimpleIndex() et ListeObservations::reformateObservation()
585
	// (trop de variétés de formatage, à unifier côté client pour unifier côté backend ...)
586
	static function reformateImagesDoubleIndex($obs, $url_pattern = '', $image_format = 'XL') {
1564 mathias 587
		// XXX: cf Observation.php::consulter(), nous pourriouns ici
588
		// conserver les valeurs vides (pour les phptests notamment, ou non)
589
		// $obs = array_map('array_filter', $obs);
590
		$obs_merged = $obs_keyed_by_id_image = array();
1604 jpm 591
		foreach ($obs as $o) {
592
			// ceci nous complique la tâche pour le reste du processing...
593
			$id = $o['jsonindex'];
594
			// ainsi nous utilisons deux tableaux: le final, indexé par couple d'id(image-obs)
595
			// et celui indexé par simple id_image qui est fort utile pour mapVotesToImages()
596
			// mais tout deux partage leur référence à "protocole"
597
			$image = array(
598
				'id_image' => $o['id_image'],
1564 mathias 599
				'binaire.href' => sprintf($url_pattern, $o['id_image'], $image_format),
600
				'mots_cles_texte' => @$o['i_mots_cles_texte'], // @, peut avoir été filtré par array_map() ci-dessus
1604 jpm 601
			);
602
 
603
			unset($o['id_image'], $o['i_mots_cles_texte'], $o['jsonindex']);
604
			if (!isset($obs_merged[$id])) {
605
				$obs_merged[$id] = $image;
606
			}
607
			$obs_merged[$id]['observation'] = $o;
608
			$obs_merged[$id]['protocoles_votes'] = array();
609
 
610
			$obs_keyed_by_id_image[$image['id_image']]['protocoles_votes'] =& $obs_merged[$id]['protocoles_votes'];
1564 mathias 611
		}
1604 jpm 612
 
1564 mathias 613
		return array($obs_merged,$obs_keyed_by_id_image);
1604 jpm 614
	}
1490 raphael 615
 
1604 jpm 616
	// complete & override DelTk::requestFilterParams() (même usage)
617
	static function requestFilterParams(Array $params, $parametres_autorises = NULL) {
618
		if ($parametres_autorises) { // filtrage de toute clef inconnue
619
			$params = array_intersect_key($params, array_flip($parametres_autorises));
620
		}
1490 raphael 621
 
1584 mathias 622
		$p = array();
623
		$p['tri'] = DelTk::unsetIfInvalid($params, 'tri', self::$tri_possible);
624
		$p['format'] = DelTk::unsetIfInvalid($params, 'format', self::$format_image_possible);
1604 jpm 625
 
1584 mathias 626
		// "milieu" inutile pour IdentiPlantes ?
1604 jpm 627
		if (isset($params['masque.milieu'])) {
628
			$p['masque.milieu'] = trim($params['masque.milieu']);
629
		}
630
 
1584 mathias 631
		// compatibilité
1604 jpm 632
		if (isset($params['masque.tag'])) {
633
			$params['masque.tag_cel'] = $params['masque.tag_pictoflora'] = $params['masque.tag'];
1584 mathias 634
		}
1604 jpm 635
 
636
		if ($p['tri'] == 'votes' || $p['tri'] == 'tags' || $p['tri'] == 'points') {
637
			// ces critère de tri des image à privilégier ne s'applique qu'à un protocole donné
638
			if(!isset($params['protocole']) || !is_numeric($params['protocole'])) {
1584 mathias 639
				$p['protocole'] = self::$default_proto;
1604 jpm 640
			} else {
1584 mathias 641
				$p['protocole'] = intval($params['protocole']);
1604 jpm 642
			}
1584 mathias 643
		}
1604 jpm 644
 
1584 mathias 645
		return array_filter($p, create_function('$a','return !in_array($a, array("",false,null),true);'));
1604 jpm 646
	}
1422 raphael 647
 
1486 raphael 648
}
1604 jpm 649
?>