Subversion Repositories eFlore/Applications.del

Rev

Rev 1625 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
1617 mathias 1
<?php
2
/**
3
* Description :
4
* Statistiques par année sur l'utilisation de Identiplante / Pictoflora
5
*
1630 mathias 6
* Documentation: http://www.tela-botanica.org/wikini/DevInformatiques/wakka.php?wiki=AppliDelStats
7
*
1617 mathias 8
* @author Mathias
9
* @license GPL v3 <http://www.gnu.org/licenses/gpl.txt>
10
* @license CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>
11
*/
12
class Statistiques extends RestService {
13
 
14
	protected $bdd;
15
 
16
	public function __construct() {
17
		$this->bdd = $this->getBdd();
18
	}
19
 
20
	// GET
21
	public function consulter($ressources, $parametres) {
22
		$resultat = '';
23
		$reponseHttp = new ReponseHttp();
24
 
25
		// méthode à appeler
26
		$methode = "tout";
27
		if (isset($ressources[0])) {
28
			$methode = $ressources[0];
29
		}
30
		// année à considérer
31
		$annee = date('Y');
32
		if (isset($parametres['annee'])) {
33
			$annee = $parametres['annee'];
34
		}
35
		//echo "Année: $annee\nMéthode: $methode\n";
36
 
37
		// appel
38
		if (method_exists($this, $methode)) {
39
			try {
40
				$retour = call_user_func(array($this, $methode), $annee);
41
				$reponseHttp->setResultatService($retour);
42
			} catch (ServiceFoiraxException $e) {
43
				// @TODO renvoyer 500
44
				$reponseHttp->ajouterErreur($e);
45
			}
46
		} else {
47
			// @TODO renvoyer 500
48
			$reponseHttp->ajouterErreur(new Exception("Erreur: la méthode \"$methode\" n'existe pas<br/>" . $this->utilisation()));
49
		}
50
 
51
		// merci au revoir
52
		$reponseHttp->emettreLesEntetes();
53
		$corps = $reponseHttp->getCorps();
54
 
55
		return $corps;
56
	}
57
 
58
	// Renvoie la liste des méthodes disponibles
59
	private function utilisation() {
60
		return "<br/>Méthodes disponibles:<ul>".
61
			"<li>tout</li>".
62
			"<li>moyenneObsSansNomParMois</li>".
63
			"<li>moyenneObsIdentifieesParMois</li>".
64
			"<li>pourcentageObsIdentifieesEnFinDAnnee</li>".
1625 mathias 65
			"<li>pourcentageObsIdentifieesEnFinDAnneePlusPlus</li>".
1617 mathias 66
			"<li>moyenneActionsParJour</li>".
67
			"<li>personnesEnvoyantUnePropositionParMois</li>".
68
		"</ul>";
69
	}
70
 
71
	// retourne toutes les stats pour l'année spécifiée
72
	protected function tout($annee) {
73
		$moyenneObsSansNomParMois = $this->moyenneObsSansNomParMois($annee);
74
		$moyenneObsIdentifieesParMois = $this->moyenneObsIdentifieesParMois($annee);
75
		$pourcentageObsIdentifieesEnFinDAnnee = $this->pourcentageObsIdentifieesEnFinDAnnee($annee);
1625 mathias 76
		$pourcentageObsIdentifieesEnFinDAnneePlusPlus = $this->pourcentageObsIdentifieesEnFinDAnneePlusPlus($annee);
1617 mathias 77
		$moyenneActionsParJour = $this->moyenneActionsParJour($annee);
78
		$personnesEnvoyantUnePropositionParMois = $this->personnesEnvoyantUnePropositionParMois($annee);
79
 
80
		return array(
81
			'annee' => intval($annee),
82
			'moyenneObsSansNomParMois' => $moyenneObsSansNomParMois,
83
			'moyenneObsIdentifieesParMois' => $moyenneObsIdentifieesParMois,
84
			'pourcentageObsIdentifieesEnFinDAnnee' => $pourcentageObsIdentifieesEnFinDAnnee,
1625 mathias 85
			'pourcentageObsIdentifieesEnFinDAnneePlusPlus' => $pourcentageObsIdentifieesEnFinDAnneePlusPlus['pourcentage'],
1617 mathias 86
			'moyenneActionsParJour' => $moyenneActionsParJour,
87
			'personnesEnvoyantUnePropositionParMois' => $personnesEnvoyantUnePropositionParMois['nombre']
88
		);
89
	}
90
 
91
	// Retourne le nombre moyen d'observations non identifiées envoyées par mois, pour l'année $annee
92
	protected function moyenneObsSansNomParMois($annee) {
93
		$req = "SELECT AVG(parMois.compte) as moyenne FROM".
94
			" (SELECT count(*) as compte, CONCAT(YEAR(date_transmission),'-',MONTH(date_transmission)) as anneemois".
95
			" FROM del_observation".
96
			" WHERE YEAR(date_transmission) = '" . $annee . "'".
97
			" AND".
98
				// Obs marqués comme "aDeterminer" ou ayant un faible niveau de certitude
99
				" (mots_cles_texte LIKE '%aDeterminer%'".
100
				" OR certitude = 'aDeterminer'".
101
				" OR certitude = 'douteux'".
102
				// Obs n'ayant pas de nom_sel_nn (détermination non choisie parmi le référentiel)
103
				" OR nom_sel_nn IS NULL".
104
				" OR nom_sel_nn = 0".
105
				" OR id_observation IN".
106
					// Obs ayant une proposition initiale "vide" (sans no_sel_nn)
107
					" (SELECT DISTINCT ce_observation".
108
					" FROM del_commentaire".
109
					" WHERE proposition_initiale = 1".
110
					" AND (nom_sel_nn IS NULL OR nom_sel_nn = '')".
111
				")".
112
			")".
113
			" GROUP BY anneemois".
114
			" ORDER BY anneemois DESC) as parMois;";
115
 
116
		$res = $this->bdd->recupererTous($req);
1625 mathias 117
		return intval($res[0]['moyenne']);
1617 mathias 118
	}
119
 
120
	// Retourne la moyenne par mois sur l'année en cours, des propositions marquées comme "retenues"
121
	// dont le dernier vote est dans l'année considérée (comptées en groupant par mois du dernier vote)
122
	protected function moyenneObsIdentifieesParMois($annee) {
123
		$req = "SELECT AVG(valideesparmois) as moyenne FROM (".
124
			" SELECT count(*) as valideesparmois, CONCAT(YEAR(maxdate), '-', MONTH(maxdate)) as anneemois".
125
			" FROM (".
126
				// Compte et date du dernier vote des propositions marquées comme "retenues"
127
				" SELECT count(*), MAX(dcv.date) as maxdate".
128
				" FROM del_commentaire dc".
129
				" LEFT JOIN del_commentaire_vote dcv ON dcv.ce_proposition = dc.id_commentaire".
130
				" WHERE proposition_retenue = 1".
131
				" GROUP BY dc.id_commentaire".
132
				// Le dernier vote doit être dans l'année considérée (@ACHTUNG bancal)
133
				" HAVING MAX(YEAR(dcv.date)) = '" . $annee . "') as temp".
134
			" GROUP BY anneemois) as temp2;";
135
 
136
		$res = $this->bdd->recupererTous($req);
1625 mathias 137
		return intval($res[0]['moyenne']);
1617 mathias 138
	}
139
 
1625 mathias 140
	// Version améliorée mais non optimale (prend en compte les consensus non validés)
141
	// @TODO on devrait croiser les IDS pour ne pas prendre en compte les obs validées ou en
142
	// 		consensus, mais qui datent des années précédentes
1630 mathias 143
	// @ACHTUNG mache pas, dépasse les 100% (voir Wiki)
1625 mathias 144
	protected function pourcentageObsIdentifieesEnFinDAnneePlusPlus($annee) {
145
		// Obs ayant atteint un consensus cette année
146
		$req1 = "SELECT count(*) as nombre FROM(".
147
			" SELECT id_observation, id_commentaire, id_vote, nbvotes FROM (".
148
				" SELECT do.id_observation, dc.id_commentaire, dcv.id_vote, count(dcv.id_vote) as nbvotes".
149
				" FROM del_commentaire dc".
150
				" LEFT JOIN del_observation do ON do.id_observation = dc.ce_observation".
151
				" LEFT JOIN del_commentaire_vote dcv ON dc.id_commentaire = dcv.ce_proposition".
152
				" AND dcv.valeur = 1".
153
				" AND dc.proposition_retenue = 0".
154
				" GROUP BY dc.id_commentaire".
155
				" HAVING MAX(YEAR(dcv.date)) = '" . $annee . "'".
156
			" ) as temp GROUP BY id_observation".
157
		") as temp2;";
158
		$obsEnConsensus = $this->bdd->recupererTous($req1);
159
		$oc = intval($obsEnConsensus[0]['nombre']);
160
 
161
		// Obs ayant une "proposition retenue" cette année
162
		$req2 = "SELECT count(*) as nombre FROM (".
163
			" SELECT count(DISTINCT id_observation), MAX(dcv.date) as maxdate".
164
			" FROM del_commentaire dc".
165
			" LEFT JOIN del_commentaire_vote dcv ON dcv.ce_proposition = dc.id_commentaire".
166
			" LEFT JOIN del_observation do ON do.id_observation = dc.ce_observation".
167
			" WHERE proposition_retenue = 1".
168
			" AND YEAR(do.date_transmission) = '" . $annee . "'".
169
			" GROUP BY dc.id_commentaire".
170
			" HAVING MAX(YEAR(dcv.date)) = '" . $annee . "')".
171
		" as temp;";
172
		$nbObsValidees = $this->bdd->recupererTous($req2);
173
		$ov = intval($nbObsValidees[0]['nombre']);
174
 
175
		// Nombre d'obs sans nom soumises cette année
176
		$req3 = "SELECT count(*) as nombre".
177
			" FROM del_observation".
178
			" WHERE YEAR(date_transmission) = '" . $annee . "'".
179
			" AND (mots_cles_texte LIKE '%aDeterminer%'".
180
			" OR certitude = 'aDeterminer'".
181
			" OR certitude = 'douteux'".
182
			" OR nom_sel_nn IS NULL".
183
			" OR nom_sel_nn = 0 OR".
184
				" id_observation IN (".
185
				" SELECT DISTINCT ce_observation".
186
				" FROM del_commentaire".
187
				" WHERE proposition_initiale = 1".
188
				" AND (nom_sel_nn IS NULL OR nom_sel_nn = '')".
189
			" ))";
190
		$nbObsSansNom = $this->bdd->recupererTous($req3);
191
		$osn = intval($nbObsSansNom[0]['nombre']);
192
 
193
		return array(
194
			'observationsEnConsensus' => $oc,
195
			'observationsValidees' => $ov,
196
			'observationsSansNom' => $osn,
197
			'pourcentage' => ($osn == 0 ? 0 : (($oc + $ov) / $osn) * 100)
198
		);
199
	}
200
 
1617 mathias 201
	protected function pourcentageObsIdentifieesEnFinDAnnee($annee) {
202
		$req = "SELECT (".
203
			" SELECT count(*) FROM (".
204
				" SELECT count(DISTINCT id_observation), MAX(dcv.date) as maxdate".
205
				" FROM del_commentaire dc".
206
				" LEFT JOIN del_commentaire_vote dcv ON dcv.ce_proposition = dc.id_commentaire".
207
				" LEFT JOIN del_observation do ON do.id_observation = dc.ce_observation".
208
				" WHERE proposition_retenue = 1".
209
				" AND YEAR(do.date_transmission) = '" . $annee . "'".
210
				" GROUP BY dc.id_commentaire".
211
				" HAVING MAX(YEAR(dcv.date)) = '" . $annee . "')".
212
			" as temp)".
213
			" /".
214
			" (SELECT count(*)".
215
			" FROM del_observation".
216
			" WHERE YEAR(date_transmission) = '" . $annee . "'".
217
			" AND (mots_cles_texte LIKE '%aDeterminer%'".
218
			" OR certitude = 'aDeterminer'".
219
			" OR certitude = 'douteux'".
220
			" OR nom_sel_nn IS NULL".
221
			" OR nom_sel_nn = 0 OR".
222
				" id_observation IN (".
223
				" SELECT DISTINCT ce_observation".
224
				" FROM del_commentaire".
225
				" WHERE proposition_initiale = 1".
226
				" AND (nom_sel_nn IS NULL OR nom_sel_nn = '')".
227
				" )".
228
			" )".
229
		" ) * 100 as pourcentage;";
230
 
231
		$res = $this->bdd->recupererTous($req);
232
		return floatval($res[0]['pourcentage']);
233
	}
234
 
235
	// Retourne la moyenne sur l'année du nombre d'actions (commentaire ou vote) par jour
236
	protected function moyenneActionsParJour($annee) {
237
		// nombre d'actions / nombre de jours
238
		$req = "SELECT".
239
			" (SELECT".
240
			// nombre de commentaires sur l'année
241
			" (SELECT count(*) FROM del_commentaire WHERE YEAR(date) = '" . $annee . "')".
242
			" +".
243
			// nombre de commentaires sur l'année
244
			" (SELECT count(*) FROM del_commentaire_vote WHERE YEAR(date) = '" . $annee . "')".
245
			" )".
246
			// nombre de jours écoulés dans l'année
247
			" / (SELECT IF( YEAR(CURDATE()) = '" . $annee . "', DAYOFYEAR(CURDATE()), 365)".
248
			" ) as moyenne;";
249
 
250
		$res = $this->bdd->recupererTous($req);
1625 mathias 251
		return intval($res[0]['moyenne']);
1617 mathias 252
	}
253
 
254
	// Retourne le nombre et la liste des personnes ayant sur l'année une moyenne de participation par mois >= 1
255
	protected function personnesEnvoyantUnePropositionParMois($annee) {
256
		// Faire la moyenne par utilisateur et par mois
257
		$req = "SELECT cal.nbmois, SUM(somme) / cal.nbmois as moyenne, ce_utilisateur, utilisateur_courriel FROM".
258
			// Compter le nombre de participations pour chaque utilisateur à chaque mois de cette année
259
			" (SELECT count(*) as somme, CONCAT(YEAR(date),'-',MONTH(date)) as anneemois, ce_utilisateur, utilisateur_courriel, id_commentaire".
260
			" FROM del_commentaire".
261
			" WHERE ce_proposition = ''".
262
			" AND nom_sel_nn != ''".
263
			" AND nom_sel_nn IS NOT NULL".
264
			" AND YEAR(date) = '" . $annee . "'".
265
			" GROUP BY anneemois, ce_utilisateur, utilisateur_courriel) as ppm,".
266
			// Trouver le nombre de mois différents lors desquels les utilisateurs ont participé, cette année
267
			// Pour l'année en cours par ex, retournera 2 si on est en février (voire un au début du mois).
268
			" (SELECT count(distinct CONCAT(YEAR(date),'-',MONTH(date))) as nbmois".
269
			" FROM del_commentaire".
270
			" WHERE YEAR(date) = '" . $annee . "'".
271
			" AND ce_proposition = ''".
272
			" AND nom_sel_nn != ''".
273
			" AND nom_sel_nn IS NOT NULL) as cal".
274
		" GROUP BY ce_utilisateur, utilisateur_courriel".
275
		" HAVING SUM(somme) / cal.nbmois >= 1".
276
		" ORDER BY moyenne;";
277
 
278
		$res = $this->bdd->recupererTous($req);
279
		$cpt = count($res);
280
		$retour = array(
281
			'nombre' => intval($cpt),
282
			'donnees' => $res
283
		);
284
 
285
		return $retour;
286
	}
287
}
288
?>