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})/', $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 = 2750000;

	    	$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('fichierSortieDroits')));

			    	} 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(0.0001);

		$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);

	}

}

?>