Subversion Repositories eFlore/Applications.coel

<?php

/**
 * Exemple lancement:
 * /opt/lampp/bin/php -d memory_limit=3500M cli.php desontologisation -a unitebase
 */

class Desontologisation extends Script {

        private $bdd = null;
        private $structures = array();
        private $communes = array();
        private $nonTrouvees = array();

        public function __construct($script_nom, $parametres) {
                parent::__construct($script_nom, $parametres);
                $this->bdd = new Bdd();
        }

        public function executer() {
                try {
                        $cmd = $this->getParametre('a');
                        switch ($cmd) {
                                case "unitebase" :
                                        $this->desontologiserUniteBase(); break;
                                default :
                                case "uniterangement" :
                                        $this->desontologiserUniteRangement(); break;
                                default :
                                        $this->traiterErreur('Erreur : la commande "%s" n\'existe pas!', array($cmd));
                        }
                } catch (Exception $erreur) {
                        $this->traiterErreur($erreur->getMessage());
                }
        }
        
        private function desontologiserUniteBase() {
                $requete = "SELECT ccb_id_collection, ccb_truk_unite_base ".
                                        "FROM coel_collection_botanique ".
                                        "WHERE ccb_truk_unite_base IS NOT NULL AND ccb_truk_unite_base != ''";

                $infos_truk = $this->bdd->recupererTous($requete);
                                
                foreach($infos_truk as $truk) {
                        
                        $id_collection = $truk['ccb_id_collection'];
                        
                        // Séparation de chaque catégorie d'unite de truk
                        $categories_truk = explode(';;', $truk['ccb_truk_unite_base']);
                        // Iteration sur toutes les catégories de truk trouvées
                        foreach($categories_truk as $categorie_truk) {                                          
                                // extraction du numéro d'ontologie de la liste concernée
                                $categorie_truk_unite_infos = explode('##', $categorie_truk);           
                                // Seules les infos de planche d'herbier nous interessent (donc numéro d'ontologie 2270)
                                if($categorie_truk_unite_infos[0] == '2270') {
                                        $truk_unite_infos = $categorie_truk_unite_infos[1];
                                        
                                        $truk_unite_infos = explode('||', $truk_unite_infos);
                                        $nb_planches_herbiers = $truk_unite_infos[0];
                                        $nb_especes =  $truk_unite_infos[5];
                                        
                                        $update = 'UPDATE coel_collection_botanique '.
                                                                'SET '.
                                                                        'ccb_nb_planches_herbiers = "'.$nb_planches_herbiers.'", '.
                                                                        'ccb_nb_especes = "'.$nb_especes.'" '.
                                                                'WHERE ccb_id_collection = "'.$id_collection.'"';
                                        
                                        $this->bdd->executer($update);
                                }
                        }
                }
        }
        
