<?php
/**
 * Service fournissant des urls vers des images de graphiques sur les statistiques de l'application COEL.
 * Encodage en entrée : utf8
 * Encodage en sortie : utf8
 * 
 * Cas d'utilisation :
 * /CoelStatistique/MonTypeDeStat : retourne la balise html image du graphique pour le type de statistique demandé
 * /CoelStatistique/MonTypeDeStat/MonIdProjet : retourne la balise html image du graphique pour le type de statistique 
 * demandé et le projet indiqué.
 * ?html=non : ce paramètre ajouté en fin d'url, force le retour de l'url du graphique sans la balise html img 
 * 
 * @author Jean-Pascal MILCENT <jpm@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>
 * @version $Id$
 * @copyright 2009
 */
class CoelStatistique extends Coel {
	
	const META_CODE_FRANCE = 2654;
	const META_LISTE_SIECLE = 1040;// Liste des siècles pour les collections naturalistes
	const META_LISTE_TYPE_HERBIER = 1083;// Liste des types de collection botanique 
	private $parametres = array();
	private $url_serveur_graph_tpl = 'http://%schart.apis.google.com/chart';
	
	/**
	 * Méthode appelée avec une requête de type GET.
	 */
	public function getElement($param) {
		$graph = null;
		
		if (isset($param[0])) {
			$service_demande = array_shift($param);
			$this->parametres = $param;
			$methode = 'get'.$service_demande;
			if (method_exists($this, $methode)) {
				$graph = $this->$methode();
			}
		} else {
			$this->messages[] = "Le service COEL Statistique nécessite un paramètre.";
		}
		
		if (!is_null($graph)) {
			if ((!isset($_GET['html']) || $_GET['html'] == 'oui')) {
				// Nous retournons une balise HTML img
				$url = $this->construireUrlGraph($graph);
				$html = '<img src="'.$url.'"/>';
				$this->envoyerHTML($html);
			} else {
				// Nous retournons une image
				$contexte = stream_context_create(
					array('http' => array(
	      				'method' => 'POST',
	      				'content' => http_build_query($graph))));
				$image = file_get_contents($this->getUrlServeurGraph(), false, $contexte);
				$this->envoyer($image, 'image/png', null, false);
			}
		} else {
			$info = 'Un problème est survenu : '.print_r($this->messages, true);
			$this->envoyerHTML($info);
		}
	}
	
	private function getUrlServeurGraphPrincipal() {
		$url = sprintf($this->url_serveur_graph_tpl, '');
		return $url;
	}
	
	private function getUrlServeurGraph() {
		$url = sprintf($this->url_serveur_graph_tpl, rand(0, 9).'.');
		return $url;
	}
	
	private function construireUrlGraph($graph) {
		$graph = $this->protegerGraphPourUrl($graph);
		
		$url_parametres = array();
		foreach ($graph as $cle => $valeur) {
			$url_parametres[] = "$cle=$valeur";
		}
		$url = $this->getUrlServeurGraphPrincipal().'?'.implode('&', $url_parametres);
		return $url;
	}
	
	private function protegerGraphPourUrl($graph) {
		if (isset($graph['chtt'])) {
			$graph['chtt'] = str_replace(' ', '+', $graph['chtt']);
		}
		return $graph;
	}
	
	private function existerParametre($numero) {
		$exister = (isset($this->parametres[$numero]) && $this->parametres[$numero] != '*') ? true : false;
		return $exister;
	}
	
	private function getNombreDonnees() {
		// Récupération des données
		$types = array(	array('Commentaires', 'commentaire', 'ccm'),
						array('Publications', 'publication', 'cpu'),
						array('Personnes', 'personne', 'cp'),
						array('Collections', 'collection', 'cc'),
						array('Structures', 'structure', 'cs'));
		$donnees = array();
		foreach ($types as $info) {
			list($type, $table, $champ) = $info;
			$donnees[$type] = $this->executerRequeteNombre($table, $champ);
		}
		
		// Post traitement des données de la base de données
		asort($donnees);
		$valeurs = implode(',', $donnees);
		arsort($donnees);
		$etiquettes = implode('|', array_keys($donnees));
		
		// Paramètres du graphique
		$graph = array(
			'cht' => 'bhs',
			'chs' => '290x210',
			'chco' => '264327|5D7E2D|84A435|B5CD75|DFF1B3',// Source : Broccoli par DandL : http://www.colourlovers.com/palette/1371426/Broccoli
			'chd' => "t:$valeurs",
			'chds' => '0,'.max($donnees),
			'chxt' => 'y',
			'chxl' => "0:|$etiquettes|",
			'chm' => 'N ** ,000000,0,-1,10',
			'chtt' => 'Nombre de données');
		return $graph;
	}
	
