source: spip-zone/_core_/plugins/forum/forum_pipelines.php @ 86320

Last change on this file since 86320 was 86320, checked in by guy.cesaro@…, 6 years ago

revert de r81033 (et du patch qui fait fonctionner le bug r86316)

File size: 12.8 KB
Line 
1<?php
2
3/***************************************************************************\
4 *  SPIP, Systeme de publication pour l'internet                           *
5 *                                                                         *
6 *  Copyright (c) 2001-2014                                                *
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/**
14 * Utilisation des pipelines
15 *
16 * @package SPIP\Forum\Pipelines
17**/
18
19if (!defined("_ECRIRE_INC_VERSION")) return;
20
21/**
22 * Bloc sur les encours editoriaux en page d'accueil
23 *
24 * @param string $texte
25 * @return string
26 */
27function forum_accueil_encours($texte){
28        // si aucun autre objet n'est a valider, on ne dit rien sur les forum
29        if ($GLOBALS['visiteur_session']['statut'] == '0minirezo') {
30                // Les forums en attente de moderation
31                $cpt = sql_countsel("spip_forum", "statut='prop'");
32                if ($cpt) {
33                        if ($cpt>1)
34                                $lien = _T('forum:info_liens_syndiques_3')." "._T('forum:info_liens_syndiques_4');
35                        else
36                                $lien = _T('forum:info_liens_syndiques_5')." "._T('forum:info_liens_syndiques_6');
37                        $lien = "<small>$cpt $lien " ._T('forum:info_liens_syndiques_7'). "</small>";
38                        if ($GLOBALS['connect_toutes_rubriques'])
39                                $lien = "<a href='" . generer_url_ecrire("controler_forum","statut=prop") . "' style='color: black;'>". $lien . ".</a>";
40                        $texte .= "\n<br />" . $lien;
41                }
42                if (strlen($texte) AND $GLOBALS['meta']['forum_prive_objets'] != 'non') {
43                        $cpt2 = sql_countsel("spip_articles", "statut='prop'");
44                        if ($cpt2)
45                                $texte = _T('forum:texte_en_cours_validation_forum') . $texte;
46                }
47        }
48
49        return $texte;
50}
51
52
53/**
54 * Bloc sur les informations generales concernant chaque type d'objet
55 *
56 * @param string $texte
57 * @return string
58 */
59function forum_accueil_informations($texte){
60        include_spip('base/abstract_sql');
61        $q = sql_select('COUNT(*) AS cnt, statut', 'spip_forum', sql_in('statut', array('publie', 'prop')), 'statut', '','', "COUNT(*)<>0");
62
63        $where = count($GLOBALS['connect_id_rubrique']) ? sql_in('id_rubrique', $GLOBALS['connect_id_rubrique'])        : '';
64        $cpt = array();
65        $cpt2 = array();
66        $defaut = $where ? '0/' : '';
67        while($row = sql_fetch($q)) {
68          $cpt[$row['statut']] = $row['cnt'];
69          $cpt2[$row['statut']] = $defaut;
70        }
71
72        if ($cpt) {
73                if ($where) {
74                  include_spip('inc/forum');
75                  list($f, $w) = critere_statut_controle_forum('public');
76                  $q = sql_select("COUNT(*) AS cnt, F.statut", "$f", "$w ", "F.statut");
77                  while($row = sql_fetch($q)) {
78                                $r = $row['statut'];
79                                $cpt2[$r] = intval($row['cnt']) . '/';
80                        }
81                }
82
83                $texte .= "<div class='accueil_informations forum liste'>";
84                $titre = _T('forum:onglet_messages_publics');
85                if (autoriser('modererforum')) {
86                        $plus = afficher_plus_info(generer_url_ecrire("controler_forum"), "", $titre);
87                        $texte .= "<h4>$plus</h4>";
88                } else {
89                        $texte .= "<h4>$titre</h4>";
90                }
91                $texte .= "<ul class='liste-items'>";
92                if (isset($cpt['prop'])) $texte .= "<li class='item'>"._T("texte_statut_attente_validation").": ".$cpt2['prop'] .$cpt['prop'] . '</li>';
93                if (isset($cpt['publie'])) $texte .= "<li class='item'>"._T("texte_statut_publies").": ".$cpt2['publie'] .$cpt['publie'] .'</li>';
94                $texte .= "</ul>";
95                $texte .= "</div>";
96        }
97        return $texte;
98}
99
100/**
101 * Affichage de la fiche complete des articles et rubriques
102 *
103 * @param array $flux
104 * @return array
105 */
106function forum_afficher_fiche_objet($flux){
107        if ($type = $flux['args']['type']
108          AND $table_sql = table_objet_sql($type)
109                AND in_array($table_sql,explode(',',$GLOBALS['meta']['forum_prive_objets']))){
110                $id = $flux['args']['id'];
111                $contexte = array_merge($flux['args']['contexte'],
112                        array(
113                                'objet'=>$type,
114                                'id_objet'=>$id,
115                                'quoi'=>'interne',
116                                'statut'=>'prive'
117                        )
118                );
119                $flux['data'] .= recuperer_fond('prive/squelettes/inclure/discuter_forum',$contexte,array('ajax'=>true));
120        }
121        if (($type = $flux['args']['type'])=='rubrique'){
122                $id_rubrique = $flux['args']['id'];
123                if (autoriser('publierdans','rubrique',$id_rubrique)
124                  AND !sql_getfetsel('id_parent','spip_rubriques','id_rubrique='.intval($id_rubrique))) {
125                        include_spip('inc/forum');
126                        list($from, $where) = critere_statut_controle_forum('prop', $id_rubrique);
127                        $n_forums = sql_countsel($from, $where);
128                }
129                else
130                        $n_forums = 0;
131                if ($n_forums)
132                $flux['data'] .= icone_verticale(_T('forum:icone_suivi_forum', array('nb_forums' => $n_forums)), generer_url_ecrire("controler_forum","objet=rubrique&id_objet=$id_rubrique"), "forum-24.png", "", 'center');
133        }
134        return $flux;
135}
136
137/**
138 * Boite de configuration des objets articles
139 *
140 * @param array $flux
141 * @return array
142 */
143function forum_afficher_config_objet($flux){
144        if (($type = $flux['args']['type'])
145                AND $id = $flux['args']['id']){
146                if (autoriser('modererforum', $type, $id)) {
147                        $id_table_objet = id_table_objet($type);
148                        $flux['data'] .= recuperer_fond("prive/objets/configurer/moderation",array('id_objet'=>$id,'objet'=>  objet_type(table_objet($type))));
149                }
150        }
151        return $flux;
152}
153
154/**
155 * Message d'information relatif au statut d'un objet
156 *
157 * @param array $flux
158 * @return array
159 */
160function forum_afficher_message_statut_objet($flux){
161        if ($type = $flux['args']['type']=='article'){
162                $statut = $flux['args']['statut'];
163                if ($GLOBALS['meta']['forum_prive_objets'] != 'non'
164                  AND $statut == 'prop')
165                        $flux['data'] .= "<p class='article_prop'>"._T('forum:text_article_propose_publication_forum').'</p>';
166        }
167        return $flux;
168}
169
170/**
171 * Nombre de forums d'un secteur dans la boite d'info
172 *
173 * @param array $flux
174 * @return array
175 */
176function forum_boite_infos($flux){
177        if ($flux['args']['type']=='rubrique'
178          AND $id_rubrique = $flux['args']['id']){
179                if (autoriser('publierdans','rubrique',$id_rubrique)
180                // [doc] d'ou il vient ce row ?
181                AND (!isset($flux['args']['row']['id_parent']) OR !$flux['args']['row']['id_parent'])) {
182                        include_spip('inc/forum');
183                        list($from, $where) = critere_statut_controle_forum('prop', $id_rubrique);
184                        $n_forums = sql_countsel($from, $where);
185                }
186                else
187                        $n_forums = 0;
188                if ($n_forums){
189                        $aff = "<p class='forums'>".singulier_ou_pluriel($n_forums, "forum:info_1_message_forum", "forum:info_nb_messages_forum").'</p>';
190                        if (($pos = strpos($flux['data'],'<!--nb_elements-->'))!==FALSE)
191                                $flux['data'] = substr($flux['data'],0,$pos) . $aff . substr($flux['data'],$pos);
192                        else
193                                $flux['data'] .= $aff;
194                }
195        }
196        elseif ($flux['args']['type']=='auteur'
197                AND $id_auteur = $flux['args']['id']){
198                if ($nb = sql_countsel('spip_forum',"statut!='poubelle' AND id_auteur=".intval($id_auteur))){
199                        $nb = "<div>". singulier_ou_pluriel($nb, "forum:info_1_message_forum", "forum:info_nb_messages_forum") . "</div>";
200                        if ($p = strpos($flux['data'],"<!--nb_elements-->"))
201                                $flux['data'] = substr_replace($flux['data'],$nb,$p,0);
202                }
203        }
204        return $flux;
205}
206
207/**
208 * Compter et afficher les contributions d'un visiteur
209 * pour affichage dans la page auteurs
210 *
211 * @param array $flux
212 * @return array
213 */
214function forum_compter_contributions_auteur($flux){
215        $id_auteur = intval($flux['args']['id_auteur']);
216        if ($cpt = sql_countsel("spip_forum AS F", "F.id_auteur=".intval($flux['args']['id_auteur']))){
217                // manque "1 message de forum"
218                $contributions = singulier_ou_pluriel($cpt,'forum:info_1_message_forum','forum:info_nb_messages_forum');
219                $flux['data'][] = $contributions;
220        }
221        return $flux;
222}
223
224/**
225 * Definir les meta de configuration liee aux forums
226 *
227 * @param array $metas
228 * @return array
229 */
230function forum_configurer_liste_metas($metas){
231        $metas['mots_cles_forums'] =  'non';
232        $metas['forums_titre'] = 'oui';
233        $metas['forums_texte'] = 'oui';
234        $metas['forums_urlref'] = 'non';
235        $metas['forums_afficher_barre'] = 'oui';
236        $metas['forums_forcer_previsu'] = 'oui';
237        $metas['formats_documents_forum'] = '';
238        $metas['forums_publics'] = 'posteriori';
239        $metas['forum_prive'] = 'oui'; # forum global dans l'espace prive
240        $metas['forum_prive_objets'] = 'oui'; # forum sous chaque article de l'espace prive
241        $metas['forum_prive_admin'] = 'non'; # forum des administrateurs
242
243        return $metas;
244}
245
246
247
248/**
249 * Optimiser la base de donnée en supprimant les forums orphelins
250 *
251 * @param array $flux
252 * @return array
253 */
254function forum_optimiser_base_disparus($flux){
255        $n = &$flux['data'];
256        $mydate = $flux['args']['date'];
257        # les forums lies a une id_objet inexistant
258        $r = sql_select("DISTINCT objet",'spip_forum');
259        while ($t = sql_fetch($r)){
260                if ($type = $t['objet']) {
261                        $spip_table_objet = table_objet_sql($type);
262                        $id_table_objet = id_table_objet($type);
263                        # les forums lies a un objet inexistant
264                        $res = sql_select("forum.id_forum AS id",
265                                                        "spip_forum AS forum
266                                                                LEFT JOIN $spip_table_objet AS O
267                                                                        ON O.$id_table_objet=forum.id_objet",
268                                        "forum.objet=".sql_quote($type)." AND O.$id_table_objet IS NULL AND forum.id_objet>0");
269
270                        $n+= optimiser_sansref('spip_forum', 'id_forum', $res);
271                }
272        }
273
274        //
275        // Forums
276        //
277        sql_delete("spip_forum", "statut=".sql_quote('redac')." AND maj < ".sql_quote($mydate));
278
279        // nettoyer les documents des forums en spam&poubelle pour eviter de sortir des quota disques
280        // bizarrement on ne nettoie jamais les messages eux meme ?
281        include_spip('action/editer_liens');
282        if (objet_associable('document')){
283                $res = sql_select('L.id_document,F.id_forum',"spip_documents_liens AS L JOIN spip_forum AS F ON (F.id_forum=L.id_objet AND L.objet='forum')","F.statut IN ('off','spam')");
284                while ($row = sql_fetch($res)){
285                        include_spip('inc/autoriser');
286                        // si un seul lien (ce forum donc), on supprime le document
287                        // si un document est attache a plus d'un forum, c'est un cas bizarre ou gere a la main
288                        // on ne touche a rien !
289                        if (count(objet_trouver_liens(array('document'=>$row['id_document']),'*'))==1){
290                                autoriser_exception('supprimer','document',$row['id_document']);
291                                if ($supprimer_document = charger_fonction('supprimer_document','action',true))
292                                        $supprimer_document($row['id_document']);
293                        }
294                }
295        }
296
297
298        //
299        // CNIL -- Informatique et libertes
300        //
301        // masquer le numero IP des vieux forums
302        //
303        ## date de reference = 4 mois
304        ## definir a 0 pour desactiver
305        if (!defined('_CNIL_PERIODE')) {
306                define('_CNIL_PERIODE', 3600*24*31*4);
307        } 
308        if (_CNIL_PERIODE) {
309                $critere_cnil = 'date_heure<"'.date('Y-m-d', time()-_CNIL_PERIODE).'"'
310                        . ' AND statut != "spam"'
311                        . ' AND (ip LIKE "%.%" OR ip LIKE "%:%")'; # ipv4 ou ipv6
312
313                $c = sql_countsel('spip_forum', $critere_cnil);
314
315                if ($c>0) {
316                        spip_log("CNIL: masquer IP de $c forums anciens");
317                        sql_update('spip_forum', array('ip' => 'MD5(ip)'), $critere_cnil);
318                }
319        }
320
321        return $flux;
322
323}
324
325
326/**
327 * Remplissage des champs a la creation d'objet
328 *
329 * @param array $flux
330 * @return array
331 */
332function forum_pre_insertion($flux){
333        if ($flux['args']['table']=='spip_articles'){
334                $flux['data']['accepter_forum'] =       substr($GLOBALS['meta']['forums_publics'],0,3);
335        }
336        return $flux;
337}
338
339/**
340 * Regrouper les resultats de recherche par threads
341 * sauf si {plat} est present
342 *
343 * @param array $flux
344 * @return array
345 */
346function forum_prepare_recherche($flux){
347        # Pour les forums, unifier par id_thread et forcer statut='publie'
348        if ($flux['args']['type']=='forum'
349          AND $points = $flux['data']){
350          $serveur =  $flux['args']['serveur'];
351          $modificateurs = (isset($flux['args']['modificateurs'])?$flux['args']['modificateurs']:array());
352
353          // pas de groupe par thread si {plat}
354          if (!isset($modificateurs['plat'])){
355                        $p2 = array();
356                        // si critere statut dans la boucle, ne pas filtrer par statut publie ici
357                        $cond = (isset($modificateurs['criteres']['statut'])?"":"statut='publie' AND ");
358                        $s = sql_select("id_thread, id_forum", "spip_forum", $cond.sql_in('id_forum', array_keys($points)), '','','','',$serveur);
359                        while ($t = sql_fetch($s, $serveur))
360                                $p2[intval($t['id_thread'])]['score']
361                                        += $points[intval($t['id_forum'])]['score'];
362                        $flux['data'] = $p2;
363          }
364        }
365        return $flux;
366}
367
368
369/**
370 * Bloc en sur les encours d'une rubrique (page naviguer)
371 *
372 * @param array $flux
373 * @return array
374 */
375function forum_rubrique_encours($flux){
376        if (strlen($flux['data'])
377          AND $GLOBALS['meta']['forum_prive_objets'] != 'non')
378                $flux['data'] = _T('forum:texte_en_cours_validation_forum') . $flux['data'];
379        return $flux;
380}
381
382/**
383 * Supprimer les forums lies aux objets du core lors de leur suppression
384 *
385 * @param array $objets
386 * @return array
387 */
388function forum_trig_supprimer_objets_lies($objets){
389        foreach($objets as $objet){
390                if ($objet['type']=='message')
391                        sql_delete("spip_forum", "id_message=".intval($objet['id']));
392/*  A revoir completement, en l'état cela supprime les forums d'articles publiés que l'on lie à une newsletter en cours de rédaction
393
394                else
395                        sql_delete("spip_forum", array("id_objet=".intval($objet['id']),"objet=".sql_quote($objet['type']))); */
396        }
397        return $objets;
398}
399
400?>
Note: See TracBrowser for help on using the repository browser.