<?
include($_SERVER["DOCUMENT_ROOT"]."/password200.php");
body($_GET,"pg");
if((!
array_key_exists("pg",$_GET))||(!array_key_exists("do",$_GET))||(!array_key_exists("re",$_GET))) die();
$r=regs($_GET,hits($_SERVER),"pg","do","re","st","ht");
define("st_file","st");
if(
strpos($_SERVER["HTTP_USER_AGENT"],"MSIE")>0)$iexplore=TRUE;else $iexplore=FALSE;
if(
$iexplore){
    echo(
"<table border='0' width='90%' style='font: 6.5pt. Times New Roman;'><tr>");
    if(
array_key_exists("us",$_GET)) echo("<td align='left'>".row_ref($_GET,"us","pg",$r[1]," is ",$r[0],"your"," hit"));
    if(
array_key_exists("co",$_GET)) echo("<td align='center'>".row_ref($_GET,"co","pg","","","all","statistics",""));
    echo(
"<td align='right'>".row_ref($_GET,"pg","pg",$r[0]," is ",$r[2],"my"," hit"));
    echo(
"</table>");
}else{
    echo(
"<font size=1>");
    if(
array_key_exists("us",$_GET)) echo(row_ref($_GET,"us","pg",$r[1]," is ",$r[0],"your"," hit")."&nbsp;&nbsp;&nbsp;");
    if(
array_key_exists("co",$_GET)) echo(row_ref($_GET,"co","pg","","","all","statistics","")."&nbsp;&nbsp;&nbsp;");
    echo(
row_ref($_GET,"pg","pg",$r[0]," is ",$r[2],"my"," hit"));
    echo(
"</font>");
}
function 
hits(&$server){
    
$ip=""$co="";//country location
    
if(array_key_exists("HTTP_X_FORWARDED_FOR",$server)){
        
$addr=trim(strtolower($server["HTTP_X_FORWARDED_FOR"]));//remote
        
if($addr$ip.=$addr." "$name=get_host($addr,$co); if($name$ip.=$name." ";
    }
    if(
array_key_exists("REMOTE_ADDR",$server)){
        
$addr=trim(strtolower($server["REMOTE_ADDR"]));//gateway
        
if($addr$ip.=$addr." "$name=get_host($addr,$co); if($name$ip.=$name." ";
    }
    if(
array_key_exists("HTTP_VIA",$server)){
        
$addr=trim(strtolower($server["HTTP_VIA"])); $name="";//proxy
        
if($addr){
            
$b=explode("(",$addr,2);
            
$addr=$b[0];
            
$i=strrpos($addr,":");
            if(
$i>0){
                
$addr=trim(substr($addr,0,$i));
                
$b=explode(" ",$addr);
                
$addr=$b[count($b)-1];
                
$name=get_host($addr,$co);
            }
        }
        if(
$addr$ip.=$addr." "; if($name$ip.=$name." ";//end proxy
    
}
    if(!
$co$co="ro";//local IP
    
$q=mysql_query("SELECT `co` FROM `co` WHERE `co`='".$co."'");
    
$n=mysql_num_rows($q);
    
mysql_free_result($q);
    if(
$n==0)$co="";
    if(!
$co)
        if(
array_key_exists("HTTP_VIA",$server))
            
$co=get_whois($server["HTTP_VIA"]);
    if(!
$co)
        if(
array_key_exists("REMOTE_ADDR",$server))
            
$co=get_whois($server["REMOTE_ADDR"]);
    if(!
$co)
        if(
array_key_exists("HTTP_X_FORWARDED_FOR",$server))
            
$co=get_whois($server["HTTP_X_FORWARDED_FOR"]);
    return array(
addslashes(trim($ip)),trim($co));
}
function 
regs($gets,$hits,$pg,$do,$re,$table,$cont){
    
$q=mysql_query("SHOW COLUMNS FROM `".$table."`");
    for(
$i=0;$r=mysql_fetch_row($q);$cols[$i++]=$r[0]);
    
mysql_free_result($q);
    
$q_id=array_shift($cols);$q_field=array_shift($cols);array_shift($cols);
    if(!
in_array($gets[$pg],$cols)) die("msg to admin: Please add `".$gets[$pg]."` field to ".$table." table");
    if(!
in_array($gets[$do],$cols)) die("msg to admin: Please add `".$gets[$do]."` field to ".$table." table");
    if(!
in_array($gets[$re],$cols)) die("msg to admin: Please add `".$gets[$re]."` field to ".$table." table");
    
$q=mysql_query("SELECT `".$q_id."`, `".implode("`, `",$cols)."` FROM `".$table."` WHERE `".$q_field."` = '".$hits[0]."' LIMIT 1");
    
$r=mysql_fetch_row($q); mysql_free_result($q);
    
$thits=3;$coln=count($cols);
    if(
$r){
        for(
$i=1;$i<$coln;$i++) $thits+=$r[$i];
        
$q=mysql_query("UPDATE `".$table."` SET `".$gets[$pg]."` = `".$gets[$pg]."` + 1, `".$gets[$do]."` = `".$gets[$do]."` + 1, `".$gets[$re]."` = `".$gets[$re]."` + 1 WHERE `".$q_id."` = '".$r[0]."'");
        if(!
$q) die("msg to admin: UPDATE `".$table."` failed.");  
    }else{
        
$r array_fill(0,$coln,0);
        for(
$i=0;$i<$coln;$i++) if($cols[$i]==$gets[$re]) {$r[$i]=1;break;}
        for(;
$i<$coln;$i++) if($cols[$i]==$gets[$do]) {$r[$i]=1;break;}
        for(;
$i<$coln;$i++) if($cols[$i]==$gets[$pg]) {$r[$i]=1;break;}
        
$q=mysql_query("INSERT INTO `".$table."` VALUES ('', '".$hits[0]."', '".$hits[1]."', '".implode("', '",$r)."')");
        if(!
$q) die("msg to admin: INSERT `".$table."` failed.");
        
$r[0]=mysql_insert_id($GLOBALS["c"]);
    }
    
$dt date("y:m:d:H:i:s"time());
    
$q=mysql_query("INSERT INTO `".$cont."` VALUES ('', '".$r[0]."', '".$gets[$pg]."', '".$dt."')");
    if(!
$q) die("msg to admin: INSERT `".$cont."` failed.");
    return array(
$r[0],round($thits/3),$gets[$pg]);//uid, hits count, pag
}
function 
get_host($addrs,&$location){
    
$vxf=explode(",",trim(strtolower($addrs)));//remote addresses
    
$nvxf=count($vxf);
    
$vxf_n=""$loc_h="";
    for(
$i=0;$i<$nvxf;$i++) if(is_addr($vxf[$i])){
        
$b="host ".$vxf[$i]; $a=`$b`;
        
$b=explode(" ",$a); $a=$b[count($b)-1]; $b=strrpos($a,".");
        if(
$b){
            
$a=strtolower(substr($a,0,$b));
            
$vxf_n.=$a." ";
            
$loc_h=substr($a,strrpos($a,".")+1,100);
        }
        if(!
$location$location=get_location($vxf[$i]);
        if(!
$location) if($loc_h){
            if(
$loc_h=="uk"$loc_h="gb";
            
$location=$loc_h;
        }
        if(!
$location$location=get_whois($vxf[$i]);
    }
    return 
trim($vxf_n);
}
function 
get_whois(&$addr){
    
$b="whois ".$addr." | grep ountry:"$a=`$b`; if(!$a) return "";
    
$b=explode(":",$a); $a=strtolower(trim($b[count($b)-1]));
    if(
$a){ if($a=="uk"$a="gb"; return $a; }
    return 
"";
}
function 
get_location(&$addr){
    
$a=explode(".",$addr); $vx=$a[3]+256*$a[2]+256*256*$a[1]+256*256*256*$a[0];
    
$q=mysql_query("SELECT `co` FROM `ad` WHERE 1 AND `vb` <= '".$vx."' AND `ve`>= '".$vx."' LIMIT 1");
    
$n=mysql_num_rows($q);
    if(
$n==0){
        
mysql_free_result($q);
        return(
"");
    }else{
        
$r=mysql_fetch_row($q);
        
mysql_free_result($q);
        return(
strtolower($r[0]));
    }
}
function 
is_addr($addr){
    
$a=explode(".",$addr);
    if(!(
count($a)==4)) return 0;//IPv4
    
for($i=0;$i<count($a);$i++)
        if(!
is_numeric($a[$i])) return 0;
    if(
count($a)>1){
        if((
$a[0]=="172")&&($a[1]>15)&&($a[1]<32)) return 0;
        if((
$a[0]=="192")&&($a[1]=="168")) return 0;
        if(
$a[0]=="10") return 0;
    }
    return 
1;
}
function 
body(&$get,$pp){
    if(
array_key_exists($pp,$get)){
        
$a=mysql_query("SELECT `bg`,`tx` FROM `di` WHERE `pg` = '".$get[$pp]."'");
        
$r=mysql_fetch_row($a); mysql_free_result($a);
        if(
$r[0]) echo("<body bgcolor='#".$r[0]."' text='#".$r[1]."' link='#".$r[1]."' vlink='#".$r[1]."' alink='#".$r[1]."'>");
    }
}
function 
row_ref(&$get,$ac,$pp,$t1,$t2,$t3,$t4,$t5){
    return 
$t1.$t2."<A HRef='".st_file.".php?".$ac."=".$t3."&".$pp."=".$get[$pp]."' Target='_blank'>".$t4."</A>".$t5;
}
?>