Subversion Repositories eFlore/Projets.eflore-projets

<?php
/** Exemple lancement:
 * /opt/lampp/bin/php -d memory_limit=3500M ~/web/eflore-projets/scripts/cli.php sauvages -a chargerTous
*/
class Sauvages extends EfloreScript {
        private $contenu_fichier = array();
        protected $parametres_autorises = array(
                        '-f' => array(true, true, 'Nom du fichier ou du dossier à traiter'));
        private $caracteresAccentues = array(
                        'À', 'Á', 'Â', 'Ã', 'Ä', 'Å', 'Æ', 'Ç', 'È', 'É', 'Ê', 'Ë', 'Ì', 'Í', 'Î',
                        'Ï', 'Ð', 'Ñ', 'Ò', 'Ó', 'Ô', 'Õ', 'Ö', 'Ø', 'Ù', 'Ú', 'Û', 'Ü', 'Ý', 'ß',
                        'à', 'á', 'â', 'ã', 'ä', 'å', 'æ', 'ç', 'è', 'é', 'ê', 'ë', 'ì', 'í', 'î',
                        'ï', 'ñ', 'ò', 'ó', 'ô', 'õ', 'ö', 'ø', 'ù', 'ú', 'û', 'ü', 'ý', 'ÿ', 'Ā',
                        'ā', 'Ă', 'ă', 'Ą', 'ą', 'Ć', 'ć', 'Ĉ', 'ĉ', 'Ċ', 'ċ', 'Č', 'č', 'Ď', 'ď',
                        'Đ', 'đ', 'Ē', 'ē', 'Ĕ', 'ĕ', 'Ė', 'ė', 'Ę', 'ę', 'Ě', 'ě', 'Ĝ', 'ĝ', 'Ğ',
                        'ğ', 'Ġ', 'ġ', 'Ģ', 'ģ', 'Ĥ', 'ĥ', 'Ħ', 'ħ', 'Ĩ', 'ĩ', 'Ī', 'ī', 'Ĭ', 'ĭ',
                        'Į', 'į', 'İ', 'ı', 'IJ', 'ij', 'Ĵ', 'ĵ', 'Ķ', 'ķ', 'Ĺ', 'ĺ', 'Ļ', 'ļ', 'Ľ',
                        'ľ', 'Ŀ', 'ŀ', 'Ł', 'ł', 'Ń', 'ń', 'Ņ', 'ņ', 'Ň', 'ň', 'ʼn', 'Ō', 'ō', 'Ŏ',
                        'ŏ', 'Ő', 'ő', 'Œ', 'œ', 'Ŕ', 'ŕ', 'Ŗ', 'ŗ', 'Ř', 'ř', 'Ś', 'ś', 'Ŝ', 'ŝ',
                        'Ş', 'ş', 'Š', 'š', 'Ţ', 'ţ', 'Ť', 'ť', 'Ŧ', 'ŧ', 'Ũ', 'ũ', 'Ū', 'ū', 'Ŭ',
                        'ŭ', 'Ů', 'ů', 'Ű', 'ű', 'Ų', 'ų', 'Ŵ', 'ŵ', 'Ŷ', 'ŷ', 'Ÿ', 'Ź', 'ź', 'Ż',
                        'ż', 'Ž', 'ž', 'ſ', 'ƒ', 'Ơ', 'ơ', 'Ư', 'ư', 'Ǎ', 'ǎ', 'Ǐ', 'ǐ', 'Ǒ', 'ǒ',
                        'Ǔ', 'ǔ', 'Ǖ', 'ǖ', 'Ǘ', 'ǘ', 'Ǚ', 'ǚ', 'Ǜ', 'ǜ', 'Ǻ', 'ǻ', 'Ǽ', 'ǽ', 'Ǿ', 'ǿ');
        private $caracteresNormaux = array(
                        'A', 'A', 'A', 'A', 'A', 'A', 'AE', 'C', 'E', 'E', 'E', 'E', 'I', 'I', 'I',
                        'I', 'D', 'N', 'O', 'O', 'O', 'O', 'O', 'O', 'U', 'U', 'U', 'U', 'Y', 's',
                        'a', 'a', 'a', 'a', 'a', 'a', 'ae', 'c', 'e', 'e', 'e', 'e', 'i', 'i', 'i',
                        'i', 'n', 'o', 'o', 'o', 'o', 'o', 'o', 'u', 'u', 'u', 'u', 'y', 'y', 'A', 'a',
                        'A', 'a', 'A', 'a', 'C', 'c', 'C', 'c', 'C', 'c', 'C', 'c', 'D', 'd', 'D', 'd',
                        'E', 'e', 'E', 'e', 'E', 'e', 'E', 'e', 'E', 'e', 'G', 'g', 'G', 'g', 'G', 'g',
                        'G', 'g', 'H', 'h', 'H', 'h', 'I', 'i', 'I', 'i', 'I', 'i', 'I', 'i', 'I', 'i',
                        'IJ', 'ij', 'J', 'j', 'K', 'k', 'L', 'l', 'L', 'l', 'L', 'l', 'L', 'l', 'l', 'l',
                        'N', 'n', 'N', 'n', 'N', 'n', 'n', 'O', 'o', 'O', 'o', 'O', 'o', 'OE', 'oe', 'R',
                        'r', 'R', 'r', 'R', 'r', 'S', 's', 'S', 's', 'S', 's', 'S', 's', 'T', 't', 'T', 't',
                        'T', 't', 'U', 'u', 'U', 'u', 'U', 'u', 'U', 'u', 'U', 'u', 'U', 'u', 'W', 'w', 'Y',
                        'y', 'Y', 'Z', 'z', 'Z', 'z', 'Z', 'z', 's', 'f', 'O', 'o', 'U', 'u', 'A', 'a', 'I',
                        'i', 'O', 'o', 'U', 'u', 'U', 'u', 'U', 'u', 'U', 'u', 'U', 'u', 'A', 'a', 'AE', 'ae', 'O', 'o');