	private function executerRequeteNombre($entite, $abr) {
		$table = 'coel_'.$entite;
		$champ_id = $abr.'_id_'.$entite;
		$champ_projet = $abr.'_ce_projet';
		$projet_id = (isset($this->parametres[0]) ? $this->bdd->quote($this->parametres[0]) : null);
		
		$requete = "SELECT COUNT($champ_id) AS nbre ".
			"FROM $table ".
			(is_null($projet_id) ? '' : "WHERE $champ_projet = $projet_id ");
		try {
			$nbre = $this->bdd->query($requete)->fetchColumn();
			if ($nbre === false) {
				$this->messages[] = "La requête a retourné aucun résultat.";
			}
		} catch (PDOException $e) {
			$this->messages[] = sprintf($this->getTxt('sql_erreur'), $e->getFile(), $e->getLine(), $e->getMessage());
		}
		return $nbre;
	}

	private function getMesDonnees() {
		// Récupération des données
		$types = array(	'Commentaires' => array('107', 'ccm'),
						'Publications' => array('118, 119', 'cpu,cpuap'),
						'Personnes' => array('113, 114', 'cp,cpar'),
						'Collections' => array('101, 102, 103, 104, 106', 'cc,ccac,ccap,ccapu,ccb'),
						'Structures' => array('120, 121, 122, 123', 'cs,csap,csc,csv'));
		$etats = array(1 => 'Ajouts',
						2 => 'Modifications',
						3 => 'Suppressions');
		$donnees = array();
		foreach ($types as $type => $tables_parametres) {
			$tables_infos['identifiants'] = $tables_parametres[0];
			$tables_infos['abreviations'] = $tables_parametres[1];
			foreach ($etats as $etat_id => $etat_type) {
				$donnees[$etat_type][$type] = $this->executerRequeteNombreDansHistorique($tables_infos, $etat_id);
			}
		}
		
		// Post traitement des données de la base de données
		$max_global = array();
		$ensembles_donnees = array();
		foreach ($donnees as $ensemble_donnees) {
			$ensembles_donnees[] = implode(',', array_reverse($ensemble_donnees));
			
			// Gestion de l'échelle
			foreach ($ensemble_donnees as $type => $val) {
				if (!isset($max_global[$type])) {
					$max_global[$type] = 0;
				}
				$max_global[$type] += $val;
			}
		}
		$maximum = max($max_global);
		$moitier = round(($maximum / 2), 1);
		$valeurs = implode('|', $ensembles_donnees);
		$etiquettes = implode('|', array_keys($types));
		$legende = implode('|', $etats);
		$etiquettes_x = "0|$moitier|$maximum";
		$titre = $this->existerParametre(0) ? 'Ma participation' : 'Participation';
		$titre .= $this->existerParametre(1) ? ' au projet' : ' tous projets confondus';
		  
		// Paramètres du graphique
		$graph = array(
			'cht' => 'bhg',
			'chs' => '290x210',
			'chbh' => 'a,2,4',
			'chco' => '66B032,FABC02,FE2712',
			'chdl' => $legende,
			'chdlp' => 'r',
			'chd' => "t:$valeurs",
			'chds' => "0,$maximum",
			'chxt' => 'y,x',
			'chxl' => "0:|$etiquettes|1:|$etiquettes_x",
			'chm' => 'N,000000,0,-1,10,1|N,000000,1,-1,10,1|N,000000,2,-1,10,1',
			'chtt' => $titre);
		
		return $graph;
	}
	
