3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
6 * Copyright (c) 2001-2013 *
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 \***************************************************************************/
13 if (!defined("_ECRIRE_INC_VERSION")) return;
14 include_spip('inc/forum');
15 include_spip('inc/filtres');
16 include_spip('inc/actions');
18 // Ce fichier est inclus par dist/formulaires/forum.php
20 // http://doc.spip.org/@mots_du_forum
21 function mots_du_forum($ajouter_mot, $id_message)
23 include_spip('action/editer_mot');
24 mot_associer($ajouter_mot, array('forum'=>$id_message));
29 // http://doc.spip.org/@tracer_erreur_forum
30 function tracer_erreur_forum($type='') {
31 spip_log("erreur forum ($type): ".print_r($_POST, true));
33 define('_TRACER_ERREUR_FORUM', false);
34 if (_TRACER_ERREUR_FORUM
) {
35 $envoyer_mail = charger_fonction('envoyer_mail','inc');
36 $envoyer_mail($GLOBALS['meta']['email_webmaster'], "erreur forum ($type)",
37 "erreur sur le forum ($type) :\n\n".
38 '$_POST = '.print_r($_POST, true)."\n\n".
39 '$_SERVER = '.print_r($_SERVER, true));
44 * Un parametre permet de forcer le statut (exemple: plugin antispam)
46 * http://doc.spip.org/@inc_forum_insert_dist
52 * @param null $force_statut
55 function inc_forum_insert_dist($objet, $id_objet, $id_forum, $force_statut = NULL) {
57 if (!in_array($force_statut,array('privrac','privadm'))){
59 OR !intval($id_objet)){
60 spip_log("Erreur insertion forum sur objet='$objet', id_objet=$id_objet",'forum.'. _LOG_ERREUR
);
64 spip_log("insertion de forum $force_statut sur $objet $id_objet (+$id_forum)", 'forum');
66 $c = array('statut'=>'off');
68 $c['id_objet'] = $id_objet;
70 include_spip('inc/filtres');
71 include_spip('inc/modifier');
72 $champs = objet_info('forum','champs_editables');
73 $c = collecter_requests($champs, array());
75 $c['auteur'] = sinon($GLOBALS['visiteur_session']['nom'],
76 $GLOBALS['visiteur_session']['session_nom']);
77 $c['email_auteur'] = sinon($GLOBALS['visiteur_session']['email'],
78 $GLOBALS['visiteur_session']['session_email']);
80 $c = pipeline('pre_edition',array(
82 'table' => 'spip_forum',
83 'id_objet' => $id_forum,
86 'data'=>forum_insert_statut($c, $force_statut)
89 $id_reponse = forum_insert_base($c, $id_forum, $objet, $id_objet, $c['statut'], _request('ajouter_mot'));
92 spip_log("Echec insertion forum sur $objet $id_objet (+$id_forum)", 'forum.'._LOG_ERREUR
);
94 spip_log("forum insere' $id_reponse sur $objet $id_objet (+$id_forum)", 'forum');
100 // http://doc.spip.org/@forum_insert_base
101 function forum_insert_base($c, $id_forum, $objet, $id_objet, $statut, $ajouter_mot = false)
104 if (!in_array($statut,array('privrac','privadm'))){
105 // si le statut est vide, c'est qu'on ne veut pas de ce presume spam !
106 if (!$statut OR !$objet OR !$id_objet){
107 $args = func_get_args();
108 spip_log("Erreur sur forum_insert_base ".var_export($args,1),'forum.'. _LOG_ERREUR
);
113 // Entrer le message dans la base
114 $id_reponse = sql_insertq('spip_forum', array(
115 'date_heure'=> date('Y-m-d H:i:s'),
116 'ip' => $GLOBALS['ip'],
117 'id_auteur' => $GLOBALS['visiteur_session']['id_auteur']
122 $id_thread = sql_getfetsel("id_thread", "spip_forum", "id_forum =".intval($id_forum));
125 $id_thread = $id_reponse; # id_thread oblige INSERT puis UPDATE.
128 sql_updateq('spip_forum', array('id_parent' => $id_forum, 'objet' => $objet, 'id_objet' => $id_objet, 'id_thread' => $id_thread, 'statut' => $statut), "id_forum=".intval($id_reponse));
130 // Entrer les mots-cles associes
131 if ($ajouter_mot) mots_du_forum($ajouter_mot, $id_reponse);
134 // Entree du contenu et invalidation des caches
136 include_spip('action/editer_forum');
137 revision_forum($id_reponse, $c);
139 // Ajouter un document
140 if (isset($_FILES['ajouter_document'])
141 AND $_FILES['ajouter_document']['tmp_name']) {
142 $files[] = array('tmp_name'=>$_FILES['ajouter_document']['tmp_name'],'name'=>$_FILES['ajouter_document']['name']);
143 $ajouter_documents = charger_fonction('ajouter_documents','action');
150 // supprimer le temporaire et ses meta donnees
151 spip_unlink($_FILES['ajouter_document']['tmp_name']);
152 spip_unlink(preg_replace(',\.bin$,',
153 '.txt', $_FILES['ajouter_document']['tmp_name']));
157 $quoi = (strncmp($statut,'priv',4)==0?
'forumprive':'forumposte');
158 if ($notifications = charger_fonction('notifications', 'inc'))
159 $notifications($quoi, $id_reponse);
166 // http://doc.spip.org/@forum_insert_statut
167 function forum_insert_statut($champs, $forcer_statut=NULL)
169 include_spip('inc/forum');
170 $statut = controler_forum($champs['objet'], $champs['id_objet']);
172 if ($forcer_statut !== NULL)
173 $champs['statut'] = $forcer_statut;
175 $champs['statut'] = ($statut == 'non') ?
'off' : (($statut == 'pri') ?
'prop' : 'publie');