        public function executer() {
                // Lancement de l'action demandée
                try {
                        $this->initialiserProjet('sauvages');

                        $cmd = $this->getParametre('a');
                        switch ($cmd) {
                                case 'chargerTous' :
                                        $this->creerXmlTaxons();
                                        $this->creerXmlCriteres();
                                        break;
                                case 'creerXmlCriteres' :
                                        $this->creerXmlCriteres();
                                        break;
                                case 'creerXmlTaxons' :
                                        $this->creerXmlTaxons();
                                        break;
                                default :
                                        throw new Exception("Erreur : la commande '$cmd' n'existe pas!");
                        }
                } catch (Exception $e) {
                        $this->traiterErreur($e->getMessage());
                }
        }

        public function creerXmlCriteres() {
                $this->recupererContenuFichier();
                $criteres_nom = $this->contenu_fichier[0];
                unset($this->contenu_fichier[0]);               
                $criteres_label = $this->contenu_fichier[1];
                unset($this->contenu_fichier[1]);
                $description_label = $this->contenu_fichier[2];
                unset($this->contenu_fichier[2]);
                $criteres_valeurs = $this->extraireValeurs();
                $xml = $this->formerXmlCriteres($criteres_nom, $criteres_label, $description_label, $criteres_valeurs);//print_r($xml);
                file_put_contents("./xml_criteres.xml", $xml);
        }
        
        
        public function formerXmlCriteres($nom, $label, $description, $valeurs) {
                $xml='<keys>
                                <groupe id="1">
                                        <nom>Arbres</nom>
                                        <media>images/pictos/icone_arbre.png</media>
                                        <criteres>';
                foreach ($label as $id=>$criteres) {
                        if ($id > 2) {
                                $xml .= '<critere id="1.'.$id.'">
                                                        <label>'.$criteres.'</label>
                                                        <description>'.$description[$id].'</description>
                                                        <valeurs>';
                                foreach ($valeurs[$id] as $id_val=>$valeur) {
                                        if ($valeur != "0") {
                                                $crit = str_replace(" ", "_", $this->supprimerAccents($nom[$id]));
                                                $val = str_replace(" ", "_", $this->supprimerAccents($valeur));
                                                $image = $crit."_".$val;
                                                $xml .= '<valeur code="1.'.$id.'.'.$id_val.'" media="images/pictos/'.$image.'.png">'.$valeur.'</valeur>';
                                        }
                                }
                                $xml .= '</valeurs></critere>';
                        }
                }
                $xml .= "</criteres>
                        </groupe>
                        </keys>";
                return $xml;
        }
        
