[PLUGINS] +clavettes et dependances
[lhc/web/clavette_www.git] / www / plugins / gis / action / editer_gis.php
1 <?php
2
3 if (!defined("_ECRIRE_INC_VERSION")) return;
4
5 include_spip('inc/autoriser');
6
7 function action_editer_gis_dist($arg=null) {
8 if (is_null($arg)){
9 $securiser_action = charger_fonction('securiser_action', 'inc');
10 $arg = $securiser_action();
11 }
12
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'));
17 }
18 $err = gis_modifier($id_gis);
19 return array($id_gis,$err);
20 }
21
22 /**
23 * Fonction d'insertion d'un gis vide
24 *
25 * @return int/false $id_gis : l'identifiant numérique du point ou false en cas de non création
26 */
27 function gis_inserer() {
28 $champs = array();
29
30 // Envoyer aux plugins
31 $champs = pipeline('pre_insertion', array(
32 'args' => array(
33 'table' => 'spip_gis',
34 ),
35 'data' => $champs
36 ));
37
38 $id_gis = sql_insertq("spip_gis", $champs);
39
40 pipeline('post_insertion',
41 array(
42 'args' => array(
43 'table' => 'spip_gis',
44 'id_objet' => $id_gis
45 ),
46 'data' => $champs
47 )
48 );
49 return $id_gis;
50 }
51
52 /**
53 * Enregistrer certaines modifications d'un gis
54 *
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)
57 */
58 /**
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
62 *
63 * @param $id_gis
64 * @param null $set
65 * @return string
66 */
67 function gis_modifier($id_gis, $set=null) {
68 include_spip('inc/modifier');
69 include_spip('inc/filtres');
70 $c = collecter_requests(
71 // white list
72 objet_info('gis','champs_editables'),
73 // black list
74 array('id_objet','objet'),
75 // donnees eventuellement fournies
76 $set
77 );
78
79 if(isset($c['lon'])){
80 if($c['lon'] > 180){
81 while($c['lon'] > 180){
82 $c['lon'] = $c['lon'] - 360;
83 }
84 }else if($c['lon'] <= -180){
85 while($c['lon'] <= -180){
86 $c['lon'] = $c['lon'] + 360;
87 }
88 }
89 }
90 if(isset($c['lat'])){
91 if($c['lat'] > 90){
92 while($c['lat'] > 90){
93 $c['lat'] = $c['lat'] - 180;
94 }
95 }else if($c['lat'] <= -90){
96 while($c['lat'] <= -90){
97 $c['lat'] = $c['lon'] + 180;
98 }
99 }
100 }
101 if ($err = objet_modifier_champs('gis', $id_gis,
102 array(
103 //'nonvide' => array('nom' => _T('info_sans_titre')),
104 'invalideur' => "id='gis/$id_gis'",
105 ),
106 $c))
107 return $err;
108
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']);
113 }
114
115 return $err;
116 }
117
118
119 /**
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
123 *
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
127 *
128 * @param int $id_gis
129 * @param array $objets
130 * @param array $qualif
131 * @return string
132 */
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'");
138 return $res;
139 }
140
141 /**
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
145 *
146 * un * pour $id_auteur,$objet,$id_objet permet de traiter par lot
147 *
148 * @param int $id_gis
149 * @param array $objets
150 * @return string
151 */
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'");
157 return $res;
158 }
159
160
161
162 /**
163 * Supprimer définitivement un point géolocalisé
164 *
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
167 */
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));
173 $id_gis = 0;
174 include_spip('inc/invalideur');
175 suivre_invalideur("id='id_gis/$id_gis'");
176 return $id_gis;
177 }
178 return false;
179 }
180
181
182 /**
183 * Délier un point géolocalisé d'un objet SPIP
184 *
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é
188 *
189 * @return bool : true si la suppression de la liaison s'est bien passée, false à l'inverse
190 */
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))
196 ) {
197 gis_dissocier($id_gis,array($objet=>$id_objet));
198 return true;
199 }
200 return false;
201 }
202
203 /**
204 * Lier un point géolocalisé à un objet SPIP
205 *
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é
209 *
210 * @return bool : true si la liaison s'est bien passée, false à l'inverse
211 */
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))
218 ) {
219 gis_associer($id_gis,array($objet=>$id_objet));
220 return true;
221 }
222 return false;
223 }
224
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);}
228
229 ?>