<?php

/**

 * Site/blog functions that work with the blogs table and related data.

 *

 * @package WordPress

 * @subpackage Multisite

 * @since MU

 */

/**

 * Update the last_updated field for the current blog.

 *

 * @since MU

 */

function wpmu_update_blogs_date() {

	global $wpdb;

	update_blog_details( $wpdb->blogid, array('last_updated' => current_time('mysql', true)) );

	do_action( 'wpmu_blog_updated', $wpdb->blogid );

}

/**

 * Get a full blog URL, given a blog id.

 *

 * @since MU

 *

 * @param int $blog_id Blog ID

 * @return string

 */

function get_blogaddress_by_id( $blog_id ) {

	$bloginfo = get_blog_details( (int) $blog_id, false ); // only get bare details!

	return esc_url( 'http://' . $bloginfo->domain . $bloginfo->path );

}

/**

 * Get a full blog URL, given a blog name.

 *

 * @since MU

 *

 * @param string $blogname The (subdomain or directory) name

 * @return string

 */

function get_blogaddress_by_name( $blogname ) {

	global $current_site;

	if ( is_subdomain_install() ) {

		if ( $blogname == 'main' )

			$blogname = 'www';

		$url = rtrim( network_home_url(), '/' );

		if ( !empty( $blogname ) )

			$url = preg_replace( '|^([^\.]+://)|', '$1' . $blogname . '.', $url );

	} else {

		$url = network_home_url( $blogname );

	}

	return esc_url( $url . '/' );

}

/**

 * Get a full blog URL, given a domain and a path.

 *

 * @since MU

 *

 * @param string $domain

 * @param string $path

 * @return string

 */

function get_blogaddress_by_domain( $domain, $path ) {

	if ( is_subdomain_install() ) {

		$url = "http://" . $domain.$path;

	} else {

		if ( $domain != $_SERVER['HTTP_HOST'] ) {

			$blogname = substr( $domain, 0, strpos( $domain, '.' ) );

			$url = 'http://' . substr( $domain, strpos( $domain, '.' ) + 1 ) . $path;

			// we're not installing the main blog

			if ( $blogname != 'www.' )

				$url .= $blogname . '/';

		} else { // main blog

			$url = 'http://' . $domain . $path;

		}

	}

	return esc_url( $url );

}

/**

 * Given a blog's (subdomain or directory) slug, retrieve it's id.

 *

 * @since MU

 *

 * @param string $slug

 * @return int A blog id

 */

function get_id_from_blogname( $slug ) {

	global $wpdb, $current_site;

	$slug = trim( $slug, '/' );

	$blog_id = wp_cache_get( 'get_id_from_blogname_' . $slug, 'blog-details' );

	if ( $blog_id )

		return $blog_id;

	if ( is_subdomain_install() ) {

		$domain = $slug . '.' . $current_site->domain;

		$path = $current_site->path;

	} else {

		$domain = $current_site->domain;

		$path = $current_site->path . $slug . '/';

	}

	$blog_id = $wpdb->get_var( $wpdb->prepare("SELECT blog_id FROM {$wpdb->blogs} WHERE domain = %s AND path = %s", $domain, $path) );

	wp_cache_set( 'get_id_from_blogname_' . $slug, $blog_id, 'blog-details' );

	return $blog_id;

}

/**

 * Retrieve the details for a blog from the blogs table and blog options.

 *

 * @since MU

 *

 * @param int|string|array $fields A blog ID, a blog slug, or an array of fields to query against. Optional. If not specified the current blog ID is used.

 * @param bool $get_all Whether to retrieve all details or only the details in the blogs table. Default is true.

 * @return object Blog details.

 */

