Subversion Repositories eFlore/Applications.cel

Rev

Rev 2538 | Rev 2564 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2538 Rev 2557
Line 14... Line 14...
14
 * @license    GPL v3 <http://www.gnu.org/licenses/gpl.txt>
14
 * @license    GPL v3 <http://www.gnu.org/licenses/gpl.txt>
15
 * @license    CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>
15
 * @license    CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>
16
 * @copyright  1999-2014 Tela Botanica <accueil@tela-botanica.org>
16
 * @copyright  1999-2014 Tela Botanica <accueil@tela-botanica.org>
17
 */
17
 */
18
class RechercheInfosZoneGeo extends Cel {
18
class RechercheInfosZoneGeo extends Cel {
-
 
19
	
-
 
20
	/**
-
 
21
	 * Cas de la demande par lat et lon
-
 
22
	 * array(
-
 
23
	 * 		'code_pays' => 'FR',
-
 
24
	 * 		'code_zone' => 'INSEE-D:35800',
-
 
25
	 * 		'type' => 'france',
-
 
26
	 * 		'nom' => 'Taulignan-les-oies'
-
 
27
	 * 	);
-
 
28
	 * 
-
 
29
	 * 	array(
-
 
30
	 * 		'code_pays' => 'RU',
-
 
31
	 * 		'code_zone' => 'OSM-ID:4511574',
-
 
32
	 * 		'type' => 'monde',
-
 
33
	 * 		'nom' => 'Moscou'
-
 
34
	 * 	);
-
 
35
	 * 
-
 
36
	 * Cas de la demande par nom
-
 
37
	 * array(
-
 
38
     * 		'lat': 40.372934,
-
 
39
 	 *		'lng': -3.690601,
-
 
40
 	 *		'nom': 'Madrid',
-
 
41
 	 *		'code_zone': 'OSM-ID:558474',
-
 
42
     *		'code_pays': 'ES',
-
 
43
     *		'type': 'monde'
-
 
44
	 * 	);
-
 
45
	 * 
-
 
46
	 * 	array(
-
 
47
     * 		'lat': 48.860799,
-
 
48
 	 *		'lng': 2.3457986,
-
 
49
 	 *		'nom': 'Paris',
-
 
50
 	 *		'code_zone': '75056',
-
 
51
     *		'code_pays': 'FR',
-
 
52
     *		'type': 'france'
-
 
53
	 * 	);
-
 
54
	 * 
-
 
55
	 */
Line 19... Line 56...
19
 
56
 
20
	//TODO: migrer tout ce qui concerne la zone géo dans cette classe	
57
	//TODO: migrer tout ce qui concerne la zone géo dans cette classe	
21
	public function obtenirInfosPourCoordonnees($coordonnees) {
58
	public function obtenirInfosPourCoordonnees($coordonnees) {
22
		$infos_coord = null;
59
		$infos_coord = null;
Line 31... Line 68...
31
		} else {
68
		} else {
32
			// Recherche par pays immédiate si en dehors de la bouding box française
69
			// Recherche par pays immédiate si en dehors de la bouding box française
33
			$infos_coord = $this->chercherInfosPays($coordonnees['latitude'], $coordonnees['longitude']);
70
			$infos_coord = $this->chercherInfosPays($coordonnees['latitude'], $coordonnees['longitude']);
34
		}
71
		}
35
		return $infos_coord;
72
		return $infos_coord;
-
 
73
	}
-
 
74
	
-
 
75
	public function obtenirInfosPourNoms($nom, $pays, $code) {
-
 
76
		$retour = false;
-
 
77
		// Dans le cas de la france on possède directement une table 
-
 
78
		// avec les centroïdes des communes
-
 
79
		if($pays == 'FR' || $code != "*") {
-
 
80
			$retour = $this->chercherCentroideCommuneBdd($nom, $code);
-
 
81
		} else {
-
 
82
			// Sinon méthode habituelle, un test simple suivi d'un test plus complexe
-
 
83
			$retour = $this->chercherCentroideCommuneBdd($nom, $code);
-
 
84
			if(!$retour) {
-
 
85
				$retour = $this->effectuerRequeteGeocodingMondiale($nom);
-
 
86
			}
-
 
87
		}
-
 
88
		
-
 
89
		return $retour;
36
	}
90
	}
