]> git.mxchange.org Git - quix0rs-gnu-social.git/blob - actions/finishopenidlogin.php
you can _so_ leave a group if you're its admin
[quix0rs-gnu-social.git] / actions / finishopenidlogin.php
1 <?php
2 /*
3  * Laconica - a distributed open-source microblogging tool
4  * Copyright (C) 2008, Controlez-Vous, Inc.
5  *
6  * This program is free software: you can redistribute it and/or modify
7  * it under the terms of the GNU Affero General Public License as published by
8  * the Free Software Foundation, either version 3 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 Affero General Public License for more details.
15  *
16  * You should have received a copy of the GNU Affero General Public License
17  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
18  */
19
20 if (!defined('LACONICA')) { exit(1); }
21
22 require_once(INSTALLDIR.'/lib/openid.php');
23
24 class FinishopenidloginAction extends Action
25 {
26     var $error = null;
27     var $username = null;
28     var $message = null;
29
30     function handle($args)
31     {
32         parent::handle($args);
33         if (common_is_real_login()) {
34             $this->clientError(_('Already logged in.'));
35         } else if ($_SERVER['REQUEST_METHOD'] == 'POST') {
36             $token = $this->trimmed('token');
37             if (!$token || $token != common_session_token()) {
38                 $this->showForm(_('There was a problem with your session token. Try again, please.'));
39                 return;
40             }
41             if ($this->arg('create')) {
42                 if (!$this->boolean('license')) {
43                     $this->showForm(_('You can\'t register if you don\'t agree to the license.'),
44                                     $this->trimmed('newname'));
45                     return;
46                 }
47                 $this->createNewUser();
48             } else if ($this->arg('connect')) {
49                 $this->connectUser();
50             } else {
51                 common_debug(print_r($this->args, true), __FILE__);
52                 $this->showForm(_('Something weird happened.'),
53                                 $this->trimmed('newname'));
54             }
55         } else {
56             $this->tryLogin();
57         }
58     }
59
60     function showPageNotice()
61     {
62         if ($this->error) {
63             $this->element('div', array('class' => 'error'), $this->error);
64         } else {
65             global $config;
66             $this->element('div', 'instructions',
67                            sprintf(_('This is the first time you\'ve logged into %s so we must connect your OpenID to a local account. You can either create a new account, or connect with your existing account, if you have one.'), $config['site']['name']));
68         }
69     }
70
71     function title()
72     {
73         return _('OpenID Account Setup');
74     }
75
76     function showForm($error=null, $username=null)
77     {
78         $this->error = $error;
79         $this->username = $username;
80
81         $this->showPage();
82     }
83
84     function showContent()
85     {
86         if (!empty($this->message_text)) {
87             $this->element('p', null, $this->message);
88             return;
89         }
90
91         $this->elementStart('form', array('method' => 'post',
92                                           'id' => 'account_connect',
93                                           'action' => common_local_url('finishopenidlogin')));
94         $this->hidden('token', common_session_token());
95         $this->element('h2', null,
96                        _('Create new account'));
97         $this->element('p', null,
98                        _('Create a new user with this nickname.'));
99         $this->input('newname', _('New nickname'),
100                      ($this->username) ? $this->username : '',
101                      _('1-64 lowercase letters or numbers, no punctuation or spaces'));
102         $this->elementStart('p');
103         $this->element('input', array('type' => 'checkbox',
104                                       'id' => 'license',
105                                       'name' => 'license',
106                                       'value' => 'true'));
107         $this->text(_('My text and files are available under '));
108         $this->element('a', array('href' => common_config('license', 'url')),
109                        common_config('license', 'title'));
110         $this->text(_(' except this private data: password, email address, IM address, phone number.'));
111         $this->elementEnd('p');
112         $this->submit('create', _('Create'));
113         $this->element('h2', null,
114                        _('Connect existing account'));
115         $this->element('p', null,
116                        _('If you already have an account, login with your username and password to connect it to your OpenID.'));
117         $this->input('nickname', _('Existing nickname'));
118         $this->password('password', _('Password'));
119         $this->submit('connect', _('Connect'));
120         $this->elementEnd('form');
121     }
122
123     function tryLogin()
124     {
125         $consumer = oid_consumer();
126
127         $response = $consumer->complete(common_local_url('finishopenidlogin'));
128
129         if ($response->status == Auth_OpenID_CANCEL) {
130             $this->message(_('OpenID authentication cancelled.'));
131             return;
132         } else if ($response->status == Auth_OpenID_FAILURE) {
133             // Authentication failed; display the error message.
134             $this->message(sprintf(_('OpenID authentication failed: %s'), $response->message));
135         } else if ($response->status == Auth_OpenID_SUCCESS) {
136             // This means the authentication succeeded; extract the
137             // identity URL and Simple Registration data (if it was
138             // returned).
139             $display = $response->getDisplayIdentifier();
140             $canonical = ($response->endpoint->canonicalID) ?
141               $response->endpoint->canonicalID : $response->getDisplayIdentifier();
142
143             $sreg_resp = Auth_OpenID_SRegResponse::fromSuccessResponse($response);
144
145             if ($sreg_resp) {
146                 $sreg = $sreg_resp->contents();
147             }
148
149             $user = oid_get_user($canonical);
150
151             if ($user) {
152                 oid_set_last($display);
153                 # XXX: commented out at @edd's request until better
154                 # control over how data flows from OpenID provider.
155                 # oid_update_user($user, $sreg);
156                 common_set_user($user);
157                 common_real_login(true);
158                 if (isset($_SESSION['openid_rememberme']) && $_SESSION['openid_rememberme']) {
159                     common_rememberme($user);
160                 }
161                 unset($_SESSION['openid_rememberme']);
162                 $this->goHome($user->nickname);
163             } else {
164                 $this->saveValues($display, $canonical, $sreg);
165                 $this->showForm(null, $this->bestNewNickname($display, $sreg));
166             }
167         }
168     }
169
170     function message($msg)
171     {
172         $this->message_text = $msg;
173         $this->showPage();
174     }
175
176     function saveValues($display, $canonical, $sreg)
177     {
178         common_ensure_session();
179         $_SESSION['openid_display'] = $display;
180         $_SESSION['openid_canonical'] = $canonical;
181         $_SESSION['openid_sreg'] = $sreg;
182     }
183
184     function getSavedValues()
185     {
186         return array($_SESSION['openid_display'],
187                      $_SESSION['openid_canonical'],
188                      $_SESSION['openid_sreg']);
189     }
190
191     function createNewUser()
192     {
193         # FIXME: save invite code before redirect, and check here
194
195         if (common_config('site', 'closed') || common_config('site', 'inviteonly')) {
196             $this->clientError(_('Registration not allowed.'));
197             return;
198         }
199
200         $nickname = $this->trimmed('newname');
201
202         if (!Validate::string($nickname, array('min_length' => 1,
203                                                'max_length' => 64,
204                                                'format' => VALIDATE_NUM . VALIDATE_ALPHA_LOWER))) {
205             $this->showForm(_('Nickname must have only lowercase letters and numbers and no spaces.'));
206             return;
207         }
208
209         if (!User::allowed_nickname($nickname)) {
210             $this->showForm(_('Nickname not allowed.'));
211             return;
212         }
213
214         if (User::staticGet('nickname', $nickname)) {
215             $this->showForm(_('Nickname already in use. Try another one.'));
216             return;
217         }
218
219         list($display, $canonical, $sreg) = $this->getSavedValues();
220
221         if (!$display || !$canonical) {
222             $this->serverError(_('Stored OpenID not found.'));
223             return;
224         }
225
226         # Possible race condition... let's be paranoid
227
228         $other = oid_get_user($canonical);
229
230         if ($other) {
231             $this->serverError(_('Creating new account for OpenID that already has a user.'));
232             return;
233         }
234
235         $location = '';
236         if (!empty($sreg['country'])) {
237             if ($sreg['postcode']) {
238                 # XXX: use postcode to get city and region
239                 # XXX: also, store postcode somewhere -- it's valuable!
240                 $location = $sreg['postcode'] . ', ' . $sreg['country'];
241             } else {
242                 $location = $sreg['country'];
243             }
244         }
245
246         if (!empty($sreg['fullname']) && mb_strlen($sreg['fullname']) <= 255) {
247             $fullname = $sreg['fullname'];
248         } else {
249             $fullname = '';
250         }
251
252         if (!empty($sreg['email']) && Validate::email($sreg['email'], true)) {
253             $email = $sreg['email'];
254         } else {
255             $email = '';
256         }
257
258         # XXX: add language
259         # XXX: add timezone
260
261         $user = User::register(array('nickname' => $nickname,
262                                      'email' => $email,
263                                      'fullname' => $fullname,
264                                      'location' => $location));
265
266         $result = oid_link_user($user->id, $canonical, $display);
267
268         oid_set_last($display);
269         common_set_user($user);
270         common_real_login(true);
271         if (isset($_SESSION['openid_rememberme']) && $_SESSION['openid_rememberme']) {
272             common_rememberme($user);
273         }
274         unset($_SESSION['openid_rememberme']);
275         common_redirect(common_local_url('showstream', array('nickname' => $user->nickname)));
276     }
277
278     function connectUser()
279     {
280         $nickname = $this->trimmed('nickname');
281         $password = $this->trimmed('password');
282
283         if (!common_check_user($nickname, $password)) {
284             $this->showForm(_('Invalid username or password.'));
285             return;
286         }
287
288         # They're legit!
289
290         $user = User::staticGet('nickname', $nickname);
291
292         list($display, $canonical, $sreg) = $this->getSavedValues();
293
294         if (!$display || !$canonical) {
295             $this->serverError(_('Stored OpenID not found.'));
296             return;
297         }
298
299         $result = oid_link_user($user->id, $canonical, $display);
300
301         if (!$result) {
302             $this->serverError(_('Error connecting user to OpenID.'));
303             return;
304         }
305
306         oid_update_user($user, $sreg);
307         oid_set_last($display);
308         common_set_user($user);
309         common_real_login(true);
310         if (isset($_SESSION['openid_rememberme']) && $_SESSION['openid_rememberme']) {
311             common_rememberme($user);
312         }
313         unset($_SESSION['openid_rememberme']);
314         $this->goHome($user->nickname);
315     }
316
317     function goHome($nickname)
318     {
319         $url = common_get_returnto();
320         if ($url) {
321             # We don't have to return to it again
322             common_set_returnto(null);
323         } else {
324             $url = common_local_url('all',
325                                     array('nickname' =>
326                                           $nickname));
327         }
328         common_redirect($url);
329     }
330
331     function bestNewNickname($display, $sreg)
332     {
333
334         # Try the passed-in nickname
335
336         if (!empty($sreg['nickname'])) {
337             $nickname = $this->nicknamize($sreg['nickname']);
338             if ($this->isNewNickname($nickname)) {
339                 return $nickname;
340             }
341         }
342
343         # Try the full name
344
345         if (!empty($sreg['fullname'])) {
346             $fullname = $this->nicknamize($sreg['fullname']);
347             if ($this->isNewNickname($fullname)) {
348                 return $fullname;
349             }
350         }
351
352         # Try the URL
353
354         $from_url = $this->openidToNickname($display);
355
356         if ($from_url && $this->isNewNickname($from_url)) {
357             return $from_url;
358         }
359
360         # XXX: others?
361
362         return null;
363     }
364
365     function isNewNickname($str)
366     {
367         if (!Validate::string($str, array('min_length' => 1,
368                                           'max_length' => 64,
369                                           'format' => VALIDATE_NUM . VALIDATE_ALPHA_LOWER))) {
370             return false;
371         }
372         if (!User::allowed_nickname($str)) {
373             return false;
374         }
375         if (User::staticGet('nickname', $str)) {
376             return false;
377         }
378         return true;
379     }
380
381     function openidToNickname($openid)
382     {
383         if (Auth_Yadis_identifierScheme($openid) == 'XRI') {
384             return $this->xriToNickname($openid);
385         } else {
386             return $this->urlToNickname($openid);
387         }
388     }
389
390     # We try to use an OpenID URL as a legal Laconica user name in this order
391     # 1. Plain hostname, like http://evanp.myopenid.com/
392     # 2. One element in path, like http://profile.typekey.com/EvanProdromou/
393     #    or http://getopenid.com/evanprodromou
394
395     function urlToNickname($openid)
396     {
397         static $bad = array('query', 'user', 'password', 'port', 'fragment');
398
399         $parts = parse_url($openid);
400
401         # If any of these parts exist, this won't work
402
403         foreach ($bad as $badpart) {
404             if (array_key_exists($badpart, $parts)) {
405                 return null;
406             }
407         }
408
409         # We just have host and/or path
410
411         # If it's just a host...
412         if (array_key_exists('host', $parts) &&
413             (!array_key_exists('path', $parts) || strcmp($parts['path'], '/') == 0))
414         {
415             $hostparts = explode('.', $parts['host']);
416
417             # Try to catch common idiom of nickname.service.tld
418
419             if ((count($hostparts) > 2) &&
420                 (strlen($hostparts[count($hostparts) - 2]) > 3) && # try to skip .co.uk, .com.au
421                 (strcmp($hostparts[0], 'www') != 0))
422             {
423                 return $this->nicknamize($hostparts[0]);
424             } else {
425                 # Do the whole hostname
426                 return $this->nicknamize($parts['host']);
427             }
428         } else {
429             if (array_key_exists('path', $parts)) {
430                 # Strip starting, ending slashes
431                 $path = preg_replace('@/$@', '', $parts['path']);
432                 $path = preg_replace('@^/@', '', $path);
433                 if (strpos($path, '/') === false) {
434                     return $this->nicknamize($path);
435                 }
436             }
437         }
438
439         return null;
440     }
441
442     function xriToNickname($xri)
443     {
444         $base = $this->xriBase($xri);
445
446         if (!$base) {
447             return null;
448         } else {
449             # =evan.prodromou
450             # or @gratis*evan.prodromou
451             $parts = explode('*', substr($base, 1));
452             return $this->nicknamize(array_pop($parts));
453         }
454     }
455
456     function xriBase($xri)
457     {
458         if (substr($xri, 0, 6) == 'xri://') {
459             return substr($xri, 6);
460         } else {
461             return $xri;
462         }
463     }
464
465     # Given a string, try to make it work as a nickname
466
467     function nicknamize($str)
468     {
469         $str = preg_replace('/\W/', '', $str);
470         return strtolower($str);
471     }
472 }