cc2a40d902359742ca85b54995630d4ea5996fa1
3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
6 * Copyright (c) 2001-2016 *
7 * Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
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 \***************************************************************************/
14 * Gestion du formulaire Forum Privé et de sa balise
16 * @package SPIP\Forum\Balises
18 if (!defined("_ECRIRE_INC_VERSION")) {
22 include_spip('inc/acces');
23 include_spip('inc/texte');
24 include_spip('inc/forum');
28 * Compile la balise `#FORMULAIRE_FORUM_PRIVE` qui affiche un formulaire d'ajout
29 * de commentaire pour l'espace privé
31 * Signature : `#FORMULAIRE_FORUM_PRIVE{[redirection[, objet, id_objet]]}`
33 * Particularité du contexte du formulaire pour permettre une saisie
34 * de mots-clés dans les forums : si la variable de personnalisation
35 * `$afficher_groupe[]` est définie dans le fichier d'appel, et si la table
36 * de référence est OK, la liste des mots-clés est alors proposée.
39 * @see balise_FORMULAIRE_FORUM()
42 * #FORMULAIRE_FORUM_PRIVE seul calcule (objet, id_objet) depuis la boucle parente
43 * #FORMULAIRE_FORUM_PRIVE{#SELF} pour forcer l'url de retour
44 * #FORMULAIRE_FORUM_PRIVE{#SELF, article, 3} pour forcer l'objet et son identifiant
48 * Pile au niveau de la balise
50 * Pile complétée par le code à générer
52 function balise_FORMULAIRE_FORUM_PRIVE($p) {
55 * On recupere $objet et $id_objet depuis une boucle englobante si possible
56 * Sinon, on essaie aussi de recuperer des id_xx dans l'URL qui pourraient indiquer
57 * sur quoi le formulaire porte.
58 * Enfin, on pourra aussi forcer objet et id_objet depuis l'appel du formulaire
60 $i_boucle = $p->nom_boucle ?
$p->nom_boucle
: $p->id_boucle
;
61 if (isset($p->boucles
[$i_boucle])) {
62 $_id_objet = $p->boucles
[$i_boucle]->primary
;
63 $_type = $p->boucles
[$i_boucle]->id_table
;
65 $_id_objet = $_type = '';
69 * On essaye de trouver les forums en fonction de l'environnement
70 * pour cela, on recupere l'ensemble des id_xxx possibles dans l'env
72 $ids = forum_get_objets_depuis_env();
73 $ids = array_values($ids);
84 $obtenir = array_merge($obtenir, $ids);
87 $p = calculer_balise_dynamique($p, 'FORMULAIRE_FORUM_PRIVE', $obtenir,
88 array("'$_type'", count($ids))
95 * Chercher l'objet/id_objet et la configuration du forum
98 * @param array $context_compil
101 function balise_FORMULAIRE_FORUM_PRIVE_stat($args, $context_compil) {
102 // un arg peut contenir l'url sur lequel faire le retour
103 // exemple dans un squelette article.html : [(#FORMULAIRE_FORUM_PRIVE{#SELF})]
104 // recuperer les donnees du forum auquel on repond.
105 // deux autres a la suite pour forcer objet et id_objet
106 // [(#FORMULAIRE_FORUM_PRIVE{#SELF, article, 8})]
109 // $args = (obtenir) + (ids) + (url, objet, id_objet)
110 $ido = array_shift($args);
111 $id_forum = intval(array_shift($args));
112 $forcer_previsu = array_shift($args);
113 $statut = array_shift($args);
115 include_spip('balise/formulaire_forum');
116 // si statut privrac ou privadm, pas besoin d'objet !
117 $r = balise_forum_retrouve_objet($ido, $id_forum, $args, $context_compil,
118 !in_array($statut, array('privrac', 'privadm')));
123 list($objet, $id_objet, $retour) = $r;
126 array($objet, $id_objet, $id_forum, $forcer_previsu, $statut, $retour);