ecrire/balise/login_public.php

   1 <?php
   2
   3 /***************************************************************************\
   4  *  SPIP, Systeme de publication pour l'internet                           *
   5  *                                                                         *
   6  *  Copyright (c) 2001-2007                                                *
   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;    #securite
  14
  15 include_spip('base/abstract_sql');
  16 spip_connect();
  17
  18 // http://doc.spip.org/@balise_LOGIN_PUBLIC
  19 function balise_LOGIN_PUBLIC ($p, $nom='LOGIN_PUBLIC') {
  20         return calculer_balise_dynamique($p, $nom, array('url'));
  21 }
  22
  23 # retourner:
  24 # 1. l'url collectee ci-dessus (args0) ou donnee en filtre (filtre0)
  25 # 2. l'eventuel parametre de la balise (args1) fournie par
  26 #    calculer_balise_dynamique, en l'occurence le #LOGIN courant si l'on
  27 #    programme une <boucle(AUTEURS)>[(#LOGIN_PUBLIC{#LOGIN})]
  28
  29 // http://doc.spip.org/@balise_LOGIN_PUBLIC_stat
  30 function balise_LOGIN_PUBLIC_stat ($args, $filtres) {
  31         return array($filtres[0] ? $filtres[0] : $args[0], $args[1], $args[2]);
  32 }
  33
  34 // http://doc.spip.org/@balise_LOGIN_PUBLIC_dyn
  35 function balise_LOGIN_PUBLIC_dyn($url, $login) {
  36
  37         if (!$url               # pas d'url passee en filtre ou dans le contexte
  38         AND !$url = _request('url') # ni d'url passee par l'utilisateur
  39         ){
  40                 $url = str_replace('&amp;', '&', self());
  41         }
  42         return login_explicite($login, $url, true);
  43 }
  44
  45 // cette fonction est commune a la balise #LOGIN_PUBLIC et #LOGIN_PRIVE
  46 // elle doit accepter les visiteurs dans le premier cas, mais pas dans le second
  47 // http://doc.spip.org/@login_explicite
  48 function login_explicite($login, $cible, $accepter_visiteurs = false) {
  49         global $auteur_session;
  50
  51         // passer $action dans parametre_url pour avoir une chance que $cible == $action
  52         // et pas faire de boulce infinie de redirection
  53         $action = parametre_url(str_replace('&amp;', '&', self()),'var_dummy','','&');
  54         if ($cible) {
  55                 $cible = parametre_url($cible, 'var_erreur', '', '&');
  56                 $cible = parametre_url($cible, 'var_login', '', '&');
  57         } else {
  58                 if (ereg("[?&]url=([^&]*)", $action, $m))
  59                         $cible = rawurldecode($m[1]);
  60                 else
  61                         $cible = _DIR_RESTREINT ;
  62         }
  63
  64         verifier_visiteur();
  65
  66         // Si on est connecte, envoyer vers la destination
  67         // sauf si on y est deja
  68         if ($auteur_session AND
  69         ($auteur_session['statut']=='0minirezo'
  70         OR $auteur_session['statut']=='1comite'
  71         OR ($accepter_visiteurs && ($auteur_session['statut']=='6forum')))) {
  72                 $auth = charger_fonction('auth','inc');
  73                 $auth = $auth();
  74                 if (($auth==="")
  75                   OR ($accepter_visiteurs && ($auth=='6forum'))) {
  76                         if ($cible != $action) {
  77                                 if (!headers_sent() AND !$_GET['var_mode']) {
  78                                         include_spip('inc/headers');
  79                                         redirige_par_entete($cible);
  80                                 } else {
  81                                         include_spip('inc/minipres');
  82                                         return http_href($cible, _T('login_par_ici'));
  83                                 }
  84                         } else
  85                                 return ''; # on est arrive on bon endroit, et logue'...
  86                 }
  87         }
  88
  89         return login_pour_tous($login ? $login : _request('var_login'), $cible, $action);
  90 }
  91
  92 // http://doc.spip.org/@login_pour_tous
  93 function login_pour_tous($login, $cible, $action) {
  94         global $ignore_auth_http, $_SERVER, $_COOKIE;
  95
  96         // en cas d'echec de cookie, inc_auth a renvoye vers le script de
  97         // pose de cookie ; s'il n'est pas la, c'est echec cookie
  98         // s'il est la, c'est probablement un bookmark sur bonjour=oui,
  99         // et pas un echec cookie.
 100         if (_request('var_echec_cookie'))
 101                 $echec_cookie = ($_COOKIE['spip_session'] != 'test_echec_cookie');
 102         else $echec_cookie = '';
 103
 104         // hack grossier pour changer le message en cas d'echec d'un visiteur(6forum) sur ecrire/
 105         $echec_visiteur = _request('var_echec_visiteur')?' ':'';
 106
 107
 108         $pose_cookie = generer_url_public('spip_cookie');
 109         $auth_http = '';
 110         if ($echec_cookie AND !$ignore_auth_http) {
 111                 if (($GLOBALS['flag_sapi_name']
 112                      AND eregi("apache", @php_sapi_name()))
 113                 OR ereg("^Apache.* PHP", $_SERVER['SERVER_SOFTWARE']))
 114                         $auth_http = $pose_cookie;
 115         }
 116         // Attention dans le cas 'intranet' la proposition de se loger
 117         // par auth_http peut conduire a l'echec.
 118         if (isset($_SERVER['PHP_AUTH_USER']) AND isset($_SERVER['PHP_AUTH_PW']))
 119                 $auth_http = '';
 120
 121         // Le login est memorise dans le cookie d'admin eventuel
 122         if (!$login) {
 123                 if (ereg("^@(.*)$", $_COOKIE['spip_admin'], $regs))
 124                         $login = $regs[1];
 125         } else if ($login == '-1')
 126                 $login = '';
 127
 128         $erreur = '';
 129         if ($login) {
 130                 $row =  spip_abstract_fetsel('*', 'spip_auteurs', "login=" . _q($login));
 131                 // Retrouver ceux qui signent de leur nom ou email
 132                 if (!$row AND !$GLOBALS['ldap_present']) {
 133                         $row = spip_abstract_fetsel('*', 'spip_auteurs', "(nom = " . _q($login) . " OR email = " . _q($login) . ") AND login<>'' AND statut<>'5poubelle'");
 134                         if ($row) {
 135                                 $login_alt = $login; # afficher ce qu'on a tape
 136                                 $login = $row['login'];
 137                         }
 138                 }
 139
 140                 if ((!$row AND !$GLOBALS['ldap_present']) OR
 141                         ($row['statut'] == '5poubelle') OR
 142                         (($row['source'] == 'spip') AND $row['pass'] == '')) {
 143                         $erreur =  _T('login_identifiant_inconnu',
 144                                 array('login' => htmlspecialchars($login)));
 145                         $row = array();
 146                         $login = '';
 147                         include_spip('inc/cookie');
 148                         spip_setcookie("spip_admin", "", time() - 3600);
 149                 } else {
 150                         // on laisse le menu decider de la langue
 151                         unset($row['lang']);
 152                 }
 153         }
 154         if (!$row)
 155                 $row = array();
 156         // afficher "erreur de mot de passe" si &var_erreur=pass
 157         if (_request('var_erreur') == 'pass')
 158                 $erreur = _T('login_erreur_pass');
 159
 160         // Appeler le squelette formulaire_login
 161         return array('formulaires/login', $GLOBALS['delais'],
 162                 array_merge(
 163                                 array_map('texte_script', $row),
 164                                 array(
 165                                         'action2' => ($login ? $pose_cookie: $action),
 166                                         'erreur' => $erreur,
 167                                         'action' => $action,
 168                                         'url' => $cible,
 169                                         'auth_http' => $auth_http,
 170                                         'echec_cookie' => ($echec_cookie ? ' ' : ''),
 171                                         'echec_visiteur' => $echec_visiteur,
 172                                         'login' => $login,
 173                                         'login_alt' => (isset($login_alt) ? $login_alt : $login),
 174                                         'self' => str_replace('&amp;', '&', self())
 175                                         )
 176                                 )
 177                         );
 178
 179 }
 180
 181 // Bouton duree de connexion
 182
 183 // http://doc.spip.org/@filtre_rester_connecte
 184 function filtre_rester_connecte($prefs) {
 185         $prefs = unserialize(stripslashes($prefs));
 186         return $prefs['cnx'] == 'perma' ? ' ' : '';
 187 }
 188
 189 ?>