Subversion Repositories eFlore/Applications.del

Rev

Rev 1626 | Rev 1795 | Go to most recent revision | 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 
*
1626 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 
		}
1788 mathias 30 
		// année à considérer - par défaut pas de filtrage
31 
		$annee = null;
1617 mathias 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>".
1624 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
1788 mathias 72 
	protected function tout($annee=null) {
1617 mathias 73 
		$moyenneObsSansNomParMois = $this->moyenneObsSansNomParMois($annee);
74 
		$moyenneObsIdentifieesParMois = $this->moyenneObsIdentifieesParMois($annee);
75 
		$pourcentageObsIdentifieesEnFinDAnnee = $this->pourcentageObsIdentifieesEnFinDAnnee($annee);
1624 mathias 76 
		$pourcentageObsIdentifieesEnFinDAnneePlusPlus = $this->pourcentageObsIdentifieesEnFinDAnneePlusPlus($annee);
1617 mathias 77 
		$moyenneActionsParJour = $this->moyenneActionsParJour($annee);
78 
		$personnesEnvoyantUnePropositionParMois = $this->personnesEnvoyantUnePropositionParMois($annee);
79 
 
80 
		return array(
1788 mathias 81 
			'annee' => $annee ? intval($annee) : null,
1617 mathias 82 
			'moyenneObsSansNomParMois' => $moyenneObsSansNomParMois,
83 
			'moyenneObsIdentifieesParMois' => $moyenneObsIdentifieesParMois,
84 
			'pourcentageObsIdentifieesEnFinDAnnee' => $pourcentageObsIdentifieesEnFinDAnnee,
1624 mathias 85 
			'pourcentageObsIdentifieesEnFinDAnneePlusPlus' => $pourcentageObsIdentifieesEnFinDAnneePlusPlus['pourcentage'],
1617 mathias 86 
			'moyenneActionsParJour' => $moyenneActionsParJour,
87 
			'personnesEnvoyantUnePropositionParMois' => $personnesEnvoyantUnePropositionParMois['nombre']
88 
		);
89 
	}
90 
 
1788 mathias 91 
	// proxy pour le widget de stats
92 
	protected function observations($annee) {
93 
		return $this->tout($annee);
94 
	}
95 
 
1617 mathias 96 
	// Retourne le nombre moyen d'observations non identifiées envoyées par mois, pour l'année $annee
97 
	protected function moyenneObsSansNomParMois($annee) {
98 
		$req = "SELECT AVG(parMois.compte) as moyenne FROM".
99 
			" (SELECT count(*) as compte, CONCAT(YEAR(date_transmission),'-',MONTH(date_transmission)) as anneemois".
100 
			" FROM del_observation".
1788 mathias 101 
			" WHERE ";
102 
		if ($annee !== null) {
103 
			$req .= "YEAR(date_transmission) = '" . $annee . "' AND ";
104 
		}
1617 mathias 105 
				// Obs marqués comme "aDeterminer" ou ayant un faible niveau de certitude
1788 mathias 106 
		$req .=	" (mots_cles_texte LIKE '%aDeterminer%'".
1617 mathias 107 
				" OR certitude = 'aDeterminer'".
108 
				" OR certitude = 'douteux'".
109 
				// Obs n'ayant pas de nom_sel_nn (détermination non choisie parmi le référentiel)
110 
				" OR nom_sel_nn IS NULL".
111 
				" OR nom_sel_nn = 0".
112 
				" OR id_observation IN".
113 
					// Obs ayant une proposition initiale "vide" (sans no_sel_nn)
114 
					" (SELECT DISTINCT ce_observation".
115 
					" FROM del_commentaire".
116 
					" WHERE proposition_initiale = 1".
117 
					" AND (nom_sel_nn IS NULL OR nom_sel_nn = '')".
118 
				")".
119 
			")".
120 
			" GROUP BY anneemois".
121 
			" ORDER BY anneemois DESC) as parMois;";
122 
 
123 
		$res = $this->bdd->recupererTous($req);
1624 mathias 124 
		return intval($res[0]['moyenne']);
1617 mathias 125 
	}
