<?
$firsttime = time();
include "thispath.php";
include "conf/configure.php";
include "conf/domainlist.php";
$domaincheck = true;
$notfound = true;
$firsttime = microtime_float();
$gonext = false;
// ƒhƒƒCƒ“‚ðƒ`ƒFƒbƒN‚·‚éB
if($domaincheck){
	for($i=0;$i<sizeof($domains);$i++){
		$ck = strstr($_REQUEST["img"],$domains[$i]);
		if($ck){
			$gonext = true;
			break;
		}
	}
}
if($_REQUEST["img"] and $gonext){
	// ƒtƒ@ƒCƒ‹‚ÌƒnƒbƒVƒ…‚ðŽæ“¾
	$sha2 = sha1($_REQUEST["img"]);

	$henkanlogfile1 = "tmp/henkanlog11.php";
	$henkanlogfile2 = "tmp/henkanlog12.php";
	if(file_exists($henkanlogfile2)){ include($henkanlogfile2); }//ƒCƒ“ƒNƒ‹[ƒh‚Ì‡”ÔŠÖŒW—L‚è
	if(file_exists($henkanlogfile1)){ include($henkanlogfile1); }//2‚ð•K‚¸æ‚ÉƒCƒ“ƒNƒ‹[ƒh

	$chashethis = "";

	if(@$henkan[$sha2] and $s_cashe){
		$sha1 = $henkan[$sha2];
		$chashethis = "Scashed";
	}else{
		// ƒtƒ@ƒCƒ‹‚ðŽæ“¾‚·‚é
		@$file = fopen($_REQUEST["img"], "r");
		$contents2 = "";
		if(!$file){
			exit;
		}
		while (!@feof(@$file)) {
			$contents2 .= @fread(@$file, 8192);
		}
		$fp = fopen($thispath."/tmp/".$sha2,"w");
		fputs($fp,$contents2);
		fclose($fp);

		// sha1 ‚ÌŽžŠÔ
		@$sha1 = sha1_file($thispath."/tmp/".$sha2);

		if($sha1){
			//ƒƒO‚ðì¬
			if(@filesize($henkanlogfile1) >= (104*20)){
				rename($henkanlogfile1,$henkanlogfile2);
			}
			$fp = fopen($henkanlogfile1,"a");
			fwrite($fp,"<? \$henkan[\"".$sha2."\"] = \"".$sha1."\"; ?>\n");
			fclose($fp);
		}
	}
	// ï¿½Oï¿½ï¿½ï¿½ï¿½ï¿½ÌŽï¿½ï¿½ï¿½
	$secondtime = microtime_float();

	//ï¿½Iï¿½ï¿½ï¿½Wï¿½iï¿½ï¿½ï¿½Ìƒnï¿½bï¿½Vï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ê‡ï¿½Gï¿½ï¿½ï¿½[ï¿½ï¿½Ô‚ï¿½
	if(!$sha1){
		header("Content-Type: image/jpeg");
		noimage();
		$chashethis="noimage";$size=0;$size2=0;
		getlog($chashethis,$thumbfilename,$uag,$size,$size2);
		exit;
	}

	//ï¿½ï¿½ÊƒTï¿½Cï¿½Yï¿½ï¿½ï¿½æ“¾
	if($pd = phone_display()){
//		$pd = phone_display();
		$uag = "FROMUAG";
	} else {
		$pd = "460x340";
		$uag = "DEFAULT";
	}

	// ï¿½æ“¾ï¿½ï¿½ï¿½ï¿½ï¿½tï¿½@ï¿½Cï¿½ï¿½ï¿½Ì”ï¿½ï¿½ï¿½
	$fty2 = preg_match("/.*(\.gif$)/i",$_REQUEST["img"],$arr);
	$fty = preg_match("/.*\.(.*)$/i",$_REQUEST["img"],$arr);

	// ï¿½wï¿½bï¿½_ï¿½Æƒtï¿½@ï¿½Cï¿½ï¿½ï¿½Ì–ï¿½ï¿½Oï¿½ï¿½ï¿½æ“¾.$_REQUEST["img"]." /img/".$thumbfilename
	if($arr[1] == "gif"){
		$hdr = "image/gif";
		$ext = ".gif";
	} else if($arr[1] == "jpg" or $arr[1] == "jpeg") {
		$hdr = "image/jpeg";
		$ext = ".jpg";
	} else {
		$ext = ".jpg";
	}
	//ï¿½Lï¿½ï¿½ï¿½bï¿½Vï¿½ï¿½ï¿½tï¿½@ï¿½Cï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ß‚ï¿½
	$thumbfilename = $pd."/".$sha1."-".$sha2.$ext;

	// ï¿½ï¿½ï¿½ï¿½ï¿½ÌŽï¿½ï¿½ï¿½
	$thirdtime = microtime_float();

	// ï¿½Lï¿½ï¿½ï¿½bï¿½Vï¿½ï¿½ï¿½ï¿½ï¿½ï¿½
	if(file_exists($thispath."/img/".$thumbfilename) and $s_cashe){
		if(!$chashethis){
			$chashethis = "cashed";
		}
	} else {
		// ï¿½tï¿½Hï¿½ï¿½ï¿½_ï¿½ì¬
		if(!file_exists($thispath."/img/".$pd)){
			mkdir($thispath."/img/".$pd,0777);
			chmod($thispath."/img/".$pd,0777);
		}
		exec("convert -depth 8 -compress BZip -density 72 -quality 80 -thumbnail ".$pd." tmp/".$sha2." ".$thispath."/img/".$thumbfilename);
		$chashethis = "create";
	}
	// ï¿½ï¿½ï¿½ï¿½ï¿½ÌŽï¿½ï¿½ï¿½
	$forthtime = microtime_float();

	if(file_exists($thispath."/img/".$thumbfilename)){
		$handle = fopen($thispath."/img/".$thumbfilename, "r");
		$contents2 = '';
		while (!feof($handle)) {
			$contents2 .= fread($handle, 8192);
		}
		fclose($handle);
		header("Content-Type: ".$hdr);
		echo $contents2;
	} else {
		header("Content-Type: image/jpeg");
		noimage();
		if($chashethis == "create"){
			//ï¿½ÏŠï¿½ï¿½Gï¿½ï¿½ï¿½[ï¿½ï¿½ï¿½[ï¿½ï¿½ï¿½ï¿½ï¿½Mï¿½È‚ï¿½
		}
	}
	//ï¿½Lï¿½ï¿½ï¿½bï¿½Vï¿½ï¿½ï¿½tï¿½@ï¿½Cï¿½ï¿½ï¿½eï¿½ÊŽæ“¾
	@$size = filesize($thispath."/img/".$thumbfilename);

	//ï¿½Iï¿½ï¿½ï¿½Wï¿½iï¿½ï¿½ï¿½tï¿½@ï¿½Cï¿½ï¿½ï¿½eï¿½ÊŽæ“¾
	$size2 = "";
	if(file_exists($thispath."/tmp/".$sha2)){
		$size2 = filesize($thispath."/tmp/".$sha2);
		unlink($thispath."/tmp/".$sha2);
	}
} else {
	if($notfound){
		header("HTTP/1.0 404 Not Found");
	} else {
		header("Content-Type: image/jpeg");
		noimage();
	}
	if($_REQUEST["img"] and !$gonext){
		$chashethis = "noreturn";
	} else {
		$chashethis = "noimage";
	}
	$size="0";
	$size2="0";
}

