<?php

/**

 * WordPress User API

 *

 * @package WordPress

 */

/**

 * Authenticate user with remember capability.

 *

 * The credentials is an array that has 'user_login', 'user_password', and

 * 'remember' indices. If the credentials is not given, then the log in form

 * will be assumed and used if set.

 *

 * The various authentication cookies will be set by this function and will be

 * set for a longer period depending on if the 'remember' credential is set to

 * true.

 *

 * @since 2.5.0

 *

 * @param array $credentials Optional. User info in order to sign on.

 * @param bool $secure_cookie Optional. Whether to use secure cookie.

 * @return object Either WP_Error on failure, or WP_User on success.

 */

function wp_signon( $credentials = '', $secure_cookie = '' ) {

	if ( empty($credentials) ) {

		if ( ! empty($_POST['log']) )

			$credentials['user_login'] = $_POST['log'];

		if ( ! empty($_POST['pwd']) )

			$credentials['user_password'] = $_POST['pwd'];

		if ( ! empty($_POST['rememberme']) )

			$credentials['remember'] = $_POST['rememberme'];

	}

	if ( !empty($credentials['remember']) )

		$credentials['remember'] = true;

	else

		$credentials['remember'] = false;

	// TODO do we deprecate the wp_authentication action?

	do_action_ref_array('wp_authenticate', array(&$credentials['user_login'], &$credentials['user_password']));

	if ( '' === $secure_cookie )

		$secure_cookie = is_ssl() ? true : false;

	global $auth_secure_cookie; // XXX ugly hack to pass this to wp_authenticate_cookie

	$auth_secure_cookie = $secure_cookie;

	add_filter('authenticate', 'wp_authenticate_cookie', 30, 3);

	$user = wp_authenticate($credentials['user_login'], $credentials['user_password']);

	if ( is_wp_error($user) ) {

		if ( $user->get_error_codes() == array('empty_username', 'empty_password') ) {

			$user = new WP_Error('', '');

		}

		return $user;

	}

	wp_set_auth_cookie($user->ID, $credentials['remember'], $secure_cookie);

	do_action('wp_login', $credentials['user_login']);

	return $user;

}

/**

 * Authenticate the user using the username and password.

 */

add_filter('authenticate', 'wp_authenticate_username_password', 20, 3);

function wp_authenticate_username_password($user, $username, $password) {

	if ( is_a($user, 'WP_User') ) { return $user; }

	if ( empty($username) || empty($password) ) {

		$error = new WP_Error();

		if ( empty($username) )

			$error->add('empty_username', __('<strong>ERROR</strong>: The username field is empty.'));

		if ( empty($password) )

			$error->add('empty_password', __('<strong>ERROR</strong>: The password field is empty.'));

		return $error;

	}

	$userdata = get_userdatabylogin($username);

	if ( !$userdata ) {

		return new WP_Error('invalid_username', sprintf(__('<strong>ERROR</strong>: Invalid username. <a href="%s" title="Password Lost and Found">Lost your password</a>?'), site_url('wp-login.php?action=lostpassword', 'login')));

	}

	$userdata = apply_filters('wp_authenticate_user', $userdata, $password);

	if ( is_wp_error($userdata) ) {

		return $userdata;

	}

	if ( !wp_check_password($password, $userdata->user_pass, $userdata->ID) ) {

		return new WP_Error('incorrect_password', sprintf(__('<strong>ERROR</strong>: Incorrect password. <a href="%s" title="Password Lost and Found">Lost your password</a>?'), site_url('wp-login.php?action=lostpassword', 'login')));

	}

	$user =  new WP_User($userdata->ID);

	return $user;

}

/**

 * Authenticate the user using the WordPress auth cookie.

 */

function wp_authenticate_cookie($user, $username, $password) {

	if ( is_a($user, 'WP_User') ) { return $user; }

	if ( empty($username) && empty($password) ) {

		$user_id = wp_validate_auth_cookie();

		if ( $user_id )

			return new WP_User($user_id);

		global $auth_secure_cookie;

		if ( $auth_secure_cookie )

			$auth_cookie = SECURE_AUTH_COOKIE;

		else

			$auth_cookie = AUTH_COOKIE;

		if ( !empty($_COOKIE[$auth_cookie]) )

			return new WP_Error('expired_session', __('Please log in again.'));

		// If the cookie is not set, be silent.

	}

	return $user;

}

/**

 * Retrieve user data based on field.

 *

 * Use get_profile() will make a database query to get the value of the table

 * column. The value might be cached using the query cache, but care should be

 * taken when using the function to not make a lot of queries for retrieving

 * user profile information.

 *

 * If the $user parameter is not used, then the user will be retrieved from a

 * cookie of the user. Therefore, if the cookie does not exist, then no value

 * might be returned. Sanity checking must be done to ensure that when using

 * get_profile() that empty/null/false values are handled and that something is

 * at least displayed.

 *

 * @since 1.5.0

 * @uses $wpdb WordPress database object to create queries.

 *

 * @param string $field User field to retrieve.

 * @param string $user Optional. User username.

 * @return string The value in the field.

 */