	private function executerRequeteNombreDansHistorique($tables_infos, $etat) {
		// Récupération des paramêtres
		$personne_id = (isset($this->parametres[0]) && $this->parametres[0] != '*') ? $this->bdd->quote($this->parametres[0]) : null;
		$projet_id = (isset($this->parametres[1]) && $this->parametres[1] != '*') ? $this->bdd->quote($this->parametres[1]) : null;
		
		// Construction du Xpath si nécessaire
		if (isset($projet_id)) {
			$squelette = '//row[1]/%s_ce_projet';
			$abreviations = explode(',', $tables_infos['abreviations']);
			$xpath = array();
			foreach ($abreviations as $abr) {
				$xpath[] = sprintf($squelette, $abr);
			}
			$xpath = implode(' | ', $xpath);
		}
		
		// Récupération des données
		$requete = 	"SELECT COUNT(cmhl_date_modification) AS nbre ".
					"FROM coel_meta_historique_ligne ".
					"WHERE cmhl_ce_table IN ({$tables_infos['identifiants']}) ".
					"	AND cmhl_ce_etat = $etat ".
					(isset($personne_id) ? "	AND cmhl_ce_modifier_par = $personne_id " : '').
					(isset($projet_id) ? "	AND ExtractValue(cmhl_enregistrement, '$xpath') = $projet_id " : '');
		try {
			$nbre = $this->bdd->query($requete)->fetchColumn();
			if ($nbre === false) {
				$this->messages[] = "La requête a retourné aucun résultat.";
			}
		} catch (PDOException $e) {
			$this->messages[] = sprintf($this->getTxt('sql_erreur_requete'), $e->getFile(), $e->getLine(), $e->getMessage(), $requete);
		}
		return $nbre;
	}
	
	private function getTypeDepot() {
		// Récupération des paramêtres
		$projet_id = (isset($this->parametres[0]) ? $this->bdd->quote($this->parametres[0]) : null);
		
		// Récupération des données
		$requete = 	'SELECT cmlv_nom AS type, COUNT(cc_ce_type_depot) AS nbre '.
					'FROM coel_collection '.
					'	LEFT JOIN coel_meta_liste_valeur ON (cc_ce_type_depot = cmlv_id_valeur) '.
					( is_null($projet_id) ? '' : "WHERE cc_ce_projet = $projet_id ").
					'GROUP BY cc_ce_type_depot';
		try {
			$infos = $this->bdd->query($requete)->fetchAll(PDO::FETCH_ASSOC);
			if ($infos === false) {
				$this->messages[] = "La requête a retourné aucun résultat.";
			}
		} catch (PDOException $e) {
			$this->messages[] = sprintf($this->getTxt('sql_erreur'), $e->getFile(), $e->getLine(), $e->getMessage());
		}
		
		// Post traitement des données de la base de données
		$donnees = array();
		foreach ($infos as $info) {
			if ($info['type'] != '') {
				$cle = $info['type'];
			} else {
				$cle = 'Non renseigné';
			}
			$donnees[$cle] = $info['nbre'];
		}
		asort($donnees);
		$valeurs = implode(',', $donnees);
		arsort($donnees);
		$etiquettes = implode('|', array_keys($donnees));
		
		// Paramètres du graphique
		$graph = array(
			'cht' => 'bhs',
			'chs' => '290x210',
			'chco' => '264327|5D7E2D|84A435|B5CD75|DFF1B3',
			'chd' => "t:$valeurs",
			'chds' => '0,'.(max($donnees)+5),
			'chxt' => 'y',
			'chxl' => "0:|$etiquettes|",
			'chm' => 'N *,000000,0,-1,10',
			'chtt' => 'Type de dépôt|des collections',
			'chts' => '000000,12');
		
		return $graph;
	}
	
