<?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 ( upload_is_user_over_quota( false ) ) {

		$file['error'] = __( 'You have used your space quota. Please delete files before uploading.' );

	}

		wp_die( $file['error'] . ' <a href="javascript:history.go(-1)">' . __( 'Back' ) . '</a>' );

	}

	return $file;

}

/**

 *

 * @since 3.0.0

 *

 */

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

	}

	/**

	 *

	 *

	 */

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

	// 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.

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

		$tables = $wpdb->tables( 'blog' );

		/**

		 *

		 *

		 */

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

		/**

		 *

		 *

		 * @param string $uploads['basedir'] Uploads path without subdirectory. @see wp_upload_dir()

		 */

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

					} elseif ( @is_file( $dir . DIRECTORY_SEPARATOR . $file ) ) {

						@unlink( $dir . DIRECTORY_SEPARATOR . $file );

					}

				}

				@closedir( $dh );

			}

			$index++;

		}

		$stack = array_reverse( $stack ); // Last added dirs are deepest

			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.

	 *

	 *

	 * @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 */

	return true;

}

/**

 *

 *

 * @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();

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

	}

}

/**

 *

 */

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 ) {

		/* translators: Gigabytes */

		$space .= __( 'GB' );

	} else {

		$space = number_format( $space_allowed );

		/* translators: Megabytes */

		$space .= __( 'MB' );

	}

	?>

	<?php

}

/**

 *

 *

 * @param int $size Current max size in bytes

 * @return int Max size in bytes

 */

function fix_import_form_size( $size ) {

		return 0;

	$available = get_upload_space_available();

	return min( $size, $available );

}

/**

 *

 * @since 3.0.0

 *

 */

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

}

/**

 * 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 )

	$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.