<?php
/**
- * Benchamrking suite for the PHP-XMLRPC lib
+ * Benchmarking suite for the PHP-XMLRPC lib.
+ *
* @author Gaetano Giunta
- * @copyright (c) 2005-2014 G. Giunta
- * @license code licensed under the BSD License: http://phpxmlrpc.sourceforge.net/license.txt
+ * @copyright (c) 2005-2020 G. Giunta
+ * @license code licensed under the BSD License: see file license.txt
*
- * @todo add a test for response ok in call testing?
+ * @todo add a test for response ok in call testing
+ * @todo add support for --help option to give users the list of supported parameters
**/
-include_once(__DIR__.'/../vendor/autoload.php');
+use PhpXmlRpc\PhpXmlRpc;
+use PhpXmlRpc\Value;
+use PhpXmlRpc\Request;
+use PhpXmlRpc\Client;
+use PhpXmlRpc\Response;
+use PhpXmlRpc\Encoder;
-include_once(__DIR__.'/../lib/xmlrpc.inc');
+include_once __DIR__ . '/../vendor/autoload.php';
-include(__DIR__.'/parse_args.php');
+include __DIR__ . '/parse_args.php';
$args = argParser::getArgs();
function begin_test($test_name, $test_case)
{
global $test_results;
- if (!isset($test_results[$test_name]))
- $test_results[$test_name]=array();
+ if (!isset($test_results[$test_name])) {
+ $test_results[$test_name] = array();
+ }
$test_results[$test_name][$test_case] = array();
$test_results[$test_name][$test_case]['time'] = microtime(true);
}
{
global $test_results;
$end = microtime(true);
- if (!isset($test_results[$test_name][$test_case]))
- trigger_error('ending test that was not sterted');
+ if (!isset($test_results[$test_name][$test_case])) {
+ trigger_error('ending test that was not started');
+ }
$test_results[$test_name][$test_case]['time'] = $end - $test_results[$test_name][$test_case]['time'];
$test_results[$test_name][$test_case]['result'] = $test_result;
echo '.';
// Begin execution
-$test_results=array();
+$test_results = array();
$is_web = isset($_SERVER['REQUEST_METHOD']);
$xd = extension_loaded('xdebug') && ini_get('xdebug.profiler_enable');
-if ($xd)
+if ($xd) {
$num_tests = 1;
-else
+} else {
$num_tests = 10;
+}
$title = 'XML-RPC Benchmark Tests';
-if($is_web)
-{
+if ($is_web) {
echo "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\" \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">\n<html xmlns=\"http://www.w3.org/1999/xhtml\" lang=\"en\" xml:lang=\"en\">\n<head>\n<title>$title</title>\n</head>\n<body>\n<h1>$title</h1>\n<pre>\n";
-}
-else
-{
+} else {
echo "$title\n\n";
}
-if($is_web)
-{
- echo "<h3>Using lib version: $xmlrpcVersion on PHP version: ".phpversion()."</h3>\n";
- if ($xd) echo "<h4>XDEBUG profiling enabled: skipping remote tests. Trace file is: ".htmlspecialchars(xdebug_get_profiler_filename())."</h4>\n";
+if ($is_web) {
+ echo "<h3>Using lib version: " . PhpXmlRpc::$xmlrpcVersion . " on PHP version: " . phpversion() . "</h3>\n";
+ if ($xd) {
+ echo "<h4>XDEBUG profiling enabled: skipping remote tests. Trace file is: " . htmlspecialchars(xdebug_get_profiler_filename()) . "</h4>\n";
+ }
flush();
ob_flush();
-}
-else
-{
- echo "Using lib version: $xmlrpcVersion on PHP version: ".phpversion()."\n";
- if ($xd) echo "XDEBUG profiling enabled: skipping remote tests\nTrace file is: ".xdebug_get_profiler_filename()."\n";
+} else {
+ echo "Using lib version: " . PhpXmlRpc::$xmlrpcVersion . " on PHP version: " . phpversion() . "\n";
+ if ($xd) {
+ echo "XDEBUG profiling enabled: skipping remote tests\nTrace file is: " . xdebug_get_profiler_filename() . "\n";
+ }
}
-// test 'old style' data encoding vs. 'automatic style' encoding
+// test 'manual style' data encoding vs. 'automatic style' encoding
begin_test('Data encoding (large array)', 'manual encoding');
-for ($i = 0; $i < $num_tests; $i++)
-{
+for ($i = 0; $i < $num_tests; $i++) {
$vals = array();
- for ($j = 0; $j < 10; $j++)
- {
+ for ($j = 0; $j < 10; $j++) {
$valarray = array();
- foreach ($data[$j] as $key => $val)
- {
+ foreach ($data[$j] as $key => $val) {
$values = array();
- $values[] = new xmlrpcval($val[0], 'int');
- $values[] = new xmlrpcval($val[1], 'double');
- $values[] = new xmlrpcval($val[2], 'string');
- $values[] = new xmlrpcval($val[3], 'boolean');
- $values[] = new xmlrpcval($val[4], 'dateTime.iso8601');
- $values[] = new xmlrpcval($val[5], 'int');
- $values[] = new xmlrpcval($val[6], 'double');
- $values[] = new xmlrpcval($val[7], 'string');
- $values[] = new xmlrpcval($val[8], 'boolean');
- $values[] = new xmlrpcval($val[9], 'dateTime.iso8601');
- $valarray[$key] = new xmlrpcval($values, 'array');
+ $values[] = new Value($val[0], 'int');
+ $values[] = new Value($val[1], 'double');
+ $values[] = new Value($val[2], 'string');
+ $values[] = new Value($val[3], 'boolean');
+ $values[] = new Value($val[4], 'dateTime.iso8601');
+ $values[] = new Value($val[5], 'int');
+ $values[] = new Value($val[6], 'double');
+ $values[] = new Value($val[7], 'string');
+ $values[] = new Value($val[8], 'boolean');
+ $values[] = new Value($val[9], 'dateTime.iso8601');
+ $valarray[$key] = new Value($values, 'array');
}
- $vals[] = new xmlrpcval($valarray, 'struct');
+ $vals[] = new Value($valarray, 'struct');
}
- $value = new xmlrpcval($vals, 'array');
+ $value = new Value($vals, 'array');
$out = $value->serialize();
}
end_test('Data encoding (large array)', 'manual encoding', $out);
begin_test('Data encoding (large array)', 'automatic encoding');
-for ($i = 0; $i < $num_tests; $i++)
-{
- $value = php_xmlrpc_encode($data, array('auto_dates'));
+$encoder = new Encoder();
+for ($i = 0; $i < $num_tests; $i++) {
+ $value = $encoder->encode($data, array('auto_dates'));
$out = $value->serialize();
}
end_test('Data encoding (large array)', 'automatic encoding', $out);
-if (function_exists('xmlrpc_set_type'))
-{
+if (function_exists('xmlrpc_set_type')) {
begin_test('Data encoding (large array)', 'xmlrpc-epi encoding');
- for ($i = 0; $i < $num_tests; $i++)
- {
- for ($j = 0; $j < 10; $j++)
- foreach ($keys as $k)
- {
+ for ($i = 0; $i < $num_tests; $i++) {
+ for ($j = 0; $j < 10; $j++) {
+ foreach ($keys as $k) {
xmlrpc_set_type($data[$j][$k][4], 'datetime');
xmlrpc_set_type($data[$j][$k][8], 'datetime');
}
+ }
$out = xmlrpc_encode($data);
}
end_test('Data encoding (large array)', 'xmlrpc-epi encoding', $out);
}
// test 'old style' data decoding vs. 'automatic style' decoding
-$dummy = new xmlrpcmsg('');
-$out = new xmlrpcresp($value);
-$in = '<?xml version="1.0" ?>'."\n".$out->serialize();
+$dummy = new Request('');
+$out = new Response($value);
+$in = '<?xml version="1.0" ?>' . "\n" . $out->serialize();
begin_test('Data decoding (large array)', 'manual decoding');
-for ($i = 0; $i < $num_tests; $i++)
-{
+for ($i = 0; $i < $num_tests; $i++) {
$response = $dummy->ParseResponse($in, true);
$value = $response->value();
$result = array();
- for ($k = 0; $k < $value->arraysize(); $k++)
- {
+ foreach($value as $val1) {
+ $out = array();
+ foreach($val1 as $name => $val) {
+ $out[$name] = array();
+ foreach($val as $data) {
+ $out[$name][] = $data->scalarval();
+ }
+ }
+ $result[] = $out;
+ }
+}
+end_test('Data decoding (large array)', 'manual decoding', $result);
+
+begin_test('Data decoding (large array)', 'manual decoding deprecated');
+for ($i = 0; $i < $num_tests; $i++) {
+ $response = $dummy->ParseResponse($in, true);
+ $value = $response->value();
+ $result = array();
+ $l = $value->arraysize();
+ for ($k = 0; $k < $l; $k++) {
$val1 = $value->arraymem($k);
$out = array();
- while (list($name, $val) = $val1->structeach())
- {
+ foreach($val1 as $name => $val) {
$out[$name] = array();
- for ($j = 0; $j < $val->arraysize(); $j++)
- {
+ $m = $val->arraysize();
+ for ($j = 0; $j < $m; $j++) {
$data = $val->arraymem($j);
$out[$name][] = $data->scalarval();
}
$result[] = $out;
}
}
-end_test('Data decoding (large array)', 'manual decoding', $result);
+end_test('Data decoding (large array)', 'manual decoding deprecated', $result);
begin_test('Data decoding (large array)', 'automatic decoding');
-for ($i = 0; $i < $num_tests; $i++)
-{
+for ($i = 0; $i < $num_tests; $i++) {
$response = $dummy->ParseResponse($in, true, 'phpvals');
$value = $response->value();
}
end_test('Data decoding (large array)', 'automatic decoding', $value);
-if (function_exists('xmlrpc_decode'))
-{
+if (function_exists('xmlrpc_decode')) {
begin_test('Data decoding (large array)', 'xmlrpc-epi decoding');
- for ($i = 0; $i < $num_tests; $i++)
- {
+ for ($i = 0; $i < $num_tests; $i++) {
$response = $dummy->ParseResponse($in, true, 'xml');
$value = xmlrpc_decode($response->value());
}
end_test('Data decoding (large array)', 'xmlrpc-epi decoding', $value);
}
-if (!$xd)
-{
+if (!$xd) {
/// test multicall vs. many calls vs. keep-alives
- $value = php_xmlrpc_encode($data1, array('auto_dates'));
- $msg = new xmlrpcmsg('interopEchoTests.echoValue', array($value));
- $msgs=array();
- for ($i = 0; $i < 25; $i++)
- $msgs[] = $msg;
- $server = explode(':', $args['LOCALSERVER']);
- if(count($server) > 1)
- {
- $c = new xmlrpc_client($args['URI'], $server[0], $server[1]);
+ $encoder = new Encoder();
+ $value = $encoder->encode($data1, array('auto_dates'));
+ $req = new Request('interopEchoTests.echoValue', array($value));
+ $reqs = array();
+ for ($i = 0; $i < 25; $i++) {
+ $reqs[] = $req;
}
- else
- {
- $c = new xmlrpc_client($args['URI'], $args['LOCALSERVER']);
+ $server = explode(':', $args['HTTPSERVER']);
+ if (count($server) > 1) {
+ $srv = $server[1] . '://' . $server[0] . $args['HTTPURI'];
+ $c = new Client($args['HTTPURI'], $server[0], $server[1]);
+ } else {
+ $srv = $args['HTTPSERVER'] . $args['HTTPURI'];
+ $c = new Client($args['HTTPURI'], $args['HTTPSERVER']);
}
// do not interfere with http compression
$c->accepted_compression = array();
//$c->debug=true;
+ $testName = "Repeated send (small array) to $srv";
+
if (function_exists('gzinflate')) {
$c->accepted_compression = null;
}
- begin_test('Repeated send (small array)', 'http 10');
+ begin_test($testName, 'http 10');
$response = array();
- for ($i = 0; $i < 25; $i++)
- {
- $resp = $c->send($msg);
+ for ($i = 0; $i < 25; $i++) {
+ $resp = $c->send($req);
$response[] = $resp->value();
}
- end_test('Repeated send (small array)', 'http 10', $response);
+ end_test($testName, 'http 10', $response);
- if (function_exists('curl_init'))
- {
- begin_test('Repeated send (small array)', 'http 11 w. keep-alive');
+ if (function_exists('curl_init')) {
+ begin_test($testName, 'http 11 w. keep-alive');
$response = array();
- for ($i = 0; $i < 25; $i++)
- {
- $resp = $c->send($msg, 10, 'http11');
+ for ($i = 0; $i < 25; $i++) {
+ $resp = $c->send($req, 10, 'http11');
$response[] = $resp->value();
}
- end_test('Repeated send (small array)', 'http 11 w. keep-alive', $response);
+ end_test($testName, 'http 11 w. keep-alive', $response);
$c->keepalive = false;
- begin_test('Repeated send (small array)', 'http 11');
+ begin_test($testName, 'http 11');
$response = array();
- for ($i = 0; $i < 25; $i++)
- {
- $resp = $c->send($msg, 10, 'http11');
+ for ($i = 0; $i < 25; $i++) {
+ $resp = $c->send($req, 10, 'http11');
$response[] = $resp->value();
}
- end_test('Repeated send (small array)', 'http 11', $response);
+ end_test($testName, 'http 11', $response);
}
- begin_test('Repeated send (small array)', 'multicall');
- $response = $c->send($msgs);
- foreach ($response as $key =>& $val)
- {
+ begin_test($testName, 'multicall');
+ $response = $c->send($reqs);
+ foreach ($response as $key => & $val) {
$val = $val->value();
}
- end_test('Repeated send (small array)', 'multicall', $response);
+ end_test($testName, 'multicall', $response);
- if (function_exists('gzinflate'))
- {
+ if (function_exists('gzinflate')) {
$c->accepted_compression = array('gzip');
$c->request_compression = 'gzip';
- begin_test('Repeated send (small array)', 'http 10 w. compression');
+ begin_test($testName, 'http 10 w. compression');
$response = array();
- for ($i = 0; $i < 25; $i++)
- {
- $resp = $c->send($msg);
+ for ($i = 0; $i < 25; $i++) {
+ $resp = $c->send($req);
$response[] = $resp->value();
}
- end_test('Repeated send (small array)', 'http 10 w. compression', $response);
+ end_test($testName, 'http 10 w. compression', $response);
- if (function_exists('curl_init'))
- {
- begin_test('Repeated send (small array)', 'http 11 w. keep-alive and compression');
+ if (function_exists('curl_init')) {
+ begin_test($testName, 'http 11 w. keep-alive and compression');
$response = array();
- for ($i = 0; $i < 25; $i++)
- {
- $resp = $c->send($msg, 10, 'http11');
+ for ($i = 0; $i < 25; $i++) {
+ $resp = $c->send($req, 10, 'http11');
$response[] = $resp->value();
}
- end_test('Repeated send (small array)', 'http 11 w. keep-alive and compression', $response);
+ end_test($testName, 'http 11 w. keep-alive and compression', $response);
$c->keepalive = false;
- begin_test('Repeated send (small array)', 'http 11 w. compression');
+ begin_test($testName, 'http 11 w. compression');
$response = array();
- for ($i = 0; $i < 25; $i++)
- {
- $resp = $c->send($msg, 10, 'http11');
+ for ($i = 0; $i < 25; $i++) {
+ $resp = $c->send($req, 10, 'http11');
$response[] = $resp->value();
}
- end_test('Repeated send (small array)', 'http 11 w. compression', $response);
+ end_test($testName, 'http 11 w. compression', $response);
}
- begin_test('Repeated send (small array)', 'multicall w. compression');
- $response = $c->send($msgs);
- foreach ($response as $key =>& $val)
- {
+ begin_test($testName, 'multicall w. compression');
+ $response = $c->send($reqs);
+ foreach ($response as $key => & $val) {
$val = $val->value();
}
- end_test('Repeated send (small array)', 'multicall w. compression', $response);
+ end_test($testName, 'multicall w. compression', $response);
}
-
} // end of 'if no xdebug profiling'
echo "\n";
-foreach($test_results as $test => $results)
-{
+foreach ($test_results as $test => $results) {
echo "\nTEST: $test\n";
- foreach ($results as $case => $data)
- echo " $case: {$data['time']} secs - Output data CRC: ".crc32(serialize($data['result']))."\n";
+ foreach ($results as $case => $data) {
+ echo " $case: {$data['time']} secs - Output data CRC: " . crc32(serialize($data['result'])) . "\n";
+ }
}
-
-if($is_web)
-{
+if ($is_web) {
echo "\n</pre>\n</body>\n</html>\n";
}