3 if (!defined("_ECRIRE_INC_VERSION")) return;
5 include_spip('inc/autoriser');
7 function action_editer_gis_dist($arg=null) {
9 $securiser_action = charger_fonction('securiser_action', 'inc');
10 $arg = $securiser_action();
13 // si id_gis n'est pas un nombre, c'est une creation
14 if (!$id_gis = intval($arg)) {
15 if (!autoriser('creer','gis') or !$id_gis = gis_inserer())
16 return array(false,_L('echec'));
18 $err = gis_modifier($id_gis);
19 return array($id_gis,$err);
23 * Fonction d'insertion d'un gis vide
25 * @return int/false $id_gis : l'identifiant numérique du point ou false en cas de non création
27 function gis_inserer() {
30 // Envoyer aux plugins
31 $champs = pipeline('pre_insertion', array(
33 'table' => 'spip_gis',
38 $id_gis = sql_insertq("spip_gis", $champs);
40 pipeline('post_insertion',
43 'table' => 'spip_gis',
53 * Enregistrer certaines modifications d'un gis
55 * @param int $id_gis : l'identifiant numérique du point
56 * @param array $c : un array des valeurs à mettre en base (par défaut false, on récupère les valeurs passées en dans le POST)
59 * Appelle toutes les fonctions de modification d'un point gis
60 * $err est de la forme chaine de langue ou vide si pas d'erreur
61 * http://doc.spip.org/@articles_set
67 function gis_modifier($id_gis, $set=null) {
68 include_spip('inc/modifier');
69 include_spip('inc/filtres');
70 $c = collecter_requests(
72 objet_info('gis','champs_editables'),
74 array('id_objet','objet'),
75 // donnees eventuellement fournies
81 while($c['lon'] > 180){
82 $c['lon'] = $c['lon'] - 360;
84 }else if($c['lon'] <= -180){
85 while($c['lon'] <= -180){
86 $c['lon'] = $c['lon'] +
360;
92 while($c['lat'] > 90){
93 $c['lat'] = $c['lat'] - 180;
95 }else if($c['lat'] <= -90){
96 while($c['lat'] <= -90){
97 $c['lat'] = $c['lon'] +
180;
101 if ($err = objet_modifier_champs('gis', $id_gis,
103 //'nonvide' => array('nom' => _T('info_sans_titre')),
104 'invalideur' => "id='gis/$id_gis'",
109 // lier a un parent ?
110 $c = collecter_requests(array('id_objet', 'objet'),array(),$set);
111 if (isset($c['id_objet']) AND intval($c['id_objet']) AND isset($c['objet']) AND $c['objet']) {
112 lier_gis($id_gis, $c['objet'], $c['id_objet']);
120 * Associer un point géolocalisé a des objets listes sous forme
121 * array($objet=>$id_objets,...)
122 * $id_objets peut lui meme etre un scalaire ou un tableau pour une liste d'objets du meme type
124 * on peut passer optionnellement une qualification du (des) lien(s) qui sera
125 * alors appliquee dans la foulee.
126 * En cas de lot de liens, c'est la meme qualification qui est appliquee a tous
129 * @param array $objets
130 * @param array $qualif
133 function gis_associer($id_gis,$objets, $qualif = null){
134 include_spip('action/editer_liens');
135 $res = objet_associer(array('gis'=>$id_gis), $objets, $qualif);
136 include_spip('inc/invalideur');
137 suivre_invalideur("id='gis/$id_gis'");
142 * Dissocier un point géolocalisé des objets listes sous forme
143 * array($objet=>$id_objets,...)
144 * $id_objets peut lui meme etre un scalaire ou un tableau pour une liste d'objets du meme type
146 * un * pour $id_auteur,$objet,$id_objet permet de traiter par lot
149 * @param array $objets
152 function gis_dissocier($id_gis,$objets){
153 include_spip('action/editer_liens');
154 $res = objet_dissocier(array('gis'=>$id_gis), $objets);
155 include_spip('inc/invalideur');
156 suivre_invalideur("id='gis/$id_gis'");
163 * Supprimer définitivement un point géolocalisé
165 * @param int $id_gis identifiant numérique du point
166 * @return int|false 0 si réussite, false dans le cas ou le point n'existe pas
168 function gis_supprimer($id_gis){
169 $valide = sql_getfetsel('id_gis','spip_gis','id_gis='.intval($id_gis));
170 if($valide && autoriser('supprimer','gis',$valide)){
171 sql_delete("spip_gis_liens", "id_gis=".intval($id_gis));
172 sql_delete("spip_gis", "id_gis=".intval($id_gis));
174 include_spip('inc/invalideur');
175 suivre_invalideur("id='id_gis/$id_gis'");
183 * Délier un point géolocalisé d'un objet SPIP
185 * @param int $id_gis identifiant numérique du point
186 * @param string $objet Le type de l'objet à lier
187 * @param int $id_objet L'identifiant numérique de l'objet lié
189 * @return bool : true si la suppression de la liaison s'est bien passée, false à l'inverse
191 function delier_gis($id_gis, $objet, $id_objet){
192 //$objet = objet_type($objet);
193 if ($id_objet AND $id_gis
194 AND preg_match('/^[a-z0-9_]+$/i', $objet) # securite
195 AND autoriser('delier','gis',$id_gis,$GLOBALS['visiteur_session'],array('objet' => $objet,'id_objet'=>$id_objet))
197 gis_dissocier($id_gis,array($objet=>$id_objet));
204 * Lier un point géolocalisé à un objet SPIP
206 * @param int $id_gis identifiant numérique du point
207 * @param string $objet Le type de l'objet à lier
208 * @param int $id_objet L'identifiant numérique de l'objet lié
210 * @return bool : true si la liaison s'est bien passée, false à l'inverse
212 function lier_gis($id_gis, $objet, $id_objet){
213 //$objet = objet_type($objet);
214 if ($id_objet AND $id_gis
215 AND preg_match('/^[a-z0-9_]+$/i', $objet) # securite
216 AND !sql_getfetsel("id_gis", "spip_gis_liens", "id_gis=$id_gis AND id_objet=$id_objet AND objet=".sql_quote($objet))
217 AND autoriser('lier','gis',$id_gis,$GLOBALS['visiteur_session'],array('objet' => $objet,'id_objet'=>$id_objet))
219 gis_associer($id_gis,array($objet=>$id_objet));
225 function insert_gis() {return gis_inserer();}
226 function revisions_gis($id_gis, $c=false) {return gis_modifier($id_gis,$c);}
227 function supprimer_gis($id_gis){return gis_supprimer($id_gis);}