www/ecrire/inc/filtres_ecrire.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 /**
  14  * Fonctions utilisées au calcul des squelette du privé.
  15  *
  16  * @package SPIP\Filtres
  17  */
  18 if (!defined('_ECRIRE_INC_VERSION')) return;
  19
  20 include_spip('inc/filtres_boites');
  21 include_spip('inc/boutons');
  22 include_spip('inc/pipelines_ecrire');
  23
  24
  25 /**
  26  * Retourne les paramètres de personnalisation css de l'espace privé
  27  *
  28  * Ces paramètres sont (ltr et couleurs) ce qui permet une écriture comme :
  29  * generer_url_public('style_prive', parametres_css_prive())
  30  * qu'il est alors possible de récuperer dans le squelette style_prive.html avec
  31  *
  32  * #SET{claire,##ENV{couleur_claire,edf3fe}}
  33  * #SET{foncee,##ENV{couleur_foncee,3874b0}}
  34  * #SET{left,#ENV{ltr}|choixsiegal{left,left,right}}
  35  * #SET{right,#ENV{ltr}|choixsiegal{left,right,left}}
  36  *
  37  * @return string
  38  */
  39 function parametres_css_prive(){
  40         global $visiteur_session;
  41
  42         $args = array();
  43         $args['v'] = $GLOBALS['spip_version_code'];
  44         $args['p'] = substr(md5($GLOBALS['meta']['plugin']),0,4);
  45         $args['themes'] = implode(',',lister_themes_prives());
  46         $args['ltr'] = $GLOBALS['spip_lang_left'];
  47         $args['md5b'] = md5_boutons_plugins(); // un md5 des menus : si un menu change il faut maj la css
  48
  49         $c = (is_array($visiteur_session)
  50                 AND is_array($visiteur_session['prefs']))
  51                 ? $visiteur_session['prefs']['couleur']
  52                 : 1;
  53
  54         $couleurs = charger_fonction('couleurs', 'inc');
  55         parse_str($couleurs($c),$c);
  56         $args = array_merge($args, $c);
  57
  58         if (_request('var_mode')=='recalcul' OR (defined('_VAR_MODE') AND _VAR_MODE=='recalcul'))
  59                 $args['var_mode'] = 'recalcul';
  60
  61         return http_build_query($args);
  62 }
  63
  64
  65 /**
  66  * Afficher le sélecteur de rubrique
  67  *
  68  * Il permet de placer un objet dans la hiérarchie des rubriques de SPIP
  69  *
  70  * @param string $titre
  71  * @param int $id_objet
  72  * @param int $id_parent
  73  * @param string $objet
  74  * @param int $id_secteur
  75  * @param bool $restreint
  76  * @param bool $actionable
  77  *   true : fournit le selecteur dans un form directement postable
  78  * @param bool $retour_sans_cadre
  79  * @return string
  80  */
  81 function chercher_rubrique($titre,$id_objet, $id_parent, $objet, $id_secteur, $restreint,$actionable = false, $retour_sans_cadre=false){
  82         global $spip_lang_right;
  83         include_spip('inc/autoriser');
  84         if (intval($id_objet) && !autoriser('modifier', $objet, $id_objet))
  85                 return "";
  86         if (!sql_countsel('spip_rubriques'))
  87                 return "";
  88         $chercher_rubrique = charger_fonction('chercher_rubrique', 'inc');
  89         $form = $chercher_rubrique($id_parent, $objet, $restreint, ($objet=='rubrique')?$id_objet:0);
  90
  91         if ($id_parent == 0) $logo = "racine-24.png";
  92         elseif ($id_secteur == $id_parent) $logo = "secteur-24.png";
  93         else $logo = "rubrique-24.png";
  94
  95         $confirm = "";
  96         if ($objet=='rubrique') {
  97                 // si c'est une rubrique-secteur contenant des breves, demander la
  98                 // confirmation du deplacement
  99                 $contient_breves = sql_countsel('spip_breves', "id_rubrique=".intval($id_objet));
 100
 101                 if ($contient_breves > 0) {
 102                         $scb = ($contient_breves>1? 's':'');
 103                         $scb = _T('avis_deplacement_rubrique',
 104                                 array('contient_breves' => $contient_breves,
 105                                       'scb' => $scb));
 106                         $confirm .= "\n<div class='confirmer_deplacement verdana2'>"
 107                                     ."<div class='choix'><input type='checkbox' name='confirme_deplace' value='oui' id='confirme-deplace' /><label for='confirme-deplace'>"
 108                                     . $scb .
 109                                     "</label></div></div>\n";
 110                 } else
 111                         $confirm .= "<input type='hidden' name='confirme_deplace' value='oui' />\n";
 112         }
 113         $form .= $confirm;
 114         if ($actionable){
 115                 if (strpos($form,'<select')!==false) {
 116                         $form .= "<div style='text-align: $spip_lang_right;'>"
 117                                 . '<input class="fondo" type="submit" value="'._T('bouton_choisir').'"/>'
 118                                 . "</div>";
 119                 }
 120                 $form = "<input type='hidden' name='editer_$objet' value='oui' />\n" . $form;
 121                 $form = generer_action_auteur("editer_$objet", $id_objet, self(), $form, " method='post' class='submit_plongeur'");
 122         }
 123
 124         if ($retour_sans_cadre)
 125                 return $form;
 126
 127         include_spip('inc/presentation');
 128         return debut_cadre_couleur($logo, true, "", $titre) . $form .fin_cadre_couleur(true);
 129
 130 }
 131
 132
 133 /**
 134  * Tester si le site peut avoir des visiteurs
 135  *
 136  * @param bool $past
 137  *   si true, prendre en compte le fait que le site a *deja* des visiteurs
 138  *   comme le droit d'en avoir de nouveaux
 139  * @param bool $accepter
 140  * @return bool
 141  */
 142 function avoir_visiteurs($past=false, $accepter=true) {
 143         if ($GLOBALS['meta']["forums_publics"] == 'abo') return true;
 144         if ($accepter AND $GLOBALS['meta']["accepter_visiteurs"] <> 'non') return true;
 145         if (sql_countsel('spip_articles', "accepter_forum='abo'"))return true;
 146         if (!$past) return false;
 147         return sql_countsel('spip_auteurs',
 148                             "statut NOT IN ('0minirezo','1comite', '5poubelle')
 149                             AND (statut<>'nouveau' OR prefs NOT IN ('0minirezo','1comite', '5poubelle'))");
 150 }
 151
 152 /**
 153  * Lister les status d'article visibles dans l'espace prive
 154  * en fonction du statut de l'auteur
 155  *
 156  * Pour l'extensibilie de SPIP, on se repose sur autoriser('voir','article')
 157  * en testant un à un les status présents en base
 158  *
 159  * On mémorise en static pour éviter de refaire plusieurs fois.
 160  *
 161  * @param string $statut_auteur
 162  * @return array
 163  */
 164 function statuts_articles_visibles($statut_auteur){
 165         static $auth = array();
 166         if (!isset($auth[$statut_auteur])){
 167                 $auth[$statut_auteur] = array();
 168                 $statuts = array_map('reset',sql_allfetsel('distinct statut','spip_articles'));
 169                 foreach($statuts as $s){
 170                         if (autoriser('voir','article',0,array('statut'=>$statut_auteur),array('statut'=>$s)))
 171                                 $auth[$statut_auteur][] = $s;
 172                 }
 173         }
 174
 175         return $auth[$statut_auteur];
 176 }
 177
 178 /**
 179  * Traduire le statut technique de l'auteur en langage compréhensible
 180  *
 181  * Si $statut=='nouveau' et que le statut en attente est fourni,
 182  * le prendre en compte en affichant que l'auteur est en attente
 183  *
 184  * @param string $statut
 185  * @param string $attente
 186  * @return string
 187  */
 188 function traduire_statut_auteur($statut,$attente=""){
 189         $plus = "";
 190         if ($statut=='nouveau') {
 191                 if ($attente) {
 192                         $statut = $attente;
 193                         $plus = " ("._T('info_statut_auteur_a_confirmer').")";
 194                 }
 195                 else return _T('info_statut_auteur_a_confirmer');
 196         }
 197
 198         $recom = array("info_administrateurs" => _T('item_administrateur_2'),
 199                        "info_redacteurs" =>  _T('intem_redacteur'),
 200                        "info_visiteurs" => _T('item_visiteur'),
 201                        '5poubelle' => _T('texte_statut_poubelle'), // bouh
 202                        );
 203         if (isset($recom[$statut]))
 204                 return $recom[$statut].$plus;
 205
 206         // retrouver directement par le statut sinon
 207         if ($t = array_search($statut, $GLOBALS['liste_des_statuts'])){
 208           if (isset($recom[$t]))
 209                         return $recom[$t].$plus;
 210                 return _T($t).$plus;
 211         }
 212
 213         // si on a pas reussi a le traduire, retournons la chaine telle quelle
 214         // c'est toujours plus informatif que rien du tout
 215         return $statut;
 216 }
 217
 218 /**
 219  * Afficher la mention des autres auteurs ayant modifié un objet
 220  *
 221  * @param int $id_objet
 222  * @param string $objet
 223  * @return string
 224  */
 225 function afficher_qui_edite($id_objet,$objet){
 226         static $qui = array();
 227         if (isset($qui[$objet][$id_objet]))
 228                 return $qui[$objet][$id_objet];
 229
 230         if ($GLOBALS['meta']['articles_modif'] == 'non')
 231                 return $qui[$objet][$id_objet] = '';
 232
 233         include_spip('inc/drapeau_edition');
 234         $modif = mention_qui_edite($id_objet, $objet);
 235         if (!$modif) return $qui[$objet][$id_objet] = '';
 236
 237         include_spip('base/objets');
 238         $infos = lister_tables_objets_sql(table_objet_sql($objet));
 239         if (isset($infos['texte_signale_edition']))
 240                 return $qui[$objet][$id_objet] = _T($infos['texte_signale_edition'], $modif);
 241
 242         return $qui[$objet][$id_objet] = _T('info_qui_edite', $modif);
 243 }
 244
 245 /**
 246  * Lister les statuts des auteurs
 247  *
 248  * @param string $quoi
 249  *   redacteurs : retourne les statuts des auteurs au moins redacteur, tels que defini par AUTEURS_MIN_REDAC
 250  *   visiteurs : retourne les statuts des autres auteurs, cad les visiteurs et autres statuts perso
 251  *   tous : retourne tous les statuts connus
 252  * @param bool $en_base
 253  *   si true, ne retourne strictement que les status existants en base
 254  *   dans tous les cas, les statuts existants en base sont inclus
 255  * @return array
 256  */
 257 function auteurs_lister_statuts($quoi='tous',$en_base=true) {
 258         if (!defined('AUTEURS_MIN_REDAC')) define('AUTEURS_MIN_REDAC', "0minirezo,1comite,5poubelle");
 259
 260         switch($quoi){
 261                 case "redacteurs":
 262                         $statut = AUTEURS_MIN_REDAC;
 263                         $statut = explode(',',$statut);
 264                         if ($en_base) {
 265                                 $check = array_map('reset',sql_allfetsel('DISTINCT statut','spip_auteurs',sql_in('statut',$statut)));
 266                                 $retire = array_diff($statut,$check);
 267                                 $statut = array_diff($statut,$retire);
 268                         }
 269                         return array_unique($statut);
 270                         break;
 271                 case "visiteurs":
 272                         $statut = array();
 273                         $exclus = AUTEURS_MIN_REDAC;
 274                         $exclus = explode(',',$exclus);
 275                         if (!$en_base){
 276                                 // prendre aussi les statuts de la table des status qui ne sont pas dans le define
 277                                 $statut = array_diff(array_values($GLOBALS['liste_des_statuts']),$exclus);
 278                         }
 279                         $s_complement = array_map('reset',sql_allfetsel('DISTINCT statut','spip_auteurs',sql_in('statut',$exclus,'NOT')));
 280                         return array_unique(array_merge($statut,$s_complement));
 281                         break;
 282                 default:
 283                 case "tous":
 284                         $statut = array_values($GLOBALS['liste_des_statuts']);
 285                         $s_complement = array_map('reset',sql_allfetsel('DISTINCT statut','spip_auteurs',sql_in('statut',$statut,'NOT')));
 286                         $statut = array_merge($statut,$s_complement);
 287                         if ($en_base) {
 288                                 $check = array_map('reset',sql_allfetsel('DISTINCT statut','spip_auteurs',sql_in('statut',$statut)));
 289                                 $retire = array_diff($statut,$check);
 290                                 $statut = array_diff($statut,$retire);
 291                         }
 292                         return array_unique($statut);
 293                         break;
 294         }
 295
 296         // on arrive jamais ici
 297         return array_values($GLOBALS['liste_des_statuts']);
 298 }
 299
 300 /**
 301  * Déterminer la rubrique pour la création d'un objet heuristique
 302  *
 303  * Rubrique courante si possible,
 304  * - sinon rubrique administrée pour les admin restreint
 305  * - sinon première rubrique de premier niveau autorisée que l'on trouve
 306  *
 307  * @param int $id_rubrique Identifiant de rubrique (si connu)
 308  * @param string $objet    Objet en cours de création
 309  * @return int             Identifiant de la rubrique dans laquelle créer l'objet
 310  */
 311 function trouver_rubrique_creer_objet($id_rubrique,$objet){
 312         global $connect_id_rubrique;
 313         if (!$id_rubrique AND defined('_CHOIX_RUBRIQUE_PAR_DEFAUT') AND _CHOIX_RUBRIQUE_PAR_DEFAUT){
 314                 $in = !count($connect_id_rubrique)
 315                         ? ''
 316                         : (" AND ".sql_in('id_rubrique', $connect_id_rubrique));
 317
 318                 // on tente d'abord l'ecriture a la racine dans le cas des rubriques uniquement
 319                 if ($objet == 'rubrique') {
 320                         $id_rubrique = 0;
 321                 } else {
 322                         $id_rubrique = sql_getfetsel('id_rubrique', 'spip_rubriques', "id_parent=0$in", '', "id_rubrique DESC", 1);
 323                 }
 324
 325                 if (!autoriser("creer{$objet}dans", 'rubrique', $id_rubrique)){
 326                         // manque de chance, la rubrique n'est pas autorisee, on cherche un des secteurs autorises
 327                         $res = sql_select("id_rubrique", "spip_rubriques", "id_parent=0");
 328                         while (!autoriser("creer{$objet}dans", 'rubrique', $id_rubrique) && $row_rub = sql_fetch($res)){
 329                                 $id_rubrique = $row_rub['id_rubrique'];
 330                         }
 331                 }
 332         }
 333   return $id_rubrique;
 334 }
 335
 336 /**
 337  * Afficher le lien de redirection d'un article virtuel si il y a lieu
 338  * (rien si l'article n'est pas redirige)
 339  *
 340  * @param string $virtuel
 341  * @return string
 342  */
 343 function lien_article_virtuel($virtuel){
 344         include_spip('inc/lien');
 345   if (!$virtuel = virtuel_redirige($virtuel))
 346           return '';
 347   return propre("[->".$virtuel."]");
 348 }
 349
 350
 351 /**
 352  * Filtre pour generer un bouton RSS prive
 353  * protege par un hash de faible securite
 354  *
 355  * http://doc.spip.org/@bouton_spip_rss
 356  *
 357  * @param string $op
 358  * @param array $args
 359  * @param string $lang
 360  * @return string
 361  */
 362 function bouton_spip_rss($op, $args=array(), $lang='', $title='RSS') {
 363         include_spip('inc/acces');
 364         $clic = http_img_pack('feed.png', 'RSS', '', $title);
 365         $args = param_low_sec($op, $args, $lang, 'rss');
 366         $url = generer_url_public('rss', $args);
 367         return "<a style='float: ".$GLOBALS['spip_lang_right'].";' href='$url'>$clic</a>";
 368 }
 369
 370
 371 /**
 372  * Verifier la presence d'alertes pour les auteur
 373  *
 374  * http://doc.spip.org/@alertes_auteur
 375  *
 376  * @param int $id_auteur
 377  * @return string
 378  */
 379 function alertes_auteur($id_auteur) {
 380
 381         $alertes = array();
 382
 383         // si on n'est plus compatible avec php4 : le dire a tous ceux qui passent
 384         // dans l'espace prive
 385         if (version_compare(phpversion(), _PHP_MIN) == -1)
 386                 $alertes[] = _L('SPIP n&#233;cessite PHP&nbsp;@min@, votre version est @version@.', array('min'=> _PHP_MIN, 'version' => phpversion()));
 387
 388         if (isset($GLOBALS['meta']['message_crash_tables'])
 389         AND autoriser('detruire', null, null, $id_auteur)) {
 390                 include_spip('genie/maintenance');
 391                 if ($msg = message_crash_tables())
 392                         $alertes[] = $msg;
 393         }
 394
 395         if (isset($GLOBALS['meta']['message_crash_plugins'])
 396           AND $GLOBALS['meta']['message_crash_plugins']
 397           AND autoriser('configurer', '_plugins', null, $id_auteur)
 398           AND is_array($msg = unserialize($GLOBALS['meta']['message_crash_plugins']))) {
 399                         $msg = implode(', ',array_map('joli_repertoire',array_keys($msg)));
 400                         $alertes[] = _T('plugins_erreur', array('plugins' => $msg));
 401         }
 402
 403         $a = isset($GLOBALS['meta']['message_alertes_auteurs']) ? $GLOBALS['meta']['message_alertes_auteurs'] : '';
 404         if ($a
 405                 AND is_array($a = unserialize($a))
 406           AND count($a)){
 407                 $update = false;
 408                 if (isset($a[$GLOBALS['visiteur_session']['statut']])){
 409                         $alertes = array_merge($alertes,$a[$GLOBALS['visiteur_session']['statut']]);
 410                         unset($a[$GLOBALS['visiteur_session']['statut']]);
 411                         $update = true;
 412                 }
 413                 if (isset($a[''])){
 414                         $alertes = array_merge($alertes,$a['']);
 415                         unset($a['']);
 416                         $update = true;
 417                 }
 418                 if ($update)
 419                         ecrire_meta("message_alertes_auteurs",serialize($a));
 420         }
 421
 422         if (isset($GLOBALS['meta']['plugin_erreur_activation'])
 423           AND autoriser('configurer', '_plugins', null, $id_auteur)) {
 424                 include_spip('inc/plugin');
 425                 $alertes[] = plugin_donne_erreurs();
 426         }
 427
 428         $alertes = pipeline(
 429                 'alertes_auteur',
 430                         array(
 431                         'args' => array(
 432                                 'id_auteur' => $id_auteur,
 433                                 'exec' => _request('exec'),
 434                                 ),
 435                         'data' => $alertes
 436                         )
 437                 );
 438
 439         if ($alertes = array_filter($alertes))
 440                 return "<div class='wrap-messages-alertes'><div class='messages-alertes'>".
 441                         join(' | ', $alertes)
 442                         ."</div></div>";
 443 }
 444
 445 /**
 446  * Filtre pour afficher les rubriques enfants d'une rubrique
 447  * @param int $id_rubrique
 448  * @return string
 449  */
 450 function filtre_afficher_enfant_rub_dist($id_rubrique){
 451         include_spip('inc/presenter_enfants');
 452         return afficher_enfant_rub(intval($id_rubrique));
 453 }
 454
 455 /**
 456  * Afficher un petit "i" pour lien vers autre page
 457  *
 458  * @param string $lien
 459  *              URL du lien desire
 460  * @param string $titre
 461  *              Titre au survol de l'icone pointant le lien
 462  * @param string $titre_lien
 463  *              Si present, ajoutera en plus apres l'icone
 464  *              un lien simple, vers la meme URL,
 465  *              avec le titre indique
 466  *
 467  * @return string
 468  */
 469 function afficher_plus_info($lien, $titre="+", $titre_lien="") {
 470         $titre = attribut_html($titre);
 471         $icone = "\n<a href='$lien' title='$titre' class='plus_info'>" .
 472                 http_img_pack("information-16.png", $titre) ."</a>";
 473
 474         if (!$titre_lien) {
 475                 return $icone;
 476         } else {
 477                 return $icone .  "\n<a href='$lien'>$titre_lien</a>";
 478         }
 479 }
 480
 481 /**
 482  * Lister les id objet_source associés à l'objet id_objet
 483  * via la table de lien objet_lien
 484  *
 485  * Utilisé pour les listes de #FORMULAIRE_EDITER_LIENS
 486  *
 487  * @param string $objet_source
 488  * @param string $objet
 489  * @param int $id_objet
 490  * @param string $objet_lien
 491  * @return array
 492  */
 493 function lister_objets_lies($objet_source,$objet,$id_objet,$objet_lien){
 494         include_spip('action/editer_liens');
 495         $l = array();
 496         if ($objet_lien==$objet){
 497                 $res = objet_trouver_liens(array($objet=>$id_objet),array($objet_source=>'*'));
 498         }
 499         else{
 500                 $res = objet_trouver_liens(array($objet_source=>'*'),array($objet=>$id_objet));
 501         }
 502         while ($row = array_shift($res))
 503                 $l[] = $row[$objet_source];
 504
 505         return $l;
 506 }
 507 ?>