Subversion Repositories eFlore/Applications.cel

Rev

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

Rev Author Line No. Line
694 jpm 1
<?php
2
/**
696 jpm 3
 * Service fournissant des statistiques de l'application CEL au format texte (JSON).
694 jpm 4
 * Encodage en entrée : utf8
5
 * Encodage en sortie : utf8
6
 *
7
 * Cas d'utilisation :
696 jpm 8
 * /CelStatistiqueTxt/TypeDeStat : retourne les statistiques demandées
694 jpm 9
 * Paramêtres :
696 jpm 10
 * utilisateur=courriel : retourne les statistiques d'un utilisateur donné.
694 jpm 11
 *
696 jpm 12
 * @author		Jean-Pascal MILCENT <jpm@tela-botanica.org>
13
 * @license		GPL v3 <http://www.gnu.org/licenses/gpl.txt>
14
 * @license		CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>
15
 * @version		$Id$
16
 * @copyright	Copyright (c) 2011, Tela Botanica (accueil@tela-botanica.org)
694 jpm 17
 */
18
class CelStatistiqueTxt extends Cel {
2143 jpm 19
 
694 jpm 20
	/**
21
	 * Méthode appelée avec une requête de type GET.
22
	 */
696 jpm 23
	public function getElement($ressources) {
694 jpm 24
		$graph = null;
25
		$serveur = '';
26
 
696 jpm 27
		if (isset($ressources[0])) {
28
			$this->analyserParametresUrl();
29
			$stat_demande = array_shift($ressources);
694 jpm 30
			$methode = 'get'.$stat_demande;
31
			if (method_exists($this, $methode)) {
702 jpm 32
				$this->ressources = $ressources;
696 jpm 33
				$stats = $this->$methode($ressources);
694 jpm 34
			} else {
35
				$this->messages[] = "Ce type de statistiques '$stat_demande' n'est pas disponible.";
36
			}
37
		} else {
696 jpm 38
			$this->messages[] = "La ressource du service CEL StatistiqueTxt doit indiquer le type de statistique. Ex. : .../CelStatistiqueTxt/Nombres";
694 jpm 39
		}
40
 
41
		if (!is_null($stats)) {
42
			$this->envoyerJson($stats);
43
		}
44
	}
2143 jpm 45
 
696 jpm 46
	private function analyserParametresUrl() {
1765 raphael 47
		$this->parametres['utilisateur'] = isset($_GET['utilisateur']) ? Cel::db()->quote($this->verifierSecuriteParametreUrl($_GET['utilisateur'])) : null;
48
		$this->parametres['num_taxon'] = isset($_GET['num_taxon']) ? Cel::db()->quote($this->verifierSecuriteParametreUrl($_GET['num_taxon'])) : null;
49
		$this->parametres['taxon'] = isset($_GET['taxon']) ? Cel::db()->quote($this->verifierSecuriteParametreUrl($_GET['taxon'].'%')) : null;
707 jpm 50
		$this->parametres['tag'] = isset($_GET['tag']) ? $this->verifierSecuriteParametreUrl($_GET['tag']) : null;
702 jpm 51
		$this->parametres['start'] = isset($_GET['start']) ? $this->verifierSecuriteParametreUrl($_GET['start']) : null;
52
		$this->parametres['limit'] = isset($_GET['limit']) ? $this->verifierSecuriteParametreUrl($_GET['limit']) : null;
696 jpm 53
	}
2143 jpm 54
 
702 jpm 55
	private function getListeUtilisateursNbrePhotos() {
707 jpm 56
		$liste = array();
2143 jpm 57
 
702 jpm 58
		$requete = $this->construireRequeteListeUtilisateurNbrePhoto();
707 jpm 59
		if ($requete != null) {
2143 jpm 60
			$resultats = Cel::db()->requeter($requete);
707 jpm 61
			if ($resultats != false) {
62
				foreach ($resultats as $resultat) {
1359 aurelien 63
					$liste[$resultat['courriel_utilisateur']] = $resultat['nbre'];
707 jpm 64
				}
702 jpm 65
			}
66
		}
67
		return $liste;
68
	}
2143 jpm 69
 
702 jpm 70
	private function construireRequeteListeUtilisateurNbrePhoto() {
1359 aurelien 71
		$select = 	'SELECT co.courriel_utilisateur, COUNT(DISTINCT ci.id_image) AS nbre ';
2357 mathias 72
		$from = 	'FROM cel_obs AS co '.
2446 jpm 73
			'	LEFT JOIN cel_images AS ci ON (co.id_observation = ci.ce_observation) ';
74
		$where = 	'WHERE co.transmission = 1 ';
1359 aurelien 75
		$groupBy = 	'GROUP BY co.courriel_utilisateur ';
702 jpm 76
		$orderBy = 	'ORDER BY nbre DESC ';
77
		$limitSql =	'LIMIT 0,150 ';
2143 jpm 78
 
707 jpm 79
		$zero_images = false;
702 jpm 80
		if (count($this->parametres) != 0) {
81
			extract($this->parametres);
2143 jpm 82
 
702 jpm 83
			$filtres = array();
2143 jpm 84
 
702 jpm 85
			if (isset($utilisateur)) {
1359 aurelien 86
				$filtres[] = "co.courriel_utilisateur = $utilisateur ";
702 jpm 87
			}
88
			if (isset($num_taxon)) {
1359 aurelien 89
				$filtres[] = "nt = $num_taxon ";
702 jpm 90
			}
91
			if (isset($taxon)) {
92
				$filtres[] = "nom_ret LIKE $taxon ";
93
			}
707 jpm 94
			if (isset($tag)) {
2357 mathias 95
				$tagP = Cel::db()->quote("%$tag%");
96
				$filtres[] = "ci.mots_cles_texte LIKE $tagP ";
707 jpm 97
			}
702 jpm 98
			$where .= ((count($filtres) > 0) ? 'AND '.implode(' AND ', $filtres) : '');
2143 jpm 99
 
702 jpm 100
			if (isset($start)) {
101
				$limitSql = str_replace('0,', "$start,", $limitSql);
102
			}
103
			if (isset($limit)) {
104
				$limitSql = str_replace('150', $limit, $limitSql);
105
			}
106
		}
2357 mathias 107
		$requete = $select.$from.$where.$groupBy.$orderBy.$limitSql;
702 jpm 108
		return $requete;
109
	}
2143 jpm 110
 
702 jpm 111
	private function getListeTaxonsNbrePhotos() {
112
		$requete = $this->construireRequeteListeTaxonNbrePhoto();
1359 aurelien 113
 
2143 jpm 114
		$resultats = Cel::db()->requeter($requete);
702 jpm 115
		$liste = array();
116
		if ($resultats != false) {
117
			foreach ($resultats as $resultat) {
118
				$liste[$resultat['nom_ret']] = $resultat['nbre'];
119
			}
120
		}
121
		return $liste;
122
	}
2143 jpm 123
 
702 jpm 124
	private function construireRequeteListeTaxonNbrePhoto() {
1359 aurelien 125
		$select = 	'SELECT nom_ret, COUNT(DISTINCT ci.id_image) AS nbre ';
126
		$from = 	'FROM cel_obs co '.
2446 jpm 127
			'	LEFT JOIN cel_images ci ON (co.id_observation = ci.ce_observation) ';
128
		$where = 	'WHERE co.transmission = 1 '.
129
			"	AND nom_ret != '' ";
702 jpm 130
		$groupBy = 	'GROUP BY nom_ret ';
131
		$orderBy = 	'ORDER BY nbre DESC ';
132
		$limitSql =	'LIMIT 0,150 ';
2143 jpm 133
 
134
 
702 jpm 135
		if (count($this->parametres) != 0) {
136
			extract($this->parametres);
2143 jpm 137
 
702 jpm 138
			$filtres = array();
2143 jpm 139
 
702 jpm 140
			if (isset($utilisateur)) {
1359 aurelien 141
				$filtres[] = "co.courriel_utilisateur = $utilisateur ";
702 jpm 142
			}
143
			if (isset($num_taxon)) {
1359 aurelien 144
				$filtres[] = "nt = $num_taxon ";
702 jpm 145
			}
146
			if (isset($taxon)) {
147
				$filtres[] = "nom_ret LIKE $taxon ";
148
			}
149
			$where .= ((count($filtres) > 0) ? 'AND '.implode(' AND ', $filtres) : '');
2143 jpm 150
 
702 jpm 151
			if (isset($start)) {
152
				$limitSql = str_replace('0,', "$start,", $limitSql);
153
			}
154
			if (isset($limit)) {
155
				$limitSql = str_replace('150', $limit, $limitSql);
156
			}
157
		}
2143 jpm 158
 
702 jpm 159
		$requete = $select.$from.$where.$groupBy.$orderBy.$limitSql;
1359 aurelien 160
 
702 jpm 161
		return $requete;
162
	}
2143 jpm 163
 
702 jpm 164
	private function getNombres() {
696 jpm 165
 
2143 jpm 166
		$requete = $this->construireRequeteNbreObs();
167
		$info['observations'] = (int) Cel::db()->requeterValeurUnique($requete);
168
 
169
		$requete = $this->construireRequeteNbreObsPubliques();
170
		$info['observationsPubliques'] = (int) Cel::db()->requeterValeurUnique($requete);
171
 
696 jpm 172
		$requete = $this->construireRequeteNbreImg();
2143 jpm 173
		$info['images'] =(int) Cel::db()->requeterValeurUnique($requete);
174
 
696 jpm 175
		$requete = $this->construireRequeteNbreImgLiees();
2143 jpm 176
		$info['imagesLiees'] =(int) Cel::db()->requeterValeurUnique($requete);
177
 
696 jpm 178
		$requete = $this->construireRequeteNbreObsLiees();
2143 jpm 179
		$info['observationsLiees'] = (int) Cel::db()->requeterValeurUnique($requete);
180
 
697 jpm 181
		$info['moyImagesParObs'] = ($info['observationsLiees'] > 0 ? round($info['imagesLiees']/$info['observationsLiees'], 2) : '');
2143 jpm 182
 
696 jpm 183
		$requete = $this->construireRequeteNbreObsParCommune();
2143 jpm 184
		$info['communes'] = ($resultats = Cel::db()->requeter($requete)) ? count($resultats) : '' ;
697 jpm 185
		$info['observationsParCommunesMin'] = 1000;
186
		$info['observationsParCommunesMax'] = 0;
187
		$info['observationsParCommunesTotal'] = 0;
188
		foreach ($resultats as $resultat) {
189
			if ($resultat['nbre'] < $info['observationsParCommunesMin']) {
190
				$info['observationsParCommunesMin'] = $resultat['nbre'];
191
			}
192
			if ($resultat['nbre'] > $info['observationsParCommunesMax']) {
193
				$info['observationsParCommunesMax'] = $resultat['nbre'];
194
			}
195
			$info['observationsParCommunesTotal'] += $resultat['nbre'];
196
		}
702 jpm 197
		$info['observationsParCommunesMoyenne'] = ($info['communes'] > 0 ) ? round($info['observationsParCommunesTotal'] / $info['communes'], 2) : 0;
2143 jpm 198
 
199
		return $info;
696 jpm 200
	}
2143 jpm 201
 
2317 mathias 202
	private function getNbObsPubliques() {
203
		$requete = $this->construireRequeteNbreObsPubliques();
204
		$info = (int) Cel::db()->requeterValeurUnique($requete);
205
		return $info;
206
	}
207
 
208
	private function getNbImagesPubliques() {
209
		$requete = $this->construireRequeteNbreImgLiees();
210
		$info =(int) Cel::db()->requeterValeurUnique($requete);
211
		return $info;
212
	}
213
 
696 jpm 214
	private function construireRequeteNbreObs() {
1359 aurelien 215
		$requete = 	'SELECT COUNT(id_observation) AS nbre '.
216
					'FROM cel_obs ';
696 jpm 217
 
218
		if (count($this->parametres) != 0) {
219
			$filtres = array();
220
			extract($this->parametres);
2143 jpm 221
 
696 jpm 222
			if (isset($utilisateur)) {
1359 aurelien 223
				$filtres[] = "courriel_utilisateur = $utilisateur ";
696 jpm 224
			}
225
			if (isset($num_taxon)) {
226
				$filtres[] = "num_taxon = $num_taxon ";
227
			}
702 jpm 228
			if (isset($taxon)) {
229
				$filtres[] = "nom_ret LIKE $taxon ";
230
			}
2143 jpm 231
 
696 jpm 232
			$requete .= ((count($filtres) > 0) ? 'WHERE '.implode(' AND ', $filtres) : '');
233
		}
1359 aurelien 234
 
696 jpm 235
		return $requete;
236
	}
2143 jpm 237
 
696 jpm 238
	private function construireRequeteNbreObsPubliques() {
1359 aurelien 239
		$requete = 	'SELECT COUNT(id_observation) AS nbre '.
240
					'FROM cel_obs '.
696 jpm 241
					"WHERE transmission = 1 ";
242
 
243
		if (count($this->parametres) != 0) {
244
			$filtres = array();
245
			extract($this->parametres);
2143 jpm 246
 
696 jpm 247
			if (isset($utilisateur)) {
1359 aurelien 248
				$filtres[] = "courriel_utilisateur = $utilisateur ";
696 jpm 249
			}
250
			if (isset($num_taxon)) {
251
				$filtres[] = "num_taxon = $num_taxon ";
252
			}
702 jpm 253
			if (isset($taxon)) {
254
				$filtres[] = "nom_ret LIKE $taxon ";
255
			}
2143 jpm 256
 
696 jpm 257
			$requete .= ((count($filtres) > 0) ? 'AND '.implode(' AND ', $filtres) : '');
258
		}
2143 jpm 259
 
696 jpm 260
		return $requete;
261
	}
2143 jpm 262
 
696 jpm 263
	private function construireRequeteNbreObsParCommune() {
1359 aurelien 264
		$requete = 	'SELECT COUNT(id_observation) AS nbre '.
265
					'FROM cel_obs '.
266
					"WHERE zone_geo IS NOT NULL ".
267
					"	AND ce_zone_geo IS NOT NULL ";
268
		$groupBy = 'GROUP BY zone_geo, ce_zone_geo';
696 jpm 269
 
270
		if (count($this->parametres) != 0) {
271
			$filtres = array();
272
			extract($this->parametres);
2143 jpm 273
 
696 jpm 274
			if (isset($utilisateur)) {
1359 aurelien 275
				$filtres[] = "courriel_utilisateur = $utilisateur ";
696 jpm 276
			}
277
			if (isset($num_taxon)) {
1359 aurelien 278
				$filtres[] = "nt = $num_taxon ";
696 jpm 279
			}
702 jpm 280
			if (isset($taxon)) {
281
				$filtres[] = "nom_ret LIKE $taxon ";
282
			}
2143 jpm 283
 
696 jpm 284
			$requete .= ((count($filtres) > 0) ? 'AND '.implode(' AND ', $filtres) : '');
285
		}
286
		$requete .= $groupBy;
2143 jpm 287
 
696 jpm 288
		return $requete;
289
	}
2143 jpm 290
 
696 jpm 291
	private function construireRequeteNbreImg() {
1359 aurelien 292
		$select = 	'SELECT COUNT(DISTINCT ci.id_image) AS nbre ';
293
		$from = 'FROM cel_images ci ';
2143 jpm 294
 
696 jpm 295
		if (count($this->parametres) != 0) {
296
			$filtres = array();
2143 jpm 297
 
696 jpm 298
			extract($this->parametres);
2143 jpm 299
 
696 jpm 300
			if (isset($utilisateur)) {
1359 aurelien 301
				$filtres[] = "courriel_utilisateur = $utilisateur ";
696 jpm 302
			}
303
			if (isset($num_taxon)) {
2143 jpm 304
 
1359 aurelien 305
				$filtres[] = "nt = $num_taxon ";
696 jpm 306
			}
702 jpm 307
			if (isset($taxon)) {
308
				$filtres[] = "nom_ret LIKE $taxon ";
309
			}
310
			if (isset($num_taxon) || isset($taxon)) {
2446 jpm 311
				$from .= 'LEFT JOIN cel_obs co ON (ci.ce_observation = co.id_observation) ';
702 jpm 312
			}
2143 jpm 313
 
696 jpm 314
			$where = ((count($filtres) > 0) ? 'WHERE '.implode(' AND ', $filtres) : '');
315
		}
316
		$requete = $select.$from.$where;
1359 aurelien 317
 
696 jpm 318
		return $requete;
694 jpm 319
	}
2143 jpm 320
 
696 jpm 321
	private function construireRequeteNbreImgLiees() {
1359 aurelien 322
		$select = 'SELECT COUNT(DISTINCT ci.id_image) AS nbre ';
2446 jpm 323
		$from = 'FROM cel_images ci ';
2143 jpm 324
 
696 jpm 325
		if (count($this->parametres) != 0) {
326
			$filtres = array();
2143 jpm 327
 
696 jpm 328
			extract($this->parametres);
2143 jpm 329
 
696 jpm 330
			if (isset($utilisateur)) {
1359 aurelien 331
				$filtres[] = "ci.courriel_utilisateur = $utilisateur ";
696 jpm 332
			}
333
			if (isset($num_taxon)) {
1359 aurelien 334
				$filtres[] = "nt = $num_taxon ";
696 jpm 335
			}
702 jpm 336
			if (isset($taxon)) {
337
				$filtres[] = "nom_ret LIKE $taxon ";
338
			}
2143 jpm 339
 
702 jpm 340
			if (isset($num_taxon) || isset($taxon)) {
2446 jpm 341
				$from .= 'LEFT JOIN cel_obs ON (ci.ce_observation = co.id_observation) ';
702 jpm 342
			}
2143 jpm 343
 
696 jpm 344
			$where = ((count($filtres) > 0) ? 'WHERE '.implode(' AND ', $filtres) : '');
345
		}
2143 jpm 346
 
696 jpm 347
		$requete = $select.$from.$where;
348
		return $requete;
349
	}
2143 jpm 350
 
696 jpm 351
	private function construireRequeteNbreObsLiees() {
2446 jpm 352
		$select = 'SELECT COUNT(DISTINCT id_observation) AS nbre ';
353
		$from = 'FROM cel_images ci '.
354
				'	LEFT JOIN cel_obs co ON (ci.ce_observation = co.id_observation) ';
2143 jpm 355
 
696 jpm 356
		if (count($this->parametres) != 0) {
357
			$filtres = array();
2143 jpm 358
 
696 jpm 359
			extract($this->parametres);
2143 jpm 360
 
696 jpm 361
			if (isset($utilisateur)) {
1359 aurelien 362
				$filtres[] = "courriel_utilisateur = $utilisateur ";
696 jpm 363
			}
364
			if (isset($num_taxon)) {
1359 aurelien 365
				$filtres[] = "nt = $num_taxon ";
696 jpm 366
			}
702 jpm 367
			if (isset($taxon)) {
368
				$filtres[] = "nom_ret LIKE $taxon ";
369
			}
2143 jpm 370
 
696 jpm 371
			$where = ((count($filtres) > 0) ? 'WHERE '.implode(' AND ', $filtres) : '');
372
		}
2143 jpm 373
 
696 jpm 374
		$requete = $select.$from.$where;
2143 jpm 375
 
696 jpm 376
		return $requete;
377
	}
2175 mathias 378
 
379
 
380
	/**
381
	 * Retourne les n principaux contributeurs depuis x jours,
382
	 * en termes d'observations ajoutées, d'images ajoutées, ou les deux
383
	 * Paramètres : "jours" (int), "nombre" (int), "critere" ("obs" ou "img" ou "")
384
	 * @return array
385
	 */
386
	private function getGrandsContributeurs() {
387
		$nombre = 10; // les $nombre plus importants contributeurs
388
		$jours = 7; // depuis $jours jours
389
		$critere = null; // "obs", "img" ou null (les deux)
390
 
391
		if (isset($this->parametres['nombre'])) {
392
			$nombre = $this->parametres['nombre'];
393
		}
394
		if (isset($this->parametres['jours'])) {
395
			$jours = $this->parametres['jours'];
396
		}
397
		if (isset($this->parametres['critere'])) {
398
			$critere = $this->parametres['critere'];
399
		}
400
 
401
		$requete = $this->construireRequeteGrandsContributeurs($nombre, $jours, $critere);
402
		$resultats = Cel::db()->requeter($requete);
403
 
2181 mathias 404
		$courriels = array();
405
		foreach ($resultats as $res) {
406
			$courriels[] = $res['courriel_utilisateur'];
407
		}
408
		$identites = $this->recupererUtilisateursIdentite($courriels);
409
		foreach ($resultats as &$res) {
410
			$res['intitule_utilisateur'] = $identites[$res['courriel_utilisateur']]['intitule'];
411
			unset($res['courriel_utilisateur']);
412
			unset($res['nom_utilisateur']);
413
			unset($res['prenom_utilisateur']);
414
		}
415
 
2177 mathias 416
		$retour = array(
417
			'entete' => array(
2180 mathias 418
				'nombre' => intval($nombre),
419
				'jours' => intval($jours),
2177 mathias 420
				'critere' => $critere
421
			),
422
			'resultats' => array()
423
		);
2175 mathias 424
		$liste = array();
425
		if ($resultats != false) {
426
			foreach ($resultats as $resultat) {
2180 mathias 427
				// essayons de faire du JSON propre
2182 mathias 428
				if (isset($resultat['nombreImg'])) {
429
					$resultat['nombreImg'] = intval($resultat['nombreImg']);
430
				}
431
				if (isset($resultat['nombreObs'])) {
432
					$resultat['nombreObs'] = intval($resultat['nombreObs']);
433
				}
434
				if (isset($resultat['somme'])) {
435
					$resultat['somme'] = intval($resultat['somme']);
436
				}
2176 mathias 437
				$liste[] = $resultat; // pas de clefs afin de renvoyer une "liste" JSON, qui sera interprétée en conservant l'ordre
2175 mathias 438
			}
2177 mathias 439
			$retour['resultats'] = $liste;
2175 mathias 440
		}
2177 mathias 441
		return $retour;
2175 mathias 442
	}
443
 
444
	private function construireRequeteGrandsContributeurs($nombre = 10, $jours = 7, $critere = null) {
2449 jpm 445
		$requete = '';
2175 mathias 446
		switch ($critere) {
2449 jpm 447
			case 'obs':
448
				$requete = "SELECT ce_utilisateur , prenom_utilisateur , nom_utilisateur , courriel_utilisateur , ".
449
					"	COUNT(*) AS nombreObs ".
450
					"FROM cel_obs ".
451
					"WHERE transmission = 1 ".
452
					"AND TO_DAYS(NOW()) - TO_DAYS(date_transmission) <= $jours ".
453
					"GROUP BY ce_utilisateur ".
454
					"ORDER BY nombreObs DESC ".
455
					"LIMIT $nombre ";
2175 mathias 456
				break;
2449 jpm 457
			case 'img':
458
				$requete = "SELECT co.ce_utilisateur , co.prenom_utilisateur , co.nom_utilisateur , ".
459
					"	co.courriel_utilisateur , COUNT(DISTINCT ci.id_image) AS nombreImg ".
2446 jpm 460
					"FROM cel_images ci ".
2449 jpm 461
					"	RIGHT JOIN cel_obs co ON ci.ce_observation = co.id_observation ".
2446 jpm 462
					"WHERE co.transmission = 1 ".
463
					"AND TO_DAYS(NOW()) - TO_DAYS(co.date_transmission) <= $jours ".
2449 jpm 464
					"GROUP BY co.ce_utilisateur ".
465
					"ORDER BY nombreImg DESC ".
466
					"LIMIT $nombre ";
2175 mathias 467
				break;
468
			default:
2449 jpm 469
				$requete = "SELECT co.ce_utilisateur, co.prenom_utilisateur, co.nom_utilisateur, co.courriel_utilisateur, ".
2446 jpm 470
					"COUNT(DISTINCT ci.id_image) AS nombreImg, COUNT(DISTINCT co.id_observation) AS nombreObs, ".
471
					"COUNT(DISTINCT ci.id_image) + COUNT(DISTINCT co.id_observation) AS somme ".
472
					"FROM cel_images ci ".
2449 jpm 473
					"	RIGHT JOIN cel_obs co ON ci.ce_observation = co.id_observation ".
2446 jpm 474
					"WHERE co.transmission = 1 ".
475
					"AND TO_DAYS(NOW()) - TO_DAYS(co.date_transmission) <= $jours ".
476
					"GROUP BY co.ce_utilisateur ".
2449 jpm 477
					"ORDER BY somme DESC ".
478
					"LIMIT $nombre ";
2175 mathias 479
		}
2449 jpm 480
		return $requete;
2175 mathias 481
	}
2449 jpm 482
}