WebSVN – eFlore/Applications.del – Diff – /trunk/services/modules/0.1/Statistiques.php


<?php
/**
 
 * Statistiques par année sur l'utilisation de Identiplante / Pictoflora
 *
 * Documentation: http://www.tela-botanica.org/wikini/DevInformatiques/wakka.php?wiki=AppliDelStats
 *
 * @category   DEL
 * @package    Services
 * @subpackage Statistiques
 * @version    0.1
 * @author     Mathias CHOUET <mathias@tela-botanica.org>
 * @author     Jean-Pascal MILCENT <jpm@tela-botanica.org>
 * @author     Aurelien PERONNET <aurelien@tela-botanica.org>
 * @license    GPL v3 <http://www.gnu.org/licenses/gpl.txt>
 * @license    CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>
 * @copyright  1999-2014 Tela Botanica <accueil@tela-botanica.org>
 */
class Statistiques extends RestService {
 
	protected $bdd;
 
	public function __construct() {
		$this->bdd = $this->getBdd();
	}
 
	// GET
	public function consulter($ressources, $parametres) {
		$resultat = '';
		$reponseHttp = new ReponseHttp();
 
		// méthode à appeler
		$methode = "tout";
		if (isset($ressources[0])) {
			$methode = $ressources[0];
		}
		// année à considérer - par défaut pas de filtrage
		$annee = null;
		if (isset($parametres['annee'])) {
			$annee = $parametres['annee'];
		}
		//echo "Année: $annee\nMéthode: $methode\n";
 
		// appel
		if (method_exists($this, $methode)) {
			try {
				$retour = call_user_func(array($this, $methode), $annee);
				$reponseHttp->setResultatService($retour);
			} catch (ServiceFoiraxException $e) {
				// @TODO renvoyer 500
				$reponseHttp->ajouterErreur($e);
			}
		} else {
			// @TODO renvoyer 500
			$reponseHttp->ajouterErreur(new Exception("Erreur: la méthode \"$methode\" n'existe pas<br/>" . $this->utilisation()));
		}
 
		// merci au revoir
		$reponseHttp->emettreLesEntetes();
		$corps = $reponseHttp->getCorps();
 
		return $corps;
	}
 
	// Renvoie la liste des méthodes disponibles
	private function utilisation() {
		return "<br/>Méthodes disponibles:<ul>".
			"<li>tout</li>".
			"<li>moyenneObsSansNomParMois</li>".
			"<li>moyenneObsIdentifieesParMois</li>".
			"<li>pourcentageObsIdentifieesEnFinDAnnee</li>".
			"<li>pourcentageObsIdentifieesEnFinDAnneePlusPlus</li>".
			"<li>moyenneActionsParJour</li>".
			"<li>personnesEnvoyantUnePropositionParMois</li>".
		"</ul>";
	}
 
	// retourne toutes les stats pour l'année spécifiée
	protected function tout($annee=null) {
		$moyenneObsSansNomParMois = $this->moyenneObsSansNomParMois($annee);
		$moyenneObsIdentifieesParMois = $this->moyenneObsIdentifieesParMois($annee);
		$pourcentageObsIdentifieesEnFinDAnnee = $this->pourcentageObsIdentifieesEnFinDAnnee($annee);
		$pourcentageObsIdentifieesEnFinDAnneePlusPlus = $this->pourcentageObsIdentifieesEnFinDAnneePlusPlus($annee);
		$moyenneActionsParJour = $this->moyenneActionsParJour($annee);
		$personnesEnvoyantUnePropositionParMois = $this->personnesEnvoyantUnePropositionParMois($annee);
 
		return array(
			'annee' => $annee ? intval($annee) : null,
			'moyenneObsSansNomParMois' => $moyenneObsSansNomParMois,
			'moyenneObsIdentifieesParMois' => $moyenneObsIdentifieesParMois,
			'pourcentageObsIdentifieesEnFinDAnnee' => $pourcentageObsIdentifieesEnFinDAnnee,
			'pourcentageObsIdentifieesEnFinDAnneePlusPlus' => $pourcentageObsIdentifieesEnFinDAnneePlusPlus['pourcentage'],
			'moyenneActionsParJour' => $moyenneActionsParJour,
			'personnesEnvoyantUnePropositionParMois' => $personnesEnvoyantUnePropositionParMois['nombre']
		);
	}
 
	// proxy pour le widget de stats
	protected function observations($annee) {
		return $this->tout($annee);
	}
 
