1375 |
raphael |
1 |
<?php
|
|
|
2 |
/**
|
|
|
3 |
* Le web service observations récupère toutes les observations et, pour chacune d'elle, les
|
|
|
4 |
* images qui lui sont associées.
|
|
|
5 |
* Basée sur la classe antérieure dans ListeObservations.php de
|
|
|
6 |
* Grégoire Duché et Aurélien Peronnet
|
|
|
7 |
* (formaterVote, formaterDeterminations, chargerNombreCommentaire, chargerVotes, chargerDeterminations)
|
|
|
8 |
*
|
|
|
9 |
* @category php 5.2
|
|
|
10 |
* @package del
|
|
|
11 |
* @author Raphaël Droz <raphael@tela-botanica.org>
|
|
|
12 |
* @copyright Copyright (c) 2013 Tela Botanica (accueil@tela-botanica.org)
|
|
|
13 |
* @license http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL
|
|
|
14 |
* @license http://www.gnu.org/licenses/gpl.html Licence GNU-GPL
|
|
|
15 |
* @see http://www.tela-botanica.org/wikini/eflore/wakka.php?wiki=ApiIdentiplante01Observations
|
|
|
16 |
*
|
|
|
17 |
* TODO:
|
|
|
18 |
* PDO::prepare()
|
|
|
19 |
* Sphinx pour auteur, genre, ns, commune, tag et masque-général
|
|
|
20 |
*/
|
|
|
21 |
|
|
|
22 |
define('_LISTE_OBS_MAX_RESULT_LIMIT', 1000);
|
|
|
23 |
define('_LISTE_OBS_MAX_ID_OBS', 10e7);
|
|
|
24 |
// SELECT MAX(num_taxonomique) FROM bdtfx_v2_00;
|
|
|
25 |
define('_LISTE_OBS_MAX_BDTFX_NT', 44378 + 1000);
|
|
|
26 |
// SELECT MAX(num_nom) FROM bdtfx_v2_00;
|
|
|
27 |
define('_LISTE_OBS_MAX_BDTFX_NN', 103386 + 10000);
|
|
|
28 |
|
|
|
29 |
restore_error_handler();
|
|
|
30 |
restore_exception_handler();
|
|
|
31 |
error_reporting(E_ALL);
|
|
|
32 |
|
|
|
33 |
class ListeObservations2 {
|
|
|
34 |
|
|
|
35 |
private $conteneur;
|
|
|
36 |
private $gestionBdd;
|
|
|
37 |
private $bdd;
|
|
|
38 |
private $parametres = array();
|
|
|
39 |
private $ressources = array();
|
|
|
40 |
|
|
|
41 |
static $tris_possibles = array('date_observation');
|
|
|
42 |
// paramètres autorisés
|
|
|
43 |
static $parametres_autorises = array('masque', 'masque.famille', 'masque.nn', 'masque.referentiel', // taxon
|
|
|
44 |
'masque.genre', 'masque.espece', 'masque.ns', // nom_sel
|
|
|
45 |
'masque.commune', 'masque.departement', 'masque.id_zone_geo', // loc
|
|
|
46 |
'masque.auteur', 'masque.date', 'masque.tag', 'masque.type', // autres
|
|
|
47 |
// tri, offset
|
|
|
48 |
'navigation.depart', 'navigation.limite',
|
|
|
49 |
'tri', 'ordre', // TODO: 'total=[yes]', 'fields=[x,y,...]'
|
|
|
50 |
// TODO: masque.annee, masque.insee (!= departement)
|
|
|
51 |
);
|
|
|
52 |
|
|
|
53 |
static $default_params = array('navigation.depart' => 0, 'navigation.limite' => 10,
|
|
|
54 |
'tri' => 'date_transmission', 'ordre' => 'desc');
|
|
|
55 |
|
|
|
56 |
static $sql_fields_liaisons = array(
|
|
|
57 |
'dob' => array('id_observation', 'nom_sel AS `determination.ns`', 'nt AS `determination.nt`',
|
|
|
58 |
'nom_sel_nn AS `determination.nn`', 'famille AS `determination.famille`',
|
|
|
59 |
'nom_referentiel AS `determination.referentiel`',
|
|
|
60 |
'ce_zone_geo AS id_zone_geo', 'zone_geo', 'lieudit',
|
|
|
61 |
'station', 'milieu', 'date_observation', 'mots_cles_texte', 'date_transmission',
|
|
|
62 |
'ce_utilisateur AS `auteur.id`', 'prenom_utilisateur AS `auteur.prenom`',
|
|
|
63 |
'nom_utilisateur AS `auteur.nom`', 'courriel_utilisateur AS observateur',
|
|
|
64 |
'commentaire'),
|
1386 |
raphael |
65 |
'di' => array('id_image', 'date_prise_de_vue AS `date`', 'hauteur',/* 'largeur','nom_original' // apparemment inutilisés */),
|
1375 |
raphael |
66 |
'du' => array('prenom', 'nom', 'courriel'),
|
|
|
67 |
'dc' => array('commentaire')
|
|
|
68 |
);
|
|
|
69 |
|
|
|
70 |
|
|
|
71 |
public function __construct(Conteneur $conteneur = null) {
|
|
|
72 |
$this->conteneur = $conteneur == null ? new Conteneur() : $conteneur;
|
|
|
73 |
$this->conteneur->chargerConfiguration('config_departements_bruts.ini');
|
|
|
74 |
$this->conteneur->chargerConfiguration('config_observations.ini');
|
|
|
75 |
$this->conteneur->chargerConfiguration('config_mapping_votes.ini');
|
|
|
76 |
$this->conteneur->chargerConfiguration('config_mapping_commentaires.ini');
|
|
|
77 |
$this->navigation = $conteneur->getNavigation();
|
|
|
78 |
$this->masque = $conteneur->getMasque();
|
|
|
79 |
$this->gestionBdd = $conteneur->getGestionBdd();
|
|
|
80 |
$this->bdd = $this->gestionBdd->getBdd();
|
|
|
81 |
}
|
|
|
82 |
|
1383 |
raphael |
83 |
static function reformateObservation($obs, $url_pattern = '') {
|
1375 |
raphael |
84 |
$obs = array_map('array_filter', $obs);
|
|
|
85 |
$obs_merged = array();
|
|
|
86 |
foreach($obs as $o) {
|
|
|
87 |
$id = $o['id_observation'];
|
1386 |
raphael |
88 |
|
|
|
89 |
// car auteur.id peut être un email, un hash, ou un annuaire_tela.U_ID
|
|
|
90 |
// mais dans les deux premiers cas SELECT courriel AS observateur fait déjà l'affaire
|
|
|
91 |
if(!is_numeric($o['auteur.id'])) $o['auteur.id'] = "0";
|
|
|
92 |
if(!isset($o['auteur.nom'])) $o['auteur.nom'] = '[inconnu]';
|
|
|
93 |
|
1375 |
raphael |
94 |
$image = array_intersect_key($o, array_flip(array('id_image', 'date', 'hauteur' , 'largeur', 'nom_original')));
|
1383 |
raphael |
95 |
$image['binaire.href'] = sprintf($url_pattern, $image['id_image']);
|
1375 |
raphael |
96 |
unset($o['id_image'], $o['date'], $o['hauteur'], $o['largeur'], $o['nom_original']);
|
|
|
97 |
if(!isset($obs_merged['"' . $id . '"'])) $obs_merged['"' . $id . '"'] = $o;
|
|
|
98 |
$obs_merged['"' . $id . '"']['images'][] = $image;
|
|
|
99 |
}
|
|
|
100 |
return $obs_merged;
|
|
|
101 |
}
|
|
|
102 |
|
1386 |
raphael |
103 |
// utilisée uniquement par Observation.php
|
1383 |
raphael |
104 |
static function reformateObservationSimpleIndex($obs, $url_pattern = '') {
|
1386 |
raphael |
105 |
// XXX: cf Observation.php::consulter(), nous pourriouns ici
|
|
|
106 |
// conserver les valeurs vides (pour les phptests notamment, ou non)
|
1383 |
raphael |
107 |
$obs = array_map('array_filter', $obs);
|
|
|
108 |
$obs_merged = array();
|
|
|
109 |
foreach($obs as $o) {
|
|
|
110 |
$id = $o['id_observation'];
|
|
|
111 |
$image = array_intersect_key($o, array_flip(array('id_image', 'date', 'hauteur' , 'largeur', 'nom_original')));
|
|
|
112 |
$image['binaire.href'] = sprintf($url_pattern, $image['id_image']);
|
|
|
113 |
unset($o['id_image'], $o['date'], $o['hauteur'], $o['largeur'], $o['nom_original']);
|
|
|
114 |
if(!isset($obs_merged[$id])) $obs_merged[$id] = $o;
|
|
|
115 |
$obs_merged[$id]['images'][$image['id_image']] = $image;
|
|
|
116 |
}
|
|
|
117 |
return $obs_merged;
|
|
|
118 |
}
|
|
|
119 |
|
1375 |
raphael |
120 |
/**
|
|
|
121 |
* Méthode principale de la classe.
|
|
|
122 |
* Lance la récupération des images dans la base et les place dans un objet ResultatService
|
|
|
123 |
* pour l'afficher.
|
|
|
124 |
* @param array $ressources les ressources situées après l'url de base (ex : http://url/ressource1/ressource2)
|
|
|
125 |
* @param array $parametres les paramètres situés après le ? dans l'url
|
|
|
126 |
**/
|
|
|
127 |
public function consulter($ressources, $parametres) {
|
|
|
128 |
$req = array('select' => array(), 'join' => array(), 'where' => array(), 'groupby' => array(), 'having' => array());
|
1380 |
raphael |
129 |
// toujours nécessaire puisque nous tapons sur v_del_image qui INNER JOIN cel_images, or nous voulons certes
|
1375 |
raphael |
130 |
// toutes les images, mais nous voulons $limite observations uniques.
|
|
|
131 |
$req['groupby'][] = 'dob.id_observation';
|
|
|
132 |
|
|
|
133 |
$db = $this->bdd;
|
|
|
134 |
|
|
|
135 |
// filtrage de l'INPUT
|
1389 |
raphael |
136 |
$params = self::requestFilterParams($parametres, self::$parametres_autorises, $this->conteneur);
|
1375 |
raphael |
137 |
// création des contraintes (masques)
|
|
|
138 |
self::sqlAddConstraint($params, $db, $req, $this->conteneur);
|
|
|
139 |
|
|
|
140 |
// 1) grunt-work: *la* requête de récupération des id valides (+ SQL_CALC_FOUND_ROWS)
|
|
|
141 |
$idobs_tab = self::getIdObs($params, $req, $db);
|
|
|
142 |
// idobs est une liste (toujours ordonnée) des id d'observations recherchées
|
|
|
143 |
$idobs = array_values(array_map(create_function('$a', 'return $a["id_observation"];'), $idobs_tab));
|
|
|
144 |
|
1379 |
raphael |
145 |
if($idobs) {
|
|
|
146 |
$total = $db->recuperer('SELECT FOUND_ROWS() AS c'); $total = intval($total['c']);
|
1375 |
raphael |
147 |
|
1379 |
raphael |
148 |
// 2) récupération des données nécessaires pour ces observations (obs + images)
|
|
|
149 |
$obs_unfmt = self::getInfos($idobs, $db);
|
1375 |
raphael |
150 |
|
1379 |
raphael |
151 |
// 3) suppression, merge des données en tableau assez représentatif du futur JSON en output
|
1383 |
raphael |
152 |
$observations = self::reformateObservation($obs_unfmt, $this->conteneur->getParametre('url_images'));
|
1375 |
raphael |
153 |
|
1379 |
raphael |
154 |
// 4) récupération des données nécessaires pour ces observations (commentaires + votes)
|
|
|
155 |
// modifie $observations
|
|
|
156 |
$this->configurer();
|
|
|
157 |
$this->chargerDeterminations($observations);
|
1375 |
raphael |
158 |
|
1379 |
raphael |
159 |
// 5) restauration de l'ordre souhaité initialement
|
|
|
160 |
$observations = self::sortArrayByArray($observations, $idobs);
|
|
|
161 |
} else {
|
|
|
162 |
$observations = array();
|
|
|
163 |
$total = 0;
|
|
|
164 |
}
|
|
|
165 |
|
1375 |
raphael |
166 |
// 6) JSON output
|
|
|
167 |
$resultat = new ResultatService();
|
1389 |
raphael |
168 |
$resultat->corps = array('entete' => self::makeJSONHeader($total, $params, Config::get('url_service')),
|
1375 |
raphael |
169 |
'resultats' => $observations);
|
|
|
170 |
|
|
|
171 |
return $resultat;
|
|
|
172 |
}
|
|
|
173 |
|
|
|
174 |
static function sortArrayByArray($array, $orderArray) {
|
|
|
175 |
$ordered = array();
|
|
|
176 |
foreach($orderArray as $key) {
|
|
|
177 |
if(array_key_exists('"' . $key . '"', $array)) {
|
|
|
178 |
$ordered['"' . $key . '"'] = $array['"' . $key . '"'];
|
|
|
179 |
unset($array['"' . $key . '"']);
|
|
|
180 |
}
|
|
|
181 |
}
|
|
|
182 |
return $ordered + $array;
|
|
|
183 |
}
|
|
|
184 |
|
|
|
185 |
// SQL helpers
|
|
|
186 |
/*
|
|
|
187 |
* Retourne une liste ordonnée d'id d'observation correspondant aux critères
|
|
|
188 |
* passés dans p et aux clauses where/join présentes dans le tableau $req
|
|
|
189 |
*
|
|
|
190 |
* @param p: $params (filtrés sauf escape-string)
|
|
|
191 |
* @param req: le tableau représentant les composants de la requete SQL
|
|
|
192 |
* @param db: l'instance de db
|
|
|
193 |
*/
|
|
|
194 |
static function getIdObs($p, $req, $db) {
|
|
|
195 |
$req_s = sprintf('SELECT SQL_CALC_FOUND_ROWS id_observation' .
|
1380 |
raphael |
196 |
' FROM v_del_image dob'.
|
1375 |
raphael |
197 |
' %s' . // LEFT JOIN if any
|
|
|
198 |
' WHERE %s'. // where-clause ou TRUE
|
|
|
199 |
' %s'. // group-by
|
|
|
200 |
' %s'. // having (si commentaires)
|
1379 |
raphael |
201 |
' ORDER BY %s %s %s'.
|
1375 |
raphael |
202 |
' LIMIT %d, %d -- %s',
|
|
|
203 |
|
|
|
204 |
$req['join'] ? implode(' ', $req['join']) : '',
|
|
|
205 |
$req['where'] ? implode(' AND ', $req['where']) : 'TRUE',
|
|
|
206 |
|
|
|
207 |
$req['groupby'] ? ('GROUP BY ' . implode(', ', array_unique($req['groupby']))) : '',
|
|
|
208 |
$req['having'] ? ('HAVING ' . implode(' AND ', $req['having'])) : '',
|
|
|
209 |
|
|
|
210 |
$p['tri'], strtoupper($p['ordre']),
|
1379 |
raphael |
211 |
// date_transmission peut-être NULL et nous voulons de la consistence
|
|
|
212 |
$p['tri'] == 'date_transmission' ? ', id_observation' : '',
|
1375 |
raphael |
213 |
|
1379 |
raphael |
214 |
$p['navigation.depart'], $p['navigation.limite'], __FILE__ . ':' . __LINE__);
|
|
|
215 |
|
1375 |
raphael |
216 |
$res = $db->recupererTous($req_s);
|
|
|
217 |
$err = mysql_error();
|
|
|
218 |
if(!$res && $err) {
|
|
|
219 |
// http_response_code(400);
|
|
|
220 |
// if(defined('DEBUG') && DEBUG) header("X-Debug: $req_s");
|
|
|
221 |
throw new Exception('not found', 400);
|
|
|
222 |
}
|
|
|
223 |
// ordre préservé, à partir d'ici c'est important.
|
|
|
224 |
return $res;
|
|
|
225 |
}
|
|
|
226 |
|
|
|
227 |
/*
|
|
|
228 |
Champs récupérés:
|
|
|
229 |
Pour del_images, la vue retourne déjà ce que nous recherchons de cel_obs et cel_images
|
|
|
230 |
(cel_obs.* et cel_images.{id_observation, doi.id_image, date_prise_de_vue AS date, hauteur , largeur})
|
|
|
231 |
Pour del_commentaires: nous voulons *
|
|
|
232 |
Reste ensuite à formatter
|
|
|
233 |
*/
|
|
|
234 |
static function getInfos($idobs, $db) {
|
|
|
235 |
/*$select_fields = implode(',', array_merge(
|
|
|
236 |
array_map(create_function('$a', 'return "dob.".$a;'), self::$sql_fields_liaisons['dob']),
|
|
|
237 |
array_map(create_function('$a', 'return "di.".$a;'), self::$sql_fields_liaisons['di']),
|
|
|
238 |
array_map(create_function('$a', 'return "du.".$a;'), self::$sql_fields_liaisons['du'])));*/
|
|
|
239 |
$select_fields = array_merge(self::$sql_fields_liaisons['dob'],
|
|
|
240 |
self::$sql_fields_liaisons['di']);
|
1380 |
raphael |
241 |
$req_s = sprintf('SELECT %s FROM v_del_image di'.
|
1375 |
raphael |
242 |
// ' LEFT JOIN del_commentaire AS dc ON di.id_observation = dc.ce_observation AND dc.nom_sel IS NOT NULL'.
|
|
|
243 |
' WHERE id_observation IN (%s)',
|
|
|
244 |
implode(',', $select_fields),
|
|
|
245 |
implode(',', $idobs));
|
|
|
246 |
return $db->recupererTous($req_s);
|
|
|
247 |
}
|
|
|
248 |
|
|
|
249 |
|
|
|
250 |
/**
|
|
|
251 |
* - Rempli le tableau des contraintes "where" et "join" nécessaire
|
|
|
252 |
* à la *recherche* des observations demandées ($req)
|
|
|
253 |
* Attention, cela signifie que toutes les tables ne sont pas *forcément*
|
|
|
254 |
* join'ées, par exemple si aucune contrainte ne le nécessite.
|
|
|
255 |
* $req tel qu'il est rempli ici est utile pour récupéré la seule liste des
|
|
|
256 |
* id d'observation qui match.
|
|
|
257 |
* Pour la récupération effective de "toutes" les données correspondante, il faut
|
|
|
258 |
* réinitialiser $req["join"] afin d'y ajouter toutes les autres tables.
|
|
|
259 |
*
|
|
|
260 |
* Note: toujours rajouter les préfixes de table (dob,du,doi ou di)
|
|
|
261 |
* le préfix de del_observation est "dob"
|
|
|
262 |
* le préfix de del_utilisateur sur id_utilisateur = dob.ce_utilisateur est "du"
|
|
|
263 |
* le préfix de del_obs_image sur id_observation = dob.id_observation est "doi"
|
1380 |
raphael |
264 |
* le préfix de v_del_image sur id_image = doi.id_image est "di"
|
1375 |
raphael |
265 |
*
|
|
|
266 |
* @param $p les paramètres (notamment de masque) passés par l'URL et déjà traités/filtrés (sauf quotes)
|
|
|
267 |
* @param $req le tableau représentant les composants de la requête à bâtir
|
|
|
268 |
* @param $c conteneur, utilisé soit pour l'appel récursif à requestFilterParams() en cas de param "masque"
|
|
|
269 |
* soit pour la définition du type (qui utilise la variable nb_commentaires_discussion)
|
|
|
270 |
*/
|
|
|
271 |
static function sqlAddConstraint($p, $db, &$req, Conteneur $c = NULL) {
|
|
|
272 |
if(!empty($p['masque.auteur'])) {
|
|
|
273 |
// id du poster de l'obs
|
1384 |
raphael |
274 |
// CAST(x AS CHAR) autrement les hash de cel_obs commençant par un nombre sont convertis
|
|
|
275 |
$req['join'][] = 'LEFT JOIN del_utilisateur AS du'.
|
|
|
276 |
" ON CAST(du.id_utilisateur AS CHAR) = CAST(dob.ce_utilisateur AS CHAR)";
|
1375 |
raphael |
277 |
// id du poster de l'image... NON, c'est le même que le posteur de l'obs
|
|
|
278 |
// Cette jointure de table est ignoré ci-dessous pour les recherches d'auteurs
|
|
|
279 |
// $req['join'][] = 'LEFT JOIN del_utilisateur AS dui ON dui.id_utilisateur = dob.i_ce_utilisateur';
|
|
|
280 |
|
|
|
281 |
if(is_numeric($p['masque.auteur'])) {
|
|
|
282 |
$req['where'][] = sprintf('(du.id_utilisateur = %1$d OR dob.id_utilisateur = %1$d )', $p['masque.auteur']);
|
|
|
283 |
}
|
|
|
284 |
elseif(preg_match(';^.{5,}@[a-z0-9-.]{5,}$;i', $p['masque.auteur'])) {
|
|
|
285 |
$req['where'][] = sprintf('(du.courriel LIKE %1$s OR dob.courriel LIKE %1$s )',
|
|
|
286 |
$db->proteger($p['masque.auteur'] . '%'));
|
|
|
287 |
}
|
|
|
288 |
else {
|
|
|
289 |
self::addAuteursConstraint($p['masque.auteur'], $db, $req['where']);
|
|
|
290 |
}
|
|
|
291 |
}
|
|
|
292 |
|
|
|
293 |
if(!empty($p['masque.date'])) {
|
1379 |
raphael |
294 |
if(is_integer($p['masque.date']) && $p['masque.date'] < 2030 && $p['masque.date'] > 1600) {
|
1375 |
raphael |
295 |
$req['where'][] = sprintf("YEAR(dob.date_observation) = %d", $p['masque.date']);
|
1379 |
raphael |
296 |
}
|
|
|
297 |
else {
|
|
|
298 |
$req['where'][] = sprintf("DATE_FORMAT(dob.date_observation, '%%Y-%%m-%%d') = %s",
|
1375 |
raphael |
299 |
$db->proteger(strftime('%Y-%m-%d', $p['masque.date'])));
|
1379 |
raphael |
300 |
}
|
1375 |
raphael |
301 |
}
|
|
|
302 |
|
|
|
303 |
// TODO: avoir des champs d'entrée distinct
|
|
|
304 |
if(!empty($p['masque.departement'])) {
|
|
|
305 |
$req['where'][] = sprintf("dob.ce_zone_geo = %s", $db->proteger('INSEE-C:'.$p['masque.departement']));
|
|
|
306 |
}
|
|
|
307 |
if(!empty($p['masque.id_zone_geo'])) {
|
|
|
308 |
$req['where'][] = sprintf("dob.ce_zone_geo = %s", $db->proteger($p['masque.id_zone_geo']));
|
|
|
309 |
}
|
|
|
310 |
if(!empty($p['masque.genre'])) {
|
|
|
311 |
$req['where'][] = 'dob.nom_sel LIKE '.$db->proteger('%' . $p['masque.genre'].'% %');
|
|
|
312 |
}
|
|
|
313 |
if(!empty($p['masque.famille'])) {
|
|
|
314 |
$req['where'][] = 'dob.famille = '.$db->proteger($p['masque.famille']);
|
|
|
315 |
}
|
|
|
316 |
if(!empty($p['masque.ns'])) {
|
|
|
317 |
$req['where'][] = 'dob.nom_sel LIKE '.$db->proteger($p['masque.ns'].'%');
|
|
|
318 |
}
|
|
|
319 |
if(!empty($p['masque.nn'])) {
|
1389 |
raphael |
320 |
$req['where'][] = sprintf('dob.nom_sel_nn = %1$d OR dob.nom_ret_nn = %1$d', $p['masque.nn']);
|
1375 |
raphael |
321 |
}
|
|
|
322 |
if(!empty($p['masque.referentiel'])) {
|
|
|
323 |
$req['where'][] = sprintf('dob.nom_referentiel = %s', $db->proteger($p['masque.referentiel']));
|
|
|
324 |
}
|
|
|
325 |
if(!empty($p['masque.commune'])) {
|
|
|
326 |
$req['where'][] = 'dob.zone_geo LIKE '.$db->proteger($p['masque.commune'].'%');
|
|
|
327 |
}
|
|
|
328 |
if(!empty($p['masque.tag'])) {
|
1380 |
raphael |
329 |
// i_mots_cles_texte provient de la VIEW v_del_image
|
1375 |
raphael |
330 |
$req['where'][] = sprintf('CONCAT(%s) REGEXP %s',
|
|
|
331 |
self::sqlAddIfNullPourConcat(array('dob.mots_cles_texte', 'dob.i_mots_cles_texte')),
|
|
|
332 |
$db->proteger($p['masque.tag']));
|
|
|
333 |
}
|
|
|
334 |
|
|
|
335 |
if(!empty($p['masque.type'])) {
|
|
|
336 |
self::addTypeConstraints($p['masque.type'], $db, $req, $c);
|
|
|
337 |
}
|
|
|
338 |
|
|
|
339 |
/* Le masque fait une recherche générique parmi de nombreux champs ci-dessus.
|
|
|
340 |
Nous initialisons donc ces paramètres (excepté masque biensur), et nous rappelons
|
|
|
341 |
récursivement. À la seule différence que nous n'utiliserons que $or_req['where']
|
|
|
342 |
imploded par des " OR ". */
|
|
|
343 |
if(!empty($p['masque'])) {
|
|
|
344 |
$or_params = array('masque.auteur' => $p['masque'],
|
|
|
345 |
'masque.departement' => $p['masque'],
|
|
|
346 |
'masque.id_zone_geo' => $p['masque'],
|
|
|
347 |
'masque.tag' => $p['masque'],
|
|
|
348 |
'masque.ns' => $p['masque'],
|
|
|
349 |
'masque.famille' => $p['masque'],
|
|
|
350 |
'masque.date' => $p['masque'],
|
|
|
351 |
'masque.genre' => $p['masque'],
|
|
|
352 |
/* milieu: TODO */ );
|
1389 |
raphael |
353 |
$or_masque = self::requestFilterParams($or_params, array_keys($or_params), $c);
|
1375 |
raphael |
354 |
// $or_req = array('select' => array(), 'join' => array(), 'where' => array(), 'groupby' => array(), 'having' => array());
|
|
|
355 |
$or_req = array('join' => array(), 'where' => array());
|
|
|
356 |
self::sqlAddConstraint($or_masque, $db, $or_req);
|
|
|
357 |
|
|
|
358 |
if($or_req['where']) {
|
|
|
359 |
$req['where'][] = '(' . implode(' OR ', $or_req['where']) . ')';
|
|
|
360 |
// utile au cas ou des jointures seraient rajoutées
|
|
|
361 |
$req['join'] = array_unique(array_merge($req['join'], $or_req['join']));
|
|
|
362 |
}
|
|
|
363 |
}
|
|
|
364 |
}
|
|
|
365 |
|
|
|
366 |
|
|
|
367 |
private function configurer() {
|
|
|
368 |
$this->mappingFiltre = $this->conteneur->getParametre('mapping_masque');
|
|
|
369 |
$this->mappingObservation = $this->conteneur->getParametre('mapping_observation');
|
|
|
370 |
$this->mappingVotes = $this->conteneur->getParametre('mapping_votes');
|
|
|
371 |
$this->mappingCommentaire = $this->conteneur->getParametre('mapping_commentaire');
|
|
|
372 |
}
|
|
|
373 |
|
|
|
374 |
|
|
|
375 |
|
|
|
376 |
/* Lorsque l'on concatène des champs, un seul NULL prend le dessus,
|
1379 |
raphael |
377 |
Il faut donc utiliser la syntaxe IFNULL(%s, "").
|
1375 |
raphael |
378 |
(Cette fonction effectue aussi l'implode() "final" */
|
|
|
379 |
static function sqlAddIfNullPourConcat($tab) {
|
|
|
380 |
// XXX: PHP-5.3
|
1379 |
raphael |
381 |
return implode(',',array_map(create_function('$a', 'return "IFNULL($a, \"\")";'), $tab));
|
1375 |
raphael |
382 |
}
|
|
|
383 |
|
|
|
384 |
/*
|
|
|
385 |
Retourne une clausse where du style:
|
|
|
386 |
CONCAT(IF(du.prenom IS NULL, "", du.prenom), [...] dob.i_nomutilisateur) REGEXP 'xxx'
|
|
|
387 |
Note; i_(nom|prenom_utilisateur), alias pour cel_images.(nom|prenom), n'est pas traité
|
|
|
388 |
car cette information est redondante dans cel_image et devrait être supprimée.
|
|
|
389 |
*/
|
|
|
390 |
static function addAuteursConstraint($val, $db, &$where) {
|
|
|
391 |
@list($a, $b) = explode(' ', $val, 2);
|
|
|
392 |
// un seul terme
|
|
|
393 |
$champs_n = array('du.prenom', // info user authentifié de l'obs depuis l'annuaire
|
|
|
394 |
'dob.prenom_utilisateur', // info user anonyme de l'obs
|
|
|
395 |
/* 'dob.i_prenom_utilisateur' */ ); // info user anonyme de l'image
|
|
|
396 |
$champs_p = array('du.nom', // idem pour le nom
|
|
|
397 |
'dob.nom_utilisateur',
|
|
|
398 |
/* 'dob.i_nom_utilisateur' */ );
|
|
|
399 |
if(! $b) {
|
|
|
400 |
$where[] = sprintf('CONCAT(%s) REGEXP %s',
|
|
|
401 |
self::sqlAddIfNullPourConcat($champs_n).
|
|
|
402 |
',' .
|
|
|
403 |
self::sqlAddIfNullPourConcat($champs_p),
|
|
|
404 |
$db->proteger($val));
|
|
|
405 |
}
|
|
|
406 |
else {
|
|
|
407 |
$where[] = sprintf('CONCAT(%1$s) REGEXP %2$s AND CONCAT(%1$s) REGEXP %3$s ',
|
|
|
408 |
self::sqlAddIfNullPourConcat($champs_n).
|
|
|
409 |
',' .
|
|
|
410 |
self::sqlAddIfNullPourConcat($champs_p),
|
|
|
411 |
$db->proteger($a), $db->proteger($b));
|
|
|
412 |
}
|
|
|
413 |
}
|
|
|
414 |
|
|
|
415 |
/*
|
|
|
416 |
* @param $req: la représentation de la requête MySQL complète, à amender.
|
|
|
417 |
*/
|
|
|
418 |
static function addTypeConstraints($val, $db, &$req, Conteneur $c) {
|
|
|
419 |
if(array_key_exists('adeterminer', $val)) {
|
|
|
420 |
//On récupère toutes les observations qui on le tag "aDeterminer" *ou* qui n'ont pas de nom d'espèce
|
|
|
421 |
$req['where'][] = '(' . implode(' OR ', array(
|
1388 |
raphael |
422 |
'dob.certitude = "aDeterminer"',
|
1375 |
raphael |
423 |
'dob.mots_cles_texte LIKE "%aDeterminer%"',
|
|
|
424 |
'dob.nom_sel_nn IS NULL', // TODO: ensure pas d'entrée à 0
|
|
|
425 |
)) . ')';
|
|
|
426 |
}
|
|
|
427 |
if(array_key_exists('aconfirmer', $val)) {
|
|
|
428 |
//On récupère toutes les observations qui ne sont pas "aDeterminer" *et* qui ont un nom d'espèce
|
|
|
429 |
$req['where'][] = '(' . implode(' AND ', array(
|
|
|
430 |
'dob.nom_sel IS NOT NULL',
|
|
|
431 |
'dob.certitude != "aDeterminer"',
|
|
|
432 |
'(dob.mots_cles_texte IS NULL OR dob.mots_cles_texte NOT LIKE "%aDeterminer%"',
|
|
|
433 |
)) . ')';
|
|
|
434 |
}
|
|
|
435 |
|
|
|
436 |
// solution n°1: impraticable
|
|
|
437 |
if(false && array_key_exists('endiscussion', $val)) {
|
|
|
438 |
//Si on veut les observations en discussion,
|
|
|
439 |
// on va récupérer les ids des observations dont le nombre de commentaire est supérieur à N
|
|
|
440 |
$req['select'][] = 'COUNT(dc.id_commentaire) AS comm_count';
|
|
|
441 |
$req['join'][] = 'INNER JOIN del_commentaire AS dc ON dob.id_observation = dc.ce_observation';
|
|
|
442 |
$req['groupby'][] = 'dob.id_observation';
|
|
|
443 |
$req['having'][] = "COUNT(id_commentaire) > " . $c->getParametre('nb_commentaires_discussion');
|
|
|
444 |
}
|
|
|
445 |
|
|
|
446 |
if(array_key_exists('endiscussion', $val)) {
|
|
|
447 |
$req['where'][] = '(SELECT COUNT(id_commentaire) FROM del_commentaire AS dc'.
|
|
|
448 |
' WHERE ce_observation = id_observation) > ' . intval($c->getParametre('nb_commentaires_discussion'));
|
|
|
449 |
}
|
|
|
450 |
}
|
|
|
451 |
|
|
|
452 |
|
|
|
453 |
/**
|
|
|
454 |
* Récupérer toutes les déterminations et le nombre de commentaire au total
|
|
|
455 |
* @param array $observations la liste des observations à mettre à jour
|
|
|
456 |
* */
|
|
|
457 |
private function chargerDeterminations(&$observations) {
|
|
|
458 |
$idObs = array_values(array_map(create_function('$a', 'return $a["id_observation"];'),
|
|
|
459 |
$observations));
|
|
|
460 |
$r = sprintf('SELECT * FROM del_commentaire AS dc WHERE dc.nom_sel IS NOT NULL AND ce_observation IN (%s) -- %s',
|
|
|
461 |
implode(',',$idObs),
|
|
|
462 |
__FILE__ . ':' . __LINE__);
|
|
|
463 |
$propositions = $this->bdd->recupererTous($r);
|
|
|
464 |
if(!$propositions) return;
|
|
|
465 |
foreach ($propositions as $proposition) {
|
|
|
466 |
$idObs = $proposition['ce_observation'];
|
1386 |
raphael |
467 |
$idComment = $proposition['id_commentaire'];
|
|
|
468 |
$comment = $this->formaterDetermination($idComment, $proposition);
|
|
|
469 |
if($comment) $observations['"' . $idObs . '"']['commentaires'][$idComment] = $comment;
|
|
|
470 |
|
1375 |
raphael |
471 |
}
|
|
|
472 |
}
|
|
|
473 |
|
1386 |
raphael |
474 |
private function formaterDetermination($commentId, $proposition) {
|
|
|
475 |
if(!$proposition) return NULL;
|
|
|
476 |
|
|
|
477 |
$proposition_formatee = array('nb_commentaires' => '0');
|
|
|
478 |
foreach ($this->mappingCommentaire as $nomOriginal => $nomFinal) {
|
|
|
479 |
if (isset($proposition[$nomOriginal])) {
|
|
|
480 |
$proposition_formatee[$nomFinal] = $proposition[$nomOriginal];
|
|
|
481 |
}
|
|
|
482 |
}
|
|
|
483 |
|
|
|
484 |
// Charger les votes sur les déterminations
|
|
|
485 |
$resultatsVotes = $this->bdd->recupererTous(
|
|
|
486 |
sprintf('SELECT * FROM del_commentaire_vote WHERE ce_proposition = %d', $commentId));
|
|
|
487 |
|
1375 |
raphael |
488 |
foreach ($resultatsVotes as $vote) {
|
1386 |
raphael |
489 |
$proposition_formatee['votes'][$vote['id_vote']] = $this->formaterVote($vote);
|
1375 |
raphael |
490 |
}
|
|
|
491 |
|
1386 |
raphael |
492 |
|
|
|
493 |
// chargerNombreCommentaire()
|
|
|
494 |
// Charger le nombre de commentaires (sans détermination) associé à l'observation
|
|
|
495 |
$listeCommentaires = $this->bdd->recupererTous(sprintf(
|
|
|
496 |
'SELECT ce_commentaire_parent, ce_proposition, COUNT( id_commentaire ) AS nb '.
|
|
|
497 |
'FROM del_commentaire WHERE ce_proposition = %d GROUP BY ce_proposition -- %s',
|
|
|
498 |
$commentId, __FILE__ . ':' . __LINE__));
|
1375 |
raphael |
499 |
foreach ($listeCommentaires as $ligneProposition) {
|
|
|
500 |
// ce test sert à exclure les proposition de 1er niveau qui sont elles aussi des commentaires
|
1386 |
raphael |
501 |
if($ligneProposition['ce_commentaire_parent']) {
|
|
|
502 |
// TODO/debug: id_commentaire_parent != $commentId ??
|
|
|
503 |
// reprendre la "logique" du code... moins de boucles, moins de requêtes, ...
|
|
|
504 |
if($ligneProposition['ce_commentaire_parent'] != $commentId) {
|
|
|
505 |
// restore_error_handler();
|
|
|
506 |
error_log(sprintf("possible error: nb_commentaires = %s: comment = %d, parent = %d, %s",
|
|
|
507 |
$ligneProposition['nb'], $commentId, $ligneProposition['ce_commentaire_parent'], __FILE__));
|
|
|
508 |
}
|
|
|
509 |
$proposition_formatee['nb_commentaires'] = $ligneProposition['nb'];
|
1375 |
raphael |
510 |
} else {
|
1386 |
raphael |
511 |
$proposition_formatee['observation']['nb_commentaires'] = $ligneProposition['nb'];
|
1375 |
raphael |
512 |
}
|
|
|
513 |
}
|
|
|
514 |
|
1386 |
raphael |
515 |
return $proposition_formatee;
|
1375 |
raphael |
516 |
}
|
|
|
517 |
|
|
|
518 |
/**
|
|
|
519 |
* Formater un vote en fonction du fichier de configuration config_votes.ini
|
|
|
520 |
* @param $votes array()
|
|
|
521 |
* */
|
|
|
522 |
private function formaterVote($vote) {
|
|
|
523 |
$retour = array();
|
|
|
524 |
foreach ($vote as $param=>$valeur) {
|
|
|
525 |
$retour[$this->mappingVotes[$param]] = $valeur;
|
|
|
526 |
}
|
|
|
527 |
return $retour;
|
|
|
528 |
}
|
|
|
529 |
|
|
|
530 |
|
|
|
531 |
// supprime l'index du tableau des paramètres si sa valeur ne correspond pas
|
|
|
532 |
// au spectre passé par $values.
|
|
|
533 |
static function unsetIfInvalid(&$var, $index, $values) {
|
|
|
534 |
if(array_key_exists($index, $var)) {
|
|
|
535 |
if(!in_array($var[$index], $values)) unset($var[$index]);
|
|
|
536 |
else return $var[$index];
|
|
|
537 |
}
|
|
|
538 |
return NULL;
|
|
|
539 |
}
|
|
|
540 |
|
|
|
541 |
|
|
|
542 |
/* filtre et valide les paramètres reconnus.
|
|
|
543 |
Effectue *toute* la sanitization *sauf* l'escape-string */
|
1389 |
raphael |
544 |
static function requestFilterParams(Array $params, $parametres_autorises, Conteneur $c = NULL /* pour la récup des départements */ ) {
|
|
|
545 |
$params = array_intersect_key($params, array_flip($parametres_autorises));
|
1375 |
raphael |
546 |
|
|
|
547 |
$p['tri'] = self::unsetIfInvalid($params, 'tri', array('date_observation'));
|
|
|
548 |
$p['ordre'] = self::unsetIfInvalid($params, 'ordre', array('asc','desc'));
|
|
|
549 |
$p['referentiel'] = self::unsetIfInvalid($params, 'referentiel', array('bdtfx','bdtxa','isfan'));
|
|
|
550 |
|
|
|
551 |
// TODO: use filter_input(INPUT_GET);
|
|
|
552 |
// renvoie FALSE ou NULL si absent ou invalide
|
|
|
553 |
$p['navigation.limite'] = filter_var(@$params['navigation.limite'],
|
|
|
554 |
FILTER_VALIDATE_INT,
|
|
|
555 |
array('options' => array('default' => NULL,
|
|
|
556 |
'min_range' => 1,
|
|
|
557 |
'max_range' => _LISTE_OBS_MAX_RESULT_LIMIT)));
|
|
|
558 |
$p['navigation.depart'] = filter_var(@$params['navigation.depart'],
|
|
|
559 |
FILTER_VALIDATE_INT,
|
|
|
560 |
array('options' => array('default' => NULL,
|
|
|
561 |
'min_range' => 0,
|
|
|
562 |
'max_range' => _LISTE_OBS_MAX_ID_OBS)));
|
|
|
563 |
if(isset($params['masque.departement'])) {
|
|
|
564 |
// STRING: 0 -> 95, 971 -> 976, 2A + 2B (./services/configurations/config_departements_bruts.ini)
|
|
|
565 |
// accept leading 0 ?
|
|
|
566 |
// TODO; filter patterns like 555.
|
|
|
567 |
if(preg_match(';^(\d{2}|\d{3}|2a|2b)$;i', $params['masque.departement'])) {
|
|
|
568 |
$p['masque.departement'] = $params['masque.departement'];
|
|
|
569 |
}
|
|
|
570 |
// cf configurations/config_departements_bruts.ini
|
|
|
571 |
elseif( !is_null($c) && ( $x = $c->getParametre(
|
|
|
572 |
strtolower(str_replace(' ','-',iconv("UTF-8", "ASCII//TRANSLIT", $params['masque.departement'])))
|
|
|
573 |
))) {
|
|
|
574 |
$p['masque.departement'] = sprintf("INSEE-C:%02d___", $x);
|
|
|
575 |
}
|
|
|
576 |
}
|
|
|
577 |
|
|
|
578 |
if(isset($params['masque.date'])) {
|
|
|
579 |
// une année, TODO: masque.annee
|
|
|
580 |
if(is_numeric($params['masque.date'])) {
|
1379 |
raphael |
581 |
$p['masque.date'] = $params['masque.date'];
|
1375 |
raphael |
582 |
}
|
|
|
583 |
elseif(strpos($params['masque.date'], '/' !== false) &&
|
|
|
584 |
($x = strtotime(str_replace('/','-',$params['masque.date'])))) {
|
|
|
585 |
$p['masque.date'] = $x;
|
|
|
586 |
}
|
|
|
587 |
elseif(strpos($params['masque.date'], '-' !== false) &&
|
|
|
588 |
($x = strtotime($params['masque.date'])) ) {
|
|
|
589 |
$p['masque.date'] = $x;
|
|
|
590 |
}
|
|
|
591 |
}
|
|
|
592 |
|
|
|
593 |
$p['masque.nn'] = filter_var(@$params['masque.nn'],
|
|
|
594 |
FILTER_VALIDATE_INT,
|
|
|
595 |
array('options' => array('default' => NULL,
|
|
|
596 |
'min_range' => 0,
|
|
|
597 |
'max_range' => _LISTE_OBS_MAX_BDTFX_NN)));
|
|
|
598 |
|
|
|
599 |
$p['masque.nt'] = filter_var(@$params['masque.nt'],
|
|
|
600 |
FILTER_VALIDATE_INT,
|
|
|
601 |
array('options' => array('default' => NULL,
|
|
|
602 |
'min_range' => 0,
|
|
|
603 |
'max_range' => _LISTE_OBS_MAX_BDTFX_NT)));
|
|
|
604 |
|
|
|
605 |
|
|
|
606 |
// TODO: should we really trim() ?
|
|
|
607 |
|
|
|
608 |
if(isset($params['masque.ns'])) $p['masque.ns'] = trim($params['masque.ns']);
|
|
|
609 |
// if(isset($params['masque.texte'])) $p['masque.texte'] = trim($params['masque.texte']);
|
|
|
610 |
|
|
|
611 |
if(isset($params['masque.famille'])) {
|
|
|
612 |
// mysql -N<<<"SELECT DISTINCT famille FROM bdtfx_v1_02;"|sed -r "s/(.)/\1\n/g"|sort -u|tr -d "\n"
|
|
|
613 |
$p['masque.famille'] = preg_replace('/[^a-zA-Z %_]/', '', iconv("UTF-8",
|
|
|
614 |
"ASCII//TRANSLIT",
|
|
|
615 |
$params['masque.famille']));
|
|
|
616 |
}
|
|
|
617 |
|
|
|
618 |
// masque.genre est un alias pour masque.ns (nom_sel), mais permet de rajouter une clause supplémentaire
|
|
|
619 |
// sur nom_sel. Précédemment: WHERE nom_sel LIKE '%<masque.genre>% %'.
|
|
|
620 |
// Désormais masque.genre doit être intégralement spécifié, les caractères '%' et '_' seront interprétés.
|
|
|
621 |
// Attention toutefois car la table del_observation intègre des nom_sel contenant '_'
|
|
|
622 |
if(isset($params['masque.genre'])) $p['masque.genre'] = trim($params['masque.genre']);
|
|
|
623 |
if(isset($params['masque.ns'])) $p['masque.ns'] = trim($params['masque.ns']);
|
|
|
624 |
// masque.espece n'était pas déclaré dans la "where" mais utilisé via config + switch//default
|
|
|
625 |
if(isset($params['masque.espece'])) $p['masque.espece'] = trim($params['masque.espece']);
|
|
|
626 |
|
|
|
627 |
// idem pour id_zone_geo qui mappait à ce_zone_geo:
|
|
|
628 |
if(isset($params['masque.id_zone_geo']) && preg_match(';^(INSEE-C:\d{5}|\d{2})$;', $params['masque.id_zone_geo'])) {
|
|
|
629 |
$p['masque.id_zone_geo'] = $params['masque.id_zone_geo'];
|
|
|
630 |
}
|
|
|
631 |
|
|
|
632 |
// masque.commune (zone_geo)
|
|
|
633 |
// TODO: que faire avec des '%' en INPUT ?
|
|
|
634 |
// Le masque doit *permettre* une regexp et non l'imposer. Charge au client de faire son travail
|
|
|
635 |
if(isset($params['masque.commune'])) $p['masque.commune'] = str_replace(array('-',' '), '_', $params['masque.commune']);
|
|
|
636 |
|
|
|
637 |
// masque.auteur: peut-être un id, un courriel, ou un nom ou prénom, ...
|
|
|
638 |
if(isset($params['masque.auteur'])) $p['masque.auteur'] = trim($params['masque.auteur']);
|
|
|
639 |
// sera trimmé plus tard, cf sqlAddConstraint
|
|
|
640 |
if(isset($params['masque'])) $p['masque'] = trim($params['masque']);
|
|
|
641 |
|
|
|
642 |
// masque.tag, idem que pour masque.genre et masque.commune
|
|
|
643 |
if(isset($params['masque.tag'])) {
|
|
|
644 |
$x = explode(',',$params['masque.tag']);
|
|
|
645 |
$x = array_map('trim', $x);
|
|
|
646 |
$p['masque.tag'] = implode('|', array_filter($x));
|
|
|
647 |
}
|
|
|
648 |
|
|
|
649 |
// masque.type: ['adeterminer', 'aconfirmer', 'endiscussion']
|
|
|
650 |
if(isset($params['masque.type'])) {
|
|
|
651 |
$p['masque.type'] = array_flip(array_intersect(array_filter(explode(';', $params['masque.type'])),
|
|
|
652 |
array('adeterminer', 'aconfirmer', 'endiscussion')));
|
|
|
653 |
}
|
|
|
654 |
|
|
|
655 |
|
|
|
656 |
// TODO: masque (général)
|
|
|
657 |
|
|
|
658 |
|
|
|
659 |
// on filtre les NULL, FALSE et '', mais pas les 0, d'où le callback()
|
|
|
660 |
// TODO: PHP-5.3
|
|
|
661 |
$p = array_filter($p, create_function('$a','return !in_array($a, array("",false,null),true);'));
|
|
|
662 |
$p = array_merge(self::$default_params, $p);
|
|
|
663 |
|
|
|
664 |
return $p;
|
|
|
665 |
}
|
|
|
666 |
|
1389 |
raphael |
667 |
static function makeJSONHeader($total, $params, $url_service) {
|
|
|
668 |
$prev_url = $next_url = NULL;
|
|
|
669 |
|
|
|
670 |
$next_offset = $params['navigation.depart'] + $params['navigation.limite'];
|
|
|
671 |
if($next_offset < $total) {
|
|
|
672 |
$next_url = sprintf("http://%s?%s", isset($_SERVER['HTTP_HOST']) ? $_SERVER['HTTP_HOST'] : $url_service,
|
|
|
673 |
http_build_query(array_merge($params, array('navigation.depart' => $next_offset))));
|
|
|
674 |
}
|
|
|
675 |
|
|
|
676 |
$prev_offset = $params['navigation.depart'] - $params['navigation.limite'];
|
|
|
677 |
if($prev_offset > 0) {
|
|
|
678 |
$prev_url = sprintf("http://%s?%s", isset($_SERVER['HTTP_HOST']) ? $_SERVER['HTTP_HOST'] : $url_service,
|
|
|
679 |
http_build_query(array_merge($params, array('navigation.depart' => $prev_offset))));
|
|
|
680 |
}
|
|
|
681 |
|
|
|
682 |
return array(
|
|
|
683 |
'masque' => http_build_query(array_diff_key($params, array_flip(array('navigation.depart', 'navigation.limite', 'tri', 'ordre')))),
|
|
|
684 |
'total' => $total,
|
|
|
685 |
'depart' => $params['navigation.depart'],
|
|
|
686 |
'limite' => $params['navigation.limite'],
|
|
|
687 |
'href.precedent' => $prev_url,
|
|
|
688 |
'href.suivant' => $next_url
|
|
|
689 |
);
|
|
|
690 |
}
|
1375 |
raphael |
691 |
}
|