View file online.php

File size: 455B
<?php
$oa=file('online.dat');
$oe='';
$br=getenv('HTTP_USER_AGENT');
$ip=getenv('REMOTE_ADDR');
$t=time() - 300;
foreach($oa as $oc=>$os){
$osa=explode(':||:',$os);
if($br==$osa[0] && $ip==$osa[1]){ $oe=$oc; }
elseif(intval($osa[2]) < $t){
$oa[$oc]='';}
}
$oa[$oe]='';
$od=implode('',$oa);
$od2=$br.':||:'.$ip.':||:'.time()."\n";
$f=fopen('online.dat','w');
fputs($f,$od2.$od);
fclose($f);
$oa=file('online.dat');
echo count($oa);
?>