	// Retourne le nombre moyen d'observations non identifiées envoyées par mois, pour l'année $annee
	protected function moyenneObsSansNomParMois($annee) {
		$req = "SELECT AVG(parMois.compte) as moyenne FROM".
			" (SELECT count(*) as compte, CONCAT(YEAR(date_transmission),'-',MONTH(date_transmission)) as anneemois".
			" FROM del_observation".
			" WHERE ";
		if ($annee !== null) {
			$req .= "YEAR(date_transmission) = '" . $annee . "' AND ";
		}
				// Obs marqués comme "aDeterminer" ou ayant un faible niveau de certitude
		$req .=	" (mots_cles_texte LIKE '%aDeterminer%'".
				" OR certitude = 'aDeterminer'".
				" OR certitude = 'douteux'".
				// Obs n'ayant pas de nom_sel_nn (détermination non choisie parmi le référentiel)
				" OR nom_sel_nn IS NULL".
				" OR nom_sel_nn = 0".
				" OR id_observation IN".
					// Obs ayant une proposition initiale "vide" (sans no_sel_nn)
					" (SELECT DISTINCT ce_observation".
					" FROM del_commentaire".
					" WHERE proposition_initiale = 1".
					" AND (nom_sel_nn IS NULL OR nom_sel_nn = '')".
				")".
			")".
			" GROUP BY anneemois".
			" ORDER BY anneemois DESC) as parMois;";
 
		$res = $this->bdd->recupererTous($req);
		return intval($res[0]['moyenne']);
	}
 
	// Retourne la moyenne par mois sur l'année en cours, des propositions marquées comme "retenues"
	// dont le dernier vote est dans l'année considérée (comptées en groupant par mois du dernier vote)
	protected function moyenneObsIdentifieesParMois($annee) {
		$req = "SELECT AVG(valideesparmois) as moyenne FROM (".
			" SELECT count(*) as valideesparmois, CONCAT(YEAR(maxdate), '-', MONTH(maxdate)) as anneemois".
			" FROM (".
				// Compte et date du dernier vote des propositions marquées comme "retenues"
				" SELECT count(*), MAX(dcv.date) as maxdate".
				" FROM del_commentaire dc".
				" LEFT JOIN del_commentaire_vote dcv ON dcv.ce_proposition = dc.id_commentaire".
				" WHERE proposition_retenue = 1".
				" GROUP BY dc.id_commentaire";
 
			if ($annee !== null) {
				// Le dernier vote doit être dans l'année considérée (@ACHTUNG bancal)
				$req .= " HAVING MAX(YEAR(dcv.date)) = '" . $annee . "'";
			}
			$req .= ") as temp".
		" GROUP BY anneemois) as temp2;";
 
		$res = $this->bdd->recupererTous($req);
		return intval($res[0]['moyenne']);
	}
 
	// Version améliorée mais non optimale (prend en compte les consensus non validés)
	// @TODO on devrait croiser les IDS pour ne pas prendre en compte les obs validées ou en
	// 		consensus, mais qui datent des années précédentes
	// @ACHTUNG mache pas, dépasse les 100% (voir Wiki)
	protected function pourcentageObsIdentifieesEnFinDAnneePlusPlus($annee) {
		// Obs ayant atteint un consensus cette année
		$req1 = "SELECT count(*) as nombre FROM(".
			" SELECT id_observation, id_commentaire, id_vote, nbvotes FROM (".
				" SELECT do.id_observation, dc.id_commentaire, dcv.id_vote, count(dcv.id_vote) as nbvotes".
				" FROM del_commentaire dc".
				" LEFT JOIN del_observation do ON do.id_observation = dc.ce_observation".
				" LEFT JOIN del_commentaire_vote dcv ON dc.id_commentaire = dcv.ce_proposition".
				" AND dcv.valeur = 1".
				" AND dc.proposition_retenue = 0".
				" GROUP BY dc.id_commentaire";
		if ($annee != null) {
			$req1 .= " HAVING MAX(YEAR(dcv.date)) = '" . $annee . "'";
		}
		$req1 .= " ) as temp GROUP BY id_observation".
		") as temp2;";
		$obsEnConsensus = $this->bdd->recupererTous($req1);
		$oc = intval($obsEnConsensus[0]['nombre']);
 
		// Obs ayant une "proposition retenue" cette année
		$req2 = "SELECT count(*) as nombre FROM (".
			" SELECT count(DISTINCT id_observation), MAX(dcv.date) as maxdate".
			" FROM del_commentaire dc".
			" LEFT JOIN del_commentaire_vote dcv ON dcv.ce_proposition = dc.id_commentaire".
			" LEFT JOIN del_observation do ON do.id_observation = dc.ce_observation".
			" WHERE proposition_retenue = 1";
		if ($annee != null) {
			$req2 .= " AND YEAR(do.date_transmission) = '" . $annee . "'";
		}
		$req2 .= " GROUP BY dc.id_commentaire";
		if ($annee != null) {
			$req2 .= " HAVING MAX(YEAR(dcv.date)) = '" . $annee . "'";
		}
		$req2 .= ") as temp;";
		$nbObsValidees = $this->bdd->recupererTous($req2);
		$ov = intval($nbObsValidees[0]['nombre']);
 
		// Nombre d'obs sans nom soumises cette année
		$req3 = "SELECT count(*) as nombre".
			" FROM del_observation".
			" WHERE ";
		if ($annee != null) {
			$req3 .= "YEAR(date_transmission) = '" . $annee . "' AND ";
		}
		$req3 .= "(mots_cles_texte LIKE '%aDeterminer%'".
			" OR certitude = 'aDeterminer'".
			" OR certitude = 'douteux'".
			" OR nom_sel_nn IS NULL".
			" OR nom_sel_nn = 0 OR".
				" id_observation IN (".
				" SELECT DISTINCT ce_observation".
				" FROM del_commentaire".
				" WHERE proposition_initiale = 1".
				" AND (nom_sel_nn IS NULL OR nom_sel_nn = '')".
			" ))";
		$nbObsSansNom = $this->bdd->recupererTous($req3);
		$osn = intval($nbObsSansNom[0]['nombre']);
 
		return array(
			'observationsEnConsensus' => $oc,
			'observationsValidees' => $ov,
			'observationsSansNom' => $osn,
			'pourcentage' => ($osn == 0 ? 0 : (($oc + $ov) / $osn) * 100)
		);
	}
 
