WordPress/wp-admin/network.php

<?php
/**
 * Network settings administration panel.
 *
 * A multi-step process allowing the user to enable a network of WordPress sites.
 *
 * @since 3.0.0
 *
 * @package WordPress
 * @subpackage Administration
 */

/** WordPress Administration Bootstrap */
require_once( './admin.php' );

if ( ! is_super_admin() )
	wp_die( __( 'You do not have sufficient permissions to manage options for this blog.' ) );

// We need to create references to ms global tables to enable Network.
foreach ( $wpdb->tables( 'ms_global' ) as $table => $prefixed_table )
	$wpdb->$table = $prefixed_table;

$title = __( 'Network Settings' );
$parent_file = 'tools.php';

add_contextual_help( $current_screen, __( '<a href="http://codex.wordpress.org/Settings_Network_SubPanel" target="_blank">Network Settings</a>') );

include( './admin-header.php' );

$dirs = array( substr( ABSPATH, 0, -1 ), ABSPATH . 'wp-content' );
?>
<div class="wrap">
<?php screen_icon(); ?>
<h2><?php echo esc_html( $title ); ?></h2>

<form method="post" action="network.php">
<?php
/**
 * Prints summary of server statistics in preparation for setting up a network.
 *
 * @since 3.0.0
 */
function filestats( $err ) {
?>
	<h2><?php esc_html_e( 'Server Summary' ); ?></h2>
	<p><?php _e( 'If you post a message to the WordPress support forum at <a target="_blank" href="http://wordpress.org/support/">http://wordpress.org/support/</a> then copy and paste the following information into your message:' ); ?></p>
	<blockquote style="background: #eee; border: 1px solid #333; padding: 5px;">
	<br /><strong><?php printf( __( 'ERROR: %s' ), $err ); ?></strong><br />
<?php
	clearstatcache();
	$files = array( 'htaccess.dist', '.htaccess' );

	$indent = '&nbsp;&nbsp;&nbsp;&nbsp;';
	foreach ( (array) $files as $val ) {
		$stats = @stat( $val );
		if ( $stats ) {
?>
			<h2><?php echo esc_html( $val ); ?></h2>
			<?php echo $indent . sprintf( __( 'uid/gid: %1$s/%2$s' ), $stats['uid'], $stats['gid'] ); ?><br />
			<?php echo $indent . sprintf( __( 'size: %s' ), $stats['size'] ); ?><br/>
			<?php echo $indent . sprintf( __( 'perms: %s' ), substr( sprintf( '%o', fileperms( $val ) ), -4 ) ); ?><br/>
			<?php echo $indent . sprintf( __( 'readable: %s' ), is_readable( $val ) ? __( 'yes' ) : __( 'no' ) ); ?><br/>
			<?php echo $indent . sprintf( __( 'writeable: %s' ), is_writeable( $val ) ? __( 'yes' ) : __( 'no' ) ); ?><br/>
<?php
		} elseif ( ! file_exists( $val ) ) {
?>
			<h2><?php echo esc_html( $val ); ?></h2>
			<?php echo $indent . sprintf( __( 'FILE NOT FOUND: %s' ), $val ); ?><br/>
<?php
		}
	}
	echo "</blockquote>";
}

/**
 * Prints .htaccess component of step 2 for network settings.
 *
 * @since 3.0.0
 */
function step2_htaccess() {
	global $base;

	// remove ending slash from $base and $url
	$htaccess = '';
	if ( substr( $base, -1 ) == '/' )
		$base = substr( $base, 0, -1 );

	$htaccess_sample = ABSPATH . 'wp-admin/includes/htaccess.ms';
	if ( ! file_exists( $htaccess_sample ) )
		wp_die( sprintf( __( 'Sorry, I need a %s to work from. Please re-upload this file to your WordPress installation.' ), $htaccess_sample ) );

	$htaccess_file = file( $htaccess_sample );
	$fp = @fopen( $htaccess_sample, "r" );
	if ( $fp ) {
		while ( ! feof( $fp ) ) {
			$htaccess .= fgets( $fp, 4096 );
		}
		fclose( $fp );
		$htaccess_file = str_replace( "BASE", $base, $htaccess );
	} else {
		wp_die( sprintf( __( 'Sorry, I need to be able to read %s. Please check the permissions on this file.' ), $htaccess_sample ) );
	}
?>
			<li><p><?php printf( __( 'Replace the contents of your <code>%s.htaccess</code> with the following:' ), ABSPATH ); ?></p>
				<textarea name="htaccess" cols="120" rows="20">
<?php echo wp_htmledit_pre( $htaccess_file ); ?>
				</textarea>
			</li>
<?php
}

