c565857d7e96f5b3df018aaabb036bde37fd15da
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 XorgSession
extends PlSession
24 public function __construct()
26 parent
::__construct();
29 public function startAvailableAuth()
32 $cookie = $this->tryCookie();
34 return $this->start(AUTH_COOKIE
);
35 } else if ($cookie == 1 ||
$cookie == -2) {
39 if ((check_ip('dangerous') && S
::has('uid')) ||
check_account()) {
40 S
::logger()->log("view_page", $_SERVER['REQUEST_URI']);
45 /** Check the cookie and set the associated user_id in the auth_by_cookie session variable.
47 private function tryCookie()
49 S
::kill('auth_by_cookie');
50 if (Cookie
::v('access') == '' ||
!Cookie
::has('uid')) {
54 $res = XDB
::query('SELECT uid, password
56 WHERE uid = {?} AND state = \'active\'',
58 if ($res->numRows() != 0) {
59 list($uid, $password) = $res->fetchOneRow();
60 $expected_value = sha1($password);
61 if ($expected_value == Cookie
::v('access')) {
62 S
::set('auth_by_cookie', $uid);
71 private function checkPassword($uname, $login, $response, $login_type)
73 $res = XDB
::query('SELECT a.uid, a.password
75 INNER JOIN aliases AS l ON (l.id = a.uid AND l.type != \'homonyme\')
76 WHERE l.' . $login_type . ' = {?} AND a.state = \'active\'',
78 if (list($uid, $password) = $res->fetchOneRow()) {
79 $expected_response = sha1("$uname:$password:" . S
::v('challenge'));
80 /* XXX: Deprecates len(password) > 10 conversion */
81 if ($response != $expected_response) {
83 Platal
::page()->trigError('Mot de passe ou nom d\'utilisateur invalide');
85 Platal
::page()->trigError('Mot de passe invalide');
87 S
::logger($uid)->log('auth_fail', 'bad password');
98 protected function doAuth($level)
102 /* Cookie authentication
104 if ($level == AUTH_COOKIE
&& !S
::has('auth_by_cookie')) {
107 if ($level == AUTH_COOKIE
&& S
::has('auth_by_cookie')) {
109 S
::set('auth', AUTH_COOKIE
);
111 return User
::getSilentWithValues(null
, array('user_id' => S
::i('auth_by_cookie')));
115 /* We want to do auth... we must have infos from a form.
117 if (!Post
::has('username') ||
!Post
::has('response') ||
!S
::has('challenge')) {
121 /** We come from an authentication form.
124 $login = $uname = S
::suid('uid');
127 $uname = Env
::v('username');
128 if (Env
::v('domain') == "alias") {
129 $res = XDB
::query('SELECT redirect
131 INNER JOIN virtual_redirect USING(vid)
132 WHERE alias LIKE {?}',
133 $uname . '@' . $globals->mail
->alias_dom
);
134 $redirect = $res->fetchOneCell();
136 $login = substr($redirect, 0, strpos($redirect, '@'));
146 $uid = $this->checkPassword($uname, $login, Post
::v('response'), (!$redirect && is_numeric($uname)) ?
'id' : 'alias');
147 if (!is_null($uid) && S
::suid()) {
148 if (S
::suid('uid') == $uid) {
154 if (!is_null($uid)) {
155 S
::set('auth', AUTH_MDP
);
157 if (Post
::has('domain')) {
158 if (($domain = Post
::v('domain', 'login')) == 'alias') {
159 Cookie
::set('domain', 'alias', 300);
161 Cookie
::kill('domain');
165 S
::kill('challenge');
166 S
::logger($uid)->log('auth_ok');
168 return User
::getSilentWithValues(null
, array('user_id' => $uid));
171 protected function startSessionAs($user, $level)
173 if ((!is_null(S
::v('user')) && S
::v('user')->id() != $user->id())
174 ||
(S
::has('uid') && S
::i('uid') != $user->id())) {
176 } else if (S
::has('uid')) {
179 if ($level == AUTH_SUID
) {
180 S
::set('auth', AUTH_MDP
);
183 // Retrieves main user properties.
184 /** TODO: Move needed informations to account tables */
185 /** TODO: Currently suppressed data are matricule, promo */
186 /** TODO: Data to move are: banana_last, watch_last, last_version */
187 /** TODO: Use the User object to fetch all this */
188 $res = XDB
::query("SELECT a.uid, a.hruid, a.display_name, a.full_name, a.password,
189 a.sex = 'female' AS femme, a.email_format,
190 a.token, FIND_IN_SET('watch', a.flags) AS watch_account,
191 UNIX_TIMESTAMP(q.banana_last) AS banana_last, q.watch_last,
192 q.last_version, g.g_account_name IS NOT NULL AS googleapps,
193 UNIX_TIMESTAMP(s.start) AS lastlogin, s.host,
196 INNER JOIN account_types AS at ON(a.type = at.type)
197 INNER JOIN auth_user_quick AS q ON(a.uid = q.user_id)
198 LEFT JOIN gapps_accounts AS g ON(a.uid = g.l_userid AND g.g_status = 'active')
199 LEFT JOIN logger.last_sessions AS ls ON (ls.uid = a.uid)
200 LEFT JOIN logger.sessions AS s ON(s.id = ls.id)
201 WHERE a.uid = {?} AND a.state = 'active'", $user->id());
202 $sess = $res->fetchOneAssoc();
203 $perms = $sess['perms'];
204 unset($sess['perms']);
206 // Loads the data into the real session.
207 $_SESSION = array_merge($_SESSION, $sess);
209 // Starts the session's logger, and sets up the permanent cookie.
211 S
::logger()->log("suid_start", S
::v('hruid') . ' by ' . S
::suid('hruid'));
213 S
::logger()->saveLastSession();
214 Cookie
::set('uid', $user->id(), 300);
216 if (S
::i('auth_by_cookie') == $user->id() || Post
::v('remember', 'false') == 'true') {
217 $this->setAccessCookie(false
, S
::i('auth_by_cookie') != $user->id());
219 $this->killAccessCookie();
223 // Finalizes the session setup.
224 $this->makePerms($perms, S
::b('is_admin'));
225 $this->securityChecks();
227 $this->updateNbNotifs();
230 // We should not have to use this private data anymore
231 S
::kill('auth_by_cookie');
235 private function securityChecks()
237 $mail_subject = array();
238 if (check_account()) {
239 $mail_subject[] = 'Connexion d\'un utilisateur surveillé';
241 if (check_ip('unsafe')) {
242 $mail_subject[] = 'Une IP surveillee a tente de se connecter';
243 if (check_ip('ban')) {
244 send_warning_mail(implode(' - ', $mail_subject));
246 Platal
::page()->kill('Une erreur est survenue lors de la procédure d\'authentification. '
247 . 'Merci de contacter au plus vite '
248 . '<a href="mailto:support@polytechnique.org">support@polytechnique.org</a>');
252 if (count($mail_subject)) {
253 send_warning_mail(implode(' - ', $mail_subject));
257 public function tokenAuth($login, $token)
259 $res = XDB
::query('SELECT a.hruid
261 INNER JOIN accounts AS a ON (l.id = a.uid AND a.state = \'active\')
262 WHERE a.token = {?} AND l.alias = {?} AND l.type != \'homonyme\'',
264 if ($res->numRows() == 1) {
265 $data = $res->fetchOneAssoc();
266 return new User($data['hruid'], $data);
271 protected function makePerms($perm, $is_admin)
273 S
::set('perms', User
::makePerms($perm, $is_admin));
276 public function setSkin()
278 if (S
::logged() && (!S
::has('skin') || S
::suid())) {
280 $res = XDB
::query('SELECT skin_tpl
282 INNER JOIN skins AS s on (a.skin = s.id)
283 WHERE a.uid = {?} AND skin_tpl != \'\'', S
::i('uid'));
284 S
::set('skin', $res->fetchOneCell());
288 public function loggedLevel()
293 public function sureLevel()
299 public function updateNbNotifs()
301 require_once 'notifs.inc.php';
302 $n = select_notifs(false
, S
::i('uid'), S
::v('watch_last'), false
);
303 S
::set('notifs', $n->numRows());
306 public function setAccessCookie($replace = false
, $log = true
) {
307 if (S
::suid() ||
($replace && !Cookie
::blank('access'))) {
310 Cookie
::set('access', sha1(S
::v('password')), 300, true
);
312 S
::logger()->log('cookie_on');
316 public function killAccessCookie($log = true
) {
317 Cookie
::kill('access');
319 S
::logger()->log('cookie_off');
323 public function killLoginFormCookies() {
325 Cookie
::kill('domain');
329 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8: