Subversion Repositories eFlore/Applications.del

Compare Revisions

Ignore whitespace Rev 1996 → Rev 1997

/branches/v1.7-oxygene/services/modules/0.1/statistiques/StatistiquesParAnnee.php
New file
0,0 → 1,302
<?php
/**
* Statistiques par année sur l'utilisation de Identiplante / Pictoflora
*
* @see 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 StatistiquesParAnnee {
 
private $conteneur;
private $contexte;
private $navigation;
private $bdd;
 
private $annee = null;
private $type = 'tout';
private $methode = '';
 
public function __construct(Conteneur $conteneur = null) {
$this->conteneur = $conteneur == null ? new Conteneur() : $conteneur;
$this->contexte = $conteneur->getContexte();
$this->navigation = $conteneur->getNavigation();
$this->bdd = $this->conteneur->getBdd();
}
 
public function consulter() {
$this->intitialiserParametresEtRessources();
$this->verifierPreRequis();
 
$resultat = new ResultatService();
$resultat->corps = call_user_func(array($this, $this->methode));
return $resultat;
}
 
private function intitialiserParametresEtRessources() {
$this->type = $this->contexte->getRessource(2) != null ? $this->contexte->getRessource(2) : $this->type;
$this->methode = $this->obtenirNomMethode($this->type);
$this->annee =(int) $this->contexte->getQS('annee') != null ? intval($this->contexte->getQS('annee')) : null;
}
 
private function verifierPreRequis() {
$erreurs = array();
 
if ($this->annee != null && !is_int($this->annee)) {
$erreurs[] = "Le paramètre 'annee' doit être un entier.";
}
 
if (method_exists($this, $this->obtenirNomMethode($this->type)) === false) {
$erreurs[] = "Les stats de type '{$this->type}' n'existent pas.";
}
 
if (!empty($erreurs)) {
$msg = "Erreur de configuration :\n".implode("\n", $erreurs)."\n\n".Statistiques::getDoc();
throw new Exception($msg, RestServeur::HTTP_CODE_MAUVAISE_REQUETE);
}
}
 
private function obtenirNomMethode($mot) {
$classeNom = 'get'.str_replace(' ', '', ucwords(strtolower(str_replace('-', ' ', $mot))));
return $classeNom;
}
 
// retourne toutes les stats pour l'année spécifiée
private function getTout() {
$obsIdentifieesFinAnneePlus = $this->getPourcentageObsIdentifieesFinAnneePlus();
$participants = $this->getParticipants();
 
return array(
'annee' => $this->annee,
'moyenneObsSansNomParMois' => $this->getMoyenneObsSansNomParMois(),
'moyenneObsIdentifieesParMois' => $this->getMoyenneObsIdentifieesParMois(),
'pourcentageObsIdentifieesEnFinDAnnee' => $this->getPourcentageObsIdentifieesFinAnnee(),
'pourcentageObsIdentifieesEnFinDAnneePlusPlus' => $obsIdentifieesFinAnneePlus['pourcentage'],
'moyenneActionsParJour' => $this->getMoyenneActionsParJour(),
'personnesEnvoyantUnePropositionParMois' => $participants['nombre']
);
}
 
// proxy pour le widget de stats
private function getObservations() {
return $this->getTout();
}
 
// Retourne le nombre moyen d'observations non identifiées envoyées par mois, pour l'année $annee
private function getMoyenneObsSansNomParMois() {
$sqlTableTmp = "SELECT COUNT(*) AS compte, ".
" CONCAT(YEAR(date_transmission),'-',MONTH(date_transmission)) AS anneemois ".
"FROM del_observation ".
"WHERE (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 ({$this->getSqlObsSansNom()}) ".
') '.
(($this->annee !== null) ? "AND YEAR(date_transmission) = '{$this->annee}' " : '').
'GROUP BY anneemois '.
'ORDER BY anneemois DESC ';
 
$requete = "SELECT AVG(parMois.compte) AS moyenne FROM ($sqlTableTmp) AS parMois ".
' -- '.__FILE__.' : '.__LINE__;
$resultat = $this->bdd->recupererTous($requete);
return intval($resultat[0]['moyenne']);
}
 
private function getSqlObsSansNom() {
$sqlObsSansNom = "SELECT DISTINCT ce_observation ".
"FROM del_commentaire ".
"WHERE proposition_initiale = 1 ".
"AND (nom_sel_nn IS NULL OR nom_sel_nn = '') ";
return $sqlObsSansNom;
}
 
// 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)
private function getMoyenneObsIdentifieesParMois() {
// Compte et date du dernier vote des propositions marquées comme "retenues"
$sqlTableTmp1 = "SELECT COUNT(*), MAX(dcv.date) AS maxdate ".
"FROM del_commentaire AS dc ".
" LEFT JOIN del_commentaire_vote dcv ON dcv.ce_proposition = dc.id_commentaire ".
" WHERE proposition_retenue = 1 ".
" GROUP BY dc.id_commentaire ".
(($this->annee !== null) ? "HAVING MAX(YEAR(dcv.date)) = '{$this->annee}' " : '');
 
$sqlTableTmp2 = 'SELECT COUNT(*) AS valideesparmois, '.
" CONCAT(YEAR(maxdate), '-', MONTH(maxdate)) AS anneemois ".
"FROM ($sqlTableTmp1) AS temp ".
"GROUP BY anneemois ";
 
$requete = "SELECT AVG(valideesparmois) AS moyenne FROM ($sqlTableTmp2) AS temp2 ".
' -- '.__FILE__.' : '.__LINE__;
 
$resultat = $this->bdd->recupererTous($requete);
return intval($resultat[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)
private function getPourcentageObsIdentifieesFinAnneePlus() {
// Obs ayant atteint un consensus cette année
$requete = "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 AS dc ".
" LEFT JOIN del_observation AS do ON (do.id_observation = dc.ce_observation) ".
" LEFT JOIN del_commentaire_vote AS dcv ON (dc.id_commentaire = dcv.ce_proposition) ".
"AND dcv.valeur = 1 ".
"AND dc.proposition_retenue = 0 ".
"GROUP BY dc.id_commentaire ".
(($this->annee != null) ? " HAVING MAX(YEAR(dcv.date)) = '{$this->annee}' " : '').
" ) AS temp ".
"GROUP BY id_observation ".
") AS temp2 ".
' -- '.__FILE__.' : '.__LINE__;
$obsEnConsensus = $this->bdd->recupererTous($requete);
$oc = intval($obsEnConsensus[0]['nombre']);
 
// Obs ayant une "proposition retenue" cette année
$requete = "SELECT COUNT(*) AS nombre ".
"FROM (SELECT COUNT(DISTINCT id_observation), MAX(dcv.date) AS maxdate ".
"FROM del_commentaire AS dc ".
" LEFT JOIN del_commentaire_vote AS dcv ON (dcv.ce_proposition = dc.id_commentaire) ".
" LEFT JOIN del_observation AS do ON (do.id_observation = dc.ce_observation) ".
"WHERE proposition_retenue = 1 ".
(($this->annee != null) ? "AND YEAR(do.date_transmission) = '{$this->annee}' " : '').
"GROUP BY dc.id_commentaire ".
(($this->annee != null) ? "HAVING MAX(YEAR(dcv.date)) = '{$this->annee}' " : '').
") as temp ".
' -- '.__FILE__.' : '.__LINE__;
$nbObsValidees = $this->bdd->recupererTous($requete);
$ov = intval($nbObsValidees[0]['nombre']);
 
// Nombre d'obs sans nom soumises cette année
$requete = "SELECT COUNT(*) AS nombre ".
"FROM del_observation ".
"WHERE (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 ({$this->getSqlObsSansNom()})".
') '.
(($this->annee != null) ? "AND YEAR(date_transmission) = '{$this->annee}' " : '').
' -- '.__FILE__.' : '.__LINE__;
$nbObsSansNom = $this->bdd->recupererTous($requete);
$osn = intval($nbObsSansNom[0]['nombre']);
 
return array(
'observationsEnConsensus' => $oc,
'observationsValidees' => $ov,
'observationsSansNom' => $osn,
'pourcentage' => ($osn == 0 ? 0 : round(((($oc + $ov) / $osn) * 100), 2))
);
}
 
private function getPourcentageObsIdentifieesFinAnnee() {
$requete = "SELECT ( ".
"SELECT COUNT(*) FROM ( ".
"SELECT COUNT(DISTINCT id_observation), MAX(dcv.date) AS maxdate ".
"FROM del_commentaire AS dc ".
" LEFT JOIN del_commentaire_vote AS dcv ON (dcv.ce_proposition = dc.id_commentaire) ".
" LEFT JOIN del_observation AS do ON (do.id_observation = dc.ce_observation) ".
"WHERE proposition_retenue = 1 ".
(($this->annee != null) ? "AND YEAR(do.date_transmission) = '{$this->annee}' " : '').
"GROUP BY dc.id_commentaire ".
(($this->annee != null) ? "HAVING MAX(YEAR(dcv.date)) = '{$this->annee}' " : '').
") AS temp)".
" / ".
"(SELECT COUNT(*) ".
"FROM del_observation ".
"WHERE (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 = '') ".
") ".
") ".
(($this->annee != null) ? "AND YEAR(date_transmission) = '{$this->annee}' " : '').
") * 100 AS pourcentage ".
' -- '.__FILE__.' : '.__LINE__;
$resultat = $this->bdd->recupererTous($requete);
return floatval($resultat[0]['pourcentage']);
}
 
// Retourne la moyenne sur l'année du nombre d'actions (commentaire ou vote) par jour
private function getMoyenneActionsParJour() {
// nombre de commentaires sur l'année
$sqlNbreCommentaires = 'SELECT COUNT(*) FROM del_commentaire '.
($this->annee != null ? "WHERE YEAR(date) = '{$this->annee}' " : '');
 
// nombre de votes sur l'année
$sqlNbreVotes = 'SELECT COUNT(*) FROM del_commentaire_vote '.
($this->annee != null ? "WHERE YEAR(date) = '{$this->annee}' " : '');
 
// nombre de jours écoulés dans l'année*
$sqlNbreJours = "SELECT 365 * (YEAR(now()) - MIN(YEAR(date)) + 1) FROM del_commentaire_vote WHERE YEAR(date) != 0 ";
if ($this->annee != null) {
$sqlNbreJours = "SELECT IF(YEAR(CURDATE()) = '{$this->annee}', DAYOFYEAR(CURDATE()), 365) ";
}
 
// nombre d'actions / nombre de jours
$requete = "SELECT ((($sqlNbreCommentaires) + ($sqlNbreVotes)) / ($sqlNbreJours)) AS moyenne ".
' -- '.__FILE__.' : '.__LINE__;
 
$resultat = $this->bdd->recupererTous($requete);
return intval($resultat[0]['moyenne']);
}
 
// Retourne le nombre et la liste des personnes ayant sur l'année une moyenne de participation par mois >= 1
private function getParticipants() {
// Faire la moyenne par utilisateur et par mois
$requete = "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 ".
(($this->annee != null) ? " AND YEAR(date) = '{$this->annee}' " : '').
"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 ce_proposition = '' ".
(($this->annee != null) ? "AND YEAR(date) = '{$this->annee}' " : '').
"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 ".
' -- '.__FILE__.' : '.__LINE__;
 
$resultat = $this->bdd->recupererTous($requete);
$cpt = count($resultat);
$retour = array(
'nombre' => intval($cpt),
'donnees' => $resultat
);
return $retour;
}
}