$then) {unlink ("$datadir/$lines[$k]");} // Блок считает ХОСТЫ (уникальных посетителей) usort($fline,"prcmp"); $numip="0"; $numsys="0"; $hi=0; $ab="0"; $ac="0"; do { $dt=explode("|",$fline[$hi]); if ($ab!=$dt[0]) {$ab=$dt[0]; $numip++;} if (isset($dt[2])) {if ($ac!=$dt[2]) {$ac=$dt[2]; $numsys++;}} $hi++; } while ($hi<$fitogo); $text.="$then|$fitogo|$numip|$numsys|\r\n"; } $k++; } while ($k<$itogo); $fp=fopen("$datadir/mainbase.dat","w"); flock ($fp,LOCK_EX); fputs($fp,"$text"); fflush ($fp);//очищение файлового буфера flock ($fp,LOCK_UN); fclose($fp); @chmod("$datadir/mainbase.dat", 0644); // сортируем данные $lines=file("$datadir/mainbase.dat"); $maxi=count($lines); usort($lines,"prcmp"); $host=$_SERVER["HTTP_HOST"]; $self=$_SERVER["PHP_SELF"]; $cnturl1="http://$host$self"; $cnturl1=str_replace("counter.php", "info.php", $cnturl1); $cnturl=str_replace("infomail.php", "counter.php", $cnturl1); // Формируем статистику посещений (ХИТЫ/ХОТСЫ) $msg=" Информация по посещаемости сайта
Сгенерирована по данным счётчика за $days дней: $cnturl

\r\n"; // выводим 1 график - ХИТЫ $msg.="\r\n"; for ($i=0; $i<$maxi; $i++) { $dtt=explode("|",$lines[$i]); $dtt[0]=date("d.m.y",$dtt[0]); $dttn=round($dtt[1]*$scale1); $msg.="\r\n"; } $msg.="\r\n"; for ($i=0; $i<$maxi; $i++) { $dtt=explode("|",$lines[$i]); if (!isset($m0)) {$m0=date("m",$dtt[0])-1;} if ($i==$maxi-1) {$m1=date("m",$dtt[0])-1;} $xday=date("d",$dtt[0]); $dayn=date("w",$dtt[0]); // Считаваем день недели по порядку if ($dayn=="0" or $dayn=="6") $weekstyle="bgcolor=#FF7979"; else $weekstyle=""; $msg.="\r\n"; } $mm1=$months[$m0]; $mm2=$months[$m1]; if ($mm1==$mm2) {$mm1="";} else {$mm1.=" - ";} $msg.=" К О Л - В О Х И Т О В $dtt[1] Дата $xday Месяц $mm1 $mm2 \r\n"; // выводим 2 график - ХОСТЫ $msg.="\r\n"; for ($i=0; $i<$maxi; $i++) { $dtt=explode("|",$lines[$i]); $dtt[0]=date("d.m.y",$dtt[0]); $dttn=round($dtt[2]*$scale2); $msg.="\r\n"; } $msg.="\r\n"; for ($i=0; $i\r\n"; $headers.="X-Mailer: PHP/".phpversion()."\r\n"; mail("$adminemail", "Статистика WR-Log за неделю ($host)",$msg,$headers); ?> К О Л - В О Х О С Т О В $dtt[2] Дата