2 /**********************************************************************
3 Copyright (C) FrontAccounting, LLC.
4 Released under the terms of the GNU General Public License, GPL,
5 as published by the Free Software Foundation, either version 3
6 of the License, or (at your option) any later version.
7 This program is distributed in the hope that it will be useful,
8 but WITHOUT ANY WARRANTY; without even the implied warranty of
9 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
10 See the License here <http://www.gnu.org/licenses/gpl-3.0.html>.
11 ***********************************************************************/
13 // Type of requirement for positive test result
17 2 => _('Recommended'),
21 // test mysql server version
24 $test['descr'] = _('MySQL version'). ' >=4.1';
26 $test['test'] = db_get_version();
27 $test['result'] = $test['test']>='4.1';
28 $test['comments'] = _('Upgrade MySQL server to version at least 4.1');
32 // test php mysql extension
33 function tst_phpmysql()
35 $test['descr'] = _('PHP MySQL extension');
37 $test['result'] = db_extension_exists();
38 $test['test'] = $test['result'] ? _('Yes'): _('No');
40 $test['comments'] = _('Your PHP has to have MySQL extension enabled.');
46 $test['descr'] = _('PHP version').' >=5.0.0';
48 $test['test'] = phpversion();
49 $test['result'] = $test['test']>='5.0.0';
50 $test['comments'] = _('Upgrade PHP to version at least 5.0.0');
57 $test['descr'] = _('Server system');
59 $test['test'] = PHP_OS;
60 $test['result'] = true;
65 function tst_sessionpath()
67 $test['descr'] = _('Session save path');
69 $test['test'] = session_save_path();
70 $test['result'] = true;
75 function tst_install()
79 $test['descr'] = _('Removed install wizard folder');
81 $test['result'] = !is_dir($path_to_root.'/install');
82 $test['test'] = _('Not removed');
83 $test['comments'] = _('Remove or rename install wizard folder for security reasons.');
88 function tst_browser()
90 $test['descr'] = _('Browser type');
92 $test['test'] = $_SERVER['HTTP_USER_AGENT'];
93 $test['result'] = true;
94 $test['comments'] = _('Any browser is supported');
101 $test['descr'] = _('Http server type');
102 $test['test'] = $_SERVER['SERVER_SOFTWARE'];
104 $test['result'] = true;
105 $test['comments'] = _('Any server is supported');
110 function tst_gettext()
112 $test['descr'] = _('Native gettext');
113 $test['test'] = function_exists('gettext') ? _('Yes'): _('No');
115 $test['result'] = true;
116 $test['comments'] = _('In case of no gettext support, php emulation is used');
124 $test['descr'] = _('Debugging mode');
126 $test['test'] = $SysPrefs->go_debug ? _("Yes") : _("No");
127 $test['result'] = $SysPrefs->go_debug != 0;
128 $test['comments'] = _('To switch debugging on set $go_debug>0 in config.php file');
133 function tst_logging()
137 $error_logfile = $SysPrefs->error_logfile;
138 $test['descr'] = _('Error logging');
140 // if error lgging is on, but log file does not exists try write
141 if ($error_logfile && !is_file($error_logfile))
143 @fclose(@fopen($error_logfile, 'w'));
145 $test['result'] = @$error_logfile != '' && is_writable($error_logfile);
146 $test['test'] = @$error_logfile == '' ? _("Disabled") : $error_logfile;
148 if (@$error_logfile == '')
149 $test['comments'] = _('To switch error logging set $error_logging in config.php file');
151 if (!is_writable($error_logfile))
152 $test['comments'] = _('Log file is not writeable');
157 // Installed FA database structure version
159 function tst_dbversion()
162 $test['descr'] = _('Current database version');
164 $test['test'] = get_company_pref('version_id');
165 $test['result'] = $test['test'] == $db_version;
166 $test['comments'] = _('Database structure seems to be not upgraded to current version')
173 function tst_subdirs($install=false)
175 global $db_connections;
177 $comps = $install ? array('0') : array_keys($db_connections);
179 $comp_subdirs = array('images', 'pdf_files', 'backup','js_cache');
181 $test['descr'] = _('Company subdirectories consistency');
183 $test['test'] = array(company_path().'/*');
184 foreach($comp_subdirs as $sub) {
185 $test['test'][] = company_path().'/*/'.$sub;
187 $test['result'] = true;
189 $comp_path = company_path();
190 foreach ($comps as $n) {
191 $path = company_path($n);
192 if (!is_dir($path) || !is_writable($path) ) {
193 $test['result'] = false;
194 $test['comments'][] = sprintf(_("'%s' is not writeable"), $path);
197 foreach($comp_subdirs as $sub) {
198 $spath = $path.'/'.$sub;
199 if (!is_dir($spath) || !is_writable($spath) ) {
200 $test['result'] = false;
201 $test['comments'][] = sprintf(_("'%s' is not writeable"), $spath);
203 $dir = opendir($spath);
204 while (false !== ($fname = readdir($dir))) {
205 // check only *.js files. Manually installed package can contain other
206 // non-writable files which are non-crucial for normal operations
207 if (preg_match('/.*(\.js)/', $fname) && !is_writable("$spath/$fname")) {
208 $test['result'] = false;
209 $test['comments'][] = sprintf(_("'%s' is not writeable"), "$spath/$fname");
218 function tst_tmpdir()
220 global $path_to_root;
222 $test['descr'] = _('Temporary directory');
224 $test['test'] = $path_to_root.'/tmp';
225 $test['result'] = is_dir($test['test']) && is_writable($test['test']);
226 $test['comments'][] = sprintf(_("'%s' is not writeable"), $test['test']);
230 function tst_langs($install)
232 global $installed_languages, $path_to_root, $GetText;
234 $test['descr'] = _('Language configuration consistency');
236 $test['result'] = true;
237 $test['comments'] = array();
239 $fname = $path_to_root.'/lang';
240 $test['test'] = $fname;
241 if (!(is_dir($fname) && is_writable($fname))) {
242 $test['result'] = false;
243 $test['comments'][] = _("Languages folder should be writeable.");
248 $fname = $path_to_root.'/lang/installed_languages.inc';
249 $test['test'] = $fname;
250 if (!(is_file($fname) && is_writable($fname))) {
251 $test['result'] = false;
252 $test['comments'][] = _("Languages configuration file should be writeable.");
259 foreach ($installed_languages as $lang) {
261 if ($lang['code'] == 'C') continue; // no translation (English)
262 $langs[] = $lang['code'];
264 $file = $path_to_root.'/lang/'.$lang['code'].'/LC_MESSAGES/'.$lang['code'];
265 if (@$lang['version'])
266 $file .= '-'.$lang['version'];
267 $file .= function_exists('gettext') ? '.mo' : '.po';
269 if (!is_file($file)) {
270 $test['result'] = false;
271 $test['comments'][] = sprintf( _('Missing %s translation file.'), $file);
273 if (!$GetText->check_support($lang['code'], $lang['encoding']))
275 $test['result'] = false;
276 $test['comments'][] = sprintf(_('Missing system locale: %s'), $lang['code'].".".$lang['encoding']);
280 $test['test'] = $langs;
285 function tst_config($install)
287 global $path_to_root;
289 $test['descr'] = _('Main config file');
290 $test['test'] = $path_to_root.'/config.php';
293 $writable = check_write($test['test']);
294 $test['result'] = $writable==1;
295 $test['comments'][] = $writable == 0 ?
296 sprintf(_("Can't write '%s' file. Check FA directory write permissions."), $test['test'])
297 : sprintf(_("'%s' file exists."), $test['test']);
300 $test['result'] = is_file($test['test']) && !is_writable($test['test']);
301 $test['comments'][] = sprintf(_("'%s' file should be read-only"), $test['test']);
306 function tst_dbconfig($install)
308 global $path_to_root;
310 $test['descr'] = _('Database auth file');
311 $test['test'] = $path_to_root.'/config_db.php';
315 $writable = check_write($test['test']);
316 $test['result'] = $writable==1;
317 $test['comments'][] = $writable == 0 ?
318 sprintf(_("Can't write '%s' file. Check FA directory write permissions."), $test['test'])
319 : sprintf(_("'%s' file exists."), $test['test']);
322 $test['result'] = is_file($test['test']) && !is_writable($test['test']);
323 $test['comments'][] = sprintf(_("'%s' file should be read-only if you do not plan to add or change companies"), $test['test']);
328 function tst_extconfig($install)
330 global $path_to_root, $db_connections;
332 $comps = $install ? array('0') : array_keys($db_connections);
334 $test['descr'] = _('Extensions system');
336 $fname = $path_to_root.'/installed_extensions.php';
337 $test['test'][] = $fname;
338 $test['result'] = ($install || is_file($fname)) && check_write($fname);
339 $test['test'][] = company_path().'/*/installed_extensions.php';
340 if (!$test['result'])
341 $test['comments'][] = sprintf(_("'%s' is not writeable"), $fname);
343 foreach ($comps as $n) {
344 $path = company_path($n);
345 if (!is_dir($path)) continue;
347 $path .= "/installed_extensions.php";
348 if ((!$install && !is_file($path)) || !check_write($path) ) {
349 $test['result'] = false;
350 $test['comments'][] = sprintf(_("'%s' is not writeable"), $path);
354 foreach(array('modules', 'modules/_cache', 'themes', 'sql') as $dir) {
355 $fname = $path_to_root.'/'.$dir;
356 $test['test'][] = $fname;
357 $t = is_dir($fname) && is_writable($fname);
359 $test['comments'][] = sprintf(_("'%s' is not writeable"), $fname);
360 $test['result'] &= $t;
363 foreach(array('Release', 'Themes', 'Languages', 'Extensions', 'Charts') as $file) {
364 $fname = $path_to_root."/modules/_cache/".$file.".gz";
365 $t = !file_exists($fname) || is_writable($fname);
367 $test['comments'][] = sprintf(_("'%s' is not writeable"), $fname);
368 $test['result'] &= $t;
372 $test['comments'][] = _("Extensions configuration files and directories should be writeable");
374 $fname = $path_to_root."/themes";
375 $themedir = opendir($fname);
376 while (false !== ($fname = readdir($themedir)))
378 if ($fname!='.' && $fname!='..' && $fname!='CVS' && is_dir($path_to_root.'/themes/'.$fname)
379 && !in_array($fname, array('aqua', 'cool', 'default')))
381 $test['test'][] = $fname;
382 $test['result'] = is_writable($path_to_root.'/themes/'.$fname);
383 if (!$test['result']) {
384 $test['comments'][] =
385 sprintf(_("Non-standard theme directory '%s' is not writable"), $fname);
392 $test['test'][] = 'OpenSSL PHP extension';
393 if (!extension_loaded('openssl')) {
394 $test['result'] = false;
395 $test['comments'][] = _("OpenSSL PHP extension have to be enabled to use extension repository system.");
396 } elseif (!function_exists('openssl_verify')) {
397 $test['result'] = false;
398 $test['comments'][] = _("OpenSSL have to be available on your server to use extension repository system.");
403 function display_system_tests($install = false)
408 $system_tests = array('tst_php', 'tst_phpmysql', 'tst_system', 'tst_dbconfig',
410 'tst_subdirs', 'tst_langs', 'tst_tmpdir', 'tst_sessionpath', 'tst_extconfig'
413 $system_tests = array('tst_mysql', 'tst_php', 'tst_server', 'tst_system', 'tst_browser',
414 'tst_gettext', 'tst_debug', 'tst_logging',
415 'tst_dbversion', 'tst_subdirs', 'tst_langs', 'tst_tmpdir', 'tst_sessionpath',
416 'tst_install', 'tst_dbconfig', 'tst_config', 'tst_extconfig'
420 start_table(TABLESTYLE, "width='80%'");
421 $th = array(_("Test"), _('Test type'), _("Value"), _("Comments"));
425 $k = 0; //row colour counter
426 foreach ($system_tests as $test)
428 alt_table_row_color($k);
429 $result = $test($install);
430 if (!$result) continue;
432 label_cell($result['descr']);
433 label_cell($test_level[$result['type']]);
435 $res = is_array(@$result['test']) ? implode('<br>', $result['test'])
439 $comm = is_array(@$result['comments']) ? implode('<br>', $result['comments'])
440 : @$result['comments'];
441 $color = ($result['result'] ? 'green':
442 ($result['type']==3 ? 'red' :
443 ($result['type']==2 ? 'orange' : 'green')));
444 label_cell("<span style='color:$color'>".
445 ($result['result'] ? _('Ok') : '<b>'.$comm.'</b>').'</span>');
447 $ret = $ret && (($result['result']!=0) || ($result['type'] < 3));