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.'/classes/User_openid.php');
24 require_once('Auth/OpenID.php');
25 require_once('Auth/OpenID/Consumer.php');
26 require_once('Auth/OpenID/SReg.php');
27 require_once('Auth/OpenID/MySQLStore.php');
29 # About one year cookie expiry
31 define('OPENID_COOKIE_EXPIRY', round(365.25 * 24 * 60 * 60));
32 define('OPENID_COOKIE_KEY', 'lastusedopenid');
34 function oid_store() {
37 # Can't be called statically
39 $conn = $user->getDatabaseConnection();
40 $store = new Auth_OpenID_MySQLStore($conn);
45 function oid_consumer() {
47 $consumer = new Auth_OpenID_Consumer($store);
51 function oid_clear_last() {
55 function oid_set_last($openid_url) {
57 $path = common_config('site', 'path');
58 $server = common_config('site', 'server');
60 if ($path && ($path != '/')) {
61 $cookiepath = '/' . $path . '/';
66 setcookie(OPENID_COOKIE_KEY,
68 time() + OPENID_COOKIE_EXPIRY,
73 function oid_get_last() {
74 $openid_url = $_COOKIE[OPENID_COOKIE_KEY];
75 if ($openid_url && strlen($openid_url) > 0) {
82 function oid_link_user($id, $canonical, $display) {
84 $oid = new User_openid();
86 $oid->canonical = $canonical;
87 $oid->display = $display;
88 $oid->created = DB_DataObject_Cast::dateTime();
90 if (!$oid->insert()) {
91 $err = PEAR::getStaticProperty('DB_DataObject','lastError');
92 common_debug('DB error ' . $err->code . ': ' . $err->message, __FILE__);
99 function oid_get_user($openid_url) {
101 $oid = User_openid::staticGet('canonical', $openid_url);
103 $user = User::staticGet('id', $oid->user_id);
108 function oid_check_immediate($openid_url, $backto=NULL) {
110 $action = $_REQUEST['action'];
111 $args = common_copy_args($_GET);
112 unset($args['action']);
113 $backto = common_local_url($action, $args);
115 common_debug('going back to "' . $backto . '"', __FILE__);
117 common_ensure_session();
119 $_SESSION['openid_immediate_backto'] = $backto;
120 common_debug('passed-in variable is "' . $backto . '"', __FILE__);
121 common_debug('session variable is "' . $_SESSION['openid_immediate_backto'] . '"', __FILE__);
123 oid_authenticate($openid_url,
128 function oid_authenticate($openid_url, $returnto, $immediate=false) {
130 $consumer = oid_consumer();
133 common_server_error(_t('Cannot instantiate OpenID consumer object.'));
137 common_ensure_session();
139 $auth_request = $consumer->begin($openid_url);
141 // Handle failure status return values.
142 if (!$auth_request) {
143 return _t('Not a valid OpenID.');
144 } else if (Auth_OpenID::isFailure($auth_request)) {
145 return _t('OpenID failure: ') . $auth_request->message;
148 $sreg_request = Auth_OpenID_SRegRequest::build(// Required
160 $auth_request->addExtension($sreg_request);
163 $trust_root = common_local_url('public');
164 $process_url = common_local_url($returnto);
166 if ($auth_request->shouldSendRedirect()) {
167 $redirect_url = $auth_request->redirectURL($trust_root,
170 if (!$redirect_url) {
171 } else if (Auth_OpenID::isFailure($redirect_url)) {
172 return _t('Could not redirect to server: ') . $redirect_url->message;
174 common_redirect($redirect_url);
177 // Generate form markup and render it.
178 $form_id = 'openid_message';
179 $form_html = $auth_request->formMarkup($trust_root, $process_url,
180 $immediate, array('id' => $form_id));
182 # XXX: This is cheap, but things choke if we don't escape ampersands
183 # in the HTML attributes
185 $form_html = preg_replace('/&/', '&', $form_html);
187 // Display an error if the form markup couldn't be generated;
188 // otherwise, render the HTML.
189 if (Auth_OpenID::isFailure($form_html)) {
190 $this->show_form(_t('Could not create OpenID form: ') . $form_html->message);
192 common_show_header(_t('OpenID Auto-Submit'), NULL, NULL, '_oid_print_instructions');
193 common_raw($form_html);
194 common_element('script', NULL,
195 '$(document).ready(function() { ' .
196 ' $("#'. $form_id .'").submit(); '.
198 common_show_footer();
203 # Half-assed attempt at a module-private function
205 function _oid_print_instructions() {
206 common_element('p', 'instructions',
207 _t('This form should automatically submit itself. '.
208 'If not, click the submit button to go to your '.
209 'OpenID provider.'));
212 # update a user from sreg parameters
214 function oid_update_user(&$user, &$sreg) {
216 $profile = $user->getProfile();
218 $orig_profile = clone($profile);
220 if ($sreg['fullname'] && strlen($sreg['fullname']) <= 255) {
221 $profile->fullname = $sreg['fullname'];
224 if ($sreg['country']) {
225 if ($sreg['postcode']) {
226 # XXX: use postcode to get city and region
227 # XXX: also, store postcode somewhere -- it's valuable!
228 $profile->location = $sreg['postcode'] . ', ' . $sreg['country'];
230 $profile->location = $sreg['country'];
234 # XXX save language if it's passed
235 # XXX save timezone if it's passed
237 if (!$profile->update($orig_profile)) {
238 common_server_error(_t('Error saving the profile.'));
242 $orig_user = clone($user);
244 if ($sreg['email'] && Validate::email($sreg['email'], true)) {
245 $user->email = $sreg['email'];
248 if (!$user->update($orig_user)) {
249 common_server_error(_t('Error saving the user.'));