Subversion Repositories eFlore/Applications.cel

Rev

Rev 3377 | Rev 3543 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
3228 delphine 1
 <?php
3120 delphine 2
// declare(encoding='UTF-8');
3
/**
4
 * Service affichant les dernières photo publiques du CEL ouvrable sous forme de diaporama.
5
 * Encodage en entrée : utf8
6
 * Encodage en sortie : utf8
7
 *
8
 * Cas d'utilisation et documentation :
9
 * @link http://www.tela-botanica.org/wikini/eflore/wakka.php?wiki=AideCELWidgetPhoto
10
 *
11
 * Paramètres :
12
 * ===> extra = booléen (1 ou 0)  [par défaut : 1]
13
 * Affiche / Cache la vignette en taille plus importante au bas du widget.
14
 * ===> vignette = [0-9]+,[0-9]+  [par défaut : 4,3]
15
 * Indique le nombre de vignette par ligne et le nombre de ligne.
16
 *
3228 delphine 17
 * @author		Jean-Pascal MILCENT <jpm@tela-botanica.org>
18
 * @license	GPL v3 <http://www.gnu.org/licenses/gpl.txt>
19
 * @license	CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>
20
 * @version	$Id$
21
 * @copyright	Copyright (c) 2010, Tela Botanica (accueil@tela-botanica.org)
3120 delphine 22
 */
