include/xnet/session.inc.php

   1 <?php
   2 /***************************************************************************
   3  *  Copyright (C) 2003-2008 Polytechnique.org                              *
   4  *  http://opensource.polytechnique.org/                                   *
   5  *                                                                         *
   6  *  This program is free software; you can redistribute it and/or modify   *
   7  *  it under the terms of the GNU General Public License as published by   *
   8  *  the Free Software Foundation; either version 2 of the License, or      *
   9  *  (at your option) any later version.                                    *
  10  *                                                                         *
  11  *  This program is distributed in the hope that it will be useful,        *
  12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of         *
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the          *
  14  *  GNU General Public License for more details.                           *
  15  *                                                                         *
  16  *  You should have received a copy of the GNU General Public License      *
  17  *  along with this program; if not, write to the Free Software            *
  18  *  Foundation, Inc.,                                                      *
  19  *  59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                *
  20  ***************************************************************************/
  21
  22 class XnetSession
  23 {
  24     // {{{ function init
  25
  26     public static function init()
  27     {
  28         global $globals;
  29
  30         S::init();
  31
  32         if (!S::logged()) {
  33             // prevent connexion to be linked to deconnexion
  34             if (($i = strpos($_SERVER['REQUEST_URI'], 'exit')) !== false)
  35                 $returl = "http://{$_SERVER['SERVER_NAME']}".substr($_SERVER['REQUEST_URI'], 0, $i);
  36             else
  37                 $returl = "http://{$_SERVER['SERVER_NAME']}{$_SERVER['REQUEST_URI']}";
  38             $url  = "https://www.polytechnique.org/auth-groupex";
  39             $url .= "?session=" . session_id();
  40             $url .= "&challenge=" . S::v('challenge');
  41             $url .= "&pass=" . md5(S::v('challenge') . $globals->xnet->secret);
  42             $url .= "&url=".urlencode($returl);
  43             $_SESSION['loginX'] = $url;
  44         }
  45
  46         if (S::logged() && $globals->asso()) {
  47             $perms = S::v('perms');
  48             $perms->rmFlag('groupadmin');
  49             $perms->rmFlag('groupmember');
  50             $perms->rmFlag('groupannu');
  51             if (may_update()) {
  52                 $perms->addFlag('groupadmin');
  53                 $perms->addFlag('groupmember');
  54                 $perms->addFlag('groupannu');
  55             }
  56             if (is_member()) {
  57                 $perms->addFlag('groupmember');
  58                 if ($globals->asso('pub') != 'private') {
  59                     $perms->addFlag('groupannu');
  60                 }
  61             }
  62             if ($globals->asso('cat') == 'Promotions') {
  63                 $perms->addFlag('groupannu');
  64             }
  65             $_SESSION['perms'] = $perms;
  66         }
  67     }
  68
  69     // }}}
  70     // {{{ public static function destroy()
  71
  72     public static function destroy() {
  73         S::destroy();
  74         XnetSession::init();
  75     }
  76
  77     // }}}
  78     // {{{ public static function doAuth()
  79
  80     /** Try to do an authentication.
  81      *
  82      * @param page the calling page (by reference)
  83      */
  84     public static function doAuth()
  85     {
  86         if (S::identified()) { // ok, c'est bon, on n'a rien à faire
  87                 return true;
  88         }
  89
  90         if (Get::has('auth')) {
  91             return XnetSession::doAuthX();
  92         }
  93
  94         return false;
  95     }
  96
  97     // }}}
  98     // {{{ doAuthCookie
  99
 100     public static function doAuthCookie() {
 101         return XnetSession::doAuth();
 102     }
 103
 104     // }}}
 105     // {{{ doAuthX
 106
 107     public static function doAuthX()
 108     {
 109         global $globals, $page;
 110
 111         // Checks the SSO control token value.
 112         if (md5('1'.S::v('challenge').$globals->xnet->secret.Get::i('uid').'1') != Get::v('auth')) {
 113             Get::kill('auth');
 114             if (!$page) {
 115                 require_once 'xnet.inc.php';
 116                 new_skinned_page('platal/index.tpl');
 117             }
 118             $page->kill("Erreur d'authentification avec polytechnique.org !");
 119         }
 120
 121         // Fetches user's data.
 122         $res  = XDB::query("
 123             SELECT  u.user_id AS uid, prenom, nom, perms, promo, password, FIND_IN_SET('femme', u.flags) AS femme,
 124                     u.hruid, CONCAT(a.alias, '@{$globals->mail->domain}') AS forlife, CONCAT(a2.alias, '@{$globals->mail->domain}') AS bestalias,
 125                     q.core_mail_fmt AS mail_fmt, q.core_rss_hash
 126               FROM  auth_user_md5   AS u
 127         INNER JOIN  auth_user_quick AS q  USING(user_id)
 128         INNER JOIN  aliases         AS a  ON (u.user_id = a.id AND a.type = 'a_vie')
 129         INNER JOIN  aliases         AS a2 ON (u.user_id = a2.id AND FIND_IN_SET('bestalias', a2.flags))
 130              WHERE  u.user_id = {?} AND u.perms IN('admin','user')
 131              LIMIT  1", Get::i('uid'));
 132
 133         // Sets up the session, using fetched data and Xorg's permission system.
 134         $_SESSION = array_merge($_SESSION, $res->fetchOneAssoc());
 135         $_SESSION['auth'] = AUTH_MDP;
 136         require_once 'xorg/session.inc.php';
 137         $_SESSION['perms'] =& XorgSession::make_perms(S::v('perms'));
 138
 139         // Removes session values which are of no interest in Xnet context.
 140         S::kill('challenge');
 141         S::kill('loginX');
 142         S::kill('may_update');
 143         S::kill('is_member');
 144
 145         // Builds the Xnet destination URL, and redirects the user.
 146         Get::kill('auth');
 147         Get::kill('uid');
 148         $path = Get::v('n');
 149         Get::kill('n');
 150         Get::kill('PHPSESSID');
 151
 152         $args = array();
 153         foreach($_GET as $key => $val) {
 154             $args[] = urlencode($key).'='.urlencode($val);
 155         }
 156
 157         http_redirect($globals->baseurl . '/' . $path, join('&', $args));
 158     }
 159
 160     // }}}
 161     // {{{ doSelfSuid
 162
 163     public static function doSelfSuid()
 164     {
 165         if (!S::has('suid')) {
 166             $_SESSION['suid'] = $_SESSION;
 167         }
 168         require_once 'xorg/session.inc.php';
 169         $_SESSION['perms'] =& XorgSession::make_perms('user');
 170     }
 171
 172     // }}}
 173     // {{{ killSuid
 174
 175     public static function killSuid()
 176     {
 177         if (!S::has('suid')) {
 178             return;
 179         }
 180         $suid = S::v('suid');
 181         S::kill('suid');
 182         S::kill('may_update');
 183         S::kill('is_member');
 184         $_SESSION['perms'] = $suid['perms'];
 185     }
 186
 187     // }}}
 188 }
 189
 190 // }}}
 191 // {{{ function may_update
 192
 193 /** Return administration rights for the current asso
 194  * @param force Force administration rights to be read from database
 195  * @param lose  Force administration rights to be false
 196  */
 197 function may_update($force = false, $lose = false)
 198 {
 199     if (!isset($_SESSION['may_update'])) {
 200         $_SESSION['may_update'] = array();
 201     }
 202     $may_update =& $_SESSION['may_update'];
 203
 204     global $globals;
 205     $asso_id = $globals->asso('id');
 206     if (!$asso_id) {
 207         return false;
 208     } elseif ($lose) {
 209         $may_update[$asso_id] = false;
 210     } elseif (S::has_perms() || (S::has('suid') && $force)) {
 211         $may_update[$asso_id] = true;
 212     } elseif (!isset($may_update[$asso_id]) || $force) {
 213         $res = XDB::query("SELECT  perms
 214                              FROM  groupex.membres
 215                             WHERE  uid={?} AND asso_id={?}",
 216                           S::v('uid'), $asso_id);
 217         $may_update[$asso_id] = ($res->fetchOneCell() == 'admin');
 218     }
 219     return $may_update[$asso_id];
 220 }
 221
 222 // }}}
 223 // {{{ function is_member
 224
 225 /** Get membership informations for the current asso
 226  * @param force Force membership to be read from database
 227  * @param lose  Force membership to be false
 228  */
 229 function is_member($force = false, $lose = false)
 230 {
 231     if (!isset($_SESSION['is_member'])) {
 232         $_SESSION['is_member'] = array();
 233     }
 234     $is_member =& $_SESSION['is_member'];
 235
 236     global $globals;
 237     $asso_id = $globals->asso('id');
 238     if (!$asso_id) {
 239         return false;
 240     } elseif ($lose) {
 241         $is_member[$asso_id] = false;
 242     } elseif (S::has('suid') && $force) {
 243         $is_member[$asso_id] = true;
 244     } elseif (!isset($is_member[$asso_id]) || $force) {
 245         $res = XDB::query("SELECT  COUNT(*)
 246                              FROM  groupex.membres
 247                             WHERE  uid={?} AND asso_id={?}",
 248                 S::v('uid'), $asso_id);
 249         $is_member[$asso_id] = ($res->fetchOneCell() == 1);
 250     }
 251     return $is_member[$asso_id];
 252 }
 253
 254 // }}}
 255 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
 256 ?>