Line 37... Line 91...
37
	
91
	
Line 38... Line 92...
38
	public function chercherInfosCommune($projet, $latitude, $longitude) {
92
	public function chercherInfosCommune($projet, $latitude, $longitude) {
Line 58... Line 112...
58
		$url_service = str_replace(',', '.', $url_service);
112
		$url_service = str_replace(',', '.', $url_service);
Line 59... Line 113...
59
	
113
	
60
		$ch = curl_init($url_service);
114
		$ch = curl_init($url_service);
61
		curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
115
		curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
62
		$reponse = curl_exec($ch);
116
		$reponse = curl_exec($ch);
63
	
117
 
64
		$res = json_decode($reponse, true);
118
		$res = json_decode($reponse, true);
-
 
119
		$retour = null;
-
 
120
		
-
 
121
		$retour = array(
-
 
122
					'code_zone' => '',
-
 
123
					'code_pays' => '',
-
 
124
					'nom' => '',
-
 
125
					'type' => ''
Line 65... Line 126...
65
		$retour = null;
126
				);
66
	
127
	
67
		if(!empty($res)) {
128
		if(!empty($res)) {
68
			// Cas où l'on a recherché des coordonnées en France
129
			// Cas où l'on a recherché des coordonnées en France
69
			// On en profite pour remplir plus de données
130
			// On en profite pour remplir plus de données
70
			// que le simple pays si elles sont présentes
131
			// que le simple pays si elles sont présentes
71
			if(isset($res[8]) && isset($res[8]['codeInsee'])) {
132
			if(isset($res[8]) && isset($res[8]['codeInsee'])) {
-
 
133
				$retour = array(
72
				$retour = array(
134
						'code_zone' => $res[8]['codeInsee'],
73
						'code_insee' => $res[8]['codeInsee'],
135
						'code_pays' => 'FR',
74
						'nom' => $res[8]['intitule'],
136
						'nom' => $res[8]['nom'],
75
						'type' => 'france'
137
						'type' => 'france'
76
				);
138
				);
77
			} else {
139
			} else {
Line 99... Line 161...
99
				}
161
				}
Line 100... Line 162...
100
	
162
	
101
				// Pas de sens de prendre un nom de localité si on a pas de pays
163
				// Pas de sens de prendre un nom de localité si on a pas de pays
102
				if(!empty($retour['code_pays'])) {
164
				if(!empty($retour['code_pays'])) {
103
					// Type sert à savoir quelle fonction de mise à jour on appellera
165
					// Type sert à savoir quelle fonction de mise à jour on appellera
104
					$retour['type'] = 'pays';
166
					$retour['type'] = 'monde';
-
 
167
					$retour['nom'] = $infos_localite['intitule'];
105
					$retour['nom'] = $infos_localite['intitule'];
168
					$retour['code_zone'] = $infos_localite['codeZoneGeo'];
106
				}
169
				}
107
			}
170
			}
-
 
171
		}
108
		}
172
		
109
		return $retour;
173
		return $retour;
Line 110... Line 174...
110
	}
174
	}
111
	
175
	
Line 116... Line 180...
116
		if (is_array($reponse)) {
180
		if (is_array($reponse)) {
117
			$reponse = $reponse[0];
181
			$reponse = $reponse[0];
118
		}
182
		}
119
		if (isset($reponse->codeINSEE)) {
183
		if (isset($reponse->codeINSEE)) {
120
			// Type sert à savoir quelle fonction de mise à jour on appellera
184
			// Type sert à savoir quelle fonction de mise à jour on appellera
-
 
185
			$retour = array(
121
			$retour = array('code_insee' => $reponse->codeINSEE,
186
						'code_zone' => $reponse->codeINSEE,
-
 
187
						'code_pays' => 'FR',
122
					'nom' => $reponse->nom,
188
						'nom' => $reponse->nom,
123
					'type' => 'france');
189
						'type' => 'france'
-
 
190
					);
124
		}
191
		}
