WordPress 3.4.1
[autoinstalls/wordpress.git] / wp-includes / functions.php
index 8cd9ba79c95e8767c9880a2f3cf5e9c4795c7b06..d0c5f5262c519a1f86056c5572724548289d57c5 100644 (file)
@@ -5,41 +5,40 @@
  * @package WordPress
  */
 
  * @package WordPress
  */
 
+require( ABSPATH . WPINC . '/option.php' );
+
 /**
 /**
- * Converts MySQL DATETIME field to user specified date format.
+ * Converts given date string into a different format.
  *
  *
- * If $dateformatstring has 'G' value, then gmmktime() function will be used to
- * make the time. If $dateformatstring is set to 'U', then mktime() function
- * will be used to make the time.
+ * $format should be either a PHP date format string, e.g. 'U' for a Unix
+ * timestamp, or 'G' for a Unix timestamp assuming that $date is GMT.
  *
  *
- * The $translate will only be used, if it is set to true and it is by default
- * and if the $wp_locale object has the month and weekday set.
+ * If $translate is true then the given date and format string will
+ * be passed to date_i18n() for translation.
  *
  * @since 0.71
  *
  *
  * @since 0.71
  *
- * @param string $dateformatstring Either 'G', 'U', or php date format.
- * @param string $mysqlstring Time from mysql DATETIME field.
- * @param bool $translate Optional. Default is true. Will switch format to locale.
- * @return string Date formated by $dateformatstring or locale (if available).
+ * @param string $format Format of the date to return.
+ * @param string $date Date string to convert.
+ * @param bool $translate Whether the return date should be translated. Default is true.
+ * @return string|int Formatted date string, or Unix timestamp.
  */
  */
