fc8a97d0d425b4fddd962fce0178b25a4df6b59a
[lhc/web/www.git] / www / plugins-dist / forum / formulaires / forum_prive.php
1 <?php
2
3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
5 * *
6 * Copyright (c) 2001-2016 *
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")) {
14 return;
15 }
16
17 include_spip('inc/forum');
18
19 /**
20 * Identification du formulaire poste : ne pas tenir compte du retour
21 *
22 * @param $objet
23 * @param $id_objet
24 * @param $id_forum
25 * @param $forcer_previsu
26 * @param $statut
27 * @return array
28 */
29 function formulaires_forum_prive_identifier_dist($objet, $id_objet, $id_forum, $forcer_previsu, $statut) {
30 return array($objet, $id_objet, $id_forum, $forcer_previsu, $statut);
31 }
32
33 function formulaires_forum_prive_charger_dist($objet, $id_objet, $id_forum, $forcer_previsu, $statut, $retour = '') {
34
35 if (!function_exists($f = 'forum_recuperer_titre')) {
36 $f = 'forum_recuperer_titre_dist';
37 }
38 // si objet, il faut un titre, sinon on est dans un statut privrac/privadm qui permet un forum sans objet
39 if ($objet and $id_objet and !$titre = $f($objet, $id_objet, $id_forum, false)) {
40 return false;
41 }
42
43 $primary = id_table_objet($objet);
44 $table = table_objet($objet);
45
46 // Tableau des valeurs servant au calcul d'une signature de securite.
47 // Elles seront placees en Input Hidden pour que inc/forum_insert
48 // recalcule la meme chose et verifie l'identite des resultats.
49 // Donc ne pas changer la valeur de ce tableau entre le calcul de
50 // la signature et la fabrication des Hidden
51 // Faire attention aussi a 0 != ''
52 $ids = array();
53 $ids[$primary] = ($x = intval($id_objet)) ? $x : '';
54 $ids['id_objet'] = ($x = intval($id_objet)) ? $x : '';
55 $ids['objet'] = $objet;
56 $ids['id_forum'] = ($x = intval($id_forum)) ? $x : '';
57
58 // par défaut, on force la prévisualisation du message avant de le poster
59 if (($forcer_previsu == 'non') or (empty($forcer_previsu) and $GLOBALS['meta']["forums_forcer_previsu"] == "non")) {
60 $forcer_previsu = 'non';
61 } else {
62 $forcer_previsu = 'oui';
63 }
64
65 // pour les hidden
66 $script_hidden = "";
67 foreach ($ids as $id => $v) {
68 $script_hidden .= "<input type='hidden' name='$id' value='$v' />";
69 }
70
71 $config = array();
72 foreach (array('afficher_barre', 'forum_titre', 'forums_texte', 'forums_urlref') as $k) {
73 $config[$k] = ' ';
74 }
75
76 return array(
77 'nom_site' => '',
78 'table' => $table,
79 'texte' => '',
80 'config' => $config,
81 'titre' => isset($titre) ? $titre : '',
82 '_hidden' => $script_hidden, # pour les variables hidden
83 'url_site' => "http://",
84 'forcer_previsu' => $forcer_previsu,
85 'id_forum' => $id_forum, // passer id_forum au formulaire pour lui permettre d'afficher a quoi l'internaute repond
86 '_sign' => implode('_', $ids),
87 '_autosave_id' => $ids,
88 );
89 }
90
91
92 function formulaires_forum_prive_verifier_dist($objet, $id_objet, $id_forum, $forcer_previsu, $statut, $retour = '') {
93 include_spip('inc/acces');
94 include_spip('inc/texte');
95 include_spip('inc/forum');
96 include_spip('inc/session');
97 include_spip('base/abstract_sql');
98
99 $erreurs = array();
100
101 $min_length = (defined('_FORUM_LONGUEUR_MINI') ? _FORUM_LONGUEUR_MINI : 10);
102 if (strlen($texte = _request('texte')) < $min_length
103 and !_request('ajouter_mot') and $GLOBALS['meta']['forums_texte'] == 'oui'
104 ) {
105 $erreurs['texte'] = _T($min_length == 10 ? 'forum:forum_attention_dix_caracteres' : 'forum:forum_attention_nb_caracteres_mini',
106 array('min' => $min_length));
107 } else {
108 if (defined('_FORUM_LONGUEUR_MAXI')
109 and _FORUM_LONGUEUR_MAXI > 0
110 and strlen($texte) > _FORUM_LONGUEUR_MAXI
111 ) {
112 $erreurs['texte'] = _T('forum:forum_attention_trop_caracteres',
113 array(
114 'compte' => strlen($texte),
115 'max' => _FORUM_LONGUEUR_MAXI
116 ));
117 }
118 }
119
120 if (strlen($titre = _request('titre')) < 3
121 and $GLOBALS['meta']['forums_titre'] == 'oui'
122 ) {
123 $erreurs['titre'] = _T('forum:forum_attention_trois_caracteres');
124 }
125
126 if (array_reduce($_POST, 'reduce_strlen', (20 * 1024)) < 0) {
127 $erreurs['erreur_message'] = _T('forum:forum_message_trop_long');
128 }
129
130 if ($url = _request('url_site') and !tester_url_absolue($url)) {
131 $erreurs['url_site'] = _T('info_url_site_pas_conforme');
132 }
133
134 if (!count($erreurs) and !_request('envoyer_message') and !_request('confirmer_previsu_forum')) {
135 $previsu = inclure_forum_prive_previsu($texte, $titre, _request('url_site'), _request('nom_site'),
136 _request('ajouter_mot'));
137 $erreurs['previsu'] = $previsu;
138 $erreurs['message_erreur'] = ''; // on ne veut pas du message_erreur automatique
139 }
140
141 return $erreurs;
142 }
143
144
145 function inclure_forum_prive_previsu($texte, $titre, $url_site, $nom_site, $ajouter_mot, $doc = "") {
146 $bouton = _T('forum:forum_message_definitif');
147 include_spip('public/assembler');
148 include_spip('public/composer');
149 // supprimer les <form> de la previsualisation
150 // (sinon on ne peut pas faire <cadre>...</cadre> dans les forums)
151 return preg_replace("@<(/?)form\b@ism",
152 '<\1div',
153 inclure_balise_dynamique(array(
154 'formulaires/inc-forum_prive_previsu',
155 0,
156 array(
157 'titre' => safehtml(typo($titre)),
158 'texte' => safehtml(propre($texte)),
159 'notes' => safehtml(calculer_notes()),
160 'url_site' => vider_url($url_site),
161 'nom_site' => safehtml(typo($nom_site)),
162 'ajouter_mot' => (is_array($ajouter_mot) ? $ajouter_mot : array($ajouter_mot)),
163 'ajouter_document' => $doc,
164 #'erreur' => $erreur, // kesako ? non définie ?
165 'bouton' => $bouton
166 )
167 ),
168 false)
169 );
170 }
171
172
173 function formulaires_forum_prive_traiter_dist($objet, $id_objet, $id_forum, $forcer_previsu, $statut, $retour = '') {
174
175 $forum_insert = charger_fonction('forum_insert', 'inc');
176 $id_reponse = $forum_insert($objet, $id_objet, $id_forum, $statut);
177 if ($id_reponse) {
178 // En cas de retour sur (par exemple) {#SELF}, on ajoute quand
179 // meme #forum12 a la fin de l'url, sauf si un #ancre est explicite
180 if ($retour) {
181 if (!strpos($retour, '#')) {
182 $retour .= '#forum' . $id_reponse;
183 }
184 } else {
185 // le retour par defaut envoie sur le thread, ce qui permet
186 // de traiter elegamment le cas des forums moderes a priori.
187 // Cela assure aussi qu'on retrouve son message dans le thread
188 // dans le cas des forums moderes a posteriori, ce qui n'est
189 // pas plus mal.
190 if (function_exists('generer_url_forum')) {
191 $retour = generer_url_forum($id_reponse);
192 } else {
193 $thread = sql_fetsel('id_thread', 'spip_forum', 'id_forum=' . $id_reponse);
194 spip_log('id_thread=' . $thread['id_thread'], 'forum');
195 $retour = generer_url_entite($thread['id_thread'], 'forum');
196 }
197 }
198
199 $res = array('redirect' => $retour, 'id_forum' => $id_forum);
200 } else {
201 $res = array('message_erreur' => _T('forum:erreur_enregistrement_message'));
202 }
203
204 return $res;
205 }