125
		return $retour;
192
		return $retour;
126
	}
193
	}
Line -... Line 194...
-
 
194
	
-
 
195
	private function effectuerRequeteGeocodingMondiale($nom, $niveau = '2,3,4,5,6,7,8', $limite = 1) {
-
 
196
		$url = $this->config['cel']['url_service_geo_mondial'].'?masque='.urlencode($nom).'&niveau='.$niveau.'&limite='.$limite;
-
 
197
		$res = @json_decode(file_get_contents($url), true);
-
 
198
 
-
 
199
		$retour = array();
-
 
200
	
-
 
201
		if(!empty($res)) {
-
 
202
			// cas de la localisation directe d'une commune
-
 
203
			if($limite == 1) {
-
 
204
				$retour = $this->traiterLigneResultatRequeteGeocodingMondiale($res);
-
 
205
			} else {
-
 
206
				// cas de l'autocompletion
-
 
207
				$retour = array();
-
 
208
				foreach($res as $ligne) {
-
 
209
					$ligne_decodee = $this->traiterLigneResultatRequeteGeocodingMondiale($ligne);
-
 
210
					$param = array('nom' => $ligne_decodee['nom'], 'code' => $ligne_decodee['code_pays']);
-
 
211
					$retour[] = $this->formaterLigneResultat($param);
-
 
212
				}
-
 
213
			}
-
 
214
		}
-
 
215
	
-
 
216
		return $retour;
-
 
217
	}
-
 
218
		
-
 
219
	private function chercherCentroideCommuneBdd($commune, $departement) {
-
 
220
		$commune_formatee = str_replace(array(' ', '-'), '_', trim($commune));
-
 
221
		
-
 
222
		$departement = trim($departement, "*");
-
 
223
		if (strlen($departement) > 2) {
-
 
224
			$departement = substr($departement, 0, 2);
-
 
225
		}
-
 
226
		$requete = 'SELECT utm_x, utm_y, utm_secteur, code FROM cel_zones_geo '.
-
 
227
				'WHERE nom LIKE '.Cel::db()->proteger($commune_formatee).' '.
-
 
228
				'AND code LIKE '.Cel::db()->proteger($departement.'%').' '.
-
 
229
				' -- '.__FILE__.':'.__LINE__;
-
 
230
		
-
 
231
		$commune_coordonnees = Cel::db()->requeter($requete);
-
 
232
	
-
 
233
		$retour = false;
-
 
234
		if ($commune_coordonnees && is_array($commune_coordonnees) && count($commune_coordonnees) > 0) {
-
 
235
			$lat_lon = $this->convertirUtmVersLatLong($commune_coordonnees[0]['utm_x'],$commune_coordonnees[0]['utm_y'],$commune_coordonnees[0]['utm_secteur']);
-
 
236
	
-
 
237
			$retour = array(
-
 
238
					'lat' => (float) $lat_lon['lat'],
-
 
239
					'lng' => (float) $lat_lon['lng'],
-
 
240
					'nom' => $commune,
-
 
241
					'code_zone' => $commune_coordonnees[0]['code'],
-
 
242
					'code_pays' => 'FR',
-
 
243
					'type' => 'france'
-
 
244
			);
-
 
245
		}
-
 
246
		return $retour;
-
 
247
	}
-
 
248
	
-
 