function get_blog_details( $fields = null, $get_all = true ) {

	global $wpdb;

	if ( is_array($fields ) ) {

		if ( isset($fields['blog_id']) ) {

			$blog_id = $fields['blog_id'];

		} elseif ( isset($fields['domain']) && isset($fields['path']) ) {

			$key = md5( $fields['domain'] . $fields['path'] );

			$blog = wp_cache_get($key, 'blog-lookup');

			if ( false !== $blog )

				return $blog;

			if ( substr( $fields['domain'], 0, 4 ) == 'www.' ) {

				$nowww = substr( $fields['domain'], 4 );

				$blog = $wpdb->get_row( $wpdb->prepare( "SELECT * FROM $wpdb->blogs WHERE domain IN (%s,%s) AND path = %s ORDER BY CHAR_LENGTH(domain) DESC", $nowww, $fields['domain'], $fields['path'] ) );

			} else {

				$blog = $wpdb->get_row( $wpdb->prepare( "SELECT * FROM $wpdb->blogs WHERE domain = %s AND path = %s", $fields['domain'], $fields['path'] ) );

			}

			if ( $blog ) {

				wp_cache_set($blog->blog_id . 'short', $blog, 'blog-details');

				$blog_id = $blog->blog_id;

			} else {

				return false;

			}

		} elseif ( isset($fields['domain']) && is_subdomain_install() ) {

			$key = md5( $fields['domain'] );

			$blog = wp_cache_get($key, 'blog-lookup');

			if ( false !== $blog )

				return $blog;

			if ( substr( $fields['domain'], 0, 4 ) == 'www.' ) {

				$nowww = substr( $fields['domain'], 4 );

				$blog = $wpdb->get_row( $wpdb->prepare( "SELECT * FROM $wpdb->blogs WHERE domain IN (%s,%s) ORDER BY CHAR_LENGTH(domain) DESC", $nowww, $fields['domain'] ) );

			} else {

				$blog = $wpdb->get_row( $wpdb->prepare( "SELECT * FROM $wpdb->blogs WHERE domain = %s", $fields['domain'] ) );

			}

			if ( $blog ) {

				wp_cache_set($blog->blog_id . 'short', $blog, 'blog-details');

				$blog_id = $blog->blog_id;

			} else {

				return false;

			}

		} else {

			return false;

		}

	} else {

		if ( ! $fields )

			$blog_id = get_current_blog_id();

		elseif ( ! is_numeric( $fields ) )

			$blog_id = get_id_from_blogname( $fields );

		else

			$blog_id = $fields;

	}

	$blog_id = (int) $blog_id;

	$all = $get_all == true ? '' : 'short';

	$details = wp_cache_get( $blog_id . $all, 'blog-details' );

	if ( $details ) {

		if ( ! is_object( $details ) ) {

			if ( $details == -1 ) {

				return false;

			} else {

				// Clear old pre-serialized objects. Cache clients do better with that.

				wp_cache_delete( $blog_id . $all, 'blog-details' );

				unset($details);

			}

		} else {

			return $details;

		}

	}

	// Try the other cache.

	if ( $get_all ) {

		$details = wp_cache_get( $blog_id . 'short', 'blog-details' );

	} else {

		$details = wp_cache_get( $blog_id, 'blog-details' );

		// If short was requested and full cache is set, we can return.

		if ( $details ) {

			if ( ! is_object( $details ) ) {

				if ( $details == -1 ) {

					return false;

				} else {

					// Clear old pre-serialized objects. Cache clients do better with that.

					wp_cache_delete( $blog_id, 'blog-details' );

					unset($details);

				}

			} else {

				return $details;

			}

		}

	}

	if ( empty($details) ) {

		$details = $wpdb->get_row( $wpdb->prepare( "SELECT * FROM $wpdb->blogs WHERE blog_id = %d /* get_blog_details */", $blog_id ) );

		if ( ! $details ) {

			// Set the full cache.

			wp_cache_set( $blog_id, -1, 'blog-details' );

			return false;

		}

	}

	if ( ! $get_all ) {

		wp_cache_set( $blog_id . $all, $details, 'blog-details' );

		return $details;

	}

	switch_to_blog( $blog_id );

	$details->blogname		= get_option( 'blogname' );

	$details->siteurl		= get_option( 'siteurl' );

	$details->post_count	= get_option( 'post_count' );

	restore_current_blog();

	$details = apply_filters( 'blog_details', $details );

	wp_cache_set( $blog_id . $all, $details, 'blog-details' );

	$key = md5( $details->domain . $details->path );

	wp_cache_set( $key, $details, 'blog-lookup' );

	return $details;

}

/**

 * Clear the blog details cache.

 *

 * @since MU

 *

 * @param int $blog_id Blog ID

 */

function refresh_blog_details( $blog_id ) {

	$blog_id = (int) $blog_id;

	$details = get_blog_details( $blog_id, false );

	clean_blog_cache( $details );

	do_action( 'refresh_blog_details', $blog_id );

}

/**

 * Update the details for a blog. Updates the blogs table for a given blog id.

 *

 * @since MU

 *

 * @param int $blog_id Blog ID

 * @param array $details Array of details keyed by blogs table field names.

 * @return bool True if update succeeds, false otherwise.

 */