	private function getNombreCollectionParStructure() {
		// Récupération des paramêtres
		$projet_id = (isset($this->parametres[0]) ? $this->bdd->quote($this->parametres[0]) : null);
		
		// Récupération des données
		$requete = 	'SELECT COUNT(cc_id_collection) AS nbre '.
					'FROM coel_collection '.
					( is_null($projet_id) ? '' : "WHERE cc_ce_projet = $projet_id ").
					'GROUP BY cc_ce_structure ';
		
		try {
			$infos = $this->bdd->query($requete)->fetchAll(PDO::FETCH_ASSOC);
			if ($infos === false) {
				$this->messages[] = "La requête a retourné aucun résultat.";
			} else if (count($infos) == 0) {
				$this->messages[] = "Aucune collection n'est référencée dans ce projet.";
			}
		} catch (PDOException $e) {
			$this->messages[] = sprintf($this->getTxt('sql_erreur'), $e->getFile(), $e->getLine(), $e->getMessage());
		}
		
		// Post traitement des données de la base de données
		$donnees = array(	'1 collection' => 0, 
							'2 collections' => 0, 
							'Entre 3 et 10' => 0,
							'Entre 11 et 50' => 0,
							'Plus de 50' => 0);
		foreach ($infos as $info) {
			$nbre = $info['nbre'];
			if ($nbre == 1) {
				$donnees['1 collection']++;
			} else if ($nbre == 2) {
				$donnees['2 collections']++;
			} else if ($nbre >= 3 && $nbre <= 10) {
				$donnees['Entre 3 et 10']++;
			} else if ($nbre >= 11 && $nbre <= 50) {
				$donnees['Entre 11 et 50']++;
			} else if ($nbre > 50) {
				$donnees['Plus de 50']++;
			}
			
		}
		
		$donnees_tmp = $donnees;
		$donnees = array();
		foreach ($donnees_tmp as $cle => $valeur) {
			$donnees[$cle.' ('.$valeur.')'] = $valeur;
		}
		asort($donnees);
		$valeurs = implode(',', $donnees);
		//arsort($donnees);
		$etiquettes = implode('|', array_keys($donnees));
		//$legende = implode('|', array_keys($donnees));
		
		// Paramètres du graphique
		$graph = array(
			'cht' => 'p3',
			'chs' => '400x225',
			'chco' => 'EDC951|DEB0DB|DEC9B0|B0DEB3|B0C4DE|B0B0DE|927CBA',
			'chd' => "t:$valeurs",
			'chds' => '0,'.max($donnees),
			'chdl' => $etiquettes,
			'chtt' => 'Nombre de collections|par institution',
			'chts' => '000000,12');
		
		return $graph;
	}
	
	private function getNombrePartParStructure() {
		// Récupération des paramêtres
		$projet_id = (isset($this->parametres[0]) ? $this->bdd->quote($this->parametres[0]) : null);
		
		// Récupération des données
		$requete = 	'SELECT cc_ce_structure, ccb_truk_unite_base '.
					'FROM coel_collection_botanique '.
					'	LEFT JOIN coel_collection ON (ccb_id_collection = cc_id_collection) '.
					( is_null($projet_id) ? '' : "WHERE cc_ce_projet = $projet_id ");
		
		try {
			$infos = $this->bdd->query($requete)->fetchAll(PDO::FETCH_ASSOC);
			if ($infos === false) {
				$this->messages[] = "La requête a retourné aucun résultat.";
			} else if (count($infos) == 0) {
				$this->messages[] = "Aucune collection n'est référencée dans ce projet.";
			}
		} catch (PDOException $e) {
			$this->messages[] = sprintf($this->getTxt('sql_erreur'), $e->getFile(), $e->getLine(), $e->getMessage());
		}
		
		// Post traitement des données de la base de données
		// Extraction du nombre de part
		$structures = array();
		foreach ($infos as $info) {
			if (!isset($structures[$info['cc_ce_structure']])) {
				$structures[$info['cc_ce_structure']] = 0;
			}
			$structures[$info['cc_ce_structure']] += UtilTruck::extraireNbrePart($info['ccb_truk_unite_base']);
		}

		// Triage par classe
		$donnees = array(	'0 part' => 0, 
							'Entre 1 et 100' => 0, 
							'Entre 101 et 1000' => 0,
							'Entre 1001 et 10.000' => 0,
							'Entre 10.001 et 100.000' => 0,
							'Entre 100.001 et 300.000' => 0,
							'Supérieur à 300.000' => 0);
		foreach ($structures as $nbre) {
			if ($nbre == 0) {
				$donnees['0 part']++;
			} else if ($nbre >= 1 && $nbre <= 100) {
				$donnees['Entre 1 et 100']++;
			} else if ($nbre >= 101 && $nbre <= 1000) {
				$donnees['Entre 101 et 1000']++;
			} else if ($nbre >= 1001 && $nbre <= 10000) {
				$donnees['Entre 1001 et 10.000']++;
			} else if ($nbre >= 10001 && $nbre <= 100000) {
				$donnees['Entre 10.001 et 100.000']++;
			} else if ($nbre >= 100001 && $nbre <= 300000) {
				$donnees['Entre 100.001 et 300.000']++;
			} else if ($nbre >= 300001) {
				$donnees['Supérieur à 300.000']++;
			}
		}
		
		$donnees_tmp = $donnees;
		$donnees = array();
		foreach ($donnees_tmp as $cle => $valeur) {
			$donnees[$cle.' ('.$valeur.')'] = $valeur;
		}
		$donnees = array_reverse($donnees, true);
		$legende = implode('|', array_keys($donnees));
		$valeurs = implode(',', $donnees);
				
		// Paramètres du graphique
		$graph = array(
			'cht' => 'p3',
			'chs' => '400x225',
			'chco' => 'EDC951|DEB0DB|DEC9B0|B0DEB3|B0C4DE|B0B0DE|927CBA',//4D89F9 ou EDC951|DEB0DB|DEC9B0|B0DEB3|B0C4DE|B0B0DE|DEBAB0 ou B02B2C|D15600|C79810|73880A|6BBA70|3F4C6B|356AA0
			'chd' => "t:$valeurs",
			'chds' => '0,'.max($donnees),
			'chdl' => $legende,
			'chdlp' => 'r,0,1,2,3,4,5',
			'chtt' => 'Nombre de parts conservées |par institution',
			'chts' => '000000,11.5',
			'chts' => '000000,12');
		
		return $graph;
	}
	