126 
 
127 
	// Retourne la moyenne par mois sur l'année en cours, des propositions marquées comme "retenues"
128 
	// dont le dernier vote est dans l'année considérée (comptées en groupant par mois du dernier vote)
129 
	protected function moyenneObsIdentifieesParMois($annee) {
130 
		$req = "SELECT AVG(valideesparmois) as moyenne FROM (".
131 
			" SELECT count(*) as valideesparmois, CONCAT(YEAR(maxdate), '-', MONTH(maxdate)) as anneemois".
132 
			" FROM (".
133 
				// Compte et date du dernier vote des propositions marquées comme "retenues"
134 
				" SELECT count(*), MAX(dcv.date) as maxdate".
135 
				" FROM del_commentaire dc".
136 
				" LEFT JOIN del_commentaire_vote dcv ON dcv.ce_proposition = dc.id_commentaire".
137 
				" WHERE proposition_retenue = 1".
1788 mathias 138 
				" GROUP BY dc.id_commentaire";
139 
 
140 
			if ($annee !== null) {
1617 mathias 141 
				// Le dernier vote doit être dans l'année considérée (@ACHTUNG bancal)
1788 mathias 142 
				$req .= " HAVING MAX(YEAR(dcv.date)) = '" . $annee . "'";
143 
			}
144 
			$req .= ") as temp".
145 
		" GROUP BY anneemois) as temp2;";
1617 mathias 146 
 
147 
		$res = $this->bdd->recupererTous($req);
1624 mathias 148 
		return intval($res[0]['moyenne']);
1617 mathias 149 
	}
150 
 
1624 mathias 151 
	// Version améliorée mais non optimale (prend en compte les consensus non validés)
152 
	// @TODO on devrait croiser les IDS pour ne pas prendre en compte les obs validées ou en
153 
	// 		consensus, mais qui datent des années précédentes
1626 mathias 154 
	// @ACHTUNG mache pas, dépasse les 100% (voir Wiki)
1624 mathias 155 
	protected function pourcentageObsIdentifieesEnFinDAnneePlusPlus($annee) {
156 
		// Obs ayant atteint un consensus cette année
157 
		$req1 = "SELECT count(*) as nombre FROM(".
158 
			" SELECT id_observation, id_commentaire, id_vote, nbvotes FROM (".
159 
				" SELECT do.id_observation, dc.id_commentaire, dcv.id_vote, count(dcv.id_vote) as nbvotes".
160 
				" FROM del_commentaire dc".
161 
				" LEFT JOIN del_observation do ON do.id_observation = dc.ce_observation".
162 
				" LEFT JOIN del_commentaire_vote dcv ON dc.id_commentaire = dcv.ce_proposition".
163 
				" AND dcv.valeur = 1".
164 
				" AND dc.proposition_retenue = 0".
1788 mathias 165 
				" GROUP BY dc.id_commentaire";
166 
		if ($annee != null) {
167 
			$req1 .= " HAVING MAX(YEAR(dcv.date)) = '" . $annee . "'";
168 
		}
169 
		$req1 .= " ) as temp GROUP BY id_observation".
1624 mathias 170 
		") as temp2;";
171 
		$obsEnConsensus = $this->bdd->recupererTous($req1);
172 
		$oc = intval($obsEnConsensus[0]['nombre']);
173 
 
174 
		// Obs ayant une "proposition retenue" cette année
175 
		$req2 = "SELECT count(*) as nombre FROM (".
176 
			" SELECT count(DISTINCT id_observation), MAX(dcv.date) as maxdate".
177 
			" FROM del_commentaire dc".
178 
			" LEFT JOIN del_commentaire_vote dcv ON dcv.ce_proposition = dc.id_commentaire".
179 
			" LEFT JOIN del_observation do ON do.id_observation = dc.ce_observation".
1788 mathias 180 
			" WHERE proposition_retenue = 1";
181 
		if ($annee != null) {
182 
			$req2 .= " AND YEAR(do.date_transmission) = '" . $annee . "'";
183 
		}
184 
		$req2 .= " GROUP BY dc.id_commentaire";
185 
		if ($annee != null) {
186 
			$req2 .= " HAVING MAX(YEAR(dcv.date)) = '" . $annee . "'";
187 
		}
188 
		$req2 .= ") as temp;";
1624 mathias 189 
		$nbObsValidees = $this->bdd->recupererTous($req2);
190 
		$ov = intval($nbObsValidees[0]['nombre']);
191 
 
192 
		// Nombre d'obs sans nom soumises cette année
193 
		$req3 = "SELECT count(*) as nombre".
194 
			" FROM del_observation".
1788 mathias 195 
			" WHERE ";
196 
		if ($annee != null) {
197 
			$req3 .= "YEAR(date_transmission) = '" . $annee . "' AND ";
198 
		}
199 
		$req3 .= "(mots_cles_texte LIKE '%aDeterminer%'".
1624 mathias 200 
			" OR certitude = 'aDeterminer'".
201 
			" OR certitude = 'douteux'".
202 
			" OR nom_sel_nn IS NULL".
203 
			" OR nom_sel_nn = 0 OR".
204 
				" id_observation IN (".
205 
				" SELECT DISTINCT ce_observation".
206 
				" FROM del_commentaire".
207 
				" WHERE proposition_initiale = 1".
208 
				" AND (nom_sel_nn IS NULL OR nom_sel_nn = '')".
209 
			" ))";
210 
		$nbObsSansNom = $this->bdd->recupererTous($req3);
211 
		$osn = intval($nbObsSansNom[0]['nombre']);
212 
 
213 
		return array(
214 
			'observationsEnConsensus' => $oc,
215 
			'observationsValidees' => $ov,
216 
			'observationsSansNom' => $osn,
217 
			'pourcentage' => ($osn == 0 ? 0 : (($oc + $ov) / $osn) * 100)
218 
		);
219 
	}
