<?php

/**

 * These functions can be replaced via plugins. If plugins do not redefine these

 * functions, then these will be used instead.

 *

 * @package WordPress

 */

if ( !function_exists('wp_set_current_user') ) :

/**

 * Changes the current user by ID or name.

 *

 * Set $id to null and specify a name if you do not know a user's ID.

 *

 * Some WordPress functionality is based on the current user and not based on

 * the signed in user. Therefore, it opens the ability to edit and perform

 * actions on users who aren't signed in.

 *

 * @since 2.0.3

 * @global object $current_user The current user object which holds the user data.

 * @uses do_action() Calls 'set_current_user' hook after setting the current user.

 *

 * @param int $id User ID

 * @param string $name User's username

 * @return WP_User Current user User object

 */

function wp_set_current_user($id, $name = '') {

	global $current_user;

	if ( isset( $current_user ) && ( $current_user instanceof WP_User ) && ( $id == $current_user->ID ) )

		return $current_user;

	$current_user = new WP_User( $id, $name );

	setup_userdata( $current_user->ID );

	do_action('set_current_user');

	return $current_user;

}

endif;

if ( !function_exists('wp_get_current_user') ) :

/**

 * Retrieve the current user object.

 *

 * @since 2.0.3

 *

 * @return WP_User Current user WP_User object

 */

function wp_get_current_user() {

	global $current_user;

	get_currentuserinfo();

	return $current_user;

}

endif;

if ( !function_exists('get_currentuserinfo') ) :

/**

 * Populate global variables with information about the currently logged in user.

 *

 * Will set the current user, if the current user is not set. The current user

 * will be set to the logged in person. If no user is logged in, then it will

 * set the current user to 0, which is invalid and won't have any permissions.

 *

 * @since 0.71

 * @uses $current_user Checks if the current user is set

 * @uses wp_validate_auth_cookie() Retrieves current logged in user.

 *

 * @return bool|null False on XMLRPC Request and invalid auth cookie. Null when current user set

 */

function get_currentuserinfo() {

	global $current_user;

	if ( ! empty( $current_user ) ) {

		if ( $current_user instanceof WP_User )

			return;

		// Upgrade stdClass to WP_User

		if ( is_object( $current_user ) && isset( $current_user->ID ) ) {

			$cur_id = $current_user->ID;

			$current_user = null;

			wp_set_current_user( $cur_id );

			return;

		}

		// $current_user has a junk value. Force to WP_User with ID 0.

		$current_user = null;

		wp_set_current_user( 0 );

		return false;

	}

	if ( defined('XMLRPC_REQUEST') && XMLRPC_REQUEST ) {

		wp_set_current_user( 0 );

		return false;

	}

	if ( ! $user = wp_validate_auth_cookie() ) {

		 if ( is_blog_admin() || is_network_admin() || empty( $_COOKIE[LOGGED_IN_COOKIE] ) || !$user = wp_validate_auth_cookie( $_COOKIE[LOGGED_IN_COOKIE], 'logged_in' ) ) {

		 	wp_set_current_user( 0 );

		 	return false;

		 }

	}

	wp_set_current_user( $user );

}

endif;

if ( !function_exists('get_userdata') ) :

/**

 * Retrieve user info by user ID.

 *

 * @since 0.71

 *

 * @param int $user_id User ID

 * @return WP_User|bool WP_User object on success, false on failure.

 */

function get_userdata( $user_id ) {

	return get_user_by( 'id', $user_id );

}

endif;

if ( !function_exists('get_user_by') ) :

/**

 * Retrieve user info by a given field

 *

 * @since 2.8.0

 *

 * @param string $field The field to retrieve the user with. id | slug | email | login

 * @param int|string $value A value for $field. A user ID, slug, email address, or login name.

 * @return WP_User|bool WP_User object on success, false on failure.

 */

function get_user_by( $field, $value ) {

	$userdata = WP_User::get_data_by( $field, $value );

	if ( !$userdata )

		return false;

	$user = new WP_User;

	$user->init( $userdata );

	return $user;

}

endif;

if ( !function_exists('cache_users') ) :

/**

 * Retrieve info for user lists to prevent multiple queries by get_userdata()

 *

 * @since 3.0.0

 *

 * @param array $user_ids User ID numbers list

 */

function cache_users( $user_ids ) {

	global $wpdb;

	$clean = _get_non_cached_ids( $user_ids, 'users' );

	if ( empty( $clean ) )

		return;

	$list = implode( ',', $clean );

	$users = $wpdb->get_results( "SELECT * FROM $wpdb->users WHERE ID IN ($list)" );

	$ids = array();

	foreach ( $users as $user ) {

		update_user_caches( $user );

		$ids[] = $user->ID;

	}

	update_meta_cache( 'user', $ids );

}

