Subversion Repositories eFlore/Applications.del

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