| 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 XorgSession extends PlSession |
| 23 | { |
| 24 | public function __construct() |
| 25 | { |
| 26 | parent::__construct(); |
| 27 | } |
| 28 | |
| 29 | public function startAvailableAuth() |
| 30 | { |
| 31 | if (!S::logged()) { |
| 32 | $cookie = $this->tryCookie(); |
| 33 | if ($cookie == 0) { |
| 34 | return $this->start(AUTH_COOKIE); |
| 35 | } else if ($cookie == 1 || $cookie == -2) { |
| 36 | return false; |
| 37 | } |
| 38 | } |
| 39 | if ((check_ip('dangerous') && S::has('uid')) || check_account()) { |
| 40 | $_SESSION['log']->log("view_page", $_SERVER['REQUEST_URI']); |
| 41 | } |
| 42 | return true; |
| 43 | } |
| 44 | |
| 45 | /** Check the cookie and set the associated user_id in the auth_by_cookie session variable. |
| 46 | */ |
| 47 | private function tryCookie() |
| 48 | { |
| 49 | S::kill('auth_by_cookie'); |
| 50 | if (Cookie::v('ORGaccess') == '' || !Cookie::has('ORGuid')) { |
| 51 | return -1; |
| 52 | } |
| 53 | |
| 54 | $res = XDB::query('SELECT user_id, password |
| 55 | FROM auth_user_md5 |
| 56 | WHERE user_id = {?} AND perms IN(\'admin\', \'user\')', |
| 57 | Cookie::i('ORGuid')); |
| 58 | if ($res->numRows() != 0) { |
| 59 | list($uid, $password) = $res->fetchOneRow(); |
| 60 | require_once 'secure_hash.inc.php'; |
| 61 | $expected_value = hash_encrypt($password); |
| 62 | if ($expected_value == Cookie::v('ORGaccess')) { |
| 63 | S::set('auth_by_cookie', $uid); |
| 64 | return 0; |
| 65 | } else { |
| 66 | return 1; |
| 67 | } |
| 68 | } |
| 69 | return -2; |
| 70 | } |
| 71 | |
| 72 | private function checkPassword($uname, $login, $response, $login_type) |
| 73 | { |
| 74 | $res = XDB::query('SELECT u.user_id, u.password |
| 75 | FROM auth_user_md5 AS u |
| 76 | INNER JOIN aliases AS a ON (a.id = u.user_id AND type != \'homonyme\') |
| 77 | WHERE a.' . $login_type . ' = {?} AND u.perms IN(\'admin\', \'user\')', |
| 78 | $login); |
| 79 | if (list($uid, $password) = $res->fetchOneRow()) { |
| 80 | require_once 'secure_hash.inc.php'; |
| 81 | $expected_response = hash_encrypt("$uname:$password:" . S::v('challenge')); |
| 82 | if ($response != $expected_response) { |
| 83 | $new_password = hash_xor(Env::v('xorpass'), $password); |
| 84 | $expected_response = hash_encrypt("$uname:$new_password:" . S::v('challenge')); |
| 85 | if ($response == $expected_response) { |
| 86 | XDB::execute('UPDATE auth_user_md5 |
| 87 | SET password = {?} |
| 88 | WHERE user_id = {?}', |
| 89 | $new_password, $uid); |
| 90 | } |
| 91 | } |
| 92 | if ($response != $expected_response) { |
| 93 | S::logger($uid)->log('auth_fail', 'bad password'); |
| 94 | return null; |
| 95 | } |
| 96 | return $uid; |
| 97 | } |
| 98 | return null; |
| 99 | } |
| 100 | |
| 101 | |
| 102 | /** Check auth. |
| 103 | */ |
| 104 | protected function doAuth($level) |
| 105 | { |
| 106 | global $globals; |
| 107 | |
| 108 | /* Cookie authentication |
| 109 | */ |
| 110 | if ($level == AUTH_COOKIE && !S::has('auth_by_cookie')) { |
| 111 | $this->tryCookie(); |
| 112 | } |
| 113 | if ($level == AUTH_COOKIE && S::has('auth_by_cookie')) { |
| 114 | if (!S::logged()) { |
| 115 | S::set('auth', AUTH_COOKIE); |
| 116 | } |
| 117 | return S::i('auth_by_cookie'); |
| 118 | } |
| 119 | |
| 120 | |
| 121 | /* We want to do auth... we must have infos from a form. |
| 122 | */ |
| 123 | if (!Post::has('username') || !Post::has('response') || !S::has('challenge')) { |
| 124 | return null; |
| 125 | } |
| 126 | |
| 127 | /** We come from an authentication form. |
| 128 | */ |
| 129 | if (S::has('suid')) { |
| 130 | $suid = S::v('suid'); |
| 131 | $login = $uname = $suid['forlife']; |
| 132 | $redirect = false; |
| 133 | } else { |
| 134 | $uname = Env::v('username'); |
| 135 | |
| 136 | if (Env::v('domain') == "alias") { |
| 137 | $res = XDB::query('SELECT redirect |
| 138 | FROM virtual |
| 139 | INNER JOIN virtual_redirect USING(vid) |
| 140 | WHERE alias LIKE {?}', |
| 141 | $uname . '@' . $globals->mail->alias_dom); |
| 142 | $redirect = $res->fetchOneCell(); |
| 143 | if ($redirect) { |
| 144 | $login = substr($redirect, 0, strpos($redirect, '@')); |
| 145 | } else { |
| 146 | $login = ''; |
| 147 | } |
| 148 | } else { |
| 149 | $login = $uname; |
| 150 | $redirect = false; |
| 151 | } |
| 152 | } |
| 153 | |
| 154 | $uid = $this->checkPassword($uname, $login, Post::v('response'), (!$redirect && preg_match('/^\d*$/', $uname)) ? 'id' : 'alias'); |
| 155 | if (!is_null($uid)) { |
| 156 | S::set('auth', AUTH_MDP); |
| 157 | if (Post::has('domain')) { |
| 158 | if (($domain = Post::v('domain', 'login')) == 'alias') { |
| 159 | setcookie('ORGdomain', "alias", (time() + 25920000), '/', '', 0); |
| 160 | } else { |
| 161 | setcookie('ORGdomain', '', (time() - 3600), '/', '', 0); |
| 162 | } |
| 163 | // pour que la modification soit effective dans le reste de la page |
| 164 | $_COOKIE['ORGdomain'] = $domain; |
| 165 | } |
| 166 | S::kill('challenge'); |
| 167 | S::logger($uid)->log('auth_ok'); |
| 168 | } |
| 169 | return $uid; |
| 170 | } |
| 171 | |
| 172 | protected function startSessionAs($uid, $level) |
| 173 | { |
| 174 | if ((!is_null(S::v('user')) && S::i('user') != $uid) || (S::has('uid') && S::i('uid') != $uid)) { |
| 175 | return false; |
| 176 | } else if (S::has('uid')) { |
| 177 | return true; |
| 178 | } |
| 179 | if ($level == -1) { |
| 180 | S::set('auth', AUTH_COOKIE); |
| 181 | } |
| 182 | unset($_SESSION['log']); |
| 183 | |
| 184 | // Retrieves main user properties. |
| 185 | global $globals; |
| 186 | $res = XDB::query("SELECT u.user_id AS uid, u.hruid, prenom, prenom_ini, nom, nom_ini, nom_usage, perms, promo, promo_sortie, |
| 187 | matricule, password, FIND_IN_SET('femme', u.flags) AS femme, |
| 188 | CONCAT(a.alias, '@{$globals->mail->domain}') AS forlife, |
| 189 | CONCAT(a2.alias, '@{$globals->mail->domain}') AS bestalias, |
| 190 | q.core_mail_fmt AS mail_fmt, UNIX_TIMESTAMP(q.banana_last) AS banana_last, q.watch_last, q.core_rss_hash, |
| 191 | FIND_IN_SET('watch', u.flags) AS watch_account, q.last_version, g.g_account_name IS NOT NULL AS googleapps |
| 192 | FROM auth_user_md5 AS u |
| 193 | INNER JOIN auth_user_quick AS q USING(user_id) |
| 194 | INNER JOIN aliases AS a ON (u.user_id = a.id AND a.type = 'a_vie') |
| 195 | INNER JOIN aliases AS a2 ON (u.user_id = a2.id AND FIND_IN_SET('bestalias', a2.flags)) |
| 196 | LEFT JOIN gapps_accounts AS g ON (u.user_id = g.l_userid AND g.g_status = 'active') |
| 197 | WHERE u.user_id = {?} AND u.perms IN('admin', 'user')", $uid); |
| 198 | $sess = $res->fetchOneAssoc(); |
| 199 | $perms = $sess['perms']; |
| 200 | unset($sess['perms']); |
| 201 | |
| 202 | // Retrieves account usage information (last login, last host). |
| 203 | $res = XDB::query('SELECT UNIX_TIMESTAMP(s.start) AS lastlogin, s.host |
| 204 | FROM logger.sessions AS s |
| 205 | WHERE s.uid = {?} AND s.suid = 0 |
| 206 | ORDER BY s.start DESC |
| 207 | LIMIT 1', $uid); |
| 208 | if ($res->numRows()) { |
| 209 | $sess = array_merge($sess, $res->fetchOneAssoc()); |
| 210 | } |
| 211 | |
| 212 | // Loads the data into the real session. |
| 213 | $_SESSION = array_merge($_SESSION, $sess); |
| 214 | |
| 215 | // Starts the session's logger, and sets up the permanent cookie. |
| 216 | if (S::has('suid')) { |
| 217 | $suid = S::v('suid'); |
| 218 | $logger = S::logger($uid); |
| 219 | $logger->log("suid_start", S::v('hruid') . " by " . $suid['hruid']); |
| 220 | } else { |
| 221 | $logger = S::logger($uid); |
| 222 | setcookie('ORGuid', $uid, (time() + 25920000), '/', '', 0); |
| 223 | |
| 224 | if (S::i('auth_by_cookie') == $uid || Post::v('remember', 'false') == 'true') { |
| 225 | $cookie = hash_encrypt($sess['password']); |
| 226 | setcookie('ORGaccess', $cookie, (time() + 25920000), '/', '', 0); |
| 227 | if ($logger && S::i('auth_by_cookie') != $uid) { |
| 228 | $logger->log("cookie_on"); |
| 229 | } |
| 230 | } else { |
| 231 | setcookie('ORGaccess', '', time() - 3600, '/', '', 0); |
| 232 | if ($logger) { |
| 233 | $logger->log("cookie_off"); |
| 234 | } |
| 235 | } |
| 236 | } |
| 237 | |
| 238 | // Finalizes the session setup. |
| 239 | S::set('perms', User::makePerms($perms)); |
| 240 | $this->securityChecks(); |
| 241 | $this->setSkin(); |
| 242 | $this->updateNbNotifs(); |
| 243 | check_redirect(); |
| 244 | |
| 245 | // We should not have to use this private data anymore |
| 246 | S::kill('auth_by_cookie'); |
| 247 | return true; |
| 248 | } |
| 249 | |
| 250 | private function securityChecks() |
| 251 | { |
| 252 | $mail_subject = array(); |
| 253 | if (check_account()) { |
| 254 | $mail_subject[] = 'Connexion d\'un utilisateur surveillé'; |
| 255 | } |
| 256 | if (check_ip('unsafe')) { |
| 257 | $mail_subject[] = 'Une IP surveillee a tente de se connecter'; |
| 258 | if (check_ip('ban')) { |
| 259 | send_warning_mail(implode(' - ', $mail_subject)); |
| 260 | $this->destroy(); |
| 261 | Platal::page()->kill('Une erreur est survenue lors de la procédure d\'authentification. ' |
| 262 | . 'Merci de contacter au plus vite ' |
| 263 | . '<a href="mailto:support@polytechnique.org">support@polytechnique.org</a>'); |
| 264 | return false; |
| 265 | } |
| 266 | } |
| 267 | if (count($mail_subject)) { |
| 268 | send_warning_mail(implode(' - ', $mail_subject)); |
| 269 | } |
| 270 | } |
| 271 | |
| 272 | public function tokenAuth($login, $token) |
| 273 | { |
| 274 | $res = XDB::query('SELECT u.hruid |
| 275 | FROM aliases AS a |
| 276 | INNER JOIN auth_user_md5 AS u ON (a.id = u.user_id AND u.perms IN ("admin", "user")) |
| 277 | INNER JOIN auth_user_quick AS q ON (a.id = q.user_id AND q.core_rss_hash = {?}) |
| 278 | WHERE a.alias = {?} AND a.type != "homonyme"', $token, $login); |
| 279 | if ($res->numRows() == 1) { |
| 280 | $data = $res->fetchOneAssoc(); |
| 281 | return new User($data['hruid'], $data); |
| 282 | } |
| 283 | return null; |
| 284 | } |
| 285 | |
| 286 | public function makePerms($perm) |
| 287 | { |
| 288 | $flags = new PlFlagSet(); |
| 289 | if ($perm == 'disabled' || $perm == 'ext') { |
| 290 | S::set('perms', $flags); |
| 291 | return; |
| 292 | } |
| 293 | $flags->addFlag(PERMS_USER); |
| 294 | if ($perm == 'admin') { |
| 295 | $flags->addFlag(PERMS_ADMIN); |
| 296 | } |
| 297 | S::set('perms', $flags); |
| 298 | } |
| 299 | |
| 300 | public function setSkin() |
| 301 | { |
| 302 | global $globals; |
| 303 | if (S::logged() && (!S::has('skin') || S::has('suid'))) { |
| 304 | $uid = S::v('uid'); |
| 305 | $res = XDB::query("SELECT skin_tpl |
| 306 | FROM auth_user_quick AS a |
| 307 | INNER JOIN skins AS s ON a.skin = s.id |
| 308 | WHERE user_id = {?} AND skin_tpl != ''", $uid); |
| 309 | S::set('skin', $res->fetchOneCell()); |
| 310 | } |
| 311 | } |
| 312 | |
| 313 | public function loggedLevel() |
| 314 | { |
| 315 | return AUTH_COOKIE; |
| 316 | } |
| 317 | |
| 318 | public function sureLevel() |
| 319 | { |
| 320 | return AUTH_MDP; |
| 321 | } |
| 322 | |
| 323 | |
| 324 | public function updateNbNotifs() |
| 325 | { |
| 326 | require_once 'notifs.inc.php'; |
| 327 | $n = select_notifs(false, S::i('uid'), S::v('watch_last'), false); |
| 328 | S::set('notifs', $n->numRows()); |
| 329 | } |
| 330 | } |
| 331 | |
| 332 | // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8: |
| 333 | ?> |