	protected function pourcentageObsIdentifieesEnFinDAnnee($annee) {
		$req = "SELECT (".
			" SELECT count(*) FROM (".
				" SELECT count(DISTINCT id_observation), MAX(dcv.date) as maxdate".
				" FROM del_commentaire dc".
				" LEFT JOIN del_commentaire_vote dcv ON dcv.ce_proposition = dc.id_commentaire".
				" LEFT JOIN del_observation do ON do.id_observation = dc.ce_observation".
				" WHERE proposition_retenue = 1";
		if ($annee !== null) {
			$req .= " AND YEAR(do.date_transmission) = '" . $annee . "'";
		}
		$req .= " GROUP BY dc.id_commentaire";
		if ($annee !== null) {
			$req .= " HAVING MAX(YEAR(dcv.date)) = '" . $annee . "'";
		}
		$req .= ") as temp)".
			" /".
			" (SELECT count(*)".
			" FROM del_observation".
			" WHERE ";
		if ($annee !== null) {
			$req .= "YEAR(date_transmission) = '" . $annee . "' AND ";
		}
		$req .= " (mots_cles_texte LIKE '%aDeterminer%'".
			" OR certitude = 'aDeterminer'".
			" OR certitude = 'douteux'".
			" OR nom_sel_nn IS NULL".
			" OR nom_sel_nn = 0 OR".
				" id_observation IN (".
				" SELECT DISTINCT ce_observation".
				" FROM del_commentaire".
				" WHERE proposition_initiale = 1".
				" AND (nom_sel_nn IS NULL OR nom_sel_nn = '')".
				" )".
			" )".
		" ) * 100 as pourcentage;";
 
		$res = $this->bdd->recupererTous($req);
		return floatval($res[0]['pourcentage']);
	}
 
	// Retourne la moyenne sur l'année du nombre d'actions (commentaire ou vote) par jour
	protected function moyenneActionsParJour($annee) {
		// nombre d'actions / nombre de jours
		$req = "SELECT".
			" (SELECT".
			// nombre de commentaires sur l'année
			" (SELECT count(*) FROM del_commentaire" . ($annee != null ? " WHERE YEAR(date) = '" . $annee . "')" : ")").
			" +".
			// nombre de commentaires sur l'année
			" (SELECT count(*) FROM del_commentaire_vote" . ($annee != null ? " WHERE YEAR(date) = '" . $annee . "')" : ")").
			" )".
			// nombre de jours écoulés dans l'année
			" / (";
		if ($annee == null) {
			$req .= "SELECT 365 * (year(now()) - min(year(date)) + 1) FROM del_commentaire_vote WHERE YEAR(date) != 0";
		} else {
			$req .= "SELECT IF( YEAR(CURDATE()) = '" . $annee . "', DAYOFYEAR(CURDATE()), 365)";
		}
		$req .= ") as moyenne;";
 
		$res = $this->bdd->recupererTous($req);
		return intval($res[0]['moyenne']);
	}
 
