www/plugins-dist/forum/forum_pipelines.php

   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 if (!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  */
  21 function 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  */
  53 function 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  */
 100 function 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=rubrique&id_objet=$id_rubrique"), "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  */
 139 function 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  */
 156 function 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  */
 172 function 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  */
 210 function 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  */
 226 function 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  */
 249 function 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  */
 327 function 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  */
 341 function 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  */
 370 function 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  */
 383 function 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 ?>