endif;

if ( !function_exists( 'wp_mail' ) ) :

/**

 * Send mail, similar to PHP's mail

 *

 * A true return value does not automatically mean that the user received the

 * email successfully. It just only means that the method used was able to

 * process the request without any errors.

 *

 * Using the two 'wp_mail_from' and 'wp_mail_from_name' hooks allow from

 * creating a from address like 'Name <email@address.com>' when both are set. If

 * just 'wp_mail_from' is set, then just the email address will be used with no

 * name.

 *

 * The default content type is 'text/plain' which does not allow using HTML.

 * However, you can set the content type of the email by using the

 * 'wp_mail_content_type' filter.

 *

 * The default charset is based on the charset used on the blog. The charset can

 * be set using the 'wp_mail_charset' filter.

 *

 * @since 1.2.1

 * @uses apply_filters() Calls 'wp_mail' hook on an array of all of the parameters.

 * @uses apply_filters() Calls 'wp_mail_from' hook to get the from email address.

 * @uses apply_filters() Calls 'wp_mail_from_name' hook to get the from address name.

 * @uses apply_filters() Calls 'wp_mail_content_type' hook to get the email content type.

 * @uses apply_filters() Calls 'wp_mail_charset' hook to get the email charset

 * @uses do_action_ref_array() Calls 'phpmailer_init' hook on the reference to

 *		phpmailer object.

 * @uses PHPMailer

 *

 * @param string|array $to Array or comma-separated list of email addresses to send message.

 * @param string $subject Email subject

 * @param string $message Message contents

 * @param string|array $headers Optional. Additional headers.

 * @param string|array $attachments Optional. Files to attach.

 * @return bool Whether the email contents were sent successfully.

 */

