Просмотр файла modules/counter/counter.php

<?php
$ip=getenv("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);

//Запись браузеров посетивших сайт
$agent = $_SERVER['HTTP_USER_AGENT'];
$fileagent1 = fopen("data/counter/agent.dat",'r');
$data1 = fread ($fileagent1, filesize("data/counter/agent.dat"));

if (!stristr($data1,$agent)) 
# Если нет
{
$fileagent = fopen("data/counter/agent.dat",'a');
fputs($fileagent,$agent."\r\n"); 
fclose($fileagent);
}
else 
{
 fclose($fileagent);
}

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

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