2 /***************************************************************************
3 * Copyright (C) 2003-2008 Polytechnique.org *
4 * http://opensource.polytechnique.org/ *
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. *
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. *
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 *
19 * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA *
20 ***************************************************************************/
22 class XnetSession
extends XorgSession
24 public function __construct()
26 parent
::__construct();
29 public function startAvailableAuth()
31 if (!S
::logged() && Get
::has('auth')) {
32 if (!$this->start(AUTH_MDP
)) {
39 // prevent connection to be linked to disconnection
40 if (($i = strpos($_SERVER['REQUEST_URI'], 'exit')) !== false
)
41 $returl = "http://{$_SERVER['SERVER_NAME']}".substr($_SERVER['REQUEST_URI'], 0, $i);
43 $returl = "http://{$_SERVER['SERVER_NAME']}{$_SERVER['REQUEST_URI']}";
44 $url = "https://www.polytechnique.org/auth-groupex";
45 $url .= "?session=" . session_id();
46 $url .= "&challenge=" . S
::v('challenge');
47 $url .= "&pass=" . md5(S
::v('challenge') . $globals->xnet
->secret
);
48 $url .= "&url=".urlencode($returl);
49 S
::set('loginX', $url);
52 if (S
::logged() && $globals->asso()) {
53 $perms = S
::v('perms');
54 $perms->rmFlag('groupadmin');
55 $perms->rmFlag('groupmember');
56 $perms->rmFlag('groupannu');
58 $perms->addFlag('groupadmin');
59 $perms->addFlag('groupmember');
60 $perms->addFlag('groupannu');
63 $perms->addFlag('groupmember');
64 if ($globals->asso('pub') != 'private') {
65 $perms->addFlag('groupannu');
68 if ($globals->asso('cat') == 'Promotions') {
69 $perms->addFlag('groupannu');
71 S
::set('perms', $perms);
76 protected function doAuth($level)
78 if (S
::identified()) { // ok, c'est bon, on n'a rien à faire
81 if (!Get
::has('auth')) {
85 if (md5('1' . S
::v('challenge') . $globals->xnet
->secret
. Get
::i('uid') . '1') != Get
::v('auth')) {
89 S
::set('auth', AUTH_MDP
);
93 protected function startSessionAs($user, $level)
96 S
::set('auth', AUTH_MDP
);
98 $res = XDB
::query("SELECT u.user_id AS uid, u.hruid, prenom, nom, perms, promo, password, FIND_IN_SET('femme', u.flags) AS femme,
99 q.core_mail_fmt AS mail_fmt, q.core_rss_hash
100 FROM auth_user_md5 AS u
101 INNER JOIN auth_user_quick AS q USING(user_id)
102 WHERE u.user_id = {?} AND u.perms IN('admin', 'user')
104 $sess = $res->fetchOneAssoc();
105 $perms = $sess['perms'];
106 unset($sess['perms']);
107 $_SESSION = array_merge($_SESSION, $sess);
108 S
::set('perms', User
::makePerms($perms));
109 S
::kill('challenge');
111 S
::kill('may_update');
112 S
::kill('is_member');
114 Get
::kill('PHPSESSID');
117 foreach($_GET as $key => $val) {
118 $args[] = urlencode($key). '=' .urlencode($val);
123 public function doSelfSuid()
125 if (!$this->startSUID(S
::i('uid'))) {
128 S
::set('perms', User
::makePerms('user'));
132 public function stopSUID()
134 $suid = S
::v('suid');
135 if (!parent
::stopSUID()) {
139 S
::kill('may_update');
140 S
::kill('is_member');
141 S
::set('perms', $suid['perms']);
146 // {{{ function may_update
148 /** Return administration rights for the current asso
149 * @param force Force administration rights to be read from database
150 * @param lose Force administration rights to be false
152 function may_update($force = false
, $lose = false
)
154 if (!isset($_SESSION['may_update'])) {
155 $_SESSION['may_update'] = array();
157 $may_update =& $_SESSION['may_update'];
160 $asso_id = $globals->asso('id');
164 $may_update[$asso_id] = false
;
165 } elseif (S
::has_perms() ||
(S
::has('suid') && $force)) {
166 $may_update[$asso_id] = true
;
167 } elseif (!isset($may_update[$asso_id]) ||
$force) {
168 $res = XDB
::query("SELECT perms
170 WHERE uid={?} AND asso_id={?}",
171 S
::v('uid'), $asso_id);
172 $may_update[$asso_id] = ($res->fetchOneCell() == 'admin');
174 return $may_update[$asso_id];
178 // {{{ function is_member
180 /** Get membership informations for the current asso
181 * @param force Force membership to be read from database
182 * @param lose Force membership to be false
184 function is_member($force = false
, $lose = false
)
186 if (!isset($_SESSION['is_member'])) {
187 $_SESSION['is_member'] = array();
189 $is_member =& $_SESSION['is_member'];
192 $asso_id = $globals->asso('id');
196 $is_member[$asso_id] = false
;
197 } elseif (S
::has('suid') && $force) {
198 $is_member[$asso_id] = true
;
199 } elseif (!isset($is_member[$asso_id]) ||
$force) {
200 $res = XDB
::query("SELECT COUNT(*)
202 WHERE uid={?} AND asso_id={?}",
203 S
::v('uid'), $asso_id);
204 $is_member[$asso_id] = ($res->fetchOneCell() == 1);
206 return $is_member[$asso_id];
210 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8: