Subversion Repositories eFlore/Applications.cel

Rev

Rev 1659 | Rev 1662 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
1374 aurelien 1 
<?php
2 
/**
3 
* Service fournissant des informations concernant le CEL au format RSS1, RSS2 ou ATOM.
4 
* Encodage en entrée : utf8
5 
* Encodage en sortie : utf8
6 
* Format du service :
7 
* /CelWidgetExport/format
8 
* /CelWidgetExport/csv
9 
*
10 
* Les paramêtres :
11 
*  - "start" indique le numéro du premier item à afficher
12 
*  - "limit" nombre d'items à afficher
13 
*
14 
* @author Aurélien Peronnet <aurelien@tela-botanica.org>
15 
* @license GPL v3 <http://www.gnu.org/licenses/gpl.txt>
16 
* @license CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>
17 
* @version $Id$
18 
* @copyright 2012
19 
*/
1610 raphael 20 
 
21 
set_include_path(get_include_path() . PATH_SEPARATOR . dirname(dirname(realpath(__FILE__))) . '/lib');
22 
// la sortie est binaire (xls), mais OLE n'est pas compatible E_ALL en PHP-5.4
1617 aurelien 23 
//error_reporting(error_reporting() ^ E_STRICT);
1610 raphael 24 
require_once("lib/OLE.php");
25 
require_once("lib/Spreadsheet/Excel/Writer.php");
26 
 
