File size: 861B
<?
Error_Reporting(E_ALL & ~E_NOTICE);
$dirs=scan_dirs("$dir_cache");
$c=count($dirs);
for($i=0;$i<$c;$i++)
{
if($dirs[$i]==".." || $dirs[$i]=="." || $dirs[$i]=="~") continue;
$fd=@file("$dir_cache/$dirs[$i]/file.dat");
$dat=explode("|",$fd[0]);
if(!isSet($dat[1])) $t=0; else $t=$dat[1];
$time=time();
if($time-$t>$set_loads_del)
{
$v=@del_files("$dir_cache/$dirs[$i]/");
@rmdir("$dir_cache/$dirs[$i]/");
}
}
$fs=scandir("$dir_temp");
$c=count($fs);
for($i=0;$i<$c;$i++)
{
if($fs[$i]==".." || $fs[$i]=="." || $fs[$i]=="~") continue;
if(!is_file("$dir_temp/$fs[$i]")) continue;
if(file_exists("$dir_temp/$fs[$i]") && rsh($fs[$i])=="lc")
{
$fp=@file_get_contents("$dir_temp/$fs[$i]");
$fp=@explode("|",$fp);
if(time()-$fp[2]>$set_code_time) @unlink("$dir_temp/$fs[$i]");
}
}
?>