	// Retourne le nombre et la liste des personnes ayant sur l'année une moyenne de participation par mois >= 1
	protected function personnesEnvoyantUnePropositionParMois($annee) {
		// Faire la moyenne par utilisateur et par mois
		$req = "SELECT cal.nbmois, SUM(somme) / cal.nbmois as moyenne, ce_utilisateur, utilisateur_courriel FROM".
			// Compter le nombre de participations pour chaque utilisateur à chaque mois de cette année
			" (SELECT count(*) as somme, CONCAT(YEAR(date),'-',MONTH(date)) as anneemois, ce_utilisateur, utilisateur_courriel, id_commentaire".
			" FROM del_commentaire".
			" WHERE ce_proposition = ''".
			" AND nom_sel_nn != ''".
			" AND nom_sel_nn IS NOT NULL";
		if ($annee != null) {
			$req .= " AND YEAR(date) = '" . $annee . "'";
		}
		$req .= " GROUP BY anneemois, ce_utilisateur, utilisateur_courriel) as ppm,".
			// Trouver le nombre de mois différents lors desquels les utilisateurs ont participé, cette année
			// Pour l'année en cours par ex, retournera 2 si on est en février (voire un au début du mois).
			" (SELECT count(distinct CONCAT(YEAR(date),'-',MONTH(date))) as nbmois".
			" FROM del_commentaire".
			" WHERE ";
		if ($annee != null) {
			$req .= "YEAR(date) = '" . $annee . "' AND ";
		}
		$req .= " ce_proposition = ''".
			" AND nom_sel_nn != ''".
			" AND nom_sel_nn IS NOT NULL) as cal".
		" GROUP BY ce_utilisateur, utilisateur_courriel".
		" HAVING SUM(somme) / cal.nbmois >= 1".
		" ORDER BY moyenne;";
 
		$res = $this->bdd->recupererTous($req);
		$cpt = count($res);
		$retour = array(
			'nombre' => intval($cpt),
			'donnees' => $res
		);
 
		return $retour;
	}
 
 
}



Subversion Repositories eFlore/Applications.del

(root)/trunk/services/modules/0.1/Statistiques.php – Rev 1788 → 1795

Rev 1788		Rev 1795
1	`<?php`	1	`<?php`
2	`/**`	2	`/**`
3	`* Description :`	-
4	`* Statistiques par année sur l'utilisation de Identiplante / Pictoflora`	3	`* Statistiques par année sur l'utilisation de Identiplante / Pictoflora`
5	`*`	4	`*`
6	`* Documentation: http://www.tela-botanica.org/wikini/DevInformatiques/wakka.php?wiki=AppliDelStats`	5	`* Documentation: http://www.tela-botanica.org/wikini/DevInformatiques/wakka.php?wiki=AppliDelStats`
7	`*`	6	`*`
8	`* @author Mathias`	7	`* @category DEL`
-		8	`* @package Services`
-		9	`* @subpackage Statistiques`
-		10	`* @version 0.1`
-		11	`* @author Mathias CHOUET <mathias@tela-botanica.org>`
-		12	`* @author Jean-Pascal MILCENT <jpm@tela-botanica.org>`
-		13	`* @author Aurelien PERONNET <aurelien@tela-botanica.org>`
9	`* @license GPL v3 <http://www.gnu.org/licenses/gpl.txt>`	14	`* @license GPL v3 <http://www.gnu.org/licenses/gpl.txt>`
10	`* @license CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>`	15	`* @license CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>`
-		16	`* @copyright 1999-2014 Tela Botanica <accueil@tela-botanica.org>`
11	`*/`	17	`*/`
12	`class Statistiques extends RestService {`	18	`class Statistiques extends RestService {`
13		19
14	`protected $bdd;`	20	`protected $bdd;`
15		21
16	`public function __construct() {`	22	`public function __construct() {`
17	`$this->bdd = $this->getBdd();`	23	`$this->bdd = $this->getBdd();`
18	`}`	24	`}`
19		25
20	`// GET`	26	`// GET`
21	`public function consulter($ressources, $parametres) {`	27	`public function consulter($ressources, $parametres) {`
22	`$resultat = '';`	28	`$resultat = '';`
23	`$reponseHttp = new ReponseHttp();`	29	`$reponseHttp = new ReponseHttp();`
24		30
25	`// méthode à appeler`	31	`// méthode à appeler`
26	`$methode = "tout";`	32	`$methode = "tout";`
27	`if (isset($ressources[0])) {`	33	`if (isset($ressources[0])) {`
28	`$methode = $ressources[0];`	34	`$methode = $ressources[0];`
29	`}`	35	`}`
30	`// année à considérer - par défaut pas de filtrage`	36	`// année à considérer - par défaut pas de filtrage`
31	`$annee = null;`	37	`$annee = null;`
32	`if (isset($parametres['annee'])) {`	38	`if (isset($parametres['annee'])) {`
33	`$annee = $parametres['annee'];`	39	`$annee = $parametres['annee'];`