Wordpress 3.1.3
[autoinstalls/wordpress.git] / wp-includes / functions.php
index 3ff8821adb02deefd1dcc44732a4539f7334def2..34fe1132ad384401140d98de50b679398f66558b 100644 (file)
  * @return string Date formated by $dateformatstring or locale (if available).
  */
 function mysql2date( $dateformatstring, $mysqlstring, $translate = true ) {
-       global $wp_locale;
        $m = $mysqlstring;
        if ( empty( $m ) )
                return false;
 
-       if( 'G' == $dateformatstring ) {
-               return gmmktime(
-                       (int) substr( $m, 11, 2 ), (int) substr( $m, 14, 2 ), (int) substr( $m, 17, 2 ),
-                       (int) substr( $m, 5, 2 ), (int) substr( $m, 8, 2 ), (int) substr( $m, 0, 4 )
-               );
-       }
+       if ( 'G' == $dateformatstring )
+               return strtotime( $m . ' +0000' );
 
-       $i = mktime(
-               (int) substr( $m, 11, 2 ), (int) substr( $m, 14, 2 ), (int) substr( $m, 17, 2 ),
-               (int) substr( $m, 5, 2 ), (int) substr( $m, 8, 2 ), (int) substr( $m, 0, 4 )
-       );
+       $i = strtotime( $m );
 
-       if( 'U' == $dateformatstring )
+       if ( 'U' == $dateformatstring )
                return $i;
 
-       if ( -1 == $i || false == $i )
-               $i = 0;
-
-       if ( !empty( $wp_locale->month ) && !empty( $wp_locale->weekday ) && $translate ) {
-               $datemonth = $wp_locale->get_month( date( 'm', $i ) );
-               $datemonth_abbrev = $wp_locale->get_month_abbrev( $datemonth );
-               $dateweekday = $wp_locale->get_weekday( date( 'w', $i ) );
-               $dateweekday_abbrev = $wp_locale->get_weekday_abbrev( $dateweekday );
-               $datemeridiem = $wp_locale->get_meridiem( date( 'a', $i ) );
-               $datemeridiem_capital = $wp_locale->get_meridiem( date( 'A', $i ) );
-               $dateformatstring = ' ' . $dateformatstring;
-               $dateformatstring = preg_replace( "/([^\\\])D/", "\\1" . backslashit( $dateweekday_abbrev ), $dateformatstring );
-               $dateformatstring = preg_replace( "/([^\\\])F/", "\\1" . backslashit( $datemonth ), $dateformatstring );
-               $dateformatstring = preg_replace( "/([^\\\])l/", "\\1" . backslashit( $dateweekday ), $dateformatstring );
-               $dateformatstring = preg_replace( "/([^\\\])M/", "\\1" . backslashit( $datemonth_abbrev ), $dateformatstring );
-               $dateformatstring = preg_replace( "/([^\\\])a/", "\\1" . backslashit( $datemeridiem ), $dateformatstring );
-               $dateformatstring = preg_replace( "/([^\\\])A/", "\\1" . backslashit( $datemeridiem_capital ), $dateformatstring );
-
-               $dateformatstring = substr( $dateformatstring, 1, strlen( $dateformatstring ) -1 );
-       }
-       $j = @date( $dateformatstring, $i );
-
-       /*
-       if ( !$j ) // for debug purposes
-               echo $i." ".$mysqlstring;
-       */
-
-       return $j;
+       if ( $translate )
+               return date_i18n( $dateformatstring, $i );
+       else
+               return date( $dateformatstring, $i );
 }
 
 /**
@@ -108,8 +76,9 @@ function current_time( $type, $gmt = 0 ) {
  *
  * @since 0.71
  *
- * @param string $dateformatstring Format to display the date
- * @param int $unixtimestamp Unix timestamp
+ * @param string $dateformatstring Format to display the date.
+ * @param int $unixtimestamp Optional. Unix timestamp.
+ * @param bool $gmt Optional, default is false. Whether to convert to GMT for time.
  * @return string The date, translated if locale specifies it.
  */
 function date_i18n( $dateformatstring, $unixtimestamp = false, $gmt = false ) {
@@ -126,6 +95,10 @@ function date_i18n( $dateformatstring, $unixtimestamp = false, $gmt = false ) {
                $gmt = true;
        }
 
+       // store original value for language with untypical grammars
+       // see http://core.trac.wordpress.org/ticket/9396
+       $req_format = $dateformatstring;
+
        $datefunc = $gmt? 'gmdate' : 'date';
 
        if ( ( !empty( $wp_locale->month ) ) && ( !empty( $wp_locale->weekday ) ) ) {
@@ -145,25 +118,42 @@ function date_i18n( $dateformatstring, $unixtimestamp = false, $gmt = false ) {
 
                $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 ) && wp_timezone_supported() ) {
+               $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);
        return $j;
 }
 
 /**
- * Convert number to format based on the locale.
+ * Convert integer number to format based on the locale.
  *
  * @since 2.3.0
  *
- * @param mixed $number The number to convert based on locale.
+ * @param int $number The number to convert based on locale.
  * @param int $decimals Precision of the number of decimal places.
  * @return string Converted number in string format.
  */
