View source
<?php
class XMLRPCValidator1Test extends DrupalTestCase {
function get_info() {
return array(
'name' => 'XML-RPC validator1',
'desc' => t('See !validator-link. note: simpletest_xmlrpc.module must be enabled', array(
'!validator-link' => l('the xmlrpc validator1 specification', 'http://www.xmlrpc.com/validator1Docs'),
)),
'group' => 'XML-RPC Tests',
);
}
function test_run_all_tests() {
if (!$this
->drupalModuleEnable('simpletest_xmlrpc')) {
return FALSE;
}
$xml_url = url(NULL, array(
'absolute' => TRUE,
)) . 'xmlrpc.php';
srand();
mt_srand();
$array_1 = array(
array(
'curly' => mt_rand(-100, 100),
),
array(
'curly' => mt_rand(-100, 100),
),
array(
'larry' => mt_rand(-100, 100),
),
array(
'larry' => mt_rand(-100, 100),
),
array(
'moe' => mt_rand(-100, 100),
),
array(
'moe' => mt_rand(-100, 100),
),
array(
'larry' => mt_rand(-100, 100),
),
);
shuffle($array_1);
$l_res_1 = simpletest_xmlrpc_arrayOfStructsTest($array_1);
$r_res_1 = xmlrpc($xml_url, 'validator1.arrayOfStructsTest', $array_1);
$this
->assertIdentical($l_res_1, $r_res_1, 'array of structs test: %s');
$string_2 = 't\'&>>zf"md>yr>xlcev<h<"k&j<og"w&&>">>uai"np&s>>q\'&b<>"&&&';
$l_res_2 = simpletest_xmlrpc_countTheEntities($string_2);
$r_res_2 = xmlrpc($xml_url, 'validator1.countTheEntities', $string_2);
$this
->assertIdentical($l_res_2, $r_res_2, 'count the entities test: %s');
$struct_3 = array(
'moe' => mt_rand(-100, 100),
'larry' => mt_rand(-100, 100),
'curly' => mt_rand(-100, 100),
'homer' => mt_rand(-100, 100),
);
$l_res_3 = simpletest_xmlrpc_easyStructTest($struct_3);
$r_res_3 = xmlrpc($xml_url, 'validator1.easyStructTest', $struct_3);
$this
->assertIdentical($l_res_3, $r_res_3, 'easy struct test: %s');
$struct_4 = array(
'sub1' => array(
'bar' => 13,
),
'sub2' => 14,
'sub3' => array(
'foo' => 1,
'baz' => 2,
),
'sub4' => array(
'ss' => array(
'sss' => array(
'ssss' => 'sssss',
),
),
),
);
$l_res_4 = simpletest_xmlrpc_echoStructTest($struct_4);
$r_res_4 = xmlrpc($xml_url, 'validator1.echoStructTest', $struct_4);
$this
->assertIdentical($l_res_4, $r_res_4, 'echo struct test: %s');
$int_5 = mt_rand(-100, 100);
$bool_5 = $int_5 % 2 == 0;
$string_5 = $this
->randomName();
$double_5 = (double) (mt_rand(-1000, 1000) / 100);
$time_5 = time();
$base64_5 = $this
->randomName(100);
$l_res_5 = simpletest_xmlrpc_manyTypesTest($int_5, $bool_5, $string_5, $double_5, xmlrpc_date($time_5), $base64_5);
$l_res_5[5] = $l_res_5[5]->data;
$r_res_5 = xmlrpc($xml_url, 'validator1.manyTypesTest', $int_5, $bool_5, $string_5, $double_5, xmlrpc_date($time_5), xmlrpc_base64($base64_5));
$this
->assertEqual($l_res_5, $r_res_5, 'many types test: %s');
$size = mt_rand(100, 200);
$array_6 = array();
for ($i = 0; $i < $size; $i++) {
$array_6[] = $this
->randomName(mt_rand(8, 12));
}
$l_res_6 = simpletest_xmlrpc_moderateSizeArrayCheck($array_6);
$r_res_6 = xmlrpc($xml_url, 'validator1.moderateSizeArrayCheck', $array_6);
$this
->assertIdentical($l_res_6, $r_res_6, 'moderate size array check: %s');
$struct_7 = array();
for ($y = 2000; $y < 2002; $y++) {
for ($m = 3; $m < 5; $m++) {
for ($d = 1; $d < 6; $d++) {
$ys = (string) $y;
$ms = sprintf('%02d', $m);
$ds = sprintf('%02d', $d);
$struct_7[$ys][$ms][$ds]['moe'] = mt_rand(-100, 100);
$struct_7[$ys][$ms][$ds]['larry'] = mt_rand(-100, 100);
$struct_7[$ys][$ms][$ds]['curly'] = mt_rand(-100, 100);
}
}
}
$l_res_7 = simpletest_xmlrpc_nestedStructTest($struct_7);
$r_res_7 = xmlrpc($xml_url, 'validator1.nestedStructTest', $struct_7);
$this
->assertIdentical($l_res_7, $r_res_7, 'nested struct test: %s');
$int_8 = mt_rand(-100, 100);
$l_res_8 = simpletest_xmlrpc_simpleStructReturnTest($int_8);
$r_res_8 = xmlrpc($xml_url, 'validator1.simpleStructReturnTest', $int_8);
$this
->assertIdentical($l_res_8, $r_res_8, 'nested struct test: %s');
$x = array();
$x[] = array(
'validator1.arrayOfStructsTest',
$array_1,
);
$x[] = array(
'validator1.countTheEntities',
$string_2,
);
$x[] = array(
'validator1.easyStructTest',
$struct_3,
);
$x[] = array(
'validator1.echoStructTest',
$struct_4,
);
$x[] = array(
'validator1.manyTypesTest',
$int_5,
$bool_5,
$string_5,
$double_5,
xmlrpc_date($time_5),
xmlrpc_base64($base64_5),
);
$x[] = array(
'validator1.moderateSizeArrayCheck',
$array_6,
);
$x[] = array(
'validator1.nestedStructTest',
$struct_7,
);
$x[] = array(
'validator1.simpleStructReturnTest',
$int_8,
);
$a_l_res = array(
$l_res_1,
$l_res_2,
$l_res_3,
$l_res_4,
$l_res_5,
$l_res_6,
$l_res_7,
$l_res_8,
);
$a_r_res = xmlrpc($xml_url, $x);
$this
->assertEqual($a_l_res, $a_r_res, 'multicall equals result');
}
}
