";

$result = "";
$fp = fsockopen($proto.$host, $port, $errno, $errstr, $http_timeout);
if ($fp)
{
	$strRequest = "GET $path HTTP/1.0\r\n";
	$strRequest .= "Connection: close\r\n";
	$strRequest .= "Accept: */*\r\n";
	$strRequest .= "Host: $host\r\n";
	$strRequest .= "Accept-Language: en\r\n";
	$strRequest .= "\r\n";

	fwrite($fp, $strRequest);

	$headers = "";
	while(!feof($fp))
	{
		$line = fgets($fp, 4096);
		if($line == "\r\n")
		{
			break;
		}
		$headers .= $line;
	}

	while(!feof($fp))
		$result .= fread($fp, 4096);

	fclose($fp);

}

if($result)
{
	echo "
", htmlspecialchars($result), "
";

	$host = preg_match("/(.*?)<\\/host>/", $result, $match)? $match[1]: "";
	$proto = preg_match("/(.*?)<\\/proto>/", $result, $match)? $match[1]: "";
	$port = preg_match("/(.*?)<\\/port>/", $result, $match)? $match[1]: "";
	$path = preg_match("/(.*?)<\\/path>/", $result, $match)? $match[1]: "";
	$headers = preg_match_all("#
#", $result, $match)? $match: "";

	$result = "";
	$fp = fsockopen($proto.$host, $port, $errno, $errstr, $http_timeout);
	var_dump($fp);
	if ($fp)
	{
		$strRequest = "GET $path HTTP/1.0\r\n";
		$strRequest .= "Connection: close\r\n";
		$strRequest .= "Accept: */*\r\n";
		$strRequest .= "Host: $host\r\n";
		$strRequest .= "Accept-Language: en\r\n";

		foreach($headers[0] as $i => $tmp)
			$strRequest .= $headers[1][$i].": ".$headers[2][$i]."\r\n";

		$strRequest .= "\r\n";

		fwrite($fp, $strRequest);

		$headers = "";
		while(!feof($fp))
		{
			$line = fgets($fp, 4096);
			if($line == "\r\n")
			{
				break;
			}
			$headers .= $line;
		}
		echo "
", htmlspecialchars($headers), "
";

		while(!feof($fp))
			$result .= fread($fp, 4096);

		fclose($fp);
	}

	echo "
", htmlspecialchars($result), "
";
}
else
{
	var_dump($result);
}

function SignRequest($access_key, $secret_key, $bucket, $file_name, $ContentType, $additional_headers)
{
	$result = array();

	$RequestMethod = "GET";
	$RequestURI = $file_name;
	$result["Date"] = $RequestDATE = gmdate('D, d M Y H:i:s', time()).' GMT';

	//Prepare Signature
	$CanonicalizedAmzHeaders = "";
	foreach($additional_headers as $key => $value)
		if(preg_match("/^x-amz-/", $key))
			$CanonicalizedAmzHeaders .= $key.":".$value."\n";

	$CanonicalizedResource = "/".$bucket.$RequestURI;

	$StringToSign = "$RequestMethod\n\n$ContentType\n$RequestDATE\n$CanonicalizedAmzHeaders$CanonicalizedResource";

	$Signature = base64_encode(_hmacsha1($StringToSign, $secret_key));
	$result["Authorization"] = $Authorization = "AWS ".$access_key.":".$Signature;

	return array(
		"Date" => $RequestDATE,
		"Authorization" => $Authorization,
	);
}

function _hmacsha1($data, $key)
{
	if(mb_strlen($key) > 64)
		$key=pack('H*', sha1($key));
	$key = str_pad($key, 64, chr(0x00));
	$ipad = str_repeat(chr(0x36), 64);
	$opad = str_repeat(chr(0x5c), 64);
	$hmac = pack('H*', sha1(($key^$opad).pack('H*', sha1(($key^$ipad).$data))));
	return $hmac;
}

?>