root/tags/1.3/wp-admin/includes/mu.php

<?php

function check_upload_size( $file ) {

    if( $file[ 'error' ] != '0' ) // there's already an error
        return $file;

    $space_allowed = 1048576*get_space_allowed();
    $space_used = get_dirsize( constant( "ABSPATH" ) . constant( "UPLOADS" ) );
    $space_left = $space_allowed - $space_used;
    $file_size = filesize( $file[ 'tmp_name' ]);
    if( $space_left < $file_size )
        $file[ 'error' ] = sprintf( __( 'Not enough space to upload. %1$sKb needed.' ), number_format( ($file_size - $space_left) /1024 ) );
    if( $file_size > ( 1024 * get_site_option( 'fileupload_maxk', 1500 ) ) )
        $file['error'] = sprintf(__('This file is too big. Files must be less than %1$s Kb in size.'), get_site_option( 'fileupload_maxk', 1500 ) );
    if( upload_is_user_over_quota( false ) ) {
        $file['error'] = __('You have used your space quota. Please delete files before uploading.');
    }
    if( $file[ 'error' ] != '0' )
        wp_die( $file[ 'error' ] . ' <a href="javascript:history.go(-1)">' . __( 'Back' ) . '</a>' );

    return $file;

}
add_filter( 'wp_handle_upload_prefilter', 'check_upload_size' );

function wpmu_delete_blog($blog_id, $drop = false) {
    global $wpdb;

    if ( $blog_id != $wpdb->blogid ) {
        $switch = true;
        switch_to_blog($blog_id);    
    }

    do_action('delete_blog', $blog_id, $drop);

    $users = get_users_of_blog($blog_id);

    // Remove users from this blog.
    if ( !empty($users) ) foreach ($users as $user) {
        remove_user_from_blog($user->user_id, $blog_id);
    }

    update_blog_status( $blog_id, 'deleted', 1 );

    if ( $drop ) {
        $drop_tables = array( $wpdb->base_prefix . $blog_id . "_categories",
        $wpdb->base_prefix . $blog_id . "_comments",
        $wpdb->base_prefix . $blog_id . "_linkcategories",
        $wpdb->base_prefix . $blog_id . "_links",
        $wpdb->base_prefix . $blog_id . "_link2cat",
        $wpdb->base_prefix . $blog_id . "_options",
        $wpdb->base_prefix . $blog_id . "_post2cat",
        $wpdb->base_prefix . $blog_id . "_postmeta",
        $wpdb->base_prefix . $blog_id . "_posts",
        $wpdb->base_prefix . $blog_id . "_referer_visitLog",
        $wpdb->base_prefix . $blog_id . "_referer_blacklist" );
        reset( $drop_tables );

        foreach ( (array) $drop_tables as $drop_table) {
            $wpdb->query( "DROP TABLE IF EXISTS $drop_table" );
        }

        $wpdb->query( "DELETE FROM $wpdb->blogs WHERE blog_id = '$blog_id'" );
        $dir = constant( "ABSPATH" ) . "wp-content/blogs.dir/" . $blog_id ."/files/";
        $dir = rtrim($dir, DIRECTORY_SEPARATOR);
        $top_dir = $dir;
        $stack = array($dir);
        $index = 0;

        while ($index < count($stack)) {
            # Get indexed directory from stack
            $dir = $stack[$index];

            $dh = @ opendir($dir);
            if ($dh) {
                while (($file = @ readdir($dh)) !== false) {
                    if ($file == '.' or $file == '..')
                        continue;

                    if (@ is_dir($dir . DIRECTORY_SEPARATOR . $file))
                        $stack[] = $dir . DIRECTORY_SEPARATOR . $file;
                    else if (@ is_file($dir . DIRECTORY_SEPARATOR . $file))
                        @ unlink($dir . DIRECTORY_SEPARATOR . $file);
                }
            }
            $index++;
        }

        $stack = array_reverse($stack);  // Last added dirs are deepest
        foreach( (array) $stack as $dir) {
            if ( $dir != $top_dir)
            @rmdir($dir);
        }
    }
    $wpdb->query("DELETE FROM {$wpdb->usermeta} WHERE meta_key='wp_{$blog_id}_autosave_draft_ids'");

    if ( $switch )
        restore_current_blog();
}

