[SPIP] ~version 3.0.7-->3.0.10
[ptitvelo/web/www.git] / www / ecrire / action / editer_objet.php
1 <?php
2
3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
5 * *
6 * Copyright (c) 2001-2012 *
7 * Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
8 * *
9 * Ce programme est un logiciel libre distribue sous licence GNU/GPL. *
10 * Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne. *
11 \***************************************************************************/
12
13 if (!defined('_ECRIRE_INC_VERSION')) return;
14
15 /**
16 * Point d'entree d'edition d'un objet
17 * on ne peut entrer que par un appel en fournissant $id et $objet
18 * mais pas pas une url
19 *
20 * @param int $id
21 * @param string $objet
22 * @param array $set
23 * @return array
24 */
25 function action_editer_objet_dist($id=null, $objet=null, $set=null) {
26
27 // appel direct depuis une url interdit
28 if (is_null($id) OR is_null($objet)){
29 include_spip('inc/minipres');
30 echo minipres(_T('info_acces_interdit'));
31 die();
32 }
33
34 // si id n'est pas un nombre, c'est une creation
35 // mais on verifie qu'on a toutes les donnees qu'il faut.
36 if (!$id = intval($id)) {
37 // on ne sait pas si un parent existe mais on essaye
38 $id_parent = _request('id_parent');
39 $id = objet_inserer($objet, $id_parent);
40 }
41
42 if (!($id = intval($id))>0)
43 return array($id,_L('echec enregistrement en base'));
44
45 // Enregistre l'envoi dans la BD
46 $err = objet_modifier($objet, $id, $set);
47
48 return array($id,$err);
49 }
50
51 /**
52 * Appelle toutes les fonctions de modification d'un objet
53 * $err est un message d'erreur eventuelle
54 *
55 * @param string $objet
56 * @param int $id
57 * @param array|null $set
58 * @return mixed|string
59 */
60 function objet_modifier($objet, $id, $set=null) {
61 if (include_spip('action/editer_'.$objet)
62 AND function_exists($modifier = $objet."_modifier"))
63 return $modifier($id,$set);
64
65 $table_sql = table_objet_sql($objet);
66 $trouver_table = charger_fonction('trouver_table','base');
67 $desc = $trouver_table($table_sql);
68 if (!$desc OR !isset($desc['field'])) {
69 spip_log("Objet $objet inconnu dans objet_modifier",_LOG_ERREUR);
70 return _L("Erreur objet $objet inconnu");
71 }
72 include_spip('inc/modifier');
73
74 $champ_date = '';
75 if (isset($desc['date']) AND $desc['date'])
76 $champ_date = $desc['date'];
77 elseif (isset($desc['field']['date']))
78 $champ_date = 'date';
79
80 $white = array_keys($desc['field']);
81 // on ne traite pas la cle primaire par defaut, notamment car
82 // sur une creation, id_x vaut 'oui', et serait enregistre en id_x=0 dans la base
83 $white = array_diff($white, array($desc['key']['PRIMARY KEY']));
84
85 if (isset($desc['champs_editables']) AND is_array($desc['champs_editables'])) {
86 $white = $desc['champs_editables'];
87 }
88 $c = collecter_requests(
89 // white list
90 $white,
91 // black list
92 array($champ_date,'statut','id_parent','id_secteur'),
93 // donnees eventuellement fournies
94 $set
95 );
96
97 // Si l'objet est publie, invalider les caches et demander sa reindexation
98 if (objet_test_si_publie($objet,$id)){
99 $invalideur = "id='$objet/$id'";
100 $indexation = true;
101 }
102 else {
103 $invalideur = "";
104 $indexation = false;
105 }
106
107 if ($err = objet_modifier_champs($objet, $id,
108 array(
109 'nonvide' => '',
110 'invalideur' => $invalideur,
111 'indexation' => $indexation,
112 // champ a mettre a date('Y-m-d H:i:s') s'il y a modif
113 'date_modif' => (isset($desc['field']['date_modif'])?'date_modif':'')
114 ),
115 $c))
116 return $err;
117
118 // Modification de statut, changement de rubrique ?
119 // FIXME: Ici lorsqu'un $set est passé, la fonction collecter_requests() retourne tout
120 // le tableau $set hors black liste, mais du coup on a possiblement des champs en trop.
121 $c = collecter_requests(array($champ_date, 'statut', 'id_parent'),array(),$set);
122 $err = objet_instituer($objet, $id, $c);
123
124 return $err;
125 }
126
127 /**
128 * Inserer en base un objet generique
129 * @param string $objet
130 * @param int $id_parent
131 * @param array|null $set
132 * @return bool|int
133 */
134 function objet_inserer($objet, $id_parent=null, $set=null) {
135 if (include_spip('action/editer_'.$objet)
136 AND function_exists($inserer = $objet."_inserer"))
137 return $inserer($id_parent);
138
139 $table_sql = table_objet_sql($objet);
140 $trouver_table = charger_fonction('trouver_table','base');
141 $desc = $trouver_table($table_sql);
142 if (!$desc OR !isset($desc['field']))
143 return 0;
144
145 $lang_rub = "";
146 $champs = array();
147 if (isset($desc['field']['id_rubrique'])){
148 // Si id_rubrique vaut 0 ou n'est pas definie, creer l'objet
149 // dans la premiere rubrique racine
150 if (!$id_rubrique = intval($id_parent)) {
151 $row = sql_fetsel("id_rubrique, id_secteur, lang", "spip_rubriques", "id_parent=0",'', '0+titre,titre', "1");
152 $id_rubrique = $row['id_rubrique'];
153 }
154 else
155 $row = sql_fetsel("lang, id_secteur", "spip_rubriques", "id_rubrique=".intval($id_rubrique));
156
157 $champs['id_rubrique'] = $id_rubrique;
158 if (isset($desc['field']['id_secteur']))
159 $champs['id_secteur'] = $row['id_secteur'];
160 $lang_rub = $row['lang'];
161 }
162
163 // La langue a la creation : si les liens de traduction sont autorises
164 // dans les rubriques, on essaie avec la langue de l'auteur,
165 // ou a defaut celle de la rubrique
166 // Sinon c'est la langue de la rubrique qui est choisie + heritee
167 if (isset($desc['field']['lang']) AND $GLOBALS['meta']['multi_objets'] AND in_array($table_sql, explode(',', $GLOBALS['meta']['multi_objets']))) {
168 lang_select($GLOBALS['visiteur_session']['lang']);
169 if (in_array($GLOBALS['spip_lang'],
170 explode(',', $GLOBALS['meta']['langues_multilingue']))) {
171 $champs['lang'] = $GLOBALS['spip_lang'];
172 if (isset($desc['field']['langue_choisie']))
173 $champs['langue_choisie'] = 'oui';
174 }
175 }
176 elseif (isset($desc['field']['lang']) AND isset($desc['field']['langue_choisie'])) {
177 $champs['lang'] = ($lang_rub ? $lang_rub : $GLOBALS['meta']['langue_site']);
178 $champs['langue_choisie'] = 'non';
179 }
180
181 if (isset($desc['field']['statut'])){
182 if (isset($desc['statut_textes_instituer'])){
183 $champs['statut'] = reset(array_keys($desc['statut_textes_instituer']));
184 }
185 else
186 $champs['statut'] = 'prepa';
187 }
188
189
190 if ((isset($desc['date']) AND $d=$desc['date']) OR isset($desc['field'][$d='date']))
191 $champs[$d] = date('Y-m-d H:i:s');
192
193 if ($set)
194 $champs = array_merge($champs, $set);
195
196 // Envoyer aux plugins
197 $champs = pipeline('pre_insertion',
198 array(
199 'args' => array(
200 'table' => $table_sql,
201 ),
202 'data' => $champs
203 )
204 );
205
206 $id = sql_insertq($table_sql, $champs);
207
208 if ($id){
209 pipeline('post_insertion',
210 array(
211 'args' => array(
212 'table' => $table_sql,
213 'id_objet' => $id,
214 ),
215 'data' => $champs
216 )
217 );
218
219 // controler si le serveur n'a pas renvoye une erreur
220 // et associer l'auteur sinon
221 // si la table n'a pas deja un champ id_auteur
222 // et si le form n'a pas poste un id_auteur (meme vide, ce qui sert a annuler cette auto association)
223 if ($id > 0
224 AND !isset($desc['field']['id_auteur'])){
225 $id_auteur = ((is_null(_request('id_auteur')) AND isset($GLOBALS['visiteur_session']['id_auteur']))?
226 $GLOBALS['visiteur_session']['id_auteur']
227 :_request('id_auteur'));
228 if ($id_auteur) {
229 include_spip('action/editer_auteur');
230 auteur_associer($id_auteur, array($objet=>$id));
231 }
232 }
233 }
234
235 return $id;
236 }
237
238
239 /**
240 * $c est un array ('statut', 'id_parent' = changement de rubrique)
241 * statut et rubrique sont lies, car un admin restreint peut deplacer
242 * un objet publie vers une rubrique qu'il n'administre pas
243 *
244 * @param string $objet
245 * @param int $id
246 * @param array $c
247 * @param bool $calcul_rub
248 * @return mixed|string
249 */
250 function objet_instituer($objet, $id, $c, $calcul_rub=true) {
251 if (include_spip('action/editer_'.$objet)
252 AND function_exists($instituer = $objet."_instituer"))
253 return $instituer($id,$c,$calcul_rub);
254
255 $table_sql = table_objet_sql($objet);
256 $trouver_table = charger_fonction('trouver_table','base');
257 $desc = $trouver_table($table_sql);
258 if (!$desc OR !isset($desc['field']))
259 return _L("Impossible d'instituer $objet : non connu en base");
260
261 include_spip('inc/autoriser');
262 include_spip('inc/rubriques');
263 include_spip('inc/modifier');
264
265 $sel = array();
266 $sel[] = (isset($desc['field']['statut'])?"statut":"'' as statut");
267
268 $champ_date = '';
269 if (isset($desc['date']) AND $desc['date'])
270 $champ_date = $desc['date'];
271 elseif (isset($desc['field']['date']))
272 $champ_date = 'date';
273
274 $sel[] = ($champ_date ? "$champ_date as date" : "'' as date");
275 $sel[] = (isset($desc['field']['id_rubrique'])?'id_rubrique':"0 as id_rubrique");
276
277 $row = sql_fetsel($sel, $table_sql, id_table_objet($objet).'='.intval($id));
278
279 $id_rubrique = $row['id_rubrique'];
280 $statut_ancien = $statut = $row['statut'];
281 $date_ancienne = $date = $row['date'];
282 $champs = array();
283
284 $d = ($date AND isset($c[$champ_date]))?$c[$champ_date]:null;
285 $s = (isset($desc['field']['statut']) AND isset($c['statut']))?$c['statut']:$statut;
286
287 // cf autorisations dans inc/instituer_objet
288 if ($s != $statut OR ($d AND $d != $date)) {
289 if ($id_rubrique ?
290 autoriser('publierdans', 'rubrique', $id_rubrique)
291 :
292 autoriser('instituer', $objet, $id, null, array('statut'=>$s))
293 )
294 $statut = $champs['statut'] = $s;
295 else if ($s!='publie' AND autoriser('modifier', $objet, $id))
296 $statut = $champs['statut'] = $s;
297 else
298 spip_log("editer_objet $id refus " . join(' ', $c));
299
300 // En cas de publication, fixer la date a "maintenant"
301 // sauf si $c commande autre chose
302 // ou si l'objet est deja date dans le futur
303 // En cas de proposition d'un objet (mais pas depublication), idem
304 if ($champ_date) {
305 if ($champs['statut'] == 'publie'
306 OR ($champs['statut'] == 'prop' AND !in_array($statut_ancien, array('publie', 'prop')))
307 OR $d
308 ) {
309 if ($d OR strtotime($d=$date)>time())
310 $champs[$champ_date] = $date = $d;
311 else
312 $champs[$champ_date] = $date = date('Y-m-d H:i:s');
313 }
314 }
315 }
316
317 // Verifier que la rubrique demandee existe et est differente
318 // de la rubrique actuelle
319 if ($id_rubrique
320 AND $id_parent = $c['id_parent']
321 AND $id_parent != $id_rubrique
322 AND (sql_fetsel('1', "spip_rubriques", "id_rubrique=".intval($id_parent)))) {
323 $champs['id_rubrique'] = $id_parent;
324
325 // si l'objet etait publie
326 // et que le demandeur n'est pas admin de la rubrique
327 // repasser l'objet en statut 'propose'.
328 if ($statut == 'publie'
329 AND !autoriser('publierdans', 'rubrique', $id_rubrique))
330 $champs['statut'] = 'prop';
331 }
332
333
334 // Envoyer aux plugins
335 $champs = pipeline('pre_edition',
336 array(
337 'args' => array(
338 'table' => $table_sql,
339 'id_objet' => $id,
340 'action'=>'instituer',
341 'statut_ancien' => $statut_ancien,
342 'date_ancienne' => $date_ancienne,
343 'id_parent_ancien' => $id_rubrique,
344 ),
345 'data' => $champs
346 )
347 );
348
349 if (!count($champs)) return '';
350
351 // Envoyer les modifs.
352 objet_editer_heritage($objet, $id, $id_rubrique, $statut_ancien, $champs, $calcul_rub);
353
354 // Invalider les caches
355 include_spip('inc/invalideur');
356 suivre_invalideur("id='$objet/$id'");
357
358 /*
359 if ($date) {
360 $t = strtotime($date);
361 $p = @$GLOBALS['meta']['date_prochain_postdate'];
362 if ($t > time() AND (!$p OR ($t < $p))) {
363 ecrire_meta('date_prochain_postdate', $t);
364 }
365 }*/
366
367 // Pipeline
368 pipeline('post_edition',
369 array(
370 'args' => array(
371 'table' => $table_sql,
372 'id_objet' => $id,
373 'action'=>'instituer',
374 'statut_ancien' => $statut_ancien,
375 'date_ancienne' => $date_ancienne,
376 'id_parent_ancien' => $id_rubrique,
377 ),
378 'data' => $champs
379 )
380 );
381
382 // Notifications
383 if ($notifications = charger_fonction('notifications', 'inc')) {
384 $notifications("instituer$objet", $id,
385 array('statut' => $statut, 'statut_ancien' => $statut_ancien, 'date'=>$date, 'date_ancienne' => $date_ancienne)
386 );
387 }
388
389 return ''; // pas d'erreur
390 }
391
392 /**
393 * fabrique la requete d'institution de l'objet, avec champs herites
394 *
395 * @param string $objet
396 * @param int $id
397 * @param int $id_rubrique
398 * @param string $statut
399 * @param array $champs
400 * @param bool $cond
401 * @return
402 */
403 function objet_editer_heritage($objet, $id, $id_rubrique, $statut, $champs, $cond=true) {
404 $table_sql = table_objet_sql($objet);
405 $trouver_table = charger_fonction('trouver_table','base');
406 $desc = $trouver_table($table_sql);
407
408 // Si on deplace l'objet
409 // changer aussi son secteur et sa langue (si heritee)
410 if (isset($champs['id_rubrique'])) {
411
412 $row_rub = sql_fetsel("id_secteur, lang", "spip_rubriques", "id_rubrique=".sql_quote($champs['id_rubrique']));
413 $langue = $row_rub['lang'];
414
415 if (isset($desc['field']['id_secteur']))
416 $champs['id_secteur'] = $row_rub['id_secteur'];
417
418 if (isset($desc['field']['lang']) AND isset($desc['field']['langue_choisie']))
419 if (sql_fetsel('1', $table_sql, id_table_objet($objet)."=".intval($id)." AND langue_choisie<>'oui' AND lang<>" . sql_quote($langue))) {
420 $champs['lang'] = $langue;
421 }
422 }
423
424 if (!$champs) return;
425 sql_updateq($table_sql, $champs, id_table_objet($objet).'='.intval($id));
426
427 // Changer le statut des rubriques concernees
428 if ($cond) {
429 include_spip('inc/rubriques');
430 //$postdate = ($GLOBALS['meta']["post_dates"] == "non" AND isset($champs['date']) AND (strtotime($champs['date']) < time()))?$champs['date']:false;
431 $postdate = false;
432 calculer_rubriques_if($id_rubrique, $champs, $statut, $postdate);
433 }
434 }
435
436 ?>