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