getlog($chashethis,$thumbfilename,$uag,$size,$size2);


//============================
function getlog($chashethis,$thumbfilename,$uag,$size,$size2){
	global $thispath,$firsttime,$secondtime,$thirdtime,$forthtime;
	// ï¿½ï¿½ï¿½Oï¿½tï¿½@ï¿½Cï¿½ï¿½ï¿½Ìì¬
	$logroots = $thispath."/log/";
	$thisf = date("Ym");
	if(!file_exists($logroots.$thisf)){
		mkdir($logroots.$thisf,0777);
		chmod($logroots.$thisf,0777);
	}

	$fifthtime = microtime_float();
	$logs = @$_SERVER["HTTP_REFERER"]."<>".@$_SERVER["SCRIPT_FILENAME"]."<>".$chashethis."<>".$thumbfilename."<>".$_REQUEST["img"]."<>".@$_SERVER["HTTP_USER_AGENT"]."<>".@$_SERVER["REMOTE_ADDR"]."<>".gethostbyaddr(@$_SERVER["REMOTE_ADDR"])."<>".date("Y-m-d H:i:s")."<>".$firsttime."<>".$secondtime."<>".$thirdtime."<>".$uag."<>".$size."<>".$size2."<>".$forthtime."<>".$fifthtime."<>\n";

	$fp = fopen($logroots.$thisf."/".date("d").".txt","a");
	fwrite($fp,$logs);
	fclose($fp);
}


