function insert_block($page)
{
//loop though the pages
if (strripos($page, ';') > 0) {
$files = explode(";", $page);
while ($file = current($files)) {
//TODO: check if file exist
$file = formatpath($file);
include $file;
next($files);
}
} else {
//TODO: check if file exist
$page = formatpath($page);
include $page;
}
}
function frame3()
{
global $islinux, $cmd_arg, $chmod_arg, $zip_dir, $fm_root_atual;
global $dir_dest, $dir_atual, $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($dir_atual . $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 = $dir_atual . $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($dir_atual . $old_name, $dir_atual . $new_name);
if (is_dir($dir_atual . $new_name)) {
reloadframe("parent", 2);
}
}
break;
case 4:
// delete sel
if (strstr($dir_atual, $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($dir_atual . $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($dir_atual . $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($dir_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_copy($dir_atual . $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($dir_atual . $selected_dir_list[$x], $dir_dest . $selected_dir_list[$x]);
}
}
reloadframe("parent", 2);
}
}
$dir_atual = $dir_dest;
}
}
break;
case 6:
// move sel
if (strlen($dir_dest)) {
if (strtoupper($dir_dest) != strtoupper($dir_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_move($dir_atual . $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($dir_atual . $selected_dir_list[$x], $dir_dest . $selected_dir_list[$x]);
}
}
reloadframe("parent", 2);
}
}
$dir_atual = $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' => $dir_atual, '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($dir_atual . $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' => $dir_atual, 'overwrite' => 1));
$zipfile->extract_files();
}
unset($zipfile);
reloadframe("parent", 2);
}
}
break;
case 8:
// delete arq/dir
if (strlen($cmd_arg)) {
if (file_exists($dir_atual . $cmd_arg)) {
total_delete($dir_atual . $cmd_arg);
}
if (is_dir($dir_atual . $cmd_arg)) {
reloadframe("parent", 2);
}
}
break;
case 9:
// CHMOD
if (strlen($chmod_arg) == 4 && strlen($dir_atual)) {
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($dir_atual . $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($dir_atual . $selected_dir_list[$x], $new_mod);
}
}
}
break;
}
if ($action != 10) {
dir_list_form();
}
} else {
dir_list_form();
}
echo "</body>\n</html>";
}
