<?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) name, retrieve it's id.

 *

 * @since MU

 *

 * @param string $name

 * @return int A blog id

 */

function get_id_from_blogname( $name ) {

	global $wpdb, $current_site;

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

	if ( $blog_id )

		return $blog_id;

	if ( is_subdomain_install() ) {

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

		$path = $current_site->path;

	} else {

		$domain = $current_site->domain;

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

	}

	$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_' . $name, $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 name, or an array of fields to query against.

 * @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, $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 ( !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;

	}

	$details->blogname		= get_blog_option( $blog_id, 'blogname' );

	$details->siteurl		= get_blog_option( $blog_id, 'siteurl' );

	$details->post_count	= get_blog_option( $blog_id, 'post_count' );

	$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 );

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

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

	wp_cache_delete( md5( $details->domain . $details->path )  , 'blog-lookup' );

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

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

	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];

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

	// 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 ( isset($details[ 'public' ]) )

		update_blog_option( $blog_id, 'blog_public', $details[ 'public' ] );

	refresh_blog_details($blog_id);

	return true;

}

/**

 * Retrieve option value based on setting name and blog_id.

 *

 * 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.

 *

 * There is a filter called 'blog_option_$option' with the $option being

 * replaced with the option name. The filter takes two parameters. $value and

 * $blog_id. It returns $value.

 * The 'option_$option' filter in get_option() is not called.

 *

 * @since MU

 * @uses apply_filters() Calls 'blog_option_$optionname' with the option name value.

 *

 * @param int $blog_id Optional. Blog ID, can be null to refer to the current blog.

 * @param string $setting Name of option to retrieve. Should already be SQL-escaped.

 * @param string $default (optional) Default value returned if option not found.

 * @return mixed Value set for the option.

 */

function get_blog_option( $blog_id, $setting, $default = false ) {

	global $wpdb;

	if ( null === $blog_id )

		$blog_id = $wpdb->blogid;

	$key = $blog_id . '-' . $setting . '-blog_option';

	$value = wp_cache_get( $key, 'site-options' );

	if ( $value == null ) {

		if ( $blog_id == $wpdb->blogid ) {

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

			$notoptions = wp_cache_get( 'notoptions', 'options' );

			if ( isset( $notoptions[$setting] ) ) {

				wp_cache_set( $key, 'noop', 'site-options' );

				$value = $default;

			} elseif ( $value == false ) {

				wp_cache_set( $key, 'falsevalue', 'site-options' );

			} else {

				wp_cache_set( $key, $value, 'site-options' );

			}

			return apply_filters( 'blog_option_' . $setting, $value, $blog_id );

		} else {

			$blog_prefix = $wpdb->get_blog_prefix( $blog_id );

			$row = $wpdb->get_row( $wpdb->prepare( "SELECT * FROM {$blog_prefix}options WHERE option_name = %s", $setting ) );

			if ( is_object( $row ) ) { // Has to be get_row instead of get_var because of funkiness with 0, false, null values

				$value = $row->option_value;

				if ( $value == false )

					wp_cache_set( $key, 'falsevalue', 'site-options' );

				else

					wp_cache_set( $key, $value, 'site-options' );

			} else { // option does not exist, so we must cache its non-existence

				wp_cache_set( $key, 'noop', 'site-options' );

				$value = $default;

			}

		}

	} elseif ( $value == 'noop' ) {

		$value = $default;

	} elseif ( $value == 'falsevalue' ) {

		$value = false;

	}

	// If home is not set use siteurl.

	if ( 'home' == $setting && '' == $value )

		return get_blog_option( $blog_id, 'siteurl' );

	if ( 'siteurl' == $setting || 'home' == $setting || 'category_base' == $setting )

		$value = untrailingslashit( $value );

	return apply_filters( 'blog_option_' . $setting, maybe_unserialize( $value ), $blog_id );

}

/**

 * Add an option for a particular blog.

 *

 * @since MU

 *

 * @param int $id The blog id

 * @param string $key The option key

 * @param mixed $value The option value

 * @return bool True on success, false on failure.

 */

function add_blog_option( $id, $key, $value ) {

	$id = (int) $id;

	switch_to_blog($id);

	$return = add_option( $key, $value );

	restore_current_blog();

	if ( $return )

		wp_cache_set( $id . '-' . $key . '-blog_option', $value, 'site-options' );

	return $return;

}

/**

 * Delete an option for a particular blog.

 *

 * @since MU

 *

 * @param int $id The blog id

 * @param string $key The option key

 * @return bool True on success, false on failure.

 */

function delete_blog_option( $id, $key ) {