<?php

/**

 * WordPress user administration API.

 *

 * @package WordPress

 * @subpackage Administration

 */

/**

 * Creates a new user from the "Users" form using $_POST information.

 *

 * It seems that the first half is for backwards compatibility, but only

 * has the ability to alter the user's role. WordPress core seems to

 * use this function only in the second way, running edit_user() with

 * no id so as to create a new user.

 *

 * @since 2.0

 *

 * @param int $user_id Optional. User ID.

 * @return null|WP_Error|int Null when adding user, WP_Error or User ID integer when no parameters.

 */

function add_user() {

	if ( func_num_args() ) { // The hackiest hack that ever did hack

		global $current_user, $wp_roles;

		$user_id = (int) func_get_arg( 0 );

		if ( isset( $_POST['role'] ) ) {

			$new_role = sanitize_text_field( $_POST['role'] );

			// Don't let anyone with 'edit_users' (admins) edit their own role to something without it.

			if ( $user_id != $current_user->id || $wp_roles->role_objects[$new_role]->has_cap( 'edit_users' ) ) {

				// If the new role isn't editable by the logged-in user die with error

				$editable_roles = get_editable_roles();

				if ( !$editable_roles[$new_role] )

					wp_die(__('You can’t give users that role.'));

				$user = new WP_User( $user_id );

				$user->set_role( $new_role );

			}

		}

	} else {

		add_action( 'user_register', 'add_user' ); // See above

		return edit_user();

	}

}

/**

 * Edit user settings based on contents of $_POST

 *

 * Used on user-edit.php and profile.php to manage and process user options, passwords etc.

 *

 * @since 2.0

 *

 * @param int $user_id Optional. User ID.

 * @return int user id of the updated user

 */

