Ayola.net

Форумы вебмастеров => Общение => Тема начата: pro-fast от Июнь 06, 2008, 00:13:26



Название: Помогите расширить скрипт
Отправлено: pro-fast от Июнь 06, 2008, 00:13:26
Я написал скрипт кто онлайн :D и кароч хочу его расширить...
Код:
<?

$ip = $REMOTE_ADDR;
$time = time();
$minutes = 15;
$found = 0;
$users = 0;
$user  = "";

$tmpdata = $DOCUMENT_ROOT."/online/data";

if (!is_file("$tmpdata/online.txt"))
{
$s = fopen("$tmpdata/online.txt","w");
fclose($s);
chmod("$tmpdata/online.txt",0666);
}

$f = fopen("$tmpdata/online.txt","r+");
flock($f,2);

while (!feof($f))
{
$user[] = chop(fgets($f,65536));
}

fseek($f,0,SEEK_SET);
ftruncate($f,0);

foreach ($user as $line)
{
list($savedip,$savedtime) = split("\|",$line);
if ($savedip == $ip) {$savedtime = $time;$found = 1;}
if ($time < $savedtime + ($minutes * 60))
{
fputs($f,"$savedip|$savedtime\n");
$users = $users + 1;
}
}

if ($found == 0)
{
fputs($f,"$ip|$time\n");
$users = $users + 1;
}

fclose ($f);
print "Он-лайн:&nbsp;<font color=black>$users</font>
";
?>
ПОМОГИТЕ ПОЖАЛУЙСТА