View file troforum_v0.1/narod.php

<?
////////////////////////////////////////////////////////////////////////////
////         Автор скрипта: Трофимов Дмитрий Сергеевич aka dimidrol       // 
////                E-mail: [email protected]                          //
////            Home pages: http://www.trofimov.com.ru                    //
////              WAP SAIT: http://trofimov.com.ru/wap/                   //
////        Версия скрипта: TROforum 0.1                                  //
////////////////////////////////////////////////////////////////////////////

$file1 = file("uzver.dat");
$dat1 = "uzver.dat";
$count1 = count($file1);
$time = time();
$plus = "\x31";
$s_t = "\x36\x30";
if($ip == "")
{
if (getenv('HTTP_X_FORWARDED_FOR'))
{
$ip = getenv('HTTP_X_FORWARDED_FOR');
}
else
{
$ip = getenv('REMOTE_ADDR');
}
}
$open = fopen("$dat1","a");
fputs($open, "$ip::$time::\r\n");
fclose($open);
for ($scan = 0; $scan <= $count1 - $plus; $scan++)
{
list ($u_ip,$u_t) = explode("::","$file1[$scan]");
if ($u_t + $s_t > $time and $u_ip != $ip)
{
$plus++;
}
}
$online = $plus;
if ($online == "1")
{
$online = "1";
}
if ($online >= "2" and $online <= "4")
{
$online .= " человек";
}
if ($online >= "5")
{
$online .= " человек";
}

?>