function edit_user( $user_id = 0 ) {

	global $current_user, $wp_roles, $wpdb;

	if ( $user_id != 0 ) {

		$update = true;

		$user->ID = (int) $user_id;

		$userdata = get_userdata( $user_id );

		$user->user_login = $wpdb->escape( $userdata->user_login );

	} else {

		$update = false;

		$user = '';

	}

	if ( !$update && isset( $_POST['user_login'] ) )

		$user->user_login = sanitize_user($_POST['user_login'], true);

	$pass1 = $pass2 = '';

	if ( isset( $_POST['pass1'] ))

		$pass1 = $_POST['pass1'];

	if ( isset( $_POST['pass2'] ))

		$pass2 = $_POST['pass2'];

	if ( isset( $_POST['role'] ) && current_user_can( 'edit_users' ) ) {

		$new_role = sanitize_text_field( $_POST['role'] );

		// Don't let anyone with 'edit_users' (admins) edit their own role to something without it.

		if( $user_id != $current_user->id || $wp_roles->role_objects[$new_role]->has_cap( 'edit_users' ))

			$user->role = $new_role;

		// If the new role isn't editable by the logged-in user die with error

		$editable_roles = get_editable_roles();

		if ( !$editable_roles[$new_role] )

			wp_die(__('You can’t give users that role.'));

	}

	if ( isset( $_POST['email'] ))

		$user->user_email = sanitize_text_field( $_POST['email'] );

	if ( isset( $_POST['url'] ) ) {

		if ( empty ( $_POST['url'] ) || $_POST['url'] == 'http://' ) {

			$user->user_url = '';

		} else {

			$user->user_url = sanitize_url( $_POST['url'] );

			$user->user_url = preg_match('/^(https?|ftps?|mailto|news|irc|gopher|nntp|feed|telnet):/is', $user->user_url) ? $user->user_url : 'http://'.$user->user_url;

		}

	}

	if ( isset( $_POST['first_name'] ) )

		$user->first_name = sanitize_text_field( $_POST['first_name'] );

	if ( isset( $_POST['last_name'] ) )

		$user->last_name = sanitize_text_field( $_POST['last_name'] );

	if ( isset( $_POST['nickname'] ) )

		$user->nickname = sanitize_text_field( $_POST['nickname'] );

	if ( isset( $_POST['display_name'] ) )

		$user->display_name = sanitize_text_field( $_POST['display_name'] );

	if ( isset( $_POST['description'] ) )

		$user->description = trim( $_POST['description'] );

	foreach ( _wp_get_user_contactmethods() as $method => $name ) {

		if ( isset( $_POST[$method] ))

			$user->$method = sanitize_text_field( $_POST[$method] );

	}

	if ( $update ) {

		$user->rich_editing = isset( $_POST['rich_editing'] ) && 'false' == $_POST['rich_editing'] ? 'false' : 'true';

		$user->admin_color = isset( $_POST['admin_color'] ) ? sanitize_text_field( $_POST['admin_color'] ) : 'fresh';

	}

	$user->comment_shortcuts = isset( $_POST['comment_shortcuts'] ) && 'true' == $_POST['comment_shortcuts'] ? 'true' : '';

	$user->use_ssl = 0;

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

		$user->use_ssl = 1;

	$errors = new WP_Error();

	/* checking that username has been typed */

	if ( $user->user_login == '' )

		$errors->add( 'user_login', __( '<strong>ERROR</strong>: Please enter a username.' ));

	/* checking the password has been typed twice */

	do_action_ref_array( 'check_passwords', array ( $user->user_login, & $pass1, & $pass2 ));

	if ( $update ) {

		if ( empty($pass1) && !empty($pass2) )

			$errors->add( 'pass', __( '<strong>ERROR</strong>: You entered your new password only once.' ), array( 'form-field' => 'pass1' ) );

		elseif ( !empty($pass1) && empty($pass2) )

			$errors->add( 'pass', __( '<strong>ERROR</strong>: You entered your new password only once.' ), array( 'form-field' => 'pass2' ) );

	} else {

		if ( empty($pass1) )

			$errors->add( 'pass', __( '<strong>ERROR</strong>: Please enter your password.' ), array( 'form-field' => 'pass1' ) );

		elseif ( empty($pass2) )

			$errors->add( 'pass', __( '<strong>ERROR</strong>: Please enter your password twice.' ), array( 'form-field' => 'pass2' ) );

	}

	/* Check for "\" in password */

	if ( false !== strpos( stripslashes($pass1), "\\" ) )

		$errors->add( 'pass', __( '<strong>ERROR</strong>: Passwords may not contain the character "\\".' ), array( 'form-field' => 'pass1' ) );

	/* checking the password has been typed twice the same */

	if ( $pass1 != $pass2 )

		$errors->add( 'pass', __( '<strong>ERROR</strong>: Please enter the same password in the two password fields.' ), array( 'form-field' => 'pass1' ) );

	if ( !empty( $pass1 ) )

		$user->user_pass = $pass1;

	if ( !$update && !validate_username( $user->user_login ) )

		$errors->add( 'user_login', __( '<strong>ERROR</strong>: This username is invalid. Please enter a valid username.' ));

	if ( !$update && username_exists( $user->user_login ) )

		$errors->add( 'user_login', __( '<strong>ERROR</strong>: This username is already registered. Please choose another one.' ));

	/* checking e-mail address */

	if ( empty( $user->user_email ) ) {

		$errors->add( 'empty_email', __( '<strong>ERROR</strong>: Please enter an e-mail address.' ), array( 'form-field' => 'email' ) );

	} elseif ( !is_email( $user->user_email ) ) {

		$errors->add( 'invalid_email', __( '<strong>ERROR</strong>: The e-mail address isn&#8217;t correct.' ), array( 'form-field' => 'email' ) );

	} elseif ( ( $owner_id = email_exists($user->user_email) ) && $owner_id != $user->ID ) {

		$errors->add( 'email_exists', __('<strong>ERROR</strong>: This email is already registered, please choose another one.'), array( 'form-field' => 'email' ) );

	}

	// Allow plugins to return their own errors.

	do_action_ref_array('user_profile_update_errors', array ( &$errors, $update, &$user ) );

	if ( $errors->get_error_codes() )

		return $errors;

	if ( $update ) {

		$user_id = wp_update_user( get_object_vars( $user ) );

	} else {

		$user_id = wp_insert_user( get_object_vars( $user ) );

		wp_new_user_notification( $user_id, isset($_POST['send_password']) ? $pass1 : '' );

	}

	return $user_id;

}

/**

 * {@internal Missing Short Description}}

 *

 * {@internal Missing Long Description}}

 *

 * @since unknown

 *

 * @return array List of user IDs.

 */

function get_author_user_ids() {

	global $wpdb;

	$level_key = $wpdb->prefix . 'user_level';

	return $wpdb->get_col( $wpdb->prepare("SELECT user_id FROM $wpdb->usermeta WHERE meta_key = %s AND meta_value != '0'", $level_key) );

}

/**

 * {@internal Missing Short Description}}

 *

 * {@internal Missing Long Description}}

 *

 * @since unknown

 *

 * @param int $user_id User ID.

 * @return array|bool List of editable authors. False if no editable users.

 */

function get_editable_authors( $user_id ) {

	global $wpdb;

	$editable = get_editable_user_ids( $user_id );

	if( !$editable ) {

		return false;

	} else {

		$editable = join(',', $editable);

		$authors = $wpdb->get_results( "SELECT * FROM $wpdb->users WHERE ID IN ($editable) ORDER BY display_name" );

	}

	return apply_filters('get_editable_authors', $authors);

}

/**

 * {@internal Missing Short Description}}

 *

 * {@internal Missing Long Description}}

 *

 * @since unknown

 *

 * @param int $user_id User ID.

 * @param bool $exclude_zeros Optional, default is true. Whether to exclude zeros.

 * @return unknown

 */

