Elep

<?php
/*
 * Your installation or use of this SugarCRM file is subject to the applicable
 * terms available at
 * http://support.sugarcrm.com/Resources/Master_Subscription_Agreements/.
 * If you do not agree to all of the applicable terms or do not have the
 * authority to bind the entity as an authorized representative, then do not
 * install or use this SugarCRM file.
 *
 * Copyright (C) SugarCRM Inc. All rights reserved.
 */
$_SESSION['setup_license_accept'] = true;

function runCheck(bool $install_script, array $mod_strings)
{
    $cache_files = [];
    $loginImage = null;
    installLog('Begin System Check Process *************');

if (!isset($install_script) || !$install_script) {
        installLog('Error:: ' . $mod_strings['ERR_NO_DIRECT_SCRIPT']);
        die($mod_strings['ERR_NO_DIRECT_SCRIPT']);
    }

if (!defined('SUGARCRM_MIN_MEM')) {
        define('SUGARCRM_MIN_MEM', 40);
    }

// for keeping track of whether to enable/disable the 'Next' button
    $error_found = false;
    $error_txt = '';

try {
 random_bytes(4);
 } catch (Exception $e) {
 $message = $e->getMessage();
 installLog($mod_strings['ERR_CHECKSYS_CSPRNG'] . ': ' . $message);
 $error_found = true;
 $error_txt .= '
 <tr>
 <td>' . $mod_strings['LBL_CHECKSYS_CSPRNG'] . '</td>
 <td >' . $message . '</td>
 </tr>';
 }

// check IIS and FastCGI
 $server_software = $_SERVER['SERVER_SOFTWARE'];
 if ((strpos($_SERVER['SERVER_SOFTWARE'], 'Microsoft-IIS') !== false)
 && php_sapi_name() == 'cgi-fcgi'
 && ini_get('fastcgi.logging') != '0') {
 installLog($mod_strings['ERR_CHECKSYS_FASTCGI_LOGGING']);
 $iisVersion = "{$mod_strings['ERR_CHECKSYS_FASTCGI_LOGGING']}";
 $error_found = true;
 $error_txt .= '
 <tr>
 <td>' . $mod_strings['LBL_CHECKSYS_FASTCGI'] . '</td>
 <td >' . $iisVersion . '</td>
 </tr>';
 }

if (strpos($server_software, 'Microsoft-IIS') !== false) {
        $iis_version = '';
        if (preg_match_all("/^.*\/(\d+\.?\d*)$/", $server_software, $out)) {
            $iis_version = $out[1][0];
        }

$check_iis_version_result = check_iis_version($iis_version);
 if ($check_iis_version_result == -1) {
 installLog($mod_strings['ERR_CHECKSYS_IIS_INVALID_VER'] . ' ' . $iis_version);
 $iisVersion = "{$mod_strings['ERR_CHECKSYS_IIS_INVALID_VER']} {$iis_version}";
 $error_found = true;
 $error_txt .= '
 <tr>
 <td>' . $mod_strings['LBL_CHECKSYS_IISVER'] . '</td>
 <td >' . $iisVersion . '</td>
 </tr>';
 } elseif (php_sapi_name() != 'cgi-fcgi') {
 installLog($mod_strings['ERR_CHECKSYS_FASTCGI'] . ' ' . $iis_version);
 $iisVersion = "{$mod_strings['ERR_CHECKSYS_FASTCGI']}";
 $error_found = true;
 $error_txt .= '
 <tr>
 <td>' . $mod_strings['LBL_CHECKSYS_FASTCGI'] . '</td>
 <td >' . $iisVersion . '</td>
 </tr>';
 } elseif (ini_get('fastcgi.logging') != '0') {
 installLog($mod_strings['ERR_CHECKSYS_FASTCGI_LOGGING'] . ' ' . $iis_version);
 $iisVersion = "{$mod_strings['ERR_CHECKSYS_FASTCGI_LOGGING']}";
 $error_found = true;
 $error_txt .= '
 <tr>
 <td>' . $mod_strings['LBL_CHECKSYS_FASTCGI'] . '</td>
 <td >' . $iisVersion . '</td>
 </tr>';
 }
 }

// PHP VERSION
    $check_php_version_result = check_php_version();

if ($check_php_version_result == -1) {
 $php_version = constant('PHP_VERSION');
 installLog($mod_strings['ERR_CHECKSYS_PHP_INVALID_VER'] . ' ' . $php_version);
 $phpVersion = "{$mod_strings['ERR_CHECKSYS_PHP_INVALID_VER']} {$php_version} )";
 $error_found = true;
 $error_txt .= '
 <tr>
 <td>' . $mod_strings['LBL_CHECKSYS_PHPVER'] . '</td>
 <td >' . $phpVersion . '</td>
 </tr>';
 }

//Php Backward compatibility checks
 if (ini_get('zend.ze1_compatibility_mode')) {
 installLog($mod_strings['LBL_BACKWARD_COMPATIBILITY_ON'] . ' ' . 'Php Backward Compatibility');
 $phpCompatibility = "{$mod_strings['LBL_BACKWARD_COMPATIBILITY_ON']}";
 $error_found = true;
 $error_txt .= '
 <tr>
 <td>Php Backward Compatibility</td>
 <td >' . $phpCompatibility . '</td>
 </tr>';
 }

// database and connect

if (!empty($_REQUEST['setup_db_type'])) {
        $_SESSION['setup_db_type'] = $_REQUEST['setup_db_type'];
    }

$drivers = DBManagerFactory::getDbDrivers();

if (empty($drivers)) {
 $db_name = $mod_strings['LBL_DB_UNAVAILABLE'];
 installLog("ERROR:: {$mod_strings['LBL_CHECKSYS_DB_SUPPORT_NOT_AVAILABLE']}");
 $dbStatus = "{$mod_strings['LBL_CHECKSYS_DB_SUPPORT_NOT_AVAILABLE']}";
 $error_found = true;
 $error_txt .= '
 <tr>
 <td>' . $db_name . '</td>
 <td class="error">' . $dbStatus . '</td>
 </tr>';
 }

// XML Parsing
 if (!function_exists('xml_parser_create')) {
 $xmlStatus = "{$mod_strings['LBL_CHECKSYS_XML_NOT_AVAILABLE']}";
 installLog("ERROR:: {$mod_strings['LBL_CHECKSYS_XML_NOT_AVAILABLE']}");
 $error_found = true;
 $error_txt .= '
 <tr>
 <td>' . $mod_strings['LBL_CHECKSYS_XML'] . '</td>
 <td class="error">' . $xmlStatus . '</td>
 </tr>';
 } else {
 installLog('XML Parsing Support Found');
 }

// mbstrings
 if (!function_exists('mb_strlen')) {
 $mbstringStatus = "{$mod_strings['ERR_CHECKSYS_MBSTRING']}";
 installLog("ERROR:: {$mod_strings['ERR_CHECKSYS_MBSTRING']}");
 $error_found = true;
 $error_txt .= '
 <tr>
 <td>' . $mod_strings['LBL_CHECKSYS_MBSTRING'] . '</td>
 <td class="error">' . $mbstringStatus . '</td>
 </tr>';
 } else {
 installLog('MBString Support Found');
 }

// zip
 if (!class_exists('ZipArchive')) {
 $zipStatus = "{$mod_strings['ERR_CHECKSYS_ZIP']}";
 installLog("ERROR:: {$mod_strings['ERR_CHECKSYS_ZIP']}");
 } else {
 installLog('ZIP Support Found');
 }

// config.php
 if (file_exists('./config.php') && (!(make_writable('./config.php')) || !(is_writable('./config.php')))) {
 installLog("ERROR:: {$mod_strings['ERR_CHECKSYS_CONFIG_NOT_WRITABLE']}");
 $configStatus = "{$mod_strings['ERR_CHECKSYS_CONFIG_NOT_WRITABLE']}";
 $error_found = true;
 $error_txt .= '
 <tr>
 <td>' . $mod_strings['LBL_CHECKSYS_CONFIG'] . '</td>
 <td class="error">' . $configStatus . '</td>
 </tr>';
 }

// config_override.php
 if (file_exists('./config_override.php') && (!(make_writable('./config_override.php')) || !(is_writable('./config_override.php')))) {
 installLog("ERROR:: {$mod_strings['ERR_CHECKSYS_CONFIG_OVERRIDE_NOT_WRITABLE']}");
 $configStatus = "{$mod_strings['ERR_CHECKSYS_CONFIG_OVERRIDE_NOT_WRITABLE']}";
 $error_found = true;
 $error_txt .= '
 <tr>
 <td>' . $mod_strings['LBL_CHECKSYS_OVERRIDE_CONFIG'] . '</td>
 <td class="error">' . $configStatus . '</td>
 </tr>';
 }

// custom dir
 if (!make_writable('./custom')) {
 $customStatus = "{$mod_strings['ERR_CHECKSYS_CUSTOM_NOT_WRITABLE']}";
 installLog("ERROR:: {$mod_strings['ERR_CHECKSYS_CUSTOM_NOT_WRITABLE']}");
 $error_found = true;
 $error_txt .= '
 <tr>
 <td>' . $mod_strings['LBL_CHECKSYS_CUSTOM'] . '</td>
 <td class="error">' . $customStatus . '</td>
 </tr>';
 } else {
 installLog('/custom directory and subdirectory check passed');
 }

// cache dir
    $cache_files[] = '';
    $cache_files[] = 'images';
    $cache_files[] = 'layout';
    $cache_files[] = 'pdf';
    $cache_files[] = 'xml';
    $cache_files[] = 'include/javascript';
    $filelist = '';

foreach ($cache_files as $c_file) {
 $dirname = sugar_cached($c_file);
 $ok = false;
 if ((is_dir($dirname)) || @sugar_mkdir($dirname, 0555)) { // set permissions to restrictive - use make_writable to change in a standard way to the required permissions
 $ok = make_writable($dirname);
 }
 if (!$ok) {
 $filelist .= ' ' . getcwd() . "/$dirname";
 }
 }
 if (strlen($filelist) > 0) {
 $error_found = true;
 installLog('ERROR:: Some subdirectories in cache subfolder were not read/writeable:');
 installLog($filelist);
 $error_txt .= '
		<tr>
 	<td>' . $mod_strings['LBL_CHECKSYS_CACHE'] . '</td>
 	<td align="right" class="error" class="error">' . $mod_strings['ERR_CHECKSYS_FILES_NOT_WRITABLE'] . '</td>
		</tr>
		<tr>
 	<td colspan="2">' . $mod_strings['LBL_CHECKSYS_FIX_FILES'] . '' . $filelist . '</td>
		</tr>';
 } else {
 installLog('cache directory and subdirectory check passed');
 }

// check modules dir
    $_SESSION['unwriteable_module_files'] = [];
    $passed_write = recursive_make_writable('./modules');
    if (isset($_SESSION['unwriteable_module_files']['failed']) && $_SESSION['unwriteable_module_files']['failed']) {
        $passed_write = false;
    }

if (!$passed_write) {
 $moduleStatus = "{$mod_strings['ERR_CHECKSYS_NOT_WRITABLE']}";
 installLog('ERROR:: Module directories and the files under them are not writeable.');
 $error_found = true;
 $error_txt .= '
 <tr>
 <td>' . $mod_strings['LBL_CHECKSYS_MODULE'] . '</td>
 <td align="right" class="error">' . $moduleStatus . '</td>
 </tr>';

//list which module directories are not writeable, if there are less than 10
 $error_txt .= '
 <tr>
 <td colspan="2">
 ' . $mod_strings['LBL_CHECKSYS_FIX_MODULE_FILES'] . '';
 foreach ($_SESSION['unwriteable_module_files'] as $key => $file) {
 if ($key != '.' && $key != 'failed') {
 $error_txt .= ' ' . $file;
 }
 }
 $error_txt .= '
 </td>
 </tr>';
 } else {
 installLog('/module directory and subdirectory check passed');
 }

// check upload dir
 if (!make_writable('./upload')) {
 $uploadStatus = "{$mod_strings['ERR_CHECKSYS_NOT_WRITABLE']}";
 installLog('ERROR: Upload directory is not writable.');
 $error_found = true;
 $error_txt .= '
 <tr>
 <td>' . $mod_strings['LBL_CHECKSYS_UPLOAD'] . '</td>
 <td align="right" class="error">' . $uploadStatus . '</td>
 </tr>';
 } else {
 installLog('/upload directory check passed');
 }

// check zip file support
 if (!class_exists('ZipArchive')) {
 $zipStatus = "{$mod_strings['ERR_CHECKSYS_ZIP']}";

installLog('ERROR: Zip support not found.');
 $error_found = true;
 $error_txt .= '
 <tr>
 <td>' . $mod_strings['LBL_CHECKSYS_ZIP'] . '</td>
 <td align="right" class="error">' . $zipStatus . '</td>
 </tr>';
 } else {
 installLog('/zip check passed');
 }

// check BCMATH support
 if (!function_exists('bcadd')) {
 $bcmathStatus = "{$mod_strings['ERR_CHECKSYS_BCMATH']}";

installLog('ERROR: BCMATH support not found.');
 $error_found = true;
 $error_txt .= '
 <tr>
 <td>' . $mod_strings['LBL_CHECKSYS_BCMATH'] . '</td>
 <td align="right" class="error">' . $bcmathStatus . '</td>
 </tr>';
 } else {
 installLog('/BCMATH check passed');
 }

// check htaccess & rewrite working
 if (empty($_SERVER['SERVER_SOFTWARE']) || strpos($_SERVER['SERVER_SOFTWARE'], 'Microsoft-IIS') === false) {
 installLog('Testing .htaccess redirects');
 if (file_exists('.htaccess')) {
 $old_htaccess = file_get_contents('.htaccess');
 }
 $basePath = parse_url($_SESSION['setup_site_url'], PHP_URL_PATH);
 if (empty($basePath)) {
 $basePath = '/';
 }
 $htaccess_test = <<<EOT

<IfModule mod_rewrite.c>
 RewriteEngine On
 RewriteBase {$basePath}
 RewriteRule ^itest.txt$ install_test.txt [N,QSA]
</IfModule>
EOT;
 if (!empty($old_htaccess)) {
 $htaccess_test = $old_htaccess . $htaccess_test;
 }
 file_put_contents('.htaccess', $htaccess_test);
 file_put_contents('install_test.txt', 'SUCCESS');
 $res = file_get_contents($_SESSION['setup_site_url'] . '/itest.txt');
 unlink('install_test.txt');
 if (!empty($old_htaccess)) {
 file_put_contents('.htaccess', $old_htaccess);
 } else {
 unlink('.htaccess');
 }
 if ($res != 'SUCCESS') {
 $error_found = true;
 $error_txt .= '
 <tr>
 <td>' . $mod_strings['LBL_CHECKSYS_HTACCESS'] . '</td>
 <td align="right" class="error">' . $mod_strings['ERR_CHECKSYS_HTACCESS'] . '</td>
 </tr>';
 } else {
 installLog('Passed .htaccess redirects check');
 }
 }

// custom checks
    $customSystemChecks = installerHook('additionalCustomSystemChecks');
    if ($customSystemChecks != 'undefined') {
        if ($customSystemChecks['error_found'] == true) {
            $error_found = true;
        }
        if (!empty($customSystemChecks['error_txt'])) {
            $error_txt .= $customSystemChecks['error_txt'];
        }
    }

// PHP.ini
    $phpIniLocation = get_cfg_var('cfg_file_path');
    installLog("php.ini location found. {$phpIniLocation}");
    // disable form if error found

if ($error_found) {
        installLog('Outputting HTML for System check');
        installLog('Errors were found *************');
        $disabled = $error_found ? 'disabled="disabled"' : '';

$help_url = get_help_button_url();
 ///////////////////////////////////////////////////////////////////////////////
 //// BEGIN PAGE OUTPUT
 $out = <<<EOQ

<table cellspacing="0" cellpadding="0" border="0" align="center" class="shell">
 <tr>
 <th width="400">{$mod_strings['LBL_CHECKSYS_TITLE']}</th>
 <th width="200" height="30" style="text-align: right;"><a href="http://www.sugarcrm.com" target=
 "_blank"><img src="{$loginImage}" alt="SugarCRM" border="0" class="sugarcrm-logo"></a>
 <a href="{$help_url}" target='_blank'>{$mod_strings['LBL_HELP']} </a>
 </th>
 </tr>

<tr>
 <td colspan="2" width="600">
 {$mod_strings['ERR_CHECKSYS']}

<table cellpadding="0" cellspacing="0" border="0" width="100%" class="StyleDottedHr">
 <tr>
 <th align="left">{$mod_strings['LBL_CHECKSYS_COMPONENT']}</th>
 <th style="text-align: right;">{$mod_strings['LBL_CHECKSYS_STATUS']}</th>
 </tr>
 $error_txt

</table>

<div align="center" style="margin: 5px;">
 {$mod_strings['LBL_CHECKSYS_PHP_INI']} {$phpIniLocation}
 </div>
 </td>
 </tr>

<table cellspacing="0" cellpadding="0" border="0" class="stdTable">
 <tr>
 <td><input class="button" type="button" onclick="window.open('http://www.sugarcrm.com/forums/');" value="{$mod_strings['LBL_HELP']}" /></td>
 <td>
 <input class="button" type="button" name="Re-check" value="{$mod_strings['LBL_CHECKSYS_RECHECK']}" onclick="callSysCheck();" id="button_next2"/>
 </td>
 </tr>
 </table>
 </form>
 </td>
 </tr>
 </table> 
EOQ;
 return $out;
 } else {
 installLog('Outputting HTML for System check');
 installLog('No Errors were found *************');
 return 'passed';
 }
}
//// END PAGEOUTPUT
///////////////////////////////////////////////////////////////////////////////