#!/usr/bin/env php

<?php

/*

+----------------------------------------------------------------------+

| Copyright (c) The PHP Group |

+----------------------------------------------------------------------+

| This source file is subject to version 3.01 of the PHP license, |

| that is bundled with this package in the file LICENSE, and is |

| available through the world-wide-web at the following url: |

| https://www.php.net/license/3_01.txt |

| If you did not receive a copy of the PHP license and are unable to |

| obtain it through the world-wide-web, please send a note to |

| license@php.net so we can mail you a copy immediately. |

+----------------------------------------------------------------------+

| Authors: Ilia Alshanetsky <iliaa@php.net> |

| Preston L. Bannister <pbannister@php.net> |

| Marcus Boerger <helly@php.net> |

| Derick Rethans <derick@php.net> |

| Sander Roobol <sander@php.net> |

| Andrea Faulds <ajf@ajf.me> |

| (based on version by: Stig Bakken <ssb@php.net>) |

| (based on the PHP 3 test framework by Rasmus Lerdorf) |

+----------------------------------------------------------------------+

*/

require_once __DIR__ . '/tests/utils.inc';

/* Let there be no top-level code beyond this point:

* Only functions and classes, thanks!

*

* Minimum required PHP version: 8.0.0

*/

function show_usage(): void

{

echo <<<HELP

Synopsis:

php run-tests.php [options] [files] [directories]

Options:

-j<workers> Run up to <workers> simultaneous testing processes in parallel for

quicker testing on systems with multiple logical processors.

Note that this is experimental feature.

-l <file> Read the testfiles to be executed from <file>. After the test

has finished all failed tests are written to the same <file>.

If the list is empty and no further test is specified then

all tests are executed (same as: -r <file> -w <file>).

-r <file> Read the testfiles to be executed from <file>.

-w <file> Write a list of all failed tests to <file>.

-a <file> Same as -w but append rather than truncating <file>.

-W <file> Write a list of all tests and their result status to <file>.

-c <file> Look for php.ini in directory <file> or use <file> as ini.

-n Pass -n option to the php binary (Do not use a php.ini).

-d foo=bar Pass -d option to the php binary (Define INI entry foo

with value 'bar').

-g Comma separated list of groups to show during test run

(possible values: PASS, FAIL, XFAIL, XLEAK, SKIP, BORK, WARN, LEAK, REDIRECT).

-m Test for memory leaks with Valgrind (equivalent to -M memcheck).

-M <tool> Test for errors with Valgrind tool.

-p <php> Specify PHP executable to run.

-P Use PHP_BINARY as PHP executable to run (default).

-q Quiet, no user interaction (same as environment NO_INTERACTION).

-s <file> Write output to <file>.

-x Sets 'SKIP_SLOW_TESTS' environment variable.

--online Prevents setting the 'SKIP_ONLINE_TESTS' environment variable.

--offline Sets 'SKIP_ONLINE_TESTS' environment variable (default).

--verbose

-v Verbose mode.

--help

-h This Help.

--temp-source <sdir> --temp-target <tdir> [--temp-urlbase <url>]

Write temporary files to <tdir> by replacing <sdir> from the

filenames to generate with <tdir>. In general you want to make

<sdir> the path to your source files and <tdir> some path in

your web page hierarchy with <url> pointing to <tdir>.

--keep-[all|php|skip|after|clean]

Do not delete 'all' files, 'php' test file, 'skip', 'after',

or 'clean' file.

--set-timeout <n>

Set timeout for individual tests, where <n> is the number of

seconds. The default value is 60 seconds, or 300 seconds when

testing for memory leaks.

--context <n>

Sets the number of lines of surrounding context to print for diffs.

The default value is 3.

--show-[all|php|skip|clean|after|exp|diff|out|mem]

Show 'all' files, 'php' test file, 'skip', 'after', or 'clean' file.

You can also use this to show the output 'out', the expected result

'exp', the difference between them 'diff' or the valgrind log

'mem'. The result types get written independent of the log format,

however 'diff' only exists when a test fails.

--show-slow <n>

Show all tests that took longer than <n> milliseconds to run.

--no-clean Do not execute clean section if any.

--color

--no-color Do/Don't colorize the result type in the test result.

--progress

--no-progress Do/Don't show the current progress.

--repeat [n]

Run the tests multiple times in the same process and check the

output of the last execution (CLI SAPI only).

--bless Bless failed tests using scripts/dev/bless_tests.php.

HELP;

}

