Changelog
[platal.git] / modules / auth.php
CommitLineData
5d292fd8 1<?php
2/***************************************************************************
3 * Copyright (C) 2003-2006 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
22class AuthModule extends PLModule
23{
24 function handlers()
25 {
26 return array(
87221416 27 'groupex/done-chall.php'
28 => $this->make_hook('chall', AUTH_PUBLIC),
29 'groupex/export-econfiance.php'
30 => $this->make_hook('econf', AUTH_PUBLIC),
d5749a28 31
87221416 32 'webservices/manageurs.php'
33 => $this->make_hook('manageurs', AUTH_PUBLIC),
34
35 'auth-redirect.php' => $this->make_hook('redirect', AUTH_COOKIE),
36 'auth-groupex.php' => $this->make_hook('groupex', AUTH_COOKIE),
5d292fd8 37 );
38 }
39
c9178c75 40 function handler_chall(&$page)
d5749a28 41 {
42 $_SESSION["chall"] = uniqid(rand(), 1);
43 echo $_SESSION["chall"] . "\n" . session_id();
44 exit;
45 }
46
c9178c75 47 function handler_econf(&$page)
d5749a28 48 {
49 global $globals;
50
d5749a28 51 require_once 'lists.inc.php';
52
53 $cle = $globals->core->econfiance;
54
cab08090 55 if (S::v('chall') && $_GET['PASS'] == md5(S::v('chall').$cle)) {
d5749a28 56
08cce2ff 57 $res = XDB::query("SELECT password FROM auth_user_md5 WHERE user_id=10154");
d5749a28 58 $pass = $res->fetchOneCell();
59
60 $client =& lists_xmlrpc(10154, $pass, "x-econfiance.polytechnique.org");
61 $members = $client->get_members('membres');
62 if (is_array($members)) {
63 $membres = Array();
64 foreach($members[1] as $member) {
65 if (preg_match('/^([^.]*.[^.]*.(\d\d\d\d))@polytechnique.org$/',
66 $member[1], $matches))
67 {
68 $membres[] = "a.alias='{$matches[1]}'";
69 }
70 }
71 }
72
73 $where = join(' OR ',$membres);
74
08cce2ff 75 $all = XDB::iterRow(
d5749a28 76 "SELECT u.prenom,u.nom,a.alias
77 FROM auth_user_md5 AS u
78 INNER JOIN aliases AS a ON ( u.user_id = a.id AND a.type!='homonyme' )
79 WHERE $where
80 ORDER BY nom");
81
82 $res = "<?xml version=\"1.0\" encoding=\"ISO-8859-1\"?>\n\n<membres>\n\n";
83
84 while (list ($prenom1,$nom1,$email1) = $all->next()) {
85 $res .= "<membre>\n";
86 $res .= "\t<nom>$nom1</nom>\n";
87 $res .= "\t<prenom>$prenom1</prenom>\n";
88 $res .= "\t<email>$email1</email>\n";
89 $res .= "</membre>\n\n";
90 }
91
92 $res .= "</membres>\n\n";
93
94 echo $res;
95 }
96 exit;
97 }
98
c9178c75 99 function handler_manageurs(&$page)
87221416 100 {
101 global $globals;
102
103 require_once 'webservices/manageurs.server.inc.php';
104
105 $ips = array_flip(explode(' ',$globals->manageurs->authorized_ips));
106 if ($ips && isset($ips[$_SERVER['REMOTE_ADDR']])) {
107 $server = xmlrpc_server_create();
108
109 xmlrpc_server_register_method($server, 'get_annuaire_infos', 'get_annuaire_infos');
110 xmlrpc_server_register_method($server, 'get_nouveau_infos', 'get_nouveau_infos');
111
112 $request = $GLOBALS['HTTP_RAW_POST_DATA'];
113 $response = xmlrpc_server_call_method($server, $request, null);
114 header('Content-Type: text/xml');
115 print $response;
116 xmlrpc_server_destroy($server);
117 }
118 }
119
5d292fd8 120 function handler_redirect(&$page)
121 {
5e2307dc 122 http_redirect(Env::v('dest', '/'));
5d292fd8 123 }
124
125 function handler_groupex(&$page)
126 {
352fb101 127 require_once dirname(__FILE__).'/auth/auth.inc.php';
5d292fd8 128
129 $gpex_pass = $_GET["pass"];
130 $gpex_url = urldecode($_GET["url"]);
131 if (strpos($gpex_url, '?') === false) {
132 $gpex_url .= "?PHPSESSID=" . $_GET["session"];
133 } else {
134 $gpex_url .= "&PHPSESSID=" . $_GET["session"];
135 }
136
137 /* a-t-on besoin d'ajouter le http:// ? */
138 if (!preg_match("/^(http|https):\/\/.*/",$gpex_url))
139 $gpex_url = "http://$gpex_url";
140 $gpex_challenge = $_GET["challenge"];
141
089a5801 142 // mise ŕ jour de l'heure et de la machine de dernier login sauf quand on est en suid
5d292fd8 143 if (!isset($_SESSION['suid'])) {
144 $logger = (isset($_SESSION['log']) && $_SESSION['log']->uid == $uid)
145 ? $_SESSION['log']
146 : new DiogenesCoreLogger($uid);
147 $logger->log('connexion_auth_ext', $_SERVER['PHP_SELF']);
148 }
149
150 /* on parcourt les entrees de groupes_auth */
08cce2ff 151 $res = XDB::iterRow('select privkey,name,datafields from groupesx_auth');
5d292fd8 152
153 while (list($privkey,$name,$datafields) = $res->next()) {
154 if (md5($gpex_challenge.$privkey) == $gpex_pass) {
155 $returl = $gpex_url.gpex_make_params($gpex_challenge,$privkey,$datafields);
8b00e0e0 156 http_redirect($returl);
5d292fd8 157 }
158 }
159
089a5801 160 /* si on n'a pas trouvé, on renvoit sur x.org */
8b00e0e0 161 http_redirect('https://www.polytechnique.org/');
5d292fd8 162 }
163}
164
165?>