1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
|
<?php
/*
@include_once('Archive/Tar.php');
if (!class_exists('Archive_Tar')) {
Message::addError('Broken php installation: pear extension Archive_Tar missing!');
Util::redirect('?do=main');
}
*/
User::load();
// Read request vars
$action = Request::any('action', 'list');
$step = Request::any('step', 0);
$nextStep = $step + 1;
// Action: "addmodule" (upload new module)
if ($action === 'addmodule') {
require_once 'modules/sysconfig/addmodule.inc.php';
$handler = AddModule_Base::get($step);
$handler->preprocess();
}
// Action "activate" (set sysconfig as active)
if ($action === 'activate') {
if (!User::hasPermission('superadmin')) {
Message::addError('no-permission');
Util::redirect('?do=sysconfig');
}
if (!isset($_REQUEST['file'])) {
Message::addError('missing-file');
Util::redirect('?do=sysconfig');
}
$file = preg_replace('/[^a-z0-9\-_\.]/', '', $_REQUEST['file']);
$path = CONFIG_TGZ_LIST_DIR . '/' . $file;
if (!file_exists($path)) {
Message::addError('invalid-file', $file);
Util::redirect('?do=sysconfig');
}
mkdir(CONFIG_HTTP_DIR . '/default', 0755, true);
$linkname = CONFIG_HTTP_DIR . '/default/config.tgz';
@unlink($linkname);
if (file_exists($linkname)) Util::traceError('Could not delete old config.tgz link!');
if (!symlink($path, $linkname)) Util::traceError("Could not symlink to $path at $linkname!");
Message::addSuccess('config-activated');
Util::redirect('?do=sysconfig');
}
/**
* Render module; called by main script when this module page should render
* its content.
*/
function render_module()
{
global $action, $handler;
switch ($action) {
case 'addmodule':
$handler->render();
break;
case 'list':
rr_list_configs();
break;
default:
Message::addError('invalid-action', $_REQUEST['action']);
break;
}
}
function rr_list_configs()
{
if (!User::hasPermission('superadmin')) {
Message::addError('no-permission');
return;
}
$res = Database::simpleQuery("SELECT title FROM configtgz_module ORDER BY title ASC");
$modules = array();
while ($row = $res->fetch(PDO::FETCH_ASSOC)) {
$modules[] = array(
'module' => $row['title']
);
}
Render::addTemplate('page-sysconfig-main', array('modules' => $modules, 'token' => Session::get('token')));
}
function rr_list_remote_configs()
{
if (!User::hasPermission('superadmin')) {
Message::addError('no-permission');
return;
}
$data = Util::download(CONFIG_REMOTE_TGZ . '/list.php', 4, $code);
if ($code !== 200) {
Message::addError('remote-timeout', CONFIG_REMOTE_TGZ . '/list.php', $code);
return;
}
$list = json_decode($data, true);
if (!is_array($list)) {
Message::addError('remote-parse-failed', $data);
return;
}
$id = 0;
foreach ($list as &$item) {
$item['id'] = 'download' . (++$id);
}
Render::addTemplate('page-remote-tgz-list', array('files' => $list));
}
|