/**

* One function to rule them all, one function to find them, one function to

* bring them all and in the darkness bind them.

* This is the entry point and exit point überfunction. It contains all the

* code that was previously found at the top level. It could and should be

* refactored to be smaller and more manageable.

*/

function main(): void

{

/* This list was derived in a naïve mechanical fashion. If a member

* looks like it doesn't belong, it probably doesn't; cull at will.

*/

global $DETAILED, $PHP_FAILED_TESTS, $SHOW_ONLY_GROUPS, $argc, $argv, $cfg,

$end_time, $environment,

$exts_skipped, $exts_tested, $exts_to_test, $failed_tests_file,

$ignored_by_ext, $ini_overwrites, $colorize,

$log_format, $no_clean, $no_file_cache,

$pass_options, $php, $php_cgi, $preload,

$result_tests_file, $slow_min_ms, $start_time,

$temp_source, $temp_target, $test_cnt,

$test_files, $test_idx, $test_results, $testfile,

$valgrind, $sum_results, $shuffle, $file_cache, $num_repeats,

$show_progress;

// Parallel testing

global $workers, $workerID;

global $context_line_count;

// Temporary for the duration of refactoring

/** @var JUnit $junit */

global $junit;

define('IS_WINDOWS', substr(PHP_OS, 0, 3) == "WIN");

$workerID = 0;

if (getenv("TEST_PHP_WORKER")) {

$workerID = intval(getenv("TEST_PHP_WORKER"));

run_worker();

return;

}

define('INIT_DIR', getcwd());

// Change into the PHP source directory.

if (getenv('TEST_PHP_SRCDIR')) {

@chdir(getenv('TEST_PHP_SRCDIR'));

}

define('TEST_PHP_SRCDIR', getcwd());

check_proc_open_function_exists();

// If timezone is not set, use UTC.

if (ini_get('date.timezone') == '') {

date_default_timezone_set('UTC');

}

// Delete some security related environment variables

putenv('SSH_CLIENT=deleted');

putenv('SSH_AUTH_SOCK=deleted');

putenv('SSH_TTY=deleted');

putenv('SSH_CONNECTION=deleted');

set_time_limit(0);

ini_set('pcre.backtrack_limit', PHP_INT_MAX);

init_output_buffers();

error_reporting(E_ALL);

$environment = $_ENV ?? [];

// Some configurations like php.ini-development set variables_order="GPCS"

// not "EGPCS", in which case $_ENV is NOT populated. Detect if the $_ENV

// was empty and handle it by explicitly populating through getenv().

if (empty($environment)) {

$environment = getenv();

}

if (empty($environment['TEMP'])) {

$environment['TEMP'] = sys_get_temp_dir();

if (empty($environment['TEMP'])) {

// For example, OpCache on Windows will fail in this case because

// child processes (for tests) will not get a TEMP variable, so

// GetTempPath() will fallback to c:\windows, while GetTempPath()

// will return %TEMP% for parent (likely a different path). The

// parent will initialize the OpCache in that path, and child will

// fail to reattach to the OpCache because it will be using the

// wrong path.

die("TEMP environment is NOT set");

}

if (count($environment) == 1) {

// Not having other environment variables, only having TEMP, is

// probably ok, but strange and may make a difference in the

// test pass rate, so warn the user.

echo "WARNING: Only 1 environment variable will be available to tests(TEMP environment variable)" , PHP_EOL;

}

}

if (IS_WINDOWS && empty($environment["SystemRoot"])) {

$environment["SystemRoot"] = getenv("SystemRoot");

}

if (getenv('TEST_PHP_LOG_FORMAT')) {

$log_format = strtoupper(getenv('TEST_PHP_LOG_FORMAT'));

} else {

$log_format = 'LEODS';

}

// Check whether a detailed log is wanted.

if (getenv('TEST_PHP_DETAILED')) {

$DETAILED = getenv('TEST_PHP_DETAILED');

} else {

$DETAILED = 0;

}

$junit = new JUnit($environment, $workerID);

if (getenv('SHOW_ONLY_GROUPS')) {

$SHOW_ONLY_GROUPS = explode(",", getenv('SHOW_ONLY_GROUPS'));

} else {

$SHOW_ONLY_GROUPS = [];

}

// Check whether user test dirs are requested.

$user_tests = [];

if (getenv('TEST_PHP_USER')) {

$user_tests = explode(',', getenv('TEST_PHP_USER'));

}

$exts_to_test = [];

$ini_overwrites = [

'output_handler=',

'open_basedir=',

'disable_functions=',

'output_buffering=Off',

'error_reporting=' . E_ALL,

'fatal_error_backtraces=Off',

'display_errors=1',

'display_startup_errors=1',

'log_errors=0',

'html_errors=0',

'track_errors=0',

'report_memleaks=1',

'report_zend_debug=0',

'docref_root=',

'docref_ext=.html',

'error_prepend_string=',

'error_append_string=',

'auto_prepend_file=',

'auto_append_file=',

'ignore_repeated_errors=0',

'precision=14',

'serialize_precision=-1',

'memory_limit=128M',

'opcache.fast_shutdown=0',

'opcache.file_update_protection=0',

'opcache.revalidate_freq=0',

'opcache.jit_hot_loop=1',

'opcache.jit_hot_func=1',

'opcache.jit_hot_return=1',

'opcache.jit_hot_side_exit=1',

'opcache.jit_max_root_traces=100000',

'opcache.jit_max_side_traces=100000',

'opcache.jit_max_exit_counters=100000',

// 'opcache.protect_memory=1', FIXME, we should enable this

'zend.assertions=1',

'zend.exception_ignore_args=0',

'zend.exception_string_param_max_len=15',

'short_open_tag=0',

'pcre.jit=0',

'variables_order=EGPCS',

];

$no_file_cache = '-d opcache.file_cache= -d opcache.file_cache_only=0';

// Determine the tests to be run.

$test_files = [];

$redir_tests = [];

$test_results = [];

$PHP_FAILED_TESTS = [

'BORKED' => [],

'FAILED' => [],

'WARNED' => [],

'LEAKED' => [],

'XFAILED' => [],

'XLEAKED' => [],

'SLOW' => []

];

// If parameters given assume they represent selected tests to run.

$result_tests_file = false;

$failed_tests_file = false;

$pass_option_n = false;

$pass_options = '';

$output_file = INIT_DIR . '/php_test_results_' . date('Ymd_Hi') . '.txt';

$just_save_results = false;

$valgrind = null;

$temp_source = null;

$temp_target = null;

$conf_passed = null;

$no_clean = false;

$colorize = true;

if (function_exists('sapi_windows_vt100_support') && !sapi_windows_vt100_support(STDOUT, true)) {

$colorize = false;

}

if (array_key_exists('NO_COLOR', $environment)) {

$colorize = false;

}

$selected_tests = false;

$slow_min_ms = INF;

$preload = false;

$file_cache = null;

$shuffle = false;

$bless = false;

$workers = null;

$context_line_count = 3;

$num_repeats = 1;

$show_progress = true;

$ignored_by_ext = [];

$online = null;

$cfgtypes = ['show', 'keep'];

$cfgfiles = ['skip', 'php', 'after', 'clean', 'out', 'diff', 'exp', 'mem'];

$cfg = [];

foreach ($cfgtypes as $type) {

$cfg[$type] = [];

foreach ($cfgfiles as $file) {

$cfg[$type][$file] = false;

}

}

if (!isset($argc, $argv) || !$argc) {

$argv = [__FILE__];

$argc = 1;

}

if (getenv('TEST_PHP_ARGS')) {

$argv = array_merge($argv, explode(' ', getenv('TEST_PHP_ARGS')));

$argc = count($argv);

}

for ($i = 1; $i < $argc; $i++) {

$is_switch = false;

$switch = substr($argv[$i], 1, 1);

$repeat = substr($argv[$i], 0, 1) == '-';

while ($repeat) {

if (!$is_switch) {

$switch = substr($argv[$i], 1, 1);

}

$is_switch = true;

foreach ($cfgtypes as $type) {

if (strpos($switch, '--' . $type) === 0) {

foreach ($cfgfiles as $file) {

if ($switch == '--' . $type . '-' . $file) {

$cfg[$type][$file] = true;

$is_switch = false;

break;

}

}

}

}

if (!$is_switch) {

$is_switch = true;

break;

}

$repeat = false;

switch ($switch) {

case 'j':

$workers = substr($argv[$i], 2);

if ($workers == 0 || !preg_match('/^\d+$/', $workers)) {

error("'$workers' is not a valid number of workers, try e.g. -j16 for 16 workers");

}

$workers = intval($workers, 10);

// Don't use parallel testing infrastructure if there is only one worker.

if ($workers === 1) {

$workers = null;

}

break;

case 'r':

case 'l':

$test_list = file($argv[++$i]);

if ($test_list) {

foreach ($test_list as $test) {

$matches = [];

if (preg_match('/^#.*\[(.*)\]\:\s+(.*)$/', $test, $matches)) {

$redir_tests[] = [$matches[1], $matches[2]];

} elseif (strlen($test)) {

$test_files[] = trim($test);

}

}

}

if ($switch != 'l') {

break;

}

$i--;

// no break

case 'w':

$failed_tests_file = fopen($argv[++$i], 'w+t');

break;

case 'a':

$failed_tests_file = fopen($argv[++$i], 'a+t');

break;

case 'W':

$result_tests_file = fopen($argv[++$i], 'w+t');

break;

case 'c':

$conf_passed = $argv[++$i];

break;

case 'd':

$ini_overwrites[] = $argv[++$i];

break;

case 'g':

$SHOW_ONLY_GROUPS = explode(",", $argv[++$i]);

break;

case '--keep-all':

foreach ($cfgfiles as $file) {

$cfg['keep'][$file] = true;

}

break;

case 'm':

$valgrind = new RuntestsValgrind($environment);

break;

case 'M':

$valgrind = new RuntestsValgrind($environment, $argv[++$i]);

break;

case 'n':

if (!$pass_option_n) {

$pass_options .= ' -n';

}

$pass_option_n = true;

break;

case 'e':

$pass_options .= ' -e';

break;

case '--preload':

$preload = true;

$environment['SKIP_PRELOAD'] = 1;

break;

case '--file-cache-prime':

$file_cache = 'prime';

break;

case '--file-cache-use':

$file_cache = 'use';

break;

case '--no-clean':

$no_clean = true;

break;

case '--color':

$colorize = true;

break;

case '--no-color':

$colorize = false;

break;

case 'p':

$php = $argv[++$i];

putenv("TEST_PHP_EXECUTABLE=$php");

$environment['TEST_PHP_EXECUTABLE'] = $php;

break;

case 'P':

$php = PHP_BINARY;

putenv("TEST_PHP_EXECUTABLE=$php");

$environment['TEST_PHP_EXECUTABLE'] = $php;

break;

case 'q':

putenv('NO_INTERACTION=1');

$environment['NO_INTERACTION'] = 1;

break;

case 's':

$output_file = $argv[++$i];

$just_save_results = true;

break;

case '--set-timeout':

$timeout = $argv[++$i] ?? '';

if (!preg_match('/^\d+$/', $timeout)) {

error("'$timeout' is not a valid number of seconds, try e.g. --set-timeout 60 for 1 minute");

}

$environment['TEST_TIMEOUT'] = intval($timeout, 10);

break;

case '--context':

$context_line_count = $argv[++$i] ?? '';

if (!preg_match('/^\d+$/', $context_line_count)) {

error("'$context_line_count' is not a valid number of lines of context, try e.g. --context 3 for 3 lines");

}

$context_line_count = intval($context_line_count, 10);

break;

case '--show-all':

foreach ($cfgfiles as $file) {

$cfg['show'][$file] = true;

}

break;

case '--show-slow':

$slow_min_ms = $argv[++$i] ?? '';

if (!preg_match('/^\d+$/', $slow_min_ms)) {

error("'$slow_min_ms' is not a valid number of milliseconds, try e.g. --show-slow 1000 for 1 second");

}

$slow_min_ms = intval($slow_min_ms, 10);

break;

case '--temp-source':

$temp_source = $argv[++$i];

break;

case '--temp-target':

$temp_target = $argv[++$i];

break;

case 'v':

case '--verbose':

$DETAILED = true;

break;

case 'x':

$environment['SKIP_SLOW_TESTS'] = 1;

break;

case '--online':

$online = true;

break;

case '--offline':

$online = false;

break;

case '--shuffle':

$shuffle = true;

break;

case '--asan':

case '--msan':

$environment['USE_ZEND_ALLOC'] = 0;

$environment['USE_TRACKED_ALLOC'] = 1;

$environment['SKIP_ASAN'] = 1;

$environment['SKIP_PERF_SENSITIVE'] = 1;

if ($switch === '--msan') {

$environment['SKIP_MSAN'] = 1;

$environment['MSAN_OPTIONS'] = 'intercept_tls_get_addr=0';

}

$lsanSuppressions = __DIR__ . '/.github/lsan-suppressions.txt';

if (file_exists($lsanSuppressions)) {

$environment['LSAN_OPTIONS'] = 'suppressions=' . $lsanSuppressions

. ':print_suppressions=0';

}

break;

case '--repeat':

$num_repeats = (int) $argv[++$i];

$environment['SKIP_REPEAT'] = 1;

break;

case '--bless':

$bless = true;

break;

case '-':

// repeat check with full switch

$switch = $argv[$i];

if ($switch != '-') {

$repeat = true;

}

break;

case '--progress':

$show_progress = true;

break;

case '--no-progress':

$show_progress = false;

break;

case '--version':

echo '$Id: 6c31c1d0187d98b28532bd700588e48030abbfea $' . "\n";

exit(1);

default:

echo "Illegal switch '$switch' specified!\n";

// no break

case 'h':

case '-help':

case '--help':

show_usage();

exit(1);

}

}

if (!$is_switch) {

$selected_tests = true;

$testfile = realpath($argv[$i]);

if (!$testfile && strpos($argv[$i], '*') !== false && function_exists('glob')) {

if (substr($argv[$i], -5) == '.phpt') {

$pattern_match = glob($argv[$i]);

} elseif (preg_match("/\*$/", $argv[$i])) {

$pattern_match = glob($argv[$i] . '.phpt');

} else {

die('Cannot find test file "' . $argv[$i] . '".' . PHP_EOL);

}

if (is_array($pattern_match)) {

$test_files = array_merge($test_files, $pattern_match);

}

} elseif (is_dir($testfile)) {

find_files($testfile);

} elseif (substr($testfile, -5) == '.phpt') {

$test_files[] = $testfile;

} else {

die('Cannot find test file "' . $argv[$i] . '".' . PHP_EOL);

}

}

}

if ($online === null && !isset($environment['SKIP_ONLINE_TESTS'])) {

$online = false;

}

if ($online !== null) {

$environment['SKIP_ONLINE_TESTS'] = $online ? '0' : '1';

}

if ($selected_tests && count($test_files) === 0) {

echo "No tests found.\n";

return;

}

if (!$php) {

$php = getenv('TEST_PHP_EXECUTABLE') ?: PHP_BINARY;

}

$php_cgi = getenv('TEST_PHP_CGI_EXECUTABLE') ?: get_binary($php, 'php-cgi', 'sapi/cgi/php-cgi');

$phpdbg = getenv('TEST_PHPDBG_EXECUTABLE') ?: get_binary($php, 'phpdbg', 'sapi/phpdbg/phpdbg');

putenv("TEST_PHP_EXECUTABLE=$php");

$environment['TEST_PHP_EXECUTABLE'] = $php;

putenv("TEST_PHP_EXECUTABLE_ESCAPED=" . escapeshellarg($php));

$environment['TEST_PHP_EXECUTABLE_ESCAPED'] = escapeshellarg($php);

putenv("TEST_PHP_CGI_EXECUTABLE=$php_cgi");

$environment['TEST_PHP_CGI_EXECUTABLE'] = $php_cgi;

putenv("TEST_PHP_CGI_EXECUTABLE_ESCAPED=" . escapeshellarg($php_cgi ?? ''));

$environment['TEST_PHP_CGI_EXECUTABLE_ESCAPED'] = escapeshellarg($php_cgi ?? '');

putenv("TEST_PHPDBG_EXECUTABLE=$phpdbg");

$environment['TEST_PHPDBG_EXECUTABLE'] = $phpdbg;

putenv("TEST_PHPDBG_EXECUTABLE_ESCAPED=" . escapeshellarg($phpdbg ?? ''));

$environment['TEST_PHPDBG_EXECUTABLE_ESCAPED'] = escapeshellarg($phpdbg ?? '');

if ($conf_passed !== null) {

if (IS_WINDOWS) {

$pass_options .= " -c " . escapeshellarg($conf_passed);

} else {

$pass_options .= " -c '" . realpath($conf_passed) . "'";

}

}

$test_files = array_unique($test_files);

$test_files = array_merge($test_files, $redir_tests);

// Run selected tests.

$test_cnt = count($test_files);

if ($test_cnt === 1) {

$cfg['show']['diff'] = true;

}

verify_config($php);

write_information($user_tests, $phpdbg);

if ($test_cnt) {

putenv('NO_INTERACTION=1');

usort($test_files, "test_sort");

$start_time = hrtime(true);

echo "Running selected tests.\n";

$test_idx = 0;

run_all_tests($test_files, $environment);

$end_time = hrtime(true);

if ($failed_tests_file) {

fclose($failed_tests_file);

}

if ($result_tests_file) {

fclose($result_tests_file);

}

if (0 == count($test_results)) {

echo "No tests were run.\n";

return;

}

compute_summary();

echo "=====================================================================";

echo get_summary(false);

if ($output_file != '' && $just_save_results) {

save_results($output_file, /* prompt_to_save_results: */ false);

}

} else {

// Compile a list of all test files (*.phpt).

$test_files = [];

$exts_tested = $exts_to_test;

$exts_skipped = [];

sort($exts_to_test);

foreach (['Zend', 'tests', 'ext', 'sapi'] as $dir) {

if (is_dir($dir)) {

find_files(TEST_PHP_SRCDIR . "/{$dir}", $dir == 'ext');

}

}

foreach ($user_tests as $dir) {

find_files($dir, $dir == 'ext');

}

$test_files = array_unique($test_files);

usort($test_files, "test_sort");

$start_timestamp = time();

$start_time = hrtime(true);

show_start($start_timestamp);

$test_cnt = count($test_files);

$test_idx = 0;

run_all_tests($test_files, $environment);

$end_time = hrtime(true);

if ($failed_tests_file) {

fclose($failed_tests_file);

}

if ($result_tests_file) {

fclose($result_tests_file);

}

// Summarize results

if (0 == count($test_results)) {

echo "No tests were run.\n";

return;

}

compute_summary();

show_end($start_timestamp, $start_time, $end_time);

show_summary();

save_results($output_file, /* prompt_to_save_results: */ true);

}

$junit->saveXML();

if ($bless) {

bless_failed_tests($PHP_FAILED_TESTS['FAILED']);

}

if (getenv('REPORT_EXIT_STATUS') !== '0' && getenv('REPORT_EXIT_STATUS') !== 'no' &&

($sum_results['FAILED'] || $sum_results['BORKED'] || $sum_results['LEAKED'])) {

exit(1);

}

}

