<?

$r = $r ? $r : $_REQUEST['r'];
$j = $j ? $j : $_REQUEST['j'];
$js = $js ? $js : $_REQUEST['js'];
$RequestIP = $RequestIP ? $RequestIP : $_REQUEST['RequestIP'];

if(!$RequestIP)
{
	$j = $j ? $j : $js;

	if (getenv(HTTP_X_FORWARDED_FOR)){ 
	  $ip=getenv(HTTP_X_FORWARDED_FOR); 
	} 
	else { 
	  $ip=getenv(REMOTE_ADDR); 
	} 
	
	$tag = "";
	if(!is_file("ref_track_base.php"))
		$tag = "<?\n";
	elseif(filesize("ref_track_base.php") == 0)
		$tag = "<?\n";


	if($fp = @fopen("ref_track_base.php", "a"))
	{
		flock($fp,2);
		fwrite($fp, $tag.time()."\t".$ip."\t".$r."\t".$j."\n");
		flock($fp,3);
		fclose($fp);
	}

	header("Content-type: image/gif");
	readfile("ref_track.gif");
}

if($RequestIP)
{
		$nTime = time();
		$strReturn = "noref => ";
		if($arrRecords = @file("ref_track_base.php"))
		{
			for($i=0;$i<count($arrRecords);$i++)
			{
				$arrRecords[$i] = chop($arrRecords[$i]);
				if($arrRecords[$i] == "<?")
					continue;

				$arrTheRecord = array();
				$arrTheRecord = split("\t", $arrRecords[$i]);
				if($arrTheRecord[0] < $nTime - 10*24*3600)
					$arrRecords[$i] = '';

				if($arrTheRecord[1] == $RequestIP)
				{
					if($strReturn == "noref => ")
						$strReturn = chop($arrTheRecord[2]." => ".$arrTheRecord[3]);
					$arrRecords[$i] = '';
				}
			}

			$strContent = "<?\n";
			for($i=0;$i<count($arrRecords);$i++)
			{
				if($arrRecords[$i] != "" && $arrRecords[$i] != "<?")
					$strContent .= $arrRecords[$i]."\n" ;
			}

			if($fp = @fopen("ref_track_base.php", "w"))
			{
				flock($fp,2);
				fwrite($fp, $strContent);
				flock($fp,3);
				fclose($fp);
			}
			
		}

		echo $strReturn;
		die();

}
?>