220 
 
1617 mathias 221 
	protected function pourcentageObsIdentifieesEnFinDAnnee($annee) {
222 
		$req = "SELECT (".
223 
			" SELECT count(*) FROM (".
224 
				" SELECT count(DISTINCT id_observation), MAX(dcv.date) as maxdate".
225 
				" FROM del_commentaire dc".
226 
				" LEFT JOIN del_commentaire_vote dcv ON dcv.ce_proposition = dc.id_commentaire".
227 
				" LEFT JOIN del_observation do ON do.id_observation = dc.ce_observation".
1788 mathias 228 
				" WHERE proposition_retenue = 1";
229 
		if ($annee !== null) {
230 
			$req .= " AND YEAR(do.date_transmission) = '" . $annee . "'";
231 
		}
232 
		$req .= " GROUP BY dc.id_commentaire";
233 
		if ($annee !== null) {
234 
			$req .= " HAVING MAX(YEAR(dcv.date)) = '" . $annee . "'";
235 
		}
236 
		$req .= ") as temp)".
1617 mathias 237 
			" /".
238 
			" (SELECT count(*)".
239 
			" FROM del_observation".
1788 mathias 240 
			" WHERE ";
241 
		if ($annee !== null) {
242 
			$req .= "YEAR(date_transmission) = '" . $annee . "' AND ";
243 
		}
244 
		$req .= " (mots_cles_texte LIKE '%aDeterminer%'".
1617 mathias 245 
			" OR certitude = 'aDeterminer'".
246 
			" OR certitude = 'douteux'".
247 
			" OR nom_sel_nn IS NULL".
248 
			" OR nom_sel_nn = 0 OR".
249 
				" id_observation IN (".
250 
				" SELECT DISTINCT ce_observation".
251 
				" FROM del_commentaire".
252 
				" WHERE proposition_initiale = 1".
253 
				" AND (nom_sel_nn IS NULL OR nom_sel_nn = '')".
254 
				" )".
255 
			" )".
256 
		" ) * 100 as pourcentage;";
257 
 
258 
		$res = $this->bdd->recupererTous($req);
259 
		return floatval($res[0]['pourcentage']);
260 
	}
