]> scripts.mit.edu Git - autoinstalls/wordpress.git/blobdiff - wp-admin/includes/ms.php
WordPress 3.8.1-scripts
[autoinstalls/wordpress.git] / wp-admin / includes / ms.php
index a6828b2dedfdcc35716b805314a970fad612080e..e376a1ed13ab96fb27ecfd1caafe158204924757 100644 (file)
@@ -25,9 +25,8 @@ function check_upload_size( $file ) {
        if ( defined( 'WP_IMPORTING' ) )
                return $file;
 
-       $space_allowed = 1048576 * get_space_allowed();
-       $space_used = get_dirsize( BLOGUPLOADDIR );
-       $space_left = $space_allowed - $space_used;
+       $space_left = get_upload_space_available();
+
        $file_size = filesize( $file['tmp_name'] );
        if ( $space_left < $file_size )
                $file['error'] = sprintf( __( 'Not enough space to upload. %1$s KB needed.' ), number_format( ($file_size - $space_left) /1024 ) );
@@ -53,17 +52,23 @@ add_filter( 'wp_handle_upload_prefilter', 'check_upload_size' );
  * @return void
  */
 function wpmu_delete_blog( $blog_id, $drop = false ) {
-       global $wpdb, $current_site;
+       global $wpdb;
 
        $switch = false;
-       if ( $blog_id != $wpdb->blogid ) {
+       if ( get_current_blog_id() != $blog_id ) {
                $switch = true;
                switch_to_blog( $blog_id );
-               $blog = get_blog_details( $blog_id );
-       } else {
-               $blog = $GLOBALS['current_blog'];
        }
 
+       $blog = get_blog_details( $blog_id );
+       /**
+        * Fires before a blog is deleted.
+        *
+        * @since MU
+        *
+        * @param int  $blog_id The blog ID.
+        * @param bool $drop    True if blog's table should be dropped. Default is false.
+        */
        do_action( 'delete_blog', $blog_id, $drop );
 
        $users = get_users( array( 'blog_id' => $blog_id, 'fields' => 'ids' ) );
@@ -77,13 +82,23 @@ function wpmu_delete_blog( $blog_id, $drop = false ) {
 
        update_blog_status( $blog_id, 'deleted', 1 );
 
+       $current_site = get_current_site();
+
        // Don't destroy the initial, main, or root blog.
        if ( $drop && ( 1 == $blog_id || is_main_site( $blog_id ) || ( $blog->path == $current_site->path && $blog->domain == $current_site->domain ) ) )
                $drop = false;
 
        if ( $drop ) {
-
-               $drop_tables = apply_filters( 'wpmu_drop_tables', $wpdb->tables( 'blog' ) );
+               $tables = $wpdb->tables( 'blog' );
+               /**
+                * Filter the tables to drop when the blog is deleted.
+                *
+                * @since MU
+                *
+                * @param array $tables  The blog tables to be dropped.
+                * @param int   $blog_id The ID of the blog to drop tables for.
+                */
+               $drop_tables = apply_filters( 'wpmu_drop_tables', $tables, $blog_id );
 
                foreach ( (array) $drop_tables as $table ) {
                        $wpdb->query( "DROP TABLE IF EXISTS `$table`" );
@@ -91,7 +106,16 @@ function wpmu_delete_blog( $blog_id, $drop = false ) {
 
                $wpdb->delete( $wpdb->blogs, array( 'blog_id' => $blog_id ) );
 
-               $dir = apply_filters( 'wpmu_delete_blog_upload_dir', WP_CONTENT_DIR . "/blogs.dir/{$blog_id}/files/", $blog_id );
+               $uploads = wp_upload_dir();
+               /**
+                * Filter the upload base directory to delete when the blog is deleted.
+                *
+                * @since MU
+                *
+                * @param string $uploads['basedir'] Uploads path without subdirectory. @see wp_upload_dir()
+                * @param int    $blog_id            The blog ID.
+                */
+               $dir = apply_filters( 'wpmu_delete_blog_upload_dir', $uploads['basedir'], $blog_id );
                $dir = rtrim( $dir, DIRECTORY_SEPARATOR );
                $top_dir = $dir;
                $stack = array($dir);
@@ -112,6 +136,7 @@ function wpmu_delete_blog( $blog_id, $drop = false ) {
                                        else if ( @is_file( $dir . DIRECTORY_SEPARATOR . $file ) )
                                                @unlink( $dir . DIRECTORY_SEPARATOR . $file );
                                }
+                               @closedir( $dh );
                        }
                        $index++;
                }
@@ -121,6 +146,8 @@ function wpmu_delete_blog( $blog_id, $drop = false ) {
                        if ( $dir != $top_dir)
                        @rmdir( $dir );
                }
+
+               clean_blog_cache( $blog );
        }
 
        if ( $switch )
@@ -134,6 +161,15 @@ function wpmu_delete_user( $id ) {
        $id = (int) $id;
        $user = new WP_User( $id );
 
+       if ( !$user->exists() )
+               return false;
+       /**
+        * Fires before a user is deleted from the network.
+        *
+        * @since MU
+        *
+        * @param int $id ID of the user about to be deleted from the network.
+        */
        do_action( 'wpmu_delete_user', $id );
 
        $blogs = get_blogs_of_user( $id );
@@ -168,7 +204,7 @@ function wpmu_delete_user( $id ) {
 
        clean_user_cache( $user );
 
-       // allow for commit transaction
+       /** This action is documented in wp-admin/includes/user.php */
        do_action( 'deleted_user', $id );
 
        return true;
@@ -186,7 +222,7 @@ function update_option_new_admin_email( $old_value, $value ) {
        );
        update_option( 'adminhash', $new_admin_email );
 
-       $content = apply_filters( 'new_admin_email_content', __( "Dear user,
+       $email_text = __( 'Dear user,
 
 You recently requested to have the administration email address on
 your site changed.
@@ -200,7 +236,23 @@ This email has been sent to ###EMAIL###
 
 Regards,
 All at ###SITENAME###
-###SITEURL### "), $new_admin_email );
+###SITEURL###' );
+
+       /**
+        * Filter the email text sent when the site admin email is changed.
+        *
+        * The following strings have a special meaning and will get replaced dynamically:
+        * ###ADMIN_URL### The link to click on to confirm the email change. Required otherwise this functunalty is will break.
+        * ###EMAIL###     The new email.
+        * ###SITENAME###  The name of the site.
+        * ###SITEURL###   The URL to the site.
+        *
+        * @since MU
+        *
+        * @param string $email_text      Text in the email.
+        * @param string $new_admin_email New admin email that the current administration email was changed to.
+        */
+       $content = apply_filters( 'new_admin_email_content', $email_text, $new_admin_email );
 
        $content = str_replace( '###ADMIN_URL###', esc_url( admin_url( 'options.php?adminhash='.$hash ) ), $content );
        $content = str_replace( '###EMAIL###', $value, $content );
@@ -223,12 +275,12 @@ function send_confirmation_on_profile_email() {
 
        if ( $current_user->user_email != $_POST['email'] ) {
                if ( !is_email( $_POST['email'] ) ) {
-                       $errors->add( 'user_email', __( "<strong>ERROR</strong>: The e-mail address isn't correct." ), array( 'form-field' => 'email' ) );
+                       $errors->add( 'user_email', __( "<strong>ERROR</strong>: The email address isn&#8217;t correct." ), array( 'form-field' => 'email' ) );
                        return;
                }
 
                if ( $wpdb->get_var( $wpdb->prepare( "SELECT user_email FROM {$wpdb->users} WHERE user_email=%s", $_POST['email'] ) ) ) {
-                       $errors->add( 'user_email', __( "<strong>ERROR</strong>: The e-mail address is already used." ), array( 'form-field' => 'email' ) );
+                       $errors->add( 'user_email', __( "<strong>ERROR</strong>: The email address is already used." ), array( 'form-field' => 'email' ) );
                        delete_option( $current_user->ID . '_new_email' );
                        return;
                }
@@ -240,7 +292,7 @@ function send_confirmation_on_profile_email() {
                                );
                update_option( $current_user->ID . '_new_email', $new_user_email );
 
-               $content = apply_filters( 'new_user_email_content', __( "Dear user,
+               $email_text = __( 'Dear user,
 
 You recently requested to have the email address on your account changed.
 If this is correct, please click on the following link to change it:
@@ -253,7 +305,23 @@ This email has been sent to ###EMAIL###
 
 Regards,
 All at ###SITENAME###
-###SITEURL###" ), $new_user_email );
+###SITEURL###' );
+
+               /**
+                * Filter the email text sent when a user changes emails.
+                *
+                * The following strings have a special meaning and will get replaced dynamically:
+                * ###ADMIN_URL### The link to click on to confirm the email change. Required otherwise this functunalty is will break.
+                * ###EMAIL### The new email.
+                * ###SITENAME### The name of the site.
+                * ###SITEURL### The URL to the site.
+                *
+                * @since MU
+                *
+                * @param string $email_text     Text in the email.
+                * @param string $new_user_email New user email that the current user has changed to.
+                */
+               $content = apply_filters( 'new_user_email_content', $email_text, $new_user_email );
 
                $content = str_replace( '###ADMIN_URL###', esc_url( admin_url( 'profile.php?newuseremail='.$hash ) ), $content );
                $content = str_replace( '###EMAIL###', $_POST['email'], $content);
@@ -273,106 +341,82 @@ function new_user_email_admin_notice() {
 add_action( 'admin_notices', 'new_user_email_admin_notice' );
 
 /**
- * Determines if there is any upload space left in the current blog's quota.
+ * Check whether a blog has used its allotted upload space.
  *
- * @since 3.0.0
- * @return bool True if space is available, false otherwise.
- */
-function is_upload_space_available() {
-       if ( get_site_option( 'upload_space_check_disabled' ) )
-               return true;
-
-       if ( !( $space_allowed = get_upload_space_available() ) )
-               return false;
-
-       return true;
-}
-
-/**
- * @since 3.0.0
+ * @since MU
  *
- * @return int of upload size limit in bytes
+ * @param bool $echo Optional. If $echo is set and the quota is exceeded, a warning message is echoed. Default is true.
+ * @return int
  */
-function upload_size_limit_filter( $size ) {
-       $fileupload_maxk = 1024 * get_site_option( 'fileupload_maxk', 1500 );
+function upload_is_user_over_quota( $echo = true ) {
        if ( get_site_option( 'upload_space_check_disabled' ) )
-               return min( $size, $fileupload_maxk );
-
-       return min( $size, $fileupload_maxk, get_upload_space_available() );
-}
-/**
- * Determines if there is any upload space left in the current blog's quota.
- *
- * @return int of upload space available in bytes
- */
-function get_upload_space_available() {
-       $space_allowed = get_space_allowed() * 1024 * 1024;
-       if ( get_site_option( 'upload_space_check_disabled' ) )
-               return $space_allowed;
+               return false;
 
-       $dir_name = trailingslashit( BLOGUPLOADDIR );
-       if ( !( is_dir( $dir_name) && is_readable( $dir_name ) ) )
-               return $space_allowed;
+       $space_allowed = get_space_allowed();
+       if ( empty( $space_allowed ) || !is_numeric( $space_allowed ) )
+               $space_allowed = 10; // Default space allowed is 10 MB
 
-       $dir = dir( $dir_name );
-       $size = 0;
+       $space_used = get_space_used();
 
-       while ( $file = $dir->read() ) {
-               if ( $file != '.' && $file != '..' ) {
-                       if ( is_dir( $dir_name . $file) ) {
-                               $size += get_dirsize( $dir_name . $file );
-                       } else {
-                               $size += filesize( $dir_name . $file );
-                       }
-               }
+       if ( ( $space_allowed - $space_used ) < 0 ) {
+               if ( $echo )
+                       _e( 'Sorry, you have used your space allocation. Please delete some files to upload more files.' );
+               return true;
+       } else {
+               return false;
        }
-       $dir->close();
-
-       if ( ( $space_allowed - $size ) <= 0 )
-               return 0;
-
-       return $space_allowed - $size;
 }
 
 /**
- * Returns the upload quota for the current blog.
+ * Displays the amount of disk space used by the current blog. Not used in core.
  *
- * @return int Quota
+ * @since MU
  */
-function get_space_allowed() {
-       $space_allowed = get_option( 'blog_upload_space' );
-
-       if ( ! is_numeric( $space_allowed ) )
-               $space_allowed = get_site_option( 'blog_upload_space' );
-
-       if ( empty( $space_allowed ) || ! is_numeric( $space_allowed ) )
-               $space_allowed = 50;
-
-       return $space_allowed;
-}
-
 function display_space_usage() {
-       $space = get_space_allowed();
-       $used = get_dirsize( BLOGUPLOADDIR ) / 1024 / 1024;
+       $space_allowed = get_space_allowed();
+       $space_used = get_space_used();
 
-       $percentused = ( $used / $space ) * 100;
+       $percent_used = ( $space_used / $space_allowed ) * 100;
 
-       if ( $space > 1000 ) {
-               $space = number_format( $space / 1024 );
+       if ( $space_allowed > 1000 ) {
+               $space = number_format( $space_allowed / 1024 );
                /* translators: Gigabytes */
                $space .= __( 'GB' );
        } else {
+               $space = number_format( $space_allowed );
                /* translators: Megabytes */
                $space .= __( 'MB' );
        }
        ?>
-       <strong><?php printf( __( 'Used: %1s%% of %2s' ), number_format( $percentused ), $space ); ?></strong>
+       <strong><?php printf( __( 'Used: %1$s%% of %2$s' ), number_format( $percent_used ), $space ); ?></strong>
        <?php
 }
 
+/**
+ * Get the remaining upload space for this blog.
+ *
+ * @since MU
+ * @uses upload_is_user_over_quota()
+ * @uses get_space_allowed()
+ * @uses get_upload_space_available()
+ *
+ * @param int $size Current max size in bytes
+ * @return int Max size in bytes
+ */
+function fix_import_form_size( $size ) {
+       if ( upload_is_user_over_quota( false ) == true )
+               return 0;
+
+       $available = get_upload_space_available();
+       return min( $size, $available );
+}
+
 // Edit blog upload space setting on Edit Blog page
 function upload_space_setting( $id ) {
-       $quota = get_blog_option( $id, 'blog_upload_space' );
+       switch_to_blog( $id );
+       $quota = get_option( 'blog_upload_space' );
+       restore_current_blog();
+
        if ( !$quota )
                $quota = '';
 
@@ -391,16 +435,31 @@ function update_user_status( $id, $pref, $value, $deprecated = null ) {
        if ( null !== $deprecated )
                _deprecated_argument( __FUNCTION__, '3.1' );
 
-       $wpdb->update( $wpdb->users, array( $pref => $value ), array( 'ID' => $id ) );
+       $wpdb->update( $wpdb->users, array( sanitize_key( $pref ) => $value ), array( 'ID' => $id ) );
 
        $user = new WP_User( $id );
        clean_user_cache( $user );
 
        if ( $pref == 'spam' ) {
-               if ( $value == 1 )
+               if ( $value == 1 ) {
+                       /**
+                        * Fires after the user is marked as a SPAM user.
+                        *
+                        * @since 3.0.0
+                        *
+                        * @param int $id ID of the user marked as SPAM.
+                        */
                        do_action( 'make_spam_user', $id );
-               else
+               } else {
+                       /**
+                        * Fires after the user is marked as a HAM user. Opposite of SPAM.
+                        *
+                        * @since 3.0.0
+                        *
+                        * @param int $id ID of the user marked as HAM.
+                        */
                        do_action( 'make_ham_user', $id );
+               }
        }
 
        return $value;
@@ -431,6 +490,15 @@ function format_code_lang( $code = '' ) {
                'sg' => 'Sango', 'sa' => 'Sanskrit', 'sr' => 'Serbian', 'hr' => 'Croatian', 'si' => 'Sinhala; Sinhalese', 'sk' => 'Slovak', 'sl' => 'Slovenian', 'se' => 'Northern Sami', 'sm' => 'Samoan', 'sn' => 'Shona', 'sd' => 'Sindhi', 'so' => 'Somali', 'st' => 'Sotho, Southern', 'es' => 'Spanish; Castilian', 'sc' => 'Sardinian', 'ss' => 'Swati', 'su' => 'Sundanese', 'sw' => 'Swahili',
                'sv' => 'Swedish', 'ty' => 'Tahitian', 'ta' => 'Tamil', 'tt' => 'Tatar', 'te' => 'Telugu', 'tg' => 'Tajik', 'tl' => 'Tagalog', 'th' => 'Thai', 'bo' => 'Tibetan', 'ti' => 'Tigrinya', 'to' => 'Tonga (Tonga Islands)', 'tn' => 'Tswana', 'ts' => 'Tsonga', 'tk' => 'Turkmen', 'tr' => 'Turkish', 'tw' => 'Twi', 'ug' => 'Uighur; Uyghur', 'uk' => 'Ukrainian', 'ur' => 'Urdu', 'uz' => 'Uzbek',
                've' => 'Venda', 'vi' => 'Vietnamese', 'vo' => 'Volap√ľk', 'cy' => 'Welsh','wa' => 'Walloon','wo' => 'Wolof', 'xh' => 'Xhosa', 'yi' => 'Yiddish', 'yo' => 'Yoruba', 'za' => 'Zhuang; Chuang', 'zu' => 'Zulu' );
+
+       /**
+        * Filter the language codes.
+        *
+        * @since MU
+        *
+        * @param array  $lang_codes Key/value pair of language codes where key is the short version.
+        * @param string $code       A two-letter designation of the language.
+        */
        $lang_codes = apply_filters( 'lang_codes', $lang_codes, $code );
        return strtr( $code, $lang_codes );
 }
@@ -518,37 +586,25 @@ function mu_dropdown_languages( $lang_files = array(), $current = '' ) {
 
        // Order by name
        uksort( $output, 'strnatcasecmp' );
-
+       /**
+        * Filter the languages available in the dropdown.
+        *
+        * @since MU
+        *
+        * @param array $output     HTML output of the dropdown.
+        * @param array $lang_files Available language files.
+        * @param string $current   The current language code.
+        */
        $output = apply_filters( 'mu_dropdown_languages', $output, $lang_files, $current );
        echo implode( "\n\t", $output );
 }
 
-/* Warn the admin if SECRET SALT information is missing from wp-config.php */
-function secret_salt_warning() {
-       if ( !is_super_admin() )
-               return;
-       $secret_keys = array( 'AUTH_KEY', 'SECURE_AUTH_KEY', 'LOGGED_IN_KEY', 'NONCE_KEY', 'AUTH_SALT', 'SECURE_AUTH_SALT', 'LOGGED_IN_SALT', 'NONCE_SALT' );
-       $out = '';
-       foreach( $secret_keys as $key ) {
-               if ( ! defined( $key ) )
-                       $out .= "define( '$key', '" . esc_html( wp_generate_password( 64, true, true ) ) . "' );<br />";
-       }
-       if ( $out != '' ) {
-               $msg  = __( 'Warning! WordPress encrypts user cookies, but you must add the following lines to <strong>wp-config.php</strong> for it to be more secure.' );
-               $msg .= '<br/>' . __( "Before the line <code>/* That's all, stop editing! Happy blogging. */</code> please add this code:" );
-               $msg .= "<br/><br/><code>$out</code>";
-
-               echo "<div class='update-nag'>$msg</div>";
-       }
-}
-add_action( 'network_admin_notices', 'secret_salt_warning' );
-
 function site_admin_notice() {
        global $wp_db_version;
        if ( !is_super_admin() )
                return false;
        if ( get_site_option( 'wpmu_upgrade_site' ) != $wp_db_version )
-               echo "<div class='update-nag'>" . sprintf( __( 'Thank you for Updating! Please visit the <a href="%s">Update Network</a> page to update all your sites.' ), esc_url( network_admin_url( 'upgrade.php' ) ) ) . "</div>";
+               echo "<div class='update-nag'>" . sprintf( __( 'Thank you for Updating! Please visit the <a href="%s">Upgrade Network</a> page to update all your sites.' ), esc_url( network_admin_url( 'upgrade.php' ) ) ) . "</div>";
 }
 add_action( 'admin_notices', 'site_admin_notice' );
 add_action( 'network_admin_notices', 'site_admin_notice' );
@@ -615,7 +671,11 @@ function choose_primary_blog() {
        <?php if ( in_array( get_site_option( 'registration' ), array( 'all', 'blog' ) ) ) : ?>
                <tr>
                        <th scope="row" colspan="2" class="th-full">
-                               <a href="<?php echo apply_filters( 'wp_signup_location', network_home_url( 'wp-signup.php' ) ); ?>"><?php _e( 'Create a New Site' ); ?></a>
+                               <?php
+                               $signup_url = network_site_url( 'wp-signup.php' );
+                               /** This filter is documented in wp-login.php */
+                               ?>
+                               <a href="<?php echo apply_filters( 'wp_signup_location', $signup_url ); ?>"><?php _e( 'Create a New Site' ); ?></a>
                        </th>
                </tr>
        <?php endif; ?>
@@ -623,37 +683,43 @@ function choose_primary_blog() {
        <?php
 }
 
-function ms_deprecated_blogs_file() {
-       if ( ! is_super_admin() )
-               return;
-       if ( ! file_exists( WP_CONTENT_DIR . '/blogs.php' ) )
-               return;
-       echo '<div class="update-nag">' . sprintf( __( 'The <code>%1$s</code> file is deprecated. Please remove it and update your server rewrite rules to use <code>%2$s</code> instead.' ), 'wp-content/blogs.php', 'wp-includes/ms-files.php' ) . '</div>';
-}
-add_action( 'network_admin_notices', 'ms_deprecated_blogs_file' );
-
 /**
- * Grants super admin privileges.
+ * Grants Super Admin privileges.
  *
  * @since 3.0.0
- * @param int $user_id
+ * @param int $user_id ID of the user to be granted Super Admin privileges.
  */
 function grant_super_admin( $user_id ) {
        global $super_admins;
 
        // If global super_admins override is defined, there is nothing to do here.
-       if ( isset($super_admins) )
+       if ( isset( $super_admins ) )
                return false;
 
+       /**
+        * Fires before the user is granted Super Admin privileges.
+        *
+        * @since 3.0.0
+        *
+        * @param int $user_id ID of the user that is about to be granted Super Admin privileges.
+        */
        do_action( 'grant_super_admin', $user_id );
 
        // Directly fetch site_admins instead of using get_super_admins()
        $super_admins = get_site_option( 'site_admins', array( 'admin' ) );
 
-       $user = new WP_User( $user_id );
-       if ( ! in_array( $user->user_login, $super_admins ) ) {
+       $user = get_userdata( $user_id );
+       if ( $user && ! in_array( $user->user_login, $super_admins ) ) {
                $super_admins[] = $user->user_login;
                update_site_option( 'site_admins' , $super_admins );
+
+               /**
+                * Fires after the user is granted Super Admin privileges.
+                *
+                * @since 3.0.0
+                *
+                * @param int $user_id ID of the user that was granted Super Admin privileges.
+                */
                do_action( 'granted_super_admin', $user_id );
                return true;
        }
@@ -661,28 +727,43 @@ function grant_super_admin( $user_id ) {
 }
 
 /**
- * Revokes super admin privileges.
+ * Revokes Super Admin privileges.
  *
  * @since 3.0.0
- * @param int $user_id
+ * @param int $user_id ID of the user Super Admin privileges to be revoked from.
  */
 function revoke_super_admin( $user_id ) {
        global $super_admins;
 
        // If global super_admins override is defined, there is nothing to do here.
-       if ( isset($super_admins) )
+       if ( isset( $super_admins ) )
                return false;
 
+       /**
+        * Fires before the user's Super Admin privileges are revoked.
+        *
+        * @since 3.0.0
+        *
+        * @param int $user_id ID of the user Super Admin privileges are being revoked from.
+        */
        do_action( 'revoke_super_admin', $user_id );
 
        // Directly fetch site_admins instead of using get_super_admins()
        $super_admins = get_site_option( 'site_admins', array( 'admin' ) );
 
-       $user = new WP_User( $user_id );
-       if ( $user->user_email != get_site_option( 'admin_email' ) ) {
+       $user = get_userdata( $user_id );
+       if ( $user && 0 !== strcasecmp( $user->user_email, get_site_option( 'admin_email' ) ) ) {
                if ( false !== ( $key = array_search( $user->user_login, $super_admins ) ) ) {
                        unset( $super_admins[$key] );
                        update_site_option( 'site_admins', $super_admins );
+
+                       /**
+                        * Fires after the user's Super Admin privileges are revoked.
+                        *
+                        * @since 3.0.0
+                        *
+                        * @param int $user_id ID of the user Super Admin privileges were revoked from.
+                        */
                        do_action( 'revoked_super_admin', $user_id );
                        return true;
                }
@@ -696,16 +777,24 @@ function revoke_super_admin( $user_id ) {
  * By default editing of network is restricted to the Network Admin for that site_id this allows for this to be overridden
  *
  * @since 3.1.0
- * @param integer $site_id The network/site id to check.
+ * @param integer $site_id The network/site ID to check.
  */
 function can_edit_network( $site_id ) {
        global $wpdb;
 
-       if ($site_id == $wpdb->siteid )
+       if ( $site_id == $wpdb->siteid )
                $result = true;
        else
                $result = false;
 
+       /**
+        * Filter whether this network can be edited from this page.
+        *
+        * @since 3.1.0
+        *
+        * @param bool $result  Whether the network can be edited from this page.
+        * @param int  $site_id The network/site ID to check.
+        */
        return apply_filters( 'can_edit_network', $result, $site_id );
 }
 
@@ -720,28 +809,7 @@ function _thickbox_path_admin_subfolder() {
 <script type="text/javascript">
 //<![CDATA[
 var tb_pathToImage = "../../wp-includes/js/thickbox/loadingAnimation.gif";
-var tb_closeImage = "../../wp-includes/js/thickbox/tb-close.png";
 //]]>
 </script>
 <?php
 }
-
-/**
- * Whether or not we have a large network.
- *
- * The default criteria for a large network is either more than 10,000 users or more than 10,000 sites.
- * Plugins can alter this criteria using the 'wp_is_large_network' filter.
- *
- * @since 3.3.0
- * @param string $using 'sites or 'users'. Default is 'sites'.
- * @return bool True if the network meets the criteria for large. False otherwise.
- */
-function wp_is_large_network( $using = 'sites' ) {
-       if ( 'users' == $using ) {
-               $count = get_user_count();
-               return apply_filters( 'wp_is_large_network', $count > 10000, 'users', $count );
-       }
-
-       $count = get_blog_count();
-       return apply_filters( 'wp_is_large_network', $count > 10000, 'sites', $count );
-}