/**
 * Prints part of step 1 for network settings and checks for mod_rewrite.
 *
 * @since 3.0.0
 * @return bool Whether mod_rewrite is enabled.
 */
function step1() {
	$rewrite_enabled = false;
	?>
	<h2><?php esc_html_e( 'Installing Network of WordPress Sites' ); ?></h2>
	<p><?php _e( 'I will help you enable the features for creating a network of sites by asking you a few questions so that you can create configuration files and make a directory to store all your uploaded files.' ); ?></p>

	<h2><?php esc_html_e( 'What do I need?' ); ?></h2>
	<ul>
		<li><?php _e( 'Access to your server to change directory permissions. This can be done through ssh or ftp for example.' ); ?></li>
		<li><?php _e( 'A valid email where your password and administrative emails will be sent.' ); ?></li>
		<li><?php _e( "Wildcard dns records if you're going to use the virtual host (sub-domain) functionality. Check the <a href='http://trac.mu.wordpress.org/browser/trunk/README.txt'>README</a> for further details." ); ?></li>
	</ul>
	<?php
	$mod_rewrite_msg = "\n<p>" . __( 'If the <code>mod_rewrite</code> module is disabled ask your administrator to enable that module, or look at the <a href="http://httpd.apache.org/docs/mod/mod_rewrite.html">Apache documentation</a> or <a href="http://www.google.com/search?q=apache+mod_rewrite">elsewhere</a> for help setting it up.' ) . '</p>';

	if ( function_exists( 'apache_get_modules' ) ) {
		$modules = apache_get_modules();
		if ( ! in_array( 'mod_rewrite', $modules ) )
			echo '<p>' . __( '<strong>Warning!</strong> It looks like mod_rewrite is not installed.' ) . '</p>' . $mod_rewrite_msg;
		else
			$rewrite_enabled = true;
	} else {
		echo '<p>' . __( 'Please make sure <code>mod_rewrite</code> is installed as it will be activated at the end of this install.' ) . '</p>' . $mod_rewrite_msg;
	}
	return $rewrite_enabled;
}

/**
 * Prints most of step 1 for network settings.
 *
 * @since 3.0.0
 * @param bool $rewrite_enabled Whether mod_rewrite is enabled. Default false.
 */