	private function getNombrePartParCollection() {
		// Récupération des paramêtres
		$projet_id = (isset($this->parametres[0]) ? $this->bdd->quote($this->parametres[0]) : null);
		
		// Récupération des données
		$requete = 	'SELECT ccb_truk_unite_base '.
					'FROM coel_collection_botanique '.
					( is_null($projet_id) ? '' : '	LEFT JOIN coel_collection ON (ccb_id_collection = cc_id_collection) ').
					( is_null($projet_id) ? '' : "WHERE cc_ce_projet = $projet_id ");
		
		try {
			$infos = $this->bdd->query($requete)->fetchAll(PDO::FETCH_ASSOC);
			if ($infos === false) {
				$this->messages[] = "La requête a retourné aucun résultat.";
			} else if (count($infos) == 0) {
				$this->messages[] = "Aucune collection n'est référencée dans ce projet.";
				$infos == false;
			}
		} catch (PDOException $e) {
			$this->messages[] = sprintf($this->getTxt('sql_erreur'), $e->getFile(), $e->getLine(), $e->getMessage());
		}
		
		$graph = null;
		if ($infos !== false) {
			// Post traitement des données de la base de données
			// Extraction du nombre de part
			$collections = array();
			foreach ($infos as $info) {
				$collections[] = UtilTruck::extraireNbrePart($info['ccb_truk_unite_base']);
			}
	
			// Triage par classe
			$donnees = array(	'0 part' => 0, 
								'Entre 1 et 100' => 0, 
								'Entre 101 et 1000' => 0,
								'Entre 1001 et 10.000' => 0,
								'Entre 10.001 et 100.000' => 0,
								'Entre 100.001 et 300.000' => 0,
								'Supérieur à 300.000' => 0);
			foreach ($collections as $nbre) {
				if ($nbre == 0) {
					$donnees['0 part']++;
				} else if ($nbre >= 1 && $nbre <= 100) {
					$donnees['Entre 1 et 100']++;
				} else if ($nbre >= 101 && $nbre <= 1000) {
					$donnees['Entre 101 et 1000']++;
				} else if ($nbre >= 1001 && $nbre <= 10000) {
					$donnees['Entre 1001 et 10.000']++;
				} else if ($nbre >= 10001 && $nbre <= 100000) {
					$donnees['Entre 10.001 et 100.000']++;
				} else if ($nbre >= 100001 && $nbre <= 300000) {
					$donnees['Entre 100.001 et 300.000']++;
				} else if ($nbre >= 300001) {
					$donnees['Supérieur à 300.000']++;
				}
			}
			
			$donnees_tmp = $donnees;
			$donnees = array();
			foreach ($donnees_tmp as $cle => $valeur) {
				$donnees[$cle.' ('.$valeur.')'] = $valeur;
			}
			$donnees = array_reverse($donnees, true);
			$legende = implode('|', array_keys($donnees));
			$valeurs = implode(',', $donnees);
					
			// Paramètres du graphique
			$graph = array(
				'cht' => 'p3',
				'chs' => '400x225',
				'chco' => 'EDC951|DEB0DB|DEC9B0|B0DEB3|B0C4DE|B0B0DE|927CBA',
				'chd' => "t:$valeurs",
				'chds' => '0,'.max($donnees),
				'chdl' => $legende,
				'chdlp' => 'r,0,1,2,3,4,5',
				'chtt' => 'Nombre de parts conservées |par collection',
				'chts' => '000000,11.5',
				'chts' => '000000,12');
		}
		return $graph;
	}
	
