<?php

/**

 * Multisite WordPress API

 *

 * @package WordPress

 * @subpackage Multisite

 * @since 3.0.0

 */

/**

 * Gets the network's site and user counts.

 *

 *

 * @return array Site and user count for the network.

 */

function get_sitestats() {

	$stats = array(

		'blogs' => get_blog_count(),

		'users' => get_user_count(),

	);

	return $stats;

}

/**

 * Get one of a user's active blogs

 *

 * Returns the user's primary blog, if they have one and

 * it is active. If it's inactive, function returns another

 * active blog of the user. If none are found, the user

 * is added as a Subscriber to the Dashboard Blog and that blog

 * is returned.

 *

 *

 * @param int $user_id The unique ID of the user

 */

function get_active_blog_for_user( $user_id ) {

	$blogs = get_blogs_of_user( $user_id );

	if ( empty( $blogs ) )

	$primary_blog = get_user_meta( $user_id, 'primary_blog', true );

	$first_blog = current($blogs);

	if ( false !== $primary_blog ) {

		if ( ! isset( $blogs[ $primary_blog ] ) ) {

			update_user_meta( $user_id, 'primary_blog', $first_blog->userblog_id );

		} else {

		}

	} else {

		//TODO Review this call to add_user_to_blog too - to get here the user must have a role on this blog?

	}

	if ( ( ! is_object( $primary ) ) || ( $primary->archived == 1 || $primary->spam == 1 || $primary->deleted == 1 ) ) {

		$blogs = get_blogs_of_user( $user_id, true ); // if a user's primary blog is shut down, check their other blogs.

		$ret = false;

		if ( is_array( $blogs ) && count( $blogs ) > 0 ) {

			foreach ( (array) $blogs as $blog_id => $blog ) {

					continue;

				if ( is_object( $details ) && $details->archived == 0 && $details->spam == 0 && $details->deleted == 0 ) {

					$ret = $blog;

					if ( get_user_meta( $user_id , 'primary_blog', true ) != $blog_id )

						update_user_meta( $user_id, 'primary_blog', $blog_id );

					if ( !get_user_meta($user_id , 'source_domain', true) )

						update_user_meta( $user_id, 'source_domain', $blog->domain );

					break;

				}

			}

		} else {

		}

		return $ret;

	} else {

		return $primary;

	}

}

/**

 * The number of active users in your installation.

 *

 * The count is cached and updated twice daily. This is not a live count.

 *

 *

 */

}

/**

 * The number of active sites on your installation.

 *

 * The count is cached and updated twice daily. This is not a live count.

 *

 *

 */

}

/**

 * Get a blog post from any site on the network.

 *

 *

 * @param int $blog_id ID of the blog.

 * @param int $post_id ID of the post you're looking for.

 * @return WP_Post|null WP_Post on success or null on failure

 */

function get_blog_post( $blog_id, $post_id ) {

	switch_to_blog( $blog_id );

	$post = get_post( $post_id );

	restore_current_blog();

	return $post;

}

/**

 *

 *

 *

 */

function add_user_to_blog( $blog_id, $user_id, $role ) {

	switch_to_blog($blog_id);

	$user = get_userdata( $user_id );

	if ( ! $user ) {

		restore_current_blog();

		return new WP_Error( 'user_does_not_exist', __( 'The requested user does not exist.' ) );

	}

	if ( !get_user_meta($user_id, 'primary_blog', true) ) {

		update_user_meta($user_id, 'primary_blog', $blog_id);

	}

	$user->set_role($role);

	/**

	 * Fires immediately after a user is added to a site.

	 *

	 *

	 * @param int    $user_id User ID.

	 * @param string $role    User role.

	 * @param int    $blog_id Blog ID.

	 */

	do_action( 'add_user_to_blog', $user_id, $role, $blog_id );

	wp_cache_delete( $user_id, 'users' );

	restore_current_blog();

	return true;

}

/**

 * Remove a user from a blog.

 *

 * users are removed from a blog.

 *

 * reassign the user's blog posts to another user upon removal.

 *

 *

 * @param string $reassign Optional. A user to whom to reassign posts.

 */