function printstep1form( $rewrite_enabled = false ) {
	$weblog_title = sprintf( __( '%s Sites' ), ucfirst( get_option( 'blogname' ) ) );
	$email = get_option( 'admin_email' );
	$hostname = get_clean_basedomain();
	$invalid_host = false;
	if ( 'localhost' == $hostname || preg_match( '|[0-9]+\.[0-9]+\.[0-9]+\.[0-9]+|', $hostname, $match ) )
		$invalid_host = true;
	if ( substr( $hostname, 0, 4 ) == 'www.' )
		$nowww = substr( $hostname, 4 );

	wp_nonce_field( 'install-network-1' );
	if ( network_domain_check() ) { ?>
		<h2><?php esc_html_e( 'Existing Sites' ); ?></h2>
		<p><?php _e( 'An existing WordPress Network was detected.' ); ?></p>
		<p class="existing-network">
			<label><input type='checkbox' name='existing_network' value='yes' /> <?php _e( 'Yes, keep the existing network of sites.' ); ?></label><br />
		</p>

<?php 	} else { ?>
		<input type='hidden' name='existing_network' value='none' />
<?php	} ?>
		<input type='hidden' name='action' value='step2' />
		<h2><?php esc_html_e( 'Site Addresses' ); ?></h2>
		<p><?php _e( 'Please choose whether you would like sites in your WordPress install to use sub-domains or sub-directories. You cannot change this later.' ); ?></p>
		<?php if ( ! $rewrite_enabled ) { ?>
		<p><?php _e( '<strong>Note</strong> It looks like <code>mod_rewrite</code> is not installed.' ); ?></p>
		<?php } ?>
		<p class="blog-address">
			<label><input type='radio' name='vhost' value='yes'<?php if ( $rewrite_enabled ) echo ' checked="checked"'; ?> /> <?php _e( 'Sub-domains (like <code>blog1.example.com</code>)' ); ?></label><br />
			<label><input type='radio' name='vhost' value='no'<?php if ( ! $rewrite_enabled ) echo ' checked="checked"'; ?> /> <?php _e( 'Sub-directories (like <code>example.com/blog1</code>)' ); ?></label>
		</p>

		<h2><?php esc_html_e( 'Server Address' ); ?></h2>
		<?php if ( isset( $nowww ) ) { ?>
		<h3><?php printf( __( 'We recommend you change your siteurl to <code>%1$s</code> before enabling the network feature. It will still be possible to visit your site using the "www" prefix with an address like <code>%2$s</code> but any links will not have the "www" prefix.' ), $nowww, $hostname ); ?></h3>
		<?php } ?>
		<table class="form-table">
			<tr>
				<th scope='row'><?php esc_html_e( 'Server Address' ); ?></th>
				<td>
		<?php if ( !$invalid_host ) { ?>
					<?php printf( __( 'This will be the Internet address of your site: <strong><em>%s</em></strong>.' ), $hostname ); ?>
					<input type='hidden' name='basedomain' value='<?php echo esc_attr( $hostname ); ?>' />
		<?php } else { ?>
					<?php _e( 'Do not use an IP address (like 127.0.0.1) or a single word hostname like <q>localhost</q> as your server address.' ); ?>
		<?php } ?>
				</td>
			</tr>
		</table>

		<h2><?php esc_html_e( 'Site Details' ); ?></h2>
		<table class="form-table">
			<tr>
				<th scope='row'><?php esc_html_e( 'Site&nbsp;Title' ); ?></th>
				<td>
					<input name='weblog_title' type='text' size='45' value='<?php echo esc_attr( $weblog_title ); ?>' />
					<br /><?php _e( 'What would you like to call your site?' ); ?>
				</td>
			</tr>
			<tr>
				<th scope='row'><?php esc_html_e( 'Email' ); ?></th>
				<td>
					<input name='email' type='text' size='45' value='<?php echo esc_attr( $email ); ?>' />
					<br /><?php _e( 'Your email address.' ); ?>
				</td>
			</tr>
		</table>
		<?php if ( !$invalid_host ) { ?>
		<p class='submit'><input class="button" name='submit' type='submit' value='<?php esc_attr_e( 'Proceed' ); ?>' /></p>
		<?php } ?>
	<?php
}

/**
 * Checks for active plugins & displays a notice to deactivate them.
 *
 * @since 3.0.0
 */
function step1_plugin_check() {
	$active_plugins = get_option( 'active_plugins' );
	if ( is_array( $active_plugins ) && !empty( $active_plugins ) ) {
?>
		<h2><?php esc_html_e( 'Enabling WordPress Sites' ); ?></h2>
		<p><?php printf( __( 'Please <a href="%s">deactivate</a> your plugins before enabling WordPress Sites. Once WordPress Sites are enabled, you may reactivate your plugins.' ), admin_url( 'plugins.php' ) ); ?></p>
<?php
		return false;
	}
	return true;
}

/**
 * Checks for existing network data/tables.
 *
 * @since 3.0.0
 */
function network_domain_check() {
	global $wpdb;

	if ( $wpdb->get_var( "SHOW TABLES LIKE '$wpdb->site'" ) == $wpdb->site )
		return $wpdb->get_var( "SELECT domain FROM $wpdb->site ORDER BY id ASC LIMIT 1" );

	return false;
}

/**
 * Prints step 2 for network settings.
 *
 * @since 3.0.0
 */
function step2() {
?>
		<h2><?php esc_html_e( 'Enabling WordPress Sites' ); ?></h2>
		<p><?php _e( 'Complete the following steps to enable the features for creating a network of sites. <strong>Note:</strong> We recommend you make a backup copy of your existing <code>wp-config.php</code> and <code>.htaccess</code> files.' ); ?></p>
		<ol>
			<li><?php printf( __( 'Create a <code>%s/blogs.dir</code> directory. This directory is used to stored uploaded media for your additional sites and must be writeable by the web server.' ), WP_CONTENT_DIR ); ?></li>
<?php step2_config(); ?>
<?php step2_htaccess(); ?>
		</ol>
<?php
}

