<?php
/*******************************************************************************
 * File:    checkprerequisites.php
 * Version: 1.0
 * Purpose: Check that some basic prerequisites to running phplist are met. If
 *          not, fail gracefully
 * Created: 2018-09-15
 * Updated: 2018-09-15
 ******************************************************************************/

// make sure we're running a recent version of php
if (!defined('PHP_VERSION_ID') || PHP_VERSION_ID < 50303) {
    die('Your PHP version is too old. Please upgrade PHP before continuing.');
}

// Check if required PHP modules are installed.
$requiredExtensions = array(
    'pcre',
    'core',
    'date',
    'hash',
    'spl',
    'json',
    'filter',
    'session',
    'xml',
    'simplexml',
    'mysqli',
);

$notInstalled = array();

foreach ($requiredExtensions as $value) {
    if (!extension_loaded($value)) {
        array_push($notInstalled, $value);
    }
}
if (count($notInstalled) > 0) {
    $message = "The following PHP extensions are missing:" . '<br>';
    foreach ($notInstalled as $value) {
        $message .= $value . '<br>';
    }
    die($message);
}
// make sure we have access to a cryptographically secure pseudorandom number
// generator (CSPNRG)
try {
    require_once dirname(__FILE__).'/inc/random_compat/random.php';
    random_bytes(1);
} catch (Exception $e) {
    error_log( "Caught Exception: " . $e->getMessage() );
    die (
     "Pepea Mass Mailer requires a random_bytes function. For more information, please "
    ."see \r\n\r\n<br/><br/>"
    .'* https://tech.michaelaltfield.net/2018/08/25/fix-phplist-500-error-due-to-random_compat/'
    );
} 

?>