function update_blog_public($old_value, $value) {
    global $wpdb;
    do_action('update_blog_public');
    update_blog_status( $wpdb->blogid, 'public', (int) $value );
}
add_action('update_option_blog_public', 'update_blog_public', 10, 2);

function wpmu_delete_user($id) {
    global $wpdb;

    $id = (int) $id;
    $user = get_userdata($id);

    do_action('wpmu_delete_user', $id);

    $blogs = get_blogs_of_user($id);

    if ( ! empty($blogs) )
        foreach ($blogs as $blog) {
            switch_to_blog($blog->userblog_id);
            remove_user_from_blog($id, $blog->userblog_id);

            $post_ids = $wpdb->get_col("SELECT ID FROM $wpdb->posts WHERE post_author = $id");
            foreach ( (array) $post_ids as $post_id )
                wp_delete_post($post_id);

            // Clean links
            $wpdb->query("DELETE FROM $wpdb->links WHERE link_owner = $id");

            restore_current_blog();
        }

    $wpdb->query("DELETE FROM $wpdb->users WHERE ID = $id");
    $wpdb->query("DELETE FROM $wpdb->usermeta WHERE user_id = '$id'");

    wp_cache_delete($id, 'users');
    wp_cache_delete($user->user_login, 'userlogins');

    return true;
}

function wpmu_get_blog_allowedthemes( $blog_id = 0 ) {
    $themes = get_themes();
    if( $blog_id == 0 )
        $blog_allowed_themes = get_option( "allowedthemes" );
    else 
        $blog_allowed_themes = get_blog_option( $blog_id, "allowedthemes" );
    if( !is_array( $blog_allowed_themes ) || empty( $blog_allowed_themes ) ) { // convert old allowed_themes to new allowedthemes
        if( $blog_id == 0 )
            $blog_allowed_themes = get_option( "allowed_themes" );
        else 
            $blog_allowed_themes = get_blog_option( $blog_id, "allowed_themes" );
            
        if( is_array( $blog_allowed_themes ) ) {
            foreach( (array) $themes as $key => $theme ) {
                $theme_key = wp_specialchars( $theme[ 'Stylesheet' ] );
                if( isset( $blog_allowed_themes[ $key ] ) == true ) {
                    $blog_allowedthemes[ $theme_key ] = 1;
                }
            }
            $blog_allowed_themes = $blog_allowedthemes;
            if( $blog_id == 0 ) {
                add_option( "allowedthemes", $blog_allowed_themes );
                delete_option( "allowed_themes" );
            } else {
                add_blog_option( $blog_id, "allowedthemes", $blog_allowed_themes );
                delete_blog_option( $blog_id, "allowed_themes" );
            }
        }
    }
    return $blog_allowed_themes;
}

