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