        private function extraireValeurs() {
                $valeurs = array();
                foreach ($this->contenu_fichier as $ligne) {
                        $i = 0;
                        foreach ($ligne as $critere) {
                                if (!isset($valeurs[$i]) || !in_array(trim($critere), $valeurs[$i])) {
                                        $valeurs[$i][] = trim($critere);
                                }
                                $i++;
                        }
                }
                return $valeurs;
        }
        
        
        public function creerXmlTaxons() {
                $this->recupererContenuFichier();
                $criteres_label = array_flip($this->contenu_fichier[0]);
                unset($this->contenu_fichier[0]);
                unset($this->contenu_fichier[1]);
                unset($this->contenu_fichier[2]);
                $criteres_valeurs = $this->extraireValeurs();
                $xml = $this->formerXmlTaxons($criteres_label, $criteres_valeurs); //print_r($xml);
                file_put_contents("./xml_taxons.xml", $xml);
        }
        
        public function formerXmlTaxons($criteres_label, $criteres_valeurs) {
                $xml='<?xml version="1.0" ?><TAXONS SUBJECT="XML">';
                $rest = new RestClient();
                foreach ($this->contenu_fichier as $id=>$taxon) {
                        $infos_taxon = $this->rechercherInfosTaxon($rest, $taxon[$criteres_label["nom scientifique"]]);
                        $xml .= '<TAXON id="'.$id.'" value="'.
                                ucfirst($taxon[$criteres_label["nom vernaculaire"]]).'" sciName="'.trim($taxon[$criteres_label["nom scientifique"]]).'" groupe="1">
                        <DESCRIPTION>'.$infos_taxon["description"].'</DESCRIPTION>
                        <PICTURES>';
                        if ($infos_taxon["images"] != array()) {
                                foreach ($infos_taxon["images"] as $image) {
                                        $xml .= '<PICTURE media="'.$image["binaire.href"].'"><author>'.$image["auteur.libelle"].'</author></PICTURE>';
                                }
                        }
                        $xml .= '</PICTURES><CRITERIAS>';
                        for ($i=3; $i < count($taxon); $i++) {
                                if (trim($taxon[$i]) !== "0") {
                                        $xml .= '<VALUE code="1.'.$i.'.'.array_search(trim($taxon[$i]), $criteres_valeurs[$i]).'"/>';
                                }
                        }
                        $xml .= '</CRITERIAS></TAXON>';
                }
                $xml .= "</TAXONS>";
                return $xml;
        }
        
