source: spip-zone/_core_/branches/spip-3.0/plugins/forum/forum_pipelines.php @ 93499

Last change on this file since 93499 was 93499, checked in by pierre.fiches@…, 5 years ago

Espaces insécables

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