/**
 * Prints configuration file component of step 2 for network settings.
 *
 * @since 3.0.0
 */
function step2_config() {
	global $base, $wpdb, $vhost;

	$vhost   = stripslashes( $_POST['vhost' ] );
	$prefix  = $wpdb->base_prefix;

	$config_sample = ABSPATH . 'wp-admin/includes/wp-config.ms';
	if ( ! file_exists( $config_sample ) )
		wp_die( sprintf( __( 'Sorry, I need a <code>%s</code> to work from. Please re-upload this file to your WordPress installation.' ), $config_sample ) );

	$wp_config_file = file( $config_sample );
?>
			<li><p><?php printf( __( 'Replace the contents of <code>%swp-config.php</code> with the following:' ), ABSPATH ); ?></p>
				<textarea name="wp-config" cols="120" rows="20">
<?php
	foreach ( $wp_config_file as $line ) {
		switch ( trim( substr( $line, 0, 16 ) ) ) {
			case "define('DB_NAME'":
				$output = str_replace( "wordpress", DB_NAME, $line );
				break;
			case "define('DB_USER'":
				$output = str_replace( "username", DB_USER, $line );
				break;
			case "define('DB_PASSW":
				$output = str_replace( "password", DB_PASSWORD, $line );
				break;
			case "define('DB_HOST'":
				$output = str_replace( "localhost", DB_HOST, $line );
				break;
			case "define('VHOST',":
				$output = str_replace( "VHOSTSETTING", $vhost, $line );
				break;
			case '$table_prefix  =':
				$output = str_replace( 'wp_', $prefix, $line );
				break;
			case '$base = \'BASE\';':
				$output = str_replace( 'BASE', $base, $line );
				break;
			case "define('DOMAIN_C":
				$domain = get_clean_basedomain();
				$output = str_replace( "current_site_domain", $domain, $line );
				break;
			case "define('PATH_CUR":
				$output = str_replace( "current_site_path", $base, $line );
				break;
			case "define('AUTH_KEY":
			case "define('AUTH_SAL":
			case "define('LOGGED_I":
			case "define('SECURE_A":
			case "define('NONCE_KE":
				$constant = substr( $line, 8, strpos( $line, "'", 9 ) - 8 );
				if ( defined( $constant ) )
					$hash = constant( $constant );
				else
					$hash = md5( mt_rand() ) . md5( mt_rand() );
				$output = str_replace( 'put your unique phrase here', $hash, $line );
				break;
			default:
				$output = $line;
				break;
		}
		echo $output;
	}
?>
				</textarea>
			</li>
<?php
}

/**
 * Gets base domain of network.
 *
 * @since 3.0.0
 */
function get_clean_basedomain() {
	global $wpdb;

	$existing_domain = network_domain_check();
	if ( $existing_domain )
		return $existing_domain;

	$domain = preg_replace( '|https?://|', '', get_option( 'siteurl' ) );
	if ( strpos( $domain, '/' ) )
		$domain = substr( $domain, 0, strpos( $domain, '/' ) );
	return $domain;
}

$action = isset( $_POST[ 'action' ] ) ? $_POST[ 'action' ] : null;

switch( $action ) {
	case 'step2':
		check_admin_referer( 'install-network-1' );

		if ( isset( $_POST[ 'existing_network' ] ) ) {
			// Install!
			$base = stripslashes( dirname( dirname( $_SERVER['SCRIPT_NAME'] ) ) );
			if ( $base != '/' )
				$base .= '/';

			require_once( ABSPATH . 'wp-admin/includes/upgrade.php' );
			// create network tables
			$domain = get_clean_basedomain();
			install_network();
			if ( !network_domain_check() || $_POST[ 'existing_network' ] == 'none' )
				populate_network( 1, $domain, sanitize_email( $_POST['email'] ), $_POST['weblog_title'], $base, $_POST['vhost'] );
			// create wp-config.php / htaccess
			step2();
			break;
		}
	default:
		//@todo: give an informative screen instead
		if ( is_multisite() ) {
			_e( 'Network already enabled.' );
		} elseif ( step1_plugin_check() ) {
			$rewrite_enabled = step1();
			printstep1form( $rewrite_enabled );
		}
	break;
}
?>
</form>
</div>

<?php include( './admin-footer.php' ); ?>