function update_option_new_admin_email($old_value, $value) {
    if ( $value == get_option( 'admin_email' ) || !is_email( $value ) )
        return;

    $hash = md5( $value.time().mt_rand() );
    $newadminemail = array( 
        "hash" => $hash,
        "newemail" => $value
    );
    update_option( 'adminhash', $newadminemail );
    
    $content = __("Dear user,\n\n
You recently requested to have the administration email address on 
your blog changed.\n
If this is correct, please click on the following link to change it:\n
###ADMIN_URL###\n\n
You can safely ignore and delete this email if you do not want to take this action.\n\n
This email has been sent to ###EMAIL###\n\n
Regards,\n
The Webmaster");
    
    $content = str_replace('###ADMIN_URL###', get_option( "siteurl" ).'/wp-admin/options.php?adminhash='.$hash, $content);
    $content = str_replace('###EMAIL###', $value, $content);
    
    wp_mail( $value, sprintf(__('[%s] New Admin Email Address'), get_option('blogname')), $content );
}
add_action('update_option_new_admin_email', 'update_option_new_admin_email', 10, 2);

function get_site_allowed_themes() {
    $themes = get_themes();
    $allowed_themes = get_site_option( 'allowedthemes' );
    if( !is_array( $allowed_themes ) || empty( $allowed_themes ) ) {
        $allowed_themes = get_site_option( "allowed_themes" ); // convert old allowed_themes format
        if( !is_array( $allowed_themes ) ) {
            $allowed_themes = array();
        } else {
            foreach( (array) $themes as $key => $theme ) {
                $theme_key = wp_specialchars( $theme[ 'Stylesheet' ] );
                if( isset( $allowed_themes[ $key ] ) == true ) {
                    $allowedthemes[ $theme_key ] = 1;
                }
            }
            $allowed_themes = $allowedthemes;
        }
    }
    return $allowed_themes;
}

function get_space_allowed() {
    $spaceAllowed = get_option("blog_upload_space");
    if( $spaceAllowed == false ) 
        $spaceAllowed = get_site_option("blog_upload_space");
    if( empty($spaceAllowed) || !is_numeric($spaceAllowed) )
        $spaceAllowed = 50;

    return $spaceAllowed;
}

function display_space_usage() {
    $space = get_space_allowed();
    $used = get_dirsize( constant( "ABSPATH" ) . constant( "UPLOADS" ) )/1024/1024;

    if ($used > $space) $percentused = '100';
    else $percentused = ( $used / $space ) * 100;

    if( $space > 1000 ) {
        $space = number_format( $space / 1024 );
        $space .= __('GB');
    } else {
        $space .= __('MB');
    }
    ?>
    <strong><?php printf(__('Used: %1s%% of %2s'), number_format($percentused), $space );?></strong> 
    <?php
}

// Display File upload quota on dashboard
function dashboard_quota() {    
    $quota = get_space_allowed();
    $used = get_dirsize( constant( "ABSPATH" ) . constant( "UPLOADS" ) )/1024/1024;

    if ($used > $quota) $percentused = '100';
    else $percentused = ( $used / $quota ) * 100;

    ?>
    <div id='spaceused'>
        <h3><?php _e("Storage Space <a href='upload.php' title='Manage Uploads...'>&raquo;</a>"); ?></h3>
        <p><?php _e('Total space available:'); ?> <strong><?php echo $quota . __('MB'); ?></strong></p>    
        <p><?php _e('Upload space used:');     
        ?>
        <strong><?php printf(__('%1sMB (%2s%%)'), round($used,2), number_format($percentused) ); ?></strong></p>
    </div>
    <?php
}
if( current_user_can('edit_posts') )
    add_action('activity_box_end', 'dashboard_quota');

// Edit blog upload space setting on Edit Blog page
function upload_space_setting( $id ) {
    $quota = get_blog_option($id, "blog_upload_space"); 
    if( !$quota )
        $quota = '';
    
    ?>
    <strong><?php _e('Blog Upload Space Quota'); ?></strong>
    <input type="text" size="3" name="option[blog_upload_space]" value="<?php echo $quota; ?>" /><?php _e('MB (Leave blank for site default)'); ?><br />
    <?php
}
add_action('wpmueditblogaction', 'upload_space_setting');

// Edit XMLRPC active setting on Edit Blog page
function xmlrpc_active_setting( $id ) {
    $site_xmlrpc = get_site_option( 'xmlrpc_active' );
    $xmlrpc_active = get_blog_option($id, 'xmlrpc_active'); 
    
    if( $site_xmlrpc == 'yes' ) { ?>
        <p><strong><?php _e('XMLRPC Posting is enabled sitewide.'); ?></strong></p>
    <?php } else { ?>
        <p><strong><?php _e('XMLRPC Posting is disabled sitewide.'); ?></strong></p>
    <?php } ?>
    
    <input type='radio' name='option[xmlrpc_active]' value='' <?php if( !$xmlrpc_active || $xmlrpc_active == '' ) echo "checked='checked'"; ?> /> <?php _e('Do nothing, accept sitewide default'); ?><br />
    <input type='radio' name='option[xmlrpc_active]' value='yes' <?php if( $xmlrpc_active == "yes" ) echo "checked='checked'"; ?> /> <?php _e('XMLRPC always on for this blog'); ?><br />
    <input type='radio' name='option[xmlrpc_active]' value='no' <?php if( $xmlrpc_active == "no" ) echo "checked='checked'"; ?> /> <?php _e('XMLRPC always off for this blog'); ?><br />
    <?php
}
add_action('wpmueditblogaction', 'xmlrpc_active_setting');

function update_user_status( $id, $pref, $value, $refresh = 1 ) {
    global $wpdb;

    $wpdb->query( "UPDATE {$wpdb->users} SET {$pref} = '{$value}' WHERE ID = '$id'" );

    if( $refresh == 1 )
        refresh_user_details($id);
    
    if( $pref == 'spam' ) {
        if( $value == 1 ) 
            do_action( "make_spam_user", $id );
        else
            do_action( "make_ham_user", $id );
    }

    return $value;
}

function refresh_user_details($id) {
    $id = (int) $id;
    
    if ( !$user = get_userdata( $id ) )
        return false;

    wp_cache_delete($id, 'users');
    wp_cache_delete($user->user_login, 'userlogins');
    return $id;
}

/*
  Determines if the available space defined by the admin has been exceeded by the user
*/
function wpmu_checkAvailableSpace() {
    $spaceAllowed = get_space_allowed(); 

    $dirName = trailingslashit( constant( "ABSPATH" ) . constant( "UPLOADS" ) );
    if (!(is_dir($dirName) && is_readable($dirName))) 
        return; 

      $dir = dir($dirName);
       $size = 0;

    while($file = $dir->read()) {
        if ($file != '.' && $file != '..') {
            if (is_dir( $dirName . $file)) {
                $size += get_dirsize($dirName . $file);
            } else {
                $size += filesize($dirName . $file);
            }
        }
    }
    $dir->close();
    $size = $size / 1024 / 1024;

    if( ($spaceAllowed - $size) <= 0 ) {
        define( 'DISABLE_UPLOADS', true );
        define( 'DISABLE_UPLOADS_MESSAGE', __('Sorry, you must delete files before you can upload any more.') );
    }
}
add_action('upload_files_upload','wpmu_checkAvailableSpace');

function format_code_lang( $code = '' ) {
    $code = strtolower(substr($code, 0, 2));
    $lang_codes = array('aa' => 'Afar',  'ab' => 'Abkhazian',  'af' => 'Afrikaans',  'ak' => 'Akan',  'sq' => 'Albanian',  'am' => 'Amharic',  'ar' => 'Arabic',  'an' => 'Aragonese',  'hy' => 'Armenian',  'as' => 'Assamese',  'av' => 'Avaric',  'ae' => 'Avestan',  'ay' => 'Aymara',  'az' => 'Azerbaijani',  'ba' => 'Bashkir',  'bm' => 'Bambara',  'eu' => 'Basque',  'be' => 'Belarusian',  'bn' => 'Bengali',  'bh' => 'Bihari',  'bi' => 'Bislama',  'bs' => 'Bosnian',  'br' => 'Breton',  'bg' => 'Bulgarian',  'my' => 'Burmese',  'ca' => 'Catalan; Valencian',  'ch' => 'Chamorro',  'ce' => 'Chechen',  'zh' => 'Chinese',  'cu' => 'Church Slavic; Old Slavonic; Church Slavonic; Old Bulgarian; Old Church Slavonic',  'cv' => 'Chuvash',  'kw' => 'Cornish',  'co' => 'Corsican',  'cr' => 'Cree',  'cs' => 'Czech',  'da' => 'Danish',  'dv' => 'Divehi; Dhivehi; Maldivian',  'nl' => 'Dutch; Flemish',  'dz' => 'Dzongkha',  'en' => 'English',  'eo' => 'Esperanto',  'et' => 'Estonian',  'ee' => 'Ewe',  'fo' => 'Faroese',  'fj' => 'Fijian',  'fi' => 'Finnish',  'fr' => 'French',  'fy' => 'Western Frisian',  'ff' => 'Fulah',  'ka' => 'Georgian',  'de' => 'German',  'gd' => 'Gaelic; Scottish Gaelic',  'ga' => 'Irish',  'gl' => 'Galician',  'gv' => 'Manx',  'el' => 'Greek, Modern',  'gn' => 'Guarani',  'gu' => 'Gujarati',  'ht' => 'Haitian; Haitian Creole',  'ha' => 'Hausa',  'he' => 'Hebrew',  'hz' => 'Herero',  'hi' => 'Hindi',  'ho' => 'Hiri Motu',  'hu' => 'Hungarian',  'ig' => 'Igbo',  'is' => 'Icelandic',  'io' => 'Ido',  'ii' => 'Sichuan Yi',  'iu' => 'Inuktitut',  'ie' => 'Interlingue',  'ia' => 'Interlingua (International Auxiliary Language Association)',  'id' => 'Indonesian',  'ik' => 'Inupiaq',  'it' => 'Italian',  'jv' => 'Javanese',  'ja' => 'Japanese',  'kl' => 'Kalaallisut; Greenlandic',  'kn' => 'Kannada',  'ks' => 'Kashmiri',  'kr' => 'Kanuri',  'kk' => 'Kazakh',  'km' => 'Central Khmer',  'ki' => 'Kikuyu; Gikuyu',  'rw' => 'Kinyarwanda',  'ky' => 'Kirghiz; Kyrgyz',  'kv' => 'Komi',  'kg' => 'Kongo',  'ko' => 'Korean',  'kj' => 'Kuanyama; Kwanyama',  'ku' => 'Kurdish',  'lo' => 'Lao',  'la' => 'Latin',  'lv' => 'Latvian',  'li' => 'Limburgan; Limburger; Limburgish',  'ln' => 'Lingala',  'lt' => 'Lithuanian',  'lb' => 'Luxembourgish; Letzeburgesch',  'lu' => 'Luba-Katanga',  'lg' => 'Ganda',  'mk' => 'Macedonian',  'mh' => 'Marshallese',  'ml' => 'Malayalam',  'mi' => 'Maori',  'mr' => 'Marathi',  'ms' => 'Malay',  'mg' => 'Malagasy',  'mt' => 'Maltese',  'mo' => 'Moldavian',  'mn' => 'Mongolian',  'na' => 'Nauru',  'nv' => 'Navajo; Navaho',  'nr' => 'Ndebele, South; South Ndebele',  'nd' => 'Ndebele, North; North Ndebele',  'ng' => 'Ndonga',  'ne' => 'Nepali',  'nn' => 'Norwegian Nynorsk; Nynorsk, Norwegian',  'nb' => 'Bokmål, Norwegian, Norwegian Bokmål',  'no' => 'Norwegian',  'ny' => 'Chichewa; Chewa; Nyanja',  'oc' => 'Occitan, Provençal',  'oj' => 'Ojibwa',  'or' => 'Oriya',  'om' => 'Oromo',  'os' => 'Ossetian; Ossetic',  'pa' => 'Panjabi; Punjabi',  'fa' => 'Persian',  'pi' => 'Pali',  'pl' => 'Polish',  'pt' => 'Portuguese',  'ps' => 'Pushto',  'qu' => 'Quechua',  'rm' => 'Romansh',  'ro' => 'Romanian',  'rn' => 'Rundi',  'ru' => 'Russian',  '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' =>