function update_blog_details( $blog_id, $details = array() ) {

	global $wpdb;

	if ( empty($details) )

		return false;

	if ( is_object($details) )

		$details = get_object_vars($details);

	$current_details = get_blog_details($blog_id, false);

	if ( empty($current_details) )

		return false;

	$current_details = get_object_vars($current_details);

	$details = array_merge($current_details, $details);

	$details['last_updated'] = current_time('mysql', true);

	$update_details = array();

	$fields = array( 'site_id', 'domain', 'path', 'registered', 'last_updated', 'public', 'archived', 'mature', 'spam', 'deleted', 'lang_id');

	foreach ( array_intersect( array_keys( $details ), $fields ) as $field )

		$update_details[$field] = $details[$field];

	$result = $wpdb->update( $wpdb->blogs, $update_details, array('blog_id' => $blog_id) );

	if ( false === $result )

		return false;

	// If spam status changed, issue actions.

	if ( $details[ 'spam' ] != $current_details[ 'spam' ] ) {

		if ( $details[ 'spam' ] == 1 )

			do_action( 'make_spam_blog', $blog_id );

		else

			do_action( 'make_ham_blog', $blog_id );

	}

	// If mature status changed, issue actions.

	if ( $details[ 'mature' ] != $current_details[ 'mature' ] ) {

		if ( $details[ 'mature' ] == 1 )

			do_action( 'mature_blog', $blog_id );

		else

			do_action( 'unmature_blog', $blog_id );

	}

	// If archived status changed, issue actions.

	if ( $details[ 'archived' ] != $current_details[ 'archived' ] ) {

		if ( $details[ 'archived' ] == 1 )

			do_action( 'archive_blog', $blog_id );

		else

			do_action( 'unarchive_blog', $blog_id );

	}

	// If deleted status changed, issue actions.

	if ( $details[ 'deleted' ] != $current_details[ 'deleted' ] ) {

		if ( $details[ 'deleted' ] == 1 )

			do_action( 'make_delete_blog', $blog_id );

		else

			do_action( 'make_undelete_blog', $blog_id );

	}

	if ( isset( $details[ 'public' ] ) ) {

		switch_to_blog( $blog_id );

		update_option( 'blog_public', $details[ 'public' ] );

		restore_current_blog();

	}

	refresh_blog_details($blog_id);

	return true;

}

/**

 * Clean the blog cache

 *

 * @since 3.5.0

 *

 * @param stdClass $blog The blog details as returned from get_blog_details()

 */

function clean_blog_cache( $blog ) {

	$blog_id = $blog->blog_id;

	$domain_path_key = md5( $blog->domain . $blog->path );

	wp_cache_delete( $blog_id , 'blog-details' );

	wp_cache_delete( $blog_id . 'short' , 'blog-details' );

	wp_cache_delete(  $domain_path_key, 'blog-lookup' );

	wp_cache_delete( 'current_blog_' . $blog->domain, 'site-options' );

	wp_cache_delete( 'current_blog_' . $blog->domain . $blog->path, 'site-options' );

	wp_cache_delete( 'get_id_from_blogname_' . trim( $blog->path, '/' ), 'blog-details' );

	wp_cache_delete( $domain_path_key, 'blog-id-cache' );

}

/**

 * Retrieve option value for a given blog id based on name of option.

 *

 * If the option does not exist or does not have a value, then the return value

 * will be false. This is useful to check whether you need to install an option

 * and is commonly used during installation of plugin options and to test

 * whether upgrading is required.

 *

 * If the option was serialized then it will be unserialized when it is returned.

 *

 * @since MU

 *

 * @param int $id A blog ID. Can be null to refer to the current blog.

 * @param string $option Name of option to retrieve. Expected to not be SQL-escaped.

 * @param mixed $default Optional. Default value to return if the option does not exist.

 * @return mixed Value set for the option.

 */

function get_blog_option( $id, $option, $default = false ) {

	$id = (int) $id;

	if ( empty( $id ) )

		$id = get_current_blog_id();

	if ( get_current_blog_id() == $id )

		return get_option( $option, $default );

	switch_to_blog( $id );

	$value = get_option( $option, $default );

	restore_current_blog();

	return apply_filters( 'blog_option_' . $option, $value, $id );

}

/**

 * Add a new option for a given blog id.

 *

 * You do not need to serialize values. If the value needs to be serialized, then

 * it will be serialized before it is inserted into the database. Remember,

 * resources can not be serialized or added as an option.

 *

 * You can create options without values and then update the values later.

 * Existing options will not be updated and checks are performed to ensure that you

 * aren't adding a protected WordPress option. Care should be taken to not name

 * options the same as the ones which are protected.

 *