<?php
// $Id$

// Define $MYSITE and $LAST_UPDATED variables
include_once $_SERVER['DOCUMENT_ROOT'] . '/include/prepend.inc';

// Define $PHP_5_VERSION, $PHP_5_MD5 & $RELEASES variables
include_once $_SERVER['DOCUMENT_ROOT'] . '/include/version.inc';

// Text/plain content type for better readability in browsers
header("Content-type: text/plain; charset=utf-8");

// Provide information on local stats setup
$mirror_stats = (int) (isset($_SERVER['MIRROR_STATS']) && $_SERVER['MIRROR_STATS'] == '1');

// MD5 check last release file (identifies rsync setup problems)
$filename = $_SERVER['DOCUMENT_ROOT'] . '/distributions/' . $RELEASES[5][$PHP_5_3_VERSION]["source"][0]["filename"];
$md5_ok = (int) (file_exists($filename) && md5_file($filename) == $PHP_5_3_MD5["tar.bz2"]);

// Does this mirror have sqlite?
// Gets all available sqlite versions for possible future sqlite wrapper
$sqlite = get_available_sqlites();

$exts = join(get_loaded_extensions(), ',');

if (isset($_GET["token"]) && md5($_GET["token"]) === "19a3ec370affe2d899755f005e5cd90e") {
	$retval = run_self_tests();
	$output = isset($_GET["output"]) ? $_GET["output"] : "php";
	switch($output) {
	case "human":
		var_dump($retval);
		break;

	case "php":
	default:
		echo serialize($retval);
	}
	exit(0);
}

echo join('|', array(
    $MYSITE,            	// 0 : CNAME for mirror as accessed (CC, CC1, etc.)
    phpversion(),       	// 1 : PHP version overview
    $LAST_UPDATED,      	// 2 : Update problems
    $sqlite,            	// 3 : SQLite support?
    $mirror_stats,      	// 4 : Optional local stats support
    default_language(), 	// 5 : Mirror language
    'manual-noalias',   	// 6 : /manual alias check is done elsewhere now
    $md5_ok,            	// 7 : Rsync setup problems
    $exts,              	// 8 : List of php extensions separated by comma
    gethostname(),		// 9 : The configured hostname of the local system
    $_SERVER['SERVER_ADDR'],	// 10: The IP address under which we're running
));

function run_self_tests() {
	global $MYSITE;
	global $LAST_UPDATED, $sqlite, $mirror_stats, $md5_ok;

	//$MYSITE = "http://sg.php.net/";
	$content = fetch_contents($MYSITE . "manual/noalias.txt");
	if (is_array($content) || trim($content) !== 'manual-noalias') {
		return array(
			"name" => "Apache manual alias",
			"see"  => $MYSITE . "mirroring-troubles.php#manual-redirect",
			"got"  => $content,
		);
	}

	$ctype = fetch_header($MYSITE . "manual/en/faq.html.php", "content-type");
	if (strpos($ctype, "text/html") === false) {
		return array(
			"name" => "Header weirdness. Pages named '.html.php' are returning wrong status headers",
			"see"  => $MYSITE . "mirroring-troubles.php#content-type",
			"got"  => var_export($ctype, true),
		);
	}

	$ctype = fetch_header($MYSITE . "functions", "content-type");
	if (is_array($ctype)) {
		$ctype = current($ctype);
	}
	if (strpos($ctype, "text/html") === false) {
		return array(
			"name" => "MultiViews on",
			"see"  => $MYSITE . "mirroring-troubles.php#multiviews",
			"got"  => var_export($ctype, true),
		);
	}

	$header = fetch_header($MYSITE . "manual/en/ref.var.php", 0);
	list($ver, $status, $msg) = explode(" ", $header, 3);
	if($status != 200) {
		return array(
			"name" => "Var Handler",
			"see"  => $MYSITE . "mirroring-troubles.php#var",
			"got"  => var_export($header, true),
		);
	}

	return array(
		"servername" => $MYSITE,
		"version"    => phpversion(),
		"updated"    => $LAST_UPDATED,
		"sqlite"     => $sqlite,
		"stats"      => $mirror_stats,
		"language"   => default_language(),
		"rsync"      => $md5_ok,
	);

}