Gecko [ touzafair.com ]

Name	Size	Permission
LuaSandboxFunction_construct.p...	253 B	-rw-r--r--
array-key-conversion.phpt	3.11 KB	-rw-r--r--
call.phpt	5.1 KB	-rw-r--r--
callback_exception.phpt	392 B	-rw-r--r--
datatypes-unsupported.phpt	2.78 KB	-rw-r--r--
datatypes.phpt	2.43 KB	-rw-r--r--
dump_loadBinary_call.phpt	393 B	-rw-r--r--
errors-at-call-boundaries.phpt	1.98 KB	-rw-r--r--
extending-LuaSandbox.phpt	845 B	-rw-r--r--
ipairs.phpt	1.53 KB	-rw-r--r--
loadString.phpt	334 B	-rw-r--r--
lua_catches_php_exception.phpt	1.34 KB	-rw-r--r--
pairs.phpt	3.31 KB	-rw-r--r--
pcall.phpt	1.27 KB	-rw-r--r--
profiler-sorting.phpt	1.18 KB	-rw-r--r--
profiler.phpt	1.54 KB	-rw-r--r--
reentrant.phpt	1.1 KB	-rw-r--r--
xpcall.phpt	2.6 KB	-rw-r--r--

Code Editor : profiler.phpt

--TEST--
profiler
--FILE--
<?php

// Note these tests have to waste CPU cycles rather than sleep(), because the
// timer counts CPU time used and sleep() doesn't use CPU time.

$lua = <<<LUA
	lua = {}

function lua.test()
		local t = os.clock() + 0.2
		while os.clock() < t do end
	end
LUA;

$sandbox = new LuaSandbox;
$sandbox->loadString( $lua )->call();
$sandbox->enableProfiler( 0.02 );

$sandbox->callFunction( 'lua.test' );

echo "Samples: " . $sandbox->getProfilerFunctionReport( LuaSandbox::SAMPLES )['clock'] . "\n";
echo "Seconds: " . $sandbox->getProfilerFunctionReport( LuaSandbox::SECONDS )['clock'] . "\n";
echo "Seconds > 0: "
	. ( $sandbox->getProfilerFunctionReport( LuaSandbox::SECONDS )['clock'] > 0 ? 'yes' : 'no' )
	. "\n";
echo "Percent: " . $sandbox->getProfilerFunctionReport( LuaSandbox::PERCENT )['clock'] . "\n";

// Test that re-enabling the profiler doesn't explode
$sandbox->enableProfiler( 0.03 );

$sandbox->callFunction( 'lua.test' );

// Test that disabling the profiler doesn't explode
$sandbox->disableProfiler();

--EXPECTF--
Samples: %d
Seconds: %f
Seconds > 0: yes
Percent: %f
Samples: %d
Seconds: %f
Seconds > 0: yes
Percent: %f

${this.title}

Code Editor : profiler.phpt