| 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 |
?>
|