View file modules/counter/counter.php

<?php
##############################
##	     WAP-ENGINE 	    ##
##############################
##						    ##
## Автор : CHUMA			##
## e-mail : [email protected]		##
## WAP : http://wapeng.info ##
## ICQ : 13-14-11			##
##                        	##
##############################
##  ВЫ НЕ ИМЕЕТЕ ПРАВО      ##
##  ИЗМЕНЯТЬ КОД СКРИПТА    ##
##  ДЛЯ ДАЛЬНЕЙШЕГО         ##
##  РАСПРОСТРАНЕНИЯ         ##
##############################
$ip = $_SERVER['REMOTE_ADDR']; 
#Получаем ip запустившего скрипт компьютера
$date=date('d.m.y',time()); 
#Присваиваем переменной $date текущую дату

#Следующий блок считывает файл с ip адресами
$fo = fopen ("data/counter/ip.dat", 'r'); 
#Открываем файл
flock($fo,1); 
#"Запираем" файл для чтения. Если кто-то ещё захочет прочитать этот файл - его запрос "встанет в очередь"
$data = fread ($fo, filesize("data/counter/ip.dat")); 
#Считываем информацию из файла и присваиваем её переменной $data
flock($fo,3); 
# Разблокируем файл
fclose ($fo); 
#Закрываем файл

#Нижеследующий блок повторяет ту же самую процедуру с файлом counter.txt
$f = fopen ("data/counter/counter.dat", 'r');
flock($f,1);
$counts = fread ($f, filesize("data/counter/counter.dat"));
flock($f,3);
fclose ($f);

list($d,$total,$hits,$hosts)=explode("|",$counts);# Проходимся по данным счётчика и присваиваем их соответствующим переменным. 

#Проверяем, соответствует ли дата в файле счётчика текущей дате. 

if ($d!=$date)
{
$d=$date; 
#Обновляем дату
$hits=0; 
#Просмотров сегодня теперь равны нулю
$hosts=0; 
#То же самое с уникальными посетителями
$erase=fopen("data/counter/ip.dat",'w+'); 
#Открываем файл с ключём "w+" - это значит, что данные файла обнуляются и на их место мы записываем новые данные
flock($erase,2); 
#Запираем файл для записи
fputs($erase,""); 
#Записываем в файл "всемирное ничто"
flock($erase,3);
fclose($erase);
}


#Теперь проверяем, есть ли ip у нас в базе.
if (!stristr($data,$ip)) 
# Если нет
{
$file=fopen("data/counter/ip.dat",'a');
flock($file,2);
fputs($file,$ip."\r\n"); 
#Записываем новый ip в базу
flock($file,3);
fclose($file);
$total++; 
$hits++;
$hosts++;
#Прибавляем к значениям счётчика по единице
}
else 
#Если ip уже есть в базе, прибавляем по единице только хитам
{
$total++;
$hits++;
}

#Записываем новые данные счётчика в файл
$wfile=fopen("data/counter/counter.dat",'w+');
flock($wfile,2);
fputs($wfile,$d."|".$total."|".$hits."|".$hosts); 
#Записываем данные с разделителем ("|"), для удобной сортировки, которую мы проводили выше
flock($wfile,3);
fclose($wfile);
flock($wfile,3);
fclose($wfile);


if ($online=="1")
 {
  echo ("Online:");
  include ("modules/counter/online.php");
  echo ("<br />");
 }

#Всё, теперь можно выдавать пользователю показатели счётчика
echo ("Всего: $total<br />Хиты: $hits<br />Хосты: $hosts");
?>