add support for setting ssl version to use
[plcapi.git] / test / testsuite.php
1 <?php
2
3 include(dirname(__FILE__).'/parse_args.php');
4
5 require_once('xmlrpc.inc');
6 require_once('xmlrpcs.inc');
7 require_once('xmlrpc_wrappers.inc');
8
9 require_once 'phpunit.php';
10 //require_once 'PHPUnit/TestDecorator.php';
11
12 // let testuite run for the needed time
13 if ((int)ini_get('max_execution_time') < 180)
14     ini_set('max_execution_time', 180);
15
16 $suite = new PHPUnit_TestSuite();
17
18 // array with list of failed tests
19 $failed_tests = array();
20
21 class LocalhostTests extends PHPUnit_TestCase
22 {
23     var $client = null;
24     var $method = 'http';
25     var $timeout = 10;
26     var $request_compression = null;
27     var $accepted_compression = '';
28
29     function fail($message = '')
30     {
31         PHPUnit_TestCase::fail($message);
32         // save in global var that this particular test has failed
33         // (but only if not called from subclass objects / multitests)
34         if (function_exists('debug_backtrace') && strtolower(get_class($this)) == 'localhosttests')
35         {
36             global $failed_tests;
37             $trace = debug_backtrace();
38             for ($i = 0; $i < count($trace); $i++)
39             {
40                 if (strpos($trace[$i]['function'], 'test') === 0)
41                 {
42                     $failed_tests[$trace[$i]['function']] = true;
43                     break;
44                 }
45             }
46         }
47     }
48
49     function setUp()
50     {
51         global $DEBUG, $LOCALSERVER, $URI;
52         $server = explode(':', $LOCALSERVER);
53         if(count($server) > 1)
54         {
55             $this->client=new xmlrpc_client($URI, $server[0], $server[1]);
56         }
57         else
58         {
59             $this->client=new xmlrpc_client($URI, $LOCALSERVER);
60         }
61         if($DEBUG)
62         {
63             $this->client->setDebug($DEBUG);
64         }
65         $this->client->request_compression = $this->request_compression;
66         $this->client->accepted_compression = $this->accepted_compression;
67     }
68
69     function send($msg, $errrorcode=0, $return_response=false)
70     {
71         $r = $this->client->send($msg, $this->timeout, $this->method);
72         // for multicall, return directly array of responses
73         if(is_array($r))
74         {
75             return $r;
76         }
77         $this->assertEquals($r->faultCode(), $errrorcode, 'Error '.$r->faultCode().' connecting to server: '.$r->faultString());
78         if(!$r->faultCode())
79         {
80             if($return_response)
81                 return $r;
82             else
83                 return $r->value();
84         }
85         else
86         {
87             return null;
88         }
89     }
90
91     function testString()
92     {
93         $sendstring="here are 3 \"entities\": < > & " .
94             "and here's a dollar sign: \$pretendvarname and a backslash too: " . chr(92) .
95             " - isn't that great? \\\"hackery\\\" at it's best " .
96             " also don't want to miss out on \$item[0]. ".
97             "The real weird stuff follows: CRLF here".chr(13).chr(10).
98             "a simple CR here".chr(13).
99             "a simple LF here".chr(10).
100             "and then LFCR".chr(10).chr(13).
101             "last but not least weird names: G".chr(252)."nter, El".chr(232)."ne, and an xml comment closing tag: -->";
102         $f=new xmlrpcmsg('examples.stringecho', array(
103             new xmlrpcval($sendstring, 'string')
104         ));
105         $v=$this->send($f);
106         if($v)
107         {
108             // when sending/receiving non-US-ASCII encoded strings, XML says cr-lf can be normalized.
109             // so we relax our tests...
110             $l1 = strlen($sendstring);
111             $l2 = strlen($v->scalarval());
112             if ($l1 == $l2)
113                 $this->assertEquals($sendstring, $v->scalarval());
114             else
115                 $this->assertEquals(str_replace(array("\r\n", "\r"), array("\n", "\n"), $sendstring), $v->scalarval());
116         }
117     }
118
119     function testAddingDoubles()
120     {
121         // note that rounding errors mean we
122         // keep precision to sensible levels here ;-)
123         $a=12.13; $b=-23.98;
124         $f=new xmlrpcmsg('examples.addtwodouble',array(
125             new xmlrpcval($a, 'double'),
126             new xmlrpcval($b, 'double')
127         ));
128         $v=$this->send($f);
129         if($v)
130         {
131             $this->assertEquals($a+$b,$v->scalarval());
132         }
133     }
134
135     function testAdding()
136     {
137         $f=new xmlrpcmsg('examples.addtwo',array(
138             new xmlrpcval(12, 'int'),
139             new xmlrpcval(-23, 'int')
140         ));
141         $v=$this->send($f);
142         if($v)
143         {
144             $this->assertEquals(12-23, $v->scalarval());
145         }
146     }
147
148     function testInvalidNumber()
149     {
150         $f=new xmlrpcmsg('examples.addtwo',array(
151             new xmlrpcval('fred', 'int'),
152             new xmlrpcval("\"; exec('ls')", 'int')
153         ));
154         $v=$this->send($f);
155         /// @todo a fault condition should be generated here
156         /// by the server, which we pick up on
157         if($v)
158         {
159             $this->assertEquals(0, $v->scalarval());
160         }
161     }
162
163     function testBoolean()
164     {
165         $f=new xmlrpcmsg('examples.invertBooleans', array(
166             new xmlrpcval(array(
167                 new xmlrpcval(true, 'boolean'),
168                 new xmlrpcval(false, 'boolean'),
169                 new xmlrpcval(1, 'boolean'),
170                 new xmlrpcval(0, 'boolean'),
171                 //new xmlrpcval('true', 'boolean'),
172                 //new xmlrpcval('false', 'boolean')
173             ),
174             'array'
175             )));
176         $answer='0101';
177         $v=$this->send($f);
178         if($v)
179         {
180             $sz=$v->arraysize();
181             $got='';
182             for($i=0; $i<$sz; $i++)
183             {
184                 $b=$v->arraymem($i);
185                 if($b->scalarval())
186                 {
187                     $got.='1';
188                 }
189                 else
190                 {
191                     $got.='0';
192                 }
193             }
194             $this->assertEquals($answer, $got);
195         }
196     }
197
198     function testBase64()
199     {
200         $sendstring='Mary had a little lamb,
201 Whose fleece was white as snow,
202 And everywhere that Mary went
203 the lamb was sure to go.
204
205 Mary had a little lamb
206 She tied it to a pylon
207 Ten thousand volts went down its back
208 And turned it into nylon';
209         $f=new xmlrpcmsg('examples.decode64',array(
210             new xmlrpcval($sendstring, 'base64')
211         ));
212         $v=$this->send($f);
213         if($v)
214         {
215             if (strlen($sendstring) == strlen($v->scalarval()))
216                 $this->assertEquals($sendstring, $v->scalarval());
217             else
218                 $this->assertEquals(str_replace(array("\r\n", "\r"), array("\n", "\n"), $sendstring), $v->scalarval());
219         }
220     }
221
222     function testDateTime()
223     {
224         $time = time();
225         $t1 = new xmlrpcval($time, 'dateTime.iso8601');
226         $t2 = new xmlrpcval(iso8601_encode($time), 'dateTime.iso8601');
227         $this->assertEquals($t1->serialize(), $t2->serialize());
228         if (class_exists('DateTime'))
229         {
230             $datetime = new DateTime();
231             // skip this test for php 5.2. It is a bit harder there to build a DateTime from unix timestamp with proper TZ info
232             if(is_callable(array($datetime,'setTimestamp')))
233             {
234                 $t3 = new xmlrpcval($datetime->setTimestamp($time), 'dateTime.iso8601');
235                 $this->assertEquals($t1->serialize(), $t3->serialize());
236             }
237         }
238     }
239
240     function testCountEntities()
241     {
242         $sendstring = "h'fd>onc>>l>>rw&bpu>q>e<v&gxs<ytjzkami<";
243         $f = new xmlrpcmsg('validator1.countTheEntities',array(
244             new xmlrpcval($sendstring, 'string')
245         ));
246         $v = $this->send($f);
247         if($v)
248         {
249             $got = '';
250             $expected = '37210';
251             $expect_array = array('ctLeftAngleBrackets','ctRightAngleBrackets','ctAmpersands','ctApostrophes','ctQuotes');
252             while(list(,$val) = each($expect_array))
253             {
254                 $b = $v->structmem($val);
255                 $got .= $b->me['int'];
256             }
257             $this->assertEquals($expected, $got);
258         }
259     }
260
261     function _multicall_msg($method, $params)
262     {
263         $struct['methodName'] = new xmlrpcval($method, 'string');
264         $struct['params'] = new xmlrpcval($params, 'array');
265         return new xmlrpcval($struct, 'struct');
266     }
267
268     function testServerMulticall()
269     {
270         // We manually construct a system.multicall() call to ensure
271         // that the server supports it.
272
273         // NB: This test will NOT pass if server does not support system.multicall.
274
275         // Based on http://xmlrpc-c.sourceforge.net/hacks/test_multicall.py
276         $good1 = $this->_multicall_msg(
277             'system.methodHelp',
278             array(php_xmlrpc_encode('system.listMethods')));
279         $bad = $this->_multicall_msg(
280             'test.nosuch',
281             array(php_xmlrpc_encode(1), php_xmlrpc_encode(2)));
282         $recursive = $this->_multicall_msg(
283             'system.multicall',
284             array(new xmlrpcval(array(), 'array')));
285         $good2 = $this->_multicall_msg(
286             'system.methodSignature',
287             array(php_xmlrpc_encode('system.listMethods')));
288         $arg = new xmlrpcval(
289             array($good1, $bad, $recursive, $good2),
290             'array'
291         );
292
293         $f = new xmlrpcmsg('system.multicall', array($arg));
294         $v = $this->send($f);
295         if($v)
296         {
297             //$this->assertTrue($r->faultCode() == 0, "fault from system.multicall");
298             $this->assertTrue($v->arraysize() == 4, "bad number of return values");
299
300             $r1 = $v->arraymem(0);
301             $this->assertTrue(
302                 $r1->kindOf() == 'array' && $r1->arraysize() == 1,
303                 "did not get array of size 1 from good1"
304             );
305
306             $r2 = $v->arraymem(1);
307             $this->assertTrue(
308                 $r2->kindOf() == 'struct',
309                 "no fault from bad"
310             );
311
312             $r3 = $v->arraymem(2);
313             $this->assertTrue(
314                 $r3->kindOf() == 'struct',
315                 "recursive system.multicall did not fail"
316             );
317
318             $r4 = $v->arraymem(3);
319             $this->assertTrue(
320                 $r4->kindOf() == 'array' && $r4->arraysize() == 1,
321                 "did not get array of size 1 from good2"
322             );
323         }
324     }
325
326     function testClientMulticall1()
327     {
328         // NB: This test will NOT pass if server does not support system.multicall.
329
330         $this->client->no_multicall = false;
331
332         $good1 = new xmlrpcmsg('system.methodHelp',
333             array(php_xmlrpc_encode('system.listMethods')));
334         $bad = new xmlrpcmsg('test.nosuch',
335             array(php_xmlrpc_encode(1), php_xmlrpc_encode(2)));
336         $recursive = new xmlrpcmsg('system.multicall',
337             array(new xmlrpcval(array(), 'array')));
338         $good2 = new xmlrpcmsg('system.methodSignature',
339             array(php_xmlrpc_encode('system.listMethods'))
340         );
341
342         $r = $this->send(array($good1, $bad, $recursive, $good2));
343         if($r)
344         {
345             $this->assertTrue(count($r) == 4, "wrong number of return values");
346         }
347
348         $this->assertTrue($r[0]->faultCode() == 0, "fault from good1");
349         if(!$r[0]->faultCode())
350         {
351             $val = $r[0]->value();
352             $this->assertTrue(
353                 $val->kindOf() == 'scalar' && $val->scalartyp() == 'string',
354                 "good1 did not return string"
355             );
356         }
357         $this->assertTrue($r[1]->faultCode() != 0, "no fault from bad");
358         $this->assertTrue($r[2]->faultCode() != 0, "no fault from recursive system.multicall");
359         $this->assertTrue($r[3]->faultCode() == 0, "fault from good2");
360         if(!$r[3]->faultCode())
361         {
362             $val = $r[3]->value();
363             $this->assertTrue($val->kindOf() == 'array', "good2 did not return array");
364         }
365         // This is the only assert in this test which should fail
366         // if the test server does not support system.multicall.
367         $this->assertTrue($this->client->no_multicall == false,
368             "server does not support system.multicall"
369         );
370     }
371
372     function testClientMulticall2()
373     {
374         // NB: This test will NOT pass if server does not support system.multicall.
375
376         $this->client->no_multicall = true;
377
378         $good1 = new xmlrpcmsg('system.methodHelp',
379             array(php_xmlrpc_encode('system.listMethods')));
380         $bad = new xmlrpcmsg('test.nosuch',
381             array(php_xmlrpc_encode(1), php_xmlrpc_encode(2)));
382         $recursive = new xmlrpcmsg('system.multicall',
383             array(new xmlrpcval(array(), 'array')));
384         $good2 = new xmlrpcmsg('system.methodSignature',
385             array(php_xmlrpc_encode('system.listMethods'))
386         );
387
388         $r = $this->send(array($good1, $bad, $recursive, $good2));
389         if($r)
390         {
391             $this->assertTrue(count($r) == 4, "wrong number of return values");
392         }
393
394         $this->assertTrue($r[0]->faultCode() == 0, "fault from good1");
395         if(!$r[0]->faultCode())
396         {
397             $val = $r[0]->value();
398             $this->assertTrue(
399                 $val->kindOf() == 'scalar' && $val->scalartyp() == 'string',
400                 "good1 did not return string");
401         }
402         $this->assertTrue($r[1]->faultCode() != 0, "no fault from bad");
403         $this->assertTrue($r[2]->faultCode() == 0, "fault from (non recursive) system.multicall");
404         $this->assertTrue($r[3]->faultCode() == 0, "fault from good2");
405         if(!$r[3]->faultCode())
406         {
407             $val = $r[3]->value();
408             $this->assertTrue($val->kindOf() == 'array', "good2 did not return array");
409         }
410     }
411
412     function testClientMulticall3()
413     {
414         // NB: This test will NOT pass if server does not support system.multicall.
415
416         $this->client->return_type = 'phpvals';
417         $this->client->no_multicall = false;
418
419         $good1 = new xmlrpcmsg('system.methodHelp',
420             array(php_xmlrpc_encode('system.listMethods')));
421         $bad = new xmlrpcmsg('test.nosuch',
422             array(php_xmlrpc_encode(1), php_xmlrpc_encode(2)));
423         $recursive = new xmlrpcmsg('system.multicall',
424             array(new xmlrpcval(array(), 'array')));
425         $good2 = new xmlrpcmsg('system.methodSignature',
426             array(php_xmlrpc_encode('system.listMethods'))
427         );
428
429         $r = $this->send(array($good1, $bad, $recursive, $good2));
430         if($r)
431         {
432             $this->assertTrue(count($r) == 4, "wrong number of return values");
433         }
434         $this->assertTrue($r[0]->faultCode() == 0, "fault from good1");
435         if(!$r[0]->faultCode())
436         {
437             $val = $r[0]->value();
438             $this->assertTrue(
439                 is_string($val) , "good1 did not return string");
440         }
441         $this->assertTrue($r[1]->faultCode() != 0, "no fault from bad");
442         $this->assertTrue($r[2]->faultCode() != 0, "no fault from recursive system.multicall");
443         $this->assertTrue($r[3]->faultCode() == 0, "fault from good2");
444         if(!$r[3]->faultCode())
445         {
446             $val = $r[3]->value();
447             $this->assertTrue(is_array($val), "good2 did not return array");
448         }
449         $this->client->return_type = 'xmlrpcvals';
450     }
451
452     function testCatchWarnings()
453     {
454         $f = new xmlrpcmsg('examples.generatePHPWarning', array(
455             new xmlrpcval('whatever', 'string')
456         ));
457         $v = $this->send($f);
458         if($v)
459         {
460             $this->assertEquals($v->scalarval(), true);
461         }
462     }
463
464     function testCatchExceptions()
465     {
466         global $URI;
467         $f = new xmlrpcmsg('examples.raiseException', array(
468             new xmlrpcval('whatever', 'string')
469         ));
470         $v = $this->send($f, $GLOBALS['xmlrpcerr']['server_error']);
471         $this->client->path = $URI.'?EXCEPTION_HANDLING=1';
472         $v = $this->send($f, 1);
473         $this->client->path = $URI.'?EXCEPTION_HANDLING=2';
474         $v = $this->send($f, $GLOBALS['xmlrpcerr']['invalid_return']);
475     }
476
477     function testZeroParams()
478     {
479         $f = new xmlrpcmsg('system.listMethods');
480         $v = $this->send($f);
481     }
482
483     function testCodeInjectionServerSide()
484     {
485         $f = new xmlrpcmsg('system.MethodHelp');
486         $f->payload = "<?xml version=\"1.0\"?><methodCall><methodName>validator1.echoStructTest</methodName><params><param><value><struct><member><name>','')); echo('gotcha!'); die(); //</name></member></struct></value></param></params></methodCall>";
487         $v = $this->send($f);
488         //$v = $r->faultCode();
489         if ($v)
490         {
491             $this->assertEquals(0, $v->structsize());
492         }
493     }
494
495     function testAutoRegisteredFunction()
496     {
497         $f=new xmlrpcmsg('examples.php.getStateName',array(
498             new xmlrpcval(23, 'int')
499         ));
500         $v=$this->send($f);
501         if($v)
502         {
503             $this->assertEquals('Michigan', $v->scalarval());
504         }
505         else
506         {
507             $this->fail('Note: server can only auto register functions if running with PHP 5.0.3 and up');
508         }
509     }
510
511     function testAutoRegisteredClass()
512     {
513         $f=new xmlrpcmsg('examples.php2.getStateName',array(
514             new xmlrpcval(23, 'int')
515         ));
516         $v=$this->send($f);
517         if($v)
518         {
519             $this->assertEquals('Michigan', $v->scalarval());
520             $f=new xmlrpcmsg('examples.php3.getStateName',array(
521             new xmlrpcval(23, 'int')
522         ));
523             $v=$this->send($f);
524             if($v)
525             {
526                 $this->assertEquals('Michigan', $v->scalarval());
527             }
528         }
529         else
530         {
531             $this->fail('Note: server can only auto register class methods if running with PHP 5.0.3 and up');
532         }
533     }
534
535     function testAutoRegisteredMethod()
536     {
537         // make a 'deep client copy' as the original one might have many properties set
538         $func=wrap_xmlrpc_method($this->client, 'examples.getStateName', array('simple_client_copy' => 1));
539         if($func == '')
540         {
541             $this->fail('Registration of examples.getStateName failed');
542         }
543         else
544         {
545             $v=$func(23);
546             // work around bug in current version of phpunit
547             if(is_object($v))
548             {
549                 $v = var_export($v, true);
550             }
551             $this->assertEquals('Michigan', $v);
552         }
553     }
554
555     function testGetCookies()
556     {
557         // let server set to us some cookies we tell it
558         $cookies = array(
559             //'c1' => array(),
560             'c2' => array('value' => 'c2'),
561             'c3' => array('value' => 'c3', 'expires' => time()+60*60*24*30),
562             'c4' => array('value' => 'c4', 'expires' => time()+60*60*24*30, 'path' => '/'),
563             'c5' => array('value' => 'c5', 'expires' => time()+60*60*24*30, 'path' => '/', 'domain' => 'localhost'),
564         );
565         $cookiesval = php_xmlrpc_encode($cookies);
566         $f=new xmlrpcmsg('examples.setcookies',array($cookiesval));
567         $r=$this->send($f, 0, true);
568         if($r)
569         {
570             $v = $r->value();
571             $this->assertEquals(1, $v->scalarval());
572             // now check if we decoded the cookies as we had set them
573             $rcookies = $r->cookies();
574             // remove extra cookies which might have been set by proxies
575             foreach($rcookies as $c => $v)
576             {
577                 if(!in_array($c, array('c2', 'c3', 'c4', 'c5')))
578                     unset($rcookies[$c]);
579                 // Seems like we get this when using php-fpm and php 5.5+ ...
580                 if (isset($rcookies[$c]['Max-Age']))
581                 {
582                     unset($rcookies[$c]['Max-Age']);
583                 }
584             }
585             foreach($cookies as $c => $v)
586                 // format for date string in cookies: 'Mon, 31 Oct 2005 13:50:56 GMT'
587                 // but PHP versions differ on that, some use 'Mon, 31-Oct-2005 13:50:56 GMT'...
588                 if(isset($v['expires']))
589                 {
590                     if (isset($rcookies[$c]['expires']) && strpos($rcookies[$c]['expires'], '-'))
591                     {
592                         $cookies[$c]['expires'] = gmdate('D, d\-M\-Y H:i:s \G\M\T' ,$cookies[$c]['expires']);
593                     }
594                     else
595                     {
596                         $cookies[$c]['expires'] = gmdate('D, d M Y H:i:s \G\M\T' ,$cookies[$c]['expires']);
597                     }
598                 }
599             $this->assertEquals($cookies, $rcookies);
600         }
601     }
602
603     function testSetCookies()
604     {
605         // let server set to us some cookies we tell it
606         $cookies = array(
607             'c0' => null,
608             'c1' => 1,
609             'c2' => '2 3',
610             'c3' => '!@#$%^&*()_+|}{":?><,./\';[]\\=-'
611         );
612         $f=new xmlrpcmsg('examples.getcookies',array());
613         foreach ($cookies as $cookie => $val)
614         {
615             $this->client->setCookie($cookie, $val);
616             $cookies[$cookie] = (string) $cookies[$cookie];
617         }
618         $r = $this->client->send($f, $this->timeout, $this->method);
619         $this->assertEquals($r->faultCode(), 0, 'Error '.$r->faultCode().' connecting to server: '.$r->faultString());
620         if(!$r->faultCode())
621         {
622             $v = $r->value();
623             $v = php_xmlrpc_decode($v);
624             // on IIS and Apache getallheaders returns something slightly different...
625             $this->assertEquals($v, $cookies);
626         }
627     }
628
629     function testSendTwiceSameMsg()
630     {
631         $f=new xmlrpcmsg('examples.stringecho', array(
632             new xmlrpcval('hello world', 'string')
633         ));
634         $v1 = $this->send($f);
635         $v2 = $this->send($f);
636         //$v = $r->faultCode();
637         if ($v1 && $v2)
638         {
639             $this->assertEquals($v2, $v1);
640         }
641     }
642 }
643
644 class LocalHostMultiTests extends LocalhostTests
645 {
646     function _runtests()
647     {
648         global $failed_tests;
649         foreach(get_class_methods('LocalhostTests') as $meth)
650         {
651             if(strpos($meth, 'test') === 0 && $meth != 'testHttps' && $meth != 'testCatchExceptions')
652             {
653                 if (!isset($failed_tests[$meth]))
654                 {
655                     $this->$meth();
656                 }
657             }
658             if ($this->_failed)
659             {
660                 break;
661             }
662         }
663     }
664
665     function testDeflate()
666     {
667         if(!function_exists('gzdeflate'))
668         {
669             $this->fail('Zlib missing: cannot test deflate functionality');
670             return;
671         }
672         $this->client->accepted_compression = array('deflate');
673         $this->client->request_compression = 'deflate';
674         $this->_runtests();
675     }
676
677     function testGzip()
678     {
679         if(!function_exists('gzdeflate'))
680         {
681             $this->fail('Zlib missing: cannot test gzip functionality');
682             return;
683         }
684         $this->client->accepted_compression = array('gzip');
685         $this->client->request_compression = 'gzip';
686         $this->_runtests();
687     }
688
689     function testKeepAlives()
690     {
691         if(!function_exists('curl_init'))
692         {
693             $this->fail('CURL missing: cannot test http 1.1');
694             return;
695         }
696         $this->method = 'http11';
697         $this->client->keepalive = true;
698         $this->_runtests();
699     }
700
701     function testProxy()
702     {
703         global $PROXYSERVER, $PROXYPORT, $NOPROXY;
704         if ($PROXYSERVER)
705         {
706             $this->client->setProxy($PROXYSERVER, $PROXYPORT);
707             $this->_runtests();
708         }
709         else
710             if (!$NOPROXY)
711                 $this->fail('PROXY definition missing: cannot test proxy');
712     }
713
714     function testHttp11()
715     {
716         if(!function_exists('curl_init'))
717         {
718             $this->fail('CURL missing: cannot test http 1.1');
719             return;
720         }
721         $this->method = 'http11'; // not an error the double assignment!
722         $this->client->method = 'http11';
723         //$this->client->verifyhost = 0;
724         //$this->client->verifypeer = 0;
725         $this->client->keepalive = false;
726         $this->_runtests();
727     }
728
729     function testHttp11Gzip()
730     {
731         if(!function_exists('curl_init'))
732         {
733             $this->fail('CURL missing: cannot test http 1.1');
734             return;
735         }
736         $this->method = 'http11'; // not an error the double assignment!
737         $this->client->method = 'http11';
738         $this->client->keepalive = false;
739         $this->client->accepted_compression = array('gzip');
740         $this->client->request_compression = 'gzip';
741         $this->_runtests();
742     }
743
744     function testHttp11Deflate()
745     {
746         if(!function_exists('curl_init'))
747         {
748             $this->fail('CURL missing: cannot test http 1.1');
749             return;
750         }
751         $this->method = 'http11'; // not an error the double assignment!
752         $this->client->method = 'http11';
753         $this->client->keepalive = false;
754         $this->client->accepted_compression = array('deflate');
755         $this->client->request_compression = 'deflate';
756         $this->_runtests();
757     }
758
759     function testHttp11Proxy()
760     {
761         global $PROXYSERVER, $PROXYPORT, $NOPROXY;
762         if(!function_exists('curl_init'))
763         {
764             $this->fail('CURL missing: cannot test http 1.1 w. proxy');
765             return;
766         }
767         else if ($PROXYSERVER == '')
768         {
769             if (!$NOPROXY)
770                 $this->fail('PROXY definition missing: cannot test proxy w. http 1.1');
771             return;
772         }
773         $this->method = 'http11'; // not an error the double assignment!
774         $this->client->method = 'http11';
775         $this->client->setProxy($PROXYSERVER, $PROXYPORT);
776         //$this->client->verifyhost = 0;
777         //$this->client->verifypeer = 0;
778         $this->client->keepalive = false;
779         $this->_runtests();
780     }
781
782     function testHttps()
783     {
784         global $HTTPSSERVER, $HTTPSURI, $HTTPSIGNOREPEER, $HTTPSVERIFYHOST;
785         if(!function_exists('curl_init'))
786         {
787             $this->fail('CURL missing: cannot test https functionality');
788             return;
789         }
790         $this->client->server = $HTTPSSERVER;
791         $this->method = 'https';
792         $this->client->method = 'https';
793         $this->client->path = $HTTPSURI;
794         $this->client->setSSLVerifyPeer(!$HTTPSIGNOREPEER);
795         $this->client->setSSLVerifyHost($HTTPSVERIFYHOST);
796         $this->client->setSSLVersion($SSLVERSION);
797         $this->_runtests();
798     }
799
800     function testHttpsProxy()
801     {
802         global $HTTPSSERVER, $HTTPSURI, $HTTPSIGNOREPEER, $HTTPSVERIFYHOST, $PROXYSERVER, $PROXYPORT, $NOPROXY;
803         if(!function_exists('curl_init'))
804         {
805             $this->fail('CURL missing: cannot test https functionality');
806             return;
807         }
808         else if ($PROXYSERVER == '')
809         {
810             if (!$NOPROXY)
811                 $this->fail('PROXY definition missing: cannot test proxy w. http 1.1');
812             return;
813         }
814         $this->client->server = $HTTPSSERVER;
815         $this->method = 'https';
816         $this->client->method = 'https';
817         $this->client->setProxy($PROXYSERVER, $PROXYPORT);
818         $this->client->path = $HTTPSURI;
819         $this->client->setSSLVerifyPeer(!$HTTPSIGNOREPEER);
820         $this->client->setSSLVerifyHost($HTTPSVERIFYHOST);
821         $this->client->setSSLVersion($SSLVERSION);
822         $this->_runtests();
823     }
824
825     function testUTF8Responses()
826     {
827         global $URI;
828         //$this->client->path = strpos($URI, '?') === null ? $URI.'?RESPONSE_ENCODING=UTF-8' : $URI.'&RESPONSE_ENCODING=UTF-8';
829         $this->client->path = $URI.'?RESPONSE_ENCODING=UTF-8';
830         $this->_runtests();
831     }
832
833     function testUTF8Requests()
834     {
835         $this->client->request_charset_encoding = 'UTF-8';
836         $this->_runtests();
837     }
838
839     function testISOResponses()
840     {
841         global $URI;
842         //$this->client->path = strpos($URI, '?') === null ? $URI.'?RESPONSE_ENCODING=UTF-8' : $URI.'&RESPONSE_ENCODING=UTF-8';
843         $this->client->path = $URI.'?RESPONSE_ENCODING=ISO-8859-1';
844         $this->_runtests();
845     }
846
847     function testISORequests()
848     {
849         $this->client->request_charset_encoding = 'ISO-8859-1';
850         $this->_runtests();
851     }
852 }
853
854 class ParsingBugsTests extends PHPUnit_TestCase
855 {
856     function testMinusOneString()
857     {
858         $v=new xmlrpcval('-1');
859         $u=new xmlrpcval('-1', 'string');
860         $this->assertEquals($u->scalarval(), $v->scalarval());
861     }
862
863     function testUnicodeInMemberName(){
864         $str = "G".chr(252)."nter, El".chr(232)."ne";
865         $v = array($str => new xmlrpcval(1));
866         $r = new xmlrpcresp(new xmlrpcval($v, 'struct'));
867         $r = $r->serialize();
868         $m = new xmlrpcmsg('dummy');
869         $r = $m->parseResponse($r);
870         $v = $r->value();
871         $this->assertEquals($v->structmemexists($str), true);
872     }
873
874     function testUnicodeInErrorString()
875     {
876         $response = utf8_encode(
877 '<?xml version="1.0"?>
878 <!-- $Id -->
879 <!-- found by G. giunta, covers what happens when lib receives
880   UTF8 chars in response text and comments -->
881 <!-- ï¿½ï¿½ï¿½&#224;&#252;&#232; -->
882 <methodResponse>
883 <fault>
884 <value>
885 <struct>
886 <member>
887 <name>faultCode</name>
888 <value><int>888</int></value>
889 </member>
890 <member>
891 <name>faultString</name>
892 <value><string>���&#224;&#252;&#232;</string></value>
893 </member>
894 </struct>
895 </value>
896 </fault>
897 </methodResponse>');
898         $m=new xmlrpcmsg('dummy');
899         $r=$m->parseResponse($response);
900         $v=$r->faultString();
901         $this->assertEquals('������', $v);
902     }
903
904     function testValidNumbers()
905     {
906         $m=new xmlrpcmsg('dummy');
907         $fp=
908 '<?xml version="1.0"?>
909 <methodResponse>
910 <params>
911 <param>
912 <value>
913 <struct>
914 <member>
915 <name>integer1</name>
916 <value><int>01</int></value>
917 </member>
918 <member>
919 <name>float1</name>
920 <value><double>01.10</double></value>
921 </member>
922 <member>
923 <name>integer2</name>
924 <value><int>+1</int></value>
925 </member>
926 <member>
927 <name>float2</name>
928 <value><double>+1.10</double></value>
929 </member>
930 <member>
931 <name>float3</name>
932 <value><double>-1.10e2</double></value>
933 </member>
934 </struct>
935 </value>
936 </param>
937 </params>
938 </methodResponse>';
939         $r=$m->parseResponse($fp);
940         $v=$r->value();
941         $s=$v->structmem('integer1');
942         $t=$v->structmem('float1');
943         $u=$v->structmem('integer2');
944         $w=$v->structmem('float2');
945         $x=$v->structmem('float3');
946         $this->assertEquals(1, $s->scalarval());
947         $this->assertEquals(1.1, $t->scalarval());
948         $this->assertEquals(1, $u->scalarval());
949         $this->assertEquals(1.1, $w->scalarval());
950         $this->assertEquals(-110.0, $x->scalarval());
951     }
952
953     function testAddScalarToStruct()
954     {
955         $v=new xmlrpcval(array('a' => 'b'), 'struct');
956         // use @ operator in case error_log gets on screen
957         $r= @$v->addscalar('c');
958         $this->assertEquals(0, $r);
959     }
960
961     function testAddStructToStruct()
962     {
963         $v=new xmlrpcval(array('a' => new xmlrpcval('b')), 'struct');
964         $r=$v->addstruct(array('b' => new xmlrpcval('c')));
965         $this->assertEquals(2, $v->structsize());
966         $this->assertEquals(1, $r);
967         $r=$v->addstruct(array('b' => new xmlrpcval('b')));
968         $this->assertEquals(2, $v->structsize());
969     }
970
971     function testAddArrayToArray()
972     {
973         $v=new xmlrpcval(array(new xmlrpcval('a'), new xmlrpcval('b')), 'array');
974         $r=$v->addarray(array(new xmlrpcval('b'), new xmlrpcval('c')));
975         $this->assertEquals(4, $v->arraysize());
976         $this->assertEquals(1, $r);
977     }
978
979     function testEncodeArray()
980     {
981         $r=range(1, 100);
982         $v = php_xmlrpc_encode($r);
983         $this->assertEquals('array', $v->kindof());
984     }
985
986     function testEncodeRecursive()
987     {
988         $v = php_xmlrpc_encode(php_xmlrpc_encode('a simple string'));
989         $this->assertEquals('scalar', $v->kindof());
990     }
991
992     function testBrokenRequests()
993     {
994         $s = new xmlrpc_server();
995         // omitting the 'params' tag: not tolerated by the lib anymore
996 $f = '<?xml version="1.0"?>
997 <methodCall>
998 <methodName>system.methodHelp</methodName>
999 <param>
1000 <value><string>system.methodHelp</string></value>
1001 </param>
1002 </methodCall>';
1003         $r = $s->parserequest($f);
1004         $this->assertEquals(15, $r->faultCode());
1005         // omitting a 'param' tag
1006 $f = '<?xml version="1.0"?>
1007 <methodCall>
1008 <methodName>system.methodHelp</methodName>
1009 <params>
1010 <value><string>system.methodHelp</string></value>
1011 </params>
1012 </methodCall>';
1013         $r = $s->parserequest($f);
1014         $this->assertEquals(15, $r->faultCode());
1015         // omitting a 'value' tag
1016 $f = '<?xml version="1.0"?>
1017 <methodCall>
1018 <methodName>system.methodHelp</methodName>
1019 <params>
1020 <param><string>system.methodHelp</string></param>
1021 </params>
1022 </methodCall>';
1023         $r = $s->parserequest($f);
1024         $this->assertEquals(15, $r->faultCode());
1025     }
1026
1027     function testBrokenResponses()
1028     {
1029         $m=new xmlrpcmsg('dummy');
1030         //$m->debug = 1;
1031         // omitting the 'params' tag: no more tolerated by the lib...
1032 $f = '<?xml version="1.0"?>
1033 <methodResponse>
1034 <param>
1035 <value><string>system.methodHelp</string></value>
1036 </param>
1037 </methodResponse>';
1038         $r = $m->parseResponse($f);
1039         $this->assertEquals(2, $r->faultCode());
1040         // omitting the 'param' tag: no more tolerated by the lib...
1041 $f = '<?xml version="1.0"?>
1042 <methodResponse>
1043 <params>
1044 <value><string>system.methodHelp</string></value>
1045 </params>
1046 </methodResponse>';
1047         $r = $m->parseResponse($f);
1048         $this->assertEquals(2, $r->faultCode());
1049         // omitting a 'value' tag: KO
1050 $f = '<?xml version="1.0"?>
1051 <methodResponse>
1052 <params>
1053 <param><string>system.methodHelp</string></param>
1054 </params>
1055 </methodResponse>';
1056         $r = $m->parseResponse($f);
1057         $this->assertEquals(2, $r->faultCode());
1058     }
1059
1060     function testBuggyHttp()
1061     {
1062         $s = new xmlrpcmsg('dummy');
1063 $f = 'HTTP/1.1 100 Welcome to the jungle
1064
1065 HTTP/1.0 200 OK
1066 X-Content-Marx-Brothers: Harpo
1067         Chico and Groucho
1068 Content-Length: who knows?
1069
1070
1071
1072 <?xml version="1.0"?>
1073 <!-- First of all, let\'s check out if the lib properly handles a commented </methodResponse> tag... -->
1074 <methodResponse><params><param><value><struct><member><name>userid</name><value>311127</value></member>
1075 <member><name>dateCreated</name><value><dateTime.iso8601>20011126T09:17:52</dateTime.iso8601></value></member><member><name>content</name><value>hello world. 2 newlines follow
1076
1077
1078 and there they were.</value></member><member><name>postid</name><value>7414222</value></member></struct></value></param></params></methodResponse>
1079 <script type="text\javascript">document.write(\'Hello, my name is added nag, I\\\'m happy to serve your content for free\');</script>
1080  ';
1081         $r = $s->parseResponse($f);
1082         $v = $r->value();
1083         $s = $v->structmem('content');
1084         $this->assertEquals("hello world. 2 newlines follow\n\n\nand there they were.", $s->scalarval());
1085     }
1086
1087     function testStringBug()
1088     {
1089         $s = new xmlrpcmsg('dummy');
1090 $f = '<?xml version="1.0"?>
1091 <!-- $Id -->
1092 <!-- found by 2z69xks7bpy001@sneakemail.com, amongst others
1093  covers what happens when there\'s character data after </string>
1094  and before </value> -->
1095 <methodResponse>
1096 <params>
1097 <param>
1098 <value>
1099 <struct>
1100 <member>
1101 <name>success</name>
1102 <value>
1103 <boolean>1</boolean>
1104 </value>
1105 </member>
1106 <member>
1107 <name>sessionID</name>
1108 <value>
1109 <string>S300510007I</string>
1110 </value>
1111 </member>
1112 </struct>
1113 </value>
1114 </param>
1115 </params>
1116 </methodResponse> ';
1117         $r = $s->parseResponse($f);
1118         $v = $r->value();
1119         $s = $v->structmem('sessionID');
1120         $this->assertEquals('S300510007I', $s->scalarval());
1121     }
1122
1123     function testWhiteSpace()
1124     {
1125         $s = new xmlrpcmsg('dummy');
1126 $f = '<?xml version="1.0"?><methodResponse><params><param><value><struct><member><name>userid</name><value>311127</value></member>
1127 <member><name>dateCreated</name><value><dateTime.iso8601>20011126T09:17:52</dateTime.iso8601></value></member><member><name>content</name><value>hello world. 2 newlines follow
1128
1129
1130 and there they were.</value></member><member><name>postid</name><value>7414222</value></member></struct></value></param></params></methodResponse>
1131 ';
1132         $r = $s->parseResponse($f);
1133         $v = $r->value();
1134         $s = $v->structmem('content');
1135         $this->assertEquals("hello world. 2 newlines follow\n\n\nand there they were.", $s->scalarval());
1136     }
1137
1138     function testDoubleDataInArrayTag()
1139     {
1140         $s = new xmlrpcmsg('dummy');
1141 $f = '<?xml version="1.0"?><methodResponse><params><param><value><array>
1142 <data></data>
1143 <data></data>
1144 </array></value></param></params></methodResponse>
1145 ';
1146         $r = $s->parseResponse($f);
1147         $v = $r->faultCode();
1148         $this->assertEquals(2, $v);
1149 $f = '<?xml version="1.0"?><methodResponse><params><param><value><array>
1150 <data><value>Hello world</value></data>
1151 <data></data>
1152 </array></value></param></params></methodResponse>
1153 ';
1154         $r = $s->parseResponse($f);
1155         $v = $r->faultCode();
1156         $this->assertEquals(2, $v);
1157     }
1158
1159     function testDoubleStuffInValueTag()
1160     {
1161         $s = new xmlrpcmsg('dummy');
1162 $f = '<?xml version="1.0"?><methodResponse><params><param><value>
1163 <string>hello world</string>
1164 <array><data></data></array>
1165 </value></param></params></methodResponse>
1166 ';
1167         $r = $s->parseResponse($f);
1168         $v = $r->faultCode();
1169         $this->assertEquals(2, $v);
1170 $f = '<?xml version="1.0"?><methodResponse><params><param><value>
1171 <string>hello</string>
1172 <string>world</string>
1173 </value></param></params></methodResponse>
1174 ';
1175         $r = $s->parseResponse($f);
1176         $v = $r->faultCode();
1177         $this->assertEquals(2, $v);
1178 $f = '<?xml version="1.0"?><methodResponse><params><param><value>
1179 <string>hello</string>
1180 <struct><member><name>hello><value>world</value></member></struct>
1181 </value></param></params></methodResponse>
1182 ';
1183         $r = $s->parseResponse($f);
1184         $v = $r->faultCode();
1185         $this->assertEquals(2, $v);
1186     }
1187
1188     function testAutodecodeResponse()
1189     {
1190         $s = new xmlrpcmsg('dummy');
1191 $f = '<?xml version="1.0"?><methodResponse><params><param><value><struct><member><name>userid</name><value>311127</value></member>
1192 <member><name>dateCreated</name><value><dateTime.iso8601>20011126T09:17:52</dateTime.iso8601></value></member><member><name>content</name><value>hello world. 2 newlines follow
1193
1194
1195 and there they were.</value></member><member><name>postid</name><value>7414222</value></member></struct></value></param></params></methodResponse>
1196 ';
1197         $r = $s->parseResponse($f, true, 'phpvals');
1198         $v = $r->value();
1199         $s = $v['content'];
1200         $this->assertEquals("hello world. 2 newlines follow\n\n\nand there they were.", $s);
1201     }
1202
1203     function testNoDecodeResponse()
1204     {
1205         $s = new xmlrpcmsg('dummy');
1206 $f = '<?xml version="1.0"?><methodResponse><params><param><value><struct><member><name>userid</name><value>311127</value></member>
1207 <member><name>dateCreated</name><value><dateTime.iso8601>20011126T09:17:52</dateTime.iso8601></value></member><member><name>content</name><value>hello world. 2 newlines follow
1208
1209
1210 and there they were.</value></member><member><name>postid</name><value>7414222</value></member></struct></value></param></params></methodResponse>';
1211         $r = $s->parseResponse($f, true, 'xml');
1212         $v = $r->value();
1213         $this->assertEquals($f, $v);
1214     }
1215
1216     function testAutoCoDec()
1217     {
1218         $data1 = array(1, 1.0, 'hello world', true, '20051021T23:43:00', -1, 11.0, '~!@#$%^&*()_+|', false, '20051021T23:43:00');
1219         $data2 = array('zero' => $data1, 'one' => $data1, 'two' => $data1, 'three' => $data1, 'four' => $data1, 'five' => $data1, 'six' => $data1, 'seven' => $data1, 'eight' => $data1, 'nine' => $data1);
1220         $data = array($data2, $data2, $data2, $data2, $data2, $data2, $data2, $data2, $data2, $data2);
1221         //$keys = array('zero', 'one', 'two', 'three', 'four', 'five', 'six', 'seven', 'eight', 'nine');
1222         $v1 = php_xmlrpc_encode($data, array('auto_dates'));
1223         $v2 = php_xmlrpc_decode_xml($v1->serialize());
1224         $this->assertEquals($v1, $v2);
1225         $r1 = new xmlrpcresp($v1);
1226         $r2 = php_xmlrpc_decode_xml($r1->serialize());
1227         $r2->serialize(); // needed to set internal member payload
1228         $this->assertEquals($r1, $r2);
1229         $m1 = new xmlrpcmsg('hello dolly', array($v1));
1230         $m2 = php_xmlrpc_decode_xml($m1->serialize());
1231         $m2->serialize(); // needed to set internal member payload
1232         $this->assertEquals($m1, $m2);
1233     }
1234
1235     function testUTF8Request()
1236     {
1237         $sendstring='κόσμε'; // Greek word 'kosme'. NB: NOT a valid ISO8859 string!
1238         $GLOBALS['xmlrpc_internalencoding'] = 'UTF-8';
1239         $f = new xmlrpcval($sendstring, 'string');
1240         $v=$f->serialize();
1241         $this->assertEquals("<value><string>&#954;&#8057;&#963;&#956;&#949;</string></value>\n", $v);
1242         $GLOBALS['xmlrpc_internalencoding'] = 'ISO-8859-1';
1243     }
1244
1245     function testUTF8Response()
1246     {
1247         $s = new xmlrpcmsg('dummy');
1248 $f = "HTTP/1.1 200 OK\r\nContent-type: text/xml; charset=UTF-8\r\n\r\n".'<?xml version="1.0"?><methodResponse><params><param><value><struct><member><name>userid</name><value>311127</value></member>
1249 <member><name>dateCreated</name><value><dateTime.iso8601>20011126T09:17:52</dateTime.iso8601></value></member><member><name>content</name><value>'.utf8_encode('������').'</value></member><member><name>postid</name><value>7414222</value></member></struct></value></param></params></methodResponse>
1250 ';
1251         $r = $s->parseResponse($f, false, 'phpvals');
1252         $v = $r->value();
1253         $v = $v['content'];
1254         $this->assertEquals("������", $v);
1255 $f = '<?xml version="1.0" encoding="utf-8"?><methodResponse><params><param><value><struct><member><name>userid</name><value>311127</value></member>
1256 <member><name>dateCreated</name><value><dateTime.iso8601>20011126T09:17:52</dateTime.iso8601></value></member><member><name>content</name><value>'.utf8_encode('������').'</value></member><member><name>postid</name><value>7414222</value></member></struct></value></param></params></methodResponse>
1257 ';
1258         $r = $s->parseResponse($f, false, 'phpvals');
1259         $v = $r->value();
1260         $v = $v['content'];
1261         $this->assertEquals("������", $v);
1262     }
1263
1264     function testUTF8IntString()
1265     {
1266         $v=new xmlrpcval(100, 'int');
1267         $s=$v->serialize('UTF-8');
1268         $this->assertequals("<value><int>100</int></value>\n", $s);
1269     }
1270
1271     function testStringInt()
1272     {
1273         $v=new xmlrpcval('hello world', 'int');
1274         $s=$v->serialize();
1275         $this->assertequals("<value><int>0</int></value>\n", $s);
1276     }
1277
1278     function testStructMemExists()
1279     {
1280         $v=php_xmlrpc_encode(array('hello' => 'world'));
1281         $b=$v->structmemexists('hello');
1282         $this->assertequals(true, $b);
1283         $b=$v->structmemexists('world');
1284         $this->assertequals(false, $b);
1285     }
1286
1287     function testNilvalue()
1288     {
1289         // default case: we do not accept nil values received
1290         $v = new xmlrpcval('hello', 'null');
1291         $r = new xmlrpcresp($v);
1292         $s = $r->serialize();
1293         $m = new xmlrpcmsg('dummy');
1294         $r = $m->parseresponse($s);
1295         $this->assertequals(2, $r->faultCode());
1296         // enable reception of nil values
1297         $GLOBALS['xmlrpc_null_extension'] = true;
1298         $r = $m->parseresponse($s);
1299         $v = $r->value();
1300         $this->assertequals('null', $v->scalartyp());
1301         // test with the apache version: EX:NIL
1302         $GLOBALS['xmlrpc_null_apache_encoding'] = true;
1303         // serialization
1304         $v = new xmlrpcval('hello', 'null');
1305         $s = $v->serialize();
1306         $this->assertequals(1, preg_match( '#<value><ex:nil/></value>#', $s ));
1307         // deserialization
1308         $r = new xmlrpcresp($v);
1309         $s = $r->serialize();
1310         $r = $m->parseresponse($s);
1311         $v = $r->value();
1312         $this->assertequals('null', $v->scalartyp());
1313         $GLOBALS['xmlrpc_null_extension'] = false;
1314         $r = $m->parseresponse($s);
1315         $this->assertequals(2, $r->faultCode());
1316     }
1317
1318     function TestLocale()
1319     {
1320         $locale = setlocale(LC_NUMERIC, 0);
1321         /// @todo on php 5.3/win setting locale to german does not seem to set decimal separator to comma...
1322         if (setlocale(LC_NUMERIC,'deu', 'de_DE@euro', 'de_DE', 'de', 'ge') !== false)
1323         {
1324             $v = new xmlrpcval(1.1, 'double');
1325             if (strpos($v->scalarval(), ',') == 1)
1326             {
1327                 $r = $v->serialize();
1328                 $this->assertequals(false, strpos($r, ','));
1329             }
1330             setlocale(LC_NUMERIC, $locale);
1331         }
1332     }
1333 }
1334
1335 class InvalidHostTests extends PHPUnit_TestCase
1336 {
1337     var $client = null;
1338
1339     function setUp()
1340     {
1341         global $DEBUG,$LOCALSERVER;
1342         $this->client=new xmlrpc_client('/NOTEXIST.php', $LOCALSERVER, 80);
1343         if($DEBUG)
1344         {
1345             $this->client->setDebug($DEBUG);
1346         }
1347     }
1348
1349     function test404()
1350     {
1351         $f = new xmlrpcmsg('examples.echo',array(
1352             new xmlrpcval('hello', 'string')
1353         ));
1354         $r = $this->client->send($f, 5);
1355         $this->assertEquals(5, $r->faultCode());
1356     }
1357
1358     function testSrvNotFound()
1359     {
1360         $f = new xmlrpcmsg('examples.echo',array(
1361             new xmlrpcval('hello', 'string')
1362         ));
1363         $this->client->server .= 'XXX';
1364         $r = $this->client->send($f, 5);
1365         $this->assertEquals(5, $r->faultCode());
1366     }
1367
1368     function testCurlKAErr()
1369     {
1370         global $LOCALSERVER, $URI;
1371         if(!function_exists('curl_init'))
1372         {
1373             $this->fail('CURL missing: cannot test curl keepalive errors');
1374             return;
1375         }
1376         $f = new xmlrpcmsg('examples.stringecho',array(
1377             new xmlrpcval('hello', 'string')
1378         ));
1379         // test 2 calls w. keepalive: 1st time connection ko, second time ok
1380         $this->client->server .= 'XXX';
1381         $this->client->keepalive = true;
1382         $r = $this->client->send($f, 5, 'http11');
1383         // in case we have a "universal dns resolver" getting in the way, we might get a 302 instead of a 404
1384         $this->assertTrue($r->faultCode() === 8 || $r->faultCode() == 5);
1385
1386         // now test a successful connection
1387         $server = explode(':', $LOCALSERVER);
1388         if(count($server) > 1)
1389         {
1390             $this->client->port = $server[1];
1391         }
1392         $this->client->server = $server[0];
1393         $this->client->path = $URI;
1394
1395         $r = $this->client->send($f, 5, 'http11');
1396         $this->assertEquals(0, $r->faultCode());
1397         $ro = $r->value();
1398         is_object( $ro ) && $this->assertEquals('hello', $ro->scalarVal());
1399     }
1400 }
1401
1402
1403 $suite->addTest(new LocalhostTests('testString'));
1404 $suite->addTest(new LocalhostTests('testAdding'));
1405 $suite->addTest(new LocalhostTests('testAddingDoubles'));
1406 $suite->addTest(new LocalhostTests('testInvalidNumber'));
1407 $suite->addTest(new LocalhostTests('testBoolean'));
1408 $suite->addTest(new LocalhostTests('testCountEntities'));
1409 $suite->addTest(new LocalhostTests('testBase64'));
1410 $suite->addTest(new LocalhostTests('testDateTime'));
1411 $suite->addTest(new LocalhostTests('testServerMulticall'));
1412 $suite->addTest(new LocalhostTests('testClientMulticall1'));
1413 $suite->addTest(new LocalhostTests('testClientMulticall2'));
1414 $suite->addTest(new LocalhostTests('testClientMulticall3'));
1415 $suite->addTest(new LocalhostTests('testCatchWarnings'));
1416 $suite->addTest(new LocalhostTests('testCatchExceptions'));
1417 $suite->addTest(new LocalhostTests('testZeroParams'));
1418 $suite->addTest(new LocalhostTests('testCodeInjectionServerSide'));
1419 $suite->addTest(new LocalhostTests('testAutoRegisteredFunction'));
1420 $suite->addTest(new LocalhostTests('testAutoRegisteredMethod'));
1421 $suite->addTest(new LocalhostTests('testSetCookies'));
1422 $suite->addTest(new LocalhostTests('testGetCookies'));
1423 $suite->addTest(new LocalhostTests('testSendTwiceSameMsg'));
1424
1425 $suite->addTest(new LocalhostMultiTests('testUTF8Requests'));
1426 $suite->addTest(new LocalhostMultiTests('testUTF8Responses'));
1427 $suite->addTest(new LocalhostMultiTests('testISORequests'));
1428 $suite->addTest(new LocalhostMultiTests('testISOResponses'));
1429 $suite->addTest(new LocalhostMultiTests('testGzip'));
1430 $suite->addTest(new LocalhostMultiTests('testDeflate'));
1431 $suite->addTest(new LocalhostMultiTests('testProxy'));
1432 $suite->addTest(new LocalhostMultiTests('testHttp11'));
1433 $suite->addTest(new LocalhostMultiTests('testHttp11Gzip'));
1434 $suite->addTest(new LocalhostMultiTests('testHttp11Deflate'));
1435 $suite->addTest(new LocalhostMultiTests('testKeepAlives'));
1436 $suite->addTest(new LocalhostMultiTests('testHttp11Proxy'));
1437 $suite->addTest(new LocalhostMultiTests('testHttps'));
1438 $suite->addTest(new LocalhostMultiTests('testHttpsProxy'));
1439
1440 $suite->addTest(new InvalidHostTests('test404'));
1441 //$suite->addTest(new InvalidHostTests('testSrvNotFound'));
1442 $suite->addTest(new InvalidHostTests('testCurlKAErr'));
1443
1444 $suite->addTest(new ParsingBugsTests('testMinusOneString'));
1445 $suite->addTest(new ParsingBugsTests('testUnicodeInMemberName'));
1446 $suite->addTest(new ParsingBugsTests('testUnicodeInErrorString'));
1447 $suite->addTest(new ParsingBugsTests('testValidNumbers'));
1448 $suite->addTest(new ParsingBugsTests('testAddScalarToStruct'));
1449 $suite->addTest(new ParsingBugsTests('testAddStructToStruct'));
1450 $suite->addTest(new ParsingBugsTests('testAddArrayToArray'));
1451 $suite->addTest(new ParsingBugsTests('testEncodeArray'));
1452 $suite->addTest(new ParsingBugsTests('testEncodeRecursive'));
1453 $suite->addTest(new ParsingBugsTests('testBrokenrequests'));
1454 $suite->addTest(new ParsingBugsTests('testBrokenresponses'));
1455 $suite->addTest(new ParsingBugsTests('testBuggyHttp'));
1456 $suite->addTest(new ParsingBugsTests('testStringBug'));
1457 $suite->addTest(new ParsingBugsTests('testWhiteSpace'));
1458 $suite->addTest(new ParsingBugsTests('testAutodecodeResponse'));
1459 $suite->addTest(new ParsingBugsTests('testNoDecodeResponse'));
1460 $suite->addTest(new ParsingBugsTests('testAutoCoDec'));
1461 $suite->addTest(new ParsingBugsTests('testUTF8Response'));
1462 $suite->addTest(new ParsingBugsTests('testUTF8Request'));
1463 $suite->addTest(new ParsingBugsTests('testUTF8IntString'));
1464 $suite->addTest(new ParsingBugsTests('testStringInt'));
1465 $suite->addTest(new ParsingBugsTests('testStructMemExists'));
1466 $suite->addTest(new ParsingBugsTests('testDoubleDataInArrayTag'));
1467 $suite->addTest(new ParsingBugsTests('testDoubleStuffInValueTag'));
1468 $suite->addTest(new ParsingBugsTests('testNilValue'));
1469 $suite->addTest(new ParsingBugsTests('testLocale'));
1470
1471 $title = 'XML-RPC Unit Tests';
1472
1473 if(isset($only))
1474 {
1475     $suite = new PHPUnit_TestSuite($only);
1476 }
1477
1478 if(isset($_SERVER['REQUEST_METHOD']))
1479 {
1480     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";
1481 }
1482 else
1483 {
1484     echo "$title\n\n";
1485 }
1486
1487 if(isset($_SERVER['REQUEST_METHOD']))
1488 {
1489     echo "<h3>Using lib version: $xmlrpcVersion on PHP version: ".phpversion()."</h3>\n";
1490     echo '<h3>Running '.$suite->testCount().' tests (some of which are multiple) against servers: http://'.htmlspecialchars($LOCALSERVER.$URI).' and https://'.htmlspecialchars($HTTPSSERVER.$HTTPSURI)."\n ...</h3>\n";
1491     flush();
1492     @ob_flush();
1493 }
1494 else
1495 {
1496     echo "Using lib version: $xmlrpcVersion on PHP version: ".phpversion()."\n";
1497     echo 'Running '.$suite->testCount().' tests (some of which are multiple) against servers: http://'.$LOCALSERVER.$URI.' and https://'.$HTTPSSERVER.$HTTPSURI."\n\n";
1498 }
1499
1500 // do some basic timing measurement
1501 list($micro, $sec) = explode(' ', microtime());
1502 $start_time = $sec + $micro;
1503
1504 $PHPUnit = new PHPUnit;
1505 $result = $PHPUnit->run($suite, ($DEBUG == 0 ? '.' : '<hr/>'));
1506
1507 list($micro, $sec) = explode(' ', microtime());
1508 $end_time = $sec + $micro;
1509
1510 if(!isset($_SERVER['REQUEST_METHOD']))
1511 {
1512     echo $result->toString()."\n";
1513 }
1514
1515 if(isset($_SERVER['REQUEST_METHOD']))
1516 {
1517     echo '<h3>'.$result->failureCount()." test failures</h3>\n";
1518     printf("Time spent: %.2f secs<br/>\n", $end_time - $start_time);
1519 }
1520 else
1521 {
1522     echo $result->failureCount()." test failures\n";
1523     printf("Time spent: %.2f secs\n", $end_time - $start_time);
1524 }
1525
1526 if($result->failureCount() && !$DEBUG)
1527 {
1528     $target = strpos($_SERVER['PHP_SELF'], '?') ? $_SERVER['PHP_SELF'].'&amp;DEBUG=1' : $_SERVER['PHP_SELF'].'?DEBUG=1';
1529     $t2 = strpos($_SERVER['PHP_SELF'], '?') ? $_SERVER['PHP_SELF'].'&amp;DEBUG=2' : $_SERVER['PHP_SELF'].'?DEBUG=2';
1530     if(isset($_SERVER['REQUEST_METHOD']))
1531     {
1532         echo '<p>Run testsuite with <a href="'.$target.'">DEBUG=1</a> to have more detail about tests results. Or with <a href="'.$t2.'">DEBUG=2</a> for even more.</p>'."\n";
1533     }
1534     else
1535     {
1536         echo "Run testsuite with DEBUG=1 (or 2) to have more detail about tests results\n";
1537     }
1538 }
1539
1540 if(isset($_SERVER['REQUEST_METHOD']))
1541 {
1542 ?>
1543 <a href="#" onclick="if (document.getElementById('opts').style.display == 'block') document.getElementById('opts').style.display = 'none'; else document.getElementById('opts').style.display = 'block';">More options...</a>
1544 <div id="opts" style="display: none;">
1545 <form method="GET" style="border: 1px solid silver; margin: 5px; padding: 5px; font-family: monospace;">
1546 HTTP Server:&nbsp;&nbsp;<input name="LOCALSERVER" size="30" value="<?php echo htmlspecialchars($LOCALSERVER); ?>"/> Path: <input name="URI"  size="30" value="<?php echo htmlspecialchars($URI); ?>"/><br/>
1547 HTTPS Server: <input name="HTTPSSERVER" size="30" value="<?php echo htmlspecialchars($HTTPSSERVER); ?>"/> Path: <input name="HTTPSURI"  size="30" value="<?php echo htmlspecialchars($HTTPSURI); ?>"/> Do not verify cert: <input name="HTTPSIGNOREPEER" value="true" type="checkbox" <?php if ($HTTPSIGNOREPEER) echo 'checked="checked"'; ?>/><br/>
1548
1549 Proxy Server: <input name="PROXY" size="30" value="<?php echo isset($PROXY) ? htmlspecialchars($PROXY) : ''; ?>"/> <input type="submit" value="Run Testsuite"/>
1550 </form>
1551 </div>
1552 <?php
1553     echo $result->toHTML()."\n</body>\n</html>\n";
1554 }
1555 else
1556 {
1557     exit($result->failureCount());
1558 }
1559 ?>