1
|
|
|
<?php |
2
|
|
|
/** |
3
|
|
|
* EGgroupware admin - New et2 site configuration |
4
|
|
|
* |
5
|
|
|
* @link http://www.egroupware.org |
6
|
|
|
* @author Ralf Becker <[email protected]> |
7
|
|
|
* @package admin |
8
|
|
|
* @copyright (c) 2016-18 by Ralf Becker <[email protected]> |
9
|
|
|
* @license http://opensource.org/licenses/gpl-license.php GPL - GNU General Public License |
10
|
|
|
*/ |
11
|
|
|
|
12
|
|
|
use EGroupware\Api; |
13
|
|
|
|
14
|
|
|
/** |
15
|
|
|
* New site configuration for all apps using eTemplate2 $app/templates/default/config.xet |
16
|
|
|
*/ |
17
|
|
|
class admin_config |
18
|
|
|
{ |
19
|
|
|
var $public_functions = array('index' => True); |
20
|
|
|
|
21
|
|
|
/** |
22
|
|
|
* Upload function to store anonymous images into instance files_dir/anon_images |
23
|
|
|
* |
24
|
|
|
* @param array $file file info array |
25
|
|
|
* @param array|string $value current value of login_background_file |
26
|
|
|
* |
27
|
|
|
*/ |
28
|
|
|
function ajax_upload_anon_images ($file, $value) |
29
|
|
|
{ |
30
|
|
|
if (!isset($GLOBALS['egw_info']['user']['apps']['admin'])) die('no rights to be here!'); |
|
|
|
|
31
|
|
|
$path = $GLOBALS['egw_info']['server']['files_dir'].'/anon-images'; |
32
|
|
|
$success = false; |
33
|
|
|
$response = Api\Json\Response::get(); |
34
|
|
|
if (is_array($file) && is_writable(dirname($path))) |
35
|
|
|
{ |
36
|
|
|
if (!is_dir($path)) mkdir ($path); |
37
|
|
|
$tmp_file = array_keys($file); |
38
|
|
|
$destination = $path.'/'.$file[$tmp_file[0]]['name']; |
39
|
|
|
$success = rename($GLOBALS['egw_info']['server']['temp_dir'].'/'.$tmp_file[0],$destination); |
40
|
|
|
} |
41
|
|
|
if ($success) |
42
|
|
|
{ |
43
|
|
|
$value = array_merge($value, array( |
44
|
|
|
$GLOBALS['egw_info']['server']['webserver_url'].'/api/anon_images.php?src='.urlencode($file[$tmp_file[0]]['name']).'&'.filemtime($destination), |
45
|
|
|
)); |
46
|
|
|
$response->data($value); |
47
|
|
|
} |
48
|
|
|
else |
49
|
|
|
{ |
50
|
|
|
$response->error(lang('Failed to upload %1',$destination)); |
|
|
|
|
51
|
|
|
} |
52
|
|
|
} |
53
|
|
|
|
54
|
|
|
/** |
55
|
|
|
* Removes images from anon-images directory |
56
|
|
|
* |
57
|
|
|
* @param type $files |
58
|
|
|
*/ |
59
|
|
|
function remove_anon_images ($files) |
60
|
|
|
{ |
61
|
|
|
if (!isset($GLOBALS['egw_info']['user']['apps']['admin'])) die('no rights to be here!'); |
|
|
|
|
62
|
|
|
if ($files) |
|
|
|
|
63
|
|
|
{ |
64
|
|
|
$base = $GLOBALS['egw_info']['server']['files_dir'].'/anon-images'; |
65
|
|
|
foreach ($files as $file) |
66
|
|
|
{ |
67
|
|
|
$parts2 = explode('anon_images.php?src=', $file); |
68
|
|
|
$parts = explode('&', $parts2[1]); |
69
|
|
|
$path = $base.'/'.urldecode($parts[0]); |
70
|
|
|
if (is_writable(dirname($base)) && file_exists($path)) |
71
|
|
|
{ |
72
|
|
|
unlink($path); |
73
|
|
|
} |
74
|
|
|
} |
75
|
|
|
} |
76
|
|
|
} |
77
|
|
|
|
78
|
|
|
/** |
79
|
|
|
* List of configs |
80
|
|
|
* |
81
|
|
|
* @param type $_content |
82
|
|
|
* @throws Api\Exception\WrongParameter |
83
|
|
|
*/ |
84
|
|
|
function index($_content=null) |
85
|
|
|
{ |
86
|
|
|
if (is_array($_content)) |
|
|
|
|
87
|
|
|
{ |
88
|
|
|
$_appname = $_content['appname']; |
89
|
|
|
} |
90
|
|
|
elseif (!empty($_GET['appname']) && isset($GLOBALS['egw_info']['apps'][$_GET['appname']])) |
91
|
|
|
{ |
92
|
|
|
$_appname = $_GET['appname']; |
93
|
|
|
} |
94
|
|
|
else |
95
|
|
|
{ |
96
|
|
|
throw new Api\Exception\WrongParameter("Wrong or missing appname parameter!"); |
97
|
|
|
} |
98
|
|
|
if ($GLOBALS['egw']->acl->check('site_config_acce',1,'admin')) |
99
|
|
|
{ |
100
|
|
|
Api\Framework::redirect_link('/index.php'); |
101
|
|
|
} |
102
|
|
|
|
103
|
|
|
// load the translations of the app we show too, so they dont need to be in admin! |
104
|
|
|
if ($_appname != 'admin') |
105
|
|
|
{ |
106
|
|
|
Api\Translation::add_app($_appname); |
107
|
|
|
} |
108
|
|
|
|
109
|
|
|
switch($_appname) |
110
|
|
|
{ |
111
|
|
|
case 'admin': |
112
|
|
|
case 'addressbook': |
113
|
|
|
case 'calendar': |
114
|
|
|
case 'preferences': |
115
|
|
|
$appname = $_appname; |
116
|
|
|
$config_appname = 'phpgwapi'; |
117
|
|
|
break; |
118
|
|
|
case 'phpgwapi': |
119
|
|
|
case '': |
120
|
|
|
/* This keeps the admin from getting into what is a setup-only config */ |
121
|
|
|
Api\Framework::redirect_link('/admin/index.php?ajax=true'); |
122
|
|
|
break; |
123
|
|
|
default: |
124
|
|
|
$appname = $_appname; |
125
|
|
|
$config_appname = $appname; |
126
|
|
|
break; |
127
|
|
|
} |
128
|
|
|
|
129
|
|
|
$c = new Api\Config($config_appname); |
130
|
|
|
$old = (array)$c->read_repository(); |
131
|
|
|
if ($_content['cancel'] || ($_content['save'] || $_content['apply']) && $GLOBALS['egw']->acl->check('site_config_acce',2,'admin')) |
132
|
|
|
{ |
133
|
|
|
Api\Framework::redirect_link('/admin/index.php?ajax=true'); |
134
|
|
|
} |
135
|
|
|
|
136
|
|
|
if ($_content['save'] || $_content['apply']) |
137
|
|
|
{ |
138
|
|
|
// support old validation hooks |
139
|
|
|
$_POST = array('newsettings' => &$_content['newsettings']); |
140
|
|
|
|
141
|
|
|
// Remove actual files (cleanup) of deselected urls from login_background_file |
142
|
|
|
if (!empty($c->config_data['login_background_file'])) |
|
|
|
|
143
|
|
|
{ |
144
|
|
|
$this->remove_anon_images(array_diff((array)$c->config_data['login_background_file'], (array)$_content['newsettings']['login_background_file'])); |
|
|
|
|
145
|
|
|
} |
146
|
|
|
|
147
|
|
|
/* Load hook file with functions to validate each config (one/none/all) */ |
148
|
|
|
$errors = Api\Hooks::single(array( |
149
|
|
|
'location' => 'config_validate', |
150
|
|
|
)+(array)$_content['newsettings'], $appname); |
151
|
|
|
if (!is_string($errors)) $errors = ''; // old hooks allways return true |
152
|
|
|
|
153
|
|
|
foreach($_content['newsettings'] as $key => $config) |
154
|
|
|
{ |
155
|
|
|
if ($config) |
156
|
|
|
{ |
157
|
|
|
$c->config_data[$key] = $config; |
|
|
|
|
158
|
|
|
if (in_array($key, (array)$GLOBALS['egw_info']['server']['found_validation_hook'], true) && function_exists($key)) |
159
|
|
|
{ |
160
|
|
|
call_user_func($key, $config, $c); |
161
|
|
|
if($GLOBALS['config_error']) |
162
|
|
|
{ |
163
|
|
|
$errors .= lang($GLOBALS['config_error']) . "\n"; |
164
|
|
|
$GLOBALS['config_error'] = False; |
165
|
|
|
} |
166
|
|
|
} |
167
|
|
|
} |
168
|
|
|
// don't erase passwords, since we also don't print them |
169
|
|
|
elseif(strpos($key,'passwd') === false && strpos($key,'password') === false && strpos($key,'root_pw') === false) |
170
|
|
|
{ |
171
|
|
|
unset($c->config_data[$key]); |
|
|
|
|
172
|
|
|
} |
173
|
|
|
} |
174
|
|
|
if(in_array('final_validation', (array)$GLOBALS['egw_info']['server']['found_validation_hook']) && |
175
|
|
|
function_exists('final_validation')) |
176
|
|
|
{ |
177
|
|
|
final_validation($_content['newsettings']); |
178
|
|
|
if($GLOBALS['config_error']) |
179
|
|
|
{ |
180
|
|
|
$errors .= lang($GLOBALS['config_error']) . "\n"; |
181
|
|
|
$GLOBALS['config_error'] = False; |
182
|
|
|
} |
183
|
|
|
unset($GLOBALS['egw_info']['server']['found_validation_hook']); |
184
|
|
|
} |
185
|
|
|
|
186
|
|
|
// do not allow to save config, if there are errors |
187
|
|
|
if (!$errors) |
188
|
|
|
{ |
189
|
|
|
// compute real changes and their old values (null for removals) |
190
|
|
|
$modifications = array_udiff_assoc($c->config_data, $old, function($a, $b) |
|
|
|
|
191
|
|
|
{ |
192
|
|
|
return (int)($a != $b); // necessary to kope with arrays |
193
|
|
|
}); |
194
|
|
|
$removals = array_diff(array_udiff_assoc($old, $c->config_data, function($a, $b) |
|
|
|
|
195
|
|
|
{ |
196
|
|
|
return (int)(!empty($a) && $a != $b); |
197
|
|
|
}), array(null, '')); |
198
|
|
|
$set = array_merge(array_fill_keys(array_keys($removals), null), $modifications); |
199
|
|
|
$old = array_filter($old, function($key) use ($set) |
200
|
|
|
{ |
201
|
|
|
return array_key_exists($key, $set); |
202
|
|
|
}, ARRAY_FILTER_USE_KEY); |
203
|
|
|
if ($set) |
|
|
|
|
204
|
|
|
{ |
205
|
|
|
$cmd = new admin_cmd_config($_appname, $set, $old, |
206
|
|
|
(array)$_content['admin_cmd'], $config_appname === 'phpgwapi'); |
207
|
|
|
$msg = $cmd->run(); |
208
|
|
|
} |
209
|
|
|
else |
210
|
|
|
{ |
211
|
|
|
$msg = lang('Nothing to save.'); |
212
|
|
|
} |
213
|
|
|
// allow apps to hook into configuration dialog to eg. save some stuff outside configuration |
214
|
|
|
$_content['location'] = 'config_after_save'; |
215
|
|
|
Api\Hooks::single($_content, $_appname); |
216
|
|
|
} |
217
|
|
|
if(!$errors && !$_content['apply']) |
218
|
|
|
{ |
219
|
|
|
Api\Framework::message($msg, 'success'); |
220
|
|
|
Api\Framework::redirect_link('/index.php', array( |
221
|
|
|
'menuaction' => 'admin.admin_ui.index', |
222
|
|
|
'ajax' => 'true' |
223
|
|
|
), 'admin'); |
224
|
|
|
} |
225
|
|
|
} |
226
|
|
|
|
227
|
|
|
if($errors) |
228
|
|
|
{ |
229
|
|
|
Api\Framework::message(lang('Error') . ': ' . $errors, 'error'); |
230
|
|
|
unset($errors); |
231
|
|
|
unset($GLOBALS['config_error']); |
232
|
|
|
|
233
|
|
|
// keep old content on error |
234
|
|
|
$config = $_content['newsettings']; |
235
|
|
|
} |
236
|
|
|
else |
237
|
|
|
{ |
238
|
|
|
if ($_content['apply']) |
239
|
|
|
{ |
240
|
|
|
Api\Framework::message($msg, 'success'); |
241
|
|
|
} |
242
|
|
|
$config = $c->read_repository(); |
243
|
|
|
} |
244
|
|
|
$sel_options = $readonlys = array(); |
245
|
|
|
// call "config" hook, allowing apps to overwrite config, eg. set default values, |
246
|
|
|
// or return options in "sel_options" keys |
247
|
|
|
$config['location'] = 'config'; |
248
|
|
|
// let config hook know, this is an inital call and not one after user hits [Apply] button |
249
|
|
|
$config['initial-call'] = is_null($_content); |
250
|
|
|
$ret = Api\Hooks::single($config, $appname); |
251
|
|
|
if (is_array($ret)) |
252
|
|
|
{ |
253
|
|
|
if (isset($ret['sel_options'])) $sel_options = $ret['sel_options']; |
254
|
|
|
$config = array_merge($config, $ret); |
255
|
|
|
} |
256
|
|
|
|
257
|
|
|
$tmpl = new Api\Etemplate($appname.'.config'); |
258
|
|
|
$path = (parse_url($tmpl->rel_path, PHP_URL_SCHEME) !== 'vfs' ? EGW_SERVER_ROOT : '').$tmpl->rel_path; |
259
|
|
|
$content = array( |
260
|
|
|
'tabs' => $_content['tabs'], |
261
|
|
|
'tabs2' => $_content['tabs2'], |
262
|
|
|
'template' => $appname.'.config', |
263
|
|
|
'newsettings' => array(), |
264
|
|
|
); |
265
|
|
|
|
266
|
|
|
// for security reasons we do not send all config to client-side, but only ones mentioned in templates |
267
|
|
|
$matches = null; |
268
|
|
|
preg_match_all('/id="newsettings\[([^]]+)\]/', file_get_contents($path), $matches, PREG_PATTERN_ORDER); |
269
|
|
|
foreach($matches[1] as $name) |
270
|
|
|
{ |
271
|
|
|
$content['newsettings'][$name] = isset($config[$name]) ? $config[$name] : ''; |
272
|
|
|
} |
273
|
|
|
|
274
|
|
|
// make everything readonly and remove save/apply button, if user has not rights to store config |
275
|
|
|
if ($GLOBALS['egw']->acl->check('site_config_acce',2,'admin')) |
276
|
|
|
{ |
277
|
|
|
$readonlys[__ALL__] = true; |
|
|
|
|
278
|
|
|
$readonlys['cancel'] = false; |
279
|
|
|
} |
280
|
|
|
|
281
|
|
|
$tmpl->read('admin.site-config'); |
282
|
|
|
$method = (get_called_class() == __CLASS__) ? 'admin.admin_config.index' : "$appname.".get_called_class().'.'.__FUNCTION__; |
283
|
|
|
$tmpl->exec($method, $content, $sel_options, $readonlys, array('appname' => $appname)); |
284
|
|
|
} |
285
|
|
|
} |
286
|
|
|
|
In general, usage of exit should be done with care and only when running in a scripting context like a CLI script.