function get_editable_user_ids( $user_id, $exclude_zeros = true, $post_type = 'post' ) {

	global $wpdb;

	$user = new WP_User( $user_id );

	if ( ! $user->has_cap("edit_others_{$post_type}s") ) {

		if ( $user->has_cap("edit_{$post_type}s") || $exclude_zeros == false )

			return array($user->id);

		else

			return array();

	}

	$level_key = $wpdb->prefix . 'user_level';

	$query = $wpdb->prepare("SELECT user_id FROM $wpdb->usermeta WHERE meta_key = %s", $level_key);

	if ( $exclude_zeros )

		$query .= " AND meta_value != '0'";

	return $wpdb->get_col( $query );

}

/**

 * Fetch a filtered list of user roles that the current user is

 * allowed to edit.

 *

 * Simple function who's main purpose is to allow filtering of the

 * list of roles in the $wp_roles object so that plugins can remove

 * innappropriate ones depending on the situation or user making edits.

 * Specifically because without filtering anyone with the edit_users

 * capability can edit others to be administrators, even if they are

 * only editors or authors. This filter allows admins to delegate

 * user management.

 *

 * @since 2.8

 *

 * @return unknown

 */

function get_editable_roles() {

	global $wp_roles;

	$all_roles = $wp_roles->roles;

	$editable_roles = apply_filters('editable_roles', $all_roles);

	return $editable_roles;

}

/**

 * {@internal Missing Short Description}}

 *

 * {@internal Missing Long Description}}

 *

 * @since unknown

 *

 * @return unknown

 */

function get_nonauthor_user_ids() {

	global $wpdb;

	$level_key = $wpdb->prefix . 'user_level';

	return $wpdb->get_col( $wpdb->prepare("SELECT user_id FROM $wpdb->usermeta WHERE meta_key = %s AND meta_value = '0'", $level_key) );

}

/**

 * Retrieve editable posts from other users.

 *

 * @since unknown

 *

 * @param int $user_id User ID to not retrieve posts from.

 * @param string $type Optional, defaults to 'any'. Post type to retrieve, can be 'draft' or 'pending'.

 * @return array List of posts from others.

 */

function get_others_unpublished_posts($user_id, $type='any') {

	global $wpdb;

	$editable = get_editable_user_ids( $user_id );

	if ( in_array($type, array('draft', 'pending')) )

		$type_sql = " post_status = '$type' ";

	else

		$type_sql = " ( post_status = 'draft' OR post_status = 'pending' ) ";

	$dir = ( 'pending' == $type ) ? 'ASC' : 'DESC';

	if( !$editable ) {

		$other_unpubs = '';

	} else {

		$editable = join(',', $editable);

		$other_unpubs = $wpdb->get_results( $wpdb->prepare("SELECT ID, post_title, post_author FROM $wpdb->posts WHERE post_type = 'post' AND $type_sql AND post_author IN ($editable) AND post_author != %d ORDER BY post_modified $dir", $user_id) );

	}

	return apply_filters('get_others_drafts', $other_unpubs);

}

/**

 * Retrieve drafts from other users.

 *

 * @since unknown

 *

 * @param int $user_id User ID.

 * @return array List of drafts from other users.

 */

function get_others_drafts($user_id) {

	return get_others_unpublished_posts($user_id, 'draft');

}

/**

 * Retrieve pending review posts from other users.

 *

 * @since unknown

 *

 * @param int $user_id User ID.

 * @return array List of posts with pending review post type from other users.

 */

function get_others_pending($user_id) {

	return get_others_unpublished_posts($user_id, 'pending');

}

/**

 * Retrieve user data and filter it.

 *

 * @since unknown

 *

 * @param int $user_id User ID.

 * @return object WP_User object with user data.

 */

function get_user_to_edit( $user_id ) {

	$user = new WP_User( $user_id );

	$user_contactmethods = _wp_get_user_contactmethods();

	foreach ($user_contactmethods as $method => $name) {

		if ( empty( $user->{$method} ) )

			$user->{$method} = '';

	}

	if ( empty($user->description) )

		$user->description = '';

	$user = sanitize_user_object($user, 'edit');

	return $user;

}

/**

 * Retrieve the user's drafts.

 *

 * @since unknown

 *

 * @param int $user_id User ID.

 * @return array

 */

function get_users_drafts( $user_id ) {

	global $wpdb;

	$query = $wpdb->prepare("SELECT ID, post_title FROM $wpdb->posts WHERE post_type = 'post' AND post_status = 'draft' AND post_author = %d ORDER BY post_modified DESC", $user_id);

	$query = apply_filters('get_users_drafts', $query);

	return $wpdb->get_results( $query );

}

/**

 * Remove user and optionally reassign posts and links to another user.

 *

 * If the $reassign parameter is not assigned to an User ID, then all posts will

 * be deleted of that user. The action 'delete_user' that is passed the User ID

 * being deleted will be run after the posts are either reassigned or deleted.

 * The user meta will also be deleted that are for that User ID.

 *

 * @since unknown

 *

 * @param int $id User ID.

 * @param int $reassign Optional. Reassign posts and links to new User ID.

 * @return bool True when finished.

 */

function wp_delete_user($id, $reassign = 'novalue') {

	global $wpdb;