function get_profile($field, $user = false) {

	global $wpdb;

	if ( !$user )

		$user = esc_sql( $_COOKIE[USER_COOKIE] );

	return $wpdb->get_var( $wpdb->prepare("SELECT $field FROM $wpdb->users WHERE user_login = %s", $user) );

}

/**

 * Number of posts user has written.

 *

 * @since 0.71

 * @uses $wpdb WordPress database object for queries.

 *

 * @param int $userid User ID.

 * @return int Amount of posts user has written.

 */

function get_usernumposts($userid) {

	global $wpdb;

	$userid = (int) $userid;

	$count = $wpdb->get_var( $wpdb->prepare("SELECT COUNT(*) FROM $wpdb->posts WHERE post_author = %d AND post_type = 'post' AND ", $userid) . get_private_posts_cap_sql('post'));

	return apply_filters('get_usernumposts', $count, $userid);

}

/**

 * Check that the user login name and password is correct.

 *

 * @since 0.71

 * @todo xmlrpc only. Maybe move to xmlrpc.php.

 *

 * @param string $user_login User name.

 * @param string $user_pass User password.

 * @return bool False if does not authenticate, true if username and password authenticates.

 */

function user_pass_ok($user_login, $user_pass) {

	$user = wp_authenticate($user_login, $user_pass);

	if ( is_wp_error($user) )

		return false;

	return true;

}

//

// User option functions

//

/**

 * Retrieve user option that can be either global, user, or blog.

 *

 * If the user ID is not given, then the current user will be used instead. If

 * the user ID is given, then the user data will be retrieved. The filter for

 * the result, will also pass the original option name and finally the user data

 * object as the third parameter.

 *

 * The option will first check for the non-global name, then the global name,

 * and if it still doesn't find it, it will try the blog option. The option can

 * either be modified or set by a plugin.

 *

 * @since 2.0.0

 * @uses $wpdb WordPress database object for queries.

 * @uses apply_filters() Calls 'get_user_option_$option' hook with result,

 *		option parameter, and user data object.

 *

 * @param string $option User option name.

 * @param int $user Optional. User ID.

 * @param bool $check_blog_options Whether to check for an option in the options table if a per-user option does not exist. Default is true.

 * @return mixed

 */

function get_user_option( $option, $user = 0, $check_blog_options = true ) {

	global $wpdb;

	$option = preg_replace('|[^a-z0-9_]|i', '', $option);

	if ( empty($user) )

		$user = wp_get_current_user();

	else

		$user = get_userdata($user);

	if ( isset( $user->{$wpdb->prefix . $option} ) ) // Blog specific

		$result = $user->{$wpdb->prefix . $option};

	elseif ( isset( $user->{$option} ) ) // User specific and cross-blog

		$result = $user->{$option};

	elseif ( $check_blog_options ) // Blog global

		$result = get_option( $option );

	else

		$result = false;

	return apply_filters("get_user_option_{$option}", $result, $option, $user);

}

/**

 * Update user option with global blog capability.

 *

 * User options are just like user metadata except that they have support for

 * global blog options. If the 'global' parameter is false, which it is by default

 * it will prepend the WordPress table prefix to the option name.

 *

 * @since 2.0.0

 * @uses $wpdb WordPress database object for queries

 *

 * @param int $user_id User ID

 * @param string $option_name User option name.

 * @param mixed $newvalue User option value.

 * @param bool $global Optional. Whether option name is blog specific or not.

 * @return unknown

 */

function update_user_option( $user_id, $option_name, $newvalue, $global = false ) {

	global $wpdb;

	if ( !$global )

		$option_name = $wpdb->prefix . $option_name;

	return update_usermeta( $user_id, $option_name, $newvalue );

}

/**

 * Get users for the blog.

 *

 * For setups that use the multi-blog feature. Can be used outside of the

 * multi-blog feature.

 *

 * @since 2.2.0

 * @uses $wpdb WordPress database object for queries

 * @uses $blog_id The Blog id of the blog for those that use more than one blog

 *

 * @param int $id Blog ID.

 * @return array List of users that are part of that Blog ID

 */

function get_users_of_blog( $id = '' ) {

	global $wpdb, $blog_id;

	if ( empty($id) )

		$id = (int) $blog_id;

	$users = $wpdb->get_results( "SELECT user_id, user_id AS ID, user_login, display_name, user_email, meta_value FROM $wpdb->users, $wpdb->usermeta WHERE {$wpdb->users}.ID = {$wpdb->usermeta}.user_id AND meta_key = '{$wpdb->prefix}capabilities' ORDER BY {$wpdb->usermeta}.user_id" );

	return $users;

}

//

// User meta functions

//

/**

 * Remove user meta data.

 *

 * @since 2.0.0

 * @uses $wpdb WordPress database object for queries.

 *

 * @param int $user_id User ID.

 * @param string $meta_key Metadata key.

 * @param mixed $meta_value Metadata value.

 * @return bool True deletion completed and false if user_id is not a number.

 */

