<?
php
/* *
* visit | visit website Statistic
*
* @author : danny.Lu
* @email : dannytiehui@hotmail.com
* @company : simple byte
* @setchar : utf-8
* @edition : v1.3
* @date : 2007-12-10
*/
/*
*本程序可以直接运行,第一次可能因为当前目录下[count.dat]文件不存在报错,但不影响程序执行
*/
$online_log = " count.dat " ; // 保存人数的文件,
$timeout = 60 ; // 60秒内没动作者,认为掉线
$entries = file ( $online_log ); // 返回数组。数组中的每个单元都是文件中相应的一行
$temp = array ();
for ( $i = 0 ; $i < count ( $entries ); $i ++ ) {
$entry = explode ( " , " , trim ( $entries [ $i ]));
if (( $entry [ 0 ] != getenv ( ' REMOTE_ADDR ' )) && ( $entry [ 1 ] > time ())) {
array_push ( $temp , $entry [ 0 ] . " , " . $entry [ 1 ] . " " ); // 取出其他浏览者的信息,并去掉超时者,保存进$temp
}
}
array_push ( $temp , getenv ( ' REMOTE_ADDR ' ) . " , " . ( time () + ( $timeout )) . " " ); // 更新浏览者的时间
$users_online = count ( $temp ); // 计算在线人数
$entries = implode ( "" , $temp );
// 写入文件
$fp = fopen ( $online_log , " w " );
flock ( $fp , LOCK_EX); // flock() 不能在NFS以及其他的一些网络文件系统中正常工作---要取得独占锁定(写入的程序)
fputs ( $fp , $entries );
flock ( $fp , LOCK_UN); // 释放锁定
fclose ( $fp );
echo " 当前有 " . $users_online . " 人在线 " ;
?>
/* *
* visit | visit website Statistic
*
* @author : danny.Lu
* @email : dannytiehui@hotmail.com
* @company : simple byte
* @setchar : utf-8
* @edition : v1.3
* @date : 2007-12-10
*/
/*
*本程序可以直接运行,第一次可能因为当前目录下[count.dat]文件不存在报错,但不影响程序执行
*/
$online_log = " count.dat " ; // 保存人数的文件,
$timeout = 60 ; // 60秒内没动作者,认为掉线
$entries = file ( $online_log ); // 返回数组。数组中的每个单元都是文件中相应的一行
$temp = array ();
for ( $i = 0 ; $i < count ( $entries ); $i ++ ) {
$entry = explode ( " , " , trim ( $entries [ $i ]));
if (( $entry [ 0 ] != getenv ( ' REMOTE_ADDR ' )) && ( $entry [ 1 ] > time ())) {
array_push ( $temp , $entry [ 0 ] . " , " . $entry [ 1 ] . " " ); // 取出其他浏览者的信息,并去掉超时者,保存进$temp
}
}
array_push ( $temp , getenv ( ' REMOTE_ADDR ' ) . " , " . ( time () + ( $timeout )) . " " ); // 更新浏览者的时间
$users_online = count ( $temp ); // 计算在线人数
$entries = implode ( "" , $temp );
// 写入文件
$fp = fopen ( $online_log , " w " );
flock ( $fp , LOCK_EX); // flock() 不能在NFS以及其他的一些网络文件系统中正常工作---要取得独占锁定(写入的程序)
fputs ( $fp , $entries );
flock ( $fp , LOCK_UN); // 释放锁定
fclose ( $fp );
echo " 当前有 " . $users_online . " 人在线 " ;
?>