2010-07-05 05:45:56 +02:00
< ? php
2010-11-30 08:16:14 +01:00
2012-01-13 00:46:39 +01:00
require_once ( 'include/security.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`
2011-09-19 04:53:45 +02:00
FROM `user` WHERE `uid` = % d AND `blocked` = 0 AND `account_expired` = 0 AND `verified` = 1 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
2012-01-13 00:46:39 +01:00
authenticate_success ( $r [ 0 ]);
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 {
2011-10-17 16:53:59 +02:00
if (( x ( $_POST , 'openid_url' )) && strlen ( $_POST [ 'openid_url' ]) ||
( x ( $_POST , 'username' )) && strlen ( $_POST [ 'username' ])) {
2010-11-19 00:06:33 +01:00
2010-11-29 05:58:23 +01:00
$noid = get_config ( 'system' , 'no_openid' );
2011-10-17 16:53:59 +02:00
$openid_url = trim ( ( strlen ( $_POST [ 'openid_url' ]) ? $_POST [ 'openid_url' ] : $_POST [ 'username' ]) );
2010-11-19 00:06:33 +01:00
// 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
2012-03-11 12:00:32 +01:00
try {
$_SESSION [ 'register' ] = 1 ;
$openid -> required = array ( 'namePerson/friendly' , 'contact/email' , 'namePerson' );
$openid -> optional = array ( 'namePerson/first' , 'media/image/aspect11' , 'media/image/default' );
goaway ( $openid -> authUrl ());
} catch ( Exception $e ) {
// if the OpenID is misspelled we land here
notice ( t ( 'We encountered a problem while logging in with the OpenID you provided. Please check the correct spelling of the ID.<br /><br />The error message was: ' ) . $e -> getMessage () );
}
2010-11-19 00:06:33 +01:00
// 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 (
2011-10-17 16:53:59 +02:00
'username' => trim ( $_POST [ 'username' ]),
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' )
2011-09-19 04:53:45 +02:00
AND `password` = '%s' AND `blocked` = 0 AND `account_expired` = 0 AND `verified` = 1 LIMIT 1 " ,
2011-10-17 16:53:59 +02:00
dbesc ( trim ( $_POST [ 'username' ])),
dbesc ( trim ( $_POST [ 'username' ])),
2010-12-25 00:59:12 +01:00
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 ))) {
2012-02-16 08:58:28 +01:00
logger ( 'authenticate: failed login attempt: ' . notags ( trim ( $_POST [ 'username' ])));
2010-12-27 23:59:26 +01:00
notice ( t ( 'Login failed.' ) . EOL );
2011-08-02 06:02:25 +02:00
goaway ( z_root ());
2010-12-27 23:59:26 +01:00
}
2012-01-13 00:46:39 +01:00
// if we haven't failed up this point, log them in.
2010-12-25 00:59:12 +01:00
2012-01-13 00:46:39 +01:00
authenticate_success ( $record , true , true );
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 ;
}}