View file dportal_0.2/file/online.php

<? 
// счетаем пользователей он-лайн и количество посещений:

$brauz=getenv('HTTP_USER_AGENT');
$agent="$REMOTE_ADDR";
$brauz=trim(htmlspecialchars(stripslashes(str_replace($ztex1, $ztex2, $brauz))));
$agent=trim(htmlspecialchars(stripslashes(str_replace($ztex1, $ztex2, $agent))));


$u_online=1;
$z_online=0;
$g_online=0;
if($login!=""){$z_online++; $ar_onluz[]=$login;} else {$g_online++;}

$ar_statistik=@file("../statistik");
$ar_pstat=@explode("<br/>", trim($ar_statistik[0]));

if($ar_statistik){
foreach($ar_statistik as $nomer => $val){
if($nomer!=0){
$ar_uzfile=explode("<br/>", trim($val));
if($ar_uzfile[0]==$brauz & $ar_uzfile[1]==$agent || ($time>($ar_uzfile[2]+300))){
$ar_statistik[$nomer]="";}
if($time<($ar_uzfile[2]+300) & ($ar_uzfile[0]!=$brauz || $ar_uzfile[1]!=$agent)){$u_online++; 
if($ar_uzfile[3]!=""){$z_online++; $ar_onluz[]=$ar_uzfile[3];} else {$g_online++;}}
if($ar_uzfile[0]==$brauz & $ar_uzfile[1]==$agent){$var_pos="xit";}
}}}


$tek_dat=date("d" , $time);
if($tek_dat!=$ar_pstat[0]){$ar_pstat[3]=$ar_pstat[1]; $ar_pstat[1]=0; $ar_pstat[0]=$tek_dat;}
if($var_pos!="xit"){$ar_pstat[1]++; $ar_pstat[2]++;}

$ar_statistik[0]=implode("<br/>", $ar_pstat); $ar_statistik[0]="$ar_statistik[0]\r\n";
$ar_statistik[]="$brauz<br/>$agent<br/>$time<br/>$login\r\n";

$ar_zapis=implode("", $ar_statistik);
$fp=@fopen("../statistik","w");
@fputs($fp,$ar_zapis);
@fclose($fp);
@chmod("../statistik",0777); 

$stat_seg=$ar_pstat[1]; //сегодня
$stat_vsego=$ar_pstat[2]; //всего
$stat_vchera=$ar_pstat[3]; //вчера
// $u_online - всего он-лайн
// $z_online - зарегистрированных он-лайн
// $g_online - гостей он-лайн
// $ar_onluz - массив с зарегистрированными он-лайн.


?>