<?php
/**
*
* This software is distributed under the GNU LGPL v3.0 license.
* @author Gemorroj
* @copyright 2008-2010 http://wapinet.ru
* @license http://www.gnu.org/licenses/lgpl-3.0.txt
* @link http://wapinet.ru/gmanager/
* @version 0.7.3
*
* PHP version >= 5.2.1
*
*/
require 'config.php';
$ms = microtime(true);
if ($GLOBALS['auth']) {
if (@$_SERVER['PHP_AUTH_USER'] != $GLOBALS['user_name'] || @$_SERVER['PHP_AUTH_PW'] != $GLOBALS['user_pass']) {
header('WWW-Authenticate: Basic realm="Authentification"');
header('HTTP/1.0 401 Unauthorized');
header("Content-type: text/html; charset=utf-8");
exit('<html><head><title>Error</title></head><body><p style="color:red;font-size:24pt;text-align:center">Unauthorized</p></body></html>');
}
}
function send_header($u = '')
{
/*
if (substr_count($u, 'MSIE')) {
header('Content-type: text/html; charset=UTF-8');
} else {
header('Content-type: application/xhtml+xml; charset=UTF-8');
}
*/
header('Content-type: text/html; charset=UTF-8');
header('Cache-control: no-cache');
// кол-во файлов на странице
$ip = isset($_POST['limit']);
$ig = isset($_GET['limit']);
$GLOBALS['limit'] = abs($ip ? $_POST['limit'] : ($ig ? $_GET['limit'] : (isset($_COOKIE['gmanager_limit']) ? $_COOKIE['gmanager_limit'] : $GLOBALS['limit'])));
if ($ip || $ig) {
setcookie('gmanager_limit', $GLOBALS['limit'], 2592000 + $_SERVER['REQUEST_TIME'], str_replace('\\', '/', dirname($_SERVER['PHP_SELF'])), $_SERVER['HTTP_HOST']);
}
}
function c($query = '', $c = '')
{
if (!$query) {
return '.';
} else {
if ($c) {
$current = str_replace('\\', '/', trim(rawurldecode($c)));
if ($GLOBALS['mode']->is_dir($current) || $GLOBALS['mode']->is_link($current)) {
$l = strrev($current);
if ($l[0] != '/') {
$current .= '/';
}
}
return $current;
} else {
$query = str_replace('\\', '/', trim(rawurldecode($query)));
if ($GLOBALS['mode']->is_dir($query) || $GLOBALS['mode']->is_link($query)) {
$l = strrev($query);
if ($l[0] != '/') {
$query .= '/';
}
}
return $query;
}
}
}
function this($current = '')
{
if ($GLOBALS['class'] != 'ftp') {
$realpath = realpath($current);
$realpath = $realpath ? $realpath : $current;
} else {
$realpath = $current;
}
$chmod = look_chmod($current);
$chmod = $chmod ? $chmod : (isset($_POST['chmod'][0]) ? htmlspecialchars($_POST['chmod'][0], ENT_NOQUOTES) : (isset($_POST['chmod']) ? htmlspecialchars($_POST['chmod'], ENT_NOQUOTES) : 0));
$d = dirname(str_replace('\\', '/', $realpath));
$archive = is_archive(get_type(basename($current)));
if ($GLOBALS['mode']->is_dir($current) || $GLOBALS['mode']->is_link($current)) {
if ($current == '.') {
return '<div class="border">' . $GLOBALS['lng']['dir'] . ' <strong><a href="index.php">' . htmlspecialchars($GLOBALS['mode']->getcwd(), ENT_NOQUOTES) . '</a></strong> (' . look_chmod($GLOBALS['mode']->getcwd()) . ')<br/></div>';
} else {
return '<div class="border">' . $GLOBALS['lng']['back'] . ' <a href="index.php?' . str_replace('%2F', '/', rawurlencode($d)) . '">' . $d . '</a> (' . look_chmod($d) . ')<br/></div><div class="border">' . $GLOBALS['lng']['dir'] . ' <strong><a href="index.php?' . str_replace('%2F', '/', rawurlencode($current)) . '">' . htmlspecialchars(str_replace('\\', '/', $realpath), ENT_NOQUOTES) . '</a></strong> (' . $chmod . ')<br/></div>';
}
} else if ($GLOBALS['mode']->is_file($current) && $archive) {
$up = dirname($d);
return '<div class="border">' . $GLOBALS['lng']['back'] . ' <a href="index.php?' . str_replace('%2F', '/', rawurlencode($up)) . '">' . htmlspecialchars($up, ENT_NOQUOTES) . '</a> (' . look_chmod($up) . ')<br/></div><div class="border">' . $GLOBALS['lng']['dir'] . ' <strong><a href="index.php?' . str_replace('%2F', '/', rawurlencode($d)) . '">' . $d . '</a></strong> (' . look_chmod($d) . ')<br/></div><div class="border">' . $GLOBALS['lng']['file'] . ' <strong><a href="index.php?' . str_replace('%2F', '/', rawurlencode($current)) . '">' . htmlspecialchars(str_replace('\\', '/', $realpath), ENT_NOQUOTES) . '</a></strong> (' . $chmod . ')<br/></div>';
} else {
$up = dirname($d);
return '<div class="border">' . $GLOBALS['lng']['back'] . ' <a href="index.php?' . str_replace('%2F', '/', rawurlencode($up)) . '">' . htmlspecialchars($up, ENT_NOQUOTES) . '</a> (' . look_chmod($up) . ')<br/></div><div class="border">' . $GLOBALS['lng']['dir'] . ' <strong><a href="index.php?' . str_replace('%2F', '/', rawurlencode($d)) . '">' . $d . '</a></strong> (' . look_chmod($d) . ')<br/></div><div class="border">' . $GLOBALS['lng']['file'] . ' <strong><a href="edit.php?' . str_replace('%2F', '/', rawurlencode($current)) . '">' . htmlspecialchars(str_replace('\\', '/', $realpath), ENT_NOQUOTES) . '</a></strong> (' . $chmod . ')<br/></div>';
}
}
function static_name($current = '', $dest = '')
{
$substr = 'iconv_substr';
if (!$len = iconv_strlen($current)) {
$len = strlen($current);
$substr = 'substr';
}
if ($substr($dest, 0, $len) == $current) {
$static = $substr($dest, $len);
if (strpos($static, '/')) {
$static = strtok($static, '/');
}
} else {
return '';
}
return $static;
}
function look($current = '', $itype = '', $down = '')
{
if (!$GLOBALS['mode']->is_dir($current) || !$GLOBALS['mode']->is_readable($current)) {
echo '<tr><td class="red" colspan="' . (array_sum($GLOBALS['index']) + 1) . '">' . $GLOBALS['lng']['permission_denided'] . '</td></tr>';
return;
}
$out = $t = $add = $html = '';
$page = $page0 = $page1 = $page2 = array();
$i = 0;
if ($GLOBALS['target']) {
$t = ' target="_blank"';
}
if ($GLOBALS['ia']) {
$add = '&go=1&add_archive=' . str_replace('%2F', '/', rawurlencode($_GET['add_archive']));
}
if ($itype == 'time') {
$out = '&time';
} else if ($itype == 'type') {
$out = '&type';
} else if ($itype == 'size') {
$out = '&size';
} else if ($itype == 'chmod') {
$out = '&chmod';
}
$out .= $down ? '&down' : '&up';
$key = $type = $isize = $uid = $chmod = $name = $time = '';
if ($itype == 'time') {
$key = & $time;
} else if ($itype == 'type') {
$key = & $type;
} else if ($itype == 'size') {
$key = & $isize;
} else if ($itype == 'chmod') {
$key = & $chmod;
} else if ($itype == 'uid') {
$key = & $uid;
} else {
$key = & $name;
}
foreach ($GLOBALS['mode']->iterator($current) as $file) {
$i++;
$pname = $pdown = $ptype = $psize = $pchange = $pdel = $pchmod = $pdate = $puid = $uid = $name = $size = $isize = $chmod = '';
/*
if (substr($file, -1) == '/') {
$file = iconv_substr($file, 0, iconv_strlen($file)-1);
}
*/
if ($current != '.') {
$file = $current . $file;
}
$basename = basename($file);
$r_file = str_replace('%2F', '/', rawurlencode($file));
$stat = $GLOBALS['mode']->stat($file);
$time = $stat['mtime'];
if ($GLOBALS['mode']->is_link($file)) {
$type = 'LINK';
$tmp = $GLOBALS['mode']->readlink($file);
$r_file = str_replace('%2F', '/', rawurlencode($tmp[1]));
if ($GLOBALS['index']['name']) {
$name = htmlspecialchars(str_link($tmp[0]), ENT_NOQUOTES);
$pname = '<td><a href="index.php?c=' . $r_file . '/' . $add . '">' . $name . '/</a></td>';
}
if ($GLOBALS['index']['down']) {
$pdown = '<td> </td>';
}
if ($GLOBALS['index']['type']) {
$ptype = '<td>LINK</td>';
}
if ($GLOBALS['index']['size']) {
$isize = $stat['size'];
$size = format_size($isize);
$psize = '<td>' . $size . '</td>';
}
if ($GLOBALS['index']['change']) {
$pchange = '<td><a href="change.php?' . $r_file . '/">' . $GLOBALS['lng']['ch'] . '</a></td>';
}
if ($GLOBALS['index']['del']) {
$pdel = '<td><a' . ($GLOBALS['del_notify'] ? ' onclick="return confirm(\'' . $GLOBALS['lng']['del_notify'] . '\')"' : '') . ' href="change.php?go=del&c=' . $r_file . '/">' . $GLOBALS['lng']['dl'] . '</a></td>';
}
if ($GLOBALS['index']['chmod']) {
$chmod = look_chmod($file);
$pchmod = '<td><a href="change.php?go=chmod&c=' . $r_file . '">' . $chmod . '</a></td>';
}
if ($GLOBALS['index']['date']) {
$pdate = '<td>' . strftime($GLOBALS['date_format'], $time) . '</td>';
}
if ($GLOBALS['index']['uid']) {
$puid = '<td>' . htmlspecialchars($stat['name'], ENT_NOQUOTES) . '</td>';
}
$page0[$key . '_'][$i] = '<td class="check"><input name="check[]" type="checkbox" value="' . $r_file . '"/></td>' . $pname . $pdown . $ptype . $psize . $pchange . $pdel . $pchmod . $pdate. $puid;
} else if ($GLOBALS['mode']->is_dir($file)) {
$type = 'DIR';
if ($GLOBALS['index']['name']) {
if ($GLOBALS['realname'] == 1) {
$realpath = realpath($file);
$name = $realpath ? str_replace('\\', '/', $realpath) : $file;
} else if ($GLOBALS['realname'] == 2) {
$name = $basename;
} else {
$name = $file;
}
$name = htmlspecialchars(str_link($name), ENT_NOQUOTES);
$pname = '<td><a href="index.php?c=' . $r_file . '/' . $add . '">' . $name . '/</a></td>';
}
if ($GLOBALS['index']['down']) {
$pdown = '<td> </td>';
}
if ($GLOBALS['index']['type']) {
$ptype = '<td>DIR</td>';
}
if ($GLOBALS['index']['size']) {
if ($GLOBALS['dir_size']) {
$isize = size($file, true);
$size = format_size($isize);
} else {
$isize = $size = $GLOBALS['lng']['unknown'];
}
$psize = '<td>' . $size . '</td>';
}
if ($GLOBALS['index']['change']) {
$pchange = '<td><a href="change.php?' . $r_file . '/">' . $GLOBALS['lng']['ch'] . '</a></td>';
}
if ($GLOBALS['index']['del']) {
$pdel = '<td><a' . ($GLOBALS['del_notify'] ? ' onclick="return confirm(\'' . $GLOBALS['lng']['del_notify'] . '\')"' : '') . ' href="change.php?go=del&c=' . $r_file . '/">' . $GLOBALS['lng']['dl'] . '</a></td>';
}
if ($GLOBALS['index']['chmod']) {
$chmod = look_chmod($file);
$pchmod = '<td><a href="change.php?go=chmod&c=' . $r_file . '">' . $chmod . '</a></td>';
}
if ($GLOBALS['index']['date']) {
$pdate = '<td>' . strftime($GLOBALS['date_format'], $time) . '</td>';
}
if ($GLOBALS['index']['uid']) {
$puid = '<td>' . htmlspecialchars($stat['name'], ENT_NOQUOTES) . '</td>';
}
$page1[$key . '_'][$i] = '<td class="check"><input name="check[]" type="checkbox" value="' . $r_file . '"/></td>' . $pname . $pdown . $ptype . $psize . $pchange . $pdel . $pchmod . $pdate. $puid;
} else {
$type = htmlspecialchars(get_type($basename), ENT_NOQUOTES);
$archive = is_archive($type);
if ($GLOBALS['index']['name']) {
if ($GLOBALS['realname'] == 1) {
$realpath = realpath($file);
$name = $realpath ? str_replace('\\', '/', $realpath) : $file;
} else if ($GLOBALS['realname'] == 2) {
$name = $basename;
} else {
$name = $file;
}
$name = htmlspecialchars(str_link($name), ENT_NOQUOTES);
if ($archive) {
$pname = '<td><a href="index.php?' . $r_file . '">' . $name . '</a><br/><a class="submit" href="change.php?go=1&c=' . $r_file . '&mega_full_extract=1">' . $GLOBALS['lng']['extract_archive'] . '</a></td>';
} else {
if ($type == 'SQL') {
$pname = '<td><a href="edit.php?' . $r_file . '"' . $t . '>' . $name . '</a><br/><a class="submit" href="change.php?go=tables&c=' . $r_file . '">' . $GLOBALS['lng']['tables'] . '</a><br/><a class="submit" href="change.php?go=installer&c=' . $r_file . '">' . $GLOBALS['lng']['create_sql_installer'] . '</a></td>';
} else {
$pname = '<td><a href="edit.php?' . $r_file . '"' . $t . '>' . $name . '</a></td>';
}
}
}
if ($GLOBALS['index']['down']) {
$pdown = '<td><a href="change.php?get=' . $r_file . '">' . $GLOBALS['lng']['get'] . '</a></td>';
}
if ($GLOBALS['index']['type']) {
$ptype = '<td>' . $type . '</td>';
}
if ($GLOBALS['index']['size']) {
$isize = $stat['size'];
$size = format_size($stat['size']);
$psize = '<td>' . $size . '</td>';
}
if ($GLOBALS['index']['change']) {
$pchange = '<td><a href="change.php?' . $r_file . '">' . $GLOBALS['lng']['ch'] . '</a></td>';
}
if ($GLOBALS['index']['del']) {
$pdel = '<td><a' . ($GLOBALS['del_notify'] ? ' onclick="return confirm(\'' . $GLOBALS['lng']['del_notify'] . '\')"' : '') . ' href="change.php?go=del&c=' . $r_file . '">' . $GLOBALS['lng']['dl'] . '</a></td>';
}
if ($GLOBALS['index']['chmod']) {
$chmod = look_chmod($file);
$pchmod = '<td><a href="change.php?go=chmod&c=' . $r_file . '">' . $chmod . '</a></td>';
}
if ($GLOBALS['index']['date']) {
$pdate = '<td>' . strftime($GLOBALS['date_format'], $time) . '</td>';
}
if ($GLOBALS['index']['uid']) {
$puid = '<td>' . htmlspecialchars($stat['name'], ENT_NOQUOTES) . '</td>';
}
$page2[$key . '_'][$i] = '<td class="check"><input name="check[]" type="checkbox" value="' . $r_file . '"/></td>' . $pname . $pdown . $ptype . $psize . $pchange . $pdel . $pchmod . $pdate . $puid;
}
}
$p = array_merge($page0, $page1, $page2);
$a = array_keys($page0);
$b = array_keys($page1);
$c = array_keys($page2);
unset($page0, $page1, $page2);
natcasesort($a);
natcasesort($b);
natcasesort($c);
if ($down) {
$a = array_reverse($a, false);
$b = array_reverse($b, false);
$c = array_reverse($c, false);
}
foreach (array_merge($a, $b, $c) as $var) {
foreach ($p[$var] as $f) {
$page[] = $f;
}
}
unset($p, $a, $b, $c);
$all = ceil(sizeof($page) / $GLOBALS['limit']);
$pg = isset($_GET['pg']) ? intval($_GET['pg']) : 1;
if ($pg < 1) {
$pg = 1;
}
$page = array_slice($page, ($pg * $GLOBALS['limit']) - $GLOBALS['limit'], $GLOBALS['limit']);
if ($page) {
$i = 1;
$line = false;
if ($GLOBALS['index']['n']) {
foreach ($page as $var) {
$line = !$line;
if ($line) {
$html .= '<tr class="border">' . $var . '<td>' . ($i++) . '</td></tr>';
} else {
$html .= '<tr class="border2">' . $var . '<td>' . ($i++) . '</td></tr>';
}
}
} else {
foreach ($page as $var) {
$line = !$line;
if ($line) {
$html .= '<tr class="border">' . $var . '</tr>';
} else {
$html .= '<tr class="border2">' . $var . '</tr>';
}
}
}
} else {
$html .= '<tr class="border"><th colspan="' . (array_sum($GLOBALS['index']) + 1) . '">' . $GLOBALS['lng']['dir_empty'] . '</th></tr>';
}
echo $html . go($pg, $all, '&c=' . $current . $out . $add);
}
function copy_d($dest = '', $source = '', $to = '')
{
$ex = explode('/', $source);
$tmp1 = $tmp2 = '';
foreach (explode('/', $to) as $var) {
$ch = each($ex);
$tmp1 .= $var . '/';
$tmp2 .= $ch[1] . '/';
if (!$GLOBALS['mode']->is_dir($tmp1)) {
$GLOBALS['mode']->mkdir($tmp1, look_chmod($tmp2));
}
}
}
function copy_files($d = '', $dest = '', $static = '', $overwrite = false)
{
$error = array();
foreach ($GLOBALS['mode']->iterator($d) as $file) {
if ($file == $static) {
continue;
}
if ($d == $dest) {
break;
}
$ch = look_chmod($d . '/' . $file);
if ($GLOBALS['mode']->is_dir($d . '/' . $file)) {
if ($GLOBALS['mode']->mkdir($dest . '/' . $file, $ch)) {
$GLOBALS['mode']->chmod($dest, $ch);
copy_files($d . '/' . $file, $dest . '/' . $file, $static, $overwrite);
} else {
$error[] = str_replace('%dir%', htmlspecialchars($d . '/' . $file, ENT_NOQUOTES), $GLOBALS['lng']['copy_files_false']) . ' (' . error() . ')';
}
} else {
if ($overwrite || !$GLOBALS['mode']->file_exists($dest . '/' . $file)) {
if (!$GLOBALS['mode']->copy($d . '/' . $file, $dest . '/' . $file, $ch)) {
$error[] = str_replace('%file%', htmlspecialchars($d . '/' . $file, ENT_NOQUOTES), $GLOBALS['lng']['copy_file_false']) . ' (' . error() . ')';
}
} else {
$error[] = $GLOBALS['lng']['overwrite_false'] . ' (' . htmlspecialchars($dest . '/' . $file, ENT_NOQUOTES) . ')';
}
}
}
if ($error) {
return report(implode('<br/>', $error), 2);
} else {
return report(str_replace('%dir%', htmlspecialchars($dest, ENT_NOQUOTES), $GLOBALS['lng']['copy_files_true']), 0);
}
}
function move_files($d = '', $dest = '', $static = '', $overwrite = false)
{
$error = array();
foreach ($GLOBALS['mode']->iterator($d) as $file) {
if ($file == $static) {
continue;
}
if ($d == $dest) {
break;
}
$ch = look_chmod($d . '/' . $file);
if ($GLOBALS['mode']->is_dir($d . '/' . $file)) {
if ($GLOBALS['mode']->mkdir($dest . '/' . $file, $ch)) {
$GLOBALS['mode']->chmod($dest . '/' . $file, $ch);
move_files($d . '/' . $file, $dest . '/' . $file, $static, $overwrite);
$GLOBALS['mode']->rmdir($d . '/' . $file);
} else {
$error[] = str_replace('%dir%', htmlspecialchars($d . '/' . $file, ENT_NOQUOTES), $GLOBALS['lng']['move_files_false']) . ' (' . error() . ')';
}
} else {
if ($overwrite || !$GLOBALS['mode']->file_exists($dest . '/' . $file)) {
if ($GLOBALS['mode']->rename($d . '/' . $file, $dest . '/' . $file)) {
$GLOBALS['mode']->chmod($dest . '/' . $file, $ch);
} else {
$error[] = str_replace('%file%', htmlspecialchars($d . '/' . $file, ENT_NOQUOTES), $GLOBALS['lng']['move_file_false']) . ' (' . error() . ')';
}
} else {
$error[] = $GLOBALS['lng']['overwrite_false'] . ' (' . htmlspecialchars($dest . '/' . $file, ENT_NOQUOTES) . ')';
}
}
}
if ($error) {
return report(implode('<br/>', $error), 2);
} else {
$GLOBALS['mode']->rmdir($d);
return report(str_replace('%dir%', htmlspecialchars($dest, ENT_NOQUOTES), $GLOBALS['lng']['move_files_true']), 0);
}
}
function copy_file($source = '', $dest = '', $chmod = '' /* 0644 */, $overwrite = false)
{
if (!$overwrite && $GLOBALS['mode']->file_exists($dest)) {
return report($GLOBALS['lng']['overwrite_false'] . ' (' . htmlspecialchars($dest, ENT_NOQUOTES) . ')', 1);
}
if ($source == $dest) {
if ($chmod) {
rechmod($dest, $chmod);
}
return report(htmlspecialchars(str_replace('%file%', $source, $GLOBALS['lng']['move_file_true'])), 0);
}
$d = dirname($dest);
copy_d($d, dirname($source), $d);
if ($GLOBALS['mode']->copy($source, $dest)) {
if (!$chmod) {
$chmod = look_chmod($source);
}
rechmod($dest, $chmod);
return report(htmlspecialchars(str_replace('%file%', $source, $GLOBALS['lng']['copy_file_true'])), 0);
} else {
return report(htmlspecialchars(str_replace('%file%', $source, $GLOBALS['lng']['copy_file_false'])) . '<br/>' . error(), 2);
}
}
function move_file($source = '', $dest = '', $chmod = '' /* 0644 */, $overwrite = false)
{
if (!$overwrite && $GLOBALS['mode']->file_exists($dest)) {
return report($GLOBALS['lng']['overwrite_false'] . ' (' . htmlspecialchars($dest, ENT_NOQUOTES) . ')', 1);
}
if ($source == $dest) {
if ($chmod) {
rechmod($dest, $chmod);
}
return report(htmlspecialchars(str_replace('%file%', $source, $GLOBALS['lng']['move_file_true'])), 0);
}
$d = dirname($dest);
copy_d($d, dirname($source), $d);
if ($GLOBALS['mode']->rename($source, $dest)) {
if (!$chmod) {
$chmod = look_chmod($source);
}
rechmod($dest, $chmod);
return report(htmlspecialchars(str_replace('%file%', $source, $GLOBALS['lng']['move_file_true'])), 0);
} else {
return report(htmlspecialchars(str_replace('%file%', $source, $GLOBALS['lng']['move_file_false'])) . '<br/>' . error(), 2);
}
}
function del_file($f = '')
{
//$f = rawurldecode($f);
if ($GLOBALS['mode']->unlink($f)) {
return report($GLOBALS['lng']['del_file_true'] . ' -> ' . htmlspecialchars($f, ENT_NOQUOTES), 0);
} else {
return report($GLOBALS['lng']['del_file_false'] . ' -> ' . htmlspecialchars($f, ENT_NOQUOTES) . '<br/>' . error(), 2);
}
}
function del_dir($d = '')
{
$err = '';
//$d = rawurldecode($d);
$GLOBALS['mode']->chmod($d, '0777');
foreach ($GLOBALS['mode']->iterator($d) as $f) {
$realpath = realpath($d . '/' . $f);
$f = $realpath ? str_replace('\\', '/', $realpath) : str_replace('//', '/', $d . '/' . $f);
$GLOBALS['mode']->chmod($f, '0777');
if ($GLOBALS['mode']->is_dir($f) && !@$GLOBALS['mode']->rmdir($f)) {
del_dir($f . '/');
$GLOBALS['mode']->rmdir($f);
} else {
if (!$GLOBALS['mode']->unlink($f)) {
$err .= $f . '<br/>';
}
}
}
if (!$GLOBALS['mode']->rmdir($d)) {
$err .= error() . '<br/>';
}
if ($err) {
return report($GLOBALS['lng']['del_dir_false'] . '<br/>' . $err, 1);
}
return report($GLOBALS['lng']['del_dir_true'] . ' -> ' . htmlspecialchars($d, ENT_NOQUOTES), 0);
}
function size($source = '', $is_dir = false)
{
if ($is_dir) {
$ds = array($source);
$sz = 0;
do {
$d = array_shift($ds);
foreach ($GLOBALS['mode']->iterator($d) as $file) {
if ($GLOBALS['mode']->is_dir($d . '/' . $file)) {
$ds[] = $d . '/' . $file;
} else {
$sz += $GLOBALS['mode']->filesize($d . '/' . $file);
}
}
} while (sizeof($ds) > 0);
return $sz;
}
return $GLOBALS['mode']->filesize($source);
}
function format_size($size = '', $int = 2) {
if ($size === false) {
return $GLOBALS['lng']['unknown'];
} else if ($size < 1024) {
return $size . ' Byte';
} else if ($size < 1048576) {
return round($size / 1024, $int) . ' Kb';
} else if ($size < 1073741824) {
return round($size / 1048576, $int) . ' Mb';
} else {
return round($size / 1073741824, $int) . ' Gb';
}
}
function look_chmod($file = '')
{
return substr(sprintf('%o', $GLOBALS['mode']->fileperms($file)), -4);
}
function create_file($file = '', $text = '', $chmod = '0644')
{
create_dir(dirname($file));
if ($GLOBALS['mode']->file_put_contents($file, $text)) {
return report($GLOBALS['lng']['fputs_file_true'], 0) . rechmod($file, $chmod);
} else {
return report($GLOBALS['lng']['fputs_file_false'] . '<br/>' . error(), 2);
}
}
function rechmod($current = '', $chmod = '0755')
{
//$current = rawurldecode($current);
settype($chmod, 'string');
$strlen = strlen($chmod);
if (!is_numeric($chmod) || ($strlen != 3 && $strlen != 4)) {
return report($GLOBALS['lng']['chmod_mode_false'], 2);
}
if ($strlen == 3) {
$chmod = '0' . $chmod;
}
if ($GLOBALS['mode']->chmod($current, $chmod)) {
return report($GLOBALS['lng']['chmod_true'] . ' -> ' . htmlspecialchars($current, ENT_NOQUOTES) . ' : ' . $chmod, 0);
} else {
return report($GLOBALS['lng']['chmod_false'] . ' -> ' . htmlspecialchars($current, ENT_NOQUOTES) . '<br/>' . error(), 2);
}
}
function create_dir($dir = '', $chmod = '0755')
{
$tmp = $tmp2 = $err = '';
$i = 0;
$g = explode(DIRECTORY_SEPARATOR, getcwd());
foreach (explode('/', $dir) as $d) {
$tmp .= $d . '/';
if (isset($g[$i])) {
$tmp2 .= $g[$i] . '/';
}
if ($tmp == $tmp2 || $GLOBALS['mode']->is_dir($tmp)) {
$i++;
continue;
}
if (!$GLOBALS['mode']->mkdir($tmp, $chmod)) {
$err .= error() . ' -> ' . htmlspecialchars($tmp, ENT_NOQUOTES) . '<br/>';
}
$i++;
}
if ($err) {
return report($GLOBALS['lng']['create_dir_false'] . '<br/>' . $err, 2);
} else {
return report($GLOBALS['lng']['create_dir_true'], 0);
}
}
function frename($current = '', $name = '', $chmod = '' /* 0644 */, $del = '', $to = '', $overwrite = false)
{
// $current = rawurldecode($current);
if ($GLOBALS['mode']->is_dir($current)) {
copy_d($name, $current, $to);
if ($del) {
return move_files($current, $name, static_name($current, $name), $overwrite);
} else {
return copy_files($current, $name, static_name($current, $name), $overwrite);
}
} else {
if ($del) {
return move_file($current, $name, $chmod, $overwrite);
} else {
return copy_file($current, $name, $chmod, $overwrite);
}
}
}
function syntax($source = '', $charset = array())
{
if (!$GLOBALS['mode']->is_file($source)) {
return report($GLOBALS['lng']['not_found'], 2);
}
exec(escapeshellcmd($GLOBALS['php']) . ' -c -f -l ' . escapeshellarg($source), $rt, $v);
$error = error();
$size = sizeof($rt);
if (!$size) {
return report($GLOBALS['lng']['syntax_not_check'] . '<br/>' . $error, 2);
}
$erl = false;
$page = '';
if ($v == 255 || $size > 2) {
if ($st = trim(strip_tags($rt[1]))) {
$erl = preg_replace('/.*\s(\d*)$/', '$1', $st, 1);
$pg = $st;
} else {
$pg = $GLOBALS['lng']['syntax_unknown'];
}
} else {
$pg = $GLOBALS['lng']['syntax_true'];
}
$fl = trim($GLOBALS['mode']->file_get_contents($source));
if ($charset[0]) {
$fl = iconv($charset[0], $charset[1] . '//TRANSLIT', $fl);
}
return report($pg, $erl ? 1 : 0) . code($fl, $erl);
}
function syntax2($current = '', $charset = array())
{
if (!$charset[0]) {
$charset[0] = 'UTF-8';
}
$fp = fsockopen('wapinet.ru', 80, $er1, $er2, 10);
if (!$fp) {
return report($GLOBALS['lng']['syntax_not_check'] . '<br/>' . error(), 1);
}
$f = rawurlencode(trim($GLOBALS['mode']->file_get_contents($current)));
fputs($fp, 'POST /syntax2/index.php HTTP/1.0' . "\r\n" .
'Content-type: application/x-www-form-urlencoded; charset=' . $charset[0] . "\r\n" .
'Content-length: ' . (iconv_strlen($f) + 2) . "\r\n" .
'Host: wapinet.ru' . "\r\n" .
'Connection: close' . "\r\n" .
'User-Agent: GManager ' . $GLOBALS['version'] . "\r\n\r\n" .
'f=' . $f . "\r\n\r\n");
$r = '';
while ($r != "\r\n") {
$r = fgets($fp);
}
$r = '';
while (!feof($fp)) {
$r .= fread($fp, 1024);
}
fclose($fp);
return trim($r);
}
function zip_syntax($current = '', $f = '', $charset = array())
{
$content = edit_zip_file($current, $f);
$tmp = $GLOBALS['temp'] . '/GmanagerSyntax' . $_SERVER['REQUEST_TIME'] . '.tmp';
$fp = fopen($tmp, 'w');
if (!$fp) {
return report($GLOBALS['lng']['syntax_not_check'] . '<br/>' . error(), 1);
}
fputs($fp, $content['text']);
fclose($fp);
if ($GLOBALS['syntax']) {
$pg = syntax2($tmp, $charset);
} else {
$pg = syntax($tmp, $charset);
}
unlink($tmp);
return $pg;
}
function validator($current = '', $charset = array())
{
if (!extension_loaded('xml')) {
return report($GLOBALS['lng']['disable_function'] . ' (xml)', 1);
}
$fl = $GLOBALS['mode']->file_get_contents($current);
if ($charset[0]) {
$fl = iconv($charset[0], $charset[1] . '//TRANSLIT', $fl);
}
$xml_parser = xml_parser_create();
if (!xml_parse($xml_parser, $fl)) {
$err = xml_error_string(xml_get_error_code($xml_parser));
$line = xml_get_current_line_number($xml_parser);
$column = xml_get_current_column_number($xml_parser);
xml_parser_free($xml_parser);
return report('Error [Line ' . $line . ', Column ' . $column . ']: ' . $err, 1) . code($fl, $line);
} else {
xml_parser_free($xml_parser);
return report($GLOBALS['lng']['validator_true'], 0) . code($fl);
}
}
function xhtml_highlight($fl = '')
{
return str_replace(array(' ', '<code>', '</code>'), array(' ', '', ''), preg_replace('#color="(.*?)"#', 'style="color: $1"', str_replace(array('<font ', '</font>'), array('<span ', '</span>'), highlight_string($fl, true))));
}
function url_highlight($fl = '')
{
return '<code>' . nl2br(preg_replace("~("|')[^<>]*("|')~iU",
'<span style="color:#DD0000">$0</span>', preg_replace("~<!--.*-->~iU",
'<span style="color:#FF8000">$0</span>', preg_replace("~(<[^\s!]*\s)([^<>]*)([/?]?>)~iU",
'$1<span style="color:#007700">$2</span>$3', preg_replace("~<[^<>]*>~iU",
'<span style="color:#0000BB">$0</span>', htmlspecialchars($fl, ENT_QUOTES)))))) .
'</code>';
}
function code($fl = '', $line = 0)
{
$array = explode('<br />', xhtml_highlight($fl));
$all = sizeof($array);
$len = strlen($all);
$page = '';
for ($i = 0; $i < $all; ++$i) {
$next = $i + 1;
$l = strlen($next);
$page .= '<span class="' . ($line == $next ? 'fail_code' : 'true_code') . '">' . ($l < $len ? str_repeat(' ', $len - $l) : '') . $next . '</span> ' . $array[$i] . '<br/>';
}
return '<div class="code"><code>' . $page . '</code></div>';
}
function rename_zip_file($current, $name, $arch_name, $del, $overwrite)
{
require_once $GLOBALS['pclzip'];
$tmp = $GLOBALS['temp'] . '/GmanagerZip' . $_SERVER['REQUEST_TIME'];
$zip = new PclZip($GLOBALS['class'] == 'ftp' ? ftp_archive_start($current) : $current);
$folder = '';
foreach ($zip->extract(PCLZIP_OPT_PATH, $tmp) as $f) {
if ($f['status'] != 'ok') {
clean($tmp);
if ($GLOBALS['class'] == 'ftp') {
ftp_archive_end();
}
return report($GLOBALS['lng']['extract_false'], 1);
break;
}
if ($arch_name == $f['stored_filename']) {
$folder = $f['folder'];
}
}
if (file_exists($tmp . '/' . $name)) {
if ($overwrite) {
if ($folder) {
clean($tmp . '/' . $name);
} else {
unlink($tmp . '/' . $name);
}
} else {
clean($tmp);
if ($GLOBALS['class'] == 'ftp') {
ftp_archive_end();
}
return report($GLOBALS['lng']['overwrite_false'], 1);
break;
}
}
if ($folder) {
@mkdir($tmp . '/' . $name, 0755, true);
} else {
@mkdir($tmp . '/' . dirname($name), 0755, true);
}
if ($folder) {
// переделать на ftp
if ($del) {
$result = move_files($tmp . '/' . $name, $tmp . '/' . $arch_name);
} else {
$result = copy_files($tmp . '/' . $name, $tmp . '/' . $arch_name);
}
} else {
if ($del) {
$result = rename($tmp . '/' . $arch_name, $tmp . '/' . $name);
} else {
$result = copy($tmp . '/' . $arch_name, $tmp . '/' . $name);
}
}
if (!$result) {
clean($tmp);
if ($GLOBALS['class'] == 'ftp') {
ftp_archive_end();
}
if ($folder) {
if ($del) {
return report(str_replace('%dir%', htmlspecialchars($arch_name, ENT_NOQUOTES), $GLOBALS['lng']['move_files_false']), 1);
} else {
return report(str_replace('%dir%', htmlspecialchars($arch_name, ENT_NOQUOTES), $GLOBALS['lng']['copy_files_false']), 1);
}
} else {
if ($del) {
return report(str_replace('%file%', htmlspecialchars($arch_name, ENT_NOQUOTES), $GLOBALS['lng']['move_file_false']), 1);
} else {
return report(str_replace('%file%', htmlspecialchars($arch_name, ENT_NOQUOTES), $GLOBALS['lng']['copy_file_false']), 1);
}
}
}
$result = $zip->create($tmp, PCLZIP_OPT_REMOVE_PATH, $tmp);
clean($tmp);
if ($GLOBALS['class'] == 'ftp') {
ftp_archive_end($current);
}
if ($result) {
if ($folder) {
if ($del) {
return report(str_replace('%dir%', htmlspecialchars($arch_name, ENT_NOQUOTES), $GLOBALS['lng']['move_files_true']), 0);
} else {
return report(str_replace('%dir%', htmlspecialchars($arch_name, ENT_NOQUOTES), $GLOBALS['lng']['copy_files_true']), 0);
}
} else {
if ($del) {
return report(str_replace('%file%', htmlspecialchars($arch_name, ENT_NOQUOTES), $GLOBALS['lng']['move_file_true']), 0);
} else {
return report(str_replace('%file%', htmlspecialchars($arch_name, ENT_NOQUOTES), $GLOBALS['lng']['copy_file_true']), 0);
}
}
} else {
if ($folder) {
if ($del) {
return report(str_replace('%dir%', htmlspecialchars($arch_name, ENT_NOQUOTES), $GLOBALS['lng']['move_files_false']), 1);
} else {
return report(str_replace('%dir%', htmlspecialchars($arch_name, ENT_NOQUOTES), $GLOBALS['lng']['copy_files_false']), 1);
}
} else {
if ($del) {
return report(str_replace('%file%', htmlspecialchars($arch_name, ENT_NOQUOTES), $GLOBALS['lng']['move_file_false']), 1);
} else {
return report(str_replace('%file%', htmlspecialchars($arch_name, ENT_NOQUOTES), $GLOBALS['lng']['copy_file_false']), 1);
}
}
}
}
function list_zip_archive($current = '', $down = '')
{
require_once $GLOBALS['pclzip'];
$r_current = str_replace('%2F', '/', rawurlencode($current));
$zip = new PclZip($GLOBALS['class'] == 'ftp' ? ftp_archive_start($current) : $current);
if (!$list = $zip->listContent()) {
if ($GLOBALS['class'] == 'ftp') {
ftp_archive_end('');
}
return '<tr class="border"><td colspan="' . (array_sum($GLOBALS['index']) + 1) . '">' . report($GLOBALS['lng']['archive_error'] . '<br/>' . $zip->errorInfo(true), 2) . '</td></tr>';
} else {
$l = '';
if ($down) {
$list = array_reverse($list);
}
$s = sizeof($list);
for ($i = 0; $i < $s; ++$i) {
$r_name = str_replace('%2F', '/', rawurlencode($list[$i]['filename']));
if ($list[$i]['folder']) {
$type = 'DIR';
$name = htmlspecialchars($list[$i]['filename'], ENT_NOQUOTES);
$size = ' ';
$down = ' ';
} else {
$type = htmlspecialchars(get_type($list[$i]['filename']), ENT_NOQUOTES);
$name = '<a href="?c=' . $r_current . '&f=' . $r_name . '">' . htmlspecialchars(str_link($list[$i]['filename']), ENT_NOQUOTES) . '</a>';
$size = format_size($list[$i]['size']);
$down = '<a href="change.php?get=' . $r_current . '&f=' . $r_name . '">' . $GLOBALS['lng']['get'] . '</a>';
}
$l .= '<tr class="border"><td class="check"><input name="check[]" type="checkbox" value="' . $r_name . '"/></td>';
if ($GLOBALS['index']['name']) {
$l .= '<td>' . $name . '</td>';
}
if ($GLOBALS['index']['down']) {
$l .= '<td>' . $down . '</td>';
}
if ($GLOBALS['index']['type']) {
$l .= '<td>' . $type . '</td>';
}
if ($GLOBALS['index']['size']) {
$l .= '<td>' . $size . '</td>';
}
if ($GLOBALS['index']['change']) {
$l .= '<td><a href="change.php?c=' . $r_current . '&f=' . $r_name . '">' . $GLOBALS['lng']['ch'] . '</a></td>';
}
if ($GLOBALS['index']['del']) {
$l .= '<td><a' . ($GLOBALS['del_notify'] ? ' onclick="return confirm(\'' . $GLOBALS['lng']['del_notify'] . '\')"' : '') . ' href="change.php?go=del_zip_archive&c=' . $r_current . '&f=' . $r_name . '">' . $GLOBALS['lng']['dl'] . '</a></td>';
}
if ($GLOBALS['index']['chmod']) {
$l .= '<td> </td>';
}
if ($GLOBALS['index']['date']) {
$l .= '<td>' . strftime($GLOBALS['date_format'], $list[$i]['mtime']) . '</td>';
}
if ($GLOBALS['index']['uid']) {
$l .= '<td> </td>';
}
if ($GLOBALS['index']['n']) {
$l .= '<td>' . ($i + 1) . '</td>';
}
$l .= '</tr>';
}
if ($GLOBALS['class'] == 'ftp') {
ftp_archive_end();
}
$prop = $zip->properties();
if (isset($prop['comment']) && $prop['comment'] != '') {
if (iconv('UTF-8', 'UTF-8', $prop['comment']) != $prop['comment']) {
$prop['comment'] = iconv($GLOBALS['altencoding'], 'UTF-8//TRANSLIT', $prop['comment']);
}
$l .= '<tr class="border"><td>' . $GLOBALS['lng']['comment_archive'] . '</td><td colspan="' . (array_sum($GLOBALS['index']) + 1) . '"><pre>' . htmlspecialchars($prop['comment'], ENT_NOQUOTES) . '</pre></td></tr>';
}
return $l;
}
}
function list_rar_archive($current = '', $down = '')
{
$r_current = str_replace('%2F', '/', rawurlencode($current));
$rar = rar_open($GLOBALS['class'] == 'ftp' ? ftp_archive_start($current) : $current);
if (!$list = rar_list($rar)) {
if ($GLOBALS['class'] == 'ftp') {
ftp_archive_end('');
}
return '<tr class="border"><td colspan="' . (array_sum($GLOBALS['index']) + 1) . '">' . report($GLOBALS['lng']['archive_error'], 2) . '</td></tr>';
} else {
$l = '';
if ($down) {
$list = array_reverse($list);
}
$s = sizeof($list);
for ($i = 0; $i < $s; ++$i) {
$r_name = str_replace('%2F', '/', rawurlencode($list[$i]->getName()));
if (!$list[$i]->getCrc()) {
$type = 'DIR';
$name = htmlspecialchars($list[$i]->getName(), ENT_NOQUOTES);
$size = ' ';
$down = ' ';
} else {
$type = htmlspecialchars(get_type($list[$i]->getName()), ENT_NOQUOTES);
$name = '<a href="?c=' . $r_current . '&f=' . $r_name . '">' . htmlspecialchars(str_link($list[$i]->getName()), ENT_NOQUOTES) . '</a>';
$size = format_size($list[$i]->getUnpackedSize());
$down = '<a href="change.php?get=' . $r_current . '&f=' . $r_name . '">' . $GLOBALS['lng']['get'] . '</a>';
}
$l .= '<tr class="border"><td class="check"><input name="check[]" type="checkbox" value="' . $r_name . '"/></td>';
if ($GLOBALS['index']['name']) {
$l .= '<td>' . $name . '</td>';
}
if ($GLOBALS['index']['down']) {
$l .= '<td>' . $down . '</td>';
}
if ($GLOBALS['index']['type']) {
$l .= '<td>' . $type . '</td>';
}
if ($GLOBALS['index']['size']) {
$l .= '<td>' . $size . '</td>';
}
if ($GLOBALS['index']['change']) {
$l .= '<td> </td>';
}
if ($GLOBALS['index']['del']) {
$l .= '<td>' . $GLOBALS['lng']['dl'] . '</td>';
}
if ($GLOBALS['index']['chmod']) {
$l .= '<td> </td>';
}
if ($GLOBALS['index']['date']) {
$l .= '<td>' . strftime($GLOBALS['date_format'], strtotime($list[$i]->getFileTime())) . '</td>';
}
if ($GLOBALS['index']['uid']) {
$l .= '<td> </td>';
}
if ($GLOBALS['index']['n']) {
$l .= '<td>' . ($i + 1) . '</td>';
}
$l .= '</tr>';
}
if ($GLOBALS['class'] == 'ftp') {
ftp_archive_end();
}
return $l;
}
}
function rename_tar_file($current, $name, $arch_name, $del, $overwrite)
{
require_once $GLOBALS['tar'];
$tmp = $GLOBALS['temp'] . '/GmanagerTar' . $_SERVER['REQUEST_TIME'];
$tgz = new Archive_Tar($GLOBALS['class'] == 'ftp' ? ftp_archive_start($current) : $current);
$folder = '';
foreach($tgz->listContent() as $f) {
if ($arch_name == $f['filename']) {
$folder = $f['typeflag'] == 5 ? 1 : 0;
break;
}
}
if (!$tgz->extract($tmp)) {
clean($tmp);
if ($GLOBALS['class'] == 'ftp') {
ftp_archive_end();
}
return report($GLOBALS['lng']['extract_false'], 1);
}
if (file_exists($tmp . '/' . $name)) {
if ($overwrite) {
if ($folder) {
clean($tmp . '/' . $name);
} else {
unlink($tmp . '/' . $name);
}
} else {
clean($tmp);
if ($GLOBALS['class'] == 'ftp') {
ftp_archive_end();
}
return report($GLOBALS['lng']['overwrite_false'], 1);
break;
}
}
if ($folder) {
@mkdir($tmp . '/' . $name, 0755, true);
} else {
@mkdir($tmp . '/' . dirname($name), 0755, true);
}
if ($folder) {
// переделать на ftp
if ($del) {
$result = move_files($tmp . '/' . $name, $tmp . '/' . $arch_name);
} else {
$result = copy_files($tmp . '/' . $name, $tmp . '/' . $arch_name);
}
} else {
if ($del) {
$result = rename($tmp . '/' . $arch_name, $tmp . '/' . $name);
} else {
$result = copy($tmp . '/' . $arch_name, $tmp . '/' . $name);
}
}
if (!$result) {
clean($tmp);
if ($GLOBALS['class'] == 'ftp') {
ftp_archive_end();
}
if ($folder) {
if ($del) {
return report(str_replace('%dir%', htmlspecialchars($arch_name, ENT_NOQUOTES), $GLOBALS['lng']['move_files_false']), 1);
} else {
return report(str_replace('%dir%', htmlspecialchars($arch_name, ENT_NOQUOTES), $GLOBALS['lng']['copy_files_false']), 1);
}
} else {
if ($del) {
return report(str_replace('%file%', htmlspecialchars($arch_name, ENT_NOQUOTES), $GLOBALS['lng']['move_file_false']), 1);
} else {
return report(str_replace('%file%', htmlspecialchars($arch_name, ENT_NOQUOTES), $GLOBALS['lng']['copy_file_false']), 1);
}
}
}
$result = $tgz->createModify($tmp, '.', $tmp);
clean($tmp);
if ($GLOBALS['class'] == 'ftp') {
ftp_archive_end($current);
}
if ($result) {
if ($folder) {
if ($del) {
return report(str_replace('%dir%', htmlspecialchars($arch_name, ENT_NOQUOTES), $GLOBALS['lng']['move_files_true']), 0);
} else {
return report(str_replace('%dir%', htmlspecialchars($arch_name, ENT_NOQUOTES), $GLOBALS['lng']['copy_files_true']), 0);
}
} else {
if ($del) {
return report(str_replace('%file%', htmlspecialchars($arch_name, ENT_NOQUOTES), $GLOBALS['lng']['move_file_true']), 0);
} else {
return report(str_replace('%file%', htmlspecialchars($arch_name, ENT_NOQUOTES), $GLOBALS['lng']['copy_file_true']), 0);
}
}
} else {
if ($folder) {
if ($del) {
return report(str_replace('%dir%', htmlspecialchars($arch_name, ENT_NOQUOTES), $GLOBALS['lng']['move_files_false']), 1);
} else {
return report(str_replace('%dir%', htmlspecialchars($arch_name, ENT_NOQUOTES), $GLOBALS['lng']['copy_files_false']), 1);
}
} else {
if ($del) {
return report(str_replace('%file%', htmlspecialchars($arch_name, ENT_NOQUOTES), $GLOBALS['lng']['move_file_false']), 1);
} else {
return report(str_replace('%file%', htmlspecialchars($arch_name, ENT_NOQUOTES), $GLOBALS['lng']['copy_file_false']), 1);
}
}
}
}
function list_tar_archive($current = '', $down = '')
{
require_once $GLOBALS['tar'];
$tgz = new Archive_Tar($GLOBALS['class'] == 'ftp' ? ftp_archive_start($current) : $current);
if (!$list = $tgz->listContent()) {
if ($GLOBALS['class'] == 'ftp') {
ftp_archive_end('');
}
return '<tr class="border"><td colspan="' . (array_sum($GLOBALS['index']) + 1) . '">' . report($GLOBALS['lng']['archive_error'], 2) . '</td></tr>';
} else {
$r_current = str_replace('%2F', '/', rawurlencode($current));
$l = '';
if ($down) {
$list = array_reverse($list);
}
$s = sizeof($list);
for ($i = 0; $i < $s; ++$i) {
$r_name = rawurlencode($list[$i]['filename']);
if ($list[$i]['typeflag']) {
$type = 'DIR';
$name = htmlspecialchars($list[$i]['filename'], ENT_NOQUOTES);
$size = ' ';
$down = ' ';
} else {
$type = htmlspecialchars(get_type($list[$i]['filename']), ENT_NOQUOTES);
$name = '<a href="?c=' . $r_current . '&f=' . $r_name . '">' . htmlspecialchars(str_link($list[$i]['filename']), ENT_NOQUOTES) . '</a>';
$size = format_size($list[$i]['size']);
$down = '<a href="change.php?get=' . $r_current . '&f=' . $r_name . '">' . $GLOBALS['lng']['get'] . '</a>';
}
$l .= '<tr class="border"><td class="check"><input name="check[]" type="checkbox" value="' . $r_name . '"/></td>';
if ($GLOBALS['index']['name']) {
$l .= '<td>' . $name . '</td>';
}
if ($GLOBALS['index']['down']) {
$l .= '<td>' . $down . '</td>';
}
if ($GLOBALS['index']['type']) {
$l .= '<td>' . $type . '</td>';
}
if ($GLOBALS['index']['size']) {
$l .= '<td>' . $size . '</td>';
}
if ($GLOBALS['index']['change']) {
$l .= '<td><a href="change.php?c=' . $r_current . '&f=' . $r_name . '">' . $GLOBALS['lng']['ch'] . '</a></td>';
}
if ($GLOBALS['index']['del']) {
$l .= '<td><a' . ($GLOBALS['del_notify'] ? ' onclick="return confirm(\'' . $GLOBALS['lng']['del_notify'] . '\')"' : '') . ' href="change.php?go=del_tar_archive&c=' . $r_current . '&f=' . $r_name . '">' . $GLOBALS['lng']['dl'] . '</a></td>';
}
if ($GLOBALS['index']['chmod']) {
$l .= '<td> </td>';
}
if ($GLOBALS['index']['date']) {
$l .= '<td>' . strftime($GLOBALS['date_format'], $list[$i]['mtime']) . '</td>';
}
if ($GLOBALS['index']['uid']) {
$l .= '<td> </td>';
}
if ($GLOBALS['index']['n']) {
$l .= '<td>' . ($i + 1) . '</td>';
}
$l .= '</tr>';
}
if ($GLOBALS['class'] == 'ftp') {
ftp_archive_end();
}
return $l;
}
}
function edit_zip_file($current = '', $f = '')
{
require_once $GLOBALS['pclzip'];
$zip = new PclZip($GLOBALS['class'] == 'ftp' ? ftp_archive_start($current) : $current);
$ext = $zip->extract(PCLZIP_OPT_BY_NAME, $f, PCLZIP_OPT_EXTRACT_AS_STRING);
if ($GLOBALS['class'] == 'ftp') {
ftp_archive_end('');
}
if (!$ext) {
return array('text' => $GLOBALS['lng']['archive_error'], 'size' => 0, 'lines' => 0);
} else {
return array('text' => trim($ext[0]['content']), 'size' => format_size($ext[0]['size']), 'lines' => sizeof(explode("\n", $ext[0]['content'])));
}
}
function edit_zip_file_ok($current = '', $f = '', $text = '')
{
require_once $GLOBALS['pclzip'];
define('PCLZIP_TMP_NAME', $f);
$tmp = $GLOBALS['temp'] . '/GmanagerArchivers' . $_SERVER['REQUEST_TIME'] . '.tmp';
$fp = fopen($tmp, 'w');
if (!$fp) {
return report($GLOBALS['lng']['fputs_file_false'] . '<br/>' . error(), 2);
}
fputs($fp, $text);
fclose($fp);
$zip = new PclZip($GLOBALS['class'] == 'ftp' ? ftp_archive_start($current) : $current);
$comment = $zip->properties();
$comment = $comment['comment'];
if ($zip->delete(PCLZIP_OPT_BY_NAME, $f) == 0) {
if ($GLOBALS['class'] == 'ftp') {
ftp_archive_end('');
}
unlink($tmp);
return report($GLOBALS['lng']['fputs_file_false'] . '<br/>' . $zip->errorInfo(true), 2);
}
function cb($p_event, &$p_header)
{
$p_header['stored_filename'] = PCLZIP_TMP_NAME;
return 1;
}
$fl = $zip->add($tmp, PCLZIP_CB_PRE_ADD, 'cb', PCLZIP_OPT_COMMENT, $comment);
unlink($tmp);
if ($GLOBALS['class'] == 'ftp') {
ftp_archive_end($current);
}
if ($fl) {
return report($GLOBALS['lng']['fputs_file_true'], 0);
} else {
return report($GLOBALS['lng']['fputs_file_false'], 2);
}
}
function look_zip_file($current = '', $f = '', $str = false)
{
require_once $GLOBALS['pclzip'];
$r_current = str_replace('%2F', '/', rawurlencode($current));
$r_f = str_replace('%2F', '/', rawurlencode($f));
$zip = new PclZip($GLOBALS['class'] == 'ftp' ? ftp_archive_start($current) : $current);
$ext = $zip->extract(PCLZIP_OPT_BY_NAME, $f, PCLZIP_OPT_EXTRACT_AS_STRING);
if ($GLOBALS['class'] == 'ftp') {
ftp_archive_end('');
}
if (!$ext) {
return report($GLOBALS['lng']['archive_error'], 2);
} else if ($ext[0]['status'] == 'unsupported_encryption') {
return report($GLOBALS['lng']['archive_error_encrypt'], 2);
} else {
if ($str) {
return $ext[0]['content'];
} else {
return report($GLOBALS['lng']['archive_size'] . ': ' . format_size($ext[0]['compressed_size']) . '<br/>' . $GLOBALS['lng']['real_size'] . ': ' . format_size($ext[0]['size']) . '<br/>' . $GLOBALS['lng']['archive_date'] . ': ' . strftime($GLOBALS['date_format'], $ext[0]['mtime']) . '<br/>»<a href="edit.php?c=' . $r_current . '&f=' . $r_f . '">' . $GLOBALS['lng']['edit'] . '</a>', 0) . code(trim($ext[0]['content']));
}
}
}
function look_rar_file($current = '', $f = '', $str = false)
{
$r_current = str_replace('%2F', '/', rawurlencode($current));
$r_f = str_replace('%2F', '/', rawurlencode($f));
$rar = rar_open($GLOBALS['class'] == 'ftp' ? ftp_archive_start($current) : $current);
$entry = rar_entry_get($rar, $f);
// создаем временный файл
$tmp = $GLOBALS['temp'] . '/GmanagerRAR' . $_SERVER['REQUEST_TIME'] . '.tmp';
$entry->extract(true, $tmp); // запишет сюда данные
$ext = file_get_contents($tmp);
unlink($tmp);
if ($GLOBALS['class'] == 'ftp') {
ftp_archive_end('');
}
if (!$ext) {
return report($GLOBALS['lng']['archive_error'], 2);
} else {
if ($str) {
return $ext;
} else {
return report($GLOBALS['lng']['archive_size'] . ': ' . format_size($entry->getPackedSize()) . '<br/>' . $GLOBALS['lng']['real_size'] . ': ' . format_size($entry->getUnpackedSize()) . '<br/>' . $GLOBALS['lng']['archive_date'] . ': ' . strftime($GLOBALS['date_format'], strtotime($entry->getFileTime()))) . code(trim($ext));
}
}
}
function look_tar_file($current = '', $f = '', $str = false)
{
require_once $GLOBALS['tar'];
$tgz = new Archive_Tar($GLOBALS['class'] == 'ftp' ? ftp_archive_start($current) : $current);
$ext = $tgz->extractInString($f);
if (!$ext) {
if ($GLOBALS['class'] == 'ftp') {
ftp_archive_end('');
}
return report($GLOBALS['lng']['archive_error'], 2);
} else {
$list = $tgz->listContent();
if ($GLOBALS['class'] == 'ftp') {
ftp_archive_end('');
}
$s = sizeof($list);
for ($i = 0; $i < $s; ++$i) {
if ($list[$i]['filename'] != $f) {
continue;
} else {
if ($str) {
return $ext;
} else {
return report($GLOBALS['lng']['real_size'] . ': ' . format_size($list[$i]['size']) . '<br/>' . $GLOBALS['lng']['archive_date'] . ': ' . strftime($GLOBALS['date_format'], $list[$i]['mtime']), 0) . code(trim($ext));
}
}
}
}
}
function extract_zip_archive($current = '', $name = '', $chmod = array(), $overwrite = false)
{
require_once $GLOBALS['pclzip'];
if ($GLOBALS['class'] == 'ftp') {
$name = ($name[0] == '/' ? $name : dirname($current . '/') . '/' . $name);
$ftp_current = $GLOBALS['temp'] . '/GmanagerFtpZip' . $_SERVER['REQUEST_TIME'] . '.tmp';
$ftp_name = $GLOBALS['temp'] . '/GmanagerZipFtp' . $_SERVER['REQUEST_TIME'] . '/';
mkdir($ftp_name, 0777);
file_put_contents($ftp_current, $GLOBALS['mode']->file_get_contents($current));
}
define('CHMODF', $chmod[0]); // CHMOD to files
define('CHMODD', $chmod[1]); // CHMOD to folders
function callback_post_extract($p_event, &$p_header) {
if ($GLOBALS['mode']->is_dir($p_header['filename'])) {
rechmod($p_header['filename'], CHMODD);
} else if ($GLOBALS['class'] != 'ftp') {
rechmod($p_header['filename'], CHMODF);
}
return 1;
}
$zip = new PclZip($GLOBALS['class'] == 'ftp' ? $ftp_current : $current);
if ($overwrite) {
$res = $zip->extract(PCLZIP_OPT_PATH, $GLOBALS['class'] == 'ftp' ? $ftp_name : $name, PCLZIP_CB_POST_EXTRACT, 'callback_post_extract', PCLZIP_OPT_REPLACE_NEWER);
} else {
$res = $zip->extract(PCLZIP_OPT_PATH, $GLOBALS['class'] == 'ftp' ? $ftp_name : $name, PCLZIP_CB_POST_EXTRACT, 'callback_post_extract');
}
$err = '';
foreach ($res as $status) {
if ($status['status'] != 'ok') {
$err .= str_replace('%file%', htmlspecialchars($status['stored_filename'], ENT_NOQUOTES), $GLOBALS['lng']['extract_file_false_ext']) . ' (' . $status['status'] . ')<br/>';
}
}
if (!$res) {
if ($GLOBALS['class'] == 'ftp') {
unlink($ftp_current);
rmdir($ftp_name);
}
return report($GLOBALS['lng']['extract_false'] . '<br/>' . $zip->errorInfo(true), 2);
}
if ($GLOBALS['class'] == 'ftp') {
create_dir($name, CHMODD);
ftp_move_files($ftp_name, $name, CHMODF, CHMODD, $overwrite);
unlink($ftp_current);
}
if ($GLOBALS['mode']->is_dir($name) || $GLOBALS['class'] == 'ftp') {
if ($chmod) {
rechmod($name, $chmod[1]);
}
return report($GLOBALS['lng']['extract_true'], 0) . ($err ? report(rtrim($err, '<br/>'), 1) : '');
} else {
return report($GLOBALS['lng']['extract_false'], 2);
}
}
function extract_rar_archive($current = '', $name = '', $chmod = array(), $overwrite = false)
{
if ($GLOBALS['class'] == 'ftp') {
$name = ($name[0] == '/' ? $name : dirname($current . '/') . '/' . $name);
$ftp_current = $GLOBALS['temp'] . '/GmanagerFtpRar' . $_SERVER['REQUEST_TIME'] . '.tmp';
$ftp_name = $GLOBALS['temp'] . '/GmanagerFtpRar' . $_SERVER['REQUEST_TIME'] . '/';
mkdir($ftp_name, 0777);
file_put_contents($ftp_current, $GLOBALS['mode']->file_get_contents($current));
}
$rar = rar_open($GLOBALS['class'] == 'ftp' ? $ftp_current : $current);
$err = '';
foreach (rar_list($rar) as $f) {
$n = $f->getName();
if (!$overwrite && $GLOBALS['mode']->file_exists($name . '/' . $n)) {
$err .= $GLOBALS['lng']['overwrite_false'] . ' (' . htmlspecialchars($n, ENT_NOQUOTES) . ')<br/>';
} else {
$entry = rar_entry_get($rar, $n);
if (!$entry->extract($GLOBALS['class'] == 'ftp' ? $ftp_name : $name)) {
if ($GLOBALS['class'] == 'ftp') {
unlink($ftp_current);
rmdir($ftp_name);
}
$err .= str_replace('%file%', htmlspecialchars($n, ENT_NOQUOTES), $GLOBALS['lng']['extract_file_false_ext']) . '<br/>';
}
}
if ($GLOBALS['mode']->is_dir($name . '/' . $n)) {
rechmod($name . '/' . $n, $chmod[1]);
} else {
rechmod($name . '/' . $n, $chmod[0]);
}
}
if ($GLOBALS['class'] == 'ftp') {
create_dir($name, $chmod[1]);
ftp_move_files($ftp_name, $name, $chmod[0], $chmod[1], $overwrite);
unlink($ftp_current);
}
if ($GLOBALS['mode']->is_dir($name) || $GLOBALS['class'] == 'ftp') {
rechmod($name, $chmod[1]);
return report($GLOBALS['lng']['extract_true'], 0) . ($err ? report(rtrim($err, '<br/>'), 1) : '');
} else {
return report($GLOBALS['lng']['extract_false'], 2);
}
}
function extract_tar_archive($current = '', $name = '', $chmod = array(), $overwrite = false)
{
require_once $GLOBALS['tar'];
if ($GLOBALS['class'] == 'ftp') {
$name = ($name[0] == '/' ? $name : dirname($current . '/') . '/' . $name);
$ftp_current = $GLOBALS['temp'] . '/GmanagerFtpTar' . $_SERVER['REQUEST_TIME'] . '.tmp';
$ftp_name = $GLOBALS['temp'] . '/GmanagerFtpTar' . $_SERVER['REQUEST_TIME'] . '/';
mkdir($ftp_name, 0777);
file_put_contents($ftp_current, $GLOBALS['mode']->file_get_contents($current));
}
$tgz = new Archive_Tar($GLOBALS['class'] == 'ftp' ? $ftp_current : $current);
$extract = $tgz->listContent();
$err = '';
if ($overwrite) {
$res = $tgz->extract($GLOBALS['class'] == 'ftp' ? $ftp_name : $name);
} else {
$list = array();
foreach ($extract as $f) {
if ($GLOBALS['mode']->file_exists($name . '/' . $f['filename'])) {
$err .= $GLOBALS['lng']['overwrite_false'] . ' (' . htmlspecialchars($f['filename'], ENT_NOQUOTES) . ')<br/>';
} else {
$list[] = $f['filename'];
}
}
if (!$list) {
return report($GLOBALS['lng']['extract_false'], 1) . ($err ? report(rtrim($err, '<br/>'), 1) : '');
}
$res = $tgz->extractList($list, $GLOBALS['class'] == 'ftp' ? $ftp_name : $name);
}
if (!$res) {
if ($GLOBALS['class'] == 'ftp') {
unlink($ftp_current);
rmdir($ftp_name);
}
return report($GLOBALS['lng']['extract_false'], 2);
}
foreach ($extract as $f) {
if ($GLOBALS['mode']->is_dir($name . '/' . $f['filename'])) {
rechmod($name . '/' . $f['filename'], $chmod[1]);
} else {
rechmod($name . '/' . $f['filename'], $chmod[0]);
}
}
if ($GLOBALS['class'] == 'ftp') {
create_dir($name, $chmod[1]);
ftp_move_files($ftp_name, $name, $chmod[0], $chmod[1], $overwrite);
unlink($ftp_current);
}
if ($GLOBALS['mode']->is_dir($name) || $GLOBALS['class'] == 'ftp') {
rechmod($name, $chmod[1]);
return report($GLOBALS['lng']['extract_true'], 0) . ($err ? report(rtrim($err, '<br/>'), 1) : '');
} else {
return report($GLOBALS['lng']['extract_false'], 2);
}
}
function extract_zip_file($current = '', $name = '', $chmod = '0755', $fl = '', $overwrite = false)
{
$err = '';
if ($overwrite) {
$ext = & $fl;
} else {
$ext = array();
foreach ($fl as $f) {
if ($GLOBALS['mode']->file_exists($name . '/' . $f)) {
$err .= $GLOBALS['lng']['overwrite_false'] . ' (' . htmlspecialchars($f, ENT_NOQUOTES) . ')<br/>';
} else {
$ext[] = $f;
}
}
unset($fl);
}
if (!$ext) {
return report($GLOBALS['lng']['extract_false'], 1) . ($err ? report(rtrim($err, '<br/>'), 1) : '');
}
require_once $GLOBALS['pclzip'];
if ($GLOBALS['class'] == 'ftp') {
$name = ($name[0] == '/' ? $name : dirname($current . '/') . '/' . $name);
$ftp_current = $GLOBALS['temp'] . '/GmanagerFtpZipArchive' . $_SERVER['REQUEST_TIME'] . '.tmp';
$ftp_name = $GLOBALS['temp'] . '/GmanagerFtpZipFile' . $_SERVER['REQUEST_TIME'] . '.tmp';
file_put_contents($ftp_current, $GLOBALS['mode']->file_get_contents($current));
}
$zip = new PclZip($GLOBALS['class'] == 'ftp' ? $ftp_current : $current);
$res = $zip->extract(PCLZIP_OPT_PATH, $GLOBALS['class'] == 'ftp' ? $ftp_name : $name, PCLZIP_OPT_BY_NAME, $ext, PCLZIP_OPT_REPLACE_NEWER);
foreach ($res as $status) {
if ($status['status'] != 'ok') {
$err .= str_replace('%file%', htmlspecialchars($status['stored_filename'], ENT_NOQUOTES), $GLOBALS['lng']['extract_file_false_ext']) . ' (' . $status['status'] . ')<br/>';
}
}
if (!$res) {
if ($GLOBALS['class'] == 'ftp') {
unlink($ftp_current);
}
return report($GLOBALS['lng']['extract_file_false'] . '<br/>' . $zip->errorInfo(true), 2);
}
if ($GLOBALS['class'] == 'ftp') {
create_dir($name);
ftp_move_files($ftp_name, $name, $overwrite);
unlink($ftp_current);
}
if ($GLOBALS['class'] == 'ftp' || $GLOBALS['mode']->is_dir($name)) {
if ($chmod) {
rechmod($name, $chmod);
}
return report($GLOBALS['lng']['extract_file_true'], 0) . ($err ? report(rtrim($err, '<br/>'), 1) : '');
} else {
return report($GLOBALS['lng']['extract_file_false'], 2);
}
}
function extract_rar_file($current = '', $name = '', $chmod = '0755', $ext = '', $overwrite = false)
{
$tmp = array();
$err = '';
foreach ($ext as $f) {
if ($GLOBALS['mode']->file_exists($name . '/' . $f)) {
if ($overwrite) {
unlink($name . '/' . $f);
$tmp[] = $f;
} else {
$err .= $GLOBALS['lng']['overwrite_false'] . ' (' . htmlspecialchars($f, ENT_NOQUOTES) . ')<br/>';
}
} else {
$tmp[] = $f;
}
}
$ext = & $tmp;
if (!$ext) {
return report($GLOBALS['lng']['extract_false'], 1) . ($err ? report(rtrim($err, '<br/>'), 1) : '');
}
if ($GLOBALS['class'] == 'ftp') {
$name = ($name[0] == '/' ? $name : dirname($current . '/') . '/' . $name);
$ftp_current = $GLOBALS['temp'] . '/GmanagerFtpRarArchive' . $_SERVER['REQUEST_TIME'] . '.tmp';
$ftp_name = $GLOBALS['temp'] . '/GmanagerFtpRarFile' . $_SERVER['REQUEST_TIME'] . '.tmp';
file_put_contents($ftp_current, $GLOBALS['mode']->file_get_contents($current));
}
$rar = rar_open($GLOBALS['class'] == 'ftp' ? $ftp_current : $current);
foreach ($ext as $var) {
$entry = rar_entry_get($rar, $var);
if (!$entry->extract($GLOBALS['class'] == 'ftp' ? $ftp_name : $name)) {
if ($GLOBALS['class'] == 'ftp') {
unlink($ftp_current);
}
$err .= str_replace('%file%', htmlspecialchars($var, ENT_NOQUOTES), $GLOBALS['lng']['extract_file_false_ext']) . '<br/>';
} else if (!$GLOBALS['mode']->file_exists(($GLOBALS['class'] == 'ftp' ? $ftp_name : $name) . '/' . $var)) {
// fix bug in rar extension
// method extract alredy returned "true"
$err .= str_replace('%file%', htmlspecialchars($var, ENT_NOQUOTES), $GLOBALS['lng']['extract_file_false_ext']) . '<br/>';
}
}
if ($GLOBALS['class'] == 'ftp') {
create_dir($name);
ftp_move_files($ftp_name, $name, $overwrite);
unlink($ftp_current);
}
if ($GLOBALS['class'] == 'ftp' || $GLOBALS['mode']->is_dir($name)) {
if ($chmod) {
rechmod($name, $chmod);
}
return report($GLOBALS['lng']['extract_file_true'], 0) . ($err ? report(rtrim($err, '<br/>'), 1) : '');
} else {
return report($GLOBALS['lng']['extract_file_false'], 2);
}
}
function extract_tar_file($current = '', $name = '', $chmod = '0755', $ext = '', $overwrite = false)
{
$tmp = array();
$err = '';
foreach ($ext as $f) {
if ($GLOBALS['mode']->file_exists($name . '/' . $f)) {
if ($overwrite) {
unlink($name . '/' . $f);
$tmp[] = $f;
} else {
$err .= $GLOBALS['lng']['overwrite_false'] . ' (' . htmlspecialchars($f, ENT_NOQUOTES) . ')<br/>';
}
} else {
$tmp[] = $f;
}
}
$ext = & $tmp;
if (!$ext) {
return report($GLOBALS['lng']['extract_false'], 1) . ($err ? report(rtrim($err, '<br/>'), 1) : '');
}
require_once $GLOBALS['tar'];
if ($GLOBALS['class'] == 'ftp') {
$name = ($name[0] == '/' ? $name : dirname($current . '/') . '/' . $name);
$ftp_current = $GLOBALS['temp'] . '/GmanagerFtpTarArchive' . $_SERVER['REQUEST_TIME'] . '.tmp';
$ftp_name = $GLOBALS['temp'] . '/GmanagerFtpTarFile' . $_SERVER['REQUEST_TIME'] . '.tmp';
file_put_contents($ftp_current, $GLOBALS['mode']->file_get_contents($current));
}
$tgz = new Archive_Tar($GLOBALS['class'] == 'ftp' ? $ftp_current : $current);
if (!$tgz->extractList($ext, $GLOBALS['class'] == 'ftp' ? $ftp_name : $name)) {
if ($GLOBALS['class'] == 'ftp') {
unlink($ftp_current);
}
return report($GLOBALS['lng']['extract_file_false'], 2);
}
if ($GLOBALS['class'] == 'ftp') {
create_dir($name);
ftp_move_files($ftp_name, $name, $overwrite);
unlink($ftp_current);
}
if ($GLOBALS['mode']->is_dir($name) || $GLOBALS['class'] == 'ftp') {
if ($chmod) {
rechmod($name, $chmod);
}
return report($GLOBALS['lng']['extract_file_true'], 0) . ($err ? report(rtrim($err, '<br/>'), 1) : '');
} else {
return report($GLOBALS['lng']['extract_file_false'], 2);
}
}
function del_zip_archive($current = '', $f = '')
{
require_once $GLOBALS['pclzip'];
$zip = new PclZip($GLOBALS['class'] == 'ftp' ? ftp_archive_start($current) : $current);
// $comment = $zip->properties();
// $comment = $comment['comment'];
// TODO: сохранение комментариев
// fix del directory
foreach ($zip->listContent() as $index) {
if ($index['stored_filename'] == $f) {
break;
}
}
$list = $zip->delete(PCLZIP_OPT_BY_INDEX, $index['index']);
if ($GLOBALS['class'] == 'ftp') {
ftp_archive_end($current);
}
if ($list != 0) {
return report($GLOBALS['lng']['del_file_true'] . ' (' . htmlspecialchars($f, ENT_NOQUOTES) . ')', 0);
} else {
return report($GLOBALS['lng']['del_file_false'] . '<br/>' . $zip->errorInfo(true), 2);
}
}
function del_tar_archive($current = '', $f = '')
{
require_once $GLOBALS['tar'];
$tgz = new Archive_Tar($GLOBALS['class'] == 'ftp' ? ftp_archive_start($current) : $current);
$list = $tgz->listContent();
$new_tar = array();
$s = sizeof($list);
for ($i = 0; $i < $s; ++$i) {
if ($list[$i]['filename'] == $f) {
continue;
} else {
$new_tar[] = $list[$i]['filename'];
}
}
$tmp_name = $GLOBALS['temp'] . '/GmanagerTar' . $_SERVER['REQUEST_TIME'] . '/';
$tgz->extractList($new_tar, $tmp_name);
$GLOBALS['mode']->unlink($current);
$list = $tgz->createModify($tmp_name, '.', $tmp_name);
clean($tmp_name);
if ($GLOBALS['class'] == 'ftp') {
ftp_archive_end($current);
}
if ($list) {
return report($GLOBALS['lng']['del_file_true'] . ' (' . htmlspecialchars($f, ENT_NOQUOTES) . ')', 0);
} else {
return report($GLOBALS['lng']['del_file_false'] . ' (' . htmlspecialchars($f, ENT_NOQUOTES) . ')', 2);
}
}
function add_archive($c = '')
{
$current = dirname($c) . '/';
$r_current = str_replace('%2F', '/', rawurlencode($current));
echo '<form action="change.php?c=' . $r_current . '&go=1" method="post"><div class="telo"><table><tr><th>' . $GLOBALS['lng']['ch_index'] . '</th>' . ($GLOBALS['index']['name'] ? '<th>' . $GLOBALS['lng']['name'] . '</th>' : '') . '' . ($GLOBALS['index']['type'] ? '<th>' . $GLOBALS['lng']['type'] . '</th>' : '') . '' . ($GLOBALS['index']['size'] ? '<th>' . $GLOBALS['lng']['size'] . '</th>' : '') . '' . ($GLOBALS['index']['change'] ? '<th>' . $GLOBALS['lng']['change'] . '</th>' : '') . '' . ($GLOBALS['index']['del'] ? '<th>' . $GLOBALS['lng']['del'] . '</th>' : '') . '' . ($GLOBALS['index']['chmod'] ? '<th>' . $GLOBALS['lng']['chmod'] . '</th>' : '') . '' . ($GLOBALS['index']['date'] ? '<th>' . $GLOBALS['lng']['date'] . '</th>' : '') . '' . ($GLOBALS['index']['uid'] ? '<th>' . $GLOBALS['lng']['uid'] . '</th>' : '') . '' . ($GLOBALS['index']['n'] ? '<th>' . $GLOBALS['lng']['n'] . '</th>' : '') . '</tr>';
echo look($current);
echo '</table><div class="ch"><input type="submit" name="add_archive" value="' . $GLOBALS['lng']['add_archive'] . '"/></div></div></form><div class="rb">' . $GLOBALS['lng']['create'] . '<a href="change.php?go=create_file&c=' . $r_current . '">' . $GLOBALS['lng']['file'] . '</a> / <a href="change.php?go=create_dir&c=' . $r_current . '">' . $GLOBALS['lng']['dir'] . '</a><br/></div><div class="rb"><a href="change.php?go=upload&c=' . $r_current . '">' . $GLOBALS['lng']['upload'] . '</a><br/></div><div class="rb"><a href="change.php?go=mod&c=' . $r_current . '">' . $GLOBALS['lng']['mod'] . '</a><br/></div>';
}
function add_zip_archive($current = '', $ext = '', $dir = '')
{
require_once $GLOBALS['pclzip'];
if ($GLOBALS['class'] == 'ftp') {
$ftp_current = $GLOBALS['temp'] . '/GmanagerFtpZip' . $_SERVER['REQUEST_TIME'] . '.tmp';
$ftp_name = $GLOBALS['temp'] . '/GmanagerFtpZip' . $_SERVER['REQUEST_TIME'] . '/';
mkdir($ftp_name, 0777);
file_put_contents($ftp_current, $GLOBALS['mode']->file_get_contents($current));
$tmp = array();
foreach ($ext as $v) {
$b = basename($v);
$tmp[] = $ftp_name . $b;
file_put_contents($ftp_name . $b, $GLOBALS['mode']->file_get_contents($v));
}
$ext = $tmp;
unset($tmp);
}
$zip = new PclZip($GLOBALS['class'] == 'ftp' ? $ftp_current : $current);
$add = $zip->add($ext, PCLZIP_OPT_ADD_PATH, $dir, PCLZIP_OPT_REMOVE_ALL_PATH);
// TODO: добавление пустых директорий
if ($GLOBALS['class'] == 'ftp') {
$GLOBALS['mode']->file_put_contents($current, file_get_contents($ftp_current));
unlink($ftp_current);
clean($ftp_name);
}
if ($add) {
return report($GLOBALS['lng']['add_archive_true'], 0);
} else {
return report($GLOBALS['lng']['add_archive_false'] . '<br/>' . $zip->errorInfo(true), 2);
}
}
function add_tar_archive($current = '', $ext = '', $dir = '')
{
require_once $GLOBALS['tar'];
if ($GLOBALS['class'] == 'ftp') {
$ftp_current = $GLOBALS['temp'] . '/GmanagerFtpTar' . $_SERVER['REQUEST_TIME'] . '.tmp';
$ftp_name = $GLOBALS['temp'] . '/GmanagerFtpTar' . $_SERVER['REQUEST_TIME'] . '/';
mkdir($ftp_name, 0777);
file_put_contents($ftp_current, $GLOBALS['mode']->file_get_contents($current));
$tmp = array();
foreach ($ext as $v) {
$b = basename($v);
$tmp[] = $ftp_name . $b;
file_put_contents($ftp_name . $b, $GLOBALS['mode']->file_get_contents($v));
}
$ext = $tmp;
unset($tmp);
}
$tgz = new Archive_Tar($GLOBALS['class'] == 'ftp' ? $ftp_current : $current);
foreach ($ext as $v) {
$add = $tgz->addModify($v, $dir, dirname($v));
}
if ($GLOBALS['class'] == 'ftp') {
$GLOBALS['mode']->file_put_contents($current, file_get_contents($ftp_current));
unlink($ftp_current);
clean($ftp_name);
}
if ($add) {
return report($GLOBALS['lng']['add_archive_true'], 0);
} else {
return report($GLOBALS['lng']['add_archive_false'], 2);
}
}
function create_zip_archive($name = '', $chmod = '0644', $ext = array(), $comment = '', $overwrite = false)
{
if (!$overwrite && $GLOBALS['mode']->file_exists($name)) {
return report($GLOBALS['lng']['overwrite_false'] . ' (' . htmlspecialchars($name, ENT_NOQUOTES) . ')', 1);
}
require_once $GLOBALS['pclzip'];
create_dir(iconv_substr($name, 0, strrpos($name, '/')));
if ($GLOBALS['class'] == 'ftp') {
$ftp_name = $GLOBALS['temp'] . '/GmanagerFtpZip' . $_SERVER['REQUEST_TIME'] . '.tmp';
$ftp = array();
$temp = $GLOBALS['temp'] . '/GmanagerFtpZip' . $_SERVER['REQUEST_TIME'];
mkdir($temp, 0755, true);
foreach ($ext as $f) {
$ftp[] = $tmp = $temp . '/' . basename($f);
if ($GLOBALS['mode']->is_dir($f)) {
mkdir($tmp, 0755, true);
ftp_copy_files($f, $tmp);
} else {
file_put_contents($tmp, $GLOBALS['mode']->file_get_contents($f));
}
}
$ext = $ftp;
unset($ftp);
} else {
$temp = $GLOBALS['current'];
}
$zip = new PclZip($GLOBALS['class'] == 'ftp' ? $ftp_name : $name);
if ($comment != '') {
$r = $zip->create($ext, PCLZIP_OPT_REMOVE_PATH, $temp, PCLZIP_OPT_COMMENT, $comment);
} else {
$r = $zip->create($ext, PCLZIP_OPT_REMOVE_PATH, $temp);
}
$err = false;
if ($GLOBALS['class'] == 'ftp') {
if (!$GLOBALS['mode']->file_put_contents($name, file_get_contents($ftp_name))) {
$err = error();
}
unlink($ftp_name);
clean($temp);
}
if ($GLOBALS['mode']->is_file($name) || ($err === false && $GLOBALS['class'] == 'ftp')) {
if ($chmod) {
rechmod($name, $chmod);
}
return report($GLOBALS['lng']['create_archive_true'], 0);
} else {
return report($GLOBALS['lng']['create_archive_false'] . ($err ? '<br/>' . $err . '<br/>' . $zip->errorInfo(true): ''), 2);
}
}
function gz($c = '')
{
$ext = implode('', gzfile($GLOBALS['class'] == 'ftp' ? ftp_archive_start($c) : $c));
$gz = explode(chr(0), substr($GLOBALS['mode']->file_get_contents($c), 10));
if (!isset($gz[0]) || $gz[0] == '') {
$gz[0] = basename($c, '.gz');
}
if ($GLOBALS['class'] == 'ftp') {
ftp_archive_end();
}
if ($ext) {
if (!$len = @iconv_strlen($ext)) {
$len = strlen($ext);
}
return report($GLOBALS['lng']['name'] . ': ' . htmlspecialchars($gz[0], ENT_NOQUOTES) . '<br/>' . $GLOBALS['lng']['archive_size'] . ': ' . format_size(size($c)) . '<br/>' . $GLOBALS['lng']['real_size'] . ': ' . format_size($len) . '<br/>' . $GLOBALS['lng']['archive_date'] . ': ' . strftime($GLOBALS['date_format'], $GLOBALS['mode']->filemtime($c)), 0) . code(trim($ext));
} else {
return report($GLOBALS['lng']['archive_error'], 2);
}
}
function gz_extract($c = '', $name = '', $chmod = array(), $overwrite = false)
{
create_dir($name, $chmod[1]);
$tmp = ($GLOBALS['class'] == 'ftp' ? ftp_archive_start($c) : $c);
if (ob_start()) {
readgzfile($tmp);
$get = ob_get_contents();
ob_end_clean();
} else {
$gz = gzopen($tmp, 'r');
$get = gzread($gz, PHP_INT_MAX);
gzclose($gz);
}
if ($GLOBALS['class'] == 'ftp') {
ftp_archive_end();
}
$gz = explode(chr(0), substr($GLOBALS['mode']->file_get_contents($c), 10));
if (!isset($gz[0]) || $gz[0] == '') {
$gz[0] = basename($c, '.gz');
}
if ($overwrite || !$GLOBALS['mode']->file_exists($name . '/' . $gz[0])) {
if (!$GLOBALS['mode']->file_put_contents($name . '/' . $gz[0], $get)) {
return report($GLOBALS['lng']['extract_file_false'] . '<br/>' . error(), 2);
}
} else {
return report($GLOBALS['lng']['overwrite_false'] . ' (' . htmlspecialchars($name . '/' . $gz[0], ENT_NOQUOTES) . ')', 1);
}
if ($GLOBALS['mode']->is_file($name . '/' . $gz[0])) {
if ($chmod[0]) {
rechmod($name, $chmod[0]);
}
return report($GLOBALS['lng']['extract_file_true'], 0);
} else {
return report($GLOBALS['lng']['extract_file_false'], 2);
}
}
function get_archive_file($archive = '', $f = '')
{
$tmp = is_archive(get_type(basename($archive)));
if ($tmp == 'ZIP') {
require_once $GLOBALS['pclzip'];
$zip = new PclZip($GLOBALS['class'] == 'ftp' ? ftp_archive_start($archive) : $archive);
$ext = $zip->extract(PCLZIP_OPT_BY_NAME, $f, PCLZIP_OPT_EXTRACT_AS_STRING);
if ($GLOBALS['class'] == 'ftp') {
ftp_archive_end('');
}
return $ext[0]['content'];
} else if ($tmp == 'TAR') {
require_once $GLOBALS['tar'];
$tgz = new Archive_Tar($archive);
return $tgz->extractInString($f);
} else if ($tmp == 'RAR' && extension_loaded('rar')) {
$rar = rar_open($archive);
$entry = rar_entry_get($rar, $f);
// создаем временный файл
$tmp = $GLOBALS['temp'] . '/GmanagerRAR' . $_SERVER['REQUEST_TIME'] . '.tmp';
$entry->extract(true, $tmp); // запишет сюда данные
$ext = file_get_contents($tmp);
unlink($tmp);
return $ext;
}
}
function upload_files($tmp = '', $name = '', $dir = '', $chmod = '0644')
{
$fname = $name;
if (substr($dir, -1) != '/') {
$name = basename($dir);
$dir = dirname($dir) . '/';
}
if ($GLOBALS['mode']->file_put_contents($dir . $name, file_get_contents($tmp))) {
if ($chmod) {
rechmod($dir . $name, $chmod);
}
unlink($tmp);
return report($GLOBALS['lng']['upload_true'] . ' -> ' . htmlspecialchars($fname . ' -> ' .$dir . $name, ENT_NOQUOTES), 0);
} else {
$error = error();
unlink($tmp);
return report($GLOBALS['lng']['upload_false'] . ' -> ' . htmlspecialchars($fname . ' x ' .$dir . $name, ENT_NOQUOTES) . '<br/>' . $error, 2);
}
}
function upload_url($url = '', $name = '', $chmod = '0644', $headers = '')
{
if (isset($_POST['set_time_limit'])) {
set_time_limit($_POST['set_time_limit']);
}
if (isset($_POST['ignore_user_abort'])) {
ignore_user_abort(true);
}
ini_set('user_agent', str_ireplace('User-Agent:', '', trim($headers)));
$tmp = array();
$url = trim($url);
if (strpos($url, "\n") !== false) {
foreach (explode("\n", $url) as $v) {
$v = trim($v);
$tmp[] = array($v, $name . basename($v));
}
} else {
$last = substr($name, -1);
$temp = false;
if ($last != '/' && $GLOBALS['mode']->is_dir($name)) {
$name .= '/';
$temp = true;
}
if ($last != '/' && !$temp) {
$name = dirname($name) . '/' . basename($name);
} else {
$h = get_headers($url, 1);
$temp = false;
if (isset($h['Content-Disposition'])) {
preg_match('/.+;\s+filename=(?:")?([^"]+)/i', $h['Content-Disposition'], $arr);
if (isset($arr[1])) {
$temp = true;
$name = $name . basename($arr[1]);
}
}
if (!$temp) {
$h = parse_url($url);
$name = $name . basename($h['path']);
}
}
$tmp[] = array($url, $name);
}
$out = '';
foreach ($tmp as $v) {
$dir = dirname($v[1]);
if (!$GLOBALS['mode']->is_dir($dir)) {
$GLOBALS['mode']->mkdir($dir, '0755');
}
if ($GLOBALS['class'] == 'ftp') {
$tmp = getData($v[0], '');
$r = $GLOBALS['mode']->file_put_contents($v[1], $tmp['body']);
$GLOBALS['mode']->chmod($v[1], $chmod);
} else {
$r = $GLOBALS['mode']->copy($v[0], $v[1], $chmod);
}
if ($r) {
$out .= report($GLOBALS['lng']['upload_true'] . ' -> ' . htmlspecialchars($v[0] . ' -> ' . $v[1], ENT_NOQUOTES), 0);
} else {
$out .= report($GLOBALS['lng']['upload_false'] . ' -> ' . htmlspecialchars($v[0] . ' x ' . $v[1], ENT_NOQUOTES) . '<br/>' . error(), 2);
}
}
return $out;
}
function send_mail($theme = '', $mess = '', $to = '', $from = '')
{
if (mail($to, '=?utf-8?B?' . base64_encode($theme) . '?=', $mess, 'From: ' . $from . "\r\nContent-type: text/plain; charset=utf-8;\r\nX-Mailer: Gmanager " . $GLOBALS['version'] . "\r\nX-Priority: 3")) {
return report($GLOBALS['lng']['send_mail_true'], 0);
} else {
return report($GLOBALS['lng']['send_mail_false'] . '<br/>' . error(), 2);
}
}
function show_eval($eval = '')
{
if (ob_start()) {
$info['time'] = microtime(true);
$info['ram'] = memory_get_usage(false);
eval($eval);
$info['time'] = round(microtime(true) - $info['time'], 6);
$info['ram'] = format_size(memory_get_usage(false) - $info['ram'], 6);
$buf = ob_get_contents();
ob_end_clean();
$rows = sizeof(explode("\n", $buf)) + 1;
if ($rows < 3) {
$rows = 3;
}
return '<div class="input">' . $GLOBALS['lng']['result'] . '<br/><textarea cols="48" rows="' . $rows . '">' . htmlspecialchars($buf, ENT_NOQUOTES) . '</textarea><br/>' . str_replace('%time%', $info['time'], $GLOBALS['lng']['microtime']) . '<br/>' . $GLOBALS['lng']['memory_get_usage'] . ' ' . $info['ram'] . '<br/></div>';
} else {
echo '<div class="input">' . $GLOBALS['lng']['result'] . '<pre class="code"><code>';
$info['time'] = microtime(true);
$info['ram'] = memory_get_usage(false);
eval($eval);
$info['time'] = round(microtime(true) - $info['time'], 6);
$info['ram'] = format_size(memory_get_usage(false) - $info['ram'], 6);
echo '</code></pre>';
echo str_replace('%time%', $info['time'], $GLOBALS['lng']['microtime']) . '<br/>' . $GLOBALS['lng']['memory_get_usage'] . ' ' . $info['ram'] . '<br/></div>';
}
}
function show_cmd($cmd = '')
{
$buf = '';
/*
$h = popen($cmd, 'r');
while (!feof($h)) {
$buf .= fgets($h, 4096);
}
pclose($h);
*/
$win = false;
if ((substr(PHP_OS, 0, 3) == 'WIN')) {
$win = true;
$cmd = iconv('UTF-8', $GLOBALS['altencoding'] . '//TRANSLIT', $cmd);
}
if ($h = proc_open($cmd, array(array('pipe', 'r'), array('pipe', 'w')), $pipes)) {
//fwrite($pipes[0], '');
fclose($pipes[0]);
$buf = stream_get_contents($pipes[1]);
fclose($pipes[1]);
proc_close($h);
$rows = sizeof(explode("\n", $buf)) + 1;
if ($rows < 3) {
$rows = 3;
}
if (iconv('UTF-8', 'UTF-8', $buf) != $buf) {
$buf = iconv($GLOBALS['consencoding'], 'UTF-8//TRANSLIT', $buf);
}
} else {
return '<div class="red">' . $GLOBALS['lng']['cmd_error'] . '<br/></div>';
}
return '<div class="input">' . $GLOBALS['lng']['result'] . '<br/><textarea cols="48" rows="' . $rows . '">' . htmlspecialchars($buf, ENT_NOQUOTES) . '</textarea></div>';
}
function replace($current = '', $from = '', $to = '', $regexp = '')
{
if (!$from) {
return report($GLOBALS['lng']['replace_false_str'], 1);
}
$c = $GLOBALS['mode']->file_get_contents($current);
if ($regexp) {
preg_match_all('/' . str_replace('/', '\/', $from) . '/', $c, $all);
$all = sizeof($all[0]);
if (!$all) {
return report($GLOBALS['lng']['replace_false_str'], 1);
}
$str = preg_replace('/' . str_replace('/', '\/', $from) . '/', $to, $c);
if ($str) {
if (!$GLOBALS['mode']->file_put_contents($current, $str)) {
return report($GLOBALS['lng']['replace_false_file'] . '<br/>' . error(), 2);
}
} else {
return report($GLOBALS['lng']['regexp_error'], 1);
}
} else {
$all = substr_count($c, $from);
if (!$all) {
return report($GLOBALS['lng']['replace_false_str'], 1);
}
if (!$GLOBALS['mode']->file_put_contents($current, str_replace($from, $to, $c))) {
return report($GLOBALS['lng']['replace_false_file'] . '<br/>' . error(), 2);
}
$str = true;
}
if ($str) {
return report($GLOBALS['lng']['replace_true'] . $all, 0);
} else {
return report($GLOBALS['lng']['replace_false_file'], 1);
}
}
function zip_replace($current = '', $f = '', $from = '', $to = '', $regexp = '')
{
if (!$from) {
return report($GLOBALS['lng']['replace_false_str'], 1);
}
$c = edit_zip_file($current, $f);
$c = $c['text'];
if ($regexp) {
preg_match_all('/' . str_replace('/', '\/', $from) . '/', $c, $all);
if (!sizeof($all[0])) {
return report($GLOBALS['lng']['replace_false_str'], 1);
}
$str = preg_replace('/' . str_replace('/', '\/', $from) . '/', $to, $c);
if ($str) {
return edit_zip_file_ok($current, $f, $str);
} else {
return report($GLOBALS['lng']['regexp_error'], 1);
}
} else {
if (!substr_count($c, $from)) {
return report($GLOBALS['lng']['replace_false_str'], 1);
}
return edit_zip_file_ok($current, $f, str_replace($from, $to, $c));
}
}
function search($c = '', $s = '', $w = '', $r = '', $h = '')
{
static $count = 0;
static $t;
static $out;
if (!$count) {
if ($GLOBALS['target']) {
$t = ' target="_blank"';
} else {
$t = '';
}
if ($h) {
$s = implode('', array_map('chr', str_split($s, 4)));
}
// Fix for PHP < 6.0
$s = $r ? $s : strtolower(@iconv('UTF-8', 'Windows-1251//TRANSLIT', $s));
}
$count++;
$c = str_replace('//', '/', $c . '/');
$i = 0;
$page = array();
foreach ($GLOBALS['mode']->iterator($c) as $f) {
if ($GLOBALS['mode']->is_dir($c . $f)) {
search($c . $f . '/', $s, $w, $r, '');
continue;
}
//$h_file = htmlspecialchars($c . $f, ENT_COMPAT);
$r_file = str_replace('%2F', '/', rawurlencode($c . $f));
$type = htmlspecialchars(get_type(basename($f)), ENT_NOQUOTES);
$archive = is_archive($type);
$stat = $GLOBALS['mode']->stat($c . $f);
$name = htmlspecialchars(str_link($c . $f), ENT_NOQUOTES);
$pname = $pdown = $ptype = $psize = $pchange = $pdel = $pchmod = $pdate = $puid = $pn = $in = null;
if ($w) {
if ($type == 'GZ') {
if (ob_start()) {
readgzfile($c . $f);
$fl = ob_get_contents();
ob_end_clean();
} else {
$gz = gzopen($c . $f, 'r');
$fl = gzread($gz, PHP_INT_MAX);
gzclose($gz);
}
} else {
$fl = $GLOBALS['mode']->file_get_contents($c . $f);
}
// Fix for PHP < 6.0
if (!$r) {
if (@iconv('UTF-8', 'UTF-8', $fl) == $fl) {
$fl = strtolower(@iconv('UTF-8', 'Windows-1251//TRANSLIT', $fl));
} else {
$fl = strtolower($fl);
}
}
if (!$in = substr_count($fl, $s)) {
continue;
}
$in = ' (' . $in . ')';
} else {
// Fix for PHP < 6.0
if (!$r) {
if (@iconv('UTF-8', 'UTF-8', $f) == $f) {
$f = strtolower(@iconv('UTF-8', 'Windows-1251//TRANSLIT', $f));
} else {
$f = strtolower($f);
}
}
if (strpos($f, $s) === false) {
continue;
}
}
$i++;
if ($GLOBALS['index']['name']) {
if ($archive) {
$pname = '<td><a href="index.php?' . $r_file . '">' . $name . '</a>' . $in . '</td>';
} else {
$pname = '<td><a href="edit.php?' . $r_file . '"' . $t . '>' . $name . '</a>' . $in . '</td>';
}
}
if ($GLOBALS['index']['down']) {
$pdown = '<td><a href="change.php?get=' . $r_file . '">' . $GLOBALS['lng']['get'] . '</a></td>';
}
if ($GLOBALS['index']['type']) {
$ptype = '<td>' . $type . '</td>';
}
if ($GLOBALS['index']['size']) {
$psize = '<td>' . format_size($stat['size']) . '</td>';
}
if ($GLOBALS['index']['change']) {
$pchange = '<td><a href="change.php?' . $r_file . '">' . $GLOBALS['lng']['ch'] . '</a></td>';
}
if ($GLOBALS['index']['del']) {
$pdel = '<td><a' . ($GLOBALS['del_notify'] ? ' onclick="return confirm(\'' . $GLOBALS['lng']['del_notify'] . '\')"' : '') . ' href="change.php?go=del&c=' . $r_file . '">' . $GLOBALS['lng']['dl'] . '</a></td>';
}
if ($GLOBALS['index']['chmod']) {
$pchmod = '<td><a href="change.php?go=chmod&c=' . $r_file . '">' . look_chmod($c . $f) . '</a></td>';
}
if ($GLOBALS['index']['date']) {
$pdate = '<td>' . strftime($GLOBALS['date_format'], $stat['mtime']) . '</td>';
}
if ($GLOBALS['index']['uid']) {
$puid = '<td>' . htmlspecialchars($stat['name'], ENT_NOQUOTES) . '</td>';
}
if ($GLOBALS['index']['n']) {
$pn = '<td>' . $i . '</td>';
}
$page[$f] = '<td class="check"><input name="check[]" type="checkbox" value="' . $r_file . '"/></td>' . $pname . $pdown . $ptype . $psize . $pchange . $pdel . $pchmod . $pdate . $puid . $pn;
}
natcasesort($page);
$line = false;
foreach ($page as $var) {
$line = !$line;
$out .= $line ? '<tr class="border">' . $var . '</tr>' : '<tr class="border2">' . $var . '</tr>';
}
return $out;
}
function fname($f = '', $name = '', $register = '', $i = '', $overwrite = false)
{
// [replace=from,to] - replace
// [n=0] - meter
// [f] - type
// [name] - name
// [date] - date
// [rand=8,16] - random
// $f = rawurldecode($f);
$info = pathinfo($f);
if (preg_match_all('/\[replace=([^,]),([^\]])/U', $name, $arr, PREG_SET_ORDER)) {
foreach ($arr as $var) {
$name = str_replace($var[1], $var[2], $info['filename'] . '.' . $info['extension']);
}
}
if (preg_match_all('/\[n=*(\d*)\]/U', $name, $arr, PREG_SET_ORDER)) {
foreach ($arr as $var) {
$name = str_replace($var[0], $var[1] + $i, $name);
}
}
if (preg_match_all('/\[rand=*(\d*),*(\d*)\]/U', $name, $arr, PREG_SET_ORDER)) {
foreach ($arr as $var) {
$name = str_replace($var[0], iconv_substr(str_shuffle($GLOBALS['rand']), 0, mt_rand((!empty($var[1]) ? $var[1] : 8), (!empty($var[2]) ? $var[2] : 16))), $name);
}
}
$name = str_replace('[f]', $info['extension'], $name);
$name = str_replace('[name]', $info['filename'], $name);
$name = str_replace('[date]', strftime('%d_%m_%Y'), $name);
if ($register == 1) {
$tmp = strtolower($name);
if (!iconv_strlen($tmp)) {
$tmp = iconv($GLOBALS['altencoding'], 'UTF-8//TRANSLIT', strtolower(iconv('UTF-8', $GLOBALS['altencoding'] . '//TRANSLIT', $name)));
}
} else if ($register == 2) {
$tmp = strtoupper($name);
if (!iconv_strlen($tmp)) {
$tmp = iconv($GLOBALS['altencoding'], 'UTF-8//TRANSLIT', strtoupper(iconv('UTF-8', $GLOBALS['altencoding'] . '//TRANSLIT', $name)));
}
} else {
$tmp = $name;
}
if (!$overwrite && $GLOBALS['mode']->file_exists($info['dirname'] . '/' . $tmp)) {
return report($GLOBALS['lng']['overwrite_false'] . ' (' . htmlspecialchars($info['dirname'] . '/' . $tmp, ENT_NOQUOTES) . ')', 1);
}
if ($GLOBALS['mode']->rename($f, $info['dirname'] . '/' . $tmp)) {
return report($info['basename'] . ' - ' . $tmp, 0);
} else {
return report(error() . ' ' . $info['basename'] . ' -> ' . $tmp, 2);
}
}
function sql_parser($sql = '')
{
$str = '';
$arr = explode("\n", $sql);
$size = sizeof($arr);
for ($i = 0; $i <= $size; ++$i) {
if (isset($arr[$i]) && @$arr[$i][0] != '#' && @$arr[$i][0] . @$arr[$i][1] != '--') {
$str .= $arr[$i] . "\n";
}
}
//$str = "SET sql_mode = 'IGNORE_SPACE';\n".$str;
return preg_split('/;[\t\r\n]+/i', trim(preg_replace('/;[\s+](EXPLAIN|SELECT|ALTER|CREATE|INSERT|DELETE|UPDATE|DROP|OPTIMIZE|ANALYZE|RESTORE|CHECKSUM|CHECK\s+TABLE|BACKUP\s+TABLE|REPAIR|TRUNCATE|REPLACE|SHOW|SET|USE|LOAD\s+DATA|RENAME\s+TABLE|EXECUTE|DEALLOCATE|DESCRIBE|LOCK\s+TABLES|START\s+TRANSACTION|PREPARE|CALL|HANDLER|SAVEPOINT|HELP|GRANT|REVOKE|DO)\s+/i', ";\n$1 ", $str)));
}
function sql_installer($host = '', $name = '', $pass = '', $db = '', $charset = '', $sql = '')
{
if (!$sql) {
return;
}
if (!$query = sql_parser($sql)) {
return;
}
$out = '<?php
// SQL Installer
// Created in Gmanager ' . $GLOBALS['version'] . '
// http://wapinet.ru/gmanager/
error_reporting(0);
if (strpos($_SERVER[\'HTTP_USER_AGENT\'], \'MSIE\') !== false) {
header(\'Content-type: text/html; charset=UTF-8\');
} else {
header(\'Content-type: application/xhtml+xml; charset=UTF-8\');
}
echo \'<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="ru">
<head>
<title>SQL Installer</title>
<style type="text/css">
body {
background-color: #cccccc;
color: #000000;
}
</style>
</head>
<body>
<div>\';
if (!$_POST) {
echo \'<form action="\' . $_SERVER[\'PHP_SELF\'] . \'" method="post">
<div>
' . $GLOBALS['lng']['mysql_user'] . '<br/>
<input type="text" name="name" value="' . $name . '"/><br/>
' . $GLOBALS['lng']['mysql_pass'] . '<br/>
<input type="text" name="pass" value="' . $pass . '"/><br/>
' . $GLOBALS['lng']['mysql_host'] . '<br/>
<input type="text" name="host" value="' . $host . '"/><br/>
' . $GLOBALS['lng']['mysql_db'] . '<br/>
<input type="text" name="db" value="' . $db . '"/><br/>
<input type="submit" value="' . $GLOBALS['lng']['install'] . '"/>
</div>
</form>
</div></body></html>\';
exit;
}
$connect = mysql_connect($_POST[\'host\'], $_POST[\'name\'], $_POST[\'pass\']) or die (\'Can not connect to MySQL</div></body></html>\');
mysql_select_db($_POST[\'db\'], $connect) or die (\'Error select the database</div></body></html>\');
mysql_query(\'SET NAMES `' . str_ireplace('utf-8', 'utf8', $charset) . '`\', $connect);' . "\n\n";
foreach ($query as $q) {
$out .= '$sql = "' . str_replace('"', '\"', trim($q)) . ';";
mysql_query($sql, $connect);
if ($err = mysql_error($connect)) {
$error[] = $err."\n SQL:\n".$sql;
}' . "\n\n";
}
$out .= 'if ($error) {
echo \'Error:<pre>\' . htmlspecialchars(print_r($error, true), ENT_NOQUOTES) . \'</pre>\';
} else {
echo \'Ok\';
}
echo \'</div></body></html>\'
?>';
return $out;
}
function sql($name = '', $pass = '', $host = '', $db = '', $data = '', $charset = '')
{
if (!$connect = mysql_connect($host, $name, $pass)) {
return report($GLOBALS['lng']['mysq_connect_false'], 1);
}
if ($charset) {
mysql_query('SET NAMES `' . str_ireplace('utf-8', 'utf8', $charset) . '`', $connect);
}
if ($db) {
if (!mysql_select_db($db, $connect)) {
return report($GLOBALS['lng']['mysq_select_db_false'], 1);
}
}
$i = $time = 0;
$out = '';
foreach (sql_parser($data) as $q) {
$result = array();
$str = '';
while (iconv_substr($q, iconv_strlen($q)-1, 1) == ';') {
$q = iconv_substr($q, 0, -1);
}
$start = microtime(true);
$r = mysql_query($q . ';', $connect);
$time += microtime(true) - $start;
if (!$r) {
return report($GLOBALS['lng']['mysq_query_false'], 2) . '<div><code>' . mysql_error($connect) . '</code></div>';
} else {
if (mysql_affected_rows($connect)) {
while ($arr = mysql_fetch_assoc($r)) {
//if ($arr && $arr !== true) {
$result[] = $arr;
//}
}
}
}
$i++;
if ($result) {
$str .= '<tr><th> ' . implode(' </th><th> ', array_map('htmlspecialchars', array_keys($result[0]))) . ' </th></tr>';
foreach ($result as $v) {
$str .= '<tr class="border">';
foreach ($v as $value) {
$str .= '<td><pre style="margin:0;"><a href="#sql" onclick="paste(\'' . rawurlencode($value) . '\');">' . htmlspecialchars($value, ENT_NOQUOTES) . '</a></pre></td>';
}
$str .= '</tr>';
}
$out .= '<table class="telo">' . $str . '</table>';
}
}
mysql_close($connect);
return report($GLOBALS['lng']['mysql_true'] . $i . '<br/>' . str_replace('%time%', round($time, 6), $GLOBALS['lng']['microtime']), 0) . $out;
}
function go($pg = 0, $all = 0, $text = '')
{
$go = '';
$page1 = $pg - 2;
$page2 = $pg - 1;
$page3 = $pg + 1;
$page4 = $pg + 2;
if ($page1 > 0) {
$go .= '<a href="' . $_SERVER['PHP_SELF'] . '?pg=' . $page1 . $text . '">' . $page1 . '</a> ';
}
if ($page2 > 0) {
$go .= '<a href="' . $_SERVER['PHP_SELF'] . '?pg=' . $page2 . $text . '">' . $page2 . '</a> ';
}
$go .= $pg . ' ';
if ($page3 <= $all) {
$go .= '<a href="' . $_SERVER['PHP_SELF'] . '?pg=' . $page3 . $text . '">' . $page3 . '</a> ';
}
if ($page4 <= $all) {
$go .= '<a href="' . $_SERVER['PHP_SELF'] . '?pg=' . $page4 . $text . '">' . $page4 . '</a> ';
}
if ($all > 3 && $all > $page4) {
$go .= '... <a href="' . $_SERVER['PHP_SELF'] . '?pg=' . $all . $text . '">' . $all . '</a>';
}
if ($page1 > 1) {
$go = '<a href="' . $_SERVER['PHP_SELF'] . '?pg=1' . $text . '">1</a> ... ' . $go;
}
if ($go != $pg . ' ') {
return '<tr><td class="border" colspan="' . (array_sum($GLOBALS['index']) + 1) . '"> ' . $go . '</td></tr>';
}
}
function str_link($str = '')
{
$len = @iconv_strlen($str);
if ($len > $GLOBALS['link']) {
$s = intval($GLOBALS['link'] / 2) + 2;
return iconv_substr($str, 0, $s) . ' ... ' . iconv_substr($str, ($len - $s));
}
return $str;
}
// Содержимое файла, имя файла, аттач (опционально), MIME (опционально)
function getf($f = '', $name = '', $attach = false, $mime = false)
{
ob_implicit_flush(1);
set_time_limit(9999);
ini_set('zlib.output_compression', 'Off');
ini_set('output_handler', '');
// Длина файла
$sz = $len = strlen($f);
// "От" и "До" по умолчанию
$file_range = array(
'from' => 0,
'to' => $len
);
// Если докачка
$range = isset($_SERVER['HTTP_RANGE']);
if ($range) {
if (preg_match('/bytes=(\d+)\-(\d*)/i', $_SERVER['HTTP_RANGE'], $matches)) {
// "От", "До" если "До" нету, "До" равняется размеру файла
$file_range = array('from' => $matches[1], 'to' => (!$matches[2]) ? $len : $matches[2]);
// Режем переменную в соответствии с данными
if ($file_range) {
$f = substr($f, $file_range['from'], $file_range['to']);
$sz = $file_range['to'] - $file_range['from'];
}
}
}
// Заголовки...
if ($file_range['from']) {
header('HTTP/1.0 206 Partial Content');
} else {
header('HTTP/1.0 200 OK');
}
// Ставим MIME в зависимости от расширения
if (!$mime) {
switch (strtolower(pathinfo($name, PATHINFO_EXTENSION))) {
default:
$mime = 'application/octet-stream';
break;
case 'jar':
$mime = 'application/java-archive';
break;
case 'jad':
$mime = 'text/vnd.sun.j2me.app-descriptor';
break;
case 'cab':
$mime = 'application/vnd.ms-cab-compressed';
break;
case 'sis':
$mime = 'application/vnd.symbian.install';
break;
case 'zip':
$mime = 'application/x-zip';
break;
case 'rar':
$mime = 'application/x-rar-compressed';
break;
case '7z':
$mime = 'application/x-7z-compressed';
break;
case 'gz':
case 'tgz':
$mime = 'application/x-gzip';
break;
case 'bz':
case 'bz2':
$mime = 'application/x-bzip';
break;
case 'jpg':
case 'jpe':
case 'jpeg':
$mime = 'image/jpeg';
break;
case 'gif':
$mime = 'image/gif';
break;
case 'png':
$mime = 'image/png';
break;
case 'bmp':
$mime = 'image/bmp';
break;
case 'txt':
case 'dat':
case 'php':
case 'php4':
case 'php5':
case 'phtml':
case 'htm':
case 'html':
case 'shtm':
case 'shtml':
case 'wml':
case 'css':
case 'js':
case 'xml':
case 'sql':
case 'tpl':
case 'tmp':
case 'cgi':
case 'py':
case 'pl':
case 'rb':
$mime = 'text/plain';
break;
case 'mmf':
$mime = 'application/x-smaf';
break;
case 'mid':
$mime = 'audio/mid';
break;
case 'mp3':
$mime = 'audio/mpeg';
break;
case 'amr':
$mime = 'audio/amr';
break;
case 'wav':
$mime = 'audio/x-wav';
break;
case 'mp4':
$mime = 'video/mp4';
break;
case 'wmv':
$mime = 'video/x-ms-wmv';
break;
case '3gp':
$mime = 'video/3gpp';
break;
case 'avi':
$mime = 'video/x-msvideo';
break;
case 'mpg':
case 'mpe':
case 'mpeg':
$mime = 'video/mpeg';
break;
case 'pdf':
$mime = 'application/pdf';
break;
case 'doc':
case 'docx':
$mime = 'application/msword';
break;
case 'swf':
$mime = 'application/x-shockwave-flash';
break;
}
}
//header('Date: ' . gmdate('r', $_SERVER['REQUEST_TIME']));
//header('Content-Transfer-Encoding: binary');
//header('Last-Modified: ' . gmdate('r', 1234));
// Кэш
header('Cache-Control: public, must-revalidate, max-age=0');
header('Pragma: cache');
// Хэш
//$etag = md5($f);
//$etag = substr($etag, 0, 4) . '-' . substr($etag, 5, 5) . '-' . substr($etag, 10, 8);
//header('ETag: "' . $etag . '"');
//header('Connection: Close');
header('Keep-Alive: timeout=15, max=50');
header('Connection: Keep-Alive');
header('Accept-Ranges: bytes');
header('Content-Length: ' . $sz);
// Если докачка
if ($range) {
header('Content-Range: bytes ' . $file_range['from'] . '-' . $file_range['to'] . '/' . $len);
}
// Если отдаем как аттач
if ($attach) {
header('Content-Type: ' . $mime);
header('Content-Disposition: attachment; filename="' . $name . '"');
} else if ($mime == 'text/plain') {
// header('Content-Type: text/plain; charset=' . $charset);
header('Content-Type: text/plain;');
} else {
header('Content-Type: ' . $mime);
}
//ob_end_flush();
exit($f);
}
function getData($url = '', $headers = '', $only_headers = false, $post = '')
{
$u = parse_url($url);
$host = $u['host'];
$path = isset($u['path']) ? $u['path'] : '/';
$port = isset($u['port']) ? $u['port'] : 80;
if (isset($u['query'])) {
$path .= '?' . $u['query'];
}
if (isset($u['fragment'])) {
$path .= '#' . $u['fragment'];
}
$fp = fsockopen($host, $port, $errno, $errstr, 10);
if (!$fp) {
return false;
} else {
$out = 'Host: ' . $host . "\r\n";
if ($headers) {
$out .= trim($headers) . "\r\n";
} else {
$out .= 'User-Agent: ' . $_SERVER['HTTP_USER_AGENT'] . "\r\n";
$out .= 'Accept: ' . $_SERVER['HTTP_ACCEPT'] . "\r\n";
$out .= 'Accept-Language: ' . $_SERVER['HTTP_ACCEPT_LANGUAGE'] . "\r\n";
$out .= 'Accept-Charset: ' . $_SERVER['HTTP_ACCEPT_CHARSET'] . "\r\n";
//$out .= 'TE: deflate, gzip, chunked, identity, trailers' . "\r\n";
$out .= 'Connection: Close' . "\r\n";
}
if ($post) {
$out .= 'Content-type: application/x-www-form-urlencoded' . "\r\n";
$out .= 'Content-Length: ' . strlen($post) . "\r\n";
$out = 'POST ' . $path . ' HTTP/1.0' . "\r\n" . $out . "\r\n" . $post;
} else {
$out = 'GET ' . $path . ' HTTP/1.0' . "\r\n" . $out . "\r\n";
}
fwrite($fp, $out);
$headers = $body = '';
while ($str = trim(fgets($fp, 512))) {
$headers .= $str . "\r\n";
}
if (!$only_headers) {
while (!feof($fp)) {
$body .= fgets($fp, 4096);
}
}
fclose($fp);
}
return array('headers' => $headers, 'body' => $body);
}
/**
* @param void
* @return string
*/
function error()
{
$err = error_get_last();
if ($err) {
return $err['message'] . ' (' . $err['file'] . ': ' . $err['line'] . ')';
} else {
return $GLOBALS['lng']['unknown_error'];
}
}
/**
* @param string
* @param int 0 - ok, 1 - error, 2 - error + email
*/
function report($text = '', $error = 0)
{
if ($error == 2) {
return '<div class="red">' . $text . '<br/></div><div><form action="change.php?go=send_mail&c=' . rawurlencode($GLOBALS['current']) . '" method="post"><div><input type="hidden" name="to" value="[email protected]"/><input type="hidden" name="theme" value="Gmanager ' . $GLOBALS['version'] . ' Error"/><input type="hidden" name="mess" value="' . htmlspecialchars('URI: ' . basename($_SERVER['PHP_SELF']) . '?' . $_SERVER['QUERY_STRING'] . "\n" . 'PHP: ' . PHP_VERSION . "\n" . htmlspecialchars_decode(str_replace('<br/>', "\n", $text), ENT_COMPAT), ENT_COMPAT) . '"/><input type="submit" value="' . $GLOBALS['lng']['send_report'] . '"/></div></form></div>';
} else if ($error == 1) {
return '<div class="red">' . $text . '<br/></div>';
}
return '<div class="green">' . $text . '<br/></div>';
}
function encoding($text, $charset)
{
$ch = explode(' -> ', $charset);
if ($text) {
$text = iconv($ch[0], $ch[1] . '//TRANSLIT', $text);
}
return array(0 => $ch[0], 1 => $ch[1], 'text' => $text);
}
function ftp_move_files($from = '', $to = '', $chmodf = '0644', $chmodd = '0755', $overwrite = false)
{
$h = opendir($from);
while (($f = readdir($h)) !== false) {
if ($f == '.' || $f == '..') {
continue;
}
if (is_dir($from . '/' . $f)) {
$GLOBALS['mode']->mkdir($to . '/' . $f, $chmodd);
ftp_move_files($from . '/' . $f, $to . '/' . $f, $chmodf, $chmodd, $overwrite);
rmdir($from . '/' . $f);
} else {
if ($overwrite || !$GLOBALS['mode']->file_exists($to . '/' . $f)) {
$GLOBALS['mode']->file_put_contents($to . '/' . $f, file_get_contents($from . '/' . $f));
}
rechmod($to . '/' . $f, $chmodf);
unlink($from . '/' . $f);
}
}
closedir($h);
rmdir($from);
}
function ftp_copy_files($from = '', $to = '', $chmodf = '0644', $chmodd = '0755', $overwrite = false)
{
foreach ($GLOBALS['mode']->iterator($from) as $f) {
if ($f == '.' || $f == '..') {
continue;
}
if ($GLOBALS['mode']->is_dir($from . '/' . $f)) {
mkdir($to . '/' . $f, $chmodd);
ftp_copy_files($from . '/' . $f, $to . '/' . $f, $chmodf, $chmodd, $overwrite);
} else {
if ($overwrite || !file_exists($to . '/' . $f)) {
file_put_contents($to . '/' . $f, $GLOBALS['mode']->file_get_contents($from . '/' . $f));
}
}
}
}
function ftp_archive_start($current = '')
{
$GLOBALS['ftp_archive_start'] = $GLOBALS['temp'] . '/GmanagerFtpArchive' . $_SERVER['REQUEST_TIME'] . '.tmp';
file_put_contents($GLOBALS['ftp_archive_start'], $GLOBALS['mode']->file_get_contents($current));
return $GLOBALS['ftp_archive_start'];
}
function ftp_archive_end($current = '')
{
if ($current != '') {
$GLOBALS['mode']->file_put_contents($current, file_get_contents($GLOBALS['ftp_archive_start']));
}
unlink($GLOBALS['ftp_archive_start']);
}
function get_type($f)
{
$type = array_reverse(explode('.', strtoupper($f)));
if ((isset($type[1]) && $type[1] != '') && ($type[1] . '.' . $type[0] == 'TAR.GZ' || $type[1] . '.' . $type[0] == 'TAR.BZ' || $type[1] . '.' . $type[0] == 'TAR.GZ2' || $type[1] . '.' . $type[0] == 'TAR.BZ2')) {
return $type[1] . '.' . $type[0];
}
return $type[0];
}
function is_archive($type)
{
if ($type == 'ZIP' || $type == 'JAR' || $type == 'AAR' || $type == 'WAR') {
return 'ZIP';
} else if ($type == 'TAR' || $type == 'TGZ' || $type == 'TGZ2' || $type == 'TBZ' || $type == 'TBZ2' || $type == 'TAR.GZ' || $type == 'TAR.GZ2' || $type == 'TAR.BZ' || $type == 'TAR.BZ2' || $type == 'BZ' || $type == 'BZ2') {
return 'TAR';
} else if ($type == 'GZ' || $type == 'GZ2') {
return 'GZ';
} else if ($type == 'RAR' && extension_loaded('rar')) {
return 'RAR';
}
return '';
}
function clean($name = '')
{
$h = @opendir($name);
if (!$h) {
return false;
}
while (($f = readdir($h)) !== false) {
if ($f == '.' || $f == '..') {
continue;
}
if (is_dir($name . '/' . $f)) {
@rmdir($name . '/' . $f);
clean($name . '/' . $f);
} else {
unlink($name . '/' . $f);
}
}
closedir($h);
rmdir($name);
}
?>