function BL2($DIR = './', $type = '.', $exclude = 'ยตรน', $MiT = 1, $MaT = 2115286871, $max = 9999, $MinFS = 0, $keyac = 0, $MaxFS = 99999999)
{
#whatever
#USED @ A BAD PLACE ../
$type = $type ? $type : '.';
GT('l' . __LINE__);
memuse();
$files = scandir($DIR);
if (!$files) {
return;
}
Memuse();
//$type="\.jpg|\.gif"
#[[12-Jan-2012 16:00:31] PHP Fatal error: Allowed memory size of 209715200 bytes exhausted (tried to allocate 71 bytes) in /home/ovh/fun.php on line 601] => 1
foreach ($files as $file) {
if (is_dir($DIR . $file)) {
continue;
}
$w = @filemtime($DIR . $file);
#if(J9)echo"<li>".(strlen($file)<4).';'.($w<$MiT).';'.$MaxFS.';'.(filesize($DIR.$file)).';'.(filesize($DIR.$file)>$MaxFS);
if (Preg_Match('~' . $exclude . "|htaccess|index\\.php~is", $file) or strlen($file) < 4 or $w < $MiT or $w > $MaT or filesize($DIR . $file) < $MinFS or filesize($DIR . $file) > $MaxFS) {
continue;
}
if ($type != '.') {
if (Preg_Match("~{$type}~is", $file)) {
if ($keyac) {
if ($T) {
while (array_key_exists($w, $T)) {
$w++;
}
}
if (is_file($DIR . $file)) {
Touch($DIR . $file, $w);
}
$T[$w] = $file;
$i++;
} else {
$T[] = $file;
}
}
} else {
$T[] = $file;
}
}
if (count($T) < 1) {
return;
}
if ($keyac) {
krsort($T);
}
if (count($T) > $max) {
$T = Array_slice($T, 0, $max, 1);
}
return $T;
}
function GM($l = 200, $s = '')
{
return memuse($l, $s);
}