249
	public function obtenirListeInfosPourNom($lieu) {		
-
 
250
		$lieux_retour = $this->obtenirListeCommunes($lieu);
-
 
251
		
-
 
252
		// S'il y a moins de 50 résultats on tente des les fusionner avec une recherche mondiale
-
 
253
		// avec 50 - n éléments (où n est la taille du tableau de communes)
-
 
254
		if(count($lieux_retour) < 50) {
-
 
255
			$lieux_mondiaux = $this->effectuerRequeteGeocodingMondiale($lieu, '2,3,4,5,6,7,8', 50 - count($lieux_retour));
-
 
256
			usort($lieux_mondiaux, array($this, 'trierListeLieux'));
-
 
257
			$lieux_retour += $lieux_mondiaux;
-
 
258
		}
-
 
259
 
-
 
260
		// Suppression de possibles doublons
-
 
261
		$lieux_retour = $this->reduireListeLieux($lieux_retour);
-
 
262
		
-
 
263
		return $lieux_retour;
-
 
264
	}
-
 
265
	
-
 
266
	public function obtenirListeCommunes($lieu) {
-
 
267
		$lieu_formate = $this->formaterChaineLieuPourRequete($lieu);
-
 
268
		$retour = array();
-
 
269
		
-
 
270
		if ($this->estUneChaineRequeteValide($lieu_formate)) {
-
 
271
			$requete = 'SELECT DISTINCT nom, code '.
-
 
272
					'FROM cel_zones_geo '.
-
 
273
					'WHERE nom LIKE '.Cel::db()->proteger($lieu_formate.'%').' '.
-
 
274
					'ORDER BY nom '.
-
 
275
					'LIMIT 50 '.
-
 
276
					' -- '.__FILE__.':'.__LINE__;
-
 
277
		
-
 
278
			$liste_lieux = Cel::db()->requeter($requete);
-
 
279
			if ($liste_lieux) {
-
 
280
				foreach ($liste_lieux as $lieu_trouve) {
-
 
281
					$retour[] = $this->formaterLigneResultat($lieu_trouve);
-
 
282
				}
-
 
283
			}
-
 
284
		}
-
 
285
		return $retour;
-
 
286
	}
-
 
287
	
-
 
288
	/**
-
 
289
	 * Fonctions utilitaires
-
 
290
	 * 
-
 
291
	*/
-
 
292
	
-
 
293
	private function reduireListeLieux($tableau) {
-
 
294
		$index = array();
-
 
295
		foreach($tableau as $ligne) {
-
 
296
			$index_loc = trim(preg_replace("/\([a-zA-Z0-9]{2}\)$/", "", $ligne[0])); 
-
 
297
			if(!isset($index[$index_loc])) {
-
 
298
				$index[$index_loc] = $ligne;
-
 
299
			} else {
-
 
300
				if(mb_strlen($ligne[0]) > mb_strlen($index[$index_loc][0])) {
-
 
301
					$index[$index_loc] = $ligne;
-
 
302
				} else if(mb_strlen($ligne[0]) == mb_strlen($index[$index_loc][0])) {
-
 
303
					if(preg_match("/(.)* ([a-zA-Z0-9]{2})/", $ligne[0])) {
-
 
304
						$index[$index_loc] = $ligne;
-
 
305
					}
-
 
306
				}
-
 
307
			}
-
 
308
		}
-
 
309
		
-
 
310
		return array_values($index);
-
 
311
	}
-
 
312
	
-
 
313
	private function trierListeLieux($a, $b) {
-
 
314
		return strcmp($a[0], $b[0]);
-
 
315
	}
127
	
316
	
128
	private function testerCoordonneesWgsFrance($latitude, $longitude) {
317
	private function testerCoordonneesWgsFrance($latitude, $longitude) {
129
		$coord_france = false;
318
		$coord_france = false;
130
		if ($latitude != '' && $longitude != '') {
319
		if ($latitude != '' && $longitude != '') {
131
			if ($latitude < 51.071667 && $latitude > 41.316667) {
320
			if ($latitude < 51.071667 && $latitude > 41.316667) {
Line 134... Line 323...
134
				}
323
				}
135
			}
324
			}
136
		}
325
		}
137
		return $coord_france;
326
		return $coord_france;
138
	}
327
	}
-
 
328
	
-
 
