Subversion Repositories eFlore/Applications.cel

<?php
/**
* Service fournissant des informations concernant le CEL au format RSS1, RSS2 ou ATOM.
* Encodage en entrée : utf8
* Encodage en sortie : utf8
* Format du service :
* /CelWidgetExport/format
* /CelWidgetExport/csv
*
* Les paramêtres :
*  - "start" indique le numéro du premier item à afficher
*  - "limit" nombre d'items à afficher
*
* @author Aurélien 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>
* @version $Id$
* @copyright 2012
*/

set_include_path(get_include_path() . PATH_SEPARATOR . dirname(dirname(realpath(__FILE__))) . '/lib');
// la sortie est binaire (xls), mais OLE n'est pas compatible E_ALL en PHP-5.4
error_reporting(error_reporting() ^ E_STRICT);
require_once("lib/OLE.php");
require_once("lib/Spreadsheet/Excel/Writer.php");

class CelWidgetExport extends Cel {
        
        private $nom_fichier_export = 'cel_export';
        private $champs_a_exclure = array('ce_utilisateur' => 'ce_utilisateur', 
                'courriel_utilisateur' => 'courriel_utilisateur',
                'transmission' => 'transmission');
        private $correspondance_champs = array(
                'id_observation' => 'Identifiant Observation',
                'ordre' => 'Ordre Observation',
                'prenom_utilisateur' => 'Prénom',
                'nom_utilisateur' => 'Nom',
                'nom_sel' => 'Nom Sélectionné',
                'nom_sel_nn' => 'Numéro Nomenclatural Nom Selectionné',
                'nom_ret' => 'Nom Retenu',
                'nom_ret_nn' => 'Numéro Nomenclatural Nom Retenu',
                'nt' => 'Numéro Taxonomique',
                'famille' => 'Famille',
                'nom_referentiel' => 'Référentiel Taxonomique',
                'ce_zone_geo' => 'Code Insee',
                'zone_geo' => 'Commune',
                'lieudit' => 'Lieu-Dit',
                'station' => 'Station',
                'milieu' => 'Milieu',
                'latitude' => 'Latitude',
                'longitude' => 'Longitude',
                'geodatum' => 'Référentiel Géographique',
                'date_observation' => 'Date Observation',
                'mots_cles_texte' => 'Mots Clés',
                'commentaire' => 'Commentaires',
                'date_creation' => 'Date Création',
                'date_modification' => 'Date Modification',
                'date_transmission' => 'Date Transmission'
                );
        private $parametres_autorises = array(
                'utilisateur' => 'courriel_utilisateur',
                'commune' => 'zone_geo',
                'dept' => 'departement',
                'projet' => 'mots_cles',
                'num_taxon' => 'nt',
                'date_debut' => 'date_debut',
                'date_fin' => 'date_fin',
                'taxon' => 'taxon'
        );
        
        private $format = 'csv';
        
        public function getRessource() {
                return $this->getElement(array());
        }
                
        /**
         * Méthode appelée avec une requête de type GET.
         */
        public function getElement($params = array()) {
                
                $criteres = $this->traiterParametresAutorises($_GET);
                
                // Seulement les observation publiques
                $criteres['transmission'] = 1;
                $chercheur_observations = new RechercheObservation($this->config);
                
                $numero_page = isset($criteres['debut']) ? $criteres['debut'] : 0;
                $limite = isset($criteres['limite']) ? $criteres['limite'] : 0;
                
                unset($criteres['limite']);
                unset($criteres['debut']);
        
                $observations = $chercheur_observations->rechercherObservations(null, $criteres, $numero_page, $limite);

                switch($this->format) {
                        case 'csv':
                                $csv = $this->convertirEnCsv($observations);
                                $this->envoyerCsv($csv);
                        break;
                        case 'xls':
                                $xls = $this->convertirEnXls($observations);
                                $this->envoyerXls($xls);
                        break;
                        default:
                }
        }
        
        protected function traiterParametresAutorises(Array $parametres) {
                $parametres_traites = array();
                $this->format = (isset($parametres['format']) && $parametres['format'] != '') ? $parametres['format'] : $this->format;
                foreach($parametres as $cle => $valeur) {
                        if(trim($valeur) != '' && isset($this->parametres_autorises[$cle])) {
                                $parametres_traites[$this->parametres_autorises[$cle]] = $valeur;
                        }
                }
                return $parametres_traites;
        }
        
        private function envoyerCsv($csv) {
                header('Content-Type: text/csv; charset=UTF-8');
                header('Content-Disposition: attachment;filename='.$this->nom_fichier_export.'.csv');
                echo $csv;
                exit;
        }
        
        private function envoyerXls($workbook) {
                $workbook->close();
                exit;
        }
        
        private function convertirEnCsv($data)
        {
                $chemin_temp = "php://temp";
                $outstream = fopen($chemin_temp, 'r+');
                $intitule_champs = array();
                foreach($data as $ligne) {
                        $ligne = $this->filtrerDonneesSensibles($ligne);
                        $ligne = array_diff_key($ligne, $this->champs_a_exclure);
                        if(empty($intitule_champs)) {
                                $intitule_champs = $this->creerEntetesChamps($ligne);
                                fputcsv($outstream, $intitule_champs, ',', '"');                        
                        }
                        fputcsv($outstream, $ligne, ',', '"');
                }
                rewind($outstream);
                $csv = stream_get_contents($outstream);
                fclose($outstream);
                return $csv;
        }
        
        private function convertirEnXls($data) {                
                $this->extendSpreadsheetProductor = new SpreadsheetProductor();
                $this->extendSpreadsheetProductor->initSpreadsheet();
                
                $workbook = new Spreadsheet_Excel_Writer();
                $workbook->setVersion(8);

                $worksheet = $workbook->addWorksheet('Liste');
                $worksheet->setInputEncoding('utf-8');
                $workbook->send($this->nom_fichier_export.'.xls');
                
                $nb_lignes = 1;
                
                foreach($data as $ligne) {
                        $ligne = $this->filtrerDonneesSensibles($ligne);
                        $ligne = array_diff_key($ligne, $this->champs_a_exclure);
                        if(empty($intitule_champs)) {
                                $intitule_champs = $this->creerEntetesChamps($ligne);
                                $indice = 0;
                                foreach ($intitule_champs as $intitule) {       
                                        $colonne = $intitule_champs[$indice];
                                        $worksheet->write(0,$indice,$colonne);
                                        $indice++;
                                }
                        }
                        $indice = 0;
                        foreach($ligne as $champ) {
                                $worksheet->write($nb_lignes,$indice,$champ);
                                $indice++;
                        }
                        $nb_lignes++;
                }
                return $workbook;
        }
        
        private function creerEntetesChamps($noms_colonnes) {
                $champs_presents = array_intersect_key($this->correspondance_champs, $noms_colonnes);
                return array_values($champs_presents);
        }
        
        private function filtrerDonneesSensibles($ligne) {
                if(stripos($ligne['mots_cles_texte'], 'sensible') !== false) {
                        $ligne['latitude'] = '';
                        $ligne['longitude'] = '';
                }
                return $ligne;
        }
        
        private function nettoyerChaine($chaine) {
                $chaine = str_replace("\n",' ',$chaine);
                $chaine = str_replace("\t",'',$chaine);
                return $chaine;
        }
}
?>