golden hour

/opt/alt/tests/alt-php71-pecl-luasandbox_3.0.3-2.el9/tests

File/Folder	Size	Actions
LuaSandboxFunction_construct.phpt	253 B
array-key-conversion.phpt	3.11 KB
call.phpt	5.19 KB
callback_exception.phpt	480 B
datatypes-unsupported.phpt	2.78 KB
datatypes.phpt	2.53 KB
dump_loadBinary_call.phpt	491 B
errors-at-call-boundaries.phpt	2.07 KB
extending-LuaSandbox.phpt	903 B
ipairs.phpt	1.61 KB
loadString.phpt	422 B
lua_catches_php_exception.phpt	1.43 KB
pairs.phpt	3.39 KB
pcall.phpt	1.36 KB
profiler-sorting.phpt	1.26 KB
profiler.phpt	1.63 KB
reentrant.phpt	1.21 KB
xpcall.phpt	2.71 KB

Edit: reentrant.phpt

--TEST--
Re-entering Lua during a callback to PHP
--FILE--
<?php
$sandbox = new LuaSandbox;
$chunk = $sandbox->loadString('
	function factorial(n)
		if n <= 1 then
			return 1
		else
			return n * test.factorial(n - 1)
		end
	end

return factorial
');

$ret = $chunk->call();
$luaFactorial = $ret[0];

$sandbox->registerLibrary( 'test', array( 'factorial' => 'factorial' ) );

function factorial($n) {
	global $luaFactorial;
	if ($n <= 1) {
		return array(1);
	} else {
		$ret = $luaFactorial->call($n - 1);
		return array($n * $ret[0]);
	}
}

print implode('', factorial(10)) . "\n";
var_dump( $luaFactorial->call(10) );

try {
	$luaFactorial->call(1000000000);
} catch ( LuaSandboxError $e ) {
	print $e->getMessage() . "\n";
}
try {
	factorial(1000000000);
} catch ( LuaSandboxError $e ) {
	print $e->getMessage() . "\n";
}

// HHVM leaks it otherwise, and the warning makes the test fail
unset( $sandbox, $luaFactorial, $chunk, $e, $ret );

--EXPECTF--
3628800
array(1) {
  [0]=>
  int(3628800)
}
%AWarning: LuaSandboxFunction::call(): Failed to generate Lua trace (C stack overflow) in %s on line %d
C stack overflow
%AWarning: LuaSandboxFunction::call(): Failed to generate Lua trace (C stack overflow) in %s on line %d
C stack overflow