        private function rechercherInfosTaxon($rest, $ns) {
                $info = array("description" => "", "images" => array());
                
                $reponse = $this->consulterWebService($rest, "bdtfx", 
                        "noms", "?retour.champs=nom_retenu.id,num_taxonomique&retour.tri=retenu&masque=".urlencode(trim($ns)));
                if (is_array($reponse["resultat"])) {
                        $num_nom = $reponse["resultat"][key($reponse["resultat"])]["nom_retenu.id"];
                        $num_taxon = $reponse["resultat"][key($reponse["resultat"])]['num_taxonomique'];
                }
                
                $url_wiki = "http://www.tela-botanica.org/wikini/eFloreRedaction/api/rest/0.5/pages/SmartFloreBDTFXnt".
                                        $num_taxon."?txt.format=text/plain&txt.section.titre=Comment%20la%20reconnaître%20%3F";
                $wiki = $rest->consulter($url_wiki); $wiki = json_decode($wiki, true);
                if ($wiki['texte'] != ""){
                        $info["description"] = $this->formaterSmatflore($wiki['texte']);
                } else {
                        $coste = $this->consulterWebService($rest, "coste", "textes", "/bdtfx.nn:".$num_nom);
                        if ($coste['resultats'] != array() && $coste['resultats'][key($coste["resultats"])]['texte'] != "") {
                                $texte = str_replace("**", "", $coste['resultats'][key($coste["resultats"])]['texte']);
                                $texte = str_replace("//", "", $texte);
                                $texte = explode(" – ", $texte);
                                unset($texte[0],$texte[1]);
                                if (strpos($texte[2], ";") === false) {unset($texte[2]);} //else {print_r($texte[2]);}
                                
                                if (preg_match('/^[\w|\s|\-|,]*\.*\s*$/', $texte[2]) == true) {print_r($texte[2]); unset($texte[2]);}
                                $info["description"] = implode(" – ", $texte);
                        } else {
                                $baseflor = $this->consulterWebService($rest, "baseflor", "informations", "/bdtfx.nn:".$num_nom);
                                $info["description"] = $this->formaterBaseflor($baseflor);
                        }
                }
                if ($info["description"] == "En cours de rédaction.") {echo $num_nom." ".$ns;
                        print_r($coste);
                }
                $reponse = $this->consulterWebService($rest, "cel", "images", "?navigation.limite=5&retour.format=CRS&masque.nn=".$num_nom);
                $info["images"] = $reponse["resultats"];
                return $info;
        }
        
                        

        private function formaterSmatflore($texte) {
                $a_enlever = array(Chr(10).'=', '='.Chr(10), Chr(10).''.Chr(10));
                $texte = str_replace($a_enlever, '', $texte);
                $texte = str_replace(Chr(10), '<br />', $texte);
                return $texte;
        }
        
        private function formaterBaseflor($reponse) {
                $description = "En cours de rédaction.";
                if ($reponse["nom_sci"] != "") {
                        $description = "Formation végétale : ".$reponse["form_vegetale"]."; ".
                                                        "Inflorescence : ".$reponse["inflorescence"]."; ".
                                                        "Couleur de la fleur : ".$reponse["couleur_fleur"]."; ".
                                                        "Sexualité : ".$reponse["sexualite"]."; ".
                                                        "Fruit : ".$reponse["fruit"]."; ".
                                                        "Pollinisation : ".$reponse["pollinisation"]."; ".
                                                        "Dissémination : ".$reponse["dissemination"]."; ".
                                                        "Ecologie : ".$reponse["carac_ecolo"]." – ".
                                                        "Chorologie : ".$reponse["chorologie"]."; ".
                                                        "Floraison :  ".$reponse["floraison"];
                }
                return $description;
        }
        
        private function consulterWebService($rest, $projet,$resssource,$parametres) {
                $url_id = "http://www.tela-botanica.org/service:eflore:0.1/".$projet."/".$resssource.$parametres;
                $reponse = $rest->consulter($url_id);
                return json_decode($reponse, true);
        }
        
        
        private function recupererContenuFichier() {
                $nomFichier = Config::get('dossierCsv').Config::get('projet');
                if ($nomFichier && file_exists($nomFichier) ){
                        $extensionFichier = strtolower(strrchr($nomFichier, '.'));
                        if ($extensionFichier === ".csv"){
                                $file = new SplFileObject($nomFichier);
                                $file->setFlags(SplFileObject::SKIP_EMPTY);
                                $i = 0;
                                echo "Traitement du fichier : ";
                                while (!$file->eof()){
                                        $ligne_csv = $file->fgetcsv($delimiter = ';');
                                                $this->contenu_fichier[$i] = $ligne_csv;
                                        echo str_repeat(chr(8), ( strlen( $i ) + 1 ))."\t".$i++;
                                }
                                echo "\n";
                        } else {
                                $this->traiterErreur("Le fichier : $nomFichier n'est pas au format csv.");
                        }
                } else {
                        $this->traiterErreur("Le fichier : $nomFichier n'existe pas.");
                }
        }
        
        public function supprimerAccents($chaine) {
                return str_replace($this->caracteresAccentues, $this->caracteresNormaux, $chaine);
        }
}
?>