964 lines
33 KiB
PHP
964 lines
33 KiB
PHP
<?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_quota( false ) ) {
|
|
$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', 1 );
|
|
|
|
$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 && ( 1 == $blog_id || is_main_site( $blog_id ) || ( $blog->path == $current_site->path && $blog->domain == $current_site->domain ) ) ) {
|
|
$drop = false;
|
|
}
|
|
|
|
$upload_path = trim( get_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( $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 == '.' || $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 );
|
|
}
|
|
@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( $value. time() .mt_rand() );
|
|
$new_admin_email = array(
|
|
'hash' => $hash,
|
|
'newemail' => $value
|
|
);
|
|
update_option( 'adminhash', $new_admin_email );
|
|
|
|
$email_text = __( 'Dear user,
|
|
|
|
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:
|
|
* ###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 );
|
|
$content = str_replace( '###SITENAME###', get_site_option( 'site_name' ), $content );
|
|
$content = str_replace( '###SITEURL###', network_home_url(), $content );
|
|
|
|
wp_mail( $value, sprintf( __( '[%s] New Admin Email Address' ), wp_specialchars_decode( get_option( 'blogname' ) ) ), $content );
|
|
}
|
|
add_action( 'update_option_new_admin_email', 'update_option_new_admin_email', 10, 2 );
|
|
add_action( 'add_option_new_admin_email', 'update_option_new_admin_email', 10, 2 );
|
|
|
|
/**
|
|
* 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’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 = __( '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:
|
|
###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:
|
|
* ###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);
|
|
$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_decode( get_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_option( get_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 ) < 0 ) {
|
|
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_quota( false ) == 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><?php _e( 'Site Upload Space Quota '); ?></th>
|
|
<td><input type="number" step="1" min="0" style="width: 100px" name="option[blog_upload_space]" value="<?php echo $quota; ?>" /> <?php _e( 'MB (Leave blank for network default)' ); ?></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 == 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 {
|
|
/**
|
|
* 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 = 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' => '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 $term The term.
|
|
* @param $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, 2 );
|
|
|
|
/**
|
|
* 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_user( get_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_die( 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 ) );
|
|
|
|
$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_url( get_admin_url( $blog->userblog_id ) ) . '">' . __( 'Visit Dashboard' ) . '</a> | ' .
|
|
'<a href="' . esc_url( get_home_url( $blog->userblog_id ) ). '">' . __( 'View Site' ) . '</a></td>';
|
|
$output .= '</tr>';
|
|
}
|
|
|
|
$output .= '</table>';
|
|
|
|
wp_die( $output );
|
|
}
|
|
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_lang, false ) . '> ' . $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_lang, false ) . '> ' . $be . '</option>';
|
|
} else {
|
|
$translated = format_code_lang( $code_lang );
|
|
$output[$translated] = '<option value="' . esc_attr( $code_lang ) . '"' . selected( $current, $code_lang, false ) . '> ' . 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_url( network_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_rand( 1, 10 );
|
|
$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, 2 );
|
|
|
|
/**
|
|
* 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"><?php _e( 'Primary Site' ); ?></th>
|
|
<td>
|
|
<?php
|
|
$all_blogs = get_blogs_of_user( get_current_user_id() );
|
|
$primary_blog = get_user_meta( get_current_user_id(), 'primary_blog', true );
|
|
if ( count( $all_blogs ) > 1 ) {
|
|
$found = false;
|
|
?>
|
|
<select name="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_url( get_home_url( $blog->userblog_id ) ) ?></option><?php
|
|
} ?>
|
|
</select>
|
|
<?php
|
|
if ( !$found ) {
|
|
$blog = array_shift( $all_blogs );
|
|
update_user_meta( get_current_user_id(), 'primary_blog', $blog->userblog_id );
|
|
}
|
|
} elseif ( count( $all_blogs ) == 1 ) {
|
|
$blog = array_shift( $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_meta( get_current_user_id(), 'primary_blog', $blog->userblog_id );
|
|
} else {
|
|
echo "N/A";
|
|
}
|
|
?>
|
|
</td>
|
|
</tr>
|
|
<?php if ( in_array( get_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 && 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;
|
|
}
|
|
}
|
|
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">
|
|
//<![CDATA[
|
|
var tb_pathToImage = "<?php echo includes_url( 'js/thickbox/loadingAnimation.gif', 'relative' ); ?>";
|
|
//]]>
|
|
</script>
|
|
<?php
|
|
}
|