function verify_config(string $php): void

{

if (empty($php) || !file_exists($php)) {

error('environment variable TEST_PHP_EXECUTABLE must be set to specify PHP executable!');

}

if (!is_executable($php)) {

error("invalid PHP executable specified by TEST_PHP_EXECUTABLE = $php");

}

}

/**

* @param string[] $user_tests

*/

function write_information(array $user_tests, $phpdbg): void

{

global $php, $php_cgi, $php_info, $ini_overwrites, $pass_options, $exts_to_test, $valgrind, $no_file_cache;

$php_escaped = escapeshellarg($php);

// Get info from php

$info_file = __DIR__ . '/run-test-info.php';

@unlink($info_file);

$php_info = '<?php echo "

PHP_SAPI : " , PHP_SAPI , "

PHP_VERSION : " , phpversion() , "

ZEND_VERSION: " , zend_version() , "

PHP_OS : " , PHP_OS , " - " , php_uname() , "

INI actual : " , realpath(get_cfg_var("cfg_file_path")) , "

More .INIs : " , (function_exists(\'php_ini_scanned_files\') ? str_replace("\n","", php_ini_scanned_files()) : "** not determined **"); ?>';

save_text($info_file, $php_info);

$info_params = [];

settings2array($ini_overwrites, $info_params);

$info_params = settings2params($info_params);

$php_info = shell_exec("$php_escaped $pass_options $info_params $no_file_cache \"$info_file\"");

define('TESTED_PHP_VERSION', shell_exec("$php_escaped -n -r \"echo PHP_VERSION;\""));

if ($php_cgi && $php != $php_cgi) {

$php_cgi_escaped = escapeshellarg($php_cgi);

$php_info_cgi = shell_exec("$php_cgi_escaped $pass_options $info_params $no_file_cache -q \"$info_file\"");

$php_info_sep = "\n---------------------------------------------------------------------";

$php_cgi_info = "$php_info_sep\nPHP : $php_cgi $php_info_cgi$php_info_sep";

} else {

$php_cgi_info = '';

}

if ($phpdbg) {

$phpdbg_escaped = escapeshellarg($phpdbg);

$phpdbg_info = shell_exec("$phpdbg_escaped $pass_options $info_params $no_file_cache -qrr \"$info_file\"");

$php_info_sep = "\n---------------------------------------------------------------------";

$phpdbg_info = "$php_info_sep\nPHP : $phpdbg $phpdbg_info$php_info_sep";

} else {

$phpdbg_info = '';

}

if (function_exists('opcache_invalidate')) {

opcache_invalidate($info_file, true);

}

@unlink($info_file);

// load list of enabled and loadable extensions

save_text($info_file, <<<'PHP'

<?php

$exts = get_loaded_extensions();

$ext_dir = ini_get('extension_dir');

foreach (scandir($ext_dir) as $file) {

if (preg_match('/^(?:php_)?([_a-zA-Z0-9]+)\.(?:so|dll)$/', $file, $matches)) {

if (!extension_loaded($matches[1])) {

$exts[] = $matches[1];

}

}

}

echo implode(',', $exts);

PHP);

$extensionsNames = explode(',', shell_exec("$php_escaped $pass_options $info_params $no_file_cache \"$info_file\""));

$exts_to_test = array_unique(remap_loaded_extensions_names($extensionsNames));

// check for extensions that need special handling and regenerate

$info_params_ex = [

'session' => ['session.auto_start=0'],

'tidy' => ['tidy.clean_output=0'],

'zlib' => ['zlib.output_compression=Off'],

'xdebug' => ['xdebug.mode=off','xdebug.start_with_request=default','xdebug.log_level=20'],

];

foreach ($info_params_ex as $ext => $ini_overwrites_ex) {

if (in_array($ext, $exts_to_test)) {

$ini_overwrites = array_merge($ini_overwrites, $ini_overwrites_ex);

}

}

if (function_exists('opcache_invalidate')) {

opcache_invalidate($info_file, true);

}

@unlink($info_file);

// Write test context information.

echo "

=====================================================================

PHP : $php $php_info $php_cgi_info $phpdbg_info

CWD : " . TEST_PHP_SRCDIR . "

Extra dirs : ";

foreach ($user_tests as $test_dir) {

echo "{$test_dir}\n ";

}

echo "

VALGRIND : " . ($valgrind ? $valgrind->getHeader() : 'Not used') . "

=====================================================================

";

}

