inc/onlineUsers.php

   1 <?php\r
   2 $online_log="rabr_online_users.txt";\r
   3 $timeout=300;\r
   4 $entries=file($online_log);\r
   5 $temp=array();\r
   6 for($i=0;$i<count($entries);$i++){\r
   7 $entry=explode(",",trim($entries[$i]));\r
   8 if(($entry[0]!=getenv('REMOTE_ADDR'))&&($entry[1]>time())){\r
   9 array_push($temp,$entry[0].",".$entry[1]."\n");\r
  10 }\r
  11 }\r
  12 array_push($temp,getenv('REMOTE_ADDR').",".(time()+($timeout))."\n");\r
  13 $users_online=count($temp);\r
  14 $entries=implode("",$temp);\r
  15 $fp=fopen($online_log,"w");\r
  16 flock($fp,LOCK_EX);\r
  17 fputs($fp,$entries);\r
  18 flock($fp,LOCK_UN);\r
  19 fclose($fp);\r
  20 if($users_online==1){\r
  21 echo "Just you online!";\r
  22 }else{\r
  23 echo $users_online."  Users Online";\r
  24 }\r
  25 ?>