Размер файла: 2.24Kb
<?php
/*
********************************************************************
* Название: Sad Raven's Click Counter *
********************************************************************
* Версия: 1.0 *
* Стоимость: бесплатный скрипт *
* Требования: PHP4 и выше *
* Платформа: любая *
* Язык: русский *
* Автор: Sad Raven (http://www.sad-raven.ru) *
********************************************************************
* Создан: 18 июня 2002 *
********************************************************************
*/
include("config.inc.php");
function daycount($group=0)
{
global $daydata, $go;
$today=(int)(time()/86400);
$daylog=file($daydata);
$cnt=count($daylog);
for($i=0;$i<$cnt;$i++)
{
list($day,$gr,$id,$count)=explode("::", $daylog[$i]);
if($today-$day > 7)
$daylog[$i] = "";
elseif(($day==$today) && ($go==$id))
{
$found=1;
$count++;
$daylog[$i]="$day::$gr::$id::$count::\r\n";
break;
}
}
if(!$found)
$daylog[$cnt]="$today::$group::$go::1::\r\n";
$str=implode($daylog,"");
$f=fopen($daydata, "w");
fwrite($f, $str);
fclose($f);
}
if(!isset($go))
exit;
$base=file($data);
$cnt=count($base);
for($i=1;$i<$cnt;$i++)
{
list($gr,$id,$count,$urls,$name)=explode("::", $base[$i]);
if($id==$go)
{
$count++;
$base[$i]="$gr::$id::$count::$urls::$name";
$base[0]=time()."\r\n";
$base_str=implode($base,"");
$f=fopen($data, "w");
fwrite($f, $base_str);
fclose($f);
if(!isset($url))
$url = $urls;
daycount($gr);
Header("Location: ".$url);
exit;
}
}
?>