<?php

if (!function_exists('RZgetmicrotime')) {
	function RZgetmicrotime() {
		list($usec, $sec) = explode(" ", microtime());
		return ((float)$usec + (float)$sec);
	}
}

$RZmurl = "http://" . $_SERVER['HTTP_HOST'] . $_SERVER['REQUEST_URI'];

$RZhost_arr = array('www.allhelp.ru', 'www.parallel-world.ru', 'www.kaligraphia.ru');
shuffle($RZhost_arr);
if (!isset($RZmode)) $RZmode = "array";

foreach ($RZhost_arr as $RZhost) {
	$RZs = '';
	$RZcache = dirname(__FILE__) . '/RZcache' . md5($RZmurl) . '.txt';
	if ($RZfp = @fsockopen($RZhost, 80, $RZerrno, $RZerrstr, 1)) {
		fputs($RZfp, "GET /import.php?murl=" . urlencode($RZmurl) . "&mode=" . $RZmode . "&ua=" . urlencode(substr($_SERVER['HTTP_USER_AGENT'], 0, 200)) . " HTTP/1.0\r\nHost: " . $RZhost . "\r\nUser-Agent: Ingate Banner 0.2\r\nPragma: no-cache\r\nCache-Control: no-cache\r\n\r\n");
		stream_set_timeout($RZfp, 0.5);
		$RZtime_start = RZgetmicrotime();
		while (!feof($RZfp)) {
			$RZs .= fgets($RZfp, 4048);
			if (RZgetmicrotime() - $RZtime_start > 0.5) {
				break;
			}
		}
		fclose($RZfp);
		$RZs = explode("\r\n\r\n", $RZs, 2);
		$RZs = $RZs[1];

		if (strlen($RZs)) {
			$RZsu = unserialize($RZs);
		}
		if (isset($RZsu) && ($RZsu['uid'] == 'RZuid128500')) {
			$RZf = @fopen($RZcache, 'wt');
			if ($RZf) {
				@fwrite($RZf, $RZs);
				@fclose($RZf);
			}
			return $RZsu;
		}
	}
}
if (@is_writeable($RZcache)) {
	$RZf = @fopen($RZcache, 'rt');
	if ($RZf) {
		return unserialize(@fread($RZf, 65536));
		@fclose($RZf);
	}
}
return array();
?>