1374 aurelien 27 
class CelWidgetExport extends Cel {
28 
 
1408 aurelien 29 
	private $nom_fichier_export = 'cel_export';
1376 aurelien 30 
	private $parametres_autorises = array(
1654 aurelien 31 
		'id_utilisateur' => 'ce_utilisateur',
1376 aurelien 32 
		'utilisateur' => 'courriel_utilisateur',
33 
		'commune' => 'zone_geo',
34 
		'dept' => 'departement',
1654 aurelien 35 
		'departement' => 'departement',
36 
		'lieudit' => 'lieudit',
37 
		'station' => 'station',
1376 aurelien 38 
		'projet' => 'mots_cles',
1379 aurelien 39 
		'num_taxon' => 'nt',
1378 aurelien 40 
		'date_debut' => 'date_debut',
1387 aurelien 41 
		'date_fin' => 'date_fin',
1625 aurelien 42 
		'taxon' => 'taxon',
1654 aurelien 43 
		'annee' => 'annee',
44 
		'mois' => 'mois',
45 
		'jour' => 'jour',
46 
		'recherche' => 'recherche',
47 
		'id_mots_cles' => 'id_mots_cles',
1625 aurelien 48 
		'debut' => 'debut',
49 
		'limite' => 'limite',
1654 aurelien 50 
		'format' => 'format',
51 
		'colonnes' => 'colonnes',
52 
		'transmission' => 'transmission'
1376 aurelien 53 
	);
1402 aurelien 54 
 
1625 aurelien 55 
	private $limite_decoupage_defaut = 9000;
56 
 
1402 aurelien 57 
	private $format = 'csv';
1579 aurelien 58 
 
1659 aurelien 59 
	public $id_utilisateur = null;
60 
 
1579 aurelien 61 
	public function getRessource() {
62 
		return $this->getElement(array());
63 
	}
1374 aurelien 64 
 
65 
	/**
66 
	 * Méthode appelée avec une requête de type GET.
67 
	 */
1625 aurelien 68 
	public function getElement($params = array()) {
69 
		if(count($params) > 0) {
70 
			switch(strtolower($params[0])) {
71 
				case 'calcul':
72 
					$this->getCalcul();
73 
				break;
74 
 
75 
				case 'export':
76 
					$this->getExport();
77 
				break;
78 
 
79 
				default:
80 
					$this->getExport();
81 
			}
82 
		} else {
83 
			$this->getExport();
84 
		}
85 
	}
86 
 
87 
	private function getCalcul() {
1611 raphael 88 
		$criteres = $this->traiterParametresAutorises($_GET);
1654 aurelien 89 
 
1374 aurelien 90 
		$criteres['transmission'] = 1;
1654 aurelien 91 
		if($this->doitEtPeutExporterObsPrivees($criteres)) {
92 
			unset($criteres['transmission']);
1659 aurelien 93 
			$this->id_utilisateur = $criteres['id_utilisateur'];
1654 aurelien 94 
		}
1374 aurelien 95 
		$chercheur_observations = new RechercheObservation($this->config);
96 
 
1379 aurelien 97 
		$numero_page = isset($criteres['debut']) ? $criteres['debut'] : 0;
98 
		$limite = isset($criteres['limite']) ? $criteres['limite'] : 0;
1654 aurelien 99 
		$colonnes = isset($criteres['colonnes']) ? $criteres['colonnes'] : 'standard,avance';
1374 aurelien 100 
 
101 
		unset($criteres['limite']);
102 
		unset($criteres['debut']);
1625 aurelien 103 
		unset($criteres['format']);
1654 aurelien 104 
		unset($criteres['colonnes']);
1625 aurelien 105 
 
106 
		$nb_observations = $chercheur_observations->compterObservations(null, $criteres);
107 
		$limite_decoupage = $this->calculerNbLignesMaxParFichier();
108 
 
109 
		$url_telechargements = array();
110 
		$intervalle = 0;
111 
 
112 
		$params_url = $criteres;
113 
		unset($params_url['transmission']);
114 
		do {
115 
			$base_url = $this->config['settings']['baseURLAbsolu'].'CelWidgetExport/export';
116 
			$params_url['debut'] = $intervalle;
117 
			$params_url['limite'] = $limite_decoupage;
118 
			$url_telechargement_fichier = $base_url;
1654 aurelien 119 
			$url_telechargements[] = $base_url.'?'.http_build_query($params_url).'&format='.$this->format.'&colonnes='.$colonnes;
1625 aurelien 120 
			$intervalle += $limite_decoupage;
121 
			$nb_observations -= $limite_decoupage;
122 
		} while($nb_observations >= $limite_decoupage);
123 
 
124 
		$this->envoyerJson($url_telechargements);
125 
	}
1374 aurelien 126 
 
1625 aurelien 127 
	private function calculerNbLignesMaxParFichier() {
128 
		$limite = $this->limite_decoupage_defaut;
1402 aurelien 129 
		switch($this->format) {
130 
			case 'csv':
1625 aurelien 131 
				$limite = 20000;
132 
				break;
133 
			case 'xls':
134 
				$limite = 8000;
135 
				break;
1660 raphael 136 
			case 'pdf':
137 
				$limite = 300;
138 
				break;
1625 aurelien 139 
		}
140 
		return $limite;
141 
	}
142 
 
143 
	private function getExport() {
144 
		$criteres = $this->traiterParametresAutorises($_GET);
145 
		$criteres['transmission'] = 1;
1654 aurelien 146 
		if($this->doitEtPeutExporterObsPrivees($criteres)) {
147 
			unset($criteres['transmission']);
148 
		}
1625 aurelien 149 
		$chercheur_observations = new RechercheObservation($this->config);
150 
 
151 
		$debut = isset($criteres['debut']) ? $criteres['debut'] : 0;
152 
		$limite = isset($criteres['limite']) ? $criteres['limite'] : 0;
1654 aurelien 153 
		$colonnes = isset($criteres['colonnes']) ? $criteres['colonnes'] : 'standard,avance';
1625 aurelien 154 
 
155 
		unset($criteres['limite']);
156 
		unset($criteres['debut']);
157 
		unset($criteres['format']);
1654 aurelien 158 
		unset($criteres['colonnes']);
1625 aurelien 159 
 
1631 raphael 160 
		$observations = $chercheur_observations->rechercherObservations(null, $criteres, $debut, $limite)->get();
1659 aurelien 161 
		$ids = array();
162 
		foreach($observations as &$obs) {
163 
			$ids[] = $obs['id_observation'];
164 
		}
165 
		$gestion_champs_etendus = new GestionChampsEtendus($this->config, 'obs');
166 
    	$champs_supp_par_obs = $gestion_champs_etendus->consulterParLots($ids);
167 
    	$colonnes_champs_supp_par_obs = $gestion_champs_etendus->consulterClesParLots($ids);
168 
 
169 
    	// TODO: tous les champs étendus et les paramètres supplémentaires devraient être passés en un seul
170 
    	// tableau (et chaque formateur csv, xls etc... pourrait également être dans une classe à part)
1625 aurelien 171 
		switch($this->format) {
1660 raphael 172 
		case 'csv':
173 
			$csv = $this->convertirEnCsv($observations, $colonnes, $colonnes_champs_supp_par_obs, $champs_supp_par_obs);
174 
			$this->envoyerCsv($csv);
175 
			break;
176 
		case 'xls':
177 
			$xls = $this->convertirEnXls($observations, $colonnes, $colonnes_champs_supp_par_obs, $champs_supp_par_obs);
178 
			$this->envoyerXls($xls);
179 
			break;
180 
		case 'pdf':
181 
			if(count($observations) > 300) die('trop de données');
182 
			require_once('GenerateurPDF.php');
183 
			$pdf = new GenerateurPDF();
184 
			$pdf->export($observations);
185 
			$pdf->pdf->Output('etiquettes.pdf', 'I');
186 
			die;
187 
			break;
188 
		default:
1402 aurelien 189 
		}
1374 aurelien 190 
	}
191 
 
1611 raphael 192 
	protected function traiterParametresAutorises(Array $parametres) {
1376 aurelien 193 
		$parametres_traites = array();
1402 aurelien 194 
		$this->format = (isset($parametres['format']) && $parametres['format'] != '') ? $parametres['format'] : $this->format;
1376 aurelien 195 
		foreach($parametres as $cle => $valeur) {
196 
			if(trim($valeur) != '' && isset($this->parametres_autorises[$cle])) {
197 
				$parametres_traites[$this->parametres_autorises[$cle]] = $valeur;
198 
			}
199 
		}
200 
		return $parametres_traites;
201 
	}
202 
 
1374 aurelien 203 
	private function envoyerCsv($csv) {
204 
		header('Content-Type: text/csv; charset=UTF-8');
1408 aurelien 205 
		header('Content-Disposition: attachment;filename='.$this->nom_fichier_export.'.csv');
1374 aurelien 206 
		echo $csv;
1376 aurelien 207 
		exit;
1374 aurelien 208 
	}
209 
 
1402 aurelien 210 
	private function envoyerXls($workbook) {
211 
		$workbook->close();
212 
		exit;
213 
	}
214 
 
1659 aurelien 215 
	private function convertirEnCsv($data, $colonnes, $colonnes_supplementaires, $champs_supplementaires = array())
1374 aurelien 216 
	{
217 
		$chemin_temp = "php://temp";
218 
		$outstream = fopen($chemin_temp, 'r+');
219 
		$intitule_champs = array();
1659 aurelien 220 
		$nb_colonnes_supp = count($colonnes_supplementaires);
1654 aurelien 221 
		$groupe_colonnes = FormateurGroupeColonne::nomEnsembleVersListeColonnes($colonnes);
1617 aurelien 222 
		foreach($data as &$ligne) {
1659 aurelien 223 
			$id_obs = $ligne['id_observation'];
1429 aurelien 224 
			$ligne = $this->filtrerDonneesSensibles($ligne);
1659 aurelien 225 
			$ligne = FormateurGroupeColonne::getLigneObservation($ligne, $groupe_colonnes, $this);
226 
			$ligne_supp = $nb_colonnes_supp > 0 ? array_fill(0, $nb_colonnes_supp, '') : array();
227 
			if(isset($champs_supplementaires[$id_obs])) {
228 
				$ligne_supp = $this->traiterLigneEtendue($colonnes_supplementaires, $champs_supplementaires[$id_obs]);
229 
			}
230 
			$ligne += $ligne_supp;
1374 aurelien 231 
			if(empty($intitule_champs)) {
1654 aurelien 232 
				$intitule_champs = FormateurGroupeColonne::getIntitulesColonnes($groupe_colonnes);
1659 aurelien 233 
				foreach($colonnes_supplementaires as $colonne_sup) {
234 
					$intitule_champs[] = $colonne_sup;
235 
				}
1374 aurelien 236 
				fputcsv($outstream, $intitule_champs, ',', '"');
237 
			}
238 
			fputcsv($outstream, $ligne, ',', '"');
239 
		}
240 
		rewind($outstream);
241 
		$csv = stream_get_contents($outstream);
242 
		fclose($outstream);
243 
		return $csv;
244 
	}
245 
 
1659 aurelien 246 
	private function convertirEnXls($data, $colonnes,  $colonnes_supplementaires, $champs_supplementaires = array()) {
1402 aurelien 247 
		$this->extendSpreadsheetProductor = new SpreadsheetProductor();
248 
		$this->extendSpreadsheetProductor->initSpreadsheet();
249 
 
1659 aurelien 250 
		$nb_colonnes_supp = count($colonnes_supplementaires);
251 
 
1402 aurelien 252 
		$workbook = new Spreadsheet_Excel_Writer();
1625 aurelien 253 
		$worksheet = $workbook->addWorksheet('Liste');
254 
		$workbook->setTempDir($this->config['cel']['chemin_stockage_temp']);
1612 raphael 255 
		$workbook->setVersion(8);
1402 aurelien 256 
 
1612 raphael 257 
		$worksheet->setInputEncoding('utf-8');
1408 aurelien 258 
		$workbook->send($this->nom_fichier_export.'.xls');
1402 aurelien 259 
 
260 
		$nb_lignes = 1;
1654 aurelien 261 
		$groupe_colonnes = FormateurGroupeColonne::nomEnsembleVersListeColonnes($colonnes);
1617 aurelien 262 
		foreach($data as &$ligne) {
1659 aurelien 263 
			$id_obs = $ligne['id_observation'];
1429 aurelien 264 
			$ligne = $this->filtrerDonneesSensibles($ligne);
1659 aurelien 265 
			$ligne = FormateurGroupeColonne::getLigneObservation($ligne, $groupe_colonnes, $this);
1402 aurelien 266 
			if(empty($intitule_champs)) {
267 
				$indice = 0;
1654 aurelien 268 
				$intitule_champs = FormateurGroupeColonne::getIntitulesColonnes($groupe_colonnes);
1659 aurelien 269 
				foreach($colonnes_supplementaires as $colonne_sup) {
270 
					$intitule_champs[] = $colonne_sup;
271 
				}
1617 aurelien 272 
				foreach ($intitule_champs as &$intitule) {
1465 aurelien 273 
					$colonne = $intitule_champs[$indice];
274 
					$worksheet->write(0,$indice,$colonne);
1402 aurelien 275 
					$indice++;
276 
				}
277 
			}
1659 aurelien 278 
			$ligne_supp = $nb_colonnes_supp > 0 ? array_fill(0, $nb_colonnes_supp, '') : array();
279 
			if(isset($champs_supplementaires[$id_obs])) {
280 
				$ligne_supp = $this->traiterLigneEtendue($colonnes_supplementaires, $champs_supplementaires[$id_obs]);
281 
			}
282 
			$ligne += $ligne_supp;
1402 aurelien 283 
			$indice = 0;
1617 aurelien 284 
			foreach($ligne as &$champ) {
1402 aurelien 285 
				$worksheet->write($nb_lignes,$indice,$champ);
286 
				$indice++;
287 
			}
288 
			$nb_lignes++;
289 
		}
290 
		return $workbook;
291 
	}
292 
 
1659 aurelien 293 
	private function traiterLigneEtendue(&$colonnes_etendues, &$ligne_champs_etendus) {
294 
		$ligne_etendue_aplatie = $this->aplatirChampsEtendus($ligne_champs_etendus);
295 
		$ligne_etendue_fmt = array();
296 
		foreach($colonnes_etendues as $colonne) {
297 
			if(!isset($ligne_etendue_aplatie[$colonne])) {
298 
				$ligne_etendue_fmt[$colonne] = '';
299 
			} else {
300 
				$ligne_etendue_fmt[$colonne] = $ligne_etendue_aplatie[$colonne];
301 
			}
302 
		}
303 
		return $ligne_etendue_fmt;
304 
	}
305 
 
306 
	private function aplatirChampsEtendus(&$ligne_champs_etendus) {
307 
		$champs_etendus_fmt = array();
308 
		foreach($ligne_champs_etendus as $champ) {
309 
			$champs_etendus_fmt[$champ->cle] = $champ->valeur;
310 
		}
311 
		return $champs_etendus_fmt;
312 
	}
313 
 
1429 aurelien 314 
	private function filtrerDonneesSensibles($ligne) {
315 
		if(stripos($ligne['mots_cles_texte'], 'sensible') !== false) {
316 
			$ligne['latitude'] = '';
317 
			$ligne['longitude'] = '';
318 
		}
319 
		return $ligne;
320 
	}
321 
 
1401 aurelien 322 
	private function nettoyerChaine($chaine) {
323 
		$chaine = str_replace("\n",' ',$chaine);
324 
		$chaine = str_replace("\t",'',$chaine);
325 
		return $chaine;
326 
	}
1654 aurelien 327 
 
328 
	private function doitEtPeutExporterObsPrivees($criteres) {
329 
		return isset($criteres['ce_utilisateur']) &&
330 
					$this->peutExporterObsPrivees($criteres['ce_utilisateur']);
331 
	}
332 
 
333 
	private function peutExporterObsPrivees($id_utilisateur) {
334 
		$gestion_utilisateur = new User($this->config);
335 
		$utilisateur = $gestion_utilisateur->obtenirIdentiteConnectee();
336 
		return $utilisateur['connecte'] &&
337 
				$utilisateur['id_utilisateur'] != '' &&
338 
				$id_utilisateur == $utilisateur['id_utilisateur'];
339 
	}
1374 aurelien 340 
}
341 
?>