23
class Saisie2 extends WidgetCommun {
3239 idir 24
 
3228 delphine 25
	const DS = DIRECTORY_SEPARATOR;
26
	const SERVICE_DEFAUT = 'saisie';
3240 idir 27
	const WS_SAISIE = 'CelWidgetSaisie';
28
	const WS_UPLOAD = 'CelWidgetUploadImageTemp';
29
	const WS_OBS = 'CelObs';
3425 idir 30
	const WS_COORD = 'CoordSearch';
3228 delphine 31
	const LANGUE_DEFAUT = 'fr';
32
	const PROJET_DEFAUT = 'base';
33
	const WS_NOM = 'noms';
34
	const EFLORE_API_VERSION = '0.1';
3425 idir 35
	const WIDGETS_SPECIAUX = ['tb_aupresdemonarbre','tb_streets','tb_lichensgo'];
36
	const SQUELETTES_SPECIAUX = ['arbres','plantes','lichens'];
37
	const WS_OBS_LIST = 'InventoryObservationList';
38
	const WS_IMG_LIST = 'celImage';
3228 delphine 39
	private $cel_url_tpl = null;
40
	/** Si spécifié, on ajoute une barre de navigation inter-applications */
41
	private $bar;
42
	//private $parametres_autorises = array('projet', 'type', 'langue', 'order');
43
	private $parametres_autorises = array(
44
			'projet' => 'projet',
45
			'type' => 'type',
46
			'langue' => 'langue',
47
			'order' => 'order'
48
	);
49
	/**
50
	 * Méthode appelée par défaut pour charger ce widget.
51
	 */
52
	public function executer() {
53
		$retour = null;
54
		// Pour la création de l'id du cache nous ne tenons pas compte du paramètre de l'url callback
55
		unset($this->parametres['callback']);
56
		extract($this->parametres);
57
		$this->bar = (isset($bar)) ? $bar : false;
58
		/* Le fichier Framework.php du Framework de Tela Botanica doit être appelé avant tout autre chose dans l'application.
59
		 Sinon, rien ne sera chargé.
60
		 L'emplacement du Framework peut varier en fonction de l'environnement (test, prod...). Afin de faciliter la configuration
61
		 de l'emplacement du Framework, un fichier framework.defaut.php doit être renommé en framework.php et configuré pour chaque installation de
62
		 l'application.
63
		 Chemin du fichier chargeant le framework requis */
64
		$framework = dirname(__FILE__).'/framework.php';
65
		if (!file_exists($framework)) {
66
			$e = "Veuillez paramêtrer l'emplacement et la version du Framework dans le fichier $framework";
67
			trigger_error($e, E_USER_ERROR);
68
		} else {
69
			// Inclusion du Framework
70
			require_once $framework;
71
			// Ajout d'information concernant cette application
72
			Framework::setCheminAppli(__FILE__);// Obligatoire
73
			Framework::setInfoAppli(Config::get('info'));// Optionnel
3239 idir 74
 
3228 delphine 75
		}
76
		$langue = (isset($langue)) ? $langue : self::LANGUE_DEFAUT;
77
		$this->langue = I18n::setLangue($langue);
78
		$this->parametres['langue'] = $langue;
3120 delphine 79
 
3228 delphine 80
		if (!isset($mode)) {
81
			$mode = self::SERVICE_DEFAUT;
82
		}
83
		if (!isset($projet)) {
84
			$this->parametres['projet'] = self::PROJET_DEFAUT;
85
		}
3239 idir 86
 
3228 delphine 87
		$methode = $this->traiterNomMethodeExecuter($mode);
3239 idir 88
		if (method_exists($this, $methode)) {
89
			$retour = $this->$methode();
3228 delphine 90
		} else {
91
			$this->messages[] = "Ce type de service '$methode' n'est pas disponible.";
92
		}
3239 idir 93
 
3257 delphine 94
		$contenu = ''; //print_r($retour);exit;
3228 delphine 95
		if (is_null($retour)) {
96
			$this->messages[] = 'La ressource demandée a retourné une valeur nulle.';
97
		} else {
3239 idir 98
			if (isset($retour['donnees'])) {
3271 idir 99
				// ne pas afficher le projet dans l'url si on est dans saisie de base
3286 idir 100
				$projet_dans_url = ( $this->parametres['projet'] !== 'base') ? '?'. $this->parametres['projet'].'&'.'langue='.$this->parametres['langue'] : '';
3271 idir 101
 
3260 idir 102
				$retour['donnees']['conf_mode'] = $this->config['parametres']['modeServeur'];
3249 idir 103
				$retour['donnees']['prod'] = ($this->config['parametres']['modeServeur'] === 'prod');
3228 delphine 104
				$retour['donnees']['bar'] = $this->bar;
3268 idir 105
				$retour['donnees']['url_base'] = sprintf($this->config['chemins']['baseURLAbsoluDyn'], $this->config['manager']['cheminDos']);
3228 delphine 106
				$retour['donnees']['url_ws_annuaire'] = sprintf($this->config['chemins']['baseURLServicesAnnuaireTpl'], 'utilisateur/identite-par-courriel/');
3240 idir 107
				$retour['donnees']['url_ws_saisie'] = sprintf($this->config['chemins']['baseURLServicesCelTpl'], self::WS_SAISIE);
108
				$retour['donnees']['url_ws_obs'] = sprintf($this->config['chemins']['baseURLServicesCelTpl'], self::WS_OBS);
109
				$retour['donnees']['url_ws_upload'] = sprintf($this->config['chemins']['baseURLServicesCelTpl'], self::WS_UPLOAD);
3286 idir 110
				$retour['donnees']['authTpl'] = $this->config['manager']['authTpl']. $projet_dans_url;
3228 delphine 111
				$retour['donnees']['mode'] = $mode;
3425 idir 112
				$retour['donnees']['langue'] = $langue;
113
				$retour['donnees']['widgets_url'] = sprintf($this->config['chemins']['baseURLAbsoluDyn'],'');
114
				$retour['donnees']['url_ws_obs_list'] = sprintf($this->config['chemins']['baseURLServicesCelTpl'], self::WS_OBS_LIST);
115
				$retour['donnees']['url_ws_cel_imgs'] = sprintf($this->config['chemins']['baseURLServicesCelTpl'], self::WS_IMG_LIST) . '/liste-ids?obsId=';
116
				$retour['donnees']['url_ws_cel_img_url'] = str_replace ( '%s.jpg', '{id}XS', $this->config['chemins']['celImgUrlTpl'] );
117
				$squelette = dirname(__FILE__).self::DS.'squelettes'.self::DS.$retour['squelette'].'.tpl.html';
118
				switch ( $retour['squelette'] ) {
119
					case 'apa':
120
						$retour['donnees']['squelette'] = $this->parametres['projet'];
121
						break;
122
					case 'apaforms':
123
						$retour['donnees']['squelette'] = $this->parametres['squelette'];
124
						break;
125
					default:
126
						$retour['donnees']['squelette'] = $retour['squelette'];
127
						break;
3260 idir 128
				}
3228 delphine 129
				$contenu = $this->traiterSquelettePhp($squelette, $retour['donnees']);
130
			} else {
131
				$this->messages[] = 'Les données à transmettre au squelette sont nulles.';
132
			}
133
		}
134
		$this->envoyer($contenu);
135
	}
3120 delphine 136
 
3239 idir 137
 
3228 delphine 138
	private function executerSaisie() {
139
		$retour = array();
3425 idir 140
		if (in_array($this->parametres['projet'], self::WIDGETS_SPECIAUX) ) {
141
			if (isset($this->parametres['squelette']) && in_array($this->parametres['squelette'], self::SQUELETTES_SPECIAUX) ) {
142
				$retour['squelette'] = 'apaforms';
143
			} else {
144
				$retour['squelette'] = 'apa';
145
			}
146
		} else {
147
			$retour['squelette'] = 'saisie';
148
			$retour['donnees']['general']     = I18n::get('General');
149
			$retour['donnees']['aide']        = I18n::get('Aide');
150
			$retour['donnees']['observateur'] = I18n::get('Observateur');
151
			$retour['donnees']['observation'] = I18n::get('Observation');
152
			$retour['donnees']['image']       = I18n::get('Image');
153
	 		$retour['donnees']['chpsupp']     = I18n::get('Chpsupp');
154
	 		$retour['donnees']['resume']      = I18n::get('Resume');
155
		}
3228 delphine 156
		$retour['donnees']['widget'] = $this->rechercherProjet();
157
		return $retour;
158
	}
3239 idir 159
 
3228 delphine 160
	/* Recherche si le projet existe sinon va chercher les infos de base */
161
	private function rechercherProjet() {
162
		// projet avec un squelette défini (et non juste un mot-clé d'observation)
3239 idir 163
		$estProjetDefini = true;
164
		$tab = array();
3228 delphine 165
		$url = $this->config['manager']['celUrlTpl'].'?projet='.$this->parametres['projet'].'&langue='.$this->parametres['langue'];
3239 idir 166
		$json = $this->getDao()->consulter($url);
3425 idir 167
		if (!in_array($this->parametres['projet'], self::WIDGETS_SPECIAUX)){
168
			if ( $json !== "[]") {
169
				$tab = $this->rechercherChampsSupp();
170
			} else {
171
				$url = $this->config['manager']['celUrlTpl'].'?projet=base&langue='.$this->parametres['langue'];
172
				$json = $this->getDao()->consulter($url);
173
				$estProjetDefini = false;
174
			}
3228 delphine 175
		}
3239 idir 176
		$tableau = json_decode($json, true);
3228 delphine 177
		$tableau = $this->traiterParametres($estProjetDefini, $tableau[0]);
3425 idir 178
		if (
179
			isset($this->parametres['squelette']) &&
180
			($this->parametres['squelette'] === 'plantes' || $this->parametres['squelette'] === 'lichens')
181
		) {
182
			$tableau['type_especes'] = 'liste';
183
			if ( $this->parametres['squelette'] === 'lichens' ) {
184
				$tableau['referentiel'] = 'taxref';
185
			}
186
		}
3228 delphine 187
		$tableau['especes'] = $this->rechercherInfosEspeces($tableau);
3377 idir 188
		if (isset($tableau['type_especes']) && 'fixe' === $tableau['type_especes']) {
189
			// si on trouve ":" dans referentiel, referentiel = première partie
190
			$tableau['referentiel'] = (strstr($tableau['referentiel'],':',true)) ?: $tableau['referentiel'];
3228 delphine 191
		}
3377 idir 192
		$tableau['milieux'] = ($tableau['milieux'] != '') ? explode(';', $tableau['milieux']) : [];
3425 idir 193
		if(!isset($this->parametres['id-obs'])) {
194
			if (isset($this->parametres['dept']) || isset($this->parametres['commune'],$this->parametres['dept']) || isset($this->parametres['code_insee'])) {
195
				$localisation = $this->traiterParamsLocalisation($this->parametres);
196
				// les paramètres dans l'url peuvent surcharger les données de localisation de la bdd
197
				if ($localisation) $tableau['localisation'] = $localisation;
198
			}
199
			if (isset($tableau['localisation'])) $tableau['localisation'] = $this->traiterLocalisation($tableau['localisation']);
200
		}
3278 delphine 201
		if (isset($tableau['motscles'])) {
202
		    $tableau['tag-obs'] = $tableau['tag-img'] = $tableau['motscles'];
203
		}
3239 idir 204
		$tableau['chpSupp'] = $tab;
3240 idir 205
		$langue_projet_url = ( isset ( $this->parametres['langue'] ) && $this->parametres['langue'] !== 'fr' ) ? '_' . $this->parametres['langue'] : '';
3330 idir 206
		$tableau['chemin_fichiers'] = sprintf( $this->config['chemins']['baseURLAbsoluDyn'], $this->config['manager']['imgProjet'] . $tableau['projet'] . $langue_projet_url . '/' );
3228 delphine 207
		return $tableau;
208
	}
3239 idir 209
 
3228 delphine 210
	/* Recherche si un projet a des champs de saisie supplémentaire */
211
	private function rechercherChampsSupp() {
212
		$retour = array();
3239 idir 213
		$projet = $this->parametres['projet'];
214
		$url = $this->config['manager']['celChpSupTpl'] .'?projet=' . $projet . '&langue=' . $this->parametres['langue'];
3228 delphine 215
		$json = $this->getDao()->consulter($url);
3425 idir 216
		$retour = json_decode($json, true);
3249 idir 217
 
3239 idir 218
		foreach ( $retour[$projet]['champs-supp'] as $key => $chsup ) {
219
 
3249 idir 220
			$retour[$projet]['champs-supp'][$key]['name'] = $this->clean_string( $chsup['name'] );
221
			$retour[$projet]['champs-supp'][$key]['description'] = $this->clean_string( $chsup['description']);
222
			$retour[$projet]['champs-supp'][$key]['unit'] = $this->clean_string( $chsup['unit'] );
3239 idir 223
 
224
			if ( isset( $chsup['fieldValues'] ) ) {
3350 idir 225
				$retour[$projet]['champs-supp'][$key]['fieldValues'] = json_decode( $this->clean_string( $chsup['fieldValues'] ), true );
3239 idir 226
 
227
				if ( isset( $retour[$projet]['champs-supp'][$key]['fieldValues']['listValue'] ) ) {
3347 idir 228
					foreach( $retour[$projet]['champs-supp'][$key]['fieldValues']['listValue'] as $list_key => $list_value_array ) {
3228 delphine 229
						// Obtenir une liste de valeurs utilisables dans les attributs for id ou name par exemple
3350 idir 230
						$retour[$projet]['champs-supp'][$key]['fieldValues']['cleanListValue'][] = ($list_value_array !== 'other') ? 'val-' . preg_replace( '/[^A-Za-z0-9_\-]/', '', $this->remove_accents( strtolower($list_value_array[0] ) ) ) : '';
3228 delphine 231
					}
232
				}
233
			}
3239 idir 234
			$retour[$projet]['champs-supp'][$key]['mandatory'] = intval( $chsup['mandatory'] );
3228 delphine 235
		}
236
		return $retour;
237
	}
3239 idir 238
 
3228 delphine 239
	// remplace certains parametres définis en bd par les parametres définis dans l'url
240
	private function traiterParametres($estProjetDefini, $tableau) {
3278 delphine 241
		$criteres = array('tag-obs', 'tag-img', 'projet', 'titre', 'logo');
3228 delphine 242
		$criteresProjetNonDefini = array('commune', 'num_nom', 'referentiel');
243
		foreach($this->parametres as $nom_critere => $valeur_critere) {
3249 idir 244
			if (($estProjetDefini == false || $tableau['projet'] == 'base') && in_array($nom_critere, $criteresProjetNonDefini)) {
3228 delphine 245
				$tableau[$nom_critere] = $valeur_critere;
246
			} else if (in_array($nom_critere, $criteres)) {
247
				$tableau[$nom_critere] = $valeur_critere;
248
			}
249
		}
250
		return $tableau;
251
	}
3239 idir 252
 
3425 idir 253
	private function traiterLocalisation( $infos_localisation ) {
254
		$infos = explode(';', $infos_localisation);
255
		$tableauTmp = array();
3239 idir 256
		$retour = array();
3425 idir 257
		foreach ($infos as $info) {
258
			$tableauTmp = explode(':', $info);
259
			$retour[$tableauTmp[0]] = $tableauTmp[1];
260
		}
261
		return $retour;
262
	}
263
 
264
	private function traiterParamsLocalisation( $params ) {
265
		$infos = array();
266
		$tableauTmp = array();
267
		$zoom = '12';
268
		if (isset($params['commune'])) {
269
			$url = sprintf($this->config['chemins']['baseURLServicesCelTpl'], self::WS_COORD). '?zone='.$params['commune'].'&code='.$params['dept'];
270
		} else if (isset($params['dept'])) {
271
			// pas trouvé de manière simple de déterminer le centroïde du département
272
			// du coup on retrouve le code insee du chef lieu
273
			$params['code_insee'] = $this->recupererChefLieuDept($params['dept']);
274
			$zoom = '9';
275
		}
276
		// quoi qu'il arrive, s'il est défini, on donne la priorité au code insee (plus précis)
277
		if (isset($params['code_insee'])) {
278
			$url = sprintf($this->config['chemins']['baseURLServicesCelTpl'], self::WS_COORD). '?code='.$params['code_insee'];
279
		}
280
		if(!empty($url)) $json = $this->getDao()->consulter($url);
281
		if(!empty($json)) $infos = json_decode($json, true);
282
		if(!empty($infos)) {
283
			$infos['lat'] = str_replace(',','.',strval(round($infos['lat'],5)));
284
			$infos['lng'] = str_replace(',','.',strval(round($infos['lng'],5)));
285
			return 'latitude:'.$infos['lat'].';longitude:'.$infos['lng'].';zoom:'.$zoom;
286
		} else {
287
			return false;
288
		}
289
	}
290
 
291
	private function rechercherInfosEspeces( $infos_projets ) {
292
		$retour = array();
3239 idir 293
		$referentiel = $infos_projets['referentiel'];
3228 delphine 294
		$urlWsNsTpl = $this->config['chemins']['baseURLServicesEfloreTpl'];
3260 idir 295
		$retour['url_ws_autocompletion_ns'] = sprintf( $urlWsNsTpl, self::EFLORE_API_VERSION, $referentiel, self::WS_NOM );;
296
		$retour['url_ws_autocompletion_ns_tpl'] = sprintf( $urlWsNsTpl, self::EFLORE_API_VERSION, '{referentiel}', self::WS_NOM );
3228 delphine 297
		$retour['ns_referentiel'] = $referentiel;
3239 idir 298
 
299
		if ( isset( $infos_projets['type_especes'] ) ) {
300
 
301
			switch ( $infos_projets['type_especes'] ) {
3249 idir 302
				case 'fixe' :
3377 idir 303
					$info_taxon = explode(':', $referentiel);
304
					if (!empty($info_taxon) && count((array) $info_taxon) === 2) {
305
						$retour = $this->chargerInfosTaxon( $info_taxon[0], $info_taxon[1] );
306
					}
3228 delphine 307
					break;
3257 delphine 308
				case 'referentiel' : break;
3249 idir 309
				case 'liste' :
3256 idir 310
					$retour['taxons'] = $this->recupererListeNomsSci();
3239 idir 311
					break;
3228 delphine 312
			}
3377 idir 313
		} else if ( isset( $referentiel ) ) {
3239 idir 314
			if ( isset($infos_projets['num_nom'] ) ) {
3377 idir 315
				$retour = $this->chargerInfosTaxon( $referentiel, $infos_projets['num_nom'] );
3228 delphine 316
			}
317
		}
318
		return $retour;
319
	}
3239 idir 320
 
3228 delphine 321
	/**
322
	 * Consulte un webservice pour obtenir des informations sur le taxon dont le
323
	 * numéro nomenclatural est $num_nom (ce sont donc plutôt des infos sur le nom
324
	 * et non le taxon?)
325
	 * @param string|int $num_nom
326
	 * @return array
327
	 */
3239 idir 328
	protected function chargerInfosTaxon( $referentiel, $num_nom ) {
329
		$url_service_infos = sprintf( $this->config['chemins']['infosTaxonUrl'], $referentiel, $num_nom );
330
		$infos = json_decode( file_get_contents( $url_service_infos ) );
3228 delphine 331
		// trop de champs injectés dans les infos espèces peuvent
332
		// faire planter javascript
3330 idir 333
		$champs_a_garder = array( 'id', 'nom_sci','nom_sci_complet', 'nom_complet', 'famille','nom_retenu.id', 'nom_retenu_complet', 'num_taxonomique' );
3228 delphine 334
		$resultat = array();
335
		$retour = array();
3239 idir 336
		if ( isset( $infos ) && !empty( $infos ) ) {
337
			$infos = (array) $infos;
3249 idir 338
			if ( isset( $infos['nom_sci'] ) && $infos['nom_sci'] !== '' ) {
3239 idir 339
				$resultat = array_intersect_key( $infos, array_flip($champs_a_garder ) );
3249 idir 340
				$resultat['retenu'] = ( $infos['id'] == $infos['nom_retenu.id'] ) ? 'true' : 'false';
3228 delphine 341
				$retour['espece_imposee'] = true;
342
				$retour['nn_espece_defaut'] = $nnEspeceImposee;
343
				$retour['nom_sci_espece_defaut'] = $resultat['nom_complet'];
3239 idir 344
				$retour['infos_espece'] = $this->array2js( $resultat, true );
3228 delphine 345
			}
346
		}
347
		return $retour;
348
	}
3120 delphine 349
 
3239 idir 350
	protected function getReferentielImpose() {
351
		$referentiel_impose = true;
3249 idir 352
		if (!empty($_GET['referentiel']) && $_GET['referentiel'] !== 'autre') {
3239 idir 353
			$this->ns_referentiel = $_GET['referentiel'];
354
		} else if (isset($this->configProjet['referentiel'])) {
355
			$this->ns_referentiel = $this->configProjet['referentiel'];
356
		} else if (isset($this->configMission['referentiel'])) {
357
			$this->ns_referentiel = $this->configMission['referentiel'];
358
		} else {
359
			$referentiel_impose = false;
360
		}
361
		return $referentiel_impose;
362
	}
3231 delphine 363
 
3228 delphine 364
	/**
3377 idir 365
	 * Trie par nom français les taxons lus dans le fichier csv/tsv
3228 delphine 366
	 */
367
	protected function recupererListeNomsSci() {
368
		$taxons = $this->recupererListeTaxon();
369
		if (is_array($taxons)) {
370
			$taxons = self::trierTableauMd($taxons, array('nom_fr' => SORT_ASC));
371
		}
372
		return $taxons;
373
	}
3239 idir 374
 
3228 delphine 375
	/**
376
	 * @TODO documenter
377
	 * @return array
378
	 */
379
	protected function recupererListeNoms() {
380
		$taxons = $this->recupererListeTaxon();
381
		$nomsAAfficher = array();
382
		$nomsSpeciaux = array();
383
		if (is_array($taxons)) {
384
			foreach ($taxons as $taxon) {
385
				$nomSciTitle = $taxon['nom_ret'].
386
				($taxon['nom_fr'] != '' ? ' - '.$taxon['nom_fr'] : '' ).
387
				($taxon['nom_fr_autre'] != '' ? ' - '.$taxon['nom_fr_autre'] : '' );
388
				$nomFrTitle = $taxon['nom_sel'].
389
				($taxon['nom_ret'] != $taxon['nom_sel']? ' - '.$taxon['nom_ret'] : '' ).
390
				($taxon['nom_fr_autre'] != '' ? ' - '.$taxon['nom_fr_autre'] : '' );
3239 idir 391
 
3228 delphine 392
				if ($taxon['groupe'] == 'special') {
393
					$nomsSpeciaux[] = array(
394
							'num_nom' => $taxon['num_nom_sel'],
395
							'nom_a_afficher' => $taxon['nom_fr'],
396
							'nom_a_sauver' => $taxon['nom_sel'],
397
							'nom_title' => $nomSciTitle,
398
							'nom_type' => 'nom-special');
399
				} else {
400
					$nomsAAfficher[] = array(
401
							'num_nom' => $taxon['num_nom_sel'],
402
							'nom_a_afficher' => $taxon['nom_sel'],
403
							'nom_a_sauver' => $taxon['nom_sel'],
404
							'nom_title' => $nomSciTitle,
405
							'nom_type' => 'nom-sci');
406
					$nomsAAfficher[] = array(
407
							'num_nom' => $taxon['num_nom_sel'],
408
							'nom_a_afficher' => $taxon['nom_fr'],
409
							'nom_a_sauver' => $taxon['nom_fr'],
410
							'nom_title' => $nomFrTitle,
411
							'nom_type' => 'nom-fr');
412
				}
413
			}
414
			$nomsAAfficher = self::trierTableauMd($nomsAAfficher, array('nom_a_afficher' => SORT_ASC));
415
			$nomsSpeciaux = self::trierTableauMd($nomsSpeciaux, array('nom_a_afficher' => SORT_ASC));
416
		}
417
		return array('speciaux' => $nomsSpeciaux, 'sci-et-fr' => $nomsAAfficher);
418
	}
3239 idir 419
 
3228 delphine 420
	/**
3377 idir 421
	 * Lit une liste de taxons depuis un fichier csv ou tsv fourni
3228 delphine 422
	 */
423
	protected function recupererListeTaxon() {
424
		$taxons = array();
3256 idir 425
		$langue_projet_url = ( isset ( $this->parametres['langue'] ) && $this->parametres['langue'] !== 'fr' ) ? '_' . $this->parametres['langue'] : '';
426
		$chemin_images = dirname(__FILE__) . self::DS . '..' . self::DS . 'manager' . self::DS . 'squelettes' . self::DS . 'img' . self::DS . 'images_projets' . self::DS;
3425 idir 427
		$nom_fichier = ($this->parametres['squelette'] === 'lichens') ? 'lichens_taxons' : 'especes';
428
		$chemin_taxon = $chemin_images . $this->parametres['projet'] . $langue_projet_url . self::DS . $nom_fichier. '.';
3257 delphine 429
 
3377 idir 430
		if ( file_exists( $chemin_taxon . 'csv' ) && is_readable( $chemin_taxon . 'csv' ) ) {
431
			$taxons = $this->decomposerFichierCsv( $chemin_taxon . 'csv' );
432
		} else if ( file_exists( $chemin_taxon . 'tsv' ) && is_readable( $chemin_taxon . 'tsv' ) ) {
433
			$taxons = $this->decomposerFichierCsv( $chemin_taxon . 'tsv' );
3228 delphine 434
		} else {
3425 idir 435
			$this->debug[] = "Impossible d'ouvrir le fichier '$nom_fichier'.";
3228 delphine 436
		}
437
		return $taxons;
438
	}
3239 idir 439
 
3228 delphine 440
	/**
3425 idir 441
	 * Lit une liste de taxons depuis un fichier csv ou tsv fourni
442
	 */
443
	protected function recupererChefLieuDept($dept) {
444
		$infosDepts = array();
445
		$code_insee = '';
446
		$chemin_fichier = dirname(__FILE__).self::DS.'squelettes'.self::DS.'dept.csv';
447
 
448
		if (file_exists($chemin_fichier ) && is_readable($chemin_fichier)) {
449
			$infosDepts = $this->decomposerFichierCsv( $chemin_fichier,"," );
450
			if(!empty($infosDepts) && is_array($infosDepts)) {
451
				foreach ($infosDepts as $key => $infosDept) {
452
					if($dept == $infosDept['dep']) {
453
						return $code_insee = $infosDept['cheflieu'];
454
					}
455
				}
456
			}
457
		} else {
458
			$this->debug[] = "Impossible d'ouvrir le fichier '$nom_fichier'.";
459
		}
460
	}
461
 
462
	/**
3377 idir 463
	 * Découpe un fihcier csv/tsv
3228 delphine 464
	 */
3256 idir 465
	protected function decomposerFichierCsv($fichier, $delimiter = "\t"){
3228 delphine 466
		$header = null;
467
		$data = array();
3256 idir 468
		if (($handle = fopen($fichier, "r")) !== FALSE) {
3228 delphine 469
			while (($row = fgetcsv($handle, 1000, $delimiter)) !== FALSE) {
470
				if (!$header) {
471
					$header = $row;
472
				} else {
473
					$data[] = array_combine($header, $row);
474
				}
475
			}
476
			fclose($handle);
477
		}
478
		return $data;
479
	}
3239 idir 480
 
3228 delphine 481
	/**
482
	 * Convertit un tableau PHP en Javascript - @WTF pourquoi ne pas faire un json_encode ?
483
	 * @param array $array
484
	 * @param boolean $show_keys
485
	 * @return une portion de JSON représentant le tableau
486
	 */
487
	protected function array2js($array,$show_keys) {
488
		$tableauJs = '{}';
489
		if (!empty($array)) {
490
			$total = count($array) - 1;
491
			$i = 0;
492
			$dimensions = array();
493
			foreach ($array as $key => $value) {
494
				if (is_array($value)) {
495
					$dimensions[$i] = array2js($value,$show_keys);
496
					if ($show_keys) {
3260 idir 497
						$dimensions[$i] = '\"'.$key.'\":'.$dimensions[$i];
3228 delphine 498
					}
499
				} else {
3260 idir 500
					$dimensions[$i] = '\"'.addslashes($value).'\"';
3228 delphine 501
					if ($show_keys) {
3260 idir 502
						$dimensions[$i] = '\"'.$key.'\":'.$dimensions[$i];
3228 delphine 503
					}
504
				}
505
				if ($i == 0) {
506
					$dimensions[$i] = '{'.$dimensions[$i];
507
				}
508
				if ($i == $total) {
509
					$dimensions[$i].= '}';
510
				}
511
				$i++;
512
			}
513
			$tableauJs = implode(',', $dimensions);
514
		}
515
		return $tableauJs;
516
	}
3120 delphine 517
}
3239 idir 518
?>