	private function getNombreCollectionParDepartement() {
		// Récupération des paramêtres
		$projet_id = (isset($this->parametres[0]) ? $this->bdd->quote($this->parametres[0]) : null);
		if ($projet_id !== null) {
			// Récupération des données
			$requete = 	'SELECT cs_code_postal '.
						'FROM coel_collection '.
						'	LEFT JOIN coel_structure ON (cc_ce_structure = cs_id_structure) '.
						'WHERE cs_ce_truk_pays = '.self::META_CODE_FRANCE.' '.
						( is_null($projet_id) ? '' : "	AND cc_ce_projet = $projet_id ");
			
			try {
				$infos = $this->bdd->query($requete)->fetchAll(PDO::FETCH_ASSOC);
				if ($infos === false) {
					$this->messages[] = "La requête a retourné aucun résultat.";
				} else if (count($infos) == 0) {
					$this->messages[] = "Aucune collection n'est référencée dans ce projet.";
					$infos == false;
				}
			} catch (PDOException $e) {
				$this->messages[] = sprintf($this->getTxt('sql_erreur'), $e->getFile(), $e->getLine(), $e->getMessage());
			}
			
			$graph = null;
			if ($infos !== false) {
				// Post traitement des données de la base de données
				// Extraction du nombre de part
				$donnees = array();
				foreach ($infos as $info) {
					if (preg_match('/^([0-8][0-9]|9[0-5]|97[1-4]|976)/', $info['cs_code_postal'], $match)) {
						if (! isset($donnees[$match[1]])) {
							$donnees[$match[1]] = 1; 
						} else {
							$donnees[$match[1]]++;
						}
					}
				}
				
				$donnees_tmp = $donnees;
				$donnees = array();
				foreach ($donnees_tmp as $cle => $valeur) {
					$donnees[$cle.' ('.$valeur.' collections)'] = $valeur;
				}
				
				asort($donnees);
				$valeurs = implode(',', $donnees);
				$legende = implode('|', array_keys($donnees));		
				
				// Paramètres du graphique
				$graph = array(
					'cht' => 'p3',
					'chs' => '400x225',
					'chco' => 'EDC951|DEB0DB|DEC9B0|B0DEB3|B0C4DE|B0B0DE|927CBA',
					'chd' => "t:$valeurs",
					'chds' => '0,'.max($donnees),
					'chdl' => $legende,
					'chtt' => 'Nombre de collections conservées |par département',
					'chts' => '000000,11.5',
					'chts' => '000000,12');
			}
		} else {
			$this->messages[] = "Veuillez sélectionner un projet pour voir le graphique.";
		}
		return $graph;
	}
	
	private function getNombreCollectionParTypeStructure() {
		// Récupération des paramêtres
		$projet_id = (isset($this->parametres[0]) ? $this->bdd->quote($this->parametres[0]) : null);

		// Récupération des données
		$requete = 	'SELECT cmlv_prive.cmlv_nom AS type_prive, cmlv_public.cmlv_nom  AS type_public '.
					'FROM coel_collection '.
					'	LEFT JOIN coel_structure ON (cc_ce_structure = cs_id_structure) '.
					'	LEFT JOIN coel_meta_liste_valeur AS cmlv_prive ON (cs_ce_truk_type_prive = cmlv_prive.cmlv_id_valeur) '.
					'	LEFT JOIN coel_meta_liste_valeur AS cmlv_public ON (cs_ce_truk_type_public = cmlv_public.cmlv_id_valeur) '.
					( is_null($projet_id) ? '' : "WHERE cc_ce_projet = $projet_id ");
		
		try {
			$infos = $this->bdd->query($requete)->fetchAll(PDO::FETCH_ASSOC);
			if ($infos === false) {
				$this->messages[] = "La requête a retourné aucun résultat.";
			} else if (count($infos) == 0) {
				$this->messages[] = "Aucune collection n'est référencée dans ce projet.";
				$infos == false;
			}
		} catch (PDOException $e) {
			$this->messages[] = sprintf($this->getTxt('sql_erreur'), $e->getFile(), $e->getLine(), $e->getMessage());
		}
		//Coel::debug($infos);
		$graph = null;
		if ($infos !== false) {
			// Post traitement des données de la base de données
			// Extraction du nombre de part
			$donnees = array();
			foreach ($infos as $info) {
				if ($info['type_prive'] != '') {
					$cle = $info['type_prive'].' [privé]'; 
				} else if ($info['type_public'] != '') {
					$cle = $info['type_public'].' [public]';
				} else {
					$cle = 'Non renseignées';
				}
				if (! isset($donnees[$cle])) {
					$donnees[$cle] = 1;
				} else {
					$donnees[$cle]++;
				}
			}
			
			$donnees_tmp = $donnees;
			$donnees = array();
			foreach ($donnees_tmp as $cle => $valeur) {
				$donnees[$cle.' ('.$valeur.')'] = $valeur;
			}
			
			asort($donnees);
			$valeurs = implode(',', $donnees);
			$legende = implode('|', array_keys($donnees));		
			
			// Paramètres du graphique
			$graph = array(
				'cht' => 'p3',
				'chs' => '400x225',
				'chco' => 'EDC951|DEB0DB|DEC9B0|B0DEB3|B0C4DE|B0B0DE|927CBA',
				'chd' => "t:$valeurs",
				'chds' => '0,'.max($donnees),
				'chdl' => $legende,
				'chtt' => "Collections conservées |par type d'institution",
				'chts' => '000000,11.5',
				'chts' => '000000,12');
		}
		return $graph;
	}
	
