Subversion Repositories Applications.annuaire

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
31 aurelien 1 
<?php
2 
// declare(encoding='UTF-8');
3 
/**
4 
 * classe Controleur du module Carte.
5 
 *
6 
 * @package     Collection
7 
 * @category    Php5
8 
 * @author      Jean-Pascal MILCENT <jpm@tela-botanica.org>
9 
 * @author      Aurélien Peronnet <aurelien@tela-botanica.org>
10 
 * @copyright   2010 Tela-Botanica
11 
 * @license     http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL
12 
 * @license     http://www.gnu.org/licenses/gpl.html Licence GNU-GPL
13 
 * @version     SVN: $Id$
14 
 */
120 aurelien 15 
class CartoControleur extends AppControleur {
31 aurelien 16 
 
17 
 
18 
	// identifiant de la france pour l'accès direct
44 aurelien 19 
    private $id_france = 'fr';
31 aurelien 20 
 
44 aurelien 21 
	// nom du fond de carte en cours
22 
    private $nom_fond = '';
221 aurelien 23 
 
24 
    private $niveau = 0;
25 
 
26 
    // contient le tableau de données sur les continents une fois chargé
27 
    private $donnees_continents = array();
28 
 
29 
    // contient le tableau de données sur les pays une fois chargé
30 
    private $donnees_pays = array();
31 
 
32 
    // contient le tableau de données sur les departements une fois chargé
33 
    private $donnees_departements = array();
294 aurelien 34 
 
35 
    // contient le nombre total d'inscrits dans la zone en cours de consultation
36 
    private $total_inscrits_zone = 0;
44 aurelien 37 
 
31 aurelien 38 
    //+----------------------------------------------------------------------------------------------------------------+
39 
    // Méthodes
40 
 
41 
    /**
42 
     * Fonction d'affichage par défaut, elle appelle la cartographie
43 
     */
44 
    public function executerActionParDefaut() {
45 
        return $this->cartographier(1);
46 
    }
47 
 
48 
    /**
49 
     * Cartographier un annuaire.
44 aurelien 50 
     * @param int $id_annuaire l'identitifiant de l'annuaire à cartographier
51 
     * @param int $continent l'identitifiant du continent sur lequel on se trouve
52 
     * @param string $pays l'identitifiant du pays sur lequel on se trouve (normalement seulement la france si présent)
31 aurelien 53 
     * @return string la vue correspondante
54 
     */
44 aurelien 55 
    public function cartographier($id_annuaire, $continent= null , $pays = null) {
31 aurelien 56 
        // Initialisation de variable
57 
        $donnees = array();
58 
 
44 aurelien 59 
		// la présence d'un pays (non) et d'un continent (ou non) détermine le niveau de carte à afficher
221 aurelien 60 
        $this->niveau = $this->calculerNiveau($continent, $pays);
31 aurelien 61 
 
44 aurelien 62 
        // suivant le niveau, continent et pays, on renvoie un template html différent
221 aurelien 63 
        $fond = $this->renvoyerPrefixePourNiveau($this->niveau, $continent, $pays);
44 aurelien 64 
 
65 
		$carte = '';
66 
 
67 
		// chaque continent possède un fond de carte différent
221 aurelien 68 
		if($this->niveau == 1) {
69 
        	$carte = $this->renvoyerSuffixePourContinent($this->niveau, $continent, $pays);
44 aurelien 70 
		}
71 
 
31 aurelien 72 
        // Création de la carte
73 
        $options = array(
44 aurelien 74 
            'carte_nom' => $fond.$carte,
31 aurelien 75 
            'formule' => Cartographie::FORMULE_PROPORTIONNEL,
76 
            'couleur_claire' => Config::get('carte_couleur_claire'),
77 
            'couleur_foncee' => Config::get('carte_couleur_foncee'),
44 aurelien 78 
            'fond_fichier' => Config::get('carte_base_nom_'.$fond).$carte,
31 aurelien 79 
            'fond_dossier' => Application::getChemin().Config::get('carte_fonds_chemin'),
80 
            'stock_dossier' => Config::get('carte_stockage_chemin'),
81 
            'stock_url' => Config::get('carte_stockage_url'),
82 
            'debug' => Config::get('carte_mode_debug'));
83 
        $cartographie = Composant::fabrique('cartographie', $options);
44 aurelien 84 
 
85 
        $this->nom_fond = Config::get('carte_base_nom_'.$fond).$carte;
86 
 
31 aurelien 87 
        // Construction des données nécessaires à la cartographie
88 
        $zones = $cartographie->getCarteZones();
221 aurelien 89 
        $this->chargerZonesNbre($id_annuaire,$zones, $this->niveau);
90 
        $this->chargerZonesUrls($id_annuaire, $zones, $continent, $pays, $this->niveau);
56 aurelien 91 
 
221 aurelien 92 
        $navigation = new NavigationControleur();
93 
		$donnees_navigation = $this->obtenirUrlsNavigation($id_annuaire, $continent, $pays, null);
294 aurelien 94 
		$donnees['infos_pays'] = $donnees_navigation;
221 aurelien 95 
		$donnees['navigation'] = $navigation->afficherBandeauNavigationCartographie($donnees_navigation);
294 aurelien 96 
		$donnees['nb_resultats'] = $this->total_inscrits_zone;
56 aurelien 97 
 
31 aurelien 98 
        $cartographie->setCarteZones($zones);
99 
 
100 
        $cartographie->creerCarte();
101 
        $donnees['map'] = $cartographie->getImageMap();
102 
 
103 
        $resultat = $this->getVue('cartes/'.$fond, $donnees);
104 
        return $resultat;
105 
    }
106 
 
44 aurelien 107 
	/**
108 
	 * Charge le nombre d'inscrit par zone pour un annuaire donné
109 
	 * @param int $id_annuaire l'identifiant de l'annuaire
110 
	 * @param array $zones les zones à cartographier (attention, passage par référence, donc les zones sont modifiées)
111 
	 * @param int $niveau le niveau de la carto (monde, continent, ou pays)
112 
	 */
113 
    private function chargerZonesNbre($id_annuaire, &$zones, $niveau = 0) {
31 aurelien 114 
 
115 
        $metaModele = $this->getModele('AnnuaireModele');
44 aurelien 116 
        // on charge les inscrits pour le niveau donné
117 
        $zones_infos = $this->chargerNombreInscritsParNiveauGeographique($id_annuaire, $niveau);
31 aurelien 118 
 
119 
        foreach ($zones as $id => &$infos) {
120 
 
44 aurelien 121 
			// si l'on a des données pour la zone, on renseigne le nombre d'inscrits
31 aurelien 122 
            if (isset($zones_infos[$id])) {
123 
 
124 
                $nbre = $zones_infos[$id];
125 
                $infos['info_nombre'] = $nbre;
294 aurelien 126 
 
127 
                $this->total_inscrits_zone += $nbre;
128 
 
31 aurelien 129 
            } else {
44 aurelien 130 
            	// sinon on le met à 0
31 aurelien 131 
                $infos['info_nombre'] = 0;
132 
            }
133 
        }
134 
    }
135 
 
44 aurelien 136 
	/**
137 
	 * Charge les des zones pour un annuaire donné
138 
	 * @param int $id_annuaire l'identifiant de l'annuaire
139 
	 * @param array $zones les zones à cartographier (attention, passage par référence, donc les zones sont modifiées)
140 
	 * @param int $continent l'identitifiant du continent sur lequel on se trouve
141 
     * @param string $pays l'identitifiant du pays sur lequel on se trouve (normalement seulement la france si présent)
142 
	 * @param int $niveau le niveau de la carto (monde, continent, ou pays)
143 
	 */
31 aurelien 144 
    private function chargerZonesUrls($id_annuaire, &$zones, $continent = null, $pays = null, $niveau = 0) {
145 
 
146 
    	$url = new URL(Config::get('url_base'));
56 aurelien 147 
 
31 aurelien 148 
    	$url->setVariableRequete('id_annuaire', $id_annuaire);
149 
 
150 
        foreach ($zones as $id => &$infos) {
151 
 
152 
        	switch ($niveau) {
44 aurelien 153 
				// niveau 0 de la carte : on affiche tous les continents
154 
				// l'url va pointer vers un continent en particulier
155 
				case 0:
156 
					$url->setVariableRequete('m', 'annuaire_afficher_carte');
157 
					$url->setVariableRequete('continent', $id);
158 
				break;
31 aurelien 159 
 
44 aurelien 160 
				// niveau 1, on est sur un continent en particulier : on affiche le détail du continent demandé
161 
				// l'url pointe sur des pays
162 
				case 1:
163 
					$url->setVariableRequete('continent', $continent);
31 aurelien 164 
 
44 aurelien 165 
					// si le pays c'est la france alors l'url pointera vers la carte des départements
166 
					if($id == $this->id_france) {
167 
						$url->setVariableRequete('m', 'annuaire_afficher_carte');
168 
					} else {
169 
						// sinon l'url pointe vers la liste des inscrits de ce pays
170 
						$url->setVariableRequete('m', 'annuaire_inscrits_carto');
171 
					}
172 
					$url->setVariableRequete('pays', $id);
31 aurelien 173 
 
44 aurelien 174 
				break;
31 aurelien 175 
 
44 aurelien 176 
				// niveau 2, si on a cliqué sur la france pour afficher les départements :
56 aurelien 177 
				case 2:
178 
					$url->setVariableRequete('m','annuaire_inscrits_carto');
44 aurelien 179 
					$url->setVariableRequete('continent', $continent);
180 
					$url->setVariableRequete('pays', $pays);
181 
					$url->setVariableRequete('departement', $id);
182 
				break;
183 
			}
31 aurelien 184 
            $infos['url'] = sprintf($url, $id);
185 
        }
186 
    }
187 
 
44 aurelien 188 
	/**
189 
	 * Renvoie le niveau auquel on se trouve suivant la présence ou non de certains paramètres
190 
	 * @param int $continent l'identitifiant du continent sur lequel on se trouve
191 
     * @param string $pays l'identitifiant du pays sur lequel on se trouve (normalement seulement la france si présent)
192 
	 */
31 aurelien 193 
    private function calculerNiveau($continent, $pays) {
194 
 
195 
		// le niveau 0 c'est la carte de base
196 
    	$niveau = 0;
197 
 
198 
		// le niveau 1 on consulte un continent en particulier (ex. Amérique du Sud)
199 
		if($continent != null) {
44 aurelien 200 
    		$niveau = 1;
31 aurelien 201 
    	}
202 
 
203 
		// le niveau 2 c'est un pays en particulier (ce cas là n'arrive que pour la france)
204 
    	if($pays != null) {
44 aurelien 205 
    		$niveau = 2;
31 aurelien 206 
    	}
207 
 
208 
    	return $niveau;
209 
    }
210 
 
44 aurelien 211 
	/**
212 
	 * Renvoie le type de template à utiliser suivant le niveau de certains paramètres
213 
	 * @param int $niveau le niveau de la carto
214 
	 * @return string le type de template
215 
	 */
216 
    private function renvoyerPrefixePourNiveau($niveau) {
31 aurelien 217 
    	switch ($niveau) {
218 
    		case 0:
219 
    			$fond = 'continents';
220 
    		break;
221 
 
44 aurelien 222 
    		case 1:
31 aurelien 223 
				$fond = 'pays';
224 
    		break;
225 
 
226 
    		case 2 :
227 
				$fond = 'france';
228 
			break;
229 
 
230 
			default:
44 aurelien 231 
				$fond = '';
31 aurelien 232 
			break;
233 
    	}
234 
 
235 
    	return $fond;
236 
    }
237 
 
44 aurelien 238 
	/**
239 
	 * Renvoie le suffixe de fond de carte à utiliser pour un continent donné
240 
	 * @param int $niveau le niveau de la carto
241 
	 * @param int $niveau l'identifiant de continent
242 
	 * @return string le suffixe
243 
	 */
244 
    private function renvoyerSuffixePourContinent($niveau, $continent) {
31 aurelien 245 
 
44 aurelien 246 
    	switch ($continent) {
247 
    		case 1:
248 
				$carte = '_afrique';
249 
			break;
250 
 
251 
    		case 2:
252 
				$carte = '_nord_amerique';
253 
			break;
254 
 
255 
    		case 3:
256 
				$carte = '_asie';
257 
			break;
258 
 
259 
    		case 4:
260 
				$carte = '_europe';
261 
			break;
262 
 
263 
    		case 5:
264 
				$carte = '_oceanie';
265 
    		break;
266 
 
267 
    		case 6:
268 
				$carte = '_sud_amerique';
269 
    		break;
270 
 
271 
    		case 7:
272 
				$carte = '_moyen_orient';
273 
    		break;
274 
 
275 
    		default:
276 
    			$carte = '';
277 
    		break;
278 
    	}
279 
 
280 
    	return $carte;
281 
    }
282 
 
283 
	/**
284 
	 * renvoie tous les noms templates pour chaque zone du monde
285 
	 * @return array un tableau associatif indexé par les identifiants de zone et contenant les noms de templates
286 
	 */
287 
    private function renvoyerTousTemplates() {
288 
    	return array(1 => 'pays_afrique', 2 => 'pays_nord_amerique', 3 => 'pays_asie', 4 => 'pays_europe', 5 => 'pays_oceanie', 6 => 'pays_sud_amerique', 7 => 'pays_moyen_orient');
289 
    }
290 
 
291 
	/**
292 
	 * Charge la liste des inscrits par zone pour un niveau géographique donné
293 
	 * @param int $id_annuaire l'identifiant de l'annuaire
294 
	 * @param int $niveau le niveau où l'on se situe
295 
	 * @return array un tableau associatif indexé par les identifiants de zone et contenant le nombre d'inscrits pour chaque zone
296 
	 */
297 
    private function chargerNombreInscritsParNiveauGeographique($id_annuaire, $niveau) {
298 
 
31 aurelien 299 
		$nb_inscrits = array();
300 
 
44 aurelien 301 
		if($niveau == 0) {
302 
			// si on est au niveau des continents
303 
			$zones_ids = array();
304 
			// il faut faire la somme des inscrits par zones géographique
305 
			$templates = $this->renvoyerTousTemplates();
306 
		} else {
307 
			// sinon on appelle la fonction pour la zone demandée
308 
			$zones_ids = $this->chargerZonesParCsv(Application::getChemin().Config::get('carte_fonds_chemin').$this->nom_fond);
309 
		}
310 
 
31 aurelien 311 
		$annuaire_controleur = new AnnuaireControleur();
312 
 
313 
		switch ($niveau) {
44 aurelien 314 
			// niveau de la carte du monde
31 aurelien 315 
    		case 0:
44 aurelien 316 
    			// pour chacun des continents, on fait la somme des membres de sa zone
317 
    			foreach($templates as $id_continent => $template) {
318 
    				$zones_continent_ids = $this->chargerZonesParCsv(Application::getChemin().Config::get('carte_fonds_chemin').$template);
319 
    				$nb_inscrits[$id_continent] = array_sum($annuaire_controleur->chargerNombreAnnuaireListeInscritsParPays($id_annuaire, $zones_continent_ids));
320 
    			}
31 aurelien 321 
    		break;
322 
 
44 aurelien 323 
			// niveau de la carte des pays d'un continent
324 
    		case 1:
325 
				$nb_inscrits = $annuaire_controleur->chargerNombreAnnuaireListeInscritsParPays($id_annuaire, $zones_ids);
31 aurelien 326 
    		break;
327 
 
44 aurelien 328 
			// détail d'un pays
31 aurelien 329 
    		case 2 :
330 
				$nb_inscrits = $annuaire_controleur->chargerNombreAnnuaireListeInscritsParDepartement($id_annuaire);
331 
			break;
332 
 
143 aurelien 333 
			// action par défaut
31 aurelien 334 
			default:
143 aurelien 335 
				// on renvoie un tableau vide
336 
				$nb_inscrits = array();
31 aurelien 337 
			break;
338 
		}
339 
 
340 
    	return $nb_inscrits;
341 
    }
221 aurelien 342 
 
343 
    public function obtenirUrlsNavigation($id_annuaire ,$continent = null, $pays = null, $departement = null) {
344 
 
345 
    	$donnees = array();
346 
 
347 
    	$url_carte_monde = new URL(Config::get('url_base'));
348 
    	$url_carte_monde->setVariableRequete('id_annuaire', $id_annuaire);
349 
		$url_carte_monde->setVariableRequete('m', 'annuaire_afficher_carte');
350 
    	$donnees['url_carte_monde'] =  $url_carte_monde;
351 
    	$donnees['nom_carte_monde'] =  'Carte du monde';
352 
 
353 
    	if($continent != null && trim($continent) != '') {
354 
    		$infos_continents = $this->chargerInformationsContinentCsv();
355 
    		$url_continent = new URL(Config::get('url_base'));
356 
    		$url_continent->setVariableRequete('id_annuaire', $id_annuaire);
357 
			$url_continent->setVariableRequete('m', 'annuaire_afficher_carte');
358 
			$url_continent->setVariableRequete('continent', $continent);
359 
    		$donnees['url_continent'] =  $url_continent;
360 
    		$donnees['nom_continent'] =  $infos_continents[$continent][2];
361 
    	}
362 
 
363 
    	if($pays != null && trim($pays) != '') {
364 
 
365 
    		$templates_continents = $this->renvoyerTousTemplates();
366 
    		$infos_continents = $this->chargerInformationsPaysDuContinentsCsv($templates_continents[$continent]);
367 
    		$infos_pays = $infos_continents[$pays];
368 
    		$url_pays = new URL(Config::get('url_base'));
369 
    		$url_pays->setVariableRequete('id_annuaire', $id_annuaire);
370 
    		if($pays == $this->id_france) {
371 
				$url_pays->setVariableRequete('m', 'annuaire_afficher_carte');
372 
			} else {
373 
				// sinon l'url pointe vers la liste des inscrits de ce pays
374 
				$url_pays->setVariableRequete('m', 'annuaire_inscrits_carto');
375 
			}
376 
			$url_pays->setVariableRequete('continent', $continent);
377 
			$url_pays->setVariableRequete('pays', $pays);
378 
    		$donnees['url_pays'] =  $url_pays;
379 
    		$donnees['nom_pays'] =  $infos_pays[2];
380 
    	}
381 
 
382 
    	if($departement != null && trim($departement) != '') {
383 
    		$infos_departement = $this->chargerInformationsDepartementsFranceCsv();
384 
    		$url_departement = new URL(Config::get('url_base'));
385 
    		$url_departement->setVariableRequete('id_annuaire', $id_annuaire);
386 
			$url_departement->setVariableRequete('m', 'annuaire_afficher_carte');
387 
			$url_departement->setVariableRequete('continent', $continent);
388 
			$url_departement->setVariableRequete('departement', $departement);
389 
			$url_departement->setVariableRequete('pays', $pays);
390 
    		$donnees['url_departement'] =  $url_departement;
391 
    		$donnees['nom_departement'] =  $infos_departement[$departement][2];
294 aurelien 392 
    	}
44 aurelien 393 
 
294 aurelien 394 
    	$donnees['nb_resultats'] = $this->total_inscrits_zone;
395 
 
221 aurelien 396 
    	return $donnees;
397 
    }
398 
 
234 aurelien 399 
    public function chargerInformationsContinentCsv() {
221 aurelien 400 
 
401 
    	$nom_csv = Application::getChemin().Config::get('carte_fonds_chemin').'continents';
402 
    	return $this->chargerInformationsCompletesParCsv($nom_csv);
403 
    }
404 
 
234 aurelien 405 
    public function chargerInformationsPaysDuContinentsCsv($continent) {
221 aurelien 406 
 
407 
    	$nom_csv = Application::getChemin().Config::get('carte_fonds_chemin').$continent;
408 
 
409 
    	return $this->chargerInformationsCompletesParCsv($nom_csv);
410 
    }
411 
 
234 aurelien 412 
    public function chargerInformationsDepartementsFranceCsv() {
221 aurelien 413 
 
414 
    	$nom_csv = Application::getChemin().Config::get('carte_fonds_chemin').'france';
415 
 
416 
    	return $this->chargerInformationsCompletesParCsv($nom_csv);
417 
    }
418 
 
234 aurelien 419 
    public function chargerInformationsCompletesParCsv($nom_csv) {
221 aurelien 420 
 
421 
    	$fichier_csv = $nom_csv.'.csv';
422 
    	$infos = array();
423 
 
424 
		if (($handle = fopen($fichier_csv, 'r')) !== false) {
425 
			$ligne = 0;
426 
 
427 
			while (($donnees = fgetcsv($handle, 1000, ',')) !== false) {
428 
 
429 
				if($ligne != 0 && trim($donnees[0]) != '') {
430 
 
431 
					$infos[$donnees[0]] = $donnees;
432 
				}
433 
				$ligne++;
434 
			}
435 
			fclose($handle);
436 
		}
437 
 
438 
		return $infos;
439 
 
440 
    }
441 
 
44 aurelien 442 
	/**
443 
	 * Récupère les identifiants de zone dans un fichier csv donné
444 
	 * @param string $nom_csv chemin vers le fichier csv (sans extension) qui contient les données
445 
	 * @return array un tableau contenant les identifiants des zones
446 
	 */
447 
    private function chargerZonesParCsv($nom_csv) {
448 
 
449 
		$fichier_csv = $nom_csv.'.csv';
450 
		$zones_id = array();
451 
 
452 
		if (($handle = fopen($fichier_csv, 'r')) !== false) {
453 
			$ligne = 0;
454 
 
455 
			while (($donnees = fgetcsv($handle, 1000, ',')) !== false) {
221 aurelien 456 
 
44 aurelien 457 
				if($ligne != 0 && trim($donnees[0]) != '') {
458 
					$zones_id[] = "'".$donnees[0]."'";
459 
				}
460 
				$ligne++;
461 
			}
462 
			fclose($handle);
463 
		}
464 
 
465 
		return $zones_id;
466 
    }
31 aurelien 467 
}
294 aurelien 468 
?>