-function number_format_i18n( $number, $decimals = null ) {
+function number_format_i18n( $number, $decimals = 0 ) {
        global $wp_locale;
-       // let the user override the precision only
-       $decimals = ( is_null( $decimals ) ) ? $wp_locale->number_format['decimals'] : intval( $decimals );
-
-       return number_format( $number, $decimals, $wp_locale->number_format['decimal_point'], $wp_locale->number_format['thousands_sep'] );
+       $formatted = number_format( $number, absint( $decimals ), $wp_locale->number_format['decimal_point'], $wp_locale->number_format['thousands_sep'] );
+       return apply_filters( 'number_format_i18n', $formatted );
 }
 
 /**
@@ -184,10 +174,10 @@ function number_format_i18n( $number, $decimals = null ) {
  * @since 2.3.0
  *
  * @param int|string $bytes Number of bytes. Note max integer size for integers.
- * @param int $decimals Precision of number of decimal places.
+ * @param int $decimals Precision of number of decimal places. Deprecated.
  * @return bool|string False on failure. Number string on success.
  */
-function size_format( $bytes, $decimals = null ) {
+function size_format( $bytes, $decimals = 0 ) {
        $quant = array(
                // ========================= Origin ====
                'TB' => 1099511627776,  // pow( 1024, 4)
@@ -196,7 +186,6 @@ function size_format( $bytes, $decimals = null ) {
                'kB' => 1024,           // pow( 1024, 1)
                'B ' => 1,              // pow( 1024, 0)
        );
-
        foreach ( $quant as $unit => $mag )
                if ( doubleval($bytes) >= $mag )
                        return number_format_i18n( $bytes / $mag, $decimals ) . ' ' . $unit;
@@ -219,24 +208,15 @@ function get_weekstartend( $mysqlstring, $start_of_week = '' ) {
        $md = substr( $mysqlstring, 5, 2 ); // Mysql string day
        $day = mktime( 0, 0, 0, $md, $mm, $my ); // The timestamp for mysqlstring day.
        $weekday = date( 'w', $day ); // The day of the week from the timestamp
-       $i = 86400; // One day
-       if( !is_numeric($start_of_week) )
+       if ( !is_numeric($start_of_week) )
                $start_of_week = get_option( 'start_of_week' );
 
        if ( $weekday < $start_of_week )
-               $weekday = 7 - $start_of_week - $weekday;
+               $weekday += 7;
 
-       while ( $weekday > $start_of_week ) {
-               $weekday = date( 'w', $day );
-               if ( $weekday < $start_of_week )
-                       $weekday = 7 - $start_of_week - $weekday;
-
-               $day -= 86400;
-               $i = 0;
-       }
-       $week['start'] = $day + 86400 - $i;
-       $week['end'] = $week['start'] + 604799;
-       return $week;
+       $start = $day - 86400 * ( $weekday - $start_of_week ); // The most recent week start day on or before $day
+       $end = $start + 604799; // $start + 7 days - 1 second
+       return compact( 'start', 'end' );
 }
 
 /**
@@ -249,8 +229,7 @@ function get_weekstartend( $mysqlstring, $start_of_week = '' ) {
  */
 function maybe_unserialize( $original ) {
        if ( is_serialized( $original ) ) // don't attempt to unserialize data that wasn't serialized going in
-               if ( false !== $gm = @unserialize( $original ) )
-                       return $gm;
+               return @unserialize( $original );
        return $original;
 }
 
@@ -267,26 +246,31 @@ function maybe_unserialize( $original ) {
  */
 function is_serialized( $data ) {
        // if it isn't a string, it isn't serialized
-       if ( !is_string( $data ) )
+       if ( ! is_string( $data ) )
                return false;
        $data = trim( $data );
-       if ( 'N;' == $data )
+       if ( 'N;' == $data )
                return true;
-       if ( !preg_match( '/^([adObis]):/', $data, $badions ) )
+       $length = strlen( $data );
+       if ( $length < 4 )
+               return false;
+       if ( ':' !== $data[1] )
                return false;
-       switch ( $badions[1] ) {
+       $lastc = $data[$length-1];
+       if ( ';' !== $lastc && '}' !== $lastc )
+               return false;
+       $token = $data[0];
+       switch ( $token ) {
+               case 's' :
+                       if ( '"' !== $data[$length-2] )
+                               return false;
                case 'a' :
                case 'O' :
-               case 's' :
-                       if ( preg_match( "/^{$badions[1]}:[0-9]+:.*[;}]\$/s", $data ) )
-                               return true;
-                       break;
+                       return (bool) preg_match( "/^{$token}:[0-9]+:/s", $data );
                case 'b' :
                case 'i' :
                case 'd' :
-                       if ( preg_match( "/^{$badions[1]}:[0-9.E-]+;\$/", $data ) )
-                               return true;
-                       break;
+                       return (bool) preg_match( "/^{$token}:[0-9.E-]+;\$/", $data );
        }
        return false;
 }
@@ -310,82 +294,88 @@ function is_serialized_string( $data ) {
 }
 
 /**
- * Retrieve option value based on setting name.
+ * 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.
  *
- * You can "short-circuit" the retrieval of the option from the database for
- * your plugin or core options that aren't protected. You can do so by hooking
- * into the 'pre_option_$option' with the $option being replaced by the option
- * name. You should not try to override special options, but you will not be
- * prevented from doing so.
- *
- * There is a second filter called 'option_$option' with the $option being
- * replaced with the option name. This gives the value as the only parameter.
- *
- * If the option was serialized, when the option was added and, or updated, then
- * it will be unserialized, when it is returned.
+ * 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_$optionname' false to allow
- *             overwriting the option value in a plugin.
- * @uses apply_filters() Calls 'option_$optionname' with the option name value.
- *
- * @param string $setting Name of option to retrieve. Should already be SQL-escaped
+ * @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( $setting, $default = false ) {
+function get_option( $option, $default = false ) {
        global $wpdb;
 
        // Allow plugins to short-circuit options.
-       $pre = apply_filters( 'pre_option_' . $setting, false );
+       $pre = apply_filters( 'pre_option_' . $option, false );
        if ( false !== $pre )
                return $pre;
 
-       // prevent non-existent options from triggering multiple queries
-       $notoptions = wp_cache_get( 'notoptions', 'options' );
-       if ( isset( $notoptions[$setting] ) )
-               return $default;
+       $option = trim($option);
+       if ( empty($option) )
+               return false;
 
-       $alloptions = wp_load_alloptions();
+       if ( defined( 'WP_SETUP_CONFIG' ) )
+               return false;
 
-       if ( isset( $alloptions[$setting] ) ) {
-               $value = $alloptions[$setting];
-       } else {
-               $value = wp_cache_get( $setting, 'options' );
-
-               if ( false === $value ) {
-                       if ( defined( 'WP_INSTALLING' ) )
-                               $suppress = $wpdb->suppress_errors();
-                       // expected_slashed ($setting)
-                       $row = $wpdb->get_row( "SELECT option_value FROM $wpdb->options WHERE option_name = '$setting' LIMIT 1" );
-                       if ( defined( 'WP_INSTALLING' ) )
-                               $wpdb->suppress_errors($suppress);
-
-                       if ( is_object( $row) ) { // Has to be get_row instead of get_var because of funkiness with 0, false, null values
-                               $value = $row->option_value;
-                               wp_cache_add( $setting, $value, 'options' );
-                       } else { // option does not exist, so we must cache its non-existence
-                               $notoptions[$setting] = true;
-                               wp_cache_set( 'notoptions', $notoptions, 'options' );
-                               return $default;
+       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' == $setting && '' == $value )
+       if ( 'home' == $option && '' == $value )
                return get_option( 'siteurl' );
 
-       if ( in_array( $setting, array('siteurl', 'home', 'category_base', 'tag_base') ) )
+       if ( in_array( $option, array('siteurl', 'home', 'category_base', 'tag_base') ) )
                $value = untrailingslashit( $value );
 
-       return apply_filters( 'option_' . $setting, maybe_unserialize( $value ) );
+       return apply_filters( 'option_' . $option, maybe_unserialize( $value ) );
 }
 
 /**
@@ -403,13 +393,13 @@ function get_option( $setting, $default = false ) {
 function wp_protect_special_option( $option ) {
        $protected = array( 'alloptions', 'notoptions' );
        if ( in_array( $option, $protected ) )
-               die( sprintf( __( '%s is a protected WP option and may not be modified' ), wp_specialchars( $option ) ) );
+               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 attribute_escape Sanitizes value.
+ * @uses attr Sanitizes value.
  * @since 1.5.0
  * @package WordPress
  * @subpackage Option
@@ -417,59 +407,25 @@ function wp_protect_special_option( $option ) {
  * @param string $option Option name.
  */
 function form_option( $option ) {
-       echo attribute_escape (get_option( $option ) );
-}
-
-/**
- * Retrieve all autoload options or all options, if no autoloaded ones exist.
- *
- * This is different from wp_load_alloptions() in that this function does not
- * cache its results and will retrieve all options from the database every time
- *
- * it is called.
- *
- * @since 1.0.0
- * @package WordPress
- * @subpackage Option
- * @uses apply_filters() Calls 'pre_option_$optionname' hook with option value as parameter.
- * @uses apply_filters() Calls 'all_options' on options list.
- *
- * @return array List of all options.
- */
-function get_alloptions() {
-       global $wpdb;
-       $show = $wpdb->hide_errors();
-       if ( !$options = $wpdb->get_results( "SELECT option_name, option_value FROM $wpdb->options WHERE autoload = 'yes'" ) )
-               $options = $wpdb->get_results( "SELECT option_name, option_value FROM $wpdb->options" );
-       $wpdb->show_errors($show);
-
-       foreach ( (array) $options as $option ) {
-               // "When trying to design a foolproof system,
-               //  never underestimate the ingenuity of the fools :)" -- Dougal
-               if ( in_array( $option->option_name, array( 'siteurl', 'home', 'category_base', 'tag_base' ) ) )
-                       $option->option_value = untrailingslashit( $option->option_value );
-               $value = maybe_unserialize( $option->option_value );
-               $all_options->{$option->option_name} = apply_filters( 'pre_option_' . $option->option_name, $value );
-       }
-       return apply_filters( 'all_options', $all_options );
+       echo esc_attr( get_option( $option ) );
 }
 
 /**
  * Loads and caches all autoloaded options, if available or all options.
  *
- * This is different from get_alloptions(), in that this function will cache the
- * options and will return the cached options when called again.
- *
  * @since 2.2.0
  * @package WordPress
  * @subpackage Option
  *
- * @return array List all options.
+ * @return array List of all options.
  */
 function wp_load_alloptions() {
        global $wpdb;
 
-       $alloptions = wp_cache_get( 'alloptions', 'options' );
+       if ( !defined( 'WP_INSTALLING' ) || !is_multisite() )
+               $alloptions = wp_cache_get( 'alloptions', 'options' );
+       else
+               $alloptions = false;
 
        if ( !$alloptions ) {
                $suppress = $wpdb->suppress_errors();
@@ -477,78 +433,120 @@ function wp_load_alloptions() {
                        $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 )
+               foreach ( (array) $alloptions_db as $o ) {
                        $alloptions[$o->option_name] = $o->option_value;
-               wp_cache_add( 'alloptions', $alloptions, 'options' );
+               }
+               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', '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 serialize, then
+ * 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 autoloaded, then you need to use the add_option().
- *
- * When the option is updated, then the filter named
- * 'update_option_$option_name', with the $option_name as the $option_name
- * parameter value, will be called. The hook should accept two parameters, the
- * first is the old parameter and the second is the new parameter.
+ * to set whether an option is autoloaded, then you need to use the add_option().
  *
  * @since 1.0.0
  * @package WordPress
  * @subpackage Option
  *
- * @param string $option_name Option name. Expected to not be SQL-escaped
- * @param mixed $newvalue Option value.
+ * @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_name, $newvalue ) {
+function update_option( $option, $newvalue ) {
        global $wpdb;
 
-       wp_protect_special_option( $option_name );
+       $option = trim($option);
+       if ( empty($option) )
+               return false;
 
-       $safe_option_name = $wpdb->escape( $option_name );
-       $newvalue = sanitize_option( $option_name, $newvalue );
+       wp_protect_special_option( $option );
 
-       $oldvalue = get_option( $safe_option_name );
+       if ( is_object($newvalue) )
+               $newvalue = wp_clone($newvalue);
 
-       $newvalue = apply_filters( 'pre_update_option_' . $option_name, $newvalue, $oldvalue );
+       $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 ) {
-               add_option( $option_name, $newvalue );
-               return true;
-       }
+       if ( false === $oldvalue )
+               return add_option( $option, $newvalue );
 
        $notoptions = wp_cache_get( 'notoptions', 'options' );
-       if ( is_array( $notoptions ) && isset( $notoptions[$option_name] ) ) {
-               unset( $notoptions[$option_name] );
+       if ( is_array( $notoptions ) && isset( $notoptions[$option] ) ) {
+               unset( $notoptions[$option] );
                wp_cache_set( 'notoptions', $notoptions, 'options' );
        }
 
        $_newvalue = $newvalue;
        $newvalue = maybe_serialize( $newvalue );
 
-       $alloptions = wp_load_alloptions();
-       if ( isset( $alloptions[$option_name] ) ) {
-               $alloptions[$option_name] = $newvalue;
-               wp_cache_set( 'alloptions', $alloptions, 'options' );
-       } else {
-               wp_cache_set( $option_name, $newvalue, 'options' );
+       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' );
+               }
        }
 
-       $wpdb->query( $wpdb->prepare( "UPDATE $wpdb->options SET option_value = %s WHERE option_name = %s", $newvalue, $option_name ) );
-       if ( $wpdb->rows_affected == 1 ) {
-               do_action( "update_option_{$option_name}", $oldvalue, $_newvalue );
+       $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;
@@ -557,100 +555,255 @@ function update_option( $option_name, $newvalue ) {
 /**
  * Add a new option.
  *
- * You do not need to serialize values, if the value needs to be serialize, then
+ * 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
+ * options the same as the ones which are protected and to not add options
  * that were already added.
  *
- * The filter named 'add_option_$optionname', with the $optionname being
- * replaced with the option's name, will be called. The hook should accept two
- * parameters, the first is the option name, and the second is the value.
- *
  * @package WordPress
  * @subpackage Option
  * @since 1.0.0
- * @link http://alex.vort-x.net/blog/ Thanks Alex Stapleton
  *
- * @param string $name Option name to add. Expects to NOT be SQL escaped.
- * @param mixed $value Optional. Option value, can be anything.
+ * @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( $name, $value = '', $deprecated = '', $autoload = 'yes' ) {
+function add_option( $option, $value = '', $deprecated = '', $autoload = 'yes' ) {
        global $wpdb;
 
-       wp_protect_special_option( $name );
-       $safe_name = $wpdb->escape( $name );
-       $value = sanitize_option( $name, $value );
+       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[$name] ) )
-               if ( false !== get_option( $safe_name ) )
+       if ( !is_array( $notoptions ) || !isset( $notoptions[$option] ) )
+               if ( false !== get_option( $option ) )
                        return;
 
+       $_value = $value;
        $value = maybe_serialize( $value );
        $autoload = ( 'no' === $autoload ) ? 'no' : 'yes';
-
-       if ( 'yes' == $autoload ) {
-               $alloptions = wp_load_alloptions();
-               $alloptions[$name] = $value;
-               wp_cache_set( 'alloptions', $alloptions, 'options' );
-       } else {
-               wp_cache_set( $name, $value, 'options' );
+       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[$name] ) ) {
-               unset( $notoptions[$name] );
+       if ( is_array( $notoptions ) && isset( $notoptions[$option] ) ) {
+               unset( $notoptions[$option] );
                wp_cache_set( 'notoptions', $notoptions, 'options' );
        }
 
-       $wpdb->query( $wpdb->prepare( "INSERT INTO $wpdb->options (option_name, option_value, autoload) VALUES (%s, %s, %s)", $name, $value, $autoload ) );
+       $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 ) );
 
-       do_action( "add_option_{$name}", $name, $value );
-       return;
+       if ( $result ) {
+               do_action( "add_option_{$option}", $option, $_value );
+               do_action( 'added_option', $option, $_value );
+               return true;
+       }
+       return false;
 }
 
 /**
- * Removes option by name and prevents removal of protected WordPress options.
+ * Removes option by name. Prevents removal of protected WordPress options.
  *
  * @package WordPress
  * @subpackage Option
  * @since 1.2.0
  *
- * @param string $name Option name to remove.
- * @return bool True, if succeed. False, if failure.
+ * @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( $name ) {
+function delete_option( $option ) {
        global $wpdb;
 
-       wp_protect_special_option( $name );
+       wp_protect_special_option( $option );
 
        // Get the ID, if no ID then return
-       // expected_slashed ($name)
-       $option = $wpdb->get_row( "SELECT option_id, autoload FROM $wpdb->options WHERE option_name = '$name'" );
-       if ( is_null($option) || !$option->option_id )
+       $row = $wpdb->get_row( $wpdb->prepare( "SELECT autoload FROM $wpdb->options WHERE option_name = %s", $option ) );
+       if ( is_null( $row ) )
                return false;
-       // expected_slashed ($name)
-       $wpdb->query( "DELETE FROM $wpdb->options WHERE option_name = '$name'" );
-       if ( 'yes' == $option->autoload ) {
-               $alloptions = wp_load_alloptions();
-               if ( isset( $alloptions[$name] ) ) {
-                       unset( $alloptions[$name] );
-                       wp_cache_set( 'alloptions', $alloptions, 'options' );
+       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 );
+               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 {
-               wp_cache_delete( $name, 'options' );
+               $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 );
+               }
        }
-       return true;
+       if ( $result ) {
+               do_action( 'set_transient_' . $transient );
+               do_action( 'setted_transient', $transient );
+       }
+       return $result;
 }
 
 /**
@@ -675,7 +828,7 @@ function wp_user_settings() {
        if ( ! $user = wp_get_current_user() )
                return;
 
-       $settings = get_user_option( 'user-settings', $user->ID, false );
+       $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] );
@@ -684,7 +837,7 @@ function wp_user_settings() {
                        if ( $cookie == $settings )
                                return;
 
-                       $last_time = (int) get_user_option( 'user-settings-time', $user->ID, false );
+                       $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 ) {
@@ -697,6 +850,7 @@ function wp_user_settings() {
 
        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;
 }
 
 /**
@@ -712,44 +866,73 @@ function wp_user_settings() {
  */
 function get_user_setting( $name, $default = false ) {
 
-       $arr = get_all_user_settings();
+       $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() )
+               return false;
+
+       $all = get_all_user_settings();
+       $name = preg_replace( '/[^A-Za-z0-9_]+/', '', $name );
 
-       return isset($arr[$name]) ? $arr[$name] : $default;
+       if ( empty($name) )
+               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 ) {
-       global $current_user;
 
-       $arr = get_all_user_settings();
+       if ( headers_sent() )
+               return false;
+
+       $all = get_all_user_settings();
        $names = (array) $names;
 
        foreach ( $names as $name ) {
-               if ( isset($arr[$name]) ) {
-                       unset($arr[$name]);
-                       $settings = '';
+               if ( isset($all[$name]) ) {
+                       unset($all[$name]);
+                       $deleted = true;
                }
        }
 
-       if ( isset($settings) ) {
-               foreach ( $arr as $k => $v )
-                       $settings .= $k . '=' . $v . '&';
-
-               $settings = rtrim($settings, '&');
+       if ( isset($deleted) )
+               return wp_set_all_user_settings($all);
 
-               update_user_option( $current_user->ID, 'user-settings', $settings );
-               setcookie('wp-settings-'.$current_user->ID, $settings, time() + 31536000, SITECOOKIEPATH);
-       }
+       return false;
 }
 
 /**
@@ -762,19 +945,59 @@ function delete_user_setting( $names ) {
  * @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($_COOKIE['wp-settings-'.$user->ID]) ) {
-               $cookie = preg_replace( '/[^A-Za-z0-9=&_]/', '', $_COOKIE['wp-settings-'.$user->ID] );
+       if ( isset($_updated_user_settings) && is_array($_updated_user_settings) )
+               return $_updated_user_settings;
 
-               if ( $cookie && strpos($cookie, '=') ) { // the '=' cannot be 1st char
-                       parse_str($cookie, $arr);
-                       return $arr;
-               }
+       $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 array();
+       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 . '&';
+       }
+
+       $settings = rtrim($settings, '&');
+
+       update_user_option( $user->ID, 'user-settings', $settings, false );
+       update_user_option( $user->ID, 'user-settings-time', time(), false );
+
+       return true;
 }
 
 /**
@@ -788,8 +1011,8 @@ function delete_all_user_settings() {
        if ( ! $user = wp_get_current_user() )
                return;
 
-       delete_usermeta( $user->ID, 'user-settings' );
-       setcookie('wp-settings-'.$user->ID, ' ', time() - 31536000, SITECOOKIEPATH);
+       update_user_option( $user->ID, 'user-settings', '', false );
+       setcookie('wp-settings-' . $user->ID, ' ', time() - 31536000, SITECOOKIEPATH);
 }
 
 /**
@@ -810,34 +1033,6 @@ function maybe_serialize( $data ) {
        return $data;
 }
 
-/**
- * Strip HTML and put links at the bottom of stripped content.
- *
- * Searches for all of the links, strips them out of the content, and places
- * them at the bottom of the content with numbers.
- *
- * @since 0.71
- *
- * @param string $content Content to get links
- * @return string HTML stripped out of content with links at the bottom.
- */
-function make_url_footnote( $content ) {
-       preg_match_all( '/<a(.+?)href=\"(.+?)\"(.*?)>(.+?)<\/a>/', $content, $matches );
-       $links_summary = "\n";
-       for ( $i=0; $i<count($matches[0]); $i++ ) {
-               $link_match = $matches[0][$i];
-               $link_number = '['.($i+1).']';
-               $link_url = $matches[2][$i];
-               $link_text = $matches[4][$i];
-               $content = str_replace( $link_match, $link_text . ' ' . $link_number, $content );
-               $link_url = ( ( strtolower( substr( $link_url, 0, 7 ) ) != 'http://' ) && ( strtolower( substr( $link_url, 0, 8 ) ) != 'https://' ) ) ? get_option( 'home' ) . $link_url : $link_url;
-               $links_summary .= "\n" . $link_number . ' ' . $link_url;
-       }
-       $content  = strip_tags( $content );
-       $content .= $links_summary;
-       return $content;
-}
-
 /**
  * Retrieve post title from XMLRPC XML.
  *
@@ -856,9 +1051,7 @@ function make_url_footnote( $content ) {
 function xmlrpc_getposttitle( $content ) {
        global $post_default_title;
        if ( preg_match( '/<title>(.+?)<\/title>/is', $content, $matchtitle ) ) {
-               $post_title = $matchtitle[0];
-               $post_title = preg_replace( '/<title>/si', '', $post_title );
-               $post_title = preg_replace( '/<\/title>/si', '', $post_title );
+               $post_title = $matchtitle[1];
        } else {
                $post_title = $post_default_title;
        }
@@ -977,7 +1170,8 @@ function debug_fclose( $fp ) {
 /**
  * Check content for video and audio links to add as enclosures.
  *
- * Will not add enclosures that have already been added. This is called as
+ * Will not add enclosures that have already been added and will
+ * remove enclosures that are no longer in the post. This is called as
  * pingbacks and trackbacks.
  *
  * @package WordPress
@@ -990,6 +1184,8 @@ function debug_fclose( $fp ) {
  */
 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' );
 
        $log = debug_fopen( ABSPATH . 'enclosures.log', 'a' );
@@ -1008,26 +1204,54 @@ function do_enclose( $content, $post_ID ) {
        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
+                       $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, like_escape( $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 );
+               }
+       }
+
        foreach ( (array) $post_links_temp[0] as $link_test ) {
                if ( !in_array( $link_test, $pung ) ) { // If we haven't pung it already
-                       $test = parse_url( $link_test );
+                       $test = @parse_url( $link_test );
+                       if ( false === $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 ) {
-               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) ) {
                                $len = (int) $headers['content-length'];
-                               $type = $wpdb->escape( $headers['content-type'] );
+                               $type = $headers['content-type'];
                                $allowed_types = array( 'video', 'audio' );
+
+                               // Check to see if we can figure out the mime type from
+                               // the extension
+                               $url_parts = @parse_url( $url );
+                               if ( false !== $url_parts ) {
+                                       $extension = pathinfo( $url_parts['path'], PATHINFO_EXTENSION );
+                                       if ( !empty( $extension ) ) {
+                                               foreach ( get_allowed_mime_types( ) as $exts => $mime ) {
+                                                       if ( preg_match( '!^(' . $exts . ')$!i', $extension ) ) {
+                                                               $type = $mime;
+                                                               break;
+                                                       }
+                                               }
+                                       }
+                               }
+
                                if ( in_array( substr( $type, 0, strpos( $type, "/" ) ), $allowed_types ) ) {
                                        $meta_value = "$url\n$len\n$type\n";
-                                       $wpdb->query( $wpdb->prepare( "INSERT INTO `$wpdb->postmeta` ( `post_id` , `meta_key` , `meta_value` )
-                                       VALUES ( %d, 'enclosure' , %s)", $post_ID, $meta_value ) );
+                                       $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 );
                                }
                        }
                }
@@ -1044,12 +1268,15 @@ function do_enclose( $content, $post_ID ) {
  *
  * @param string $url URL to fetch.
  * @param string|bool $file_path Optional. File path to write request to.
- * @param bool $deprecated Deprecated. Not used.
+ * @param int $red (private) The number of Redirects followed, Upon 5 being hit, returns false.
  * @return bool|string False on failure and string of headers if HEAD request.
  */
-function wp_get_http( $url, $file_path = false, $deprecated = false ) {
+function wp_get_http( $url, $file_path = false, $red = 1 ) {
        @set_time_limit( 60 );
 
+       if ( $red > 5 )
+               return false;
+
        $options = array();
        $options['redirection'] = 5;
 
@@ -1066,6 +1293,11 @@ function wp_get_http( $url, $file_path = false, $deprecated = false ) {
        $headers = wp_remote_retrieve_headers( $response );
        $headers['response'] = $response['response']['code'];
 
+       // WP_HTTP no longer follows redirects for HEAD requests.
+       if ( 'HEAD' == $options['method'] && in_array($headers['response'], array(301, 302)) && isset( $headers['location'] ) ) {
+               return wp_get_http( $headers['location'], $file_path, ++$red );
+       }
+
        if ( false == $file_path )
                return $headers;
 
@@ -1076,6 +1308,7 @@ function wp_get_http( $url, $file_path = false, $deprecated = false ) {
 
        fwrite( $out_fp,  $response['body']);
        fclose($out_fp);
+       clearstatcache();
 
        return $headers;
 }
@@ -1090,6 +1323,9 @@ function wp_get_http( $url, $file_path = false, $deprecated = false ) {
  * @return bool|string False on failure, headers on success.
  */
 function wp_get_http_headers( $url, $deprecated = false ) {
+       if ( !empty( $deprecated ) )
+               _deprecated_argument( __FUNCTION__, '2.7' );
+
        $response = wp_remote_head( $url );
 
        if ( is_wp_error( $response ) )
@@ -1108,8 +1344,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() {
-       global $day, $previousday;
-       if ( $day != $previousday )
+       global $currentday, $previousday;
+       if ( $currentday != $previousday )
                return 1;
        else
                return 0;
@@ -1237,20 +1473,17 @@ function remove_query_arg( $key, $query=false ) {
 /**
  * Walks the array while sanitizing the contents.
  *
- * @uses $wpdb Used to sanitize values
  * @since 0.71
  *
  * @param array $array Array to used to walk while sanitizing contents.
  * @return array Sanitized $array.
  */
 function add_magic_quotes( $array ) {
-       global $wpdb;
-
        foreach ( (array) $array as $k => $v ) {
                if ( is_array( $v ) ) {
                        $array[$k] = add_magic_quotes( $v );
                } else {
-                       $array[$k] = $wpdb->escape( $v );
+                       $array[$k] = addslashes( $v );
                }
        }
        return $array;
@@ -1283,7 +1516,7 @@ function wp_remote_fopen( $uri ) {
 }
 
 /**
- * Setup the WordPress query.
+ * Set up the WordPress query.
  *
  * @since 2.0.0
  *
@@ -1293,7 +1526,7 @@ function wp( $query_vars = '' ) {
        global $wp, $wp_query, $wp_the_query;
        $wp->main( $query_vars );
 
-       if( !isset($wp_the_query) )
+       if ( !isset($wp_the_query) )
                $wp_the_query = $wp_query;
 }
 
@@ -1314,6 +1547,7 @@ function get_status_header_desc( $code ) {
                $wp_header_to_desc = array(
                        100 => 'Continue',
                        101 => 'Switching Protocols',
+                       102 => 'Processing',
 
                        200 => 'OK',
                        201 => 'Created',
@@ -1322,6 +1556,8 @@ function get_status_header_desc( $code ) {
                        204 => 'No Content',
                        205 => 'Reset Content',
                        206 => 'Partial Content',
+                       207 => 'Multi-Status',
+                       226 => 'IM Used',
 
                        300 => 'Multiple Choices',
                        301 => 'Moved Permanently',
@@ -1329,10 +1565,12 @@ function get_status_header_desc( $code ) {
                        303 => 'See Other',
                        304 => 'Not Modified',
                        305 => 'Use Proxy',
+                       306 => 'Reserved',
                        307 => 'Temporary Redirect',
 
                        400 => 'Bad Request',
                        401 => 'Unauthorized',
+                       402 => 'Payment Required',
                        403 => 'Forbidden',
                        404 => 'Not Found',
                        405 => 'Method Not Allowed',
@@ -1348,13 +1586,20 @@ function get_status_header_desc( $code ) {
                        415 => 'Unsupported Media Type',
                        416 => 'Requested Range Not Satisfiable',
                        417 => 'Expectation Failed',
+                       422 => 'Unprocessable Entity',
+                       423 => 'Locked',
+                       424 => 'Failed Dependency',
+                       426 => 'Upgrade Required',
 
                        500 => 'Internal Server Error',
                        501 => 'Not Implemented',
                        502 => 'Bad Gateway',
                        503 => 'Service Unavailable',
                        504 => 'Gateway Timeout',
-                       505 => 'HTTP Version Not Supported'
+                       505 => 'HTTP Version Not Supported',
+                       506 => 'Variant Also Negotiates',
+                       507 => 'Insufficient Storage',
+                       510 => 'Not Extended'
                );
        }
 
@@ -1373,7 +1618,7 @@ function get_status_header_desc( $code ) {
  *             parameters.
  *
  * @param int $header HTTP status code
- * @return null Does not return anything.
+ * @return unknown
  */
 function status_header( $header ) {
        $text = get_status_header_desc( $header );
@@ -1388,27 +1633,48 @@ function status_header( $header ) {
        if ( function_exists( 'apply_filters' ) )
                $status_header = apply_filters( 'status_header', $status_header, $header, $text, $protocol );
 
-       if ( version_compare( phpversion(), '4.3.0', '>=' ) )
-               return @header( $status_header, true, $header );
-       else
-               return @header( $status_header );
+       return @header( $status_header, true, $header );
 }
 
 /**
- * Sets the headers to prevent caching for the different browsers.
+ * Gets the header information to prevent caching.
  *
- * Different browsers support different nocache headers, so several headers must
- * be sent so that all of them get the point that no caching should occur.
+ * The several different headers cover the different ways cache prevention is handled
+ * by different browsers
  *
- * @since 2.0.0
+ * @since 2.8.0
+ *
+ * @uses apply_filters()
+ * @return array The associative array of header names and field values.
  */
-function nocache_headers() {
-       // why are these @-silenced when other header calls aren't?
-       @header( 'Expires: Wed, 11 Jan 1984 05:00:00 GMT' );
-       @header( 'Last-Modified: ' . gmdate( 'D, d M Y H:i:s' ) . ' GMT' );
-       @header( 'Cache-Control: no-cache, must-revalidate, max-age=0' );
-       @header( 'Pragma: no-cache' );
-}
+function wp_get_nocache_headers() {
+       $headers = array(
+               'Expires' => 'Wed, 11 Jan 1984 05:00:00 GMT',
+               'Last-Modified' => gmdate( 'D, d M Y H:i:s' ) . ' GMT',
+               'Cache-Control' => 'no-cache, must-revalidate, max-age=0',
+               'Pragma' => 'no-cache',
+       );
+
+       if ( function_exists('apply_filters') ) {
+               $headers = (array) apply_filters('nocache_headers', $headers);
+       }
+       return $headers;
+}
+
+/**
+ * Sets the headers to prevent caching for the different browsers.
+ *
+ * Different browsers support different nocache headers, so several headers must
+ * be sent so that all of them get the point that no caching should occur.
+ *
+ * @since 2.0.0
+ * @uses wp_get_nocache_headers()
+ */
+function nocache_headers() {
+       $headers = wp_get_nocache_headers();
+       foreach( $headers as $name => $field_value )
+               @header("{$name}: {$field_value}");
+}
 
 /**
  * Set the headers for caching for 10 days with JavaScript content type.
@@ -1471,8 +1737,8 @@ function do_feed() {
 
        $hook = 'do_feed_' . $feed;
        if ( !has_action($hook) ) {
-               $message = sprintf( __( 'ERROR: %s is not a valid feed template' ), wp_specialchars($feed));
-               wp_die($message);
+               $message = sprintf( __( 'ERROR: %s is not a valid feed template.' ), esc_html($feed));
+               wp_die( $message, '', array( 'response' => 404 ) );
        }
 
        do_action( $hook, $wp_query->is_comment_feed );
@@ -1538,13 +1804,17 @@ function do_robots() {
 
        do_action( 'do_robotstxt' );
 
-       if ( '0' == get_option( 'blog_public' ) ) {
-               echo "User-agent: *\n";
-               echo "Disallow: /\n";
+       $output = '';
+       $public = get_option( 'blog_public' );
+       if ( '0' ==  $public ) {
+               $output .= "User-agent: *\n";
+               $output .= "Disallow: /\n";
        } else {
-               echo "User-agent: *\n";
-               echo "Disallow:\n";
+               $output .= "User-agent: *\n";
+               $output .= "Disallow:\n";
        }
+
+       echo apply_filters('robots_txt', $output, $public);
 }
 
 /**
@@ -1565,17 +1835,55 @@ function is_blog_installed() {
        global $wpdb;
 
        // Check cache first. If options table goes away and we have true cached, oh well.
-       if ( wp_cache_get('is_blog_installed') )
+       if ( wp_cache_get( 'is_blog_installed' ) )
+               return true;
+
+       $suppress = $wpdb->suppress_errors();
+       if ( ! defined( 'WP_INSTALLING' ) ) {
+               $alloptions = wp_load_alloptions();
+       }
+       // If siteurl is not set to autoload, check it specifically
+       if ( !isset( $alloptions['siteurl'] ) )
+               $installed = $wpdb->get_var( "SELECT option_value FROM $wpdb->options WHERE option_name = 'siteurl'" );
+       else
+               $installed = $alloptions['siteurl'];
+       $wpdb->suppress_errors( $suppress );
+
+       $installed = !empty( $installed );
+       wp_cache_set( 'is_blog_installed', $installed );
+
+       if ( $installed )
                return true;
 
        $suppress = $wpdb->suppress_errors();
-       $installed = $wpdb->get_var( "SELECT option_value FROM $wpdb->options WHERE option_name = 'siteurl'" );
-       $wpdb->suppress_errors($suppress);
+       $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.
+       // If one or more exist, suggest table repair since we got here because the options
+       // table could not be accessed.
+       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;
+
+                       // 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();
+               }
+       }
 
-       $installed = !empty( $installed ) ? true : false;
-       wp_cache_set('is_blog_installed', $installed);
+       wp_cache_set( 'is_blog_installed', false );
 
-       return $installed;
+       return false;
 }
 
 /**
@@ -1591,7 +1899,7 @@ function is_blog_installed() {
  */
 function wp_nonce_url( $actionurl, $action = -1 ) {
        $actionurl = str_replace( '&amp;', '&', $actionurl );
-       return wp_specialchars( add_query_arg( '_wpnonce', wp_create_nonce( $action ), $actionurl ) );
+       return esc_html( add_query_arg( '_wpnonce', wp_create_nonce( $action ), $actionurl ) );
 }
 
 /**
@@ -1628,13 +1936,13 @@ function wp_nonce_url( $actionurl, $action = -1 ) {
  * @return string Nonce field.
  */
 function wp_nonce_field( $action = -1, $name = "_wpnonce", $referer = true , $echo = true ) {
-       $name = attribute_escape( $name );
+       $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 )
-               wp_referer_field( $echo, 'previous' );
+               wp_referer_field( $echo );
 
        return $nonce_field;
 }
@@ -1652,8 +1960,8 @@ function wp_nonce_field( $action = -1, $name = "_wpnonce", $referer = true , $ec
  * @param bool $echo Whether to echo or return the referer field.
  * @return string Referer field.
  */
-function wp_referer_field( $echo = true) {
-       $ref = attribute_escape( $_SERVER['REQUEST_URI'] );
+function wp_referer_field( $echo = true ) {
+       $ref = esc_attr( $_SERVER['REQUEST_URI'] );
        $referer_field = '<input type="hidden" name="_wp_http_referer" value="'. $ref . '" />';
 
        if ( $echo )
@@ -1679,7 +1987,7 @@ function wp_referer_field( $echo = true) {
 function wp_original_referer_field( $echo = true, $jump_back_to = 'current' ) {
        $jump_back_to = ( 'previous' == $jump_back_to ) ? wp_get_referer() : $_SERVER['REQUEST_URI'];
        $ref = ( wp_get_original_referer() ) ? wp_get_original_referer() : $jump_back_to;
-       $orig_referer_field = '<input type="hidden" name="_wp_original_http_referer" value="' . attribute_escape( stripslashes( $ref ) ) . '" />';
+       $orig_referer_field = '<input type="hidden" name="_wp_original_http_referer" value="' . esc_attr( stripslashes( $ref ) ) . '" />';
        if ( $echo )
                echo $orig_referer_field;
        return $orig_referer_field;
@@ -1729,11 +2037,17 @@ function wp_get_original_referer() {
  * @since 2.0.1
  *
  * @param string $target Full path to attempt to create.
- * @return bool Whether the path was created or not. True if path already exists.
+ * @return bool Whether the path was created. True if path already exists.
  */
 function wp_mkdir_p( $target ) {
        // from php.net/mkdir user contributed notes
        $target = str_replace( '//', '/', $target );
+
+       // safe mode fails with a trailing slash under certain PHP versions.
+       $target = rtrim($target, '/'); // Use rtrim() instead of untrailingslashit to avoid formatting.php dependency.
+       if ( empty($target) )
+               $target = '/';
+
        if ( file_exists( $target ) )
                return @is_dir( $target );
 
@@ -1767,7 +2081,7 @@ function path_is_absolute( $path ) {
        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
@@ -1830,29 +2144,41 @@ function path_join( $base, $path ) {
  * @return array See above for description.
  */
 function wp_upload_dir( $time = null ) {
+       global $switched;
        $siteurl = get_option( 'siteurl' );
        $upload_path = get_option( 'upload_path' );
        $upload_path = trim($upload_path);
-       if ( empty($upload_path) )
+       $main_override = is_multisite() && defined( 'MULTISITE' ) && is_main_site();
+       if ( empty($upload_path) ) {
                $dir = WP_CONTENT_DIR . '/uploads';
-       else
+       } else {
                $dir = $upload_path;
-
-       // $dir is absolute, $path is (maybe) relative to ABSPATH
-       $dir = path_join( ABSPATH, $dir );
+               if ( 'wp-content/uploads' == $upload_path ) {
+                       $dir = WP_CONTENT_DIR . '/uploads';
+               } elseif ( 0 !== strpos($dir, ABSPATH) ) {
+                       // $dir is absolute, $upload_path is (maybe) relative to ABSPATH
+                       $dir = path_join( ABSPATH, $dir );
+               }
+       }
 
        if ( !$url = get_option( 'upload_url_path' ) ) {
-               if ( empty($upload_path) or ( $upload_path == $dir ) )
+               if ( empty($upload_path) || ( 'wp-content/uploads' == $upload_path ) || ( $upload_path == $dir ) )
                        $url = WP_CONTENT_URL . '/uploads';
                else
                        $url = trailingslashit( $siteurl ) . $upload_path;
        }
 
-       if ( defined('UPLOADS') ) {
+       if ( defined('UPLOADS') && !$main_override && ( !isset( $switched ) || $switched === false ) ) {
                $dir = ABSPATH . UPLOADS;
                $url = trailingslashit( $siteurl ) . UPLOADS;
        }
 
+       if ( is_multisite() && !$main_override && ( !isset( $switched ) || $switched === false ) ) {
+               if ( defined( 'BLOGUPLOADDIR' ) )
+                       $dir = untrailingslashit(BLOGUPLOADDIR);
+               $url = str_replace( UPLOADS, 'files', $url );
+       }
+
        $bdir = $dir;
        $burl = $url;
 
@@ -1869,15 +2195,15 @@ function wp_upload_dir( $time = null ) {
        $dir .= $subdir;
        $url .= $subdir;
 
+       $uploads = apply_filters( 'upload_dir', array( 'path' => $dir, 'url' => $url, 'subdir' => $subdir, 'basedir' => $bdir, 'baseurl' => $burl, 'error' => false ) );
+
        // Make sure we have an uploads dir
-       if ( ! wp_mkdir_p( $dir ) ) {
-               $message = sprintf( __( 'Unable to create directory %s. Is its parent directory writable by the server?' ), $dir );
+       if ( ! wp_mkdir_p( $uploads['path'] ) ) {
+               $message = sprintf( __( 'Unable to create directory %s. Is its parent directory writable by the server?' ), $uploads['path'] );
                return array( 'error' => $message );
        }
 
-       $uploads = array( 'path' => $dir, 'url' => $url, 'subdir' => $subdir, 'basedir' => $bdir, 'baseurl' => $burl, 'error' => false );
-
-       return apply_filters( 'upload_dir', $uploads );
+       return $uploads;
 }
 
 /**
@@ -1887,39 +2213,49 @@ function wp_upload_dir( $time = null ) {
  * 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 $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 ) {
-       $filename = strtolower( $filename );
+       // sanitize the file name before we begin processing
+       $filename = sanitize_file_name($filename);
+
        // separate the filename into a name and extension
        $info = pathinfo($filename);
-       $ext = !empty($info['extension']) ? $info['extension'] : '';
-       $name = basename($filename, ".{$ext}");
+       $ext = !empty($info['extension']) ? '.' . $info['extension'] : '';
+       $name = basename($filename, $ext);
 
        // edge case: if file is named '.ext', treat as an empty name
-       if( $name === ".$ext" )
+       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.
-       if ( $unique_filename_callback && function_exists( $unique_filename_callback ) ) {
-               $filename = $unique_filename_callback( $dir, $name );
+       // 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 ) ) {
+               $filename = call_user_func( $unique_filename_callback, $dir, $name, $ext );
        } else {
                $number = '';
 
-               if ( !empty( $ext ) )
-                       $ext = strtolower( ".$ext" );
-
-               $filename = str_replace( $ext, '', $filename );
-               // Strip % so the server doesn't try to decode entities.
-               $filename = str_replace('%', '', sanitize_title_with_dashes( $filename ) ) . $ext;
+               // change '.ext' to lower case
+               if ( $ext && strtolower($ext) != $ext ) {
+                       $ext2 = strtolower($ext);
+                       $filename2 = preg_replace( '|' . preg_quote($ext) . '$|', $ext2, $filename );
+
+                       // check for both lower and upper case extension or image sub-sizes may be overwritten
+                       while ( file_exists($dir . "/$filename") || file_exists($dir . "/$filename2") ) {
+                               $new_number = $number + 1;
+                               $filename = str_replace( "$number$ext", "$new_number$ext", $filename );
+                               $filename2 = str_replace( "$number$ext2", "$new_number$ext2", $filename2 );
+                               $number = $new_number;
+                       }
+                       return $filename2;
+               }
 
                while ( file_exists( $dir . "/$filename" ) ) {
                        if ( '' == "$number$ext" )
@@ -1950,12 +2286,15 @@ function wp_unique_filename( $dir, $filename, $unique_filename_callback = null )
  * @since 2.0.0
  *
  * @param string $name
- * @param null $deprecated Not used. Set to null.
+ * @param null $deprecated Never used. Set to null.
  * @param mixed $bits File content
  * @param string $time Optional. Time formatted in 'yyyy/mm'.
  * @return array
  */
 function wp_upload_bits( $name, $deprecated, $bits, $time = null ) {
+       if ( !empty( $deprecated ) )
+               _deprecated_argument( __FUNCTION__, '2.0' );
+
        if ( empty( $name ) )
                return array( 'error' => __( 'Empty filename' ) );
 
@@ -1968,6 +2307,12 @@ function wp_upload_bits( $name, $deprecated, $bits, $time = null ) {
        if ( $upload['error'] !== false )
                return $upload;
 
+       $upload_bits_error = apply_filters( 'wp_upload_bits', array( 'name' => $name, 'bits' => $bits, 'time' => $time ) );
+       if ( !is_array( $upload_bits_error ) ) {
+               $upload[ 'error' ] = $upload_bits_error;
+               return $upload;
+       }
+
        $filename = wp_unique_filename( $upload['path'], $name );
 
        $new_file = $upload['path'] . "/$filename";
@@ -1982,11 +2327,14 @@ function wp_upload_bits( $name, $deprecated, $bits, $time = null ) {
 
        @fwrite( $ifp, $bits );
        fclose( $ifp );
+       clearstatcache();
+
        // Set correct file permissions
        $stat = @ stat( dirname( $new_file ) );
        $perms = $stat['mode'] & 0007777;
        $perms = $perms & 0000666;
        @ chmod( $new_file, $perms );
+       clearstatcache();
 
        // Compute the URL
        $url = $upload['url'] . "/$filename";
@@ -2005,18 +2353,18 @@ function wp_upload_bits( $name, $deprecated, $bits, $time = null ) {
  * @return string|null The file type, example: audio, video, document, spreadsheet, etc. Null if not found.
  */
 function wp_ext2type( $ext ) {
-       $ext2type = apply_filters('ext2type', array(
-               'audio' => array('aac','ac3','aif','aiff','mp1','mp2','mp3','m3a','m4a','m4b','ogg','ram','wav','wma'),
-               'video' => array('asf','avi','divx','dv','mov','mpg','mpeg','mp4','mpv','ogm','qt','rm','vob','wmv'),
-               'document' => array('doc','docx','pages','odt','rtf','pdf'),
-               'spreadsheet' => array('xls','xlsx','numbers','ods'),
-               'interactive' => array('ppt','pptx','key','odp','swf'),
-               'text' => array('txt'),
-               'archive' => array('tar','bz2','gz','cab','dmg','rar','sea','sit','sqx','zip'),
-               'code' => array('css','html','php','js'),
+       $ext2type = apply_filters( 'ext2type', array(
+               'audio'       => array( 'aac', 'ac3',  'aif',  'aiff', 'm3a',  'm4a',   'm4b', 'mka', 'mp1', 'mp2',  'mp3', 'ogg', 'oga', 'ram', 'wav', 'wma' ),
+               'video'       => array( 'asf', 'avi',  'divx', 'dv',   'flv',  'm4v',   'mkv', 'mov', 'mp4', 'mpeg', 'mpg', 'mpv', 'ogm', 'ogv', 'qt',  'rm', 'vob', 'wmv' ),
+               'document'    => array( 'doc', 'docx', 'docm', 'dotm', 'odt',  'pages', 'pdf', 'rtf', 'wp',  'wpd' ),
+               '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' ),
+               'code'        => array( 'css', 'htm',  'html', 'php',  'js' ),
        ));
        foreach ( $ext2type as $type => $exts )
-               if ( in_array($ext, $exts) )
+               if ( in_array( $ext, $exts ) )
                        return $type;
 }
 
@@ -2032,8 +2380,104 @@ function wp_ext2type( $ext ) {
  * @return array Values with extension first and mime type.
  */
 function wp_check_filetype( $filename, $mimes = null ) {
-       // Accepted MIME types are set here as PCRE unless provided.
-       $mimes = ( is_array( $mimes ) ) ? $mimes : apply_filters( 'upload_mimes', array(
+       if ( empty($mimes) )
+               $mimes = get_allowed_mime_types();
+       $type = false;
+       $ext = false;
+
+       foreach ( $mimes as $ext_preg => $mime_match ) {
+               $ext_preg = '!\.(' . $ext_preg . ')$!i';
+               if ( preg_match( $ext_preg, $filename, $ext_matches ) ) {
+                       $type = $mime_match;
+                       $ext = $ext_matches[1];
+                       break;
+               }
+       }
+
+       return compact( 'ext', 'type' );
+}
+
+/**
+ * Attempt to determine the real file type of a file.
+ * If unable to, the file name extension will be used to determine type.
+ *
+ * If it's determined that the extension does not match the file's real type,
+ * then the "proper_filename" value will be set with a proper filename and extension.
+ *
+ * Currently this function only supports validating images known to getimagesize().
+ *
+ * @since 3.0.0
+ *
+ * @param string $file Full path to the image.
+ * @param string $filename The filename of the image (may differ from $file due to $file being in a tmp directory)
+ * @param array $mimes Optional. Key is the file extension with value as the mime type.
+ * @return array Values for the extension, MIME, and either a corrected filename or false if original $filename is valid
+ */
+function wp_check_filetype_and_ext( $file, $filename, $mimes = null ) {
+
+       $proper_filename = false;
+
+       // Do basic extension validation and MIME mapping
+       $wp_filetype = wp_check_filetype( $filename, $mimes );
+       extract( $wp_filetype );
+
+       // We can't do any further validation without a file to work with
+       if ( ! file_exists( $file ) )
+               return compact( 'ext', 'type', 'proper_filename' );
+
+       // We're able to validate images using GD
+       if ( $type && 0 === strpos( $type, 'image/' ) && function_exists('getimagesize') ) {
+
+               // Attempt to figure out what type of image it actually is
+               $imgstats = @getimagesize( $file );
+
+               // If getimagesize() knows what kind of image it really is and if the real MIME doesn't match the claimed MIME
+               if ( !empty($imgstats['mime']) && $imgstats['mime'] != $type ) {
+                       // This is a simplified array of MIMEs that getimagesize() can detect and their extensions
+                       // You shouldn't need to use this filter, but it's here just in case
+                       $mime_to_ext = apply_filters( 'getimagesize_mimes_to_exts', array(
+                               'image/jpeg' => 'jpg',
+                               'image/png'  => 'png',
+                               'image/gif'  => 'gif',
+                               'image/bmp'  => 'bmp',
+                               'image/tiff' => 'tif',
+                       ) );
+
+                       // Replace whatever is after the last period in the filename with the correct extension
+                       if ( ! empty( $mime_to_ext[ $imgstats['mime'] ] ) ) {
+                               $filename_parts = explode( '.', $filename );
+                               array_pop( $filename_parts );
+                               $filename_parts[] = $mime_to_ext[ $imgstats['mime'] ];
+                               $new_filename = implode( '.', $filename_parts );
+
+                               if ( $new_filename != $filename )
+                                       $proper_filename = $new_filename; // Mark that it changed
+
+                               // Redefine the extension / MIME
+                               $wp_filetype = wp_check_filetype( $new_filename, $mimes );
+                               extract( $wp_filetype );
+                       }
+               }
+       }
+
+       // Let plugins try and validate other types of files
+       // Should return an array in the style of array( 'ext' => $ext, 'type' => $type, 'proper_filename' => $proper_filename )
+       return apply_filters( 'wp_check_filetype_and_ext', compact( 'ext', 'type', 'proper_filename' ), $file, $filename, $mimes );
+}
+
+/**
+ * Retrieve list of allowed mime types and file extensions.
+ *
+ * @since 2.8.6
+ *
+ * @return array Array of mime types keyed by the file extension regex corresponding to those types.
+ */
+function get_allowed_mime_types() {
+       static $mimes = false;
+
+       if ( !$mimes ) {
+               // Accepted MIME types are set here as PCRE unless provided.
+               $mimes = apply_filters( 'upload_mimes', array(
                'jpg|jpeg|jpe' => 'image/jpeg',
                'gif' => 'image/gif',
                'png' => 'image/png',
@@ -2043,27 +2487,39 @@ function wp_check_filetype( $filename, $mimes = null ) {
                'asf|asx|wax|wmv|wmx' => 'video/asf',
                'avi' => 'video/avi',
                'divx' => 'video/divx',
+               'flv' => 'video/x-flv',
                'mov|qt' => 'video/quicktime',
-               'mpeg|mpg|mpe|mp4' => 'video/mpeg',
-               'txt|c|cc|h' => 'text/plain',
+               'mpeg|mpg|mpe' => 'video/mpeg',
+               'txt|asc|c|cc|h' => 'text/plain',
+               'csv' => 'text/csv',
+               'tsv' => 'text/tab-separated-values',
                'rtx' => 'text/richtext',
                'css' => 'text/css',
                'htm|html' => 'text/html',
-               'mp3|m4a' => 'audio/mpeg',
+               'mp3|m4a|m4b' => 'audio/mpeg',
+               'mp4|m4v' => 'video/mp4',
                'ra|ram' => 'audio/x-realaudio',
                'wav' => 'audio/wav',
-               'ogg' => 'audio/ogg',
+               'ogg|oga' => 'audio/ogg',
+               'ogv' => 'video/ogg',
                'mid|midi' => 'audio/midi',
                'wma' => 'audio/wma',
+               'mka' => 'audio/x-matroska',
+               'mkv' => 'video/x-matroska',
                'rtf' => 'application/rtf',
                'js' => 'application/javascript',
                'pdf' => 'application/pdf',
                'doc|docx' => 'application/msword',
-               'pot|pps|ppt|pptx' => 'application/vnd.ms-powerpoint',
+               'pot|pps|ppt|pptx|ppam|pptm|sldm|ppsm|potm' => 'application/vnd.ms-powerpoint',
                'wri' => 'application/vnd.ms-write',
-               'xla|xls|xlsx|xlt|xlw' => 'application/vnd.ms-excel',
+               'xla|xls|xlsx|xlt|xlw|xlam|xlsb|xlsm|xltm' => 'application/vnd.ms-excel',
                'mdb' => 'application/vnd.ms-access',
                'mpp' => 'application/vnd.ms-project',
+               'docm|dotm' => 'application/vnd.ms-word',
+               'pptx|sldx|ppsx|potx' => 'application/vnd.openxmlformats-officedocument.presentationml',
+               'xlsx|xltx' => 'application/vnd.openxmlformats-officedocument.spreadsheetml',
+               'docx|dotx' => 'application/vnd.openxmlformats-officedocument.wordprocessingml',
+               'onetoc|onetoc2|onetmp|onepkg' => 'application/onenote',
                'swf' => 'application/x-shockwave-flash',
                'class' => 'application/java',
                'tar' => 'application/x-tar',
@@ -2078,22 +2534,12 @@ function wp_check_filetype( $filename, $mimes = null ) {
                'odc' => 'application/vnd.oasis.opendocument.chart',
                'odb' => 'application/vnd.oasis.opendocument.database',
                'odf' => 'application/vnd.oasis.opendocument.formula',
-               )
-       );
-
-       $type = false;
-       $ext = false;
-
-       foreach ( $mimes as $ext_preg => $mime_match ) {
-               $ext_preg = '!\.(' . $ext_preg . ')$!i';
-               if ( preg_match( $ext_preg, $filename, $ext_matches ) ) {
-                       $type = $mime_match;
-                       $ext = $ext_matches[1];
-                       break;
-               }
+               // wordperfect formats
+               'wp|wpd' => 'application/wordperfect',
+               ) );
        }
 
-       return compact( 'ext', 'type' );
+       return $mimes;
 }
 
 /**
@@ -2125,65 +2571,73 @@ function wp_explain_nonce( $action ) {
                $noun = $matches[2];
 
                $trans = array();
-               $trans['update']['attachment'] = array( __( 'Your attempt to edit this attachment: &quot;%s&quot; has failed.' ), 'get_the_title' );
+               $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: &quot;%s&quot; has failed.' ), 'get_catname' );
-               $trans['update']['category']   = array( __( 'Your attempt to edit this category: &quot;%s&quot; has failed.' ), 'get_catname' );
+               $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: &quot;%s&quot; has failed.' ), 'use_id' );
-               $trans['unapprove']['comment'] = array( __( 'Your attempt to unapprove this comment: &quot;%s&quot; has failed.' ), 'use_id' );
-               $trans['approve']['comment']   = array( __( 'Your attempt to approve this comment: &quot;%s&quot; has failed.' ), 'use_id' );
-               $trans['update']['comment']    = array( __( 'Your attempt to edit this comment: &quot;%s&quot; has failed.' ), 'use_id' );
+               $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: &quot;%s&quot; has failed.' ), 'use_id' );
-               $trans['update']['bookmark']   = array( __( 'Your attempt to edit this link: &quot;%s&quot; has failed.' ), 'use_id' );
+               $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: &quot;%s&quot; has failed.' ), 'get_the_title' );
-               $trans['update']['page']       = array( __( 'Your attempt to edit this page: &quot;%s&quot; has failed.' ), 'get_the_title' );
+               $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: &quot;%s&quot; has failed.' ), 'use_id' );
-               $trans['activate']['plugin']   = array( __( 'Your attempt to activate this plugin: &quot;%s&quot; has failed.' ), 'use_id' );
-               $trans['deactivate']['plugin'] = array( __( 'Your attempt to deactivate this plugin: &quot;%s&quot; has failed.' ), 'use_id' );
-               $trans['upgrade']['plugin']    = array( __( 'Your attempt to upgrade this plugin: &quot;%s&quot; has failed.' ), 'use_id' );
+               $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 update 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: &quot;%s&quot; has failed.' ), 'get_the_title' );
-               $trans['update']['post']       = array( __( 'Your attempt to edit this post: &quot;%s&quot; has failed.' ), 'get_the_title' );
+               $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: &quot;%s&quot; has failed.' ), 'get_author_name' );
-               $trans['update']['profile']    = array( __( 'Your attempt to modify the profile for: &quot;%s&quot; has failed.' ), 'get_author_name' );
+               $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: &quot;%s&quot; has failed.' ), 'use_id' );
-               $trans['edit']['theme']        = array( __( 'Your attempt to edit this theme file: &quot;%s&quot; has failed.' ), 'use_id' );
-               $trans['switch']['theme']      = array( __( 'Your attempt to switch to this theme: &quot;%s&quot; 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 )
-                                       $object = call_user_func( $lookup, $object );
-                               return sprintf( $trans[$verb][$noun][0], wp_specialchars($object) );
+                               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?' ), $matches[4] );
+               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?' ) );
+       }
 }
 
 /**
@@ -2200,19 +2654,20 @@ function wp_explain_nonce( $action ) {
  */
 function wp_nonce_ays( $action ) {
        $title = __( 'WordPress Failure Notice' );
-       $html = wp_specialchars( wp_explain_nonce( $action ) );
-       if ( wp_get_referer() )
-               $html .= "</p><p><a href='" . remove_query_arg( 'updated', clean_url( wp_get_referer() ) ) . "'>" . __( 'Please try again.' ) . "</a>";
-       elseif ( 'log-out' == $action )
-               $html .= "</p><p>" . sprintf( __( "Do you really want to <a href='%s'>log out</a>?"), wp_nonce_url( site_url('wp-login.php?action=logout', 'login'), 'log-out' ) );
+       $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>";
 
-       wp_die( $html, $title);
+       wp_die( $html, $title, array('response' => 403) );
 }
 
+
 /**
  * Kill WordPress execution and display HTML message with error message.
  *
- * Call this function complements the die() PHP function. The difference is that
+ * This function complements the die() PHP function. The difference is that
  * 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
@@ -2225,11 +2680,37 @@ function wp_nonce_ays( $action ) {
  * @param string|array $args Optional arguements to control behaviour.
  */
 function wp_die( $message, $title = '', $args = array() ) {
-       global $wp_locale;
+       if ( defined( 'DOING_AJAX' ) && DOING_AJAX )
+               die('-1');
+
+       if ( function_exists( 'apply_filters' ) ) {
+               $function = apply_filters( 'wp_die_handler', '_default_wp_die_handler');
+       } else {
+               $function = '_default_wp_die_handler';
+       }
+
+       call_user_func( $function, $message, $title, $args );
+}
 
+/**
+ * Kill WordPress execution and display HTML message with error message.
+ *
+ * This is the default handler for wp_die if you want a custom one for your
+ * site then you can overload using the wp_die_handler filter in wp_die
+ *
+ * @since 3.0.0
+ * @access private
+ *
+ * @param string $message Error message.
+ * @param string $title Error title.
+ * @param string|array $args Optional arguements to control behaviour.
+ */
+function _default_wp_die_handler( $message, $title = '', $args = array() ) {
        $defaults = array( 'response' => 500 );
        $r = wp_parse_args($args, $defaults);
 
+       $have_gettext = function_exists('__');
+
        if ( function_exists( 'is_wp_error' ) && is_wp_error( $message ) ) {
                if ( empty( $title ) ) {
                        $error_data = $message->get_error_data();
@@ -2252,6 +2733,11 @@ function wp_die( $message, $title = '', $args = array() ) {
                $message = "<p>$message</p>";
        }
 
+       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>";
+       }
+
        if ( defined( 'WP_SITEURL' ) && '' != WP_SITEURL )
                $admin_dir = WP_SITEURL . '/wp-admin/';
        elseif ( function_exists( 'get_bloginfo' ) && '' != get_bloginfo( 'wpurl' ) )
@@ -2262,35 +2748,36 @@ function wp_die( $message, $title = '', $args = array() ) {
                $admin_dir = 'wp-admin/';
 
        if ( !function_exists( 'did_action' ) || !did_action( 'admin_head' ) ) :
-       if( !headers_sent() ){
+       if ( !headers_sent() ) {
                status_header( $r['response'] );
                nocache_headers();
                header( 'Content-Type: text/html; charset=utf-8' );
        }
 
-       if ( empty($title) ) {
-               if ( function_exists( '__' ) )
-                       $title = __( 'WordPress &rsaquo; Error' );
-               else
-                       $title = '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';
 ?>
 <!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(); ?>>
+<!-- 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>
        <link rel="stylesheet" href="<?php echo $admin_dir; ?>css/install.css" type="text/css" />
 <?php
-if ( ( $wp_locale ) && ( 'rtl' == $wp_locale->text_direction ) ) : ?>
+if ( 'rtl' == $text_direction ) : ?>
        <link rel="stylesheet" href="<?php echo $admin_dir; ?>css/install-rtl.css" type="text/css" />
 <?php endif; ?>
 </head>
 <body id="error-page">
 <?php endif; ?>
        <?php echo $message; ?>
-       <?php if ( strlen($message) < 512) echo str_repeat(' ', 512-strlen($message)); ?>
 </body>
 </html>
 <?php
@@ -2355,9 +2842,7 @@ function _config_wp_siteurl( $url = '' ) {
  * @return array Direction set for 'rtl', if needed by locale.
  */
 function _mce_set_direction( $input ) {
-       global $wp_locale;
-
-       if ( 'rtl' == $wp_locale->text_direction ) {
+       if ( is_rtl() ) {
                $input['directionality'] = 'rtl';
                $input['plugins'] .= ',directionality';
                $input['theme_advanced_buttons1'] .= ',ltr';
@@ -2366,6 +2851,7 @@ function _mce_set_direction( $input ) {
        return $input;
 }
 
+
 /**
  * Convert smiley code to the icon graphic file equivalent.
  *
@@ -2376,25 +2862,19 @@ function _mce_set_direction( $input ) {
  * to an array, with the key the code the blogger types in and the value the
  * image file.
  *
- * The $wp_smiliessearch global is for the regular expression array and is
- * set each time the function is called. The $wp_smiliesreplace is the full
- * replacement. Supposely, the $wp_smiliessearch array is looped over using
- * preg_replace() or just setting the array of $wp_smiliessearch along with the
- * array of $wp_smiliesreplace in the search and replace parameters of
- * preg_replace(), which would be faster and less overhead. Either way, both are
- * used with preg_replace() and can be defined after the function is called.
+ * The $wp_smiliessearch global is for the regular expression and is set each
+ * time the function is called.
  *
  * The full list of smilies can be found in the function and won't be listed in
  * the description. Probably should create a Codex page for it, so that it is
  * available.
  *
  * @global array $wpsmiliestrans
- * @global array $wp_smiliesreplace
  * @global array $wp_smiliessearch
  * @since 2.2.0
  */
 function smilies_init() {
-       global $wpsmiliestrans, $wp_smiliessearch, $wp_smiliesreplace;
+       global $wpsmiliestrans, $wp_smiliessearch;
 
        // don't bother setting up smilies if they are disabled
        if ( !get_option( 'use_smilies' ) )
@@ -2449,12 +2929,38 @@ function smilies_init() {
                );
        }
 
-       $siteurl = get_option( 'siteurl' );
+       if (count($wpsmiliestrans) == 0) {
+               return;
+       }
+
+       /*
+        * NOTE: we sort the smilies in reverse key order. This is to make sure
+        * we match the longest possible smilie (:???: vs :?) as the regular
+        * expression used below is first-match
+        */
+       krsort($wpsmiliestrans);
+
+       $wp_smiliessearch = '/(?:\s|^)';
+
+       $subchar = '';
        foreach ( (array) $wpsmiliestrans as $smiley => $img ) {
-               $wp_smiliessearch[] = '/(\s|^)' . preg_quote( $smiley, '/' ) . '(\s|$)/';
-               $smiley_masked = attribute_escape( trim( $smiley ) );
-               $wp_smiliesreplace[] = " <img src='$siteurl/wp-includes/images/smilies/$img' alt='$smiley_masked' class='wp-smiley' /> ";
+               $firstchar = substr($smiley, 0, 1);
+               $rest = substr($smiley, 1);
+
+               // new subpattern?
+               if ($firstchar != $subchar) {
+                       if ($subchar != '') {
+                               $wp_smiliessearch .= ')|(?:\s|^)';
+                       }
+                       $subchar = $firstchar;
+                       $wp_smiliessearch .= preg_quote($firstchar, '/') . '(?:';
+               } else {
+                       $wp_smiliessearch .= '|';
+               }
+               $wp_smiliessearch .= preg_quote($rest, '/');
        }
+
+       $wp_smiliessearch .= ')(?:\s|$)/m';
 }
 
 /**
@@ -2482,6 +2988,132 @@ function wp_parse_args( $args, $defaults = '' ) {
        return $r;
 }
 
+/**
+ * Clean up an array, comma- or space-separated list of IDs
+ *
+ * @since 3.0.0
+ *
+ * @param array|string $list
+ * @return array Sanitized array of IDs
+ */
+function wp_parse_id_list( $list ) {
+       if ( !is_array($list) )
+               $list = preg_split('/[\s,]+/', $list);
+
+       return array_unique(array_map('absint', $list));
+}
+
+/**
+ * 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
+ *
+ * @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. 'or' means only one element
+ *     from the array needs to match; 'and' means all elements must match. The default is 'and'.
+ * @param bool|string $field A field from the object to place instead of the entire object
+ * @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 ) )
+               return array();
+
+       $list = wp_list_filter( $list, $args, $operator );
+
+       if ( $field )
+               $list = wp_list_pluck( $list, $field );
+
+       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 ) {
+               $matched = count( array_intersect_assoc( (array) $obj, $args ) );
+               if ( ( 'AND' == $operator && $matched == $count )
+                 || ( 'OR' == $operator && $matched <= $count )
+                 || ( 'NOT' == $operator && 0 == $matched ) ) {
+                       $filtered[$key] = $obj;
+               }
+       }
+
+       return $filtered;
+}
+
+/**
+ * Pluck a certain field out of each object in a list
+ *
+ * @since 3.1.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_list_pluck( $list, $field ) {
+       foreach ( $list as $key => $value ) {
+               $value = (array) $value;
+               $list[ $key ] = $value[ $field ];
+       }
+
+       return $list;
+}
+
+/**
+ * Determines if default embed handlers should be loaded.
+ *
+ * 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 2.9.0
+ */
+function wp_maybe_load_embeds() {
+       if ( ! apply_filters('load_default_embeds', true) )
+               return;
+       require_once( ABSPATH . WPINC . '/default-embeds.php' );
+}
+
 /**
  * Determines if Widgets library should be loaded.
  *
@@ -2492,10 +3124,10 @@ function wp_parse_args( $args, $defaults = '' ) {
  * @uses add_action() Calls '_admin_menu' hook with 'wp_widgets_add_menu' value.
  */
 function wp_maybe_load_widgets() {
-       if ( !function_exists( 'dynamic_sidebar' ) ) {
-               require_once( ABSPATH . WPINC . '/widgets.php' );
-               add_action( '_admin_menu', 'wp_widgets_add_menu' );
-       }
+       if ( ! apply_filters('load_default_widgets', true) )
+               return;
+       require_once( ABSPATH . WPINC . '/default-widgets.php' );
+       add_action( '_admin_menu', 'wp_widgets_add_menu' );
 }
 
 /**
@@ -2506,7 +3138,7 @@ function wp_maybe_load_widgets() {
  */
 function wp_widgets_add_menu() {
        global $submenu;
-       $submenu['themes.php'][7] = array( __( 'Widgets' ), 'switch_themes', 'widgets.php' );
+       $submenu['themes.php'][7] = array( __( 'Widgets' ), 'edit_theme_options', 'widgets.php' );
        ksort( $submenu['themes.php'], SORT_NUMERIC );
 }
 
@@ -2518,25 +3150,9 @@ function wp_widgets_add_menu() {
  * @since 2.2.0
  */
 function wp_ob_end_flush_all() {
-       while ( @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' );
+       $levels = ob_get_level();
+       for ($i=0; $i<$levels; $i++)
+               ob_end_flush();
 }
 
 /**
@@ -2590,12 +3206,12 @@ function dead_db() {
 }
 
 /**
- * Converts value to positive integer.
+ * Converts value to nonnegative integer.
  *
  * @since 2.5.0
  *
- * @param mixed $maybeint Data you wish to have convered to an absolute integer
- * @return int An absolute integer
+ * @param mixed $maybeint Data you wish to have convered to an nonnegative integer
+ * @return int An nonnegative integer
  */
 function absint( $maybeint ) {
        return abs( intval( $maybeint ) );
@@ -2609,7 +3225,8 @@ function absint( $maybeint ) {
  *
  * @since 2.5.0
  *
- * @return bool Whether or not SSL access is available
+ * @param string $url
+ * @return bool Whether SSL access is available
  */
 function url_is_accessable_via_ssl($url)
 {
@@ -2621,6 +3238,7 @@ function url_is_accessable_via_ssl($url)
                curl_setopt($ch, CURLOPT_FAILONERROR, true);
                curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
                curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, false);
+               curl_setopt($ch, CURLOPT_CONNECTTIMEOUT, 5);
 
                curl_exec($ch);
 
@@ -2657,30 +3275,31 @@ function atom_service_url_filter($url)
  * 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 defined and
- * 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
- * @package Debug
+ * @subpackage Debug
  * @since 2.5.0
  * @access private
  *
- * @uses do_action() Calls 'deprecated_function_run' and passes the function name and what to use instead.
- * @uses apply_filters() Calls 'deprecated_function_trigger_error' and expects boolean value of true to do trigger or false to not trigger error.
+ * @uses do_action() Calls 'deprecated_function_run' and passes the function name, what to use instead,
+ *   and the version the function was deprecated in.
+ * @uses apply_filters() Calls 'deprecated_function_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 $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);
+       do_action( 'deprecated_function_run', $function, $replacement, $version );
 
        // Allow plugin to filter the output error trigger
-       if( defined('WP_DEBUG') && ( true === WP_DEBUG ) && apply_filters( 'deprecated_function_trigger_error', true )) {
-               if( !is_null($replacement) )
+       if ( WP_DEBUG && apply_filters( 'deprecated_function_trigger_error', true ) ) {
+               if ( ! is_null($replacement) )
                        trigger_error( sprintf( __('%1$s is <strong>deprecated</strong> since version %2$s! Use %3$s instead.'), $function, $version, $replacement ) );
                else
                        trigger_error( sprintf( __('%1$s is <strong>deprecated</strong> since version %2$s with no alternative available.'), $function, $version ) );
@@ -2694,33 +3313,113 @@ function _deprecated_function($function, $version, $replacement=null) {
  * 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 defined and
- * 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
- * @package Debug
+ * @subpackage Debug
  * @since 2.5.0
  * @access private
  *
- * @uses do_action() Calls 'deprecated_file_included' and passes the file name and what to use instead.
- * @uses apply_filters() Calls 'deprecated_file_trigger_error' and expects boolean value of true to do trigger or false to not trigger error.
+ * @uses do_action() Calls 'deprecated_file_included' and passes the file name, what to use instead,
+ *   the version in which the file was deprecated, and any message regarding the change.
+ * @uses apply_filters() Calls 'deprecated_file_trigger_error' and expects boolean value of true to do
+ *   trigger or false to not trigger error.
  *
  * @param string $file The file that was included
- * @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 file
+ * @param string $replacement Optional. The file that should have been included based on ABSPATH
+ * @param string $message Optional. A message regarding the change
+ */
+function _deprecated_file( $file, $version, $replacement = null, $message = '' ) {
+
+       do_action( 'deprecated_file_included', $file, $replacement, $version, $message );
+
+       // Allow plugin to filter the output error trigger
+       if ( WP_DEBUG && apply_filters( 'deprecated_file_trigger_error', true ) ) {
+               $message = empty( $message ) ? '' : ' ' . $message;
+               if ( ! is_null( $replacement ) )
+                       trigger_error( sprintf( __('%1$s is <strong>deprecated</strong> since version %2$s! Use %3$s instead.'), $file, $version, $replacement ) . $message );
+               else
+                       trigger_error( sprintf( __('%1$s is <strong>deprecated</strong> since version %2$s with no alternative available.'), $file, $version ) . $message );
+       }
+}
+/**
+ * Marks a function argument as deprecated and informs when it has been used.
+ *
+ * This function is to be used whenever a deprecated function argument is used.
+ * Before this function is called, the argument must be checked for whether it was
+ * used by comparing it to its default value or evaluating whether it is empty.
+ * For example:
+ * <code>
+ * if ( !empty($deprecated) )
+ *     _deprecated_argument( __FUNCTION__, '3.0' );
+ * </code>
+ *
+ * There is a hook deprecated_argument_run that will be called that can be used
+ * to get the backtrace up to what file and function used the deprecated
+ * argument.
+ *
+ * The current behavior is to trigger a user error if WP_DEBUG is true.
+ *
+ * @package WordPress
+ * @subpackage Debug
+ * @since 3.0.0
+ * @access private
+ *
+ * @uses do_action() Calls 'deprecated_argument_run' and passes the function name, a message on the change,
+ *   and the version in which the argument was deprecated.
+ * @uses apply_filters() Calls 'deprecated_argument_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 $version The version of WordPress that deprecated the argument used
+ * @param string $message Optional. A message regarding the change.
  */
-function _deprecated_file($file, $version, $replacement=null) {
+function _deprecated_argument( $function, $version, $message = null ) {
 
-       do_action('deprecated_file_included', $file, $replacement);
+       do_action( 'deprecated_argument_run', $function, $message, $version );
 
        // Allow plugin to filter the output error trigger
-       if( defined('WP_DEBUG') && ( true === WP_DEBUG ) && apply_filters( 'deprecated_file_trigger_error', true )) {
-               if( !is_null($replacement) )
-                       trigger_error( sprintf( __('%1$s is <strong>deprecated</strong> since version %2$s! Use %3$s instead.'), $file, $version, $replacement ) );
+       if ( WP_DEBUG && apply_filters( 'deprecated_argument_trigger_error', true ) ) {
+               if ( ! is_null( $message ) )
+                       trigger_error( sprintf( __('%1$s was called with an argument that is <strong>deprecated</strong> since version %2$s! %3$s'), $function, $version, $message ) );
                else
-                       trigger_error( sprintf( __('%1$s is <strong>deprecated</strong> since version %2$s with no alternative available.'), $file, $version ) );
+                       trigger_error( sprintf( __('%1$s was called with an argument that is <strong>deprecated</strong> since version %2$s with no alternative available.'), $function, $version ) );
+       }
+}
+
+/**
+ * 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 );
+               trigger_error( sprintf( __( '%1$s was called <strong>incorrectly</strong>. %2$s %3$s' ), $function, $message, $version ) );
        }
 }
 
@@ -2766,6 +3465,34 @@ function apache_mod_loaded($mod, $default = false) {
        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 depricated 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);
+}
+
 /**
  * File validates against allowed set of defined rules.
  *
@@ -2787,12 +3514,12 @@ function validate_file( $file, $allowed_files = '' ) {
        if ( false !== strpos( $file, './' ))
                return 1;
 
-       if (':' == substr( $file, 1, 1 ))
-               return 2;
-
        if (!empty ( $allowed_files ) && (!in_array( $file, $allowed_files ) ) )
                return 3;
 
+       if (':' == substr( $file, 1, 1 ))
+               return 2;
+
        return 0;
 }
 
@@ -2823,10 +3550,10 @@ function is_ssl() {
  * @param string|bool $force Optional.
  * @return bool True if forced, false if not forced.
  */
-function force_ssl_login($force = '') {
-       static $forced;
+function force_ssl_login( $force = null ) {
+       static $forced = false;
 
-       if ( '' != $force ) {
+       if ( !is_null( $force ) ) {
                $old_forced = $forced;
                $forced = $force;
                return $old_forced;
@@ -2843,10 +3570,10 @@ function force_ssl_login($force = '') {
  * @param string|bool $force
  * @return bool True if forced, false if not forced.
  */
-function force_ssl_admin($force = '') {
-       static $forced;
+function force_ssl_admin( $force = null ) {
+       static $forced = false;
 
-       if ( '' != $force ) {
+       if ( !is_null( $force ) ) {
                $old_forced = $forced;
                $forced = $force;
                return $old_forced;
@@ -2869,10 +3596,10 @@ function wp_guess_url() {
        if ( defined('WP_SITEURL') && '' != WP_SITEURL ) {
                $url = WP_SITEURL;
        } else {
-               $schema = ( isset($_SERVER['HTTPS']) && strtolower($_SERVER['HTTPS']) == 'on' ) ? 'https://' : 'http://';
+               $schema = is_ssl() ? 'https://' : 'http://';
                $url = preg_replace('|/wp-admin/.*|i', '', $schema . $_SERVER['HTTP_HOST'] . $_SERVER['REQUEST_URI']);
        }
-       return $url;
+       return rtrim($url, '/');
 }
 
 /**
@@ -2896,22 +3623,875 @@ function wp_suspend_cache_invalidation($suspend = true) {
 }
 
 /**
- * Copy an object.
+ * Retrieve site option value based on name of option.
+ *
+ * @see get_option()
+ * @package WordPress
+ * @subpackage Option
+ * @since 2.8.0
  *
- * Returns a cloned copy of an object.
+ * @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.
  *
- * @since 2.7.0
+ * @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
  *
- * @param object $object The object to clone
- * @return object The cloned object
+ * @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 wp_clone( $object ) {
-       static $can_clone;
-       if ( !isset( $can_clone ) ) {
-               $can_clone = version_compare( phpversion(), '5.0', '>=' );
+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 );
        }
-       return $can_clone ? clone( $object ) : $object;
+       if ( $result )
+               do_action( 'deleted_site_transient', $transient );
+       return $result;
 }
 
+/**
+ * Get the value of a site transient
+ *
+ * If the transient does not exist or does not have a value, then the return value
+ * will be false.
+ *
+ * @see get_transient()
+ * @since 2.9.0
+ * @package WordPress
+ * @subpackage Transient
+ *
+ * @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.
+ *
+ * @param string $transient Transient name. Expected to not be SQL-escaped.
+ * @return mixed Value of transient
+ */
+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;
+                       }
+               }
+
+               $value = get_site_option( $transient_option );
+       }
+
+       return apply_filters( 'site_transient_' . $transient, $value );
+}
+
+/**
+ * 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.
+ *
+ * @see set_transient()
+ * @since 2.9.0
+ * @package WordPress
+ * @subpackage Transient
+ *
+ * @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.
+ *
+ * @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_site_transient( $transient, $value, $expiration = 0 ) {
+       global $_wp_using_ext_object_cache;
+
+       $value = apply_filters( 'pre_set_site_transient_' . $transient, $value );
+
+       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;
+}
+
+/**
+ * is main site
+ *
+ *
+ * @since 3.0.0
+ * @package WordPress
+ *
+ * @param int $blog_id optional blog id to test (default current blog)
+ * @return bool True if not multisite or $blog_id is main site
+ */
+function is_main_site( $blog_id = '' ) {
+       global $current_site, $current_blog;
+
+       if ( !is_multisite() )
+               return true;
+
+       if ( !$blog_id )
+               $blog_id = $current_blog->blog_id;
+
+       return $blog_id == $current_site->blog_id;
+}
+
+/**
+ * Whether global terms are enabled.
+ *
+ *
+ * @since 3.0.0
+ * @package WordPress
+ *
+ * @return bool True if multisite and global terms enabled
+ */
+function global_terms_enabled() {
+       if ( ! is_multisite() )
+               return false;
+
+       static $global_terms = null;
+       if ( is_null( $global_terms ) ) {
+               $filter = apply_filters( 'global_terms_enabled', null );
+               if ( ! is_null( $filter ) )
+                       $global_terms = (bool) $filter;
+               else
+                       $global_terms = (bool) get_site_option( 'global_terms_enabled', false );
+       }
+       return $global_terms;
+}
+
+/**
+ * gmt_offset modification for smart timezone handling
+ *
+ * Overrides the gmt_offset option if we have a timezone_string available
+ *
+ * @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;
+       }
+
+       $timezone_object = timezone_open( $timezone_string );
+       $datetime_object = date_create();
+       if ( false === $timezone_object || false === $datetime_object ) {
+               return false;
+       }
+       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}}
+ *
+ * @since 2.9.0
+ *
+ * @param unknown_type $a
+ * @param unknown_type $b
+ * @return int
+ */
+function _wp_timezone_choice_usort_callback( $a, $b ) {
+       // Don't use translated versions of Etc
+       if ( 'Etc' === $a['continent'] && 'Etc' === $b['continent'] ) {
+               // Make the order of these more like the old dropdown
+               if ( 'GMT+' === substr( $a['city'], 0, 4 ) && 'GMT+' === substr( $b['city'], 0, 4 ) ) {
+                       return -1 * ( strnatcasecmp( $a['city'], $b['city'] ) );
+               }
+               if ( 'UTC' === $a['city'] ) {
+                       if ( 'GMT+' === substr( $b['city'], 0, 4 ) ) {
+                               return 1;
+                       }
+                       return -1;
+               }
+               if ( 'UTC' === $b['city'] ) {
+                       if ( 'GMT+' === substr( $a['city'], 0, 4 ) ) {
+                               return -1;
+                       }
+                       return 1;
+               }
+               return strnatcasecmp( $a['city'], $b['city'] );
+       }
+       if ( $a['t_continent'] == $b['t_continent'] ) {
+               if ( $a['t_city'] == $b['t_city'] ) {
+                       return strnatcasecmp( $a['t_subcity'], $b['t_subcity'] );
+               }
+               return strnatcasecmp( $a['t_city'], $b['t_city'] );
+       } else {
+               // Force Etc to the bottom of the list
+               if ( 'Etc' === $a['continent'] ) {
+                       return 1;
+               }
+               if ( 'Etc' === $b['continent'] ) {
+                       return -1;
+               }
+               return strnatcasecmp( $a['t_continent'], $b['t_continent'] );
+       }
+}
+
+/**
+ * Gives a nicely formatted list of timezone strings // temporary! Not in final
+ *
+ * @since 2.9.0
+ *
+ * @param string $selected_zone Selected Zone
+ * @return string
+ */
+function wp_timezone_choice( $selected_zone ) {
+       static $mo_loaded = false;
+
+       $continents = array( 'Africa', 'America', 'Antarctica', 'Arctic', 'Asia', 'Atlantic', 'Australia', 'Europe', 'Indian', 'Pacific');
+
+       // Load translations for continents and cities
+       if ( !$mo_loaded ) {
+               $locale = get_locale();
+               $mofile = WP_LANG_DIR . '/continents-cities-' . $locale . '.mo';
+               load_textdomain( 'continents-cities', $mofile );
+               $mo_loaded = true;
+       }
+
+       $zonen = array();
+       foreach ( timezone_identifiers_list() as $zone ) {
+               $zone = explode( '/', $zone );
+               if ( !in_array( $zone[0], $continents ) ) {
+                       continue;
+               }
+
+               // This determines what gets set and translated - we don't translate Etc/* strings here, they are done later
+               $exists = array(
+                       0 => ( isset( $zone[0] ) && $zone[0] ),
+                       1 => ( isset( $zone[1] ) && $zone[1] ),
+                       2 => ( isset( $zone[2] ) && $zone[2] ),
+               );
+               $exists[3] = ( $exists[0] && 'Etc' !== $zone[0] );
+               $exists[4] = ( $exists[1] && $exists[3] );
+               $exists[5] = ( $exists[2] && $exists[3] );
+
+               $zonen[] = array(
+                       'continent'   => ( $exists[0] ? $zone[0] : '' ),
+                       'city'        => ( $exists[1] ? $zone[1] : '' ),
+                       'subcity'     => ( $exists[2] ? $zone[2] : '' ),
+                       't_continent' => ( $exists[3] ? translate( str_replace( '_', ' ', $zone[0] ), 'continents-cities' ) : '' ),
+                       't_city'      => ( $exists[4] ? translate( str_replace( '_', ' ', $zone[1] ), 'continents-cities' ) : '' ),
+                       't_subcity'   => ( $exists[5] ? translate( str_replace( '_', ' ', $zone[2] ), 'continents-cities' ) : '' )
+               );
+       }
+       usort( $zonen, '_wp_timezone_choice_usort_callback' );
+
+       $structure = array();
+
+       if ( empty( $selected_zone ) ) {
+               $structure[] = '<option selected="selected" value="">' . __( 'Select a city' ) . '</option>';
+       }
+
+       foreach ( $zonen as $key => $zone ) {
+               // Build value in an array to join later
+               $value = array( $zone['continent'] );
+
+               if ( empty( $zone['city'] ) ) {
+                       // It's at the continent level (generally won't happen)
+                       $display = $zone['t_continent'];
+               } else {
+                       // It's inside a continent group
+
+                       // Continent optgroup
+                       if ( !isset( $zonen[$key - 1] ) || $zonen[$key - 1]['continent'] !== $zone['continent'] ) {
+                               $label = $zone['t_continent'];
+                               $structure[] = '<optgroup label="'. esc_attr( $label ) .'">';
+                       }
+
+                       // Add the city to the value
+                       $value[] = $zone['city'];
+
+                       $display = $zone['t_city'];
+                       if ( !empty( $zone['subcity'] ) ) {
+                               // Add the subcity to the value
+                               $value[] = $zone['subcity'];
+                               $display .= ' - ' . $zone['t_subcity'];
+                       }
+               }
+
+               // Build the value
+               $value = join( '/', $value );
+               $selected = '';
+               if ( $value === $selected_zone ) {
+                       $selected = 'selected="selected" ';
+               }
+               $structure[] = '<option ' . $selected . 'value="' . esc_attr( $value ) . '">' . esc_html( $display ) . "</option>";
+
+               // Close continent optgroup
+               if ( !empty( $zone['city'] ) && ( !isset($zonen[$key + 1]) || (isset( $zonen[$key + 1] ) && $zonen[$key + 1]['continent'] !== $zone['continent']) ) ) {
+                       $structure[] = '</optgroup>';
+               }
+       }
+
+       // Do UTC
+       $structure[] = '<optgroup label="'. esc_attr__( 'UTC' ) .'">';
+       $selected = '';
+       if ( 'UTC' === $selected_zone )
+               $selected = 'selected="selected" ';
+       $structure[] = '<option ' . $selected . 'value="' . esc_attr( 'UTC' ) . '">' . __('UTC') . '</option>';
+       $structure[] = '</optgroup>';
+
+       // Do manual UTC offsets
+       $structure[] = '<optgroup label="'. esc_attr__( 'Manual Offsets' ) .'">';
+       $offset_range = array (-12, -11.5, -11, -10.5, -10, -9.5, -9, -8.5, -8, -7.5, -7, -6.5, -6, -5.5, -5, -4.5, -4, -3.5, -3, -2.5, -2, -1.5, -1, -0.5,
+               0, 0.5, 1, 1.5, 2, 2.5, 3, 3.5, 4, 4.5, 5, 5.5, 5.75, 6, 6.5, 7, 7.5, 8, 8.5, 8.75, 9, 9.5, 10, 10.5, 11, 11.5, 12, 12.75, 13, 13.75, 14);
+       foreach ( $offset_range as $offset ) {
+               if ( 0 <= $offset )
+                       $offset_name = '+' . $offset;
+               else
+                       $offset_name = (string) $offset;
+
+               $offset_value = $offset_name;
+               $offset_name = str_replace(array('.25','.5','.75'), array(':15',':30',':45'), $offset_name);
+               $offset_name = 'UTC' . $offset_name;
+               $offset_value = 'UTC' . $offset_value;
+               $selected = '';
+               if ( $offset_value === $selected_zone )
+                       $selected = 'selected="selected" ';
+               $structure[] = '<option ' . $selected . 'value="' . esc_attr( $offset_value ) . '">' . esc_html( $offset_name ) . "</option>";
+
+       }
+       $structure[] = '</optgroup>';
+
+       return join( "\n", $structure );
+}
+
+/**
+ * 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
+ *
+ * @param string $str
+ * @return string
+ */
+function _cleanup_header_comment($str) {
+       return trim(preg_replace("/\s*(?:\*\/|\?>).*/", '', $str));
+}
+
+/**
+ * Permanently deletes posts, pages, attachments, and comments which have been in the trash for EMPTY_TRASH_DAYS.
+ *
+ * @since 2.9.0
+ */
+function wp_scheduled_delete() {
+       global $wpdb;
+
+       $delete_timestamp = time() - (60*60*24*EMPTY_TRASH_DAYS);
+
+       $posts_to_delete = $wpdb->get_results($wpdb->prepare("SELECT post_id FROM $wpdb->postmeta WHERE meta_key = '_wp_trash_meta_time' AND meta_value < '%d'", $delete_timestamp), ARRAY_A);
+
+       foreach ( (array) $posts_to_delete as $post ) {
+               $post_id = (int) $post['post_id'];
+               if ( !$post_id )
+                       continue;
+
+               $del_post = get_post($post_id);
+
+               if ( !$del_post || 'trash' != $del_post->post_status ) {
+                       delete_post_meta($post_id, '_wp_trash_meta_status');
+                       delete_post_meta($post_id, '_wp_trash_meta_time');
+               } else {
+                       wp_delete_post($post_id);
+               }
+       }
+
+       $comments_to_delete = $wpdb->get_results($wpdb->prepare("SELECT comment_id FROM $wpdb->commentmeta WHERE meta_key = '_wp_trash_meta_time' AND meta_value < '%d'", $delete_timestamp), ARRAY_A);
+
+       foreach ( (array) $comments_to_delete as $comment ) {
+               $comment_id = (int) $comment['comment_id'];
+               if ( !$comment_id )
+                       continue;
+
+               $del_comment = get_comment($comment_id);
+
+               if ( !$del_comment || 'trash' != $del_comment->comment_approved ) {
+                       delete_comment_meta($comment_id, '_wp_trash_meta_time');
+                       delete_comment_meta($comment_id, '_wp_trash_meta_status');
+               } else {
+                       wp_delete_comment($comment_id);
+               }
+       }
+}
+
+/**
+ * Retrieve metadata from a file.
+ *
+ * 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 multple
+ * lines, the value will get cut at the end of the first line.
+ *
+ * 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.
+ *
+ * @see http://codex.wordpress.org/File_Header
+ *
+ * @since 2.9.0
+ * @param string $file Path to the file
+ * @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.
+       $fp = fopen( $file, 'r' );
+
+       // Pull only the first 8kiB of the file in.
+       $file_data = fread( $fp, 8192 );
+
+       // PHP will close file handle, but we are good citizens.
+       fclose( $fp );
+
+       if ( $context != '' ) {
+               $extra_headers = apply_filters( "extra_{$context}_headers", array() );
+
+               $extra_headers = array_flip( $extra_headers );
+               foreach( $extra_headers as $key=>$value ) {
+                       $extra_headers[$key] = $key;
+               }
+               $all_headers = array_merge( $extra_headers, (array) $default_headers );
+       } else {
+               $all_headers = $default_headers;
+       }
+
+       foreach ( $all_headers as $field => $regex ) {
+               preg_match( '/^[ \t\/*#@]*' . preg_quote( $regex, '/' ) . ':(.*)$/mi', $file_data, ${$field});
+               if ( !empty( ${$field} ) )
+                       ${$field} = _cleanup_header_comment( ${$field}[1] );
+               else
+                       ${$field} = '';
+       }
+
+       $file_data = compact( array_keys( $all_headers ) );
+
+       return $file_data;
+}
+
+/**
+ * Used internally to tidy up the search terms
+ *
+ * @access private
+ * @since 2.9.0
+ *
+ * @param string $t
+ * @return string
+ */
+function _search_terms_tidy($t) {
+       return trim($t, "\"'\n\r ");
+}
+
+/**
+ * Returns true
+ *
+ * Useful for returning true to filters easily
+ *
+ * @since 3.0.0
+ * @see __return_false()
+ * @return bool true
+ */
+function __return_true() {
+       return true;
+}
+
+/**
+ * Returns false
+ *
+ * Useful for returning false to filters easily
+ *
+ * @since 3.0.0
+ * @see __return_true()
+ * @return bool false
+ */
+function __return_false() {
+       return false;
+}
+
+/**
+ * Returns 0
+ *
+ * Useful for returning 0 to filters easily
+ *
+ * @since 3.0.0
+ * @see __return_zero()
+ * @return int 0
+ */
+function __return_zero() {
+       return 0;
+}
+
+/**
+ * Returns an empty array
+ *
+ * Useful for returning an empty array to filters easily
+ *
+ * @since 3.0.0
+ * @see __return_zero()
+ * @return array Empty array
+ */
+function __return_empty_array() {
+       return array();
+}
+
+/**
+ * Send a HTTP header to disable content type sniffing in browsers which support it.
+ *
+ * @link http://blogs.msdn.com/ie/archive/2008/07/02/ie8-security-part-v-comprehensive-protection.aspx
+ * @link http://src.chromium.org/viewvc/chrome?view=rev&revision=6985
+ *
+ * @since 3.0.0
+ * @return none
+ */
+function send_nosniff_header() {
+       @header( 'X-Content-Type-Options: nosniff' );
+}
+
+/**
+ * Returns a MySQL expression for selecting the week number based on the start_of_week option.
+ *
+ * @internal
+ * @since 3.0.0
+ * @param string $column
+ * @return string
+ */
+function _wp_mysql_week( $column ) {
+       switch ( $start_of_week = (int) get_option( 'start_of_week' ) ) {
+       default :
+       case 0 :
+               return "WEEK( $column, 0 )";
+       case 1 :
+               return "WEEK( $column, 1 )";
+       case 2 :
+       case 3 :
+       case 4 :
+       case 5 :
+       case 6 :
+               return "WEEK( DATE_SUB( $column, INTERVAL $start_of_week DAY ), 0 )";
+       }
+}
+
+/**
+ * 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 accupts ( 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' );
+}
 
 ?>