261 
 
262 
	// Retourne la moyenne sur l'année du nombre d'actions (commentaire ou vote) par jour
263 
	protected function moyenneActionsParJour($annee) {
264 
		// nombre d'actions / nombre de jours
265 
		$req = "SELECT".
266 
			" (SELECT".
267 
			// nombre de commentaires sur l'année
1788 mathias 268 
			" (SELECT count(*) FROM del_commentaire" . ($annee != null ? " WHERE YEAR(date) = '" . $annee . "')" : ")").
1617 mathias 269 
			" +".
270 
			// nombre de commentaires sur l'année
1788 mathias 271 
			" (SELECT count(*) FROM del_commentaire_vote" . ($annee != null ? " WHERE YEAR(date) = '" . $annee . "')" : ")").
1617 mathias 272 
			" )".
273 
			// nombre de jours écoulés dans l'année
1788 mathias 274 
			" / (";
275 
		if ($annee == null) {
276 
			$req .= "SELECT 365 * (year(now()) - min(year(date)) + 1) FROM del_commentaire_vote WHERE YEAR(date) != 0";
277 
		} else {
278 
			$req .= "SELECT IF( YEAR(CURDATE()) = '" . $annee . "', DAYOFYEAR(CURDATE()), 365)";
279 
		}
280 
		$req .= ") as moyenne;";
1617 mathias 281 
 
282 
		$res = $this->bdd->recupererTous($req);
1624 mathias 283 
		return intval($res[0]['moyenne']);
1617 mathias 284 
	}
285 
 
286 
	// Retourne le nombre et la liste des personnes ayant sur l'année une moyenne de participation par mois >= 1
287 
	protected function personnesEnvoyantUnePropositionParMois($annee) {
288 
		// Faire la moyenne par utilisateur et par mois
289 
		$req = "SELECT cal.nbmois, SUM(somme) / cal.nbmois as moyenne, ce_utilisateur, utilisateur_courriel FROM".
290 
			// Compter le nombre de participations pour chaque utilisateur à chaque mois de cette année
291 
			" (SELECT count(*) as somme, CONCAT(YEAR(date),'-',MONTH(date)) as anneemois, ce_utilisateur, utilisateur_courriel, id_commentaire".
292 
			" FROM del_commentaire".
293 
			" WHERE ce_proposition = ''".
294 
			" AND nom_sel_nn != ''".
1788 mathias 295 
			" AND nom_sel_nn IS NOT NULL";
296 
		if ($annee != null) {
297 
			$req .= " AND YEAR(date) = '" . $annee . "'";
298 
		}
299 
		$req .= " GROUP BY anneemois, ce_utilisateur, utilisateur_courriel) as ppm,".
1617 mathias 300 
			// Trouver le nombre de mois différents lors desquels les utilisateurs ont participé, cette année
301 
			// Pour l'année en cours par ex, retournera 2 si on est en février (voire un au début du mois).
302 
			" (SELECT count(distinct CONCAT(YEAR(date),'-',MONTH(date))) as nbmois".
303 
			" FROM del_commentaire".
1788 mathias 304 
			" WHERE ";
305 
		if ($annee != null) {
306 
			$req .= "YEAR(date) = '" . $annee . "' AND ";
307 
		}
308 
		$req .= " ce_proposition = ''".
1617 mathias 309 
			" AND nom_sel_nn != ''".
310 
			" AND nom_sel_nn IS NOT NULL) as cal".
311 
		" GROUP BY ce_utilisateur, utilisateur_courriel".
312 
		" HAVING SUM(somme) / cal.nbmois >= 1".
313 
		" ORDER BY moyenne;";
314 
 
315 
		$res = $this->bdd->recupererTous($req);
316 
		$cpt = count($res);
317 
		$retour = array(
318 
			'nombre' => intval($cpt),
319 
			'donnees' => $res
320 
		);
321 
 
322 
		return $retour;
323 
	}
324 
}
325 
?>