<?php
+/**
+ * @file mod/openid.php
+ */
+use Friendica\App;
+use Friendica\Core\Config;
+use Friendica\Core\L10n;
+use Friendica\Core\System;
+use Friendica\Database\DBA;
-require_once('library/openid.php');
+function openid_content(App $a) {
-
-function openid_content(&$a) {
-
- $noid = get_config('system','no_openid');
+ $noid = Config::get('system','no_openid');
if($noid)
- goaway(z_root());
+ goaway(System::baseUrl());
+
+ logger('mod_openid ' . print_r($_REQUEST,true), LOGGER_DATA);
if((x($_GET,'openid_mode')) && (x($_SESSION,'openid'))) {
- $openid = new LightOpenID;
+
+ $openid = new LightOpenID($a->get_hostname());
if($openid->validate()) {
- if(x($_SESSION,'register')) {
- unset($_SESSION['register']);
- $args = '';
- $attr = $openid->getAttributes();
- if(is_array($attr) && count($attr)) {
- foreach($attr as $k => $v) {
- if($k === 'namePerson/friendly')
- $nick = notags(trim($v));
- if($k === 'namePerson/first')
- $first = notags(trim($v));
- if($k === 'namePerson')
- $args .= '&username=' . notags(trim($v));
- if($k === 'contact/email')
- $args .= '&email=' . notags(trim($v));
- if($k === 'media/image/aspect11')
- $photosq = bin2hex(trim($v));
- if($k === 'media/image/default')
- $photo = bin2hex(trim($v));
- }
- }
- if($nick)
- $args .= '&nickname=' . $nick;
- elseif($first)
- $args .= '&nickname=' . $first;
+ $authid = $_REQUEST['openid_identity'];
+
+ if(! strlen($authid)) {
+ logger(L10n::t('OpenID protocol error. No ID returned.') . EOL);
+ goaway(System::baseUrl());
+ }
- if($photosq)
- $args .= '&photo=' . $photosq;
- elseif($photo)
- $args .= '&photo=' . $photo;
+ // NOTE: we search both for normalised and non-normalised form of $authid
+ // because the normalization step was removed from setting
+ // mod/settings.php in 8367cad so it might have left mixed
+ // records in the user table
+ //
+ $r = q("SELECT *
+ FROM `user`
+ WHERE ( `openid` = '%s' OR `openid` = '%s' )
+ AND `blocked` = 0 AND `account_expired` = 0
+ AND `account_removed` = 0 AND `verified` = 1
+ LIMIT 1",
+ DBA::escape($authid), DBA::escape(normalise_openid($authid))
+ );
- $args .= '&openid_url=' . notags(trim($_SESSION['openid']));
- if($a->config['register_policy'] != REGISTER_CLOSED)
- goaway($a->get_baseurl() . '/register' . $args);
- else
- goaway(z_root());
+ if (DBA::isResult($r)) {
- // NOTREACHED
- }
+ // successful OpenID login
+ unset($_SESSION['openid']);
- $r = q("SELECT `user`.*, `user`.`pubkey` as `upubkey`, `user`.`prvkey` as `uprvkey`
- FROM `user` WHERE `openid` = '%s' AND `blocked` = 0 AND `account_expired` = 0 AND `verified` = 1 LIMIT 1",
- dbesc($_SESSION['openid'])
- );
- if(! count($r)) {
- notice( t('Login failed.') . EOL );
- goaway(z_root());
- }
- unset($_SESSION['openid']);
-
- $_SESSION['uid'] = $r[0]['uid'];
- $_SESSION['theme'] = $r[0]['theme'];
- $_SESSION['authenticated'] = 1;
- $_SESSION['page_flags'] = $r[0]['page-flags'];
- $_SESSION['my_url'] = $a->get_baseurl() . '/profile/' . $r[0]['nickname'];
-
- $a->user = $r[0];
-
- if($a->user['login_date'] === '0000-00-00 00:00:00') {
- $_SESSION['return_url'] = 'profile_photo/new';
- $a->module = 'profile_photo';
- info( t("Welcome ") . $a->user['username'] . EOL);
- info( t('Please upload a profile photo.') . EOL);
- }
- else
- info( t("Welcome back ") . $a->user['username'] . EOL);
+ require_once('include/security.php');
+ authenticate_success($r[0],true,true);
+ // just in case there was no return url set
+ // and we fell through
- if(strlen($a->user['timezone'])) {
- date_default_timezone_set($a->user['timezone']);
- $a->timezone = $a->user['timezone'];
+ goaway(System::baseUrl());
}
- $r = q("SELECT `uid`,`username` FROM `user` WHERE `password` = '%s' AND `email` = '%s'",
- dbesc($a->user['password']),
- dbesc($a->user['email'])
- );
- if(count($r))
- $a->identities = $r;
+ // Successful OpenID login - but we can't match it to an existing account.
+ // New registration?
- $r = q("SELECT * FROM `contact` WHERE `uid` = %d AND `self` = 1 LIMIT 1",
- intval($_SESSION['uid'])
- );
- if(count($r)) {
- $a->contact = $r[0];
- $a->cid = $r[0]['id'];
- $_SESSION['cid'] = $a->cid;
+ if (intval(Config::get('config', 'register_policy')) === REGISTER_CLOSED) {
+ notice(L10n::t('Account not found and OpenID registration is not permitted on this site.') . EOL);
+ goaway(System::baseUrl());
}
- $l = get_language();
+ unset($_SESSION['register']);
+ $args = '';
+ $attr = $openid->getAttributes();
+ if (is_array($attr) && count($attr)) {
+ foreach ($attr as $k => $v) {
+ if ($k === 'namePerson/friendly') {
+ $nick = notags(trim($v));
+ }
+ if($k === 'namePerson/first') {
+ $first = notags(trim($v));
+ }
+ if($k === 'namePerson') {
+ $args .= '&username=' . urlencode(notags(trim($v)));
+ }
+ if ($k === 'contact/email') {
+ $args .= '&email=' . urlencode(notags(trim($v)));
+ }
+ if ($k === 'media/image/aspect11') {
+ $photosq = bin2hex(trim($v));
+ }
+ if ($k === 'media/image/default') {
+ $photo = bin2hex(trim($v));
+ }
+ }
+ }
+ if ($nick) {
+ $args .= '&nickname=' . urlencode($nick);
+ }
+ elseif ($first) {
+ $args .= '&nickname=' . urlencode($first);
+ }
- q("UPDATE `user` SET `login_date` = '%s', `language` = '%s' WHERE `uid` = %d LIMIT 1",
- dbesc(datetime_convert()),
- dbesc($l),
- intval($_SESSION['uid'])
- );
+ if ($photosq) {
+ $args .= '&photo=' . urlencode($photosq);
+ }
+ elseif ($photo) {
+ $args .= '&photo=' . urlencode($photo);
+ }
+
+ $args .= '&openid_url=' . urlencode(notags(trim($authid)));
+ goaway(System::baseUrl() . '/register?' . $args);
- header('X-Account-Management-Status: active; name="' . $a->user['username'] . '"; id="' . $a->user['nickname'] .'"');
- if(($a->module !== 'home') && isset($_SESSION['return_url']))
- goaway($a->get_baseurl() . '/' . $_SESSION['return_url']);
- else
- goaway(z_root());
+ // NOTREACHED
}
}
- notice( t('Login failed.') . EOL);
- goaway(z_root());
+ notice(L10n::t('Login failed.') . EOL);
+ goaway(System::baseUrl());
// NOTREACHED
}