function phone_display(){
	$agent = $_SERVER["HTTP_USER_AGENT"];
	//$agent = "DoCoMo/2.0 MST_v_SH2101V(c100)";
	//$agent = "DoCoMo/1.0/F251i/c10/TB";
	$phone = uaa();
	if($phone == "i"){
		if(preg_match("/^DoCoMo\/2\.0/i",$agent)){
			preg_match("/^(DoCoMo\/2\.0 )?([^\(]+)/i",$agent,$matches);
			$typ = $matches[2];

		} else if(preg_match("/^(DoCoMo\/1\.0\/)?([^\/]+)/i",$agent,$matches)){
			$typ = $matches[2];

		} else {
		}
		//echo $typ;
		$dp = "640x480";
		$fl = file("docomo0606.csv");
		for($i=0;$i<sizeof($fl);$i++){
			$fx = explode(",",$fl[$i]);
			if($fx[0] == trim($typ)){
				$dp = trim($fx[1]);
				break;
			}
		}
		return $dp;
	} else if($phone == "v"){
		return str_replace("*","x",$_SERVER["HTTP_X_JPHONE_DISPLAY"]);
		return str_replace(",","x",$_SERVER["HTTP_X_JPHONE_DISPLAY"]);
	} else if($phone == "e"){
		return str_replace(",","x",$_SERVER["HTTP_X_UP_DEVCAP_SCREENPIXELS"]);
	} else {
	}

}


function uaa(){
	$agent = $_SERVER["HTTP_USER_AGENT"];

	if(preg_match("/^DoCoMo\/[12]\.0/i", $agent))
	{
	    return "i";// i-mode
	}
	elseif(preg_match("/^(J\-PHONE|Vodafone|SoftBank|MOT\-[CV])/i", $agent))
	{
	    return "v";// vodafone
	}	

	elseif(preg_match("/^KDDI\-/i", $agent) || 
	       preg_match("/UP\.Browser/i", $agent))
	{
	    return "e";// ezweb
	}
	elseif(preg_match("/^PDXGW/i", $agent) || 
	       preg_match("/DDIPOCKET/i", $agent))
	{
	    return "h";// edge
	}
	elseif(preg_match("/^(ASTEL|L\-mode)/i", $agent))
	{
	    return "o";// other
	}
	else {
	    return "p";// pc
	}
}
function noimage(){
	global $thispath;
	if(file_exists($thispath."/noimage.gif")){
		$handle = fopen($thispath."/noimage.gif", "r");
		$contents2 = '';
		while (!feof($handle)) {
		  $contents2 .= fread($handle, 8192);
		}
		fclose($handle);
		echo $contents2;
	}
}
function microtime_float()
{
   list($usec, $sec) = explode(" ", microtime());
   return ((float)$usec + (float)$sec);
}
?>