Просмотр файла book/blocking.php

<?php 
function CheckIP () 
{
$DELAY_TIME= 40;	
$flag= false;	
$fs= filesize('blocking.dat');
$f= fopen('blocking.dat', 'r');
flock($f, LOCK_SH);
$arr= @unserialize(fread($f, $fs));
flock($f, LOCK_UN);
fclose($f);
$IP= $_SERVER['REMOTE_ADDR'];
$IP=htmlspecialchars(stripslashes($IP));
$t= time();			
if (isset($arr)) { 
foreach ($arr as $k=>$v)
if ($v<$t) unset($arr[$k]);
} else $arr= array ();
if (!isset($arr[$IP])) {	// После чистки остался текущий IP?
$arr[$IP]= $t + $DELAY_TIME;	// Да. Снова делаем паузу в $DELAY_TIME
$flag= false;
} else {
$arr[$IP]= $t + $DELAY_TIME;	
$flag= true;
}
$f= fopen('blocking.dat', 'a+');	
flock($f, LOCK_EX);
ftruncate($f, 0);
@fwrite($f, serialize($arr));
fflush($f);
flock($f, LOCK_UN);
fclose($f);
return $flag;
}
?>