	private function getNombreCollectionParPeriode() {
		// Récupération des paramêtres
		$projet_id = (isset($this->parametres[0]) ? $this->bdd->quote($this->parametres[0]) : null);

		// Récupération des données
		$requete = 	'SELECT cc_truk_periode_constitution '.
					'FROM coel_collection '.
					( is_null($projet_id) ? '' : "WHERE cc_ce_projet = $projet_id ");
		try {
			$infos = $this->bdd->query($requete)->fetchAll(PDO::FETCH_ASSOC);
			if ($infos === false) {
				$this->messages[] = "La requête a retourné aucun résultat.";
			} else if (count($infos) == 0) {
				$this->messages[] = "Aucune collection n'est référencée dans ce projet.";
				$infos == false;
			}
		} catch (PDOException $e) {
			$this->messages[] = sprintf($this->getTxt('sql_erreur'), $e->getFile(), $e->getLine(), $e->getMessage());
		}
		//Coel::debug($infos);
		
		// Récupération des métadonnées nécessaires
		$requete = 	'SELECT cmlv_id_valeur, cmlv_nom, cmlv_abreviation '.
					'FROM coel_meta_liste_valeur '.
					'WHERE cmlv_ce_parent = '.self::META_LISTE_SIECLE.' ';
		try {
			$metadonnees = $this->bdd->query($requete)->fetchAll(PDO::FETCH_ASSOC);
			if ($metadonnees === false) {
				$this->messages[] = "La requête de recherche des métadonnées a retourné aucun résultat.";
			}
		} catch (PDOException $e) {
			$this->messages[] = sprintf($this->getTxt('sql_erreur'), $e->getFile(), $e->getLine(), $e->getMessage());
		}
		
		$graph = null;
		if ($infos !== false) {
			// Traitement des métadonées
			$periodes = array(0 => array('nom' => 'Non renseigné', 'abr' => 0));
			foreach ($metadonnees as $meta) {
				$periodes[$meta['cmlv_id_valeur']] = array('nom' => $meta['cmlv_nom'], 'abr' => $meta['cmlv_abreviation']);
			}
			
			// Post traitement des données de la base de données
			$donnees = array();
			foreach ($infos as $info) {
				// Récupération de la période de début de constitution
				$truk_periodes = explode(';;', $info['cc_truk_periode_constitution']);
				$periode_abr_mini = 10;
				$periode_id_mini = 0;
				foreach ($truk_periodes as $periode_id) {
					if (! empty($periode_id)) {
						if ($periode_abr_mini > $periodes[$periode_id]['abr']) {
							$periode_abr_mini = $periodes[$periode_id]['abr'];
							$periode_id_mini = $periode_id;
						}
					}
				}
				
				// Augmentation du nombre de collection par période 
				if (! isset($donnees[$periodes[$periode_id_mini]['nom']])) {
					$donnees[$periodes[$periode_id_mini]['nom']] = 1;
				} else {
					$donnees[$periodes[$periode_id_mini]['nom']]++;
				}
			}
			
			$donnees_tmp = $donnees;
			$donnees = array();
			foreach ($donnees_tmp as $cle => $valeur) {
				$donnees[$cle.' ('.$valeur.')'] = $valeur;
			}
			
			asort($donnees);
			$valeurs = implode(',', $donnees);
			$legende = implode('|', array_keys($donnees));
			
			// Paramètres du graphique
			$graph = array(
				'cht' => 'p3',
				'chs' => '400x225',
				'chco' => 'EDC951|DEB0DB|DEC9B0|B0DEB3|B0C4DE|B0B0DE|927CBA',
				'chd' => "t:$valeurs",
				'chds' => '0,'.max($donnees),
				'chdl' => $legende,
				'chtt' => "Collections recensées par|siècle de constitution",
				'chts' => '000000,11.5',
				'chts' => '000000,12');
		}
		return $graph;
	}
	
