Here is:
phpVMS Virtual Airline Administration Software
Install Check
get(PHPVMS_API_SERVER.'/version'); if($contents == '') { $error = $file->errors[count($file->errors)-1]; error('Connection failed', 'Could not connect to remote server - error is "'.$error.'"'); } else { success('OK', 'Can contact outside servers'); } unset($file); /* Simple XML? */ echo '
'; echo 'Checking for SimpleXML module...
'; if(function_exists('simplexml_load_string') == true) { success('OK', 'SimpleXML module exists!'); } else { error('Fail', 'SimpleXML module doesn\'t exist or is not installed. Contact your host'); } /* File hashes check */ echo '
'; echo 'Checking file hashes for corrupt or mismatched files
'; $fp = fopen(HASH_LIST, 'r'); if(!$fp) { error('Fatal', 'Could not read '.HASH_LIST); exit; } $total = 0; $errors = 0; while(!feof($fp)) { $line = fgets($fp); $line = trim($line); if(empty($line)) continue; fscanf($fp, '%s %s', $checksum, $file); $total ++; $file = str_replace('*./', '../', $file); if($file == '../core/local.config.php' || substr_count($file, 'unittest') > 0 || empty($file)) { continue; } if(!file_exists($file)) { $errors++; error('Error', "{$file} doesn't exist"); continue; } $calc_sum = md5_file($file); $file = str_replace('../', '/', $file); # make pretty if($calc_sum === false) { $errors++; error('Checksum failed', "{$file} - permissions might be incorrect!"); continue; } if($calc_sum != $checksum) { $errors++; error('Checksum failed', "{$file} did not match, possibly corrupt or out of date"); continue; } $file = ''; } if($errors == 0) { success('OK', 'No errors found!'); } echo "
-- Checked {$total} files, found {$errors} errors
"; ?>