2010-07-05 05:45:56 +02:00
|
|
|
<?php
|
|
|
|
|
2010-11-30 08:16:14 +01:00
|
|
|
|
|
|
|
function nuke_session() {
|
|
|
|
unset($_SESSION['authenticated']);
|
|
|
|
unset($_SESSION['uid']);
|
|
|
|
unset($_SESSION['visitor_id']);
|
|
|
|
unset($_SESSION['administrator']);
|
|
|
|
unset($_SESSION['cid']);
|
|
|
|
unset($_SESSION['theme']);
|
|
|
|
unset($_SESSION['page_flags']);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
2010-07-05 05:45:56 +02:00
|
|
|
// login/logout
|
|
|
|
|
2010-11-30 08:16:14 +01:00
|
|
|
|
|
|
|
|
|
|
|
|
2010-11-01 00:38:22 +01:00
|
|
|
if((isset($_SESSION)) && (x($_SESSION,'authenticated')) && ((! (x($_POST,'auth-params'))) || ($_POST['auth-params'] !== 'login'))) {
|
2010-10-11 01:16:29 +02:00
|
|
|
|
2010-11-01 00:38:22 +01:00
|
|
|
if(((x($_POST,'auth-params')) && ($_POST['auth-params'] === 'logout')) || ($a->module === 'logout')) {
|
2010-10-11 01:16:29 +02:00
|
|
|
|
|
|
|
// process logout request
|
|
|
|
|
2010-11-30 08:16:14 +01:00
|
|
|
nuke_session();
|
2011-05-23 11:39:57 +02:00
|
|
|
info( t('Logged out.') . EOL);
|
2011-08-02 06:02:25 +02:00
|
|
|
goaway(z_root());
|
2010-07-05 05:45:56 +02:00
|
|
|
}
|
2010-10-11 01:16:29 +02:00
|
|
|
|
2011-05-16 01:36:49 +02:00
|
|
|
if(x($_SESSION,'visitor_id') && (! x($_SESSION,'uid'))) {
|
2011-05-10 07:15:19 +02:00
|
|
|
$r = q("SELECT * FROM `contact` WHERE `id` = %d LIMIT 1",
|
|
|
|
intval($_SESSION['visitor_id'])
|
|
|
|
);
|
|
|
|
if(count($r)) {
|
|
|
|
$a->contact = $r[0];
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2010-07-05 05:45:56 +02:00
|
|
|
if(x($_SESSION,'uid')) {
|
2010-10-11 01:16:29 +02:00
|
|
|
|
|
|
|
// already logged in user returning
|
|
|
|
|
2010-11-30 08:16:14 +01:00
|
|
|
$check = get_config('system','paranoia');
|
|
|
|
// extra paranoia - if the IP changed, log them out
|
|
|
|
if($check && ($_SESSION['addr'] != $_SERVER['REMOTE_ADDR'])) {
|
|
|
|
nuke_session();
|
2011-08-02 06:02:25 +02:00
|
|
|
goaway(z_root());
|
2010-11-30 08:16:14 +01:00
|
|
|
}
|
|
|
|
|
2011-08-25 05:40:08 +02:00
|
|
|
$r = q("SELECT `user`.*, `user`.`pubkey` as `upubkey`, `user`.`prvkey` as `uprvkey`
|
|
|
|
FROM `user` WHERE `uid` = %d LIMIT 1",
|
2010-10-11 01:16:29 +02:00
|
|
|
intval($_SESSION['uid'])
|
|
|
|
);
|
|
|
|
|
|
|
|
if(! count($r)) {
|
2010-11-30 08:16:14 +01:00
|
|
|
nuke_session();
|
2011-08-02 06:02:25 +02:00
|
|
|
goaway(z_root());
|
2010-07-05 05:45:56 +02:00
|
|
|
}
|
2010-10-11 01:16:29 +02:00
|
|
|
|
|
|
|
// initialise user environment
|
|
|
|
|
2010-07-05 05:45:56 +02:00
|
|
|
$a->user = $r[0];
|
2010-08-16 14:23:26 +02:00
|
|
|
$_SESSION['theme'] = $a->user['theme'];
|
2010-10-18 05:04:17 +02:00
|
|
|
$_SESSION['page_flags'] = $a->user['page-flags'];
|
2011-01-14 05:28:33 +01:00
|
|
|
|
2011-06-03 15:12:34 +02:00
|
|
|
$member_since = strtotime($a->user['register_date']);
|
|
|
|
if(time() < ($member_since + ( 60 * 60 * 24 * 14)))
|
|
|
|
$_SESSION['new_member'] = true;
|
|
|
|
else
|
|
|
|
$_SESSION['new_member'] = false;
|
|
|
|
|
2011-01-14 05:28:33 +01:00
|
|
|
if(strlen($a->user['timezone'])) {
|
2010-07-05 05:45:56 +02:00
|
|
|
date_default_timezone_set($a->user['timezone']);
|
2011-01-14 05:28:33 +01:00
|
|
|
$a->timezone = $a->user['timezone'];
|
|
|
|
}
|
2010-07-05 05:45:56 +02:00
|
|
|
|
2010-10-11 01:16:29 +02:00
|
|
|
$_SESSION['my_url'] = $a->get_baseurl() . '/profile/' . $a->user['nickname'];
|
2010-07-19 14:24:22 +02:00
|
|
|
|
2011-03-02 05:18:47 +01:00
|
|
|
$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;
|
|
|
|
|
2010-10-26 06:52:30 +02:00
|
|
|
$r = q("SELECT * FROM `contact` WHERE `uid` = %d AND `self` = 1 LIMIT 1",
|
2010-07-06 06:39:55 +02:00
|
|
|
intval($_SESSION['uid']));
|
|
|
|
if(count($r)) {
|
2010-07-17 02:16:50 +02:00
|
|
|
$a->contact = $r[0];
|
2010-07-06 06:39:55 +02:00
|
|
|
$a->cid = $r[0]['id'];
|
|
|
|
$_SESSION['cid'] = $a->cid;
|
2010-07-19 14:24:22 +02:00
|
|
|
|
2010-07-06 06:39:55 +02:00
|
|
|
}
|
2010-11-11 11:49:28 +01:00
|
|
|
header('X-Account-Management-Status: active; name="' . $a->user['username'] . '"; id="' . $a->user['nickname'] .'"');
|
2010-07-05 05:45:56 +02:00
|
|
|
}
|
|
|
|
}
|
|
|
|
else {
|
2010-10-11 01:16:29 +02:00
|
|
|
|
2010-10-30 22:25:37 +02:00
|
|
|
if(isset($_SESSION)) {
|
2010-11-30 08:16:14 +01:00
|
|
|
nuke_session();
|
2010-10-30 22:25:37 +02:00
|
|
|
}
|
2010-09-19 06:11:18 +02:00
|
|
|
|
2010-11-18 02:03:27 +01:00
|
|
|
if((x($_POST,'password')) && strlen($_POST['password']))
|
2010-10-30 22:25:37 +02:00
|
|
|
$encrypted = hash('whirlpool',trim($_POST['password']));
|
2010-11-17 08:26:14 +01:00
|
|
|
else {
|
2010-11-19 00:06:33 +01:00
|
|
|
if((x($_POST,'openid_url')) && strlen($_POST['openid_url'])) {
|
|
|
|
|
2010-11-29 05:58:23 +01:00
|
|
|
$noid = get_config('system','no_openid');
|
|
|
|
|
2010-11-19 00:06:33 +01:00
|
|
|
$openid_url = trim($_POST['openid_url']);
|
|
|
|
|
|
|
|
// validate_url alters the calling parameter
|
|
|
|
|
|
|
|
$temp_string = $openid_url;
|
|
|
|
|
|
|
|
// if it's an email address or doesn't resolve to a URL, fail.
|
|
|
|
|
2010-11-29 05:58:23 +01:00
|
|
|
if(($noid) || (strpos($temp_string,'@')) || (! validate_url($temp_string))) {
|
2010-11-19 00:06:33 +01:00
|
|
|
$a = get_app();
|
|
|
|
notice( t('Login failed.') . EOL);
|
2011-08-02 06:02:25 +02:00
|
|
|
goaway(z_root());
|
2010-11-19 00:06:33 +01:00
|
|
|
// NOTREACHED
|
|
|
|
}
|
|
|
|
|
|
|
|
// Otherwise it's probably an openid.
|
|
|
|
|
|
|
|
require_once('library/openid.php');
|
|
|
|
$openid = new LightOpenID;
|
|
|
|
$openid->identity = $openid_url;
|
|
|
|
$_SESSION['openid'] = $openid_url;
|
|
|
|
$a = get_app();
|
|
|
|
$openid->returnUrl = $a->get_baseurl() . '/openid';
|
|
|
|
|
2010-11-18 02:03:27 +01:00
|
|
|
$r = q("SELECT `uid` FROM `user` WHERE `openid` = '%s' LIMIT 1",
|
|
|
|
dbesc($openid_url)
|
|
|
|
);
|
2010-11-19 00:06:33 +01:00
|
|
|
if(count($r)) {
|
|
|
|
// existing account
|
2010-11-18 02:03:27 +01:00
|
|
|
goaway($openid->authUrl());
|
|
|
|
// NOTREACHED
|
|
|
|
}
|
|
|
|
else {
|
2010-11-19 00:06:33 +01:00
|
|
|
if($a->config['register_policy'] == REGISTER_CLOSED) {
|
|
|
|
$a = get_app();
|
|
|
|
notice( t('Login failed.') . EOL);
|
2011-08-02 06:02:25 +02:00
|
|
|
goaway(z_root());
|
2010-11-19 00:06:33 +01:00
|
|
|
// NOTREACHED
|
|
|
|
}
|
|
|
|
// new account
|
|
|
|
$_SESSION['register'] = 1;
|
|
|
|
$openid->required = array('namePerson/friendly', 'contact/email', 'namePerson');
|
2010-11-24 05:56:20 +01:00
|
|
|
$openid->optional = array('namePerson/first','media/image/aspect11','media/image/default');
|
2010-11-19 00:06:33 +01:00
|
|
|
goaway($openid->authUrl());
|
|
|
|
// NOTREACHED
|
2010-11-18 02:03:27 +01:00
|
|
|
}
|
2010-11-17 08:26:14 +01:00
|
|
|
}
|
|
|
|
}
|
2010-09-27 02:24:20 +02:00
|
|
|
if((x($_POST,'auth-params')) && $_POST['auth-params'] === 'login') {
|
2010-10-11 01:16:29 +02:00
|
|
|
|
2010-12-27 23:59:26 +01:00
|
|
|
$record = null;
|
2010-12-25 00:59:12 +01:00
|
|
|
|
|
|
|
$addon_auth = array(
|
2010-12-27 23:59:26 +01:00
|
|
|
'username' => trim($_POST['openid_url']),
|
2010-12-25 00:59:12 +01:00
|
|
|
'password' => trim($_POST['password']),
|
2010-12-27 23:59:26 +01:00
|
|
|
'authenticated' => 0,
|
|
|
|
'user_record' => null
|
2010-12-25 00:59:12 +01:00
|
|
|
);
|
|
|
|
|
|
|
|
/**
|
|
|
|
*
|
2010-12-27 23:59:26 +01:00
|
|
|
* A plugin indicates successful login by setting 'authenticated' to non-zero value and returning a user record
|
2010-12-25 00:59:12 +01:00
|
|
|
* Plugins should never set 'authenticated' except to indicate success - as hooks may be chained
|
|
|
|
* and later plugins should not interfere with an earlier one that succeeded.
|
|
|
|
*
|
|
|
|
*/
|
|
|
|
|
|
|
|
call_hooks('authenticate', $addon_auth);
|
|
|
|
|
2010-12-27 23:59:26 +01:00
|
|
|
if(($addon_auth['authenticated']) && (count($addon_auth['user_record']))) {
|
|
|
|
$record = $addon_auth['user_record'];
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
|
|
|
|
// process normal login request
|
2010-12-25 00:59:12 +01:00
|
|
|
|
2011-08-25 05:40:08 +02:00
|
|
|
$r = q("SELECT `user`.*, `user`.`pubkey` as `upubkey`, `user`.`prvkey` as `uprvkey`
|
|
|
|
FROM `user` WHERE ( `email` = '%s' OR `nickname` = '%s' )
|
2010-12-25 00:59:12 +01:00
|
|
|
AND `password` = '%s' AND `blocked` = 0 AND `verified` = 1 LIMIT 1",
|
|
|
|
dbesc(trim($_POST['openid_url'])),
|
|
|
|
dbesc(trim($_POST['openid_url'])),
|
|
|
|
dbesc($encrypted)
|
|
|
|
);
|
2010-12-27 23:59:26 +01:00
|
|
|
if(count($r))
|
|
|
|
$record = $r[0];
|
2010-12-25 00:59:12 +01:00
|
|
|
}
|
|
|
|
|
2010-12-27 23:59:26 +01:00
|
|
|
if((! $record) || (! count($record))) {
|
|
|
|
logger('authenticate: failed login attempt: ' . trim($_POST['openid_url']));
|
|
|
|
notice( t('Login failed.') . EOL );
|
2011-08-02 06:02:25 +02:00
|
|
|
goaway(z_root());
|
2010-12-27 23:59:26 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
$_SESSION['uid'] = $record['uid'];
|
|
|
|
$_SESSION['theme'] = $record['theme'];
|
2010-07-05 05:45:56 +02:00
|
|
|
$_SESSION['authenticated'] = 1;
|
2010-12-27 23:59:26 +01:00
|
|
|
$_SESSION['page_flags'] = $record['page-flags'];
|
|
|
|
$_SESSION['my_url'] = $a->get_baseurl() . '/profile/' . $record['nickname'];
|
2010-11-30 08:16:14 +01:00
|
|
|
$_SESSION['addr'] = $_SERVER['REMOTE_ADDR'];
|
2010-07-05 05:45:56 +02:00
|
|
|
|
2010-12-27 23:59:26 +01:00
|
|
|
$a->user = $record;
|
2011-01-14 05:28:33 +01:00
|
|
|
|
2011-04-24 02:31:23 +02:00
|
|
|
if($a->user['login_date'] === '0000-00-00 00:00:00') {
|
|
|
|
$_SESSION['return_url'] = 'profile_photo/new';
|
|
|
|
$a->module = 'profile_photo';
|
2011-05-23 11:39:57 +02:00
|
|
|
info( t("Welcome ") . $a->user['username'] . EOL);
|
|
|
|
info( t('Please upload a profile photo.') . EOL);
|
2011-04-24 02:31:23 +02:00
|
|
|
}
|
|
|
|
else
|
2011-05-23 11:39:57 +02:00
|
|
|
info( t("Welcome back ") . $a->user['username'] . EOL);
|
2011-04-24 02:31:23 +02:00
|
|
|
|
2011-06-03 15:12:34 +02:00
|
|
|
|
|
|
|
$member_since = strtotime($a->user['register_date']);
|
|
|
|
if(time() < ($member_since + ( 60 * 60 * 24 * 14)))
|
|
|
|
$_SESSION['new_member'] = true;
|
|
|
|
else
|
|
|
|
$_SESSION['new_member'] = false;
|
|
|
|
|
2011-01-14 05:28:33 +01:00
|
|
|
if(strlen($a->user['timezone'])) {
|
2010-07-05 05:45:56 +02:00
|
|
|
date_default_timezone_set($a->user['timezone']);
|
2011-01-14 05:28:33 +01:00
|
|
|
$a->timezone = $a->user['timezone'];
|
|
|
|
}
|
2010-07-05 05:45:56 +02:00
|
|
|
|
2011-03-02 05:18:47 +01:00
|
|
|
$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;
|
|
|
|
|
|
|
|
|
|
|
|
$r = q("SELECT * FROM `contact` WHERE `uid` = %d AND `self` = 1 LIMIT 1",
|
2010-07-06 06:39:55 +02:00
|
|
|
intval($_SESSION['uid']));
|
|
|
|
if(count($r)) {
|
2010-10-26 06:52:30 +02:00
|
|
|
$a->contact = $r[0];
|
2010-07-06 06:39:55 +02:00
|
|
|
$a->cid = $r[0]['id'];
|
|
|
|
$_SESSION['cid'] = $a->cid;
|
|
|
|
}
|
2011-04-24 02:31:23 +02:00
|
|
|
|
2011-05-24 02:18:36 +02:00
|
|
|
$l = get_language();
|
2011-04-24 02:31:23 +02:00
|
|
|
|
2011-05-24 02:18:36 +02:00
|
|
|
q("UPDATE `user` SET `login_date` = '%s', `language` = '%s' WHERE `uid` = %d LIMIT 1",
|
2010-12-17 01:35:45 +01:00
|
|
|
dbesc(datetime_convert()),
|
2011-05-24 02:18:36 +02:00
|
|
|
dbesc($l),
|
2010-12-17 01:35:45 +01:00
|
|
|
intval($_SESSION['uid'])
|
|
|
|
);
|
2010-11-11 11:49:28 +01:00
|
|
|
|
2010-12-25 00:59:12 +01:00
|
|
|
call_hooks('logged_in', $a->user);
|
|
|
|
|
2010-11-11 11:49:28 +01:00
|
|
|
header('X-Account-Management-Status: active; name="' . $a->user['username'] . '"; id="' . $a->user['nickname'] .'"');
|
2010-10-09 10:05:53 +02:00
|
|
|
if(($a->module !== 'home') && isset($_SESSION['return_url']))
|
|
|
|
goaway($a->get_baseurl() . '/' . $_SESSION['return_url']);
|
2010-07-05 05:45:56 +02:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2010-07-13 11:00:53 +02:00
|
|
|
// Returns an array of group id's this contact is a member of.
|
|
|
|
// This array will only contain group id's related to the uid of this
|
2010-07-05 05:45:56 +02:00
|
|
|
// DFRN contact. They are *not* neccessarily unique across the entire site.
|
|
|
|
|
|
|
|
|
|
|
|
if(! function_exists('init_groups_visitor')) {
|
|
|
|
function init_groups_visitor($contact_id) {
|
|
|
|
$groups = array();
|
2010-07-13 11:00:53 +02:00
|
|
|
$r = q("SELECT `gid` FROM `group_member`
|
|
|
|
WHERE `contact-id` = %d ",
|
2010-07-05 05:45:56 +02:00
|
|
|
intval($contact_id)
|
|
|
|
);
|
|
|
|
if(count($r)) {
|
|
|
|
foreach($r as $rr)
|
2010-07-13 11:00:53 +02:00
|
|
|
$groups[] = $rr['gid'];
|
2010-07-05 05:45:56 +02:00
|
|
|
}
|
|
|
|
return $groups;
|
|
|
|
}}
|
|
|
|
|
|
|
|
|