	private function getNombreHerbierParType() {
		// Récupération des paramêtres
		$projet_id = (isset($this->parametres[0]) ? $this->bdd->quote($this->parametres[0]) : null);

		// Récupération des données
		$requete = 	'SELECT ccb_ce_truk_type '.
					'FROM coel_collection_botanique '.
					( is_null($projet_id) ? '' : '	LEFT JOIN coel_collection ON (ccb_id_collection = cc_id_collection) ').
					( is_null($projet_id) ? '' : "WHERE cc_ce_projet = $projet_id ");
		try {
			$infos = $this->bdd->query($requete)->fetchAll(PDO::FETCH_ASSOC);
			if ($infos === false) {
				$this->messages[] = "La requête a retourné aucun résultat.";
			} else if (count($infos) == 0) {
				$this->messages[] = "Aucune collection n'est référencée dans ce projet.";
				$infos == false;
			}
		} catch (PDOException $e) {
			$this->messages[] = sprintf($this->getTxt('sql_erreur'), $e->getFile(), $e->getLine(), $e->getMessage());
		}
		//Coel::debug($infos);
		
		// Récupération des métadonnées nécessaires
		$requete = 	'SELECT cmlv_id_valeur, cmlv_nom, cmlv_abreviation '.
					'FROM coel_meta_liste_valeur '.
					'WHERE cmlv_ce_parent = '.self::META_LISTE_TYPE_HERBIER.' ';
		try {
			$metadonnees = $this->bdd->query($requete)->fetchAll(PDO::FETCH_ASSOC);
			if ($metadonnees === false) {
				$this->messages[] = "La requête de recherche des métadonnées a retourné aucun résultat.";
			}
		} catch (PDOException $e) {
			$this->messages[] = sprintf($this->getTxt('sql_erreur'), $e->getFile(), $e->getLine(), $e->getMessage());
		}
		
		$graph = null;
		if ($infos !== false) {
			// Traitement des métadonées
			$types = array(0 => array('nom' => 'Non renseigné', 'abr' => 'NR'));
			foreach ($metadonnees as $meta) {
				$types[$meta['cmlv_id_valeur']] = array('nom' => $meta['cmlv_nom'], 'abr' => $meta['cmlv_abreviation']);
			}
			
			// Post traitement des données de la base de données
			$donnees = array();
			foreach ($infos as $info) {
				// Récupération du type d'herbier
				$type_id = ($info['ccb_ce_truk_type'] != '') ? $info['ccb_ce_truk_type'] : 0;
				$type_nom = $types[$type_id]['nom'];
				
				// Augmentation du nombre de collection par période
				if (! isset($donnees[$type_nom])) {
					$donnees[$type_nom] = 1;
				} else {
					$donnees[$type_nom]++;
				}
			}
			
			$donnees_tmp = $donnees;
			$donnees = array();
			foreach ($donnees_tmp as $cle => $valeur) {
				if ($remplacement = preg_replace('/^([^(]+) \([^\)]+\)/', '$1', $cle)) {
					$cle = $remplacement;
				}
				$legende = $cle.' ('.$valeur.')';
				
				$donnees[$legende] = $valeur;
			}
			
			asort($donnees);
			$valeurs = implode(',', $donnees);
			$legende = implode('|', array_keys($donnees));
			
			// Paramètres du graphique
			$graph = array(
				'cht' => 'p3',
				'chs' => '400x225',
				'chco' => 'EDC951|DEB0DB|DEC9B0|B0DEB3|B0C4DE|B0B0DE|927CBA',
				'chd' => "t:$valeurs",
				'chds' => '0,'.max($donnees),
				'chdl' => $legende,
				'chdlp' => 'r',
				'chtt' => "Nombre d'herbier par type",
				'chts' => '000000,11.5',
				'chts' => '000000,12');
		}
		return $graph;
	}
}