3 * Laconica - a distributed open-source microblogging tool
4 * Copyright (C) 2008, Controlez-Vous, Inc.
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.
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.
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/>.
20 if (!defined('LACONICA')) { exit(1); }
22 require_once(INSTALLDIR.'/lib/openid.php');
24 class FinishopenidloginAction extends Action
30 function handle($args)
32 parent::handle($args);
33 if (common_logged_in()) {
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.'));
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'));
47 $this->createNewUser();
48 } else if ($this->arg('connect')) {
51 common_debug(print_r($this->args, true), __FILE__);
52 $this->showForm(_('Something weird happened.'),
53 $this->trimmed('newname'));
60 function showPageNotice()
63 $this->element('div', array('class' => 'error'), $this->error);
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']));
73 return _('OpenID Account Setup');
76 function showForm($error=null, $username=null)
78 $this->error = $error;
79 $this->username = $username;
84 function showContent()
86 if ($this->message_text) {
87 $this->element('p', null, $this->message);
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',
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');
125 $consumer = oid_consumer();
127 $response = $consumer->complete(common_local_url('finishopenidlogin'));
129 if ($response->status == Auth_OpenID_CANCEL) {
130 $this->message(_('OpenID authentication cancelled.'));
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
139 $display = $response->getDisplayIdentifier();
140 $canonical = ($response->endpoint->canonicalID) ?
141 $response->endpoint->canonicalID : $response->getDisplayIdentifier();
143 $sreg_resp = Auth_OpenID_SRegResponse::fromSuccessResponse($response);
146 $sreg = $sreg_resp->contents();
149 $user = oid_get_user($canonical);
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);
161 unset($_SESSION['openid_rememberme']);
162 $this->goHome($user->nickname);
164 $this->saveValues($display, $canonical, $sreg);
165 $this->showForm(null, $this->bestNewNickname($display, $sreg));
170 function message($msg)
172 $this->message_text = $msg;
176 function saveValues($display, $canonical, $sreg)
178 common_ensure_session();
179 $_SESSION['openid_display'] = $display;
180 $_SESSION['openid_canonical'] = $canonical;
181 $_SESSION['openid_sreg'] = $sreg;
184 function getSavedValues()
186 return array($_SESSION['openid_display'],
187 $_SESSION['openid_canonical'],
188 $_SESSION['openid_sreg']);
191 function createNewUser()
193 # FIXME: save invite code before redirect, and check here
195 if (common_config('site', 'closed') || common_config('site', 'inviteonly')) {
196 $this->clientError(_('Registration not allowed.'));
200 $nickname = $this->trimmed('newname');
202 if (!Validate::string($nickname, array('min_length' => 1,
204 'format' => VALIDATE_NUM . VALIDATE_ALPHA_LOWER))) {
205 $this->showForm(_('Nickname must have only lowercase letters and numbers and no spaces.'));
209 if (!User::allowed_nickname($nickname)) {
210 $this->showForm(_('Nickname not allowed.'));
214 if (User::staticGet('nickname', $nickname)) {
215 $this->showForm(_('Nickname already in use. Try another one.'));
219 list($display, $canonical, $sreg) = $this->getSavedValues();
221 if (!$display || !$canonical) {
222 $this->serverError(_('Stored OpenID not found.'));
226 # Possible race condition... let's be paranoid
228 $other = oid_get_user($canonical);
231 $this->serverError(_('Creating new account for OpenID that already has a user.'));
235 if ($sreg['country']) {
236 if ($sreg['postcode']) {
237 # XXX: use postcode to get city and region
238 # XXX: also, store postcode somewhere -- it's valuable!
239 $location = $sreg['postcode'] . ', ' . $sreg['country'];
241 $location = $sreg['country'];
245 if ($sreg['fullname'] && strlen($sreg['fullname']) <= 255) {
246 $fullname = $sreg['fullname'];
249 if ($sreg['email'] && Validate::email($sreg['email'], true)) {
250 $email = $sreg['email'];
256 $user = User::register(array('nickname' => $nickname,
258 'fullname' => $fullname,
259 'location' => $location));
261 $result = oid_link_user($user->id, $canonical, $display);
263 oid_set_last($display);
264 common_set_user($user);
265 common_real_login(true);
266 if (isset($_SESSION['openid_rememberme']) && $_SESSION['openid_rememberme']) {
267 common_rememberme($user);
269 unset($_SESSION['openid_rememberme']);
270 common_redirect(common_local_url('showstream', array('nickname' => $user->nickname)));
273 function connectUser()
275 $nickname = $this->trimmed('nickname');
276 $password = $this->trimmed('password');
278 if (!common_check_user($nickname, $password)) {
279 $this->showForm(_('Invalid username or password.'));
285 $user = User::staticGet('nickname', $nickname);
287 list($display, $canonical, $sreg) = $this->getSavedValues();
289 if (!$display || !$canonical) {
290 $this->serverError(_('Stored OpenID not found.'));
294 $result = oid_link_user($user->id, $canonical, $display);
297 $this->serverError(_('Error connecting user to OpenID.'));
301 oid_update_user($user, $sreg);
302 oid_set_last($display);
303 common_set_user($user);
304 common_real_login(true);
305 if (isset($_SESSION['openid_rememberme']) && $_SESSION['openid_rememberme']) {
306 common_rememberme($user);
308 unset($_SESSION['openid_rememberme']);
309 $this->goHome($user->nickname);
312 function goHome($nickname)
314 $url = common_get_returnto();
316 # We don't have to return to it again
317 common_set_returnto(null);
319 $url = common_local_url('all',
323 common_redirect($url);
326 function bestNewNickname($display, $sreg)
329 # Try the passed-in nickname
331 if ($sreg['nickname']) {
332 $nickname = $this->nicknamize($sreg['nickname']);
333 if ($this->isNewNickname($nickname)) {
340 if ($sreg['fullname']) {
341 $fullname = $this->nicknamize($sreg['fullname']);
342 if ($this->isNewNickname($fullname)) {
349 $from_url = $this->openidToNickname($display);
351 if ($from_url && $this->isNewNickname($from_url)) {
360 function isNewNickname($str)
362 if (!Validate::string($str, array('min_length' => 1,
364 'format' => VALIDATE_NUM . VALIDATE_ALPHA_LOWER))) {
367 if (!User::allowed_nickname($str)) {
370 if (User::staticGet('nickname', $str)) {
376 function openidToNickname($openid)
378 if (Auth_Yadis_identifierScheme($openid) == 'XRI') {
379 return $this->xriToNickname($openid);
381 return $this->urlToNickname($openid);
385 # We try to use an OpenID URL as a legal Laconica user name in this order
386 # 1. Plain hostname, like http://evanp.myopenid.com/
387 # 2. One element in path, like http://profile.typekey.com/EvanProdromou/
388 # or http://getopenid.com/evanprodromou
390 function urlToNickname($openid)
392 static $bad = array('query', 'user', 'password', 'port', 'fragment');
394 $parts = parse_url($openid);
396 # If any of these parts exist, this won't work
398 foreach ($bad as $badpart) {
399 if (array_key_exists($badpart, $parts)) {
404 # We just have host and/or path
406 # If it's just a host...
407 if (array_key_exists('host', $parts) &&
408 (!array_key_exists('path', $parts) || strcmp($parts['path'], '/') == 0))
410 $hostparts = explode('.', $parts['host']);
412 # Try to catch common idiom of nickname.service.tld
414 if ((count($hostparts) > 2) &&
415 (strlen($hostparts[count($hostparts) - 2]) > 3) && # try to skip .co.uk, .com.au
416 (strcmp($hostparts[0], 'www') != 0))
418 return $this->nicknamize($hostparts[0]);
420 # Do the whole hostname
421 return $this->nicknamize($parts['host']);
424 if (array_key_exists('path', $parts)) {
425 # Strip starting, ending slashes
426 $path = preg_replace('@/$@', '', $parts['path']);
427 $path = preg_replace('@^/@', '', $path);
428 if (strpos($path, '/') === false) {
429 return $this->nicknamize($path);
437 function xriToNickname($xri)
439 $base = $this->xriBase($xri);
445 # or @gratis*evan.prodromou
446 $parts = explode('*', substr($base, 1));
447 return $this->nicknamize(array_pop($parts));
451 function xriBase($xri)
453 if (substr($xri, 0, 6) == 'xri://') {
454 return substr($xri, 6);
460 # Given a string, try to make it work as a nickname
462 function nicknamize($str)
464 $str = preg_replace('/\W/', '', $str);
465 return strtolower($str);