Просмотр файла sistem/online.dat

<?php
//автор - figura
//сайт - http://f-pt.ru


$lin_avt_online = file($koren_dir.'/data/statstik/avt_online.dat');
$nom=count($lin_avt_online) - 1;

$file_avt_online = fopen($koren_dir.'/data/statstik/avt_online.dat', "w+");
flock ($file_avt_online,LOCK_EX);
$i = 0;
$var = $nom;
while($i <= $var)
{
   $cell=explode("<||>",$lin_avt_online[$i]);
   //$cell[0]=login
   //$cell[1]=microtime
   if($cell[0] != $login)
   {  
      $lin_time = time() - $cell[1];
      if($lin_time <= "300"){ fputs($file_avt_online,$cell[0]."<||>".$cell[1]."<||>\r\n"); }
   }
   ++$i;
}
if($status=="uzer" || $status=="moder" || $status=="admin")
{
   fputs($file_avt_online,$login."<||>".time()."<||>\r\n");
}
flock ($file_avt_online,LOCK_UN);
fclose($file_avt_online);
@chmod("$koren_dir/data/statstik/avt_online.dat", 0666);
$aonline = count(file($koren_dir.'/data/statstik/avt_online.dat'));

//////////////////////////////////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////////////////////////////////////


if(isset($_SERVER['HTTP_USER_AGENT'])){ $arbuz=htmlspecialchars($_SERVER['HTTP_USER_AGENT']); }else{ $arbuz=''; }
if(isset($_SERVER['REMOTE_ADDR'])){ $ip=htmlspecialchars($_SERVER['REMOTE_ADDR']); }else{ $ip=''; }

$lin_online = file($koren_dir.'/data/statstik/online.dat');
$nom=count($lin_online) - 1;

$file_online = fopen($koren_dir.'/data/statstik/online.dat', "w+");
flock ($file_online,LOCK_EX);
$i = 0;
$var = $nom;
while($i <= $var)
{
   $cell=explode("<||>",$lin_online[$i]);
   //$cell[0]=
   //$cell[1]=microtime
   if($cell[0] != $arbuz."<>".$ip)
   {
      $lin_time = time() - $cell[1];
      if($lin_time <= "300"){ fputs($file_online,$cell[0]."<||>".$cell[1]."<||>\r\n"); }
   }
   ++$i;
}
fputs($file_online,$arbuz."<>".$ip."<||>".time()."<||>\r\n");
flock ($file_online,LOCK_UN);
fclose($file_online);
@chmod("$koren_dir/data/statstik/online.dat", 0666);
$online = count(file($koren_dir.'/data/statstik/online.dat'));
?>