function wp_mail( $to, $subject, $message, $headers = '', $attachments = array() ) {

	// Compact the input, apply the filters, and extract them back out

	extract( apply_filters( 'wp_mail', compact( 'to', 'subject', 'message', 'headers', 'attachments' ) ) );

	if ( !is_array($attachments) )

		$attachments = explode( "\n", str_replace( "\r\n", "\n", $attachments ) );

	global $phpmailer;

	// (Re)create it, if it's gone missing

	if ( !is_object( $phpmailer ) || !is_a( $phpmailer, 'PHPMailer' ) ) {

		require_once ABSPATH . WPINC . '/class-phpmailer.php';

		require_once ABSPATH . WPINC . '/class-smtp.php';

		$phpmailer = new PHPMailer( true );

	}

	// Headers

	if ( empty( $headers ) ) {

		$headers = array();

	} else {

		if ( !is_array( $headers ) ) {

			// Explode the headers out, so this function can take both

			// string headers and an array of headers.

			$tempheaders = explode( "\n", str_replace( "\r\n", "\n", $headers ) );

		} else {

			$tempheaders = $headers;

		}

		$headers = array();

		$cc = array();

		$bcc = array();

		// If it's actually got contents

		if ( !empty( $tempheaders ) ) {

			// Iterate through the raw headers

			foreach ( (array) $tempheaders as $header ) {

				if ( strpos($header, ':') === false ) {

					if ( false !== stripos( $header, 'boundary=' ) ) {

						$parts = preg_split('/boundary=/i', trim( $header ) );

						$boundary = trim( str_replace( array( "'", '"' ), '', $parts[1] ) );

					}

					continue;

				}

				// Explode them out

				list( $name, $content ) = explode( ':', trim( $header ), 2 );

				// Cleanup crew

				$name    = trim( $name    );

				$content = trim( $content );

				switch ( strtolower( $name ) ) {

					// Mainly for legacy -- process a From: header if it's there

					case 'from':

						if ( strpos($content, '<' ) !== false ) {

							// So... making my life hard again?

							$from_name = substr( $content, 0, strpos( $content, '<' ) - 1 );

							$from_name = str_replace( '"', '', $from_name );

							$from_name = trim( $from_name );

							$from_email = substr( $content, strpos( $content, '<' ) + 1 );

							$from_email = str_replace( '>', '', $from_email );

							$from_email = trim( $from_email );

						} else {

							$from_email = trim( $content );

						}

						break;

					case 'content-type':

						if ( strpos( $content, ';' ) !== false ) {

							list( $type, $charset ) = explode( ';', $content );

							$content_type = trim( $type );

							if ( false !== stripos( $charset, 'charset=' ) ) {

								$charset = trim( str_replace( array( 'charset=', '"' ), '', $charset ) );

							} elseif ( false !== stripos( $charset, 'boundary=' ) ) {

								$boundary = trim( str_replace( array( 'BOUNDARY=', 'boundary=', '"' ), '', $charset ) );

								$charset = '';

							}

						} else {

							$content_type = trim( $content );

						}

						break;

					case 'cc':

						$cc = array_merge( (array) $cc, explode( ',', $content ) );

						break;

					case 'bcc':

						$bcc = array_merge( (array) $bcc, explode( ',', $content ) );

						break;

					default:

						// Add it to our grand headers array

						$headers[trim( $name )] = trim( $content );

						break;

				}

			}

		}

	}

	// Empty out the values that may be set

	$phpmailer->ClearAddresses();

	$phpmailer->ClearAllRecipients();

	$phpmailer->ClearAttachments();

	$phpmailer->ClearBCCs();

	$phpmailer->ClearCCs();

	$phpmailer->ClearCustomHeaders();

	$phpmailer->ClearReplyTos();

	// From email and name

	// If we don't have a name from the input headers

	if ( !isset( $from_name ) )

		$from_name = 'WordPress';

	/* If we don't have an email from the input headers default to wordpress@$sitename

	 * Some hosts will block outgoing mail from this address if it doesn't exist but

	 * there's no easy alternative. Defaulting to admin_email might appear to be another

	 * option but some hosts may refuse to relay mail from an unknown domain. See

	 * http://trac.wordpress.org/ticket/5007.

	 */

	if ( !isset( $from_email ) ) {

		// Get the site domain and get rid of www.

		$sitename = strtolower( $_SERVER['SERVER_NAME'] );

		if ( substr( $sitename, 0, 4 ) == 'www.' ) {

			$sitename = substr( $sitename, 4 );

		}

		$from_email = 'wordpress@' . $sitename;

	}

	// Plugin authors can override the potentially troublesome default

	$phpmailer->From     = apply_filters( 'wp_mail_from'     , $from_email );

	$phpmailer->FromName = apply_filters( 'wp_mail_from_name', $from_name  );

	// Set destination addresses

	if ( !is_array( $to ) )

		$to = explode( ',', $to );

	foreach ( (array) $to as $recipient ) {

		try {

			// Break $recipient into name and address parts if in the format "Foo <bar@baz.com>"

			$recipient_name = '';

			if( preg_match( '/(.*)<(.+)>/', $recipient, $matches ) ) {

				if ( count( $matches ) == 3 ) {

					$recipient_name = $matches[1];

					$recipient = $matches[2];

				}

			}

			$phpmailer->AddAddress( $recipient, $recipient_name);

		} catch ( phpmailerException $e ) {

			continue;

		}

	}

	// Set mail's subject and body

	$phpmailer->Subject = $subject;

	$phpmailer->Body    = $message;

	// Add any CC and BCC recipients

	if ( !empty( $cc ) ) {

		foreach ( (array) $cc as $recipient ) {

			try {

				// Break $recipient into name and address parts if in the format "Foo <bar@baz.com>"

				$recipient_name = '';

				if( preg_match( '/(.*)<(.+)>/', $recipient, $matches ) ) {

					if ( count( $matches ) == 3 ) {

						$recipient_name = $matches[1];

						$recipient = $matches[2];

					}

				}

				$phpmailer->AddCc( $recipient, $recipient_name );

			} catch ( phpmailerException $e ) {

				continue;

			}

		}

	}

	if ( !empty( $bcc ) ) {

		foreach ( (array) $bcc as $recipient) {

			try {

				// Break $recipient into name and address parts if in the format "Foo <bar@baz.com>"

				$recipient_name = '';

				if( preg_match( '/(.*)<(.+)>/', $recipient, $matches ) ) {

					if ( count( $matches ) == 3 ) {

						$recipient_name = $matches[1];

						$recipient = $matches[2];

					}

				}

				$phpmailer->AddBcc( $recipient, $recipient_name );

			} catch ( phpmailerException $e ) {

				continue;

			}

		}

	}

	// Set to use PHP's mail()

	$phpmailer->IsMail();

	// Set Content-Type and charset

	// If we don't have a content-type from the input headers

	if ( !isset( $content_type ) )

		$content_type = 'text/plain';

	$content_type = apply_filters( 'wp_mail_content_type', $content_type );

	$phpmailer->ContentType = $content_type;

	// Set whether it's plaintext, depending on $content_type

	if ( 'text/html' == $content_type )

		$phpmailer->IsHTML( true );

	// If we don't have a charset from the input headers

	if ( !isset( $charset ) )

		$charset = get_bloginfo( 'charset' );

	// Set the content-type and charset

	$phpmailer->CharSet = apply_filters( 'wp_mail_charset', $charset );