| New file |
|---|
| 0,0 → 1,972 |
|---|
| <?php |
| // declare(encoding='UTF-8'); |
| /** |
| * Service fournissant des urls vers des images de graphiques sur les statistiques de l'application CEL. |
| * Encodage en entrée : utf8 |
| * Encodage en sortie : utf8 |
| * |
| * Cas d'utilisation : |
| * /CelStatistique/TypeDeGraph : retourne le graphique demandé |
| * |
| * @internal Mininum PHP version : 5.2 |
| * @category CEL |
| * @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 CelStatistique extends Cel { |
| |
| /** |
| * Méthode appelée avec une requête de type GET. |
| */ |
| public function getElement($param) { |
| $graph = null; |
| |
| if (isset($param[0])) { |
| $graph_demande = array_shift($param); |
| $methode = 'get'.$graph_demande; |
| if (method_exists($this, $methode)) { |
| $graph = $this->$methode($param); |
| } else { |
| $this->messages[] = "Ce type de graphique '$graph_demande' n'est pas disponible."; |
| } |
| } else { |
| $this->messages[] = "Le premier paramêtre du service CEL Statistique doit correspondre au type de graphique."; |
| } |
| |
| if (!is_null($graph)) { |
| $url = "http://chart.apis.google.com/chart"; |
| $contexte = stream_context_create( |
| array('http' => array( |
| 'method' => 'POST', |
| 'content' => http_build_query($graph), |
| 'header' => 'Content-Type: application/x-www-form-urlencoded'))); |
| $image = file_get_contents($url, false, $contexte); |
| $this->envoyer($image, 'image/png', null, false); |
| } else { |
| $info = 'Un problème est survenu : '.print_r($this->messages, true); |
| $this->envoyer($info); |
| } |
| } |
| |
| private function getEvolImgLieesParMois($param) { |
| $utilisateur = isset($_GET['utilisateur']) ? Cel::db()->quote($_GET['utilisateur']) : null; |
| |
| // Récupération des données |
| $requete = "SELECT DATE_FORMAT(date_creation, '%Y%m') AS periode, COUNT(id_image) AS nbre ". |
| "FROM cel_images_export ". |
| "WHERE date_creation != '0000-00-00 00:00:00' ". |
| ' AND ce_observation IS NOT NULL AND ce_observation != 0 '. |
| ((isset($utilisateur)) ? " AND courriel_utilisateur = $utilisateur " : ''). |
| 'GROUP BY periode '. |
| 'ORDER BY periode '; |
| |
| $resulats = Cel::db()->requeter($requete); |
| |
| $img_totale = array(); |
| foreach ($resulats as $info) { |
| $img_totale[$info['periode']] = $info['nbre']; |
| } |
| |
| // Trie des dates pour les étiquettes des axes |
| $dates = array(); |
| $annees = array(); |
| $les_mois = array(); |
| $pas = 1; // intervalle de mois entre deux étiquettes |
| $periode = 0; |
| $cumul = 0; |
| $img_totale_cumul = array(); |
| foreach ($img_totale as $annee_mois => $nbre) { |
| $annee = substr($annee_mois, 0, 4); |
| $mois = substr($annee_mois, 4, 2); |
| $mois_fmt_B = strftime('%b', strtotime("0000-$mois-01")); |
| $cumul += $nbre; |
| $img_totale_cumul[$annee_mois] = $cumul; |
| |
| if (!isset($dates[$annee][$mois])) { |
| $annees[] = (!isset($dates[$annee]) ? $annee : ''); |
| $les_mois[] = is_int($periode++ / $pas) ? $mois_fmt_B : ''; |
| // Ajouter au tableau dates tjrs à la fin |
| $dates[$annee][$mois] = 1; |
| } |
| } |
| |
| // Post traitement des données |
| $titre = "Évolution des images liées aux observations par mois"; |
| $valeurs_y = implode(',', $img_totale); |
| $valeurs_r = implode(',', $img_totale_cumul); |
| $valeurs_max_y = max($img_totale); |
| $valeurs_max_r = max($img_totale_cumul); |
| $y_val_fin = $valeurs_max_y; |
| $y_pas = 200; |
| $r_val_fin = $valeurs_max_r; |
| $r_pas = 1000; |
| $etiquettes_x1 = implode('|', $les_mois); |
| $etiquettes_x2 = implode('|', $annees); |
| $etiquettes_y = 'Images'; |
| |
| // Construire de l'url de l'image |
| $graph = array('cht' => 'lc', |
| 'chtt' => $titre, |
| 'chs' => '600x200', |
| 'chco' => '007F00,99CC00', |
| 'chd' => 't:'.$valeurs_y.'|'.$valeurs_r, |
| 'chds' => "0,$valeurs_max_y,0,$valeurs_max_r", |
| 'chxt' => 'y,y,x,x,r', |
| 'chxl' => '1:|'.$etiquettes_y.'|3:|'.$etiquettes_x2.'|2:|'.$etiquettes_x1.'', |
| 'chxp' => '1,50|3,0', |
| 'chxr' => "0,0,$y_val_fin,$y_pas|4,0,$r_val_fin,$r_pas", |
| 'chm' => 'N ** ,000000,0,-1,8,1.0,ht', |
| 'chxs' => '0,007F00|4,99CC00'); |
| return $graph; |
| } |
| |
| private function getEvolImgParMois($param) { |
| $utilisateur = isset($_GET['utilisateur']) ? Cel::db()->quote($_GET['utilisateur']) : null; |
| |
| // Récupération des données |
| $requete = "SELECT DATE_FORMAT(date_creation, '%Y%m') AS periode, COUNT(id_image) AS nbre ". |
| "FROM cel_images_export ". |
| "WHERE date_creation != '0000-00-00 00:00:00' ". |
| ((isset($utilisateur)) ? " AND courriel_utilisateur = $utilisateur " : ''). |
| 'GROUP BY periode '. |
| 'ORDER BY periode '; |
| |
| $resulats = Cel::db()->requeter($requete); |
| |
| $img_totale = array(); |
| foreach ($resulats as $info) { |
| $img_totale[$info['periode']] = $info['nbre']; |
| } |
| |
| // Trie des dates pour les étiquettes des axes |
| $dates = array(); |
| $annees = array(); |
| $les_mois = array(); |
| $pas = 1; // intervalle de mois entre deux étiquettes |
| $periode = 0; |
| $cumul = 0; |
| $img_totale_cumul = array(); |
| foreach ($img_totale as $annee_mois => $nbre) { |
| $annee = substr($annee_mois, 0, 4); |
| $mois = substr($annee_mois, 4, 2); |
| $mois_fmt_B = strftime('%b', strtotime("0000-$mois-01")); |
| $cumul += $nbre; |
| $img_totale_cumul[$annee_mois] = $cumul; |
| |
| if (!isset($dates[$annee][$mois])) { |
| $annees[] = (!isset($dates[$annee]) ? $annee : ''); |
| $les_mois[] = is_int($periode++ / $pas) ? $mois_fmt_B : ''; |
| // Ajouter au tableau dates tjrs à la fin |
| $dates[$annee][$mois] = 1; |
| } |
| } |
| |
| // Post traitement des données |
| $titre = "Évolution du dépôt d'images par mois"; |
| $valeurs_y = implode(',', $img_totale); |
| $valeurs_r = implode(',', $img_totale_cumul); |
| $valeurs_max_y = max($img_totale); |
| $valeurs_max_r = max($img_totale_cumul); |
| $y_val_fin = $valeurs_max_y; |
| $y_pas = 500; |
| $r_val_fin = $valeurs_max_r; |
| $r_pas = 1000; |
| $etiquettes_x1 = implode('|', $les_mois); |
| $etiquettes_x2 = implode('|', $annees); |
| $etiquettes_y = 'Images'; |
| |
| // Construire de l'url de l'image |
| $graph = array('cht' => 'lc', |
| 'chtt' => $titre, |
| 'chs' => '600x200', |
| 'chco' => '007F00,99CC00', |
| 'chd' => 't:'.$valeurs_y.'|'.$valeurs_r, |
| 'chds' => "0,$valeurs_max_y,0,$valeurs_max_r", |
| 'chxt' => 'y,y,x,x,r', |
| 'chxl' => '1:|'.$etiquettes_y.'|3:|'.$etiquettes_x2.'|2:|'.$etiquettes_x1.'', |
| 'chxp' => '1,50|3,0', |
| 'chxr' => "0,0,$y_val_fin,$y_pas|4,0,$r_val_fin,$r_pas", |
| 'chm' => 'h,C3C3C3,0,0.5,1,-1|N ** ,000000,0,-1,8,1.0,ht', |
| 'chxs' => '0,007F00|4,99CC00'); |
| return $graph; |
| } |
| |
| private function getEvolUtilisateurParMois($param) { |
| // Récupération des données |
| $requete = 'SELECT DISTINCT courriel_utilisateur , '. |
| ' MIN(date_creation) AS date_min, MAX(date_creation) AS date_max, '. |
| ' COUNT(id_observation) AS obs_nbre '. |
| 'FROM cel_export_total '. |
| "WHERE date_creation != '0000-00-00 00:00:00' ". |
| " AND courriel_utilisateur LIKE '%@%' ". |
| 'GROUP BY courriel_utilisateur '. |
| 'ORDER BY date_min ASC '; |
| $resultats = Cel::db()->requeter($requete); |
| |
| // Trie des données et des dates pour les étiquettes des axes |
| $dates = array(); |
| $annees = array(); |
| $utilisateurs = array(); |
| $les_mois = array(); |
| $pas = 2; // intervalle de mois entre deux étiquettes |
| $periode = 0; |
| foreach ($resultats as $enrg) { |
| $annee = substr($enrg['date_min'], 0, 4); |
| $mois = substr($enrg['date_min'], 5, 2); |
| $mois_fmt_B = strftime('%b', strtotime("0000-$mois-01")); |
| |
| if (!isset($dates[$annee][$mois])) { |
| $annees[] = (!isset($dates[$annee]) ? $annee : ''); |
| $les_mois[] = is_int($periode++ / $pas) ? $mois_fmt_B : ''; |
| $utilisateurs["$annee-$mois"] = 1; |
| // Ajouter au tableau dates tjrs à la fin |
| $dates[$annee][$mois] = 1; |
| } else { |
| $utilisateurs["$annee-$mois"]++; |
| } |
| } |
| |
| // Post traitement des données |
| $titre = 'Évolution des utilisateurs par mois'; |
| $valeurs = implode(',', $utilisateurs); |
| $valeurs_max = max($utilisateurs); |
| $y_val_fin = $valeurs_max; |
| $y_pas = 5; |
| $etiquettes_x1 = implode('|', $les_mois); |
| $etiquettes_x2 = implode('|', $annees); |
| $etiquettes_y = 'Utilisateurs'; |
| |
| // Construire de l'url de l'image |
| $graph = array('cht' => 'lc', |
| 'chtt' => $titre, |
| 'chs' => '600x200', |
| 'chco' => '0000FF',//4D89F9 |
| 'chd' => 't:'.$valeurs, |
| 'chds' => '0,'.$valeurs_max, |
| 'chxt' => 'y,y,x,x', |
| 'chxl' => '1:|'.$etiquettes_y.'|3:|'.$etiquettes_x2.'|2:|'.$etiquettes_x1.'', |
| 'chxp' => '1,50|3,0', |
| 'chxr' => "0,0,$y_val_fin,$y_pas", |
| 'chm' => 'h,C3C3C3,0,0.5,1,-1|N ** ,000000,0,2::2,8,1.0,ht', |
| 'chxs' => '0,0000FF|1,0000FF'); |
| return $graph; |
| } |
| |
| private function getEvolObsParMoisGlissant($param) { |
| // Récupération des données |
| $format_date = '%Y%m%d'; |
| $where = 'date_creation > DATE_SUB(NOW(), INTERVAL 31 DAY)'; |
| $obs_totale = $this->executerRequeteEvol('cel_export_total', 'id_observation', $format_date, $where); |
| |
| // Tri des dates pour les étiquettes des axes |
| $dates = array(); |
| $annees = array(); |
| $annees_mois = array(); |
| $jours = array(); |
| foreach ($obs_totale as $annee_mois_jours => $nbre) { |
| $annee = substr($annee_mois_jours, 0, 4); |
| $mois = substr($annee_mois_jours, 4, 2); |
| $jour = substr($annee_mois_jours, 6, 2); |
| $annee_mois_fmt_B = strftime('%B %Y', mktime(0, 0, 0, $mois, 1, $annee)); |
| |
| if (!isset($dates[$annee][$mois][$jour])) { |
| $annees_mois[] = (!isset($dates[$annee][$mois]) ? $annee_mois_fmt_B : ''); |
| $jours[] = $jour; |
| // Ajouter au tableau dates tjrs à la fin |
| $dates[$annee][$mois][$jour] = 1; |
| } |
| } |
| |
| // Post traitement des données |
| $titre = 'Évolution des observations sur un mois glissant'; |
| $valeurs_max = max($obs_totale); |
| $valeurs = implode(',', $obs_totale); |
| $y_val_fin = $valeurs_max; |
| $y_pas = round($valeurs_max / 6); |
| $etiquettes_x1 = implode('|', $jours); |
| $etiquettes_x2 = implode('|', $annees_mois); |
| $etiquettes_y2 = 'Observations'; |
| |
| // Construire de l'url de l'image |
| $graph = array('cht' => 'lc', |
| 'chtt' => $titre, |
| 'chs' => '600x200', |
| 'chco' => '822013', |
| 'chd' => 't:'.$valeurs, |
| 'chds' => '0,'.$valeurs_max, |
| 'chxt' => 'y,y,x,x', |
| 'chxl' => '1:|'.$etiquettes_y2.'|2:|'.$etiquettes_x1.'|3:|'.$etiquettes_x2, |
| 'chxp' => '0,0|1,50', |
| 'chxr' => "0,0,$y_val_fin,$y_pas", |
| 'chm' => 'h,C3C3C3,0,0.5,1,-1|N,000000,0,1::1,8,1.0,ht', |
| 'chxs' => '0,822013|1,822013'); |
| |
| return $graph; |
| } |
| |
| private function getEvolObsParMois($param) { |
| // Récupération des données |
| $obs_totale = $this->executerRequeteEvol('cel_export_total', 'id_observation'); |
| |
| // Trie des dates pour les étiquettes des axes |
| $dates = array(); |
| $annees = array(); |
| $les_mois = array(); |
| $pas = 3; // intervalle de mois entre deux étiquettes |
| $periode = 0; |
| $cumul = 0; |
| $obs_totale_cumul = array(); |
| foreach ($obs_totale as $annee_mois => $nbre) { |
| $annee = substr($annee_mois, 0, 4); |
| $mois = substr($annee_mois, 4, 2); |
| $mois_fmt_B = strftime('%b', strtotime("0000-$mois-01")); |
| $cumul += $nbre; |
| $obs_totale_cumul[$annee_mois] = $cumul; |
| |
| if (!isset($dates[$annee][$mois])) { |
| $annees[] = (!isset($dates[$annee]) ? $annee : ''); |
| $les_mois[] = is_int($periode++ / $pas) ? $mois_fmt_B : ''; |
| // Ajouter au tableau dates tjrs à la fin |
| $dates[$annee][$mois] = 1; |
| } |
| } |
| |
| // Post traitement des données |
| $titre = 'Évolution des observations par mois'; |
| $valeurs_y = implode(',', $obs_totale); |
| $valeurs_r = implode(',', $obs_totale_cumul); |
| $valeurs_max_y = max($obs_totale); |
| $valeurs_max_r = max($obs_totale_cumul); |
| $y_val_fin = $valeurs_max_y; |
| $y_pas = round(($valeurs_max_y / 6), 0); |
| $r_val_fin = $valeurs_max_r; |
| $r_pas = round(($valeurs_max_r / 6), 0); |
| $etiquettes_x1 = implode('|', $les_mois); |
| $etiquettes_x2 = implode('|', $annees); |
| $etiquettes_y2 = 'Observations'; |
| $etiquettes_r2 = 'Cumul obs.'; |
| |
| // Construire de l'url de l'image |
| $graph = array('cht' => 'lc', |
| 'chtt' => $titre, |
| 'chs' => '600x200', |
| 'chco' => '822013,F1841D', |
| 'chd' => 't:'.$valeurs_y.'|'.$valeurs_r, |
| 'chds' => "0,$valeurs_max_y,0,$valeurs_max_r", |
| 'chxt' => 'y,y,x,x,r,r', |
| 'chxl' => '1:|'.$etiquettes_y2.'|2:|'.$etiquettes_x1.'|3:|'.$etiquettes_x2.'|5:|'.$etiquettes_r2.'', |
| 'chxp' => '1,50|3,0|5,50', |
| 'chxr' => "0,0,$y_val_fin,$y_pas|4,0,$r_val_fin,$r_pas", |
| 'chm' => 'N ** ,000000,0,2::2,8,1.0,ht', |
| 'chxs' => '0,822013|1,822013|4,F1841D|5,F1841D'); |
| return $graph; |
| } |
| |
| private function getEvolObsParAn($param) { |
| // Récupération des données |
| $obs_totale = $this->executerRequeteEvol('cel_export_total', 'id_observation', '%Y'); |
| |
| // Trie des dates pour les étiquettes des axes |
| $dates = array(); |
| $annees = array(); |
| foreach ($obs_totale as $annee => $nbre) { |
| if (!isset($dates[$annee])) { |
| $annees[] = $annee; |
| $dates[$annee] = 1; |
| } |
| } |
| |
| // Post traitement des données |
| $titre = 'Évolution des observations par année'; |
| $valeurs = implode(',', $obs_totale); |
| $valeurs_max = max($obs_totale); |
| $valeurs_min = min($obs_totale); |
| $y_val_deb = preg_replace('/[0-9]{2}$/', '00', $valeurs_min); |
| $y_val_fin = $valeurs_max; |
| $y_pas = round(($valeurs_max / 6), 0); |
| $etiquettes_x = implode('|', $annees);; |
| $etiquettes_y = 'Observations'; |
| |
| // Construire de l'url de l'image |
| $graph = array('cht' => 'lc', |
| 'chtt' => $titre, |
| 'chs' => '600x200', |
| 'chco' => '822013', |
| 'chd' => 't:'.$valeurs, |
| 'chds' => "$valeurs_min,$valeurs_max", |
| 'chxt' => 'y,y,x', |
| 'chxl' => '1:|'.$etiquettes_y.'|2:|'.$etiquettes_x.'', |
| 'chxp' => '0,0|1,50|2,0', |
| 'chxr' => "0,$y_val_deb,$y_val_fin,$y_pas", |
| 'chm' => 'h,C3C3C3,0,0.5,1,-1|N,000000,0,1::1,8,1.0,ht', |
| 'chxs' => '0,822013|1,822013'); |
| return $graph; |
| } |
| |
| private function getEvolObsHisto($param) { |
| // Récupération des données |
| $obs_totale = $this->executerRequeteEvol('cel_export_total', 'id_observation'); |
| $obs_identifiee = $this->executerRequeteEvol('cel_export_total', 'id_observation', "courriel_utilisateur LIKE '%@%' "); |
| $lignes = array('total', 'obs. identifiée'); |
| |
| // Post traitement des données |
| $titre = 'Évolution des observations'; |
| $valeurs = implode(',', $obs_totale).'|'.implode(',', $obs_identifiee); |
| $valeurs_max = max($obs_totale); |
| $etiquettes = implode('|', array_keys($lignes)); |
| |
| // Construire de l'url de l'image |
| $graph = array('cht' => 'lc', |
| 'chtt' => $titre, |
| 'chs' => '500x300', |
| 'chco' => 'FF0000,00FF00', |
| 'chd' => 't:'.$valeurs, |
| 'chds' => "0,$valeurs_max", |
| 'chxt' => 'y', |
| 'chxl' => '0:|'.$etiquettes.'', |
| 'chm' => 'N,000000,0,-1,10'); |
| return $graph; |
| } |
| |
| private function getNbreObsIdVsTest($param) { |
| // Récupération des données |
| $obs_totale = $this->executerRequeteNombre('cel_export_total', 'id_observation'); |
| $obs_identifiee = $this->executerRequeteNombre('cel_export_total', 'id_observation', "courriel_utilisateur LIKE '%@%' "); |
| $obs_test = $obs_totale - $obs_identifiee; |
| $pourcent_identifiee = round(($obs_identifiee / ($obs_totale / 100)), 2).'%'; |
| $pourcent_anonyme = round(($obs_test / ($obs_totale / 100)), 2).'%'; |
| |
| // Post traitement des données de la base de données |
| $titre = "Nombre d'observations|tests vs. identifiées"; |
| $etiquette_obs_test = "tests ($obs_test - $pourcent_anonyme)"; |
| $etiquette_obs_id = "identifiées ($obs_identifiee - $pourcent_identifiee)"; |
| $donnees = array($etiquette_obs_test => $obs_test, $etiquette_obs_id => $obs_identifiee); |
| $valeurs = implode(',', $donnees); |
| $etiquettes = implode('|', array_keys($donnees)); |
| |
| // Construire les paramêtres de l'url de l'image |
| $graph = array('cht' => 'p3', |
| 'chtt' => $titre, |
| 'chs' => '250x200', |
| 'chco' => 'FF0000,00FF00', |
| 'chd' => 't:'.$valeurs, |
| 'chds' => "0,$obs_totale", |
| 'chdl' => $etiquettes, |
| 'chdlp' => 'bv|r', |
| 'chts' => '000000,12'); |
| return $graph; |
| } |
| |
| private function getNbreObsPublicVsPrivee($param) { |
| // Récupération des données |
| $obs_totale = $this->executerRequeteNombre('cel_export_total', 'id_observation'); |
| $obs_public = $this->executerRequeteNombre('cel_export_total', 'id_observation', 'transmission = 1'); |
| $obs_privee = $obs_totale - $obs_public; |
| $pourcent_privee = round(($obs_privee / ($obs_totale / 100)), 2).'%'; |
| $pourcent_public = round(($obs_public / ($obs_totale / 100)), 2).'%'; |
| |
| // Post traitement des données de la base de données |
| $titre = "Nombre d'observations|publiques vs. privées"; |
| $etiquette_obs_public = "publiques ($obs_public - $pourcent_public)"; |
| $etiquette_obs_privee = "privées ($obs_privee - $pourcent_privee)"; |
| $donnees = array($etiquette_obs_privee => $obs_privee, $etiquette_obs_public => $obs_public); |
| $valeurs = implode(',', $donnees); |
| $etiquettes = implode('|', array_keys($donnees)); |
| |
| // Construire les paramêtres du graph |
| $graph = array('cht' => 'p3', |
| 'chtt' => $titre, |
| 'chs' => '250x200', |
| 'chco' => 'FF0000,00FF00', |
| 'chd' => 't:'.$valeurs, |
| 'chds' => "0,$obs_totale", |
| 'chdl' => $etiquettes, |
| 'chdlp' => 'bv|r', |
| 'chts' => '000000,12'); |
| return $graph; |
| } |
| |
| private function getNbreObsDetermineeVsInconnue($param) { |
| // Récupération des données |
| $obs_totale = $this->executerRequeteNombre('cel_export_total', 'id_observation'); |
| $obs_determinee = $this->executerRequeteNombre('cel_export_total', 'id_observation', 'nom_sel_nn != 0'); |
| $obs_inconnue = $obs_totale - $obs_determinee; |
| $pourcent_determinee = round(($obs_determinee / ($obs_totale / 100)), 2).'%'; |
| $pourcent_inconnue = round(($obs_inconnue / ($obs_totale / 100)), 2).'%'; |
| |
| // Post traitement des données de la base de données |
| $titre = "Nombre d'observations|determinées vs. inconnues"; |
| $etiquette_obs_determinee = "determinées ($obs_determinee - $pourcent_determinee)"; |
| $etiquette_obs_inconnue = "non déterminées ($obs_inconnue - $pourcent_inconnue)"; |
| $donnees = array($etiquette_obs_inconnue => $obs_inconnue, $etiquette_obs_determinee => $obs_determinee); |
| $valeurs = implode(',', $donnees); |
| $etiquettes = implode('|', array_keys($donnees)); |
| |
| // Construire les paramêtres du graph |
| $graph = array('cht' => 'p3', |
| 'chtt' => $titre, |
| 'chs' => '250x200', |
| 'chco' => 'FF0000,00FF00', |
| 'chd' => 't:'.$valeurs, |
| 'chds' => "0,$obs_totale", |
| 'chdl' => $etiquettes, |
| 'chdlp' => 'bv|r', |
| 'chts' => '000000,12'); |
| return $graph; |
| } |
| |
| private function getNbreObsAvecIndicationGeo($param) { |
| // Récupération des données |
| $total = $this->executerRequeteNombre('cel_export_total', 'id_observation'); |
| $where_commune = $this->creerWhereIndicationGeo('zone_geo'); |
| $obs['commune'] = $this->executerRequeteNombre('cel_export_total', 'id_observation', $where_commune); |
| $where_commune_id = $this->creerWhereIndicationGeo('ce_zone_geo'); |
| $obs['commune identifiée'] = $this->executerRequeteNombre('cel_export_total', 'id_observation', $where_commune_id); |
| $where_lieudit = $this->creerWhereIndicationGeo('lieudit'); |
| $obs['lieu-dit'] = $this->executerRequeteNombre('cel_export_total', 'id_observation', $where_lieudit); |
| $where_station = $this->creerWhereIndicationGeo('station'); |
| $obs['station'] = $this->executerRequeteNombre('cel_export_total', 'id_observation', $where_station); |
| $where_milieu = $this->creerWhereIndicationGeo('milieu'); |
| $obs['milieu'] = $this->executerRequeteNombre('cel_export_total', 'id_observation', $where_milieu); |
| $where_xy = $this->creerWhereIndicationGeo('latitude').' AND '.$this->creerWhereIndicationGeo('longitude'); |
| $obs['coordonnée'] = $this->executerRequeteNombre('cel_export_total', 'id_observation', $where_xy); |
| |
| $donnees = array(); |
| $num = 1; |
| foreach ($obs as $etiquette => $nbre) { |
| $pourcent = round(($obs[$etiquette] / ($total / 100)), 1).'%'; |
| $legende = "$num : $etiquette ($nbre - $pourcent)"; |
| $donnees['valeurs'][] = $nbre; |
| $donnees['etiquettes'][] = $num++; |
| $donnees['legendes'][] = $legende; |
| } |
| |
| |
| // Post traitement des données de la base de données |
| $titre = "Nombre d'observations|avec indications géographiques"; |
| $valeurs = implode(',', $donnees['valeurs']); |
| $etiquettes = implode('|', $donnees['etiquettes']); |
| $legendes = implode('|', $donnees['legendes']); |
| |
| // Construire les paramètres du graphe |
| $graph = array('cht' => 'rs', |
| 'chtt' => $titre, |
| 'chs' => '600x300', |
| 'chco' => 'FFFFFF', |
| 'chd' => 't:'.$valeurs, |
| 'chds' => "0,$total", |
| 'chdl' => $legendes, |
| 'chxt' => 'x', |
| 'chxl' => "0:|$etiquettes", |
| //'chxp' => '1,0,20,40,60,80,100',// Grille sous forme de cible |
| 'chm' => 'B,FF000080,0,1.0,5.0'); |
| return $graph; |
| } |
| |
| private function creerWhereIndicationGeo($champ) { |
| $where = null; |
| if (isset($champ)) { |
| $where = "$champ != '000null' ". |
| "AND $champ != '' ". |
| "AND $champ IS NOT NULL "; |
| } |
| return $where; |
| } |
| |
| private function getUtilisationJournaliere($param) { |
| // Sur quel jour, voulons nous estimer l'utilisation |
| $aujourdhui = date('Y-m-d'); |
| if (isset($param[0]) && preg_match('/^[0-9]{4}(?:-[0-9]{2}){2}$/', $param[0])) { |
| $aujourdhui = $param[0]; |
| } |
| $aujourdhui_fmt = strftime('%d %b %Y', strtotime($aujourdhui)); |
| |
| // Récupération des données |
| $max_obs = array(); |
| $max_obs[] = $this->executerRequeteEvol('cel_export_total', 'id_observation', '%Y%m%d', |
| "date_creation NOT LIKE '$aujourdhui%' ", 'date_creation'); |
| $max_obs[] = $this->executerRequeteEvol('cel_export_total', 'id_observation', '%Y%m%d', |
| "date_modification NOT LIKE '$aujourdhui%' ", 'date_modification'); |
| $max_obs[] = $this->executerRequeteEvol('cel_export_total', 'id_observation', '%Y%m%d', |
| "date_transmission NOT LIKE '$aujourdhui%' ", 'date_transmission'); |
| $obs_aujourdhui = $this->executerRequeteNombre('cel_export_total', 'id_observation', |
| "(date_creation LIKE '$aujourdhui%' |
| OR date_modification LIKE '$aujourdhui%' |
| OR date_transmission LIKE '$aujourdhui%') "); |
| |
| // Cummul des obs crées, modifiées, transmises par jour |
| $donnees = array(); |
| foreach ($max_obs as $obs_par_jour) { |
| foreach ($obs_par_jour as $annee_mois_jour => $nbre) { |
| if (!isset($donnees[$annee_mois_jour])) { |
| $donnees[$annee_mois_jour] = $nbre; |
| } else { |
| $donnees[$annee_mois_jour] += $nbre; |
| } |
| } |
| } |
| |
| // Post traitement des données |
| $valeur = $obs_aujourdhui; |
| $valeur_max = 400; |
| if ($valeur > $valeur_max) { |
| $pourcentage = 100; |
| } else { |
| $pourcentage = round(($valeur / ($valeur_max / 100)), 0); |
| } |
| $etiquettes_x = $aujourdhui_fmt; |
| $etiquettes_y = "faible|moyenne|forte"; |
| $titre = "Intensité d'utilisation pour le $aujourdhui_fmt"; |
| $legende = "$valeur changements"; |
| |
| // Construire de l'url de l'image |
| $graph = array('cht' => 'gom', |
| 'chtt' => $titre, |
| 'chdl' => "$legende", |
| 'chdlp' => 'b', |
| 'chs' => '350x200', |
| 'chco' => 'FFFF00,0A7318', |
| 'chls' => '3|10', |
| 'chma' => '0,0,0,0|300,40', |
| 'chd' => 't:'.$pourcentage, |
| 'chxt' => 'x,y', |
| 'chxl' => '0:|'.$etiquettes_x.'|1:|'.$etiquettes_y.'', |
| 'chxp' => '0,50'); |
| return $graph; |
| } |
| |
| private function getNbreObsParUtilisateur($param) { |
| // Récupération des données |
| $requete = 'SELECT courriel_utilisateur, COUNT(id_observation) AS nbre '. |
| 'FROM cel_export_total '. |
| 'GROUP BY courriel_utilisateur '; |
| $utilisateurs = Cel::db()->requeter($requete); |
| |
| // Création des classes d'utilisateurs |
| $classes = array('00->10' => 0, '11->50' => 0, '51->100' => 0, '101->500' => 0, '500->∞' => 0); |
| $donnees['Utilisateurs'] = $classes; |
| $valeur_max = 0; |
| foreach ($utilisateurs as $utilisateur) { |
| $id = $utilisateur['courriel_utilisateur']; |
| $nbre = $utilisateur['nbre']; |
| |
| // Détermination de la classe |
| $classe = ''; |
| if (0 < $nbre && $nbre <= 10) { |
| $classe = '00->10'; |
| } else if (10 < $nbre && $nbre <= 50) { |
| $classe = '11->50'; |
| } else if (50 < $nbre && $nbre <= 100) { |
| $classe = '51->100'; |
| } else if (100 < $nbre && $nbre <= 500) { |
| $classe = '101->500'; |
| } else if (500 < $nbre) { |
| $classe = '500->∞'; |
| } |
| |
| // Détermination du type d'utilisateur |
| if (strstr($id, '@')) { |
| $type = 'Utilisateurs'; |
| // Incrémentation du tableau de données et récupration de la valeur max |
| $donnees[$type][$classe]++; |
| if ($donnees[$type][$classe] > $valeur_max) { |
| $valeur_max = $donnees[$type][$classe]; |
| } |
| } |
| } |
| |
| // Post traitement des données |
| $titre = "Nombre d'observations par utilisateur"; |
| $y1_val_fin = $valeur_max; |
| $y1_pas = '100'; |
| $valeurs = implode(',', $donnees['Utilisateurs']); |
| $etiquettes_x1 = implode('|', array_keys($classes)); |
| $etiquettes_x2 = 'Observations'; |
| $etiquettes_y2 = 'Utilisateurs'; |
| $legendes = implode('|', array_keys($donnees)); |
| |
| // Construire de l'url de l'image |
| $graph = array('cht' => 'bvg', |
| 'chtt' => $titre, |
| 'chs' => '400x200', |
| 'chco' => '00FF00,FF0000', |
| 'chbh' => 'r,0.3,1', |
| 'chd' => 't:'.$valeurs, |
| 'chds' => "0,$valeur_max", |
| 'chxt' => 'x,x,y,y', |
| 'chxl' => '0:|'.$etiquettes_x1.'|1:|'.$etiquettes_x2.'|3:|'.$etiquettes_y2.'', |
| 'chxp' => '1,100|3,100', |
| 'chxr' => "2,0,$y1_val_fin,$y1_pas", |
| 'chm' => 'h,C3C3C3,0,0.5,1,-1|N,000000,0,0::1,8,1.0,e'); |
| //echo '<pre>'.print_r($graph,true).'</pre>'; |
| return $graph; |
| } |
| |
| private function getNbreObsParUtilisateurEtTest($param) { |
| // Récupération des données |
| $requete = 'SELECT courriel_utilisateur, COUNT(id_observation) AS nbre '. |
| 'FROM cel_export_total '. |
| 'GROUP BY courriel_utilisateur '; |
| $utilisateurs = Cel::db()->requeter($requete); |
| |
| // Création des classes d'utilisateurs |
| $classes = array('00->10' => 0, '11->50' => 0, '51->100' => 0, '101->500' => 0, '500->∞' => 0); |
| $donnees['Utilisateurs'] = $classes; |
| $donnees['Tests'] = $classes; |
| $valeur_max = 0; |
| foreach ($utilisateurs as $utilisateur) { |
| $id = $utilisateur['courriel_utilisateur']; |
| $nbre = $utilisateur['nbre']; |
| |
| // Détermination de la classe |
| $classe = ''; |
| if (0 < $nbre && $nbre <= 10) { |
| $classe = '00->10'; |
| } else if (10 < $nbre && $nbre <= 50) { |
| $classe = '11->50'; |
| } else if (50 < $nbre && $nbre <= 100) { |
| $classe = '51->100'; |
| } else if (100 < $nbre && $nbre <= 500) { |
| $classe = '101->500'; |
| } else if (500 < $nbre) { |
| $classe = '500->∞'; |
| } |
| |
| // Détermination du type d'utilisateur |
| if (strstr($id, '@')) { |
| $type = 'Utilisateurs'; |
| } else { |
| $type = 'Tests'; |
| } |
| |
| // Incrémentation du tableau de données et récupration de la valeur max |
| $donnees[$type][$classe]++; |
| if ($donnees[$type][$classe] > $valeur_max) { |
| $valeur_max = $donnees[$type][$classe]; |
| } |
| } |
| |
| // Post traitement des données |
| $titre = "Nombre d'observations par utilisateur et test"; |
| $y1_val_fin = $valeur_max; |
| $y1_pas = '100'; |
| $valeurs = implode(',', $donnees['Utilisateurs']).'|'.implode(',', $donnees['Tests']); |
| $etiquettes_x1 = implode('|', array_keys($classes)); |
| $etiquettes_x2 = 'Observations'; |
| $etiquettes_y2 = 'Utilisateurs'; |
| $legendes = implode('|', array_keys($donnees)); |
| |
| // Construire de l'url de l'image |
| $graph = array('cht' => 'bvg', |
| 'chtt' => $titre, |
| 'chs' => '400x200', |
| 'chco' => '00FF00,FF0000', |
| 'chbh' => 'r,0.3,1', |
| 'chd' => 't:'.$valeurs, |
| 'chds' => "0,$valeur_max", |
| 'chxt' => 'x,x,y,y', |
| 'chxl' => '0:|'.$etiquettes_x1.'|1:|'.$etiquettes_x2.'|3:|'.$etiquettes_y2.'', |
| 'chxp' => '1,100|3,100', |
| 'chxr' => "2,0,$y1_val_fin,$y1_pas", |
| 'chm' => 'h,C3C3C3,0,0.5,1,-1|N,000000,0,0::1,8,1.0,e|N,000000,1,0::1,8,1.0,e', |
| 'chdl' => $legendes, |
| 'chdlp' => 'b'); |
| //echo '<pre>'.print_r($graph,true).'</pre>'; |
| return $graph; |
| } |
| |
| private function getNuagePointsObsParHeureEtJourSemaine($param) { |
| $utilisateur = isset($_GET['utilisateur']) ? Cel::db()->quote($_GET['utilisateur']) : false; |
| |
| // Récupération des données de la base |
| $requete = 'SELECT courriel_utilisateur, DATE_FORMAT(date_creation, "%w-%H") AS periode, (ROUND(LOG10(COUNT(id_observation))) + 1) AS nbre '. |
| 'FROM cel_export_total '. |
| 'WHERE date_creation != "0000-00-00 00:00:00" '. |
| ' AND courriel_utilisateur '.($utilisateur ? "= $utilisateur " : 'LIKE "%@%" '). |
| 'GROUP BY periode, courriel_utilisateur '; |
| $infos = Cel::db()->requeter($requete); |
| |
| // Traitement résulat requête |
| $observations = array(); |
| foreach ($infos as $info) { |
| if (isset($observations[$info['periode']])) { |
| $observations[$info['periode']] += $info['nbre']; |
| } else { |
| $observations[$info['periode']] = $info['nbre']; |
| } |
| } |
| |
| // Postraitement des données |
| // Jour de la semaine |
| $donnees['joursSemaine'] = array(); |
| for ($njs = 0; $njs < 7; $njs++) { |
| $donnees['joursSemaine'][] = strftime('%A', strtotime('2010-05-'.(16+$njs))); |
| } |
| // Heure |
| $donnees['heures'] = array(); |
| for ($h = 0; $h < 24; $h++) { |
| $heure_fmt = sprintf('%02s', $h);// Format numérique 00 |
| $donnees['heures'][] = strftime('%H', strtotime("0000-00-00 $heure_fmt:00:00")); |
| } |
| // Nbre |
| $valeur_max = max($observations); |
| for ($njs = 0; $njs < 7; $njs++) { |
| for ($h = 0; $h < 24; $h++) { |
| $hfmt = sprintf('%02s', $h);// Format numérique 00 |
| $periode = $njs.'-'.$hfmt; |
| $donnees['valeurs_x'][] = round(($h + 1) * (100 / 24), 0); |
| $donnees['valeurs_y'][] = round(($njs + 1) * (100 / 7), 0); |
| $ps = 0; |
| if (isset($observations[$periode])) { |
| $ps = round($observations[$periode] * (100 / $valeur_max), 0); |
| } |
| $donnees['valeurs_ps'][] = $ps; |
| } |
| } |
| //echo '<pre>'.print_r($donnees,true).'</pre>'; |
| // Préparation des paramêtres du graph |
| $titre = "Nombre de création d'observation|par heure et jour de la semaine"; |
| $valeurs = implode(',', $donnees['valeurs_x'])."|".implode(',', $donnees['valeurs_y'])."|".implode(',', $donnees['valeurs_ps']); |
| $etiquettes_x1 = '|'.implode('|', $donnees['heures']); |
| $etiquettes_x2 = 'Heures'; |
| $etiquettes_y1 = '|'.implode('|', $donnees['joursSemaine']); |
| $x_axis_step_size = str_replace(',', '.', (100 / 24)); |
| $y_axis_step_size = str_replace(',', '.', (100 / 7)); |
| |
| // Construction du tableau des paramêtres du graph |
| $graph = array('cht' => 's', |
| 'chtt' => $titre, |
| 'chs' => '400x200', |
| 'chco' => '00FF00', |
| 'chd' => 't:'.$valeurs, |
| 'chxt' => 'x,x,y', |
| 'chxr' => "0,-1,23,1|2,-1,6,1", |
| 'chxp' => '1,100', |
| 'chxl' => '0:|'.$etiquettes_x1.'|1:|'.$etiquettes_x2.'|2:|'.$etiquettes_y1.'', |
| 'chg' => "$x_axis_step_size,$y_axis_step_size,1,5"); |
| //echo '<pre>'.print_r($graph,true).'</pre>'; |
| return $graph; |
| } |
| |
| private function getNuagePointsObsAnciennete($param) { |
| // Récupération des données de la base |
| $requete = 'SELECT DISTINCT courriel_utilisateur , '. |
| ' MIN(date_creation) AS date_min, MAX(date_creation) AS date_max, '. |
| ' COUNT(id_observation) AS obs_nbre '. |
| 'FROM cel_export_total '. |
| "WHERE date_creation != '0000-00-00 00:00:00' ". |
| " AND courriel_utilisateur LIKE '%@%' ". |
| 'GROUP BY courriel_utilisateur '. |
| 'ORDER BY date_min ASC '; |
| $resultats = Cel::db()->requeter($requete); |
| |
| // Trie des données |
| $max_obs = 0; |
| $max_obs_log = 0; |
| $max_anciennete = 0; |
| $donnees = array(); |
| foreach ($resultats as $enrg) { |
| $tps_deb = strtotime($enrg['date_min']); |
| $tps_fin = strtotime($enrg['date_max']); |
| |
| $donnee = array(); |
| if (($tps_fin - $tps_deb) == 0) { |
| $donnee['anciennete'] = 1; |
| } else { |
| $donnee['anciennete'] = round((($tps_fin - $tps_deb) / 86400), 0); |
| } |
| $donnee['obs'] = $enrg['obs_nbre']; |
| $donnee['obs_log'] = log10($enrg['obs_nbre']); |
| $donnees[] = $donnee; |
| |
| $max_obs_log = ($donnee['obs_log'] > $max_obs_log) ? $donnee['obs_log'] : $max_obs_log; |
| $max_obs = ($donnee['obs'] > $max_obs) ? $donnee['obs'] : $max_obs; |
| $max_anciennete = ($donnee['anciennete'] > $max_anciennete) ? $donnee['anciennete'] : $max_anciennete; |
| } |
| |
| // Postraitement des données |
| foreach ($donnees as $donnee) { |
| $donnees['valeurs_x'][] = round($donnee['anciennete'] * (100 / $max_anciennete), 0); |
| $donnees['valeurs_y'][] = round($donnee['obs_log'] * (100 / $max_obs_log), 0); |
| $donnees['valeurs_ps'][] = 20; |
| } |
| |
| // Échelle log des obs |
| $donnees['echelle_y1'] = array(); |
| $pas = $max_obs_log / 100 ; |
| for ($i = 0 ; $i < 5 ; $i++) { |
| $donnees['echelle_y1'][] = round(pow(10, (($i*20) * $pas)), 0); |
| } |
| $donnees['echelle_y1'][] = $max_obs; |
| |
| //echo '<pre>'.print_r($donnees['valeurs_x'],true).'</pre>'; |
| // Préparation des paramêtres du graph |
| $titre = "Répartition des utilisateurs en fonction|du nombre d'observations et de l'ancienneté"; |
| $valeurs = implode(',', $donnees['valeurs_x'])."|".implode(',', $donnees['valeurs_y'])."|".implode(',', $donnees['valeurs_ps']); |
| $etiquettes_x2 = 'Ancienneté en jours'; |
| $etiquettes_y1 = implode('|', $donnees['echelle_y1']); |
| $etiquettes_y2 = 'Observations'; |
| $x_axis_step_size = $max_anciennete; |
| |
| // Construction du tableau des paramêtres du graph |
| $graph = array('cht' => 's', |
| 'chtt' => $titre, |
| 'chs' => '400x200', |
| 'chco' => '0000FF', |
| 'chxt' => 'x,x,y,y', |
| 'chd' => 't:'.$valeurs, |
| 'chxr' => "0,0,$x_axis_step_size|2,0,$max_obs",//|2,0,$y_axis_step_size,$pas |
| 'chxp' => '1,100|3,100', |
| 'chm' => 'h,C3C3C3,0,-0.2,0.2,-1', |
| 'chxl' => '1:|'.$etiquettes_x2.'|2:|'.$etiquettes_y1.'|3:|'.$etiquettes_y2.'');// |
| //echo '<pre>'.print_r($graph,true).'</pre>'; |
| return $graph; |
| } |
| |
| private function executerRequeteEvol($table, $champ, $format_date = '%Y%m', $where = null, $champ_date = 'date_creation', $order_by = null, $limit = null) { |
| $utilisateur = isset($_GET['utilisateur']) ? Cel::db()->quote($_GET['utilisateur']) : false; |
| |
| $requete = "SELECT DATE_FORMAT($champ_date, '$format_date') AS periode, COUNT($champ) AS nbre ". |
| "FROM $table ". |
| "WHERE $champ_date != '0000-00-00 00:00:00' ". |
| (($utilisateur != false) ? " AND courriel_utilisateur = $utilisateur " : ''). |
| ((is_null($where)) ? '' : " AND $where "). |
| 'GROUP BY periode '. |
| ((is_null($order_by)) ? '' : "ORDER BY $order_by "); |
| ((is_null($limit)) ? '' : "LIMIT $limit "); |
| |
| $evolution = Cel::db()->requeter($requete); |
| |
| // Traitement du tableau |
| $donnees_traitees = array(); |
| foreach ($evolution as $info) { |
| $donnees_traitees[$info['periode']] = $info['nbre']; |
| } |
| |
| return $donnees_traitees; |
| } |
| |
| private function executerRequeteNombre($table, $champ, $where = null) { |
| $utilisateur = null; |
| if (isset($_GET['utilisateur'])) { |
| $utilisateur = Cel::db()->quote($_GET['utilisateur']); |
| $where = isset($where) ? $where.' AND ' : ''; |
| $where .= "courriel_utilisateur = $utilisateur "; |
| } |
| |
| $requete = "SELECT COUNT($champ) AS nbre ". |
| "FROM $table ". |
| ((isset($where)) ? "WHERE $where " : ''); |
| |
| $nbre = Cel::db()->requeterValeurUnique($requete); |
| return $nbre; |
| } |
| } |
| ?> |