function remove_user_from_blog($user_id, $blog_id = '', $reassign = '') {

	global $wpdb;

	switch_to_blog($blog_id);

	$user_id = (int) $user_id;

	/**

	 * Fires before a user is removed from a site.

	 *

	 *

	 * @param int $user_id User ID.

	 * @param int $blog_id Blog ID.

	 */

	do_action( 'remove_user_from_blog', $user_id, $blog_id );

	// If being removed from the primary blog, set a new primary if the user is assigned

	// to multiple blogs.

	$primary_blog = get_user_meta($user_id, 'primary_blog', true);

	if ( $primary_blog == $blog_id ) {

		$new_id = '';

		$new_domain = '';

		$blogs = get_blogs_of_user($user_id);

		foreach ( (array) $blogs as $blog ) {

			if ( $blog->userblog_id == $blog_id )

				continue;

			$new_id = $blog->userblog_id;

			$new_domain = $blog->domain;

			break;

		}

		update_user_meta($user_id, 'primary_blog', $new_id);

		update_user_meta($user_id, 'source_domain', $new_domain);

	}

	// wp_revoke_user($user_id);

	$user = get_userdata( $user_id );

	if ( ! $user ) {

		restore_current_blog();

		return new WP_Error('user_does_not_exist', __('That user does not exist.'));

	}

	$user->remove_all_caps();

	$blogs = get_blogs_of_user($user_id);

	if ( count($blogs) == 0 ) {

		update_user_meta($user_id, 'primary_blog', '');

		update_user_meta($user_id, 'source_domain', '');

	}

	if ( $reassign != '' ) {

		$reassign = (int) $reassign;

		$post_ids = $wpdb->get_col( $wpdb->prepare( "SELECT ID FROM $wpdb->posts WHERE post_author = %d", $user_id ) );

		$link_ids = $wpdb->get_col( $wpdb->prepare( "SELECT link_id FROM $wpdb->links WHERE link_owner = %d", $user_id ) );

		if ( ! empty( $post_ids ) ) {

			$wpdb->query( $wpdb->prepare( "UPDATE $wpdb->posts SET post_author = %d WHERE post_author = %d", $reassign, $user_id ) );

			array_walk( $post_ids, 'clean_post_cache' );

		}

		if ( ! empty( $link_ids ) ) {

			$wpdb->query( $wpdb->prepare( "UPDATE $wpdb->links SET link_owner = %d WHERE link_owner = %d", $reassign, $user_id ) );

			array_walk( $link_ids, 'clean_bookmark_cache' );

		}

	}

	restore_current_blog();

	return true;

}

/**

 * Get the permalink for a post on another blog.

 *

 *

 * @param int $blog_id ID of the source blog.

 * @param int $post_id ID of the desired post.

 * @return string The post's permalink

 */

function get_blog_permalink( $blog_id, $post_id ) {

	switch_to_blog( $blog_id );

	$link = get_permalink( $post_id );

	restore_current_blog();

	return $link;

}

/**

 * Get a blog's numeric ID from its URL.

 *

 * On a subdirectory installation like example.com/blog1/,

 * $domain will be the root 'example.com' and $path the

 * subdirectory '/blog1/'. With subdomains like blog1.example.com,

 * $domain is 'blog1.example.com' and $path is '/'.

 *

 *

 * @param string $domain

 * @return int 0 if no blog found, otherwise the ID of the matching blog

 */

function get_blog_id_from_url( $domain, $path = '/' ) {

	$domain = strtolower( $domain );

	$path = strtolower( $path );

	$id = wp_cache_get( md5( $domain . $path ), 'blog-id-cache' );

	if ( $id == -1 ) // blog does not exist

		return 0;

	elseif ( $id )

		return (int) $id;

	if ( ! $id ) {

		wp_cache_set( md5( $domain . $path ), -1, 'blog-id-cache' );

		return 0;

	}

	wp_cache_set( md5( $domain . $path ), $id, 'blog-id-cache' );

	return $id;

}

// Admin functions

/**

 * Checks an email address against a list of banned domains.

 *

 * This function checks against the Banned Email Domains list

 * at wp-admin/network/settings.php. The check is only run on

 * self-registrations; user creation at wp-admin/network/users.php

 * bypasses this check.

 *

 *

 * @param string $user_email The email provided by the user at registration.

 * @return bool Returns true when the email address is banned.

 */

function is_email_address_unsafe( $user_email ) {

	$banned_names = get_site_option( 'banned_email_domains' );

	if ( $banned_names && ! is_array( $banned_names ) )

		$banned_names = explode( "\n", $banned_names );

	$is_email_address_unsafe = false;

		$banned_names = array_map( 'strtolower', $banned_names );

		$normalized_email = strtolower( $user_email );

		list( $email_local_part, $email_domain ) = explode( '@', $normalized_email );

		foreach ( $banned_names as $banned_domain ) {

			if ( ! $banned_domain )

				continue;

			if ( $email_domain == $banned_domain ) {

				$is_email_address_unsafe = true;

				break;

			}

			$dotted_domain = ".$banned_domain";

			if ( $dotted_domain === substr( $normalized_email, -strlen( $dotted_domain ) ) ) {

				$is_email_address_unsafe = true;

				break;

			}

		}

	}

	/**

	 *

	 * @since 3.5.0

	 *

	 * @param bool   $is_email_address_unsafe Whether the email address is "unsafe". Default false.

	 * @param string $user_email              User email address.

	 */

	return apply_filters( 'is_email_address_unsafe', $is_email_address_unsafe, $user_email );

}

/**

 * Sanitize and validate data required for a user sign-up.

 *

 * Verifies the validity and uniqueness of user names and user email addresses,

 * and checks email addresses against admin-provided domain whitelists and blacklists.

 *

 * The {@see 'wpmu_validate_user_signup'} hook provides an easy way to modify the sign-up

 * process. The value $result, which is passed to the hook, contains both the user-provided

 * info and the error messages created by the function. {@see 'wpmu_validate_user_signup'}