-function mysql2date( $dateformatstring, $mysqlstring, $translate = true ) {
-       $m = $mysqlstring;
-       if ( empty( $m ) )
+function mysql2date( $format, $date, $translate = true ) {
+       if ( empty( $date ) )
                return false;
 
                return false;
 
-       if ( 'G' == $dateformatstring ) {
-               return strtotime( $m . ' +0000' );
-       }
+       if ( 'G' == $format )
+               return strtotime( $date . ' +0000' );
 
 
-       $i = strtotime( $m );
+       $i = strtotime( $date );
 
 
-       if ( 'U' == $dateformatstring )
+       if ( 'U' == $format )
                return $i;
 
                return $i;
 
-       if ( $translate)
-           return date_i18n( $dateformatstring, $i );
+       if ( $translate )
+               return date_i18n( $format, $i );
        else
        else
-           return date( $dateformatstring, $i );
+               return date( $format, $i );
 }
 
 /**
 }
 
 /**
@@ -85,8 +84,8 @@ function current_time( $type, $gmt = 0 ) {
 function date_i18n( $dateformatstring, $unixtimestamp = false, $gmt = false ) {
        global $wp_locale;
        $i = $unixtimestamp;
 function date_i18n( $dateformatstring, $unixtimestamp = false, $gmt = false ) {
        global $wp_locale;
        $i = $unixtimestamp;
-       // Sanity check for PHP 5.1.0-
-       if ( false === $i || intval($i) < 0 ) {
+
+       if ( false === $i ) {
                if ( ! $gmt )
                        $i = current_time( 'timestamp' );
                else
                if ( ! $gmt )
                        $i = current_time( 'timestamp' );
                else
@@ -119,6 +118,23 @@ function date_i18n( $dateformatstring, $unixtimestamp = false, $gmt = false ) {
 
                $dateformatstring = substr( $dateformatstring, 1, strlen( $dateformatstring ) -1 );
        }
 
                $dateformatstring = substr( $dateformatstring, 1, strlen( $dateformatstring ) -1 );
        }
+       $timezone_formats = array( 'P', 'I', 'O', 'T', 'Z', 'e' );
+       $timezone_formats_re = implode( '|', $timezone_formats );
+       if ( preg_match( "/$timezone_formats_re/", $dateformatstring ) ) {
+               $timezone_string = get_option( 'timezone_string' );
+               if ( $timezone_string ) {
+                       $timezone_object = timezone_open( $timezone_string );
+                       $date_object = date_create( null, $timezone_object );
+                       foreach( $timezone_formats as $timezone_format ) {
+                               if ( false !== strpos( $dateformatstring, $timezone_format ) ) {
+                                       $formatted = date_format( $date_object, $timezone_format );
+                                       $dateformatstring = ' '.$dateformatstring;
+                                       $dateformatstring = preg_replace( "/([^\\\])$timezone_format/", "\\1" . backslashit( $formatted ), $dateformatstring );
+                                       $dateformatstring = substr( $dateformatstring, 1, strlen( $dateformatstring ) -1 );
+                               }
+                       }
+               }
+       }
        $j = @$datefunc( $dateformatstring, $i );
        // allow plugins to redo this entirely for languages with untypical grammars
        $j = apply_filters('date_i18n', $j, $req_format, $i, $gmt);
        $j = @$datefunc( $dateformatstring, $i );
        // allow plugins to redo this entirely for languages with untypical grammars
        $j = apply_filters('date_i18n', $j, $req_format, $i, $gmt);
@@ -230,768 +246,61 @@ function maybe_unserialize( $original ) {
  */
 function is_serialized( $data ) {
        // if it isn't a string, it isn't serialized
  */
 function is_serialized( $data ) {
        // if it isn't a string, it isn't serialized
-       if ( !is_string( $data ) )
-               return false;
-       $data = trim( $data );
-       if ( 'N;' == $data )
-               return true;
-       if ( !preg_match( '/^([adObis]):/', $data, $badions ) )
-               return false;
-       switch ( $badions[1] ) {
-               case 'a' :
-               case 'O' :
-               case 's' :
-                       if ( preg_match( "/^{$badions[1]}:[0-9]+:.*[;}]\$/s", $data ) )
-                               return true;
-                       break;
-               case 'b' :
-               case 'i' :
-               case 'd' :
-                       if ( preg_match( "/^{$badions[1]}:[0-9.E-]+;\$/", $data ) )
-                               return true;
-                       break;
-       }
-       return false;
-}
-
-/**
- * Check whether serialized data is of string type.
- *
- * @since 2.0.5
- *
- * @param mixed $data Serialized data
- * @return bool False if not a serialized string, true if it is.
- */
-function is_serialized_string( $data ) {
-       // if it isn't a string, it isn't a serialized string
-       if ( !is_string( $data ) )
+       if ( ! is_string( $data ) )
                return false;
        $data = trim( $data );
                return false;
        $data = trim( $data );
-       if ( preg_match( '/^s:[0-9]+:.*;$/s', $data ) ) // this should fetch all serialized strings
-               return true;
-       return false;
-}
-
-/**
- * Retrieve option value 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 1.5.0
- * @package WordPress
- * @subpackage Option
- * @uses apply_filters() Calls 'pre_option_$option' before checking the option.
- *     Any value other than false will "short-circuit" the retrieval of the option
- *     and return the returned value. You should not try to override special options,
- *     but you will not be prevented from doing so.
- * @uses apply_filters() Calls 'option_$option', after checking the option, with
- *     the option value.
- *
- * @param string $option Name of option to retrieve. Expected to not be SQL-escaped.
- * @return mixed Value set for the option.
- */
-function get_option( $option, $default = false ) {
-       global $wpdb;
-
-       // Allow plugins to short-circuit options.
-       $pre = apply_filters( 'pre_option_' . $option, false );
-       if ( false !== $pre )
-               return $pre;
-
-       $option = trim($option);
-       if ( empty($option) )
-               return false;
-
-       if ( defined( 'WP_SETUP_CONFIG' ) )
-               return false;
-
-       if ( ! defined( 'WP_INSTALLING' ) ) {
-               // prevent non-existent options from triggering multiple queries
-               $notoptions = wp_cache_get( 'notoptions', 'options' );
-               if ( isset( $notoptions[$option] ) )
-                       return $default;
-
-               $alloptions = wp_load_alloptions();
-
-               if ( isset( $alloptions[$option] ) ) {
-                       $value = $alloptions[$option];
-               } else {
-                       $value = wp_cache_get( $option, 'options' );
-
-                       if ( false === $value ) {
-                               $row = $wpdb->get_row( $wpdb->prepare( "SELECT option_value FROM $wpdb->options WHERE option_name = %s LIMIT 1", $option ) );
-
-                               // Has to be get_row instead of get_var because of funkiness with 0, false, null values
-                               if ( is_object( $row ) ) {
-                                       $value = $row->option_value;
-                                       wp_cache_add( $option, $value, 'options' );
-                               } else { // option does not exist, so we must cache its non-existence
-                                       $notoptions[$option] = true;
-                                       wp_cache_set( 'notoptions', $notoptions, 'options' );
-                                       return $default;
-                               }
-                       }
-               }
-       } else {
-               $suppress = $wpdb->suppress_errors();
-               $row = $wpdb->get_row( $wpdb->prepare( "SELECT option_value FROM $wpdb->options WHERE option_name = %s LIMIT 1", $option ) );
-               $wpdb->suppress_errors( $suppress );
-               if ( is_object( $row ) )
-                       $value = $row->option_value;
-               else
-                       return $default;
-       }
-
-       // If home is not set use siteurl.
-       if ( 'home' == $option && '' == $value )
-               return get_option( 'siteurl' );
-
-       if ( in_array( $option, array('siteurl', 'home', 'category_base', 'tag_base') ) )
-               $value = untrailingslashit( $value );
-
-       return apply_filters( 'option_' . $option, maybe_unserialize( $value ) );
-}
-
-/**
- * Protect WordPress special option from being modified.
- *
- * Will die if $option is in protected list. Protected options are 'alloptions'
- * and 'notoptions' options.
- *
- * @since 2.2.0
- * @package WordPress
- * @subpackage Option
- *
- * @param string $option Option name.
- */
-function wp_protect_special_option( $option ) {
-       $protected = array( 'alloptions', 'notoptions' );
-       if ( in_array( $option, $protected ) )
-               wp_die( sprintf( __( '%s is a protected WP option and may not be modified' ), esc_html( $option ) ) );
-}
-
-/**
- * Print option value after sanitizing for forms.
- *
- * @uses attr Sanitizes value.
- * @since 1.5.0
- * @package WordPress
- * @subpackage Option
- *
- * @param string $option Option name.
- */
-function form_option( $option ) {
-       echo esc_attr( get_option( $option ) );
-}
-
-/**
- * Loads and caches all autoloaded options, if available or all options.
- *
- * @since 2.2.0
- * @package WordPress
- * @subpackage Option
- *
- * @return array List of all options.
- */
-function wp_load_alloptions() {
-       global $wpdb;
-
-       if ( !defined( 'WP_INSTALLING' ) || !is_multisite() )
-               $alloptions = wp_cache_get( 'alloptions', 'options' );
-       else
-               $alloptions = false;
-
-       if ( !$alloptions ) {
-               $suppress = $wpdb->suppress_errors();
-               if ( !$alloptions_db = $wpdb->get_results( "SELECT option_name, option_value FROM $wpdb->options WHERE autoload = 'yes'" ) )
-                       $alloptions_db = $wpdb->get_results( "SELECT option_name, option_value FROM $wpdb->options" );
-               $wpdb->suppress_errors($suppress);
-               $alloptions = array();
-               foreach ( (array) $alloptions_db as $o )
-                       $alloptions[$o->option_name] = $o->option_value;
-                       if ( !defined( 'WP_INSTALLING' ) || !is_multisite() )
-                               wp_cache_add( 'alloptions', $alloptions, 'options' );
-       }
-
-       return $alloptions;
-}
-
-/**
- * Loads and caches certain often requested site options if is_multisite() and a peristent cache is not being used.
- *
- * @since 3.0.0
- * @package WordPress
- * @subpackage Option
- *
- * @param int $site_id Optional site ID for which to query the options. Defaults to the current site.
- */
-function wp_load_core_site_options( $site_id = null ) {
-       global $wpdb, $_wp_using_ext_object_cache;
-
-       if ( !is_multisite() || $_wp_using_ext_object_cache || defined( 'WP_INSTALLING' ) )
-               return;
-
-       if ( empty($site_id) )
-               $site_id = $wpdb->siteid;
-
-       $core_options = array('site_name', 'siteurl', 'active_sitewide_plugins', '_site_transient_timeout_theme_roots', '_site_transient_theme_roots', 'site_admins', 'dashboard_blog', 'can_compress_scripts', 'global_terms_enabled' );
-
-       $core_options_in = "'" . implode("', '", $core_options) . "'";
-       $options = $wpdb->get_results( $wpdb->prepare("SELECT meta_key, meta_value FROM $wpdb->sitemeta WHERE meta_key IN ($core_options_in) AND site_id = %d", $site_id) );
-
-       foreach ( $options as $option ) {
-               $key = $option->meta_key;
-               $cache_key = "{$site_id}:$key";
-               $option->meta_value = maybe_unserialize( $option->meta_value );
-
-               wp_cache_set( $cache_key, $option->meta_value, 'site-options' );
-       }
-}
-
-/**
- * Update the value of an option that was already added.
- *
- * 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.
- *
- * If the option does not exist, then the option will be added with the option
- * value, but you will not be able to set whether it is autoloaded. If you want
- * to set whether an option is autoloaded, then you need to use the add_option().
- *
- * @since 1.0.0
- * @package WordPress
- * @subpackage Option
- *
- * @uses apply_filters() Calls 'pre_update_option_$option' hook to allow overwriting the
- *     option value to be stored.
- * @uses do_action() Calls 'update_option' hook before updating the option.
- * @uses do_action() Calls 'update_option_$option' and 'updated_option' hooks on success.
- *
- * @param string $option Option name. Expected to not be SQL-escaped.
- * @param mixed $newvalue Option value. Expected to not be SQL-escaped.
- * @return bool False if value was not updated and true if value was updated.
- */
-function update_option( $option, $newvalue ) {
-       global $wpdb;
-
-       $option = trim($option);
-       if ( empty($option) )
-               return false;
-
-       wp_protect_special_option( $option );
-
-       if ( is_object($newvalue) )
-               $newvalue = wp_clone($newvalue);
-
-       $newvalue = sanitize_option( $option, $newvalue );
-       $oldvalue = get_option( $option );
-       $newvalue = apply_filters( 'pre_update_option_' . $option, $newvalue, $oldvalue );
-
-       // If the new and old values are the same, no need to update.
-       if ( $newvalue === $oldvalue )
-               return false;
-
-       if ( false === $oldvalue )
-               return add_option( $option, $newvalue );
-
-       $notoptions = wp_cache_get( 'notoptions', 'options' );
-       if ( is_array( $notoptions ) && isset( $notoptions[$option] ) ) {
-               unset( $notoptions[$option] );
-               wp_cache_set( 'notoptions', $notoptions, 'options' );
-       }
-
-       $_newvalue = $newvalue;
-       $newvalue = maybe_serialize( $newvalue );
-
-       do_action( 'update_option', $option, $oldvalue, $_newvalue );
-       if ( ! defined( 'WP_INSTALLING' ) ) {
-               $alloptions = wp_load_alloptions();
-               if ( isset( $alloptions[$option] ) ) {
-                       $alloptions[$option] = $_newvalue;
-                       wp_cache_set( 'alloptions', $alloptions, 'options' );
-               } else {
-                       wp_cache_set( $option, $_newvalue, 'options' );
-               }
-       }
-
-       $result = $wpdb->update( $wpdb->options, array( 'option_value' => $newvalue ), array( 'option_name' => $option ) );
-
-       if ( $result ) {
-               do_action( "update_option_{$option}", $oldvalue, $_newvalue );
-               do_action( 'updated_option', $option, $oldvalue, $_newvalue );
-               return true;
-       }
-       return false;
-}
-
-/**
- * Add a new option.
- *
- * 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 add values later. Does not
- * check whether the option has already been added, but does check 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 and to not add options
- * that were already added.
- *
- * @package WordPress
- * @subpackage Option
- * @since 1.0.0
- * @link http://alex.vort-x.net/blog/ Thanks Alex Stapleton
- *
- * @uses do_action() Calls 'add_option' hook before adding the option.
- * @uses do_action() Calls 'add_option_$option' and 'added_option' hooks on success.
- *
- * @param string $option Name of option to add. Expected to not be SQL-escaped.
- * @param mixed $value Optional. Option value, can be anything. Expected to not be SQL-escaped.
- * @param mixed $deprecated Optional. Description. Not used anymore.
- * @param bool $autoload Optional. Default is enabled. Whether to load the option when WordPress starts up.
- * @return null returns when finished.
- */
-function add_option( $option, $value = '', $deprecated = '', $autoload = 'yes' ) {
-       global $wpdb;
-
-       if ( !empty( $deprecated ) )
-               _deprecated_argument( __FUNCTION__, '2.3' );
-
-       $option = trim($option);
-       if ( empty($option) )
-               return false;
-
-       wp_protect_special_option( $option );
-
-       if ( is_object($value) )
-               $value = wp_clone($value);
-
-       $value = sanitize_option( $option, $value );
-
-       // Make sure the option doesn't already exist. We can check the 'notoptions' cache before we ask for a db query
-       $notoptions = wp_cache_get( 'notoptions', 'options' );
-       if ( !is_array( $notoptions ) || !isset( $notoptions[$option] ) )
-               if ( false !== get_option( $option ) )
-                       return;
-
-       $_value = $value;
-       $value = maybe_serialize( $value );
-       $autoload = ( 'no' === $autoload ) ? 'no' : 'yes';
-       do_action( 'add_option', $option, $_value );
-       if ( ! defined( 'WP_INSTALLING' ) ) {
-               if ( 'yes' == $autoload ) {
-                       $alloptions = wp_load_alloptions();
-                       $alloptions[$option] = $value;
-                       wp_cache_set( 'alloptions', $alloptions, 'options' );
-               } else {
-                       wp_cache_set( $option, $value, 'options' );
-               }
-       }
-
-       // This option exists now
-       $notoptions = wp_cache_get( 'notoptions', 'options' ); // yes, again... we need it to be fresh
-       if ( is_array( $notoptions ) && isset( $notoptions[$option] ) ) {
-               unset( $notoptions[$option] );
-               wp_cache_set( 'notoptions', $notoptions, 'options' );
-       }
-
-       $result = $wpdb->query( $wpdb->prepare( "INSERT INTO `$wpdb->options` (`option_name`, `option_value`, `autoload`) VALUES (%s, %s, %s) ON DUPLICATE KEY UPDATE `option_name` = VALUES(`option_name`), `option_value` = VALUES(`option_value`), `autoload` = VALUES(`autoload`)", $option, $value, $autoload ) );
-
-       if ( $result ) {
-               do_action( "add_option_{$option}", $option, $_value );
-               do_action( 'added_option', $option, $_value );
-               return true;
-       }
-       return false;
-}
-
-/**
- * Removes option by name. Prevents removal of protected WordPress options.
- *
- * @package WordPress
- * @subpackage Option
- * @since 1.2.0
- *
- * @uses do_action() Calls 'delete_option' hook before option is deleted.
- * @uses do_action() Calls 'deleted_option' and 'delete_option_$option' hooks on success.
- *
- * @param string $option Name of option to remove. Expected to not be SQL-escaped.
- * @return bool True, if option is successfully deleted. False on failure.
- */
-function delete_option( $option ) {
-       global $wpdb;
-
-       wp_protect_special_option( $option );
-
-       // Get the ID, if no ID then return
-       $row = $wpdb->get_row( $wpdb->prepare( "SELECT autoload FROM $wpdb->options WHERE option_name = %s", $option ) );
-       if ( is_null( $row ) )
-               return false;
-       do_action( 'delete_option', $option );
-       $result = $wpdb->query( $wpdb->prepare( "DELETE FROM $wpdb->options WHERE option_name = %s", $option) );
-       if ( ! defined( 'WP_INSTALLING' ) ) {
-               if ( 'yes' == $row->autoload ) {
-                       $alloptions = wp_load_alloptions();
-                       if ( is_array( $alloptions ) && isset( $alloptions[$option] ) ) {
-                               unset( $alloptions[$option] );
-                               wp_cache_set( 'alloptions', $alloptions, 'options' );
-                       }
-               } else {
-                       wp_cache_delete( $option, 'options' );
-               }
-       }
-       if ( $result ) {
-               do_action( "delete_option_$option", $option );
-               do_action( 'deleted_option', $option );
+       if ( 'N;' == $data )
                return true;
                return true;
-       }
-       return false;
-}
-
-/**
- * Delete a transient
- *
- * @since 2.8.0
- * @package WordPress
- * @subpackage Transient
- *
- * @uses do_action() Calls 'delete_transient_$transient' hook before transient is deleted.
- * @uses do_action() Calls 'deleted_transient' hook on success.
- *
- * @param string $transient Transient name. Expected to not be SQL-escaped.
- * @return bool true if successful, false otherwise
- */
-function delete_transient( $transient ) {
-       global $_wp_using_ext_object_cache;
-
-    do_action( 'delete_transient_' . $transient, $transient );
-
-       if ( $_wp_using_ext_object_cache ) {
-               $result = wp_cache_delete( $transient, 'transient' );
-       } else {
-               $option_timeout = '_transient_timeout_' . $transient;
-               $option = '_transient_' . $transient;
-               $result = delete_option( $option );
-               if ( $result )
-                       delete_option( $option_timeout );
-       }
-
-       if ( $result )
-               do_action( 'deleted_transient', $transient );
-       return $result;
-}
-
-/**
- * Get the value of a transient
- *
- * If the transient does not exist or does not have a value, then the return value
- * will be false.
- *
- * @uses apply_filters() Calls 'pre_transient_$transient' hook before checking the transient.
- *     Any value other than false will "short-circuit" the retrieval of the transient
- *     and return the returned value.
- * @uses apply_filters() Calls 'transient_$option' hook, after checking the transient, with
- *     the transient value.
- *
- * @since 2.8.0
- * @package WordPress
- * @subpackage Transient
- *
- * @param string $transient Transient name. Expected to not be SQL-escaped
- * @return mixed Value of transient
- */
-function get_transient( $transient ) {
-       global $_wp_using_ext_object_cache;
-
-       $pre = apply_filters( 'pre_transient_' . $transient, false );
-       if ( false !== $pre )
-               return $pre;
-
-       if ( $_wp_using_ext_object_cache ) {
-               $value = wp_cache_get( $transient, 'transient' );
-       } else {
-               $transient_option = '_transient_' . $transient;
-               if ( ! defined( 'WP_INSTALLING' ) ) {
-                       // If option is not in alloptions, it is not autoloaded and thus has a timeout
-                       $alloptions = wp_load_alloptions();
-                       if ( !isset( $alloptions[$transient_option] ) ) {
-                               $transient_timeout = '_transient_timeout_' . $transient;
-                               if ( get_option( $transient_timeout ) < time() ) {
-                                       delete_option( $transient_option  );
-                                       delete_option( $transient_timeout );
-                                       return false;
-                               }
-                       }
-               }
-
-               $value = get_option( $transient_option );
-       }
-
-       return apply_filters( 'transient_' . $transient, $value );
-}
-
-/**
- * Set/update the value of a transient
- *
- * You do not need to serialize values. If the value needs to be serialized, then
- * it will be serialized before it is set.
- *
- * @since 2.8.0
- * @package WordPress
- * @subpackage Transient
- *
- * @uses apply_filters() Calls 'pre_set_transient_$transient' hook to allow overwriting the
- *     transient value to be stored.
- * @uses do_action() Calls 'set_transient_$transient' and 'setted_transient' hooks on success.
- *
- * @param string $transient Transient name. Expected to not be SQL-escaped.
- * @param mixed $value Transient value. Expected to not be SQL-escaped.
- * @param int $expiration Time until expiration in seconds, default 0
- * @return bool False if value was not set and true if value was set.
- */
-function set_transient( $transient, $value, $expiration = 0 ) {
-       global $_wp_using_ext_object_cache;
-
-    $value = apply_filters( 'pre_set_transient_' . $transient, $value );
-
-       if ( $_wp_using_ext_object_cache ) {
-               $result = wp_cache_set( $transient, $value, 'transient', $expiration );
-       } else {
-               $transient_timeout = '_transient_timeout_' . $transient;
-               $transient = '_transient_' . $transient;
-               if ( false === get_option( $transient ) ) {
-                       $autoload = 'yes';
-                       if ( $expiration ) {
-                               $autoload = 'no';
-                               add_option( $transient_timeout, time() + $expiration, '', 'no' );
-                       }
-                       $result = add_option( $transient, $value, '', $autoload );
-               } else {
-                       if ( $expiration )
-                               update_option( $transient_timeout, time() + $expiration );
-                       $result = update_option( $transient, $value );
-               }
-       }
-       if ( $result ) {
-               do_action( 'set_transient_' . $transient );
-               do_action( 'setted_transient', $transient );
-       }
-       return $result;
-}
-
-/**
- * Saves and restores user interface settings stored in a cookie.
- *
- * Checks if the current user-settings cookie is updated and stores it. When no
- * cookie exists (different browser used), adds the last saved cookie restoring
- * the settings.
- *
- * @package WordPress
- * @subpackage Option
- * @since 2.7.0
- */
-function wp_user_settings() {
-
-       if ( ! is_admin() )
-               return;
-
-       if ( defined('DOING_AJAX') )
-               return;
-
-       if ( ! $user = wp_get_current_user() )
-               return;
-
-       $settings = get_user_option( 'user-settings', $user->ID );
-
-       if ( isset( $_COOKIE['wp-settings-' . $user->ID] ) ) {
-               $cookie = preg_replace( '/[^A-Za-z0-9=&_]/', '', $_COOKIE['wp-settings-' . $user->ID] );
-
-               if ( ! empty( $cookie ) && strpos( $cookie, '=' ) ) {
-                       if ( $cookie == $settings )
-                               return;
-
-                       $last_time = (int) get_user_option( 'user-settings-time', $user->ID );
-                       $saved = isset( $_COOKIE['wp-settings-time-' . $user->ID]) ? preg_replace( '/[^0-9]/', '', $_COOKIE['wp-settings-time-' . $user->ID] ) : 0;
-
-                       if ( $saved > $last_time ) {
-                               update_user_option( $user->ID, 'user-settings', $cookie, false );
-                               update_user_option( $user->ID, 'user-settings-time', time() - 5, false );
-                               return;
-                       }
-               }
-       }
-
-       setcookie( 'wp-settings-' . $user->ID, $settings, time() + 31536000, SITECOOKIEPATH );
-       setcookie( 'wp-settings-time-' . $user->ID, time(), time() + 31536000, SITECOOKIEPATH );
-       $_COOKIE['wp-settings-' . $user->ID] = $settings;
-}
-
-/**
- * Retrieve user interface setting value based on setting name.
- *
- * @package WordPress
- * @subpackage Option
- * @since 2.7.0
- *
- * @param string $name The name of the setting.
- * @param string $default Optional default value to return when $name is not set.
- * @return mixed the last saved user setting or the default value/false if it doesn't exist.
- */
-function get_user_setting( $name, $default = false ) {
-
-       $all = get_all_user_settings();
-
-       return isset($all[$name]) ? $all[$name] : $default;
-}
-
-/**
- * Add or update user interface setting.
- *
- * Both $name and $value can contain only ASCII letters, numbers and underscores.
- * This function has to be used before any output has started as it calls setcookie().
- *
- * @package WordPress
- * @subpackage Option
- * @since 2.8.0
- *
- * @param string $name The name of the setting.
- * @param string $value The value for the setting.
- * @return bool true if set successfully/false if not.
- */
-function set_user_setting( $name, $value ) {
-
-       if ( headers_sent() )
+       $length = strlen( $data );
+       if ( $length < 4 )
                return false;
                return false;
-
-       $all = get_all_user_settings();
-       $name = preg_replace( '/[^A-Za-z0-9_]+/', '', $name );
-
-       if ( empty($name) )
+       if ( ':' !== $data[1] )
                return false;
                return false;
-
-       $all[$name] = $value;
-
-       return wp_set_all_user_settings($all);
-}
-
-/**
- * Delete user interface settings.
- *
- * Deleting settings would reset them to the defaults.
- * This function has to be used before any output has started as it calls setcookie().
- *
- * @package WordPress
- * @subpackage Option
- * @since 2.7.0
- *
- * @param mixed $names The name or array of names of the setting to be deleted.
- * @return bool true if deleted successfully/false if not.
- */
-function delete_user_setting( $names ) {
-
-       if ( headers_sent() )
+       $lastc = $data[$length-1];
+       if ( ';' !== $lastc && '}' !== $lastc )
                return false;
                return false;
-
-       $all = get_all_user_settings();
-       $names = (array) $names;
-
-       foreach ( $names as $name ) {
-               if ( isset($all[$name]) ) {
-                       unset($all[$name]);
-                       $deleted = true;
-               }
-       }
-
-       if ( isset($deleted) )
-               return wp_set_all_user_settings($all);
-
-       return false;
-}
-
-/**
- * Retrieve all user interface settings.
- *
- * @package WordPress
- * @subpackage Option
- * @since 2.7.0
- *
- * @return array the last saved user settings or empty array.
- */
-function get_all_user_settings() {
-       global $_updated_user_settings;
-
-       if ( ! $user = wp_get_current_user() )
-               return array();
-
-       if ( isset($_updated_user_settings) && is_array($_updated_user_settings) )
-               return $_updated_user_settings;
-
-       $all = array();
-       if ( isset($_COOKIE['wp-settings-' . $user->ID]) ) {
-               $cookie = preg_replace( '/[^A-Za-z0-9=&_]/', '', $_COOKIE['wp-settings-' . $user->ID] );
-
-               if ( $cookie && strpos($cookie, '=') ) // the '=' cannot be 1st char
-                       parse_str($cookie, $all);
-
-       } else {
-               $option = get_user_option('user-settings', $user->ID);
-               if ( $option && is_string($option) )
-                       parse_str( $option, $all );
-       }
-
-       return $all;
-}
-
-/**
- * Private. Set all user interface settings.
- *
- * @package WordPress
- * @subpackage Option
- * @since 2.8.0
- *
- * @param unknown $all
- * @return bool
- */
-function wp_set_all_user_settings($all) {
-       global $_updated_user_settings;
-
-       if ( ! $user = wp_get_current_user() )
-               return false;
-
-       $_updated_user_settings = $all;
-       $settings = '';
-       foreach ( $all as $k => $v ) {
-               $v = preg_replace( '/[^A-Za-z0-9_]+/', '', $v );
-               $settings .= $k . '=' . $v . '&';
+       $token = $data[0];
+       switch ( $token ) {
+               case 's' :
+                       if ( '"' !== $data[$length-2] )
+                               return false;
+               case 'a' :
+               case 'O' :
+                       return (bool) preg_match( "/^{$token}:[0-9]+:/s", $data );
+               case 'b' :
+               case 'i' :
+               case 'd' :
+                       return (bool) preg_match( "/^{$token}:[0-9.E-]+;\$/", $data );
        }
        }
-
-       $settings = rtrim($settings, '&');
-
-       update_user_option( $user->ID, 'user-settings', $settings, false );
-       update_user_option( $user->ID, 'user-settings-time', time(), false );
-
-       return true;
+       return false;
 }
 
 /**
 }
 
 /**
- * Delete the user settings of the current user.
+ * Check whether serialized data is of string type.
  *
  *
- * @package WordPress
- * @subpackage Option
- * @since 2.7.0
+ * @since 2.0.5
+ *
+ * @param mixed $data Serialized data
+ * @return bool False if not a serialized string, true if it is.
  */
  */
-function delete_all_user_settings() {
-       if ( ! $user = wp_get_current_user() )
-               return;
-
-       update_user_option( $user->ID, 'user-settings', '', false );
-       setcookie('wp-settings-' . $user->ID, ' ', time() - 31536000, SITECOOKIEPATH);
+function is_serialized_string( $data ) {
+       // if it isn't a string, it isn't a serialized string
+       if ( !is_string( $data ) )
+               return false;
+       $data = trim( $data );
+       $length = strlen( $data );
+       if ( $length < 4 )
+               return false;
+       elseif ( ':' !== $data[1] )
+               return false;
+       elseif ( ';' !== $data[$length-1] )
+               return false;
+       elseif ( $data[0] !== 's' )
+               return false;
+       elseif ( '"' !== $data[$length-2] )
+               return false;
+       else
+               return true;
 }
 
 /**
 }
 
 /**
@@ -1006,6 +315,8 @@ function maybe_serialize( $data ) {
        if ( is_array( $data ) || is_object( $data ) )
                return serialize( $data );
 
        if ( is_array( $data ) || is_object( $data ) )
                return serialize( $data );
 
+       // Double serialization is required for backward compatibility.
+       // See http://core.trac.wordpress.org/ticket/12930
        if ( is_serialized( $data ) )
                return serialize( $data );
 
        if ( is_serialized( $data ) )
                return serialize( $data );
 
@@ -1081,71 +392,6 @@ function xmlrpc_removepostdata( $content ) {
        return $content;
 }
 
        return $content;
 }
 
-/**
- * Open the file handle for debugging.
- *
- * This function is used for XMLRPC feature, but it is general purpose enough
- * to be used in anywhere.
- *
- * @see fopen() for mode options.
- * @package WordPress
- * @subpackage Debug
- * @since 0.71
- * @uses $debug Used for whether debugging is enabled.
- *
- * @param string $filename File path to debug file.
- * @param string $mode Same as fopen() mode parameter.
- * @return bool|resource File handle. False on failure.
- */
-function debug_fopen( $filename, $mode ) {
-       global $debug;
-       if ( 1 == $debug ) {
-               $fp = fopen( $filename, $mode );
-               return $fp;
-       } else {
-               return false;
-       }
-}
-
-/**
- * Write contents to the file used for debugging.
- *
- * Technically, this can be used to write to any file handle when the global
- * $debug is set to 1 or true.
- *
- * @package WordPress
- * @subpackage Debug
- * @since 0.71
- * @uses $debug Used for whether debugging is enabled.
- *
- * @param resource $fp File handle for debugging file.
- * @param string $string Content to write to debug file.
- */
-function debug_fwrite( $fp, $string ) {
-       global $debug;
-       if ( 1 == $debug )
-               fwrite( $fp, $string );
-}
-
-/**
- * Close the debugging file handle.
- *
- * Technically, this can be used to close any file handle when the global $debug
- * is set to 1 or true.
- *
- * @package WordPress
- * @subpackage Debug
- * @since 0.71
- * @uses $debug Used for whether debugging is enabled.
- *
- * @param resource $fp Debug File handle.
- */
-function debug_fclose( $fp ) {
-       global $debug;
-       if ( 1 == $debug )
-               fclose( $fp );
-}
-
 /**
  * Check content for video and audio links to add as enclosures.
  *
 /**
  * Check content for video and audio links to add as enclosures.
  *
@@ -1163,11 +409,11 @@ function debug_fclose( $fp ) {
  */
 function do_enclose( $content, $post_ID ) {
        global $wpdb;
  */
 function do_enclose( $content, $post_ID ) {
        global $wpdb;
+
+       //TODO: Tidy this ghetto code up and make the debug code optional
        include_once( ABSPATH . WPINC . '/class-IXR.php' );
 
        include_once( ABSPATH . WPINC . '/class-IXR.php' );
 
-       $log = debug_fopen( ABSPATH . 'enclosures.log', 'a' );
        $post_links = array();
        $post_links = array();
-       debug_fwrite( $log, 'BEGIN ' . date( 'YmdHis', time() ) . "\n" );
 
        $pung = get_enclosed( $post_ID );
 
 
        $pung = get_enclosed( $post_ID );
 
@@ -1178,15 +424,11 @@ function do_enclose( $content, $post_ID ) {
 
        preg_match_all( "{\b http : [$any] +? (?= [$punc] * [^$any] | $)}x", $content, $post_links_temp );
 
 
        preg_match_all( "{\b http : [$any] +? (?= [$punc] * [^$any] | $)}x", $content, $post_links_temp );
 
-       debug_fwrite( $log, 'Post contents:' );
-       debug_fwrite( $log, $content . "\n" );
-
        foreach ( $pung as $link_test ) {
                if ( !in_array( $link_test, $post_links_temp[0] ) ) { // link no longer in post
        foreach ( $pung as $link_test ) {
                if ( !in_array( $link_test, $post_links_temp[0] ) ) { // link no longer in post
-                       $mid = $wpdb->get_col( $wpdb->prepare("SELECT meta_id FROM $wpdb->postmeta WHERE post_id = %d AND meta_key = 'enclosure' AND meta_value LIKE (%s)", $post_ID, $link_test . '%') );
-                       do_action( 'delete_postmeta', $mid );
-                       $wpdb->query( $wpdb->prepare("DELETE FROM $wpdb->postmeta WHERE meta_id IN(%s)", implode( ',', $mid ) ) );
-                       do_action( 'deleted_postmeta', $mid );
+                       $mids = $wpdb->get_col( $wpdb->prepare("SELECT meta_id FROM $wpdb->postmeta WHERE post_id = %d AND meta_key = 'enclosure' AND meta_value LIKE (%s)", $post_ID, like_escape( $link_test ) . '%') );
+                       foreach ( $mids as $mid )
+                               delete_metadata_by_mid( 'post', $mid );
                }
        }
 
                }
        }
 
@@ -1197,17 +439,17 @@ function do_enclose( $content, $post_ID ) {
                                continue;
                        if ( isset( $test['query'] ) )
                                $post_links[] = $link_test;
                                continue;
                        if ( isset( $test['query'] ) )
                                $post_links[] = $link_test;
-                       elseif ( $test['path'] != '/' && $test['path'] != '' )
+                       elseif ( isset($test['path']) && ( $test['path'] != '/' ) &&  ($test['path'] != '' ) )
                                $post_links[] = $link_test;
                }
        }
 
        foreach ( (array) $post_links as $url ) {
                                $post_links[] = $link_test;
                }
        }
 
        foreach ( (array) $post_links as $url ) {
-               if ( $url != '' && !$wpdb->get_var( $wpdb->prepare( "SELECT post_id FROM $wpdb->postmeta WHERE post_id = %d AND meta_key = 'enclosure' AND meta_value LIKE (%s)", $post_ID, $url . '%' ) ) ) {
+               if ( $url != '' && !$wpdb->get_var( $wpdb->prepare( "SELECT post_id FROM $wpdb->postmeta WHERE post_id = %d AND meta_key = 'enclosure' AND meta_value LIKE (%s)", $post_ID, like_escape( $url ) . '%' ) ) ) {
 
                        if ( $headers = wp_get_http_headers( $url) ) {
 
                        if ( $headers = wp_get_http_headers( $url) ) {
-                               $len = (int) $headers['content-length'];
-                               $type = $headers['content-type'];
+                               $len = isset( $headers['content-length'] ) ? (int) $headers['content-length'] : 0;
+                               $type = isset( $headers['content-type'] ) ? $headers['content-type'] : '';
                                $allowed_types = array( 'video', 'audio' );
 
                                // Check to see if we can figure out the mime type from
                                $allowed_types = array( 'video', 'audio' );
 
                                // Check to see if we can figure out the mime type from
@@ -1226,9 +468,7 @@ function do_enclose( $content, $post_ID ) {
                                }
 
                                if ( in_array( substr( $type, 0, strpos( $type, "/" ) ), $allowed_types ) ) {
                                }
 
                                if ( in_array( substr( $type, 0, strpos( $type, "/" ) ), $allowed_types ) ) {
-                                       $meta_value = "$url\n$len\n$type\n";
-                                       $wpdb->insert($wpdb->postmeta, array('post_id' => $post_ID, 'meta_key' => 'enclosure', 'meta_value' => $meta_value) );
-                                       do_action( 'added_postmeta', $wpdb->insert_id, $post_ID, 'enclosure', $meta_value );
+                                       add_post_meta( $post_ID, 'enclosure', "$url\n$len\n$mime\n" );
                                }
                        }
                }
                                }
                        }
                }
@@ -1268,7 +508,7 @@ function wp_get_http( $url, $file_path = false, $red = 1 ) {
                return false;
 
        $headers = wp_remote_retrieve_headers( $response );
                return false;
 
        $headers = wp_remote_retrieve_headers( $response );
-       $headers['response'] = $response['response']['code'];
+       $headers['response'] = wp_remote_retrieve_response_code( $response );
 
        // WP_HTTP no longer follows redirects for HEAD requests.
        if ( 'HEAD' == $options['method'] && in_array($headers['response'], array(301, 302)) && isset( $headers['location'] ) ) {
 
        // WP_HTTP no longer follows redirects for HEAD requests.
        if ( 'HEAD' == $options['method'] && in_array($headers['response'], array(301, 302)) && isset( $headers['location'] ) ) {
@@ -1283,7 +523,7 @@ function wp_get_http( $url, $file_path = false, $red = 1 ) {
        if ( !$out_fp )
                return $headers;
 
        if ( !$out_fp )
                return $headers;
 
-       fwrite( $out_fp,  $response['body']);
+       fwrite( $out_fp,  wp_remote_retrieve_body( $response ) );
        fclose($out_fp);
        clearstatcache();
 
        fclose($out_fp);
        clearstatcache();
 
@@ -1321,8 +561,8 @@ function wp_get_http_headers( $url, $deprecated = false ) {
  * @return int 1 when new day, 0 if not a new day.
  */
 function is_new_day() {
  * @return int 1 when new day, 0 if not a new day.
  */
 function is_new_day() {
-       global $day, $previousday;
-       if ( $day != $previousday )
+       global $currentday, $previousday;
+       if ( $currentday != $previousday )
                return 1;
        else
                return 0;
                return 1;
        else
                return 0;
@@ -1347,6 +587,36 @@ function build_query( $data ) {
        return _http_build_query( $data, null, '&', '', false );
 }
 
        return _http_build_query( $data, null, '&', '', false );
 }
 
+// from php.net (modified by Mark Jaquith to behave like the native PHP5 function)
+function _http_build_query($data, $prefix=null, $sep=null, $key='', $urlencode=true) {
+       $ret = array();
+
+       foreach ( (array) $data as $k => $v ) {
+               if ( $urlencode)
+                       $k = urlencode($k);
+               if ( is_int($k) && $prefix != null )
+                       $k = $prefix.$k;
+               if ( !empty($key) )
+                       $k = $key . '%5B' . $k . '%5D';
+               if ( $v === null )
+                       continue;
+               elseif ( $v === FALSE )
+                       $v = '0';
+
+               if ( is_array($v) || is_object($v) )
+                       array_push($ret,_http_build_query($v, '', $sep, $k, $urlencode));
+               elseif ( $urlencode )
+                       array_push($ret, $k.'='.urlencode($v));
+               else
+                       array_push($ret, $k.'='.$v);
+       }
+
+       if ( null === $sep )
+               $sep = ini_get('arg_separator.output');
+
+       return implode($sep, $ret);
+}
+
 /**
  * Retrieve a modified URL query string.
  *
 /**
  * Retrieve a modified URL query string.
  *
@@ -1354,8 +624,9 @@ function build_query( $data ) {
  * using this function. You can also retrieve the full URL with query data.
  *
  * Adding a single key & value or an associative array. Setting a key value to
  * using this function. You can also retrieve the full URL with query data.
  *
  * Adding a single key & value or an associative array. Setting a key value to
- * emptystring removes the key. Omitting oldquery_or_uri uses the $_SERVER
- * value.
+ * an empty string removes the key. Omitting oldquery_or_uri uses the $_SERVER
+ * value. Additional values provided are expected to be encoded appropriately
+ * with urlencode() or rawurlencode().
  *
  * @since 1.5.0
  *
  *
  * @since 1.5.0
  *
@@ -1489,7 +760,7 @@ function wp_remote_fopen( $uri ) {
        if ( is_wp_error( $response ) )
                return false;
 
        if ( is_wp_error( $response ) )
                return false;
 
-       return $response['body'];
+       return wp_remote_retrieve_body( $response );
 }
 
 /**
 }
 
 /**
@@ -1619,7 +890,7 @@ function status_header( $header ) {
  * The several different headers cover the different ways cache prevention is handled
  * by different browsers
  *
  * The several different headers cover the different ways cache prevention is handled
  * by different browsers
  *
- * @since 2.8
+ * @since 2.8.0
  *
  * @uses apply_filters()
  * @return array The associative array of header names and field values.
  *
  * @uses apply_filters()
  * @return array The associative array of header names and field values.
@@ -1633,7 +904,7 @@ function wp_get_nocache_headers() {
        );
 
        if ( function_exists('apply_filters') ) {
        );
 
        if ( function_exists('apply_filters') ) {
-               $headers = apply_filters('nocache_headers', $headers);
+               $headers = (array) apply_filters('nocache_headers', $headers);
        }
        return $headers;
 }
        }
        return $headers;
 }
@@ -1649,7 +920,7 @@ function wp_get_nocache_headers() {
  */
 function nocache_headers() {
        $headers = wp_get_nocache_headers();
  */
 function nocache_headers() {
        $headers = wp_get_nocache_headers();
-       foreach( (array) $headers as $name => $field_value )
+       foreach( $headers as $name => $field_value )
                @header("{$name}: {$field_value}");
 }
 
                @header("{$name}: {$field_value}");
 }
 
@@ -1731,7 +1002,7 @@ function do_feed_rdf() {
 }
 
 /**
 }
 
 /**
- * Load the RSS 1.0 Feed Template
+ * Load the RSS 1.0 Feed Template.
  *
  * @since 2.1.0
  */
  *
  * @since 2.1.0
  */
@@ -1768,27 +1039,28 @@ function do_feed_atom( $for_comments ) {
 }
 
 /**
 }
 
 /**
- * Display the robot.txt file content.
+ * Display the robots.txt file content.
  *
  * The echo content should be with usage of the permalinks or for creating the
  *
  * The echo content should be with usage of the permalinks or for creating the
- * robot.txt file.
+ * robots.txt file.
  *
  * @since 2.1.0
  *
  * @since 2.1.0
- * @uses do_action() Calls 'do_robotstxt' hook for displaying robot.txt rules.
+ * @uses do_action() Calls 'do_robotstxt' hook for displaying robots.txt rules.
  */
 function do_robots() {
        header( 'Content-Type: text/plain; charset=utf-8' );
 
        do_action( 'do_robotstxt' );
 
  */
 function do_robots() {
        header( 'Content-Type: text/plain; charset=utf-8' );
 
        do_action( 'do_robotstxt' );
 
-       $output = '';
+       $output = "User-agent: *\n";
        $public = get_option( 'blog_public' );
        $public = get_option( 'blog_public' );
-       if ( '0' ==  $public ) {
-               $output .= "User-agent: *\n";
+       if ( '0' == $public ) {
                $output .= "Disallow: /\n";
        } else {
                $output .= "Disallow: /\n";
        } else {
-               $output .= "User-agent: *\n";
-               $output .= "Disallow:\n";
+               $site_url = parse_url( site_url() );
+               $path = ( !empty( $site_url['path'] ) ) ? $site_url['path'] : '';
+               $output .= "Disallow: $path/wp-admin/\n";
+               $output .= "Disallow: $path/wp-includes/\n";
        }
 
        echo apply_filters('robots_txt', $output, $public);
        }
 
        echo apply_filters('robots_txt', $output, $public);
@@ -1832,32 +1104,37 @@ function is_blog_installed() {
        if ( $installed )
                return true;
 
        if ( $installed )
                return true;
 
+       // If visiting repair.php, return true and let it take over.
+       if ( defined( 'WP_REPAIRING' ) )
+               return true;
+
        $suppress = $wpdb->suppress_errors();
        $suppress = $wpdb->suppress_errors();
-       $tables = $wpdb->get_col('SHOW TABLES');
-       $wpdb->suppress_errors( $suppress );
 
 
-       $wp_tables = $wpdb->tables();
-       // Loop over the WP tables.  If none exist, then scratch install is allowed.
+       // Loop over the WP tables. If none exist, then scratch install is allowed.
        // If one or more exist, suggest table repair since we got here because the options
        // table could not be accessed.
        // If one or more exist, suggest table repair since we got here because the options
        // table could not be accessed.
+       $wp_tables = $wpdb->tables();
        foreach ( $wp_tables as $table ) {
        foreach ( $wp_tables as $table ) {
-               // If one of the WP tables exist, then we are in an insane state.
-               if ( in_array( $table, $tables ) ) {
-                       // The existence of custom user tables shouldn't suggest an insane state or prevent a clean install.
-                       if ( defined( 'CUSTOM_USER_TABLE' ) && CUSTOM_USER_TABLE == $table )
-                               continue;
-                       if ( defined( 'CUSTOM_USER_META_TABLE' ) && CUSTOM_USER_META_TABLE == $table )
-                               continue;
+               // The existence of custom user tables shouldn't suggest an insane state or prevent a clean install.
+               if ( defined( 'CUSTOM_USER_TABLE' ) && CUSTOM_USER_TABLE == $table )
+                       continue;
+               if ( defined( 'CUSTOM_USER_META_TABLE' ) && CUSTOM_USER_META_TABLE == $table )
+                       continue;
 
 
-                       // If visiting repair.php, return true and let it take over.
-                       if ( defined('WP_REPAIRING') )
-                               return true;
-                       // Die with a DB error.
-                       $wpdb->error = sprintf( /*WP_I18N_NO_TABLES*/'One or more database tables are unavailable.  The database may need to be <a href="%s">repaired</a>.'/*/WP_I18N_NO_TABLES*/, 'maint/repair.php?referrer=is_blog_installed' );
-                       dead_db();
-               }
+               if ( ! $wpdb->get_results( "DESCRIBE $table;" ) )
+                       continue;
+
+               // One or more tables exist. We are insane.
+
+               wp_load_translations_early();
+
+               // Die with a DB error.
+               $wpdb->error = sprintf( __( 'One or more database tables are unavailable. The database may need to be <a href="%s">repaired</a>.' ), 'maint/repair.php?referrer=is_blog_installed' );
+               dead_db();
        }
 
        }
 
+       $wpdb->suppress_errors( $suppress );
+
        wp_cache_set( 'is_blog_installed', false );
 
        return false;
        wp_cache_set( 'is_blog_installed', false );
 
        return false;
@@ -1887,11 +1164,6 @@ function wp_nonce_url( $actionurl, $action = -1 ) {
  * offer absolute protection, but should protect against most cases. It is very
  * important to use nonce field in forms.
  *
  * offer absolute protection, but should protect against most cases. It is very
  * important to use nonce field in forms.
  *
- * If you set $echo to true and set $referer to true, then you will need to
- * retrieve the {@link wp_referer_field() wp referer field}. If you have the
- * $referer set to true and are echoing the nonce field, it will also echo the
- * referer field.
- *
  * The $action and $name are optional, but if you want to have better security,
  * it is strongly suggested to set those two parameters. It is easier to just
  * call the function without any parameters, because validation of the nonce
  * The $action and $name are optional, but if you want to have better security,
  * it is strongly suggested to set those two parameters. It is easier to just
  * call the function without any parameters, because validation of the nonce
@@ -1915,11 +1187,12 @@ function wp_nonce_url( $actionurl, $action = -1 ) {
 function wp_nonce_field( $action = -1, $name = "_wpnonce", $referer = true , $echo = true ) {
        $name = esc_attr( $name );
        $nonce_field = '<input type="hidden" id="' . $name . '" name="' . $name . '" value="' . wp_create_nonce( $action ) . '" />';
 function wp_nonce_field( $action = -1, $name = "_wpnonce", $referer = true , $echo = true ) {
        $name = esc_attr( $name );
        $nonce_field = '<input type="hidden" id="' . $name . '" name="' . $name . '" value="' . wp_create_nonce( $action ) . '" />';
-       if ( $echo )
-               echo $nonce_field;
 
        if ( $referer )
 
        if ( $referer )
-               wp_referer_field( $echo );
+               $nonce_field .= wp_referer_field( false );
+
+       if ( $echo )
+               echo $nonce_field;
 
        return $nonce_field;
 }
 
        return $nonce_field;
 }
@@ -1971,7 +1244,8 @@ function wp_original_referer_field( $echo = true, $jump_back_to = 'current' ) {
 }
 
 /**
 }
 
 /**
- * Retrieve referer from '_wp_http_referer', HTTP referer, or current page respectively.
+ * Retrieve referer from '_wp_http_referer' or HTTP referer. If it's the same
+ * as the current request URL, will return false.
  *
  * @package WordPress
  * @subpackage Security
  *
  * @package WordPress
  * @subpackage Security
@@ -1980,13 +1254,13 @@ function wp_original_referer_field( $echo = true, $jump_back_to = 'current' ) {
  * @return string|bool False on failure. Referer URL on success.
  */
 function wp_get_referer() {
  * @return string|bool False on failure. Referer URL on success.
  */
 function wp_get_referer() {
-       $ref = '';
+       $ref = false;
        if ( ! empty( $_REQUEST['_wp_http_referer'] ) )
                $ref = $_REQUEST['_wp_http_referer'];
        else if ( ! empty( $_SERVER['HTTP_REFERER'] ) )
                $ref = $_SERVER['HTTP_REFERER'];
 
        if ( ! empty( $_REQUEST['_wp_http_referer'] ) )
                $ref = $_REQUEST['_wp_http_referer'];
        else if ( ! empty( $_SERVER['HTTP_REFERER'] ) )
                $ref = $_SERVER['HTTP_REFERER'];
 
-       if ( $ref !== $_SERVER['REQUEST_URI'] )
+       if ( $ref && $ref !== $_SERVER['REQUEST_URI'] )
                return $ref;
        return false;
 }
                return $ref;
        return false;
 }
@@ -2058,7 +1332,7 @@ function path_is_absolute( $path ) {
        if ( realpath($path) == $path )
                return true;
 
        if ( realpath($path) == $path )
                return true;
 
-       if ( strlen($path) == 0 || $path{0} == '.' )
+       if ( strlen($path) == 0 || $path[0] == '.' )
                return false;
 
        // windows allows absolute paths like this
                return false;
 
        // windows allows absolute paths like this
@@ -2066,7 +1340,7 @@ function path_is_absolute( $path ) {
                return true;
 
        // a path starting with / or \ is absolute; anything else is relative
                return true;
 
        // a path starting with / or \ is absolute; anything else is relative
-       return (bool) preg_match('#^[/\\\\]#', $path);
+       return ( $path[0] == '/' || $path[0] == '\\' );
 }
 
 /**
 }
 
 /**
@@ -2087,6 +1361,42 @@ function path_join( $base, $path ) {
        return rtrim($base, '/') . '/' . ltrim($path, '/');
 }
 
        return rtrim($base, '/') . '/' . ltrim($path, '/');
 }
 
+/**
+ * Determines a writable directory for temporary files.
+ * Function's preference is to WP_CONTENT_DIR followed by the return value of <code>sys_get_temp_dir()</code>, before finally defaulting to /tmp/
+ *
+ * In the event that this function does not find a writable location, It may be overridden by the <code>WP_TEMP_DIR</code> constant in your <code>wp-config.php</code> file.
+ *
+ * @since 2.5.0
+ *
+ * @return string Writable temporary directory
+ */
+function get_temp_dir() {
+       static $temp;
+       if ( defined('WP_TEMP_DIR') )
+               return trailingslashit(WP_TEMP_DIR);
+
+       if ( $temp )
+               return trailingslashit($temp);
+
+       $temp = WP_CONTENT_DIR . '/';
+       if ( is_dir($temp) && @is_writable($temp) )
+               return $temp;
+
+       if  ( function_exists('sys_get_temp_dir') ) {
+               $temp = sys_get_temp_dir();
+               if ( @is_writable($temp) )
+                       return trailingslashit($temp);
+       }
+
+       $temp = ini_get('upload_tmp_dir');
+       if ( is_dir($temp) && @is_writable($temp) )
+               return trailingslashit($temp);
+
+       $temp = '/tmp/';
+       return $temp;
+}
+
 /**
  * Get an array containing the current upload directory's path and url.
  *
 /**
  * Get an array containing the current upload directory's path and url.
  *
@@ -2190,14 +1500,14 @@ function wp_upload_dir( $time = null ) {
  * before the extension, and will continue adding numbers until the filename is
  * unique.
  *
  * before the extension, and will continue adding numbers until the filename is
  * unique.
  *
- * The callback must accept two parameters, the first one is the directory and
- * the second is the filename. The callback must be a function.
+ * The callback is passed three parameters, the first one is the directory, the
+ * second is the filename, and the third is the extension.
  *
  *
- * @since 2.5
+ * @since 2.5.0
  *
  * @param string $dir
  * @param string $filename
  *
  * @param string $dir
  * @param string $filename
- * @param string $unique_filename_callback Function name, must be a function.
+ * @param mixed $unique_filename_callback Callback.
  * @return string New filename, if given wasn't unique.
  */
 function wp_unique_filename( $dir, $filename, $unique_filename_callback = null ) {
  * @return string New filename, if given wasn't unique.
  */
 function wp_unique_filename( $dir, $filename, $unique_filename_callback = null ) {
@@ -2213,9 +1523,9 @@ function wp_unique_filename( $dir, $filename, $unique_filename_callback = null )
        if ( $name === $ext )
                $name = '';
 
        if ( $name === $ext )
                $name = '';
 
-       // Increment the file number until we have a unique file to save in $dir. Use $override['unique_filename_callback'] if supplied.
+       // Increment the file number until we have a unique file to save in $dir. Use callback if supplied.
        if ( $unique_filename_callback && is_callable( $unique_filename_callback ) ) {
        if ( $unique_filename_callback && is_callable( $unique_filename_callback ) ) {
-               $filename = $unique_filename_callback( $dir, $name );
+               $filename = call_user_func( $unique_filename_callback, $dir, $name, $ext );
        } else {
                $number = '';
 
        } else {
                $number = '';
 
@@ -2337,7 +1647,7 @@ function wp_ext2type( $ext ) {
                'spreadsheet' => array( 'numbers',     'ods',  'xls',  'xlsx', 'xlsb',  'xlsm' ),
                'interactive' => array( 'key', 'ppt',  'pptx', 'pptm', 'odp',  'swf' ),
                'text'        => array( 'asc', 'csv',  'tsv',  'txt' ),
                'spreadsheet' => array( 'numbers',     'ods',  'xls',  'xlsx', 'xlsb',  'xlsm' ),
                'interactive' => array( 'key', 'ppt',  'pptx', 'pptm', 'odp',  'swf' ),
                'text'        => array( 'asc', 'csv',  'tsv',  'txt' ),
-               'archive'     => array( 'bz2', 'cab',  'dmg',  'gz',   'rar',  'sea',   'sit', 'sqx', 'tar', 'tgz',  'zip' ),
+               'archive'     => array( 'bz2', 'cab',  'dmg',  'gz',   'rar',  'sea',   'sit', 'sqx', 'tar', 'tgz',  'zip', '7z' ),
                'code'        => array( 'css', 'htm',  'html', 'php',  'js' ),
        ));
        foreach ( $ext2type as $type => $exts )
                'code'        => array( 'css', 'htm',  'html', 'php',  'js' ),
        ));
        foreach ( $ext2type as $type => $exts )
@@ -2470,6 +1780,7 @@ function get_allowed_mime_types() {
                'txt|asc|c|cc|h' => 'text/plain',
                'csv' => 'text/csv',
                'tsv' => 'text/tab-separated-values',
                'txt|asc|c|cc|h' => 'text/plain',
                'csv' => 'text/csv',
                'tsv' => 'text/tab-separated-values',
+               'ics' => 'text/calendar',
                'rtx' => 'text/richtext',
                'css' => 'text/css',
                'htm|html' => 'text/html',
                'rtx' => 'text/richtext',
                'css' => 'text/css',
                'htm|html' => 'text/html',
@@ -2502,6 +1813,8 @@ function get_allowed_mime_types() {
                'tar' => 'application/x-tar',
                'zip' => 'application/zip',
                'gz|gzip' => 'application/x-gzip',
                'tar' => 'application/x-tar',
                'zip' => 'application/zip',
                'gz|gzip' => 'application/x-gzip',
+               'rar' => 'application/rar',
+               '7z' => 'application/x-7z-compressed',
                'exe' => 'application/x-msdownload',
                // openoffice formats
                'odt' => 'application/vnd.oasis.opendocument.text',
                'exe' => 'application/x-msdownload',
                // openoffice formats
                'odt' => 'application/vnd.oasis.opendocument.text',
@@ -2522,99 +1835,19 @@ function get_allowed_mime_types() {
 /**
  * Retrieve nonce action "Are you sure" message.
  *
 /**
  * Retrieve nonce action "Are you sure" message.
  *
- * The action is split by verb and noun. The action format is as follows:
- * verb-action_extra. The verb is before the first dash and has the format of
- * letters and no spaces and numbers. The noun is after the dash and before the
- * underscore, if an underscore exists. The noun is also only letters.
- *
- * The filter will be called for any action, which is not defined by WordPress.
- * You may use the filter for your plugin to explain nonce actions to the user,
- * when they get the "Are you sure?" message. The filter is in the format of
- * 'explain_nonce_$verb-$noun' with the $verb replaced by the found verb and the
- * $noun replaced by the found noun. The two parameters that are given to the
- * hook are the localized "Are you sure you want to do this?" message with the
- * extra text (the text after the underscore).
+ * Deprecated in 3.4.1 and 3.5.0. Backported to 3.3.3.
  *
  *
- * @package WordPress
- * @subpackage Security
  * @since 2.0.4
  * @since 2.0.4
+ * @deprecated 3.4.1
+ * @deprecated Use wp_nonce_ays()
+ * @see wp_nonce_ays()
  *
  * @param string $action Nonce action.
  * @return string Are you sure message.
  */
 function wp_explain_nonce( $action ) {
  *
  * @param string $action Nonce action.
  * @return string Are you sure message.
  */
 function wp_explain_nonce( $action ) {
-       if ( $action !== -1 && preg_match( '/([a-z]+)-([a-z]+)(_(.+))?/', $action, $matches ) ) {
-               $verb = $matches[1];
-               $noun = $matches[2];
-
-               $trans = array();
-               $trans['update']['attachment'] = array( __( 'Your attempt to edit this attachment: &#8220;%s&#8221; has failed.' ), 'get_the_title' );
-
-               $trans['add']['category']      = array( __( 'Your attempt to add this category has failed.' ), false );
-               $trans['delete']['category']   = array( __( 'Your attempt to delete this category: &#8220;%s&#8221; has failed.' ), 'get_cat_name' );
-               $trans['update']['category']   = array( __( 'Your attempt to edit this category: &#8220;%s&#8221; has failed.' ), 'get_cat_name' );
-
-               $trans['delete']['comment']    = array( __( 'Your attempt to delete this comment: &#8220;%s&#8221; has failed.' ), 'use_id' );
-               $trans['unapprove']['comment'] = array( __( 'Your attempt to unapprove this comment: &#8220;%s&#8221; has failed.' ), 'use_id' );
-               $trans['approve']['comment']   = array( __( 'Your attempt to approve this comment: &#8220;%s&#8221; has failed.' ), 'use_id' );
-               $trans['update']['comment']    = array( __( 'Your attempt to edit this comment: &#8220;%s&#8221; has failed.' ), 'use_id' );
-               $trans['bulk']['comments']     = array( __( 'Your attempt to bulk modify comments has failed.' ), false );
-               $trans['moderate']['comments'] = array( __( 'Your attempt to moderate comments has failed.' ), false );
-
-               $trans['add']['bookmark']      = array( __( 'Your attempt to add this link has failed.' ), false );
-               $trans['delete']['bookmark']   = array( __( 'Your attempt to delete this link: &#8220;%s&#8221; has failed.' ), 'use_id' );
-               $trans['update']['bookmark']   = array( __( 'Your attempt to edit this link: &#8220;%s&#8221; has failed.' ), 'use_id' );
-               $trans['bulk']['bookmarks']    = array( __( 'Your attempt to bulk modify links has failed.' ), false );
-
-               $trans['add']['page']          = array( __( 'Your attempt to add this page has failed.' ), false );
-               $trans['delete']['page']       = array( __( 'Your attempt to delete this page: &#8220;%s&#8221; has failed.' ), 'get_the_title' );
-               $trans['update']['page']       = array( __( 'Your attempt to edit this page: &#8220;%s&#8221; has failed.' ), 'get_the_title' );
-
-               $trans['edit']['plugin']       = array( __( 'Your attempt to edit this plugin file: &#8220;%s&#8221; has failed.' ), 'use_id' );
-               $trans['activate']['plugin']   = array( __( 'Your attempt to activate this plugin: &#8220;%s&#8221; has failed.' ), 'use_id' );
-               $trans['deactivate']['plugin'] = array( __( 'Your attempt to deactivate this plugin: &#8220;%s&#8221; has failed.' ), 'use_id' );
-               $trans['upgrade']['plugin']    = array( __( 'Your attempt to upgrade this plugin: &#8220;%s&#8221; has failed.' ), 'use_id' );
-
-               $trans['add']['post']          = array( __( 'Your attempt to add this post has failed.' ), false );
-               $trans['delete']['post']       = array( __( 'Your attempt to delete this post: &#8220;%s&#8221; has failed.' ), 'get_the_title' );
-               $trans['update']['post']       = array( __( 'Your attempt to edit this post: &#8220;%s&#8221; has failed.' ), 'get_the_title' );
-
-               $trans['add']['user']          = array( __( 'Your attempt to add this user has failed.' ), false );
-               $trans['delete']['users']      = array( __( 'Your attempt to delete users has failed.' ), false );
-               $trans['bulk']['users']        = array( __( 'Your attempt to bulk modify users has failed.' ), false );
-               $trans['update']['user']       = array( __( 'Your attempt to edit this user: &#8220;%s&#8221; has failed.' ), 'get_the_author_meta', 'display_name' );
-               $trans['update']['profile']    = array( __( 'Your attempt to modify the profile for: &#8220;%s&#8221; has failed.' ), 'get_the_author_meta', 'display_name' );
-
-               $trans['update']['options']    = array( __( 'Your attempt to edit your settings has failed.' ), false );
-               $trans['update']['permalink']  = array( __( 'Your attempt to change your permalink structure to: %s has failed.' ), 'use_id' );
-               $trans['edit']['file']         = array( __( 'Your attempt to edit this file: &#8220;%s&#8221; has failed.' ), 'use_id' );
-               $trans['edit']['theme']        = array( __( 'Your attempt to edit this theme file: &#8220;%s&#8221; has failed.' ), 'use_id' );
-               $trans['switch']['theme']      = array( __( 'Your attempt to switch to this theme: &#8220;%s&#8221; has failed.' ), 'use_id' );
-
-               $trans['log']['out']           = array( sprintf( __( 'You are attempting to log out of %s' ), get_bloginfo( 'sitename' ) ), false );
-
-               if ( isset( $trans[$verb][$noun] ) ) {
-                       if ( !empty( $trans[$verb][$noun][1] ) ) {
-                               $lookup = $trans[$verb][$noun][1];
-                               if ( isset($trans[$verb][$noun][2]) )
-                                       $lookup_value = $trans[$verb][$noun][2];
-                               $object = $matches[4];
-                               if ( 'use_id' != $lookup ) {
-                                       if ( isset( $lookup_value ) )
-                                               $object = call_user_func( $lookup, $lookup_value, $object );
-                                       else
-                                               $object = call_user_func( $lookup, $object );
-                               }
-                               return sprintf( $trans[$verb][$noun][0], esc_html($object) );
-                       } else {
-                               return $trans[$verb][$noun][0];
-                       }
-               }
-
-               return apply_filters( 'explain_nonce_' . $verb . '-' . $noun, __( 'Are you sure you want to do this?' ), isset($matches[4]) ? $matches[4] : '' );
-       } else {
-               return apply_filters( 'explain_nonce_' . $action, __( 'Are you sure you want to do this?' ) );
-       }
+       _deprecated_function( __FUNCTION__, '3.4.1', 'wp_nonce_ays()' );
+       return __( 'Are you sure you want to do this?' );
 }
 
 /**
 }
 
 /**
@@ -2631,16 +1864,18 @@ function wp_explain_nonce( $action ) {
  */
 function wp_nonce_ays( $action ) {
        $title = __( 'WordPress Failure Notice' );
  */
 function wp_nonce_ays( $action ) {
        $title = __( 'WordPress Failure Notice' );
-       $html = esc_html( wp_explain_nonce( $action ) );
-       if ( 'log-out' == $action )
-               $html .= "</p><p>" . sprintf( __( "Do you really want to <a href='%s'>log out</a>?"), wp_logout_url() );
-       elseif ( wp_get_referer() )
-               $html .= "</p><p><a href='" . esc_url( remove_query_arg( 'updated', wp_get_referer() ) ) . "'>" . __( 'Please try again.' ) . "</a>";
+       if ( 'log-out' == $action ) {
+               $html = sprintf( __( 'You are attempting to log out of %s' ), get_bloginfo( 'name' ) ) . '</p><p>';
+               $html .= sprintf( __( "Do you really want to <a href='%s'>log out</a>?"), wp_logout_url() );
+       } else {
+               $html = __( 'Are you sure you want to do this?' );
+               if ( wp_get_referer() )
+                       $html .= "</p><p><a href='" . esc_url( remove_query_arg( 'updated', wp_get_referer() ) ) . "'>" . __( 'Please try again.' ) . "</a>";
+       }
 
        wp_die( $html, $title, array('response' => 403) );
 }
 
 
        wp_die( $html, $title, array('response' => 403) );
 }
 
-
 /**
  * Kill WordPress execution and display HTML message with error message.
  *
 /**
  * Kill WordPress execution and display HTML message with error message.
  *
@@ -2648,20 +1883,23 @@ function wp_nonce_ays( $action ) {
  * HTML will be displayed to the user. It is recommended to use this function
  * only, when the execution should not continue any further. It is not
  * recommended to call this function very often and try to handle as many errors
  * HTML will be displayed to the user. It is recommended to use this function
  * only, when the execution should not continue any further. It is not
  * recommended to call this function very often and try to handle as many errors
- * as possible siliently.
+ * as possible silently.
  *
  * @since 2.0.4
  *
  * @param string $message Error message.
  * @param string $title Error title.
  *
  * @since 2.0.4
  *
  * @param string $message Error message.
  * @param string $title Error title.
- * @param string|array $args Optional arguements to control behaviour.
- */
-function wp_die( $message, $title = '', $args = array() ) {
-       if ( function_exists( 'apply_filters' ) ) {
-               $function = apply_filters( 'wp_die_handler', '_default_wp_die_handler');
-       }else {
-               $function = '_default_wp_die_handler';
-       }
+ * @param string|array $args Optional arguments to control behavior.
+ */
+function wp_die( $message = '', $title = '', $args = array() ) {
+       if ( defined( 'DOING_AJAX' ) && DOING_AJAX )
+               $function = apply_filters( 'wp_die_ajax_handler', '_ajax_wp_die_handler' );
+       elseif ( defined( 'XMLRPC_REQUEST' ) && XMLRPC_REQUEST )
+               $function = apply_filters( 'wp_die_xmlrpc_handler', '_xmlrpc_wp_die_handler' );
+       elseif ( defined( 'APP_REQUEST' ) && APP_REQUEST )
+               $function = apply_filters( 'wp_die_app_handler', '_scalar_wp_die_handler' );
+       else
+               $function = apply_filters( 'wp_die_handler', '_default_wp_die_handler' );
 
        call_user_func( $function, $message, $title, $args );
 }
 
        call_user_func( $function, $message, $title, $args );
 }
@@ -2677,7 +1915,7 @@ function wp_die( $message, $title = '', $args = array() ) {
  *
  * @param string $message Error message.
  * @param string $title Error title.
  *
  * @param string $message Error message.
  * @param string $title Error title.
- * @param string|array $args Optional arguements to control behaviour.
+ * @param string|array $args Optional arguments to control behavior.
  */
 function _default_wp_die_handler( $message, $title = '', $args = array() ) {
        $defaults = array( 'response' => 500 );
  */
 function _default_wp_die_handler( $message, $title = '', $args = array() ) {
        $defaults = array( 'response' => 500 );
@@ -2709,48 +1947,123 @@ function _default_wp_die_handler( $message, $title = '', $args = array() ) {
 
        if ( isset( $r['back_link'] ) && $r['back_link'] ) {
                $back_text = $have_gettext? __('&laquo; Back') : '&laquo; Back';
 
        if ( isset( $r['back_link'] ) && $r['back_link'] ) {
                $back_text = $have_gettext? __('&laquo; Back') : '&laquo; Back';
-               $message .= "\n<p><a href='javascript:history.back()'>$back_text</p>";
+               $message .= "\n<p><a href='javascript:history.back()'>$back_text</a></p>";
        }
 
        }
 
-       if ( defined( 'WP_SITEURL' ) && '' != WP_SITEURL )
-               $admin_dir = WP_SITEURL . '/wp-admin/';
-       elseif ( function_exists( 'get_bloginfo' ) && '' != get_bloginfo( 'wpurl' ) )
-               $admin_dir = get_bloginfo( 'wpurl' ) . '/wp-admin/';
-       elseif ( strpos( $_SERVER['PHP_SELF'], 'wp-admin' ) !== false )
-               $admin_dir = '';
-       else
-               $admin_dir = 'wp-admin/';
-
-       if ( !function_exists( 'did_action' ) || !did_action( 'admin_head' ) ) :
-       if ( !headers_sent() ) {
-               status_header( $r['response'] );
-               nocache_headers();
-               header( 'Content-Type: text/html; charset=utf-8' );
-       }
+       if ( ! did_action( 'admin_head' ) ) :
+               if ( !headers_sent() ) {
+                       status_header( $r['response'] );
+                       nocache_headers();
+                       header( 'Content-Type: text/html; charset=utf-8' );
+               }
 
 
-       if ( empty($title) )
-               $title = $have_gettext ? __('WordPress &rsaquo; Error') : 'WordPress &rsaquo; Error';
+               if ( empty($title) )
+                       $title = $have_gettext ? __('WordPress &rsaquo; Error') : 'WordPress &rsaquo; Error';
 
 
-       $text_direction = 'ltr';
-       if ( isset($r['text_direction']) && 'rtl' == $r['text_direction'] )
-               $text_direction = 'rtl';
-       elseif ( function_exists( 'is_rtl' ) && is_rtl() )
-               $text_direction = 'rtl';
+               $text_direction = 'ltr';
+               if ( isset($r['text_direction']) && 'rtl' == $r['text_direction'] )
+                       $text_direction = 'rtl';
+               elseif ( function_exists( 'is_rtl' ) && is_rtl() )
+                       $text_direction = 'rtl';
 ?>
 ?>
-<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
-<!-- Ticket #11289, IE bug fix: always pad the error page with enough characters such that it is greater than 512 bytes, even after gzip compression abcdefghijklmnopqrstuvwxyz1234567890aabbccddeeffgghhiijjkkllmmnnooppqqrrssttuuvvwwxxyyzz11223344556677889900abacbcbdcdcededfefegfgfhghgihihjijikjkjlklkmlmlnmnmononpopoqpqprqrqsrsrtstsubcbcdcdedefefgfabcadefbghicjkldmnoepqrfstugvwxhyz1i234j567k890laabmbccnddeoeffpgghqhiirjjksklltmmnunoovppqwqrrxsstytuuzvvw0wxx1yyz2z113223434455666777889890091abc2def3ghi4jkl5mno6pqr7stu8vwx9yz11aab2bcc3dd4ee5ff6gg7hh8ii9j0jk1kl2lmm3nnoo4p5pq6qrr7ss8tt9uuvv0wwx1x2yyzz13aba4cbcb5dcdc6dedfef8egf9gfh0ghg1ihi2hji3jik4jkj5lkl6kml7mln8mnm9ono -->
-<html xmlns="http://www.w3.org/1999/xhtml" <?php if ( function_exists( 'language_attributes' ) ) language_attributes(); ?>>
+<!DOCTYPE html>
+<!-- Ticket #11289, IE bug fix: always pad the error page with enough characters such that it is greater than 512 bytes, even after gzip compression abcdefghijklmnopqrstuvwxyz1234567890aabbccddeeffgghhiijjkkllmmnnooppqqrrssttuuvvwwxxyyzz11223344556677889900abacbcbdcdcededfefegfgfhghgihihjijikjkjlklkmlmlnmnmononpopoqpqprqrqsrsrtstsubcbcdcdedefefgfabcadefbghicjkldmnoepqrfstugvwxhyz1i234j567k890laabmbccnddeoeffpgghqhiirjjksklltmmnunoovppqwqrrxsstytuuzvvw0wxx1yyz2z113223434455666777889890091abc2def3ghi4jkl5mno6pqr7stu8vwx9yz11aab2bcc3dd4ee5ff6gg7hh8ii9j0jk1kl2lmm3nnoo4p5pq6qrr7ss8tt9uuvv0wwx1x2yyzz13aba4cbcb5dcdc6dedfef8egf9gfh0ghg1ihi2hji3jik4jkj5lkl6kml7mln8mnm9ono
+-->
+<html xmlns="http://www.w3.org/1999/xhtml" <?php if ( function_exists( 'language_attributes' ) && function_exists( 'is_rtl' ) ) language_attributes(); else echo "dir='$text_direction'"; ?>>
 <head>
        <meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
        <title><?php echo $title ?></title>
 <head>
        <meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
        <title><?php echo $title ?></title>
-       <link rel="stylesheet" href="<?php echo $admin_dir; ?>css/install.css" type="text/css" />
-<?php
-if ( 'rtl' == $text_direction ) : ?>
-       <link rel="stylesheet" href="<?php echo $admin_dir; ?>css/install-rtl.css" type="text/css" />
-<?php endif; ?>
+       <style type="text/css">
+               html {
+                       background: #f9f9f9;
+               }
+               body {
+                       background: #fff;
+                       color: #333;
+                       font-family: sans-serif;
+                       margin: 2em auto;
+                       padding: 1em 2em;
+                       -webkit-border-radius: 3px;
+                       border-radius: 3px;
+                       border: 1px solid #dfdfdf;
+                       max-width: 700px;
+               }
+               h1 {
+                       border-bottom: 1px solid #dadada;
+                       clear: both;
+                       color: #666;
+                       font: 24px Georgia, "Times New Roman", Times, serif;
+                       margin: 30px 0 0 0;
+                       padding: 0;
+                       padding-bottom: 7px;
+               }
+               #error-page {
+                       margin-top: 50px;
+               }
+               #error-page p {
+                       font-size: 14px;
+                       line-height: 1.5;
+                       margin: 25px 0 20px;
+               }
+               #error-page code {
+                       font-family: Consolas, Monaco, monospace;
+               }
+               ul li {
+                       margin-bottom: 10px;
+                       font-size: 14px ;
+               }
+               a {
+                       color: #21759B;
+                       text-decoration: none;
+               }
+               a:hover {
+                       color: #D54E21;
+               }
+
+               .button {
+                       font-family: sans-serif;
+                       text-decoration: none;
+                       font-size: 14px !important;
+                       line-height: 16px;
+                       padding: 6px 12px;
+                       cursor: pointer;
+                       border: 1px solid #bbb;
+                       color: #464646;
+                       -webkit-border-radius: 15px;
+                       border-radius: 15px;
+                       -moz-box-sizing: content-box;
+                       -webkit-box-sizing: content-box;
+                       box-sizing: content-box;
+                       background-color: #f5f5f5;
+                       background-image: -ms-linear-gradient(top, #ffffff, #f2f2f2);
+                       background-image: -moz-linear-gradient(top, #ffffff, #f2f2f2);
+                       background-image: -o-linear-gradient(top, #ffffff, #f2f2f2);
+                       background-image: -webkit-gradient(linear, left top, left bottom, from(#ffffff), to(#f2f2f2));
+                       background-image: -webkit-linear-gradient(top, #ffffff, #f2f2f2);
+                       background-image: linear-gradient(top, #ffffff, #f2f2f2);
+               }
+
+               .button:hover {
+                       color: #000;
+                       border-color: #666;
+               }
+
+               .button:active {
+                       background-image: -ms-linear-gradient(top, #f2f2f2, #ffffff);
+                       background-image: -moz-linear-gradient(top, #f2f2f2, #ffffff);
+                       background-image: -o-linear-gradient(top, #f2f2f2, #ffffff);
+                       background-image: -webkit-gradient(linear, left top, left bottom, from(#f2f2f2), to(#ffffff));
+                       background-image: -webkit-linear-gradient(top, #f2f2f2, #ffffff);
+                       background-image: linear-gradient(top, #f2f2f2, #ffffff);
+               }
+
+               <?php if ( 'rtl' == $text_direction ) : ?>
+               body { font-family: Tahoma, Arial; }
+               <?php endif; ?>
+       </style>
 </head>
 <body id="error-page">
 </head>
 <body id="error-page">
-<?php endif; ?>
+<?php endif; // ! did_action( 'admin_head' ) ?>
        <?php echo $message; ?>
 </body>
 </html>
        <?php echo $message; ?>
 </body>
 </html>
@@ -2758,10 +2071,67 @@ if ( 'rtl' == $text_direction ) : ?>
        die();
 }
 
        die();
 }
 
+/**
+ * Kill WordPress execution and display XML message with error message.
+ *
+ * This is the handler for wp_die when processing XMLRPC requests.
+ *
+ * @since 3.2.0
+ * @access private
+ *
+ * @param string $message Error message.
+ * @param string $title Error title.
+ * @param string|array $args Optional arguments to control behavior.
+ */
+function _xmlrpc_wp_die_handler( $message, $title = '', $args = array() ) {
+       global $wp_xmlrpc_server;
+       $defaults = array( 'response' => 500 );
+
+       $r = wp_parse_args($args, $defaults);
+
+       if ( $wp_xmlrpc_server ) {
+               $error = new IXR_Error( $r['response'] , $message);
+               $wp_xmlrpc_server->output( $error->getXml() );
+       }
+       die();
+}
+
+/**
+ * Kill WordPress ajax execution.
+ *
+ * This is the handler for wp_die when processing Ajax requests.
+ *
+ * @since 3.4.0
+ * @access private
+ *
+ * @param string $message Optional. Response to print.
+ */
+function _ajax_wp_die_handler( $message = '' ) {
+       if ( is_scalar( $message ) )
+               die( (string) $message );
+       die( '0' );
+}
+
+/**
+ * Kill WordPress execution.
+ *
+ * This is the handler for wp_die when processing APP requests.
+ *
+ * @since 3.4.0
+ * @access private
+ *
+ * @param string $message Optional. Response to print.
+ */
+function _scalar_wp_die_handler( $message = '' ) {
+       if ( is_scalar( $message ) )
+               die( (string) $message );
+       die();
+}
+
 /**
  * Retrieve the WordPress home page URL.
  *
 /**
  * Retrieve the WordPress home page URL.
  *
- * If the constant named 'WP_HOME' exists, then it willl be used and returned by
+ * If the constant named 'WP_HOME' exists, then it will be used and returned by
  * the function. This can be used to counter the redirection on your local
  * development environment.
  *
  * the function. This can be used to counter the redirection on your local
  * development environment.
  *
@@ -2774,7 +2144,7 @@ if ( 'rtl' == $text_direction ) : ?>
  */
 function _config_wp_home( $url = '' ) {
        if ( defined( 'WP_HOME' ) )
  */
 function _config_wp_home( $url = '' ) {
        if ( defined( 'WP_HOME' ) )
-               return WP_HOME;
+               return untrailingslashit( WP_HOME );
        return $url;
 }
 
        return $url;
 }
 
@@ -2794,7 +2164,7 @@ function _config_wp_home( $url = '' ) {
  */
 function _config_wp_siteurl( $url = '' ) {
        if ( defined( 'WP_SITEURL' ) )
  */
 function _config_wp_siteurl( $url = '' ) {
        if ( defined( 'WP_SITEURL' ) )
-               return WP_SITEURL;
+               return untrailingslashit( WP_SITEURL );
        return $url;
 }
 
        return $url;
 }
 
@@ -2825,7 +2195,6 @@ function _mce_set_direction( $input ) {
        return $input;
 }
 
        return $input;
 }
 
-
 /**
  * Convert smiley code to the icon graphic file equivalent.
  *
 /**
  * Convert smiley code to the icon graphic file equivalent.
  *
@@ -2887,7 +2256,8 @@ function smilies_init() {
                      ':-x' => 'icon_mad.gif',
                      ':-|' => 'icon_neutral.gif',
                      ';-)' => 'icon_wink.gif',
                      ':-x' => 'icon_mad.gif',
                      ':-|' => 'icon_neutral.gif',
                      ';-)' => 'icon_wink.gif',
-                      '8)' => 'icon_cool.gif',
+               // This one transformation breaks regular text with frequency.
+               //     '8)' => 'icon_cool.gif',
                       '8O' => 'icon_eek.gif',
                       ':(' => 'icon_sad.gif',
                       ':)' => 'icon_smile.gif',
                       '8O' => 'icon_eek.gif',
                       ':(' => 'icon_sad.gif',
                       ':)' => 'icon_smile.gif',
@@ -2963,7 +2333,7 @@ function wp_parse_args( $args, $defaults = '' ) {
 }
 
 /**
 }
 
 /**
- * Clean up an array, comma- or space-separated list of IDs
+ * Clean up an array, comma- or space-separated list of IDs.
  *
  * @since 3.0.0
  *
  *
  * @since 3.0.0
  *
@@ -2978,7 +2348,25 @@ function wp_parse_id_list( $list ) {
 }
 
 /**
 }
 
 /**
- * Filters a list of objects, based on a set of key => value arguments
+ * Extract a slice of an array, given a list of keys.
+ *
+ * @since 3.1.0
+ *
+ * @param array $array The original array
+ * @param array $keys The list of keys
+ * @return array The array slice
+ */
+function wp_array_slice_assoc( $array, $keys ) {
+       $slice = array();
+       foreach ( $keys as $key )
+               if ( isset( $array[ $key ] ) )
+                       $slice[ $key ] = $array[ $key ];
+
+       return $slice;
+}
+
+/**
+ * Filters a list of objects, based on a set of key => value arguments.
  *
  * @since 3.0.0
  *
  *
  * @since 3.0.0
  *
@@ -2990,26 +2378,55 @@ function wp_parse_id_list( $list ) {
  * @return array A list of objects or object fields
  */
 function wp_filter_object_list( $list, $args = array(), $operator = 'and', $field = false ) {
  * @return array A list of objects or object fields
  */
 function wp_filter_object_list( $list, $args = array(), $operator = 'and', $field = false ) {
-       if ( !is_array($list) )
+       if ( ! is_array( $list ) )
                return array();
 
                return array();
 
-       if ( empty($args) )
-               $args = array();
+       $list = wp_list_filter( $list, $args, $operator );
 
 
-       if ( empty($args) && !$field )
-               return $list;   // nothing to do
+       if ( $field )
+               $list = wp_list_pluck( $list, $field );
 
 
-       $count = count($args);
+       return $list;
+}
+
+/**
+ * Filters a list of objects, based on a set of key => value arguments.
+ *
+ * @since 3.1.0
+ *
+ * @param array $list An array of objects to filter
+ * @param array $args An array of key => value arguments to match against each object
+ * @param string $operator The logical operation to perform:
+ *    'AND' means all elements from the array must match;
+ *    'OR' means only one element needs to match;
+ *    'NOT' means no elements may match.
+ *   The default is 'AND'.
+ * @return array
+ */
+function wp_list_filter( $list, $args = array(), $operator = 'AND' ) {
+       if ( ! is_array( $list ) )
+               return array();
 
 
+       if ( empty( $args ) )
+               return $list;
+
+       $operator = strtoupper( $operator );
+       $count = count( $args );
        $filtered = array();
 
        foreach ( $list as $key => $obj ) {
        $filtered = array();
 
        foreach ( $list as $key => $obj ) {
-               $matched = count(array_intersect_assoc(get_object_vars($obj), $args));
-               if ( ('and' == $operator && $matched == $count) || ('or' == $operator && $matched <= $count) ) {
-                       if ( $field )
-                               $filtered[] = $obj->$field;
-                       else
-                               $filtered[$key] = $obj;
+               $to_match = (array) $obj;
+
+               $matched = 0;
+               foreach ( $args as $m_key => $m_value ) {
+                       if ( $m_value == $to_match[ $m_key ] )
+                               $matched++;
+               }
+
+               if ( ( 'AND' == $operator && $matched == $count )
+                 || ( 'OR' == $operator && $matched > 0 )
+                 || ( 'NOT' == $operator && 0 == $matched ) ) {
+                       $filtered[$key] = $obj;
                }
        }
 
                }
        }
 
@@ -3017,17 +2434,23 @@ function wp_filter_object_list( $list, $args = array(), $operator = 'and', $fiel
 }
 
 /**
 }
 
 /**
- * Determines if default embed handlers should be loaded.
+ * Pluck a certain field out of each object in a list.
  *
  *
- * Checks to make sure that the embeds library hasn't already been loaded. If
- * it hasn't, then it will load the embeds library.
+ * @since 3.1.0
  *
  *
- * @since 2.9.0
+ * @param array $list A list of objects or arrays
+ * @param int|string $field A field from the object to place instead of the entire object
+ * @return array
  */
  */
-function wp_maybe_load_embeds() {
-       if ( ! apply_filters('load_default_embeds', true) )
-               return;
-       require_once( ABSPATH . WPINC . '/default-embeds.php' );
+function wp_list_pluck( $list, $field ) {
+       foreach ( $list as $key => $value ) {
+               if ( is_object( $value ) )
+                       $list[ $key ] = $value->$field;
+               else
+                       $list[ $key ] = $value[ $field ];
+       }
+
+       return $list;
 }
 
 /**
 }
 
 /**
@@ -3071,24 +2494,6 @@ function wp_ob_end_flush_all() {
                ob_end_flush();
 }
 
                ob_end_flush();
 }
 
-/**
- * Load the correct database class file.
- *
- * This function is used to load the database class file either at runtime or by
- * wp-admin/setup-config.php We must globalise $wpdb to ensure that it is
- * defined globally by the inline code in wp-db.php.
- *
- * @since 2.5.0
- * @global $wpdb WordPress Database Object
- */
-function require_wp_db() {
-       global $wpdb;
-       if ( file_exists( WP_CONTENT_DIR . '/db.php' ) )
-               require_once( WP_CONTENT_DIR . '/db.php' );
-       else
-               require_once( ABSPATH . WPINC . '/wp-db.php' );
-}
-
 /**
  * Load custom DB error or display WordPress DB error.
  *
 /**
  * Load custom DB error or display WordPress DB error.
  *
@@ -3123,16 +2528,18 @@ function dead_db() {
        status_header( 500 );
        nocache_headers();
        header( 'Content-Type: text/html; charset=utf-8' );
        status_header( 500 );
        nocache_headers();
        header( 'Content-Type: text/html; charset=utf-8' );
+
+       wp_load_translations_early();
 ?>
 ?>
-<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
-<html xmlns="http://www.w3.org/1999/xhtml" <?php if ( function_exists( 'language_attributes' ) ) language_attributes(); ?>>
+<!DOCTYPE html>
+<html xmlns="http://www.w3.org/1999/xhtml"<?php if ( is_rtl() ) echo ' dir="rtl"'; ?>>
 <head>
 <meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
 <head>
 <meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
-       <title>Database Error</title>
+       <title><?php _e( 'Database Error' ); ?></title>
 
 </head>
 <body>
 
 </head>
 <body>
-       <h1>Error establishing a database connection</h1>
+       <h1><?php _e( 'Error establishing a database connection' ); ?></h1>
 </body>
 </html>
 <?php
 </body>
 </html>
 <?php
@@ -3144,7 +2551,7 @@ function dead_db() {
  *
  * @since 2.5.0
  *
  *
  * @since 2.5.0
  *
- * @param mixed $maybeint Data you wish to have convered to an nonnegative integer
+ * @param mixed $maybeint Data you wish to have converted to a nonnegative integer
  * @return int An nonnegative integer
  */
 function absint( $maybeint ) {
  * @return int An nonnegative integer
  */
 function absint( $maybeint ) {
@@ -3186,22 +2593,6 @@ function url_is_accessable_via_ssl($url)
        return false;
 }
 
        return false;
 }
 
-/**
- * Secure URL, if available or the given URL.
- *
- * @since 2.5.0
- *
- * @param string $url Complete URL path with transport.
- * @return string Secure or regular URL path.
- */
-function atom_service_url_filter($url)
-{
-       if ( url_is_accessable_via_ssl($url) )
-               return preg_replace( '/^http:\/\//', 'https://',  $url );
-       else
-               return $url;
-}
-
 /**
  * Marks a function as deprecated and informs when it has been used.
  *
 /**
  * Marks a function as deprecated and informs when it has been used.
  *
@@ -3209,9 +2600,9 @@ function atom_service_url_filter($url)
  * to get the backtrace up to what file and function called the deprecated
  * function.
  *
  * to get the backtrace up to what file and function called the deprecated
  * function.
  *
- * The current behavior is to trigger an user error if WP_DEBUG is true.
+ * The current behavior is to trigger a user error if WP_DEBUG is true.
  *
  *
- * This function is to be used in every function in depreceated.php
+ * This function is to be used in every function that is deprecated.
  *
  * @package WordPress
  * @subpackage Debug
  *
  * @package WordPress
  * @subpackage Debug
@@ -3227,7 +2618,7 @@ function atom_service_url_filter($url)
  * @param string $version The version of WordPress that deprecated the function
  * @param string $replacement Optional. The function that should have been called
  */
  * @param string $version The version of WordPress that deprecated the function
  * @param string $replacement Optional. The function that should have been called
  */
-function _deprecated_function( $function, $version, $replacement=null ) {
+function _deprecated_function( $function, $version, $replacement = null ) {
 
        do_action( 'deprecated_function_run', $function, $replacement, $version );
 
 
        do_action( 'deprecated_function_run', $function, $replacement, $version );
 
@@ -3247,9 +2638,9 @@ function _deprecated_function( $function, $version, $replacement=null ) {
  * to get the backtrace up to what file and function included the deprecated
  * file.
  *
  * to get the backtrace up to what file and function included the deprecated
  * file.
  *
- * The current behavior is to trigger an user error if WP_DEBUG is true.
+ * The current behavior is to trigger a user error if WP_DEBUG is true.
  *
  *
- * This function is to be used in every file that is depreceated
+ * This function is to be used in every file that is deprecated.
  *
  * @package WordPress
  * @subpackage Debug
  *
  * @package WordPress
  * @subpackage Debug
@@ -3295,7 +2686,7 @@ function _deprecated_file( $file, $version, $replacement = null, $message = '' )
  * to get the backtrace up to what file and function used the deprecated
  * argument.
  *
  * to get the backtrace up to what file and function used the deprecated
  * argument.
  *
- * The current behavior is to trigger an user error if WP_DEBUG is true.
+ * The current behavior is to trigger a user error if WP_DEBUG is true.
  *
  * @package WordPress
  * @subpackage Debug
  *
  * @package WordPress
  * @subpackage Debug
@@ -3325,7 +2716,41 @@ function _deprecated_argument( $function, $version, $message = null ) {
 }
 
 /**
 }
 
 /**
- * Is the server running earlier than 1.5.0 version of lighttpd
+ * Marks something as being incorrectly called.
+ *
+ * There is a hook doing_it_wrong_run that will be called that can be used
+ * to get the backtrace up to what file and function called the deprecated
+ * function.
+ *
+ * The current behavior is to trigger a user error if WP_DEBUG is true.
+ *
+ * @package WordPress
+ * @subpackage Debug
+ * @since 3.1.0
+ * @access private
+ *
+ * @uses do_action() Calls 'doing_it_wrong_run' and passes the function arguments.
+ * @uses apply_filters() Calls 'doing_it_wrong_trigger_error' and expects boolean value of true to do
+ *   trigger or false to not trigger error.
+ *
+ * @param string $function The function that was called.
+ * @param string $message A message explaining what has been done incorrectly.
+ * @param string $version The version of WordPress where the message was added.
+ */
+function _doing_it_wrong( $function, $message, $version ) {
+
+       do_action( 'doing_it_wrong_run', $function, $message, $version );
+
+       // Allow plugin to filter the output error trigger
+       if ( WP_DEBUG && apply_filters( 'doing_it_wrong_trigger_error', true ) ) {
+               $version = is_null( $version ) ? '' : sprintf( __( '(This message was added in version %s.)' ), $version );
+               $message .= ' ' . __( 'Please see <a href="http://codex.wordpress.org/Debugging_in_WordPress">Debugging in WordPress</a> for more information.' );
+               trigger_error( sprintf( __( '%1$s was called <strong>incorrectly</strong>. %2$s %3$s' ), $function, $message, $version ) );
+       }
+}
+
+/**
+ * Is the server running earlier than 1.5.0 version of lighttpd?
  *
  * @since 2.5.0
  *
  *
  * @since 2.5.0
  *
@@ -3338,7 +2763,7 @@ function is_lighttpd_before_150() {
 }
 
 /**
 }
 
 /**
- * Does the specified module exist in the apache config?
+ * Does the specified module exist in the Apache config?
  *
  * @since 2.5.0
  *
  *
  * @since 2.5.0
  *
@@ -3363,7 +2788,35 @@ function apache_mod_loaded($mod, $default = false) {
                        if ( false !== strpos($phpinfo, $mod) )
                                return true;
        }
                        if ( false !== strpos($phpinfo, $mod) )
                                return true;
        }
-       return $default;
+       return $default;
+}
+
+/**
+ * Check if IIS 7 supports pretty permalinks.
+ *
+ * @since 2.8.0
+ *
+ * @return bool
+ */
+function iis7_supports_permalinks() {
+       global $is_iis7;
+
+       $supports_permalinks = false;
+       if ( $is_iis7 ) {
+               /* First we check if the DOMDocument class exists. If it does not exist,
+                * which is the case for PHP 4.X, then we cannot easily update the xml configuration file,
+                * hence we just bail out and tell user that pretty permalinks cannot be used.
+                * This is not a big issue because PHP 4.X is going to be deprecated and for IIS it
+                * is recommended to use PHP 5.X NTS.
+                * Next we check if the URL Rewrite Module 1.1 is loaded and enabled for the web site. When
+                * URL Rewrite 1.1 is loaded it always sets a server variable called 'IIS_UrlRewriteModule'.
+                * Lastly we make sure that PHP is running via FastCGI. This is important because if it runs
+                * via ISAPI then pretty permalinks will not work.
+                */
+               $supports_permalinks = class_exists('DOMDocument') && isset($_SERVER['IIS_UrlRewriteModule']) && ( php_sapi_name() == 'cgi-fcgi' );
+       }
+
+       return apply_filters('iis7_supports_permalinks', $supports_permalinks);
 }
 
 /**
 }
 
 /**
@@ -3381,16 +2834,16 @@ function apache_mod_loaded($mod, $default = false) {
  * @return int 0 means nothing is wrong, greater than 0 means something was wrong.
  */
 function validate_file( $file, $allowed_files = '' ) {
  * @return int 0 means nothing is wrong, greater than 0 means something was wrong.
  */
 function validate_file( $file, $allowed_files = '' ) {
-       if ( false !== strpos( $file, '..' ))
+       if ( false !== strpos( $file, '..' ) )
                return 1;
 
                return 1;
 
-       if ( false !== strpos( $file, './' ))
+       if ( false !== strpos( $file, './' ) )
                return 1;
 
                return 1;
 
-       if (!empty ( $allowed_files ) && (!in_array( $file, $allowed_files ) ) )
+       if ( ! empty( $allowed_files ) && ! in_array( $file, $allowed_files ) )
                return 3;
 
                return 3;
 
-       if (':' == substr( $file, 1, 1 ))
+       if (':' == substr( $file, 1, 1 ) )
                return 2;
 
        return 0;
                return 2;
 
        return 0;
@@ -3436,7 +2889,7 @@ function force_ssl_login( $force = null ) {
 }
 
 /**
 }
 
 /**
- * Whether to force SSL used for the Administration Panels.
+ * Whether to force SSL used for the Administration Screens.
  *
  * @since 2.6.0
  *
  *
  * @since 2.6.0
  *
@@ -3470,347 +2923,57 @@ function wp_guess_url() {
                $url = WP_SITEURL;
        } else {
                $schema = is_ssl() ? 'https://' : 'http://';
                $url = WP_SITEURL;
        } else {
                $schema = is_ssl() ? 'https://' : 'http://';
-               $url = preg_replace('|/wp-admin/.*|i', '', $schema . $_SERVER['HTTP_HOST'] . $_SERVER['REQUEST_URI']);
-       }
-       return $url;
-}
-
-/**
- * Suspend cache invalidation.
- *
- * Turns cache invalidation on and off.  Useful during imports where you don't wont to do invalidations
- * every time a post is inserted.  Callers must be sure that what they are doing won't lead to an inconsistent
- * cache when invalidation is suspended.
- *
- * @since 2.7.0
- *
- * @param bool $suspend Whether to suspend or enable cache invalidation
- * @return bool The current suspend setting
- */
-function wp_suspend_cache_invalidation($suspend = true) {
-       global $_wp_suspend_cache_invalidation;
-
-       $current_suspend = $_wp_suspend_cache_invalidation;
-       $_wp_suspend_cache_invalidation = $suspend;
-       return $current_suspend;
-}
-
-/**
- * Retrieve site option value based on name of option.
- *
- * @see get_option()
- * @package WordPress
- * @subpackage Option
- * @since 2.8.0
- *
- * @uses apply_filters() Calls 'pre_site_option_$option' before checking the option.
- *     Any value other than false will "short-circuit" the retrieval of the option
- *     and return the returned value.
- * @uses apply_filters() Calls 'site_option_$option', after checking the  option, with
- *     the option value.
- *
- * @param string $option Name of option to retrieve. Expected to not be SQL-escaped.
- * @param mixed $default Optional value to return if option doesn't exist. Default false.
- * @param bool $use_cache Whether to use cache. Multisite only. Default true.
- * @return mixed Value set for the option.
- */
-function get_site_option( $option, $default = false, $use_cache = true ) {
-       global $wpdb;
-
-       // Allow plugins to short-circuit site options.
-       $pre = apply_filters( 'pre_site_option_' . $option, false );
-       if ( false !== $pre )
-               return $pre;
-
-       if ( !is_multisite() ) {
-               $value = get_option($option, $default);
-       } else {
-               $cache_key = "{$wpdb->siteid}:$option";
-               if ( $use_cache )
-                       $value = wp_cache_get($cache_key, 'site-options');
-
-               if ( !isset($value) || (false === $value) ) {
-                       $row = $wpdb->get_row( $wpdb->prepare("SELECT meta_value FROM $wpdb->sitemeta WHERE meta_key = %s AND site_id = %d", $option, $wpdb->siteid ) );
-
-                       // Has to be get_row instead of get_var because of funkiness with 0, false, null values
-                       if ( is_object( $row ) )
-                               $value = $row->meta_value;
-                       else
-                               $value = $default;
-
-                       $value = maybe_unserialize( $value );
-
-                       wp_cache_set( $cache_key, $value, 'site-options' );
-               }
-       }
-
-       return apply_filters( 'site_option_' . $option, $value );
-}
-
-/**
- * Add a new site option.
- *
- * @see add_option()
- * @package WordPress
- * @subpackage Option
- * @since 2.8.0
- *
- * @uses apply_filters() Calls 'pre_add_site_option_$option' hook to allow overwriting the
- *     option value to be stored.
- * @uses do_action() Calls 'add_site_option_$option' and 'add_site_option' hooks on success.
- *
- * @param string $option Name of option to add. Expected to not be SQL-escaped.
- * @param mixed $value Optional. Option value, can be anything. Expected to not be SQL-escaped.
- * @return bool False if option was not added and true if option was added.
- */
-function add_site_option( $option, $value ) {
-       global $wpdb;
-
-       $value = apply_filters( 'pre_add_site_option_' . $option, $value );
-
-       if ( !is_multisite() ) {
-               $result = add_option( $option, $value );
-       } else {
-               $cache_key = "{$wpdb->siteid}:$option";
-
-               if ( $wpdb->get_row( $wpdb->prepare( "SELECT meta_value FROM $wpdb->sitemeta WHERE meta_key = %s AND site_id = %d", $option, $wpdb->siteid ) ) )
-                       return update_site_option( $option, $value );
-
-               $value = sanitize_option( $option, $value );
-               wp_cache_set( $cache_key, $value, 'site-options' );
-
-               $_value = $value;
-               $value = maybe_serialize($value);
-               $result = $wpdb->insert( $wpdb->sitemeta, array('site_id' => $wpdb->siteid, 'meta_key' => $option, 'meta_value' => $value ) );
-               $value = $_value;
-       }
-
-       do_action( "add_site_option_{$option}", $option, $value );
-       do_action( "add_site_option", $option, $value );
-
-       return $result;
-}
-
-/**
- * Removes site option by name.
- *
- * @see delete_option()
- * @package WordPress
- * @subpackage Option
- * @since 2.8.0
- *
- * @uses do_action() Calls 'pre_delete_site_option_$option' hook before option is deleted.
- * @uses do_action() Calls 'delete_site_option' and 'delete_site_option_$option'
- *     hooks on success.
- *
- * @param string $option Name of option to remove. Expected to not be SQL-escaped.
- * @return bool True, if succeed. False, if failure.
- */
-function delete_site_option( $option ) {
-       global $wpdb;
-
-       // ms_protect_special_option( $option ); @todo
-
-       do_action( 'pre_delete_site_option_' . $option );
-
-       if ( !is_multisite() ) {
-               $result = delete_option( $option );
-       } else {
-               $row = $wpdb->get_row( $wpdb->prepare( "SELECT meta_id FROM {$wpdb->sitemeta} WHERE meta_key = %s AND site_id = %d", $option, $wpdb->siteid ) );
-               if ( is_null( $row ) || !$row->meta_id )
-                       return false;
-               $cache_key = "{$wpdb->siteid}:$option";
-               wp_cache_delete( $cache_key, 'site-options' );
-
-               $result = $wpdb->query( $wpdb->prepare( "DELETE FROM {$wpdb->sitemeta} WHERE meta_key = %s AND site_id = %d", $option, $wpdb->siteid ) );
-       }
-
-       if ( $result ) {
-               do_action( "delete_site_option_{$option}", $option );
-               do_action( "delete_site_option", $option );
-               return true;
-       }
-       return false;
-}
-
-/**
- * Update the value of a site option that was already added.
- *
- * @see update_option()
- * @since 2.8.0
- * @package WordPress
- * @subpackage Option
- *
- * @uses apply_filters() Calls 'pre_update_site_option_$option' hook to allow overwriting the
- *     option value to be stored.
- * @uses do_action() Calls 'update_site_option_$option' and 'update_site_option' hooks on success.
- *
- * @param string $option Name of option. Expected to not be SQL-escaped.
- * @param mixed $value Option value. Expected to not be SQL-escaped.
- * @return bool False if value was not updated and true if value was updated.
- */
-function update_site_option( $option, $value ) {
-       global $wpdb;
-
-       $oldvalue = get_site_option( $option );
-       $value = apply_filters( 'pre_update_site_option_' . $option, $value, $oldvalue );
-
-       if ( $value === $oldvalue )
-               return false;
-
-       if ( !is_multisite() ) {
-               $result = update_option( $option, $value );
-       } else {
-               $cache_key = "{$wpdb->siteid}:$option";
-
-               if ( $value && !$wpdb->get_row( $wpdb->prepare( "SELECT meta_value FROM $wpdb->sitemeta WHERE meta_key = %s AND site_id = %d", $option, $wpdb->siteid ) ) )
-                       return add_site_option( $option, $value );
-               $value = sanitize_option( $option, $value );
-               wp_cache_set( $cache_key, $value, 'site-options' );
-
-               $_value = $value;
-               $value = maybe_serialize( $value );
-               $result = $wpdb->update( $wpdb->sitemeta, array( 'meta_value' => $value ), array( 'site_id' => $wpdb->siteid, 'meta_key' => $option ) );
-               $value = $_value;
-       }
-
-       if ( $result ) {
-               do_action( "update_site_option_{$option}", $option, $value );
-               do_action( "update_site_option", $option, $value );
-               return true;
-       }
-       return false;
-}
-
-/**
- * Delete a site transient
- *
- * @since 2.9.0
- * @package WordPress
- * @subpackage Transient
- *
- * @uses do_action() Calls 'delete_site_transient_$transient' hook before transient is deleted.
- * @uses do_action() Calls 'deleted_site_transient' hook on success.
- *
- * @param string $transient Transient name. Expected to not be SQL-escaped.
- * @return bool True if successful, false otherwise
- */
-function delete_site_transient( $transient ) {
-       global $_wp_using_ext_object_cache;
-
-       do_action( 'delete_site_transient_' . $transient, $transient );
-       if ( $_wp_using_ext_object_cache ) {
-               $result = wp_cache_delete( $transient, 'site-transient' );
-       } else {
-               $option_timeout = '_site_transient_timeout_' . $transient;
-               $option = '_site_transient_' . $transient;
-               $result = delete_site_option( $option );
-               if ( $result )
-                       delete_site_option( $option_timeout );
+               $url = preg_replace('#/(wp-admin/.*|wp-login.php)#i', '', $schema . $_SERVER['HTTP_HOST'] . $_SERVER['REQUEST_URI']);
        }
        }
-       if ( $result )
-               do_action( 'deleted_site_transient', $transient );
-       return $result;
+       return rtrim($url, '/');
 }
 
 /**
 }
 
 /**
- * Get the value of a site transient
+ * Temporarily suspend cache additions.
  *
  *
- * If the transient does not exist or does not have a value, then the return value
- * will be false.
+ * Stops more data being added to the cache, but still allows cache retrieval.
+ * This is useful for actions, such as imports, when a lot of data would otherwise
+ * be almost uselessly added to the cache.
  *
  *
- * @see get_transient()
- * @since 2.9.0
- * @package WordPress
- * @subpackage Transient
+ * Suspension lasts for a single page load at most. Remember to call this
+ * function again if you wish to re-enable cache adds earlier.
  *
  *
- * @uses apply_filters() Calls 'pre_site_transient_$transient' hook before checking the transient.
- *     Any value other than false will "short-circuit" the retrieval of the transient
- *     and return the returned value.
- * @uses apply_filters() Calls 'site_transient_$option' hook, after checking the transient, with
- *     the transient value.
+ * @since 3.3.0
  *
  *
- * @param string $transient Transient name. Expected to not be SQL-escaped.
- * @return mixed Value of transient
+ * @param bool $suspend Optional. Suspends additions if true, re-enables them if false.
+ * @return bool The current suspend setting
  */
  */
-function get_site_transient( $transient ) {
-       global $_wp_using_ext_object_cache;
-
-       $pre = apply_filters( 'pre_site_transient_' . $transient, false );
-       if ( false !== $pre )
-               return $pre;
-
-       if ( $_wp_using_ext_object_cache ) {
-               $value = wp_cache_get( $transient, 'site-transient' );
-       } else {
-               // Core transients that do not have a timeout. Listed here so querying timeouts can be avoided.
-               $no_timeout = array('update_core', 'update_plugins', 'update_themes');
-               $transient_option = '_site_transient_' . $transient;
-               if ( ! in_array( $transient, $no_timeout ) ) {
-                       $transient_timeout = '_site_transient_timeout_' . $transient;
-                       $timeout = get_site_option( $transient_timeout );
-                       if ( false !== $timeout && $timeout < time() ) {
-                               delete_site_option( $transient_option  );
-                               delete_site_option( $transient_timeout );
-                               return false;
-                       }
-               }
+function wp_suspend_cache_addition( $suspend = null ) {
+       static $_suspend = false;
 
 
-               $value = get_site_option( $transient_option );
-       }
+       if ( is_bool( $suspend ) )
+               $_suspend = $suspend;
 
 
-       return apply_filters( 'site_transient_' . $transient, $value );
+       return $_suspend;
 }
 
 /**
 }
 
 /**
- * Set/update the value of a site transient
- *
- * You do not need to serialize values, if the value needs to be serialize, then
- * it will be serialized before it is set.
+ * Suspend cache invalidation.
  *
  *
- * @see set_transient()
- * @since 2.9.0
- * @package WordPress
- * @subpackage Transient
+ * Turns cache invalidation on and off. Useful during imports where you don't wont to do invalidations
+ * every time a post is inserted. Callers must be sure that what they are doing won't lead to an inconsistent
+ * cache when invalidation is suspended.
  *
  *
- * @uses apply_filters() Calls 'pre_set_site_transient_$transient' hook to allow overwriting the
- *     transient value to be stored.
- * @uses do_action() Calls 'set_site_transient_$transient' and 'setted_site_transient' hooks on success.
+ * @since 2.7.0
  *
  *
- * @param string $transient Transient name. Expected to not be SQL-escaped.
- * @param mixed $value Transient value. Expected to not be SQL-escaped.
- * @param int $expiration Time until expiration in seconds, default 0
- * @return bool False if value was not set and true if value was set.
+ * @param bool $suspend Whether to suspend or enable cache invalidation
+ * @return bool The current suspend setting
  */
  */
-function set_site_transient( $transient, $value, $expiration = 0 ) {
-       global $_wp_using_ext_object_cache;
-
-    $value = apply_filters( 'pre_set_site_transient_' . $transient, $value );
+function wp_suspend_cache_invalidation($suspend = true) {
+       global $_wp_suspend_cache_invalidation;
 
 
-       if ( $_wp_using_ext_object_cache ) {
-               $result = wp_cache_set( $transient, $value, 'site-transient', $expiration );
-       } else {
-               $transient_timeout = '_site_transient_timeout_' . $transient;
-               $transient = '_site_transient_' . $transient;
-               if ( false === get_site_option( $transient ) ) {
-                       if ( $expiration )
-                               add_site_option( $transient_timeout, time() + $expiration );
-                       $result = add_site_option( $transient, $value );
-               } else {
-                       if ( $expiration )
-                               update_site_option( $transient_timeout, time() + $expiration );
-                       $result = update_site_option( $transient, $value );
-               }
-       }
-       if ( $result ) {
-               do_action( 'set_site_transient_' . $transient );
-               do_action( 'setted_site_transient', $transient );
-       }
-       return $result;
+       $current_suspend = $_wp_suspend_cache_invalidation;
+       $_wp_suspend_cache_invalidation = $suspend;
+       return $current_suspend;
 }
 
 /**
 }
 
 /**
- * is main site
+ * Is main site?
  *
  *
  * @since 3.0.0
  *
  *
  * @since 3.0.0
@@ -3856,18 +3019,15 @@ function global_terms_enabled() {
 }
 
 /**
 }
 
 /**
- * gmt_offset modification for smart timezone handling
+ * gmt_offset modification for smart timezone handling.
  *
  *
- * Overrides the gmt_offset option if we have a timezone_string available
+ * Overrides the gmt_offset option if we have a timezone_string available.
  *
  * @since 2.8.0
  *
  * @return float|bool
  */
 function wp_timezone_override_offset() {
  *
  * @since 2.8.0
  *
  * @return float|bool
  */
 function wp_timezone_override_offset() {
-       if ( !wp_timezone_supported() ) {
-               return false;
-       }
        if ( !$timezone_string = get_option( 'timezone_string' ) ) {
                return false;
        }
        if ( !$timezone_string = get_option( 'timezone_string' ) ) {
                return false;
        }
@@ -3880,27 +3040,6 @@ function wp_timezone_override_offset() {
        return round( timezone_offset_get( $timezone_object, $datetime_object ) / 3600, 2 );
 }
 
        return round( timezone_offset_get( $timezone_object, $datetime_object ) / 3600, 2 );
 }
 
-/**
- * Check for PHP timezone support
- *
- * @since 2.9.0
- *
- * @return bool
- */
-function wp_timezone_supported() {
-       $support = false;
-       if (
-               function_exists( 'date_create' ) &&
-               function_exists( 'date_default_timezone_set' ) &&
-               function_exists( 'timezone_identifiers_list' ) &&
-               function_exists( 'timezone_open' ) &&
-               function_exists( 'timezone_offset_get' )
-       ) {
-               $support = true;
-       }
-       return apply_filters( 'timezone_support', $support );
-}
-
 /**
  * {@internal Missing Short Description}}
  *
 /**
  * {@internal Missing Short Description}}
  *
@@ -3949,7 +3088,7 @@ function _wp_timezone_choice_usort_callback( $a, $b ) {
 }
 
 /**
 }
 
 /**
- * Gives a nicely formatted list of timezone strings // temporary! Not in final
+ * Gives a nicely formatted list of timezone strings. // temporary! Not in final
  *
  * @since 2.9.0
  *
  *
  * @since 2.9.0
  *
@@ -4078,7 +3217,7 @@ function wp_timezone_choice( $selected_zone ) {
 }
 
 /**
 }
 
 /**
- * Strip close comment and close php tags from file headers used by WP
+ * Strip close comment and close php tags from file headers used by WP.
  * See http://core.trac.wordpress.org/ticket/8497
  *
  * @since 2.8.0
  * See http://core.trac.wordpress.org/ticket/8497
  *
  * @since 2.8.0
@@ -4136,29 +3275,21 @@ function wp_scheduled_delete() {
 }
 
 /**
 }
 
 /**
- * Parse the file contents to retrieve its metadata.
- *
- * Searches for metadata for a file, such as a plugin or theme.  Each piece of
- * metadata must be on its own line. For a field spanning multple lines, it
- * must not have any newlines or only parts of it will be displayed.
+ * Retrieve metadata from a file.
  *
  *
- * Some users have issues with opening large files and manipulating the contents
- * for want is usually the first 1kiB or 2kiB. This function stops pulling in
- * the file contents when it has all of the required data.
+ * Searches for metadata in the first 8kiB of a file, such as a plugin or theme.
+ * Each piece of metadata must be on its own line. Fields can not span multiple
+ * lines, the value will get cut at the end of the first line.
  *
  *
- * The first 8kiB of the file will be pulled in and if the file data is not
- * within that first 8kiB, then the author should correct their plugin file
- * and move the data headers to the top.
+ * If the file data is not within that first 8kiB, then the author should correct
+ * their plugin file and move the data headers to the top.
  *
  *
- * The file is assumed to have permissions to allow for scripts to read
- * the file. This is not checked however and the file is only opened for
- * reading.
+ * @see http://codex.wordpress.org/File_Header
  *
  * @since 2.9.0
  *
  * @since 2.9.0
- *
  * @param string $file Path to the file
  * @param string $file Path to the file
- * @param bool $markup If the returned data should have HTML markup applied
- * @param string $context If specified adds filter hook "extra_<$context>_headers"
+ * @param array $default_headers List of headers, in the format array('HeaderKey' => 'Header Name')
+ * @param string $context If specified adds filter hook "extra_{$context}_headers"
  */
 function get_file_data( $file, $default_headers, $context = '' ) {
        // We don't need to write to the file, so just open for reading.
  */
 function get_file_data( $file, $default_headers, $context = '' ) {
        // We don't need to write to the file, so just open for reading.
@@ -4170,33 +3301,28 @@ function get_file_data( $file, $default_headers, $context = '' ) {
        // PHP will close file handle, but we are good citizens.
        fclose( $fp );
 
        // PHP will close file handle, but we are good citizens.
        fclose( $fp );
 
-       if ( $context != '' ) {
-               $extra_headers = apply_filters( "extra_$context".'_headers', array() );
+       // Make sure we catch CR-only line endings.
+       $file_data = str_replace( "\r", "\n", $file_data );
 
 
-               $extra_headers = array_flip( $extra_headers );
-               foreach( $extra_headers as $key=>$value ) {
-                       $extra_headers[$key] = $key;
-               }
-               $all_headers = array_merge($extra_headers, $default_headers);
+       if ( $context && $extra_headers = apply_filters( "extra_{$context}_headers", array() ) ) {
+               $extra_headers = array_combine( $extra_headers, $extra_headers ); // keys equal values
+               $all_headers = array_merge( $extra_headers, (array) $default_headers );
        } else {
                $all_headers = $default_headers;
        }
 
        } else {
                $all_headers = $default_headers;
        }
 
-
        foreach ( $all_headers as $field => $regex ) {
        foreach ( $all_headers as $field => $regex ) {
-               preg_match( '/' . preg_quote( $regex, '/' ) . ':(.*)$/mi', $file_data, ${$field});
-               if ( !empty( ${$field} ) )
-                       ${$field} = _cleanup_header_comment( ${$field}[1] );
+               if ( preg_match( '/^[ \t\/*#@]*' . preg_quote( $regex, '/' ) . ':(.*)$/mi', $file_data, $match ) && $match[1] )
+                       $all_headers[ $field ] = _cleanup_header_comment( $match[1] );
                else
                else
-                       ${$field} = '';
+                       $all_headers[ $field ] = '';
        }
 
        }
 
-       $file_data = compact( array_keys( $all_headers ) );
-
-       return $file_data;
+       return $all_headers;
 }
 }
-/*
- * Used internally to tidy up the search terms
+
+/**
+ * Used internally to tidy up the search terms.
  *
  * @access private
  * @since 2.9.0
  *
  * @access private
  * @since 2.9.0
@@ -4209,9 +3335,9 @@ function _search_terms_tidy($t) {
 }
 
 /**
 }
 
 /**
- * Returns true
+ * Returns true.
  *
  *
- * Useful for returning true to filters easily
+ * Useful for returning true to filters easily.
  *
  * @since 3.0.0
  * @see __return_false()
  *
  * @since 3.0.0
  * @see __return_false()
@@ -4222,9 +3348,9 @@ function __return_true() {
 }
 
 /**
 }
 
 /**
- * Returns false
+ * Returns false.
  *
  *
- * Useful for returning false to filters easily
+ * Useful for returning false to filters easily.
  *
  * @since 3.0.0
  * @see __return_true()
  *
  * @since 3.0.0
  * @see __return_true()
@@ -4235,9 +3361,9 @@ function __return_false() {
 }
 
 /**
 }
 
 /**
- * Returns 0
+ * Returns 0.
  *
  *
- * Useful for returning 0 to filters easily
+ * Useful for returning 0 to filters easily.
  *
  * @since 3.0.0
  * @see __return_zero()
  *
  * @since 3.0.0
  * @see __return_zero()
@@ -4248,9 +3374,9 @@ function __return_zero() {
 }
 
 /**
 }
 
 /**
- * Returns an empty array
+ * Returns an empty array.
  *
  *
- * Useful for returning an empty array to filters easily
+ * Useful for returning an empty array to filters easily.
  *
  * @since 3.0.0
  * @see __return_zero()
  *
  * @since 3.0.0
  * @see __return_zero()
@@ -4260,6 +3386,18 @@ function __return_empty_array() {
        return array();
 }
 
        return array();
 }
 
+/**
+ * Returns null.
+ *
+ * Useful for returning null to filters easily.
+ *
+ * @since 3.4.0
+ * @return null
+ */
+function __return_null() {
+       return null;
+}
+
 /**
  * Send a HTTP header to disable content type sniffing in browsers which support it.
  *
 /**
  * Send a HTTP header to disable content type sniffing in browsers which support it.
  *
@@ -4297,4 +3435,191 @@ function _wp_mysql_week( $column ) {
        }
 }
 
        }
 }
 
-?>
+/**
+ * Finds hierarchy loops using a callback function that maps object IDs to parent IDs.
+ *
+ * @since 3.1.0
+ * @access private
+ *
+ * @param callback $callback function that accepts ( ID, $callback_args ) and outputs parent_ID
+ * @param int $start The ID to start the loop check at
+ * @param int $start_parent the parent_ID of $start to use instead of calling $callback( $start ). Use null to always use $callback
+ * @param array $callback_args optional additional arguments to send to $callback
+ * @return array IDs of all members of loop
+ */
+function wp_find_hierarchy_loop( $callback, $start, $start_parent, $callback_args = array() ) {
+       $override = is_null( $start_parent ) ? array() : array( $start => $start_parent );
+
+       if ( !$arbitrary_loop_member = wp_find_hierarchy_loop_tortoise_hare( $callback, $start, $override, $callback_args ) )
+               return array();
+
+       return wp_find_hierarchy_loop_tortoise_hare( $callback, $arbitrary_loop_member, $override, $callback_args, true );
+}
+
+/**
+ * Uses the "The Tortoise and the Hare" algorithm to detect loops.
+ *
+ * For every step of the algorithm, the hare takes two steps and the tortoise one.
+ * If the hare ever laps the tortoise, there must be a loop.
+ *
+ * @since 3.1.0
+ * @access private
+ *
+ * @param callback $callback function that accepts ( ID, callback_arg, ... ) and outputs parent_ID
+ * @param int $start The ID to start the loop check at
+ * @param array $override an array of ( ID => parent_ID, ... ) to use instead of $callback
+ * @param array $callback_args optional additional arguments to send to $callback
+ * @param bool $_return_loop Return loop members or just detect presence of loop?
+ *             Only set to true if you already know the given $start is part of a loop
+ *             (otherwise the returned array might include branches)
+ * @return mixed scalar ID of some arbitrary member of the loop, or array of IDs of all members of loop if $_return_loop
+ */
+function wp_find_hierarchy_loop_tortoise_hare( $callback, $start, $override = array(), $callback_args = array(), $_return_loop = false ) {
+       $tortoise = $hare = $evanescent_hare = $start;
+       $return = array();
+
+       // Set evanescent_hare to one past hare
+       // Increment hare two steps
+       while (
+               $tortoise
+       &&
+               ( $evanescent_hare = isset( $override[$hare] ) ? $override[$hare] : call_user_func_array( $callback, array_merge( array( $hare ), $callback_args ) ) )
+       &&
+               ( $hare = isset( $override[$evanescent_hare] ) ? $override[$evanescent_hare] : call_user_func_array( $callback, array_merge( array( $evanescent_hare ), $callback_args ) ) )
+       ) {
+               if ( $_return_loop )
+                       $return[$tortoise] = $return[$evanescent_hare] = $return[$hare] = true;
+
+               // tortoise got lapped - must be a loop
+               if ( $tortoise == $evanescent_hare || $tortoise == $hare )
+                       return $_return_loop ? $return : $tortoise;
+
+               // Increment tortoise by one step
+               $tortoise = isset( $override[$tortoise] ) ? $override[$tortoise] : call_user_func_array( $callback, array_merge( array( $tortoise ), $callback_args ) );
+       }
+
+       return false;
+}
+
+/**
+ * Send a HTTP header to limit rendering of pages to same origin iframes.
+ *
+ * @link https://developer.mozilla.org/en/the_x-frame-options_response_header
+ *
+ * @since 3.1.3
+ * @return none
+ */
+function send_frame_options_header() {
+       @header( 'X-Frame-Options: SAMEORIGIN' );
+}
+
+/**
+ * Retrieve a list of protocols to allow in HTML attributes.
+ *
+ * @since 3.3.0
+ * @see wp_kses()
+ * @see esc_url()
+ *
+ * @return array Array of allowed protocols
+ */
+function wp_allowed_protocols() {
+       static $protocols;
+
+       if ( empty( $protocols ) ) {
+               $protocols = array( 'http', 'https', 'ftp', 'ftps', 'mailto', 'news', 'irc', 'gopher', 'nntp', 'feed', 'telnet', 'mms', 'rtsp', 'svn' );
+               $protocols = apply_filters( 'kses_allowed_protocols', $protocols );
+       }
+
+       return $protocols;
+}
+
+/**
+ * Return a comma separated string of functions that have been called to get to the current point in code.
+ *
+ * @link http://core.trac.wordpress.org/ticket/19589
+ * @since 3.4
+ *
+ * @param string $ignore_class A class to ignore all function calls within - useful when you want to just give info about the callee
+ * @param int $skip_frames A number of stack frames to skip - useful for unwinding back to the source of the issue
+ * @param bool $pretty Whether or not you want a comma separated string or raw array returned
+ * @return string|array Either a string containing a reversed comma separated trace or an array of individual calls.
+ */
+function wp_debug_backtrace_summary( $ignore_class = null, $skip_frames = 0, $pretty = true ) {
+       if ( version_compare( PHP_VERSION, '5.2.5', '>=' ) )
+               $trace = debug_backtrace( false );
+       else
+               $trace = debug_backtrace();
+
+       $caller = array();
+       $check_class = ! is_null( $ignore_class );
+       $skip_frames++; // skip this function
+
+       foreach ( $trace as $call ) {
+               if ( $skip_frames > 0 ) {
+                       $skip_frames--;
+               } elseif ( isset( $call['class'] ) ) {
+                       if ( $check_class && $ignore_class == $call['class'] )
+                               continue; // Filter out calls
+
+                       $caller[] = "{$call['class']}{$call['type']}{$call['function']}";
+               } else {
+                       if ( in_array( $call['function'], array( 'do_action', 'apply_filters' ) ) ) {
+                               $caller[] = "{$call['function']}('{$call['args'][0]}')";
+                       } elseif ( in_array( $call['function'], array( 'include', 'include_once', 'require', 'require_once' ) ) ) {
+                               $caller[] = $call['function'] . "('" . str_replace( array( WP_CONTENT_DIR, ABSPATH ) , '', $call['args'][0] ) . "')";
+                       } else {
+                               $caller[] = $call['function'];
+                       }
+               }
+       }
+       if ( $pretty )
+               return join( ', ', array_reverse( $caller ) );
+       else
+               return $caller;
+}
+
+/**
+ * Retrieve ids that are not already present in the cache
+ *
+ * @since 3.4.0
+ *
+ * @param array $object_ids ID list
+ * @param string $cache_key The cache bucket to check against
+ *
+ * @return array
+ */
+function _get_non_cached_ids( $object_ids, $cache_key ) {
+       $clean = array();
+       foreach ( $object_ids as $id ) {
+               $id = (int) $id;
+               if ( !wp_cache_get( $id, $cache_key ) ) {
+                       $clean[] = $id;
+               }
+       }
+
+       return $clean;
+}
+
+/**
+ * Test if the current device has the capability to upload files.
+ *
+ * @since 3.4.0
+ * @access private
+ *
+ * @return bool true|false
+ */
+function _device_can_upload() {
+       if ( ! wp_is_mobile() )
+               return true;
+
+       $ua = $_SERVER['HTTP_USER_AGENT'];
+
+       if ( strpos($ua, 'iPhone') !== false
+               || strpos($ua, 'iPad') !== false
+               || strpos($ua, 'iPod') !== false ) {
+                       return preg_match( '#OS ([\d_]+) like Mac OS X#', $ua, $version ) && version_compare( $version[1], '6', '>=' );
+       } else {
+               return true;
+       }
+}
+