329
	private function traiterLigneResultatRequeteGeocodingMondiale($res) {
-
 
330
	
-
 
331
		$lat = "";
-
 
332
		$lon = "";
-
 
333
		$nom = "";
-
 
334
		$code ="";
-
 
335
		$code_pays="";
-
 
336
		$type="";
-
 
337
	
-
 
338
		if(!empty($res)) {
-
 
339
			$code_pays = $this->extraireCodePays($res);
-
 
340
	
-
 
341
			$nom = $res['intitule'];
-
 
342
			$lat = $res['centre_lat'];
-
 
343
			$lon = $res['centre_lng'];
-
 
344
			$type = $code_pays == 'FR' || $code_pays == 'FX' ? 'france' : 'monde';
-
 
345
				
-
 
346
			$retour = array(
-
 
347
					'lat' => (float)$lat,
-
 
348
					'lng' => (float)$lon,
-
 
349
					'nom' => $nom,
-
 
350
					'code_zone' => $code,
-
 
351
					'code_pays' => $code_pays,
-
 
352
					'type' => $type
-
 
353
			);
-
 
354
		}
-
 
355
	
-
 
356
		return $retour;
-
 
357
	}
-
 
358
	
-
 
359
	private function convertirUtmVersLatLong($x, $y, $sector) {
-
 
360
		$convertisseur = new gPoint();
-
 
361
		$convertisseur->setUTM($x, $y, $sector);
-
 
362
		$convertisseur->convertTMtoLL();
-
 
363
	
-
 
364
		$lat_long = array();
-
 
365
		$lat_long['lat'] = str_replace(',','.',$convertisseur->Lat());
-
 
366
		$lat_long['lng'] = str_replace(',','.',$convertisseur->Long());
-
 
367
		return $lat_long;
-
 
368
	}
-
 
369
	
-
 
370
	private function extraireCodePays($infos_pays) {
-
 
371
		$code = "";
-
 
372
		if(!empty($infos_pays['codeIso31661'])) {
-
 
373
			$code = $infos_pays['codeIso31661'];
-
 
374
		} elseif(!empty($infos_pays['codeIso31662'])) {
-
 
375
			// Si pas de code pays, le sous code peut exister et content le code pays
-
 
376
			// sous la forme codepays-souscode
-
 
377
			$code = substr($infos_pays['codeIso31662'], 0, 2);
-
 
378
		}
-
 
379
		return $code;
-
 
380
	}
-
 
381
	
-
 
382
	private function estUneChaineRequeteValide($lieu) {
-
 
383
		return (strlen($lieu) > 0) && ($lieu != '%');
-
 
384
	}
-
 
385
		
-
 
386
	private function formaterLigneResultat($ligne) {
-
 
387
		if(empty($ligne['code']) || $ligne['code'] == null) {
-
 
388
			$res = array($ligne['nom'], '');
-
 
389
		} else {
-
 
390
			$res = array($ligne['nom'].' ('.substr(sprintf('%02s', $ligne['code']),0,2).')', $ligne['code']);
-
 
391
		}
-
 
392
		return $res;
-
 
393
	}
-
 
394
	
-
 
395
	/**
-
 
396
	 * Remplace les * par % pour faire des recherches floues
-
 
397
	 * Remplace les + par _ (nginx envoie des "+" dans l'URL à la place des espaces)
-
 
398
	 * Remplace les espaces et les - par _ car les noms de communes peuvent avoir des espaces ou des tirets
-
 
399
	 * @param string $lieu
-
 
400
	 * @return string le lieu formaté pour la recherche
-
 
401
	 */
-
 
402
	private function formaterChaineLieuPourRequete($lieu) {
-
 
403
		$lieu = ltrim($lieu);
-
 
404
		$lieu = preg_replace('/\*+/', '%', $lieu);
-
 
405
		$lieu = str_replace(['+', ' ', '-'], '_', $lieu);
-
 
406
		return $lieu;
-
 
407
	}
139
}
408
}
140
409