        private function desontologiserUniteRangement() {
                
                $requete = "SELECT ccb_id_collection, ccb_truk_unite_rangement ".
                                        "FROM coel_collection_botanique ".
                                        "WHERE ccb_truk_unite_rangement IS NOT NULL AND ccb_truk_unite_rangement != '' ";

                $infos_truk = $this->bdd->recupererTous($requete);
                
                // Récupération de la liste des termes d'ontologies pour les types de rangement
                $requete_onto = "SELECT * FROM coel_meta_liste_valeur ".
                                        "WHERE cmlv_ce_parent = 1044";
                
                $infos_onto = $this->bdd->recupererTous($requete_onto);
                
                // Pour associer facilement chaque id d'ontologie à sa signification
                $ontologie_rangement = array();
                foreach($infos_onto as $onto) {
                        $ontologie_rangement[$onto['cmlv_id_valeur']] = $onto;
                }
                
                foreach($infos_truk as $truk) {

                        $id_collection = $truk['ccb_id_collection'];
                        $unite_rangement_des = array('cartons' => array(), 'liasses' => array(), 'autres' => array());
                        
                        // Séparation de chaque catégorie d'unite de truk
                        $categories_unite_rangement = explode(';;', $truk['ccb_truk_unite_rangement']);
                        
                        // Pour éviter de modifier une collection où seul un "squelette" de truk serait présent
                        $collection_a_modifier = false;
                        
                        // Iteration sur toutes les catégories de rangement trouvées
                        foreach($categories_unite_rangement as $unite_rangement) {                                              
                                // extraction du numéro d'ontologie de la liste concernée
                                list($id_ontologie_rangement, $infos_unite_rangement) = explode('##', $unite_rangement);                        
                                $tableau_unite_rangement = $this->parserUniteRangement($infos_unite_rangement);
                                
                                if($tableau_unite_rangement['nombre'] > 0) {
                                        $collection_a_modifier = true;
                                        switch($id_ontologie_rangement) {
                                                // Liasses : 2256
                                                case "2256":
                                                        $unite_rangement_des['liasses'] = $tableau_unite_rangement;
                                                break;
                                                // Cartons d'herbier : 2255
                                                case "2255":
                                                        $unite_rangement_des['cartons'] = $tableau_unite_rangement;
                                                break;
                                                // Autres
                                                default:
                                                        $unite_rangement_des['autres'][] = $this->formaterLigneAutreUniteRangement($id_ontologie_rangement, $ontologie_rangement, $tableau_unite_rangement);
                                        }       
                                }                                                               
                        }
                        
                        // Pas la peine de modifier une collection qui ne content ni liasse, ni carton d'herbier, ni autre
                        // (on ne le sait qu'à ce moment là après analyse par le script car la colonne ccb_truk_unite_rangement
                        // est tout de même quelquefois remplie par une syntaxe d'ontologie vide quand il n'y a rien)
                        if($collection_a_modifier) {
                                $update = "UPDATE coel_collection_botanique ".
                                                                "SET ";
                                
                                $champs = array();
                                
                                if(!empty($unite_rangement_des['liasses'])) {
                                        $champs[] = "ccb_nb_liasses = ".$this->bdd->proteger($unite_rangement_des['liasses']['nombre']).", ".
                                        "ccb_format_liasses = ".$this->bdd->proteger($unite_rangement_des['liasses']['format'])." ";
                                }
                                
                                if(!empty($unite_rangement_des['cartons'])) {
                                        $champs[] = "ccb_nb_cartons_herbier = ".$this->bdd->proteger($unite_rangement_des['cartons']['nombre']).", ".
                                        "ccb_format_cartons_herbier = ".$this->bdd->proteger($unite_rangement_des['cartons']['format'])." ";
                                }
                                
                                if(!empty($unite_rangement_des['autres'])) {
                                        // Pour éviter de casser les sauts de lignes il faut les remplacer après avoir protégé la valeur
                                        $champs[] = "ccb_autres_unites_rangement = ".str_replace('NEWLINE', "\r\n", $this->bdd->proteger(implode('NEWLINE', $unite_rangement_des['autres'])));
                                }
                                                                
                                $update .= implode(', ', $champs)." ".
                                                        "WHERE ccb_id_collection = '".$id_collection."'";

                                $this->bdd->executer($update);
                        }
                }
        }
        
        private function parserUniteRangement($unite_rangement) {
                $tableau_unite_rangement = explode('||', $unite_rangement);
                return array(
                        'nombre' => $tableau_unite_rangement[0],
                        'precision' => $tableau_unite_rangement[1],
                        'format' => $tableau_unite_rangement[2]
                );
        }
        
        private function formaterLigneAutreUniteRangement($id_ontologie, $ontologie_rangement, $tableau_unite_rangement) {
                $nom_rangement = $id_ontologie;
                
                // Des fois on a un numéro d'ontologie des fois un nom de type de rangement
                if(!is_numeric($id_ontologie)) {
                        $nom_rangement = $id_ontologie;
                } else if(!empty($ontologie_rangement[$id_ontologie])) {
                        $nom_rangement = $ontologie_rangement[$id_ontologie]['cmlv_nom'];
                } else {
                        $nom_rangement = 'Type de rangement inconnu';
                }
                
                // Le nombre d'unités est directement accolé au type
                $tab_autre_ligne_rangement = array($nom_rangement);
                if(!empty($tableau_unite_rangement['nombre'])) {
                        $tab_autre_ligne_rangement[0] .= ' : '.$tableau_unite_rangement['nombre'];
                }
                
                // La précision est soit exacte soit approximative
                if(!empty($tableau_unite_rangement['precision'])) {
                        $precision = $tableau_unite_rangement['precision'] == 'E' ? 'exacte' : 'appromixative';
                        $tab_autre_ligne_rangement[] = 'Précision '.$precision;
                }
                
                // Le format est une suite de de type YxZ ou Y et Z sont des longueurs et largeurs
                // eventuellement séparés par des virgules s'il y a différents formats
                if(!empty($tableau_unite_rangement['format'])) {
                        $tab_autre_ligne_rangement[] = 'Format '.$tableau_unite_rangement['format'];
                }
                // On retourne une ligne de la forme "type de rangement : nombre - Précision précision - Format format"               
                return implode(' - ', $tab_autre_ligne_rangement);
        }
}
?>