function save_results(string $output_file, bool $prompt_to_save_results): void

{

global $sum_results, $failed_test_summary, $PHP_FAILED_TESTS, $php;

if (getenv('NO_INTERACTION')) {

return;

}

if ($prompt_to_save_results) {

/* We got failed Tests, offer the user to save a QA report */

$fp = fopen("php://stdin", "r+");

if ($sum_results['FAILED'] || $sum_results['BORKED'] || $sum_results['WARNED'] || $sum_results['LEAKED']) {

echo "\nYou may have found a problem in PHP.";

}

echo "\nThis report can be saved and used to open an issue on the bug tracker at\n";

echo "https://github.com/php/php-src/issues\n";

echo "This gives us a better understanding of PHP's behavior.\n";

echo "Do you want to save this report in a file? [Yn]: ";

flush();

$user_input = fgets($fp, 10);

fclose($fp);

if (!(strlen(trim($user_input)) == 0 || strtolower($user_input[0]) == 'y')) {

return;

}

}

/**

* Collect information about the host system for our report

* Fetch phpinfo() output so that we can see the PHP environment

* Make an archive of all the failed tests

*/

$failed_tests_data = '';

$sep = "\n" . str_repeat('=', 80) . "\n";

$failed_tests_data .= $failed_test_summary . "\n";

$failed_tests_data .= get_summary(true) . "\n";

if ($sum_results['FAILED']) {

foreach ($PHP_FAILED_TESTS['FAILED'] as $test_info) {

$failed_tests_data .= $sep . $test_info['name'] . $test_info['info'];

$failed_tests_data .= $sep . file_get_contents(realpath($test_info['output']));

$failed_tests_data .= $sep . file_get_contents(realpath($test_info['diff']));

$failed_tests_data .= $sep . "\n\n";

}

}

$failed_tests_data .= "\n" . $sep . 'BUILD ENVIRONMENT' . $sep;

$failed_tests_data .= "OS:\n" . PHP_OS . " - " . php_uname() . "\n\n";

$ldd = $autoconf = $sys_libtool = $libtool = $compiler = 'N/A';

if (!IS_WINDOWS) {

/* If PHP_AUTOCONF is set, use it; otherwise, use 'autoconf'. */

if (getenv('PHP_AUTOCONF')) {

$autoconf = shell_exec(getenv('PHP_AUTOCONF') . ' --version');

} else {

$autoconf = shell_exec('autoconf --version');

}

/* Always use the generated libtool - Mac OSX uses 'glibtool' */

$libtool = shell_exec(INIT_DIR . '/libtool --version');

/* Use shtool to find out if there is glibtool present (MacOSX) */

$sys_libtool_path = shell_exec(__DIR__ . '/build/shtool path glibtool libtool');

if ($sys_libtool_path) {

$sys_libtool = shell_exec(str_replace("\n", "", $sys_libtool_path) . ' --version');

}

/* Try the most common flags for 'version' */

$flags = ['-v', '-V', '--version'];

$cc_status = 0;

foreach ($flags as $flag) {

system(getenv('CC') . " $flag >/dev/null 2>&1", $cc_status);

if ($cc_status == 0) {

$compiler = shell_exec(getenv('CC') . " $flag 2>&1");

break;

}

}

$ldd = shell_exec("ldd $php 2>/dev/null");

}

$failed_tests_data .= "Autoconf:\n$autoconf\n";

$failed_tests_data .= "Bundled Libtool:\n$libtool\n";

$failed_tests_data .= "System Libtool:\n$sys_libtool\n";

$failed_tests_data .= "Compiler:\n$compiler\n";

$failed_tests_data .= "Bison:\n" . shell_exec('bison --version 2>/dev/null') . "\n";

$failed_tests_data .= "Libraries:\n$ldd\n";

$failed_tests_data .= "\n";

$failed_tests_data .= $sep . "PHPINFO" . $sep;

$failed_tests_data .= shell_exec($php . ' -ddisplay_errors=stderr -dhtml_errors=0 -i 2> /dev/null');

file_put_contents($output_file, $failed_tests_data);

echo "Report saved to: ", $output_file, "\n";