2008-06-17 15:49:42 +01:00
|
|
|
<?php
|
|
|
|
/*
|
|
|
|
* Laconica - a distributed open-source microblogging tool
|
|
|
|
* Copyright (C) 2008, Controlez-Vous, Inc.
|
|
|
|
*
|
|
|
|
* This program is free software: you can redistribute it and/or modify
|
|
|
|
* it under the terms of the GNU Affero General Public License as published by
|
|
|
|
* the Free Software Foundation, either version 3 of the License, or
|
|
|
|
* (at your option) any later version.
|
|
|
|
*
|
|
|
|
* This program is distributed in the hope that it will be useful,
|
|
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
* GNU Affero General Public License for more details.
|
|
|
|
*
|
|
|
|
* You should have received a copy of the GNU Affero General Public License
|
|
|
|
* along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
*/
|
|
|
|
|
|
|
|
if (!defined('LACONICA')) { exit(1); }
|
|
|
|
|
2008-06-18 06:48:47 +01:00
|
|
|
require_once(INSTALLDIR.'/classes/User_openid.php');
|
|
|
|
|
2008-06-17 16:12:49 +01:00
|
|
|
require_once('Auth/OpenID.php');
|
2008-06-17 15:49:42 +01:00
|
|
|
require_once('Auth/OpenID/Consumer.php');
|
2008-06-17 16:12:49 +01:00
|
|
|
require_once('Auth/OpenID/SReg.php');
|
2008-06-17 15:49:42 +01:00
|
|
|
require_once('Auth/OpenID/MySQLStore.php');
|
|
|
|
|
2008-06-19 14:47:10 +01:00
|
|
|
# About one year cookie expiry
|
|
|
|
|
|
|
|
define('OPENID_COOKIE_EXPIRY', round(365.25 * 24 * 60 * 60));
|
|
|
|
define('OPENID_COOKIE_KEY', 'lastusedopenid');
|
|
|
|
|
2008-06-17 15:49:42 +01:00
|
|
|
function oid_store() {
|
|
|
|
static $store = NULL;
|
|
|
|
if (!$store) {
|
|
|
|
# Can't be called statically
|
|
|
|
$user = new User();
|
|
|
|
$conn = $user->getDatabaseConnection();
|
2008-06-17 16:05:09 +01:00
|
|
|
$store = new Auth_OpenID_MySQLStore($conn);
|
2008-06-17 15:49:42 +01:00
|
|
|
}
|
|
|
|
return $store;
|
|
|
|
}
|
|
|
|
|
|
|
|
function oid_consumer() {
|
|
|
|
$store = oid_store();
|
2008-06-17 16:06:56 +01:00
|
|
|
$consumer = new Auth_OpenID_Consumer($store);
|
2008-06-17 15:49:42 +01:00
|
|
|
return $consumer;
|
2008-06-18 12:43:10 +01:00
|
|
|
}
|
|
|
|
|
2008-06-19 14:47:10 +01:00
|
|
|
function oid_clear_last() {
|
|
|
|
if (oid_get_last()) {
|
|
|
|
oid_set_last('');
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
function oid_set_last($openid_url) {
|
|
|
|
global $config;
|
|
|
|
setcookie(OPENID_COOKIE_KEY, $openid_url,
|
|
|
|
time() + OPENID_COOKIE_EXPIRY,
|
|
|
|
'/' . $config['site']['path'] . '/',
|
|
|
|
$config['site']['server']);
|
|
|
|
}
|
|
|
|
|
|
|
|
function oid_get_last() {
|
|
|
|
return $_COOKIE[OPENID_COOKIE_KEY];
|
|
|
|
}
|
|
|
|
|
2008-06-18 12:43:10 +01:00
|
|
|
function oid_link_user($id, $canonical, $display) {
|
|
|
|
|
|
|
|
$oid = new User_openid();
|
|
|
|
$oid->user_id = $id;
|
|
|
|
$oid->canonical = $canonical;
|
|
|
|
$oid->display = $display;
|
|
|
|
$oid->created = DB_DataObject_Cast::dateTime();
|
2008-06-18 21:11:23 +01:00
|
|
|
|
2008-06-18 12:43:10 +01:00
|
|
|
if (!$oid->insert()) {
|
|
|
|
$err = PEAR::getStaticProperty('DB_DataObject','lastError');
|
|
|
|
common_debug('DB error ' . $err->code . ': ' . $err->message, __FILE__);
|
|
|
|
return false;
|
|
|
|
}
|
2008-06-19 04:32:12 +01:00
|
|
|
|
2008-06-18 12:43:10 +01:00
|
|
|
return true;
|
|
|
|
}
|
2008-06-18 14:32:51 +01:00
|
|
|
|
2008-06-19 14:47:10 +01:00
|
|
|
function oid_get_user($openid_url) {
|
|
|
|
$user = NULL;
|
|
|
|
$oid = User_openid::staticGet('canonical', $openid_url);
|
|
|
|
if ($oid) {
|
|
|
|
$user = User::staticGet('id', $oid->user_id);
|
|
|
|
}
|
|
|
|
return $user;
|
|
|
|
}
|
|
|
|
|
|
|
|
function oid_check_immediate($openid_url, $backto=NULL) {
|
|
|
|
if (!$backto) {
|
2008-06-19 15:03:50 +01:00
|
|
|
$action = $_REQUEST['action'];
|
2008-06-19 15:11:07 +01:00
|
|
|
$args = common_copy_args($_GET);
|
2008-06-19 15:03:50 +01:00
|
|
|
unset($args['action']);
|
|
|
|
$backto = common_local_url($action, $args);
|
2008-06-19 14:47:10 +01:00
|
|
|
}
|
2008-06-19 14:59:44 +01:00
|
|
|
common_debug('going back to "' . $backto . '"', __FILE__);
|
|
|
|
|
2008-06-19 14:47:10 +01:00
|
|
|
common_ensure_session();
|
2008-06-19 14:59:44 +01:00
|
|
|
|
2008-06-19 14:47:10 +01:00
|
|
|
$_SESSION['openid_immediate_backto'] = $backto;
|
2008-06-19 14:59:44 +01:00
|
|
|
common_debug('passed-in variable is "' . $backto . '"', __FILE__);
|
|
|
|
common_debug('session variable is "' . $_SESSION['openid_immediate_backto'] . '"', __FILE__);
|
|
|
|
|
2008-06-19 14:47:10 +01:00
|
|
|
oid_authenticate($openid_url,
|
|
|
|
'finishimmediate',
|
|
|
|
true);
|
|
|
|
}
|
|
|
|
|
|
|
|
function oid_authenticate($openid_url, $returnto, $immediate=false) {
|
|
|
|
|
2008-06-18 16:05:57 +01:00
|
|
|
$consumer = oid_consumer();
|
|
|
|
|
|
|
|
if (!$consumer) {
|
|
|
|
common_server_error(_t('Cannot instantiate OpenID consumer object.'));
|
|
|
|
return false;
|
|
|
|
}
|
|
|
|
|
|
|
|
common_ensure_session();
|
|
|
|
|
|
|
|
$auth_request = $consumer->begin($openid_url);
|
|
|
|
|
|
|
|
// Handle failure status return values.
|
|
|
|
if (!$auth_request) {
|
|
|
|
return _t('Not a valid OpenID.');
|
|
|
|
} else if (Auth_OpenID::isFailure($auth_request)) {
|
|
|
|
return _t('OpenID failure: ') . $auth_request->message;
|
|
|
|
}
|
|
|
|
|
|
|
|
$sreg_request = Auth_OpenID_SRegRequest::build(// Required
|
|
|
|
array(),
|
|
|
|
// Optional
|
|
|
|
array('nickname',
|
|
|
|
'email',
|
|
|
|
'fullname',
|
|
|
|
'language',
|
|
|
|
'timezone',
|
|
|
|
'postcode',
|
|
|
|
'country'));
|
|
|
|
|
|
|
|
if ($sreg_request) {
|
|
|
|
$auth_request->addExtension($sreg_request);
|
|
|
|
}
|
|
|
|
|
2008-06-18 19:28:12 +01:00
|
|
|
$trust_root = common_local_url('public');
|
2008-06-18 16:05:57 +01:00
|
|
|
$process_url = common_local_url($returnto);
|
|
|
|
|
|
|
|
if ($auth_request->shouldSendRedirect()) {
|
|
|
|
$redirect_url = $auth_request->redirectURL($trust_root,
|
2008-06-19 14:47:10 +01:00
|
|
|
$process_url,
|
|
|
|
$immediate);
|
2008-06-18 16:05:57 +01:00
|
|
|
if (!$redirect_url) {
|
|
|
|
} else if (Auth_OpenID::isFailure($redirect_url)) {
|
|
|
|
return _t('Could not redirect to server: ') . $redirect_url->message;
|
|
|
|
} else {
|
|
|
|
common_redirect($redirect_url);
|
2008-06-18 14:32:51 +01:00
|
|
|
}
|
2008-06-18 16:05:57 +01:00
|
|
|
} else {
|
|
|
|
// Generate form markup and render it.
|
|
|
|
$form_id = 'openid_message';
|
|
|
|
$form_html = $auth_request->formMarkup($trust_root, $process_url,
|
2008-06-19 14:47:10 +01:00
|
|
|
$immediate, array('id' => $form_id));
|
2008-06-18 16:05:57 +01:00
|
|
|
|
|
|
|
# XXX: This is cheap, but things choke if we don't escape ampersands
|
|
|
|
# in the HTML attributes
|
|
|
|
|
|
|
|
$form_html = preg_replace('/&/', '&', $form_html);
|
|
|
|
|
|
|
|
// Display an error if the form markup couldn't be generated;
|
|
|
|
// otherwise, render the HTML.
|
|
|
|
if (Auth_OpenID::isFailure($form_html)) {
|
|
|
|
$this->show_form(_t('Could not create OpenID form: ') . $form_html->message);
|
2008-06-18 14:32:51 +01:00
|
|
|
} else {
|
2008-06-18 16:05:57 +01:00
|
|
|
common_show_header(_t('OpenID Auto-Submit'));
|
|
|
|
common_element('p', 'instructions',
|
|
|
|
_t('This form should automatically submit itself. '.
|
|
|
|
'If not, click the submit button to go to your '.
|
|
|
|
'OpenID provider.'));
|
|
|
|
common_raw($form_html);
|
|
|
|
common_element('script', NULL,
|
|
|
|
'$(document).ready(function() { ' .
|
|
|
|
' $("#'. $form_id .'").submit(); '.
|
|
|
|
'});');
|
|
|
|
common_show_footer();
|
2008-06-18 14:32:51 +01:00
|
|
|
}
|
|
|
|
}
|
2008-06-18 16:05:57 +01:00
|
|
|
}
|
2008-06-19 14:51:48 +01:00
|
|
|
|
|
|
|
# update a user from sreg parameters
|
|
|
|
|
|
|
|
function oid_update_user(&$user, &$sreg) {
|
|
|
|
|
|
|
|
$profile = $user->getProfile();
|
|
|
|
|
|
|
|
$orig_profile = clone($profile);
|
|
|
|
|
|
|
|
if ($sreg['fullname'] && strlen($sreg['fullname']) <= 255) {
|
|
|
|
$profile->fullname = $sreg['fullname'];
|
|
|
|
}
|
|
|
|
|
|
|
|
if ($sreg['country']) {
|
|
|
|
if ($sreg['postcode']) {
|
|
|
|
# XXX: use postcode to get city and region
|
|
|
|
# XXX: also, store postcode somewhere -- it's valuable!
|
|
|
|
$profile->location = $sreg['postcode'] . ', ' . $sreg['country'];
|
|
|
|
} else {
|
|
|
|
$profile->location = $sreg['country'];
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
# XXX save language if it's passed
|
|
|
|
# XXX save timezone if it's passed
|
|
|
|
|
|
|
|
if (!$profile->update($orig_profile)) {
|
|
|
|
common_server_error(_t('Error saving the profile.'));
|
2008-06-19 15:58:38 +01:00
|
|
|
return false;
|
2008-06-19 14:51:48 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
$orig_user = clone($user);
|
|
|
|
|
|
|
|
if ($sreg['email'] && Validate::email($sreg['email'], true)) {
|
|
|
|
$user->email = $sreg['email'];
|
|
|
|
}
|
|
|
|
|
|
|
|
if (!$user->update($orig_user)) {
|
|
|
|
common_server_error(_t('Error saving the user.'));
|
2008-06-19 15:58:38 +01:00
|
|
|
return false;
|
2008-06-19 14:51:48 +01:00
|
|
|
}
|
2008-06-19 15:58:38 +01:00
|
|
|
|
|
|
|
return true;
|
2008-06-19 14:51:48 +01:00
|
|
|
}
|