function delete_usermeta( $user_id, $meta_key, $meta_value = '' ) {

	global $wpdb;

	if ( !is_numeric( $user_id ) )

		return false;

	$meta_key = preg_replace('|[^a-z0-9_]|i', '', $meta_key);

	if ( is_array($meta_value) || is_object($meta_value) )

		$meta_value = serialize($meta_value);

	$meta_value = trim( $meta_value );

	$cur = $wpdb->get_row( $wpdb->prepare("SELECT * FROM $wpdb->usermeta WHERE user_id = %d AND meta_key = %s", $user_id, $meta_key) );

	if ( $cur && $cur->umeta_id )

		do_action( 'delete_usermeta', $cur->umeta_id, $user_id, $meta_key, $meta_value );

	if ( ! empty($meta_value) )

		$wpdb->query( $wpdb->prepare("DELETE FROM $wpdb->usermeta WHERE user_id = %d AND meta_key = %s AND meta_value = %s", $user_id, $meta_key, $meta_value) );

	else

		$wpdb->query( $wpdb->prepare("DELETE FROM $wpdb->usermeta WHERE user_id = %d AND meta_key = %s", $user_id, $meta_key) );

	wp_cache_delete($user_id, 'users');

	if ( $cur && $cur->umeta_id )

		do_action( 'deleted_usermeta', $cur->umeta_id, $user_id, $meta_key, $meta_value );

	return true;

}

/**

 * Retrieve user metadata.

 *

 * If $user_id is not a number, then the function will fail over with a 'false'

 * boolean return value. Other returned values depend on whether there is only

 * one item to be returned, which be that single item type. If there is more

 * than one metadata value, then it will be list of metadata values.

 *

 * @since 2.0.0

 * @uses $wpdb WordPress database object for queries.

 *

 * @param int $user_id User ID

 * @param string $meta_key Optional. Metadata key.

 * @return mixed

 */

function get_usermeta( $user_id, $meta_key = '') {

	global $wpdb;

	$user_id = (int) $user_id;

	if ( !$user_id )

		return false;

	if ( !empty($meta_key) ) {

		$meta_key = preg_replace('|[^a-z0-9_]|i', '', $meta_key);

		$user = wp_cache_get($user_id, 'users');

		// Check the cached user object

		if ( false !== $user && isset($user->$meta_key) )

			$metas = array($user->$meta_key);

		else

			$metas = $wpdb->get_col( $wpdb->prepare("SELECT meta_value FROM $wpdb->usermeta WHERE user_id = %d AND meta_key = %s", $user_id, $meta_key) );

	} else {

		$metas = $wpdb->get_col( $wpdb->prepare("SELECT meta_value FROM $wpdb->usermeta WHERE user_id = %d", $user_id) );

	}

	if ( empty($metas) ) {

		if ( empty($meta_key) )

			return array();

		else

			return '';

	}

	$metas = array_map('maybe_unserialize', $metas);

	if ( count($metas) == 1 )

		return $metas[0];

	else

		return $metas;

}

/**

 * Update metadata of user.

 *

 * There is no need to serialize values, they will be serialized if it is

 * needed. The metadata key can only be a string with underscores. All else will

 * be removed.

 *

 * Will remove the metadata, if the meta value is empty.

 *

 * @since 2.0.0

 * @uses $wpdb WordPress database object for queries

 *

 * @param int $user_id User ID

 * @param string $meta_key Metadata key.

 * @param mixed $meta_value Metadata value.

 * @return bool True on successful update, false on failure.

 */

function update_usermeta( $user_id, $meta_key, $meta_value ) {

	global $wpdb;

	if ( !is_numeric( $user_id ) )

		return false;

	$meta_key = preg_replace('|[^a-z0-9_]|i', '', $meta_key);

	/** @todo Might need fix because usermeta data is assumed to be already escaped */

	if ( is_string($meta_value) )

		$meta_value = stripslashes($meta_value);

	$meta_value = maybe_serialize($meta_value);

	if (empty($meta_value)) {

		return delete_usermeta($user_id, $meta_key);

	}

	$cur = $wpdb->get_row( $wpdb->prepare("SELECT * FROM $wpdb->usermeta WHERE user_id = %d AND meta_key = %s", $user_id, $meta_key) );

	if ( $cur )

		do_action( 'update_usermeta', $cur->umeta_id, $user_id, $meta_key, $meta_value );

	if ( !$cur )

		$wpdb->insert($wpdb->usermeta, compact('user_id', 'meta_key', 'meta_value') );

	else if ( $cur->meta_value != $meta_value )

		$wpdb->update($wpdb->usermeta, compact('meta_value'), compact('user_id', 'meta_key') );

	else

		return false;

	wp_cache_delete($user_id, 'users');

	if ( !$cur )

		do_action( 'added_usermeta', $wpdb->insert_id, $user_id, $meta_key, $meta_value );