Subversion Repositories eFlore/Projets.communes

<?php
// declare(encoding='UTF-8');
/**
 * Exemple de script utilisable avec le TBFramework.
 * Pour le lancer, taper en ligne de commande, en vous plaçant dans le dossier /framework/exemple/scripts/ :
 * <code>/opt/lampp/bin/php cli.php mon_script -a test</code>
 *
 * @author              Jean-Pascal MILCENT <jpm@tela-botanica.org>
 * @copyright   Copyright (c) 2010, Tela Botanica (accueil@tela-botanica.org)
 * @license     http://www.gnu.org/licenses/gpl.html Licence GNU-GPL-v3
 * @license     http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL-v2
 * @version     $Id$
 */
class NettoyageKml extends Script {
        
        private $fichier_id = '';
        
        private $coordonnees_simples = array();
        
        protected $parametres_autorises = array(
                '-f' => array(true, true, 'Fichier KML à nettoyer.'));
        
        public function executer() {
                // Récupération de paramêtres

                // Lancement de l'action demandée
                $cmd = $this->getParametre('a');
            switch ($cmd) {
                        case 'nettoyer' :
                                $this->executerNettoyage();
                                break;
                        default :
                                $this->traiterErreur('Erreur : la commande "%s" n\'existe pas!', array($cmd));
                }
    }

    private function executerNettoyage() {
        $kml = $this->getParametre('f');
        if (file_exists($kml)) {
                $placemarks = $this->analyserFichierKml($kml);
                                
                $nom_kml = basename($kml, '.kml');
                $dossier_kml = dirname($kml);
                $dpt = '00';
                if (preg_match('/^([0-9]{2}|2[AB])/', $nom_kml, $match)) {
                        $dpt = $match[1];
                }
                $fichier_sortie = $dossier_kml.DS.$dpt.'%s.kml';
                $squelette = dirname(__FILE__).DS.'squelettes'.DS.'defaut.tpl.kml';
                
                $num = 1;
                $pas = Config::get('fichierSortie.taille');
                $taille = 0;
                $nbre_placemarks = count($placemarks);
                foreach ($placemarks as $id => $placemark) {
                        $placemarks_portion[] = $placemark;
                        $taille += mb_strlen($placemark);
                        if ($taille > $pas || $id == ($nbre_placemarks - 1)) {
                                $taille = 0;
                                $donnees = array('nom' => $nom_kml, 'placemarks' => $placemarks_portion);
                                
                                $sortie = SquelettePhp::analyser($squelette, $donnees);
                                $suffixe_fichier = ($id == ($nbre_placemarks - 1) && $num == 1) ? '' : '_'.$num++;
                                if (file_put_contents(sprintf($fichier_sortie, $suffixe_fichier), $sortie)) {
                                        @chmod($fichier_sortie, octdec(Config::get('fichierSortie.droits')));
                                } else {
                                        trigger_error("Impossible d'écrire dans le fichier : $fichier_sortie", E_USER_WARNING);
                                }
                                $placemarks_portion = array();
                        }
                }
        }
    }
    
    private function analyserFichierKml($fichier_kml) {
        $placemarks = array();
        $lignesKML = file($fichier_kml, FILE_SKIP_EMPTY_LINES);
        foreach ($lignesKML as $id => $ligne) {
                if (preg_match('/^\s*<Placemark>/', $ligne)) {
                        if (isset($placemark)) {
                                $placemarks[] = $placemark;
                        }
                        $placemark = '';
                }
                
                $this->trouverFichierId($ligne);
                if (isset($placemark)) {
                        $ligne = $this->remplacerChaines($ligne);
                        $placemark .= $this->traiterLigne($ligne);
                        
                }
        }
        return $placemarks;
    }
    private function trouverFichierId($ligne) {
        if (preg_match('/<Document><Folder><name>([^<]+)<\/name>/', $ligne, $match)) {
                $this->fichier_id = $match[1];
        }
    }
    
    private function remplacerChaines($ligne) {
                $ligne = preg_replace("/^\s+(<[\/]?Placemark>)/", "\t\t$1", $ligne);
                $ligne = preg_replace("/^\s+(<name>)/", "\t\t\t$1", $ligne);
                $ligne = preg_replace("/(<ExtendedData>)(<SchemaData)/", "\t\t$1\n\t\t\t\t$2", $ligne);
                $ligne = preg_replace("/(<\/SchemaData>)(<\/ExtendedData>)/", "\t\t\t$1\n\t\t\t$2", $ligne);
            $ligne = preg_replace('/^\t+(<SimpleData name=")CODE_INSEE(">)/', "\t\t\t\t\t$1code_insee$2", $ligne);
            $ligne = preg_replace('/(schemaUrl="#)'.$this->fichier_id.'(")/', "$1commune$2", $ligne);
            return $ligne;
    }
    
    private function traiterLigne($ligne) {
        $ligne_traitee = $ligne;
        if (preg_match('/^\s*(<Polygon><outerBoundaryIs><LinearRing><coordinates>)([^<]+)([^$]+)/', $ligne, $match)) {
                $debut_chaine_polygone = $match[1];
                $coordonnees = $this->traiterCoordonnees($match[2]);
                $fin_chaine_polygone = $match[3];
                $ligne_traitee = "\t\t\t".$debut_chaine_polygone.$coordonnees.$fin_chaine_polygone;
        } else if (preg_match('/^\s*<Style>.*<\/Style>$/u', $ligne)) {
                $url_style = Config::get('urlStyle');
                $ligne_traitee = "\t\t\t<styleUrl>$url_style#commune-limite</styleUrl>\n";
        } else if (preg_match('/^\t+<SimpleData name="Name">/', $ligne)) {
                 // Ne pas prendre en compte cette ligne
        } else {
                        $ligne_traitee = $ligne;
                }
                return $ligne_traitee;
        }
        
        private function traiterCoordonnees($chaine_coordonnees) {
                $coordonnees = explode(' ', $chaine_coordonnees);
                $geo_points = array();
                foreach ($coordonnees as $coord) {
                        list($lon, $lat) = explode(',', $coord);
                        $geo_points[] = new GeoPoint($lat, $lon);
                }
                $reducteur = new PolylineReducer($geo_points);
                $coordonnees_simplifiees = $reducteur->SimplerLine(Config::get('simplification'));
                
                $polygone_points = array();
                foreach ($coordonnees_simplifiees as $geoPoint) {
                        $lat = str_replace(',', '.', $geoPoint->latitude);
                        $lon = str_replace(',', '.', $geoPoint->longitude);
                        $polygone_points[] = $lon.','.$lat;
                }
                
                $this->traiterInfo("Traitement coordonnées (avt/aprs) : %s/%s", array(count($coordonnees), count($coordonnees_simplifiees)));
                return implode(' ', $polygone_points);
        }
}
?>