Subversion Repositories eFlore/Applications.coel

Rev

Rev 1586 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
1530 jpm 1
<?php
2
 
3
/**
4
 * Service exportant des informations concernant COEL au format CSV.
5
 * Encodage en entrée : utf8
6
 * Encodage en sortie : utf8
1586 jpm 7
 *
1530 jpm 8
 * @author Jean-Pascal MILCENT <jpm@tela-botanica.org>
9
 * @license GPL v3 <http://www.gnu.org/licenses/gpl.txt>
10
 * @license CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>
11
 * @version $Id$
12
 * @copyright 2010
13
 */
14
class CoelExport extends Coel {
1586 jpm 15
 
1530 jpm 16
	const META_LISTE_STOCK_PARAMS = 1020;// Liste des paramètres de contrôle environnemental d'un local
1537 jpm 17
	const META_LISTES_EXPERTISE_COLLECTION = '1040,1041,1043,1045,1046,1049,1050,1053,1057,1081';// Liste des métadonnées pour les informations des des collections
1586 jpm 18
 
1530 jpm 19
	private $format = null;
20
	private $service = null;
21
	private $squelette = null;
22
	private $squelette_dossier = null;
1586 jpm 23
 
1530 jpm 24
	/**
25
	 * Méthode appelée avec une requête de type GET.
26
	 */
27
	public function getElement($params = array()) {
28
		// Initialisation des variables
29
		$info = array();
30
		$contenu = '';
1586 jpm 31
 
1530 jpm 32
		// Pré traitement des paramêtres
33
		$pour_bdd = false;
34
		$this->parametres = $this->traiterParametresUrl(array('service', 'format', 'projet'), $params, $pour_bdd);
1586 jpm 35
 
1530 jpm 36
		// Chargement du bon type de service demandé
37
		if (isset($this->parametres['service'])) {
38
			$this->service = strtolower($this->parametres['service']);
1586 jpm 39
 
1530 jpm 40
			$methode = $this->getNomMethodeService();
41
			if (method_exists($this, $methode)) {
42
				if (isset($this->parametres['format']) && preg_match('/^(?:csv|txt)$/i', $this->parametres['format'])) {
43
					// Mise en minuscule de l'indication du format
44
					$this->format = strtolower($this->parametres['format']);
45
					// Définition du fichier squelette demandé
46
					$this->definirSquelette();
47
				} else {
48
					$this->format = '';
49
					$this->messages[] = "Le service COEL Export nécessite d'indiquer en second paramètre le format : csv, txt.";
50
				}
51
				// Récupération du contenu à renvoyer
52
				$contenu = $this->$methode();
53
			} else {
54
				$this->messages[] = "Le type d'information demandé '$this->service' n'est pas disponible.";
55
			}
56
		} else {
57
			$this->messages[] = "Le service COEL Syndication nécessite d'indiquer en premier paramètre le type d'information demandé.";
58
		}
1586 jpm 59
 
1530 jpm 60
		// Envoie sur la sortie standard
61
		$encodage = 'utf-8';
62
		$mime = $this->getTypeMime();
63
		$formatage_json = $this->getFormatageJson();
64
		$this->envoyer($contenu, $mime, $encodage, $formatage_json);
65
	}
1586 jpm 66
 
1530 jpm 67
	private function definirSquelette() {
68
		$this->squelette_dossier = dirname(__FILE__).DIRECTORY_SEPARATOR.'squelettes'.DIRECTORY_SEPARATOR;
69
		$ext = $this->getExtensionFichierSquelette();
70
		$this->squelette = $this->squelette_dossier.'export_'.$this->service.'.tpl.'.$ext;
71
	}
1586 jpm 72
 
1530 jpm 73
	private function getExtensionFichierSquelette() {
74
		$ext = '';
75
		switch ($this->format) {
76
			case 'csv' :
77
			case 'txt' :
78
				$ext = 'csv';
79
				break;
80
			default:
81
				$ext = 'csv';
82
		}
83
		return $ext;
84
	}
1586 jpm 85
 
1530 jpm 86
	private function getNomMethodeService() {
87
		$methode = '';
88
		$service_formate = str_replace(' ', '', ucwords(implode(' ', explode('_', $this->service))));
89
		$methode = 'getService'.$service_formate;
90
		return $methode;
91
	}
1586 jpm 92
 
1530 jpm 93
	private function getTypeMime() {
94
		$mime = '';
95
		switch ($this->format) {
96
			case 'csv' :
97
				$mime = 'text/csv';
98
				break;
99
			case 'txt' :
100
				$mime = 'text/plain';
101
				break;
102
			default:
103
				$mime = 'text/html';
104
		}
105
		return $mime;
106
	}
1586 jpm 107
 
1530 jpm 108
	private function getFormatageJson() {
109
		$json = false;
110
		switch ($this->service) {
111
			default:
112
				$json = false;
113
		}
114
		return $json;
115
	}
1586 jpm 116
 
117
 
1530 jpm 118
	private function getServiceStructureExpertise() {
119
		$donnees = array();
120
		$projet_id = $this->parametres['projet'];
1586 jpm 121
 
1530 jpm 122
		// Construction de la requête
1537 jpm 123
		$requete = 'SELECT '.(($this->distinct) ? 'DISTINCT' : '').' '.
1530 jpm 124
					'	cs_id_structure, '.
125
					'	SUM(csap_bota_travail_hebdo_tps) AS personnel_heure_nbre, '.
1572 jpm 126
					'	cs_nom, csc_truk_stockage_parametre, csv_mark_visite_avec_motif '.
1586 jpm 127
					'FROM coel_structure '.
1530 jpm 128
					'	LEFT JOIN coel_structure_a_personne ON (cs_id_structure = csap_id_structure) '.
129
		    		'	LEFT JOIN coel_structure_conservation ON (cs_id_structure = csc_id_structure) '.
1572 jpm 130
					'	LEFT JOIN coel_structure_valorisation ON (cs_id_structure = csv_id_structure) '.
1586 jpm 131
					( is_null($projet_id) ? '' : "WHERE cs_ce_projet = $projet_id ").
1530 jpm 132
					'GROUP BY cs_id_structure '.
1543 jpm 133
					'ORDER BY '.((!is_null($this->orderby)) ? $this->orderby  : 'cs_nom ASC').' ';
1530 jpm 134
		$message_echec = "La requête a retourné aucun résultat.";
135
		$structures = $this->executerRequete($requete, $message_echec);
1586 jpm 136
 
1530 jpm 137
		// Construction de la requête
1537 jpm 138
		$requete = 'SELECT '.(($this->distinct) ? 'DISTINCT' : '').' '.
1530 jpm 139
					'	cs_id_structure, '.
140
					'	COUNT(cc_id_collection) AS collection_nbre '.
141
					'FROM coel_structure '.
142
					'	LEFT JOIN coel_collection ON (cs_id_structure = cc_ce_structure) '.
143
					( is_null($projet_id) ? '' : "WHERE cs_ce_projet = $projet_id ").
144
					'GROUP BY cs_id_structure ';
145
		$message_echec = "La requête comptant le nombre de collection a retourné aucun résultat.";
146
		$collections_nbre = $this->executerRequete($requete, $message_echec);
1586 jpm 147
 
1530 jpm 148
		// Récupération des métadonnées nécessaires
149
		$requete = 	'SELECT cmlv_id_valeur, cmlv_nom, cmlv_abreviation '.
150
					'FROM coel_meta_liste_valeur '.
151
					'WHERE cmlv_ce_parent = '.self::META_LISTE_STOCK_PARAMS.' ';
152
		$message_echec = "La requête de recherche des métadonnées a retourné aucun résultat.";
153
		$metadonnees = $this->executerRequete($requete, $message_echec);
1586 jpm 154
 
1530 jpm 155
		// Traitement des données
156
		if ($structures !== false) {
157
			// Traitement du nombre de collection par structure
158
			$collections_par_structure = array();
159
			foreach ($collections_nbre as $collection) {
160
				$nbre = (empty($collection['collection_nbre'])) ? 0 : $collection['collection_nbre'];
161
				$collections_par_structure[$collection['cs_id_structure']] = $nbre;
162
			}
1541 jpm 163
 
164
			// Instanciation des objets nécessaires aux traitements
165
			$ontologie = new Ontologie($metadonnees);
166
			$utilTruck = new UtilTruck($ontologie);
1586 jpm 167
 
168
			// Traitement final des données concernant les structures
1530 jpm 169
			foreach ($structures as $structure) {
170
				$id_structure = $structure['cs_id_structure'];
1541 jpm 171
				$nom = $structure['cs_nom'];
172
				$stockage_params = $utilTruck->construireTxtListeOntologie($structure['csc_truk_stockage_parametre']);
173
				$stockage_params_nbre = $utilTruck->getNbreValeur($structure['csc_truk_stockage_parametre']);
174
				$stockage_params_nbre = empty($stockage_params_nbre) ? 0 : $stockage_params_nbre;
1530 jpm 175
				$collection_nbre = $collections_par_structure[$structure['cs_id_structure']];
176
				$collection_nbre = empty($collection_nbre) ? 0 : $collection_nbre;
177
				$personnel_heure_nbre = empty($structure['personnel_heure_nbre']) ? 0 : $structure['personnel_heure_nbre'];
1572 jpm 178
				$visite_avec_motif_science = $structure['csv_mark_visite_avec_motif'];
1586 jpm 179
 
1541 jpm 180
				$structure_affichage = array(
1586 jpm 181
					'nom' => $nom,
1530 jpm 182
					'stockage_params' => $stockage_params,
1531 jpm 183
					'stockage_params_nbre' => $stockage_params_nbre,
1530 jpm 184
					'collection_nbre' => $collection_nbre,
1572 jpm 185
					'personnel_heure_nbre' => $personnel_heure_nbre,
186
					'visite_avec_motif_science' => $visite_avec_motif_science);
1541 jpm 187
				$structure_affichage = $this->nettoyerTableau($structure_affichage);
1586 jpm 188
 
1541 jpm 189
				$donnees['structures'][$id_structure] = $structure_affichage;
1530 jpm 190
			}
191
		}
1586 jpm 192
 
1530 jpm 193
		// Création du contenu
194
		$contenu = $this->executerService($donnees);
195
		return $contenu;
196
	}
1586 jpm 197
 
1531 jpm 198
	private function getServiceCollectionExpertise() {
199
		$projet_id = $this->parametres['projet'];
1537 jpm 200
 
1531 jpm 201
		// Construction de la requête
1537 jpm 202
		$requete = 'SELECT '.(($this->distinct) ? 'DISTINCT' : '').' '.
1531 jpm 203
					'	cc_id_collection, '.
1586 jpm 204
					'	cc_nom, cc_cote, cs_nom, cc_ce_specimen_type, cc_description, cc_truk_periode_constitution, '.
1531 jpm 205
					'	cc_truk_couverture_lieu, ccb_truk_etiquette_renseignement, ccb_truk_nature, '.
1583 jpm 206
					'	ccb_truk_unite_base, ccb_ce_etat_general, ccb_specimen_fixation_pourcent, '.
207
					'	ccb_truk_specimen_fixation_methode, ccb_truk_etiquette_fixation_support, '.
1531 jpm 208
					'	ccb_truk_etiquette_fixation_specimen, ccb_truk_degradation_presentation, '.
209
					'	ccb_ce_classement_etat, ccb_ce_inventaire '.
1586 jpm 210
					'FROM coel_collection '.
1531 jpm 211
		    		'	LEFT JOIN coel_collection_botanique ON (cc_id_collection = ccb_id_collection) '.
212
					'	LEFT JOIN coel_structure ON (cs_id_structure = cc_ce_structure) '.
1586 jpm 213
					( is_null($projet_id) ? '' : "WHERE cc_ce_projet = $projet_id ").
1543 jpm 214
					'ORDER BY '.((!is_null($this->orderby)) ? $this->orderby  : 'cc_nom ASC').' ';
1531 jpm 215
		$message_echec = "La requête a retourné aucun résultat.";
1537 jpm 216
		$collections = $this->executerRequete($requete, $message_echec);
1586 jpm 217
 
1531 jpm 218
		// Récupération des métadonnées nécessaires
219
		$requete = 	'SELECT cmlv_id_valeur, cmlv_ce_parent, cmlv_nom, cmlv_abreviation '.
220
					'FROM coel_meta_liste_valeur '.
221
					'WHERE cmlv_ce_parent IN ('.self::META_LISTES_EXPERTISE_COLLECTION.') ';
222
		$message_echec = "La requête de recherche des métadonnées a retourné aucun résultat.";
223
		$metadonnees = $this->executerRequete($requete, $message_echec);
1586 jpm 224
 
1531 jpm 225
		// Traitement des données
1537 jpm 226
		$donnees = array();
227
		if ($collections !== false) {
228
			// Instanciation des objets nécessaires aux traitements
229
			$ontologie = new Ontologie($metadonnees);
230
			$utilTruck = new UtilTruck($ontologie);
1586 jpm 231
 
232
			// Traitement final des données concernant les structures
1537 jpm 233
			foreach ($collections as $collection) {
234
				$id_collection = $collection['cc_id_collection'];
1541 jpm 235
				$nom = $collection['cc_nom'];
1586 jpm 236
				$cote = $collection['cc_cote'];
1541 jpm 237
				$nom_structure = $collection['cs_nom'];
1537 jpm 238
				$specimen_type = $utilTruck->construireTxtListeOntologie($collection['cc_ce_specimen_type']);
1541 jpm 239
				$description = $collection['cc_description'];
1537 jpm 240
				$periode_constitution = $utilTruck->construireTxtListeOntologie($collection['cc_truk_periode_constitution']);
241
				$couverture_lieu = $utilTruck->construireTxtListeOntologie($collection['cc_truk_couverture_lieu']);
1583 jpm 242
				$specimen_fixation_pourcent = $collection['ccb_specimen_fixation_pourcent'];
243
				$specimen_fixation_methode = $utilTruck->construireTxtListeOntologie($collection['ccb_truk_specimen_fixation_methode']);
1537 jpm 244
				$etiquette_renseignement = $utilTruck->construireTxtListeOntologie($collection['ccb_truk_etiquette_renseignement']);
245
				$nature = $utilTruck->construireTxtListeOntologie($collection['ccb_truk_nature']);
1540 jpm 246
				$parts_total = UtilTruck::extraireNbrePart($collection['ccb_truk_unite_base']);
1541 jpm 247
				$etat_general = $utilTruck->construireTxtListeOntologie($collection['ccb_ce_etat_general']);
248
				$etiquette_fixation_support = $utilTruck->construireTxtListeOntologie($collection['ccb_truk_etiquette_fixation_support']);
249
				$etiquette_fixation_specimen = $utilTruck->construireTxtListeOntologie($collection['ccb_truk_etiquette_fixation_specimen']);
250
				$degradation_presentation = $utilTruck->construireTxtListeOntologie($collection['ccb_truk_degradation_presentation'], false, true, true);
251
				$classement_etat = $utilTruck->construireTxtListeOntologie($collection['ccb_ce_classement_etat']);
252
				$inventaire = $utilTruck->construireTxtListeOntologie($collection['ccb_ce_inventaire']);
1586 jpm 253
 
1541 jpm 254
				$collection_affichage = array(
255
					'id' => $id_collection,
1586 jpm 256
					'cote' => $cote,
1537 jpm 257
					'nom' => $nom,
1586 jpm 258
					'nom_structure' => $nom_structure,
1537 jpm 259
					'specimen_type' => $specimen_type,
260
					'description' => $description,
261
					'periode_constitution' => $periode_constitution,
262
					'couverture_lieu' => $couverture_lieu,
263
					'etiquette_renseignement' => $etiquette_renseignement,
264
					'nature' => $nature,
1541 jpm 265
					'parts_total' => $parts_total,
266
					'etat_general' => $etat_general,
267
					'etiquette_fixation_support' => $etiquette_fixation_support,
268
					'etiquette_fixation_specimen' => $etiquette_fixation_specimen,
1583 jpm 269
					'specimen_fixation_pourcent' => $specimen_fixation_pourcent,
270
					'specimen_fixation_methode' => $specimen_fixation_methode,
1541 jpm 271
					'degradation_presentation' => $degradation_presentation,
272
					'classement_etat' => $classement_etat,
273
					'inventaire' => $inventaire);
274
				$collection_affichage = $this->nettoyerTableau($collection_affichage);
1586 jpm 275
 
1541 jpm 276
				$donnees['collections'][] = $collection_affichage;
1531 jpm 277
			}
1541 jpm 278
			$donnees['champs'] = array_keys(current($donnees['collections']));
1531 jpm 279
		}
1586 jpm 280
 
1531 jpm 281
		// Création du contenu
282
		$contenu = $this->executerService($donnees);
283
		return $contenu;
284
	}
1586 jpm 285
 
1530 jpm 286
	private function executerRequete($requete, $message_echec) {
287
		try {
288
			$infos = $this->bdd->query($requete)->fetchAll(PDO::FETCH_ASSOC);
289
			if ($infos === false) {
290
				$this->messages[] = $message_echec;
291
			}
292
		} catch (PDOException $e) {
1537 jpm 293
			$this->messages[] = sprintf($this->getTxt('sql_erreur_requete'), $e->getFile(), $e->getLine(), $e->getMessage(), $requete);
1530 jpm 294
		}
295
		return $infos;
296
	}
1586 jpm 297
 
1530 jpm 298
	private function executerService($donnees) {
299
		// Création du contenu à partir d'un template PHP
300
		$contenu = Coel::traiterSquelettePhp($this->squelette, $donnees);
301
		return $contenu;
302
	}
1586 jpm 303
 
1541 jpm 304
	private function nettoyerTableau(Array $tableau) {
305
		foreach ($tableau as $cle => $valeur) {
306
			$tableau[$cle] = self::nettoyerGuillemets($valeur);
307
		}
308
		return $tableau;
309
	}
1586 jpm 310
 
1537 jpm 311
	private static function nettoyerGuillemets($txt) {
312
		$txt = preg_replace('/"/', '""', $txt);
313
		return $txt;
314
	}
1586 jpm 315
}