- Initial import of the mob, reorganizing dirs to match packaged version
authorggiunta <ggiunta@013ecfd8-0664-425d-a759-9c98391dc3f9>
Mon, 16 Mar 2009 20:22:51 +0000 (20:22 +0000)
committerggiunta <ggiunta@013ecfd8-0664-425d-a759-9c98391dc3f9>
Mon, 16 Mar 2009 20:22:51 +0000 (20:22 +0000)
git-svn-id: https://svn.code.sf.net/p/phpxmlrpc/code/trunk/xmlrpc@2 013ecfd8-0664-425d-a759-9c98391dc3f9

79 files changed:
ChangeLog [new file with mode: 0644]
Makefile [new file with mode: 0644]
NEWS [new file with mode: 0644]
README [new file with mode: 0644]
debugger/action.php [new file with mode: 0644]
debugger/common.php [new file with mode: 0644]
debugger/controller.php [new file with mode: 0644]
debugger/index.html [new file with mode: 0644]
debugger/index.php [new file with mode: 0644]
demo/client/agesort.php [new file with mode: 0644]
demo/client/client.php [new file with mode: 0644]
demo/client/comment.php [new file with mode: 0644]
demo/client/introspect.php [new file with mode: 0644]
demo/client/mail.php [new file with mode: 0644]
demo/client/simple_call.php [new file with mode: 0644]
demo/client/which.php [new file with mode: 0644]
demo/client/wrap.php [new file with mode: 0644]
demo/client/zopetest.php [new file with mode: 0644]
demo/demo1.txt [new file with mode: 0644]
demo/demo2.txt [new file with mode: 0644]
demo/demo3.txt [new file with mode: 0644]
demo/server/discuss.php [new file with mode: 0644]
demo/server/proxy.php [new file with mode: 0644]
demo/server/server.php [new file with mode: 0644]
demo/vardemo.php [new file with mode: 0644]
doc/Makefile [new file with mode: 0644]
doc/announce1_0.txt [new file with mode: 0644]
doc/announce1_1.txt [new file with mode: 0644]
doc/announce1b6.txt [new file with mode: 0644]
doc/announce1b7.txt [new file with mode: 0644]
doc/announce1b8.txt [new file with mode: 0644]
doc/announce1b9.txt [new file with mode: 0644]
doc/convert.php [new file with mode: 0644]
doc/custom.dsl [new file with mode: 0644]
doc/custom.fo.xsl [new file with mode: 0644]
doc/custom.xsl [new file with mode: 0644]
doc/docbook-css/COPYING [new file with mode: 0644]
doc/docbook-css/CREDITS [new file with mode: 0644]
doc/docbook-css/core.css [new file with mode: 0644]
doc/docbook-css/db-bindings.xml [new file with mode: 0644]
doc/docbook-css/driver.css [new file with mode: 0644]
doc/docbook-css/l10n.css [new file with mode: 0644]
doc/docbook-css/l10n/de.css [new file with mode: 0644]
doc/docbook-css/l10n/en.css [new file with mode: 0644]
doc/docbook-css/l10n/es.css [new file with mode: 0644]
doc/docbook-css/l10n/pl.css [new file with mode: 0644]
doc/docbook-css/mozilla.css [new file with mode: 0644]
doc/docbook-css/opera.css [new file with mode: 0644]
doc/docbook-css/styles.css [new file with mode: 0644]
doc/docbook-css/tables.css [new file with mode: 0644]
doc/docbook-css/xmlrpc.css [new file with mode: 0644]
doc/highlight.php [new file with mode: 0644]
doc/xmlrpc_php.xml [new file with mode: 0644]
extras/rsakey.pem [new file with mode: 0644]
extras/test.pl [new file with mode: 0644]
extras/test.py [new file with mode: 0644]
extras/workspace.testPhpServer.fttb [new file with mode: 0644]
lib/compat/array_key_exists.php [new file with mode: 0644]
lib/compat/is_a.php [new file with mode: 0644]
lib/compat/is_callable.php [new file with mode: 0644]
lib/compat/is_scalar.php [new file with mode: 0644]
lib/compat/var_export.php [new file with mode: 0644]
lib/compat/version_compare.php [new file with mode: 0644]
lib/xmlrpc.inc [new file with mode: 0644]
lib/xmlrpc_wrappers.inc [new file with mode: 0644]
lib/xmlrpcs.inc [new file with mode: 0644]
test/PHPUnit/Assert.php [new file with mode: 0644]
test/PHPUnit/TestCase.php [new file with mode: 0644]
test/PHPUnit/TestDecorator.php [new file with mode: 0644]
test/PHPUnit/TestFailure.php [new file with mode: 0644]
test/PHPUnit/TestListener.php [new file with mode: 0644]
test/PHPUnit/TestResult.php [new file with mode: 0644]
test/PHPUnit/TestSuite.php [new file with mode: 0644]
test/PHPUnit/license.txt [new file with mode: 0644]
test/benchmark.php [new file with mode: 0644]
test/parse_args.php [new file with mode: 0644]
test/phpunit.php [new file with mode: 0644]
test/testsuite.php [new file with mode: 0644]
test/verify_compat.php [new file with mode: 0644]

diff --git a/ChangeLog b/ChangeLog
new file mode 100644 (file)
index 0000000..cd80508
--- /dev/null
+++ b/ChangeLog
@@ -0,0 +1,1481 @@
+2009-03-16 - G. Giunta (giunta.gaetano@gmail.com) thanks Tommaso Trani\r
+\r
+       * xmlrpc.inc: fix php warning when receiving 'false' in a bool value\r
+\r
+2009-02-03 - G. Giunta (giunta.gaetano@gmail.com)\r
+\r
+       * debugger/action.php: improve code robustness when parsing system.listmethods\r
+       and system.describemethods call\r
+\r
+       * xmlrpc.inc: format floating point values using the correct decimal separator\r
+       even when php locale is set to one that uses comma (bug #2517579);\r
+       use feof() to test if socket connections are to be closed instead of the\r
+       number of bytes read (bug #2556209)\r
+\r
+2008-10-29 - G. Giunta (giunta.gaetano@gmail.com)\r
+\r
+       * xmlrpcs.inc: allow add_to_map server method to add docs for single params, too\r
+\r
+2008-09-20 - G. Giunta (giunta.gaetano@gmail.com)\r
+\r
+       * xmlrpc_wrappers.inc: added the possibility to wrap for exposure as xmlrpc\r
+       methods plain php class methods, object methods and even whole classes\r
+\r
+       * testsuite.php, server.php: added test cases for the new code\r
+\r
+2008-09-07 - G. Giunta (giunta.gaetano@gmail.com) thanks Bruno Zanetti Melotti\r
+\r
+       * xmlrpc.inc: be more tolerant in detection of charset in http headers (fix for bug #2058158)\r
+\r
+2008-04-05 - G. Giunta (giunta.gaetano@gmail.com)\r
+\r
+       * xmlrpc.inc: fix encoding of UTF8 chars outside of the BMP\r
+\r
+       * xmlrpcs.inc: fix detection of zlib.output_compression (thanks xbert)\r
+\r
+2008-03-06 - G. Giunta (giunta.gaetano@gmail.com)\r
+\r
+       * tagged and released as 2.2.1\r
+\r
+       * Makefile: improve usage on windows xp despite cmd's broken mkdir\r
+\r
+2007-10-26 - G. Giunta (giunta.gaetano@gmail.com) thanks sajo_raftman\r
+\r
+       * xmlrpc.inc: remove one warning in xmlrpc_client creator\r
+\r
+2007-10-26 - G. Giunta (giunta.gaetano@gmail.com)\r
+\r
+       * xmlrpc.inc: improve support for windows cp1252 character set (still\r
+       commented in the code)\r
+\r
+2007-09-05 - G. Giunta (giunta.gaetano@gmail.com)\r
+\r
+       * xmlrpc.inc, xmlrps.inc: do not try to set invalid charsets as output for\r
+       xml parser, even if user set them up for internal_encoding (helps encoding\r
+       to exotic charsets, while decoding to UTF8)\r
+\r
+2007-09-05 - G. Giunta (giunta.gaetano@gmail.com)\r
+\r
+       * xmlrpc.inc: fix parsing of '1e+1' as valid float\r
+\r
+2007-09-01 - G. Giunta (giunta.gaetano@gmail.com), thanks Frederic Lecointre\r
+\r
+       * xmlrpcs.inc: allow errorlevel 3 to work when prev. error handler was a static method\r
+\r
+       * testsuite.php: fix test on setCookie()\r
+\r
+2007-08-31 - G. Giunta (giunta.gaetano@gmail.com)\r
+\r
+       * xmlrpc.inc: minor fix in cookie parsing\r
+\r
+2007-07-31 - G. Giunta (giunta.gaetano@gmail.com)\r
+\r
+       * xmlrpc.inc: Fix usage of client::setcookie() for multiple cookies in non-ssl mode\r
+\r
+2007-07-26 - G. Giunta (giunta.gaetano@gmail.com) thanks Mark Olive\r
+\r
+       * xmlrpc.inc: Fix for bug # 1756274 (usage of cookies in ssl mode)\r
+\r
+2007-04-28 - G. Giunta (giunta.gaetano@gmail.com)\r
+\r
+       * xmlrpc.inc: give more detailed curl information when DEBUG = 2; fix handling\r
+       of case where curl w. keepalive is used and one connection of many fails\r
+\r
+       * testsuite improvements: add one testcase; give feedbcak while tests are\r
+       running\r
+\r
+2007-04-01 - G. Giunta (giunta.gaetano@gmail.com)\r
+\r
+       * doc/makefile, doc/custom.fo.xsl: improve pdf rendering of php source code\r
+\r
+       * makefile: recover version number from source instead of having it hardcoded\r
+\r
+2007-03-10 - G. Giunta (giunta.gaetano@gmail.com)\r
+\r
+       * doc/makefile, doc/convert.php, doc/*.xsl: created customizations xslt to\r
+       produce a documentation more in line with the php manual, esp. with regards\r
+       to functions synopsis; added jellyfish book cover as local resource and a\r
+       screenshot of the debugger too; various updates to the manual source; added\r
+       a php script to highlight examples inside html docs\r
+\r
+2007-03-09 - G. Giunta (giunta.gaetano@gmail.com)\r
+\r
+       * debugger/action.php: css tweak for IE\r
+\r
+       * added phpunit license file in the phpunit directory\r
+\r
+       * added link to license (on sf.net site) to many files\r
+\r
+2007-03-04 - G. Giunta (giunta.gaetano@gmail.com)\r
+\r
+       * Makefile, doc/makefile: assorted improvements\r
+\r
+2007-03-03 - G. Giunta (giunta.gaetano@gmail.com)\r
+\r
+       * xmlrpc.inc: micro-optimization in declaration of global vars xmlrpcerr, xmlrpcstr\r
+\r
+2007-02-25 Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * removed a couple of warnings emitted in testsuite.php\r
+\r
+       * doc/makefile: added command for invocation of xxe to generate docs\r
+\r
+       * better rendering of docs in xml+css format for function prototypes\r
+\r
+       * updated documentation\r
+\r
+       * tagged and released as 2.2\r
+\r
+2007-02-22 Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * debugger: workaround for case of magic_quotes_gpc being set (properly\r
+       unescape user input); fix case of user not setting msg id in jsonrpc case\r
+       when executing a remote method; allow strings, false, true and null as msg id\r
+\r
+2007-02-13 Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * testsuite.php: added one test for automatic encoding/decoding case\r
+\r
+2007-02-05 Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: slightly faster encoding of UTF8 data to ascii\r
+\r
+2007-01-11 Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: when calling client::multicall() with an unspecified http version,\r
+       use the client default rather than the fixed 'http 1.0'\r
+\r
+2006-09-17 Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc, xmlrpcs.inc, testsuite.php: added support for </NIL> and\r
+       system.getCapabilities, and one more testcase to go with it\r
+\r
+2006-09-05 Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: fix support for https through proxies; client parses debug\r
+       messages sent by client even for compressed responses;\r
+\r
+       * testsuite.php, parse_args.php: added 3 test cases for proxy connections\r
+\r
+2006-09-01 Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       xmlrpc_wrappers.inc: add two more options in wrap_xmlrpc_method and fix\r
+       typo to allow obj encoding\r
+\r
+2006-08-28 Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc_wrappers.inc: more options added to wrap_php_function and\r
+       wrap_xmlrpc_method\r
+\r
+       * xmlrpc.inc: pave the way to support for <nil/>\r
+\r
+       * doc/xmlrpc_php.xml documentation updated\r
+\r
+       * tagged and released as 2.1\r
+\r
+2006-08-25 Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: stricter parsing of incoming messages: detect two DATA elements\r
+       inside an ARRAY, a STRUCT or SCALAR inside an already filled VALUE\r
+\r
+       * testsuite.php: added two testcases to check for the above cases\r
+\r
+2006-08-24 Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: more code optimization in xmlrpcval::serialize() and\r
+       php_xmlrpc_encode(); fixed bug where struct elements with non-ascii chars\r
+       in their name would not be properly encoded\r
+\r
+       * testsuite.php: added a testcase for the new bug\r
+\r
+2006-08-23 Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * remove old code left in comments across many files; many more javadoc\r
+       comments added\r
+\r
+       * xmlrpc.inc: a bit of code optimization: reorder switch() statements of\r
+       xml parsing element handlers; inline code for xmlrpcval() - this breaks\r
+       new xmlrpcval('true') and changes error msgs on new xmlrpcval($x, 'invalid_type')\r
+\r
+       * testsuite.php: change according to above\r
+\r
+       * benchmark.php: basic support for xdebug 2 profiling\r
+\r
+2006-08-22 Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: addscalar() and addstruct() where not returning 1 when adding\r
+       data to an already formed value\r
+\r
+2006-08-21 Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpcs.inc, xmlrpc.inc: added support for emulating the xmlrpc-extension\r
+       API (the full emulation layer is part of the extras package);\r
+       fix support for the HTTP 'deflate' encoding\r
+\r
+       * xmlrpc.inc: better support for http compression with and without CURL;\r
+       a minor decoding speedup; added a new function: php_xmlrpc_decode_xml(),\r
+       that will convert into the appropriate object the xml representation of\r
+       either a request, response or a single value; log reception of invalid\r
+       datetime values\r
+\r
+       * xmlrpcs.inc: add a new parameter and return type to server->service();\r
+       let server->add_to_map() accept method definitions without parameter types\r
+\r
+       * xmlrpc_wrappers.inc: more logging of errors; wrap_php_functions now takes\r
+       more options; better support for jsonrpc; escape quote chars when wrapping\r
+       remothe servers / remote methods\r
+\r
+       * added cvs Id tag to files that missed it; speling fixes; updated NEWS files\r
+\r
+2006-08-07 Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * assorted fixes to make the suite more compatible with php 4.0.5 and 5.x\r
+\r
+2006-07-02 Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc_warppers.inc: added new function to wrap entire remote server into\r
+       a local php class; changed default calling synopsis of wrap_remote_method,\r
+       to ease passing multiple options at a time (but old syntax still works!)\r
+\r
+       * updated makefile, debugger/action.php in accord with the above\r
+\r
+2006-06-30 Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * added to debugger capability to generate json-rpc code stubs\r
+\r
+       * added to debugger capability to load and launch self correctly if\r
+       controller.php is called directly from outside processes (single url access)\r
+\r
+2006-06-26 Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * moved wrap_php_functions and wrap_xmlrpc_method into a file of their own.\r
+       This will let us add further stub functionality without the base lib growing too much.\r
+       All of the files that reference this functionality have been modified accordingly.\r
+\r
+       * made wrap_xmlrpc_method generate better code (with php type juggling), and\r
+       some phpdoc for the generated function, too\r
+\r
+       * added to debugger an option to produce for the user the generated php code\r
+       for wrapping a call to a remote method into a php function\r
+\r
+2006-06-22 Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpcs.inc: added description of parameters for system.xxx methods (useful with\r
+       html-self-documenting servers);\r
+       server->service() now returns response object, in case user has need for it...\r
+\r
+       * xmlrpc.inc: save full response payload into xmlrpcresp obj for better debugging\r
+\r
+2006-06-15 Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * verify_compat.php: more tests\r
+\r
+2006-06-09 Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpcs.inc: fixed sending of compressed responses when output compression\r
+       is already enabled in php.ini\r
+\r
+       * verify_compat.php: split tests between server and client cases\r
+\r
+2006-05-29  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * added new file: verify_compat.php, to help troubleshooting platform\r
+       support for the library; added it to makefile, too\r
+\r
+2006-05-24  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: removed residual usage of regexp in favour of  pregexps; fixed\r
+       a bug in specifying Host http header with non std ports\r
+\r
+2006-05-23  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: improvements to wrap_php_function: let it deal correctly\r
+       with php functions returning xmlrpcresp objs; make it generate also\r
+       docs for single parameters (useful for documenting_xmlrpc_server class)\r
+\r
+2006-05-22  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc, xmlrpcs.inc: minor performance tuning updates: replaced\r
+       some explode vs. split, ereg vs. preg, single vs. double quotes\r
+\r
+       * xmlrpc.inc: fix wrap_xmlrpc_method to NOT rebuild php objects received\r
+       from the server by default, as it might pose a security risk\r
+\r
+2006-04-24  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * minor fixes makefiles. Tagged and released as 2.0 final\r
+\r
+2006-04-22  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * debugger/*: added option to set cainfo; improve web layout\r
+\r
+       * xmlrpc.inc: set sslverifypeer to TRUE instaed of 1 by default\r
+\r
+       * doc/php_xmlrpc.xml: documentation updates\r
+\r
+2006-04-21  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: added option to set ca certs dir instead of single cert\r
+       (used to validate server in https connetions)\r
+\r
+2006-04-18  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: fixed bug in xmlrpcval::structmemexists()\r
+\r
+       * testsuite.php: added test case for xmlrpcval::structmemexists()\r
+\r
+2006-04-03  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: add support for Digest and NTLM authentication, both to server\r
+       and to proxies (note: must use CURL for this to work)\r
+\r
+       * debugger/*: add support for Digest/NTLM auth to remote servers\r
+\r
+2006-03-19  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: fix a bug parsing of 'true' bool values;\r
+       added a new method to the client class: SetCaCertificate;\r
+       add column number in xml parsing error messages;\r
+       fix serialization of messages to ISO-8859-1 charset with php 5 (by adding\r
+       encoding to the xml prologue of generated messages)\r
+\r
+       * xmlrpcs.inc: correct detection of charset in http headers;\r
+       add column number in xml parsing error messages;\r
+       fix serialization of responses to ISO-8859-1 charset with php 5 (by adding\r
+       encoding to the xml prologue of generated responses)\r
+\r
+       * testsuite.php: added two more tests on charset encoding\r
+\r
+       * NEWS: update info for impending release\r
+\r
+2006-03-23  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * added a new demo file: simple_call.php\r
+\r
+2006-02-20  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpcs.inc: more error checking and logging with regard to user-coded\r
+       method handler functions not being well behaved;\r
+       fix a case where error handler would not be reset upon user function\r
+       returning not valid xmlrpresp\r
+\r
+       * xmlrpc.inc: fix bug in detection of php 4.3.0\r
+\r
+       * Makefile: fix uppercase filenames\r
+\r
+2006-02-15\r
+\r
+       * xmlrpc.inc: parse 'true' and 'false' as valid booleans, even though the\r
+       spec is quite clear on that; fix small bug w. internal_encoding = utf8; add\r
+       definition of $GLOBALS['xmlrpcNull'] for extensibility, e.g. json or\r
+       extensions to the xmlrpc spec\r
+\r
+2006-02-05  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: fix bug in wrap_xmlrpc_method if client passed to function has\r
+       return_type=phpvals\r
+\r
+       * all demo files: review code, add more comments and information\r
+\r
+       * added 2 demo files: proxy.php (implementing an xmlrpc proxy server) and\r
+       wrap.php (showing usage of wrap_method_call)\r
+\r
+2006-02-04  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: fix bug in multicall in case of no fallback and server error\r
+\r
+2006-01-30  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: fix recursive serialization of xmlrpcvals loosing UTF8 charset;\r
+       correctly set type field of xmlrpcvals returned by send() calls\r
+\r
+       * xmlrpcs.inc: add to server checks for correct return type of user-coded\r
+       method handling function; tolerate xmlrpcval instead of xmlrpcresp\r
+\r
+       * minor change in xmlrpcresp internals, to ease subclassing (store payload\r
+       in an internal var on serialize(), same as xmlrpcclient does)\r
+\r
+2006-01-22  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * benchmark.php: do not run http 1.1 tests if CURL notfound\r
+\r
+       * Released as 2.0 Rc3\r
+\r
+2006-01-19  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: make xmlrpc_client::setDebug() accept int values instead of\r
+       boolean. At level 2, the request payload is printed to screen before being\r
+       sent; fix bug with repeated sending of the same msg object and using request\r
+       compression w. php 5.1.2 (objects passed by ref by default!!!)\r
+\r
+       * xmlrpcs.inc: fix detection of clients accepting compressed responses\r
+\r
+       * comment.php: remove warnings due to liberal usage of $HTTP_POST/GET_VARS\r
+\r
+       * benchmark.php: add a test using http compression of both requests and\r
+       responses\r
+\r
+       * testsuite.php: added test for fix in xmlrpc.inc\r
+\r
+2006-01-17  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpcs.php: minor fix: do not raise a PHP warning when std server is\r
+       called via GET (global HTTP_RAW_POST_DATA undefined). Some might have called\r
+       it a security breach (path disclosure)...\r
+\r
+2006-01-15  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * testsuite.php: minor fix to expected date format in http cookie hedaer\r
+       to cope with PHP 5.1.2\r
+\r
+2006-01-05  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpcs.inc: merge code from the 'extras' subclass that allows server\r
+       to register plain php functions in dispatch map instead of functions\r
+       accepting a single xmlrpcmgs obj parameter.\r
+       One step closer to the kitchen sink!!!\r
+\r
+2005-12-31  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpcs.inc: let the server accept 'class::method' syntax in the dispatch\r
+       map\r
+\r
+       * testsuite.php, server.php: added new tests for the recent charset encoding\r
+       capabilities\r
+\r
+2005-12-24  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: correctly serialize() string xmlrpcvals that have been\r
+       created out of non-string php variables, when internal encoding is UTF8;\r
+       serialize to '0' int and double values created out of non-string php\r
+       variables, eg. 'hello', instead of creating invalid xmlrpc;\r
+       extend the php_xmlrpc_encode function to allow serializing string values\r
+       to charsets other tha US-ASCII;\r
+       minor tweak to xml parsing to allow correct parsing of empty strings when\r
+       in 'direct to php values' mode\r
+\r
+       * xmlrpcs.inc: advances in system.multicall with plain php values\r
+\r
+2005-12-17  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpcs.inc: let the functions implementing the system.* methods work\r
+       fine when called with plain php values as parameters instead of xmlrpcmsg\r
+       objects (multicall not quite finished yet...);\r
+       encode level 3 debug info as base64 data, to avoid charset encoding hell\r
+\r
+       * xmlrpc.inc: added a new xmlrpc_2_php_type function, to get the name of\r
+       php types corresponding to xmlrpc types;\r
+       in debug mode, when detecting base64 server debug info, print it out fine\r
+\r
+       * server.php: cosmetic fixes\r
+\r
+2005-12-09  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: remove one warning emitted when received xml contains an\r
+       unknown tag; remove warnings emitted when custom error handler is set\r
+       and user calls php_xmlrpc_encode/decode without the 2nd parameter\r
+\r
+       * xmlrpcs.inc: added a param to service(), to allow the server to parse\r
+       data other than the POST body (useful for subclassing and debugging);\r
+       reworked the implementation of server debug messages at debug level 2:\r
+       since the debug info generated has no known charset, and putting it back\r
+       into the response's xml would most likely break it, send it back to the\r
+       client as a base64 encoded comment. Clients can decode it if they need it...\r
+       Add some more javadocs\r
+\r
+       * testsuite.php: modified the string test, to see if the server can echo\r
+       back to the client the received data without breaking the response's xml\r
+\r
+2005-12-05  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc, xmlrpcs.inc: let server and client objects decide if they\r
+       want to use some charset encoding other than US-ASCII for serialized data:\r
+       add a new var to both objects, and lots of parameters to function calls\r
+       that took none up to now;\r
+       refactored server method service() and parseRequest(), implementing a\r
+       new parserequestHeaders() method to explicitly deal with HTTP\r
+\r
+2005-12-01  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * moved the jsonrpc implementation and the new wsdl stuff to a separate\r
+       CVS module; updated the makefile to reflect it\r
+\r
+2005-11-24  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * modified php_xmlrpc_decode() to work on xmlrpcmessages too, besides\r
+       xmlrpcvals. To achieve this, added a new method: xmlrpcmsg::kindOf()\r
+\r
+2005-11-22  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * released as 2.0 RC2\r
+\r
+2005-11-21  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: fix warnings about references for PHP 4.1.X\r
+\r
+       * Whitespace cleanup on all the lib\r
+\r
+2005-11-16  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: rewritten xmlrpc_encode_entitites adding two extra parameters\r
+       that specify input and output charset encodings. This corrects the bug that\r
+       prevented native UTF-8 strings to be correctly serialized (to have them\r
+       encoded the user must set $xmlrpc_internalencoing appropriately).\r
+\r
+       * xmlrpc.inc: added new method xmlrpcmsg::parseResponseHeaders(), refactoring\r
+       parseResponse(). This makes the code more modular and eases subclassing.\r
+\r
+       * xmlrpc.inc: set cookies and http headers to xmlrpcresp objs even when calls\r
+       to send() do not complete correctly\r
+\r
+       * added new file: jsonrpcs.inc, to accomodate server jsonrpc objects in the future\r
+\r
+       * jsonrpc.inc: slow progress...\r
+\r
+2005-11-10  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: fixed the xmlrpc_client send and sendpayloadhttps methods\r
+       to fix errors in calling https servers;\r
+       added a new xmlrpc_client->setkey method to allow usage of client-side ssl\r
+       certs in recent php builds;\r
+       added to xmlrpcresp objects a content_type var, to be used in HTTP headers\r
+\r
+       * xmlrpcs.inc: separate generation of content-type http header and xml prologue\r
+       from the service() method, to ease subclassing\r
+\r
+2005-11-03  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: moved the 'text/xml' mimetype string as class var of the xmlrpcmsg\r
+       object instead of having it cabled into xmlrpc_client->send(): this allows to\r
+       create subclasses of xmlrpcmsg that use a different mimetype\r
+\r
+       * jsonrpc.inc: added a new file, with an extremely experimental set of classes,\r
+        designed to implement a json-rpc client and server, taking advantage of the\r
+        existing xml-rpc infrastructure\r
+\r
+2005-10-28  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: changed constructor method for xmlrpcresp, making it smarter in\r
+       case user does not declare the type of value it is passing to it;\r
+       minor changes in serialization of xmlrpcresp with error codes, so that it\r
+       utputs LF instead of CRLF on windows boxes after an FTP transfer of the code, too\r
+\r
+2005-10-26  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: added a new var of class xmlrpc_client, indicating what kind of\r
+       object will be stored in the value() of xmlrpcresp's gotten from the send()\r
+       method: xmlrpxc objects, plain php variables or raw xml. This allow the coder\r
+       to make use of xmlrpc_decode for better performances if he wishes so.\r
+       Modified creator of xmlrpcresp class to allow it to distinguish between being\r
+       created out of raw xml or a plain php string (in the former case, serialization\r
+       is still possible, opening a new world of opportunity for server-side programming:\r
+       the php function implementing a web service has to provide the xml for the\r
+       return value on its own).\r
+       Modified xmlrpc_client::multicall() to suit; also added a new parameter which\r
+       allows calls to multicall without automatic fallback to many-calls in case of\r
+       error (speeding up the process of doing a failed multicall() call quite a bit)\r
+       Fixed two bugs in guess_encoding.\r
+       Audited all regexps and fixed some.\r
+       xmlrpc_client::send() does not call xmlrpcmsg::parseresponsefile() anymore.\r
+       Shuffled parseresponse() a little bit\r
+\r
+       * testsuite.php: added a new testcase for the modifications to multicall():\r
+       now we test the case where xmlrpc_client returns php values, too\r
+\r
+2005-10-24  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: fixed guess_encoding() to always return uppercase chars\r
+\r
+       * added new file: benchmark.php. It contains a few tests used to evaluate\r
+       speed of the lib in common use cases\r
+\r
+       * added file parse_args.php, containing common code for benchmark and\r
+       testsuite, and modified testsuite.php accordingly\r
+\r
+       * modified makefile adding new files\r
+\r
+       * testsuite.php: added a couple of new test cases; fixed one warning\r
+       emitted in php 5 E_STRICT mode\r
+\r
+2005-10-20  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: modify 3d param of ParseResponse(), allowing the function to\r
+       return the raw xml received as value of the xmlrpcresponse object.\r
+       This allows eg. to have epi-xmlrpc decode the xml for faster execution.\r
+\r
+2005-10-09  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: fixed error that prevented usage of HTTPS (the client\r
+       always determined that ssl support was not present)\r
+\r
+2005-10-03  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc, xmlrpcs.inc: revert direction of stack growth during xml\r
+       parsing for faster execution time; add support for detecting charset\r
+       encoding of received xml; add support for cookies; better parsing of\r
+       javadoc when building stub code in wrap_php_function; add a lot of\r
+       javadoc comments everywhere; rewrite most error messages\r
+\r
+       * testsuite.php: add many tests for newly introduced features\r
+\r
+       * server.php: add a couple of new functions to support debugging new\r
+       features\r
+\r
+       * debugger: add switches to enable all the latest lib features; minor\r
+       improvements to layout\r
+\r
+       * synch included phpunit with latest PEAR release\r
+\r
+       * reorganize files included in the distribution in a new hierarchy of folders\r
+\r
+       * bump revision number to 2.0RC1 and release\r
+\r
+2005-8-14  Miles Lott <milos@groupwhere.org>\r
+\r
+       * xmlrpc.inc, xmlrpcs.inc: Remove all use of eval() to avoid potential\r
+       security hole.\r
+\r
+       * As of this release we are no longer php3-compatible.\r
+\r
+2005-8-10 Miles Lott <milos@groupwhere.org>\r
+\r
+       * xmlrpc.inc, xmlrpcs.inc: Switched to using $GLOBALS instead of calling\r
+       global $varname\r
+\r
+2005-07-22  Miles Lott <milos@groupwhere.org>\r
+\r
+       * Removed: bug_* files\r
+\r
+2005-07-14  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * debugger: added a workaround to disable using the debugger for attacking\r
+       older versions of the lib\r
+\r
+       * testsuite.php: added code to test wrap_xmlrpc_method;\r
+       use different wording for failed tests\r
+\r
+       * xmlrpcs.inc: change for() with foreach() in system.* methods implementations;\r
+       remove a possible cause of php warning;\r
+\r
+       * xmlrpc.inc: let wrap_php_function and wrap_xmlrpc_method find suitable\r
+       function names if default function names are already in use;\r
+       correct wrap_xmlrpc_method to not set http protocol to 1.0 when not asked to;\r
+       detect curl compiles without SSL\r
+\r
+2005-07-14  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: more auto-fix of xmlrpc_client path: '' -> '/';\r
+       change to the method used for detecting failed evals (php 4.0.x compatibility);\r
+       complete rework of return-by-ref functions to comply with php 4.4.0\r
+\r
+       * xmlrpcs.inc: change to the method used for detecting failed evals (php 4.0.x\r
+       compatibility)\r
+\r
+       * testsuite.php: major rewrite of the multi- tests, to give better feedback on\r
+       number of failed tests;\r
+       flush html page title to screen before starting tests;\r
+\r
+2005-07-13  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: let xmlrpcmsg creator be forgiving of target paths that miss the\r
+       starting '/' char;\r
+       completely reworked assign-by-ref to be compliant with php 4.4.0 stricter\r
+       warnings\r
+\r
+       * testsuite.php: added ability to be run from cli: (really dumb) separation of\r
+       html and plain text outputs + parsing of argv parameters\r
+\r
+2005-07-12  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: compatibility fixes with PHP versions 4.0.x (and remove some for\r
+       PHP 3)\r
+\r
+       * xmlrpcs.inc: compatibility fixes for PHP 4.0.x versions\r
+\r
+       * testsuite.php: better support for running with php versions 4.0.x;\r
+       do not generate runtime errors but finish tests anyway if some calls to\r
+       localhost fail;\r
+       correctly detect a localhost port different from 80 for running tests against\r
+\r
+2005-07-11  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: preliminary building of method signature and docs in\r
+       wrap_php_function;\r
+       fix a bug in extracting function description from javadoc block in\r
+       wrap_php_function;\r
+       small fix for better compatibility with php < 4.2.0\r
+\r
+       * added compat subdir with extra code, taken form PEAR package Compat, to let\r
+       the lib run fine with php 4 versions < 4.1\r
+\r
+2005-07-10  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: some nazi whitespace corrections;\r
+       declared global $xmlrpcBoolean too (was the only one missing);\r
+       used @eval inside getval() to have less path disclosure security reports filed\r
+       in the future;\r
+       added new global var: $xmlrpcValue, to be used in server dispatch maps as\r
+       placeholder for a param which can be of any kind;\r
+       big chunks (but still incomplete) of javadoc parsing in wrap_php_function\r
+       + changed type of return val - now it is the complete array to be put in the\r
+       dispatch map\r
+\r
+       * xmlrpcs.inc: let previous error handler be called by server to handle errors\r
+       even if in debug level 3;\r
+       default to compress responses if zlib installed;\r
+       added a new val useful for only checking number (not type) of params in method\r
+       calls;\r
+       let user use object methods in dispatch map using the\r
+       array($obj, 'fmethodname') format\r
+\r
+       * server.php: Added code called by testsuite.php to exercise registration of\r
+       object methods as xmlrpc methods and auto-registration of php functions as xmlrpc\r
+       methods\r
+\r
+       * testsuite.php: added tests to exercice server registering object methods as\r
+       xmlrpc methods and automatic registration of php functions as server methods;\r
+       added a hint to enable debug if some test goes wrong;\r
+       renamed https test for better clarity\r
+\r
+2005-07-07  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: added function to be used for 'guestimating' charset encoding of\r
+       received xml (not activated yet)\r
+\r
+       * server.php: Let server compress content by default if user asks so: it allows\r
+       testsuite to check for compressed responses\r
+\r
+       * testsuite.php: added suite of tests for compressed responses; test CURL\r
+       (http1.1) with all possible compression combinations too\r
+\r
+2005-07-06  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: Enable setting usage of keepalives on/off (for CURL cases);\r
+       implement compression of xmlrpc requests; enable new syntax of xmlrpclient\r
+       constructor: 1 - allow preferred http method to be set at creation time,\r
+       2 - allow user to insert a single complete URL as only parameter and parse it;\r
+       try to detect if curl is present whether it has been compiled w. zlib to enable\r
+       automatically the reception of compressed responses\r
+\r
+       * xmlrpcs.inc: do not add into logs the content of the request, if it was\r
+       received gzipped/deflated, to avoid breaking the xml sent back as response\r
+       (NB: might be investigated further: is the problem caused by windows chars in\r
+       the range 128-160 ?)\r
+\r
+       * testsuite.php: run all localhost tests 2 more times, to stress request\r
+       compression;\r
+       run all localhost tests in a row using keepalives, to test keepalive\r
+       functionality\r
+\r
+2005-07-05  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: let CURL pass back to caller function the complete PHP headers\r
+       as it did before: it enables better logging / debugging of communication;\r
+       small change to the way CURL declares its ability to receive compressed\r
+       messages (fix for the case where zlib is compiled in PHP but not in curl);\r
+       added Keep-alive (ON BY DEFAULT) for http 1.1 and https messages (had to modify\r
+       a lot of functions for that);\r
+       always make sure a 'Connection: close' header is sent with curl connections if\r
+       keep-alive is not wanted\r
+\r
+       * phpunit.php: switched to PEAR PHPUnit (rel 1.2.3), since it is maintained a\r
+       lot more than the old version we were using\r
+\r
+       * added new folder with code of phpunit classes\r
+\r
+       * testsuite.php: added a new run of tests to check for compliance of client\r
+       when using http 1.1;\r
+       switched to PEAR PHPUnit classes;\r
+       divided test for client ability to do multicall() into 2 separate tests\r
+\r
+2005-06-30  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       tagged and released version 1.1.1, backporting security fixes from HEAD\r
+\r
+2005-06-28  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpcs.inc: fix changes introuced yesterday in a rush;\r
+       do not list system.* methods for a server that has them explicitly disabled\r
+\r
+       * bug_inject.xml: new test case used to check for code injection vulnerability\r
+\r
+       * testsuite.php: added a test case for zero parameters method calls;\r
+       added two test cases for recently found code injection vulnerabilities\r
+\r
+2005-06-27  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: (tentative) fix for security problem reported by\r
+       security@gulftech.org: we were not properly php-escaping xml received for\r
+       BASE64 and NAME tags;\r
+       some more patching related to junk received in xml messages/responses: if the\r
+       PHP code built from the parsed xml is broken, catch any generated errors\r
+       without echoing it to screen but take note of the error and propagate to user\r
+       code\r
+\r
+       * xmlrpcs.inc: some more patching related to junk received in xml messages/\r
+       responses: if the PHP code built from the parsed xml is broken, catch any\r
+       generated errors without echoing it to screen but take note of the error and\r
+       propagate to user code\r
+\r
+2005-06-24  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: fixed php_xmlrpc_encode detection of php arrays (again!);\r
+       removed from wrap_php_function the part about setting a custom error handler\r
+       (it can be activated using the more general $server->setdebug(3) anyway)\r
+\r
+       * xmlrpcs.inc: added to server the capability to trap all processing errors\r
+       during execution of user functions and add them to debug info inside responses;\r
+       return a (new) xmlrpcerr response instead of raising some obscure php execution\r
+       error if there is an undefined function in the dispatch map\r
+\r
+       * testsuite.php: Added new testcases for recently implemented stuff\r
+\r
+2005-06-23  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: added new method: xmlrpcval->structmemexists, to check for\r
+       presence of a wanted struct member without having to loop through all members;\r
+       fix wrap_php_functions: correctly return false for php internal functions,\r
+       whose param list is unknown;\r
+       let addscalar fail as it should if called on struct vals;\r
+       fix addstruct: do not fail when called for adding stuff to initialized structs;\r
+       removed a warning generated when calling addscalar with inexistent type;\r
+       massive code review for speed: replaced each() loops with foreach(), removed\r
+       lots of useless assignments and duplications of data;\r
+       added 'http11' as valid method param for xmlrpclient->send: makes use of curl\r
+       for sending http 1.1 requests;\r
+       changed a couple '=' into '=&' where objects are returned;\r
+       fixed wrap_php_function() to better detect php errors while processing wrapped\r
+       function\r
+\r
+       * xmlrpcs.inc: Fix php warnings generated when clients requested method\r
+       signature / description for a method that had none in its dispatch map;\r
+       turned server->debug into an integer value that will change the amount of\r
+       logging going as comments into xmlrpc responses\r
+\r
+       * server.php: set default server debug level to 2\r
+\r
+       * testsuite.php: removed calls to deleted functions (xmlrpc_encode,\r
+       xmlrpc_decode);\r
+       added html page title describing target servers used for tests;\r
+       added an assign-by-ref\r
+\r
+       * phpunit.php: Do not consider as failures PHP 5 E_STRICT errors (arbitrary\r
+       choice, but lib is targeted at PHP 4)\r
+\r
+2005-06-22  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: removed lottsa old code that had been left in commented\r
+\r
+       * xmlrpc.inc: fixed setting of proxy port\r
+\r
+       * xmlrpc.inc: removed one warning when trying to decompress junk sent as\r
+       deflated response\r
+\r
+       * xmlrpc.inc: changed the error messages (but not the code) that will be found\r
+       in xmlrpcresponses when there are socket errors, to differentiate from HTTP\r
+       errors\r
+\r
+       * xmlrpc.inc: refactored xmlrpcclient->sendpayloadHTTPS: now it calls a new\r
+       method (sendpayloadCURL) that could be used also for generating HTTP 1.1\r
+       requests\r
+\r
+       * xmlrpc.inc: added two new methods: wrap_php_function and wrap_xmlrpc_method:\r
+       designed to let the lazy programmer automagically convert php functions to\r
+       xmlrpc methods and vice versa. Details are in the code\r
+\r
+       * debugger/*: added initial revision of a 'universal xmlrpc debugger'\r
+\r
+2005-06-20  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: replace usage of 'echo' with error_log when errors arise\r
+       in manipulation of xmlrpcval objects\r
+\r
+       * xmlrpc.inc: replaced <br> with <br /> in dump function\r
+\r
+       * xmlrpc.inc: added method structsize to xmlrpcval class (alias for arraysize)\r
+\r
+       * xmlrpc.inc: addarray() now will add extra members to an xmlrpcval object\r
+       of array type; addstruct() can be used to add members to an xmlrpcval object\r
+       of struct type\r
+\r
+       * xmlrpcs.inc: Added member allow_system_funcs to server: controls whether the\r
+       server accepts or not calls to system.* functions\r
+\r
+2005-05-10  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: fix regression in php_xmlrpc_encode when encoding php hashes;\r
+       fix decompression of gzip/deflated xmlrpc responses;\r
+       set user agent string correctly in SSL mode (was forgetting lib name);\r
+       add allowed encoding http headers in requests;\r
+       do not pass http headers back from curl to parseresponse, to avoid re-decoding\r
+       compressed xml or http 100 headers\r
+\r
+       * xmlrpcs.inc: added method setDebug;\r
+       renamed compress_output to compress_response;\r
+       do not try to set http headers if they have already been sent, because trying\r
+       to do so will raise a PHP error, and if headers have been sent something has\r
+       gone wrong already (shall we send a meaningful error response instead?)\r
+\r
+2005-05-08  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpcs.inc, xmlrpcs.inc: reverted to usage of '=& new' for better\r
+       performance on (some) php4 installs.\r
+       NB: PHP 3 compatibility is deprecated from now on!\r
+\r
+       * xmlrpc.inc: decode xmlrpc boolean type to native php boolean\r
+\r
+       * xmlrpcs.inc, xmlrpcs.inc: switched $_xh[$parser] to $_xh, since indexing\r
+       an array by object will give a warning in php 5 (and we were resetting the\r
+       array of _xh elements on every call anyway)\r
+\r
+       * xmlrpc.inc: commented unused code used originally for escaping content\r
+\r
+       * xmlrpc.inc: commented deprecated methods xmlrpc_encode and xmlrpc_decode\r
+\r
+       * xmlrpc.inc: php_xmlrpc_encode: encode integer-indexed php arrays as xmlrpc\r
+       arrays instead of structs; if object given to encode is an xmlrpcval return it\r
+       instead of reencoding (makes easier calling encode on an array of xmlrpcvals)\r
+\r
+       * xmlrpcs.inc: added $debug field to server class; if false will prevent\r
+       the server from echoing debug info back to the client as xml comment\r
+\r
+       * xmlrpcs.inc: let the server add to the debug messages the complete request\r
+       payload received and (if php installed as apache module) http headers, so that\r
+       the client in debug mode can echo a complete fingerprint of the communication\r
+\r
+       * xmlrpcs.inc: changed API of ParseRequest method: now it cannot be called\r
+       without a 'data' parameter; added 2nd parameter (http encoding); changed the\r
+       call to this method from inside service() method\r
+\r
+       * xmlrpc.inc, xmlrpcs.inc: enable both server and client to parse compressed xml\r
+       (if php is compiled with zlib); client should also be able to decode chunked\r
+       http encoding\r
+\r
+       * xmlrpc.inc: add support for proxies (only basic auth supported); default port\r
+       is 8080 (if left unspecified)\r
+\r
+       * xmlrpc.inc: use lowercase for names of http headers received (makes using\r
+       them much simpler, since servers can use any upper/lowercase combination)\r
+\r
+       * xmlrpc.inc: bumped version number to '2.0 beta'\r
+\r
+2005-05-08  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * release of version 1.1\r
+\r
+2005-04-24  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpcs.inc: removed charset declaration from xml prologue of responses,\r
+       since we are now escaping all non-ascii chars in an encoding-independent way\r
+\r
+       * bug_http.xml: modified to exercise some extra functonality of the lib\r
+       (it should now be failed by the current PEAR implementation of the lib)\r
+\r
+       * xmlrpc.inc: bumped up rev. number to 1.1\r
+\r
+       * doc/xmlrpc_php.xml, doc/announce1_1.txt: documentation updates\r
+\r
+       * Makefile: updated to reflect new xml doc source, modified filelist\r
+\r
+2005-04-17  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * client.php, agesort.php, introspect.php, introspect_demo.php,\r
+       which.php, test.pl, test.py: use as default target the server.php page hosted\r
+       on phpxmlrpc.sf.net\r
+\r
+       * server.php: fix for register_globals off; refer to docs on phpxmlrpc.sf.net\r
+\r
+2005-04-15 Miles Lott <milos@groupwhere.org>\r
+\r
+       code formatting and comments\r
+\r
+2005-04-03  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: make use of global var $xmlrpcName in building User_Agent HTTP\r
+       header (in conjunction with $xmlrpcVersion)\r
+\r
+       * agesort.php, client.php, comment.php, dicuss.php, mail.php, server.php,\r
+       which.php: various janitorial fixes\r
+       + always html escape content received from xmlrpc server or from user input\r
+       + make the scripts run fine with register_globals off an register_long_arrays off\r
+       + always use the functions php_xmlrpc_en(de)code, even if the EPI extension\r
+       is not installed\r
+       + in mail.php, allow user to see script source even if support for .phps files\r
+       is not configured in the local web server\r
+\r
+       * testsuite.php: better detection of local webserver hostname for running tests\r
+       against (if the user did not supply a webserver name)\r
+\r
+2005-03-21  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpcs.inc: revert to a PHP3 compatible script (change '=& new' to '= new')\r
+\r
+       * xmlrpc.inc: revert to a PHP3 compatible script (lottsa fixes)\r
+\r
+       * testsuite.php: default to using local server as test target if no user\r
+       provided values are available instead of heddley.com server\r
+\r
+       * testsuite.php: play nice to PHP3 in retrieving user-passed values\r
+\r
+       * testsuite.php: fix constructor method name for a type of tests\r
+\r
+       * phpunit.php: fix all cases of call-time-pass-by-ref\r
+\r
+       * phpunit.php: rename Exception class to _Exception if the script is run with\r
+       PHP 5 (exception is a reserverd word)\r
+\r
+2005-03-19  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: fixed bug in new http header parsing code in case there is\r
+       no correct separator between response headers and body\r
+\r
+       * xmlrpc.inc: added recognizing and stripping of HTTP/1.1 100 response headers\r
+\r
+       * xmlrpc.inc: strip extra whitespace from response body, as well as any junk\r
+       that comes after the last </MethodResponse> tag. It allows the server code to\r
+       be put on public providers that add e.g. javascript advertising to served pages\r
+\r
+       * xmlrpc.inc: removed unused parts of code, trailing whitespace\r
+\r
+       * xmlrpc.inc: fix possible bug (?) in xmlrpc_ee for BOOLEAN values: true was\r
+       being handled differently than false\r
+\r
+       * testsuite.php: added a new file-based test to stress the response parsing\r
+       modifications recently introduced; enabled debugging for file based tests\r
+\r
+2005-03-15  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: fixed missing declaration of global vars in xmlrpc_dh,\r
+       sendpayloadhttps and sendpayloadhttp10\r
+\r
+       * xmlrpc.inc: changed error message for invalid responses: 'enable debugging'\r
+       is more clear that 'enabling debugging' (the user is being encouraged to do it)\r
+\r
+       * xmlrpc.inc: rewrote HTTP response header parsing. It should be more tolerant\r
+       of invalid headers, give more accurate error messages and be marginally faster,\r
+       too.\r
+\r
+       * xmlrpc.inc: cosmetic whitespace fixes and remove useless one-liners\r
+\r
+       * xmlrpc.inc: build a shorter PHP command line to be evaluated for rebuilding\r
+       values from parsed xml: use '$val =& nex xmlrpcval("value")' for string values\r
+       instead of '$val =& nex xmlrpcval("value", $xmlrpcString)'\r
+\r
+       * xmlrpc.inc: fix change introduced 2005/01/30 moving call to curl_close()\r
+       too early: it did not work on error situations\r
+\r
+       * testsuite.php: fix name of testAddingTest method, renamed testErrosString\r
+       into testErrorString and removed useless warning for register_globals=off case\r
+\r
+2005-02-27  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: do not echo XML parsing error to screen (it is already dumped\r
+       into error log)\r
+\r
+       * xmlrpc.inc: set hdrs field into response object in case of XML parsing error\r
+       (uniform behaviour with other responses)\r
+\r
+2005-02-26  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: use global var $xmlrpcVersion as number for user agent string\r
+\r
+       * xmlrpcs.inc: eliminate server side PHP warning and give back to caller\r
+       a better error msg in case the called method exists but no signature matches\r
+       the number of parameters\r
+\r
+2005-02-20  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: accept a + sign in front of floats / integers, since the spec\r
+       clearly mentions it\r
+\r
+       * xmlrpc.inc, xmlrpcs.inc: renamed function XmlEntities to xmlrpc_encode_entitites,\r
+       to avoid using the same name as an array already defined\r
+\r
+       * xmlrpc.inc: fix bug introduced with escaping of UTF8 chars in xmlrpc error\r
+       responses: correct behaviour is to escape chars inside serialize(), not when\r
+       calling the xmlrpcresp creator\r
+\r
+       * testsuite.php: made test suite more friendly to modern PHP configs, allowing\r
+       register_globals to be off and to set in the URL all testing parameters;\r
+       added tests for newly introduced fixes; renamed existing tests acording to the\r
+       docs inside phpunit.php (e.g. no subclass of TestCase should have a name\r
+       starting with test...)\r
+\r
+2005-02-19  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: accept patch 683153 by mah0: if timeout is set, allow all socket\r
+       operations to timeout at the given time, not only the socket connection\r
+\r
+2005-02-13  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: be tolerant to double values received in exponential notation:\r
+       even though the spec forbids their usage PHP is fine with them\r
+\r
+       * xmlrpc.inc: fix bug: new xmlrpcval('-1') was creating an empty value instead\r
+       of a string value!\r
+\r
+       * xmlrpc.inc, xmlrpcs.inc: fix the payload encoding changes introduced by\r
+       Andres Salomon on 2004-03-17: sending named html entities inside an xml chunk\r
+       makes it invalid, and thus renders the lib absolutely non-interoperable with\r
+       any other xmlrpc implementation; moreover the current implementation only ever\r
+       worked for non-ascii requests, while breaking client-parsing of responses\r
+       containing non-ascii chars.\r
+       The principle of using entities is preserved though, because it allows the\r
+       client to send correct xml regardless of php internal charset encoding vs.\r
+       xml request charset encoding, but using 'character references' instead.\r
+\r
+       * xmlrpc.inc: encode (non-ascii) chars into charset entities also for error\r
+       strings\r
+\r
+       * xmlrpcs.inc: encode (non-ascii) chars into charset entities also for debug\r
+       messages\r
+\r
+       * xmlrpcs.inc: added 'Accept-Charset' header in http request to let the server\r
+       know what kind of charset encoding we do expect to be used for responses\r
+\r
+       * xmlrpc.inc, xmlrpcs.inc: explicitly tell the xml parser what charset the\r
+       application expects to receive content in (notably strings). A new variable,\r
+       $xmlrpc_internalencoding, (defaulting to ISO-8859-1) defines what charset the\r
+       parser will use for passing back string xmlrpcvals to the PHP application\r
+       (both server-side and client-side).\r
+       This allows transparent usage of e.g. UTF-8 for encoding xml messages between\r
+       server and client and ISO-8859-1 for internal string handling.\r
+       ISO-8859-1 is, AFAIK, PHP internal encoding for all installs except\r
+       mbstring-enabled ones.\r
+\r
+2005-02-12  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpcs.inc: use '$var =& new(' construct to assign objects: on older versions\r
+       of PHP objects are first built then copied over if the ampersand is omitted.\r
+       Using it should make the code a little bit faster...\r
+\r
+       * doc/xmlrpc.php: update lib version number, release date in preparation for\r
+       next release\r
+\r
+       * makefile: update lib version number in preparation for next release\r
+\r
+       * xmlrpc.inc: split up parsing of xmlrpc INT and DOUBLE values. This allows\r
+       finer-grained control over valid values: now the '.' char is not allowed\r
+       any more inside int values.\r
+\r
+       * xmlrpc.inc: fix for bug #560303: ints and doubles starting with '0' chars are\r
+       no more parsed as octal values\r
+\r
+2005-01-30  Gaetano Giunta <giunta.gaetano@gmail.com>\r
+\r
+       * xmlrpc.inc: Modifed last change by Miles: the functions php_xmlrpc_encode\r
+       and php_xmlrpc_decode are now always defined, regardless of the existence of\r
+       XMLRPC-EPI.  This allows users to start using these functions as the 'default'\r
+       functions, and pave the way for future deprecation of xmlrpc_encode/encode\r
+       while maintaining a stable API.\r
+\r
+       * xmlrpc.inc: use '$var =& new(' construct to assign objects: on older versions\r
+       of PHP objects are first built then copied over if the ampersand is omitted.\r
+       Using it should make the code a little bit faster...\r
+\r
+       * xmlrpc.inc: close curl connection as soon as possible for https requests:\r
+       it could save some memory / resources.\r
+\r
+       * xmlrpc.inc: added some extra info in the PHP error log message generated\r
+       when an invalid xmlrpc integer/float value is encountered and we try to\r
+       deserialize it.\r
+\r
+       * xmlrpc.inc: added @ char before fsockopen to avoid echoing useless warnings\r
+       when connection to server fails; added the same to avoid echoing warnings when\r
+       deserializing data of an unknown type\r
+\r
+       * xmlrpc.inc: reset the _xh array on each xmlrpc call: otherwise a new array\r
+       member is created for each consecutive call and never destroyed, thus making it\r
+       impossible to build an xmlrpc-client daemon beacuse of memory leaking.\r
+\r
+       * xmlrpc.inc: declare global the variables that are used as 'constants',\r
+       so that xmlrpc.inc will work even if it is included from within a function\r
+\r
+2004-12-27  Miles Lott <milos@groupwhere.org>\r
+       * xmlrpc.inc: A new constant, XMLRPC_EPI_ENABLED, is defined depending on\r
+       the existence of the function, xmlrpc_decode.  This function will exist in\r
+       PHP if the      extension, XMLRPC-EPI (http://xmlrpc-epi.sourceforge.net), is\r
+       loaded.  It defines the functions xmlrpc_encode and xmlrpc_decode, which\r
+       will conflict with functions of the same name in xmlrpc.inc.  If this\r
+       extension is loaded, we instead use the names php_xmlrpc_encode and\r
+       php_xmlrpc_decode.  Please look at server.php, testsuite.php, etc., for\r
+       how this should be handled if using these functions.\r
+\r
+2003-04-17  Andres Salomon  <dilinger@voxel.net>\r
+       * xmlrpc.inc: encode strings using htmlentities() instead of\r
+       htmlspecialchars(), and add xmlrpc_html_entity_xlate().  This\r
+       should fix longstanding issues with sending weird chars (from\r
+       non-USASCII codesets like UTF-8, ISO-8859-1, etc) that caused\r
+       the xml parser to choke.  Multi-byte chars are now changed to\r
+       entities before sending, so that the xmlrpc server doesn't need\r
+       to know the encoding type of the POST data.\r
+       * xmlrpcs.inc: call xmlrpc_html_entity_xlate before parsing\r
+       request packet.  The parser chokes on unknown entities (the\r
+       entities created by htmlentities() are exactly that; html\r
+       entities, not xml entities), so they must be converted from\r
+       name form (&eacute;) to numerical form (&#233;).\r
+\r
+2003-01-12  Andres Salomon  <dilinger@voxel.net>\r
+\r
+       * released 1.0.99.2.\r
+       * Makefile: separate doc/Makefile a bit more from Makefile,\r
+       and add clean rules.\r
+\r
+2003-01-10  Andres Salomon  <dilinger@voxel.net>\r
+\r
+       * xmlrpc.inc: xmlrpcresp and parseResponse cleanups; variable\r
+       name renames ('xv' to 'val', for example), type checking, and\r
+       stricter default values.\r
+       * xmlrpc.inc: fix xmlrpcresp's faultcode; return -1 for FAULT\r
+       responses from the server whose faultcodes don't reflect any\r
+       errors.\r
+\r
+2003-01-08  Andres Salomon  <dilinger@voxel.net>\r
+\r
+       * xmlrpc.inc: rename $_xh[$parser]['ha'] to\r
+       $_xh[$parser]['headers'].\r
+       * xmlrpc.inc: fix bugs related to $_xh[$parser]['headers];\r
+       some places treated this as an array, others as a scalar.\r
+       Treat unconditionally as an array.  Also wrap header debugging\r
+       output in PRE tags.\r
+\r
+2002-12-17  Andres Salomon  <dilinger@voxel.net>\r
+\r
+       * released 1.0.99.\r
+       * Makefile: changed the tarball format/dist rule to a more\r
+       conventional form, as well as normal release updates.\r
+       * xmlrpc.inc: added setSSLVerifyPeer and setSSLVerifyHost; as\r
+       of curl 7.10, various certificate checks are done (by default).\r
+       The default for CURLOPT_SSL_VERIFYHOST is to ensure the common\r
+       name on the cert matches the provided hostname.  This breaks a\r
+       lot of stuff, so allow users to override it.\r
+       * doc/xmlrpc_php.sgml: updated documentation accordingly.\r
+\r
+2002-09-06  Geoffrey T. Dairiki  <dairiki@dairiki.org>\r
+\r
+       Add support for system.multicall() to both the client\r
+       and the server.\r
+\r
+       * testsuite.php: Add new tests 'testServerMulticall',\r
+       and 'testClientMulticall'.\r
+\r
+       * xmlrpc.inc: Added new error messages for system.multicall().\r
+       * xmlrpcs.inc: Added new procedure call system.multicall().\r
+       See http://www.xmlrpc.com/discuss/msgReader$1208 for details.\r
+\r
+       * xmlrpc.inc: Added system.multicall functionality to\r
+       xmlrpc_client.  xmlrpc_client::send can now take an array of\r
+       xmlrpcmsg's as an argument.  In that case it will attempt\r
+       to execute the whole array of procure calls in a single\r
+       HTTP request using system.multicall().  (If that attempt fails,\r
+       then the calls will be excuted one at a time.)  The return\r
+       value will be an array of xmlrpcresp's (or 0 upon transport\r
+       failure.)\r
+\r
+2001-11-29  Edd Dumbill  <edd@usefulinc.com>\r
+\r
+       * xmlrpc.inc: fixed problem with processing HTTP headers that\r
+       broke any payload with more than one consecutive newline in it.\r
+       also initialise the 'ac' array member to empty string at start.\r
+       * testsuite.php: added unit test to exercise above bug\r
+       * xmlrpcs.inc: fixed uninitialized variable $plist\r
+\r
+2001-09-25  Edd Dumbill  <edd@usefulinc.com>\r
+\r
+       * xmlrpc.inc: applied urgent security fixes as identified by Dan\r
+       Libby\r
+\r
+2001-08-27  Edd Dumbill  <edd@usefulinc.com>\r
+\r
+       * xmlrpc.inc: Merged in HTTPS support from Justin Miller, with a\r
+       few additions for better traceability of failure conditions. Added\r
+       small fix from Giancarlo Pinerolo. Bumped rev to 1.0. Changed\r
+       license to BSD license.\r
+\r
+2001-06-15  Edd Dumbill  <edd@usefulinc.com>\r
+\r
+       * xmlrpcs.inc: Added \r into return MIME headers for server class\r
+\r
+2001-04-25  Edd Dumbill  <edd@usefulinc.com>\r
+\r
+       * server.php: Added interop suite of methods.\r
+\r
+2001-04-24  Edd Dumbill  <edd@usefulinc.com>\r
+\r
+       * testsuite.php: added in test case for string handling bug.\r
+\r
+       * xmlrpc.inc: merged in minor fixes from G Giunta to fix\r
+       noninitialization. Created new method, getval(), which includes\r
+       experimental support for recreating nested arrays, from Giunta and\r
+       Sofer. Fixed string handling bug where characters after </string>\r
+       but before </value> weren't ignored. Added in support for native\r
+       boolean type into xmlrpc_encode (Giunta).\r
+\r
+       * xmlrpcs.inc: updated copyright notice\r
+\r
+2001-01-15  Edd Dumbill  <edd@usefulinc.com>\r
+\r
+       * xmlrpc.inc: fixed bug with creation of booleans. Put checks in\r
+       to ensure that numbers were really numeric. Fixed bug with\r
+       non-escaping of dollar signs in strings.\r
+\r
+       * testsuite.php: created test suite.\r
+\r
+2000-08-26  Edd Dumbill  <edd@usefulinc.com>\r
+\r
+       * xmlrpcs.inc: added xmlrpc_debugmsg() function which outputs\r
+       debug information in comments inside the return payload XML\r
+\r
+       * xmlrpc.inc: merged in some changes from Dan Libby which fix up\r
+       whitespace handling.\r
+\r
+       * xmlrpcs.inc: added Content-length header on response (bug from\r
+       Jan Varga <varga@utcru.sk>. This means you can no longer print\r
+       during processing\r
+\r
+       * xmlrpc.inc: changed ereg_replace to str_replace in several\r
+       places (thanks to Dan Libby <dan@libby.com> for this).\r
+\r
+       * xmlrpc.inc: added xmlrpc_encode() and xmlrpc_decode() from Dan\r
+       Libby--these helper routines make it easier to work in native PHP\r
+       data structures.\r
+\r
+2000-07-21  Edd Dumbill  <edd@usefulinc.com>\r
+\r
+       * xmlrpc.inc: added xmlrpc_client::setCredentials method to pass\r
+       in authorization information, and modified sendPayload* methods to\r
+       send this OK. Thanks to Grant Rauscher for the impetus to do this.\r
+       Also, made the client send empty <params></params> if there are no\r
+       parameters set by the user.\r
+\r
+       * doc/xmlrpc_php.sgml: updated documentation to reflect recent\r
+       changes\r
+\r
+\r
+2000-07-18  Edd Dumbill  <edd@usefulinc.com>\r
+\r
+       * server.php: added examples.invertBooleans method to server as a\r
+       useful test method for boolean values.\r
+\r
+       * xmlrpc.inc: rearranged the way booleans are handled to fix\r
+       outstanding problems. Fixed calling addScalar() on arrays so it\r
+       works. Finally fixed backslashification issues to remove the\r
+       problem will dollar signs disappearing.\r
+\r
+       * booltest.php: really fixed booleans this time.\r
+\r
+2000-06-03  Edd Dumbill  <edd@usefulinc.com>\r
+\r
+       * xmlrpcs.inc: made signature verification more useful - now\r
+       returns what it found was wrong\r
+\r
+       * xmlrpc.inc: fixed bug with decoding dateTimes. Also fixed a bug\r
+       which meant a PHP syntax error happened when attempting to receive\r
+       empty arrays or structs. Also fixed bug with booleans always being\r
+       interpreted as 'true'.\r
+\r
+       * server.php: Added validator1 suite of tests to test against\r
+       validator.xmlrpc.com\r
+\r
+\r
+2000-05-06  Edd Dumbill  <edd@usefulinc.com>\r
+\r
+       * released 1.0b6\r
+\r
+       * added test.pl and test.py, Perl and Python scripts that exercise\r
+       server.php somewhat (but not a lot)\r
+\r
+       * added extra fault condition for a non 200 OK response from the\r
+       remote server.\r
+\r
+       * added iso8601_encode() and iso8601_decode() to give some support\r
+       for passing dates around. They translate to and from UNIX\r
+       timestamps. Updated documentation accordingly.\r
+\r
+       * fixed string backslashification -- was previously a little\r
+       overzealous! new behavior is '\' --> '\\' and '"' -->\r
+       '\"'. Everything else gets left alone.\r
+\r
+2000-04-12  Edd Dumbill  <edd@usefulinc.com>\r
+\r
+       * updated and bugfixed the documentation\r
+\r
+       * fixed base 64 encoding to only happen at serialize() time,\r
+       rather than when a base64 value is created. This fixes the double\r
+       encoding bug reported by Nicolay Mausz\r
+       <castor@flying-dog.com>. The same approach ought to be taken with\r
+       encoding XML entities in the data - this is a TODO.\r
+\r
+       * integrated further code from Peter Kocks: used his new code for\r
+       send(), adding a second, optional, parameter which is a timeout\r
+       parameter to fsockopen()\r
+\r
+1999-10-11  Edd Dumbill  <edd@usefulinc.com>\r
+\r
+       * added bug fixes from Peter Kocks <peter.kocks@baygate.com>\r
+\r
+1999-10-10  Edd Dumbill  <edd@usefulinc.com>\r
+\r
+       * updated the documentation\r
+\r
+1999-10-08  Edd Dumbill  <edd@usefulinc.com>\r
+\r
+       * added system.* methods and dispatcher, plus documentation\r
+\r
+       * fixed bug which meant request::getNumParams was returning an\r
+       incorrect value\r
+\r
+       * added signatures into the dispatch map. This BREAKS\r
+       COMPATIBILITY with previous releases of this code\r
+\r
+1999-08-18  Edd Dumbill  <edd@usefulinc.com>\r
+\r
+       * made entity encoding and decoding transparent now on string\r
+       passing.\r
+\r
+       * de-globalised the globals in the parse routines, using an\r
+       associative array to hold all parser state $_xh\r
+\r
+       * changed default input encoding to be UTF-8 to match expectation\r
+\r
+       * separated out parseResponse into parseResponse and\r
+       parseResponseFile so that you can call parseResponse on a string\r
+       if you have one handy\r
+\r
+1999-07-20  Edd Dumbill  <edd@usefulinc.com>\r
+\r
+       * Moved documentation into Docbook format\r
+\r
+1999-07-19  Edd Dumbill  <edd@usefulinc.com>\r
+\r
+       * Added an echo server into server.php and echotest.php, a client\r
+       which will exercise the new echo routine.\r
+\r
+       * Added test for no valid value returned: in this case will now\r
+       throw the error "invalid payload"\r
+\r
+       * Added serialize() method to xmlrpcresp to return a string with\r
+       the response serialized as XML\r
+\r
+       * Added automatic encoding and decoding for base64 types\r
+\r
+       * Added setDebug() method to client to enable HTML output\r
+       debugging in the client\r
+\r
+1999-07-08  Edd Dumbill  <edd@usefulinc.com>\r
+\r
+       * Improved XML parse error reporting on the server side to send it\r
+       back in a faultCode packet. expat errors now begin at 100\r
+\r
+1999-07-07  Edd Dumbill  <edd@usefulinc.com>\r
+\r
+       * Changed the structmem and arraymem methods of xmlrpcval to always\r
+       return xmlrpc vals whether they referred to scalars or complex\r
+       types.\r
+\r
+       * Added the server class and demonstrations\r
+\r
+       * Fixed bugs in the XML parsing and reworked it\r
+\r
+\r
+$Id: ChangeLog,v 1.96 2009/03/16 19:39:11 ggiunta Exp $\r
diff --git a/Makefile b/Makefile
new file mode 100644 (file)
index 0000000..5a04c35
--- /dev/null
+++ b/Makefile
@@ -0,0 +1,119 @@
+# Makefile for phpxmlrpc library\r
+# $Id: Makefile,v 1.37 2008/03/06 22:37:19 ggiunta Exp $\r
+\r
+### USER EDITABLE VARS ###\r
+\r
+# path to PHP executable, preferably CLI version\r
+PHP=/usr/local/bin/php\r
+\r
+# path were xmlrpc lib files will be copied to\r
+PHPINCLUDEDIR=/usr/local/lib/php\r
+\r
+# mkdir is a thorny beast under windows: make sure we can not use the cmd version, running eg. "make MKDIR=mkdir.exe"\r
+MKDIR=mkdir\r
+\r
+\r
+#### DO NOT TOUCH FROM HERE ONWARDS ###\r
+\r
+# recover version number from code\r
+# thanks to Firman Pribadi for unix command line help\r
+export VERSION=$(shell egrep "\$GLOBALS *\[ *'xmlrpcVersion' *\] *= *'" xmlrpc.inc | sed -r s/"(.*= *' *)([0-9a-zA-Z.-]+)(.*)"/\\2/g )\r
+\r
+LIBFILES=xmlrpc.inc xmlrpcs.inc xmlrpc_wrappers.inc compat/*.php\r
+\r
+EXTRAFILES=test.pl \\r
+ test.py \\r
+ rsakey.pem \\r
+ workspace.testPhpServer.fttb\r
+\r
+DEMOFILES=vardemo.php \\r
+ demo1.txt \\r
+ demo2.txt \\r
+ demo3.txt\r
+\r
+DEMOSFILES=discuss.php \\r
+ server.php \\r
+ proxy.php\r
+\r
+DEMOCFILES=agesort.php \\r
+ client.php \\r
+ comment.php \\r
+ introspect.php \\r
+ mail.php \\r
+ simple_call.php \\r
+ which.php \\r
+ wrap.php \\r
+ zopetest.php\r
+\r
+TESTFILES=testsuite.php \\r
+ benchmark.php \\r
+ parse_args.php \\r
+ phpunit.php \\r
+ verify_compat.php \\r
+ PHPUnit/*.php\r
+\r
+INFOFILES=Changelog \\r
+ Makefile \\r
+ NEWS \\r
+ README\r
+\r
+DEBUGGERFILES=debugger/index.php \\r
+ debugger/action.php \\r
+ debugger/common.php \\r
+ debugger/controller.php\r
+\r
+\r
+all: install\r
+\r
+install:\r
+       cd lib && cp ${LIBFILES} ${PHPINCLUDEDIR}\r
+       @echo Lib files have been copied to ${PHPINCLUDEDIR}\r
+       cd doc && $(MAKE) install\r
+\r
+test:\r
+       cd test && ${PHP} -q testsuite.php\r
+\r
+\r
+### the following targets are to be used for library development ###\r
+\r
+# make tag target: tag existing working copy as release in cvs.\r
+# todo: convert dots in underscore in $VERSION\r
+tag:\r
+       cvs -q tag -p release_${VERSION}\r
+\r
+dist: xmlrpc-${VERSION}.zip xmlrpc-${VERSION}.tar.gz\r
+\r
+xmlrpc-${VERSION}.zip xmlrpc-${VERSION}.tar.gz: ${LIBFILES} ${DEBUGGERFILES} ${INFOFILES} ${TESTFILES} ${EXTRAFILES} ${DEMOFILES} ${DEMOSFILES} ${DEMOCFILES}\r
+       @echo ---${VERSION}---\r
+       rm -rf xmlrpc-${VERSION}\r
+       ${MKDIR} xmlrpc-${VERSION}\r
+       ${MKDIR} xmlrpc-${VERSION}/demo\r
+       ${MKDIR} xmlrpc-${VERSION}/demo/client\r
+       ${MKDIR} xmlrpc-${VERSION}/demo/server\r
+       cp --parents ${DEMOFILES} xmlrpc-${VERSION}/demo\r
+       cp --parents ${DEMOCFILES} xmlrpc-${VERSION}/demo/client\r
+       cp --parents ${DEMOSFILES} xmlrpc-${VERSION}/demo/server\r
+       ${MKDIR} xmlrpc-${VERSION}/test\r
+       ${MKDIR} xmlrpc-${VERSION}/test/PHPUnit\r
+       cp --parents ${TESTFILES} xmlrpc-${VERSION}/test\r
+       ${MKDIR} xmlrpc-${VERSION}/extras\r
+       cp --parents ${EXTRAFILES} xmlrpc-${VERSION}/extras\r
+       ${MKDIR} xmlrpc-${VERSION}/lib\r
+       ${MKDIR} xmlrpc-${VERSION}/lib/compat\r
+       cp --parents ${LIBFILES} xmlrpc-${VERSION}/lib\r
+       ${MKDIR} xmlrpc-${VERSION}/debugger\r
+       cp ${DEBUGGERFILES} xmlrpc-${VERSION}/debugger\r
+       cp ${INFOFILES} xmlrpc-${VERSION}\r
+       cd doc && $(MAKE) dist\r
+       find xmlrpc-${VERSION} -type f ! -name "*.fttb" ! -name "*.pdf" ! -name "*.gif" -exec dos2unix {} \;\r
+       -rm xmlrpc-${VERSION}.zip xmlrpc-${VERSION}.tar.gz\r
+       tar -cvf xmlrpc-${VERSION}.tar xmlrpc-${VERSION}\r
+       gzip xmlrpc-${VERSION}.tar\r
+       zip -r xmlrpc-${VERSION}.zip xmlrpc-${VERSION}\r
+\r
+doc:\r
+       cd doc && $(MAKE) doc\r
+\r
+clean:\r
+       rm -rf xmlrpc-${VERSION} xmlrpc-${VERSION}.zip xmlrpc-${VERSION}.tar.gz\r
+       cd doc && $(MAKE) clean\r
diff --git a/NEWS b/NEWS
new file mode 100644 (file)
index 0000000..fb02483
--- /dev/null
+++ b/NEWS
@@ -0,0 +1,292 @@
+XML-RPC for PHP version 2.2.1 - 2008/03/06\r
+\r
+This release corrects all bugs that have been reported and sucesfully reproduced.\r
+It is the last release of the library that will support PHP 4.\r
+\r
+* fixed: work aroung bug in php 5.2.2 which broke support of HTTP_RAW_POST_DATA\r
+* fixed: is_dir parameter of setCaCertificate() method is reversed\r
+* fixed: a php warning in xmlrpc_client creator method\r
+* fixed: parsing of '1e+1' as valid float\r
+* fixed: allow errorlevel 3 to work when prev. error handler was a static method\r
+* fixed: usage of client::setcookie() for multiple cookies in non-ssl mode\r
+* improved: support for CP1252 charset is not part or the library but almost possible\r
+* improved: more info when curl is enabled and debug mode is on\r
+\r
+\r
+XML-RPC for PHP version 2.2 - 2007/02/25\r
+\r
+This release corrects a couple of bugs and adds a few minor features.\r
+\r
+* fixed: debugger errors on php installs with magic_quotes_gpc on\r
+* fixed: support for https connections via proxy\r
+* fixed: wrap_xmlrpc_method() generated code failed to properly encode php objects\r
+* improved: slightly faster encoding of data which is internally UTF-8\r
+* improved: debugger always generates a 'null' id for jsonrpc if user omits it\r
+* new: debugger can take advantage of a graphical value builder\r
+  (it has to be downloaded separately, as part of jsxmlrpc package)\r
+* new: support for the <NIL/> xmlrpc extension\r
+* new: server support for the system.getCapabilities xmlrpc extension\r
+* new: wrap_xmlrpc_method() accepts two new options: debug and return_on_fault\r
+\r
+\r
+XML-RPC for PHP version 2.1 - 2006/08/28\r
+\r
+This release corrects quite a few bugs and adds some interesting new features.\r
+There is a minor security enhancement and overall speedup too.\r
+\r
+It has been tested with PHP 4.0.5 up to 4.4.4 and 5.1.5.\r
+Please note that 404pl1 is NOT supported, and has not been since 2.0.\r
+\r
+*** PLASE READ CAREFULLY BELOW ***\r
+\r
+CHANGES THAT MIGHT AFFECT DEPLOYED APPLICATIONS:\r
+\r
+The wrap_php_function and wrap_xmlrpc_method functions have been moved out of\r
+the base library file xmlrpc.inc into a file of their own: xmlrpc_wrappers.inc.\r
+You will have to include() / require() it in your scripts if you have been using\r
+those functions.\r
+\r
+For increased security, the automatic rebuilding of php object instances out of\r
+received xmlrpc structs in wrap_xmlrpc_method() has been disabled (but it can be\r
+optionally reenabled).\r
+\r
+The constructor of xmlrpcval() values has seen major changes, and it will not\r
+throw a php warning anymore when invoked using an unknown xmlrpc type: the\r
+error will only be written to php error log. Also new xmlrpcval('true', 'boolean')\r
+is not supported anymore.\r
+\r
+MAJOR IMPROVEMENTS:\r
+\r
+The new function php_xmlrpc_decode_xml() will take the xml representation of\r
+either an xmlrpc request, response or single value and return the corresponding\r
+php-xmlrpc object instance.\r
+\r
+Both wrap_php_function() and wrap_xmlrpc_method() functions accept many more\r
+options to fine tune their behaviour, including one to return the php code to\r
+be saved and later used as standalone php script.\r
+\r
+A new function wrap_xmlrpc_server() has been added, to wrap all (or some) of the\r
+methods exposed by a remote xmlrpc server into a php class.\r
+\r
+Lib internals have been modified to provide better support for grafting extra\r
+functionality on top of it. Stay tuned for future releases of the EXTRAS package.\r
+\r
+Last but not least a new file has been added: verify_compat.php, to help users\r
+diagnose the level of compliance of the current php install with the library.\r
+\r
+CHANGELOG IN DETAIL:\r
+\r
+* fixed bug 1311927: client not playing nice with some proxy/firewall on ports != 80\r
+* fixed bug 1334340: all ereg_ functions have been replaced with corresponding preg_\r
+* fixed bug: wrong handling of 'deflate' http encoding, both server and client side\r
+* fixed bug: sending compressed responses when php output compression is enabled was not working\r
+* fixed bug: addarray() and addstruct() where not returning 1 when adding data to already initialized values\r
+* fixed bug: non-ascii chars used in struct element names where not being encoded correctly\r
+* restored compatibility with php 4.0.5 (for those poor souls still stuck on it)\r
+* server->service() now returns either the payload or xmlrpcresp instance\r
+* server->add_to_map() now accepts methods with no param definitions\r
+* added new function: php_xmlrpc_decode_xml()\r
+* added new function: wrap_xmlrpc_server()\r
+* major improvements and security enhancements to wrap_php_function() and wrap_xmlrpc_method()\r
+* documentation for single parameters of exposed methods can be added to the dispatch map\r
+  (and turned into html docs in conjunction with a future release of the extras package)\r
+* full response payload is saved into xmlrpcresp object for further debugging\r
+* stricter parsing of incmoing xmlrpc messages: two more invalid cases are now detected\r
+  (double data element inside array and struct/array after scalar inside value element)\r
+* debugger can now generate code that wraps a remote method into php function (works for jsonrpc, too)\r
+* debugger has better support for being activated via a single GET call (for integration into other tools?)\r
+* more logging of errors in a lot of situations\r
+* javadoc documentation of lib files almost complete\r
+* the usual amount of new testcases in the testsuite\r
+* many performance tweaks and code cleanups\r
+* added foundation for emulating the API of the xmlrpc extension (extras package needed)\r
+\r
+\r
+XML-RPC for PHP version 2.0 - 2006/04/24\r
+\r
+I'm pleased to announce XML-RPC for PHP version 2.0, final.\r
+\r
+With respect to the last release candidate, this release corrects a few small\r
+bugs and adds a couple of new features: more authentication options (digest and\r
+ntlm for servers, ntlm for proxies, and some https custom certificates stuff);\r
+all the examples have been reviewed and some demo files added,\r
+including a ready-made xmlrpc proxy (useful e.g. for ajax calls, when the xmlrpc\r
+client is a browser); the server logs more warning messages for incorrect situations;\r
+both client and server are more tolerant of commonly-found mistakes.\r
+The debugger has been upgraded to reflect the new client capabilities.\r
+\r
+In greater detail:\r
+\r
+* fixed bug: method xmlrpcval::structmemexists($value) would not work\r
+* fixed bug: wrap_xmlrpc_method would fail if invoked with a client object that\r
+  has return_type=phpvals\r
+* fixed bug: in case of call to client::multicall without fallback and server error\r
+* fixed bug: recursive serialization of xmlrpcvals loosing specified UTF8 charset\r
+* fixed bug: serializing to ISO-8859-1 with php 5 would raise an error if non-ascii\r
+  chars where found when decoding\r
+* new: client can use NTLM and Digest authentication methods for https and http 1.1\r
+  connections; authentication to proxy can be set to NTLM, too\r
+* new: server tolerates user functions returning a single xmlrpcval object instead\r
+  of an xmlrpcresp\r
+* new: server does more checks for presence and correct return type of user\r
+  coded method handling functions, and logs inconsistencies to php error log\r
+* new: client method SetCaCertificate($cert, $is_dir) to validate server against\r
+* new: both server and client tolerate receiving 'true' and 'false' for bool values\r
+  (which btw are not valid according to the xmlrpc spec)\r
+\r
+\r
+XML-RPC for PHP version 2.0RC3 - 2006/01/22\r
+\r
+This release corrects a few bugs and adds some interesting new features.\r
+It has been tested with PHP up to 4.4.2 and 5.1.2.\r
+\r
+* fixed bug: server not recognizing clients that declare support for http compression\r
+* fixed bug: serialization of new xmlrpcval (8, 'string') when internal encoding\r
+  set to UTF-8\r
+* fixed bug: serialization of new xmlrpcval ('hello', 'int') would produce\r
+  invalid xml-rpc\r
+* new: let the server accept 'class::method' syntax in the dispatch map\r
+* new: php_xmlrpc_decode() can decode xmlrpcmessage objects\r
+* new: both client and server can specify a charset to be used for serializing\r
+  values instead of the default 'US-ASCII+xml-entities-for-other-characters'.\r
+  Values allowed: ISO-8859-1 and UTF-8\r
+* new: the server object can register 'plain' php functions instead of functions\r
+  that accept a single parameter of type xmlrpcmsg. Faster, uses less memory\r
+  (but comes with minor drawbacks as well, read the manual for more details)\r
+* new: client::setDebug(2) can be used to have the request payload printed to\r
+  screen before being sent\r
+* new: server::service($data) lets user parse data other than POST body, for\r
+  easier testing / subclassing\r
+* changed: framework-generated debug messages are sent back by the server base64\r
+  encoded, to avoid any charset/xml compatibility problem\r
+* other minor fixes\r
+\r
+The usual refactoring of a lot of (private) methods has taken place, with new\r
+parameters added to some functions.\r
+Javadoc documentation has been improved a lot.\r
+The HTML documentation has been shuffled around a bit, hoping to give it a more\r
+logical organization.\r
+\r
+The experimental support for the JSON protocol has been removed, and will be\r
+packaged as a separate download with some extra very interesting stuff (human\r
+readable auto-generated documentation, anyone?).\r
+\r
+\r
+XML-RPC for PHP version 2.0RC2 - 2005/11/22\r
+\r
+This release corrects a few bugs and adds basically one new method for better\r
+HTTPS support:\r
+\r
+ * fixed two bugs that prevented xmlrpc calls to take place over https\r
+ * fixed two bugs that prevented proper recognition of xml character set\r
+   when it was declared inside the xml prologue\r
+ * added xmlrpc_client::setKey($key, $keypass) method, to allow using client\r
+   side certificates for https connections\r
+ * fixed bug that prevented proper serialization of string xmlrpcvals when\r
+   $xmlrpc_internalencoding was set to UTF-8\r
+ * fixed bug in xmlrpc_server::echoInput() (and marked method as deprecated)\r
+ * correctly set cookies/http headers into xmlrpcresp objects even when the\r
+   sned() method call fails for some reason\r
+ * added a benchmark file in the testsuite directory\r
+\r
+A couple of (private/protected) methods have been refactored, as well as a\r
+couple of extra parameters added to some (private) functions - this has no\r
+impact on the public API and should be of interest primarily to people extending\r
+/ subclassing the lib.\r
+\r
+There is also new, PARTIAL support for the JSON-RPC protocol, implemented in\r
+two files in the extras dir (more info about json-rpc at http://json-rpc.org)\r
+\r
+\r
+XML-RPC for PHP version 2.0RC1 - 2005/10/03\r
+\r
+I'm pleased to announce XML-RPC for PHP version 2.0, release candidate 1.\r
+\r
+This release introduces so many new features it is almost impossible to list them\r
+here, making the library finally on pair with, if not more advanced than, any other\r
+similar offer (e.g. the PEAR XMLRPC package or the Incutio IXR library).\r
+No, really, trust me.\r
+\r
+The minimum supported PHP version is now 4.2 - natively - or 4.0.4pl1 - by usage of\r
+a couple of compatibility classes (code taken from PEAR php_compat package).\r
+\r
+The placement of files and directories in the distribution has been deeply modified,\r
+in the hope of making it more clear, now that the file count has increased.\r
+I hope you find it easy.\r
+\r
+Support for "advanced" HTTP features such as cookies, proxies and keep-alives has\r
+been added at last.\r
+\r
+It is now much easier to convert between xmlrpcval objects and php values, and\r
+in fact php_xmlrpc_encode and php_xmlrpc_decode are now the recommended methods\r
+for all cases, except when encoding base64 data.\r
+\r
+Two new (experimental) functions have been added, allowing automagic conversion\r
+of a php function into an xmlrpc method to be exposed and vice-versa.\r
+\r
+PHP objects can be now automatically serialized as xmlrpc struct values and\r
+correctly deserialized on the other end of the transmission, provided that the\r
+same class definition is present on both sides and no object members are of\r
+type resource.\r
+\r
+A lot of the existing class methods have been overloaded with extra parameters\r
+or new functionality, and a few added ex-novo, making usage easier than ever.\r
+\r
+A complete debugger solution is included in the distribution. It needs a web server\r
+to run (a freely available version of the same debugger is accessible online, it\r
+can be found at http://phpxmlrpc.sourceforge.net).\r
+\r
+For a more detailed list of changes, please read carefully chapter 2 of the\r
+included documentation, or, even better, take a look at the source code, which\r
+is commented in javadoc style quite a bit.\r
+\r
+\r
+XML-RPC for PHP version 1.2 - 2005/08/14\r
+\r
+This removes all use of eval(), which is a potential security problem.\r
+All users are encouraged to upgrade as soon as possible.\r
+As of this release we are no longer php3-compatible.\r
+\r
+\r
+XML-RPC for PHP version 1.1.1 - 2005/06/30\r
+\r
+This is a security vulnerability fix release.\r
+All users are invited to upgrade as soon as possible.\r
+\r
+\r
+XML-RPC for PHP version 1.1 - 2005/05/03\r
+\r
+I'm pleased to announce XML-RPC for PHP version 1.1\r
+It's taken two years to get to the this point, but here we are, finally.\r
+\r
+This is a bugfix and maintenance release. No major new features have been added.\r
+All known bugs have been ironed out, unless fixing would have meant breaking\r
+the API.\r
+The code has been tested with PHP 3, 4 and 5, even tough PHP 4 is the main\r
+development platform (and some warnings will be emitted when runnning PHP5).\r
+\r
+Notheworthy changes include:\r
+\r
+ * do not clash any more with the EPI xmlrpc extension bundled with PHP 4 and 5\r
+ * fixed the unicode/charset problems that have been plaguing the lib for years\r
+ * proper parsing of int and float values prepended with zeroes or the '+' char\r
+ * accept float values in exponential notation\r
+ * configurable http user-agent string\r
+ * use the same timeout on client socket reads as used for connecting\r
+ * more explicative error messages in xmlrpcresponse in many cases\r
+ * much more tolerant parsing of malformed http responses from xmlrpc servers\r
+ * fixed memleak that prevented the client to be used in never-ending scripts\r
+ * parse bigger xmlrpc messages without crashing (1MB in size or more)\r
+ * be tolerant to xmlrpc responses generated on public servers that add\r
+   javascript advertising at the end of hosted content\r
+ * the lib generates quite a few less PHP warnings during standard operation\r
+\r
+This is the last release that will support PHP 3.\r
+The next release will include better support for PHP 5 and (possibly) a slew of\r
+new features.\r
+\r
+The changelog is available at:\r
+http://cvs.sourceforge.net/viewcvs.py/phpxmlrpc/xmlrpc/ChangeLog?view=markup\r
+\r
+Please report bugs to the XML-RPC PHP mailing list or to the sourceforge project\r
+pages at http://sourceforge.net/projects/phpxmlrpc/\r
diff --git a/README b/README
new file mode 100644 (file)
index 0000000..65a347a
--- /dev/null
+++ b/README
@@ -0,0 +1,13 @@
+NAME: XMLRPC FOR PHP\r
+\r
+DESCRIPTION: A php library for building xmlrpc clients and servers\r
+\r
+\r
+\r
+HTML documentation can be found in the doc/ directory.\r
+\r
+Recent changes in the ChangeLog\r
+\r
+Use of this software is subject to the terms in doc/index.html\r
+\r
+The passphrase for the rsakey.pem certificate is 'test'.\r
diff --git a/debugger/action.php b/debugger/action.php
new file mode 100644 (file)
index 0000000..7d4b668
--- /dev/null
@@ -0,0 +1,527 @@
+<?php
+/**
+ * @version $Id$
+ * @author Gaetano Giunta
+ * @copyright (C) 2005-2008 G. Giunta
+ * @license code licensed under the BSD License: http://phpxmlrpc.sourceforge.net/license.txt
+ *
+ * @todo switch params for http compression from 0,1,2 to values to be used directly
+ * @todo use ob_start to catch debug info and echo it AFTER method call results?
+ * @todo be smarter in creating client stub for proxy/auth cases: only set appropriate property of client obj
+ **/
+
+?>
+<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
+    "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
+<html xmlns="http://www.w3.org/1999/xhtml">
+<head>
+  <title>XMLRPC Debugger</title>
+  <meta name="robots" content="index,nofollow" />
+<style type="text/css">
+<!--
+body {border-top: 1px solid gray; padding: 1em; font-family: Verdana, Arial, Helvetica; font-size: 8pt;}
+h3 {font-size: 9.5pt;}
+h2 {font-size: 12pt;}
+.dbginfo {padding: 1em; background-color: #EEEEEE; border: 1px dashed silver; font-family: monospace;}
+#response {padding: 1em; margin-top: 1em; background-color: #DDDDDD; border: 1px solid gray; white-space: pre; font-family: monospace;}
+table {padding: 2px; margin-top: 1em;}
+th {background-color: navy; color: white; padding: 0.5em;}
+td {padding: 0.5em; font-family: monospace;}
+td form {margin: 0;}
+.oddrow {background-color: #EEEEEE;}
+.evidence {color: blue;}
+#phpcode { background-color: #EEEEEE; padding: 1em; margin-top: 1em;}
+-->
+</style>
+</head>
+<body>
+<?php
+
+  include(getcwd().'/common.php');
+  if ($action)
+  {
+
+    // make sure the script waits long enough for the call to complete...
+    if ($timeout)
+      set_time_limit($timeout+10);
+
+    include('xmlrpc.inc');
+    if ($wstype == 1)
+    {
+      @include('jsonrpc.inc');
+      if (!class_exists('jsonrpc_client'))
+      {
+        die('Error: to debug the jsonrpc protocol the jsonrpc.inc file is needed');
+      }
+      $clientclass = 'jsonrpc_client';
+      $msgclass = 'jsonrpcmsg';
+      $protoname = 'JSONRPC';
+    }
+    else
+    {
+      $clientclass = 'xmlrpc_client';
+      $msgclass = 'xmlrpcmsg';
+      $protoname = 'XMLRPC';
+    }
+
+    if ($port != "")
+    {
+      $client =& new $clientclass($path, $host, $port);
+      $server = "$host:$port$path";
+    } else {
+      $client =& new $clientclass($path, $host);
+      $server = "$host$path";
+    }
+    if ($protocol == 2)
+    {
+      $server = 'https://'.$server;
+    }
+    else
+    {
+      $server = 'http://'.$server;
+    }
+    if ($proxy != '') {
+      $pproxy = split(':', $proxy);
+      if (count($pproxy) > 1)
+        $pport = $pproxy[1];
+      else
+        $pport = 8080;
+      $client->setProxy($pproxy[0], $pport, $proxyuser, $proxypwd);
+    }
+
+    if ($protocol == 2)
+    {
+      $client->setSSLVerifyPeer($verifypeer);
+      $client->setSSLVerifyHost($verifyhost);
+      if ($cainfo)
+      {
+        $client->setCaCertificate($cainfo);
+      }
+      $httpprotocol = 'https';
+    }
+    else if ($protocol == 1)
+      $httpprotocol = 'http11';
+    else
+      $httpprotocol = 'http';
+
+    if ($username)
+      $client->setCredentials($username, $password, $authtype);
+
+    $client->setDebug($debug);
+
+    switch ($requestcompression) {
+      case 0:
+        $client->request_compression = '';
+        break;
+      case 1:
+        $client->request_compression = 'gzip';
+        break;
+      case 2:
+        $client->request_compression = 'deflate';
+        break;
+    }
+
+    switch ($responsecompression) {
+      case 0:
+        $client->accepted_compression = '';
+        break;
+      case 1:
+        $client->accepted_compression = array('gzip');
+        break;
+      case 2:
+        $client->accepted_compression = array('deflate');
+        break;
+      case 3:
+        $client->accepted_compression = array('gzip', 'deflate');
+        break;
+    }
+
+    $cookies = explode(',', $clientcookies);
+    foreach ($cookies as $cookie)
+    {
+      if (strpos($cookie, '='))
+      {
+        $cookie = explode('=', $cookie);
+        $client->setCookie(trim($cookie[0]), trim(@$cookie[1]));
+      }
+    }
+
+    $msg = array();
+    switch ($action) {
+
+      case 'wrap':
+        @include('xmlrpc_wrappers.inc');
+        if (!function_exists('build_remote_method_wrapper_code'))
+        {
+          die('Error: to enable creation of method stubs the xmlrpc_wrappers.inc file is needed');
+        }
+        // fall thru intentionally
+      case 'describe':
+      case 'wrap':
+        $msg[0] =& new $msgclass('system.methodHelp', null, $id);
+        $msg[0]->addparam(new xmlrpcval($method));
+        $msg[1] =& new $msgclass('system.methodSignature', null, $id+1);
+        $msg[1]->addparam(new xmlrpcval($method));
+        $actionname = 'Description of method "'.$method.'"';
+        break;
+      case 'list':
+        $msg[0] =& new $msgclass('system.listMethods', null, $id);
+        $actionname = 'List of available methods';
+        break;
+      case 'execute':
+        if (!payload_is_safe($payload))
+          die("Tsk tsk tsk, please stop it or I will have to call in the cops!");
+        $msg[0] =& new $msgclass($method, null, $id);
+        // hack! build xml payload by hand
+        if ($wstype == 1)
+        {
+          $msg[0]->payload = "{\n".
+            '"method": "' . $method . "\",\n\"params\": [" .
+            $payload .
+            "\n],\n\"id\": ";
+            // fix: if user gave an empty string, use NULL, or we'll break json syntax
+            if ($id == "")
+            {
+                $msg[0]->payload .= "null\n}";
+            }
+            else
+            {
+              if (is_numeric($id) || $id == 'false' || $id == 'true' || $id == 'null')
+              {
+                $msg[0]->payload .= "$id\n}";
+              }
+              else
+              {
+                $msg[0]->payload .= "\"$id\"\n}";
+              }
+            }
+        }
+        else
+          $msg[0]->payload = $msg[0]->xml_header() .
+            '<methodName>' . $method . "</methodName>\n<params>" .
+            $payload .
+            "</params>\n" . $msg[0]->xml_footer();
+        $actionname = 'Execution of method '.$method;
+        break;
+      default: // give a warning
+        $actionname = '[ERROR: unknown action] "'.$action.'"';
+    }
+
+    // Before calling execute, echo out brief description of action taken + date and time ???
+    // this gives good user feedback for long-running methods...
+    echo '<h2>'.htmlspecialchars($actionname).' on server '.htmlspecialchars($server)." ...</h2>\n";
+    flush();
+
+    $response = null;
+    // execute method(s)
+    if ($debug)
+      echo '<div class="dbginfo"><h2>Debug info:</h2>';  /// @todo use ob_start instead
+    $resp = array();
+    $mtime = explode(' ',microtime());
+    $time = (float)$mtime[0] + (float)$mtime[1];
+    foreach ($msg as $message)
+    {
+      // catch errors: for older xmlrpc libs, send does not return by ref
+      @$response =& $client->send($message, $timeout, $httpprotocol);
+      $resp[] = $response;
+      if (!$response || $response->faultCode())
+        break;
+    }
+    $mtime = explode(' ',microtime());
+    $time = (float)$mtime[0] + (float)$mtime[1] - $time;
+    if ($debug)
+      echo "</div>\n";
+
+    if ($response)
+    {
+
+    if ($response->faultCode())
+    {
+      // call failed! echo out error msg!
+      //echo '<h2>'.htmlspecialchars($actionname).' on server '.htmlspecialchars($server).'</h2>';
+      echo "<h3>$protoname call FAILED!</h3>\n";
+      echo "<p>Fault code: [" . htmlspecialchars($response->faultCode()) .
+        "] Reason: '" . htmlspecialchars($response->faultString()) . "'</p>\n";
+      echo (strftime("%d/%b/%Y:%H:%M:%S\n"));
+    }
+    else
+    {
+      // call succeeded: parse results
+      //echo '<h2>'.htmlspecialchars($actionname).' on server '.htmlspecialchars($server).'</h2>';
+      printf ("<h3>%s call(s) OK (%.2f secs.)</h3>\n", $protoname, $time);
+      echo (strftime("%d/%b/%Y:%H:%M:%S\n"));
+
+      switch ($action)
+      {
+        case 'list':
+
+        $v = $response->value();
+        if ($v->kindOf()=="array")
+        {
+          $max = $v->arraysize();
+          echo "<table border=\"0\" cellspacing=\"0\" cellpadding=\"0\">\n";
+          echo "<thead>\n<tr><th>Method</th><th>Description</th></tr>\n</thead>\n<tbody>\n";
+          for($i=0; $i < $max; $i++)
+          {
+            $rec = $v->arraymem($i);
+            if ($i%2) $class=' class="oddrow"'; else $class = ' class="evenrow"';
+            echo ("<tr><td$class>".htmlspecialchars($rec->scalarval())."</td><td$class><form action=\"controller.php\" method=\"get\" target=\"frmcontroller\">".
+              "<input type=\"hidden\" name=\"host\" value=\"".htmlspecialchars($host)."\" />".
+              "<input type=\"hidden\" name=\"port\" value=\"".htmlspecialchars($port)."\" />".
+              "<input type=\"hidden\" name=\"path\" value=\"".htmlspecialchars($path)."\" />".
+              "<input type=\"hidden\" name=\"id\" value=\"".htmlspecialchars($id)."\" />".
+              "<input type=\"hidden\" name=\"debug\" value=\"$debug\" />".
+              "<input type=\"hidden\" name=\"username\" value=\"".htmlspecialchars($username)."\" />".
+              "<input type=\"hidden\" name=\"password\" value=\"".htmlspecialchars($password)."\" />".
+              "<input type=\"hidden\" name=\"authtype\" value=\"$authtype\" />".
+              "<input type=\"hidden\" name=\"verifyhost\" value=\"$verifyhost\" />".
+              "<input type=\"hidden\" name=\"verifypeer\" value=\"$verifypeer\" />".
+              "<input type=\"hidden\" name=\"cainfo\" value=\"".htmlspecialchars($cainfo)."\" />".
+              "<input type=\"hidden\" name=\"proxy\" value=\"".htmlspecialchars($proxy)."\" />".
+              "<input type=\"hidden\" name=\"proxyuser\" value=\"".htmlspecialchars($proxyuser)."\" />".
+              "<input type=\"hidden\" name=\"proxypwd\" value=\"".htmlspecialchars($proxypwd)."\" />".
+              "<input type=\"hidden\" name=\"responsecompression\" value=\"$responsecompression\" />".
+              "<input type=\"hidden\" name=\"requestcompression\" value=\"$requestcompression\" />".
+              "<input type=\"hidden\" name=\"clientcookies\" value=\"".htmlspecialchars($clientcookies)."\" />".
+              "<input type=\"hidden\" name=\"protocol\" value=\"$protocol\" />".
+              "<input type=\"hidden\" name=\"timeout\" value=\"".htmlspecialchars($timeout)."\" />".
+              "<input type=\"hidden\" name=\"method\" value=\"".$rec->scalarval()."\" />".
+              "<input type=\"hidden\" name=\"wstype\" value=\"$wstype\" />".
+              "<input type=\"hidden\" name=\"action\" value=\"describe\" />".
+              "<input type=\"hidden\" name=\"run\" value=\"now\" />".
+              "<input type=\"submit\" value=\"Describe\" /></form></td>");
+            //echo("</tr>\n");
+
+            // generate lo scheletro per il method payload per eventuali test
+            //$methodpayload="<methodCall>\n<methodName>".$rec->scalarval()."</methodName>\n<params>\n<param><value></value></param>\n</params>\n</methodCall>";
+
+            /*echo ("<form action=\"{$_SERVER['PHP_SELF']}\" method=\"get\"><td>".
+              "<input type=\"hidden\" name=\"host\" value=\"$host\" />".
+              "<input type=\"hidden\" name=\"port\" value=\"$port\" />".
+              "<input type=\"hidden\" name=\"path\" value=\"$path\" />".
+              "<input type=\"hidden\" name=\"method\" value=\"".$rec->scalarval()."\" />".
+              "<input type=\"hidden\" name=\"methodpayload\" value=\"$payload\" />".
+              "<input type=\"hidden\" name=\"action\" value=\"execute\" />".
+              "<input type=\"submit\" value=\"Test\" /></td></form>");*/
+            echo("</tr>\n");
+          }
+          echo "</tbody>\n</table>";
+        }
+          break;
+
+        case 'describe':
+
+        $r1 = $resp[0]->value();
+        $r2 = $resp[1]->value();
+
+        echo "<table border=\"0\" cellspacing=\"0\" cellpadding=\"0\">\n";
+        echo "<thead>\n<tr><th>Method</th><th>".htmlspecialchars($method)."</th><th>&nbsp;</th><th>&nbsp;</th></tr>\n</thead>\n<tbody>\n";
+        $desc = htmlspecialchars($r1->scalarval());
+        if ($desc == "")
+          $desc = "-";
+        echo "<tr><td class=\"evenrow\">Description</td><td colspan=\"3\" class=\"evenrow\">$desc</td></tr>\n";
+        $payload="";
+        $alt_payload="";
+        if ($r2->kindOf()!="array")
+          echo "<tr><td class=\"oddrow\">Signature</td><td class=\"oddrow\">Unknown</td><td class=\"oddrow\">&nbsp;</td></tr>\n";
+        else
+        {
+          for($i=0; $i < $r2->arraysize(); $i++)
+          {
+            if ($i+1%2) $class=' class="oddrow"'; else $class = ' class="evenrow"';
+            echo "<tr><td$class>Signature&nbsp;".($i+1)."</td><td$class>";
+            $x = $r2->arraymem($i);
+            if ($x->kindOf()=="array")
+            {
+              $ret = $x->arraymem(0);
+              echo "<code>OUT:&nbsp;" . htmlspecialchars($ret->scalarval()) . "<br />IN: (";
+              if ($x->arraysize() > 1)
+              {
+                for($k = 1; $k < $x->arraysize(); $k++)
+                {
+                  $y = $x->arraymem($k);
+                  echo $y->scalarval();
+                  if ($wstype != 1)
+                  {
+                    $payload = $payload . '<param><value><'.htmlspecialchars($y->scalarval()).'></'.htmlspecialchars($y->scalarval())."></value></param>\n";
+                  }
+                  $alt_payload .= $y->scalarval();
+                  if ($k < $x->arraysize()-1)
+                  {
+                    $alt_payload .= ';';
+                    echo ", ";
+                  }
+                }
+              }
+              echo ")</code>";
+            }
+            else
+            {
+              echo 'Unknown';
+            }
+            echo '</td>';
+            //bottone per testare questo metodo
+            //$payload="<methodCall>\n<methodName>$method</methodName>\n<params>\n$payload</params>\n</methodCall>";
+            echo "<td$class><form action=\"controller.php\" target=\"frmcontroller\" method=\"get\">".
+            "<input type=\"hidden\" name=\"host\" value=\"".htmlspecialchars($host)."\" />".
+            "<input type=\"hidden\" name=\"port\" value=\"".htmlspecialchars($port)."\" />".
+            "<input type=\"hidden\" name=\"path\" value=\"".htmlspecialchars($path)."\" />".
+            "<input type=\"hidden\" name=\"id\" value=\"".htmlspecialchars($id)."\" />".
+            "<input type=\"hidden\" name=\"debug\" value=\"$debug\" />".
+            "<input type=\"hidden\" name=\"username\" value=\"".htmlspecialchars($username)."\" />".
+            "<input type=\"hidden\" name=\"password\" value=\"".htmlspecialchars($password)."\" />".
+            "<input type=\"hidden\" name=\"authtype\" value=\"$authtype\" />".
+            "<input type=\"hidden\" name=\"verifyhost\" value=\"$verifyhost\" />".
+            "<input type=\"hidden\" name=\"verifypeer\" value=\"$verifypeer\" />".
+            "<input type=\"hidden\" name=\"cainfo\" value=\"".htmlspecialchars($cainfo)."\" />".
+            "<input type=\"hidden\" name=\"proxy\" value=\"".htmlspecialchars($proxy)."\" />".
+            "<input type=\"hidden\" name=\"proxyuser\" value=\"".htmlspecialchars($proxyuser)."\" />".
+            "<input type=\"hidden\" name=\"proxypwd\" value=\"".htmlspecialchars($proxypwd)."\" />".
+            "<input type=\"hidden\" name=\"responsecompression\" value=\"$responsecompression\" />".
+            "<input type=\"hidden\" name=\"requestcompression\" value=\"$requestcompression\" />".
+            "<input type=\"hidden\" name=\"clientcookies\" value=\"".htmlspecialchars($clientcookies)."\" />".
+            "<input type=\"hidden\" name=\"protocol\" value=\"$protocol\" />".
+            "<input type=\"hidden\" name=\"timeout\" value=\"".htmlspecialchars($timeout)."\" />".
+            "<input type=\"hidden\" name=\"method\" value=\"".htmlspecialchars($method)."\" />".
+            "<input type=\"hidden\" name=\"methodpayload\" value=\"".htmlspecialchars($payload)."\" />".
+            "<input type=\"hidden\" name=\"altmethodpayload\" value=\"".htmlspecialchars($alt_payload)."\" />".
+            "<input type=\"hidden\" name=\"wstype\" value=\"$wstype\" />".
+            "<input type=\"hidden\" name=\"action\" value=\"execute\" />";
+            if ($wstype != 1)
+              echo "<input type=\"submit\" value=\"Load method synopsis\" />";
+            echo "</form></td>\n";
+
+            echo "<td$class><form action=\"controller.php\" target=\"frmcontroller\" method=\"get\">".
+            "<input type=\"hidden\" name=\"host\" value=\"".htmlspecialchars($host)."\" />".
+            "<input type=\"hidden\" name=\"port\" value=\"".htmlspecialchars($port)."\" />".
+            "<input type=\"hidden\" name=\"path\" value=\"".htmlspecialchars($path)."\" />".
+            "<input type=\"hidden\" name=\"id\" value=\"".htmlspecialchars($id)."\" />".
+            "<input type=\"hidden\" name=\"debug\" value=\"$debug\" />".
+            "<input type=\"hidden\" name=\"username\" value=\"".htmlspecialchars($username)."\" />".
+            "<input type=\"hidden\" name=\"password\" value=\"".htmlspecialchars($password)."\" />".
+            "<input type=\"hidden\" name=\"authtype\" value=\"$authtype\" />".
+            "<input type=\"hidden\" name=\"verifyhost\" value=\"$verifyhost\" />".
+            "<input type=\"hidden\" name=\"verifypeer\" value=\"$verifypeer\" />".
+            "<input type=\"hidden\" name=\"cainfo\" value=\"".htmlspecialchars($cainfo)."\" />".
+            "<input type=\"hidden\" name=\"proxy\" value=\"".htmlspecialchars($proxy)."\" />".
+            "<input type=\"hidden\" name=\"proxyuser\" value=\"".htmlspecialchars($proxyuser)."\" />".
+            "<input type=\"hidden\" name=\"proxypwd\" value=\"".htmlspecialchars($proxypwd)."\" />".
+            "<input type=\"hidden\" name=\"responsecompression\" value=\"$responsecompression\" />".
+            "<input type=\"hidden\" name=\"requestcompression\" value=\"$requestcompression\" />".
+            "<input type=\"hidden\" name=\"clientcookies\" value=\"".htmlspecialchars($clientcookies)."\" />".
+            "<input type=\"hidden\" name=\"protocol\" value=\"$protocol\" />".
+            "<input type=\"hidden\" name=\"timeout\" value=\"".htmlspecialchars($timeout)."\" />".
+            "<input type=\"hidden\" name=\"method\" value=\"".htmlspecialchars($method)."\" />".
+            "<input type=\"hidden\" name=\"methodsig\" value=\"".$i."\" />".
+            "<input type=\"hidden\" name=\"methodpayload\" value=\"".htmlspecialchars($payload)."\" />".
+            "<input type=\"hidden\" name=\"altmethodpayload\" value=\"".htmlspecialchars($alt_payload)."\" />".
+            "<input type=\"hidden\" name=\"wstype\" value=\"$wstype\" />".
+            "<input type=\"hidden\" name=\"run\" value=\"now\" />".
+            "<input type=\"hidden\" name=\"action\" value=\"wrap\" />".
+            "<input type=\"submit\" value=\"Generate method call stub code\" />";
+            echo "</form></td></tr>\n";
+
+          }
+        }
+        echo "</tbody>\n</table>";
+
+          break;
+
+        case 'wrap':
+          $r1 = $resp[0]->value();
+          $r2 = $resp[1]->value();
+          if ($r2->kindOf()!="array" || $r2->arraysize() <= $methodsig)
+            echo "Error: signature unknown\n";
+          else
+          {
+          $mdesc = $r1->scalarval();
+          $msig = php_xmlrpc_decode($r2);
+          $msig = $msig[$methodsig];
+          $proto = $protocol == 2 ? 'https' : $protocol == 1 ? 'http11' : '';
+          if ($proxy  == '' && $username == '' && !$requestcompression && !$responsecompression &&
+            $clientcookies == '')
+          {
+            $opts = 0; // simple client copy in stub code
+          }
+          else
+          {
+            $opts = 1; // complete client copy in stub code
+          }
+          if ($wstype == 1)
+          {
+            $prefix = 'jsonrpc';
+          }
+          else
+          {
+            $prefix = 'xmlrpc';
+          }
+          //$code = wrap_xmlrpc_method($client, $method, $methodsig, 0, $proto, '', $opts);
+          $code = build_remote_method_wrapper_code($client, $method, str_replace('.', '_', $prefix.'_'.$method), $msig, $mdesc, $timeout, $proto, $opts, $prefix);
+          //if ($code)
+          //{
+              echo "<div id=\"phpcode\">\n";
+            highlight_string("<?php\n".$code['docstring'].$code['source'].'?>');
+            echo "\n</div>";
+          //}
+          //else
+          //{
+          //  echo 'Error while building php code stub...';
+          }
+
+          break;
+
+        case 'execute':
+          echo '<div id="response"><h2>Response:</h2>'.htmlspecialchars($response->serialize()).'</div>';
+          break;
+
+        default: // give a warning
+      }
+    } // if !$response->faultCode()
+    } // if $response
+  }
+  else
+  {
+    // no action taken yet: give some instructions on debugger usage
+?>
+
+<h3>Instructions on usage of the debugger:</h3>
+<ol>
+<li>Run a 'list available methods' action against desired server</li>
+<li>If list of methods appears, click on 'describe method' for desired method</li>
+<li>To run method: click on 'load method synopsis' for desired method. This will load a skeleton for method call parameters in the form above. Complete all xmlrpc values with appropriate data and click 'Execute'</li>
+</ol>
+<?php
+  if (!extension_loaded('curl'))
+  {
+      echo "<p class=\"evidence\">You will need to enable the CURL extension to use the HTTPS and HTTP 1.1 transports</p>\n";
+  }
+?>
+
+<h3>Example:</h3>
+<p>
+Server Address: phpxmlrpc.sourceforge.net<br/>
+Path: /server.php
+</p>
+
+<h3>Notice:</h3>
+<p>all usernames and passwords entered on the above form will be written to the web server logs of this server. Use with care.</p>
+
+<h3>Changelog</h3>
+<ul>
+<li>2007-02-20: add visual editor for method payload; allow strings, bools as jsonrpc msg id</li>
+<li>2006-06-26: support building php code stub for calling remote methods</li>
+<li>2006-05-25: better support for long running queries; check for no-curl installs</li>
+<li>2006-05-02: added support for JSON-RPC. Note that many interesting json-rpc features are not implemented yet, such as notifications or multicall.</li>
+<li>2006-04-22: added option for setting custom CA certs to verify peer with in SSLmode</li>
+<li>2006-03-05: added option for setting Basic/Digest/NTLM auth type</li>
+<li>2006-01-18: added option echoing to screen xmlrpc request before sending it ('More' debug)</li>
+<li>2005-10-01: added option for setting cookies to be sent to server</li>
+<li>2005-08-07: added switches for compression of requests and responses and http 1.1</li>
+<li>2005-06-27: fixed possible security breach in parsing malformed xml</li>
+<li>2005-06-24: fixed error with calling methods having parameters...</li>
+</ul>
+<?php
+  }
+?>
+</body>
+</html>
diff --git a/debugger/common.php b/debugger/common.php
new file mode 100644 (file)
index 0000000..4cc87ae
--- /dev/null
@@ -0,0 +1,135 @@
+<?php
+/**
+ * @version $Id$
+ * @author Gaetano Giunta
+ * @copyright (C) 2005-2008 G. Giunta
+ * @license code licensed under the BSD License: http://phpxmlrpc.sourceforge.net/license.txt
+ *
+ * @todo switch params for http compression from 0,1,2 to values to be used directly
+ * @todo do some more sanitization of received parameters
+ */
+
+// work around magic quotes
+  if (get_magic_quotes_gpc())
+  {
+    function stripslashes_deep($value)
+    {
+        $value = is_array($value) ?
+                    array_map('stripslashes_deep', $value) :
+                    stripslashes($value);
+
+        return $value;
+    }
+    $_GET = array_map('stripslashes_deep', $_GET);
+  }
+
+
+  if ( isset( $_GET['usepost'] ) && $_GET['usepost'] === 'true' )
+  {
+      $_GET = $_POST;
+  }
+
+// recover input parameters
+  $debug = false;
+  $protocol = 0;
+  $run = false;
+  $wstype = 0;
+  $id = '';
+  if (isset($_GET['action']))
+  {
+    if (isset($_GET['wstype']) && $_GET['wstype'] == '1')
+    {
+      $wstype = 1;
+      if (isset($_GET['id']))
+        $id = $_GET['id'];
+    }
+    $host = isset($_GET['host']) ? $_GET['host'] : 'localhost'; // using '' will trigger an xmlrpc error...
+    if (isset($_GET['protocol']) && ($_GET['protocol'] == '1' || $_GET['protocol'] == '2'))
+      $protocol = $_GET['protocol'];
+    if (strpos($host, 'http://') === 0)
+      $host = substr($host, 7);
+    else if (strpos($host, 'https://') === 0)
+    {
+      $host = substr($host, 8);
+      $protocol = 2;
+    }
+    $port = isset($_GET['port']) ? $_GET['port'] : '';
+    $path = isset($_GET['path']) ? $_GET['path'] : '';
+    // in case user forgot initial '/' in xmlrpc server path, add it back
+    if ($path && ($path[0]) != '/')
+      $path = '/'.$path;
+
+    if (isset($_GET['debug']) && ($_GET['debug'] == '1' || $_GET['debug'] == '2'))
+      $debug = $_GET['debug'];
+
+    $verifyhost = (isset($_GET['verifyhost']) && ($_GET['verifyhost'] == '1' || $_GET['verifyhost'] == '2')) ? $_GET['verifyhost'] : 0;
+    if (isset($_GET['verifypeer']) && $_GET['verifypeer'] == '1')
+      $verifypeer = true;
+    else
+      $verifypeer = false;
+    $cainfo= isset($_GET['cainfo']) ? $_GET['cainfo'] : '';
+    $proxy = isset($_GET['proxy']) ? $_GET['proxy'] : 0;
+    if (strpos($proxy, 'http://') === 0)
+      $proxy = substr($proxy, 7);
+    $proxyuser= isset($_GET['proxyuser']) ? $_GET['proxyuser'] : '';
+    $proxypwd = isset($_GET['proxypwd']) ? $_GET['proxypwd'] : '';
+    $timeout = isset($_GET['timeout']) ? $_GET['timeout'] : 0;
+    if (!is_numeric($timeout))
+      $timeout = 0;
+    $action = $_GET['action'];
+
+    $method = isset($_GET['method']) ? $_GET['method'] : '';
+    $methodsig = isset($_GET['methodsig']) ? $_GET['methodsig'] : 0;
+    $payload = isset($_GET['methodpayload']) ? $_GET['methodpayload'] : '';
+    $alt_payload = isset($_GET['altmethodpayload']) ? $_GET['altmethodpayload'] : '';
+
+    if (isset($_GET['run']) && $_GET['run'] == 'now')
+      $run = true;
+
+    $username = isset($_GET['username']) ? $_GET['username'] : '';
+    $password = isset($_GET['password']) ? $_GET['password'] : '';
+
+    $authtype = (isset($_GET['authtype']) && ($_GET['authtype'] == '2' || $_GET['authtype'] == '8')) ? $_GET['authtype'] : 1;
+
+    if (isset($_GET['requestcompression']) && ($_GET['requestcompression'] == '1' || $_GET['requestcompression'] == '2'))
+      $requestcompression = $_GET['requestcompression'];
+    else
+      $requestcompression = 0;
+    if (isset($_GET['responsecompression']) && ($_GET['responsecompression'] == '1' || $_GET['responsecompression'] == '2' || $_GET['responsecompression'] == '3'))
+      $responsecompression = $_GET['responsecompression'];
+    else
+      $responsecompression = 0;
+
+    $clientcookies = isset($_GET['clientcookies']) ? $_GET['clientcookies'] : '';
+  }
+  else
+  {
+    $host = '';
+    $port = '';
+    $path = '';
+    $action = '';
+    $method = '';
+    $methodsig = 0;
+    $payload = '';
+    $alt_payload = '';
+    $username = '';
+    $password = '';
+    $authtype = 1;
+    $verifyhost = 0;
+    $verifypeer = false;
+    $cainfo = '';
+    $proxy = '';
+    $proxyuser = '';
+    $proxypwd = '';
+    $timeout = 0;
+    $requestcompression = 0;
+    $responsecompression = 0;
+    $clientcookies = '';
+  }
+
+  // check input for known XMLRPC attacks against this or other libs
+  function payload_is_safe($input)
+  {
+      return true;
+  }
+?>
\ No newline at end of file
diff --git a/debugger/controller.php b/debugger/controller.php
new file mode 100644 (file)
index 0000000..0b0f925
--- /dev/null
@@ -0,0 +1,321 @@
+<?php
+/**
+ * @version $Id$
+ * @author Gaetano Giunta
+ * @copyright (C) 2005-2008 G. Giunta
+ * @license code licensed under the BSD License: http://phpxmlrpc.sourceforge.net/license.txt
+ *
+ * @todo add links to documentation from every option caption
+ * @todo switch params for http compression from 0,1,2 to values to be used directly
+ * @todo add a little bit more CSS formatting: we broke IE box model getting a width > 100%...
+ * @todo add support for more options, such as ntlm auth to proxy, or request charset encoding
+ *
+ * @todo parse content of payload textarea to be fed to visual editor
+ * @todo add http no-cache headers
+ **/
+
+  include(getcwd().'/common.php');
+  if ($action == '')
+    $action = 'list';
+
+  // relative path to the visual xmlrpc editing dialog
+  $editorpath = '../../javascript/';
+?>
+<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
+    "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
+<html xmlns="http://www.w3.org/1999/xhtml">
+<head>
+<title>XMLRPC Debugger</title>
+<meta name="robots" content="index,nofollow" />
+<script type="text/javascript" language="Javascript">
+  if (window.name!='frmcontroller')
+    top.location.replace('index.php?run='+escape(self.location));
+</script>
+<!-- xmlrpc/jsonrpc base library -->
+<script type="text/javascript" src="<?php echo $editorpath; ?>xmlrpc_lib.js"></script>
+<script type="text/javascript" src="<?php echo $editorpath; ?>jsonrpc_lib.js"></script>
+<style type="text/css">
+<!--
+html {overflow: -moz-scrollbars-vertical;}
+body {padding: 0.5em; background-color: #EEEEEE; font-family: Verdana, Arial, Helvetica; font-size: 8pt;}
+h1 {font-size: 12pt; margin: 0.5em;}
+h2 {font-size: 10pt; display: inline; vertical-align: top;}
+table {border: 1px solid gray; margin-bottom: 0.5em; padding: 0.25em; width: 100%;}
+#methodpayload {display: inline;}
+td {vertical-align: top; font-family: Verdana, Arial, Helvetica; font-size: 8pt;}
+.labelcell {text-align: right;}
+-->
+</style>
+<script language="JavaScript" type="text/javascript">
+<!--
+  function verifyserver()
+  {
+    if (document.frmaction.host.value == '')
+    {
+      alert('Please insert a server name or address');
+      return false;
+    }
+    if (document.frmaction.path.value == '')
+      document.frmaction.path.value = '/';
+    var action = '';
+    for (counter = 0; counter < document.frmaction.action.length; counter++)
+      if (document.frmaction.action[counter].checked)
+      {
+        action = document.frmaction.action[counter].value;
+      }
+    if (document.frmaction.method.value == '' && (action == 'execute' || action == 'wrap' || action == 'describe'))
+    {
+      alert('Please insert a method name');
+      return false;
+    }
+    if (document.frmaction.authtype.value != '1' && document.frmaction.username.value == '')
+    {
+      alert('No username for authenticating to server: authentication disabled');
+    }
+    return true;
+  }
+
+  function switchaction()
+  {
+    // reset html layout depending on action to be taken
+    var action = '';
+    for (counter = 0; counter < document.frmaction.action.length; counter++)
+      if (document.frmaction.action[counter].checked)
+      {
+        action = document.frmaction.action[counter].value;
+      }
+    if (action == 'execute')
+    {
+      document.frmaction.methodpayload.disabled = false;
+      displaydialogeditorbtn(true);//if (document.getElementById('methodpayloadbtn') != undefined) document.getElementById('methodpayloadbtn').disabled = false;
+      document.frmaction.method.disabled = false;
+      document.frmaction.methodpayload.rows = 10;
+    }
+    else
+    {
+      document.frmaction.methodpayload.rows = 1;
+      if (action == 'describe' || action == 'wrap')
+      {
+        document.frmaction.methodpayload.disabled = true;
+        displaydialogeditorbtn(false); //if (document.getElementById('methodpayloadbtn') != undefined) document.getElementById('methodpayloadbtn').disabled = true;
+        document.frmaction.method.disabled = false;
+      }
+      else // list
+      {
+        document.frmaction.methodpayload.disabled = true;
+        displaydialogeditorbtn(false); //if (document.getElementById('methodpayloadbtn') != undefined) document.getElementById('methodpayloadbtn').disabled = false;
+        document.frmaction.method.disabled = true;
+      }
+    }
+  }
+
+  function switchssl()
+  {
+    if (document.frmaction.protocol.value != '2')
+    {
+      document.frmaction.verifypeer.disabled = true;
+      document.frmaction.verifyhost.disabled = true;
+      document.frmaction.cainfo.disabled = true;
+    }
+    else
+    {
+      document.frmaction.verifypeer.disabled = false;
+      document.frmaction.verifyhost.disabled = false;
+      document.frmaction.cainfo.disabled = false;
+    }
+  }
+
+  function switchauth()
+  {
+    if (document.frmaction.protocol.value != '0')
+    {
+      document.frmaction.authtype.disabled = false;
+    }
+    else
+    {
+      document.frmaction.authtype.disabled = true;
+      document.frmaction.authtype.value = 1;
+    }
+  }
+
+  function swicthcainfo()
+  {
+    if (document.frmaction.verifypeer.checked == true)
+    {
+      document.frmaction.cainfo.disabled = false;
+    }
+    else
+    {
+      document.frmaction.cainfo.disabled = true;
+    }
+  }
+
+  function switchtransport(is_json)
+  {
+    if (is_json == 0)
+    {
+      document.getElementById("idcell").style.visibility = 'hidden';
+      document.frmjsonrpc.yes.checked = false;
+      document.frmxmlrpc.yes.checked = true;
+      document.frmaction.wstype.value="0";
+    }
+    else
+    {
+      document.getElementById("idcell").style.visibility = 'visible';
+      document.frmjsonrpc.yes.checked = true;
+      document.frmxmlrpc.yes.checked = false;
+      document.frmaction.wstype.value="1";
+    }
+  }
+
+  function displaydialogeditorbtn(show)
+  {
+    if (show && ((typeof base64_decode) == 'function'))
+    {
+         document.getElementById('methodpayloadbtn').innerHTML = '[<a href="#" onclick="activateeditor(); return false;">Edit</a>]';
+       }
+       else
+    {
+         document.getElementById('methodpayloadbtn').innerHTML = '';
+       }
+  }
+
+  function activateeditor()
+  {
+         var url = '<?php echo $editorpath; ?>visualeditor.php?params=<?php echo $alt_payload; ?>';
+         if (document.frmaction.wstype.value == "1")
+           url += '&type=jsonrpc';
+         var wnd = window.open(url, '_blank', 'width=750, height=400, location=0, resizable=1, menubar=0, scrollbars=1');
+  }
+
+  // if javascript version of the lib is found, allow it to send us params
+  function buildparams(base64data)
+  {
+    if (typeof base64_decode == 'function')
+    {
+         if (base64data == '0') // workaround for bug in base64_encode...
+           document.getElementById('methodpayload').value = '';
+         else
+        document.getElementById('methodpayload').value = base64_decode(base64data);
+    }
+  }
+
+  // use GET for ease of refresh, switch to POST when payload is too big to fit in url (in IE: 2048 bytes! see http://support.microsoft.com/kb/q208427/)
+  function switchFormMethod()
+  {
+      /// @todo use a more precise calculation, adding the rest of the fields to the actual generated url lenght
+      if (document.frmaction.methodpayload.value.length > 1536 )
+      {
+          document.frmaction.action = 'action.php?usepost=true';
+          document.frmaction.method = 'post';
+      }
+  }
+
+//-->
+</script>
+</head>
+<body onload="switchtransport(<?php echo $wstype;?>); switchaction(); switchssl(); switchauth(); swicthcainfo();<?php if ($run) echo ' document.forms[2].submit();'; ?>">
+<h1>XMLRPC <form name="frmxmlrpc" style="display: inline;" action="."><input name="yes" type="radio" onclick="switchtransport(0);"/></form>
+/<form name="frmjsonrpc" style="display: inline;" action="."><input name="yes" type="radio" onclick="switchtransport(1);"/></form>JSONRPC Debugger (based on the <a href="http://phpxmlrpc.sourceforge.net">PHP-XMLRPC</a> library)</h1>
+<form name="frmaction" method="get" action="action.php" target="frmaction" onSubmit="switchFormMethod();"
+>
+
+<table id="serverblock">
+<tr>
+<td><h2>Target server</h2></td>
+<td class="labelcell">Address:</td><td><input type="text" name="host" value="<?php echo htmlspecialchars($host); ?>" /></td>
+<td class="labelcell">Port:</td><td><input type="text" name="port" value="<?php echo htmlspecialchars($port); ?>" size="5" maxlength="5" /></td>
+<td class="labelcell">Path:</td><td><input type="text" name="path" value="<?php echo htmlspecialchars($path); ?>" /></td>
+</tr>
+</table>
+
+<table id="actionblock">
+<tr>
+<td><h2>Action</h2></td>
+<td>List available methods<input type="radio" name="action" value="list"<?php if ($action=='list') echo ' checked="checked"'; ?> onclick="switchaction();" /></td>
+<td>Describe method<input type="radio" name="action" value="describe"<?php if ($action=='describe') echo ' checked="checked"'; ?> onclick="switchaction();" /></td>
+<td>Execute method<input type="radio" name="action" value="execute"<?php if ($action=='execute') echo ' checked="checked"'; ?> onclick="switchaction();" /></td>
+<td>Generate stub for method call<input type="radio" name="action" value="wrap"<?php if ($action=='wrap') echo ' checked="checked"'; ?> onclick="switchaction();" /></td>
+</tr>
+</table>
+<input type="hidden" name="methodsig" value="<?php echo htmlspecialchars($methodsig); ?>" />
+
+<table id="methodblock">
+<tr>
+<td><h2>Method</h2></td>
+<td class="labelcell">Name:</td><td><input type="text" name="method" value="<?php echo htmlspecialchars($method); ?>" /></td>
+<td class="labelcell">Payload:<br/><div id="methodpayloadbtn"></div></td><td><textarea id="methodpayload" name="methodpayload" rows="1" cols="40"><?php echo htmlspecialchars($payload); ?></textarea></td>
+<td class="labelcell" id="idcell">Msg id: <input type="text" name="id" size="3" value="<?php echo htmlspecialchars($id); ?>"/></td>
+<td><input type="hidden" name="wstype" value="<?php echo $wstype;?>" />
+<input type="submit" value="Execute" onclick="return verifyserver();"/></td>
+</tr>
+</table>
+
+<table id="optionsblock">
+<tr>
+<td><h2>Client options</h2></td>
+<td class="labelcell">Show debug info:</td><td><select name="debug">
+<option value="0"<?php if ($debug == 0) echo ' selected="selected"'; ?>>No</option>
+<option value="1"<?php if ($debug == 1) echo ' selected="selected"'; ?>>Yes</option>
+<option value="2"<?php if ($debug == 2) echo ' selected="selected"'; ?>>More</option>
+</select>
+</td>
+<td class="labelcell">Timeout:</td><td><input type="text" name="timeout" size="3" value="<?php if ($timeout > 0) echo $timeout; ?>" /></td>
+<td class="labelcell">Protocol:</td><td><select name="protocol" onchange="switchssl(); switchauth(); swicthcainfo();">
+<option value="0"<?php if ($protocol == 0) echo ' selected="selected"'; ?>>HTTP 1.0</option>
+<option value="1"<?php if ($protocol == 1) echo ' selected="selected"'; ?>>HTTP 1.1</option>
+<option value="2"<?php if ($protocol == 2) echo ' selected="selected"'; ?>>HTTPS</option>
+</select></td>
+</tr>
+<tr>
+<td class="labelcell">AUTH:</td>
+<td class="labelcell">Username:</td><td><input type="text" name="username" value="<?php echo htmlspecialchars($username); ?>" /></td>
+<td class="labelcell">Pwd:</td><td><input type="password" name="password" value="<?php echo htmlspecialchars($password); ?>" /></td>
+<td class="labelcell">Type</td><td><select name="authtype">
+<option value="1"<?php if ($authtype == 1) echo ' selected="selected"'; ?>>Basic</option>
+<option value="2"<?php if ($authtype == 2) echo ' selected="selected"'; ?>>Digest</option>
+<option value="8"<?php if ($authtype == 8) echo ' selected="selected"'; ?>>NTLM</option>
+</select></td>
+<td></td>
+</tr>
+<tr>
+<td class="labelcell">SSL:</td>
+<td class="labelcell">Verify Host's CN:</td><td><select name="verifyhost">
+<option value="0"<?php if ($verifyhost == 0) echo ' selected="selected"'; ?>>No</option>
+<option value="1"<?php if ($verifyhost == 1) echo ' selected="selected"'; ?>>Check CN existance</option>
+<option value="2"<?php if ($verifyhost == 2) echo ' selected="selected"'; ?>>Check CN match</option>
+</select></td>
+<td class="labelcell">Verify Cert:</td><td><input type="checkbox" value="1" name="verifypeer" onclick="swicthcainfo();"<?php if ($verifypeer) echo ' checked="checked"'; ?> /></td>
+<td class="labelcell">CA Cert file:</td><td><input type="text" name="cainfo" value="<?php echo htmlspecialchars($cainfo); ?>" /></td>
+</tr>
+<tr>
+<td class="labelcell">PROXY:</td>
+<td class="labelcell">Server:</td><td><input type="text" name="proxy" value="<?php echo htmlspecialchars($proxy); ?>" /></td>
+<td class="labelcell">Proxy user:</td><td><input type="text" name="proxyuser" value="<?php echo htmlspecialchars($proxyuser); ?>" /></td>
+<td class="labelcell">Proxy pwd:</td><td><input type="password" name="proxypwd" value="<?php echo htmlspecialchars($proxypwd); ?>" /></td>
+</tr>
+<tr>
+<td class="labelcell">COMPRESSION:</td>
+<td class="labelcell">Request:</td><td><select name="requestcompression">
+<option value="0"<?php if ($requestcompression == 0) echo ' selected="selected"'; ?>>None</option>
+<option value="1"<?php if ($requestcompression == 1) echo ' selected="selected"'; ?>>Gzip</option>
+<option value="2"<?php if ($requestcompression == 2) echo ' selected="selected"'; ?>>Deflate</option>
+</select></td>
+<td class="labelcell">Response:</td><td><select name="responsecompression">
+<option value="0"<?php if ($responsecompression == 0) echo ' selected="selected"'; ?>>None</option>
+<option value="1"<?php if ($responsecompression == 1) echo ' selected="selected"'; ?>>Gzip</option>
+<option value="2"<?php if ($responsecompression == 2) echo ' selected="selected"'; ?>>Deflate</option>
+<option value="3"<?php if ($responsecompression == 3) echo ' selected="selected"'; ?>>Any</option>
+</select></td>
+<td></td>
+</tr>
+<tr>
+<td class="labelcell">COOKIES:</td>
+<td colspan="4" class="labelcell"><input type="text" name="clientcookies" size="80" value="<?php echo htmlspecialchars($clientcookies); ?>" /></td>
+<td colspan="2">Format: 'cookie1=value1, cookie2=value2'</td>
+</tr>
+</table>
+
+</form>
+</body>
+</html>
\ No newline at end of file
diff --git a/debugger/index.html b/debugger/index.html
new file mode 100644 (file)
index 0000000..87c75b9
--- /dev/null
@@ -0,0 +1,11 @@
+<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Frameset//EN"
+    "http://www.w3.org/TR/xhtml1/DTD/xhtml1-frameset.dtd">
+<html>
+<head>
+<title>XMLRPC Debugger</title>
+</head>
+<frameset rows="360,*">
+  <frame name="frmcontroller" src="controller.php" marginwidth="0" marginheight="0" frameborder="0" />
+  <frame name="frmaction" src="action.php" marginwidth="0" marginheight="0" frameborder="0" />
+</frameset>
+</html>
\ No newline at end of file
diff --git a/debugger/index.php b/debugger/index.php
new file mode 100644 (file)
index 0000000..ace7460
--- /dev/null
@@ -0,0 +1,21 @@
+<?php
+// $Id$
+  $query = '';
+  if (isset($_GET['run']))
+  {
+    $path = parse_url($_GET['run']);
+    if (isset($path['query']))
+      $query = '?'.$path['query'];
+  }
+?>
+<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Frameset//EN"
+    "http://www.w3.org/TR/xhtml1/DTD/xhtml1-frameset.dtd">
+<html>
+<head>
+<title>XMLRPC Debugger</title>
+</head>
+<frameset rows="360,*">
+  <frame name="frmcontroller" src="controller.php<?php echo htmlspecialchars($query); ?>" marginwidth="0" marginheight="0" frameborder="0" />
+  <frame name="frmaction" src="action.php" marginwidth="0" marginheight="0" frameborder="0" />
+</frameset>
+</html>
\ No newline at end of file
diff --git a/demo/client/agesort.php b/demo/client/agesort.php
new file mode 100644 (file)
index 0000000..7fa16af
--- /dev/null
@@ -0,0 +1 @@
+<html>\r<head><title>xmlrpc</title></head>\r<body>\r<h1>Agesort demo</h1>\r<h2>Send an array of 'name' => 'age' pairs to the server that will send it back sorted.</h2>\r<h3>The source code demonstrates basic lib usage, including handling of xmlrpc arrays and structs</h3>\r<p></p>\r<?php\rinclude("xmlrpc.inc");\r\r$inAr=array("Dave" => 24, "Edd" => 45, "Joe" => 37, "Fred" => 27);\rreset($inAr);\rprint "This is the input data:<br/><pre>";\rwhile (list($key, $val)=each($inAr)) {\r  print $key . ", " . $val . "\n";\r}\rprint "</pre>";\r\r// create parameters from the input array: an xmlrpc array of xmlrpc structs\r$p=array();\rforeach($inAr as $key => $val) {\r  $p[]=new xmlrpcval(array("name" => new xmlrpcval($key),\r                           "age" => new xmlrpcval($val, "int")), "struct");\r}\r$v=new xmlrpcval($p, "array");\rprint "Encoded into xmlrpc format it looks like this: <pre>\n" .  htmlentities($v->serialize()). "</pre>\n";\r\r// create client and message objects\r$f=new xmlrpcmsg('examples.sortByAge',  array($v));\r$c=new xmlrpc_client("/server.php", "phpxmlrpc.sourceforge.net", 80);\r\r// set maximum debug level, to have the complete communication printed to screen\r$c->setDebug(2);\r\r// send request\rprint "Now sending request (detailed debug info follows)";\r$r=&$c->send($f);\r\r// check response for errors, and take appropriate action\rif (!$r->faultCode()) {\r  print "The server gave me these results:<pre>";\r  $v=$r->value();\r  $max=$v->arraysize();\r  for($i=0; $i<$max; $i++) {\r    $rec=$v->arraymem($i);\r    $n=$rec->structmem("name");\r    $a=$rec->structmem("age");\r    print htmlspecialchars($n->scalarval()) . ", " . htmlspecialchars($a->scalarval()) . "\n";\r  }\r\r  print "<hr/>For nerds: I got this value back<br/><pre>" .\r    htmlentities($r->serialize()). "</pre><hr/>\n";\r} else {\r  print "An error occurred:<pre>";\r  print "Code: " . htmlspecialchars($r->faultCode()) .\r    "\nReason: '" . htmlspecialchars($r->faultString()).'\'</pre><hr/>';\r}\r\r?>\r<em>$Id$</em>\r</body>\r</html>\r
\ No newline at end of file
diff --git a/demo/client/client.php b/demo/client/client.php
new file mode 100644 (file)
index 0000000..b5ec001
--- /dev/null
@@ -0,0 +1,54 @@
+<html>
+<head><title>xmlrpc</title></head>
+<body>
+<h1>Getstatename demo</h1>
+<h2>Send a U.S. state number to the server and get back the state name</h2>
+<h3>The code demonstrates usage of the php_xmlrpc_encode function</h3>
+<?php
+       include("xmlrpc.inc");
+
+       // Play nice to PHP 5 installations with REGISTER_LONG_ARRAYS off
+       if(!isset($HTTP_POST_VARS) && isset($_POST))
+       {
+               $HTTP_POST_VARS = $_POST;
+       }
+
+       if(isset($HTTP_POST_VARS["stateno"]) && $HTTP_POST_VARS["stateno"]!="")
+       {
+               $stateno=(integer)$HTTP_POST_VARS["stateno"];
+               $f=new xmlrpcmsg('examples.getStateName',
+                       array(php_xmlrpc_encode($stateno))
+               );
+               print "<pre>Sending the following request:\n\n" . htmlentities($f->serialize()) . "\n\nDebug info of server data follows...\n\n";
+               $c=new xmlrpc_client("/server.php", "phpxmlrpc.sourceforge.net", 80);
+               $c->setDebug(1);
+               $r=&$c->send($f);
+               if(!$r->faultCode())
+               {
+                       $v=$r->value();
+                       print "</pre><br/>State number " . $stateno . " is "
+                               . htmlspecialchars($v->scalarval()) . "<br/>";
+                       // print "<HR>I got this value back<BR><PRE>" .
+                       //  htmlentities($r->serialize()). "</PRE><HR>\n";
+               }
+               else
+               {
+                       print "An error occurred: ";
+                       print "Code: " . htmlspecialchars($r->faultCode())
+                               . " Reason: '" . htmlspecialchars($r->faultString()) . "'</pre><br/>";
+               }
+       }
+       else
+       {
+               $stateno = "";
+       }
+
+       print "<form action=\"client.php\" method=\"POST\">
+<input name=\"stateno\" value=\"" . $stateno . "\"><input type=\"submit\" value=\"go\" name=\"submit\"></form>
+<p>Enter a state number to query its name</p>";
+
+?>
+<hr/>
+<em>$Id$</em>
+</body>
+</html>
diff --git a/demo/client/comment.php b/demo/client/comment.php
new file mode 100644 (file)
index 0000000..7133cf9
--- /dev/null
@@ -0,0 +1,185 @@
+<?php
+include("xmlrpc.inc");
+
+$mydir="/demo";
+
+// define some utility functions
+function bomb() { print "</body></html>"; exit(); }
+function dispatch($client, $method, $args) {
+       $msg=new xmlrpcmsg($method, $args);
+       $resp=$client->send($msg);
+       if (!$resp) { print "<p>IO error: ".$client->errstr."</p>"; bomb(); }
+       if ($resp->faultCode()) {
+               print "<p>There was an error: " . $resp->faultCode() . " " .
+                       $resp->faultString() . "</p>";
+               bomb();
+       }
+       return php_xmlrpc_decode($resp->value());
+}
+
+// create client for discussion server
+$dclient=new xmlrpc_client("${mydir}/discuss.php",
+                                                                                                        "xmlrpc.usefulinc.com", 80);
+
+// check if we're posting a comment, and send it if so
+@$storyid=$_POST["storyid"];
+if ($storyid) {
+
+
+       //      print "Returning to " . $HTTP_POST_VARS["returnto"];
+
+       $res=dispatch($dclient, "discuss.addComment",
+                                                               array(new xmlrpcval($storyid),
+                                                                                       new xmlrpcval(stripslashes
+                                                                                                                                               (@$_POST["name"])),
+                                                                                       new xmlrpcval(stripslashes
+                                                                                                                                               (@$_POST["commenttext"]))));
+
+       // send the browser back to the originating page
+       Header("Location: ${mydir}/comment.php?catid=" .
+                                $_POST["catid"] . "&chanid=" .
+                                $_POST["chanid"] . "&oc=" .
+                                $_POST["catid"]);
+       exit(0);
+}
+
+// now we've got here, we're exploring the story store
+
+?>
+<html><head><title>meerkat browser</title></head>
+<body bgcolor="#ffffff">
+<h2>Meerkat integration</h2>
+<?php
+@$catid=$_GET["catid"];
+if (@$_GET["oc"]==$catid)
+       @$chanid=$_GET["chanid"];
+else
+       $chanid=0;
+
+$client=new xmlrpc_client("/meerkat/xml-rpc/server.php",
+                                                                                                       "www.oreillynet.com", 80);
+
+if (@$_GET["comment"] &&
+               (!@$_GET["cdone"])) {
+       // we're making a comment on a story,
+       // so display a comment form
+?>
+<h3>Make a comment on the story</h3>
+<form method="post">
+<p>Your name:<br /><input type="text" size="30" name="name" /></p>
+<p>Your comment:<br /><textarea rows="5" cols="60"
+   name="commenttext"></textarea></p>
+<input type="submit" value="Send comment" />
+<input type="hidden" name="storyid"
+   value="<?php echo @$_GET["comment"];?>" />
+<input type="hidden" name="chanid"
+   value="<?php echo $chanid; ?>" />
+<input type="hidden" name="catid"
+   value="<?php echo $catid; ?>" />
+
+</form>
+<?php
+} else {
+       $categories=dispatch($client, "meerkat.getCategories", array());
+       if ($catid)
+               $sources = dispatch($client, "meerkat.getChannelsByCategory",
+                                                                                               array(new xmlrpcval($catid, "int")));
+       if ($chanid) {
+               $stories = dispatch($client, "meerkat.getItems",
+                                       array(new xmlrpcval(
+                                               array(
+                                                       "channel" => new xmlrpcval($chanid, "int"),
+                                                       "ids" => new xmlrpcval(1, "int"),
+                                                       "descriptions" => new xmlrpcval(200, "int"),
+                                                       "num_items" => new xmlrpcval(5, "int"),
+                                                       "dates" => new xmlrpcval(0, "int")
+                                               ), "struct")));
+       }
+?>
+<form>
+<p>Subject area:<br />
+<select name="catid">
+<?php
+       if (!$catid)
+               print "<option value=\"0\">Choose a category</option>\n";
+       while(list($k,$v) = each($categories)) {
+               print "<option value=\"" . $v['id'] ."\"";
+               if ($v['id']==$catid) print " selected=\"selected\"";
+                       print ">". $v['title'] . "</option>\n";
+       }
+?>
+</select></p>
+<?php
+       if ($catid) {
+?>
+<p>News source:<br />
+<select name="chanid">
+<?php
+               if (!$chanid)
+                       print "<option value=\"0\">Choose a source</option>\n";
+               while(list($k,$v) = each($sources)) {
+                       print "<option value=\"" . $v['id'] ."\"";
+                       if ($v['id']==$chanid) print "\" selected=\"selected\"";
+                       print ">". $v['title'] . "</option>\n";
+               }
+?>
+</select>
+</p>
+
+<?php
+               } // end if ($catid)
+?>
+
+<p><input type="submit" value="Update" /></p>
+<input type="hidden" name="oc" value="<?php echo $catid; ?>" />
+</form>
+
+<?php
+        if ($chanid) {
+?>
+
+<h2>Stories available</h2>
+<table>
+<?php
+        while(list($k,$v) = each($stories)) {
+                print "<tr>";
+                print "<td><b>" . $v['title'] . "</b><br />";
+                print $v['description'] . "<br />";
+                print "<em><a target=\"_blank\" href=\"" .
+                        $v['link'] . "\">Read full story</a> ";
+                print "<a href=\"comment.php?catid=${catid}&chanid=${chanid}&" .
+                        "oc=${oc}&comment=" . $v['id'] . "\">Comment on this story</a>";
+                print "</em>";
+                print "</td>";
+                print "</tr>\n";
+                // now look for existing comments
+                $res=dispatch($dclient, "discuss.getComments",
+                                                       array(new xmlrpcval($v['id'])));
+                if (sizeof($res)>0) {
+                        print "<tr><td bgcolor=\"#dddddd\"><p><b><i>" .
+                                "Comments on this story:</i></b></p>";
+                        for($i=0; $i<sizeof($res); $i++) {
+                                $s=$res[$i];
+                                print "<p><b>From:</b> " . htmlentities($s['name']) . "<br />";
+                                print "<b>Comment:</b> " . htmlentities($s['comment']) . "</p>";
+                        }
+                        print "</td></tr>\n";
+                }
+                print "<tr><td><hr /></td></tr>\n";
+        }
+?>
+</table>
+
+<?php
+               } // end if ($chanid)
+} // end if comment
+?>
+<hr />
+<p>
+<a href="http://meerkat.oreillynet.com"><img align="right"
+       src="http://meerkat.oreillynet.com/icons/meerkat-powered.jpg"
+       height="31" width="88" alt="Meerkat powered, yeah!"
+       border="0" hspace="8" /></a>
+<em>$Id$</em></p>
+</body>
+</html>
diff --git a/demo/client/introspect.php b/demo/client/introspect.php
new file mode 100644 (file)
index 0000000..818e04c
--- /dev/null
@@ -0,0 +1,108 @@
+<html>\r\r
+<head><title>xmlrpc</title></head>\r\r
+<body>\r\r
+<h1>Introspect demo</h1>\r\r
+<h2>Query server for available methods and their description</h2>\r\r
+<h3>The code demonstrates usage of multicall and introspection methods</h3>\r\r
+<?php\r\r
+       include("xmlrpc.inc");\r\r
+\r\r
+       function display_error($r)\r\r
+       {\r\r
+               print "An error occurred: ";\r\r
+               print "Code: " . $r->faultCode()\r\r
+                       . " Reason: '" .$r->faultString()."'<br/>";\r\r
+       }\r\r
+\r\r
+       // 'new style' client constuctor\r\r
+       $c = new xmlrpc_client("http://phpxmlrpc.sourceforge.net/server.php");\r\r
+       print "<h3>methods available at http://" . $c->server . $c->path .  "</h3>\n";\r\r
+\r\r
+       $m = new xmlrpcmsg('system.listMethods');\r\r
+       $r =& $c->send($m);\r\r
+       if($r->faultCode())\r\r
+       {\r\r
+               display_error($r);\r\r
+       }\r\r
+       else\r\r
+       {\r\r
+               $v=$r->value();\r\r
+               for($i=0; $i<$v->arraysize(); $i++)\r\r
+               {\r\r
+                       $mname=$v->arraymem($i);\r\r
+                       print "<h4>" . $mname->scalarval() . "</h4>\n";\r\r
+\r\r
+                       // build messages first, add params later\r\r
+                       $m1  = new xmlrpcmsg('system.methodHelp');\r\r
+                       $m2  = new xmlrpcmsg('system.methodSignature');\r\r
+                       $val = new xmlrpcval($mname->scalarval(), "string");\r\r
+                       $m1->addParam($val);\r\r
+                       $m2->addParam($val);\r\r
+\r\r
+                       // send multiple messages in one pass.\r\r
+                       // If server does not support multicall, client will fall back to 2 separate calls\r\r
+                       $ms = array($m1, $m2);\r\r
+                       $rs =& $c->send($ms);\r\r
+\r\r
+                       if($rs[0]->faultCode())\r\r
+                       {\r\r
+                               display_error($rs[0]);\r\r
+                       }\r\r
+                       else\r\r
+                       {\r\r
+                               $val=$rs[0]->value();\r\r
+                               $txt=$val->scalarval();\r\r
+                               if($txt != "")\r\r
+                               {\r\r
+                                       print "<h4>Documentation</h4><p>${txt}</p>\n";\r\r
+                               }\r\r
+                               else\r\r
+                               {\r\r
+                                       print "<p>No documentation available.</p>\n";\r\r
+                               }\r\r
+                       }\r\r
+\r\r
+                       if($rs[1]->faultCode())\r\r
+                       {\r\r
+                               display_error($rs[1]);\r\r
+                       }\r\r
+                       else\r\r
+                       {\r\r
+                               print "<h4>Signature</h4><p>\n";\r\r
+                               $val = $rs[1]->value();\r\r
+                               if($val->kindOf()=="array")\r\r
+                               {\r\r
+                                       for($j=0; $j<$val->arraysize(); $j++)\r\r
+                                       {\r\r
+                                               $x = $val->arraymem($j);\r\r
+                                               $ret = $x->arraymem(0);\r\r
+                                               print "<code>" . $ret->scalarval() . " "\r\r
+                                                       . $mname->scalarval() . "(";\r\r
+                                               if($x->arraysize()>1)\r\r
+                                               {\r\r
+                                                       for($k=1; $k<$x->arraysize(); $k++)\r\r
+                                                       {\r\r
+                                                               $y = $x->arraymem($k);\r\r
+                                                               print $y->scalarval();\r\r
+                                                               if($k < $x->arraysize()-1)\r\r
+                                                               {\r\r
+                                                                       print ", ";\r\r
+                                                               }\r\r
+                                                       }\r\r
+                                               }\r\r
+                                               print ")</code><br/>\n";\r\r
+                                       }\r\r
+                               }\r\r
+                               else\r\r
+                               {\r\r
+                                       print "Signature unknown\n";\r\r
+                               }\r\r
+                               print "</p>\n";\r\r
+                       }\r\r
+               }\r\r
+       }\r\r
+?>\r\r
+<hr/>\r\r
+<em>$Id$</em>\r\r
+</body>\r\r
+</html>\r\r
diff --git a/demo/client/mail.php b/demo/client/mail.php
new file mode 100644 (file)
index 0000000..f73ed37
--- /dev/null
@@ -0,0 +1,71 @@
+<?php
+// Allow users to see the source of this file even if PHP is not configured for it
+if ((isset($HTTP_GET_VARS['showSource']) && $HTTP_GET_VARS['showSource']) ||
+       (isset($_GET['showSource']) && $_GET['showSource']))
+       { highlight_file(__FILE__); die(); }
+?>
+<html>
+<head><title>xmlrpc</title></head>
+<body>
+<h1>Mail demo</h1>
+<p>This form enables you to send mail via an XML-RPC server. For public use
+only the "Userland" server will work (see <a href="http://www.xmlrpc.com/discuss/msgReader$598">Dave Winer's message</a>).
+When you press <kbd>Send</kbd> this page will reload, showing you the XML-RPC request sent to the host server, the XML-RPC response received and the internal evaluation done by the PHP implementation.</p>
+<p>You can find the source to this page here: <a href="mail.php?showSource=1">mail.php</a><br/>
+And the source to a functionally identical mail-by-XML-RPC server in the file <a href="../server/server.php?showSource=1">server.php</a> included with the library (look for the 'mail_send' method)</p>
+<?php
+include("xmlrpc.inc");
+
+// Play nice to PHP 5 installations with REGISTER_LONG_ARRAYS off
+if (!isset($HTTP_POST_VARS) && isset($_POST))
+       $HTTP_POST_VARS = $_POST;
+
+if (isset($HTTP_POST_VARS["server"]) && $HTTP_POST_VARS["server"]) {
+       if ($HTTP_POST_VARS["server"]=="Userland") {
+               $XP="/RPC2"; $XS="206.204.24.2";
+       } else {
+               $XP="/xmlrpc/server.php"; $XS="pingu.heddley.com";
+       }
+       $f=new xmlrpcmsg('mail.send');
+       $f->addParam(new xmlrpcval($HTTP_POST_VARS["mailto"]));
+       $f->addParam(new xmlrpcval($HTTP_POST_VARS["mailsub"]));
+       $f->addParam(new xmlrpcval($HTTP_POST_VARS["mailmsg"]));
+       $f->addParam(new xmlrpcval($HTTP_POST_VARS["mailfrom"]));
+       $f->addParam(new xmlrpcval($HTTP_POST_VARS["mailcc"]));
+       $f->addParam(new xmlrpcval($HTTP_POST_VARS["mailbcc"]));
+       $f->addParam(new xmlrpcval("text/plain"));
+
+       $c=new xmlrpc_client($XP, $XS, 80);
+       $c->setDebug(2);
+       $r=&$c->send($f);
+       if (!$r->faultCode()) {
+               print "Mail sent OK<br/>\n";
+       } else {
+               print "<fonr color=\"red\">";
+               print "Mail send failed<br/>\n";
+               print "Fault: ";
+               print "Code: " . htmlspecialchars($r->faultCode()) .
+         " Reason: '" . htmlspecialchars($r->faultString()) . "'<br/>";
+               print "</font><br/>";
+       }
+}
+?>
+<form method="POST">
+Server <select name="server"><option value="Userland">Userland</option>
+<option value="UsefulInc">UsefulInc private server</option></select>
+<hr/>
+From <input size="60" name="mailfrom" value=""/><br/>
+<hr/>
+To <input size="60" name="mailto" value=""/><br/>
+Cc <input size="60" name="mailcc" value=""/><br/>
+Bcc <input size="60" name="mailbcc" value=""/><br/>
+<hr/>
+Subject <input size="60" name="mailsub" value="A message from xmlrpc"/>
+<hr/>
+Body <textarea rows="7" cols="60" name="mailmsg">Your message here</textarea><br/>
+<input type="Submit" value="Send"/>
+</form>
+<hr/>
+<em>$Id$</em>
+</body>
+</html>
diff --git a/demo/client/simple_call.php b/demo/client/simple_call.php
new file mode 100644 (file)
index 0000000..a9329c7
--- /dev/null
@@ -0,0 +1,59 @@
+<?php
+/**
+ * Helper function for the terminally lazy
+ *
+ * @version $Id$
+ * @copyright (c) 2006-2008 G. Giunta
+ * @license code licensed under the BSD License: http://phpxmlrpc.sourceforge.net/license.txt
+ */
+
+       /**
+        * Takes a client object, a remote method name, and a variable numbers of
+        * php values, and calls the method with the supplied parameters. The 
+        * parameters are native php values and the result is an xmlrpcresp object.
+        *
+        * Notes:
+        * The function encodes the received parameters using php_xmlrpc_encode:
+        * the limitations of automatic encoding apply to this function too);
+        *
+        * the type of the value returned by the function can be changed setting
+        * beforehand the 'return_type' member of the client object to 'phpvals' -
+        * see the manual for more details about this capability).
+        *
+        *
+        * @author Toth Istvan
+        *
+        * @param xmlrpc_client client object, properly set up to connect to server
+        * @param string remote function name
+        * @param mixed $parameter1
+        * @param mixed $parameter2
+        * @param mixed $parameter3 ...
+        * @return xmlrpcresp or false on error
+        */
+       function xmlrpccall_simple()
+       {
+               if(func_num_args() < 2)
+               {
+                       // Incorrect
+                       return false;
+               }
+               else
+               {
+                       $varargs = func_get_args();
+                       $client = array_shift($varargs);
+                       $remote_function_name = array_shift($varargs);
+                       if (!is_a($client, 'xmlrpc_client') || !is_string($remote_function_name))
+                       {
+                               return false;
+                       }
+
+                       $xmlrpcval_array = array();
+                       foreach($varargs as $parameter)
+                       {
+                               $xmlrpcval_array[] = php_xmlrpc_encode($parameter);
+                       }
+
+                       return $client->send(new xmlrpcmsg($remote_function_name, $xmlrpcval_array));
+               }
+       }
+?>
diff --git a/demo/client/which.php b/demo/client/which.php
new file mode 100644 (file)
index 0000000..0699c8b
--- /dev/null
@@ -0,0 +1,32 @@
+<html>\r\r
+<head><title>xmlrpc</title></head>\r\r
+<body>\r\r
+<h1>Which toolkit demo</h1>\r\r
+<h2>Query server for toolkit information</h2>\r\r
+<h3>The code demonstrates usage of the php_xmlrpc_decode function</h3>\r\r
+<?php\r\r
+       include("xmlrpc.inc");\r\r
+\r\r
+       $f = new xmlrpcmsg('interopEchoTests.whichToolkit', array());\r\r
+       $c = new xmlrpc_client("/server.php", "phpxmlrpc.sourceforge.net", 80);\r\r
+       $r = $c->send($f);\r\r
+       if(!$r->faultCode())\r\r
+       {\r\r
+               $v = php_xmlrpc_decode($r->value());\r\r
+               print "<pre>";\r\r
+               print "name: " . htmlspecialchars($v["toolkitName"]) . "\n";\r\r
+               print "version: " . htmlspecialchars($v["toolkitVersion"]) . "\n";\r\r
+               print "docs: " . htmlspecialchars($v["toolkitDocsUrl"]) . "\n";\r\r
+               print "os: " . htmlspecialchars($v["toolkitOperatingSystem"]) . "\n";\r\r
+               print "</pre>";\r\r
+       }\r\r
+       else\r\r
+       {\r\r
+               print "An error occurred: ";\r\r
+               print "Code: " . htmlspecialchars($r->faultCode()) . " Reason: '" . htmlspecialchars($r->faultString()) . "'\n";\r\r
+       }\r\r
+?>\r\r
+<hr/>\r\r
+<em>$Id$</em>\r\r
+</body>\r\r
+</html>\r\r
diff --git a/demo/client/wrap.php b/demo/client/wrap.php
new file mode 100644 (file)
index 0000000..6b4e005
--- /dev/null
@@ -0,0 +1,58 @@
+<html>
+<head><title>xmlrpc</title></head>
+<body>
+<h1>Webservice wrappper demo</h1>
+<h2>Wrap methods exposed by server into php functions</h2>
+<h3>The code demonstrates usage of the most automagic client usage possible:<br/>
+1) client that returns php values instead of xmlrpcval objects<br/>
+2) wrapping of remote methods into php functions
+</h3>
+<?php
+       include("xmlrpc.inc");
+       include("xmlrpc_wrappers.inc");
+
+       $c = new xmlrpc_client("/server.php", "phpxmlrpc.sourceforge.net", 80);
+       $c->return_type = 'phpvals'; // let client give us back php values instead of xmlrpcvals
+       $r =& $c->send(new xmlrpcmsg('system.listMethods'));
+       if($r->faultCode())
+       {
+               echo "<p>Server methods list could not be retrieved: error '".htmlspecialchars($r->faultString())."'</p>\n";
+       }
+       else
+       {
+               $testcase = '';
+               echo "<p>Server methods list retrieved, now wrapping it up...</p>\n<ul>\n";
+               foreach($r->value() as $methodname) // $r->value is an array of strings
+               {
+                       // do not wrap remote server system methods
+                       if (strpos($methodname, 'system.') !== 0)
+                       {
+                               $funcname = wrap_xmlrpc_method($c, $methodname);
+                               if($funcname)
+                               {
+                                       echo "<li>Remote server method ".htmlspecialchars($methodname)." wrapped into php function ".$funcname."</li>\n";
+                               }
+                               else
+                               {
+                                       echo "<li>Remote server method ".htmlspecialchars($methodname)." could not be wrapped!</li>\n";
+                               }
+                               if($methodname == 'examples.getStateName')
+                               {
+                                       $testcase = $funcname;
+                               }
+                       }
+               }
+               echo "</ul>\n";
+               if($testcase)
+               {
+                       echo "Now testing function $testcase: remote method to convert U.S. state number into state name";
+                       $statenum = 25;
+                       $statename = $testcase($statenum, 2);
+                       echo "State number $statenum is ".htmlspecialchars($statename);
+               }
+       }
+?>
+<hr/>
+<em>$Id$</em>
+</body>
+</html>
diff --git a/demo/client/zopetest.php b/demo/client/zopetest.php
new file mode 100644 (file)
index 0000000..1029e01
--- /dev/null
@@ -0,0 +1,31 @@
+<html>
+<head><title>xmlrpc</title></head>
+<body>
+<h1>Zope test demo</h1>
+<h3>The code demonstrates usage of basic authentication to connect to the server</h3>
+<?php
+       include("xmlrpc.inc");
+
+       $f = new xmlrpcmsg('document_src', array());
+       $c = new xmlrpc_client("/index_html", "pingu.heddley.com", 9080);
+       $c->setCredentials("username", "password");
+       $c->setDebug(2);
+       $r = $c->send($f);
+       if(!$r->faultCode())
+       {
+               $v = $r->value();
+               print "I received:" . htmlspecialchars($v->scalarval()) . "<br/>";
+               print "<hr/>I got this value back<br/>pre>" .
+               htmlentities($r->serialize()). "</pre>\n";
+       }
+       else
+       {
+               print "An error occurred: ";
+               print "Code: " . htmlspecialchars($r->faultCode())
+                       . " Reason: '" . ($r->faultString()) . "'<br/>";
+       }
+?>
+<hr/>
+<em>$Id$</em>
+</body>
+</html>
diff --git a/demo/demo1.txt b/demo/demo1.txt
new file mode 100644 (file)
index 0000000..2543c90
--- /dev/null
@@ -0,0 +1,36 @@
+<?xml version="1.0"?>
+          <methodResponse>
+             <params>
+                <param>
+                   <value>
+               <struct>
+<member><name>thearray</name>
+<value><array>
+<data>
+<value><string>ABCDEFHIJ</string></value>
+<value><int>1234</int></value>
+<value><boolean>1</boolean></value>
+</data>
+</array></value>
+</member>
+<member><name>theint</name>
+<value><int>23</int></value>
+</member>
+<member><name>thestring</name>
+<value><string>foobarwhizz</string></value>
+</member>
+<member><name>thestruct</name>
+<value><struct>
+<member><name>one</name>
+<value><int>1</int></value>
+</member>
+<member><name>two</name>
+<value><int>2</int></value>
+</member>
+</struct></value>
+</member>
+</struct>
+               </value>
+                   </param>
+                </params>
+             </methodResponse>
diff --git a/demo/demo2.txt b/demo/demo2.txt
new file mode 100644 (file)
index 0000000..2891422
--- /dev/null
@@ -0,0 +1,8 @@
+<?xml version="1.0"?>
+          <methodResponse>
+             <params>
+                <param>
+                   <value><string>South Dakota's own</string></value>
+                   </param>
+                </params>
+             </methodResponse>
diff --git a/demo/demo3.txt b/demo/demo3.txt
new file mode 100644 (file)
index 0000000..9247fca
--- /dev/null
@@ -0,0 +1,17 @@
+<?xml version="1.0"?>
+          <methodResponse>
+             <fault>
+                <value>
+                   <struct>
+                      <member>
+                         <name>faultCode</name>
+                         <value><int>4</int></value>
+                         </member>
+                      <member>
+                         <name>faultString</name>
+                         <value><string>Too many parameters.</string></value>
+                         </member>
+                      </struct>
+                   </value>
+                </fault>
+             </methodResponse>
diff --git a/demo/server/discuss.php b/demo/server/discuss.php
new file mode 100644 (file)
index 0000000..dc4cd85
--- /dev/null
@@ -0,0 +1,124 @@
+<?php
+// $Id$
+       include("xmlrpc.inc");
+       include("xmlrpcs.inc");
+
+       $addcomment_sig=array(array($xmlrpcInt, $xmlrpcString, $xmlrpcString, $xmlrpcString));
+
+       $addcomment_doc='Adds a comment to an item. The first parameter
+is the item ID, the second the name of the commenter, and the third
+is the comment itself. Returns the number of comments against that
+ID.';
+
+       function addcomment($m)
+       {
+               global $xmlrpcerruser;
+               $err="";
+               // since validation has already been carried out for us,
+               // we know we got exactly 3 string values
+               $n = php_xmlrpc_decode($m);
+               $msgID = $n[0];
+               $name  = $n[1];
+               $comment = $n[2];
+
+               $dbh=dba_open("/tmp/comments.db", "c", "db2");
+               if($dbh)
+               {
+                       $countID="${msgID}_count";
+                       if(dba_exists($countID, $dbh))
+                       {
+                               $count=dba_fetch($countID, $dbh);
+                       }
+                       else
+                       {
+                               $count=0;
+                       }
+                       // add the new comment in
+                       dba_insert($msgID . "_comment_${count}", $comment, $dbh);
+                       dba_insert($msgID . "_name_${count}", $name, $dbh);
+                       $count++;
+                       dba_replace($countID, $count, $dbh);
+                       dba_close($dbh);
+               }
+               else
+               {
+                       $err="Unable to open comments database.";
+               }
+               // if we generated an error, create an error return response
+               if($err)
+               {
+                       return new xmlrpcresp(0, $xmlrpcerruser, $err);
+               }
+               else
+               {
+                       // otherwise, we create the right response
+                       // with the state name
+                       return new xmlrpcresp(new xmlrpcval($count, "int"));
+               }
+       }
+
+       $getcomments_sig=array(array($xmlrpcArray, $xmlrpcString));
+
+       $getcomments_doc='Returns an array of comments for a given ID, which
+is the sole argument. Each array item is a struct containing name
+and comment text.';
+
+       function getcomments($m)
+       {
+               global $xmlrpcerruser;
+               $err="";
+               $ra=array();
+               // get the first param
+               if(XMLRPC_EPI_ENABLED == '1')
+               {
+                       $msgID=xmlrpc_decode($m->getParam(0));
+               }
+               else
+               {
+                       $msgID=php_xmlrpc_decode($m->getParam(0));
+               }
+               $dbh=dba_open("/tmp/comments.db", "r", "db2");
+               if($dbh)
+               {
+                       $countID="${msgID}_count";
+                       if(dba_exists($countID, $dbh))
+                       {
+                               $count=dba_fetch($countID, $dbh);
+                               for($i=0; $i<$count; $i++)
+                               {
+                                       $name=dba_fetch("${msgID}_name_${i}", $dbh);
+                                       $comment=dba_fetch("${msgID}_comment_${i}", $dbh);
+                                       // push a new struct onto the return array
+                                       $ra[] = array(
+                                               "name" => $name,
+                                               "comment" => $comment
+                                               );
+                               }
+                       }
+               }
+               // if we generated an error, create an error return response
+               if($err)
+               {
+                       return new xmlrpcresp(0, $xmlrpcerruser, $err);
+               }
+               else
+               {
+                       // otherwise, we create the right response
+                       // with the state name
+                       return new xmlrpcresp(php_xmlrpc_encode($ra));
+               }
+       }
+
+       $s = new xmlrpc_server(array(
+               "discuss.addComment" => array(
+                       "function" => "addcomment",
+                       "signature" => $addcomment_sig,
+                       "docstring" => $addcomment_doc
+               ),
+               "discuss.getComments" => array(
+                       "function" => "getcomments",
+                       "signature" => $getcomments_sig,
+                       "docstring" => $getcomments_doc
+               )
+       ));
+?>
diff --git a/demo/server/proxy.php b/demo/server/proxy.php
new file mode 100644 (file)
index 0000000..adcabd0
--- /dev/null
@@ -0,0 +1,86 @@
+<?php
+/**
+ * XMLRPC server acting as proxy for requests to other servers
+ * (useful e.g. for ajax-originated calls that can only connect back to
+ * the originating server)
+ *
+ * @version $Id$
+ * @author Gaetano Giunta
+ * @copyright (C) 2006-2008 G. Giunta
+ * @license code licensed under the BSD License: http://phpxmlrpc.sourceforge.net/license.txt
+ */
+
+       include("xmlrpc.inc");
+       include("xmlrpcs.inc");
+
+       /**
+       * Forward an xmlrpc request to another server, and return to client the response received.
+       * @param xmlrpcmsg $m (see method docs below for a description of the expected parameters)
+       * @return xmlrpcresp
+       */
+       function forward_request($m)
+       {
+               // create client
+               $timeout = 0;
+               $url = php_xmlrpc_decode($m->getParam(0));
+               $c = new xmlrpc_client($url);
+               if ($m->getNumParams() > 3)
+               {
+                       // we have to set some options onto the client.
+                       // Note that if we do not untaint the received values, warnings might be generated...
+                       $options = php_xmlrpc_decode($m->getParam(3));
+                       foreach($options as $key => $val)
+                       {
+                               switch($key)
+                               {
+                                       case 'Cookie':
+                                               break;
+                                       case 'Credentials':
+                                               break;
+                                       case 'RequestCompression':
+                                               $c->setRequestCompression($val);
+                                               break;
+                                       case 'SSLVerifyHost':
+                                               $c->setSSLVerifyHost($val);
+                                               break;
+                                       case 'SSLVerifyPeer':
+                                               $c->setSSLVerifyPeer($val);
+                                               break;
+                                       case 'Timeout':
+                                               $timeout = (integer) $val;
+                                               break;
+                               } // switch
+                       }
+               }
+
+               // build call for remote server
+               /// @todo find a weay to forward client info (such as IP) to server, either
+               /// - as xml comments in the payload, or
+               /// - using std http header conventions, such as X-forwarded-for...
+               $method = php_xmlrpc_decode($m->getParam(1));
+               $pars = $m->getParam(2);
+               $m = new xmlrpcmsg($method);
+               for ($i = 0; $i < $pars->arraySize(); $i++)
+               {
+                       $m->addParam($pars->arraymem($i));
+               }
+
+               // add debug info into response we give back to caller
+               xmlrpc_debugmsg("Sending to server $url the payload: ".$m->serialize());
+               return $c->send($m, $timeout);
+       }
+
+       // run the server
+       $server = new xmlrpc_server(
+               array(
+                       'xmlrpcproxy.call' => array(
+                               'function' => 'forward_request',
+                               'signature' => array(
+                                       array('mixed', 'string', 'string', 'array'),
+                                       array('mixed', 'string', 'string', 'array', 'stuct'),
+                               ),
+                               'docstring' => 'forwards xmlrpc calls to remote servers. Returns remote method\'s response. Accepts params: remote server url (might include basic auth credentials), method name, array of params, and (optionally) a struct containing call options'
+                       )
+               )
+       );
+?>
diff --git a/demo/server/server.php b/demo/server/server.php
new file mode 100644 (file)
index 0000000..2a8d185
--- /dev/null
@@ -0,0 +1,837 @@
+<?php
+/**
+ * Demo server for xmlrpc library.
+ *
+ * Implements a lot of webservices, including a suite of services used for
+ * interoperability testing (validator1 methods), and some whose only purpose
+ * is to be used for unit-testing the library.
+ *
+ * Please do not copy this file verbatim into your production server.
+ *
+ * @version $Id$
+ **/
+
+// give user a chance to see the source for this server instead of running the services
+if ($_SERVER['REQUEST_METHOD'] != 'POST' && isset($_GET['showSource']))
+{
+       highlight_file(__FILE__);
+       die();
+}
+
+       include("xmlrpc.inc");
+       include("xmlrpcs.inc");
+       include("xmlrpc_wrappers.inc");
+
+       /**
+       * Used to test usage of object methods in dispatch maps and in wrapper code
+       */
+       class xmlrpc_server_methods_container
+       {
+               /*
+               * Method used to test logging of php warnings generated by user functions.
+               */
+               function phpwarninggenerator($m)
+               {
+                       $a = $b; // this triggers a warning in E_ALL mode, since $b is undefined
+                       return new xmlrpcresp(new xmlrpcval(1, 'boolean'));
+               }
+
+        /**
+        * a PHP version of the state-number server. Send me an integer and i'll sell you a state
+        * @param integer $s
+        * @return string
+        * */
+               function findstate($s)
+        {
+                   return inner_findstate($s);
+               }
+       }
+
+
+       // a PHP version
+       // of the state-number server
+       // send me an integer and i'll sell you a state
+
+       $stateNames = array(
+               "Alabama", "Alaska", "Arizona", "Arkansas", "California",
+               "Colorado", "Columbia", "Connecticut", "Delaware", "Florida",
+               "Georgia", "Hawaii", "Idaho", "Illinois", "Indiana", "Iowa", "Kansas",
+               "Kentucky", "Louisiana", "Maine", "Maryland", "Massachusetts", "Michigan",
+               "Minnesota", "Mississippi", "Missouri", "Montana", "Nebraska", "Nevada",
+               "New Hampshire", "New Jersey", "New Mexico", "New York", "North Carolina",
+               "North Dakota", "Ohio", "Oklahoma", "Oregon", "Pennsylvania", "Rhode Island",
+               "South Carolina", "South Dakota", "Tennessee", "Texas", "Utah", "Vermont",
+               "Virginia", "Washington", "West Virginia", "Wisconsin", "Wyoming"
+       );
+
+       $findstate_sig=array(array($xmlrpcString, $xmlrpcInt));
+       $findstate_doc='When passed an integer between 1 and 51 returns the
+name of a US state, where the integer is the index of that state name
+in an alphabetic order.';
+
+
+       function findstate($m)
+       {
+               global $xmlrpcerruser, $stateNames;
+               $err="";
+               // get the first param
+               $sno=$m->getParam(0);
+
+               // param must be there and of the correct type: server object does the
+               // validation for us
+
+               // extract the value of the state number
+               $snv=$sno->scalarval();
+               // look it up in our array (zero-based)
+               if (isset($stateNames[$snv-1]))
+               {
+                       $sname=$stateNames[$snv-1];
+               }
+               else
+               {
+                       // not, there so complain
+                       $err="I don't have a state for the index '" . $snv . "'";
+               }
+
+               // if we generated an error, create an error return response
+               if ($err)
+               {
+                       return new xmlrpcresp(0, $xmlrpcerruser, $err);
+               }
+               else
+               {
+                       // otherwise, we create the right response
+                       // with the state name
+                       return new xmlrpcresp(new xmlrpcval($sname));
+               }
+       }
+
+       /**
+       * Inner code of the state-number server.
+       * Used to test auto-registration of PHP funcions as xmlrpc methods.
+       * @param integer $stateno the state number
+       * @return string the name of the state (or error descrption)
+       */
+       function inner_findstate($stateno)
+       {
+               global $stateNames;
+               if (isset($stateNames[$stateno-1]))
+               {
+                       return $stateNames[$stateno-1];
+               }
+               else
+               {
+                       // not, there so complain
+                       return "I don't have a state for the index '" . $stateno . "'";
+               }
+       }
+       $findstate2_sig = wrap_php_function('inner_findstate');
+
+       $findstate3_sig = wrap_php_function(array('xmlrpc_server_methods_container', 'findstate'));
+
+    $obj = new xmlrpc_server_methods_container();
+
+       $findstate4_sig = wrap_php_function(array($obj, 'findstate'));
+
+       $addtwo_sig=array(array($xmlrpcInt, $xmlrpcInt, $xmlrpcInt));
+       $addtwo_doc='Add two integers together and return the result';
+       function addtwo($m)
+       {
+               $s=$m->getParam(0);
+               $t=$m->getParam(1);
+               return new xmlrpcresp(new xmlrpcval($s->scalarval()+$t->scalarval(),"int"));
+       }
+
+       $addtwodouble_sig=array(array($xmlrpcDouble, $xmlrpcDouble, $xmlrpcDouble));
+       $addtwodouble_doc='Add two doubles together and return the result';
+       function addtwodouble($m)
+       {
+               $s=$m->getParam(0);
+               $t=$m->getParam(1);
+               return new xmlrpcresp(new xmlrpcval($s->scalarval()+$t->scalarval(),"double"));
+       }
+
+       $stringecho_sig=array(array($xmlrpcString, $xmlrpcString));
+       $stringecho_doc='Accepts a string parameter, returns the string.';
+       function stringecho($m)
+       {
+               // just sends back a string
+               $s=$m->getParam(0);
+               $v = $s->scalarval();
+               return new xmlrpcresp(new xmlrpcval($s->scalarval()));
+       }
+
+       $echoback_sig=array(array($xmlrpcString, $xmlrpcString));
+       $echoback_doc='Accepts a string parameter, returns the entire incoming payload';
+       function echoback($m)
+       {
+               // just sends back a string with what i got
+               // sent to me, just escaped, that's all
+               //
+               // $m is an incoming message
+               $s="I got the following message:\n" . $m->serialize();
+               return new xmlrpcresp(new xmlrpcval($s));
+       }
+
+       $echosixtyfour_sig=array(array($xmlrpcString, $xmlrpcBase64));
+       $echosixtyfour_doc='Accepts a base64 parameter and returns it decoded as a string';
+       function echosixtyfour($m)
+       {
+               // accepts an encoded value, but sends it back
+               // as a normal string. this is to test base64 encoding
+               // is working as expected
+               $incoming=$m->getParam(0);
+               return new xmlrpcresp(new xmlrpcval($incoming->scalarval(), "string"));
+       }
+
+       $bitflipper_sig=array(array($xmlrpcArray, $xmlrpcArray));
+       $bitflipper_doc='Accepts an array of booleans, and returns them inverted';
+       function bitflipper($m)
+       {
+               global $xmlrpcArray;
+
+               $v=$m->getParam(0);
+               $sz=$v->arraysize();
+               $rv=new xmlrpcval(array(), $xmlrpcArray);
+
+               for($j=0; $j<$sz; $j++)
+               {
+                       $b=$v->arraymem($j);
+                       if ($b->scalarval())
+                       {
+                               $rv->addScalar(false, "boolean");
+                       }
+                       else
+                       {
+                               $rv->addScalar(true, "boolean");
+                       }
+               }
+
+               return new xmlrpcresp($rv);
+       }
+
+       // Sorting demo
+       //
+       // send me an array of structs thus:
+       //
+       // Dave 35
+       // Edd  45
+       // Fred 23
+       // Barney 37
+       //
+       // and I'll return it to you in sorted order
+
+       function agesorter_compare($a, $b)
+       {
+               global $agesorter_arr;
+
+               // don't even ask me _why_ these come padded with
+               // hyphens, I couldn't tell you :p
+               $a=ereg_replace("-", "", $a);
+               $b=ereg_replace("-", "", $b);
+
+               if ($agesorter_arr[$a]==$agesorter[$b])
+               {
+                       return 0;
+               }
+               return ($agesorter_arr[$a] > $agesorter_arr[$b]) ? -1 : 1;
+       }
+
+       $agesorter_sig=array(array($xmlrpcArray, $xmlrpcArray));
+       $agesorter_doc='Send this method an array of [string, int] structs, eg:
+<pre>
+ Dave   35
+ Edd    45
+ Fred   23
+ Barney 37
+</pre>
+And the array will be returned with the entries sorted by their numbers.
+';
+       function agesorter($m)
+       {
+               global $agesorter_arr, $xmlrpcerruser, $s;
+
+               xmlrpc_debugmsg("Entering 'agesorter'");
+               // get the parameter
+               $sno=$m->getParam(0);
+               // error string for [if|when] things go wrong
+               $err="";
+               // create the output value
+               $v=new xmlrpcval();
+               $agar=array();
+
+               if (isset($sno) && $sno->kindOf()=="array")
+               {
+                       $max=$sno->arraysize();
+                       // TODO: create debug method to print can work once more
+                       // print "<!-- found $max array elements -->\n";
+                       for($i=0; $i<$max; $i++)
+                       {
+                               $rec=$sno->arraymem($i);
+                               if ($rec->kindOf()!="struct")
+                               {
+                                       $err="Found non-struct in array at element $i";
+                                       break;
+                               }
+                               // extract name and age from struct
+                               $n=$rec->structmem("name");
+                               $a=$rec->structmem("age");
+                               // $n and $a are xmlrpcvals,
+                               // so get the scalarval from them
+                               $agar[$n->scalarval()]=$a->scalarval();
+                       }
+
+                       $agesorter_arr=$agar;
+                       // hack, must make global as uksort() won't
+                       // allow us to pass any other auxilliary information
+                       uksort($agesorter_arr, agesorter_compare);
+                       $outAr=array();
+                       while (list( $key, $val ) = each( $agesorter_arr ) )
+                       {
+                               // recreate each struct element
+                               $outAr[]=new xmlrpcval(array("name" =>
+                               new xmlrpcval($key),
+                               "age" =>
+                               new xmlrpcval($val, "int")), "struct");
+                       }
+                       // add this array to the output value
+                       $v->addArray($outAr);
+               }
+               else
+               {
+                       $err="Must be one parameter, an array of structs";
+               }
+
+               if ($err)
+               {
+                       return new xmlrpcresp(0, $xmlrpcerruser, $err);
+               }
+               else
+               {
+                       return new xmlrpcresp($v);
+               }
+       }
+
+       // signature and instructions, place these in the dispatch
+       // map
+       $mail_send_sig=array(array(
+               $xmlrpcBoolean, $xmlrpcString, $xmlrpcString,
+               $xmlrpcString, $xmlrpcString, $xmlrpcString,
+               $xmlrpcString, $xmlrpcString
+       ));
+
+       $mail_send_doc='mail.send(recipient, subject, text, sender, cc, bcc, mimetype)<br/>
+recipient, cc, and bcc are strings, comma-separated lists of email addresses, as described above.<br/>
+subject is a string, the subject of the message.<br/>
+sender is a string, it\'s the email address of the person sending the message. This string can not be
+a comma-separated list, it must contain a single email address only.<br/>
+text is a string, it contains the body of the message.<br/>
+mimetype, a string, is a standard MIME type, for example, text/plain.
+';
+       // WARNING; this functionality depends on the sendmail -t option
+       // it may not work with Windows machines properly; particularly
+       // the Bcc option. Sneak on your friends at your own risk!
+       function mail_send($m)
+       {
+               global $xmlrpcerruser, $xmlrpcBoolean;
+               $err="";
+
+               $mTo=$m->getParam(0);
+               $mSub=$m->getParam(1);
+               $mBody=$m->getParam(2);
+               $mFrom=$m->getParam(3);
+               $mCc=$m->getParam(4);
+               $mBcc=$m->getParam(5);
+               $mMime=$m->getParam(6);
+
+               if ($mTo->scalarval()=="")
+               {
+                       $err="Error, no 'To' field specified";
+               }
+
+               if ($mFrom->scalarval()=="")
+               {
+                       $err="Error, no 'From' field specified";
+               }
+
+               $msghdr="From: " . $mFrom->scalarval() . "\n";
+               $msghdr.="To: ". $mTo->scalarval() . "\n";
+
+               if ($mCc->scalarval()!="")
+               {
+                       $msghdr.="Cc: " . $mCc->scalarval(). "\n";
+               }
+               if ($mBcc->scalarval()!="")
+               {
+                       $msghdr.="Bcc: " . $mBcc->scalarval(). "\n";
+               }
+               if ($mMime->scalarval()!="")
+               {
+                       $msghdr.="Content-type: " . $mMime->scalarval() . "\n";
+               }
+               $msghdr.="X-Mailer: XML-RPC for PHP mailer 1.0";
+
+               if ($err=="")
+               {
+                       if (!mail("",
+                               $mSub->scalarval(),
+                               $mBody->scalarval(),
+                               $msghdr))
+                       {
+                               $err="Error, could not send the mail.";
+                       }
+               }
+
+               if ($err)
+               {
+                       return new xmlrpcresp(0, $xmlrpcerruser, $err);
+               }
+               else
+               {
+                       return new xmlrpcresp(new xmlrpcval("true", $xmlrpcBoolean));
+               }
+       }
+
+       $getallheaders_sig=array(array($xmlrpcStruct));
+       $getallheaders_doc='Returns a struct containing all the HTTP headers received with the request. Provides limited functionality with IIS';
+       function getallheaders_xmlrpc($m)
+       {
+               global $xmlrpcerruser;
+               if (function_exists('getallheaders'))
+               {
+                       return new xmlrpcresp(php_xmlrpc_encode(getallheaders()));
+               }
+               else
+               {
+                       $headers = array();
+                       // IIS: poor man's version of getallheaders
+                       foreach ($_SERVER as $key => $val)
+                               if (strpos($key, 'HTTP_') === 0)
+                               {
+                                       $key = ucfirst(str_replace('_', '-', strtolower(substr($key, 5))));
+                                       $headers[$key] = $val;
+                               }
+                       return new xmlrpcresp(php_xmlrpc_encode($headers));
+               }
+       }
+
+       $setcookies_sig=array(array($xmlrpcInt, $xmlrpcStruct));
+       $setcookies_doc='Sends to client a response containing a single \'1\' digit, and sets to it http cookies as received in the request (array of structs describing a cookie)';
+       function setcookies($m)
+       {
+               $m = $m->getParam(0);
+               while(list($name,$value) = $m->structeach())
+               {
+                       $cookiedesc = php_xmlrpc_decode($value);
+                       setcookie($name, @$cookiedesc['value'], @$cookiedesc['expires'], @$cookiedesc['path'], @$cookiedesc['domain'], @$cookiedesc['secure']);
+               }
+               return new xmlrpcresp(new xmlrpcval(1, 'int'));
+       }
+
+       $getcookies_sig=array(array($xmlrpcStruct));
+       $getcookies_doc='Sends to client a response containing all http cookies as received in the request (as struct)';
+       function getcookies($m)
+       {
+               return new xmlrpcresp(php_xmlrpc_encode($_COOKIE));
+       }
+
+       $v1_arrayOfStructs_sig=array(array($xmlrpcInt, $xmlrpcArray));
+       $v1_arrayOfStructs_doc='This handler takes a single parameter, an array of structs, each of which contains at least three elements named moe, larry and curly, all <i4>s. Your handler must add all the struct elements named curly and return the result.';
+       function v1_arrayOfStructs($m)
+       {
+               $sno=$m->getParam(0);
+               $numcurly=0;
+               for($i=0; $i<$sno->arraysize(); $i++)
+               {
+                       $str=$sno->arraymem($i);
+                       $str->structreset();
+                       while(list($key,$val)=$str->structeach())
+                       {
+                               if ($key=="curly")
+                               {
+                                       $numcurly+=$val->scalarval();
+                               }
+                       }
+               }
+               return new xmlrpcresp(new xmlrpcval($numcurly, "int"));
+       }
+
+       $v1_easyStruct_sig=array(array($xmlrpcInt, $xmlrpcStruct));
+       $v1_easyStruct_doc='This handler takes a single parameter, a struct, containing at least three elements named moe, larry and curly, all &lt;i4&gt;s. Your handler must add the three numbers and return the result.';
+       function v1_easyStruct($m)
+       {
+               $sno=$m->getParam(0);
+               $moe=$sno->structmem("moe");
+               $larry=$sno->structmem("larry");
+               $curly=$sno->structmem("curly");
+               $num=$moe->scalarval() + $larry->scalarval() + $curly->scalarval();
+               return new xmlrpcresp(new xmlrpcval($num, "int"));
+       }
+
+       $v1_echoStruct_sig=array(array($xmlrpcStruct, $xmlrpcStruct));
+       $v1_echoStruct_doc='This handler takes a single parameter, a struct. Your handler must return the struct.';
+       function v1_echoStruct($m)
+       {
+               $sno=$m->getParam(0);
+               return new xmlrpcresp($sno);
+       }
+
+       $v1_manyTypes_sig=array(array(
+               $xmlrpcArray, $xmlrpcInt, $xmlrpcBoolean,
+               $xmlrpcString, $xmlrpcDouble, $xmlrpcDateTime,
+               $xmlrpcBase64
+       ));
+       $v1_manyTypes_doc='This handler takes six parameters, and returns an array containing all the parameters.';
+       function v1_manyTypes($m)
+       {
+               return new xmlrpcresp(new xmlrpcval(array(
+                       $m->getParam(0),
+                       $m->getParam(1),
+                       $m->getParam(2),
+                       $m->getParam(3),
+                       $m->getParam(4),
+                       $m->getParam(5)),
+                       "array"
+               ));
+       }
+
+       $v1_moderateSizeArrayCheck_sig=array(array($xmlrpcString, $xmlrpcArray));
+       $v1_moderateSizeArrayCheck_doc='This handler takes a single parameter, which is an array containing between 100 and 200 elements. Each of the items is a string, your handler must return a string containing the concatenated text of the first and last elements.';
+       function v1_moderateSizeArrayCheck($m)
+       {
+               $ar=$m->getParam(0);
+               $sz=$ar->arraysize();
+               $first=$ar->arraymem(0);
+               $last=$ar->arraymem($sz-1);
+               return new xmlrpcresp(new xmlrpcval($first->scalarval() .
+               $last->scalarval(), "string"));
+       }
+
+       $v1_simpleStructReturn_sig=array(array($xmlrpcStruct, $xmlrpcInt));
+       $v1_simpleStructReturn_doc='This handler takes one parameter, and returns a struct containing three elements, times10, times100 and times1000, the result of multiplying the number by 10, 100 and 1000.';
+       function v1_simpleStructReturn($m)
+       {
+               $sno=$m->getParam(0);
+               $v=$sno->scalarval();
+               return new xmlrpcresp(new xmlrpcval(array(
+                       "times10"   => new xmlrpcval($v*10, "int"),
+                       "times100"  => new xmlrpcval($v*100, "int"),
+                       "times1000" => new xmlrpcval($v*1000, "int")),
+                       "struct"
+               ));
+       }
+
+       $v1_nestedStruct_sig=array(array($xmlrpcInt, $xmlrpcStruct));
+       $v1_nestedStruct_doc='This handler takes a single parameter, a struct, that models a daily calendar. At the top level, there is one struct for each year. Each year is broken down into months, and months into days. Most of the days are empty in the struct you receive, but the entry for April 1, 2000 contains a least three elements named moe, larry and curly, all &lt;i4&gt;s. Your handler must add the three numbers and return the result.';
+       function v1_nestedStruct($m)
+       {
+               $sno=$m->getParam(0);
+
+               $twoK=$sno->structmem("2000");
+               $april=$twoK->structmem("04");
+               $fools=$april->structmem("01");
+               $curly=$fools->structmem("curly");
+               $larry=$fools->structmem("larry");
+               $moe=$fools->structmem("moe");
+               return new xmlrpcresp(new xmlrpcval($curly->scalarval() + $larry->scalarval() + $moe->scalarval(), "int"));
+       }
+
+       $v1_countTheEntities_sig=array(array($xmlrpcStruct, $xmlrpcString));
+       $v1_countTheEntities_doc='This handler takes a single parameter, a string, that contains any number of predefined entities, namely &lt;, &gt;, &amp; \' and ".<BR>Your handler must return a struct that contains five fields, all numbers: ctLeftAngleBrackets, ctRightAngleBrackets, ctAmpersands, ctApostrophes, ctQuotes.';
+       function v1_countTheEntities($m)
+       {
+               $sno=$m->getParam(0);
+               $str=$sno->scalarval();
+               $gt=0; $lt=0; $ap=0; $qu=0; $amp=0;
+               for($i=0; $i<strlen($str); $i++)
+               {
+                       $c=substr($str, $i, 1);
+                       switch($c)
+                       {
+                               case ">":
+                                       $gt++;
+                                       break;
+                               case "<":
+                                       $lt++;
+                                       break;
+                               case "\"":
+                                       $qu++;
+                                       break;
+                               case "'":
+                                       $ap++;
+                                       break;
+                               case "&":
+                                       $amp++;
+                                       break;
+                               default:
+                                       break;
+                       }
+               }
+               return new xmlrpcresp(new xmlrpcval(array(
+                       "ctLeftAngleBrackets"  => new xmlrpcval($lt, "int"),
+                       "ctRightAngleBrackets" => new xmlrpcval($gt, "int"),
+                       "ctAmpersands"         => new xmlrpcval($amp, "int"),
+                       "ctApostrophes"        => new xmlrpcval($ap, "int"),
+                       "ctQuotes"             => new xmlrpcval($qu, "int")),
+                       "struct"
+               ));
+       }
+
+       // trivial interop tests
+       // http://www.xmlrpc.com/stories/storyReader$1636
+
+       $i_echoString_sig=array(array($xmlrpcString, $xmlrpcString));
+       $i_echoString_doc="Echoes string.";
+
+       $i_echoStringArray_sig=array(array($xmlrpcArray, $xmlrpcArray));
+       $i_echoStringArray_doc="Echoes string array.";
+
+       $i_echoInteger_sig=array(array($xmlrpcInt, $xmlrpcInt));
+       $i_echoInteger_doc="Echoes integer.";
+
+       $i_echoIntegerArray_sig=array(array($xmlrpcArray, $xmlrpcArray));
+       $i_echoIntegerArray_doc="Echoes integer array.";
+
+       $i_echoFloat_sig=array(array($xmlrpcDouble, $xmlrpcDouble));
+       $i_echoFloat_doc="Echoes float.";
+
+       $i_echoFloatArray_sig=array(array($xmlrpcArray, $xmlrpcArray));
+       $i_echoFloatArray_doc="Echoes float array.";
+
+       $i_echoStruct_sig=array(array($xmlrpcStruct, $xmlrpcStruct));
+       $i_echoStruct_doc="Echoes struct.";
+
+       $i_echoStructArray_sig=array(array($xmlrpcArray, $xmlrpcArray));
+       $i_echoStructArray_doc="Echoes struct array.";
+
+       $i_echoValue_doc="Echoes any value back.";
+       $i_echoValue_sig=array(array($xmlrpcValue, $xmlrpcValue));
+
+       $i_echoBase64_sig=array(array($xmlrpcBase64, $xmlrpcBase64));
+       $i_echoBase64_doc="Echoes base64.";
+
+       $i_echoDate_sig=array(array($xmlrpcDateTime, $xmlrpcDateTime));
+       $i_echoDate_doc="Echoes dateTime.";
+
+       function i_echoParam($m)
+       {
+               $s=$m->getParam(0);
+               return new xmlrpcresp($s);
+       }
+
+       function i_echoString($m) { return i_echoParam($m); }
+       function i_echoInteger($m) { return i_echoParam($m); }
+       function i_echoFloat($m) { return i_echoParam($m); }
+       function i_echoStruct($m) { return i_echoParam($m); }
+       function i_echoStringArray($m) { return i_echoParam($m); }
+       function i_echoIntegerArray($m) { return i_echoParam($m); }
+       function i_echoFloatArray($m) { return i_echoParam($m); }
+       function i_echoStructArray($m) { return i_echoParam($m); }
+       function i_echoValue($m) { return i_echoParam($m); }
+       function i_echoBase64($m) { return i_echoParam($m); }
+       function i_echoDate($m) { return i_echoParam($m); }
+
+       $i_whichToolkit_sig=array(array($xmlrpcStruct));
+       $i_whichToolkit_doc="Returns a struct containing the following strings: toolkitDocsUrl, toolkitName, toolkitVersion, toolkitOperatingSystem.";
+
+       function i_whichToolkit($m)
+       {
+               global $xmlrpcName, $xmlrpcVersion,$SERVER_SOFTWARE;
+               $ret=array(
+                       "toolkitDocsUrl" => "http://phpxmlrpc.sourceforge.net/",
+                       "toolkitName" => $xmlrpcName,
+                       "toolkitVersion" => $xmlrpcVersion,
+                       "toolkitOperatingSystem" => isset ($SERVER_SOFTWARE) ? $SERVER_SOFTWARE : $_SERVER['SERVER_SOFTWARE']
+               );
+               return new xmlrpcresp ( php_xmlrpc_encode($ret));
+       }
+
+       $o=new xmlrpc_server_methods_container;
+       $a=array(
+               "examples.getStateName" => array(
+                       "function" => "findstate",
+                       "signature" => $findstate_sig,
+                       "docstring" => $findstate_doc
+               ),
+               "examples.sortByAge" => array(
+                       "function" => "agesorter",
+                       "signature" => $agesorter_sig,
+                       "docstring" => $agesorter_doc
+               ),
+               "examples.addtwo" => array(
+                       "function" => "addtwo",
+                       "signature" => $addtwo_sig,
+                       "docstring" => $addtwo_doc
+               ),
+               "examples.addtwodouble" => array(
+                       "function" => "addtwodouble",
+                       "signature" => $addtwodouble_sig,
+                       "docstring" => $addtwodouble_doc
+               ),
+               "examples.stringecho" => array(
+                       "function" => "stringecho",
+                       "signature" => $stringecho_sig,
+                       "docstring" => $stringecho_doc
+               ),
+               "examples.echo" => array(
+                       "function" => "echoback",
+                       "signature" => $echoback_sig,
+                       "docstring" => $echoback_doc
+               ),
+               "examples.decode64" => array(
+                       "function" => "echosixtyfour",
+                       "signature" => $echosixtyfour_sig,
+                       "docstring" => $echosixtyfour_doc
+               ),
+               "examples.invertBooleans" => array(
+                       "function" => "bitflipper",
+                       "signature" => $bitflipper_sig,
+                       "docstring" => $bitflipper_doc
+               ),
+               "examples.generatePHPWarning" => array(
+                       "function" => array($o, "phpwarninggenerator")
+                       //'function' => 'xmlrpc_server_methods_container::phpwarninggenerator'
+               ),
+               "examples.getallheaders" => array(
+                       "function" => 'getallheaders_xmlrpc',
+                       "signature" => $getallheaders_sig,
+                       "docstring" => $getallheaders_doc
+               ),
+               "examples.setcookies" => array(
+                       "function" => 'setcookies',
+                       "signature" => $setcookies_sig,
+                       "docstring" => $setcookies_doc
+               ),
+               "examples.getcookies" => array(
+                       "function" => 'getcookies',
+                       "signature" => $getcookies_sig,
+                       "docstring" => $getcookies_doc
+               ),
+               "mail.send" => array(
+                       "function" => "mail_send",
+                       "signature" => $mail_send_sig,
+                       "docstring" => $mail_send_doc
+               ),
+               "validator1.arrayOfStructsTest" => array(
+                       "function" => "v1_arrayOfStructs",
+                       "signature" => $v1_arrayOfStructs_sig,
+                       "docstring" => $v1_arrayOfStructs_doc
+               ),
+               "validator1.easyStructTest" => array(
+                       "function" => "v1_easyStruct",
+                       "signature" => $v1_easyStruct_sig,
+                       "docstring" => $v1_easyStruct_doc
+               ),
+               "validator1.echoStructTest" => array(
+                       "function" => "v1_echoStruct",
+                       "signature" => $v1_echoStruct_sig,
+                       "docstring" => $v1_echoStruct_doc
+               ),
+               "validator1.manyTypesTest" => array(
+                       "function" => "v1_manyTypes",
+                       "signature" => $v1_manyTypes_sig,
+                       "docstring" => $v1_manyTypes_doc
+               ),
+               "validator1.moderateSizeArrayCheck" => array(
+                       "function" => "v1_moderateSizeArrayCheck",
+                       "signature" => $v1_moderateSizeArrayCheck_sig,
+                       "docstring" => $v1_moderateSizeArrayCheck_doc
+               ),
+               "validator1.simpleStructReturnTest" => array(
+                       "function" => "v1_simpleStructReturn",
+                       "signature" => $v1_simpleStructReturn_sig,
+                       "docstring" => $v1_simpleStructReturn_doc
+               ),
+               "validator1.nestedStructTest" => array(
+                       "function" => "v1_nestedStruct",
+                       "signature" => $v1_nestedStruct_sig,
+                       "docstring" => $v1_nestedStruct_doc
+               ),
+               "validator1.countTheEntities" => array(
+                       "function" => "v1_countTheEntities",
+                       "signature" => $v1_countTheEntities_sig,
+                       "docstring" => $v1_countTheEntities_doc
+               ),
+               "interopEchoTests.echoString" => array(
+                       "function" => "i_echoString",
+                       "signature" => $i_echoString_sig,
+                       "docstring" => $i_echoString_doc
+               ),
+               "interopEchoTests.echoStringArray" => array(
+                       "function" => "i_echoStringArray",
+                       "signature" => $i_echoStringArray_sig,
+                       "docstring" => $i_echoStringArray_doc
+               ),
+               "interopEchoTests.echoInteger" => array(
+                       "function" => "i_echoInteger",
+                       "signature" => $i_echoInteger_sig,
+                       "docstring" => $i_echoInteger_doc
+               ),
+               "interopEchoTests.echoIntegerArray" => array(
+                       "function" => "i_echoIntegerArray",
+                       "signature" => $i_echoIntegerArray_sig,
+                       "docstring" => $i_echoIntegerArray_doc
+               ),
+               "interopEchoTests.echoFloat" => array(
+                       "function" => "i_echoFloat",
+                       "signature" => $i_echoFloat_sig,
+                       "docstring" => $i_echoFloat_doc
+               ),
+               "interopEchoTests.echoFloatArray" => array(
+                       "function" => "i_echoFloatArray",
+                       "signature" => $i_echoFloatArray_sig,
+                       "docstring" => $i_echoFloatArray_doc
+               ),
+               "interopEchoTests.echoStruct" => array(
+                       "function" => "i_echoStruct",
+                       "signature" => $i_echoStruct_sig,
+                       "docstring" => $i_echoStruct_doc
+               ),
+               "interopEchoTests.echoStructArray" => array(
+                       "function" => "i_echoStructArray",
+                       "signature" => $i_echoStructArray_sig,
+                       "docstring" => $i_echoStructArray_doc
+               ),
+               "interopEchoTests.echoValue" => array(
+                       "function" => "i_echoValue",
+                       "signature" => $i_echoValue_sig,
+                       "docstring" => $i_echoValue_doc
+               ),
+               "interopEchoTests.echoBase64" => array(
+                       "function" => "i_echoBase64",
+                       "signature" => $i_echoBase64_sig,
+                       "docstring" => $i_echoBase64_doc
+               ),
+               "interopEchoTests.echoDate" => array(
+                       "function" => "i_echoDate",
+                       "signature" => $i_echoDate_sig,
+                       "docstring" => $i_echoDate_doc
+               ),
+               "interopEchoTests.whichToolkit" => array(
+                       "function" => "i_whichToolkit",
+                       "signature" => $i_whichToolkit_sig,
+                       "docstring" => $i_whichToolkit_doc
+               )
+       );
+
+       if ($findstate2_sig)
+               $a['examples.php.getStateName'] = $findstate2_sig;
+
+       if ($findstate3_sig)
+               $a['examples.php2.getStateName'] = $findstate3_sig;
+
+       if ($findstate4_sig)
+               $a['examples.php3.getStateName'] = $findstate4_sig;
+
+       $s=new xmlrpc_server($a, false);
+       $s->setdebug(3);
+       $s->compress_response = true;
+
+       // out-of-band information: let the client manipulate the server operations.
+       // we do this to help the testsuite script: do not reproduce in production!
+       if (isset($_GET['RESPONSE_ENCODING']))
+               $s->response_charset_encoding = $_GET['RESPONSE_ENCODING'];
+
+       $s->service();
+       // that should do all we need!
+?>
\ No newline at end of file
diff --git a/demo/vardemo.php b/demo/vardemo.php
new file mode 100644 (file)
index 0000000..2afbe11
--- /dev/null
@@ -0,0 +1,93 @@
+<html>
+<head><title>xmlrpc</title></head>
+<body>
+<?php
+       include("xmlrpc.inc");
+
+       $f = new xmlrpcmsg('examples.getStateName');
+
+       print "<h3>Testing value serialization</h3>\n";
+
+       $v = new xmlrpcval(23, "int");
+       print "<PRE>" . htmlentities($v->serialize()) . "</PRE>";
+       $v = new xmlrpcval("What are you saying? >> << &&");
+       print "<PRE>" . htmlentities($v->serialize()) . "</PRE>";
+
+       $v = new xmlrpcval(array(
+               new xmlrpcval("ABCDEFHIJ"),
+               new xmlrpcval(1234, 'int'),
+               new xmlrpcval(1, 'boolean')),
+               "array"
+       );
+
+       print "<PRE>" . htmlentities($v->serialize()) . "</PRE>";
+
+       $v = new xmlrpcval(
+               array(
+                       "thearray" => new xmlrpcval(
+                               array(
+                                       new xmlrpcval("ABCDEFHIJ"),
+                                       new xmlrpcval(1234, 'int'),
+                                       new xmlrpcval(1, 'boolean'),
+                                       new xmlrpcval(0, 'boolean'),
+                                       new xmlrpcval(true, 'boolean'),
+                                       new xmlrpcval(false, 'boolean')
+                               ),
+                               "array"
+                       ),
+                       "theint" => new xmlrpcval(23, 'int'),
+                       "thestring" => new xmlrpcval("foobarwhizz"),
+                       "thestruct" => new xmlrpcval(
+                               array(
+                                       "one" => new xmlrpcval(1, 'int'),
+                                       "two" => new xmlrpcval(2, 'int')
+                               ),
+                               "struct"
+                       )
+               ),
+               "struct"
+       );
+
+       print "<PRE>" . htmlentities($v->serialize()) . "</PRE>";
+
+       $w = new xmlrpcval(array($v, new xmlrpcval("That was the struct!")), "array");
+
+       print "<PRE>" . htmlentities($w->serialize()) . "</PRE>";
+
+       $w = new xmlrpcval("Mary had a little lamb,
+Whose fleece was white as snow,
+And everywhere that Mary went
+the lamb was sure to go.
+
+Mary had a little lamb
+She tied it to a pylon
+Ten thousand volts went down its back
+And turned it into nylon", "base64"
+       );
+       print "<PRE>" . htmlentities($w->serialize()) . "</PRE>";
+       print "<PRE>Value of base64 string is: '" . $w->scalarval() . "'</PRE>";
+
+       $f->method('');
+       $f->addParam(new xmlrpcval("41", "int"));
+
+       print "<h3>Testing request serialization</h3>\n";
+       $op = $f->serialize();
+       print "<PRE>" . htmlentities($op) . "</PRE>";
+
+       print "<h3>Testing ISO date format</h3><pre>\n";
+
+       $t = time();
+       $date = iso8601_encode($t);
+       print "Now is $t --> $date\n";
+       print "Or in UTC, that is " . iso8601_encode($t, 1) . "\n";
+       $tb = iso8601_decode($date);
+       print "That is to say $date --> $tb\n";
+       print "Which comes out at " . iso8601_encode($tb) . "\n";
+       print "Which was the time in UTC at " . iso8601_decode($date, 1) . "\n";
+
+       print "</pre>\n";
+?>
+<hr/>
+<em>$Id$</em>
+</body>
+</html>
diff --git a/doc/Makefile b/doc/Makefile
new file mode 100644 (file)
index 0000000..15598b5
--- /dev/null
@@ -0,0 +1,74 @@
+# $Id: Makefile,v 1.13 2008/03/07 13:01:55 ggiunta Exp $\r
+\r
+### USER EDITABLE VARS ###\r
+\r
+WEB=/var/www/xmlrpc/doc\r
+\r
+MKDIR=mkdir\r
+\r
+\r
+#### DO NOT TOUCH FROM HERE ONWARDS ###\r
+\r
+install:\r
+       ${MKDIR} -p ${WEB}\r
+       cp *.html ${WEB}\r
+       cp *.css ${WEB}\r
+       cp *.gif ${WEB}\r
+       @echo HTML version of the manual has been installed to ${WEB}\r
+\r
+\r
+### the following targets are to be used for library development ###\r
+\r
+doc: out/index.html xmlrpc_php.pdf javadoc-out/index.html\r
+\r
+# tools currently used in building docs: php 5 with xsl extension, apache fop, phpdocumentor\r
+# alternatives include doxygen, jade, saxon, xsltproc etc...\r
+\r
+out/index.html xmlrpc_php.pdf: xmlrpc_php.xml\r
+       -${MKDIR} out\r
+# Jade cmd yet to be rebuilt, starting from xml file and putting output in ./out dir, e.g.\r
+#      jade -t xml -d custom.dsl xmlrpc_php.xml\r
+#\r
+# convertdoc command for xmlmind xxe editor\r
+#      convertdoc docb.toHTML xmlrpc_php.xml -u out\r
+#\r
+# saxon + xerces xml parser + saxon extensions + xslthl: adds a little syntax highligting\r
+# (bold and italics only, no color) for php source examples...\r
+#      java \\r
+#      -classpath c:\programmi\saxon\saxon.jar\;c:\programmi\saxon\xslthl.jar\;c:\programmi\xerces\xercesImpl.jar\;C:\htdocs\xmlrpc_cvs\docbook-xsl\extensions\saxon65.jar \\r
+#      -Djavax.xml.parsers.DocumentBuilderFactory=org.apache.xerces.jaxp.DocumentBuilderFactoryImpl \\r
+#      -Djavax.xml.parsers.SAXParserFactory=org.apache.xerces.jaxp.SAXParserFactoryImpl \\r
+#      -Dxslthl.config=file:///c:/htdocs/xmlrpc_cvs/docbook-xsl/highlighting/xslthl-config.xml \\r
+#      com.icl.saxon.StyleSheet -o xmlrpc_php.fo.xml xmlrpc_php.xml custom.fo.xsl use.extensions=1\r
+#\r
+       # custom php script that does the xslt magic\r
+       php convert.php xmlrpc_php.xml custom.xsl out/\r
+       # post process html files to highlight php code samples\r
+       php highlight.php out\r
+       # convert to fo and then to pdf using apache fop\r
+       php convert.php xmlrpc_php.xml custom.fo.xsl xmlrpc_php.fo.xml\r
+       fop xmlrpc_php.fo.xml xmlrpc_php.pdf\r
+       #-rm xmlrpc_php.fo.xml\r
+\r
+javadoc-out/index.html: ../xmlrpc.inc ../xmlrpcs.inc ../xmlrpc_wrappers.inc\r
+# generate docs out of javadoc via doxygen\r
+#      doxygen phpxmlrpc.dox\r
+#\r
+       # generate docs out of javadoc via phpdocumentor\r
+       phpdoc -f ../xmlrpc.inc,../xmlrpcs.inc,../xmlrpc_wrappers.inc -t javadoc-out -ti PHP-XMLRPC -o HTML:frames:default -s\r
+\r
+dist: doc\r
+       ${MKDIR} -p ../xmlrpc-${VERSION}/doc\r
+       -cp out/*.html ../xmlrpc-${VERSION}/doc\r
+       -cp out/*.css ../xmlrpc-${VERSION}/doc\r
+       -cp out/*.gif ../xmlrpc-${VERSION}/doc\r
+       -cp out/*.pdf ../xmlrpc-${VERSION}/doc\r
+       cp xmlrpc_php.xml ../xmlrpc-${VERSION}/doc\r
+       cp xmlrpc_php.pdf ../xmlrpc-${VERSION}/doc\r
+       cp Makefile ../xmlrpc-${VERSION}/doc\r
+\r
+clean:\r
+       -rm -f out/*.html\r
+       -rm -rf javadoc-out\r
+       -rm xmlrpc_php.fo.xml\r
+       -rm xmlrpc_php.pdf\r
diff --git a/doc/announce1_0.txt b/doc/announce1_0.txt
new file mode 100644 (file)
index 0000000..a45b182
--- /dev/null
@@ -0,0 +1,29 @@
+
+I'm pleased to announce XML-RPC for PHP version 1.0 (final). It's taken
+two years to get to the 1.0 point, but here we are, finally.  The major change
+is re-licensing with the BSD open source license, a move from the custom
+license previously used.
+
+After this release I expect to move the project to SourceForge and find
+another primary maintainer for the code.  More details will follow to the
+mailing list.
+
+It can be downloaded from http://xmlrpc.usefulinc.com/php.html
+
+Comprehensive documentation is available in the distribution, but you
+can also browse it at http://xmlrpc.usefulinc.com/doc/
+
+Bugfixes in this release include:
+
+ * Small fixes and tidying up.
+
+New features include:
+
+ * experimental support for SSL via the curl extensions to PHP.  Needs
+   PHP 4.0.2 or greater, but not PHP 4.0.6 which has broken SSL support.
+
+The changelog is available at: http://xmlrpc.usefulinc.com/ChangeLog.txt
+
+Please report bugs to the XML-RPC PHP mailing list, of which more details are
+available at http://xmlrpc.usefulinc.com/list.html, or to
+<xmlrpc@usefulinc.com>.
diff --git a/doc/announce1_1.txt b/doc/announce1_1.txt
new file mode 100644 (file)
index 0000000..db0a9fd
--- /dev/null
@@ -0,0 +1,34 @@
+I'm pleased to announce XML-RPC for PHP version 1.1
+It's taken two years to get to the this point, but here we are, finally.
+
+This is a bugfix and maintenance relase. No major new features have been added.
+All known bugs have been ironed out, unless fixing would have meant breaking
+the API.
+The code has been tested with PHP 3, 4 and 5, even tough PHP 4 is the main
+development platform (and some warnings will be emitted when runnning PHP5).
+
+Notheworthy changes include:
+
+ * do not clash any more with the EPI xmlrpc extension bundled with PHP 4 and 5
+ * fixed the unicode/charset problems that have been plaguing the lib for years
+ * proper parsing of int and float values prepended with zeroes or the '+' char
+ * accept float values in exponential notation
+ * configurable http user-agent string
+ * use the same timeout on client socket reads as used for connecting
+ * more explicative error messages in xmlrpcresponse in many cases
+ * much more tolerant parsing of malfprmed http responses from xmlrpc servers
+ * fixed memleak that prevented the client to be used in never-ending scripts
+ * parse bigger xmlrpc messages without crashing (1MB in size or more)
+ * be tolerant to xmlrpc responses generated on public servers that add
+   javascript advertising at the end of hosted content
+ * the lib generates quite a few less PHP warnings during standard operation
+
+This is the last release that will support PHP 3.
+The next release will include better support for PHP 5 and (possibly) a slew of
+new features.
+
+The changelog is available at:
+http://cvs.sourceforge.net/viewcvs.py/phpxmlrpc/xmlrpc/ChangeLog?view=markup
+
+Please report bugs to the XML-RPC PHP mailing list or to the sourceforge project
+pages at http://sourceforge.net/projects/phpxmlrpc/
diff --git a/doc/announce1b6.txt b/doc/announce1b6.txt
new file mode 100644 (file)
index 0000000..30c1d10
--- /dev/null
@@ -0,0 +1,23 @@
+
+I'm pleased to announce XML-RPC for PHP version 1.0 beta 6. This is the
+final beta before the 1.0 release.
+
+It can be downloaded from http://xmlrpc.usefulinc.com/php.html
+
+Comprehensive documentation is available in the distribution, but you
+can also browse it at http://xmlrpc.usefulinc.com/doc/
+
+New features in this release include:
+
+ * Perl and Python test programs for the demo server
+ * Proper fault generation on a non-"200 OK" response from a remote host
+ * Bugfixed base64 decoding
+ * ISO8601 helper routines for translation to and from UNIX timestamps
+ * reorganization of code to allow eventual integration of alternative
+   transports
+
+The changelog is available at: http://xmlrpc.usefulinc.com/ChangeLog.txt
+
+Please test this as hard as possible and report bugs to the XML-RPC PHP
+mailing list, of which more details are available at
+http://xmlrpc.usefulinc.com/list.html, or to <xmlrpc@usefulinc.com>.
diff --git a/doc/announce1b7.txt b/doc/announce1b7.txt
new file mode 100644 (file)
index 0000000..aceea29
--- /dev/null
@@ -0,0 +1,29 @@
+
+I'm pleased to announce XML-RPC for PHP version 1.0 beta 7. This is
+fixes some critical bugs that crept in. If it shows itself to be stable
+then it'll become the 1.0 release.
+
+It can be downloaded from http://xmlrpc.usefulinc.com/php.html
+
+Comprehensive documentation is available in the distribution, but you
+can also browse it at http://xmlrpc.usefulinc.com/doc/
+
+Bugfixes in this release include:
+
+ * Passing of booleans should now work as expected
+ * Dollar signs and backslashes in strings should pass OK
+ * addScalar() now works properly to append to array vals
+
+New features include:
+
+ * Added support for HTTP Basic authorization through the 
+   xmlrpc_client::setCredentials method.
+
+ * Added test script and method for verifying correct passing of
+        booleans
+
+The changelog is available at: http://xmlrpc.usefulinc.com/ChangeLog.txt
+
+Please test this as hard as possible and report bugs to the XML-RPC PHP
+mailing list, of which more details are available at
+http://xmlrpc.usefulinc.com/list.html, or to <xmlrpc@usefulinc.com>.
diff --git a/doc/announce1b8.txt b/doc/announce1b8.txt
new file mode 100644 (file)
index 0000000..d4db381
--- /dev/null
@@ -0,0 +1,33 @@
+
+I'm pleased to announce XML-RPC for PHP version 1.0 beta 8. 
+
+This release fixes several bugs and adds a couple of new helper
+functions. The most critical change in this release is that you can no
+longer print debug info in comments inside a server method -- you must
+now use the new xmlrpc_debugmsg() function.
+
+It can be downloaded from http://xmlrpc.usefulinc.com/php.html
+
+Comprehensive documentation is available in the distribution, but you
+can also browse it at http://xmlrpc.usefulinc.com/doc/
+
+Bugfixes in this release include:
+
+ * fixed whitespace handling in values
+ * correct sending of Content-length from the server
+
+New features include:
+
+ * xmlrpc_debugmsg() method allows sending of debug info in comments in
+   the return payload from a server
+
+ * xmlrpc_encode() and xmlrpc_decode() translate between xmlrpcval
+   objects and PHP language arrays. They aren't suitable for all
+   datatypes, but can speed up coding in simple scenarios. Thanks to Dan
+   Libby for these.
+        
+The changelog is available at: http://xmlrpc.usefulinc.com/ChangeLog.txt
+
+Please test this as hard as possible and report bugs to the XML-RPC PHP
+mailing list, of which more details are available at
+http://xmlrpc.usefulinc.com/list.html, or to <xmlrpc@usefulinc.com>.
diff --git a/doc/announce1b9.txt b/doc/announce1b9.txt
new file mode 100644 (file)
index 0000000..ad43a4e
--- /dev/null
@@ -0,0 +1,28 @@
+
+I'm pleased to announce XML-RPC for PHP version 1.0 beta 9. This is
+is largely a bugfix release.
+
+It can be downloaded from http://xmlrpc.usefulinc.com/php.html
+
+Comprehensive documentation is available in the distribution, but you
+can also browse it at http://xmlrpc.usefulinc.com/doc/
+
+Bugfixes in this release include:
+
+ * Fixed string handling bug where characters between a </string>
+   and </value> tag were not ignored.
+
+ * Added in support for PHP's native boolean type.
+
+New features include:
+
+ * new getval() method (experimental only) which has support for
+   recreating nested arrays.
+ * fledgling unit test suite
+ * server.php has support for basic interop test suite
+
+The changelog is available at: http://xmlrpc.usefulinc.com/ChangeLog.txt
+
+Please test this as hard as possible and report bugs to the XML-RPC PHP
+mailing list, of which more details are available at
+http://xmlrpc.usefulinc.com/list.html, or to <xmlrpc@usefulinc.com>.
diff --git a/doc/convert.php b/doc/convert.php
new file mode 100644 (file)
index 0000000..a2c28c0
--- /dev/null
@@ -0,0 +1,50 @@
+<?php
+/**
+ * Script used to convert docbook source to human readable docs
+ *
+ * @version $Id$
+ * @copyright (c) 2007-2008 G. Giunta
+ */
+
+if ($_SERVER['argc'] < 4)
+  die("Usage: php convert.php docbook.xml \path\\to\stylesheet.xsl output-dir|output_file\n");
+else
+  echo "Starting xsl conversion process...\n";
+
+$doc = $_SERVER['argv'][1];
+$xss = $_SERVER['argv'][2];
+
+if (!file_exists($doc))
+  die("KO: file $doc cannot be found\n");
+if (!file_exists($xss))
+  die("KO: file $xss cannot be found\n");
+
+// Load the XML source
+$xml = new DOMDocument;
+$xml->load($doc);
+$xsl = new DOMDocument;
+$xsl->load($xss);
+
+// Configure the transformer
+$proc = new XSLTProcessor;
+$proc->importStyleSheet($xsl); // attach the xsl rules
+
+//if ($_SERVER['argc'] >= 4)
+//{
+  if (is_dir($_SERVER['argv'][3]))
+  {
+
+    if (!$proc->setParameter('', 'base.dir', $_SERVER['argv'][3]))
+      echo "setting param base.dir KO\n";
+  }
+  else
+  {
+    //echo "{$_SERVER['argv'][3]} is not a dir\n";
+  }
+//}
+  $out = $proc->transformToXML($xml);
+  if (!is_dir($_SERVER['argv'][3]))
+    file_put_contents($_SERVER['argv'][3], $out);
+
+echo "OK\n";
+?>
\ No newline at end of file
diff --git a/doc/custom.dsl b/doc/custom.dsl
new file mode 100644 (file)
index 0000000..b3b35ce
--- /dev/null
@@ -0,0 +1,25 @@
+<!DOCTYPE style-sheet PUBLIC "-//James Clark//DTD DSSSL Style Sheet//EN" [\r
+<!ENTITY dbstyle SYSTEM "/usr/lib/sgml/stylesheet/dsssl/docbook/nwalsh/html/docbook.dsl" CDATA DSSSL>\r
+]>\r
+\r
+<style-sheet>\r
+<style-specification use="docbook">\r
+<style-specification-body>\r
+\r
+(define %link-mailto-url%\r
+       "edd@usefulinc.com")\r
+\r
+(define %html-ext%\r
+       ".html")\r
+\r
+(define %use-id-as-filename%\r
+  #t)\r
+\r
+(define %root-filename%\r
+  "index")\r
+\r
+\r
+</style-specification-body>\r
+</style-specification>\r
+<external-specification id="docbook" document="dbstyle">\r
+</style-sheet>\r
diff --git a/doc/custom.fo.xsl b/doc/custom.fo.xsl
new file mode 100644 (file)
index 0000000..dc08bfa
--- /dev/null
@@ -0,0 +1,103 @@
+<?xml version='1.0'?>\r
+<xsl:stylesheet  \r
+    xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0"\r
+       xmlns:fo="http://www.w3.org/1999/XSL/Format">\r
+<!--\r
+ Customization xsl stylesheet for docbook to pdf transform\r
+ @version $Id: custom.fo.xsl,v 1.4 2008/03/06 18:58:44 ggiunta Exp $\r
+ @author Gaetano Giunta\r
+ @copyright (c) 2007-2008 G. Giunta\r
+ @license\r
+-->\r
+\r
+\r
+<!-- import base stylesheet -->\r
+<xsl:import href="../../docbook-xsl/fo/docbook.xsl"/>\r
+\r
+\r
+<!-- customization vars -->\r
+<xsl:param name="fop1.extensions">1</xsl:param>\r
+<xsl:param name="draft.mode">no</xsl:param>\r
+<xsl:param name="funcsynopsis.style">ansi</xsl:param>\r
+<xsl:param name="id.warnings">0</xsl:param>\r
+<xsl:param name="highlight.source">1</xsl:param>\r
+<xsl:param name="highlight.default.language">php</xsl:param>\r
+<xsl:param name="paper.type">A4</xsl:param>\r
+<xsl:param name="shade.verbatim">1</xsl:param>\r
+\r
+<xsl:attribute-set name="verbatim.properties">\r
+  <xsl:attribute name="font-size">80%</xsl:attribute>\r
+</xsl:attribute-set>\r
+\r
+\r
+<!-- elements added / modified -->\r
+<xsl:template match="funcdef/function">\r
+  <xsl:choose>\r
+    <xsl:when test="$funcsynopsis.decoration != 0">\r
+      <fo:inline font-weight="bold">\r
+        <xsl:apply-templates/>\r
+      </fo:inline>\r
+    </xsl:when>\r
+    <xsl:otherwise>\r
+      <xsl:apply-templates/>\r
+    </xsl:otherwise>\r
+  </xsl:choose>\r
+  <xsl:text> </xsl:text>\r
+</xsl:template>\r
+\r
+<xsl:template match="funcdef/type">\r
+  <xsl:apply-templates/>\r
+  <xsl:text> </xsl:text>\r
+</xsl:template>\r
+\r
+<xsl:template match="void">\r
+  <xsl:choose>\r
+    <xsl:when test="$funcsynopsis.style='ansi'">\r
+      <xsl:text>( void )</xsl:text>\r
+    </xsl:when>\r
+    <xsl:otherwise>\r
+      <xsl:text>( )</xsl:text>\r
+    </xsl:otherwise>\r
+  </xsl:choose>\r
+</xsl:template>\r
+\r
+<xsl:template match="varargs">\r
+  <xsl:text>( ... )</xsl:text>\r
+</xsl:template>\r
+\r
+<xsl:template match="paramdef">\r
+  <xsl:variable name="paramnum">\r
+    <xsl:number count="paramdef" format="1"/>\r
+  </xsl:variable>\r
+  <xsl:if test="$paramnum=1">( </xsl:if>\r
+  <xsl:choose>\r
+    <xsl:when test="$funcsynopsis.style='ansi'">\r
+      <xsl:apply-templates/>\r
+    </xsl:when>\r
+    <xsl:otherwise>\r
+      <xsl:apply-templates select="./parameter"/>\r
+    </xsl:otherwise>\r
+  </xsl:choose>\r
+  <xsl:choose>\r
+    <xsl:when test="following-sibling::paramdef">\r
+      <xsl:text>, </xsl:text>\r
+    </xsl:when>\r
+    <xsl:otherwise>\r
+      <xsl:text> )</xsl:text>\r
+    </xsl:otherwise>\r
+  </xsl:choose>\r
+</xsl:template>\r
+\r
+<xsl:template match="paramdef/type">\r
+  <xsl:apply-templates/>\r
+  <xsl:text> </xsl:text>\r
+</xsl:template>\r
+\r
+<!-- default values for function parameters -->\r
+<xsl:template match="paramdef/initializer">\r
+  <xsl:text> = </xsl:text>\r
+  <xsl:apply-templates/>\r
+</xsl:template>\r
+\r
+\r
+</xsl:stylesheet>
\ No newline at end of file
diff --git a/doc/custom.xsl b/doc/custom.xsl
new file mode 100644 (file)
index 0000000..f9c0287
--- /dev/null
@@ -0,0 +1,87 @@
+<?xml version='1.0'?>\r
+<xsl:stylesheet  \r
+    xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0">\r
+<!--\r
+ Customization xsl stylesheet for docbook to chunked html transform\r
+ @version $Id: custom.xsl,v 1.3 2008/03/06 18:58:44 ggiunta Exp $\r
+ @author Gaetano Giunta\r
+ @copyright (c) 2007-2008 G. Giunta\r
+ @license\r
+-->\r
+\r
+\r
+<!-- import base stylesheet -->\r
+<xsl:import href="../../docbook-xsl/xhtml/chunk.xsl"/>\r
+\r
+\r
+<!-- customization vars -->\r
+<xsl:param name="draft.mode">no</xsl:param>\r
+<xsl:param name="funcsynopsis.style">ansi</xsl:param>\r
+<xsl:param name="html.stylesheet">xmlrpc.css</xsl:param>\r
+<xsl:param name="id.warnings">0</xsl:param>\r
+\r
+\r
+<!-- elements added / modified -->\r
+\r
+<!-- space between function name and opening parenthesis -->\r
+<xsl:template match="funcdef" mode="ansi-nontabular">\r
+  <code>\r
+    <xsl:apply-templates select="." mode="class.attribute"/>\r
+    <xsl:apply-templates mode="ansi-nontabular"/>\r
+    <xsl:text> ( </xsl:text>\r
+  </code>\r
+</xsl:template>\r
+\r
+<!-- space between return type and function name -->\r
+<xsl:template match="funcdef/type" mode="ansi-nontabular">\r
+  <xsl:apply-templates mode="ansi-nontabular"/>\r
+  <xsl:text> </xsl:text>\r
+</xsl:template>\r
+\r
+<!-- space between last param and closing parenthesis, remove tailing semicolon -->\r
+<xsl:template match="void" mode="ansi-nontabular">\r
+  <code>void )</code>\r
+</xsl:template>\r
+\r
+<xsl:template match="varargs" mode="ansi-nontabular">\r
+  <xsl:text>...</xsl:text>\r
+  <code> )</code>\r
+</xsl:template>\r
+\r
+<xsl:template match="paramdef" mode="ansi-nontabular">\r
+  <xsl:apply-templates mode="ansi-nontabular"/>\r
+  <xsl:choose>\r
+    <xsl:when test="following-sibling::*">\r
+      <xsl:text>, </xsl:text>\r
+    </xsl:when>\r
+    <xsl:otherwise>\r
+      <code> )</code>\r
+    </xsl:otherwise>\r
+  </xsl:choose>\r
+</xsl:template>\r
+\r
+<!-- param types get code formatted (leave a space after type, as it is supposed to be before param name) -->\r
+<xsl:template match="paramdef/type" mode="ansi-nontabular">\r
+  <xsl:choose>\r
+    <xsl:when test="$funcsynopsis.decoration != 0">\r
+      <code>\r
+        <xsl:apply-templates mode="ansi-nontabular"/>\r
+      </code>\r
+    </xsl:when>\r
+    <xsl:otherwise>\r
+      <code>\r
+       <xsl:apply-templates mode="ansi-nontabular"/>\r
+      </code>\r
+    </xsl:otherwise>\r
+  </xsl:choose>\r
+  <xsl:text> </xsl:text>\r
+</xsl:template>\r
+\r
+<!-- default values for function parameters -->\r
+<xsl:template match="paramdef/initializer" mode="ansi-nontabular">\r
+  <xsl:text> = </xsl:text>\r
+  <xsl:apply-templates mode="ansi-nontabular"/>\r
+</xsl:template>\r
+\r
+\r
+</xsl:stylesheet>
\ No newline at end of file
diff --git a/doc/docbook-css/COPYING b/doc/docbook-css/COPYING
new file mode 100644 (file)
index 0000000..d199ddc
--- /dev/null
@@ -0,0 +1,17 @@
+Copyright (c) 2004 David Holroyd, and contributors.\r
+\r
+Permission to use, copy, modify and distribute this software and its\r
+documentation for any purpose and without fee is hereby granted in\r
+perpetuity, provided that the above copyright notice appear in all\r
+copies, and that both the copyright notice and this permission notice\r
+appear in supporting documentation. The contributors make no\r
+representations about the suitability of this software for any\r
+purpose. It is provided "as is" without express or implied warranty.\r
+\r
+THE COPYRIGHT HOLDERS DISCLAIM ALL WARRANTIES WITH REGARD TO THIS\r
+SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND\r
+FITNESS. IN NO EVENT SHALL THE COPYRIGHT HOLDERS BE LIABLE FOR ANY\r
+SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER\r
+RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF\r
+CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN\r
+CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.\r
diff --git a/doc/docbook-css/CREDITS b/doc/docbook-css/CREDITS
new file mode 100644 (file)
index 0000000..08d96c5
--- /dev/null
@@ -0,0 +1,10 @@
+This stylesheet was writen by David Holroyd, with patches, suggestions,\r
+translations, and other help from these people:\r
+\r
+  David Leppik\r
+  Martin Gautier\r
+  Asia Magiera\r
+  Federico Koessler\r
+  Katie McSweenie\r
+\r
+Many thanks to all of them!\r
diff --git a/doc/docbook-css/core.css b/doc/docbook-css/core.css
new file mode 100644 (file)
index 0000000..d9d4ba0
--- /dev/null
@@ -0,0 +1,70 @@
+/*
+ * core.css
+ *
+ * Copyright (c) 2004 David Holroyd, and contributors
+ * See the file 'COPYING' for terms of use
+ *
+ * Part of the Docbook-CSS stylesheet
+ *   http://www.badgers-in-foil.co.uk/projects/docbook-css/
+ */
+
+/* Generated 2002-12-12 */
+abbrev, accel, acronym, action, application, artpagenums, authorinitials, 
+bibliocoverage, biblioid, bibliomisc, bibliorelation, bibliosource, citation, 
+citebiblioid, citerefentry, citetitle, city, classname, co, command, 
+computeroutput, constant, coref, country, database, date, email, emphasis, 
+envar, errorcode, errorname, errortext, errortype, exceptionname, fax, 
+filename, firstname, firstterm, funcdef, funcparams, function, group, 
+guibutton, guiicon, guilabel, guimenu, guimenuitem, guisubmenu, hardware, 
+honorific, initializer, inlineequation, inlinegraphic, inlinemediaobject, 
+interface, interfacename, invpartnumber, isbn, issn, keycap, keycode, 
+keycombo, keysym, lineage, lineannotation, link, literal, markup, medialabel, 
+member, menuchoice, methodname, methodparam, modifier, mousebutton, olink, 
+ooclass, ooexception, oointerface, option, optional, orgdiv, orgname, 
+otheraddr, othername, pagenums, paramdef, parameter, phone, phrase, pob, 
+postcode, productname, productnumber, prompt, property, pubdate, pubsnumber, 
+quote, refpurpose, replaceable, returnvalue, revnumber, seriesvolnums, 
+sgmltag, shortcut, state, street, structfield, structname, subscript, 
+superscript, surname, symbol, systemitem, token, trademark, type, ulink, 
+userinput, varname, volumenum, wordasword, year {
+       display:inline;
+}
+
+abstract, ackno, address, answer, appendix, article, attribution, authorblurb, 
+bibliodiv, biblioentry, bibliography, bibliomixed, bibliomset, biblioset, 
+blockquote, book, callout, calloutlist, caption, caution, chapter, 
+cmdsynopsis, colophon, constraintdef, dedication, epigraph, equation, example, 
+figure, formalpara, glossary, glossdef, glossdiv, glossentry, glosslist, 
+graphic, graphicco, highlights, imagedata, imageobjectco, important, index,
+indexdiv,  indexentry, informalequation, informalexample, informalfigure,
+informaltable, itemizedlist, legalnotice, listitem, lot, lotentry,
+mediaobject, mediaobjectco, msg, msgentry, msgexplan, msgmain, msgset, note,
+orderedlist, para, part, partintro, personblurb, preface, primaryie,
+printhistory, procedure, productionset, programlistingco, qandadiv, qandaentry,
+qandaset, question, refentry, refentrytitle, reference, refnamediv, refsect1,
+refsect2, refsect3, refsection, refsynopsisdiv, revhistory, screenco,
+screenshot, secondaryie, sect2, sect3, sect4, sect5, section, seealsoie, seeie,
+set, setindex, sidebar, simpara, simplemsgentry, simplesect, step, substeps, 
+subtitle, synopfragment, synopfragmentref, table, term, tertiaryie, tip, 
+title, toc, tocback, tocchap, tocentry, tocfront, toclevel1, toclevel2, 
+toclevel3, toclevel4, toclevel5, tocpart, variablelist, varlistentry, warning, 
+sect1 {
+       display:block;
+}
+
+appendixinfo, area, areaset, areaspec, articleinfo, bibliographyinfo, 
+blockinfo, bookinfo, chapterinfo, colspec, glossaryinfo, indexinfo, indexterm,
+itermset, modespec, objectinfo, partinfo, prefaceinfo, primary, refentryinfo, 
+referenceinfo, refmeta, refsect1info, refsect2info, refsect3info, 
+refsectioninfo, refsynopsisdivinfo, screeninfo, secondary, sect1info, 
+sect2info, sect3info, sect4info, sect5info, sectioninfo, see, seealso, 
+setindexinfo, setinfo, sidebarinfo, spanspec, tertiary {
+       display:none;
+}
+
+classsynopsisinfo, funcsynopsisinfo, literallayout, programlisting, screen, 
+synopsis {
+       white-space:pre;
+       font-family:monospace;
+       display:block;
+}
diff --git a/doc/docbook-css/db-bindings.xml b/doc/docbook-css/db-bindings.xml
new file mode 100644 (file)
index 0000000..cb575fd
--- /dev/null
@@ -0,0 +1,31 @@
+<?xml version="1.0"?>\r
+<bindings xmlns="http://www.mozilla.org/xbl"\r
+     xmlns:html="http://www.w3.org/1999/xhtml">\r
+  <binding id="ulink">\r
+    <handlers>\r
+      <handler event="click" button="0"\r
+               action="window.location=this.attributes.url.value;"/>\r
+      <handler event="mouseover"\r
+               action="window.status=this.attributes.url.value;"/>\r
+      <handler event="mouseout"\r
+               action="window.status=null;"/>\r
+    </handlers>\r
+  </binding>\r
+\r
+  <binding id="image">\r
+    <content>\r
+      <html:img xbl:inherits="src=fileref"/>\r
+    </content>\r
+\r
+    <implementation>\r
+      <constructor>\r
+       var img = document.getAnonymousNodes(this)[0];\r
+       var file = this.getAttribute("fileref");\r
+       // HACK: using img.src=file 'inline' doesn't seem to work\r
+       //       but it does when called from a setTimeout()\r
+       var f = function() { img.src = file; }\r
+       setTimeout(f, 0);\r
+      </constructor>\r
+    </implementation>\r
+  </binding>\r
+</bindings>\r
diff --git a/doc/docbook-css/driver.css b/doc/docbook-css/driver.css
new file mode 100644 (file)
index 0000000..1e7a2de
--- /dev/null
@@ -0,0 +1,31 @@
+/*
+ * driver.css
+ *
+ * Copyright (c) 2004 David Holroyd, and contributors
+ * See the file 'COPYING' for terms of use
+ *
+ * Part of the Docbook-CSS stylesheet
+ *   http://www.badgers-in-foil.co.uk/projects/docbook-css/
+ *
+ * This is the 'driver' file of the stylesheet.  It imports all the major
+ * stylesheet components.  If you want to make use of this stylesheet in your
+ * XML document (e.g. for display in a web browser), include a line like this
+ * at the top of the XML file (replacing <ver> with the version number):
+ *
+ *   <?xml-stylesheet href="docbook-css-<ver>/driver.css" type="text/css"?>
+ *
+ * If you want to customise the stylesheet, a customisation layer can be
+ * created by simply witing a new CSS file, and including a declaration to
+ * import this file at the top.  The customisation layer can then override any
+ * of the existing stylesheet rules, or create new ones.
+ */
+
+/* add xmlrpc css customizations... */
+@import "xmlrpc.css";
+
+@import "core.css";
+@import "tables.css";
+@import "styles.css";
+@import "l10n.css";
+@import "mozilla.css";
+@import "opera.css";
diff --git a/doc/docbook-css/l10n.css b/doc/docbook-css/l10n.css
new file mode 100644 (file)
index 0000000..caeaa03
--- /dev/null
@@ -0,0 +1,24 @@
+/*
+ * i10n.css
+ *
+ * Copyright (c) 2004 David Holroyd, and contributors
+ * See the file 'COPYING' for terms of use
+ *
+ * Part of the Docbook-CSS stylesheet
+ *   http://www.badgers-in-foil.co.uk/projects/docbook-css/
+ *
+ * This file deals with localisation ('l10n') of CSS generated content by
+ * delegating to each of the locale-specific files in the l10n directory.
+ */
+
+
+/*
+ * 'en' doesn't specify 'lang()' selectors, so its settings will be the
+ * default where no localisation is available for a particular language.
+ * It must come first; other lauguages override it.
+ */
+@import "l10n/en.css";
+
+@import "l10n/pl.css";
+@import "l10n/de.css";
+@import "l10n/es.css";
diff --git a/doc/docbook-css/l10n/de.css b/doc/docbook-css/l10n/de.css
new file mode 100644 (file)
index 0000000..261be58
--- /dev/null
@@ -0,0 +1,37 @@
+@charset "utf-8";
+/*
+ * l10n/de.css
+ *
+ * Copyright (c) 2004 David Holroyd, and contributors
+ * See the file 'COPYING' for terms of use
+ *
+ * Part of the Docbook-CSS stylesheet
+ *   http://www.badgers-in-foil.co.uk/projects/docbook-css/
+ */
+
+question:lang(de):before {
+       content: "F: ";
+}
+answer:lang(de):before {
+       content: "A: ";
+}
+
+example > title:lang(de):before {
+       content: "Beispiel: ";
+}
+
+warning:lang(de):before {
+       content: "Warnung: ";
+}
+caution:lang(de):before {
+       content: "Achtung: ";
+}
+important:lang(de):before {
+       content: "Wichtig: ";
+}
+tip:lang(de):before {
+       content: "Hinweis: ";
+}
+note:lang(de):before {
+       content: "Erläuterung: ";
+}
diff --git a/doc/docbook-css/l10n/en.css b/doc/docbook-css/l10n/en.css
new file mode 100644 (file)
index 0000000..497e5f5
--- /dev/null
@@ -0,0 +1,48 @@
+@charset "utf-8";
+/*
+ * l10n/en.css
+ *
+ * Copyright (c) 2004 David Holroyd, and contributors
+ * See the file 'COPYING' for terms of use
+ *
+ * Part of the Docbook-CSS stylesheet
+ *   http://www.badgers-in-foil.co.uk/projects/docbook-css/
+ */
+
+/* Generated content for English documents */
+
+question:before {
+       content: "Q: ";
+}
+answer:before {
+       content: "A: ";
+}
+
+example > title:before {
+       content: "Example: ";
+}
+
+quote {
+       quotes: "“" "”";
+}
+quote quote {
+       quotes: "‘" "’";
+}
+
+/* Admonitions */
+
+warning:before {
+       content: "Warning: ";
+}
+caution:before {
+       content: "Caution: ";
+}
+important:before {
+       content: "Important: ";
+}
+tip:before {
+       content: "Tip: ";
+}
+note:before {
+       content: "Note: ";
+}
diff --git a/doc/docbook-css/l10n/es.css b/doc/docbook-css/l10n/es.css
new file mode 100644 (file)
index 0000000..9b435fd
--- /dev/null
@@ -0,0 +1,39 @@
+@charset "utf-8";
+/*
+ * l10n/es.css
+ *
+ * Copyright (c) 2004 David Holroyd, and contributors
+ * See the file 'COPYING' for terms of use
+ *
+ * Part of the Docbook-CSS stylesheet
+ *   http://www.badgers-in-foil.co.uk/projects/docbook-css/
+ */
+
+question:lang(es):before {
+       content: "P: ";
+}
+answer:lang(es):before {
+       content: "R: ";
+}
+
+example > title:lang(es):before {
+       content: "Ejemplo: ";
+}
+
+
+warning:lang(es):before {
+       content: "Aviso: ";
+}
+caution:lang(es):before {
+       content: "Atención: ";
+}
+important:lang(es):before {
+       content: "Importante: ";
+}
+tip:lang(es):before {
+       content: "Consejo: ";
+}
+note:lang(es):before {
+       content: "Nota: ";
+}
+
diff --git a/doc/docbook-css/l10n/pl.css b/doc/docbook-css/l10n/pl.css
new file mode 100644 (file)
index 0000000..7e3504f
--- /dev/null
@@ -0,0 +1,44 @@
+@charset "utf-8";
+/*
+ * l10n/pl.css
+ *
+ * Copyright (c) 2004 David Holroyd, and contributors
+ * See the file 'COPYING' for terms of use
+ *
+ * Part of the Docbook-CSS stylesheet
+ *   http://www.badgers-in-foil.co.uk/projects/docbook-css/
+ */
+
+question:lang(pl):before {
+       content: "P: ";
+}
+answer:lang(pl):before {
+       content: "O: ";
+}
+
+example > title:lang(pl):before {
+       content: "Przykład: ";
+}
+
+:lang(pl) > quote {
+       quotes: "„" "”";
+}
+:lang(pl) > quote quote {
+       quotes: "«" "»";
+}
+
+warning:lang(pl):before {
+       content: "Ostrzeżenie: ";
+}
+caution:lang(pl):before {
+       content: "Uwaga: ";
+}
+important:lang(pl):before {
+       content: "Ważne: ";
+}
+tip:lang(pl):before {
+       content: "Pomoc: ";
+}
+note:lang(pl):before {
+       content: "Notatka: ";
+}
diff --git a/doc/docbook-css/mozilla.css b/doc/docbook-css/mozilla.css
new file mode 100644 (file)
index 0000000..4f15519
--- /dev/null
@@ -0,0 +1,44 @@
+/*
+ * mozilla.css
+ *
+ * Copyright (c) 2004 David Holroyd, and contributors
+ * See the file 'COPYING' for terms of use
+ *
+ * Part of the Docbook-CSS stylesheet
+ *   http://www.badgers-in-foil.co.uk/projects/docbook-css/
+ *
+ * This file contains CSS specific to mozilla.org's Gecko rendering engine.
+ * 
+ * Some of the rules here will take effect even if you aren't using a Mozilla-
+ * based browser.
+ */
+
+
+/* make <ulink>s clickable */
+ulink {
+       -moz-binding:url('db-bindings.xml#ulink');
+       cursor: pointer;
+       -moz-user-focus: normal;
+}
+
+ulink:active {
+       color: red;
+}
+
+ulink:focus {
+       -moz-outline: 1px dotted invert;
+}
+
+imagedata {
+       -moz-binding:url('db-bindings.xml#image');
+}
+
+
+guimenu, guimenuitem, guisubmenu {
+       font: menu;
+}
+
+orderedlist, itemizedlist, procedure {
+       /* this seems to be required to make auto-numbering work */
+       -moz-counter-reset: -html-counter 0;
+}
diff --git a/doc/docbook-css/opera.css b/doc/docbook-css/opera.css
new file mode 100644 (file)
index 0000000..a00a7c2
--- /dev/null
@@ -0,0 +1,33 @@
+/*
+ * opera.css
+ *
+ * Copyright (c) 2004 David Holroyd, and contributors
+ * See the file 'COPYING' for terms of use
+ *
+ * Part of the Docbook-CSS stylesheet
+ *   http://www.badgers-in-foil.co.uk/projects/docbook-css/
+ *
+ * This file contains CSS specific to the Opera browser.
+ */
+/*
+ * Discovered -o-link from,
+ * http://groups.google.com/groups?q=opera+styles+xml&start=10&hl=en&lr=&ie=UTF-8&newwindow=1&selm=opr6pgr0tgicz8n2%40news.opera.com&rnum=18
+ */
+ulink {
+       -o-link: attr(url);
+       -o-link-source: current;
+}
+
+/*
+ * Given the above rule, it makes sense to have this here too, though it's
+ * not Opera-specific
+ */
+ulink:focus {
+       outline: 1px dotted invert;
+}
+
+/* this was in the example I found, but it doesn't achive much */
+imagedata {
+       -o-replace: attr(fileref)
+}
diff --git a/doc/docbook-css/styles.css b/doc/docbook-css/styles.css
new file mode 100644 (file)
index 0000000..fae29b7
--- /dev/null
@@ -0,0 +1,641 @@
+/*
+ * styles.css
+ *
+ * Copyright (c) 2004 David Holroyd, and contributors
+ * See the file 'COPYING' for terms of use
+ *
+ * Part of the Docbook-CSS stylesheet
+ *   http://www.badgers-in-foil.co.uk/projects/docbook-css/
+ */
+
+/*
+ * CSS2 styling for DocBook XML
+ *
+ * To be included in the cascade _after_ core.css.  Defines styling that can't
+ * be generated mechanically from another source.
+ */
+
+/*
+ * TODO:
+ *
+ *  - do I remember correctly that <abstract> be hidden for screen media?
+ */
+
+
+article, book {
+       margin:.5em;
+}
+title, subtitle {
+       font-family:sans-serif;
+}
+title {
+       font-weight:bolder;
+       margin-bottom:.5em;
+}
+
+/*
+ * Sectioning elements that may contain paragraph-level elements get left/right
+ * margins
+ */
+section>*, chapter>*, bibliography>*, appendix>*, glossary>*, preface>*,
+dedication>*, colophon>*, sect1>*, sect2>*, sect3>*, sect4>*, sect5>*,
+bibliodiv>* {
+       margin-left:10%;
+       margin-right:10%;
+}
+
+/*
+ * Give admonitions bigger margins, to set them more apart from the main
+ * flow of text.
+ */
+warning, caution, important, tip, note {
+       margin-left: 15%;
+       margin-right: 15%;
+}
+
+/*
+ * Remove any margin defined be the previous rule when the child in question
+ * is a section or title.  Titles should be allowed to take up the maximum
+ * available width, as they're usually is larger type.  Sections must not
+ * be given margins because, the *contents* of the section will alreay have
+ * them; we don't want to recursively increase margins with the nesting depth
+ * of the document.
+ */
+section, title, sect1, sect2, sect3, sect4, sect5, bibliodiv {
+       margin-left:0;
+       margin-right:0;
+}
+
+book>title, article>title {
+       font-size:xx-large;
+       text-align:center;
+       border-bottom-style:solid;
+}
+
+appendix>title, bibliography>title, chapter>title, colophon>title, dedication>title, glossary>title, part>title, preface>title {
+       font-size:xx-large;
+       text-align:center;
+}
+
+section>title, sect1>title, bibliodiv>title {
+       font-size:xx-large;
+}
+
+section>section>title, sect2>title {
+       font-size:x-large;
+       margin-left:5%;
+}
+
+section>section>section>title, sect3>title {
+       font-size:large;
+       margin-left:7.5%;
+}
+
+section>section>section>section>title, sect4>title {
+       font-size:large;
+       margin-left:10%;
+}
+
+section>section>section>section>section>title, sect5>title {
+       font-size:inherit;
+       margin-left:10%;
+}
+
+biblioentry > title {
+       display: inline;
+}
+
+/* Give vertical spacing between compoments of the document */
+
+*+section, *+chapter, *+bibliography, *+bibliodiv, *+appendix, *+glossary {
+       margin-top: 3em;
+}
+section>*+section {
+       margin-top: 2em;
+}
+section>section>*+section {
+       margin-top: 1em;
+}
+
+
+/*
+ * Give paragraph-level elements some leading space when they aren't the first
+ * item in their containing block.
+ */
+*+para, *+formalpara, *+blockquote, *+glossentry, *+table, *+variablelist,
+*+example, *+informalexample, *+programlisting, *+cmdsynopsis,
+*+orderedlist, *+itemizedlist, *+figure,
+*>warning, *>caution, *>important, *>tip, *>note {
+       margin-top:.5em;
+}
+
+
+/*
+ * BiblioEntry blocks need a bit more space, since they may contain multiple
+ * paragraphs, and so need greater-than-paragraph spacing to make it clear
+ * which gap is the end just of a paragraph, and which gap is the end of the
+ * entry
+ */
+*+biblioentry {
+       margin-top: 1em;
+}
+
+/*
+ * REVISIT: I think this is the proper way; but deson't work in Firefox 0.8
+
+formalpara > title {
+       display: run-in;
+}
+
+ * Make all children of formalpara inline, instead...
+ */
+
+formalpara > * {
+       display: inline;
+}
+
+formalpara > title:after {
+       content: ".";
+}
+
+para, formalpara {
+       text-align: justify;
+}
+
+quote:before {
+       content: open-quote;
+}
+
+quote:after {
+       content: close-quote;
+}
+
+question, answer {
+       margin-top:.5em;
+       display:list-item;
+}
+
+question>para, answer>para {
+       display:inline;
+}
+
+/* see language specific files for content */
+question:before {
+       display:marker;
+       font-weight:bolder;
+}
+answer:before {
+       display:marker;
+       font-weight: bolder;
+}
+
+emphasis {
+       font-style:italic;
+}
+emphasis[role="strong"] {
+       font-weight:bolder;
+}
+emphasis[role="bold"] {
+       font-weight:bolder;
+       font-style:inherit;
+}
+emphasis[role="underline"] {
+       text-decoration:underline;
+       font-style:inherit;
+}
+emphasis[role="strikethrough"] {
+       text-decoration:line-through;
+       font-style:inherit;
+}
+emphasis>emphasis {
+       font-weight:bolder;
+}
+
+foreignphrase, wordasword, productname {
+       font-style:italic;
+}
+
+replaceable {
+       font-style:italic;
+}
+
+sgmltag[class="starttag"]:before, sgmltag[class="emptytag"]:before {
+       content: "<";
+}
+
+sgmltag[class="starttag"]:after, sgmltag[class="endtag"]:after {
+       content: ">";
+}
+
+sgmltag[class="endtag"]:before {
+       content: "</";
+}
+
+sgmltag[class="emptytag"]:after {
+       content: "/>";
+}
+
+sgmltag[class="attvalue"]:before, sgmltag[class="attvalue"]:after {
+       content: '"';
+}
+
+sgmltag[class="genentity"]:before {
+       content: "&";
+}
+sgmltag[class="genentity"]:after {
+       content: ";";
+}
+
+sgmltag[class="sgmlcomment"]:before {
+       content: "<!--";
+}
+sgmltag[class="sgmlcomment"]:after {
+       content: "-->";
+}
+
+sgmltag[class="xmlpi"]:before {
+       content: "<?";
+}
+sgmltag[class="xmlpi"]:after {
+       content: "?>";
+}
+
+
+application, keycap, guimenu, guimenuitem, guisubmenu {
+       font-family: sans-serif;
+}
+
+/*
+ * ensure there's some whitespace between elements of an author's name
+ */
+author>* + *:before {
+       content: " ";
+}
+
+/* give keycaps a '3D' shaded look */
+keycap {
+       padding-left: .2em;
+       padding-right: .2em;
+       border-style: solid;
+       border-top-width: 2px;
+       border-left-width: 3px;
+       border-right-width: 3px;
+       border-bottom-width: 4px;
+       border-top-color: #eeeecc;
+       border-left-color: #eeeecc;
+       border-right-color: #999977;
+       border-bottom-color: #999977;
+       background-color: #ddddbb;
+       /* All these borders may interfere with text on the line bellow.  Make
+          the text a little smaller to try and 'pull up' the bottom edge, */
+       font-size: smaller;
+}
+
+keycombo>keycap+keycap:before {
+       /* FIXME: this appears inside the second keycap's 3D boarder, but
+        * ideally, we'd like it to appear inbetween the two keycaps */
+       content: "-";
+}
+
+menuchoice>guimenu+guimenuitem:before,
+menuchoice>guimenuitem+guimenuitem:before,
+menuchoice>guimenuitem+guisubmenu:before {
+       /*content: "->";*/
+       /* a 'proper' left-arrow character */
+       content: "\2192";
+}
+
+guibutton {
+       border: 2px outset #dddddd;
+       background-color: #dddddd;
+/*
+       border: 2px solid;
+       border-top-color: #eeeeee;
+       border-left-color: #eeeeee;
+       border-right-color: #999999;
+       border-bottom-color: #999999;
+       background-color: #dddddd;
+*/}
+
+
+/* render link-like elements per HTML's normal styling */
+link, ulink, email {
+       /* When ulink contains no body text, the url should be rendered
+        * at this point in the document.  Can't see how to do this with CSS */
+       color:#0000ff;
+       text-decoration:underline;
+}
+
+/*ulink:after {
+       content: " <" attr(url) ">";
+}*/
+
+email:before {
+       content: "<";
+}
+email:after {
+       content: ">";
+}
+
+citation:before {
+       content: "[";
+}
+citation:after {
+       content: "]";
+}
+
+xref:after {
+       /* simple symbol - content: "#" attr(linkend);*/
+       /* 'section' symbol */
+       content: "\00a7" attr(linkend);
+       color:#0000ff;
+       text-decoration: underline;
+}
+
+blockquote {
+       padding-left:3em;
+       padding-bottom: 1em;
+}
+
+blockquote>attribution {
+       text-align:right;
+       font-style: italic;
+}
+blockquote>attribution:after {
+       /* I've tried various things to position the attribution after the
+        * other blockquote content (e.g. relative/absolute positioning), but
+        * none of the things I tried produced satisfactory results (e.g. the
+        * attribution appears at the bottom of the containing block, but it
+        * overlaps preceeding content). */
+       content:":"
+}
+blockquote>para:before {
+       content: open-quote;
+}
+blockquote>para:after {
+       content: no-close-quote;
+}
+blockquote>para:last-child:after {
+       content: close-quote;
+}
+
+/* lists */
+
+itemizedlist {
+        padding-left: 1em;
+        list-style-type: disc;
+}
+
+listitem+listitem {
+       padding-top: .5em;
+}
+
+/* 2 deep nested lists */
+itemizedlist itemizedlist {
+        list-style-type: circle;
+}
+
+/* 3 or more deep nested lists */
+itemizedlist itemizedlist itemizedlist {
+        list-style-type: square;
+}
+
+
+itemizedlist>listitem {
+       display:list-item;
+}
+
+orderedlist {
+        padding-left: 1.5em;
+       list-style-type: decimal;
+}
+
+orderedlist>listitem {
+       display:list-item;
+}
+
+/*
+ * We've got no way of properly implementing call-out lists with CSS, so just
+ * present as a list of bullet points.
+ */
+calloutlist {
+        padding-left: 1em;
+        list-style-type: disc;
+}
+calloutlist>callout {
+       display:list-item;
+}
+
+
+
+/*
+ * The list of possible mark names is not defined by Docbook, but "opencircle"
+ * and "bullet" are used in T.D.G. example
+ */
+itemizedlist[mark="opencircle"], listitem[override="opencircle"] {
+        list-style-type: circle;
+}
+
+itemizedlist[mark="bullet"], listitem[override="bullet"] {
+        list-style-type: disc;
+}
+
+
+varlistentry>listitem {
+       margin-left: 2em;
+}
+varlistentry+varlistentry {
+       margin-top: .5em;
+}
+
+simplelist[type=horiz] {
+       display: block;
+}
+
+simplelist[type=inline]>member+member:before {
+       /* typically, we end up with unwanted whitespace before the comma
+        * (i.e. whitespace between <member> elements).  I see no way of
+        * suppressing this with CSS.
+        * TODO: try a combination of :after and :first-child instead to
+        * avoid the above issue */
+       content: ", ";
+}
+
+cmdsynopsis, code, command, computeroutput, envar, filename, keycode, keysym,
+literal, option, parameter, sgmltag, systemitem {
+       font-family: monospace;
+}
+
+filename[class=directory]:after {
+       content: "/";
+}
+
+/* TODO: Are these specific to 'en' locales or not? */
+trademark:after {
+       content: "\2122"
+}
+trademark[class="copyright"]:after {
+       content: "\A9"
+}
+trademark[class="registered"]:after {
+       content: "\AE"
+}
+trademark[class="service"]:after {
+       content: "\2120"
+}
+
+example, informalexample, programlisting  {
+       background-color:#dddddd;
+       padding: .5em;
+       border: 1px dashed black;
+}
+
+
+example programlisting, informalexample programlisting {
+       background-color: none;
+       padding: 0;
+       border: none;
+}
+
+/* admonitions */
+
+warning, caution, tip, note, important {
+       border: 1px dashed gray;
+       padding: .5em;
+}
+
+/* Have admonition titles appear inline with generated content ("Note:" etc.) */
+warning>title, caution>title, tip>title, note>title, important>title {
+       display: inline;
+       
+}
+
+warning:before, caution:before, tip:before, note:before, important:before {
+       /* Match the style of <title> */
+       font-weight: bolder;
+       font-family: sans-serif;
+}
+
+/* FIXME: background colours are cheezy :S ... */
+/* see language specific css for content: */
+warning:before {
+       background-color: red;
+}
+caution:before {
+       background-color: yellow;
+}
+tip:before {
+       background-color: #aaaddd;
+}
+note:before {
+       background-color: #dddddd;
+}
+important:before {
+       background-color: plum;
+}
+
+/* Tables */
+
+thead > row > entry {
+       /* FIXME: will under-rule every row in the <thead>, not just the last
+        * (I tried adding this style to <thead> itself, but this doesn't
+        * appear to work in combination with display:table-header-group, as
+        * defined in tables.css) */
+       border-bottom: 2px solid black;
+}
+
+thead {
+       font-weight: bolder;
+}
+
+entry {
+       padding: .2em;
+}
+
+
+/* Footnotes */
+
+
+/*
+ * Attempt to display footnotes on-mouseover.  This may well break if a
+ * footnote element has multiple children (I think the children will end up
+ * stacked on top of each other).
+ */
+
+footnote {
+       position: relative;
+       cursor: help;
+}
+footnote:hover {
+}
+footnote>* {
+       display: none;
+       z-index: 100;
+}
+footnote:hover>* {
+       display: block;
+       position: fixed;
+       border: 2px dotted black;
+       background-color: #ffeeaa;
+       padding: .5em;
+       left: 0px;
+       bottom: 0px;
+}
+footnote:before {
+       content: "?";
+       background-color: #ffeeaa;
+       border: 2px dotted black;
+       font-size: smaller;
+}
+
+
+/*
+
+Attempting to format <footnote> as a sitebar, floating it to the right.
+Sometimes works for footnotes in the 'main body' of some text, but works badly
+when the containing block is, for instance, a table cell.
+
+footnote:before {
+       content: "*";
+       display: block;
+       border: 2px dotted black;
+}
+
+footnote>* {
+       display: block;
+       float: right;
+       border: 2px dotted black;
+       padding: .5em;
+       width: 25%;
+       top: -1em;
+}
+
+footnote>*:before {
+       content: "*Footnote";
+       display: block;
+       font-weight: bold;
+       font-family: sans-serif;
+}
+*/
+
+glossentry>glossterm {
+       font-weight: bolder;
+       font-style: italic;
+}
+
+
+userinput {
+       font-weight: bolder;
+}
+
+figure {
+       text-align: center;
+}
+
+imageobject {
+       display: block;
+}
+
+mediaobject>textobject {
+       font-size: smaller;
+}
diff --git a/doc/docbook-css/tables.css b/doc/docbook-css/tables.css
new file mode 100644 (file)
index 0000000..da148a3
--- /dev/null
@@ -0,0 +1,59 @@
+/*
+ * tables.css
+ *
+ * Copyright (c) 2004 David Holroyd, and contributors
+ * See the file 'COPYING' for terms of use
+ *
+ * Part of the Docbook-CSS stylesheet
+ *   http://www.badgers-in-foil.co.uk/projects/docbook-css/
+ *
+ */
+
+tgroup {
+       display: table;
+}
+
+row {
+       display: table-row;
+}
+
+thead {
+       display: table-header-group;
+}
+
+tbody {
+       display: table-row-group;
+}
+
+entry, entrytbl {
+       display: table-cell;
+}
+
+entry[valign=top] {
+       vertical-align: top;
+}
+entry[valign=bottom] {
+       vertical-align: bottom;
+}
+
+/*
+ * CSS can't generate the indended formatting for segmented lists, so we turn
+ * them into tables instead.
+ *
+ * TODO: seems to break formatting when nested in a table entry
+ */
+segmentedlist {
+       display: table;
+}
+
+seglistitem {
+       display: table-row;
+}
+
+seg, segtitle {
+       display: table-cell;
+}
+
+segmentedlist>title {
+       display: table-caption;
+}
diff --git a/doc/docbook-css/xmlrpc.css b/doc/docbook-css/xmlrpc.css
new file mode 100644 (file)
index 0000000..08425ef
--- /dev/null
@@ -0,0 +1,42 @@
+funcsynopsis>* {
+       margin-left:10%;
+       margin-right:10%;
+}
+
+funcprototype {
+       display: block;
+       text-align: justify;
+       font-family:monospace;
+}
+
+funcprototype:after {
+       content:");";
+}
+
+funcdef:after {
+       content:"(";
+}
+
+paramdef type:after {
+       content:" ";
+}
+
+funcdef function {
+       font-weight:bold;
+}
+
+paramdef initializer:before
+{
+       content:" = ";
+}
+
+paramdef:after
+{
+       content:",";
+}
+
+/* remove the extra comma after the last paramdef of a funcprotoype */
+paramdef:last-child:after
+{
+       content:"";
+}
diff --git a/doc/highlight.php b/doc/highlight.php
new file mode 100644 (file)
index 0000000..5ea977d
--- /dev/null
@@ -0,0 +1,49 @@
+<?php
+/**
+ * takes a dir as arg, highlights all php code found in html files inside
+ *
+ * @version $Id$
+ * @author Gaetano Giunta
+ * @copyright (c) 2007-2008 G. Giunta
+ */
+
+function highlight($file)
+{
+  $starttag = '<pre class="programlisting">';
+  $endtag = '</pre>';
+
+  $content = file_get_contents($file);
+  $last = 0;
+  $out = '';
+  while(($start = strpos($content, $starttag, $last)) !== false)
+  {
+    $end = strpos($content, $endtag, $start);
+       $code = substr($content, $start+strlen($starttag), $end-$start-strlen($starttag));
+       if ($code[strlen($code)-1] == "\n") {
+               $code = substr($code, 0, -1);
+       }
+//var_dump($code);
+       $code = str_replace(array('&gt;', '&lt;'), array('>', '<'), $code);
+    $code = highlight_string('<?php '.$code, true);
+    $code = str_replace('<span style="color: #0000BB">&lt;?php&nbsp;<br />', '<span style="color: #0000BB">', $code);
+//echo($code);
+    $out = $out . substr($content, $last, $start+strlen($starttag)-$last) . $code . $endtag;
+    $last = $end+strlen($endtag);
+  }
+  $out .= substr($content, $last, strlen($content));
+  return $out;
+}
+
+$dir = $argv[1];
+
+$files = scandir($dir);
+foreach($files as $file)
+{
+       if (substr($file, -5, 5) == '.html')
+       {
+               $out = highlight($dir.'/'.$file);
+               file_put_contents($dir.'/'.$file, $out);
+       }
+}
+
+?>
\ No newline at end of file
diff --git a/doc/xmlrpc_php.xml b/doc/xmlrpc_php.xml
new file mode 100644 (file)
index 0000000..1b97c88
--- /dev/null
@@ -0,0 +1,4074 @@
+<?xml version="1.0" encoding="UTF-8"?>\r
+<?xml-stylesheet href="docbook-css/driver.css" type="text/css"?>\r
+<!DOCTYPE book PUBLIC "-//OASIS//DTD DocBook XML V4.5//EN"\r
+"http://www.oasis-open.org/docbook/xml/4.5/docbookx.dtd">\r
+<!--\r
+PHP-XMLRPC User manual\r
+$Id: xmlrpc_php.xml,v 1.27 2008/09/19 18:35:33 ggiunta Exp $\r
+-->\r
+<book lang="en">\r
+  <title>XML-RPC for PHP</title>\r
+\r
+  <subtitle>version 2.2.2</subtitle>\r
+\r
+  <bookinfo>\r
+    <date>XXX YY, 2008</date>\r
+\r
+    <authorgroup>\r
+      <author>\r
+        <firstname>Edd</firstname>\r
+\r
+        <surname>Dumbill</surname>\r
+      </author>\r
+\r
+      <author>\r
+        <firstname>Gaetano</firstname>\r
+\r
+        <surname>Giunta</surname>\r
+      </author>\r
+\r
+      <author>\r
+        <firstname>Miles</firstname>\r
+\r
+        <surname>Lott</surname>\r
+      </author>\r
+\r
+      <author>\r
+        <firstname>Justin R.</firstname>\r
+\r
+        <surname>Miller</surname>\r
+      </author>\r
+\r
+      <author>\r
+        <firstname>Andres</firstname>\r
+\r
+        <surname>Salomon</surname>\r
+      </author>\r
+    </authorgroup>\r
+\r
+    <copyright>\r
+      <year>1999,2000,2001</year>\r
+\r
+      <holder>Edd Dumbill, Useful Information Company</holder>\r
+    </copyright>\r
+\r
+    <legalnotice>\r
+      <para>All rights reserved.</para>\r
+\r
+      <para>Redistribution and use in source and binary forms, with or without\r
+      modification, are permitted provided that the following conditions are\r
+      met:</para>\r
+\r
+      <para><itemizedlist>\r
+          <listitem>\r
+            <para>Redistributions of source code must retain the above\r
+            copyright notice, this list of conditions and the following\r
+            disclaimer.</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>Redistributions in binary form must reproduce the above\r
+            copyright notice, this list of conditions and the following\r
+            disclaimer in the documentation and/or other materials provided\r
+            with the distribution.</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>Neither the name of the "XML-RPC for PHP" nor the names of\r
+            its contributors may be used to endorse or promote products\r
+            derived from this software without specific prior written\r
+            permission.</para>\r
+          </listitem>\r
+        </itemizedlist></para>\r
+\r
+      <para>THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND\r
+      CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING,\r
+      BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND\r
+      FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE\r
+      REGENTS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,\r
+      SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED\r
+      TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR\r
+      PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF\r
+      LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING\r
+      NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS\r
+      SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.</para>\r
+    </legalnotice>\r
+  </bookinfo>\r
+\r
+  <chapter id="introduction">\r
+    <title>Introduction</title>\r
+\r
+    <para>XML-RPC is a format devised by <ulink\r
+    url="http://www.userland.com/">Userland Software</ulink> for achieving\r
+    remote procedure call via XML using HTTP as the transport. XML-RPC has its\r
+    own web site, <ulink\r
+    url="http://www.xmlrpc.com/">www.xmlrpc.com</ulink></para>\r
+\r
+    <para>This collection of PHP classes provides a framework for writing\r
+    XML-RPC clients and servers in PHP.</para>\r
+\r
+    <para>Main goals of the project are ease of use, flexibility and\r
+    completeness.</para>\r
+\r
+    <para>The original author is Edd Dumbill of <ulink\r
+    url="http://usefulinc.com/">Useful Information Company</ulink>. As of the\r
+    1.0 stable release, the project has been opened to wider involvement and\r
+    moved to <ulink\r
+    url="http://phpxmlrpc.sourceforge.net/">SourceForge</ulink>.</para>\r
+\r
+    <para>A list of XML-RPC implementations for other languages such as Perl\r
+    and Python can be found on the <ulink\r
+    url="http://www.xmlrpc.com/">www.xmlrpc.com</ulink> site.</para>\r
+\r
+    <sect1>\r
+      <title>Acknowledgements</title>\r
+\r
+      <para>Daniel E. Baumann</para>\r
+\r
+      <para>James Bercegay</para>\r
+\r
+      <para>Leon Blackwell</para>\r
+\r
+      <para>Stephane Bortzmeyer</para>\r
+\r
+      <para>Daniel Convissor</para>\r
+\r
+      <para>Geoffrey T. Dairiki</para>\r
+\r
+      <para>Stefan Esser</para>\r
+\r
+      <para>James Flemer</para>\r
+\r
+      <para>Ernst de Haan</para>\r
+\r
+      <para>Tom Knight</para>\r
+\r
+      <para>Axel Kollmorgen</para>\r
+\r
+      <para>Peter Kocks</para>\r
+\r
+      <para>Daniel Krippner</para>\r
+\r
+      <para>S. Kuip</para>\r
+\r
+      <para>A. Lambert</para>\r
+\r
+      <para>Dan Libby</para>\r
+\r
+      <para>Arnaud Limbourg</para>\r
+\r
+      <para>Ernest MacDougal Campbell III</para>\r
+\r
+      <para>Lukasz Mach</para>\r
+\r
+      <para>Kjartan Mannes</para>\r
+\r
+      <para>Ben Margolin</para>\r
+\r
+      <para>Nicolay Mausz</para>\r
+\r
+      <para>Justin Miller</para>\r
+\r
+      <para>Jan Pfeifer</para>\r
+\r
+      <para>Giancarlo Pinerolo</para>\r
+\r
+      <para>Peter Russel</para>\r
+\r
+      <para>Viliam Simko</para>\r
+\r
+      <para>Douglas Squirrel</para>\r
+\r
+      <para>Idan Sofer</para>\r
+\r
+      <para>Anatoly Techtonik</para>\r
+\r
+      <para>Eric van der Vlist</para>\r
+\r
+      <para>Christian Wenz</para>\r
+\r
+      <para>Jim Winstead</para>\r
+\r
+      <para>Przemyslaw Wroblewski</para>\r
+    </sect1>\r
+  </chapter>\r
+\r
+  <chapter id="news">\r
+    <title>What's new</title>\r
+\r
+    <para><emphasis>Note:</emphasis> not all items the following list have\r
+    (yet) been fully documented, and some might not be present in any other\r
+    chapter in the manual. To find a more detailed description of new\r
+    functions and methods please take a look at the source code of the\r
+    library, which is quite thoroughly commented in javadoc-like form.</para>\r
+\r
+    <sect1>\r
+      <title>2.2.2</title>\r
+\r
+      <para><itemizedlist>\r
+          <listitem>\r
+            <para>fixed: encoding of utf-8 characters outside of the BMP\r
+            plane</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>fixed: character set declarations surrounded by double\r
+            quotes were not recognized in http headers</para>\r
+          </listitem>\r
+        </itemizedlist></para>\r
+    </sect1>\r
+\r
+    <sect1>\r
+      <title>2.2.1</title>\r
+\r
+      <para><emphasis>Note:</emphasis> this is the last release of the library\r
+      that will support PHP 4. Future releases (if any) will target php 5.0 as\r
+      minimum supported version.</para>\r
+\r
+      <itemizedlist>\r
+        <listitem>\r
+          <para>fixed: work aroung bug in php 5.2.2 which broke support of\r
+          HTTP_RAW_POST_DATA</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>fixed: is_dir parameter of setCaCertificate() method is\r
+          reversed</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>fixed: a php warning in xmlrpc_client creator method</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>fixed: parsing of '1e+1' as valid float</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>fixed: allow errorlevel 3 to work when prev. error handler was\r
+          a static method</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>fixed: usage of client::setcookie() for multiple cookies in\r
+          non-ssl mode</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>improved: support for CP1252 charset is not part or the\r
+          library but almost possible</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>improved: more info when curl is enabled and debug mode is\r
+          on</para>\r
+        </listitem>\r
+      </itemizedlist>\r
+    </sect1>\r
+\r
+    <sect1>\r
+      <title>2.2</title>\r
+\r
+      <itemizedlist>\r
+        <listitem>\r
+          <para>fixed: debugger errors on php installs with magic_quotes_gpc\r
+          on</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>fixed: support for https connections via proxy</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>fixed: wrap_xmlrpc_method() generated code failed to properly\r
+          encode php objects</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>improved: slightly faster encoding of data which is internally\r
+          UTF-8</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>improved: debugger always generates a 'null' id for jsonrpc if\r
+          user omits it</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>new: debugger can take advantage of a graphical value builder\r
+          (it has to be downloaded separately, as part of jsxmlrpc package.\r
+          See Appendix D for more details)</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>new: support for the &lt;NIL/&gt; xmlrpc extension. see below\r
+          for more details</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>new: server support for the system.getCapabilities xmlrpc\r
+          extension</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>new: <function><link\r
+          linkend="wrap_xmlrpc_method">wrap_xmlrpc_method()</link></function>\r
+          accepts two new options: debug and return_on_fault</para>\r
+        </listitem>\r
+      </itemizedlist>\r
+    </sect1>\r
+\r
+    <sect1>\r
+      <title>2.1</title>\r
+\r
+      <para><itemizedlist>\r
+          <listitem>\r
+            <para>The <function>wrap_php_function</function> and\r
+            <function>wrap_xmlrpc_method</function> functions have been moved\r
+            out of the base library file <filename>xmlrpc.inc</filename> into\r
+            a file of their own: <filename>xmlrpc_wrappers.inc</filename>. You\r
+            will have to include() / require() it in your scripts if you have\r
+            been using those functions. For increased security, the automatic\r
+            rebuilding of php object instances out of received xmlrpc structs\r
+            in <function>wrap_xmlrpc_method()</function> has been disabled\r
+            (but it can be optionally re-enabled). Both\r
+            <function>wrap_php_function()</function> and\r
+            <function>wrap_xmlrpc_method()</function> functions accept many\r
+            more options to fine tune their behaviour, including one to return\r
+            the php code to be saved and later used as standalone php\r
+            script</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>The constructor of xmlrpcval() values has seen some internal\r
+            changes, and it will not throw a php warning anymore when invoked\r
+            using an unknown xmlrpc type: the error will only be written to\r
+            php error log. Also <code>new xmlrpcval('true', 'boolean')</code>\r
+            is not supported anymore</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>The new function\r
+            <function>php_xmlrpc_decode_xml()</function> will take the xml\r
+            representation of either an xmlrpc request, response or single\r
+            value and return the corresponding php-xmlrpc object\r
+            instance</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>A new function <function>wrap_xmlrpc_server()</function>has\r
+            been added, to wrap all (or some) of the methods exposed by a\r
+            remote xmlrpc server into a php class</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>A new file has been added:\r
+            <filename>verify_compat.php</filename>, to help users diagnose the\r
+            level of compliance of their php installation with the\r
+            library</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>Restored compatibility with php 4.0.5 (for those poor souls\r
+            still stuck on it)</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>Method <methodname>xmlrpc_server-&gt;service()</methodname>\r
+            now returns a value: either the response payload or xmlrpcresp\r
+            object instance</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>Method\r
+            <methodname>xmlrpc_server-&gt;add_to_map()</methodname> now\r
+            accepts xmlrpc methods with no param definitions</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>Documentation for single parameters of exposed methods can\r
+            be added to the dispatch map (and turned into html docs in\r
+            conjunction with a future release of the 'extras' package)</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>Full response payload is saved into xmlrpcresp object for\r
+            further debugging</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>The debugger can now generate code that wraps a remote\r
+            method into a php function (works for jsonrpc, too); it also has\r
+            better support for being activated via a single GET call (e.g. for\r
+            integration into other tools)</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>Stricter parsing of incoming xmlrpc messages: two more\r
+            invalid cases are now detected (double <literal>data</literal>\r
+            element inside <literal>array</literal> and\r
+            <literal>struct</literal>/<literal>array</literal> after scalar\r
+            inside <literal>value</literal> element)</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>More logging of errors in a lot of situations</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>Javadoc documentation of lib files (almost) complete</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>Many performance tweaks and code cleanups, plus the usual\r
+            crop of bugs fixed (see NEWS file for complete list of\r
+            bugs)</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>Lib internals have been modified to provide better support\r
+            for grafting extra functionality on top of it. Stay tuned for\r
+            future releases of the EXTRAS package (or go read Appendix\r
+            B)...</para>\r
+          </listitem>\r
+        </itemizedlist></para>\r
+    </sect1>\r
+\r
+    <sect1>\r
+      <title>2.0 final</title>\r
+\r
+      <para><itemizedlist>\r
+          <listitem>\r
+            <para>Added to the client class the possibility to use Digest and\r
+            NTLM authentication methods (when using the CURL library) for\r
+            connecting to servers and NTLM for connecting to proxies</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>Added to the client class the possibility to specify\r
+            alternate certificate files/directories for authenticating the\r
+            peer with when using HTTPS communication</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>Reviewed all examples and added a new demo file, containing\r
+            a proxy to forward xmlrpc requests to other servers (useful e.g.\r
+            for ajax coding)</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>The debugger has been upgraded to reflect the new client\r
+            capabilities</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>All known bugs have been squashed, and the lib is more\r
+            tolerant than ever of commonly-found mistakes</para>\r
+          </listitem>\r
+        </itemizedlist></para>\r
+    </sect1>\r
+\r
+    <sect1>\r
+      <title>2.0 Release candidate 3</title>\r
+\r
+      <para><itemizedlist>\r
+          <listitem>\r
+            <para>Added to server class the property\r
+            <property>functions_parameters_type</property>, that allows the\r
+            server to register plain php functions as xmlrpc methods (i.e.\r
+            functions that do not take an xmlrpcmsg object as unique\r
+            param)</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>let server and client objects serialize calls using a\r
+            specified character set encoding for the produced xml instead of\r
+            US-ASCII (ISO-8859-1 and UTF-8 supported)</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>let php_xmlrpc_decode accept xmlrpcmsg objects as valid\r
+            input</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>'class::method' syntax is now accepted in the server\r
+            dispatch map</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para><function>xmlrpc_clent::SetDebug()</function> accepts\r
+            integer values instead of a boolean value, with debugging level 2\r
+            adding to the information printed to screen the complete client\r
+            request</para>\r
+          </listitem>\r
+        </itemizedlist></para>\r
+    </sect1>\r
+\r
+    <sect1>\r
+      <title>2.0 Release candidate 2</title>\r
+\r
+      <para><itemizedlist>\r
+          <listitem>\r
+            <para>Added a new property of the client object:\r
+            <code>xmlrpc_client-&gt;return_type</code>, indicating whether\r
+            calls to the send() method will return xmlrpcresp objects whose\r
+            value() is an xmlrpcval object, a php value (automatically\r
+            decoded) or the raw xml received from the server.</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>Added in the extras dir. two new library file:\r
+            <filename>jsonrpc.inc</filename> and\r
+            <filename>jsonrpcs.inc</filename> containing new classes that\r
+            implement support for the json-rpc protocol (alpha quality\r
+            code)</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>Added a new client method: <code>setKey($key,\r
+            $keypass)</code> to be used in HTTPS connections</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>Added a new file containing some benchmarks in the testsuite\r
+            directory</para>\r
+          </listitem>\r
+        </itemizedlist></para>\r
+    </sect1>\r
+\r
+    <sect1>\r
+      <title>2.0 Release candidate 1</title>\r
+\r
+      <itemizedlist>\r
+        <listitem>\r
+          <para>Support for HTTP proxies (new method:\r
+          <code>xmlrpc_client::setProxy()</code>)</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>Support HTTP compression of both requests and responses.\r
+          Clients can specify what kind of compression they accept for\r
+          responses between deflate/gzip/any, and whether to compress the\r
+          requests. Servers by default compress responses to clients that\r
+          explicitly declare support for compression (new methods:\r
+          <code>xmlrpc_client::setAcceptedCompression()</code>,\r
+          <code>xmlrpc_client::setRequestCompression()</code>). Note that the\r
+          ZLIB php extension needs to be enabled in PHP to support\r
+          compression.</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>Implement HTTP 1.1 connections, but only if CURL is enabled\r
+          (added an extra parameter to\r
+          <code>xmlrpc_client::xmlrpc_client</code> to set the desired HTTP\r
+          protocol at creation time and a new supported value for the last\r
+          parameter of <code>xmlrpc_client::send</code>, which now can be\r
+          safely omitted if it has been specified at creation time)</para>\r
+\r
+          <para>With PHP versions greater than 4.3.8 keep-alives are enabled\r
+          by default for HTTP 1.1 connections. This should yield faster\r
+          execution times when making multiple calls in sequence to the same\r
+          xml-rpc server from a single client.</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>Introduce support for cookies. Cookies to be sent to the\r
+          server with a request can be set using\r
+          <code>xmlrpc_client::setCookie()</code>, while cookies received from\r
+          the server are found in <code>xmlrpcresp::cookies()</code>. It is\r
+          left to the user to check for validity of received cookies and\r
+          decide whether they apply to successive calls or not.</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>Better support for detecting different character set encodings\r
+          of xml-rpc requests and responses: both client and server objects\r
+          will correctly detect the charset encoding of received xml, and use\r
+          an appropriate xml parser.</para>\r
+\r
+          <para>Supported encodings are US-ASCII, UTF-8 and ISO-8859-1.</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>Added one new xmlrpcmsg constructor syntax, allowing usage of\r
+          a single string with the complete URL of the target server</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>Convert xml-rpc boolean values into native php values instead\r
+          of 0 and 1</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>Force the <code>php_xmlrpc_encode</code> function to properly\r
+          encode numerically indexed php arrays into xml-rpc arrays\r
+          (numerically indexed php arrays always start with a key of 0 and\r
+          increment keys by values of 1)</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>Prevent the <code>php_xmlrpc_encode</code> function from\r
+          further re-encoding any objects of class <code>xmlrpcval</code> that\r
+          are passed to it. This allows to call the function with arguments\r
+          consisting of mixed php values / xmlrpcval objects.</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>Allow a server to NOT respond to system.* method calls\r
+          (setting the <code>$server-&gt;allow_system_funcs</code>\r
+          property).</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>Implement a new xmlrpcval method to determine if a value of\r
+          type struct has a member of a given name without having to loop\r
+          trough all members: <code>xmlrpcval::structMemExists()</code></para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>Expand methods <code>xmlrpcval::addArray</code>,\r
+          <code>addScalar</code> and <code>addStruct</code> allowing extra php\r
+          values to be added to xmlrpcval objects already formed.</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>Let the <code>xmlrpc_client::send</code> method accept an XML\r
+          string for sending instead of an xmlrpcmsg object, to facilitate\r
+          debugging and integration with the php native xmlrpc\r
+          extension</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>Extend the <code>php_xmlrpc_encode</code> and\r
+          <code>php_xmlrpc_decode</code> functions to allow serialization and\r
+          rebuilding of PHP objects. To successfully rebuild a serialized\r
+          object, the object class must be defined in the deserializing end of\r
+          the transfer. Note that object members of type resource will be\r
+          deserialized as NULL values.</para>\r
+\r
+          <para>Note that his has been implemented adding a "php_class"\r
+          attribute to xml representation of xmlrpcval of STRUCT type, which,\r
+          strictly speaking, breaks the xml-rpc spec. Other xmlrpc\r
+          implementations are supposed to ignore such an attribute (unless\r
+          they implement a brain-dead custom xml parser...), so it should be\r
+          safe enabling it in heterogeneous environments. The activation of\r
+          this feature is done by usage of an option passed as second\r
+          parameter to both <code>php_xmlrpc_encode</code> and\r
+          <code>php_xmlrpc_decode</code>.</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>Extend the <code>php_xmlrpc_encode</code> function to allow\r
+          automatic serialization of iso8601-conforming php strings as\r
+          datetime.iso8601 xmlrpcvals, by usage of an optional\r
+          parameter</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>Added an automatic stub code generator for converting xmlrpc\r
+          methods to php functions and vice-versa.</para>\r
+\r
+          <para>This is done via two new functions:\r
+          <code>wrap_php_function</code> and <code>wrap_xmlrpc_method</code>,\r
+          and has many caveats, with php being a typeless language and\r
+          all...</para>\r
+\r
+          <para>With PHP versions lesser than 5.0.3 wrapping of php functions\r
+          into xmlrpc methods is not supported yet.</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>Allow object methods to be used in server dispatch map</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>Added a complete debugger solution, in the\r
+          <filename>debugger</filename> folder</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>Added configurable server-side debug messages, controlled by\r
+          the new method <code>xmlrpc_server::SetDebug()</code>. At level 0,\r
+          no debug messages are sent to the client; level 1 is the same as the\r
+          old behaviour; at level 2 a lot more info is echoed back to the\r
+          client, regarding the received call; at level 3 all warnings raised\r
+          during server processing are trapped (this prevents breaking the xml\r
+          to be echoed back to the client) and added to the debug info sent\r
+          back to the client</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>New XML parsing code, yields smaller memory footprint and\r
+          faster execution times, not to mention complete elimination of the\r
+          dreaded <filename>eval()</filename> construct, so prone to code\r
+          injection exploits</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>Rewritten most of the error messages, making text more\r
+          explicative</para>\r
+        </listitem>\r
+      </itemizedlist>\r
+    </sect1>\r
+  </chapter>\r
+\r
+  <chapter id="requirements">\r
+    <title>System Requirements</title>\r
+\r
+    <para>The library has been designed with goals of scalability and backward\r
+    compatibility. As such, it supports a wide range of PHP installs. Note\r
+    that not all features of the lib are available in every\r
+    configuration.</para>\r
+\r
+    <para>The <emphasis>minimum supported</emphasis> PHP version is\r
+    4.2.</para>\r
+\r
+    <para>A compatibility layer is provided that allows the code to run on PHP\r
+    4.0.5 and 4.1. Note that if you are stuck on those platforms, we suggest\r
+    you upgrade as soon as possible.</para>\r
+\r
+    <para>Automatic generation of xml-rpc methods from php functions is only\r
+    supported with PHP version 5.0.3 and later (note that the lib will\r
+    generate some warnings with PHP 5 in strict error reporting mode).</para>\r
+\r
+    <para>If you wish to use SSL or HTTP 1.1 to communicate with remote\r
+    servers, you need the "curl" extension compiled into your PHP\r
+    installation. This is available in PHP 4.0.2 and greater, although 4.0.6\r
+    has a bug preventing SSL working, and versions prior to 4.3.8 do not\r
+    support streamlining multiple requests using HTTP Keep-Alive.</para>\r
+\r
+    <para>The "xmlrpc" native extension is not required to be compiled into\r
+    your PHP installation, but if it is, there will be no interference with\r
+    the operation of this library.</para>\r
+  </chapter>\r
+\r
+  <chapter id="manifest">\r
+    <title>Files in the distribution</title>\r
+\r
+    <glosslist>\r
+      <glossentry>\r
+        <glossterm>lib/xmlrpc.inc</glossterm>\r
+\r
+        <glossdef>\r
+          <para>the XML-RPC classes. <function>include()</function> this in\r
+          your PHP files to use the classes.</para>\r
+        </glossdef>\r
+      </glossentry>\r
+\r
+      <glossentry>\r
+        <glossterm>lib/xmlrpcs.inc</glossterm>\r
+\r
+        <glossdef>\r
+          <para>the XML-RPC server class. <function>include()</function> this\r
+          in addition to xmlrpc.inc to get server functionality</para>\r
+        </glossdef>\r
+      </glossentry>\r
+\r
+      <glossentry>\r
+        <glossterm>lib/xmlrpc_wrappers.inc</glossterm>\r
+\r
+        <glossdef>\r
+          <para>helper functions to "automagically" convert plain php\r
+          functions to xmlrpc services and vice versa</para>\r
+        </glossdef>\r
+      </glossentry>\r
+\r
+      <glossentry>\r
+        <glossterm>lib/compat/array_key_exists.php, lib/compat/is_a.php,\r
+        lib/compat/is_scalar.php, lib/compat/var_export.php,\r
+        lib/compat/vesrions_compare.php</glossterm>\r
+\r
+        <glossdef>\r
+          <para>compatibility functions: these files implement the\r
+          compatibility layer needed to run the library with PHP versions 4.0\r
+          and 4.1</para>\r
+        </glossdef>\r
+      </glossentry>\r
+\r
+      <glossentry>\r
+        <glossterm>demo/server/proxy.php</glossterm>\r
+\r
+        <glossdef>\r
+          <para>a sample server implementing xmlrpc proxy\r
+          functionality.</para>\r
+        </glossdef>\r
+      </glossentry>\r
+\r
+      <glossentry>\r
+        <glossterm>demo/server/server.php</glossterm>\r
+\r
+        <glossdef>\r
+          <para>a sample server hosting various demo functions, as well as a\r
+          full suite of functions used for interoperability testing. It is\r
+          used by testsuite.php (see below) for unit testing the library, and\r
+          is not to be copied literally into your production servers</para>\r
+        </glossdef>\r
+      </glossentry>\r
+\r
+      <glossentry>\r
+        <glossterm>demo/client/client.php, demo/client/agesort.php,\r
+        demo/client/which.php</glossterm>\r
+\r
+        <glossdef>\r
+          <para>client code to exercise some of the functions in server.php,\r
+          including the <function>interopEchoTests.whichToolkit</function>\r
+          method.</para>\r
+        </glossdef>\r
+      </glossentry>\r
+\r
+      <glossentry>\r
+        <glossterm>demo/client/wrap.php</glossterm>\r
+\r
+        <glossdef>\r
+          <para>client code to illustrate 'wrapping' of remote methods into\r
+          php functions.</para>\r
+        </glossdef>\r
+      </glossentry>\r
+\r
+      <glossentry>\r
+        <glossterm>demo/client/introspect.php</glossterm>\r
+\r
+        <glossdef>\r
+          <para>client code to illustrate usage of introspection capabilities\r
+          offered by server.php.</para>\r
+        </glossdef>\r
+      </glossentry>\r
+\r
+      <glossentry>\r
+        <glossterm>demo/client/mail.php</glossterm>\r
+\r
+        <glossdef>\r
+          <para>client code to illustrate usage of an xmlrpc-to-email gateway\r
+          using Dave Winer's XML-RPC server at userland.com.</para>\r
+        </glossdef>\r
+      </glossentry>\r
+\r
+      <glossentry>\r
+        <glossterm>demo/client/zopetest.php</glossterm>\r
+\r
+        <glossdef>\r
+          <para>example client code that queries an xmlrpc server built in\r
+          Zope.</para>\r
+        </glossdef>\r
+      </glossentry>\r
+\r
+      <glossentry>\r
+        <glossterm>demo/vardemo.php</glossterm>\r
+\r
+        <glossdef>\r
+          <para>examples of how to construct xmlrpcval types</para>\r
+        </glossdef>\r
+      </glossentry>\r
+\r
+      <glossentry>\r
+        <glossterm>demo/demo1.txt, demo/demo2.txt, demo/demo3.txt</glossterm>\r
+\r
+        <glossdef>\r
+          <para>XML-RPC responses captured in a file for testing purposes (you\r
+          can use these to test the\r
+          <function>xmlrpcmsg-&gt;parseResponse()</function> method).</para>\r
+        </glossdef>\r
+      </glossentry>\r
+\r
+      <glossentry>\r
+        <glossterm>demo/server/discuss.php,\r
+        demo/client/comment.php</glossterm>\r
+\r
+        <glossdef>\r
+          <para>Software used in the PHP chapter of <xref\r
+          linkend="jellyfish" /> to provide a comment server and allow the\r
+          attachment of comments to stories from Meerkat's data store.</para>\r
+        </glossdef>\r
+      </glossentry>\r
+\r
+      <glossentry>\r
+        <glossterm>test/testsuite.php, test/parse_args.php</glossterm>\r
+\r
+        <glossdef>\r
+          <para>A unit test suite for this software package. If you do\r
+          development on this software, please consider submitting tests for\r
+          this suite.</para>\r
+        </glossdef>\r
+      </glossentry>\r
+\r
+      <glossentry>\r
+        <glossterm>test/benchmark.php</glossterm>\r
+\r
+        <glossdef>\r
+          <para>A (very limited) benchmarking suite for this software package.\r
+          If you do development on this software, please consider submitting\r
+          benchmarks for this suite.</para>\r
+        </glossdef>\r
+      </glossentry>\r
+\r
+      <glossentry>\r
+        <glossterm>test/phpunit.php, test/PHPUnit/*.php</glossterm>\r
+\r
+        <glossdef>\r
+          <para>An (incomplete) version PEAR's unit test framework for PHP.\r
+          The complete package can be found at <ulink\r
+          url="http://pear.php.net/package/PHPUnit">http://pear.php.net/package/PHPUnit</ulink></para>\r
+        </glossdef>\r
+      </glossentry>\r
+\r
+      <glossentry>\r
+        <glossterm>test/verify_compat.php</glossterm>\r
+\r
+        <glossdef>\r
+          <para>Script designed to help the user to verify the level of\r
+          compatibility of the library with the current php install</para>\r
+        </glossdef>\r
+      </glossentry>\r
+\r
+      <glossentry>\r
+        <glossterm>extras/test.pl, extras/test.py</glossterm>\r
+\r
+        <glossdef>\r
+          <para>Perl and Python programs to exercise server.php to test that\r
+          some of the methods work.</para>\r
+        </glossdef>\r
+      </glossentry>\r
+\r
+      <glossentry>\r
+        <glossterm>extras/workspace.testPhpServer.fttb</glossterm>\r
+\r
+        <glossdef>\r
+          <para>Frontier scripts to exercise the demo server. Thanks to Dave\r
+          Winer for permission to include these. See <ulink\r
+          url="http://www.xmlrpc.com/discuss/msgReader$853">Dave's\r
+          announcement of these.</ulink></para>\r
+        </glossdef>\r
+      </glossentry>\r
+\r
+      <glossentry>\r
+        <glossterm>extras/rsakey.pem</glossterm>\r
+\r
+        <glossdef>\r
+          <para>A test certificate key for the SSL support, which can be used\r
+          to generate dummy certificates. It has the passphrase "test."</para>\r
+        </glossdef>\r
+      </glossentry>\r
+    </glosslist>\r
+  </chapter>\r
+\r
+  <chapter id="bugs">\r
+    <title>Known bugs and limitations</title>\r
+\r
+    <para>This started out as a bare framework. Many "nice" bits haven't been\r
+    put in yet. Specifically, very little type validation or coercion has been\r
+    put in. PHP being a loosely-typed language, this is going to have to be\r
+    done explicitly (in other words: you can call a lot of library functions\r
+    passing them arguments of the wrong type and receive an error message only\r
+    much further down the code, where it will be difficult to\r
+    understand).</para>\r
+\r
+    <para>dateTime.iso8601 is supported opaquely. It can't be done natively as\r
+    the XML-RPC specification explicitly forbids passing of timezone\r
+    specifiers in ISO8601 format dates. You can, however, use the <xref\r
+    linkend="iso8601encode" /> and <xref linkend="iso8601decode" /> functions\r
+    to do the encoding and decoding for you.</para>\r
+\r
+    <para>Very little HTTP response checking is performed (e.g. HTTP redirects\r
+    are not followed and the Content-Length HTTP header, mandated by the\r
+    xml-rpc spec, is not validated); cookie support still involves quite a bit\r
+    of coding on the part of the user.</para>\r
+\r
+    <para>If a specific character set encoding other than US-ASCII, ISO-8859-1\r
+    or UTF-8 is received in the HTTP header or XML prologue of xml-rpc request\r
+    or response messages then it will be ignored for the moment, and the\r
+    content will be parsed as if it had been encoded using the charset defined\r
+    by <xref linkend="xmlrpc-defencoding" /></para>\r
+\r
+    <para>Very large floating point numbers are serialized using exponential\r
+    notation, even though the spec explicitly forbids this behaviour. This\r
+    will not be a problem if this library is used on both ends of the\r
+    communication, but might cause problems with other implementations.</para>\r
+\r
+    <para>Support for receiving from servers version 1 cookies (i.e.\r
+    conforming to RFC 2965) is quite incomplete, and might cause unforeseen\r
+    errors.</para>\r
+\r
+    <para>A PHP warning will be generated in many places when using\r
+    <filename>xmlrpc.inc</filename> and <filename>xmlrpcs.inc</filename> with\r
+    PHP 5 in strict error reporting mode. The simplest workaround to this\r
+    problem is to lower the <parameter>error_reporting</parameter> level in\r
+    php.ini.</para>\r
+  </chapter>\r
+\r
+  <chapter id="support">\r
+    <title>Support</title>\r
+\r
+    <sect1>\r
+      <title>Online Support</title>\r
+\r
+      <para>XML-RPC for PHP is offered "as-is" without any warranty or\r
+      commitment to support. However, informal advice and help is available\r
+      via the XML-RPC for PHP website and mailing list and from\r
+      XML-RPC.com.</para>\r
+\r
+      <itemizedlist>\r
+        <listitem>\r
+          <para>The <emphasis>XML-RPC for PHP</emphasis> development is hosted\r
+          on <ulink\r
+          url="http://phpxmlrpc.sourceforge.net">phpxmlrpc.sourceforge.net</ulink>.\r
+          Bugs, feature requests and patches can be posted to the <ulink\r
+          url="http://sourceforge.net/projects/phpxmlrpc">project's\r
+          website</ulink>.</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>The <emphasis>PHP XML-RPC interest mailing list</emphasis> is\r
+          run by the author. More details <ulink\r
+          url="http://lists.gnomehack.com/mailman/listinfo/phpxmlrpc">can be\r
+          found here</ulink>.</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>For more general XML-RPC questions, there is a Yahoo! Groups\r
+          <ulink url="http://groups.yahoo.com/group/xml-rpc/">XML-RPC mailing\r
+          list</ulink>.</para>\r
+        </listitem>\r
+\r
+        <listitem>\r
+          <para>The <ulink\r
+          url="http://www.xmlrpc.com/discuss">XML-RPC.com</ulink> discussion\r
+          group is a useful place to get help with using XML-RPC. This group\r
+          is also gatewayed into the Yahoo! Groups mailing list.</para>\r
+        </listitem>\r
+      </itemizedlist>\r
+    </sect1>\r
+\r
+    <sect1 id="jellyfish" xreflabel="The Jellyfish Book">\r
+      <title>The Jellyfish Book</title>\r
+\r
+      <para><graphic align="right" depth="190" fileref="progxmlrpc.s.gif"\r
+      format="GIF" width="145" />Together with Simon St.Laurent and Joe\r
+      Johnston, Edd Dumbill wrote a book on XML-RPC for O'Reilly and\r
+      Associates on XML-RPC. It features a rather fetching jellyfish on the\r
+      cover.</para>\r
+\r
+      <para>Complete details of the book are <ulink\r
+      url="http://www.oreilly.com/catalog/progxmlrpc/">available from\r
+      O'Reilly's web site.</ulink></para>\r
+\r
+      <para>Edd is responsible for the chapter on PHP, which includes a worked\r
+      example of creating a forum server, and hooking it up the O'Reilly's\r
+      <ulink url="http://meerkat.oreillynet.com/">Meerkat</ulink> service in\r
+      order to allow commenting on news stories from around the Web.</para>\r
+\r
+      <para>If you've benefited from the effort that has been put into writing\r
+      this software, then please consider buying the book!</para>\r
+    </sect1>\r
+  </chapter>\r
+\r
+  <chapter id="apidocs">\r
+    <title>Class documentation</title>\r
+\r
+    <sect1 id="xmlrpcval" xreflabel="xmlrpcval">\r
+      <title>xmlrpcval</title>\r
+\r
+      <para>This is where a lot of the hard work gets done. This class enables\r
+      the creation and encapsulation of values for XML-RPC.</para>\r
+\r
+      <para>Ensure you've read the XML-RPC spec at <ulink\r
+      url="http://www.xmlrpc.com/stories/storyReader$7">http://www.xmlrpc.com/stories/storyReader$7</ulink>\r
+      before reading on as it will make things clearer.</para>\r
+\r
+      <para>The <classname>xmlrpcval</classname> class can store arbitrarily\r
+      complicated values using the following types: <literal>i4 int boolean\r
+      string double dateTime.iso8601 base64 array struct</literal>. You should\r
+      refer to the <ulink url="http://www.xmlrpc.com/spec">spec</ulink> for\r
+      more information on what each of these types mean.</para>\r
+\r
+      <sect2>\r
+        <title>Notes on types</title>\r
+\r
+        <sect3>\r
+          <title>int</title>\r
+\r
+          <para>The type <classname>i4</classname> is accepted as a synonym\r
+          for <classname>int</classname> when creating xmlrpcval objects. The\r
+          xml parsing code will always convert <classname>i4</classname> to\r
+          <classname>int</classname>: <classname>int</classname> is regarded\r
+          by this implementation as the canonical name for this type.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>base64</title>\r
+\r
+          <para>Base 64 encoding is performed transparently to the caller when\r
+          using this type. Decoding is also transparent. Therefore you ought\r
+          to consider it as a "binary" data type, for use when you want to\r
+          pass data that is not 7-bit clean.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>boolean</title>\r
+\r
+          <para>The php values <literal>true</literal> and\r
+          <literal>1</literal> map to <literal>true</literal>. All other\r
+          values (including the empty string) are converted to\r
+          <literal>false</literal>.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>string</title>\r
+\r
+          <para>Characters &lt;, &gt;, ', ", &amp;, are encoded using their\r
+          entity reference as &amp;lt; &amp;gt; &amp;apos; &amp;quot; and\r
+          &amp;amp; All other characters outside of the ASCII range are\r
+          encoded using their character reference representation (e.g.\r
+          &amp;#200 for é). The XML-RPC spec recommends only encoding\r
+          <literal>&lt; &amp;</literal> but this implementation goes further,\r
+          for reasons explained by <ulink\r
+          url="http://www.w3.org/TR/REC-xml#syntax">the XML 1.0\r
+          recommendation</ulink>. In particular, using character reference\r
+          representation has the advantage of producing XML that is valid\r
+          independently of the charset encoding assumed.</para>\r
+        </sect3>\r
+      </sect2>\r
+\r
+      <sect2 id="xmlrpcval-creation" xreflabel="xmlrpcval constructors">\r
+        <title>Creation</title>\r
+\r
+        <para>The constructor is the normal way to create an\r
+        <classname>xmlrpcval</classname>. The constructor can take these\r
+        forms:</para>\r
+\r
+        <funcsynopsis>\r
+          <funcprototype>\r
+            <funcdef><type>xmlrpcval</type>new\r
+            <function>xmlrpcval</function></funcdef>\r
+\r
+            <void />\r
+          </funcprototype>\r
+\r
+          <funcprototype>\r
+            <funcdef><type>xmlrpcval</type>new\r
+            <function>xmlrpcval</function></funcdef>\r
+\r
+            <paramdef><type>string</type><parameter>$stringVal</parameter></paramdef>\r
+          </funcprototype>\r
+\r
+          <funcprototype>\r
+            <funcdef><type>xmlrpcval</type>new\r
+            <function>xmlrpcval</function></funcdef>\r
+\r
+            <paramdef><type>mixed</type><parameter>$scalarVal</parameter></paramdef>\r
+\r
+            <paramdef><type>string</type><parameter>$scalartyp</parameter></paramdef>\r
+          </funcprototype>\r
+\r
+          <funcprototype>\r
+            <funcdef><type>xmlrpcval</type>new\r
+            <function>xmlrpcval</function></funcdef>\r
+\r
+            <paramdef><type>array</type><parameter>$arrayVal</parameter></paramdef>\r
+\r
+            <paramdef><type>string</type><parameter>$arraytyp</parameter></paramdef>\r
+          </funcprototype>\r
+        </funcsynopsis>\r
+\r
+        <para>The first constructor creates an empty value, which must be\r
+        altered using the methods <function>addScalar</function>,\r
+        <function>addArray</function> or <function>addStruct</function> before\r
+        it can be used.</para>\r
+\r
+        <para>The second constructor creates a simple string value.</para>\r
+\r
+        <para>The third constructor is used to create a scalar value. The\r
+        second parameter must be a name of an XML-RPC type. Valid types are:\r
+        "<literal>int</literal>", "<literal>boolean</literal>",\r
+        "<literal>string</literal>", "<literal>double</literal>",\r
+        "<literal>dateTime.iso8601</literal>",\r
+        "<literal>base64</literal>".</para>\r
+\r
+        <para>Examples:</para>\r
+\r
+        <programlisting language="php">\r
+$myInt = new xmlrpcvalue(1267, "int");\r
+$myString = new xmlrpcvalue("Hello, World!", "string");\r
+$myBool = new xmlrpcvalue(1, "boolean");\r
+$myString2 = new xmlrpcvalue(1.24, "string"); // note: this will serialize a php float value as xmlrpc string\r
+</programlisting>\r
+\r
+        <para>The fourth constructor form can be used to compose complex\r
+        XML-RPC values. The first argument is either a simple array in the\r
+        case of an XML-RPC <classname>array</classname> or an associative\r
+        array in the case of a <classname>struct</classname>. The elements of\r
+        the array <emphasis>must be <classname>xmlrpcval</classname> objects\r
+        themselves</emphasis>.</para>\r
+\r
+        <para>The second parameter must be either "<literal>array</literal>"\r
+        or "<literal>struct</literal>".</para>\r
+\r
+        <para>Examples:</para>\r
+\r
+        <programlisting language="php">\r
+$myArray = new xmlrpcval(\r
+  array(\r
+    new xmlrpcval("Tom"),\r
+    new xmlrpcval("Dick"),\r
+    new xmlrpcval("Harry")\r
+  ),\r
+  "array");\r
+\r
+// recursive struct\r
+$myStruct = new xmlrpcval(\r
+  array(\r
+    "name" =&gt; new xmlrpcval("Tom", "string"),\r
+    "age" =&gt; new xmlrpcval(34, "int"),\r
+    "address" =&gt; new xmlrpcval(\r
+      array(\r
+        "street" =&gt; new xmlrpcval("Fifht Ave", "string"),\r
+        "city" =&gt; new xmlrpcval("NY", "string")\r
+      ), \r
+      "struct")\r
+  ), \r
+  "struct");\r
+</programlisting>\r
+\r
+        <para>See the file <literal>vardemo.php</literal> in this distribution\r
+        for more examples.</para>\r
+      </sect2>\r
+\r
+      <sect2 id="xmlrpcval-methods" xreflabel="xmlrpcval methods">\r
+        <title>Methods</title>\r
+\r
+        <sect3>\r
+          <title>addScalar</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>int</type><function>addScalar</function></funcdef>\r
+\r
+              <paramdef><type>string</type><parameter>$stringVal</parameter></paramdef>\r
+            </funcprototype>\r
+\r
+            <funcprototype>\r
+              <funcdef><type>int</type><function>addScalar</function></funcdef>\r
+\r
+              <paramdef><type>mixed</type><parameter>$scalarVal</parameter></paramdef>\r
+\r
+              <paramdef><type>string</type><parameter>$scalartyp</parameter></paramdef>\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>If <parameter>$val</parameter> is an empty\r
+          <classname>xmlrpcval</classname> this method makes it a scalar\r
+          value, and sets that value.</para>\r
+\r
+          <para>If <parameter>$val</parameter> is already a scalar value, then\r
+          no more scalars can be added and <literal>0</literal> is\r
+          returned.</para>\r
+\r
+          <para>If <parameter>$val</parameter> is an xmlrpcval of type array,\r
+          the php value <parameter>$scalarval</parameter> is added as its last\r
+          element.</para>\r
+\r
+          <para>If all went OK, <literal>1</literal> is returned, otherwise\r
+          <literal>0</literal>.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>addArray</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>int</type><function>addArray</function></funcdef>\r
+\r
+              <paramdef><type>array</type><parameter>$arrayVal</parameter></paramdef>\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>The argument is a simple (numerically indexed) array. The\r
+          elements of the array <emphasis>must be\r
+          <classname>xmlrpcval</classname> objects\r
+          themselves</emphasis>.</para>\r
+\r
+          <para>Turns an empty <classname>xmlrpcval</classname> into an\r
+          <classname>array</classname> with contents as specified by\r
+          <parameter>$arrayVal</parameter>.</para>\r
+\r
+          <para>If <parameter>$val</parameter> is an xmlrpcval of type array,\r
+          the elements of <parameter>$arrayVal</parameter> are appended to the\r
+          existing ones.</para>\r
+\r
+          <para>See the fourth constructor form for more information.</para>\r
+\r
+          <para>If all went OK, <literal>1</literal> is returned, otherwise\r
+          <literal>0</literal>.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>addStruct</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>int</type><function>addStruct</function></funcdef>\r
+\r
+              <paramdef><type>array</type><parameter>$assocArrayVal</parameter></paramdef>\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>The argument is an associative array. The elements of the\r
+          array <emphasis>must be <classname>xmlrpcval</classname> objects\r
+          themselves</emphasis>.</para>\r
+\r
+          <para>Turns an empty <classname>xmlrpcval</classname> into a\r
+          <classname>struct</classname> with contents as specified by\r
+          <parameter>$assocArrayVal</parameter>.</para>\r
+\r
+          <para>If <parameter>$val</parameter> is an xmlrpcval of type struct,\r
+          the elements of <parameter>$arrayVal</parameter> are merged with the\r
+          existing ones.</para>\r
+\r
+          <para>See the fourth constructor form for more information.</para>\r
+\r
+          <para>If all went OK, <literal>1</literal> is returned, otherwise\r
+          <literal>0</literal>.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>kindOf</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>string</type><function>kindOf</function></funcdef>\r
+\r
+              <void />\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>Returns a string containing "struct", "array" or "scalar"\r
+          describing the base type of the value. If it returns "undef" it\r
+          means that the value hasn't been initialised.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>serialize</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>string</type><function>serialize</function></funcdef>\r
+\r
+              <void />\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>Returns a string containing the XML-RPC representation of this\r
+          value.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>scalarVal</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>mixed</type><function>scalarVal</function></funcdef>\r
+\r
+              <void />\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>If <function>$val-&gt;kindOf() == "scalar"</function>, this\r
+          method returns the actual PHP-language value of the scalar (base 64\r
+          decoding is automatically handled here).</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>scalarTyp</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>string</type><function>scalarTyp</function></funcdef>\r
+\r
+              <void />\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>If <function>$val-&gt;kindOf() == "scalar"</function>, this\r
+          method returns a string denoting the type of the scalar. As\r
+          mentioned before, <literal>i4</literal> is always coerced to\r
+          <literal>int</literal>.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>arrayMem</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>xmlrpcval</type><function>arrayMem</function></funcdef>\r
+\r
+              <paramdef><type>int</type><parameter>$n</parameter></paramdef>\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>If <function>$val-&gt;kindOf() == "array"</function>, returns\r
+          the <parameter>$n</parameter>th element in the array represented by\r
+          the value <parameter>$val</parameter>. The value returned is an\r
+          <classname>xmlrpcval</classname> object.</para>\r
+\r
+          <para><programlisting language="php">\r
+// iterating over values of an array object\r
+for ($i = 0; $i &lt; $val-&gt;arraySize(); $i++)\r
+{\r
+  $v = $val-&gt;arrayMem($i);\r
+  echo "Element $i of the array is of type ".$v-&gt;kindOf();\r
+}\r
+</programlisting></para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>arraySize</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>int</type><function>arraySize</function></funcdef>\r
+\r
+              <void />\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>If <parameter>$val</parameter> is an\r
+          <classname>array</classname>, returns the number of elements in that\r
+          array.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>structMem</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>xmlrpcval</type><function>structMem</function></funcdef>\r
+\r
+              <paramdef><type>string</type><parameter>$memberName</parameter></paramdef>\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>If <function>$val-&gt;kindOf() == "struct"</function>, returns\r
+          the element called <parameter>$memberName</parameter> from the\r
+          struct represented by the value <parameter>$val</parameter>. The\r
+          value returned is an <classname>xmlrpcval</classname> object.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>structEach</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>array</type><function>structEach</function></funcdef>\r
+\r
+              <void />\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>Returns the next (key, value) pair from the struct, when\r
+          <parameter>$val</parameter> is a struct.\r
+          <parameter>$value</parameter> is an xmlrpcval itself. See also <xref\r
+          linkend="structreset" />.</para>\r
+\r
+          <para><programlisting language="php">\r
+// iterating over all values of a struct object\r
+$val-&gt;structreset();\r
+while (list($key, $v) = $val-&gt;structEach())\r
+{\r
+  echo "Element $key of the struct is of type ".$v-&gt;kindOf();\r
+}\r
+</programlisting></para>\r
+        </sect3>\r
+\r
+        <sect3 id="structreset" xreflabel="structreset()">\r
+          <title>structReset</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>void</type><function>structReset</function></funcdef>\r
+\r
+              <void />\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>Resets the internal pointer for\r
+          <function>structEach()</function> to the beginning of the struct,\r
+          where <parameter>$val</parameter> is a struct.</para>\r
+        </sect3>\r
+\r
+        <sect3 id="structmemexists" xreflabel="structmemexists()">\r
+          <title>structMemExists</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>bool</type><function>structMemExsists</function></funcdef>\r
+\r
+              <paramdef><type>string</type><parameter>$memberName</parameter></paramdef>\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>Returns <constant>TRUE</constant> or\r
+          <constant>FALSE</constant> depending on whether a member of the\r
+          given name exists in the struct.</para>\r
+        </sect3>\r
+      </sect2>\r
+    </sect1>\r
+\r
+    <sect1 id="xmlrpcmsg" xreflabel="xmlrpcmsg">\r
+      <title>xmlrpcmsg</title>\r
+\r
+      <para>This class provides a representation for a request to an XML-RPC\r
+      server. A client sends an <classname>xmlrpcmsg</classname> to a server,\r
+      and receives back an <classname>xmlrpcresp</classname> (see <xref\r
+      linkend="xmlrpc-client-send" />).</para>\r
+\r
+      <sect2>\r
+        <title>Creation</title>\r
+\r
+        <para>The constructor takes the following forms:</para>\r
+\r
+        <funcsynopsis>\r
+          <funcprototype>\r
+            <funcdef><type>xmlrpcmsg</type>new\r
+            <function>xmlrpcmsg</function></funcdef>\r
+\r
+            <paramdef><type>string</type><parameter>$methodName</parameter></paramdef>\r
+\r
+            <paramdef><type>array</type><parameter>$parameterArray</parameter><initializer>null</initializer></paramdef>\r
+          </funcprototype>\r
+        </funcsynopsis>\r
+\r
+        <para>Where <parameter>methodName</parameter> is a string indicating\r
+        the name of the method you wish to invoke, and\r
+        <parameter>parameterArray</parameter> is a simple php\r
+        <classname>Array</classname> of <classname>xmlrpcval</classname>\r
+        objects. Here's an example message to the <emphasis>US state\r
+        name</emphasis> server:</para>\r
+\r
+        <programlisting language="php">\r
+$msg = new xmlrpcmsg("examples.getStateName", array(new xmlrpcval(23, "int")));\r
+</programlisting>\r
+\r
+        <para>This example requests the name of state number 23. For more\r
+        information on <classname>xmlrpcval</classname> objects, see <xref\r
+        linkend="xmlrpcval" />.</para>\r
+\r
+        <para>Note that the <parameter>parameterArray</parameter> parameter is\r
+        optional and can be omitted for methods that take no input parameters\r
+        or if you plan to add parameters one by one.</para>\r
+      </sect2>\r
+\r
+      <sect2>\r
+        <title>Methods</title>\r
+\r
+        <sect3>\r
+          <title>addParam</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>bool</type><function>addParam</function></funcdef>\r
+\r
+              <paramdef><type>xmlrpcval</type><parameter>$xmlrpcVal</parameter></paramdef>\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>Adds the <classname>xmlrpcval</classname>\r
+          <parameter>xmlrpcVal</parameter> to the parameter list for this\r
+          method call. Returns TRUE or FALSE on error.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>getNumParams</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>int</type><function>getNumParams</function></funcdef>\r
+\r
+              <void />\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>Returns the number of parameters attached to this\r
+          message.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>getParam</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>xmlrpcval</type><function>getParam</function></funcdef>\r
+\r
+              <paramdef><type>int</type><parameter>$n</parameter></paramdef>\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>Gets the <parameter>n</parameter>th parameter in the message\r
+          (with the index zero-based). Use this method in server\r
+          implementations to retrieve the values sent by the client.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>method</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>string</type><function>method</function></funcdef>\r
+\r
+              <void />\r
+            </funcprototype>\r
+\r
+            <funcprototype>\r
+              <funcdef><type>string</type><function>method</function></funcdef>\r
+\r
+              <paramdef><type>string</type><parameter>$methName</parameter></paramdef>\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>Gets or sets the method contained in the XML-RPC\r
+          message.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>parseResponse</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>xmlrpcresp</type><function>parseResponse</function></funcdef>\r
+\r
+              <paramdef><type>string</type><parameter>$xmlString</parameter></paramdef>\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>Given an incoming XML-RPC server response contained in the\r
+          string <parameter>$xmlString</parameter>, this method constructs an\r
+          <classname>xmlrpcresp</classname> response object and returns it,\r
+          setting error codes as appropriate (see <xref\r
+          linkend="xmlrpc-client-send" />).</para>\r
+\r
+          <para>This method processes any HTTP/MIME headers it finds.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>parseResponseFile</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>xmlrpcresp</type><function>parseResponseFile</function></funcdef>\r
+\r
+              <paramdef><type>file handle\r
+              resource</type><parameter>$fileHandle</parameter></paramdef>\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>Given an incoming XML-RPC server response on the open file\r
+          handle <parameter>fileHandle</parameter>, this method reads all the\r
+          data it finds and passes it to\r
+          <function>parseResponse.</function></para>\r
+\r
+          <para>This method is useful to construct responses from pre-prepared\r
+          files (see files <literal>demo1.txt, demo2.txt, demo3.txt</literal>\r
+          in this distribution). It processes any HTTP headers it finds, and\r
+          does not close the file handle.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>serialize</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>string\r
+              </type><function>serialize</function></funcdef>\r
+\r
+              <void />\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>Returns the an XML string representing the XML-RPC\r
+          message.</para>\r
+        </sect3>\r
+      </sect2>\r
+    </sect1>\r
+\r
+    <sect1 id="xmlrpc-client" xreflabel="xmlrpc_client">\r
+      <title>xmlrpc_client</title>\r
+\r
+      <para>This is the basic class used to represent a client of an XML-RPC\r
+      server.</para>\r
+\r
+      <sect2>\r
+        <title>Creation</title>\r
+\r
+        <para>The constructor accepts one of two possible syntaxes:</para>\r
+\r
+        <funcsynopsis>\r
+          <funcprototype>\r
+            <funcdef><type>xmlrpc_client</type>new\r
+            <function>xmlrpc_client</function></funcdef>\r
+\r
+            <paramdef><type>string</type><parameter>$server_url</parameter></paramdef>\r
+          </funcprototype>\r
+\r
+          <funcprototype>\r
+            <funcdef><type>xmlrpc_client</type>new\r
+            <function>xmlrpc_client</function></funcdef>\r
+\r
+            <paramdef><type>string</type><parameter>$server_path</parameter></paramdef>\r
+\r
+            <paramdef><type>string</type><parameter>$server_hostname</parameter></paramdef>\r
+\r
+            <paramdef><type>int</type><parameter>$server_port</parameter><initializer>80</initializer></paramdef>\r
+\r
+            <paramdef><type>string</type><parameter>$transport</parameter><initializer>'http'</initializer></paramdef>\r
+          </funcprototype>\r
+        </funcsynopsis>\r
+\r
+        <para>Here are a couple of usage examples of the first form:</para>\r
+\r
+        <programlisting language="php">\r
+$client = new xmlrpc_client("http://phpxmlrpc.sourceforge.net/server.php");\r
+$another_client = new xmlrpc_client("https://james:bond@secret.service.com:4443/xmlrpcserver?agent=007");\r
+</programlisting>\r
+\r
+        <para>The second syntax does not allow to express a username and\r
+        password to be used for basic HTTP authorization as in the second\r
+        example above, but instead it allows to choose whether xmlrpc calls\r
+        will be made using the HTTP 1.0 or 1.1 protocol.</para>\r
+\r
+        <para>Here's another example client set up to query Userland's XML-RPC\r
+        server at <emphasis>betty.userland.com</emphasis>:</para>\r
+\r
+        <programlisting language="php">\r
+$client = new xmlrpc_client("/RPC2", "betty.userland.com", 80);\r
+</programlisting>\r
+\r
+        <para>The <parameter>server_port</parameter> parameter is optional,\r
+        and if omitted will default to 80 when using HTTP and 443 when using\r
+        HTTPS (see the <xref linkend="xmlrpc-client-send" /> method\r
+        below).</para>\r
+\r
+        <para>The <parameter>transport</parameter> parameter is optional, and\r
+        if omitted will default to 'http'. Allowed values are either\r
+        '<symbol>http'</symbol>, '<symbol>https</symbol>' or\r
+        '<symbol>http11'</symbol>. Its value can be overridden with every call\r
+        to the <methodname>send</methodname> method. See the\r
+        <methodname>send</methodname> method below for more details about the\r
+        meaning of the different values.</para>\r
+      </sect2>\r
+\r
+      <sect2>\r
+        <title>Methods</title>\r
+\r
+        <para>This class supports the following methods.</para>\r
+\r
+        <sect3 id="xmlrpc-client-send" xreflabel="xmlrpc_client-&gt;send">\r
+          <title>send</title>\r
+\r
+          <para>This method takes the forms:</para>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>xmlrpcresp</type><function>send</function></funcdef>\r
+\r
+              <paramdef><type>xmlrpcmsg</type><parameter>$xmlrpc_message</parameter></paramdef>\r
+\r
+              <paramdef><type>int</type><parameter>$timeout</parameter></paramdef>\r
+\r
+              <paramdef><type>string</type><parameter>$transport</parameter></paramdef>\r
+            </funcprototype>\r
+\r
+            <funcprototype>\r
+              <funcdef><type>array</type><function>send</function></funcdef>\r
+\r
+              <paramdef><type>array</type><parameter>$xmlrpc_messages</parameter></paramdef>\r
+\r
+              <paramdef><type>int</type><parameter>$timeout</parameter></paramdef>\r
+\r
+              <paramdef><type>string</type><parameter>$transport</parameter></paramdef>\r
+            </funcprototype>\r
+\r
+            <funcprototype>\r
+              <funcdef><type>xmlrpcresp</type><function>send</function></funcdef>\r
+\r
+              <paramdef><type>string</type><parameter>$xml_payload</parameter></paramdef>\r
+\r
+              <paramdef><type>int</type><parameter>$timeout</parameter></paramdef>\r
+\r
+              <paramdef><type>string</type><parameter>$transport</parameter></paramdef>\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>Where <parameter>xmlrpc_message</parameter> is an instance of\r
+          <classname>xmlrpcmsg</classname> (see <xref linkend="xmlrpcmsg" />),\r
+          and <parameter>response</parameter> is an instance of\r
+          <classname>xmlrpcresp</classname> (see <xref\r
+          linkend="xmlrpcresp" />).</para>\r
+\r
+          <para><parameter>If xmlrpc_messages</parameter> is an array of\r
+          message instances, <code>responses</code> will be an array of\r
+          response instances. The client will try to make use of a single\r
+          <code>system.multicall</code> xml-rpc method call to forward to the\r
+          server all the messages in a single HTTP round trip, unless\r
+          <code>$client-&gt;no_multicall</code> has been previously set to\r
+          <code>TRUE</code> (see the multicall method below), in which case\r
+          many consecutive xmlrpc requests will be sent.</para>\r
+\r
+          <para>The third syntax allows to build by hand (or any other means)\r
+          a complete xmlrpc request message, and send it to the server.\r
+          <parameter>xml_payload</parameter> should be a string containing the\r
+          complete xml representation of the request. It is e.g. useful when,\r
+          for maximal speed of execution, the request is serialized into a\r
+          string using the native php xmlrpc functions (see <ulink\r
+          url="http://www.php.net/xmlrpc">the php manual on\r
+          xmlrpc</ulink>).</para>\r
+\r
+          <para>The <parameter>timeout</parameter> is optional, and will be\r
+          set to <literal>0</literal> (wait for platform-specific predefined\r
+          timeout) if omitted. This timeout value is passed to\r
+          <function>fsockopen()</function>. It is also used for detecting\r
+          server timeouts during communication (i.e. if the server does not\r
+          send anything to the client for <parameter>timeout</parameter>\r
+          seconds, the connection will be closed).</para>\r
+\r
+          <para>The <parameter>transport</parameter> parameter is optional,\r
+          and if omitted will default to the transport set using instance\r
+          creator or 'http' if omitted. The only other valid values are\r
+          'https', which will use an SSL HTTP connection to connect to the\r
+          remote server, and 'http11'. Note that your PHP must have the "curl"\r
+          extension compiled in order to use both these features. Note that\r
+          when using SSL you should normally set your port number to 443,\r
+          unless the SSL server you are contacting runs at any other\r
+          port.</para>\r
+\r
+          <warning>\r
+            <para>PHP 4.0.6 has a bug which prevents SSL working.</para>\r
+          </warning>\r
+\r
+          <para>In addition to low-level errors, the XML-RPC server you were\r
+          querying may return an error in the\r
+          <classname>xmlrpcresp</classname> object. See <xref\r
+          linkend="xmlrpcresp" /> for details of how to handle these\r
+          errors.</para>\r
+        </sect3>\r
+\r
+        <sect3 id="multicall" xreflabel="xmlrpc_client-&gt;multicall">\r
+          <title>multiCall</title>\r
+\r
+          <para>This method takes the form:</para>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>array</type><function>multiCall</function></funcdef>\r
+\r
+              <paramdef><type>array</type><parameter>$messages</parameter></paramdef>\r
+\r
+              <paramdef><type>int</type><parameter>$timeout</parameter></paramdef>\r
+\r
+              <paramdef><type>string</type><parameter>$transport</parameter></paramdef>\r
+\r
+              <paramdef><type>bool</type><parameter>$fallback</parameter></paramdef>\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>This method is used to boxcar many method calls in a single\r
+          xml-rpc request. It will try first to make use of the\r
+          <code>system.multicall</code> xml-rpc method call, and fall back to\r
+          executing many separate requests if the server returns any\r
+          error.</para>\r
+\r
+          <para><parameter>msgs</parameter> is an array of\r
+          <classname>xmlrpcmsg</classname> objects (see <xref\r
+          linkend="xmlrpcmsg" />), and <parameter>response</parameter> is an\r
+          array of <classname>xmlrpcresp</classname> objects (see <xref\r
+          linkend="xmlrpcresp" />).</para>\r
+\r
+          <para>The <parameter>timeout</parameter> and\r
+          <parameter>transport</parameter> parameters are optional, and behave\r
+          as in the <methodname>send</methodname> method above.</para>\r
+\r
+          <para>The <parameter>fallback</parameter> parameter is optional, and\r
+          defaults to <constant>TRUE</constant>. When set to\r
+          <constant>FALSE</constant> it will prevent the client to try using\r
+          many single method calls in case of failure of the first multicall\r
+          request. It should be set only when the server is known to support\r
+          the multicall extension.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>setAcceptedCompression</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>void</type><function>setAcceptedCompression</function></funcdef>\r
+\r
+              <paramdef><type>string</type><parameter>$compressionmethod</parameter></paramdef>\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>This method defines whether the client will accept compressed\r
+          xml payload forming the bodies of the xmlrpc responses received from\r
+          servers. Note that enabling reception of compressed responses merely\r
+          adds some standard http headers to xmlrpc requests. It is up to the\r
+          xmlrpc server to return compressed responses when receiving such\r
+          requests. Allowed values for\r
+          <parameter>compressionmethod</parameter> are: 'gzip', 'deflate',\r
+          'any' or null (with any meaning either gzip or deflate).</para>\r
+\r
+          <para>This requires the "zlib" extension to be enabled in your php\r
+          install. If it is, by default <classname>xmlrpc_client</classname>\r
+          instances will enable reception of compressed content.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>setCaCertificate</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>void</type><function>setCaCertificate</function></funcdef>\r
+\r
+              <paramdef><type>string</type><parameter>$certificate</parameter></paramdef>\r
+\r
+              <paramdef><type>bool</type><parameter>$is_dir</parameter></paramdef>\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>This method sets an optional certificate to be used in\r
+          SSL-enabled communication to validate a remote server with (when the\r
+          <parameter>server_method</parameter> is set to 'https' in the\r
+          client's construction or in the send method and\r
+          <methodname>SetSSLVerifypeer</methodname> has been set to\r
+          <constant>TRUE</constant>).</para>\r
+\r
+          <para>The <parameter>certificate</parameter> parameter must be the\r
+          filename of a PEM formatted certificate, or a directory containing\r
+          multiple certificate files. The <parameter>is_dir</parameter>\r
+          parameter defaults to <constant>FALSE</constant>, set it to\r
+          <constant>TRUE</constant> to specify that\r
+          <parameter>certificate</parameter> indicates a directory instead of\r
+          a single file.</para>\r
+\r
+          <para>This requires the "curl" extension to be compiled into your\r
+          installation of PHP. For more details see the man page for the\r
+          <function>curl_setopt</function> function.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>setCertificate</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>void</type><function>setCertificate</function></funcdef>\r
+\r
+              <paramdef><type>string</type><parameter>$certificate</parameter></paramdef>\r
+\r
+              <paramdef><type>string</type><parameter>$passphrase</parameter></paramdef>\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>This method sets the optional certificate and passphrase used\r
+          in SSL-enabled communication with a remote server (when the\r
+          <parameter>server_method</parameter> is set to 'https' in the\r
+          client's construction or in the send method).</para>\r
+\r
+          <para>The <parameter>certificate</parameter> parameter must be the\r
+          filename of a PEM formatted certificate. The\r
+          <parameter>passphrase</parameter> parameter must contain the\r
+          password required to use the certificate.</para>\r
+\r
+          <para>This requires the "curl" extension to be compiled into your\r
+          installation of PHP. For more details see the man page for the\r
+          <function>curl_setopt</function> function.</para>\r
+\r
+          <para>Note: to retrieve information about the client certificate on\r
+          the server side, you will need to look into the environment\r
+          variables which are set up by the webserver. Different webservers\r
+          will typically set up different variables.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>setCookie</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>void</type><function>setCookie</function></funcdef>\r
+\r
+              <paramdef><type>string</type><parameter>$name</parameter></paramdef>\r
+\r
+              <paramdef><type>string</type><parameter>$value</parameter></paramdef>\r
+\r
+              <paramdef><type>string</type><parameter>$path</parameter></paramdef>\r
+\r
+              <paramdef><type>string</type><parameter>$domain</parameter></paramdef>\r
+\r
+              <paramdef><type>int</type><parameter>$port</parameter></paramdef>\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>This method sets a cookie that will be sent to the xmlrpc\r
+          server along with every further request (useful e.g. for keeping\r
+          session info outside of the xml-rpc payload).</para>\r
+\r
+          <para><parameter>$value</parameter> is optional, and defaults to\r
+          null.</para>\r
+\r
+          <para><parameter>$path, $domain and $port</parameter> are optional,\r
+          and will be omitted from the cookie header if unspecified. Note that\r
+          setting any of these values will turn the cookie into a 'version 1'\r
+          cookie, that might not be fully supported by the server (see RFC2965\r
+          for more details).</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>setCredentials</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>void</type><function>setCredentials</function></funcdef>\r
+\r
+              <paramdef><type>string</type><parameter>$username</parameter></paramdef>\r
+\r
+              <paramdef><type>string</type><parameter>$password</parameter></paramdef>\r
+\r
+              <paramdef><type>int</type><parameter>$authtype</parameter></paramdef>\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>This method sets the username and password for authorizing the\r
+          client to a server. With the default (HTTP) transport, this\r
+          information is used for HTTP Basic authorization. Note that username\r
+          and password can also be set using the class constructor. With HTTP\r
+          1.1 and HTTPS transport, NTLM and Digest authentication protocols\r
+          are also supported. To enable them use the constants\r
+          <constant>CURLAUTH_DIGEST</constant> and\r
+          <constant>CURLAUTH_NTLM</constant> as values for the authtype\r
+          parameter.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>setDebug</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>void</type><function>setDebug</function></funcdef>\r
+\r
+              <paramdef><type>int</type><parameter>$debugLvl</parameter></paramdef>\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para><parameter>debugLvl</parameter> is either <literal>0,\r
+          1</literal> or 2 depending on whether you require the client to\r
+          print debugging information to the browser. The default is not to\r
+          output this information (0).</para>\r
+\r
+          <para>The debugging information at level 1includes the raw data\r
+          returned from the XML-RPC server it was querying (including bot HTTP\r
+          headers and the full XML payload), and the PHP value the client\r
+          attempts to create to represent the value returned by the server. At\r
+          level2, the complete payload of the xmlrpc request is also printed,\r
+          before being sent t the server.</para>\r
+\r
+          <para>This option can be very useful when debugging servers as it\r
+          allows you to see exactly what the client sends and the server\r
+          returns.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>setKey</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>void</type><function>setKey</function></funcdef>\r
+\r
+              <paramdef><type>int</type><parameter>$key</parameter></paramdef>\r
+\r
+              <paramdef><type>int</type><parameter>$keypass</parameter></paramdef>\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>This method sets the optional certificate key and passphrase\r
+          used in SSL-enabled communication with a remote server (when the\r
+          <parameter>transport</parameter> is set to 'https' in the client's\r
+          construction or in the send method).</para>\r
+\r
+          <para>This requires the "curl" extension to be compiled into your\r
+          installation of PHP. For more details see the man page for the\r
+          <function>curl_setopt</function> function.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>setProxy</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>void</type><function>setProxy</function></funcdef>\r
+\r
+              <paramdef><type>string</type><parameter>$proxyhost</parameter></paramdef>\r
+\r
+              <paramdef><type>int</type><parameter>$proxyport</parameter></paramdef>\r
+\r
+              <paramdef><type>string</type><parameter>$proxyusername</parameter></paramdef>\r
+\r
+              <paramdef><type>string</type><parameter>$proxypassword</parameter></paramdef>\r
+\r
+              <paramdef><type>int</type><parameter>$authtype</parameter></paramdef>\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>This method enables calling servers via an HTTP proxy. The\r
+          <parameter>proxyusername</parameter>,<parameter>\r
+          proxypassword</parameter> and <parameter>authtype</parameter>\r
+          parameters are optional. <parameter>Authtype</parameter> defaults to\r
+          <constant>CURLAUTH_BASIC</constant> (Basic authentication protocol);\r
+          the only other valid value is the constant\r
+          <constant>CURLAUTH_NTLM</constant>, and has effect only when the\r
+          client uses the HTTP 1.1 protocol.</para>\r
+\r
+          <para>NB: CURL versions before 7.11.10 cannot use a proxy to\r
+          communicate with https servers.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>setRequestCompression</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>void</type><function>setRequestCompression</function></funcdef>\r
+\r
+              <paramdef><type>string</type><parameter>$compressionmethod</parameter></paramdef>\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>This method defines whether the xml payload forming the\r
+          request body will be sent to the server in compressed format, as per\r
+          the HTTP specification. This is particularly useful for large\r
+          request parameters and over slow network connections. Allowed values\r
+          for <parameter>compressionmethod</parameter> are: 'gzip', 'deflate',\r
+          'any' or null (with any meaning either gzip or deflate). Note that\r
+          there is no automatic fallback mechanism in place for errors due to\r
+          servers not supporting receiving compressed request bodies, so make\r
+          sure that the particular server you are querying does accept\r
+          compressed requests before turning it on.</para>\r
+\r
+          <para>This requires the "zlib" extension to be enabled in your php\r
+          install.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>setSSLVerifyHost</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>void</type><function>setSSLVerifyHost</function></funcdef>\r
+\r
+              <paramdef><type>int</type><parameter>$i</parameter></paramdef>\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>This method defines whether connections made to XML-RPC\r
+          backends via HTTPS should verify the remote host's SSL certificate's\r
+          common name (CN). By default, only the existence of a CN is checked.\r
+          <parameter><parameter>$i</parameter></parameter> should be an\r
+          integer value; 0 to not check the CN at all, 1 to merely check for\r
+          its existence, and 2 to check that the CN on the certificate matches\r
+          the hostname that is being connected to.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>setSSLVerifyPeer</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>void</type><function>setSSLVerifyPeer</function></funcdef>\r
+\r
+              <paramdef><type>bool</type><parameter>$i</parameter></paramdef>\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>This method defines whether connections made to XML-RPC\r
+          backends via HTTPS should verify the remote host's SSL certificate,\r
+          and cause the connection to fail if the cert verification fails.\r
+          <parameter><parameter>$i</parameter></parameter> should be a boolean\r
+          value. Default value: <constant>TRUE</constant>. To specify custom\r
+          SSL certificates to validate the server with, use the\r
+          <methodname>setCaCertificate</methodname> method.</para>\r
+        </sect3>\r
+      </sect2>\r
+\r
+      <sect2>\r
+        <title>Variables</title>\r
+\r
+        <para>NB: direct manipulation of these variables is only recommended\r
+        for advanced users.</para>\r
+\r
+        <sect3>\r
+          <title>no_multicall</title>\r
+\r
+          <para>This member variable determines whether the multicall() method\r
+          will try to take advantage of the system.multicall xmlrpc method to\r
+          dispatch to the server an array of requests in a single http\r
+          roundtrip or simply execute many consecutive http calls. Defaults to\r
+          FALSE, but it will be enabled automatically on the first failure of\r
+          execution of system.multicall.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>request_charset_encoding</title>\r
+\r
+          <para>This is the charset encoding that will be used for serializing\r
+          request sent by the client.</para>\r
+\r
+          <para>If defaults to NULL, which means using US-ASCII and encoding\r
+          all characters outside of the ASCII range using their xml character\r
+          entity representation (this has the benefit that line end characters\r
+          will not be mangled in the transfer, a CR-LF will be preserved as\r
+          well as a singe LF).</para>\r
+\r
+          <para>Valid values are 'US-ASCII', 'UTF-8' and 'ISO-8859-1'</para>\r
+        </sect3>\r
+\r
+        <sect3 id="return-type" xreflabel="return_type">\r
+          <title>return_type</title>\r
+\r
+          <para>This member variable determines whether the value returned\r
+          inside an xmlrpcresp object as results of calls to the send() and\r
+          multicall() methods will be an xmlrpcval object, a plain php value\r
+          or a raw xml string. Allowed values are 'xmlrpcvals' (the default),\r
+          'phpvals' and 'xml'. To allow the user to differentiate between a\r
+          correct and a faulty response, fault responses will be returned as\r
+          xmlrpcresp objects in any case. Note that the 'phpvals' setting will\r
+          yield faster execution times, but some of the information from the\r
+          original response will be lost. It will be e.g. impossible to tell\r
+          whether a particular php string value was sent by the server as an\r
+          xmlrpc string or base64 value.</para>\r
+\r
+          <para>Example usage:</para>\r
+\r
+          <programlisting language="php">\r
+$client = new xmlrpc_client("phpxmlrpc.sourceforge.net/server");\r
+$client-&gt;return_type = 'phpvals';\r
+$message = new xmlrpcmsg("examples.getStateName", array(new xmlrpcval(23, "int")));\r
+$resp = $client-&gt;send($message);\r
+if ($resp-&gt;faultCode()) echo 'KO. Error: '.$resp-&gt;faultString(); else echo 'OK: got '.$resp-&gt;value();\r
+</programlisting>\r
+\r
+          <para>For more details about usage of the 'xml' value, see Appendix\r
+          A.</para>\r
+        </sect3>\r
+      </sect2>\r
+    </sect1>\r
+\r
+    <sect1 id="xmlrpcresp" xreflabel="xmlrpcresp">\r
+      <title>xmlrpcresp</title>\r
+\r
+      <para>This class is used to contain responses to XML-RPC requests. A\r
+      server method handler will construct an\r
+      <classname>xmlrpcresp</classname> and pass it as a return value. This\r
+      same value will be returned by the result of an invocation of the\r
+      <function>send</function> method of the\r
+      <classname>xmlrpc_client</classname> class.</para>\r
+\r
+      <sect2>\r
+        <title>Creation</title>\r
+\r
+        <funcsynopsis>\r
+          <funcprototype>\r
+            <funcdef><type>xmlrpcresp</type>new\r
+            <function>xmlrpcresp</function></funcdef>\r
+\r
+            <paramdef><type>xmlrpcval</type><parameter>$xmlrpcval</parameter></paramdef>\r
+          </funcprototype>\r
+\r
+          <funcprototype>\r
+            <funcdef><type>xmlrpcresp</type>new\r
+            <function>xmlrpcresp</function></funcdef>\r
+\r
+            <paramdef><parameter>0</parameter></paramdef>\r
+\r
+            <paramdef><type>int</type><parameter>$errcode</parameter></paramdef>\r
+\r
+            <paramdef><type>string</type><parameter>$err_string</parameter></paramdef>\r
+          </funcprototype>\r
+        </funcsynopsis>\r
+\r
+        <para>The first syntax is used when execution has happened without\r
+        difficulty: <parameter>$xmlrpcval</parameter> is an\r
+        <classname>xmlrpcval</classname> value with the result of the method\r
+        execution contained in it. Alternatively it can be a string containing\r
+        the xml serialization of the single xml-rpc value result of method\r
+        execution.</para>\r
+\r
+        <para>The second type of constructor is used in case of failure.\r
+        <parameter>errcode</parameter> and <parameter>err_string</parameter>\r
+        are used to provide indication of what has gone wrong. See <xref\r
+        linkend="xmlrpc-server" /> for more information on passing error\r
+        codes.</para>\r
+      </sect2>\r
+\r
+      <sect2>\r
+        <title>Methods</title>\r
+\r
+        <sect3>\r
+          <title>faultCode</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>int</type><function>faultCode</function></funcdef>\r
+\r
+              <void />\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>Returns the integer fault code return from the XML-RPC\r
+          response. A zero value indicates success, any other value indicates\r
+          a failure response.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>faultString</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>string</type><function>faultString</function></funcdef>\r
+\r
+              <void />\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>Returns the human readable explanation of the fault indicated\r
+          by <function>$resp-&gt;faultCode</function>().</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>value</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>xmlrpcval</type><function>value</function></funcdef>\r
+\r
+              <void />\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>Returns an <classname>xmlrpcval</classname> object containing\r
+          the return value sent by the server. If the response's\r
+          <function>faultCode</function> is non-zero then the value returned\r
+          by this method should not be used (it may not even be an\r
+          object).</para>\r
+\r
+          <para>Note: if the xmlrpcresp instance in question has been created\r
+          by an <classname>xmlrpc_client</classname> object whose\r
+          <varname>return_type</varname> was set to 'phpvals', then a plain\r
+          php value will be returned instead of an\r
+          <classname>xmlrpcval</classname> object. If the\r
+          <varname>return_type</varname> was set to 'xml', an xml string will\r
+          be returned (see the return_type member var above for more\r
+          details).</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>serialize</title>\r
+\r
+          <funcsynopsis>\r
+            <funcprototype>\r
+              <funcdef><type>string</type><function>serialize</function></funcdef>\r
+\r
+              <void />\r
+            </funcprototype>\r
+          </funcsynopsis>\r
+\r
+          <para>Returns an XML string representation of the response (xml\r
+          prologue not included).</para>\r
+        </sect3>\r
+      </sect2>\r
+    </sect1>\r
+\r
+    <sect1 id="xmlrpc-server" xreflabel="xmlrpc_server">\r
+      <title>xmlrpc_server</title>\r
+\r
+      <para>The implementation of this class has been kept as simple to use as\r
+      possible. The constructor for the server basically does all the work.\r
+      Here's a minimal example:</para>\r
+\r
+      <programlisting language="php">\r
+  function foo ($xmlrpcmsg) {\r
+    ...\r
+    return new xmlrpcresp($some_xmlrpc_val);\r
+  }\r
+\r
+  class bar {\r
+    function foobar($xmlrpcmsg) {\r
+      ...\r
+      return new xmlrpcresp($some_xmlrpc_val);\r
+    }\r
+  }\r
+\r
+  $s = new xmlrpc_server(\r
+    array(\r
+      "examples.myFunc1" =&gt; array("function" =&gt; "foo"),\r
+      "examples.myFunc2" =&gt; array("function" =&gt; "bar::foobar"),\r
+    ));\r
+</programlisting>\r
+\r
+      <para>This performs everything you need to do with a server. The single\r
+      constructor argument is an associative array from xmlrpc method names to\r
+      php function names. The incoming request is parsed and dispatched to the\r
+      relevant php function, which is responsible for returning a\r
+      <classname>xmlrpcresp</classname> object, that will be serialized back\r
+      to the caller.</para>\r
+\r
+      <sect2>\r
+        <title>Method handler functions</title>\r
+\r
+        <para>Both php functions and class methods can be registered as xmlrpc\r
+        method handlers.</para>\r
+\r
+        <para>The synopsis of a method handler function is:</para>\r
+\r
+        <para><synopsis>xmlrpcresp $resp = function (xmlrpcmsg $msg)</synopsis></para>\r
+\r
+        <para>No text should be echoed 'to screen' by the handler function, or\r
+        it will break the xml response sent back to the client. This applies\r
+        also to error and warning messages that PHP prints to screen unless\r
+        the appropriate parameters have been set in the php.in file. Another\r
+        way to prevent echoing of errors inside the response and facilitate\r
+        debugging is to use the server SetDebug method with debug level 3 (see\r
+        below).</para>\r
+\r
+        <para>Note that if you implement a method with a name prefixed by\r
+        <code>system.</code> the handler function will be invoked by the\r
+        server with two parameters, the first being the server itself and the\r
+        second being the <classname>xmlrpcmsg</classname> object.</para>\r
+\r
+        <para>The same php function can be registered as handler of multiple\r
+        xmlrpc methods.</para>\r
+\r
+        <para>Here is a more detailed example of what the handler function\r
+        <function>foo</function> may do:</para>\r
+\r
+        <programlisting language="php">\r
+  function foo ($xmlrpcmsg) {\r
+    global $xmlrpcerruser; // import user errcode base value\r
+\r
+    $meth = $xmlrpcmsg-&gt;method(); // retrieve method name\r
+    $par = $xmlrpcmsg-&gt;getParam(0); // retrieve value of first parameter - assumes at least one param received\r
+    $val = $par-&gt;scalarval(); // decode value of first parameter - assumes it is a scalar value\r
+\r
+    ...\r
+\r
+    if ($err) {\r
+      // this is an error condition\r
+      return new xmlrpcresp(0, $xmlrpcerruser+1, // user error 1\r
+        "There's a problem, Captain");\r
+    } else {\r
+      // this is a successful value being returned\r
+      return new xmlrpcresp(new xmlrpcval("All's fine!", "string"));\r
+    }\r
+  }\r
+</programlisting>\r
+\r
+        <para>See <filename>server.php</filename> in this distribution for\r
+        more examples of how to do this.</para>\r
+\r
+        <para>Since release 2.0RC3 there is a new, even simpler way of\r
+        registering php functions with the server. See section 5.7\r
+        below</para>\r
+      </sect2>\r
+\r
+      <sect2>\r
+        <title>The dispatch map</title>\r
+\r
+        <para>The first argument to the <function>xmlrpc_server</function>\r
+        constructor is an array, called the <emphasis>dispatch map</emphasis>.\r
+        In this array is the information the server needs to service the\r
+        XML-RPC methods you define.</para>\r
+\r
+        <para>The dispatch map takes the form of an associative array of\r
+        associative arrays: the outer array has one entry for each method, the\r
+        key being the method name. The corresponding value is another\r
+        associative array, which can have the following members:</para>\r
+\r
+        <itemizedlist>\r
+          <listitem>\r
+            <para><function><literal>function</literal></function> - this\r
+            entry is mandatory. It must be either a name of a function in the\r
+            global scope which services the XML-RPC method, or an array\r
+            containing an instance of an object and a static method name (for\r
+            static class methods the 'class::method' syntax is also\r
+            supported).</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para><function><literal>signature</literal></function> - this\r
+            entry is an array containing the possible signatures (see <xref\r
+            linkend="signatures" />) for the method. If this entry is present\r
+            then the server will check that the correct number and type of\r
+            parameters have been sent for this method before dispatching\r
+            it.</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para><function><literal>docstring</literal></function> - this\r
+            entry is a string containing documentation for the method. The\r
+            documentation may contain HTML markup.</para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para><literal>signature_docs</literal> - this entry can be used\r
+            to provide documentation for the single parameters. It must match\r
+            in structure the 'signature' member. By default, only the\r
+            <classname>documenting_xmlrpc_server</classname> class in the\r
+            extras package will take advantage of this, since the\r
+            "system.methodHelp" protocol does not support documenting method\r
+            parameters individually.</para>\r
+          </listitem>\r
+        </itemizedlist>\r
+\r
+        <para>Look at the <filename>server.php</filename> example in the\r
+        distribution to see what a dispatch map looks like.</para>\r
+      </sect2>\r
+\r
+      <sect2 id="signatures" xreflabel="Signatures">\r
+        <title>Method signatures</title>\r
+\r
+        <para>A signature is a description of a method's return type and its\r
+        parameter types. A method may have more than one signature.</para>\r
+\r
+        <para>Within a server's dispatch map, each method has an array of\r
+        possible signatures. Each signature is an array of types. The first\r
+        entry is the return type. For instance, the method <programlisting\r
+        language="php">string examples.getStateName(int)\r
+</programlisting> has the signature <programlisting language="php">array($xmlrpcString, $xmlrpcInt)\r
+</programlisting> and, assuming that it is the only possible signature for the\r
+        method, it might be used like this in server creation: <programlisting\r
+        language="php">\r
+$findstate_sig = array(array($xmlrpcString, $xmlrpcInt));\r
+\r
+$findstate_doc = 'When passed an integer between 1 and 51 returns the\r
+name of a US state, where the integer is the index of that state name\r
+in an alphabetic order.';\r
+\r
+$s = new xmlrpc_server( array(\r
+  "examples.getStateName" =&gt; array(\r
+    "function" =&gt; "findstate",\r
+    "signature" =&gt; $findstate_sig,\r
+    "docstring" =&gt; $findstate_doc\r
+  )));\r
+</programlisting></para>\r
+\r
+        <para>Note that method signatures do not allow to check nested\r
+        parameters, e.g. the number, names and types of the members of a\r
+        struct param cannot be validated.</para>\r
+\r
+        <para>If a method that you want to expose has a definite number of\r
+        parameters, but each of those parameters could reasonably be of\r
+        multiple types, the array of acceptable signatures will easily grow\r
+        into a combinatorial explosion. To avoid such a situation, the lib\r
+        defines the global var <varname>$xmlrpcValue</varname>, which can be\r
+        used in method signatures as a placeholder for 'any xmlrpc\r
+        type':</para>\r
+\r
+        <para><programlisting language="php">\r
+$echoback_sig = array(array($xmlrpcValue, $xmlrpcValue));\r
+\r
+$findstate_doc = 'Echoes back to the client the received value, regardless of its type';\r
+\r
+$s = new xmlrpc_server( array(\r
+  "echoBack" =&gt; array(\r
+    "function" =&gt; "echoback",\r
+    "signature" =&gt; $echoback_sig, // this sig guarantees that the method handler will be called with one and only one parameter\r
+    "docstring" =&gt; $echoback_doc\r
+  )));\r
+</programlisting></para>\r
+\r
+        <para>Methods <methodname>system.listMethods</methodname>,\r
+        <methodname>system.methodHelp</methodname>,\r
+        <methodname>system.methodSignature</methodname> and\r
+        <methodname>system.multicall</methodname> are already defined by the\r
+        server, and should not be reimplemented (see Reserved Methods\r
+        below).</para>\r
+      </sect2>\r
+\r
+      <sect2>\r
+        <title>Delaying the server response</title>\r
+\r
+        <para>You may want to construct the server, but for some reason not\r
+        fulfill the request immediately (security verification, for instance).\r
+        If you omit to pass to the constructor the dispatch map or pass it a\r
+        second argument of <literal>0</literal> this will have the desired\r
+        effect. You can then use the <function>service()</function> method of\r
+        the server class to service the request. For example:</para>\r
+\r
+        <programlisting language="php">\r
+$s = new xmlrpc_server($myDispMap, 0); // second parameter = 0 prevents automatic servicing of request\r
+\r
+// ... some code that does other stuff here\r
+\r
+$s-&gt;service();\r
+</programlisting>\r
+\r
+        <para>Note that the <methodname>service</methodname> method will print\r
+        the complete result payload to screen and send appropriate HTTP\r
+        headers back to the client, but also return the response object. This\r
+        permits further manipulation of the response.</para>\r
+\r
+        <para>To prevent the server from sending HTTP headers back to the\r
+        client, you can pass a second parameter with a value of\r
+        <literal>TRUE</literal> to the <methodname>service</methodname>\r
+        method. In this case, the response payload will be returned instead of\r
+        the response object.</para>\r
+\r
+        <para>Xmlrpc requests retrieved by other means than HTTP POST bodies\r
+        can also be processed. For example:</para>\r
+\r
+        <programlisting language="php">\r
+$s = new xmlrpc_server(); // not passing a dispatch map prevents automatic servicing of request\r
+\r
+// ... some code that does other stuff here, including setting dispatch map into server object\r
+\r
+$resp = $s-&gt;service($xmlrpc_request_body, true); // parse a variable instead of POST body, retrieve response payload\r
+\r
+// ... some code that does other stuff with xml response $resp here\r
+</programlisting>\r
+      </sect2>\r
+\r
+      <sect2>\r
+        <title>Modifying the server behaviour</title>\r
+\r
+        <para>A couple of methods / class variables are available to modify\r
+        the behaviour of the server. The only way to take advantage of their\r
+        existence is by usage of a delayed server response (see above)</para>\r
+\r
+        <sect3>\r
+          <title>setDebug()</title>\r
+\r
+          <para>This function controls weather the server is going to echo\r
+          debugging messages back to the client as comments in response body.\r
+          Valid values: 0,1,2,3, with 1 being the default. At level 0, no\r
+          debug info is returned to the client. At level 2, the complete\r
+          client request is added to the response, as part of the xml\r
+          comments. At level 3, a new PHP error handler is set when executing\r
+          user functions exposed as server methods, and all non-fatal errors\r
+          are trapped and added as comments into the response.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>allow_system_funcs</title>\r
+\r
+          <para>Default_value: TRUE. When set to FALSE, disables support for\r
+          <methodname>System.xxx</methodname> functions in the server. It\r
+          might be useful e.g. if you do not wish the server to respond to\r
+          requests to <methodname>System.ListMethods</methodname>.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>compress_response</title>\r
+\r
+          <para>When set to TRUE, enables the server to take advantage of HTTP\r
+          compression, otherwise disables it. Responses will be transparently\r
+          compressed, but only when an xmlrpc-client declares its support for\r
+          compression in the HTTP headers of the request.</para>\r
+\r
+          <para>Note that the ZLIB php extension must be installed for this to\r
+          work. If it is, <varname>compress_response</varname> will default to\r
+          TRUE.</para>\r
+        </sect3>\r
+\r
+        <sect3>\r
+          <title>response_charset_encoding</title>\r
+\r
+          <para>Charset encoding to be used for response (only affects string\r
+          values).</para>\r
+\r
+          <para>If it can, the server will convert the generated response from\r
+          internal_encoding to the intended one.</para>\r
+\r
+          <para>Valid values are: a supported xml encoding (only UTF-8 and\r
+          ISO-8859-1 at present, unless mbstring is enabled), null (leave\r
+          charset unspecified in response and convert output stream to\r
+          US_ASCII), 'default' (use xmlrpc library default as specified in\r
+          xmlrpc.inc, convert output stream if needed), or 'auto' (use\r
+          client-specified charset encoding or same as request if request\r
+          headers do not specify it (unless request is US-ASCII: then use\r
+          library default anyway).</para>\r
+        </sect3>\r
+      </sect2>\r
+\r
+      <sect2>\r
+        <title>Fault reporting</title>\r
+\r
+        <para>Fault codes for your servers should start at the value indicated\r
+        by the global <literal>$xmlrpcerruser</literal> + 1.</para>\r
+\r
+        <para>Standard errors returned by the server include:</para>\r
+\r
+        <variablelist>\r
+          <varlistentry>\r
+            <term><literal>1</literal> <phrase>Unknown method</phrase></term>\r
+\r
+            <listitem>\r
+              <para>Returned if the server was asked to dispatch a method it\r
+              didn't know about</para>\r
+            </listitem>\r
+          </varlistentry>\r
+\r
+          <varlistentry>\r
+            <term><literal>2</literal> <phrase>Invalid return\r
+            payload</phrase></term>\r
+\r
+            <listitem>\r
+              <para>This error is actually generated by the client, not\r
+              server, code, but signifies that a server returned something it\r
+              couldn't understand. A more detailed error report is sometimes\r
+              added onto the end of the phrase above.</para>\r
+            </listitem>\r
+          </varlistentry>\r
+\r
+          <varlistentry>\r
+            <term><literal>3</literal> <phrase>Incorrect\r
+            parameters</phrase></term>\r
+\r
+            <listitem>\r
+              <para>This error is generated when the server has signature(s)\r
+              defined for a method, and the parameters passed by the client do\r
+              not match any of signatures.</para>\r
+            </listitem>\r
+          </varlistentry>\r
+\r
+          <varlistentry>\r
+            <term><literal>4</literal> <phrase>Can't introspect: method\r
+            unknown</phrase></term>\r
+\r
+            <listitem>\r
+              <para>This error is generated by the builtin\r
+              <function>system.*</function> methods when any kind of\r
+              introspection is attempted on a method undefined by the\r
+              server.</para>\r
+            </listitem>\r
+          </varlistentry>\r
+\r
+          <varlistentry>\r
+            <term><literal>5</literal> <phrase>Didn't receive 200 OK from\r
+            remote server</phrase></term>\r
+\r
+            <listitem>\r
+              <para>This error is generated by the client when a remote server\r
+              doesn't return HTTP/1.1 200 OK in response to a request. A more\r
+              detailed error report is added onto the end of the phrase\r
+              above.</para>\r
+            </listitem>\r
+          </varlistentry>\r
+\r
+          <varlistentry>\r
+            <term><literal>6</literal> <phrase>No data received from\r
+            server</phrase></term>\r
+\r
+            <listitem>\r
+              <para>This error is generated by the client when a remote server\r
+              returns HTTP/1.1 200 OK in response to a request, but no\r
+              response body follows the HTTP headers.</para>\r
+            </listitem>\r
+          </varlistentry>\r
+\r
+          <varlistentry>\r
+            <term><literal>7</literal> <phrase>No SSL support compiled\r
+            in</phrase></term>\r
+\r
+            <listitem>\r
+              <para>This error is generated by the client when trying to send\r
+              a request with HTTPS and the CURL extension is not available to\r
+              PHP.</para>\r
+            </listitem>\r
+          </varlistentry>\r
+\r
+          <varlistentry>\r
+            <term><literal>8</literal> <phrase>CURL error</phrase></term>\r
+\r
+            <listitem>\r
+              <para>This error is generated by the client when trying to send\r
+              a request with HTTPS and the HTTPS communication fails.</para>\r
+            </listitem>\r
+          </varlistentry>\r
+\r
+          <varlistentry>\r
+            <term><literal>9-14</literal> <phrase>multicall\r
+            errors</phrase></term>\r
+\r
+            <listitem>\r
+              <para>These errors are generated by the server when something\r
+              fails inside a system.multicall request.</para>\r
+            </listitem>\r
+          </varlistentry>\r
+\r
+          <varlistentry>\r
+            <term><literal>100-</literal> <phrase>XML parse\r
+            errors</phrase></term>\r
+\r
+            <listitem>\r
+              <para>Returns 100 plus the XML parser error code for the fault\r
+              that occurred. The <function>faultString</function> returned\r
+              explains where the parse error was in the incoming XML\r
+              stream.</para>\r
+            </listitem>\r
+          </varlistentry>\r
+        </variablelist>\r
+      </sect2>\r
+\r
+      <sect2>\r
+        <title>'New style' servers</title>\r
+\r
+        <para>In the same spirit of simplification that inspired the\r
+        <varname>xmlrpc_client::return_type</varname> class variable, a new\r
+        class variable has been added to the server class:\r
+        <varname>functions_parameters_type</varname>. When set to 'phpvals',\r
+        the functions registered in the server dispatch map will be called\r
+        with plain php values as parameters, instead of a single xmlrpcmsg\r
+        instance parameter. The return value of those functions is expected to\r
+        be a plain php value, too. An example is worth a thousand\r
+        words:<programlisting language="php">\r
+  function foo($usr_id, $out_lang='en') {\r
+    global $xmlrpcerruser;\r
+\r
+    ...\r
+\r
+    if ($someErrorCondition)\r
+      return new xmlrpcresp(0, $xmlrpcerruser+1, 'DOH!');\r
+    else\r
+      return array(\r
+        'name' =&gt; 'Joe',\r
+        'age' =&gt; 27,\r
+        'picture' =&gt; new xmlrpcval(file_get_contents($picOfTheGuy), 'base64')\r
+      );\r
+  }\r
+\r
+  $s = new xmlrpc_server(\r
+    array(\r
+      "examples.myFunc" =&gt; array(\r
+        "function" =&gt; "bar::foobar",\r
+        "signature" =&gt; array(\r
+          array($xmlrpcString, $xmlrpcInt),\r
+          array($xmlrpcString, $xmlrpcInt, $xmlrpcString)\r
+        )\r
+      )\r
+    ), false);\r
+  $s-&gt;functions_parameters_type = 'phpvals';\r
+  $s-&gt;service();\r
+</programlisting>There are a few things to keep in mind when using this\r
+        simplified syntax:</para>\r
+\r
+        <para>to return an xmlrpc error, the method handler function must\r
+        return an instance of xmlrpcresp. There is no other way for the server\r
+        to know when an error response should be served to the client;</para>\r
+\r
+        <para>to return a base64 value, the method handler function must\r
+        encode it on its own, creating an instance of an xmlrpcval\r
+        object;</para>\r
+\r
+        <para>the method handler function cannot determine the name of the\r
+        xmlrpc method it is serving, unlike standard handler functions that\r
+        can retrieve it from the message object;</para>\r
+\r
+        <para>when receiving nested parameters, the method handler function\r
+        has no way to distinguish a php string that was sent as base64 value\r
+        from one that was sent as a string value;</para>\r
+\r
+        <para>this has a direct consequence on the support of\r
+        system.multicall: a method whose signature contains datetime or base64\r
+        values will not be available to multicall calls;</para>\r
+\r
+        <para>last but not least, the direct parsing of xml to php values is\r
+        much faster than using xmlrpcvals, and allows the library to handle\r
+        much bigger messages without allocating all available server memory or\r
+        smashing PHP recursive call stack.</para>\r
+      </sect2>\r
+    </sect1>\r
+  </chapter>\r
+\r
+  <chapter id="globalvars">\r
+    <title>Global variables</title>\r
+\r
+    <para>Many global variables are defined in the xmlrpc.inc file. Some of\r
+    those are meant to be used as constants (and modifying their value might\r
+    cause unpredictable behaviour), while some others can be modified in your\r
+    php scripts to alter the behaviour of the xml-rpc client and\r
+    server.</para>\r
+\r
+    <sect1>\r
+      <title>"Constant" variables</title>\r
+\r
+      <sect2>\r
+        <title>$xmlrpcerruser</title>\r
+\r
+        <para><fieldsynopsis>\r
+            <varname>$xmlrpcerruser</varname>\r
+\r
+            <initializer>800</initializer>\r
+          </fieldsynopsis>The minimum value for errors reported by user\r
+        implemented XML-RPC servers. Error numbers lower than that are\r
+        reserved for library usage.</para>\r
+      </sect2>\r
+\r
+      <sect2>\r
+        <title>$xmlrpcI4, $xmlrpcInt, $xmlrpcBoolean, $xmlrpcDouble,\r
+        $xmlrpcString, $xmlrpcDateTime, $xmlrpcBase64, $xmlrpcArray,\r
+        $xmlrpcStruct, $xmlrpcValue, $xmlrpcNull</title>\r
+\r
+        <para>For convenience the strings representing the XML-RPC types have\r
+        been encoded as global variables:<programlisting language="php">\r
+$xmlrpcI4="i4";\r
+$xmlrpcInt="int";\r
+$xmlrpcBoolean="boolean";\r
+$xmlrpcDouble="double";\r
+$xmlrpcString="string";\r
+$xmlrpcDateTime="dateTime.iso8601";\r
+$xmlrpcBase64="base64";\r
+$xmlrpcArray="array";\r
+$xmlrpcStruct="struct";\r
+$xmlrpcValue="undefined";\r
+$xmlrpcNull="null";\r
+</programlisting></para>\r
+      </sect2>\r
+\r
+      <sect2>\r
+        <title>$xmlrpcTypes, $xmlrpc_valid_parents, $xmlrpcerr, $xmlrpcstr,\r
+        $xmlrpcerrxml, $xmlrpc_backslash, $_xh, $xml_iso88591_Entities,\r
+        $xmlEntities, $xmlrpcs_capabilities</title>\r
+\r
+        <para>Reserved for internal usage.</para>\r
+      </sect2>\r
+    </sect1>\r
+\r
+    <sect1>\r
+      <title>Variables whose value can be modified</title>\r
+\r
+      <sect2 id="xmlrpc-defencoding" xreflabel="xmlrpc_defencoding">\r
+        <title xreflabel="">xmlrpc_defencoding</title>\r
+\r
+        <fieldsynopsis>\r
+          <varname>$xmlrpc_defencoding</varname>\r
+\r
+          <initializer>"UTF8"</initializer>\r
+        </fieldsynopsis>\r
+\r
+        <para>This variable defines the character set encoding that will be\r
+        used by the xml-rpc client and server to decode the received messages,\r
+        when a specific charset declaration is not found (in the messages sent\r
+        non-ascii chars are always encoded using character references, so that\r
+        the produced xml is valid regardless of the charset encoding\r
+        assumed).</para>\r
+\r
+        <para>Allowed values: <literal>"UTF8"</literal>,\r
+        <literal>"ISO-8859-1"</literal>, <literal>"ASCII".</literal></para>\r
+\r
+        <para>Note that the appropriate RFC actually mandates that XML\r
+        received over HTTP without indication of charset encoding be treated\r
+        as US-ASCII, but many servers and clients 'in the wild' violate the\r
+        standard, and assume the default encoding is UTF-8.</para>\r
+      </sect2>\r
+\r
+      <sect2>\r
+        <title>xmlrpc_internalencoding</title>\r
+\r
+        <para><fieldsynopsis>\r
+            <varname>$xmlrpc_internalencoding</varname>\r
+\r
+            <initializer>"ISO-8859-1"</initializer>\r
+          </fieldsynopsis>This variable defines the character set encoding\r
+        that the library uses to transparently encode into valid XML the\r
+        xml-rpc values created by the user and to re-encode the received\r
+        xml-rpc values when it passes them to the PHP application. It only\r
+        affects xml-rpc values of string type. It is a separate value from\r
+        xmlrpc_defencoding, allowing e.g. to send/receive xml messages encoded\r
+        on-the-wire in US-ASCII and process them as UTF-8. It defaults to the\r
+        character set used internally by PHP (unless you are running an\r
+        MBString-enabled installation), so you should change it only in\r
+        special situations, if e.g. the string values exchanged in the xml-rpc\r
+        messages are directly inserted into / fetched from a database\r
+        configured to return UTF8 encoded strings to PHP. Example\r
+        usage:</para>\r
+\r
+        <para><programlisting language="php">\r
+&lt;?php\r
+\r
+include('xmlrpc.inc');\r
+$xmlrpc_internalencoding = 'UTF-8'; // this has to be set after the inclusion above\r
+$v = new xmlrpcval('κόÏ\83με'); // This xmlrpc value will be correctly serialized as the greek word 'kosme'\r
+</programlisting></para>\r
+      </sect2>\r
+\r
+      <sect2>\r
+        <title>xmlrpcName</title>\r
+\r
+        <para><fieldsynopsis>\r
+            <varname>$xmlrpcName</varname>\r
+\r
+            <initializer>"XML-RPC for PHP"</initializer>\r
+          </fieldsynopsis>The string representation of the name of the XML-RPC\r
+        for PHP library. It is used by the client for building the User-Agent\r
+        HTTP header that is sent with every request to the server. You can\r
+        change its value if you need to customize the User-Agent\r
+        string.</para>\r
+      </sect2>\r
+\r
+      <sect2>\r
+        <title>xmlrpcVersion</title>\r
+\r
+        <para><fieldsynopsis>\r
+            <varname>$xmlrpcVersion</varname>\r
+\r
+            <initializer>"2.2"</initializer>\r
+          </fieldsynopsis>The string representation of the version number of\r
+        the XML-RPC for PHP library in use. It is used by the client for\r
+        building the User-Agent HTTP header that is sent with every request to\r
+        the server. You can change its value if you need to customize the\r
+        User-Agent string.</para>\r
+      </sect2>\r
+\r
+      <sect2>\r
+        <title>xmlrpc_null_extension</title>\r
+\r
+        <para>When set to <constant>TRUE</constant>, the lib will enable\r
+        support for the &lt;NIL/&gt; xmlrpc value, as per the extension to the\r
+        standard proposed here. This means that &lt;NIL/&gt; tags will be\r
+        parsed as valid xmlrpc, and the corresponding xmlrpcvals will return\r
+        "null" for <methodname>scalarTyp()</methodname>.</para>\r
+      </sect2>\r
+    </sect1>\r
+  </chapter>\r
+\r
+  <chapter id="helpers">\r
+    <title>Helper functions</title>\r
+\r
+    <para>XML-RPC for PHP contains some helper functions which you can use to\r
+    make processing of XML-RPC requests easier.</para>\r
+\r
+    <sect1>\r
+      <title>Date functions</title>\r
+\r
+      <para>The XML-RPC specification has this to say on dates:</para>\r
+\r
+      <blockquote>\r
+        <para id="wrap_xmlrpc_method">Don't assume a timezone. It should be\r
+        specified by the server in its documentation what assumptions it makes\r
+        about timezones.</para>\r
+      </blockquote>\r
+\r
+      <para>Unfortunately, this means that date processing isn't\r
+      straightforward. Although XML-RPC uses ISO 8601 format dates, it doesn't\r
+      use the timezone specifier.</para>\r
+\r
+      <para>We strongly recommend that in every case where you pass dates in\r
+      XML-RPC calls, you use UTC (GMT) as your timezone. Most computer\r
+      languages include routines for handling GMT times natively, and you\r
+      won't have to translate between timezones.</para>\r
+\r
+      <para>For more information about dates, see <ulink\r
+      url="http://www.uic.edu/year2000/datefmt.html">ISO 8601: The Right\r
+      Format for Dates</ulink>, which has a handy link to a PDF of the ISO\r
+      8601 specification. Note that XML-RPC uses exactly one of the available\r
+      representations: CCYYMMDDTHH:MM:SS.</para>\r
+\r
+      <sect2 id="iso8601encode" xreflabel="iso8601_encode()">\r
+        <title>iso8601_encode</title>\r
+\r
+        <funcsynopsis>\r
+          <funcprototype>\r
+            <funcdef><type>string</type><function>iso8601_encode</function></funcdef>\r
+\r
+            <paramdef><type>string</type><parameter>$time_t</parameter></paramdef>\r
+\r
+            <paramdef\r
+            choice="opt"><type>int</type><parameter>$utc</parameter><initializer>0</initializer></paramdef>\r
+          </funcprototype>\r
+        </funcsynopsis>\r
+\r
+        <para>Returns an ISO 8601 formatted date generated from the UNIX\r
+        timestamp <parameter>$time_t</parameter>, as returned by the PHP\r
+        function <function>time()</function>.</para>\r
+\r
+        <para>The argument <parameter>$utc</parameter> can be omitted, in\r
+        which case it defaults to <literal>0</literal>. If it is set to\r
+        <literal>1</literal>, then the function corrects the time passed in\r
+        for UTC. Example: if you're in the GMT-6:00 timezone and set\r
+        <parameter>$utc</parameter>, you will receive a date representation\r
+        six hours ahead of your local time.</para>\r
+\r
+        <para>The included demo program <filename>vardemo.php</filename>\r
+        includes a demonstration of this function.</para>\r
+      </sect2>\r
+\r
+      <sect2 id="iso8601decode" xreflabel="iso8601_decode()">\r
+        <title>iso8601_decode</title>\r
+\r
+        <funcsynopsis>\r
+          <funcprototype>\r
+            <funcdef><type>int</type><function>iso8601_decode</function></funcdef>\r
+\r
+            <paramdef><type>string</type><parameter>$isoString</parameter></paramdef>\r
+\r
+            <paramdef><type>int</type><parameter>$utc</parameter><initializer>0</initializer></paramdef>\r
+          </funcprototype>\r
+        </funcsynopsis>\r
+\r
+        <para>Returns a UNIX timestamp from an ISO 8601 encoded time and date\r
+        string passed in. If <parameter>$utc</parameter> is\r
+        <literal>1</literal> then <parameter>$isoString</parameter> is assumed\r
+        to be in the UTC timezone, and thus the result is also UTC: otherwise,\r
+        the timezone is assumed to be your local timezone and you receive a\r
+        local timestamp.</para>\r
+      </sect2>\r
+    </sect1>\r
+\r
+    <sect1 id="arrayuse">\r
+      <title>Easy use with nested PHP values</title>\r
+\r
+      <para>Dan Libby was kind enough to contribute two helper functions that\r
+      make it easier to translate to and from PHP values. This makes it easier\r
+      to deal with complex structures. At the moment support is limited to\r
+      <type>int</type>, <type>double</type>, <type>string</type>,\r
+      <type>array</type>, <type>datetime</type> and <type>struct</type>\r
+      datatypes; note also that all PHP arrays are encoded as structs, except\r
+      arrays whose keys are integer numbers starting with 0 and incremented by\r
+      1.</para>\r
+\r
+      <para>These functions reside in <filename>xmlrpc.inc</filename>.</para>\r
+\r
+      <sect2 id="phpxmlrpcdecode">\r
+        <title>php_xmlrpc_decode</title>\r
+\r
+        <funcsynopsis>\r
+          <funcprototype>\r
+            <funcdef><type>mixed</type><function>php_xmlrpc_decode</function></funcdef>\r
+\r
+            <paramdef><type>xmlrpcval</type><parameter>$xmlrpc_val</parameter></paramdef>\r
+\r
+            <paramdef><type>array</type><parameter>$options</parameter></paramdef>\r
+          </funcprototype>\r
+\r
+          <funcprototype>\r
+            <funcdef><type>array</type><function>php_xmlrpc_decode</function></funcdef>\r
+\r
+            <paramdef><type>xmlrpcmsg</type><parameter>$xmlrpcmsg_val</parameter></paramdef>\r
+\r
+            <paramdef><type>string</type><parameter>$options</parameter></paramdef>\r
+          </funcprototype>\r
+        </funcsynopsis>\r
+\r
+        <para>Returns a native PHP value corresponding to the values found in\r
+        the <type>xmlrpcval</type> <parameter>$xmlrpc_val</parameter>,\r
+        translated into PHP types. Base-64 and datetime values are\r
+        automatically decoded to strings.</para>\r
+\r
+        <para>In the second form, returns an array containing the parameters\r
+        of the given\r
+        <parameter><classname>xmlrpcmsg</classname>_val</parameter>, decoded\r
+        to php types.</para>\r
+\r
+        <para>The <parameter>options</parameter> parameter is optional. If\r
+        specified, it must consist of an array of options to be enabled in the\r
+        decoding process. At the moment the only valid option is\r
+        <symbol>decode_php_objs</symbol>. When it is set, php objects that\r
+        have been converted to xml-rpc structs using the\r
+        <function>php_xmlrpc_encode</function> function and a corresponding\r
+        encoding option will be converted back into object values instead of\r
+        arrays (provided that the class definition is available at\r
+        reconstruction time).</para>\r
+\r
+        <para><emphasis><emphasis>WARNING</emphasis>:</emphasis> please take\r
+        extreme care before enabling the <symbol>decode_php_objs</symbol>\r
+        option: when php objects are rebuilt from the received xml, their\r
+        constructor function will be silently invoked. This means that you are\r
+        allowing the remote end to trigger execution of uncontrolled PHP code\r
+        on your server, opening the door to code injection exploits. Only\r
+        enable this option when you have complete trust of the remote\r
+        server/client.</para>\r
+\r
+        <para>Example:<programlisting language="php">\r
+// wrapper to expose an existing php function as xmlrpc method handler\r
+function foo_wrapper($m)\r
+{\r
+  $params = php_xmlrpc_decode($m);\r
+  $retval = call_user_func_array('foo', $params);\r
+  return new xmlrpcresp(new xmlrpcval($retval)); // foo return value will be serialized as string\r
+}\r
+\r
+$s = new xmlrpc_server(array(\r
+   "examples.myFunc1" =&gt; array(\r
+     "function" =&gt; "foo_wrapper",\r
+     "signatures" =&gt; ...\r
+  )));\r
+</programlisting></para>\r
+      </sect2>\r
+\r
+      <sect2 id="phpxmlrpcencode">\r
+        <title>php_xmlrpc_encode</title>\r
+\r
+        <funcsynopsis>\r
+          <funcprototype>\r
+            <funcdef><type>xmlrpcval</type><function>php_xmlrpc_encode</function></funcdef>\r
+\r
+            <paramdef><type>mixed</type><parameter>$phpval</parameter></paramdef>\r
+\r
+            <paramdef><type>array</type><parameter>$options</parameter></paramdef>\r
+          </funcprototype>\r
+        </funcsynopsis>\r
+\r
+        <para>Returns an <type>xmlrpcval</type> object populated with the PHP\r
+        values in <parameter>$phpval</parameter>. Works recursively on arrays\r
+        and objects, encoding numerically indexed php arrays into array-type\r
+        xmlrpcval objects and non numerically indexed php arrays into\r
+        struct-type xmlrpcval objects. Php objects are encoded into\r
+        struct-type xmlrpcvals, excepted for php values that are already\r
+        instances of the xmlrpcval class or descendants thereof, which will\r
+        not be further encoded. Note that there's no support for encoding php\r
+        values into base-64 values. Encoding of date-times is optionally\r
+        carried on on php strings with the correct format.</para>\r
+\r
+        <para>The <parameter>options</parameter> parameter is optional. If\r
+        specified, it must consist of an array of options to be enabled in the\r
+        encoding process. At the moment the only valid options are\r
+        <symbol>encode_php_objs</symbol> and\r
+        <symbol>auto_dates</symbol>.</para>\r
+\r
+        <para>The first will enable the creation of 'particular' xmlrpcval\r
+        objects out of php objects, that add a "php_class" xml attribute to\r
+        their serialized representation. This attribute allows the function\r
+        php_xmlrpc_decode to rebuild the native php objects (provided that the\r
+        same class definition exists on both sides of the\r
+        communication)</para>\r
+\r
+        <para>Example:<programlisting language="php">\r
+// the easy way to build a complex xml-rpc struct, showing nested base64 value and datetime values\r
+$val = php_xmlrpc_encode(array(\r
+  'first struct_element: an int' =&gt; 666,\r
+  'second: an array' =&gt; array ('apple', 'orange', 'banana'),\r
+  'third: a base64 element' =&gt; new xmlrpcval('hello world', 'base64'),\r
+  'fourth: a datetime' =&gt; '20060107T01:53:00'\r
+  ), array('auto_dates'));\r
+</programlisting></para>\r
+      </sect2>\r
+\r
+      <sect2>\r
+        <title>php_xmlrpc_decode_xml</title>\r
+\r
+        <funcsynopsis>\r
+          <funcprototype>\r
+            <funcdef><type>xmlrpcval | xmlrpcresp |\r
+            xmlrpcmsg</type><function>php_xmlrpc_decode_xml</function></funcdef>\r
+\r
+            <paramdef><type>string</type><parameter>$xml</parameter></paramdef>\r
+\r
+            <paramdef><type>array</type><parameter>$options</parameter></paramdef>\r
+          </funcprototype>\r
+        </funcsynopsis>\r
+\r
+        <para>Decodes the xml representation of either an xmlrpc request,\r
+        response or single value, returning the corresponding php-xmlrpc\r
+        object, or <literal>FALSE</literal> in case of an error.</para>\r
+\r
+        <para>The <parameter>options</parameter> parameter is optional. If\r
+        specified, it must consist of an array of options to be enabled in the\r
+        decoding process. At the moment, no option is supported.</para>\r
+\r
+        <para>Example:<programlisting language="php">\r
+$text = '&lt;value&gt;&lt;array&gt;&lt;data&gt;&lt;value&gt;Hello world&lt;/value&gt;&lt;/data&gt;&lt;/array&gt;&lt;/value&gt;';\r
+$val = php_xmlrpc_decode_xml($text);\r
+if ($val) echo 'Found a value of type '.$val-&gt;kindOf(); else echo 'Found invalid xml';\r
+</programlisting></para>\r
+      </sect2>\r
+    </sect1>\r
+\r
+    <sect1>\r
+      <title>Automatic conversion of php functions into xmlrpc methods (and\r
+      vice versa)</title>\r
+\r
+      <para>For the extremely lazy coder, helper functions have been added\r
+      that allow to convert a php function into an xmlrpc method, and a\r
+      remotely exposed xmlrpc method into a local php function - or a set of\r
+      methods into a php class. Note that these comes with many caveat.</para>\r
+\r
+      <sect2>\r
+        <title>wrap_xmlrpc_method</title>\r
+\r
+        <funcsynopsis>\r
+          <funcprototype>\r
+            <funcdef><type>string</type><function>wrap_xmlrpc_method</function></funcdef>\r
+\r
+            <paramdef>$client</paramdef>\r
+\r
+            <paramdef>$methodname</paramdef>\r
+\r
+            <paramdef>$extra_options</paramdef>\r
+          </funcprototype>\r
+\r
+          <funcprototype>\r
+            <funcdef><type>string</type><function>wrap_xmlrpc_method</function></funcdef>\r
+\r
+            <paramdef>$client</paramdef>\r
+\r
+            <paramdef>$methodname</paramdef>\r
+\r
+            <paramdef>$signum</paramdef>\r
+\r
+            <paramdef>$timeout</paramdef>\r
+\r
+            <paramdef>$protocol</paramdef>\r
+\r
+            <paramdef>$funcname</paramdef>\r
+          </funcprototype>\r
+        </funcsynopsis>\r
+\r
+        <para>Given an xmlrpc server and a method name, creates a php wrapper\r
+        function that will call the remote method and return results using\r
+        native php types for both params and results. The generated php\r
+        function will return an xmlrpcresp object for failed xmlrpc\r
+        calls.</para>\r
+\r
+        <para>The second syntax is deprecated, and is listed here only for\r
+        backward compatibility.</para>\r
+\r
+        <para>The server must support the\r
+        <methodname>system.methodSignature</methodname> xmlrpc method call for\r
+        this function to work.</para>\r
+\r
+        <para>The <parameter>client</parameter> param must be a valid\r
+        xmlrpc_client object, previously created with the address of the\r
+        target xmlrpc server, and to which the preferred communication options\r
+        have been set.</para>\r
+\r
+        <para>The optional parameters can be passed as array key,value pairs\r
+        in the <parameter>extra_options</parameter> param.</para>\r
+\r
+        <para>The <parameter>signum</parameter> optional param has the purpose\r
+        of indicating which method signature to use, if the given server\r
+        method has multiple signatures (defaults to 0).</para>\r
+\r
+        <para>The <parameter>timeout</parameter> and\r
+        <parameter>protocol</parameter> optional params are the same as in the\r
+        <methodname>xmlrpc_client::send()</methodname> method.</para>\r
+\r
+        <para>If set, the optional <parameter>new_function_name</parameter>\r
+        parameter indicates which name should be used for the generated\r
+        function. In case it is not set the function name will be\r
+        auto-generated.</para>\r
+\r
+        <para>If the <literal>return_source</literal> optional parameter is\r
+        set, the function will return the php source code to build the wrapper\r
+        function, instead of evaluating it (useful to save the code and use it\r
+        later as stand-alone xmlrpc client).</para>\r
+\r
+        <para>If the <literal>encode_php_objs</literal> optional parameter is\r
+        set, instances of php objects later passed as parameters to the newly\r
+        created function will receive a 'special' treatment that allows the\r
+        server to rebuild them as php objects instead of simple arrays. Note\r
+        that this entails using a "slightly augmented" version of the xmlrpc\r
+        protocol (ie. using element attributes), which might not be understood\r
+        by xmlrpc servers implemented using other libraries.</para>\r
+\r
+        <para>If the <literal>decode_php_objs</literal> optional parameter is\r
+        set, instances of php objects that have been appropriately encoded by\r
+        the server using a coordinate option will be deserialized as php\r
+        objects instead of simple arrays (the same class definition should be\r
+        present server side and client side).</para>\r
+\r
+        <para><emphasis>Note that this might pose a security risk</emphasis>,\r
+        since in order to rebuild the object instances their constructor\r
+        method has to be invoked, and this means that the remote server can\r
+        trigger execution of unforeseen php code on the client: not really a\r
+        code injection, but almost. Please enable this option only when you\r
+        trust the remote server.</para>\r
+\r
+        <para>In case of an error during generation of the wrapper function,\r
+        FALSE is returned, otherwise the name (or source code) of the new\r
+        function.</para>\r
+\r
+        <para>Known limitations: server must support\r
+        <methodname>system.methodsignature</methodname> for the wanted xmlrpc\r
+        method; for methods that expose multiple signatures, only one can be\r
+        picked; for remote calls with nested xmlrpc params, the caller of the\r
+        generated php function has to encode on its own the params passed to\r
+        the php function if these are structs or arrays whose (sub)members\r
+        include values of type base64.</para>\r
+\r
+        <para>Note: calling the generated php function 'might' be slow: a new\r
+        xmlrpc client is created on every invocation and an xmlrpc-connection\r
+        opened+closed. An extra 'debug' param is appended to the parameter\r
+        list of the generated php function, useful for debugging\r
+        purposes.</para>\r
+\r
+        <para>Example usage:</para>\r
+\r
+        <programlisting language="php">\r
+$c = new xmlrpc_client('http://phpxmlrpc.sourceforge.net/server.php');\r
+\r
+$function = wrap_xmlrpc_method($client, 'examples.getStateName');\r
+\r
+if (!$function)\r
+  die('Cannot introspect remote method');\r
+else {\r
+  $stateno = 15;\r
+  $statename = $function($a);\r
+  if (is_a($statename, 'xmlrpcresp')) // call failed\r
+  {\r
+    echo 'Call failed: '.$statename-&gt;faultCode().'. Calling again with debug on';\r
+    $function($a, true);\r
+  }\r
+  else\r
+    echo "OK, state nr. $stateno is $statename";\r
+}\r
+</programlisting>\r
+      </sect2>\r
+\r
+      <sect2 id="wrap_php_function">\r
+        <title>wrap_php_function</title>\r
+\r
+        <funcsynopsis>\r
+          <funcprototype>\r
+            <funcdef><type>array</type><function>wrap_php_function</function></funcdef>\r
+\r
+            <paramdef><type>string</type><parameter>$funcname</parameter></paramdef>\r
+\r
+            <paramdef><type>string</type><parameter>$wrapper_function_name</parameter></paramdef>\r
+\r
+            <paramdef><type>array</type><parameter>$extra_options</parameter></paramdef>\r
+          </funcprototype>\r
+        </funcsynopsis>\r
+\r
+        <para>Given a user-defined PHP function, create a PHP 'wrapper'\r
+        function that can be exposed as xmlrpc method from an xmlrpc_server\r
+        object and called from remote clients, and return the appropriate\r
+        definition to be added to a server's dispatch map.</para>\r
+\r
+        <para>The optional <parameter>$wrapper_function_name</parameter>\r
+        specifies the name that will be used for the auto-generated\r
+        function.</para>\r
+\r
+        <para>Since php is a typeless language, to infer types of input and\r
+        output parameters, it relies on parsing the javadoc-style comment\r
+        block associated with the given function. Usage of xmlrpc native types\r
+        (such as datetime.dateTime.iso8601 and base64) in the docblock @param\r
+        tag is also allowed, if you need the php function to receive/send data\r
+        in that particular format (note that base64 encoding/decoding is\r
+        transparently carried out by the lib, while datetime vals are passed\r
+        around as strings).</para>\r
+\r
+        <para>Known limitations: requires PHP 5.0.3 +; only works for\r
+        user-defined functions, not for PHP internal functions (reflection\r
+        does not support retrieving number/type of params for those); the\r
+        wrapped php function will not be able to programmatically return an\r
+        xmlrpc error response.</para>\r
+\r
+        <para>If the <literal>return_source</literal> optional parameter is\r
+        set, the function will return the php source code to build the wrapper\r
+        function, instead of evaluating it (useful to save the code and use it\r
+        later in a stand-alone xmlrpc server). It will be in the stored in the\r
+        <literal>source</literal> member of the returned array.</para>\r
+\r
+        <para>If the <literal>suppress_warnings</literal> optional parameter\r
+        is set, any runtime warning generated while processing the\r
+        user-defined php function will be catched and not be printed in the\r
+        generated xml response.</para>\r
+\r
+        <para>If the <parameter>extra_options</parameter> array contains the\r
+        <literal>encode_php_objs</literal> value, wrapped functions returning\r
+        php objects will generate "special" xmlrpc responses: when the xmlrpc\r
+        decoding of those responses is carried out by this same lib, using the\r
+        appropriate param in php_xmlrpc_decode(), the objects will be\r
+        rebuilt.</para>\r
+\r
+        <para>In short: php objects can be serialized, too (except for their\r
+        resource members), using this function. Other libs might choke on the\r
+        very same xml that will be generated in this case (i.e. it has a\r
+        nonstandard attribute on struct element tags)</para>\r
+\r
+        <para>If the <literal>decode_php_objs</literal> optional parameter is\r
+        set, instances of php objects that have been appropriately encoded by\r
+        the client using a coordinate option will be deserialized and passed\r
+        to the user function as php objects instead of simple arrays (the same\r
+        class definition should be present server side and client\r
+        side).</para>\r
+\r
+        <para><emphasis>Note that this might pose a security risk</emphasis>,\r
+        since in order to rebuild the object instances their constructor\r
+        method has to be invoked, and this means that the remote client can\r
+        trigger execution of unforeseen php code on the server: not really a\r
+        code injection, but almost. Please enable this option only when you\r
+        trust the remote clients.</para>\r
+\r
+        <para>Example usage:</para>\r
+\r
+        <para><programlisting language="php">/**\r
+* State name from state number decoder. NB: do NOT remove this comment block.\r
+* @param integer $stateno the state number\r
+* @return string the name of the state (or error description)\r
+*/\r
+function findstate($stateno)\r
+{\r
+  global $stateNames;\r
+  if (isset($stateNames[$stateno-1]))\r
+  {\r
+    return $stateNames[$stateno-1];\r
+  }\r
+  else\r
+  {\r
+    return "I don't have a state for the index '" . $stateno . "'";\r
+  }\r
+}\r
+\r
+// wrap php function, build xmlrpc server\r
+$methods = array();\r
+$findstate_sig = wrap_php_function('findstate');\r
+if ($findstate_sig)\r
+  $methods['examples.getStateName'] = $findstate_sig;\r
+$srv = new xmlrpc_server($methods);\r
+</programlisting></para>\r
+      </sect2>\r
+    </sect1>\r
+\r
+    <sect1 id="deprecated">\r
+      <title>Functions removed from the library</title>\r
+\r
+      <para>The following two functions have been deprecated in version 1.1 of\r
+      the library, and removed in version 2, in order to avoid conflicts with\r
+      the EPI xml-rpc library, which also defines two functions with the same\r
+      names.</para>\r
+\r
+      <para>To ease the transition to the new naming scheme and avoid breaking\r
+      existing implementations, the following scheme has been adopted:\r
+      <itemizedlist>\r
+          <listitem>\r
+            <para>If EPI-XMLRPC is not active in the current PHP installation,\r
+            the constant <literal>XMLRPC_EPI_ENABLED</literal> will be set to\r
+            <literal>'0'</literal></para>\r
+          </listitem>\r
+\r
+          <listitem>\r
+            <para>If EPI-XMLRPC is active in the current PHP installation, the\r
+            constant <literal>XMLRPC_EPI_ENABLED</literal> will be set to\r
+            <literal>'1'</literal></para>\r
+          </listitem>\r
+        </itemizedlist></para>\r
+\r
+      <para>The following documentation is kept for historical\r
+      reference:</para>\r
+\r
+      <sect2 id="xmlrpcdecode">\r
+        <title>xmlrpc_decode</title>\r
+\r
+        <funcsynopsis>\r
+          <funcprototype>\r
+            <funcdef><type>mixed</type><function>xmlrpc_decode</function></funcdef>\r
+\r
+            <paramdef><type>xmlrpcval</type><parameter>$xmlrpc_val</parameter></paramdef>\r
+          </funcprototype>\r
+        </funcsynopsis>\r
+\r
+        <para>Alias for php_xmlrpc_decode.</para>\r
+      </sect2>\r
+\r
+      <sect2 id="xmlrpcencode">\r
+        <title>xmlrpc_encode</title>\r
+\r
+        <funcsynopsis>\r
+          <funcprototype>\r
+            <funcdef><type>xmlrpcval</type><function>xmlrpc_encode</function></funcdef>\r
+\r
+            <paramdef><type>mixed</type><parameter>$phpval</parameter></paramdef>\r
+          </funcprototype>\r
+        </funcsynopsis>\r
+\r
+        <para>Alias for php_xmlrpc_encode.</para>\r
+      </sect2>\r
+    </sect1>\r
+\r
+    <sect1 id="debugging">\r
+      <title>Debugging aids</title>\r
+\r
+      <sect2>\r
+        <title>xmlrpc_debugmsg</title>\r
+\r
+        <funcsynopsis>\r
+          <funcprototype>\r
+            <funcdef><type>void</type><function>xmlrpc_debugmsg</function></funcdef>\r
+\r
+            <paramdef><type>string</type><parameter>$debugstring</parameter></paramdef>\r
+          </funcprototype>\r
+        </funcsynopsis>\r
+\r
+        <para>Sends the contents of <parameter>$debugstring</parameter> in XML\r
+        comments in the server return payload. If a PHP client has debugging\r
+        turned on, the user will be able to see server debug\r
+        information.</para>\r
+\r
+        <para>Use this function in your methods so you can pass back\r
+        diagnostic information. It is only available from\r
+        <filename>xmlrpcs.inc</filename>.</para>\r
+      </sect2>\r
+    </sect1>\r
+  </chapter>\r
+\r
+  <chapter id="reserved" xreflabel="Reserved methods">\r
+    <title>Reserved methods</title>\r
+\r
+    <para>In order to extend the functionality offered by XML-RPC servers\r
+    without impacting on the protocol, reserved methods are supported in this\r
+    release.</para>\r
+\r
+    <para>All methods starting with <function>system.</function> are\r
+    considered reserved by the server. PHP for XML-RPC itself provides four\r
+    special methods, detailed in this chapter.</para>\r
+\r
+    <para>Note that all server objects will automatically respond to clients\r
+    querying these methods, unless the property\r
+    <property>allow_system_funcs</property> has been set to\r
+    <constant>false</constant> before calling the\r
+    <methodname>service()</methodname> method. This might pose a security risk\r
+    if the server is exposed to public access, e.g. on the internet.</para>\r
+\r
+    <sect1>\r
+      <title>system.getCapabilities</title>\r
+\r
+      <para></para>\r
+    </sect1>\r
+\r
+    <sect1>\r
+      <title>system.listMethods</title>\r
+\r
+      <para>This method may be used to enumerate the methods implemented by\r
+      the XML-RPC server.</para>\r
+\r
+      <para>The <function>system.listMethods</function> method requires no\r
+      parameters. It returns an array of strings, each of which is the name of\r
+      a method implemented by the server.</para>\r
+    </sect1>\r
+\r
+    <sect1 id="sysmethodsig">\r
+      <title>system.methodSignature</title>\r
+\r
+      <para>This method takes one parameter, the name of a method implemented\r
+      by the XML-RPC server.</para>\r
+\r
+      <para>It returns an array of possible signatures for this method. A\r
+      signature is an array of types. The first of these types is the return\r
+      type of the method, the rest are parameters.</para>\r
+\r
+      <para>Multiple signatures (i.e. overloading) are permitted: this is the\r
+      reason that an array of signatures are returned by this method.</para>\r
+\r
+      <para>Signatures themselves are restricted to the top level parameters\r
+      expected by a method. For instance if a method expects one array of\r
+      structs as a parameter, and it returns a string, its signature is simply\r
+      "string, array". If it expects three integers, its signature is "string,\r
+      int, int, int".</para>\r
+\r
+      <para>For parameters that can be of more than one type, the "undefined"\r
+      string is supported.</para>\r
+\r
+      <para>If no signature is defined for the method, a not-array value is\r
+      returned. Therefore this is the way to test for a non-signature, if\r
+      <parameter>$resp</parameter> below is the response object from a method\r
+      call to <function>system.methodSignature</function>:</para>\r
+\r
+      <programlisting language="php">\r
+$v = $resp-&gt;value();\r
+if ($v-&gt;kindOf() != "array") {\r
+  // then the method did not have a signature defined\r
+}\r
+</programlisting>\r
+\r
+      <para>See the <filename>introspect.php</filename> demo included in this\r
+      distribution for an example of using this method.</para>\r
+    </sect1>\r
+\r
+    <sect1 id="sysmethhelp">\r
+      <title>system.methodHelp</title>\r
+\r
+      <para>This method takes one parameter, the name of a method implemented\r
+      by the XML-RPC server.</para>\r
+\r
+      <para>It returns a documentation string describing the use of that\r
+      method. If no such string is available, an empty string is\r
+      returned.</para>\r
+\r
+      <para>The documentation string may contain HTML markup.</para>\r
+    </sect1>\r
+\r
+    <sect1>\r
+      <title>system.multicall</title>\r
+\r
+      <para>This method takes one parameter, an array of 'request' struct\r
+      types. Each request struct must contain a\r
+      <parameter>methodName</parameter> member of type string and a\r
+      <parameter>params</parameter> member of type array, and corresponds to\r
+      the invocation of the corresponding method.</para>\r
+\r
+      <para>It returns a response of type array, with each value of the array\r
+      being either an error struct (containing the faultCode and faultString\r
+      members) or the successful response value of the corresponding single\r
+      method call.</para>\r
+    </sect1>\r
+  </chapter>\r
+\r
+  <chapter id="examples" xreflabel="Examples">\r
+    <title>Examples</title>\r
+\r
+    <para>The best examples are to be found in the sample files included with\r
+    the distribution. Some are included here.</para>\r
+\r
+    <sect1 id="statename">\r
+      <title>XML-RPC client: state name query</title>\r
+\r
+      <para>Code to get the corresponding state name from a number (1-50) from\r
+      the demo server available on SourceForge</para>\r
+\r
+      <programlisting language="php">\r
+  $m = new xmlrpcmsg('examples.getStateName',\r
+    array(new xmlrpcval($HTTP_POST_VARS["stateno"], "int")));\r
+  $c = new xmlrpc_client("/server.php", "phpxmlrpc.sourceforge.net", 80);\r
+  $r = $c-&gt;send($m);\r
+  if (!$r-&gt;faultCode()) {\r
+      $v = $r-&gt;value();\r
+      print "State number " . htmlentities($HTTP_POST_VARS["stateno"]) . " is " .\r
+        htmlentities($v-&gt;scalarval()) . "&lt;BR&gt;";\r
+      print "&lt;HR&gt;I got this value back&lt;BR&gt;&lt;PRE&gt;" .\r
+        htmlentities($r-&gt;serialize()) . "&lt;/PRE&gt;&lt;HR&gt;\n";\r
+  } else {\r
+      print "Fault &lt;BR&gt;";\r
+      print "Code: " . htmlentities($r-&gt;faultCode()) . "&lt;BR&gt;" .\r
+            "Reason: '" . htmlentities($r-&gt;faultString()) . "'&lt;BR&gt;";\r
+  }\r
+</programlisting>\r
+    </sect1>\r
+\r
+    <sect1>\r
+      <title>Executing a multicall call</title>\r
+\r
+      <para>To be documented...</para>\r
+    </sect1>\r
+  </chapter>\r
+\r
+  <chapter id="faq">\r
+    <title>Frequently Asked Questions</title>\r
+\r
+    <sect1>\r
+      <title>How to send custom XML as payload of a method call</title>\r
+\r
+      <para>Unfortunately, at the time the XML-RPC spec was designed, support\r
+      for namespaces in XML was not as ubiquitous as it is now. As a\r
+      consequence, no support was provided in the protocol for embedding XML\r
+      elements from other namespaces into an xmlrpc request.</para>\r
+\r
+      <para>To send an XML "chunk" as payload of a method call or response,\r
+      two options are available: either send the complete XML block as a\r
+      string xmlrpc value, or as a base64 value. Since the '&lt;' character in\r
+      string values is encoded as '&amp;lt;' in the xml payload of the method\r
+      call, the XML string will not break the surrounding xmlrpc, unless\r
+      characters outside of the assumed character set are used. The second\r
+      method has the added benefits of working independently of the charset\r
+      encoding used for the xml to be transmitted, and preserving exactly\r
+      whitespace, whilst incurring in some extra message length and cpu load\r
+      (for carrying out the base64 encoding/decoding).</para>\r
+    </sect1>\r
+\r
+    <sect1>\r
+      <title>Is there any limitation on the size of the requests / responses\r
+      that can be successfully sent?</title>\r
+\r
+      <para>Yes. But I have no hard figure to give; it most likely will depend\r
+      on the version of PHP in usage and its configuration.</para>\r
+\r
+      <para>Keep in mind that this library is not optimized for speed nor for\r
+      memory usage. Better alternatives exist when there are strict\r
+      requirements on throughput or resource usage, such as the php native\r
+      xmlrpc extension (see the PHP manual for more information).</para>\r
+\r
+      <para>Keep in mind also that HTTP is probably not the best choice in\r
+      such a situation, and XML is a deadly enemy. CSV formatted data over\r
+      socket would be much more efficient.</para>\r
+\r
+      <para>If you really need to move a massive amount of data around, and\r
+      you are crazy enough to do it using phpxmlrpc, your best bet is to\r
+      bypass usage of the xmlrpcval objects, at least in the decoding phase,\r
+      and have the server (or client) object return to the calling function\r
+      directly php values (see <varname>xmlrpc_client::return_type</varname>\r
+      and <varname>xmlrpc_server::functions_parameters_type</varname> for more\r
+      details).</para>\r
+    </sect1>\r
+\r
+    <sect1>\r
+      <title>My server (client) returns an error whenever the client (server)\r
+      returns accented characters</title>\r
+\r
+      <para>To be documented...</para>\r
+    </sect1>\r
+\r
+    <sect1>\r
+      <title>My php error log is getting full of "deprecated" errors on\r
+      different lines of xmlrpc.inc and xmlrpcs.inc</title>\r
+\r
+      <para>This happens when the PHP in usage is version 5, and the error\r
+      reporting level is set to include <constant>E_STRICT</constant> errors.\r
+      Since the main development platform of the library remains (for the time\r
+      being) PHP 4, there are no plans to fix this asap. The best workaround\r
+      is to set the error reporting level to <constant>E_ALL ^\r
+      E_STRICT</constant>.</para>\r
+    </sect1>\r
+\r
+    <sect1>\r
+      <title>How to enable long-lasting method calls</title>\r
+\r
+      <para>To be documented...</para>\r
+    </sect1>\r
+\r
+    <sect1>\r
+      <title>My client returns "XML-RPC Fault #2: Invalid return payload:\r
+      enable debugging to examine incoming payload": what should I do?</title>\r
+\r
+      <para>The response you are seeing is a default error response that the\r
+      client object returns to the php application when the server did not\r
+      respond to the call with a valid xmlrpc response.</para>\r
+\r
+      <para>The most likely cause is that you are not using the correct URL\r
+      when creating the client object, or you do not have appropriate access\r
+      rights to the web page you are requesting, or some other common http\r
+      misconfiguration.</para>\r
+\r
+      <para>To find out what the server is really returning to your client,\r
+      you have to enable the debug mode of the client, using\r
+      $client-&gt;setdebug(1);</para>\r
+    </sect1>\r
+\r
+    <sect1>\r
+      <title>How can I save to a file the xml of the xmlrpc responses received\r
+      from servers?</title>\r
+\r
+      <para>If what you need is to save the responses received from the server\r
+      as xml, you have two options:</para>\r
+\r
+      <para>1- use the serialize() method on the response object.</para>\r
+\r
+      <programlisting language="php">\r
+$resp = $client-&gt;send($msg);\r
+if (!$resp-&gt;faultCode())\r
+  $data_to_be_saved = $resp-&gt;serialize();\r
+</programlisting>\r
+\r
+      <para>Note that this will not be 100% accurate, since the xml generated\r
+      by the response object can be different from the xml received,\r
+      especially if there is some character set conversion involved, or such\r
+      (eg. if you receive an empty string tag as &lt;string/&gt;, serialize()\r
+      will output &lt;string&gt;&lt;/string&gt;), or if the server sent back\r
+      as response something invalid (in which case the xml generated client\r
+      side using serialize() will correspond to the error response generated\r
+      internally by the lib).</para>\r
+\r
+      <para>2 - set the client object to return the raw xml received instead\r
+      of the decoded objects:</para>\r
+\r
+      <programlisting language="php">\r
+$client = new xmlrpc_client($url);\r
+$client-&gt;return_type = 'xml';\r
+$resp = $client-&gt;send($msg);\r
+if (!$resp-&gt;faultCode())\r
+  $data_to_be_saved = $resp-&gt;value();\r
+</programlisting>\r
+\r
+      <para>Note that using this method the xml response response will not be\r
+      parsed at all by the library, only the http communication protocol will\r
+      be checked. This means that xmlrpc responses sent by the server that\r
+      would have generated an error response on the client (eg. malformed xml,\r
+      responses that have faultcode set, etc...) now will not be flagged as\r
+      invalid, and you might end up saving not valid xml but random\r
+      junk...</para>\r
+    </sect1>\r
+\r
+    <sect1>\r
+      <title>Can I use the ms windows character set?</title>\r
+\r
+      <para>If the data your application is using comes from a Microsoft\r
+      application, there are some chances that the character set used to\r
+      encode it is CP1252 (the same might apply to data received from an\r
+      external xmlrpc server/client, but it is quite rare to find xmlrpc\r
+      toolkits that encode to CP1252 instead of UTF8). It is a character set\r
+      which is "almost" compatible with ISO 8859-1, but for a few extra\r
+      characters.</para>\r
+\r
+      <para>PHP-XMLRPC only supports the ISO 8859-1 and UTF8 character sets.\r
+      The net result of this situation is that those extra characters will not\r
+      be properly encoded, and will be received at the other end of the\r
+      XML-RPC tranmission as "garbled data". Unfortunately the library cannot\r
+      provide real support for CP1252 because of limitations in the PHP 4 xml\r
+      parser. Luckily, we tried our best to support this character set anyway,\r
+      and, since version 2.2.1, there is some form of support, left commented\r
+      in the code.</para>\r
+\r
+      <para>To properly encode outgoing data that is natively in CP1252, you\r
+      will have to uncomment all relative code in the file\r
+      <filename>xmlrpc.inc</filename> (you can search for the string "1252"),\r
+      then set <code>$GLOBALS['xmlrpc_internalencoding']='CP1252';</code>\r
+      Please note that all incoming data will then be fed to your application\r
+      as UTF-8 to avoid any potentail data loss.</para>\r
+    </sect1>\r
+\r
+    <sect1>\r
+      <title>Does the library support using cookies / http sessions?</title>\r
+\r
+      <para>In short: yes, but a little coding is needed to make it\r
+      happen.</para>\r
+\r
+      <para>The code below uses sessions to e.g. let the client store a value\r
+      on the server and retrieve it later.</para>\r
+\r
+      <para><programlisting>\r
+$resp = $client-&gt;send(new xmlrpcmsg('registervalue', array(new xmlrpcval('foo'), new xmlrpcval('bar'))));\r
+if (!$resp-&gt;faultCode())\r
+{\r
+  $cookies = $resp-&gt;cookies();\r
+  if (array_key_exists('PHPSESSID', $cookies)) // nb: make sure to use the correct session cookie name\r
+  {\r
+    $session_id = $cookies['PHPSESSID']['value'];\r
+\r
+    // do some other stuff here...\r
+\r
+    $client-&gt;setcookie('PHPSESSID', $session_id);\r
+    $val = $client-&gt;send(new xmlrpcmsg('getvalue', array(new xmlrpcval('foo')));\r
+  }\r
+}\r
+</programlisting>Server-side sessions are handled normally like in any other\r
+      php application. Please see the php manual for more information about\r
+      sessions.</para>\r
+\r
+      <para>NB: unlike web browsers, not all xmlrpc clients support usage of\r
+      http cookies. If you have troubles with sessions and control only the\r
+      server side of the communication, please check with the makers of the\r
+      xmlrpc client in use.</para>\r
+    </sect1>\r
+  </chapter>\r
+\r
+  <appendix id="integration">\r
+    <title>Integration with the PHP xmlrpc extension</title>\r
+\r
+    <para>To be documented more...</para>\r
+\r
+    <para>In short: for the fastest execution possible, you can enable the php\r
+    native xmlrpc extension, and use it in conjunction with phpxmlrpc. The\r
+    following code snippet gives an example of such integration</para>\r
+\r
+    <programlisting language="php">\r
+/*** client side ***/\r
+$c = new xmlrpc_client('http://phpxmlrpc.sourceforge.net/server.php');\r
+\r
+// tell the client to return raw xml as response value\r
+$c-&gt;return_type = 'xml';\r
+\r
+// let the native xmlrpc extension take care of encoding request parameters\r
+$r = $c-&gt;send(xmlrpc_encode_request('examples.getStateName', $_POST['stateno']));\r
+\r
+if ($r-&gt;faultCode())\r
+  // HTTP transport error\r
+  echo 'Got error '.$r-&gt;faultCode();\r
+else\r
+{\r
+  // HTTP request OK, but XML returned from server not parsed yet\r
+  $v = xmlrpc_decode($r-&gt;value());\r
+  // check if we got a valid xmlrpc response from server\r
+  if ($v === NULL)\r
+    echo 'Got invalid response';\r
+  else\r
+  // check if server sent a fault response\r
+  if (xmlrpc_is_fault($v))\r
+    echo 'Got xmlrpc fault '.$v['faultCode'];\r
+  else\r
+    echo'Got response: '.htmlentities($v);\r
+}\r
+</programlisting>\r
+  </appendix>\r
+\r
+  <appendix id="substitution">\r
+    <title>Substitution of the PHP xmlrpc extension</title>\r
+\r
+    <para>Yet another interesting situation is when you are using a ready-made\r
+    php application, that provides support for the XMLRPC protocol via the\r
+    native php xmlrpc extension, but the extension is not available on your\r
+    php install (e.g. because of shared hosting constraints).</para>\r
+\r
+    <para>Since version 2.1, the PHP-XMLRPC library provides a compatibility\r
+    layer that aims to be 100% compliant with the xmlrpc extension API. This\r
+    means that any code written to run on the extension should obtain the\r
+    exact same results, albeit using more resources and a longer processing\r
+    time, using the PHP-XMLRPC library and the extension compatibility module.\r
+    The module is part of the EXTRAS package, available as a separate download\r
+    from the sourceforge.net website, since version 0.2</para>\r
+  </appendix>\r
+\r
+  <appendix id="enough">\r
+    <title>'Enough of xmlrpcvals!': new style library usage</title>\r
+\r
+    <para>To be documented...</para>\r
+\r
+    <para>In the meantime, see docs about xmlrpc_client::return_type and\r
+    xmlrpc_server::functions_parameters_types, as well as php_xmlrpc_encode,\r
+    php_xmlrpc_decode and php_xmlrpc_decode_xml</para>\r
+  </appendix>\r
+\r
+  <appendix id="debugger">\r
+    <title>Usage of the debugger</title>\r
+\r
+    <para>A webservice debugger is included in the library to help during\r
+    development and testing.</para>\r
+\r
+    <para>The interface should be self-explicative enough to need little\r
+    documentation.</para>\r
+\r
+    <para><graphic align="center" fileref="debugger.gif"\r
+    format="GIF" /></para>\r
+\r
+    <para>The most useful feature of the debugger is without doubt the "Show\r
+    debug info" option. It allows to have a screen dump of the complete http\r
+    communication between client and server, including the http headers as\r
+    well as the request and response payloads, and is invaluable when\r
+    troubleshooting problems with charset encoding, authentication or http\r
+    compression.</para>\r
+\r
+    <para>The debugger can take advantage of the JSONRPC library extension, to\r
+    allow debugging of JSON-RPC webservices, and of the JS-XMLRPC library\r
+    visual editor to allow easy mouse-driven construction of the payload for\r
+    remote methods. Both components have to be downloaded separately from the\r
+    sourceforge.net web pages and copied to the debugger directory to enable\r
+    the extra functionality:</para>\r
+\r
+    <para><itemizedlist>\r
+        <listitem>\r
+          <para>to enable jsonrpc functionality, download the PHP-XMLRPC\r
+          EXTRAS package, and copy the file <filename>jsonrpc.inc</filename>\r
+          either to the same directory as the debugger or somewhere in your\r
+          php include path</para>\r
+        </listitem>\r
+      </itemizedlist><itemizedlist>\r
+        <listitem>\r
+          <para>to enable the visual value editing dialog, download the\r
+          JS-XMLRPC library, and copy somewhere in the web root files\r
+          <filename>visualeditor.php</filename>,\r
+          <filename>visualeditor.css</filename> and the folders\r
+          <filename>yui</filename> and <filename>img</filename>. Then edit the\r
+          debugger file <filename>controller.php</filename> and set\r
+          appropriately the variable <varname>$editorpath</varname>.</para>\r
+        </listitem>\r
+      </itemizedlist></para>\r
+  </appendix>\r
+</book>\r
+<!-- Keep this comment at the end of the file\r
+Local variables:\r
+mode: sgml\r
+sgml-omittag:nil\r
+sgml-shorttag:t\r
+sgml-minimize-attributes:nil\r
+sgml-always-quote-attributes:t\r
+sgml-indent-step:2\r
+sgml-indent-data:t\r
+sgml-parent-document:nil\r
+sgml-exposed-tags:nil\r
+sgml-local-catalogs:nil\r
+sgml-local-ecat-files:nil\r
+sgml-namecase-general:t\r
+sgml-general-insert-case:lower\r
+End:\r
+-->\r
diff --git a/extras/rsakey.pem b/extras/rsakey.pem
new file mode 100644 (file)
index 0000000..6c51248
--- /dev/null
@@ -0,0 +1,9 @@
+-----BEGIN RSA PRIVATE KEY-----\r
+MIIBOgIBAAJBAM12w6/J20HMj0V9VC24xPFQG9RKSDt8vmviM+tnc1BgCrzPyF1v\r
+3/rWGoWDjkJrE9WFOeqIjJHeEWWT4uKq2ZkCAwEAAQJAZZYJ7Nld+et9DvuHak/H\r
+uBRGnjDYA+mKcObXitWMUzk2ZodL8UoCP1J9kKqV8Zp/l2cBZkLo0aWTN94sWkHy\r
+rQIhAOhxWxRXSZ4kArIQqZnDG9JgtOAeaaFso/zpxIHpN6OrAiEA4klzl+rUc32/\r
+7SDcJYa9j5vehp1jCTnkN+n0rujTM8sCIAGwMRUovSQk5tAcRt8TB7SzdxzZm7LM\r
+czR3DjJTW1AZAiEAlYN+svPgJ+cAdwdtLgZXHZoZb8xx8Vik6CTXHPKNCf0CIBQL\r
+zF4Qp8/C+gjsXtEZJvhxY7i1luHn6iNwNnE932r3\r
+-----END RSA PRIVATE KEY-----\r
diff --git a/extras/test.pl b/extras/test.pl
new file mode 100644 (file)
index 0000000..6b3cec0
--- /dev/null
@@ -0,0 +1,52 @@
+#!/usr/local/bin/perl\r
+\r
+use Frontier::Client;\r
+\r
+my $serverURL='http://phpxmlrpc.sourceforge.net/server.php';\r
+\r
+# try the simplest example\r
+\r
+my $client = Frontier::Client->new( 'url' => $serverURL,\r
+               'debug' => 0, 'encoding' => 'iso-8859-1' );\r
+my $resp = $client->call("examples.getStateName", 32);\r
+\r
+print "Got '${resp}'\n";\r
+\r
+# now send a mail to nobody in particular\r
+\r
+$resp = $client->call("mail.send", ("edd", "Test",  \r
+       "Bonjour. Je m'appelle Gérard. Mañana. ", "freddy", "", "", \r
+       'text/plain; charset="iso-8859-1"'));\r
+\r
+if ($resp->value()) {\r
+       print "Mail sent OK.\n";\r
+} else {\r
+       print "Error sending mail.\n";\r
+}\r
+\r
+# test echoing of characters works fine\r
+\r
+$resp = $client->call("examples.echo", 'Three "blind" mice - ' . \r
+       "See 'how' they run");\r
+print $resp . "\n";\r
+\r
+# test name and age example. this exercises structs and arrays \r
+\r
+$resp = $client->call("examples.sortByAge", \r
+                                                                                       [ { 'name' => 'Dave', 'age' => 35},\r
+                                                                                               { 'name' => 'Edd', 'age' => 45 },\r
+                                                                                               { 'name' => 'Fred', 'age' => 23 },\r
+                                                                                               { 'name' => 'Barney', 'age' => 36 } ] );\r
+\r
+my $e;\r
+foreach $e (@$resp) {\r
+       print $$e{'name'} . ", " . $$e{'age'} . "\n";\r
+}\r
+\r
+# test base64\r
+\r
+$resp = $client->call("examples.decode64", \r
+                                                                                       $client->base64("TWFyeSBoYWQgYSBsaXR0bGUgbGFtYiBTaGUgd" .\r
+                                                                                                                                                       "GllZCBpdCB0byBhIHB5bG9u"));\r
+\r
+print $resp . "\n";\r
diff --git a/extras/test.py b/extras/test.py
new file mode 100644 (file)
index 0000000..adc0aea
--- /dev/null
@@ -0,0 +1,37 @@
+#!/usr/local/bin/python\r
+\r
+from xmlrpclib import *\r
+import sys\r
+\r
+server = Server("http://phpxmlrpc.sourceforge.net/server.php")\r
+\r
+try:\r
+    print "Got '" + server.examples.getStateName(32) + "'"\r
+\r
+    r = server.mail.send("edd", "Test",\r
+                         "Bonjour. Je m'appelle Gérard. Mañana. ", "freddy", "", "", \r
+                         'text/plain; charset="iso-8859-1"')\r
+    if r:\r
+        print "Mail sent OK"\r
+    else:\r
+        print "Error sending mail"\r
+\r
+\r
+    r = server.examples.echo('Three "blind" mice - ' + "See 'how' they run")\r
+    print r\r
+\r
+    # name/age example. this exercises structs and arrays\r
+\r
+    a = [ {'name': 'Dave', 'age': 35}, {'name': 'Edd', 'age': 45 },\r
+          {'name': 'Fred', 'age': 23}, {'name': 'Barney', 'age': 36 }]\r
+    r = server.examples.sortByAge(a)\r
+    print r\r
+\r
+    # test base 64\r
+    b = Binary("Mary had a little lamb She tied it to a pylon")\r
+    b.encode(sys.stdout)\r
+    r = server.examples.decode64(b)\r
+    print r\r
+    \r
+except Error, v:\r
+    print "XML-RPC Error:",v\r
diff --git a/extras/workspace.testPhpServer.fttb b/extras/workspace.testPhpServer.fttb
new file mode 100644 (file)
index 0000000..8d50758
--- /dev/null
@@ -0,0 +1 @@
+\r<!--\r#fatPage\r#version 1\r#docs http://www.scripting.com/fatPages/faq.html\r#adrPageData workspace.testPhpServer\r#objectType application/x-frontier-tabl\r#runnable false\r#pageData AAEDAAAADxcAAABMAAMAALU6OiG1Oj+vAAAAAAAAAAANAAAAAAUAAAGDDQAAAAGQAAAC4w0AAAAC7AAABecNAAAABe4AAAskDQAAAAsrAAALpg0AAAALsARlY2hvAAABegABBAIAAgAAABIAAADsAAAAAgAPBUFyaWFsAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAKAAAAAAAAAAAAAAZUAAC1OjqKtTo+ZAAAAAYAAADoAN0C4AP3TEFORP///////wAAAAAAAAB3aW4AAAAAAAAAAAAAAAB3aXRoIHdvcmtzcGFjZS50ZXN0UGhwU2VydmVyLnNlcnZlcg0JbG9jYWwgKHBhcmFtcyA9IHsib2ggdGhlIGJ1enppbmcgb2YgdGhlIGJlZXMifSkNCXdwLm5ld3RleHRvYmplY3QgKGJldHR5LnJwYy5jbGllbnQgKGRvbWFpbiwgcG9ydCwgImV4YW1wbGVzLmVjaG8iLCBAcGFyYW1zLCBycGNwYXRoOnBhdGgsIGZsU2hvd01lc3NhZ2VzOiBmYWxzZSwgZmxkZWJ1ZzpmYWxzZSksIEBzY3JhdGNocGFkLnBocFRleHQpDYAAAAAAAIAAAAAAAIAAAAAAAAxnZXRTdGF0ZU5hbWUAAAFPAAEEAgACAAAAGAAAALsAAwACAA8FQXJpYWwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAoAAAAAAAAAAAAABlQAALU6Ooq1OjuFAAAAAgAAAaAAogKQAy5MQU5E////////AAAAAAAAAHdpbgAAAAAAAAAAAAAAAHdpdGggd29ya3NwYWNlLnRlc3RQaHBTZXJ2ZXIuc2VydmVyDQlmb3IgaSA9IDEgdG8gNTANCQlsb2NhbCAocGFyYW1zID0ge2l9KQ0JCW1zZyAoYmV0dHkucnBjLmNsaWVudCAoZG9tYWluLCBwb3J0LCAiZXhhbXBsZXMuZ2V0U3RhdGVOYW1lIiwgQHBhcmFtcywgcnBjcGF0aDpwYXRoLCBmbFNob3dNZXNzYWdlczogZmFsc2UpKQ2AAAAAAACAAAAAAACAAAAAAACAAAAAAAAIbWFpbFNlbmQAAAL3AAEEAgACAAAAMAAAAksAAwACAA8FQXJpYWwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAoAAAAAAAAAAAAABlQAALU6Pqm1Oj90AAAAAQAAAK4ADgLDAzZMQU5E////////AAAAAAAAAHdpbgAAAAAAAAAAAAAAAHdpdGggd29ya3NwYWNlLnRlc3RQaHBTZXJ2ZXIuc2VydmVyDQlsb2NhbCAocmVjaXBpZW50ID0gImRhdmVAdXNlcmxhbmQuY29tIikNCWxvY2FsIChzdWJqZWN0ID0gIkhpIERhdmUhIikNCWxvY2FsICh0ZXh0ID0gIlRoaXMgaXMgYSBtZXNzYWdlIHNlbnQgYnkgYSBzY3JpcHQgb24gIiArIHRjcC5kbnMuZ2V0TXlEb21haW5OYW1lICgpICsgIiBzZW50IHRocm91Z2ggYSBQSFAgc2VydmVyIHJ1bm5pbmcgb24gIiArIGRvbWFpbiArICIgYXQgIiArIGNsb2NrLm5vdyAoKSArICIuIikNCWxvY2FsIChzZW5kZXIgPSB1c2VyLnByZWZzLm1haWxhZGRyZXNzKQ0JbG9jYWwgKGNjID0gIiIsIGJjYyA9ICIiLCBtaW1ldHlwZSA9ICJ0ZXh0L3BsYWluIikNCWxvY2FsIChwYXJhbXMgPSB7cmVjaXBpZW50LCBzdWJqZWN0LCB0ZXh0LCBzZW5kZXIsIGNjLCBiY2MsIG1pbWV0eXBlfSkNCXdwLm5ld3RleHRvYmplY3QgKGJldHR5LnJwYy5jbGllbnQgKGRvbWFpbiwgcG9ydCwgIm1haWwuc2VuZCIsIEBwYXJhbXMsIHJwY3BhdGg6cGF0aCwgZmxTaG93TWVzc2FnZXM6IGZhbHNlLCBmbGRlYnVnOmZhbHNlKSwgQHNjcmF0Y2hwYWQucGhwVGV4dCkNgAAAAAAAgAAAAAAAgAAAAAAAgAAAAAAAgAAAAAAAgAAAAAAAgAAAAAAAgAAAAAAABnJlYWRtZQAABTIAAQECRkZGRjAwMDAwMDA2MDAwMTAwMTcBNzdBQQMwMDAwMDAwMDAwNUIwMDAwMDAwMAIxMDAxNwIxMDECODA0OTAwMgIxODAwMDACMIKCAjYwMDA2MAIwAjMCOTMBMjABMIGBAi0xggIwwggCM4ICOTMCMjFGAUZGRkaBgQEwgoICMQIwwgQCQjMBMAMwMDAxMDAwMDAwMzYwMDAwMDAwMQIwAkIzATQwODQCMIGCgYICM4ICOTMCMjFGATlCATABMwE4RTAwATACODMCMwI5MwI5OQIwAzAwMDIwMDAwMDBCODAwMDAwMDAwAEIzLFRoZXNlIHNjcmlwdHMgdGVzdCB0aGUgcHVibGljIGhhbmRsZXJzIGF0Og0NaHR0cDovL3htbHJwYy51c2VmdWxpbmMuY29tL2RlbW8vaW50cm9zcGVjdC5waHANDURvY3VtZW50YXRpb24gaXMgaGVyZToNDWh0dHA6Ly94bWxycGMudXNlZnVsaW5jLmNvbS9waHAuaHRtbA0NNS82LzAwOyA5OjMyOjA1IFBNIGJ5IERXAzAwMDQwMDAwMDAwOTAwMDAwMDAyAjCBAkI1ATADMDAwNTAwMDAwMDA5MDAwMDAwMDICMIECQjUBMAMwMDA2MDAwMDAwMzEwMDAwMDAwMQEwwQMBRAEzATCBgoLBBAFGRkZGgYEBMIICQTAwMDACMMIKAjICMMIHwSCCgsEDggMwMDA3MDAwMDAwMTkwMDAwMDAwMQEwgYHCD4GCAjICMMIHgQIxOAEwgsEDggMwMDA4MDAwMDAwQUEwMDAwMDAwMQA0MCwNTVMgU2FucyBTZXJpZgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADQwLAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABNAEwgYECNEU0AjQwMAIwAjECMgIxggIwwgMCMTAxATADMDAwOTAwMDAwMDE1MDAwMDAwMDICMIICOTkCMTdBAjCCAjk5AjE3QQMwMDBBMDAwMDAwMTUwMDAwMDAwMgIzggI5MwIyMUYCM4ICOTMCMjFGAzAwMEIwMDAwMDAwNTAwMDAwMDAyAjDCBwMwMDBDMDAwMDAwMTAwMDAwMDAwMQJCMwIwwgMBOAI5NoIBMAMwMDBGMDAwMDAwNTIwMDAwMDAwMAI0MAEwwgsBMQIwwgmBgYKBgcIFwQXCA8EEgoLBA8IeADQsAAAAAAA0LHUAAAAANCxSAGUAADQsAgAhAAA0LAE3N0EANCwAAAAAADQsNCzYAAMwMDEzMDAwMDAwN0UwMDAwMDAwMAFEAUEBOQExRgE4AUMBRQExQwExRAExRQExRgE3RgExQgEwADQ0LAEtAAABLgAAAbYAAAG1AAABlQAAAbUAAAGlAAABpQAAAS4AAAEnAAABIgAAAZEAAAGSAAABkwAAAZQAAAGFAAABgwAAAUZGRkaBgQEwAUZGRkaBgQEwA0ZGRkUwMDAwMDAwNjAwMDEwMDE3ATc3QUEDAAG1Oj+vtTo/1QAAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACzAAAAAAAAAAAAAAEsAL8B1QJJAAAAAAAABKoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABnNlcnZlcgAAAHcAAQMCAAAAbwAAAC4AAwAAtTo6TLU6PHkAAAAAAAAAAAwAAAAABwAAAB8MAAAAACQAAAA4AwAAAABQBmRvbWFpbgAAABR4bWxycGMudXNlZnVsaW5jLmNvbQRwYXRoAAAAEC9kZW1vL3NlcnZlci5waHAEcG9ydAlzb3J0QnlBZ2UAAAMTAAEEAgACAAAAcgAAAiUAEgACAA8FQXJpYWwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAoAAAAAAAAAAAAABlQAALU6Ooq1Oj3dAAAABQAAAIgAGQKGAzlMQU5E////////AAAAAAAAAHdpbgAAAAAAAAAAAAAAAHdpdGggd29ya3NwYWNlLnRlc3RQaHBTZXJ2ZXIuc2VydmVyDQlsb2NhbCAobGlzdHRvYmVzb3J0ZWQgPSB7fSwgc29ydGVkbGlzdCkNCWJ1bmRsZSAvL2J1aWxkIHRoZSBsaXN0DQkJb24gYWRkIChuYW1lLCBhZ2UpDQkJCWxvY2FsICh0KQ0JCQluZXcgKHRhYmxldHlwZSwgQHQpDQkJCXQubmFtZSA9IG5hbWUNCQkJdC5hZ2UgPSBhZ2UNCQkJbGlzdHRvYmVzb3J0ZWQgPSBsaXN0dG9iZXNvcnRlZCArIHt0fQ0JCWFkZCAoIkRhdmUiLCAzNSkNCQlhZGQgKCJFZGQiLCA0NSkNCQlhZGQgKCJGcmVkIiwgMjMpDQkJYWRkICgiQmFybmV5IiwgMzcpDQlsb2NhbCAocGFyYW1zID0ge2xpc3R0b2Jlc29ydGVkfSkNCXNvcnRlZGxpc3QgPSBiZXR0eS5ycGMuY2xpZW50IChkb21haW4sIHBvcnQsICJleGFtcGxlcy5zb3J0QnlBZ2UiLCBAcGFyYW1zLCBycGNwYXRoOnBhdGgsIGZsU2hvd01lc3NhZ2VzOiBmYWxzZSwgZmxkZWJ1ZzpmYWxzZSkNCQ0JbG9jYWwgKGl0ZW0pDQlmb3IgaXRlbSBpbiBzb3J0ZWRsaXN0DQkJbXNnIChpdGVtLm5hbWUgKyAiLCAiICsgaXRlbS5hZ2UpDYAAAAAAAIAAAAAAAIAAAAAAAIAAAAAAAIAAAAAAAIAAAAAAAIAAAAAAAIAAAAAAAIAAAAAAAIAAAAAAAIAAAAAAAIAAAAAAAIAAAAAAAIAAAAAAAIAAAAAAAIAAAAAAAIAAAAAAAIAAAAAAAIAAAAAAAAAQAFYNTVMgU2FucyBTZXJpZgAAAAAAAAAAAAAAAAAAAAAAAAAAAAoAAAAAAAAAAwAAALEAzQBIALwA8wG8AucBAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAAEOAAAARwAGAAIADw1NUyBTYW5zIFNlcmlmAAAAAAAAAAAAAAAAAAAAAAAAAAAACgAAAAAAAAAAAAAAAAAAtTo6RLU6P6sAAAAEAAABYAGIAigDCUxBTkT///////8AAAAAAAAAd2luAAAAAAAAAAAAAAAAZWNobw1nZXRTdGF0ZU5hbWUNcmVhZG1lDW1haWxTZW5kDXNlcnZlcg0JZG9tYWluDQlwb3J0DQlwYXRoDXNvcnRCeUFnZQ2AAAAAABgAAHgb/wA4ZRwBAAAAAAAAAAAAAAAAAACAAAAAABgAAHgb/wA4ZRwBAAAAAAAAAAAAAAAAAACAAAAAABgAAHgb/wA4ZRwBAAAAAAAAAAAAAAAAAACAAAAAABgAAHgb/wA4ZRwBAAAAAAAAAAAAAAAAAACAAAAAABgBAHgb/wA4ZRwBAAABAAAAAAAAAAAAAACAAAAAABgAAHgb/wBYSgECAAAAAAAAAAAAAAAAAACAAAAAABgAAHgb/wBYSgECAAAAAAAAAAAAAAAAAACAAAAAABgAAHgb/wBYSgECAAAAAAAAAAAAAAAAAACAAAAAABgAAHgb/wA4ZRwBAAAAAAAAAAAAAAAAAAA=\r-->\r
\ No newline at end of file
diff --git a/lib/compat/array_key_exists.php b/lib/compat/array_key_exists.php
new file mode 100644 (file)
index 0000000..4ee07fd
--- /dev/null
@@ -0,0 +1,55 @@
+<?php
+// +----------------------------------------------------------------------+
+// | PHP Version 4                                                        |
+// +----------------------------------------------------------------------+
+// | Copyright (c) 1997-2004 The PHP Group                                |
+// +----------------------------------------------------------------------+
+// | This source file is subject to version 3.0 of the PHP license,       |
+// | that is bundled with this package in the file LICENSE, and is        |
+// | available at through the world-wide-web at                           |
+// | http://www.php.net/license/3_0.txt.                                  |
+// | If you did not receive a copy of the PHP license and are unable to   |
+// | obtain it through the world-wide-web, please send a note to          |
+// | license@php.net so we can mail you a copy immediately.               |
+// +----------------------------------------------------------------------+
+// | Authors: Aidan Lister <aidan@php.net>                                |
+// +----------------------------------------------------------------------+
+//
+// $Id$
+
+
+/**
+ * Replace array_key_exists()
+ *
+ * @category    PHP
+ * @package     PHP_Compat
+ * @link        http://php.net/function.array_key_exists
+ * @author      Aidan Lister <aidan@php.net>
+ * @version     $Revision: 1.1 $
+ * @since       PHP 4.1.0
+ * @require     PHP 4.0.0 (user_error)
+ */
+if (!function_exists('array_key_exists')) {
+    function array_key_exists($key, $search)
+    {
+        if (!is_scalar($key)) {
+            user_error('array_key_exists() The first argument should be either a string or an integer',
+                E_USER_WARNING);
+            return false;
+        }
+
+        if (is_object($search)) {
+            $search = get_object_vars($search);
+        }
+
+        if (!is_array($search)) {
+            user_error('array_key_exists() The second argument should be either an array or an object',
+                E_USER_WARNING);
+            return false;
+        }
+
+        return in_array($key, array_keys($search));
+    }
+}
+
+?>
\ No newline at end of file
diff --git a/lib/compat/is_a.php b/lib/compat/is_a.php
new file mode 100644 (file)
index 0000000..0d52226
--- /dev/null
@@ -0,0 +1,47 @@
+<?php
+// +----------------------------------------------------------------------+
+// | PHP Version 4                                                        |
+// +----------------------------------------------------------------------+
+// | Copyright (c) 1997-2004 The PHP Group                                |
+// +----------------------------------------------------------------------+
+// | This source file is subject to version 3.0 of the PHP license,       |
+// | that is bundled with this package in the file LICENSE, and is        |
+// | available at through the world-wide-web at                           |
+// | http://www.php.net/license/3_0.txt.                                  |
+// | If you did not receive a copy of the PHP license and are unable to   |
+// | obtain it through the world-wide-web, please send a note to          |
+// | license@php.net so we can mail you a copy immediately.               |
+// +----------------------------------------------------------------------+
+// | Authors: Aidan Lister <aidan@php.net>                                |
+// +----------------------------------------------------------------------+
+//
+// $Id$
+
+
+/**
+ * Replace function is_a()
+ *
+ * @category    PHP
+ * @package     PHP_Compat
+ * @link        http://php.net/function.is_a
+ * @author      Aidan Lister <aidan@php.net>
+ * @version     $Revision: 1.2 $
+ * @since       PHP 4.2.0
+ * @require     PHP 4.0.0 (user_error) (is_subclass_of)
+ */
+if (!function_exists('is_a')) {
+    function is_a($object, $class)
+    {
+        if (!is_object($object)) {
+            return false;
+        }
+
+        if (get_class($object) == strtolower($class)) {
+            return true;
+        } else {
+            return is_subclass_of($object, $class);
+        }
+    }
+}
+
+?>
\ No newline at end of file
diff --git a/lib/compat/is_callable.php b/lib/compat/is_callable.php
new file mode 100644 (file)
index 0000000..fccc19d
--- /dev/null
@@ -0,0 +1,53 @@
+<?php
+/**
+ * Replace function is_callable()
+ *
+ * @category    PHP
+ * @package     PHP_Compat
+ * @link        http://php.net/function.is_callable
+ * @author      Gaetano Giunta <giunta.gaetano@sea-aeroportimilano.it>
+ * @version     $Id$
+ * @since       PHP 4.0.6
+ * @require     PHP 4.0.0 (true, false, etc...)
+ * @todo        add the 3rd parameter syntax...
+ */
+if (!function_exists('is_callable')) {
+    function is_callable($var, $syntax_only=false)
+    {
+        if ($syntax_only)
+        {
+            /* from The Manual:
+            * If the syntax_only argument is TRUE the function only verifies
+            * that var might be a function or method. It will only reject simple
+            * variables that are not strings, or an array that does not have a
+            * valid structure to be used as a callback. The valid ones are
+            * supposed to have only 2 entries, the first of which is an object
+            * or a string, and the second a string
+            */
+            return (is_string($var) || (is_array($var) && count($var) == 2 && is_string(end($var)) && (is_string(reset($var)) || is_object(reset($var)))));
+        }
+        else
+        {
+            if (is_string($var))
+            {
+                return function_exists($var);
+            }
+            else if (is_array($var) && count($var) == 2 && is_string($method = end($var)))
+            {
+                $obj = reset($var);
+                if (is_string($obj))
+                {
+                    $methods = get_class_methods($obj);
+                    return (bool)(is_array($methods) && in_array(strtolower($method), $methods));
+                }
+                else if (is_object($obj))
+                {
+                    return method_exists($obj, $method);
+                }
+            }
+            return false;
+        }
+    }
+}
+
+?>
\ No newline at end of file
diff --git a/lib/compat/is_scalar.php b/lib/compat/is_scalar.php
new file mode 100644 (file)
index 0000000..aa13682
--- /dev/null
@@ -0,0 +1,38 @@
+<?php
+// +----------------------------------------------------------------------+
+// | PHP Version 4                                                        |
+// +----------------------------------------------------------------------+
+// | Copyright (c) 1997-2004 The PHP Group                                |
+// +----------------------------------------------------------------------+
+// | This source file is subject to version 3.0 of the PHP license,       |
+// | that is bundled with this package in the file LICENSE, and is        |
+// | available at through the world-wide-web at                           |
+// | http://www.php.net/license/3_0.txt.                                  |
+// | If you did not receive a copy of the PHP license and are unable to   |
+// | obtain it through the world-wide-web, please send a note to          |
+// | license@php.net so we can mail you a copy immediately.               |
+// +----------------------------------------------------------------------+
+//
+// $Id$
+
+
+/**
+ * Replace is_scalar()
+ *
+ * @category    PHP
+ * @package     PHP_Compat
+ * @link        http://php.net/function.is_scalar
+ * @author      Gaetano Giunta
+ * @version     $Revision: 1.2 $
+ * @since       PHP 4.0.5
+ * @require     PHP 4 (is_bool)
+ */
+if (!function_exists('is_scalar')) {
+    function is_scalar($val)
+    {
+        // Check input
+        return (is_bool($val) || is_int($val) || is_float($val) || is_string($val));
+    }
+}
+
+?>
\ No newline at end of file
diff --git a/lib/compat/var_export.php b/lib/compat/var_export.php
new file mode 100644 (file)
index 0000000..947210f
--- /dev/null
@@ -0,0 +1,105 @@
+<?php
+// +----------------------------------------------------------------------+
+// | PHP Version 4                                                        |
+// +----------------------------------------------------------------------+
+// | Copyright (c) 1997-2004 The PHP Group                                |
+// +----------------------------------------------------------------------+
+// | This source file is subject to version 3.0 of the PHP license,       |
+// | that is bundled with this package in the file LICENSE, and is        |
+// | available at through the world-wide-web at                           |
+// | http://www.php.net/license/3_0.txt.                                  |
+// | If you did not receive a copy of the PHP license and are unable to   |
+// | obtain it through the world-wide-web, please send a note to          |
+// | license@php.net so we can mail you a copy immediately.               |
+// +----------------------------------------------------------------------+
+// | Authors: Aidan Lister <aidan@php.net>                                |
+// +----------------------------------------------------------------------+
+//
+// $Id$
+
+
+/**
+ * Replace var_export()
+ *
+ * @category    PHP
+ * @package     PHP_Compat
+ * @link        http://php.net/function.var_export
+ * @author      Aidan Lister <aidan@php.net>
+ * @version     $Revision: 1.2 $
+ * @since       PHP 4.2.0
+ * @require     PHP 4.0.0 (user_error)
+ */
+if (!function_exists('var_export')) {
+    function var_export($array, $return = false, $lvl=0)
+    {
+        // Common output variables
+        $indent      = '  ';
+        $doublearrow = ' => ';
+        $lineend     = ",\n";
+        $stringdelim = '\'';
+
+        // Check the export isn't a simple string / int
+        if (is_string($array)) {
+            $out = $stringdelim . str_replace('\'', '\\\'', str_replace('\\', '\\\\', $array)) . $stringdelim;
+        } elseif (is_int($array) || is_float($array)) {
+            $out = (string)$array;
+        } elseif (is_bool($array)) {
+            $out = $array ? 'true' : 'false';
+        } elseif (is_null($array)) {
+            $out = 'NULL';
+        } elseif (is_resource($array)) {
+            $out = 'resource';
+        } else {
+            // Begin the array export
+            // Start the string
+            $out = "array (\n";
+
+            // Loop through each value in array
+            foreach ($array as $key => $value) {
+                // If the key is a string, delimit it
+                if (is_string($key)) {
+                    $key = str_replace('\'', '\\\'', str_replace('\\', '\\\\', $key));
+                    $key = $stringdelim . $key . $stringdelim;
+                }
+
+                $val = var_export($value, true, $lvl+1);
+                // Delimit value
+                /*if (is_array($value)) {
+                    // We have an array, so do some recursion
+                    // Do some basic recursion while increasing the indent
+                    $recur_array = explode($newline, var_export($value, true));
+                    $temp_array = array();
+                    foreach ($recur_array as $recur_line) {
+                        $temp_array[] = $indent . $recur_line;
+                    }
+                    $recur_array = implode($newline, $temp_array);
+                    $value = $newline . $recur_array;
+                } elseif (is_null($value)) {
+                    $value = 'NULL';
+                } else {
+                    $value = str_replace($find, $replace, $value);
+                    $value = $stringdelim . $value . $stringdelim;
+                }*/
+
+                // Piece together the line
+                for ($i = 0; $i < $lvl; $i++)
+                    $out .= $indent;
+                $out .= $key . $doublearrow . $val . $lineend;
+            }
+
+            // End our string
+            for ($i = 0; $i < $lvl; $i++)
+                $out .= $indent;
+            $out .= ")";
+        }
+
+        // Decide method of output
+        if ($return === true) {
+            return $out;
+        } else {
+            echo $out;
+            return;
+        }
+    }
+}
+?>
\ No newline at end of file
diff --git a/lib/compat/version_compare.php b/lib/compat/version_compare.php
new file mode 100644 (file)
index 0000000..01fc3cf
--- /dev/null
@@ -0,0 +1,179 @@
+<?php
+// +----------------------------------------------------------------------+
+// | PHP Version 4                                                        |
+// +----------------------------------------------------------------------+
+// | Copyright (c) 1997-2004 The PHP Group                                |
+// +----------------------------------------------------------------------+
+// | This source file is subject to version 3.0 of the PHP license,       |
+// | that is bundled with this package in the file LICENSE, and is        |
+// | available at through the world-wide-web at                           |
+// | http://www.php.net/license/3_0.txt.                                  |
+// | If you did not receive a copy of the PHP license and are unable to   |
+// | obtain it through the world-wide-web, please send a note to          |
+// | license@php.net so we can mail you a copy immediately.               |
+// +----------------------------------------------------------------------+
+// | Authors: Philippe Jausions <Philippe.Jausions@11abacus.com>          |
+// |          Aidan Lister <aidan@php.net>                                |
+// +----------------------------------------------------------------------+
+//
+// $Id$
+
+
+/**
+ * Replace version_compare()
+ *
+ * @category    PHP
+ * @package     PHP_Compat
+ * @link        http://php.net/function.version_compare
+ * @author      Philippe Jausions <Philippe.Jausions@11abacus.com>
+ * @author      Aidan Lister <aidan@php.net>
+ * @version     $Revision: 1.1 $
+ * @since       PHP 4.1.0
+ * @require     PHP 4.0.0 (user_error)
+ */
+if (!function_exists('version_compare')) {
+    function version_compare($version1, $version2, $operator = '<')
+    {
+        // Check input
+        if (!is_scalar($version1)) {
+            user_error('version_compare() expects parameter 1 to be string, ' .
+                gettype($version1) . ' given', E_USER_WARNING);
+            return;
+        }
+
+        if (!is_scalar($version2)) {
+            user_error('version_compare() expects parameter 2 to be string, ' .
+                gettype($version2) . ' given', E_USER_WARNING);
+            return;
+        }
+
+        if (!is_scalar($operator)) {
+            user_error('version_compare() expects parameter 3 to be string, ' .
+                gettype($operator) . ' given', E_USER_WARNING);
+            return;
+        }
+
+        // Standardise versions
+        $v1 = explode('.',
+            str_replace('..', '.',
+                preg_replace('/([^0-9\.]+)/', '.$1.',
+                    str_replace(array('-', '_', '+'), '.',
+                        trim($version1)))));
+
+        $v2 = explode('.',
+            str_replace('..', '.',
+                preg_replace('/([^0-9\.]+)/', '.$1.',
+                    str_replace(array('-', '_', '+'), '.',
+                        trim($version2)))));
+
+        // Replace empty entries at the start of the array
+        while (empty($v1[0]) && array_shift($v1)) {}
+        while (empty($v2[0]) && array_shift($v2)) {}
+
+        // Release state order
+        // '#' stands for any number
+        $versions = array(
+            'dev'   => 0,
+            'alpha' => 1,
+            'a'     => 1,
+            'beta'  => 2,
+            'b'     => 2,
+            'RC'    => 3,
+            '#'     => 4,
+            'p'     => 5,
+            'pl'    => 5);
+
+        // Loop through each segment in the version string
+        $compare = 0;
+        for ($i = 0, $x = min(count($v1), count($v2)); $i < $x; $i++) {
+            if ($v1[$i] == $v2[$i]) {
+                continue;
+            }
+            $i1 = $v1[$i];
+            $i2 = $v2[$i];
+            if (is_numeric($i1) && is_numeric($i2)) {
+                $compare = ($i1 < $i2) ? -1 : 1;
+                break;
+            }
+            // We use the position of '#' in the versions list
+            // for numbers... (so take care of # in original string)
+            if ($i1 == '#') {
+                $i1 = '';
+            } elseif (is_numeric($i1)) {
+                $i1 = '#';
+            }
+            if ($i2 == '#') {
+                $i2 = '';
+            } elseif (is_numeric($i2)) {
+                $i2 = '#';
+            }
+            if (isset($versions[$i1]) && isset($versions[$i2])) {
+                $compare = ($versions[$i1] < $versions[$i2]) ? -1 : 1;
+            } elseif (isset($versions[$i1])) {
+                $compare = 1;
+            } elseif (isset($versions[$i2])) {
+                $compare = -1;
+            } else {
+                $compare = 0;
+            }
+
+            break;
+        }
+
+        // If previous loop didn't find anything, compare the "extra" segments
+        if ($compare == 0) {
+            if (count($v2) > count($v1)) {
+                if (isset($versions[$v2[$i]])) {
+                    $compare = ($versions[$v2[$i]] < 4) ? 1 : -1;
+                } else {
+                    $compare = -1;
+                }
+            } elseif (count($v2) < count($v1)) {
+                if (isset($versions[$v1[$i]])) {
+                    $compare = ($versions[$v1[$i]] < 4) ? -1 : 1;
+                } else {
+                    $compare = 1;
+                }
+            }
+        }
+
+        // Compare the versions
+        if (func_num_args() > 2) {
+            switch ($operator) {
+                case '>':
+                case 'gt':
+                    return (bool) ($compare > 0);
+                    break;
+                case '>=':
+                case 'ge':
+                    return (bool) ($compare >= 0);
+                    break;
+                case '<=':
+                case 'le':
+                    return (bool) ($compare <= 0);
+                    break;
+                case '==':
+                case '=':
+                case 'eq':
+                    return (bool) ($compare == 0);
+                    break;
+                case '<>':
+                case '!=':
+                case 'ne':
+                    return (bool) ($compare != 0);
+                    break;
+                case '':
+                case '<':
+                case 'lt':
+                    return (bool) ($compare < 0);
+                    break;
+                default:
+                    return;
+            }
+        }
+
+        return $compare;
+    }
+}
+
+?>
\ No newline at end of file
diff --git a/lib/xmlrpc.inc b/lib/xmlrpc.inc
new file mode 100644 (file)
index 0000000..1c313ae
--- /dev/null
@@ -0,0 +1,3718 @@
+<?php\r
+// by Edd Dumbill (C) 1999-2002\r
+// <edd@usefulinc.com>\r
+// $Id: xmlrpc.inc,v 1.174 2009/03/16 19:36:38 ggiunta Exp $\r
+\r
+// Copyright (c) 1999,2000,2002 Edd Dumbill.\r
+// All rights reserved.\r
+//\r
+// Redistribution and use in source and binary forms, with or without\r
+// modification, are permitted provided that the following conditions\r
+// are met:\r
+//\r
+//    * Redistributions of source code must retain the above copyright\r
+//      notice, this list of conditions and the following disclaimer.\r
+//\r
+//    * Redistributions in binary form must reproduce the above\r
+//      copyright notice, this list of conditions and the following\r
+//      disclaimer in the documentation and/or other materials provided\r
+//      with the distribution.\r
+//\r
+//    * Neither the name of the "XML-RPC for PHP" nor the names of its\r
+//      contributors may be used to endorse or promote products derived\r
+//      from this software without specific prior written permission.\r
+//\r
+// THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS\r
+// "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT\r
+// LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS\r
+// FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE\r
+// REGENTS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,\r
+// INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES\r
+// (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR\r
+// SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)\r
+// HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,\r
+// STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)\r
+// ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED\r
+// OF THE POSSIBILITY OF SUCH DAMAGE.\r
+\r
+       if(!function_exists('xml_parser_create'))\r
+       {\r
+               // For PHP 4 onward, XML functionality is always compiled-in on windows:\r
+               // no more need to dl-open it. It might have been compiled out on *nix...\r
+               if(strtoupper(substr(PHP_OS, 0, 3) != 'WIN'))\r
+               {\r
+                       dl('xml.so');\r
+               }\r
+       }\r
+\r
+       // Try to be backward compat with php < 4.2 (are we not being nice ?)\r
+       $phpversion = phpversion();\r
+       if($phpversion[0] == '4' && $phpversion[2] < 2)\r
+       {\r
+               // give an opportunity to user to specify where to include other files from\r
+               if(!defined('PHP_XMLRPC_COMPAT_DIR'))\r
+               {\r
+                       define('PHP_XMLRPC_COMPAT_DIR',dirname(__FILE__).'/compat/');\r
+               }\r
+               if($phpversion[2] == '0')\r
+               {\r
+                       if($phpversion[4] < 6)\r
+                       {\r
+                               include(PHP_XMLRPC_COMPAT_DIR.'is_callable.php');\r
+                       }\r
+                       include(PHP_XMLRPC_COMPAT_DIR.'is_scalar.php');\r
+                       include(PHP_XMLRPC_COMPAT_DIR.'array_key_exists.php');\r
+                       include(PHP_XMLRPC_COMPAT_DIR.'version_compare.php');\r
+               }\r
+               include(PHP_XMLRPC_COMPAT_DIR.'var_export.php');\r
+               include(PHP_XMLRPC_COMPAT_DIR.'is_a.php');\r
+       }\r
+\r
+       // G. Giunta 2005/01/29: declare global these variables,\r
+       // so that xmlrpc.inc will work even if included from within a function\r
+       // Milosch: 2005/08/07 - explicitly request these via $GLOBALS where used.\r
+       $GLOBALS['xmlrpcI4']='i4';\r
+       $GLOBALS['xmlrpcInt']='int';\r
+       $GLOBALS['xmlrpcBoolean']='boolean';\r
+       $GLOBALS['xmlrpcDouble']='double';\r
+       $GLOBALS['xmlrpcString']='string';\r
+       $GLOBALS['xmlrpcDateTime']='dateTime.iso8601';\r
+       $GLOBALS['xmlrpcBase64']='base64';\r
+       $GLOBALS['xmlrpcArray']='array';\r
+       $GLOBALS['xmlrpcStruct']='struct';\r
+       $GLOBALS['xmlrpcValue']='undefined';\r
+\r
+       $GLOBALS['xmlrpcTypes']=array(\r
+               $GLOBALS['xmlrpcI4']       => 1,\r
+               $GLOBALS['xmlrpcInt']      => 1,\r
+               $GLOBALS['xmlrpcBoolean']  => 1,\r
+               $GLOBALS['xmlrpcString']   => 1,\r
+               $GLOBALS['xmlrpcDouble']   => 1,\r
+               $GLOBALS['xmlrpcDateTime'] => 1,\r
+               $GLOBALS['xmlrpcBase64']   => 1,\r
+               $GLOBALS['xmlrpcArray']    => 2,\r
+               $GLOBALS['xmlrpcStruct']   => 3\r
+       );\r
+\r
+       $GLOBALS['xmlrpc_valid_parents'] = array(\r
+               'VALUE' => array('MEMBER', 'DATA', 'PARAM', 'FAULT'),\r
+               'BOOLEAN' => array('VALUE'),\r
+               'I4' => array('VALUE'),\r
+               'INT' => array('VALUE'),\r
+               'STRING' => array('VALUE'),\r
+               'DOUBLE' => array('VALUE'),\r
+               'DATETIME.ISO8601' => array('VALUE'),\r
+               'BASE64' => array('VALUE'),\r
+               'MEMBER' => array('STRUCT'),\r
+               'NAME' => array('MEMBER'),\r
+               'DATA' => array('ARRAY'),\r
+               'ARRAY' => array('VALUE'),\r
+               'STRUCT' => array('VALUE'),\r
+               'PARAM' => array('PARAMS'),\r
+               'METHODNAME' => array('METHODCALL'),\r
+               'PARAMS' => array('METHODCALL', 'METHODRESPONSE'),\r
+               'FAULT' => array('METHODRESPONSE'),\r
+               'NIL' => array('VALUE') // only used when extension activated\r
+       );\r
+\r
+       // define extra types for supporting NULL (useful for json or <NIL/>)\r
+       $GLOBALS['xmlrpcNull']='null';\r
+       $GLOBALS['xmlrpcTypes']['null']=1;\r
+\r
+       // Not in use anymore since 2.0. Shall we remove it?\r
+       /// @deprecated\r
+       $GLOBALS['xmlEntities']=array(\r
+               'amp'  => '&',\r
+               'quot' => '"',\r
+               'lt'   => '<',\r
+               'gt'   => '>',\r
+               'apos' => "'"\r
+       );\r
+\r
+       // tables used for transcoding different charsets into us-ascii xml\r
+\r
+       $GLOBALS['xml_iso88591_Entities']=array();\r
+       $GLOBALS['xml_iso88591_Entities']['in'] = array();\r
+       $GLOBALS['xml_iso88591_Entities']['out'] = array();\r
+       for ($i = 0; $i < 32; $i++)\r
+       {\r
+               $GLOBALS['xml_iso88591_Entities']['in'][] = chr($i);\r
+               $GLOBALS['xml_iso88591_Entities']['out'][] = '&#'.$i.';';\r
+       }\r
+       for ($i = 160; $i < 256; $i++)\r
+       {\r
+               $GLOBALS['xml_iso88591_Entities']['in'][] = chr($i);\r
+               $GLOBALS['xml_iso88591_Entities']['out'][] = '&#'.$i.';';\r
+       }\r
+\r
+       /// @todo add to iso table the characters from cp_1252 range, i.e. 128 to 159?\r
+       /// These will NOT be present in true ISO-8859-1, but will save the unwary\r
+       /// windows user from sending junk (though no luck when reciving them...)\r
+  /*\r
+       $GLOBALS['xml_cp1252_Entities']=array();\r
+       for ($i = 128; $i < 160; $i++)\r
+       {\r
+               $GLOBALS['xml_cp1252_Entities']['in'][] = chr($i);\r
+       }\r
+       $GLOBALS['xml_cp1252_Entities']['out'] = array(\r
+               '&#x20AC;', '?',        '&#x201A;', '&#x0192;',\r
+               '&#x201E;', '&#x2026;', '&#x2020;', '&#x2021;',\r
+               '&#x02C6;', '&#x2030;', '&#x0160;', '&#x2039;',\r
+               '&#x0152;', '?',        '&#x017D;', '?',\r
+               '?',        '&#x2018;', '&#x2019;', '&#x201C;',\r
+               '&#x201D;', '&#x2022;', '&#x2013;', '&#x2014;',\r
+               '&#x02DC;', '&#x2122;', '&#x0161;', '&#x203A;',\r
+               '&#x0153;', '?',        '&#x017E;', '&#x0178;'\r
+       );\r
+  */\r
+\r
+       $GLOBALS['xmlrpcerr'] = array(\r
+       'unknown_method'=>1,\r
+       'invalid_return'=>2,\r
+       'incorrect_params'=>3,\r
+       'introspect_unknown'=>4,\r
+       'http_error'=>5,\r
+       'no_data'=>6,\r
+       'no_ssl'=>7,\r
+       'curl_fail'=>8,\r
+       'invalid_request'=>15,\r
+       'no_curl'=>16,\r
+       'server_error'=>17,\r
+       'multicall_error'=>18,\r
+       'multicall_notstruct'=>9,\r
+       'multicall_nomethod'=>10,\r
+       'multicall_notstring'=>11,\r
+       'multicall_recursion'=>12,\r
+       'multicall_noparams'=>13,\r
+       'multicall_notarray'=>14,\r
+\r
+       'cannot_decompress'=>103,\r
+       'decompress_fail'=>104,\r
+       'dechunk_fail'=>105,\r
+       'server_cannot_decompress'=>106,\r
+       'server_decompress_fail'=>107\r
+       );\r
+\r
+       $GLOBALS['xmlrpcstr'] = array(\r
+       'unknown_method'=>'Unknown method',\r
+       'invalid_return'=>'Invalid return payload: enable debugging to examine incoming payload',\r
+       'incorrect_params'=>'Incorrect parameters passed to method',\r
+       'introspect_unknown'=>"Can't introspect: method unknown",\r
+       'http_error'=>"Didn't receive 200 OK from remote server.",\r
+       'no_data'=>'No data received from server.',\r
+       'no_ssl'=>'No SSL support compiled in.',\r
+       'curl_fail'=>'CURL error',\r
+       'invalid_request'=>'Invalid request payload',\r
+       'no_curl'=>'No CURL support compiled in.',\r
+       'server_error'=>'Internal server error',\r
+       'multicall_error'=>'Received from server invalid multicall response',\r
+       'multicall_notstruct'=>'system.multicall expected struct',\r
+       'multicall_nomethod'=>'missing methodName',\r
+       'multicall_notstring'=>'methodName is not a string',\r
+       'multicall_recursion'=>'recursive system.multicall forbidden',\r
+       'multicall_noparams'=>'missing params',\r
+       'multicall_notarray'=>'params is not an array',\r
+\r
+       'cannot_decompress'=>'Received from server compressed HTTP and cannot decompress',\r
+       'decompress_fail'=>'Received from server invalid compressed HTTP',\r
+       'dechunk_fail'=>'Received from server invalid chunked HTTP',\r
+       'server_cannot_decompress'=>'Received from client compressed HTTP request and cannot decompress',\r
+       'server_decompress_fail'=>'Received from client invalid compressed HTTP request'\r
+       );\r
+\r
+       // The charset encoding used by the server for received messages and\r
+       // by the client for received responses when received charset cannot be determined\r
+       // or is not supported\r
+       $GLOBALS['xmlrpc_defencoding']='UTF-8';\r
+\r
+       // The encoding used internally by PHP.\r
+       // String values received as xml will be converted to this, and php strings will be converted to xml\r
+       // as if having been coded with this\r
+       $GLOBALS['xmlrpc_internalencoding']='ISO-8859-1';\r
+\r
+       $GLOBALS['xmlrpcName']='XML-RPC for PHP';\r
+       $GLOBALS['xmlrpcVersion']='2.2.1';\r
+\r
+       // let user errors start at 800\r
+       $GLOBALS['xmlrpcerruser']=800;\r
+       // let XML parse errors start at 100\r
+       $GLOBALS['xmlrpcerrxml']=100;\r
+\r
+       // formulate backslashes for escaping regexp\r
+       // Not in use anymore since 2.0. Shall we remove it?\r
+       /// @deprecated\r
+       $GLOBALS['xmlrpc_backslash']=chr(92).chr(92);\r
+\r
+       // set to TRUE to enable correct decoding of <NIL/> values\r
+       $GLOBALS['xmlrpc_null_extension']=false;\r
+\r
+       // used to store state during parsing\r
+       // quick explanation of components:\r
+       //   ac - used to accumulate values\r
+       //   isf - used to indicate a parsing fault (2) or xmlrpcresp fault (1)\r
+       //   isf_reason - used for storing xmlrpcresp fault string\r
+       //   lv - used to indicate "looking for a value": implements\r
+       //        the logic to allow values with no types to be strings\r
+       //   params - used to store parameters in method calls\r
+       //   method - used to store method name\r
+       //   stack - array with genealogy of xml elements names:\r
+       //           used to validate nesting of xmlrpc elements\r
+       $GLOBALS['_xh']=null;\r
+\r
+       /**\r
+       * Convert a string to the correct XML representation in a target charset\r
+       * To help correct communication of non-ascii chars inside strings, regardless\r
+       * of the charset used when sending requests, parsing them, sending responses\r
+       * and parsing responses, an option is to convert all non-ascii chars present in the message\r
+       * into their equivalent 'charset entity'. Charset entities enumerated this way\r
+       * are independent of the charset encoding used to transmit them, and all XML\r
+       * parsers are bound to understand them.\r
+       * Note that in the std case we are not sending a charset encoding mime type\r
+       * along with http headers, so we are bound by RFC 3023 to emit strict us-ascii.\r
+       *\r
+       * @todo do a bit of basic benchmarking (strtr vs. str_replace)\r
+       * @todo make usage of iconv() or recode_string() or mb_string() where available\r
+       */\r
+       function xmlrpc_encode_entitites($data, $src_encoding='', $dest_encoding='')\r
+       {\r
+               if ($src_encoding == '')\r
+               {\r
+                       // lame, but we know no better...\r
+                       $src_encoding = $GLOBALS['xmlrpc_internalencoding'];\r
+               }\r
+\r
+               switch(strtoupper($src_encoding.'_'.$dest_encoding))\r
+               {\r
+                       case 'ISO-8859-1_':\r
+                       case 'ISO-8859-1_US-ASCII':\r
+                               $escaped_data = str_replace(array('&', '"', "'", '<', '>'), array('&amp;', '&quot;', '&apos;', '&lt;', '&gt;'), $data);\r
+                               $escaped_data = str_replace($GLOBALS['xml_iso88591_Entities']['in'], $GLOBALS['xml_iso88591_Entities']['out'], $escaped_data);\r
+                               break;\r
+                       case 'ISO-8859-1_UTF-8':\r
+                               $escaped_data = str_replace(array('&', '"', "'", '<', '>'), array('&amp;', '&quot;', '&apos;', '&lt;', '&gt;'), $data);\r
+                               $escaped_data = utf8_encode($escaped_data);\r
+                               break;\r
+                       case 'ISO-8859-1_ISO-8859-1':\r
+                       case 'US-ASCII_US-ASCII':\r
+                       case 'US-ASCII_UTF-8':\r
+                       case 'US-ASCII_':\r
+                       case 'US-ASCII_ISO-8859-1':\r
+                       case 'UTF-8_UTF-8':\r
+                       //case 'CP1252_CP1252':\r
+                               $escaped_data = str_replace(array('&', '"', "'", '<', '>'), array('&amp;', '&quot;', '&apos;', '&lt;', '&gt;'), $data);\r
+                               break;\r
+                       case 'UTF-8_':\r
+                       case 'UTF-8_US-ASCII':\r
+                       case 'UTF-8_ISO-8859-1':\r
+       // NB: this will choke on invalid UTF-8, going most likely beyond EOF\r
+       $escaped_data = '';\r
+       // be kind to users creating string xmlrpcvals out of different php types\r
+       $data = (string) $data;\r
+       $ns = strlen ($data);\r
+       for ($nn = 0; $nn < $ns; $nn++)\r
+       {\r
+               $ch = $data[$nn];\r
+               $ii = ord($ch);\r
+               //1 7 0bbbbbbb (127)\r
+               if ($ii < 128)\r
+               {\r
+                       /// @todo shall we replace this with a (supposedly) faster str_replace?\r
+                       switch($ii){\r
+                               case 34:\r
+                                       $escaped_data .= '&quot;';\r
+                                       break;\r
+                               case 38:\r
+                                       $escaped_data .= '&amp;';\r
+                                       break;\r
+                               case 39:\r
+                                       $escaped_data .= '&apos;';\r
+                                       break;\r
+                               case 60:\r
+                                       $escaped_data .= '&lt;';\r
+                                       break;\r
+                               case 62:\r
+                                       $escaped_data .= '&gt;';\r
+                                       break;\r
+                               default:\r
+                                       $escaped_data .= $ch;\r
+                       } // switch\r
+               }\r
+               //2 11 110bbbbb 10bbbbbb (2047)\r
+               else if ($ii>>5 == 6)\r
+               {\r
+                       $b1 = ($ii & 31);\r
+                       $ii = ord($data[$nn+1]);\r
+                       $b2 = ($ii & 63);\r
+                       $ii = ($b1 * 64) + $b2;\r
+                       $ent = sprintf ('&#%d;', $ii);\r
+                       $escaped_data .= $ent;\r
+                       $nn += 1;\r
+               }\r
+               //3 16 1110bbbb 10bbbbbb 10bbbbbb\r
+               else if ($ii>>4 == 14)\r
+               {\r
+                       $b1 = ($ii & 15);\r
+                       $ii = ord($data[$nn+1]);\r
+                       $b2 = ($ii & 63);\r
+                       $ii = ord($data[$nn+2]);\r
+                       $b3 = ($ii & 63);\r
+                       $ii = ((($b1 * 64) + $b2) * 64) + $b3;\r
+                       $ent = sprintf ('&#%d;', $ii);\r
+                       $escaped_data .= $ent;\r
+                       $nn += 2;\r
+               }\r
+               //4 21 11110bbb 10bbbbbb 10bbbbbb 10bbbbbb\r
+               else if ($ii>>3 == 30)\r
+               {\r
+                       $b1 = ($ii & 7);\r
+                       $ii = ord($data[$nn+1]);\r
+                       $b2 = ($ii & 63);\r
+                       $ii = ord($data[$nn+2]);\r
+                       $b3 = ($ii & 63);\r
+                       $ii = ord($data[$nn+3]);\r
+                       $b4 = ($ii & 63);\r
+                       $ii = ((((($b1 * 64) + $b2) * 64) + $b3) * 64) + $b4;\r
+                       $ent = sprintf ('&#%d;', $ii);\r
+                       $escaped_data .= $ent;\r
+                       $nn += 3;\r
+               }\r
+       }\r
+                               break;\r
+/*\r
+                       case 'CP1252_':\r
+                       case 'CP1252_US-ASCII':\r
+                               $escaped_data = str_replace(array('&', '"', "'", '<', '>'), array('&amp;', '&quot;', '&apos;', '&lt;', '&gt;'), $data);\r
+                               $escaped_data = str_replace($GLOBALS['xml_iso88591_Entities']['in'], $GLOBALS['xml_iso88591_Entities']['out'], $escaped_data);\r
+                               $escaped_data = str_replace($GLOBALS['xml_cp1252_Entities']['in'], $GLOBALS['xml_cp1252_Entities']['out'], $escaped_data);\r
+                               break;\r
+                       case 'CP1252_UTF-8':\r
+                               $escaped_data = str_replace(array('&', '"', "'", '<', '>'), array('&amp;', '&quot;', '&apos;', '&lt;', '&gt;'), $data);\r
+                               /// @todo we could use real UTF8 chars here instead of xml entities... (note that utf_8 encode all allone will NOT convert them)\r
+                               $escaped_data = str_replace($GLOBALS['xml_cp1252_Entities']['in'], $GLOBALS['xml_cp1252_Entities']['out'], $escaped_data);\r
+                               $escaped_data = utf8_encode($escaped_data);\r
+                               break;\r
+                       case 'CP1252_ISO-8859-1':\r
+                               $escaped_data = str_replace(array('&', '"', "'", '<', '>'), array('&amp;', '&quot;', '&apos;', '&lt;', '&gt;'), $data);\r
+                               // we might as well replave all funky chars with a '?' here, but we are kind and leave it to the receiving application layer to decide what to do with these weird entities...\r
+                               $escaped_data = str_replace($GLOBALS['xml_cp1252_Entities']['in'], $GLOBALS['xml_cp1252_Entities']['out'], $escaped_data);\r
+                               break;\r
+*/\r
+                       default:\r
+                               $escaped_data = '';\r
+                               error_log("Converting from $src_encoding to $dest_encoding: not supported...");\r
+               }\r
+               return $escaped_data;\r
+       }\r
+\r
+       /// xml parser handler function for opening element tags\r
+       function xmlrpc_se($parser, $name, $attrs, $accept_single_vals=false)\r
+       {\r
+               // if invalid xmlrpc already detected, skip all processing\r
+               if ($GLOBALS['_xh']['isf'] < 2)\r
+               {\r
+                       // check for correct element nesting\r
+                       // top level element can only be of 2 types\r
+                       /// @todo optimization creep: save this check into a bool variable, instead of using count() every time:\r
+                       ///       there is only a single top level element in xml anyway\r
+                       if (count($GLOBALS['_xh']['stack']) == 0)\r
+                       {\r
+                               if ($name != 'METHODRESPONSE' && $name != 'METHODCALL' && (\r
+                                       $name != 'VALUE' && !$accept_single_vals))\r
+                               {\r
+                                       $GLOBALS['_xh']['isf'] = 2;\r
+                                       $GLOBALS['_xh']['isf_reason'] = 'missing top level xmlrpc element';\r
+                                       return;\r
+                               }\r
+                               else\r
+                               {\r
+                                       $GLOBALS['_xh']['rt'] = strtolower($name);\r
+                               }\r
+                       }\r
+                       else\r
+                       {\r
+                               // not top level element: see if parent is OK\r
+                               $parent = end($GLOBALS['_xh']['stack']);\r
+                               if (!array_key_exists($name, $GLOBALS['xmlrpc_valid_parents']) || !in_array($parent, $GLOBALS['xmlrpc_valid_parents'][$name]))\r
+                               {\r
+                                       $GLOBALS['_xh']['isf'] = 2;\r
+                                       $GLOBALS['_xh']['isf_reason'] = "xmlrpc element $name cannot be child of $parent";\r
+                                       return;\r
+                               }\r
+                       }\r
+\r
+                       switch($name)\r
+                       {\r
+                               // optimize for speed switch cases: most common cases first\r
+                               case 'VALUE':\r
+                                       /// @todo we could check for 2 VALUE elements inside a MEMBER or PARAM element\r
+                                       $GLOBALS['_xh']['vt']='value'; // indicator: no value found yet\r
+                                       $GLOBALS['_xh']['ac']='';\r
+                                       $GLOBALS['_xh']['lv']=1;\r
+                                       $GLOBALS['_xh']['php_class']=null;\r
+                                       break;\r
+                               case 'I4':\r
+                               case 'INT':\r
+                               case 'STRING':\r
+                               case 'BOOLEAN':\r
+                               case 'DOUBLE':\r
+                               case 'DATETIME.ISO8601':\r
+                               case 'BASE64':\r
+                                       if ($GLOBALS['_xh']['vt']!='value')\r
+                                       {\r
+                                               //two data elements inside a value: an error occurred!\r
+                                               $GLOBALS['_xh']['isf'] = 2;\r
+                                               $GLOBALS['_xh']['isf_reason'] = "$name element following a {$GLOBALS['_xh']['vt']} element inside a single value";\r
+                                               return;\r
+                                       }\r
+                                       $GLOBALS['_xh']['ac']=''; // reset the accumulator\r
+                                       break;\r
+                               case 'STRUCT':\r
+                               case 'ARRAY':\r
+                                       if ($GLOBALS['_xh']['vt']!='value')\r
+                                       {\r
+                                               //two data elements inside a value: an error occurred!\r
+                                               $GLOBALS['_xh']['isf'] = 2;\r
+                                               $GLOBALS['_xh']['isf_reason'] = "$name element following a {$GLOBALS['_xh']['vt']} element inside a single value";\r
+                                               return;\r
+                                       }\r
+                                       // create an empty array to hold child values, and push it onto appropriate stack\r
+                                       $cur_val = array();\r
+                                       $cur_val['values'] = array();\r
+                                       $cur_val['type'] = $name;\r
+                                       // check for out-of-band information to rebuild php objs\r
+                                       // and in case it is found, save it\r
+                                       if (@isset($attrs['PHP_CLASS']))\r
+                                       {\r
+                                               $cur_val['php_class'] = $attrs['PHP_CLASS'];\r
+                                       }\r
+                                       $GLOBALS['_xh']['valuestack'][] = $cur_val;\r
+                                       $GLOBALS['_xh']['vt']='data'; // be prepared for a data element next\r
+                                       break;\r
+                               case 'DATA':\r
+                                       if ($GLOBALS['_xh']['vt']!='data')\r
+                                       {\r
+                                               //two data elements inside a value: an error occurred!\r
+                                               $GLOBALS['_xh']['isf'] = 2;\r
+                                               $GLOBALS['_xh']['isf_reason'] = "found two data elements inside an array element";\r
+                                               return;\r
+                                       }\r
+                               case 'METHODCALL':\r
+                               case 'METHODRESPONSE':\r
+                               case 'PARAMS':\r
+                                       // valid elements that add little to processing\r
+                                       break;\r
+                               case 'METHODNAME':\r
+                               case 'NAME':\r
+                                       /// @todo we could check for 2 NAME elements inside a MEMBER element\r
+                                       $GLOBALS['_xh']['ac']='';\r
+                                       break;\r
+                               case 'FAULT':\r
+                                       $GLOBALS['_xh']['isf']=1;\r
+                                       break;\r
+                               case 'MEMBER':\r
+                                       $GLOBALS['_xh']['valuestack'][count($GLOBALS['_xh']['valuestack'])-1]['name']=''; // set member name to null, in case we do not find in the xml later on\r
+                                       //$GLOBALS['_xh']['ac']='';\r
+                                       // Drop trough intentionally\r
+                               case 'PARAM':\r
+                                       // clear value type, so we can check later if no value has been passed for this param/member\r
+                                       $GLOBALS['_xh']['vt']=null;\r
+                                       break;\r
+                               case 'NIL':\r
+                                       if ($GLOBALS['xmlrpc_null_extension'])\r
+                                       {\r
+                                               if ($GLOBALS['_xh']['vt']!='value')\r
+                                               {\r
+                                                       //two data elements inside a value: an error occurred!\r
+                                                       $GLOBALS['_xh']['isf'] = 2;\r
+                                                       $GLOBALS['_xh']['isf_reason'] = "$name element following a {$GLOBALS['_xh']['vt']} element inside a single value";\r
+                                                       return;\r
+                                               }\r
+                                               $GLOBALS['_xh']['ac']=''; // reset the accumulator\r
+                                               break;\r
+                                       }\r
+                                       // we do not support the <NIL/> extension, so\r
+                                       // drop through intentionally\r
+                               default:\r
+                                       /// INVALID ELEMENT: RAISE ISF so that it is later recognized!!!\r
+                                       $GLOBALS['_xh']['isf'] = 2;\r
+                                       $GLOBALS['_xh']['isf_reason'] = "found not-xmlrpc xml element $name";\r
+                                       break;\r
+                       }\r
+\r
+                       // Save current element name to stack, to validate nesting\r
+                       $GLOBALS['_xh']['stack'][] = $name;\r
+\r
+                       /// @todo optimization creep: move this inside the big switch() above\r
+                       if($name!='VALUE')\r
+                       {\r
+                               $GLOBALS['_xh']['lv']=0;\r
+                       }\r
+               }\r
+       }\r
+\r
+       /// Used in decoding xml chunks that might represent single xmlrpc values\r
+       function xmlrpc_se_any($parser, $name, $attrs)\r
+       {\r
+               xmlrpc_se($parser, $name, $attrs, true);\r
+       }\r
+\r
+       /// xml parser handler function for close element tags\r
+       function xmlrpc_ee($parser, $name, $rebuild_xmlrpcvals = true)\r
+       {\r
+               if ($GLOBALS['_xh']['isf'] < 2)\r
+               {\r
+                       // push this element name from stack\r
+                       // NB: if XML validates, correct opening/closing is guaranteed and\r
+                       // we do not have to check for $name == $curr_elem.\r
+                       // we also checked for proper nesting at start of elements...\r
+                       $curr_elem = array_pop($GLOBALS['_xh']['stack']);\r
+\r
+                       switch($name)\r
+                       {\r
+                               case 'VALUE':\r
+                                       // This if() detects if no scalar was inside <VALUE></VALUE>\r
+                                       if ($GLOBALS['_xh']['vt']=='value')\r
+                                       {\r
+                                               $GLOBALS['_xh']['value']=$GLOBALS['_xh']['ac'];\r
+                                               $GLOBALS['_xh']['vt']=$GLOBALS['xmlrpcString'];\r
+                                       }\r
+\r
+                                       if ($rebuild_xmlrpcvals)\r
+                                       {\r
+                                               // build the xmlrpc val out of the data received, and substitute it\r
+                                               $temp =& new xmlrpcval($GLOBALS['_xh']['value'], $GLOBALS['_xh']['vt']);\r
+                                               // in case we got info about underlying php class, save it\r
+                                               // in the object we're rebuilding\r
+                                               if (isset($GLOBALS['_xh']['php_class']))\r
+                                                       $temp->_php_class = $GLOBALS['_xh']['php_class'];\r
+                                               // check if we are inside an array or struct:\r
+                                               // if value just built is inside an array, let's move it into array on the stack\r
+                                               $vscount = count($GLOBALS['_xh']['valuestack']);\r
+                                               if ($vscount && $GLOBALS['_xh']['valuestack'][$vscount-1]['type']=='ARRAY')\r
+                                               {\r
+                                                       $GLOBALS['_xh']['valuestack'][$vscount-1]['values'][] = $temp;\r
+                                               }\r
+                                               else\r
+                                               {\r
+                                                       $GLOBALS['_xh']['value'] = $temp;\r
+                                               }\r
+                                       }\r
+                                       else\r
+                                       {\r
+                                               /// @todo this needs to treat correctly php-serialized objects,\r
+                                               /// since std deserializing is done by php_xmlrpc_decode,\r
+                                               /// which we will not be calling...\r
+                                               if (isset($GLOBALS['_xh']['php_class']))\r
+                                               {\r
+                                               }\r
+\r
+                                               // check if we are inside an array or struct:\r
+                                               // if value just built is inside an array, let's move it into array on the stack\r
+                                               $vscount = count($GLOBALS['_xh']['valuestack']);\r
+                                               if ($vscount && $GLOBALS['_xh']['valuestack'][$vscount-1]['type']=='ARRAY')\r
+                                               {\r
+                                                       $GLOBALS['_xh']['valuestack'][$vscount-1]['values'][] = $GLOBALS['_xh']['value'];\r
+                                               }\r
+                                       }\r
+                                       break;\r
+                               case 'BOOLEAN':\r
+                               case 'I4':\r
+                               case 'INT':\r
+                               case 'STRING':\r
+                               case 'DOUBLE':\r
+                               case 'DATETIME.ISO8601':\r
+                               case 'BASE64':\r
+                                       $GLOBALS['_xh']['vt']=strtolower($name);\r
+                                       /// @todo: optimization creep - remove the if/elseif cycle below\r
+                                       /// since the case() in which we are already did that\r
+                                       if ($name=='STRING')\r
+                                       {\r
+                                               $GLOBALS['_xh']['value']=$GLOBALS['_xh']['ac'];\r
+                                       }\r
+                                       elseif ($name=='DATETIME.ISO8601')\r
+                                       {\r
+                                               if (!preg_match('/^[0-9]{8}T[0-9]{2}:[0-9]{2}:[0-9]{2}$/', $GLOBALS['_xh']['ac']))\r
+                                               {\r
+                                                       error_log('XML-RPC: invalid value received in DATETIME: '.$GLOBALS['_xh']['ac']);\r
+                                               }\r
+                                               $GLOBALS['_xh']['vt']=$GLOBALS['xmlrpcDateTime'];\r
+                                               $GLOBALS['_xh']['value']=$GLOBALS['_xh']['ac'];\r
+                                       }\r
+                                       elseif ($name=='BASE64')\r
+                                       {\r
+                                               /// @todo check for failure of base64 decoding / catch warnings\r
+                                               $GLOBALS['_xh']['value']=base64_decode($GLOBALS['_xh']['ac']);\r
+                                       }\r
+                                       elseif ($name=='BOOLEAN')\r
+                                       {\r
+                                               // special case here: we translate boolean 1 or 0 into PHP\r
+                                               // constants true or false.\r
+                                               // Strings 'true' and 'false' are accepted, even though the\r
+                                               // spec never mentions them (see eg. Blogger api docs)\r
+                                               // NB: this simple checks helps a lot sanitizing input, ie no\r
+                                               // security problems around here\r
+                                               if ($GLOBALS['_xh']['ac']=='1' || strcasecmp($GLOBALS['_xh']['ac'], 'true') == 0)\r
+                                               {\r
+                                                       $GLOBALS['_xh']['value']=true;\r
+                                               }\r
+                                               else\r
+                                               {\r
+                                                       // log if receiveing something strange, even though we set the value to false anyway\r
+                                                       if ($GLOBALS['_xh']['ac']!='0' && strcasecmp($GLOBALS['_xh']['ac'], 'false') != 0)\r
+                                                               error_log('XML-RPC: invalid value received in BOOLEAN: '.$GLOBALS['_xh']['ac']);\r
+                                                       $GLOBALS['_xh']['value']=false;\r
+                                               }\r
+                                       }\r
+                                       elseif ($name=='DOUBLE')\r
+                                       {\r
+                                               // we have a DOUBLE\r
+                                               // we must check that only 0123456789-.<space> are characters here\r
+                                               // NOTE: regexp could be much stricter than this...\r
+                                               if (!preg_match('/^[+-eE0123456789 \t.]+$/', $GLOBALS['_xh']['ac']))\r
+                                               {\r
+                                                       /// @todo: find a better way of throwing an error than this!\r
+                                                       error_log('XML-RPC: non numeric value received in DOUBLE: '.$GLOBALS['_xh']['ac']);\r
+                                                       $GLOBALS['_xh']['value']='ERROR_NON_NUMERIC_FOUND';\r
+                                               }\r
+                                               else\r
+                                               {\r
+                                                       // it's ok, add it on\r
+                                                       $GLOBALS['_xh']['value']=(double)$GLOBALS['_xh']['ac'];\r
+                                               }\r
+                                       }\r
+                                       else\r
+                                       {\r
+                                               // we have an I4/INT\r
+                                               // we must check that only 0123456789-<space> are characters here\r
+                                               if (!preg_match('/^[+-]?[0123456789 \t]+$/', $GLOBALS['_xh']['ac']))\r
+                                               {\r
+                                                       /// @todo find a better way of throwing an error than this!\r
+                                                       error_log('XML-RPC: non numeric value received in INT: '.$GLOBALS['_xh']['ac']);\r
+                                                       $GLOBALS['_xh']['value']='ERROR_NON_NUMERIC_FOUND';\r
+                                               }\r
+                                               else\r
+                                               {\r
+                                                       // it's ok, add it on\r
+                                                       $GLOBALS['_xh']['value']=(int)$GLOBALS['_xh']['ac'];\r
+                                               }\r
+                                       }\r
+                                       //$GLOBALS['_xh']['ac']=''; // is this necessary?\r
+                                       $GLOBALS['_xh']['lv']=3; // indicate we've found a value\r
+                                       break;\r
+                               case 'NAME':\r
+                                       $GLOBALS['_xh']['valuestack'][count($GLOBALS['_xh']['valuestack'])-1]['name'] = $GLOBALS['_xh']['ac'];\r
+                                       break;\r
+                               case 'MEMBER':\r
+                                       //$GLOBALS['_xh']['ac']=''; // is this necessary?\r
+                                       // add to array in the stack the last element built,\r
+                                       // unless no VALUE was found\r
+                                       if ($GLOBALS['_xh']['vt'])\r
+                                       {\r
+                                               $vscount = count($GLOBALS['_xh']['valuestack']);\r
+                                               $GLOBALS['_xh']['valuestack'][$vscount-1]['values'][$GLOBALS['_xh']['valuestack'][$vscount-1]['name']] = $GLOBALS['_xh']['value'];\r
+                                       } else\r
+                                               error_log('XML-RPC: missing VALUE inside STRUCT in received xml');\r
+                                       break;\r
+                               case 'DATA':\r
+                                       //$GLOBALS['_xh']['ac']=''; // is this necessary?\r
+                                       $GLOBALS['_xh']['vt']=null; // reset this to check for 2 data elements in a row - even if they're empty\r
+                                       break;\r
+                               case 'STRUCT':\r
+                               case 'ARRAY':\r
+                                       // fetch out of stack array of values, and promote it to current value\r
+                                       $curr_val = array_pop($GLOBALS['_xh']['valuestack']);\r
+                                       $GLOBALS['_xh']['value'] = $curr_val['values'];\r
+                                       $GLOBALS['_xh']['vt']=strtolower($name);\r
+                                       if (isset($curr_val['php_class']))\r
+                                       {\r
+                                               $GLOBALS['_xh']['php_class'] = $curr_val['php_class'];\r
+                                       }\r
+                                       break;\r
+                               case 'PARAM':\r
+                                       // add to array of params the current value,\r
+                                       // unless no VALUE was found\r
+                                       if ($GLOBALS['_xh']['vt'])\r
+                                       {\r
+                                               $GLOBALS['_xh']['params'][]=$GLOBALS['_xh']['value'];\r
+                                               $GLOBALS['_xh']['pt'][]=$GLOBALS['_xh']['vt'];\r
+                                       }\r
+                                       else\r
+                                               error_log('XML-RPC: missing VALUE inside PARAM in received xml');\r
+                                       break;\r
+                               case 'METHODNAME':\r
+                                       $GLOBALS['_xh']['method']=preg_replace('/^[\n\r\t ]+/', '', $GLOBALS['_xh']['ac']);\r
+                                       break;\r
+                               case 'NIL':\r
+                                       if ($GLOBALS['xmlrpc_null_extension'])\r
+                                       {\r
+                                               $GLOBALS['_xh']['vt']='null';\r
+                                               $GLOBALS['_xh']['value']=null;\r
+                                               $GLOBALS['_xh']['lv']=3;\r
+                                               break;\r
+                                       }\r
+                                       // drop through intentionally if nil extension not enabled\r
+                               case 'PARAMS':\r
+                               case 'FAULT':\r
+                               case 'METHODCALL':\r
+                               case 'METHORESPONSE':\r
+                                       break;\r
+                               default:\r
+                                       // End of INVALID ELEMENT!\r
+                                       // shall we add an assert here for unreachable code???\r
+                                       break;\r
+                       }\r
+               }\r
+       }\r
+\r
+       /// Used in decoding xmlrpc requests/responses without rebuilding xmlrpc values\r
+       function xmlrpc_ee_fast($parser, $name)\r
+       {\r
+               xmlrpc_ee($parser, $name, false);\r
+       }\r
+\r
+       /// xml parser handler function for character data\r
+       function xmlrpc_cd($parser, $data)\r
+       {\r
+               // skip processing if xml fault already detected\r
+               if ($GLOBALS['_xh']['isf'] < 2)\r
+               {\r
+                       // "lookforvalue==3" means that we've found an entire value\r
+                       // and should discard any further character data\r
+                       if($GLOBALS['_xh']['lv']!=3)\r
+                       {\r
+                               // G. Giunta 2006-08-23: useless change of 'lv' from 1 to 2\r
+                               //if($GLOBALS['_xh']['lv']==1)\r
+                               //{\r
+                                       // if we've found text and we're just in a <value> then\r
+                                       // say we've found a value\r
+                                       //$GLOBALS['_xh']['lv']=2;\r
+                               //}\r
+                               // we always initialize the accumulator before starting parsing, anyway...\r
+                               //if(!@isset($GLOBALS['_xh']['ac']))\r
+                               //{\r
+                               //      $GLOBALS['_xh']['ac'] = '';\r
+                               //}\r
+                               $GLOBALS['_xh']['ac'].=$data;\r
+                       }\r
+               }\r
+       }\r
+\r
+       /// xml parser handler function for 'other stuff', ie. not char data or\r
+       /// element start/end tag. In fact it only gets called on unknown entities...\r
+       function xmlrpc_dh($parser, $data)\r
+       {\r
+               // skip processing if xml fault already detected\r
+               if ($GLOBALS['_xh']['isf'] < 2)\r
+               {\r
+                       if(substr($data, 0, 1) == '&' && substr($data, -1, 1) == ';')\r
+                       {\r
+                               // G. Giunta 2006-08-25: useless change of 'lv' from 1 to 2\r
+                               //if($GLOBALS['_xh']['lv']==1)\r
+                               //{\r
+                               //      $GLOBALS['_xh']['lv']=2;\r
+                               //}\r
+                               $GLOBALS['_xh']['ac'].=$data;\r
+                       }\r
+               }\r
+               return true;\r
+       }\r
+\r
+       class xmlrpc_client\r
+       {\r
+               var $path;\r
+               var $server;\r
+               var $port=0;\r
+               var $method='http';\r
+               var $errno;\r
+               var $errstr;\r
+               var $debug=0;\r
+               var $username='';\r
+               var $password='';\r
+               var $authtype=1;\r
+               var $cert='';\r
+               var $certpass='';\r
+               var $cacert='';\r
+               var $cacertdir='';\r
+               var $key='';\r
+               var $keypass='';\r
+               var $verifypeer=true;\r
+               var $verifyhost=1;\r
+               var $no_multicall=false;\r
+               var $proxy='';\r
+               var $proxyport=0;\r
+               var $proxy_user='';\r
+               var $proxy_pass='';\r
+               var $proxy_authtype=1;\r
+               var $cookies=array();\r
+               /**\r
+               * List of http compression methods accepted by the client for responses.\r
+               * NB: PHP supports deflate, gzip compressions out of the box if compiled w. zlib\r
+               *\r
+               * NNB: you can set it to any non-empty array for HTTP11 and HTTPS, since\r
+               * in those cases it will be up to CURL to decide the compression methods\r
+               * it supports. You might check for the presence of 'zlib' in the output of\r
+               * curl_version() to determine wheter compression is supported or not\r
+               */\r
+               var $accepted_compression = array();\r
+               /**\r
+               * Name of compression scheme to be used for sending requests.\r
+               * Either null, gzip or deflate\r
+               */\r
+               var $request_compression = '';\r
+               /**\r
+               * CURL handle: used for keep-alive connections (PHP 4.3.8 up, see:\r
+               * http://curl.haxx.se/docs/faq.html#7.3)\r
+               */\r
+               var $xmlrpc_curl_handle = null;\r
+               /// Wheter to use persistent connections for http 1.1 and https\r
+               var $keepalive = false;\r
+               /// Charset encodings that can be decoded without problems by the client\r
+               var $accepted_charset_encodings = array();\r
+               /// Charset encoding to be used in serializing request. NULL = use ASCII\r
+               var $request_charset_encoding = '';\r
+               /**\r
+               * Decides the content of xmlrpcresp objects returned by calls to send()\r
+               * valid strings are 'xmlrpcvals', 'phpvals' or 'xml'\r
+               */\r
+               var $return_type = 'xmlrpcvals';\r
+\r
+               /**\r
+               * @param string $path either the complete server URL or the PATH part of the xmlrc server URL, e.g. /xmlrpc/server.php\r
+               * @param string $server the server name / ip address\r
+               * @param integer $port the port the server is listening on, defaults to 80 or 443 depending on protocol used\r
+               * @param string $method the http protocol variant: defaults to 'http', 'https' and 'http11' can be used if CURL is installed\r
+               */\r
+               function xmlrpc_client($path, $server='', $port='', $method='')\r
+               {\r
+                       // allow user to specify all params in $path\r
+                       if($server == '' and $port == '' and $method == '')\r
+                       {\r
+                               $parts = parse_url($path);\r
+                               $server = $parts['host'];\r
+                               $path = isset($parts['path']) ? $parts['path'] : '';\r
+                               if(isset($parts['query']))\r
+                               {\r
+                                       $path .= '?'.$parts['query'];\r
+                               }\r
+                               if(isset($parts['fragment']))\r
+                               {\r
+                                       $path .= '#'.$parts['fragment'];\r
+                               }\r
+                               if(isset($parts['port']))\r
+                               {\r
+                                       $port = $parts['port'];\r
+                               }\r
+                               if(isset($parts['scheme']))\r
+                               {\r
+                                       $method = $parts['scheme'];\r
+                               }\r
+                               if(isset($parts['user']))\r
+                               {\r
+                                       $this->username = $parts['user'];\r
+                               }\r
+                               if(isset($parts['pass']))\r
+                               {\r
+                                       $this->password = $parts['pass'];\r
+                               }\r
+                       }\r
+                       if($path == '' || $path[0] != '/')\r
+                       {\r
+                               $this->path='/'.$path;\r
+                       }\r
+                       else\r
+                       {\r
+                               $this->path=$path;\r
+                       }\r
+                       $this->server=$server;\r
+                       if($port != '')\r
+                       {\r
+                               $this->port=$port;\r
+                       }\r
+                       if($method != '')\r
+                       {\r
+                               $this->method=$method;\r
+                       }\r
+\r
+                       // if ZLIB is enabled, let the client by default accept compressed responses\r
+                       if(function_exists('gzinflate') || (\r
+                               function_exists('curl_init') && (($info = curl_version()) &&\r
+                               ((is_string($info) && strpos($info, 'zlib') !== null) || isset($info['libz_version'])))\r
+                       ))\r
+                       {\r
+                               $this->accepted_compression = array('gzip', 'deflate');\r
+                       }\r
+\r
+                       // keepalives: enabled by default ONLY for PHP >= 4.3.8\r
+                       // (see http://curl.haxx.se/docs/faq.html#7.3)\r
+                       if(version_compare(phpversion(), '4.3.8') >= 0)\r
+                       {\r
+                               $this->keepalive = true;\r
+                       }\r
+\r
+                       // by default the xml parser can support these 3 charset encodings\r
+                       $this->accepted_charset_encodings = array('UTF-8', 'ISO-8859-1', 'US-ASCII');\r
+               }\r
+\r
+               /**\r
+               * Enables/disables the echoing to screen of the xmlrpc responses received\r
+               * @param integer $debug values 0, 1 and 2 are supported (2 = echo sent msg too, before received response)\r
+               * @access public\r
+               */\r
+               function setDebug($in)\r
+               {\r
+                       $this->debug=$in;\r
+               }\r
+\r
+               /**\r
+               * Add some http BASIC AUTH credentials, used by the client to authenticate\r
+               * @param string $u username\r
+               * @param string $p password\r
+               * @param integer $t auth type. See curl_setopt man page for supported auth types. Defaults to CURLAUTH_BASIC (basic auth)\r
+               * @access public\r
+               */\r
+               function setCredentials($u, $p, $t=1)\r
+               {\r
+                       $this->username=$u;\r
+                       $this->password=$p;\r
+                       $this->authtype=$t;\r
+               }\r
+\r
+               /**\r
+               * Add a client-side https certificate\r
+               * @param string $cert\r
+               * @param string $certpass\r
+               * @access public\r
+               */\r
+               function setCertificate($cert, $certpass)\r
+               {\r
+                       $this->cert = $cert;\r
+                       $this->certpass = $certpass;\r
+               }\r
+\r
+               /**\r
+               * Add a CA certificate to verify server with (see man page about\r
+               * CURLOPT_CAINFO for more details\r
+               * @param string $cacert certificate file name (or dir holding certificates)\r
+               * @param bool $is_dir set to true to indicate cacert is a dir. defaults to false\r
+               * @access public\r
+               */\r
+               function setCaCertificate($cacert, $is_dir=false)\r
+               {\r
+                       if ($is_dir)\r
+                       {\r
+                               $this->cacertdir = $cacert;\r
+                       }\r
+                       else\r
+                       {\r
+                               $this->cacert = $cacert;\r
+                       }\r
+               }\r
+\r
+               /**\r
+               * Set attributes for SSL communication: private SSL key\r
+               * NB: does not work in older php/curl installs\r
+               * Thanks to Daniel Convissor\r
+               * @param string $key The name of a file containing a private SSL key\r
+               * @param string $keypass The secret password needed to use the private SSL key\r
+               * @access public\r
+               */\r
+               function setKey($key, $keypass)\r
+               {\r
+                       $this->key = $key;\r
+                       $this->keypass = $keypass;\r
+               }\r
+\r
+               /**\r
+               * Set attributes for SSL communication: verify server certificate\r
+               * @param bool $i enable/disable verification of peer certificate\r
+               * @access public\r
+               */\r
+               function setSSLVerifyPeer($i)\r
+               {\r
+                       $this->verifypeer = $i;\r
+               }\r
+\r
+               /**\r
+               * Set attributes for SSL communication: verify match of server cert w. hostname\r
+               * @param int $i\r
+               * @access public\r
+               */\r
+               function setSSLVerifyHost($i)\r
+               {\r
+                       $this->verifyhost = $i;\r
+               }\r
+\r
+               /**\r
+               * Set proxy info\r
+               * @param string $proxyhost\r
+               * @param string $proxyport Defaults to 8080 for HTTP and 443 for HTTPS\r
+               * @param string $proxyusername Leave blank if proxy has public access\r
+               * @param string $proxypassword Leave blank if proxy has public access\r
+               * @param int $proxyauthtype set to constant CURLAUTH_NTLM to use NTLM auth with proxy\r
+               * @access public\r
+               */\r
+               function setProxy($proxyhost, $proxyport, $proxyusername = '', $proxypassword = '', $proxyauthtype = 1)\r
+               {\r
+                       $this->proxy = $proxyhost;\r
+                       $this->proxyport = $proxyport;\r
+                       $this->proxy_user = $proxyusername;\r
+                       $this->proxy_pass = $proxypassword;\r
+                       $this->proxy_authtype = $proxyauthtype;\r
+               }\r
+\r
+               /**\r
+               * Enables/disables reception of compressed xmlrpc responses.\r
+               * Note that enabling reception of compressed responses merely adds some standard\r
+               * http headers to xmlrpc requests. It is up to the xmlrpc server to return\r
+               * compressed responses when receiving such requests.\r
+               * @param string $compmethod either 'gzip', 'deflate', 'any' or ''\r
+               * @access public\r
+               */\r
+               function setAcceptedCompression($compmethod)\r
+               {\r
+                       if ($compmethod == 'any')\r
+                               $this->accepted_compression = array('gzip', 'deflate');\r
+                       else\r
+                               $this->accepted_compression = array($compmethod);\r
+               }\r
+\r
+               /**\r
+               * Enables/disables http compression of xmlrpc request.\r
+               * Take care when sending compressed requests: servers might not support them\r
+               * (and automatic fallback to uncompressed requests is not yet implemented)\r
+               * @param string $compmethod either 'gzip', 'deflate' or ''\r
+               * @access public\r
+               */\r
+               function setRequestCompression($compmethod)\r
+               {\r
+                       $this->request_compression = $compmethod;\r
+               }\r
+\r
+               /**\r
+               * Adds a cookie to list of cookies that will be sent to server.\r
+               * NB: setting any param but name and value will turn the cookie into a 'version 1' cookie:\r
+               * do not do it unless you know what you are doing\r
+               * @param string $name\r
+               * @param string $value\r
+               * @param string $path\r
+               * @param string $domain\r
+               * @param int $port\r
+               * @access public\r
+               *\r
+               * @todo check correctness of urlencoding cookie value (copied from php way of doing it...)\r
+               */\r
+               function setCookie($name, $value='', $path='', $domain='', $port=null)\r
+               {\r
+                       $this->cookies[$name]['value'] = urlencode($value);\r
+                       if ($path || $domain || $port)\r
+                       {\r
+                               $this->cookies[$name]['path'] = $path;\r
+                               $this->cookies[$name]['domain'] = $domain;\r
+                               $this->cookies[$name]['port'] = $port;\r
+                               $this->cookies[$name]['version'] = 1;\r
+                       }\r
+                       else\r
+                       {\r
+                               $this->cookies[$name]['version'] = 0;\r
+                       }\r
+               }\r
+\r
+               /**\r
+               * Send an xmlrpc request\r
+               * @param mixed $msg The message object, or an array of messages for using multicall, or the complete xml representation of a request\r
+               * @param integer $timeout Connection timeout, in seconds, If unspecified, a platform specific timeout will apply\r
+               * @param string $method if left unspecified, the http protocol chosen during creation of the object will be used\r
+               * @return xmlrpcresp\r
+               * @access public\r
+               */\r
+               function& send($msg, $timeout=0, $method='')\r
+               {\r
+                       // if user deos not specify http protocol, use native method of this client\r
+                       // (i.e. method set during call to constructor)\r
+                       if($method == '')\r
+                       {\r
+                               $method = $this->method;\r
+                       }\r
+\r
+                       if(is_array($msg))\r
+                       {\r
+                               // $msg is an array of xmlrpcmsg's\r
+                               $r = $this->multicall($msg, $timeout, $method);\r
+                               return $r;\r
+                       }\r
+                       elseif(is_string($msg))\r
+                       {\r
+                               $n =& new xmlrpcmsg('');\r
+                               $n->payload = $msg;\r
+                               $msg = $n;\r
+                       }\r
+\r
+                       // where msg is an xmlrpcmsg\r
+                       $msg->debug=$this->debug;\r
+\r
+                       if($method == 'https')\r
+                       {\r
+                               $r =& $this->sendPayloadHTTPS(\r
+                                       $msg,\r
+                                       $this->server,\r
+                                       $this->port,\r
+                                       $timeout,\r
+                                       $this->username,\r
+                                       $this->password,\r
+                                       $this->authtype,\r
+                                       $this->cert,\r
+                                       $this->certpass,\r
+                                       $this->cacert,\r
+                                       $this->cacertdir,\r
+                                       $this->proxy,\r
+                                       $this->proxyport,\r
+                                       $this->proxy_user,\r
+                                       $this->proxy_pass,\r
+                                       $this->proxy_authtype,\r
+                                       $this->keepalive,\r
+                                       $this->key,\r
+                                       $this->keypass\r
+                               );\r
+                       }\r
+                       elseif($method == 'http11')\r
+                       {\r
+                               $r =& $this->sendPayloadCURL(\r
+                                       $msg,\r
+                                       $this->server,\r
+                                       $this->port,\r
+                                       $timeout,\r
+                                       $this->username,\r
+                                       $this->password,\r
+                                       $this->authtype,\r
+                                       null,\r
+                                       null,\r
+                                       null,\r
+                                       null,\r
+                                       $this->proxy,\r
+                                       $this->proxyport,\r
+                                       $this->proxy_user,\r
+                                       $this->proxy_pass,\r
+                                       $this->proxy_authtype,\r
+                                       'http',\r
+                                       $this->keepalive\r
+                               );\r
+                       }\r
+                       else\r
+                       {\r
+                               $r =& $this->sendPayloadHTTP10(\r
+                                       $msg,\r
+                                       $this->server,\r
+                                       $this->port,\r
+                                       $timeout,\r
+                                       $this->username,\r
+                                       $this->password,\r
+                                       $this->authtype,\r
+                                       $this->proxy,\r
+                                       $this->proxyport,\r
+                                       $this->proxy_user,\r
+                                       $this->proxy_pass,\r
+                                       $this->proxy_authtype\r
+                               );\r
+                       }\r
+\r
+                       return $r;\r
+               }\r
+\r
+               /**\r
+               * @access private\r
+               */\r
+               function &sendPayloadHTTP10($msg, $server, $port, $timeout=0,\r
+                       $username='', $password='', $authtype=1, $proxyhost='',\r
+                       $proxyport=0, $proxyusername='', $proxypassword='', $proxyauthtype=1)\r
+               {\r
+                       if($port==0)\r
+                       {\r
+                               $port=80;\r
+                       }\r
+\r
+                       // Only create the payload if it was not created previously\r
+                       if(empty($msg->payload))\r
+                       {\r
+                               $msg->createPayload($this->request_charset_encoding);\r
+                       }\r
+\r
+                       $payload = $msg->payload;\r
+                       // Deflate request body and set appropriate request headers\r
+                       if(function_exists('gzdeflate') && ($this->request_compression == 'gzip' || $this->request_compression == 'deflate'))\r
+                       {\r
+                               if($this->request_compression == 'gzip')\r
+                               {\r
+                                       $a = @gzencode($payload);\r
+                                       if($a)\r
+                                       {\r
+                                               $payload = $a;\r
+                                               $encoding_hdr = "Content-Encoding: gzip\r\n";\r
+                                       }\r
+                               }\r
+                               else\r
+                               {\r
+                                       $a = @gzcompress($payload);\r
+                                       if($a)\r
+                                       {\r
+                                               $payload = $a;\r
+                                               $encoding_hdr = "Content-Encoding: deflate\r\n";\r
+                                       }\r
+                               }\r
+                       }\r
+                       else\r
+                       {\r
+                               $encoding_hdr = '';\r
+                       }\r
+\r
+                       // thanks to Grant Rauscher <grant7@firstworld.net> for this\r
+                       $credentials='';\r
+                       if($username!='')\r
+                       {\r
+                               $credentials='Authorization: Basic ' . base64_encode($username . ':' . $password) . "\r\n";\r
+                               if ($authtype != 1)\r
+                               {\r
+                                       error_log('XML-RPC: xmlrpc_client::send: warning. Only Basic auth is supported with HTTP 1.0');\r
+                               }\r
+                       }\r
+\r
+                       $accepted_encoding = '';\r
+                       if(is_array($this->accepted_compression) && count($this->accepted_compression))\r
+                       {\r
+                               $accepted_encoding = 'Accept-Encoding: ' . implode(', ', $this->accepted_compression) . "\r\n";\r
+                       }\r
+\r
+                       $proxy_credentials = '';\r
+                       if($proxyhost)\r
+                       {\r
+                               if($proxyport == 0)\r
+                               {\r
+                                       $proxyport = 8080;\r
+                               }\r
+                               $connectserver = $proxyhost;\r
+                               $connectport = $proxyport;\r
+                               $uri = 'http://'.$server.':'.$port.$this->path;\r
+                               if($proxyusername != '')\r
+                               {\r
+                                       if ($proxyauthtype != 1)\r
+                                       {\r
+                                               error_log('XML-RPC: xmlrpc_client::send: warning. Only Basic auth to proxy is supported with HTTP 1.0');\r
+                                       }\r
+                                       $proxy_credentials = 'Proxy-Authorization: Basic ' . base64_encode($proxyusername.':'.$proxypassword) . "\r\n";\r
+                               }\r
+                       }\r
+                       else\r
+                       {\r
+                               $connectserver = $server;\r
+                               $connectport = $port;\r
+                               $uri = $this->path;\r
+                       }\r
+\r
+                       // Cookie generation, as per rfc2965 (version 1 cookies) or\r
+                       // netscape's rules (version 0 cookies)\r
+                       $cookieheader='';\r
+                       if (count($this->cookies))\r
+                       {\r
+                               $version = '';\r
+                               foreach ($this->cookies as $name => $cookie)\r
+                               {\r
+                                       if ($cookie['version'])\r
+                                       {\r
+                                               $version = ' $Version="' . $cookie['version'] . '";';\r
+                                               $cookieheader .= ' ' . $name . '="' . $cookie['value'] . '";';\r
+                                               if ($cookie['path'])\r
+                                                       $cookieheader .= ' $Path="' . $cookie['path'] . '";';\r
+                                               if ($cookie['domain'])\r
+                                                       $cookieheader .= ' $Domain="' . $cookie['domain'] . '";';\r
+                                               if ($cookie['port'])\r
+                                                       $cookieheader .= ' $Port="' . $cookie['port'] . '";';\r
+                                       }\r
+                                       else\r
+                                       {\r
+                                               $cookieheader .= ' ' . $name . '=' . $cookie['value'] . ";";\r
+                                       }\r
+                               }\r
+                               $cookieheader = 'Cookie:' . $version . substr($cookieheader, 0, -1) . "\r\n";\r
+                       }\r
+\r
+                       $op= 'POST ' . $uri. " HTTP/1.0\r\n" .\r
+                               'User-Agent: ' . $GLOBALS['xmlrpcName'] . ' ' . $GLOBALS['xmlrpcVersion'] . "\r\n" .\r
+                               'Host: '. $server . ':' . $port . "\r\n" .\r
+                               $credentials .\r
+                               $proxy_credentials .\r
+                               $accepted_encoding .\r
+                               $encoding_hdr .\r
+                               'Accept-Charset: ' . implode(',', $this->accepted_charset_encodings) . "\r\n" .\r
+                               $cookieheader .\r
+                               'Content-Type: ' . $msg->content_type . "\r\nContent-Length: " .\r
+                               strlen($payload) . "\r\n\r\n" .\r
+                               $payload;\r
+\r
+                       if($this->debug > 1)\r
+                       {\r
+                               print "<PRE>\n---SENDING---\n" . htmlentities($op) . "\n---END---\n</PRE>";\r
+                               // let the client see this now in case http times out...\r
+                               flush();\r
+                       }\r
+\r
+                       if($timeout>0)\r
+                       {\r
+                               $fp=@fsockopen($connectserver, $connectport, $this->errno, $this->errstr, $timeout);\r
+                       }\r
+                       else\r
+                       {\r
+                               $fp=@fsockopen($connectserver, $connectport, $this->errno, $this->errstr);\r
+                       }\r
+                       if($fp)\r
+                       {\r
+                               if($timeout>0 && function_exists('stream_set_timeout'))\r
+                               {\r
+                                       stream_set_timeout($fp, $timeout);\r
+                               }\r
+                       }\r
+                       else\r
+                       {\r
+                               $this->errstr='Connect error: '.$this->errstr;\r
+                               $r=&new xmlrpcresp(0, $GLOBALS['xmlrpcerr']['http_error'], $this->errstr . ' (' . $this->errno . ')');\r
+                               return $r;\r
+                       }\r
+\r
+                       if(!fputs($fp, $op, strlen($op)))\r
+                       {\r
+                       fclose($fp);\r
+                               $this->errstr='Write error';\r
+                               $r=&new xmlrpcresp(0, $GLOBALS['xmlrpcerr']['http_error'], $this->errstr);\r
+                               return $r;\r
+                       }\r
+                       else\r
+                       {\r
+                               // reset errno and errstr on succesful socket connection\r
+                               $this->errstr = '';\r
+                       }\r
+                       // G. Giunta 2005/10/24: close socket before parsing.\r
+                       // should yeld slightly better execution times, and make easier recursive calls (e.g. to follow http redirects)\r
+                       $ipd='';\r
+                       do\r
+                       {\r
+                               // shall we check for $data === FALSE?\r
+                               // as per the manual, it signals an error\r
+                               $ipd.=fread($fp, 32768);\r
+                       } while(!feof($fp));\r
+                       fclose($fp);\r
+                       $r =& $msg->parseResponse($ipd, false, $this->return_type);\r
+                       return $r;\r
+\r
+               }\r
+\r
+               /**\r
+               * @access private\r
+               */\r
+               function &sendPayloadHTTPS($msg, $server, $port, $timeout=0, $username='',\r
+                       $password='', $authtype=1, $cert='',$certpass='', $cacert='', $cacertdir='',\r
+                       $proxyhost='', $proxyport=0, $proxyusername='', $proxypassword='', $proxyauthtype=1,\r
+                       $keepalive=false, $key='', $keypass='')\r
+               {\r
+                       $r =& $this->sendPayloadCURL($msg, $server, $port, $timeout, $username,\r
+                               $password, $authtype, $cert, $certpass, $cacert, $cacertdir, $proxyhost, $proxyport,\r
+                               $proxyusername, $proxypassword, $proxyauthtype, 'https', $keepalive, $key, $keypass);\r
+                       return $r;\r
+               }\r
+\r
+               /**\r
+               * Contributed by Justin Miller <justin@voxel.net>\r
+               * Requires curl to be built into PHP\r
+               * NB: CURL versions before 7.11.10 cannot use proxy to talk to https servers!\r
+               * @access private\r
+               */\r
+               function &sendPayloadCURL($msg, $server, $port, $timeout=0, $username='',\r
+                       $password='', $authtype=1, $cert='', $certpass='', $cacert='', $cacertdir='',\r
+                       $proxyhost='', $proxyport=0, $proxyusername='', $proxypassword='', $proxyauthtype=1, $method='https',\r
+                       $keepalive=false, $key='', $keypass='')\r
+               {\r
+                       if(!function_exists('curl_init'))\r
+                       {\r
+                               $this->errstr='CURL unavailable on this install';\r
+                               $r=&new xmlrpcresp(0, $GLOBALS['xmlrpcerr']['no_curl'], $GLOBALS['xmlrpcstr']['no_curl']);\r
+                               return $r;\r
+                       }\r
+                       if($method == 'https')\r
+                       {\r
+                               if(($info = curl_version()) &&\r
+                                       ((is_string($info) && strpos($info, 'OpenSSL') === null) || (is_array($info) && !isset($info['ssl_version']))))\r
+                               {\r
+                                       $this->errstr='SSL unavailable on this install';\r
+                                       $r=&new xmlrpcresp(0, $GLOBALS['xmlrpcerr']['no_ssl'], $GLOBALS['xmlrpcstr']['no_ssl']);\r
+                                       return $r;\r
+                               }\r
+                       }\r
+\r
+                       if($port == 0)\r
+                       {\r
+                               if($method == 'http')\r
+                               {\r
+                                       $port = 80;\r
+                               }\r
+                               else\r
+                               {\r
+                                       $port = 443;\r
+                               }\r
+                       }\r
+\r
+                       // Only create the payload if it was not created previously\r
+                       if(empty($msg->payload))\r
+                       {\r
+                               $msg->createPayload($this->request_charset_encoding);\r
+                       }\r
+\r
+                       // Deflate request body and set appropriate request headers\r
+                       $payload = $msg->payload;\r
+                       if(function_exists('gzdeflate') && ($this->request_compression == 'gzip' || $this->request_compression == 'deflate'))\r
+                       {\r
+                               if($this->request_compression == 'gzip')\r
+                               {\r
+                                       $a = @gzencode($payload);\r
+                                       if($a)\r
+                                       {\r
+                                               $payload = $a;\r
+                                               $encoding_hdr = 'Content-Encoding: gzip';\r
+                                       }\r
+                               }\r
+                               else\r
+                               {\r
+                                       $a = @gzcompress($payload);\r
+                                       if($a)\r
+                                       {\r
+                                               $payload = $a;\r
+                                               $encoding_hdr = 'Content-Encoding: deflate';\r
+                                       }\r
+                               }\r
+                       }\r
+                       else\r
+                       {\r
+                               $encoding_hdr = '';\r
+                       }\r
+\r
+                       if($this->debug > 1)\r
+                       {\r
+                               print "<PRE>\n---SENDING---\n" . htmlentities($payload) . "\n---END---\n</PRE>";\r
+                               // let the client see this now in case http times out...\r
+                               flush();\r
+                       }\r
+\r
+                       if(!$keepalive || !$this->xmlrpc_curl_handle)\r
+                       {\r
+                               $curl = curl_init($method . '://' . $server . ':' . $port . $this->path);\r
+                               if($keepalive)\r
+                               {\r
+                                       $this->xmlrpc_curl_handle = $curl;\r
+                               }\r
+                       }\r
+                       else\r
+                       {\r
+                               $curl = $this->xmlrpc_curl_handle;\r
+                       }\r
+\r
+                       // results into variable\r
+                       curl_setopt($curl, CURLOPT_RETURNTRANSFER, 1);\r
+\r
+                       if($this->debug)\r
+                       {\r
+                               curl_setopt($curl, CURLOPT_VERBOSE, 1);\r
+                       }\r
+                       curl_setopt($curl, CURLOPT_USERAGENT, $GLOBALS['xmlrpcName'].' '.$GLOBALS['xmlrpcVersion']);\r
+                       // required for XMLRPC: post the data\r
+                       curl_setopt($curl, CURLOPT_POST, 1);\r
+                       // the data\r
+                       curl_setopt($curl, CURLOPT_POSTFIELDS, $payload);\r
+\r
+                       // return the header too\r
+                       curl_setopt($curl, CURLOPT_HEADER, 1);\r
+\r
+                       // will only work with PHP >= 5.0\r
+                       // NB: if we set an empty string, CURL will add http header indicating\r
+                       // ALL methods it is supporting. This is possibly a better option than\r
+                       // letting the user tell what curl can / cannot do...\r
+                       if(is_array($this->accepted_compression) && count($this->accepted_compression))\r
+                       {\r
+                               //curl_setopt($curl, CURLOPT_ENCODING, implode(',', $this->accepted_compression));\r
+                               // empty string means 'any supported by CURL' (shall we catch errors in case CURLOPT_SSLKEY undefined ?)\r
+                               if (count($this->accepted_compression) == 1)\r
+                               {\r
+                                       curl_setopt($curl, CURLOPT_ENCODING, $this->accepted_compression[0]);\r
+                               }\r
+                               else\r
+                                       curl_setopt($curl, CURLOPT_ENCODING, '');\r
+                       }\r
+                       // extra headers\r
+                       $headers = array('Content-Type: ' . $msg->content_type , 'Accept-Charset: ' . implode(',', $this->accepted_charset_encodings));\r
+                       // if no keepalive is wanted, let the server know it in advance\r
+                       if(!$keepalive)\r
+                       {\r
+                               $headers[] = 'Connection: close';\r
+                       }\r
+                       // request compression header\r
+                       if($encoding_hdr)\r
+                       {\r
+                               $headers[] = $encoding_hdr;\r
+                       }\r
+\r
+                       curl_setopt($curl, CURLOPT_HTTPHEADER, $headers);\r
+                       // timeout is borked\r
+                       if($timeout)\r
+                       {\r
+                               curl_setopt($curl, CURLOPT_TIMEOUT, $timeout == 1 ? 1 : $timeout - 1);\r
+                       }\r
+\r
+                       if($username && $password)\r
+                       {\r
+                               curl_setopt($curl, CURLOPT_USERPWD, $username.':'.$password);\r
+                               if (defined('CURLOPT_HTTPAUTH'))\r
+                               {\r
+                                       curl_setopt($curl, CURLOPT_HTTPAUTH, $authtype);\r
+                               }\r
+                               else if ($authtype != 1)\r
+                               {\r
+                                       error_log('XML-RPC: xmlrpc_client::send: warning. Only Basic auth is supported by the current PHP/curl install');\r
+                               }\r
+                       }\r
+\r
+                       if($method == 'https')\r
+                       {\r
+                               // set cert file\r
+                               if($cert)\r
+                               {\r
+                                       curl_setopt($curl, CURLOPT_SSLCERT, $cert);\r
+                               }\r
+                               // set cert password\r
+                               if($certpass)\r
+                               {\r
+                                       curl_setopt($curl, CURLOPT_SSLCERTPASSWD, $certpass);\r
+                               }\r
+                               // whether to verify remote host's cert\r
+                               curl_setopt($curl, CURLOPT_SSL_VERIFYPEER, $this->verifypeer);\r
+                               // set ca certificates file/dir\r
+                               if($cacert)\r
+                               {\r
+                                       curl_setopt($curl, CURLOPT_CAINFO, $cacert);\r
+                               }\r
+                               if($cacertdir)\r
+                               {\r
+                                       curl_setopt($curl, CURLOPT_CAPATH, $cacertdir);\r
+                               }\r
+                               // set key file (shall we catch errors in case CURLOPT_SSLKEY undefined ?)\r
+                               if($key)\r
+                               {\r
+                                       curl_setopt($curl, CURLOPT_SSLKEY, $key);\r
+                               }\r
+                               // set key password (shall we catch errors in case CURLOPT_SSLKEY undefined ?)\r
+                               if($keypass)\r
+                               {\r
+                                       curl_setopt($curl, CURLOPT_SSLKEYPASSWD, $keypass);\r
+                               }\r
+                               // whether to verify cert's common name (CN); 0 for no, 1 to verify that it exists, and 2 to verify that it matches the hostname used\r
+                               curl_setopt($curl, CURLOPT_SSL_VERIFYHOST, $this->verifyhost);\r
+                       }\r
+\r
+                       // proxy info\r
+                       if($proxyhost)\r
+                       {\r
+                               if($proxyport == 0)\r
+                               {\r
+                                       $proxyport = 8080; // NB: even for HTTPS, local connection is on port 8080\r
+                               }\r
+                               curl_setopt($curl, CURLOPT_PROXY, $proxyhost.':'.$proxyport);\r
+                               //curl_setopt($curl, CURLOPT_PROXYPORT,$proxyport);\r
+                               if($proxyusername)\r
+                               {\r
+                                       curl_setopt($curl, CURLOPT_PROXYUSERPWD, $proxyusername.':'.$proxypassword);\r
+                                       if (defined('CURLOPT_PROXYAUTH'))\r
+                                       {\r
+                                               curl_setopt($curl, CURLOPT_PROXYAUTH, $proxyauthtype);\r
+                                       }\r
+                                       else if ($proxyauthtype != 1)\r
+                                       {\r
+                                               error_log('XML-RPC: xmlrpc_client::send: warning. Only Basic auth to proxy is supported by the current PHP/curl install');\r
+                                       }\r
+                               }\r
+                       }\r
+\r
+                       // NB: should we build cookie http headers by hand rather than let CURL do it?\r
+                       // the following code does not honour 'expires', 'path' and 'domain' cookie attributes\r
+                       // set to client obj the the user...\r
+                       if (count($this->cookies))\r
+                       {\r
+                               $cookieheader = '';\r
+                               foreach ($this->cookies as $name => $cookie)\r
+                               {\r
+                                       $cookieheader .= $name . '=' . $cookie['value'] . '; ';\r
+                               }\r
+                               curl_setopt($curl, CURLOPT_COOKIE, substr($cookieheader, 0, -2));\r
+                       }\r
+\r
+                       $result = curl_exec($curl);\r
+\r
+                       if ($this->debug > 1)\r
+                       {\r
+                               print "<PRE>\n---CURL INFO---\n";\r
+                               foreach(curl_getinfo($curl) as $name => $val)\r
+                                        print $name . ': ' . htmlentities($val). "\n";\r
+                               print "---END---\n</PRE>";\r
+                       }\r
+\r
+                       if(!$result) /// @todo we should use a better check here - what if we get back '' or '0'?\r
+                       {\r
+                               $this->errstr='no response';\r
+                               $resp=&new xmlrpcresp(0, $GLOBALS['xmlrpcerr']['curl_fail'], $GLOBALS['xmlrpcstr']['curl_fail']. ': '. curl_error($curl));\r
+                               curl_close($curl);\r
+                               if($keepalive)\r
+                               {\r
+                                       $this->xmlrpc_curl_handle = null;\r
+                               }\r
+                       }\r
+                       else\r
+                       {\r
+                               if(!$keepalive)\r
+                               {\r
+                                       curl_close($curl);\r
+                               }\r
+                               $resp =& $msg->parseResponse($result, true, $this->return_type);\r
+                       }\r
+                       return $resp;\r
+               }\r
+\r
+               /**\r
+               * Send an array of request messages and return an array of responses.\r
+               * Unless $this->no_multicall has been set to true, it will try first\r
+               * to use one single xmlrpc call to server method system.multicall, and\r
+               * revert to sending many successive calls in case of failure.\r
+               * This failure is also stored in $this->no_multicall for subsequent calls.\r
+               * Unfortunately, there is no server error code universally used to denote\r
+               * the fact that multicall is unsupported, so there is no way to reliably\r
+               * distinguish between that and a temporary failure.\r
+               * If you are sure that server supports multicall and do not want to\r
+               * fallback to using many single calls, set the fourth parameter to FALSE.\r
+               *\r
+               * NB: trying to shoehorn extra functionality into existing syntax has resulted\r
+               * in pretty much convoluted code...\r
+               *\r
+               * @param array $msgs an array of xmlrpcmsg objects\r
+               * @param integer $timeout connection timeout (in seconds)\r
+               * @param string $method the http protocol variant to be used\r
+               * @param boolean fallback When true, upon receiveing an error during multicall, multiple single calls will be attempted\r
+               * @return array\r
+               * @access public\r
+               */\r
+               function multicall($msgs, $timeout=0, $method='', $fallback=true)\r
+               {\r
+                       if ($method == '')\r
+                       {\r
+                               $method = $this->method;\r
+                       }\r
+                       if(!$this->no_multicall)\r
+                       {\r
+                               $results = $this->_try_multicall($msgs, $timeout, $method);\r
+                               if(is_array($results))\r
+                               {\r
+                                       // System.multicall succeeded\r
+                                       return $results;\r
+                               }\r
+                               else\r
+                               {\r
+                                       // either system.multicall is unsupported by server,\r
+                                       // or call failed for some other reason.\r
+                                       if ($fallback)\r
+                                       {\r
+                                               // Don't try it next time...\r
+                                               $this->no_multicall = true;\r
+                                       }\r
+                                       else\r
+                                       {\r
+                                               if (is_a($results, 'xmlrpcresp'))\r
+                                               {\r
+                                                       $result = $results;\r
+                                               }\r
+                                               else\r
+                                               {\r
+                                                       $result =& new xmlrpcresp(0, $GLOBALS['xmlrpcerr']['multicall_error'], $GLOBALS['xmlrpcstr']['multicall_error']);\r
+                                               }\r
+                                       }\r
+                               }\r
+                       }\r
+                       else\r
+                       {\r
+                               // override fallback, in case careless user tries to do two\r
+                               // opposite things at the same time\r
+                               $fallback = true;\r
+                       }\r
+\r
+                       $results = array();\r
+                       if ($fallback)\r
+                       {\r
+                               // system.multicall is (probably) unsupported by server:\r
+                               // emulate multicall via multiple requests\r
+                               foreach($msgs as $msg)\r
+                               {\r
+                                       $results[] =& $this->send($msg, $timeout, $method);\r
+                               }\r
+                       }\r
+                       else\r
+                       {\r
+                               // user does NOT want to fallback on many single calls:\r
+                               // since we should always return an array of responses,\r
+                               // return an array with the same error repeated n times\r
+                               foreach($msgs as $msg)\r
+                               {\r
+                                       $results[] = $result;\r
+                               }\r
+                       }\r
+                       return $results;\r
+               }\r
+\r
+               /**\r
+               * Attempt to boxcar $msgs via system.multicall.\r
+               * Returns either an array of xmlrpcreponses, an xmlrpc error response\r
+               * or false (when received response does not respect valid multicall syntax)\r
+               * @access private\r
+               */\r
+               function _try_multicall($msgs, $timeout, $method)\r
+               {\r
+                       // Construct multicall message\r
+                       $calls = array();\r
+                       foreach($msgs as $msg)\r
+                       {\r
+                               $call['methodName'] =& new xmlrpcval($msg->method(),'string');\r
+                               $numParams = $msg->getNumParams();\r
+                               $params = array();\r
+                               for($i = 0; $i < $numParams; $i++)\r
+                               {\r
+                                       $params[$i] = $msg->getParam($i);\r
+                               }\r
+                               $call['params'] =& new xmlrpcval($params, 'array');\r
+                               $calls[] =& new xmlrpcval($call, 'struct');\r
+                       }\r
+                       $multicall =& new xmlrpcmsg('system.multicall');\r
+                       $multicall->addParam(new xmlrpcval($calls, 'array'));\r
+\r
+                       // Attempt RPC call\r
+                       $result =& $this->send($multicall, $timeout, $method);\r
+\r
+                       if($result->faultCode() != 0)\r
+                       {\r
+                               // call to system.multicall failed\r
+                               return $result;\r
+                       }\r
+\r
+                       // Unpack responses.\r
+                       $rets = $result->value();\r
+\r
+                       if ($this->return_type == 'xml')\r
+                       {\r
+                                       return $rets;\r
+                       }\r
+                       else if ($this->return_type == 'phpvals')\r
+                       {\r
+                               ///@todo test this code branch...\r
+                               $rets = $result->value();\r
+                               if(!is_array($rets))\r
+                               {\r
+                                       return false;           // bad return type from system.multicall\r
+                               }\r
+                               $numRets = count($rets);\r
+                               if($numRets != count($msgs))\r
+                               {\r
+                                       return false;           // wrong number of return values.\r
+                               }\r
+\r
+                               $response = array();\r
+                               for($i = 0; $i < $numRets; $i++)\r
+                               {\r
+                                       $val = $rets[$i];\r
+                                       if (!is_array($val)) {\r
+                                               return false;\r
+                                       }\r
+                                       switch(count($val))\r
+                                       {\r
+                                               case 1:\r
+                                                       if(!isset($val[0]))\r
+                                                       {\r
+                                                               return false;           // Bad value\r
+                                                       }\r
+                                                       // Normal return value\r
+                                                       $response[$i] =& new xmlrpcresp($val[0], 0, '', 'phpvals');\r
+                                                       break;\r
+                                               case 2:\r
+                                                       ///     @todo remove usage of @: it is apparently quite slow\r
+                                                       $code = @$val['faultCode'];\r
+                                                       if(!is_int($code))\r
+                                                       {\r
+                                                               return false;\r
+                                                       }\r
+                                                       $str = @$val['faultString'];\r
+                                                       if(!is_string($str))\r
+                                                       {\r
+                                                               return false;\r
+                                                       }\r
+                                                       $response[$i] =& new xmlrpcresp(0, $code, $str);\r
+                                                       break;\r
+                                               default:\r
+                                                       return false;\r
+                                       }\r
+                               }\r
+                               return $response;\r
+                       }\r
+                       else // return type == 'xmlrpcvals'\r
+                       {\r
+                               $rets = $result->value();\r
+                               if($rets->kindOf() != 'array')\r
+                               {\r
+                                       return false;           // bad return type from system.multicall\r
+                               }\r
+                               $numRets = $rets->arraysize();\r
+                               if($numRets != count($msgs))\r
+                               {\r
+                                       return false;           // wrong number of return values.\r
+                               }\r
+\r
+                               $response = array();\r
+                               for($i = 0; $i < $numRets; $i++)\r
+                               {\r
+                                       $val = $rets->arraymem($i);\r
+                                       switch($val->kindOf())\r
+                                       {\r
+                                               case 'array':\r
+                                                       if($val->arraysize() != 1)\r
+                                                       {\r
+                                                               return false;           // Bad value\r
+                                                       }\r
+                                                       // Normal return value\r
+                                                       $response[$i] =& new xmlrpcresp($val->arraymem(0));\r
+                                                       break;\r
+                                               case 'struct':\r
+                                                       $code = $val->structmem('faultCode');\r
+                                                       if($code->kindOf() != 'scalar' || $code->scalartyp() != 'int')\r
+                                                       {\r
+                                                               return false;\r
+                                                       }\r
+                                                       $str = $val->structmem('faultString');\r
+                                                       if($str->kindOf() != 'scalar' || $str->scalartyp() != 'string')\r
+                                                       {\r
+                                                               return false;\r
+                                                       }\r
+                                                       $response[$i] =& new xmlrpcresp(0, $code->scalarval(), $str->scalarval());\r
+                                                       break;\r
+                                               default:\r
+                                                       return false;\r
+                                       }\r
+                               }\r
+                               return $response;\r
+                       }\r
+               }\r
+       } // end class xmlrpc_client\r
+\r
+       class xmlrpcresp\r
+       {\r
+               var $val = 0;\r
+               var $valtyp;\r
+               var $errno = 0;\r
+               var $errstr = '';\r
+               var $payload;\r
+               var $hdrs = array();\r
+               var $_cookies = array();\r
+               var $content_type = 'text/xml';\r
+               var $raw_data = '';\r
+\r
+               /**\r
+               * @param mixed $val either an xmlrpcval obj, a php value or the xml serialization of an xmlrpcval (a string)\r
+               * @param integer $fcode set it to anything but 0 to create an error response\r
+               * @param string $fstr the error string, in case of an error response\r
+               * @param string $valtyp either 'xmlrpcvals', 'phpvals' or 'xml'\r
+               *\r
+               * @todo add check that $val / $fcode / $fstr is of correct type???\r
+               * NB: as of now we do not do it, since it might be either an xmlrpcval or a plain\r
+               * php val, or a complete xml chunk, depending on usage of xmlrpc_client::send() inside which creator is called...\r
+               */\r
+               function xmlrpcresp($val, $fcode = 0, $fstr = '', $valtyp='')\r
+               {\r
+                       if($fcode != 0)\r
+                       {\r
+                               // error response\r
+                               $this->errno = $fcode;\r
+                               $this->errstr = $fstr;\r
+                               //$this->errstr = htmlspecialchars($fstr); // XXX: encoding probably shouldn't be done here; fix later.\r
+                       }\r
+                       else\r
+                       {\r
+                               // successful response\r
+                               $this->val = $val;\r
+                               if ($valtyp == '')\r
+                               {\r
+                                       // user did not declare type of response value: try to guess it\r
+                                       if (is_object($this->val) && is_a($this->val, 'xmlrpcval'))\r
+                                       {\r
+                                               $this->valtyp = 'xmlrpcvals';\r
+                                       }\r
+                                       else if (is_string($this->val))\r
+                                       {\r
+                                               $this->valtyp = 'xml';\r
+\r
+                                       }\r
+                                       else\r
+                                       {\r
+                                               $this->valtyp = 'phpvals';\r
+                                       }\r
+                               }\r
+                               else\r
+                               {\r
+                                       // user declares type of resp value: believe him\r
+                                       $this->valtyp = $valtyp;\r
+                               }\r
+                       }\r
+               }\r
+\r
+               /**\r
+               * Returns the error code of the response.\r
+               * @return integer the error code of this response (0 for not-error responses)\r
+               * @access public\r
+               */\r
+               function faultCode()\r
+               {\r
+                       return $this->errno;\r
+               }\r
+\r
+               /**\r
+               * Returns the error code of the response.\r
+               * @return string the error string of this response ('' for not-error responses)\r
+               * @access public\r
+               */\r
+               function faultString()\r
+               {\r
+                       return $this->errstr;\r
+               }\r
+\r
+               /**\r
+               * Returns the value received by the server.\r
+               * @return mixed the xmlrpcval object returned by the server. Might be an xml string or php value if the response has been created by specially configured xmlrpc_client objects\r
+               * @access public\r
+               */\r
+               function value()\r
+               {\r
+                       return $this->val;\r
+               }\r
+\r
+               /**\r
+               * Returns an array with the cookies received from the server.\r
+               * Array has the form: $cookiename => array ('value' => $val, $attr1 => $val1, $attr2 = $val2, ...)\r
+               * with attributes being e.g. 'expires', 'path', domain'.\r
+               * NB: cookies sent as 'expired' by the server (i.e. with an expiry date in the past)\r
+               * are still present in the array. It is up to the user-defined code to decide\r
+               * how to use the received cookies, and wheter they have to be sent back with the next\r
+               * request to the server (using xmlrpc_client::setCookie) or not\r
+               * @return array array of cookies received from the server\r
+               * @access public\r
+               */\r
+               function cookies()\r
+               {\r
+                       return $this->_cookies;\r
+               }\r
+\r
+               /**\r
+               * Returns xml representation of the response. XML prologue not included\r
+               * @param string $charset_encoding the charset to be used for serialization. if null, US-ASCII is assumed\r
+               * @return string the xml representation of the response\r
+               * @access public\r
+               */\r
+               function serialize($charset_encoding='')\r
+               {\r
+                       if ($charset_encoding != '')\r
+                               $this->content_type = 'text/xml; charset=' . $charset_encoding;\r
+                       else\r
+                               $this->content_type = 'text/xml';\r
+                       $result = "<methodResponse>\n";\r
+                       if($this->errno)\r
+                       {\r
+                               // G. Giunta 2005/2/13: let non-ASCII response messages be tolerated by clients\r
+                               // by xml-encoding non ascii chars\r
+                               $result .= "<fault>\n" .\r
+"<value>\n<struct><member><name>faultCode</name>\n<value><int>" . $this->errno .\r
+"</int></value>\n</member>\n<member>\n<name>faultString</name>\n<value><string>" .\r
+xmlrpc_encode_entitites($this->errstr, $GLOBALS['xmlrpc_internalencoding'], $charset_encoding) . "</string></value>\n</member>\n" .\r
+"</struct>\n</value>\n</fault>";\r
+                       }\r
+                       else\r
+                       {\r
+                               if(!is_object($this->val) || !is_a($this->val, 'xmlrpcval'))\r
+                               {\r
+                                       if (is_string($this->val) && $this->valtyp == 'xml')\r
+                                       {\r
+                                               $result .= "<params>\n<param>\n" .\r
+                                                       $this->val .\r
+                                                       "</param>\n</params>";\r
+                                       }\r
+                                       else\r
+                                       {\r
+                                               /// @todo try to build something serializable?\r
+                                               die('cannot serialize xmlrpcresp objects whose content is native php values');\r
+                                       }\r
+                               }\r
+                               else\r
+                               {\r
+                                       $result .= "<params>\n<param>\n" .\r
+                                               $this->val->serialize($charset_encoding) .\r
+                                               "</param>\n</params>";\r
+                               }\r
+                       }\r
+                       $result .= "\n</methodResponse>";\r
+                       $this->payload = $result;\r
+                       return $result;\r
+               }\r
+       }\r
+\r
+       class xmlrpcmsg\r
+       {\r
+               var $payload;\r
+               var $methodname;\r
+               var $params=array();\r
+               var $debug=0;\r
+               var $content_type = 'text/xml';\r
+\r
+               /**\r
+               * @param string $meth the name of the method to invoke\r
+               * @param array $pars array of parameters to be paased to the method (xmlrpcval objects)\r
+               */\r
+               function xmlrpcmsg($meth, $pars=0)\r
+               {\r
+                       $this->methodname=$meth;\r
+                       if(is_array($pars) && count($pars)>0)\r
+                       {\r
+                               for($i=0; $i<count($pars); $i++)\r
+                               {\r
+                                       $this->addParam($pars[$i]);\r
+                               }\r
+                       }\r
+               }\r
+\r
+               /**\r
+               * @access private\r
+               */\r
+               function xml_header($charset_encoding='')\r
+               {\r
+                       if ($charset_encoding != '')\r
+                       {\r
+                               return "<?xml version=\"1.0\" encoding=\"$charset_encoding\" ?" . ">\n<methodCall>\n";\r
+                       }\r
+                       else\r
+                       {\r
+                               return "<?xml version=\"1.0\"?" . ">\n<methodCall>\n";\r
+                       }\r
+               }\r
+\r
+               /**\r
+               * @access private\r
+               */\r
+               function xml_footer()\r
+               {\r
+                       return '</methodCall>';\r
+               }\r
+\r
+               /**\r
+               * @access private\r
+               */\r
+               function kindOf()\r
+               {\r
+                       return 'msg';\r
+               }\r
+\r
+               /**\r
+               * @access private\r
+               */\r
+               function createPayload($charset_encoding='')\r
+               {\r
+                       if ($charset_encoding != '')\r
+                               $this->content_type = 'text/xml; charset=' . $charset_encoding;\r
+                       else\r
+                               $this->content_type = 'text/xml';\r
+                       $this->payload=$this->xml_header($charset_encoding);\r
+                       $this->payload.='<methodName>' . $this->methodname . "</methodName>\n";\r
+                       $this->payload.="<params>\n";\r
+                       for($i=0; $i<count($this->params); $i++)\r
+                       {\r
+                               $p=$this->params[$i];\r
+                               $this->payload.="<param>\n" . $p->serialize($charset_encoding) .\r
+                               "</param>\n";\r
+                       }\r
+                       $this->payload.="</params>\n";\r
+                       $this->payload.=$this->xml_footer();\r
+               }\r
+\r
+               /**\r
+               * Gets/sets the xmlrpc method to be invoked\r
+               * @param string $meth the method to be set (leave empty not to set it)\r
+               * @return string the method that will be invoked\r
+               * @access public\r
+               */\r
+               function method($meth='')\r
+               {\r
+                       if($meth!='')\r
+                       {\r
+                               $this->methodname=$meth;\r
+                       }\r
+                       return $this->methodname;\r
+               }\r
+\r
+               /**\r
+               * Returns xml representation of the message. XML prologue included\r
+               * @return string the xml representation of the message, xml prologue included\r
+               * @access public\r
+               */\r
+               function serialize($charset_encoding='')\r
+               {\r
+                       $this->createPayload($charset_encoding);\r
+                       return $this->payload;\r
+               }\r
+\r
+               /**\r
+               * Add a parameter to the list of parameters to be used upon method invocation\r
+               * @param xmlrpcval $par\r
+               * @return boolean false on failure\r
+               * @access public\r
+               */\r
+               function addParam($par)\r
+               {\r
+                       // add check: do not add to self params which are not xmlrpcvals\r
+                       if(is_object($par) && is_a($par, 'xmlrpcval'))\r
+                       {\r
+                               $this->params[]=$par;\r
+                               return true;\r
+                       }\r
+                       else\r
+                       {\r
+                               return false;\r
+                       }\r
+               }\r
+\r
+               /**\r
+               * Returns the nth parameter in the message. The index zero-based.\r
+               * @param integer $i the index of the parameter to fetch (zero based)\r
+               * @return xmlrpcval the i-th parameter\r
+               * @access public\r
+               */\r
+               function getParam($i) { return $this->params[$i]; }\r
+\r
+               /**\r
+               * Returns the number of parameters in the messge.\r
+               * @return integer the number of parameters currently set\r
+               * @access public\r
+               */\r
+               function getNumParams() { return count($this->params); }\r
+\r
+               /**\r
+               * Given an open file handle, read all data available and parse it as axmlrpc response.\r
+               * NB: the file handle is not closed by this function.\r
+               * NNB: might have trouble in rare cases to work on network streams, as we\r
+        *      check for a read of 0 bytes instead of feof($fp).\r
+               *      But since checking for feof(null) returns false, we would risk an\r
+               *      infinite loop in that case, because we cannot trust the caller\r
+               *      to give us a valid pointer to an open file...\r
+               * @access public\r
+               * @return xmlrpcresp\r
+               * @todo add 2nd & 3rd param to be passed to ParseResponse() ???\r
+               */\r
+               function &parseResponseFile($fp)\r
+               {\r
+                       $ipd='';\r
+                       while($data=fread($fp, 32768))\r
+                       {\r
+                               $ipd.=$data;\r
+                       }\r
+                       //fclose($fp);\r
+                       $r =& $this->parseResponse($ipd);\r
+                       return $r;\r
+               }\r
+\r
+               /**\r
+               * Parses HTTP headers and separates them from data.\r
+               * @access private\r
+               */\r
+               function &parseResponseHeaders(&$data, $headers_processed=false)\r
+               {\r
+                               // Support "web-proxy-tunelling" connections for https through proxies\r
+                               if(preg_match('/^HTTP\/1\.[0-1] 200 Connection established/', $data))\r
+                               {\r
+                                       // Look for CR/LF or simple LF as line separator,\r
+                                       // (even though it is not valid http)\r
+                                       $pos = strpos($data,"\r\n\r\n");\r
+                                       if($pos || is_int($pos))\r
+                                       {\r
+                                               $bd = $pos+4;\r
+                                       }\r
+                                       else\r
+                                       {\r
+                                               $pos = strpos($data,"\n\n");\r
+                                               if($pos || is_int($pos))\r
+                                               {\r
+                                                       $bd = $pos+2;\r
+                                               }\r
+                                               else\r
+                                               {\r
+                                                       // No separation between response headers and body: fault?\r
+                                                       $bd = 0;\r
+                                               }\r
+                                       }\r
+                                       if ($bd)\r
+                                       {\r
+                                               // this filters out all http headers from proxy.\r
+                                               // maybe we could take them into account, too?\r
+                                               $data = substr($data, $bd);\r
+                                       }\r
+                                       else\r
+                                       {\r
+                                               error_log('XML-RPC: xmlrpcmsg::parseResponse: HTTPS via proxy error, tunnel connection possibly failed');\r
+                                               $r=&new xmlrpcresp(0, $GLOBALS['xmlrpcerr']['http_error'], $GLOBALS['xmlrpcstr']['http_error']. ' (HTTPS via proxy error, tunnel connection possibly failed)');\r
+                                               return $r;\r
+                                       }\r
+                               }\r
+\r
+                               // Strip HTTP 1.1 100 Continue header if present\r
+                               while(preg_match('/^HTTP\/1\.1 1[0-9]{2} /', $data))\r
+                               {\r
+                                       $pos = strpos($data, 'HTTP', 12);\r
+                                       // server sent a Continue header without any (valid) content following...\r
+                                       // give the client a chance to know it\r
+                                       if(!$pos && !is_int($pos)) // works fine in php 3, 4 and 5\r
+                                       {\r
+                                               break;\r
+                                       }\r
+                                       $data = substr($data, $pos);\r
+                               }\r
+                               if(!preg_match('/^HTTP\/[0-9.]+ 200 /', $data))\r
+                               {\r
+                                       $errstr= substr($data, 0, strpos($data, "\n")-1);\r
+                                       error_log('XML-RPC: xmlrpcmsg::parseResponse: HTTP error, got response: ' .$errstr);\r
+                                       $r=&new xmlrpcresp(0, $GLOBALS['xmlrpcerr']['http_error'], $GLOBALS['xmlrpcstr']['http_error']. ' (' . $errstr . ')');\r
+                                       return $r;\r
+                               }\r
+\r
+                               $GLOBALS['_xh']['headers'] = array();\r
+                               $GLOBALS['_xh']['cookies'] = array();\r
+\r
+                               // be tolerant to usage of \n instead of \r\n to separate headers and data\r
+                               // (even though it is not valid http)\r
+                               $pos = strpos($data,"\r\n\r\n");\r
+                               if($pos || is_int($pos))\r
+                               {\r
+                                       $bd = $pos+4;\r
+                               }\r
+                               else\r
+                               {\r
+                                       $pos = strpos($data,"\n\n");\r
+                                       if($pos || is_int($pos))\r
+                                       {\r
+                                               $bd = $pos+2;\r
+                                       }\r
+                                       else\r
+                                       {\r
+                                               // No separation between response headers and body: fault?\r
+                                               // we could take some action here instead of going on...\r
+                                               $bd = 0;\r
+                                       }\r
+                               }\r
+                               // be tolerant to line endings, and extra empty lines\r
+                               $ar = split("\r?\n", trim(substr($data, 0, $pos)));\r
+                               while(list(,$line) = @each($ar))\r
+                               {\r
+                                       // take care of multi-line headers and cookies\r
+                                       $arr = explode(':',$line,2);\r
+                                       if(count($arr) > 1)\r
+                                       {\r
+                                               $header_name = strtolower(trim($arr[0]));\r
+                                               /// @todo some other headers (the ones that allow a CSV list of values)\r
+                                               /// do allow many values to be passed using multiple header lines.\r
+                                               /// We should add content to $GLOBALS['_xh']['headers'][$header_name]\r
+                                               /// instead of replacing it for those...\r
+                                               if ($header_name == 'set-cookie' || $header_name == 'set-cookie2')\r
+                                               {\r
+                                                       if ($header_name == 'set-cookie2')\r
+                                                       {\r
+                                                               // version 2 cookies:\r
+                                                               // there could be many cookies on one line, comma separated\r
+                                                               $cookies = explode(',', $arr[1]);\r
+                                                       }\r
+                                                       else\r
+                                                       {\r
+                                                               $cookies = array($arr[1]);\r
+                                                       }\r
+                                                       foreach ($cookies as $cookie)\r
+                                                       {\r
+                                                               // glue together all received cookies, using a comma to separate them\r
+                                                               // (same as php does with getallheaders())\r
+                                                               if (isset($GLOBALS['_xh']['headers'][$header_name]))\r
+                                                                       $GLOBALS['_xh']['headers'][$header_name] .= ', ' . trim($cookie);\r
+                                                               else\r
+                                                                       $GLOBALS['_xh']['headers'][$header_name] = trim($cookie);\r
+                                                               // parse cookie attributes, in case user wants to correctly honour them\r
+                                                               // feature creep: only allow rfc-compliant cookie attributes?\r
+                                                               // @todo support for server sending multiple time cookie with same name, but using different PATHs\r
+                                                               $cookie = explode(';', $cookie);\r
+                                                               foreach ($cookie as $pos => $val)\r
+                                                               {\r
+                                                                       $val = explode('=', $val, 2);\r
+                                                                       $tag = trim($val[0]);\r
+                                                                       $val = trim(@$val[1]);\r
+                                                                       /// @todo with version 1 cookies, we should strip leading and trailing " chars\r
+                                                                       if ($pos == 0)\r
+                                                                       {\r
+                                                                               $cookiename = $tag;\r
+                                                                               $GLOBALS['_xh']['cookies'][$tag] = array();\r
+                                                                               $GLOBALS['_xh']['cookies'][$cookiename]['value'] = urldecode($val);\r
+                                                                       }\r
+                                                                       else\r
+                                                                       {\r
+                                                                               if ($tag != 'value')\r
+                                                                               {\r
+                                                                                 $GLOBALS['_xh']['cookies'][$cookiename][$tag] = $val;\r
+                                                                               }\r
+                                                                       }\r
+                                                               }\r
+                                                       }\r
+                                               }\r
+                                               else\r
+                                               {\r
+                                                       $GLOBALS['_xh']['headers'][$header_name] = trim($arr[1]);\r
+                                               }\r
+                                       }\r
+                                       elseif(isset($header_name))\r
+                                       {\r
+                                               ///     @todo version1 cookies might span multiple lines, thus breaking the parsing above\r
+                                               $GLOBALS['_xh']['headers'][$header_name] .= ' ' . trim($line);\r
+                                       }\r
+                               }\r
+\r
+                               $data = substr($data, $bd);\r
+\r
+                               if($this->debug && count($GLOBALS['_xh']['headers']))\r
+                               {\r
+                                       print '<PRE>';\r
+                                       foreach($GLOBALS['_xh']['headers'] as $header => $value)\r
+                                       {\r
+                                               print htmlentities("HEADER: $header: $value\n");\r
+                                       }\r
+                                       foreach($GLOBALS['_xh']['cookies'] as $header => $value)\r
+                                       {\r
+                                               print htmlentities("COOKIE: $header={$value['value']}\n");\r
+                                       }\r
+                                       print "</PRE>\n";\r
+                               }\r
+\r
+                               // if CURL was used for the call, http headers have been processed,\r
+                               // and dechunking + reinflating have been carried out\r
+                               if(!$headers_processed)\r
+                               {\r
+                                       // Decode chunked encoding sent by http 1.1 servers\r
+                                       if(isset($GLOBALS['_xh']['headers']['transfer-encoding']) && $GLOBALS['_xh']['headers']['transfer-encoding'] == 'chunked')\r
+                                       {\r
+                                               if(!$data = decode_chunked($data))\r
+                                               {\r
+                                                       error_log('XML-RPC: xmlrpcmsg::parseResponse: errors occurred when trying to rebuild the chunked data received from server');\r
+                                                       $r =& new xmlrpcresp(0, $GLOBALS['xmlrpcerr']['dechunk_fail'], $GLOBALS['xmlrpcstr']['dechunk_fail']);\r
+                                                       return $r;\r
+                                               }\r
+                                       }\r
+\r
+                                       // Decode gzip-compressed stuff\r
+                                       // code shamelessly inspired from nusoap library by Dietrich Ayala\r
+                                       if(isset($GLOBALS['_xh']['headers']['content-encoding']))\r
+                                       {\r
+                                               $GLOBALS['_xh']['headers']['content-encoding'] = str_replace('x-', '', $GLOBALS['_xh']['headers']['content-encoding']);\r
+                                               if($GLOBALS['_xh']['headers']['content-encoding'] == 'deflate' || $GLOBALS['_xh']['headers']['content-encoding'] == 'gzip')\r
+                                               {\r
+                                                       // if decoding works, use it. else assume data wasn't gzencoded\r
+                                                       if(function_exists('gzinflate'))\r
+                                                       {\r
+                                                               if($GLOBALS['_xh']['headers']['content-encoding'] == 'deflate' && $degzdata = @gzuncompress($data))\r
+                                                               {\r
+                                                                       $data = $degzdata;\r
+                                                                       if($this->debug)\r
+                                                                       print "<PRE>---INFLATED RESPONSE---[".strlen($data)." chars]---\n" . htmlentities($data) . "\n---END---</PRE>";\r
+                                                               }\r
+                                                               elseif($GLOBALS['_xh']['headers']['content-encoding'] == 'gzip' && $degzdata = @gzinflate(substr($data, 10)))\r
+                                                               {\r
+                                                                       $data = $degzdata;\r
+                                                                       if($this->debug)\r
+                                                                       print "<PRE>---INFLATED RESPONSE---[".strlen($data)." chars]---\n" . htmlentities($data) . "\n---END---</PRE>";\r
+                                                               }\r
+                                                               else\r
+                                                               {\r
+                                                                       error_log('XML-RPC: xmlrpcmsg::parseResponse: errors occurred when trying to decode the deflated data received from server');\r
+                                                                       $r =& new xmlrpcresp(0, $GLOBALS['xmlrpcerr']['decompress_fail'], $GLOBALS['xmlrpcstr']['decompress_fail']);\r
+                                                                       return $r;\r
+                                                               }\r
+                                                       }\r
+                                                       else\r
+                                                       {\r
+                                                               error_log('XML-RPC: xmlrpcmsg::parseResponse: the server sent deflated data. Your php install must have the Zlib extension compiled in to support this.');\r
+                                                               $r =& new xmlrpcresp(0, $GLOBALS['xmlrpcerr']['cannot_decompress'], $GLOBALS['xmlrpcstr']['cannot_decompress']);\r
+                                                               return $r;\r
+                                                       }\r
+                                               }\r
+                                       }\r
+                               } // end of 'if needed, de-chunk, re-inflate response'\r
+\r
+                               // real stupid hack to avoid PHP 4 complaining about returning NULL by ref\r
+                               $r = null;\r
+                               $r =& $r;\r
+                               return $r;\r
+               }\r
+\r
+               /**\r
+               * Parse the xmlrpc response contained in the string $data and return an xmlrpcresp object.\r
+               * @param string $data the xmlrpc response, eventually including http headers\r
+               * @param bool $headers_processed when true prevents parsing HTTP headers for interpretation of content-encoding and consequent decoding\r
+               * @param string $return_type decides return type, i.e. content of response->value(). Either 'xmlrpcvals', 'xml' or 'phpvals'\r
+               * @return xmlrpcresp\r
+               * @access public\r
+               */\r
+               function &parseResponse($data='', $headers_processed=false, $return_type='xmlrpcvals')\r
+               {\r
+                       if($this->debug)\r
+                       {\r
+                               //by maHo, replaced htmlspecialchars with htmlentities\r
+                               print "<PRE>---GOT---\n" . htmlentities($data) . "\n---END---\n</PRE>";\r
+                       }\r
+\r
+                       if($data == '')\r
+                       {\r
+                               error_log('XML-RPC: xmlrpcmsg::parseResponse: no response received from server.');\r
+                               $r =& new xmlrpcresp(0, $GLOBALS['xmlrpcerr']['no_data'], $GLOBALS['xmlrpcstr']['no_data']);\r
+                               return $r;\r
+                       }\r
+\r
+                       $GLOBALS['_xh']=array();\r
+\r
+                       $raw_data = $data;\r
+                       // parse the HTTP headers of the response, if present, and separate them from data\r
+                       if(substr($data, 0, 4) == 'HTTP')\r
+                       {\r
+                               $r =& $this->parseResponseHeaders($data, $headers_processed);\r
+                               if ($r)\r
+                               {\r
+                                       // failed processing of HTTP response headers\r
+                                       // save into response obj the full payload received, for debugging\r
+                                       $r->raw_data = $data;\r
+                                       return $r;\r
+                               }\r
+                       }\r
+                       else\r
+                       {\r
+                               $GLOBALS['_xh']['headers'] = array();\r
+                               $GLOBALS['_xh']['cookies'] = array();\r
+                       }\r
+\r
+                       if($this->debug)\r
+                       {\r
+                               $start = strpos($data, '<!-- SERVER DEBUG INFO (BASE64 ENCODED):');\r
+                               if ($start)\r
+                               {\r
+                                       $start += strlen('<!-- SERVER DEBUG INFO (BASE64 ENCODED):');\r
+                                       $end = strpos($data, '-->', $start);\r
+                                       $comments = substr($data, $start, $end-$start);\r
+                                       print "<PRE>---SERVER DEBUG INFO (DECODED) ---\n\t".htmlentities(str_replace("\n", "\n\t", base64_decode($comments)))."\n---END---\n</PRE>";\r
+                               }\r
+                       }\r
+\r
+                       // be tolerant of extra whitespace in response body\r
+                       $data = trim($data);\r
+\r
+                       /// @todo return an error msg if $data=='' ?\r
+\r
+                       // be tolerant of junk after methodResponse (e.g. javascript ads automatically inserted by free hosts)\r
+                       // idea from Luca Mariano <luca.mariano@email.it> originally in PEARified version of the lib\r
+                       $bd = false;\r
+                       // Poor man's version of strrpos for php 4...\r
+                       $pos = strpos($data, '</methodResponse>');\r
+                       while($pos || is_int($pos))\r
+                       {\r
+                               $bd = $pos+17;\r
+                               $pos = strpos($data, '</methodResponse>', $bd);\r
+                       }\r
+                       if($bd)\r
+                       {\r
+                               $data = substr($data, 0, $bd);\r
+                       }\r
+\r
+                       // if user wants back raw xml, give it to him\r
+                       if ($return_type == 'xml')\r
+                       {\r
+                               $r =& new xmlrpcresp($data, 0, '', 'xml');\r
+                               $r->hdrs = $GLOBALS['_xh']['headers'];\r
+                               $r->_cookies = $GLOBALS['_xh']['cookies'];\r
+                               $r->raw_data = $raw_data;\r
+                               return $r;\r
+                       }\r
+\r
+                       // try to 'guestimate' the character encoding of the received response\r
+                       $resp_encoding = guess_encoding(@$GLOBALS['_xh']['headers']['content-type'], $data);\r
+\r
+                       $GLOBALS['_xh']['ac']='';\r
+                       //$GLOBALS['_xh']['qt']=''; //unused...\r
+                       $GLOBALS['_xh']['stack'] = array();\r
+                       $GLOBALS['_xh']['valuestack'] = array();\r
+                       $GLOBALS['_xh']['isf']=0; // 0 = OK, 1 for xmlrpc fault responses, 2 = invalid xmlrpc\r
+                       $GLOBALS['_xh']['isf_reason']='';\r
+                       $GLOBALS['_xh']['rt']=''; // 'methodcall or 'methodresponse'\r
+\r
+                       // if response charset encoding is not known / supported, try to use\r
+                       // the default encoding and parse the xml anyway, but log a warning...\r
+                       if (!in_array($resp_encoding, array('UTF-8', 'ISO-8859-1', 'US-ASCII')))\r
+                       // the following code might be better for mb_string enabled installs, but\r
+                       // makes the lib about 200% slower...\r
+                       //if (!is_valid_charset($resp_encoding, array('UTF-8', 'ISO-8859-1', 'US-ASCII')))\r
+                       {\r
+                               error_log('XML-RPC: xmlrpcmsg::parseResponse: invalid charset encoding of received response: '.$resp_encoding);\r
+                               $resp_encoding = $GLOBALS['xmlrpc_defencoding'];\r
+                       }\r
+                       $parser = xml_parser_create($resp_encoding);\r
+                       xml_parser_set_option($parser, XML_OPTION_CASE_FOLDING, true);\r
+                       // G. Giunta 2005/02/13: PHP internally uses ISO-8859-1, so we have to tell\r
+                       // the xml parser to give us back data in the expected charset.\r
+                       // What if internal encoding is not in one of the 3 allowed?\r
+                       // we use the broadest one, ie. utf8\r
+                       // This allows to send data which is native in various charset,\r
+                       // by extending xmlrpc_encode_entitites() and setting xmlrpc_internalencoding\r
+                       if (!in_array($GLOBALS['xmlrpc_internalencoding'], array('UTF-8', 'ISO-8859-1', 'US-ASCII')))\r
+                       {\r
+                               xml_parser_set_option($parser, XML_OPTION_TARGET_ENCODING, 'UTF-8');\r
+                       }\r
+                       else\r
+                       {\r
+                               xml_parser_set_option($parser, XML_OPTION_TARGET_ENCODING, $GLOBALS['xmlrpc_internalencoding']);\r
+                       }\r
+\r
+                       if ($return_type == 'phpvals')\r
+                       {\r
+                               xml_set_element_handler($parser, 'xmlrpc_se', 'xmlrpc_ee_fast');\r
+                       }\r
+                       else\r
+                       {\r
+                               xml_set_element_handler($parser, 'xmlrpc_se', 'xmlrpc_ee');\r
+                       }\r
+\r
+                       xml_set_character_data_handler($parser, 'xmlrpc_cd');\r
+                       xml_set_default_handler($parser, 'xmlrpc_dh');\r
+\r
+                       // first error check: xml not well formed\r
+                       if(!xml_parse($parser, $data, count($data)))\r
+                       {\r
+                               // thanks to Peter Kocks <peter.kocks@baygate.com>\r
+                               if((xml_get_current_line_number($parser)) == 1)\r
+                               {\r
+                                       $errstr = 'XML error at line 1, check URL';\r
+                               }\r
+                               else\r
+                               {\r
+                                       $errstr = sprintf('XML error: %s at line %d, column %d',\r
+                                               xml_error_string(xml_get_error_code($parser)),\r
+                                               xml_get_current_line_number($parser), xml_get_current_column_number($parser));\r
+                               }\r
+                               error_log($errstr);\r
+                               $r=&new xmlrpcresp(0, $GLOBALS['xmlrpcerr']['invalid_return'], $GLOBALS['xmlrpcstr']['invalid_return'].' ('.$errstr.')');\r
+                               xml_parser_free($parser);\r
+                               if($this->debug)\r
+                               {\r
+                                       print $errstr;\r
+                               }\r
+                               $r->hdrs = $GLOBALS['_xh']['headers'];\r
+                               $r->_cookies = $GLOBALS['_xh']['cookies'];\r
+                               $r->raw_data = $raw_data;\r
+                               return $r;\r
+                       }\r
+                       xml_parser_free($parser);\r
+                       // second error check: xml well formed but not xml-rpc compliant\r
+                       if ($GLOBALS['_xh']['isf'] > 1)\r
+                       {\r
+                               if ($this->debug)\r
+                               {\r
+                                       /// @todo echo something for user?\r
+                               }\r
+\r
+                               $r =& new xmlrpcresp(0, $GLOBALS['xmlrpcerr']['invalid_return'],\r
+                               $GLOBALS['xmlrpcstr']['invalid_return'] . ' ' . $GLOBALS['_xh']['isf_reason']);\r
+                       }\r
+                       // third error check: parsing of the response has somehow gone boink.\r
+                       // NB: shall we omit this check, since we trust the parsing code?\r
+                       elseif ($return_type == 'xmlrpcvals' && !is_object($GLOBALS['_xh']['value']))\r
+                       {\r
+                               // something odd has happened\r
+                               // and it's time to generate a client side error\r
+                               // indicating something odd went on\r
+                               $r=&new xmlrpcresp(0, $GLOBALS['xmlrpcerr']['invalid_return'],\r
+                                       $GLOBALS['xmlrpcstr']['invalid_return']);\r
+                       }\r
+                       else\r
+                       {\r
+                               if ($this->debug)\r
+                               {\r
+                                       print "<PRE>---PARSED---\n";\r
+                                       // somehow htmlentities chokes on var_export, and some full html string...\r
+                                       //print htmlentitites(var_export($GLOBALS['_xh']['value'], true));\r
+                                       print htmlspecialchars(var_export($GLOBALS['_xh']['value'], true));\r
+                                       print "\n---END---</PRE>";\r
+                               }\r
+\r
+                               // note that using =& will raise an error if $GLOBALS['_xh']['st'] does not generate an object.\r
+                               $v =& $GLOBALS['_xh']['value'];\r
+\r
+                               if($GLOBALS['_xh']['isf'])\r
+                               {\r
+                                       /// @todo we should test here if server sent an int and a string,\r
+                                       /// and/or coerce them into such...\r
+                                       if ($return_type == 'xmlrpcvals')\r
+                                       {\r
+                                               $errno_v = $v->structmem('faultCode');\r
+                                               $errstr_v = $v->structmem('faultString');\r
+                                               $errno = $errno_v->scalarval();\r
+                                               $errstr = $errstr_v->scalarval();\r
+                                       }\r
+                                       else\r
+                                       {\r
+                                               $errno = $v['faultCode'];\r
+                                               $errstr = $v['faultString'];\r
+                                       }\r
+\r
+                                       if($errno == 0)\r
+                                       {\r
+                                               // FAULT returned, errno needs to reflect that\r
+                                               $errno = -1;\r
+                                       }\r
+\r
+                                       $r =& new xmlrpcresp(0, $errno, $errstr);\r
+                               }\r
+                               else\r
+                               {\r
+                                       $r=&new xmlrpcresp($v, 0, '', $return_type);\r
+                               }\r
+                       }\r
+\r
+                       $r->hdrs = $GLOBALS['_xh']['headers'];\r
+                       $r->_cookies = $GLOBALS['_xh']['cookies'];\r
+                       $r->raw_data = $raw_data;\r
+                       return $r;\r
+               }\r
+       }\r
+\r
+       class xmlrpcval\r
+       {\r
+               var $me=array();\r
+               var $mytype=0;\r
+               var $_php_class=null;\r
+\r
+               /**\r
+               * @param mixed $val\r
+               * @param string $type any valid xmlrpc type name (lowercase). If null, 'string' is assumed\r
+               */\r
+               function xmlrpcval($val=-1, $type='')\r
+               {\r
+                       /// @todo: optimization creep - do not call addXX, do it all inline.\r
+                       /// downside: booleans will not be coerced anymore\r
+                       if($val!==-1 || $type!='')\r
+                       {\r
+                               // optimization creep: inlined all work done by constructor\r
+                               switch($type)\r
+                               {\r
+                                       case '':\r
+                                               $this->mytype=1;\r
+                                               $this->me['string']=$val;\r
+                                               break;\r
+                                       case 'i4':\r
+                                       case 'int':\r
+                                       case 'double':\r
+                                       case 'string':\r
+                                       case 'boolean':\r
+                                       case 'dateTime.iso8601':\r
+                                       case 'base64':\r
+                                       case 'null':\r
+                                               $this->mytype=1;\r
+                                               $this->me[$type]=$val;\r
+                                               break;\r
+                                       case 'array':\r
+                                               $this->mytype=2;\r
+                                               $this->me['array']=$val;\r
+                                               break;\r
+                                       case 'struct':\r
+                                               $this->mytype=3;\r
+                                               $this->me['struct']=$val;\r
+                                               break;\r
+                                       default:\r
+                                               error_log("XML-RPC: xmlrpcval::xmlrpcval: not a known type ($type)");\r
+                               }\r
+                               /*if($type=='')\r
+                               {\r
+                                       $type='string';\r
+                               }\r
+                               if($GLOBALS['xmlrpcTypes'][$type]==1)\r
+                               {\r
+                                       $this->addScalar($val,$type);\r
+                               }\r
+                               elseif($GLOBALS['xmlrpcTypes'][$type]==2)\r
+                               {\r
+                                       $this->addArray($val);\r
+                               }\r
+                               elseif($GLOBALS['xmlrpcTypes'][$type]==3)\r
+                               {\r
+                                       $this->addStruct($val);\r
+                               }*/\r
+                       }\r
+               }\r
+\r
+               /**\r
+               * Add a single php value to an (unitialized) xmlrpcval\r
+               * @param mixed $val\r
+               * @param string $type\r
+               * @return int 1 or 0 on failure\r
+               */\r
+               function addScalar($val, $type='string')\r
+               {\r
+                       $typeof=@$GLOBALS['xmlrpcTypes'][$type];\r
+                       if($typeof!=1)\r
+                       {\r
+                               error_log("XML-RPC: xmlrpcval::addScalar: not a scalar type ($type)");\r
+                               return 0;\r
+                       }\r
+\r
+                       // coerce booleans into correct values\r
+                       // NB: we should iether do it for datetimes, integers and doubles, too,\r
+                       // or just plain remove this check, implemnted on booleans only...\r
+                       if($type==$GLOBALS['xmlrpcBoolean'])\r
+                       {\r
+                               if(strcasecmp($val,'true')==0 || $val==1 || ($val==true && strcasecmp($val,'false')))\r
+                               {\r
+                                       $val=true;\r
+                               }\r
+                               else\r
+                               {\r
+                                       $val=false;\r
+                               }\r
+                       }\r
+\r
+                       switch($this->mytype)\r
+                       {\r
+                               case 1:\r
+                                       error_log('XML-RPC: xmlrpcval::addScalar: scalar xmlrpcval can have only one value');\r
+                                       return 0;\r
+                               case 3:\r
+                                       error_log('XML-RPC: xmlrpcval::addScalar: cannot add anonymous scalar to struct xmlrpcval');\r
+                                       return 0;\r
+                               case 2:\r
+                                       // we're adding a scalar value to an array here\r
+                                       //$ar=$this->me['array'];\r
+                                       //$ar[]=&new xmlrpcval($val, $type);\r
+                                       //$this->me['array']=$ar;\r
+                                       // Faster (?) avoid all the costly array-copy-by-val done here...\r
+                                       $this->me['array'][]=&new xmlrpcval($val, $type);\r
+                                       return 1;\r
+                               default:\r
+                                       // a scalar, so set the value and remember we're scalar\r
+                                       $this->me[$type]=$val;\r
+                                       $this->mytype=$typeof;\r
+                                       return 1;\r
+                       }\r
+               }\r
+\r
+               /**\r
+               * Add an array of xmlrpcval objects to an xmlrpcval\r
+               * @param array $vals\r
+               * @return int 1 or 0 on failure\r
+               * @access public\r
+               *\r
+               * @todo add some checking for $vals to be an array of xmlrpcvals?\r
+               */\r
+               function addArray($vals)\r
+               {\r
+                       if($this->mytype==0)\r
+                       {\r
+                               $this->mytype=$GLOBALS['xmlrpcTypes']['array'];\r
+                               $this->me['array']=$vals;\r
+                               return 1;\r
+                       }\r
+                       elseif($this->mytype==2)\r
+                       {\r
+                               // we're adding to an array here\r
+                               $this->me['array'] = array_merge($this->me['array'], $vals);\r
+                               return 1;\r
+                       }\r
+                       else\r
+                       {\r
+                               error_log('XML-RPC: xmlrpcval::addArray: already initialized as a [' . $this->kindOf() . ']');\r
+                               return 0;\r
+                       }\r
+               }\r
+\r
+               /**\r
+               * Add an array of named xmlrpcval objects to an xmlrpcval\r
+               * @param array $vals\r
+               * @return int 1 or 0 on failure\r
+               * @access public\r
+               *\r
+               * @todo add some checking for $vals to be an array?\r
+               */\r
+               function addStruct($vals)\r
+               {\r
+                       if($this->mytype==0)\r
+                       {\r
+                               $this->mytype=$GLOBALS['xmlrpcTypes']['struct'];\r
+                               $this->me['struct']=$vals;\r
+                               return 1;\r
+                       }\r
+                       elseif($this->mytype==3)\r
+                       {\r
+                               // we're adding to a struct here\r
+                               $this->me['struct'] = array_merge($this->me['struct'], $vals);\r
+                               return 1;\r
+                       }\r
+                       else\r
+                       {\r
+                               error_log('XML-RPC: xmlrpcval::addStruct: already initialized as a [' . $this->kindOf() . ']');\r
+                               return 0;\r
+                       }\r
+               }\r
+\r
+               // poor man's version of print_r ???\r
+               // DEPRECATED!\r
+               function dump($ar)\r
+               {\r
+                       foreach($ar as $key => $val)\r
+                       {\r
+                               echo "$key => $val<br />";\r
+                               if($key == 'array')\r
+                               {\r
+                                       while(list($key2, $val2) = each($val))\r
+                                       {\r
+                                               echo "-- $key2 => $val2<br />";\r
+                                       }\r
+                               }\r
+                       }\r
+               }\r
+\r
+               /**\r
+               * Returns a string containing "struct", "array" or "scalar" describing the base type of the value\r
+               * @return string\r
+               * @access public\r
+               */\r
+               function kindOf()\r
+               {\r
+                       switch($this->mytype)\r
+                       {\r
+                               case 3:\r
+                                       return 'struct';\r
+                                       break;\r
+                               case 2:\r
+                                       return 'array';\r
+                                       break;\r
+                               case 1:\r
+                                       return 'scalar';\r
+                                       break;\r
+                               default:\r
+                                       return 'undef';\r
+                       }\r
+               }\r
+\r
+               /**\r
+               * @access private\r
+               */\r
+               function serializedata($typ, $val, $charset_encoding='')\r
+               {\r
+                       $rs='';\r
+                       switch(@$GLOBALS['xmlrpcTypes'][$typ])\r
+                       {\r
+                               case 1:\r
+                                       switch($typ)\r
+                                       {\r
+                                               case $GLOBALS['xmlrpcBase64']:\r
+                                                       $rs.="<${typ}>" . base64_encode($val) . "</${typ}>";\r
+                                                       break;\r
+                                               case $GLOBALS['xmlrpcBoolean']:\r
+                                                       $rs.="<${typ}>" . ($val ? '1' : '0') . "</${typ}>";\r
+                                                       break;\r
+                                               case $GLOBALS['xmlrpcString']:\r
+                                                       // G. Giunta 2005/2/13: do NOT use htmlentities, since\r
+                                                       // it will produce named html entities, which are invalid xml\r
+                                                       $rs.="<${typ}>" . xmlrpc_encode_entitites($val, $GLOBALS['xmlrpc_internalencoding'], $charset_encoding). "</${typ}>";\r
+                                                       break;\r
+                                               case $GLOBALS['xmlrpcInt']:\r
+                                               case $GLOBALS['xmlrpcI4']:\r
+                                                       $rs.="<${typ}>".(int)$val."</${typ}>";\r
+                                                       break;\r
+                                               case $GLOBALS['xmlrpcDouble']:\r
+                                               // avoid using standard conversion of float to string because it is locale-dependent,\r
+                                               // and also because the xmlrpc spec forbids exponential notation\r
+                                               // sprintf('%F') would be most likely ok but it is only available since PHP 4.3.10 and PHP 5.0.3.\r
+                                               // The code below tries its best at keeping max precision while avoiding exp notation,\r
+                                               // but there is of course no limit in the number of decimal places to be used...\r
+                                               $rs.="<${typ}>".preg_replace('/\\.?0+$/','',number_format((double)$val, 128, '.', ''))."</${typ}>";\r
+                                                       break;\r
+                                               case $GLOBALS['xmlrpcNull']:\r
+                                                       $rs.="<nil/>";\r
+                                                       break;\r
+                                               default:\r
+                                                       // no standard type value should arrive here, but provide a possibility\r
+                                                       // for xmlrpcvals of unknown type...\r
+                                                       $rs.="<${typ}>${val}</${typ}>";\r
+                                       }\r
+                                       break;\r
+                               case 3:\r
+                                       // struct\r
+                                       if ($this->_php_class)\r
+                                       {\r
+                                               $rs.='<struct php_class="' . $this->_php_class . "\">\n";\r
+                                       }\r
+                                       else\r
+                                       {\r
+                                               $rs.="<struct>\n";\r
+                                       }\r
+                                       foreach($val as $key2 => $val2)\r
+                                       {\r
+                                               $rs.='<member><name>'.xmlrpc_encode_entitites($key2, $GLOBALS['xmlrpc_internalencoding'], $charset_encoding)."</name>\n";\r
+                                               //$rs.=$this->serializeval($val2);\r
+                                               $rs.=$val2->serialize($charset_encoding);\r
+                                               $rs.="</member>\n";\r
+                                       }\r
+                                       $rs.='</struct>';\r
+                                       break;\r
+                               case 2:\r
+                                       // array\r
+                                       $rs.="<array>\n<data>\n";\r
+                                       for($i=0; $i<count($val); $i++)\r
+                                       {\r
+                                               //$rs.=$this->serializeval($val[$i]);\r
+                                               $rs.=$val[$i]->serialize($charset_encoding);\r
+                                       }\r
+                                       $rs.="</data>\n</array>";\r
+                                       break;\r
+                               default:\r
+                                       break;\r
+                       }\r
+                       return $rs;\r
+               }\r
+\r
+               /**\r
+               * Returns xml representation of the value. XML prologue not included\r
+               * @param string $charset_encoding the charset to be used for serialization. if null, US-ASCII is assumed\r
+               * @return string\r
+               * @access public\r
+               */\r
+               function serialize($charset_encoding='')\r
+               {\r
+                       // add check? slower, but helps to avoid recursion in serializing broken xmlrpcvals...\r
+                       //if (is_object($o) && (get_class($o) == 'xmlrpcval' || is_subclass_of($o, 'xmlrpcval')))\r
+                       //{\r
+                               reset($this->me);\r
+                               list($typ, $val) = each($this->me);\r
+                               return '<value>' . $this->serializedata($typ, $val, $charset_encoding) . "</value>\n";\r
+                       //}\r
+               }\r
+\r
+               // DEPRECATED\r
+               function serializeval($o)\r
+               {\r
+                       // add check? slower, but helps to avoid recursion in serializing broken xmlrpcvals...\r
+                       //if (is_object($o) && (get_class($o) == 'xmlrpcval' || is_subclass_of($o, 'xmlrpcval')))\r
+                       //{\r
+                               $ar=$o->me;\r
+                               reset($ar);\r
+                               list($typ, $val) = each($ar);\r
+                               return '<value>' . $this->serializedata($typ, $val) . "</value>\n";\r
+                       //}\r
+               }\r
+\r
+               /**\r
+               * Checks wheter a struct member with a given name is present.\r
+               * Works only on xmlrpcvals of type struct.\r
+               * @param string $m the name of the struct member to be looked up\r
+               * @return boolean\r
+               * @access public\r
+               */\r
+               function structmemexists($m)\r
+               {\r
+                       return array_key_exists($m, $this->me['struct']);\r
+               }\r
+\r
+               /**\r
+               * Returns the value of a given struct member (an xmlrpcval object in itself).\r
+               * Will raise a php warning if struct member of given name does not exist\r
+               * @param string $m the name of the struct member to be looked up\r
+               * @return xmlrpcval\r
+               * @access public\r
+               */\r
+               function structmem($m)\r
+               {\r
+                       return $this->me['struct'][$m];\r
+               }\r
+\r
+               /**\r
+               * Reset internal pointer for xmlrpcvals of type struct.\r
+               * @access public\r
+               */\r
+               function structreset()\r
+               {\r
+                       reset($this->me['struct']);\r
+               }\r
+\r
+               /**\r
+               * Return next member element for xmlrpcvals of type struct.\r
+               * @return xmlrpcval\r
+               * @access public\r
+               */\r
+               function structeach()\r
+               {\r
+                       return each($this->me['struct']);\r
+               }\r
+\r
+               // DEPRECATED! this code looks like it is very fragile and has not been fixed\r
+               // for a long long time. Shall we remove it for 2.0?\r
+               function getval()\r
+               {\r
+                       // UNSTABLE\r
+                       reset($this->me);\r
+                       list($a,$b)=each($this->me);\r
+                       // contributed by I Sofer, 2001-03-24\r
+                       // add support for nested arrays to scalarval\r
+                       // i've created a new method here, so as to\r
+                       // preserve back compatibility\r
+\r
+                       if(is_array($b))\r
+                       {\r
+                               @reset($b);\r
+                               while(list($id,$cont) = @each($b))\r
+                               {\r
+                                       $b[$id] = $cont->scalarval();\r
+                               }\r
+                       }\r
+\r
+                       // add support for structures directly encoding php objects\r
+                       if(is_object($b))\r
+                       {\r
+                               $t = get_object_vars($b);\r
+                               @reset($t);\r
+                               while(list($id,$cont) = @each($t))\r
+                               {\r
+                                       $t[$id] = $cont->scalarval();\r
+                               }\r
+                               @reset($t);\r
+                               while(list($id,$cont) = @each($t))\r
+                               {\r
+                                       @$b->$id = $cont;\r
+                               }\r
+                       }\r
+                       // end contrib\r
+                       return $b;\r
+               }\r
+\r
+               /**\r
+               * Returns the value of a scalar xmlrpcval\r
+               * @return mixed\r
+               * @access public\r
+               */\r
+               function scalarval()\r
+               {\r
+                       reset($this->me);\r
+                       list(,$b)=each($this->me);\r
+                       return $b;\r
+               }\r
+\r
+               /**\r
+               * Returns the type of the xmlrpcval.\r
+               * For integers, 'int' is always returned in place of 'i4'\r
+               * @return string\r
+               * @access public\r
+               */\r
+               function scalartyp()\r
+               {\r
+                       reset($this->me);\r
+                       list($a,)=each($this->me);\r
+                       if($a==$GLOBALS['xmlrpcI4'])\r
+                       {\r
+                               $a=$GLOBALS['xmlrpcInt'];\r
+                       }\r
+                       return $a;\r
+               }\r
+\r
+               /**\r
+               * Returns the m-th member of an xmlrpcval of struct type\r
+               * @param integer $m the index of the value to be retrieved (zero based)\r
+               * @return xmlrpcval\r
+               * @access public\r
+               */\r
+               function arraymem($m)\r
+               {\r
+                       return $this->me['array'][$m];\r
+               }\r
+\r
+               /**\r
+               * Returns the number of members in an xmlrpcval of array type\r
+               * @return integer\r
+               * @access public\r
+               */\r
+               function arraysize()\r
+               {\r
+                       return count($this->me['array']);\r
+               }\r
+\r
+               /**\r
+               * Returns the number of members in an xmlrpcval of struct type\r
+               * @return integer\r
+               * @access public\r
+               */\r
+               function structsize()\r
+               {\r
+                       return count($this->me['struct']);\r
+               }\r
+       }\r
+\r
+\r
+       // date helpers\r
+\r
+       /**\r
+       * Given a timestamp, return the corresponding ISO8601 encoded string.\r
+       *\r
+       * Really, timezones ought to be supported\r
+       * but the XML-RPC spec says:\r
+       *\r
+       * "Don't assume a timezone. It should be specified by the server in its\r
+       * documentation what assumptions it makes about timezones."\r
+       *\r
+       * These routines always assume localtime unless\r
+       * $utc is set to 1, in which case UTC is assumed\r
+       * and an adjustment for locale is made when encoding\r
+       *\r
+       * @param int $timet (timestamp)\r
+       * @param int $utc (0 or 1)\r
+       * @return string\r
+       */\r
+       function iso8601_encode($timet, $utc=0)\r
+       {\r
+               if(!$utc)\r
+               {\r
+                       $t=strftime("%Y%m%dT%H:%M:%S", $timet);\r
+               }\r
+               else\r
+               {\r
+                       if(function_exists('gmstrftime'))\r
+                       {\r
+                               // gmstrftime doesn't exist in some versions\r
+                               // of PHP\r
+                               $t=gmstrftime("%Y%m%dT%H:%M:%S", $timet);\r
+                       }\r
+                       else\r
+                       {\r
+                               $t=strftime("%Y%m%dT%H:%M:%S", $timet-date('Z'));\r
+                       }\r
+               }\r
+               return $t;\r
+       }\r
+\r
+       /**\r
+       * Given an ISO8601 date string, return a timet in the localtime, or UTC\r
+       * @param string $idate\r
+       * @param int $utc either 0 or 1\r
+       * @return int (datetime)\r
+       */\r
+       function iso8601_decode($idate, $utc=0)\r
+       {\r
+               $t=0;\r
+               if(preg_match('/([0-9]{4})([0-9]{2})([0-9]{2})T([0-9]{2}):([0-9]{2}):([0-9]{2})/', $idate, $regs))\r
+               {\r
+                       if($utc)\r
+                       {\r
+                               $t=gmmktime($regs[4], $regs[5], $regs[6], $regs[2], $regs[3], $regs[1]);\r
+                       }\r
+                       else\r
+                       {\r
+                               $t=mktime($regs[4], $regs[5], $regs[6], $regs[2], $regs[3], $regs[1]);\r
+                       }\r
+               }\r
+               return $t;\r
+       }\r
+\r
+       /**\r
+       * Takes an xmlrpc value in PHP xmlrpcval object format and translates it into native PHP types.\r
+       *\r
+       * Works with xmlrpc message objects as input, too.\r
+       *\r
+       * Given proper options parameter, can rebuild generic php object instances\r
+       * (provided those have been encoded to xmlrpc format using a corresponding\r
+       * option in php_xmlrpc_encode())\r
+       * PLEASE NOTE that rebuilding php objects involves calling their constructor function.\r
+       * This means that the remote communication end can decide which php code will\r
+       * get executed on your server, leaving the door possibly open to 'php-injection'\r
+       * style of attacks (provided you have some classes defined on your server that\r
+       * might wreak havoc if instances are built outside an appropriate context).\r
+       * Make sure you trust the remote server/client before eanbling this!\r
+       *\r
+       * @author Dan Libby (dan@libby.com)\r
+       *\r
+       * @param xmlrpcval $xmlrpc_val\r
+       * @param array $options if 'decode_php_objs' is set in the options array, xmlrpc structs can be decoded into php objects\r
+       * @return mixed\r
+       */\r
+       function php_xmlrpc_decode($xmlrpc_val, $options=array())\r
+       {\r
+               switch($xmlrpc_val->kindOf())\r
+               {\r
+                       case 'scalar':\r
+                               if (in_array('extension_api', $options))\r
+                               {\r
+                                       reset($xmlrpc_val->me);\r
+                                       list($typ,$val) = each($xmlrpc_val->me);\r
+                                       switch ($typ)\r
+                                       {\r
+                                               case 'dateTime.iso8601':\r
+                                                       $xmlrpc_val->scalar = $val;\r
+                                                       $xmlrpc_val->xmlrpc_type = 'datetime';\r
+                                                       $xmlrpc_val->timestamp = iso8601_decode($val);\r
+                                                       return $xmlrpc_val;\r
+                                               case 'base64':\r
+                                                       $xmlrpc_val->scalar = $val;\r
+                                                       $xmlrpc_val->type = $typ;\r
+                                                       return $xmlrpc_val;\r
+                                               default:\r
+                                                       return $xmlrpc_val->scalarval();\r
+                                       }\r
+                               }\r
+                               return $xmlrpc_val->scalarval();\r
+                       case 'array':\r
+                               $size = $xmlrpc_val->arraysize();\r
+                               $arr = array();\r
+                               for($i = 0; $i < $size; $i++)\r
+                               {\r
+                                       $arr[] = php_xmlrpc_decode($xmlrpc_val->arraymem($i), $options);\r
+                               }\r
+                               return $arr;\r
+                       case 'struct':\r
+                               $xmlrpc_val->structreset();\r
+                               // If user said so, try to rebuild php objects for specific struct vals.\r
+                               /// @todo should we raise a warning for class not found?\r
+                               // shall we check for proper subclass of xmlrpcval instead of\r
+                               // presence of _php_class to detect what we can do?\r
+                               if (in_array('decode_php_objs', $options) && $xmlrpc_val->_php_class != ''\r
+                                       && class_exists($xmlrpc_val->_php_class))\r
+                               {\r
+                                       $obj = @new $xmlrpc_val->_php_class;\r
+                                       while(list($key,$value)=$xmlrpc_val->structeach())\r
+                                       {\r
+                                               $obj->$key = php_xmlrpc_decode($value, $options);\r
+                                       }\r
+                                       return $obj;\r
+                               }\r
+                               else\r
+                               {\r
+                                       $arr = array();\r
+                                       while(list($key,$value)=$xmlrpc_val->structeach())\r
+                                       {\r
+                                               $arr[$key] = php_xmlrpc_decode($value, $options);\r
+                                       }\r
+                                       return $arr;\r
+                               }\r
+                       case 'msg':\r
+                               $paramcount = $xmlrpc_val->getNumParams();\r
+                               $arr = array();\r
+                               for($i = 0; $i < $paramcount; $i++)\r
+                               {\r
+                                       $arr[] = php_xmlrpc_decode($xmlrpc_val->getParam($i));\r
+                               }\r
+                               return $arr;\r
+                       }\r
+       }\r
+\r
+       // This constant left here only for historical reasons...\r
+       // it was used to decide if we have to define xmlrpc_encode on our own, but\r
+       // we do not do it anymore\r
+       if(function_exists('xmlrpc_decode'))\r
+       {\r
+               define('XMLRPC_EPI_ENABLED','1');\r
+       }\r
+       else\r
+       {\r
+               define('XMLRPC_EPI_ENABLED','0');\r
+       }\r
+\r
+       /**\r
+       * Takes native php types and encodes them into xmlrpc PHP object format.\r
+       * It will not re-encode xmlrpcval objects.\r
+       *\r
+       * Feature creep -- could support more types via optional type argument\r
+       * (string => datetime support has been added, ??? => base64 not yet)\r
+       *\r
+       * If given a proper options parameter, php object instances will be encoded\r
+       * into 'special' xmlrpc values, that can later be decoded into php objects\r
+       * by calling php_xmlrpc_decode() with a corresponding option\r
+       *\r
+       * @author Dan Libby (dan@libby.com)\r
+       *\r
+       * @param mixed $php_val the value to be converted into an xmlrpcval object\r
+       * @param array $options can include 'encode_php_objs', 'auto_dates', 'null_extension' or 'extension_api'\r
+       * @return xmlrpcval\r
+       */\r
+       function &php_xmlrpc_encode($php_val, $options=array())\r
+       {\r
+               $type = gettype($php_val);\r
+               switch($type)\r
+               {\r
+                       case 'string':\r
+                               if (in_array('auto_dates', $options) && preg_match('/^[0-9]{8}T[0-9]{2}:[0-9]{2}:[0-9]{2}$/', $php_val))\r
+                                       $xmlrpc_val =& new xmlrpcval($php_val, $GLOBALS['xmlrpcDateTime']);\r
+                               else\r
+                                       $xmlrpc_val =& new xmlrpcval($php_val, $GLOBALS['xmlrpcString']);\r
+                               break;\r
+                       case 'integer':\r
+                               $xmlrpc_val =& new xmlrpcval($php_val, $GLOBALS['xmlrpcInt']);\r
+                               break;\r
+                       case 'double':\r
+                               $xmlrpc_val =& new xmlrpcval($php_val, $GLOBALS['xmlrpcDouble']);\r
+                               break;\r
+                               // <G_Giunta_2001-02-29>\r
+                               // Add support for encoding/decoding of booleans, since they are supported in PHP\r
+                       case 'boolean':\r
+                               $xmlrpc_val =& new xmlrpcval($php_val, $GLOBALS['xmlrpcBoolean']);\r
+                               break;\r
+                               // </G_Giunta_2001-02-29>\r
+                       case 'array':\r
+                               // PHP arrays can be encoded to either xmlrpc structs or arrays,\r
+                               // depending on wheter they are hashes or plain 0..n integer indexed\r
+                               // A shorter one-liner would be\r
+                               // $tmp = array_diff(array_keys($php_val), range(0, count($php_val)-1));\r
+                               // but execution time skyrockets!\r
+                               $j = 0;\r
+                               $arr = array();\r
+                               $ko = false;\r
+                               foreach($php_val as $key => $val)\r
+                               {\r
+                                       $arr[$key] =& php_xmlrpc_encode($val, $options);\r
+                                       if(!$ko && $key !== $j)\r
+                                       {\r
+                                               $ko = true;\r
+                                       }\r
+                                       $j++;\r
+                               }\r
+                               if($ko)\r
+                               {\r
+                                       $xmlrpc_val =& new xmlrpcval($arr, $GLOBALS['xmlrpcStruct']);\r
+                               }\r
+                               else\r
+                               {\r
+                                       $xmlrpc_val =& new xmlrpcval($arr, $GLOBALS['xmlrpcArray']);\r
+                               }\r
+                               break;\r
+                       case 'object':\r
+                               if(is_a($php_val, 'xmlrpcval'))\r
+                               {\r
+                                       $xmlrpc_val = $php_val;\r
+                               }\r
+                               else\r
+                               {\r
+                                       $arr = array();\r
+                                       while(list($k,$v) = each($php_val))\r
+                                       {\r
+                                               $arr[$k] = php_xmlrpc_encode($v, $options);\r
+                                       }\r
+                                       $xmlrpc_val =& new xmlrpcval($arr, $GLOBALS['xmlrpcStruct']);\r
+                                       if (in_array('encode_php_objs', $options))\r
+                                       {\r
+                                               // let's save original class name into xmlrpcval:\r
+                                               // might be useful later on...\r
+                                               $xmlrpc_val->_php_class = get_class($php_val);\r
+                                       }\r
+                               }\r
+                               break;\r
+                       case 'NULL':\r
+                               if (in_array('extension_api', $options))\r
+                               {\r
+                                       $xmlrpc_val =& new xmlrpcval('', $GLOBALS['xmlrpcString']);\r
+                               }\r
+                               if (in_array('null_extension', $options))\r
+                               {\r
+                                       $xmlrpc_val =& new xmlrpcval('', $GLOBALS['xmlrpcNull']);\r
+                               }\r
+                               else\r
+                               {\r
+                                       $xmlrpc_val =& new xmlrpcval();\r
+                               }\r
+                               break;\r
+                       case 'resource':\r
+                               if (in_array('extension_api', $options))\r
+                               {\r
+                                       $xmlrpc_val =& new xmlrpcval((int)$php_val, $GLOBALS['xmlrpcInt']);\r
+                               }\r
+                               else\r
+                               {\r
+                                       $xmlrpc_val =& new xmlrpcval();\r
+                               }\r
+                       // catch "user function", "unknown type"\r
+                       default:\r
+                               // giancarlo pinerolo <ping@alt.it>\r
+                               // it has to return\r
+                               // an empty object in case, not a boolean.\r
+                               $xmlrpc_val =& new xmlrpcval();\r
+                               break;\r
+                       }\r
+                       return $xmlrpc_val;\r
+       }\r
+\r
+       /**\r
+       * Convert the xml representation of a method response, method request or single\r
+       * xmlrpc value into the appropriate object (a.k.a. deserialize)\r
+       * @param string $xml_val\r
+       * @param array $options\r
+       * @return mixed false on error, or an instance of either xmlrpcval, xmlrpcmsg or xmlrpcresp\r
+       */\r
+       function php_xmlrpc_decode_xml($xml_val, $options=array())\r
+       {\r
+               $GLOBALS['_xh'] = array();\r
+               $GLOBALS['_xh']['ac'] = '';\r
+               $GLOBALS['_xh']['stack'] = array();\r
+               $GLOBALS['_xh']['valuestack'] = array();\r
+               $GLOBALS['_xh']['params'] = array();\r
+               $GLOBALS['_xh']['pt'] = array();\r
+               $GLOBALS['_xh']['isf'] = 0;\r
+               $GLOBALS['_xh']['isf_reason'] = '';\r
+               $GLOBALS['_xh']['method'] = false;\r
+               $GLOBALS['_xh']['rt'] = '';\r
+               /// @todo 'guestimate' encoding\r
+               $parser = xml_parser_create();\r
+               xml_parser_set_option($parser, XML_OPTION_CASE_FOLDING, true);\r
+               // What if internal encoding is not in one of the 3 allowed?\r
+               // we use the broadest one, ie. utf8!\r
+               if (!in_array($GLOBALS['xmlrpc_internalencoding'], array('UTF-8', 'ISO-8859-1', 'US-ASCII')))\r
+               {\r
+                       xml_parser_set_option($parser, XML_OPTION_TARGET_ENCODING, 'UTF-8');\r
+               }\r
+               else\r
+               {\r
+                       xml_parser_set_option($parser, XML_OPTION_TARGET_ENCODING, $GLOBALS['xmlrpc_internalencoding']);\r
+               }\r
+               xml_set_element_handler($parser, 'xmlrpc_se_any', 'xmlrpc_ee');\r
+               xml_set_character_data_handler($parser, 'xmlrpc_cd');\r
+               xml_set_default_handler($parser, 'xmlrpc_dh');\r
+               if(!xml_parse($parser, $xml_val, 1))\r
+               {\r
+                       $errstr = sprintf('XML error: %s at line %d, column %d',\r
+                                               xml_error_string(xml_get_error_code($parser)),\r
+                                               xml_get_current_line_number($parser), xml_get_current_column_number($parser));\r
+                       error_log($errstr);\r
+                       xml_parser_free($parser);\r
+                       return false;\r
+               }\r
+               xml_parser_free($parser);\r
+               if ($GLOBALS['_xh']['isf'] > 1) // test that $GLOBALS['_xh']['value'] is an obj, too???\r
+               {\r
+                       error_log($GLOBALS['_xh']['isf_reason']);\r
+                       return false;\r
+               }\r
+               switch ($GLOBALS['_xh']['rt'])\r
+               {\r
+                       case 'methodresponse':\r
+                               $v =& $GLOBALS['_xh']['value'];\r
+                               if ($GLOBALS['_xh']['isf'] == 1)\r
+                               {\r
+                                       $vc = $v->structmem('faultCode');\r
+                                       $vs = $v->structmem('faultString');\r
+                                       $r =& new xmlrpcresp(0, $vc->scalarval(), $vs->scalarval());\r
+                               }\r
+                               else\r
+                               {\r
+                                       $r =& new xmlrpcresp($v);\r
+                               }\r
+                               return $r;\r
+                       case 'methodcall':\r
+                               $m =& new xmlrpcmsg($GLOBALS['_xh']['method']);\r
+                               for($i=0; $i < count($GLOBALS['_xh']['params']); $i++)\r
+                               {\r
+                                       $m->addParam($GLOBALS['_xh']['params'][$i]);\r
+                               }\r
+                               return $m;\r
+                       case 'value':\r
+                               return $GLOBALS['_xh']['value'];\r
+                       default:\r
+                               return false;\r
+               }\r
+       }\r
+\r
+       /**\r
+       * decode a string that is encoded w/ "chunked" transfer encoding\r
+       * as defined in rfc2068 par. 19.4.6\r
+       * code shamelessly stolen from nusoap library by Dietrich Ayala\r
+       *\r
+       * @param string $buffer the string to be decoded\r
+       * @return string\r
+       */\r
+       function decode_chunked($buffer)\r
+       {\r
+               // length := 0\r
+               $length = 0;\r
+               $new = '';\r
+\r
+               // read chunk-size, chunk-extension (if any) and crlf\r
+               // get the position of the linebreak\r
+               $chunkend = strpos($buffer,"\r\n") + 2;\r
+               $temp = substr($buffer,0,$chunkend);\r
+               $chunk_size = hexdec( trim($temp) );\r
+               $chunkstart = $chunkend;\r
+               while($chunk_size > 0)\r
+               {\r
+                       $chunkend = strpos($buffer, "\r\n", $chunkstart + $chunk_size);\r
+\r
+                       // just in case we got a broken connection\r
+                       if($chunkend == false)\r
+                       {\r
+                               $chunk = substr($buffer,$chunkstart);\r
+                               // append chunk-data to entity-body\r
+                               $new .= $chunk;\r
+                               $length += strlen($chunk);\r
+                               break;\r
+                       }\r
+\r
+                       // read chunk-data and crlf\r
+                       $chunk = substr($buffer,$chunkstart,$chunkend-$chunkstart);\r
+                       // append chunk-data to entity-body\r
+                       $new .= $chunk;\r
+                       // length := length + chunk-size\r
+                       $length += strlen($chunk);\r
+                       // read chunk-size and crlf\r
+                       $chunkstart = $chunkend + 2;\r
+\r
+                       $chunkend = strpos($buffer,"\r\n",$chunkstart)+2;\r
+                       if($chunkend == false)\r
+                       {\r
+                               break; //just in case we got a broken connection\r
+                       }\r
+                       $temp = substr($buffer,$chunkstart,$chunkend-$chunkstart);\r
+                       $chunk_size = hexdec( trim($temp) );\r
+                       $chunkstart = $chunkend;\r
+               }\r
+               return $new;\r
+       }\r
+\r
+       /**\r
+       * xml charset encoding guessing helper function.\r
+       * Tries to determine the charset encoding of an XML chunk received over HTTP.\r
+       * NB: according to the spec (RFC 3023), if text/xml content-type is received over HTTP without a content-type,\r
+       * we SHOULD assume it is strictly US-ASCII. But we try to be more tolerant of unconforming (legacy?) clients/servers,\r
+       * which will be most probably using UTF-8 anyway...\r
+       *\r
+       * @param string $httpheaders the http Content-type header\r
+       * @param string $xmlchunk xml content buffer\r
+       * @param string $encoding_prefs comma separated list of character encodings to be used as default (when mb extension is enabled)\r
+       *\r
+       * @todo explore usage of mb_http_input(): does it detect http headers + post data? if so, use it instead of hand-detection!!!\r
+       */\r
+       function guess_encoding($httpheader='', $xmlchunk='', $encoding_prefs=null)\r
+       {\r
+               // discussion: see http://www.yale.edu/pclt/encoding/\r
+               // 1 - test if encoding is specified in HTTP HEADERS\r
+\r
+               //Details:\r
+               // LWS:           (\13\10)?( |\t)+\r
+               // token:         (any char but excluded stuff)+\r
+               // quoted string: " (any char but double quotes and cointrol chars)* "\r
+               // header:        Content-type = ...; charset=value(; ...)*\r
+               //   where value is of type token, no LWS allowed between 'charset' and value\r
+               // Note: we do not check for invalid chars in VALUE:\r
+               //   this had better be done using pure ereg as below\r
+               // Note 2: we might be removing whitespace/tabs that ought to be left in if\r
+        //   the received charset is a quoted string. But nobody uses such charset names...\r
+\r
+               /// @todo this test will pass if ANY header has charset specification, not only Content-Type. Fix it?\r
+               $matches = array();\r
+               if(preg_match('/;\s*charset\s*=([^;]+)/i', $httpheader, $matches))\r
+               {\r
+                       return strtoupper(trim($matches[1], " \t\""));\r
+               }\r
+\r
+               // 2 - scan the first bytes of the data for a UTF-16 (or other) BOM pattern\r
+               //     (source: http://www.w3.org/TR/2000/REC-xml-20001006)\r
+               //     NOTE: actually, according to the spec, even if we find the BOM and determine\r
+               //     an encoding, we should check if there is an encoding specified\r
+               //     in the xml declaration, and verify if they match.\r
+               /// @todo implement check as described above?\r
+               /// @todo implement check for first bytes of string even without a BOM? (It sure looks harder than for cases WITH a BOM)\r
+               if(preg_match('/^(\x00\x00\xFE\xFF|\xFF\xFE\x00\x00|\x00\x00\xFF\xFE|\xFE\xFF\x00\x00)/', $xmlchunk))\r
+               {\r
+                       return 'UCS-4';\r
+               }\r
+               elseif(preg_match('/^(\xFE\xFF|\xFF\xFE)/', $xmlchunk))\r
+               {\r
+                       return 'UTF-16';\r
+               }\r
+               elseif(preg_match('/^(\xEF\xBB\xBF)/', $xmlchunk))\r
+               {\r
+                       return 'UTF-8';\r
+               }\r
+\r
+               // 3 - test if encoding is specified in the xml declaration\r
+               // Details:\r
+               // SPACE:         (#x20 | #x9 | #xD | #xA)+ === [ \x9\xD\xA]+\r
+               // EQ:            SPACE?=SPACE? === [ \x9\xD\xA]*=[ \x9\xD\xA]*\r
+               if (preg_match('/^<\?xml\s+version\s*=\s*'. "((?:\"[a-zA-Z0-9_.:-]+\")|(?:'[a-zA-Z0-9_.:-]+'))".\r
+                       '\s+encoding\s*=\s*' . "((?:\"[A-Za-z][A-Za-z0-9._-]*\")|(?:'[A-Za-z][A-Za-z0-9._-]*'))/",\r
+                       $xmlchunk, $matches))\r
+               {\r
+                       return strtoupper(substr($matches[2], 1, -1));\r
+               }\r
+\r
+               // 4 - if mbstring is available, let it do the guesswork\r
+               // NB: we favour finding an encoding that is compatible with what we can process\r
+               if(extension_loaded('mbstring'))\r
+               {\r
+                       if($encoding_prefs)\r
+                       {\r
+                               $enc = mb_detect_encoding($xmlchunk, $encoding_prefs);\r
+                       }\r
+                       else\r
+                       {\r
+                               $enc = mb_detect_encoding($xmlchunk);\r
+                       }\r
+                       // NB: mb_detect likes to call it ascii, xml parser likes to call it US_ASCII...\r
+                       // IANA also likes better US-ASCII, so go with it\r
+                       if($enc == 'ASCII')\r
+                       {\r
+                               $enc = 'US-'.$enc;\r
+                       }\r
+                       return $enc;\r
+               }\r
+               else\r
+               {\r
+                       // no encoding specified: as per HTTP1.1 assume it is iso-8859-1?\r
+                       // Both RFC 2616 (HTTP 1.1) and 1945 (HTTP 1.0) clearly state that for text/xxx content types\r
+                       // this should be the standard. And we should be getting text/xml as request and response.\r
+                       // BUT we have to be backward compatible with the lib, which always used UTF-8 as default...\r
+                       return $GLOBALS['xmlrpc_defencoding'];\r
+               }\r
+       }\r
+\r
+       /**\r
+       * Checks if a given charset encoding is present in a list of encodings or\r
+       * if it is a valid subset of any encoding in the list\r
+       * @param string $encoding charset to be tested\r
+       * @param mixed $validlist comma separated list of valid charsets (or array of charsets)\r
+       */\r
+       function is_valid_charset($encoding, $validlist)\r
+       {\r
+               $charset_supersets = array(\r
+                       'US-ASCII' => array ('ISO-8859-1', 'ISO-8859-2', 'ISO-8859-3', 'ISO-8859-4',\r
+                               'ISO-8859-5', 'ISO-8859-6', 'ISO-8859-7', 'ISO-8859-8',\r
+                               'ISO-8859-9', 'ISO-8859-10', 'ISO-8859-11', 'ISO-8859-12',\r
+                               'ISO-8859-13', 'ISO-8859-14', 'ISO-8859-15', 'UTF-8',\r
+                               'EUC-JP', 'EUC-', 'EUC-KR', 'EUC-CN')\r
+               );\r
+               if (is_string($validlist))\r
+                       $validlist = explode(',', $validlist);\r
+               if (@in_array(strtoupper($encoding), $validlist))\r
+                       return true;\r
+               else\r
+               {\r
+                       if (array_key_exists($encoding, $charset_supersets))\r
+                               foreach ($validlist as $allowed)\r
+                                       if (in_array($allowed, $charset_supersets[$encoding]))\r
+                                               return true;\r
+                               return false;\r
+               }\r
+       }\r
+\r
+?>
\ No newline at end of file
diff --git a/lib/xmlrpc_wrappers.inc b/lib/xmlrpc_wrappers.inc
new file mode 100644 (file)
index 0000000..0f3338a
--- /dev/null
@@ -0,0 +1,944 @@
+<?php\r
+/**\r
+ * PHP-XMLRPC "wrapper" functions\r
+ * Generate stubs to transparently access xmlrpc methods as php functions and viceversa\r
+ *\r
+ * @version $Id: xmlrpc_wrappers.inc,v 1.13 2008/09/20 01:23:47 ggiunta Exp $\r
+ * @author Gaetano Giunta\r
+ * @copyright (C) 2006-2008 G. Giunta\r
+ * @license code licensed under the BSD License: http://phpxmlrpc.sourceforge.net/license.txt\r
+ *\r
+ * @todo separate introspection from code generation for func-2-method wrapping\r
+ * @todo use some better templating system for code generation?\r
+ * @todo implement method wrapping with preservation of php objs in calls\r
+ * @todo when wrapping methods without obj rebuilding, use return_type = 'phpvals' (faster)\r
+ * @todo implement self-parsing of php code for PHP <= 4\r
+ */\r
+\r
+       // requires: xmlrpc.inc\r
+\r
+       /**\r
+       * Given a string defining a php type or phpxmlrpc type (loosely defined: strings\r
+       * accepted come from javadoc blocks), return corresponding phpxmlrpc type.\r
+       * NB: for php 'resource' types returns empty string, since resources cannot be serialized;\r
+       * for php class names returns 'struct', since php objects can be serialized as xmlrpc structs\r
+       * @param string $phptype\r
+       * @return string\r
+       */\r
+       function php_2_xmlrpc_type($phptype)\r
+       {\r
+               switch(strtolower($phptype))\r
+               {\r
+                       case 'string':\r
+                               return $GLOBALS['xmlrpcString'];\r
+                       case 'integer':\r
+                       case $GLOBALS['xmlrpcInt']: // 'int'\r
+                       case $GLOBALS['xmlrpcI4']:\r
+                               return $GLOBALS['xmlrpcInt'];\r
+                       case 'double':\r
+                               return $GLOBALS['xmlrpcDouble'];\r
+                       case 'boolean':\r
+                               return $GLOBALS['xmlrpcBoolean'];\r
+                       case 'array':\r
+                               return $GLOBALS['xmlrpcArray'];\r
+                       case 'object':\r
+                               return $GLOBALS['xmlrpcStruct'];\r
+                       case $GLOBALS['xmlrpcBase64']:\r
+                       case $GLOBALS['xmlrpcStruct']:\r
+                               return strtolower($phptype);\r
+                       case 'resource':\r
+                               return '';\r
+                       default:\r
+                               if(class_exists($phptype))\r
+                               {\r
+                                       return $GLOBALS['xmlrpcStruct'];\r
+                               }\r
+                               else\r
+                               {\r
+                                       // unknown: might be any 'extended' xmlrpc type\r
+                                       return $GLOBALS['xmlrpcValue'];\r
+                               }\r
+               }\r
+       }\r
+\r
+       /**\r
+       * Given a string defining a phpxmlrpc type return corresponding php type.\r
+       * @param string $xmlrpctype\r
+       * @return string\r
+       */\r
+       function xmlrpc_2_php_type($xmlrpctype)\r
+       {\r
+               switch(strtolower($xmlrpctype))\r
+               {\r
+                       case 'base64':\r
+                       case 'datetime.iso8601':\r
+                       case 'string':\r
+                               return $GLOBALS['xmlrpcString'];\r
+                       case 'int':\r
+                       case 'i4':\r
+                               return 'integer';\r
+                       case 'struct':\r
+                       case 'array':\r
+                               return 'array';\r
+                       case 'double':\r
+                               return 'float';\r
+                       case 'undefined':\r
+                               return 'mixed';\r
+                       case 'boolean':\r
+                       case 'null':\r
+                       default:\r
+                               // unknown: might be any xmlrpc type\r
+                               return strtolower($xmlrpctype);\r
+               }\r
+       }\r
+\r
+       /**\r
+       * Given a user-defined PHP function, create a PHP 'wrapper' function that can\r
+       * be exposed as xmlrpc method from an xmlrpc_server object and called from remote\r
+       * clients (as well as its corresponding signature info).\r
+       *\r
+       * Since php is a typeless language, to infer types of input and output parameters,\r
+       * it relies on parsing the javadoc-style comment block associated with the given\r
+       * function. Usage of xmlrpc native types (such as datetime.dateTime.iso8601 and base64)\r
+       * in the @param tag is also allowed, if you need the php function to receive/send\r
+       * data in that particular format (note that base64 encoding/decoding is transparently\r
+       * carried out by the lib, while datetime vals are passed around as strings)\r
+       *\r
+       * Known limitations:\r
+       * - requires PHP 5.0.3 +\r
+       * - only works for user-defined functions, not for PHP internal functions\r
+       *   (reflection does not support retrieving number/type of params for those)\r
+       * - functions returning php objects will generate special xmlrpc responses:\r
+       *   when the xmlrpc decoding of those responses is carried out by this same lib, using\r
+       *   the appropriate param in php_xmlrpc_decode, the php objects will be rebuilt.\r
+       *   In short: php objects can be serialized, too (except for their resource members),\r
+       *   using this function.\r
+       *   Other libs might choke on the very same xml that will be generated in this case\r
+       *   (i.e. it has a nonstandard attribute on struct element tags)\r
+       * - usage of javadoc @param tags using param names in a different order from the\r
+       *   function prototype is not considered valid (to be fixed?)\r
+       *\r
+       * Note that since rel. 2.0RC3 the preferred method to have the server call 'standard'\r
+       * php functions (ie. functions not expecting a single xmlrpcmsg obj as parameter)\r
+       * is by making use of the functions_parameters_type class member.\r
+       *\r
+       * @param string $funcname the name of the PHP user function to be exposed as xmlrpc method; array($obj, 'methodname') and array('class', 'methodname') are ok too\r
+       * @param string $newfuncname (optional) name for function to be created\r
+       * @param array $extra_options (optional) array of options for conversion. valid values include:\r
+       *        bool  return_source when true, php code w. function definition will be returned, not evaluated\r
+       *        bool  encode_php_objs let php objects be sent to server using the 'improved' xmlrpc notation, so server can deserialize them as php objects\r
+       *        bool  decode_php_objs --- WARNING !!! possible security hazard. only use it with trusted servers ---\r
+       *        bool  suppress_warnings  remove from produced xml any runtime warnings due to the php function being invoked\r
+       * @return false on error, or an array containing the name of the new php function,\r
+       *         its signature and docs, to be used in the server dispatch map\r
+       *\r
+       * @todo decide how to deal with params passed by ref: bomb out or allow?\r
+       * @todo finish using javadoc info to build method sig if all params are named but out of order\r
+       * @todo add a check for params of 'resource' type\r
+       * @todo add some trigger_errors / error_log when returning false?\r
+       * @todo what to do when the PHP function returns NULL? we are currently returning an empty string value...\r
+       * @todo add an option to suppress php warnings in invocation of user function, similar to server debug level 3?\r
+       * @todo if $newfuncname is empty, we could use create_user_func instead of eval, as it is possibly faster\r
+       * @todo add a verbatim_object_copy parameter to allow avoiding the same obj instance?\r
+       */\r
+       function wrap_php_function($funcname, $newfuncname='', $extra_options=array())\r
+       {\r
+               $buildit = isset($extra_options['return_source']) ? !($extra_options['return_source']) : true;\r
+               $prefix = isset($extra_options['prefix']) ? $extra_options['prefix'] : 'xmlrpc';\r
+               $encode_php_objects = isset($extra_options['encode_php_objs']) ? (bool)$extra_options['encode_php_objs'] : false;\r
+               $decode_php_objects = isset($extra_options['decode_php_objs']) ? (bool)$extra_options['decode_php_objs'] : false;\r
+               $catch_warnings = isset($extra_options['suppress_warnings']) && $extra_options['suppress_warnings'] ? '@' : '';\r
+\r
+               if(version_compare(phpversion(), '5.0.3') == -1)\r
+               {\r
+                       // up to php 5.0.3 some useful reflection methods were missing\r
+                       error_log('XML-RPC: cannot not wrap php functions unless running php version bigger than 5.0.3');\r
+                       return false;\r
+               }\r
+\r
+        $exists = false;\r
+        if(is_array($funcname))\r
+        {\r
+            if(count($funcname) < 2 || (!is_string($funcname[0]) && !is_object($funcname[0])))\r
+            {\r
+                       error_log('XML-RPC: syntax for function to be wrapped is wrong');\r
+                       return false;\r
+            }\r
+            if(is_string($funcname[0]))\r
+            {\r
+                $plainfuncname = implode('::', $funcname);\r
+            }\r
+            elseif(is_object($funcname[0]))\r
+            {\r
+                $plainfuncname = get_class($funcname[0]) . '->' . $funcname[1];\r
+            }\r
+            $exists = method_exists($funcname[0], $funcname[1]);\r
+        }\r
+        else\r
+        {\r
+            $plainfuncname = $funcname;\r
+            $exists = function_exists($funcname);\r
+        }\r
+\r
+               if(!$exists)\r
+               {\r
+                       error_log('XML-RPC: function to be wrapped is not defined: '.$plainfuncname);\r
+                       return false;\r
+               }\r
+               else\r
+               {\r
+                       // determine name of new php function\r
+                       if($newfuncname == '')\r
+                       {\r
+                               if(is_array($funcname))\r
+                               {\r
+                               if(is_string($funcname[0]))\r
+                                       $xmlrpcfuncname = "{$prefix}_".implode('_', $funcname);\r
+                               else\r
+                                       $xmlrpcfuncname = "{$prefix}_".get_class($funcname[0]) . '_' . $funcname[1];\r
+                               }\r
+                               else\r
+                               {\r
+                                       $xmlrpcfuncname = "{$prefix}_$funcname";\r
+                               }\r
+                       }\r
+                       else\r
+                       {\r
+                               $xmlrpcfuncname = $newfuncname;\r
+                       }\r
+                       while($buildit && function_exists($xmlrpcfuncname))\r
+                       {\r
+                               $xmlrpcfuncname .= 'x';\r
+                       }\r
+\r
+                       // start to introspect PHP code\r
+                       if(is_array($funcname))\r
+                       {\r
+                       $func =& new ReflectionMethod($funcname[0], $funcname[1]);\r
+                       if($func->isPrivate())\r
+                       {\r
+                               error_log('XML-RPC: method to be wrapped is private: '.$plainfuncname);\r
+                               return false;\r
+                       }\r
+                       if($func->isProtected())\r
+                       {\r
+                               error_log('XML-RPC: method to be wrapped is protected: '.$plainfuncname);\r
+                               return false;\r
+                       }\r
+                       if($func->isConstructor())\r
+                       {\r
+                               error_log('XML-RPC: method to be wrapped is the constructor: '.$plainfuncname);\r
+                               return false;\r
+                       }\r
+                       if($func->isDestructor())\r
+                       {\r
+                               error_log('XML-RPC: method to be wrapped is the destructor: '.$plainfuncname);\r
+                               return false;\r
+                       }\r
+                       if($func->isAbstract())\r
+                       {\r
+                               error_log('XML-RPC: method to be wrapped is abstract: '.$plainfuncname);\r
+                               return false;\r
+                       }\r
+                /// @todo add more checks for static vs. nonstatic?\r
+            }\r
+                       else\r
+                       {\r
+                       $func =& new ReflectionFunction($funcname);\r
+            }\r
+                       if($func->isInternal())\r
+                       {\r
+                               // Note: from PHP 5.1.0 onward, we will possibly be able to use invokeargs\r
+                               // instead of getparameters to fully reflect internal php functions ?\r
+                               error_log('XML-RPC: function to be wrapped is internal: '.$plainfuncname);\r
+                               return false;\r
+                       }\r
+\r
+                       // retrieve parameter names, types and description from javadoc comments\r
+\r
+                       // function description\r
+                       $desc = '';\r
+                       // type of return val: by default 'any'\r
+                       $returns = $GLOBALS['xmlrpcValue'];\r
+                       // desc of return val\r
+                       $returnsDocs = '';\r
+                       // type + name of function parameters\r
+                       $paramDocs = array();\r
+\r
+                       $docs = $func->getDocComment();\r
+                       if($docs != '')\r
+                       {\r
+                               $docs = explode("\n", $docs);\r
+                               $i = 0;\r
+                               foreach($docs as $doc)\r
+                               {\r
+                                       $doc = trim($doc, " \r\t/*");\r
+                                       if(strlen($doc) && strpos($doc, '@') !== 0 && !$i)\r
+                                       {\r
+                                               if($desc)\r
+                                               {\r
+                                                       $desc .= "\n";\r
+                                               }\r
+                                               $desc .= $doc;\r
+                                       }\r
+                                       elseif(strpos($doc, '@param') === 0)\r
+                                       {\r
+                                               // syntax: @param type [$name] desc\r
+                                               if(preg_match('/@param\s+(\S+)(\s+\$\S+)?\s+(.+)/', $doc, $matches))\r
+                                               {\r
+                                                       if(strpos($matches[1], '|'))\r
+                                                       {\r
+                                                               //$paramDocs[$i]['type'] = explode('|', $matches[1]);\r
+                                                               $paramDocs[$i]['type'] = 'mixed';\r
+                                                       }\r
+                                                       else\r
+                                                       {\r
+                                                               $paramDocs[$i]['type'] = $matches[1];\r
+                                                       }\r
+                                                       $paramDocs[$i]['name'] = trim($matches[2]);\r
+                                                       $paramDocs[$i]['doc'] = $matches[3];\r
+                                               }\r
+                                               $i++;\r
+                                       }\r
+                                       elseif(strpos($doc, '@return') === 0)\r
+                                       {\r
+                                               // syntax: @return type desc\r
+                                               //$returns = preg_split('/\s+/', $doc);\r
+                                               if(preg_match('/@return\s+(\S+)\s+(.+)/', $doc, $matches))\r
+                                               {\r
+                                                       $returns = php_2_xmlrpc_type($matches[1]);\r
+                                                       if(isset($matches[2]))\r
+                                                       {\r
+                                                               $returnsDocs = $matches[2];\r
+                                                       }\r
+                                               }\r
+                                       }\r
+                               }\r
+                       }\r
+\r
+                       // execute introspection of actual function prototype\r
+                       $params = array();\r
+                       $i = 0;\r
+                       foreach($func->getParameters() as $paramobj)\r
+                       {\r
+                               $params[$i] = array();\r
+                               $params[$i]['name'] = '$'.$paramobj->getName();\r
+                               $params[$i]['isoptional'] = $paramobj->isOptional();\r
+                               $i++;\r
+                       }\r
+\r
+\r
+                       // start  building of PHP code to be eval'd\r
+                       $innercode = '';\r
+                       $i = 0;\r
+                       $parsvariations = array();\r
+                       $pars = array();\r
+                       $pnum = count($params);\r
+                       foreach($params as $param)\r
+                       {\r
+                               if (isset($paramDocs[$i]['name']) && $paramDocs[$i]['name'] && strtolower($paramDocs[$i]['name']) != strtolower($param['name']))\r
+                               {\r
+                                       // param name from phpdoc info does not match param definition!\r
+                                       $paramDocs[$i]['type'] = 'mixed';\r
+                               }\r
+\r
+                               if($param['isoptional'])\r
+                               {\r
+                                       // this particular parameter is optional. save as valid previous list of parameters\r
+                                       $innercode .= "if (\$paramcount > $i) {\n";\r
+                                       $parsvariations[] = $pars;\r
+                               }\r
+                               $innercode .= "\$p$i = \$msg->getParam($i);\n";\r
+                               if ($decode_php_objects)\r
+                               {\r
+                                       $innercode .= "if (\$p{$i}->kindOf() == 'scalar') \$p$i = \$p{$i}->scalarval(); else \$p$i = php_{$prefix}_decode(\$p$i, array('decode_php_objs'));\n";\r
+                               }\r
+                               else\r
+                               {\r
+                                       $innercode .= "if (\$p{$i}->kindOf() == 'scalar') \$p$i = \$p{$i}->scalarval(); else \$p$i = php_{$prefix}_decode(\$p$i);\n";\r
+                               }\r
+\r
+                               $pars[] = "\$p$i";\r
+                               $i++;\r
+                               if($param['isoptional'])\r
+                               {\r
+                                       $innercode .= "}\n";\r
+                               }\r
+                               if($i == $pnum)\r
+                               {\r
+                                       // last allowed parameters combination\r
+                                       $parsvariations[] = $pars;\r
+                               }\r
+                       }\r
+\r
+                       $sigs = array();\r
+                       $psigs = array();\r
+                       if(count($parsvariations) == 0)\r
+                       {\r
+                               // only known good synopsis = no parameters\r
+                               $parsvariations[] = array();\r
+                               $minpars = 0;\r
+                       }\r
+                       else\r
+                       {\r
+                               $minpars = count($parsvariations[0]);\r
+                       }\r
+\r
+                       if($minpars)\r
+                       {\r
+                               // add to code the check for min params number\r
+                               // NB: this check needs to be done BEFORE decoding param values\r
+                               $innercode = "\$paramcount = \$msg->getNumParams();\n" .\r
+                               "if (\$paramcount < $minpars) return new {$prefix}resp(0, {$GLOBALS['xmlrpcerr']['incorrect_params']}, '{$GLOBALS['xmlrpcstr']['incorrect_params']}');\n" . $innercode;\r
+                       }\r
+                       else\r
+                       {\r
+                               $innercode = "\$paramcount = \$msg->getNumParams();\n" . $innercode;\r
+                       }\r
+\r
+                       $innercode .= "\$np = false;\n";\r
+                       // since there are no closures in php, if we are given an object instance,\r
+            // we store a pointer to it in a global var...\r
+                       if ( is_array($funcname) && is_object($funcname[0]) )\r
+                       {\r
+                           $GLOBALS['xmlrpcWPFObjHolder'][$xmlrpcfuncname] =& $funcname[0];\r
+                           $innercode .= "\$obj =& \$GLOBALS['xmlrpcWPFObjHolder']['$xmlrpcfuncname'];\n";\r
+                           $realfuncname = '$obj->'.$funcname[1];\r
+                       }\r
+                       else\r
+                       {\r
+                       $realfuncname = $plainfuncname;\r
+            }\r
+                       foreach($parsvariations as $pars)\r
+                       {\r
+                               $innercode .= "if (\$paramcount == " . count($pars) . ") \$retval = {$catch_warnings}$realfuncname(" . implode(',', $pars) . "); else\n";\r
+                               // build a 'generic' signature (only use an appropriate return type)\r
+                               $sig = array($returns);\r
+                               $psig = array($returnsDocs);\r
+                               for($i=0; $i < count($pars); $i++)\r
+                               {\r
+                                       if (isset($paramDocs[$i]['type']))\r
+                                       {\r
+                                               $sig[] = php_2_xmlrpc_type($paramDocs[$i]['type']);\r
+                                       }\r
+                                       else\r
+                                       {\r
+                                               $sig[] = $GLOBALS['xmlrpcValue'];\r
+                                       }\r
+                                       $psig[] = isset($paramDocs[$i]['doc']) ? $paramDocs[$i]['doc'] : '';\r
+                               }\r
+                               $sigs[] = $sig;\r
+                               $psigs[] = $psig;\r
+                       }\r
+                       $innercode .= "\$np = true;\n";\r
+                       $innercode .= "if (\$np) return new {$prefix}resp(0, {$GLOBALS['xmlrpcerr']['incorrect_params']}, '{$GLOBALS['xmlrpcstr']['incorrect_params']}'); else {\n";\r
+                       //$innercode .= "if (\$_xmlrpcs_error_occurred) return new xmlrpcresp(0, $GLOBALS['xmlrpcerr']user, \$_xmlrpcs_error_occurred); else\n";\r
+                       $innercode .= "if (is_a(\$retval, '{$prefix}resp')) return \$retval; else\n";\r
+                       if($returns == $GLOBALS['xmlrpcDateTime'] || $returns == $GLOBALS['xmlrpcBase64'])\r
+                       {\r
+                               $innercode .= "return new {$prefix}resp(new {$prefix}val(\$retval, '$returns'));";\r
+                       }\r
+                       else\r
+                       {\r
+                               if ($encode_php_objects)\r
+                                       $innercode .= "return new {$prefix}resp(php_{$prefix}_encode(\$retval, array('encode_php_objs')));\n";\r
+                               else\r
+                                       $innercode .= "return new {$prefix}resp(php_{$prefix}_encode(\$retval));\n";\r
+                       }\r
+                       // shall we exclude functions returning by ref?\r
+                       // if($func->returnsReference())\r
+                       //      return false;\r
+                       $code = "function $xmlrpcfuncname(\$msg) {\n" . $innercode . "}\n}";\r
+                       //print_r($code);\r
+                       if ($buildit)\r
+                       {\r
+                               $allOK = 0;\r
+                               eval($code.'$allOK=1;');\r
+                               // alternative\r
+                               //$xmlrpcfuncname = create_function('$m', $innercode);\r
+\r
+                               if(!$allOK)\r
+                               {\r
+                                       error_log('XML-RPC: could not create function '.$xmlrpcfuncname.' to wrap php function '.$plainfuncname);\r
+                                       return false;\r
+                               }\r
+                       }\r
+\r
+                       /// @todo examine if $paramDocs matches $parsvariations and build array for\r
+                       /// usage as method signature, plus put together a nice string for docs\r
+\r
+                       $ret = array('function' => $xmlrpcfuncname, 'signature' => $sigs, 'docstring' => $desc, 'signature_docs' => $psigs, 'source' => $code);\r
+                       return $ret;\r
+               }\r
+       }\r
+\r
+    /**\r
+    * Given a user-defined PHP class or php object, map its methods onto a list of\r
+       * PHP 'wrapper' functions that can be exposed as xmlrpc methods from an xmlrpc_server\r
+       * object and called from remote clients (as well as their corresponding signature info).\r
+       *\r
+    * @param mixed $classname the name of the class whose methods are to be exposed as xmlrpc methods, or an object instance of that class\r
+    * @param array $extra_options see the docs for wrap_php_method for more options\r
+    *        string method_type 'static', 'nonstatic', 'all' and 'auto' (default); the latter will switch between static and non-static depending on wheter $classname is a class name or object instance\r
+    * @return array or false on failure\r
+    *\r
+    * @todo get_class_methods will return both static and non-static methods.\r
+    *       we have to differentiate the action, depending on wheter we recived a class name or object\r
+    */\r
+    function wrap_php_class($classname, $extra_options=array())\r
+    {\r
+               $methodfilter = isset($extra_options['method_filter']) ? $extra_options['method_filter'] : '';\r
+               $methodtype = isset($extra_options['method_type']) ? $extra_options['method_type'] : 'auto';\r
+\r
+        if(version_compare(phpversion(), '5.0.3') == -1)\r
+               {\r
+                       // up to php 5.0.3 some useful reflection methods were missing\r
+                       error_log('XML-RPC: cannot not wrap php functions unless running php version bigger than 5.0.3');\r
+                       return false;\r
+               }\r
+\r
+        $result = array();\r
+               $mlist = get_class_methods($classname);\r
+               foreach($mlist as $mname)\r
+               {\r
+               if ($methodfilter == '' || preg_match($methodfilter, $mname))\r
+                       {\r
+                       // echo $mlist."\n";\r
+                       $func =& new ReflectionMethod($classname, $mname);\r
+                       if(!$func->isPrivate() && !$func->isProtected() && !$func->isConstructor() && !$func->isDestructor() && !$func->isAbstract())\r
+                       {\r
+                               if(($func->isStatic && ($methodtype == 'all' || $methodtype == 'static' || ($methodtype == 'auto' && is_string($classname)))) ||\r
+                               (!$func->isStatic && ($methodtype == 'all' || $methodtype == 'nonstatic' || ($methodtype == 'auto' && is_object($classname)))))\r
+                       {\r
+                        $methodwrap = wrap_php_function(array($classname, $mname), '', $extra_options);\r
+                        if ( $methodwrap )\r
+                        {\r
+                            $result[$methodwrap['function']] = $methodwrap['function'];\r
+                        }\r
+                    }\r
+                       }\r
+                       }\r
+               }\r
+        return $result;\r
+    }\r
+\r
+       /**\r
+       * Given an xmlrpc client and a method name, register a php wrapper function\r
+       * that will call it and return results using native php types for both\r
+       * params and results. The generated php function will return an xmlrpcresp\r
+       * oject for failed xmlrpc calls\r
+       *\r
+       * Known limitations:\r
+       * - server must support system.methodsignature for the wanted xmlrpc method\r
+       * - for methods that expose many signatures, only one can be picked (we\r
+       *   could in priciple check if signatures differ only by number of params\r
+       *   and not by type, but it would be more complication than we can spare time)\r
+       * - nested xmlrpc params: the caller of the generated php function has to\r
+       *   encode on its own the params passed to the php function if these are structs\r
+       *   or arrays whose (sub)members include values of type datetime or base64\r
+       *\r
+       * Notes: the connection properties of the given client will be copied\r
+       * and reused for the connection used during the call to the generated\r
+       * php function.\r
+       * Calling the generated php function 'might' be slow: a new xmlrpc client\r
+       * is created on every invocation and an xmlrpc-connection opened+closed.\r
+       * An extra 'debug' param is appended to param list of xmlrpc method, useful\r
+       * for debugging purposes.\r
+       *\r
+       * @param xmlrpc_client $client     an xmlrpc client set up correctly to communicate with target server\r
+       * @param string        $methodname the xmlrpc method to be mapped to a php function\r
+       * @param array         $extra_options array of options that specify conversion details. valid ptions include\r
+       *        integer       signum      the index of the method signature to use in mapping (if method exposes many sigs)\r
+       *        integer       timeout     timeout (in secs) to be used when executing function/calling remote method\r
+       *        string        protocol    'http' (default), 'http11' or 'https'\r
+       *        string        new_function_name the name of php function to create. If unsepcified, lib will pick an appropriate name\r
+       *        string        return_source if true return php code w. function definition instead fo function name\r
+       *        bool          encode_php_objs let php objects be sent to server using the 'improved' xmlrpc notation, so server can deserialize them as php objects\r
+       *        bool          decode_php_objs --- WARNING !!! possible security hazard. only use it with trusted servers ---\r
+       *        mixed         return_on_fault a php value to be returned when the xmlrpc call fails/returns a fault response (by default the xmlrpcresp object is returned in this case). If a string is used, '%faultCode%' and '%faultString%' tokens will be substituted with actual error values\r
+       *        bool          debug        set it to 1 or 2 to see debug results of querying server for method synopsis\r
+       * @return string                   the name of the generated php function (or false) - OR AN ARRAY...\r
+       */\r
+       function wrap_xmlrpc_method($client, $methodname, $extra_options=0, $timeout=0, $protocol='', $newfuncname='')\r
+       {\r
+               // mind numbing: let caller use sane calling convention (as per javadoc, 3 params),\r
+               // OR the 2.0 calling convention (no options) - we really love backward compat, don't we?\r
+               if (!is_array($extra_options))\r
+               {\r
+                       $signum = $extra_options;\r
+                       $extra_options = array();\r
+               }\r
+               else\r
+               {\r
+                       $signum = isset($extra_options['signum']) ? (int)$extra_options['signum'] : 0;\r
+                       $timeout = isset($extra_options['timeout']) ? (int)$extra_options['timeout'] : 0;\r
+                       $protocol = isset($extra_options['protocol']) ? $extra_options['protocol'] : '';\r
+                       $newfuncname = isset($extra_options['new_function_name']) ? $extra_options['new_function_name'] : '';\r
+               }\r
+               //$encode_php_objects = in_array('encode_php_objects', $extra_options);\r
+               //$verbatim_client_copy = in_array('simple_client_copy', $extra_options) ? 1 :\r
+               //      in_array('build_class_code', $extra_options) ? 2 : 0;\r
+\r
+               $encode_php_objects = isset($extra_options['encode_php_objs']) ? (bool)$extra_options['encode_php_objs'] : false;\r
+               $decode_php_objects = isset($extra_options['decode_php_objs']) ? (bool)$extra_options['decode_php_objs'] : false;\r
+               $simple_client_copy = isset($extra_options['simple_client_copy']) ? (int)($extra_options['simple_client_copy']) : 0;\r
+               $buildit = isset($extra_options['return_source']) ? !($extra_options['return_source']) : true;\r
+               $prefix = isset($extra_options['prefix']) ? $extra_options['prefix'] : 'xmlrpc';\r
+               if (isset($extra_options['return_on_fault']))\r
+               {\r
+                       $decode_fault = true;\r
+                       $fault_response = $extra_options['return_on_fault'];\r
+               }\r
+               else\r
+               {\r
+                       $decode_fault = false;\r
+                       $fault_response = '';\r
+               }\r
+               $debug = isset($extra_options['debug']) ? ($extra_options['debug']) : 0;\r
+\r
+               $msgclass = $prefix.'msg';\r
+               $valclass = $prefix.'val';\r
+               $decodefunc = 'php_'.$prefix.'_decode';\r
+\r
+               $msg =& new $msgclass('system.methodSignature');\r
+               $msg->addparam(new $valclass($methodname));\r
+               $client->setDebug($debug);\r
+               $response =& $client->send($msg, $timeout, $protocol);\r
+               if($response->faultCode())\r
+               {\r
+                       error_log('XML-RPC: could not retrieve method signature from remote server for method '.$methodname);\r
+                       return false;\r
+               }\r
+               else\r
+               {\r
+                       $msig = $response->value();\r
+                       if ($client->return_type != 'phpvals')\r
+                       {\r
+                               $msig = $decodefunc($msig);\r
+                       }\r
+                       if(!is_array($msig) || count($msig) <= $signum)\r
+                       {\r
+                               error_log('XML-RPC: could not retrieve method signature nr.'.$signum.' from remote server for method '.$methodname);\r
+                               return false;\r
+                       }\r
+                       else\r
+                       {\r
+                               // pick a suitable name for the new function, avoiding collisions\r
+                               if($newfuncname != '')\r
+                               {\r
+                                       $xmlrpcfuncname = $newfuncname;\r
+                               }\r
+                               else\r
+                               {\r
+                                       // take care to insure that methodname is translated to valid\r
+                                       // php function name\r
+                                       $xmlrpcfuncname = $prefix.'_'.preg_replace(array('/\./', '/[^a-zA-Z0-9_\x7f-\xff]/'),\r
+                                               array('_', ''), $methodname);\r
+                               }\r
+                               while($buildit && function_exists($xmlrpcfuncname))\r
+                               {\r
+                                       $xmlrpcfuncname .= 'x';\r
+                               }\r
+\r
+                               $msig = $msig[$signum];\r
+                               $mdesc = '';\r
+                               // if in 'offline' mode, get method description too.\r
+                               // in online mode, favour speed of operation\r
+                               if(!$buildit)\r
+                               {\r
+                                       $msg =& new $msgclass('system.methodHelp');\r
+                                       $msg->addparam(new $valclass($methodname));\r
+                                       $response =& $client->send($msg, $timeout, $protocol);\r
+                                       if (!$response->faultCode())\r
+                                       {\r
+                                               $mdesc = $response->value();\r
+                                               if ($client->return_type != 'phpvals')\r
+                                               {\r
+                                                       $mdesc = $mdesc->scalarval();\r
+                                               }\r
+                                       }\r
+                               }\r
+\r
+                               $results = build_remote_method_wrapper_code($client, $methodname,\r
+                                       $xmlrpcfuncname, $msig, $mdesc, $timeout, $protocol, $simple_client_copy,\r
+                                       $prefix, $decode_php_objects, $encode_php_objects, $decode_fault,\r
+                                       $fault_response);\r
+\r
+                               //print_r($code);\r
+                               if ($buildit)\r
+                               {\r
+                                       $allOK = 0;\r
+                                       eval($results['source'].'$allOK=1;');\r
+                                       // alternative\r
+                                       //$xmlrpcfuncname = create_function('$m', $innercode);\r
+                                       if($allOK)\r
+                                       {\r
+                                               return $xmlrpcfuncname;\r
+                                       }\r
+                                       else\r
+                                       {\r
+                                               error_log('XML-RPC: could not create function '.$xmlrpcfuncname.' to wrap remote method '.$methodname);\r
+                                               return false;\r
+                                       }\r
+                               }\r
+                               else\r
+                               {\r
+                                       $results['function'] = $xmlrpcfuncname;\r
+                                       return $results;\r
+                               }\r
+                       }\r
+               }\r
+       }\r
+\r
+       /**\r
+       * Similar to wrap_xmlrpc_method, but will generate a php class that wraps\r
+       * all xmlrpc methods exposed by the remote server as own methods.\r
+       * For more details see wrap_xmlrpc_method.\r
+       * @param xmlrpc_client $client the client obj all set to query the desired server\r
+       * @param array $extra_options list of options for wrapped code\r
+       * @return mixed false on error, the name of the created class if all ok or an array with code, class name and comments (if the appropriatevoption is set in extra_options)\r
+       */\r
+       function wrap_xmlrpc_server($client, $extra_options=array())\r
+       {\r
+               $methodfilter = isset($extra_options['method_filter']) ? $extra_options['method_filter'] : '';\r
+               //$signum = isset($extra_options['signum']) ? (int)$extra_options['signum'] : 0;\r
+               $timeout = isset($extra_options['timeout']) ? (int)$extra_options['timeout'] : 0;\r
+               $protocol = isset($extra_options['protocol']) ? $extra_options['protocol'] : '';\r
+               $newclassname = isset($extra_options['new_class_name']) ? $extra_options['new_class_name'] : '';\r
+               $encode_php_objects = isset($extra_options['encode_php_objs']) ? (bool)$extra_options['encode_php_objs'] : false;\r
+               $decode_php_objects = isset($extra_options['decode_php_objs']) ? (bool)$extra_options['decode_php_objs'] : false;\r
+               $verbatim_client_copy = isset($extra_options['simple_client_copy']) ? !($extra_options['simple_client_copy']) : true;\r
+               $buildit = isset($extra_options['return_source']) ? !($extra_options['return_source']) : true;\r
+               $prefix = isset($extra_options['prefix']) ? $extra_options['prefix'] : 'xmlrpc';\r
+\r
+               $msgclass = $prefix.'msg';\r
+               //$valclass = $prefix.'val';\r
+               $decodefunc = 'php_'.$prefix.'_decode';\r
+\r
+               $msg =& new $msgclass('system.listMethods');\r
+               $response =& $client->send($msg, $timeout, $protocol);\r
+               if($response->faultCode())\r
+               {\r
+                       error_log('XML-RPC: could not retrieve method list from remote server');\r
+                       return false;\r
+               }\r
+               else\r
+               {\r
+                       $mlist = $response->value();\r
+                       if ($client->return_type != 'phpvals')\r
+                       {\r
+                               $mlist = $decodefunc($mlist);\r
+                       }\r
+                       if(!is_array($mlist) || !count($mlist))\r
+                       {\r
+                               error_log('XML-RPC: could not retrieve meaningful method list from remote server');\r
+                               return false;\r
+                       }\r
+                       else\r
+                       {\r
+                               // pick a suitable name for the new function, avoiding collisions\r
+                               if($newclassname != '')\r
+                               {\r
+                                       $xmlrpcclassname = $newclassname;\r
+                               }\r
+                               else\r
+                               {\r
+                                       $xmlrpcclassname = $prefix.'_'.preg_replace(array('/\./', '/[^a-zA-Z0-9_\x7f-\xff]/'),\r
+                                               array('_', ''), $client->server).'_client';\r
+                               }\r
+                               while($buildit && class_exists($xmlrpcclassname))\r
+                               {\r
+                                       $xmlrpcclassname .= 'x';\r
+                               }\r
+\r
+                               /// @todo add function setdebug() to new class, to enable/disable debugging\r
+                               $source = "class $xmlrpcclassname\n{\nvar \$client;\n\n";\r
+                               $source .= "function $xmlrpcclassname()\n{\n";\r
+                               $source .= build_client_wrapper_code($client, $verbatim_client_copy, $prefix);\r
+                               $source .= "\$this->client =& \$client;\n}\n\n";\r
+                               $opts = array('simple_client_copy' => 2, 'return_source' => true,\r
+                                       'timeout' => $timeout, 'protocol' => $protocol,\r
+                                       'encode_php_objs' => $encode_php_objects, 'prefix' => $prefix,\r
+                                       'decode_php_objs' => $decode_php_objects\r
+                                       );\r
+                               /// @todo build javadoc for class definition, too\r
+                               foreach($mlist as $mname)\r
+                               {\r
+                                       if ($methodfilter == '' || preg_match($methodfilter, $mname))\r
+                                       {\r
+                                               $opts['new_function_name'] = preg_replace(array('/\./', '/[^a-zA-Z0-9_\x7f-\xff]/'),\r
+                                                       array('_', ''), $mname);\r
+                                               $methodwrap = wrap_xmlrpc_method($client, $mname, $opts);\r
+                                               if ($methodwrap)\r
+                                               {\r
+                                                       if (!$buildit)\r
+                                                       {\r
+                                                               $source .= $methodwrap['docstring'];\r
+                                                       }\r
+                                                       $source .= $methodwrap['source']."\n";\r
+                                               }\r
+                                               else\r
+                                               {\r
+                                                       error_log('XML-RPC: will not create class method to wrap remote method '.$mname);\r
+                                               }\r
+                                       }\r
+                               }\r
+                               $source .= "}\n";\r
+                               if ($buildit)\r
+                               {\r
+                                       $allOK = 0;\r
+                                       eval($source.'$allOK=1;');\r
+                                       // alternative\r
+                                       //$xmlrpcfuncname = create_function('$m', $innercode);\r
+                                       if($allOK)\r
+                                       {\r
+                                               return $xmlrpcclassname;\r
+                                       }\r
+                                       else\r
+                                       {\r
+                                               error_log('XML-RPC: could not create class '.$xmlrpcclassname.' to wrap remote server '.$client->server);\r
+                                               return false;\r
+                                       }\r
+                               }\r
+                               else\r
+                               {\r
+                                       return array('class' => $xmlrpcclassname, 'code' => $source, 'docstring' => '');\r
+                               }\r
+                       }\r
+               }\r
+       }\r
+\r
+       /**\r
+       * Given the necessary info, build php code that creates a new function to\r
+       * invoke a remote xmlrpc method.\r
+       * Take care that no full checking of input parameters is done to ensure that\r
+       * valid php code is emitted.\r
+       * Note: real spaghetti code follows...\r
+       * @access private\r
+       */\r
+       function build_remote_method_wrapper_code($client, $methodname, $xmlrpcfuncname,\r
+               $msig, $mdesc='', $timeout=0, $protocol='', $client_copy_mode=0, $prefix='xmlrpc',\r
+               $decode_php_objects=false, $encode_php_objects=false, $decode_fault=false,\r
+               $fault_response='')\r
+       {\r
+               $code = "function $xmlrpcfuncname (";\r
+               if ($client_copy_mode < 2)\r
+               {\r
+                       // client copy mode 0 or 1 == partial / full client copy in emitted code\r
+                       $innercode = build_client_wrapper_code($client, $client_copy_mode, $prefix);\r
+                       $innercode .= "\$client->setDebug(\$debug);\n";\r
+                       $this_ = '';\r
+               }\r
+               else\r
+               {\r
+                       // client copy mode 2 == no client copy in emitted code\r
+                       $innercode = '';\r
+                       $this_ = 'this->';\r
+               }\r
+               $innercode .= "\$msg =& new {$prefix}msg('$methodname');\n";\r
+\r
+               if ($mdesc != '')\r
+               {\r
+                       // take care that PHP comment is not terminated unwillingly by method description\r
+                       $mdesc = "/**\n* ".str_replace('*/', '* /', $mdesc)."\n";\r
+               }\r
+               else\r
+               {\r
+                       $mdesc = "/**\nFunction $xmlrpcfuncname\n";\r
+               }\r
+\r
+               // param parsing\r
+               $plist = array();\r
+               $pcount = count($msig);\r
+               for($i = 1; $i < $pcount; $i++)\r
+               {\r
+                       $plist[] = "\$p$i";\r
+                       $ptype = $msig[$i];\r
+                       if($ptype == 'i4' || $ptype == 'int' || $ptype == 'boolean' || $ptype == 'double' ||\r
+                               $ptype == 'string' || $ptype == 'dateTime.iso8601' || $ptype == 'base64' || $ptype == 'null')\r
+                       {\r
+                               // only build directly xmlrpcvals when type is known and scalar\r
+                               $innercode .= "\$p$i =& new {$prefix}val(\$p$i, '$ptype');\n";\r
+                       }\r
+                       else\r
+                       {\r
+                               if ($encode_php_objects)\r
+                               {\r
+                                       $innercode .= "\$p$i =& php_{$prefix}_encode(\$p$i, array('encode_php_objs'));\n";\r
+                               }\r
+                               else\r
+                               {\r
+                                       $innercode .= "\$p$i =& php_{$prefix}_encode(\$p$i);\n";\r
+                               }\r
+                       }\r
+                       $innercode .= "\$msg->addparam(\$p$i);\n";\r
+                       $mdesc .= '* @param '.xmlrpc_2_php_type($ptype)." \$p$i\n";\r
+               }\r
+               if ($client_copy_mode < 2)\r
+               {\r
+                       $plist[] = '$debug=0';\r
+                       $mdesc .= "* @param int \$debug when 1 (or 2) will enable debugging of the underlying {$prefix} call (defaults to 0)\n";\r
+               }\r
+               $plist = implode(', ', $plist);\r
+               $mdesc .= '* @return '.xmlrpc_2_php_type($msig[0])." (or an {$prefix}resp obj instance if call fails)\n*/\n";\r
+\r
+               $innercode .= "\$res =& \${$this_}client->send(\$msg, $timeout, '$protocol');\n";\r
+               if ($decode_fault)\r
+               {\r
+                       if (is_string($fault_response) && ((strpos($fault_response, '%faultCode%') !== false) || (strpos($fault_response, '%faultString%') !== false)))\r
+                       {\r
+                               $respcode = "str_replace(array('%faultCode%', '%faultString%'), array(\$res->faultCode(), \$res->faultString()), '".str_replace("'", "''", $fault_response)."')";\r
+                       }\r
+                       else\r
+                       {\r
+                               $respcode = var_export($fault_response, true);\r
+                       }\r
+               }\r
+               else\r
+               {\r
+                       $respcode = '$res';\r
+               }\r
+               if ($decode_php_objects)\r
+               {\r
+                       $innercode .= "if (\$res->faultcode()) return $respcode; else return php_{$prefix}_decode(\$res->value(), array('decode_php_objs'));";\r
+               }\r
+               else\r
+               {\r
+                       $innercode .= "if (\$res->faultcode()) return $respcode; else return php_{$prefix}_decode(\$res->value());";\r
+               }\r
+\r
+               $code = $code . $plist. ") {\n" . $innercode . "\n}\n";\r
+\r
+               return array('source' => $code, 'docstring' => $mdesc);\r
+       }\r
+\r
+       /**\r
+       * Given necessary info, generate php code that will rebuild a client object\r
+       * Take care that no full checking of input parameters is done to ensure that\r
+       * valid php code is emitted.\r
+       * @access private\r
+       */\r
+       function build_client_wrapper_code($client, $verbatim_client_copy, $prefix='xmlrpc')\r
+       {\r
+               $code = "\$client =& new {$prefix}_client('".str_replace("'", "\'", $client->path).\r
+                       "', '" . str_replace("'", "\'", $client->server) . "', $client->port);\n";\r
+\r
+               // copy all client fields to the client that will be generated runtime\r
+               // (this provides for future expansion or subclassing of client obj)\r
+               if ($verbatim_client_copy)\r
+               {\r
+                       foreach($client as $fld => $val)\r
+                       {\r
+                               if($fld != 'debug' && $fld != 'return_type')\r
+                               {\r
+                                       $val = var_export($val, true);\r
+                                       $code .= "\$client->$fld = $val;\n";\r
+                               }\r
+                       }\r
+               }\r
+               // only make sure that client always returns the correct data type\r
+               $code .= "\$client->return_type = '{$prefix}vals';\n";\r
+               //$code .= "\$client->setDebug(\$debug);\n";\r
+               return $code;\r
+       }\r
+?>
\ No newline at end of file
diff --git a/lib/xmlrpcs.inc b/lib/xmlrpcs.inc
new file mode 100644 (file)
index 0000000..9fc4d0c
--- /dev/null
@@ -0,0 +1,1198 @@
+<?php\r
+// by Edd Dumbill (C) 1999-2002\r
+// <edd@usefulinc.com>\r
+// $Id: xmlrpcs.inc,v 1.71 2008/10/29 23:41:28 ggiunta Exp $\r
+\r
+// Copyright (c) 1999,2000,2002 Edd Dumbill.\r
+// All rights reserved.\r
+//\r
+// Redistribution and use in source and binary forms, with or without\r
+// modification, are permitted provided that the following conditions\r
+// are met:\r
+//\r
+//    * Redistributions of source code must retain the above copyright\r
+//      notice, this list of conditions and the following disclaimer.\r
+//\r
+//    * Redistributions in binary form must reproduce the above\r
+//      copyright notice, this list of conditions and the following\r
+//      disclaimer in the documentation and/or other materials provided\r
+//      with the distribution.\r
+//\r
+//    * Neither the name of the "XML-RPC for PHP" nor the names of its\r
+//      contributors may be used to endorse or promote products derived\r
+//      from this software without specific prior written permission.\r
+//\r
+// THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS\r
+// "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT\r
+// LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS\r
+// FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE\r
+// REGENTS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,\r
+// INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES\r
+// (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR\r
+// SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)\r
+// HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,\r
+// STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)\r
+// ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED\r
+// OF THE POSSIBILITY OF SUCH DAMAGE.\r
+\r
+       // XML RPC Server class\r
+       // requires: xmlrpc.inc\r
+\r
+       $GLOBALS['xmlrpcs_capabilities'] = array(\r
+               // xmlrpc spec: always supported\r
+               'xmlrpc' => new xmlrpcval(array(\r
+                       'specUrl' => new xmlrpcval('http://www.xmlrpc.com/spec', 'string'),\r
+                       'specVersion' => new xmlrpcval(1, 'int')\r
+               ), 'struct'),\r
+               // if we support system.xxx functions, we always support multicall, too...\r
+               // Note that, as of 2006/09/17, the following URL does not respond anymore\r
+               'system.multicall' => new xmlrpcval(array(\r
+                       'specUrl' => new xmlrpcval('http://www.xmlrpc.com/discuss/msgReader$1208', 'string'),\r
+                       'specVersion' => new xmlrpcval(1, 'int')\r
+               ), 'struct'),\r
+               // introspection: version 2! we support 'mixed', too\r
+               'introspection' => new xmlrpcval(array(\r
+                       'specUrl' => new xmlrpcval('http://phpxmlrpc.sourceforge.net/doc-2/ch10.html', 'string'),\r
+                       'specVersion' => new xmlrpcval(2, 'int')\r
+               ), 'struct')\r
+       );\r
+\r
+       /* Functions that implement system.XXX methods of xmlrpc servers */\r
+       $_xmlrpcs_getCapabilities_sig=array(array($GLOBALS['xmlrpcStruct']));\r
+       $_xmlrpcs_getCapabilities_doc='This method lists all the capabilites that the XML-RPC server has: the (more or less standard) extensions to the xmlrpc spec that it adheres to';\r
+       $_xmlrpcs_getCapabilities_sdoc=array(array('list of capabilities, described as structs with a version number and url for the spec'));\r
+       function _xmlrpcs_getCapabilities($server, $m=null)\r
+       {\r
+               $outAr = $GLOBALS['xmlrpcs_capabilities'];\r
+               // NIL extension\r
+               if ($GLOBALS['xmlrpc_null_extension']) {\r
+                       $outAr['nil'] = new xmlrpcval(array(\r
+                               'specUrl' => new xmlrpcval('http://www.ontosys.com/xml-rpc/extensions.php', 'string'),\r
+                               'specVersion' => new xmlrpcval(1, 'int')\r
+                       ), 'struct');\r
+               }\r
+               return new xmlrpcresp(new xmlrpcval($outAr, 'struct'));\r
+       }\r
+\r
+       // listMethods: signature was either a string, or nothing.\r
+       // The useless string variant has been removed\r
+       $_xmlrpcs_listMethods_sig=array(array($GLOBALS['xmlrpcArray']));\r
+       $_xmlrpcs_listMethods_doc='This method lists all the methods that the XML-RPC server knows how to dispatch';\r
+       $_xmlrpcs_listMethods_sdoc=array(array('list of method names'));\r
+       function _xmlrpcs_listMethods($server, $m=null) // if called in plain php values mode, second param is missing\r
+       {\r
+\r
+               $outAr=array();\r
+               foreach($server->dmap as $key => $val)\r
+               {\r
+                       $outAr[]=&new xmlrpcval($key, 'string');\r
+               }\r
+               if($server->allow_system_funcs)\r
+               {\r
+                       foreach($GLOBALS['_xmlrpcs_dmap'] as $key => $val)\r
+                       {\r
+                               $outAr[]=&new xmlrpcval($key, 'string');\r
+                       }\r
+               }\r
+               return new xmlrpcresp(new xmlrpcval($outAr, 'array'));\r
+       }\r
+\r
+       $_xmlrpcs_methodSignature_sig=array(array($GLOBALS['xmlrpcArray'], $GLOBALS['xmlrpcString']));\r
+       $_xmlrpcs_methodSignature_doc='Returns an array of known signatures (an array of arrays) for the method name passed. If no signatures are known, returns a none-array (test for type != array to detect missing signature)';\r
+       $_xmlrpcs_methodSignature_sdoc=array(array('list of known signatures, each sig being an array of xmlrpc type names', 'name of method to be described'));\r
+       function _xmlrpcs_methodSignature($server, $m)\r
+       {\r
+               // let accept as parameter both an xmlrpcval or string\r
+               if (is_object($m))\r
+               {\r
+                       $methName=$m->getParam(0);\r
+                       $methName=$methName->scalarval();\r
+               }\r
+               else\r
+               {\r
+                       $methName=$m;\r
+               }\r
+               if(strpos($methName, "system.") === 0)\r
+               {\r
+                       $dmap=$GLOBALS['_xmlrpcs_dmap']; $sysCall=1;\r
+               }\r
+               else\r
+               {\r
+                       $dmap=$server->dmap; $sysCall=0;\r
+               }\r
+               if(isset($dmap[$methName]))\r
+               {\r
+                       if(isset($dmap[$methName]['signature']))\r
+                       {\r
+                               $sigs=array();\r
+                               foreach($dmap[$methName]['signature'] as $inSig)\r
+                               {\r
+                                       $cursig=array();\r
+                                       foreach($inSig as $sig)\r
+                                       {\r
+                                               $cursig[]=&new xmlrpcval($sig, 'string');\r
+                                       }\r
+                                       $sigs[]=&new xmlrpcval($cursig, 'array');\r
+                               }\r
+                               $r=&new xmlrpcresp(new xmlrpcval($sigs, 'array'));\r
+                       }\r
+                       else\r
+                       {\r
+                               // NB: according to the official docs, we should be returning a\r
+                               // "none-array" here, which means not-an-array\r
+                               $r=&new xmlrpcresp(new xmlrpcval('undef', 'string'));\r
+                       }\r
+               }\r
+               else\r
+               {\r
+                       $r=&new xmlrpcresp(0,$GLOBALS['xmlrpcerr']['introspect_unknown'], $GLOBALS['xmlrpcstr']['introspect_unknown']);\r
+               }\r
+               return $r;\r
+       }\r
+\r
+       $_xmlrpcs_methodHelp_sig=array(array($GLOBALS['xmlrpcString'], $GLOBALS['xmlrpcString']));\r
+       $_xmlrpcs_methodHelp_doc='Returns help text if defined for the method passed, otherwise returns an empty string';\r
+       $_xmlrpcs_methodHelp_sdoc=array(array('method description', 'name of the method to be described'));\r
+       function _xmlrpcs_methodHelp($server, $m)\r
+       {\r
+               // let accept as parameter both an xmlrpcval or string\r
+               if (is_object($m))\r
+               {\r
+                       $methName=$m->getParam(0);\r
+                       $methName=$methName->scalarval();\r
+               }\r
+               else\r
+               {\r
+                       $methName=$m;\r
+               }\r
+               if(strpos($methName, "system.") === 0)\r
+               {\r
+                       $dmap=$GLOBALS['_xmlrpcs_dmap']; $sysCall=1;\r
+               }\r
+               else\r
+               {\r
+                       $dmap=$server->dmap; $sysCall=0;\r
+               }\r
+               if(isset($dmap[$methName]))\r
+               {\r
+                       if(isset($dmap[$methName]['docstring']))\r
+                       {\r
+                               $r=&new xmlrpcresp(new xmlrpcval($dmap[$methName]['docstring']), 'string');\r
+                       }\r
+                       else\r
+                       {\r
+                               $r=&new xmlrpcresp(new xmlrpcval('', 'string'));\r
+                       }\r
+               }\r
+               else\r
+               {\r
+                       $r=&new xmlrpcresp(0, $GLOBALS['xmlrpcerr']['introspect_unknown'], $GLOBALS['xmlrpcstr']['introspect_unknown']);\r
+               }\r
+               return $r;\r
+       }\r
+\r
+       $_xmlrpcs_multicall_sig = array(array($GLOBALS['xmlrpcArray'], $GLOBALS['xmlrpcArray']));\r
+       $_xmlrpcs_multicall_doc = 'Boxcar multiple RPC calls in one request. See http://www.xmlrpc.com/discuss/msgReader$1208 for details';\r
+       $_xmlrpcs_multicall_sdoc = array(array('list of response structs, where each struct has the usual members', 'list of calls, with each call being represented as a struct, with members "methodname" and "params"'));\r
+       function _xmlrpcs_multicall_error($err)\r
+       {\r
+               if(is_string($err))\r
+               {\r
+                       $str = $GLOBALS['xmlrpcstr']["multicall_${err}"];\r
+                       $code = $GLOBALS['xmlrpcerr']["multicall_${err}"];\r
+               }\r
+               else\r
+               {\r
+                       $code = $err->faultCode();\r
+                       $str = $err->faultString();\r
+               }\r
+               $struct = array();\r
+               $struct['faultCode'] =& new xmlrpcval($code, 'int');\r
+               $struct['faultString'] =& new xmlrpcval($str, 'string');\r
+               return new xmlrpcval($struct, 'struct');\r
+       }\r
+\r
+       function _xmlrpcs_multicall_do_call($server, $call)\r
+       {\r
+               if($call->kindOf() != 'struct')\r
+               {\r
+                       return _xmlrpcs_multicall_error('notstruct');\r
+               }\r
+               $methName = @$call->structmem('methodName');\r
+               if(!$methName)\r
+               {\r
+                       return _xmlrpcs_multicall_error('nomethod');\r
+               }\r
+               if($methName->kindOf() != 'scalar' || $methName->scalartyp() != 'string')\r
+               {\r
+                       return _xmlrpcs_multicall_error('notstring');\r
+               }\r
+               if($methName->scalarval() == 'system.multicall')\r
+               {\r
+                       return _xmlrpcs_multicall_error('recursion');\r
+               }\r
+\r
+               $params = @$call->structmem('params');\r
+               if(!$params)\r
+               {\r
+                       return _xmlrpcs_multicall_error('noparams');\r
+               }\r
+               if($params->kindOf() != 'array')\r
+               {\r
+                       return _xmlrpcs_multicall_error('notarray');\r
+               }\r
+               $numParams = $params->arraysize();\r
+\r
+               $msg =& new xmlrpcmsg($methName->scalarval());\r
+               for($i = 0; $i < $numParams; $i++)\r
+               {\r
+                       if(!$msg->addParam($params->arraymem($i)))\r
+                       {\r
+                               $i++;\r
+                               return _xmlrpcs_multicall_error(new xmlrpcresp(0,\r
+                                       $GLOBALS['xmlrpcerr']['incorrect_params'],\r
+                                       $GLOBALS['xmlrpcstr']['incorrect_params'] . ": probable xml error in param " . $i));\r
+                       }\r
+               }\r
+\r
+               $result = $server->execute($msg);\r
+\r
+               if($result->faultCode() != 0)\r
+               {\r
+                       return _xmlrpcs_multicall_error($result);               // Method returned fault.\r
+               }\r
+\r
+               return new xmlrpcval(array($result->value()), 'array');\r
+       }\r
+\r
+       function _xmlrpcs_multicall_do_call_phpvals($server, $call)\r
+       {\r
+               if(!is_array($call))\r
+               {\r
+                       return _xmlrpcs_multicall_error('notstruct');\r
+               }\r
+               if(!array_key_exists('methodName', $call))\r
+               {\r
+                       return _xmlrpcs_multicall_error('nomethod');\r
+               }\r
+               if (!is_string($call['methodName']))\r
+               {\r
+                       return _xmlrpcs_multicall_error('notstring');\r
+               }\r
+               if($call['methodName'] == 'system.multicall')\r
+               {\r
+                       return _xmlrpcs_multicall_error('recursion');\r
+               }\r
+               if(!array_key_exists('params', $call))\r
+               {\r
+                       return _xmlrpcs_multicall_error('noparams');\r
+               }\r
+               if(!is_array($call['params']))\r
+               {\r
+                       return _xmlrpcs_multicall_error('notarray');\r
+               }\r
+\r
+               // this is a real dirty and simplistic hack, since we might have received a\r
+               // base64 or datetime values, but they will be listed as strings here...\r
+               $numParams = count($call['params']);\r
+               $pt = array();\r
+               foreach($call['params'] as $val)\r
+                       $pt[] = php_2_xmlrpc_type(gettype($val));\r
+\r
+               $result = $server->execute($call['methodName'], $call['params'], $pt);\r
+\r
+               if($result->faultCode() != 0)\r
+               {\r
+                       return _xmlrpcs_multicall_error($result);               // Method returned fault.\r
+               }\r
+\r
+               return new xmlrpcval(array($result->value()), 'array');\r
+       }\r
+\r
+       function _xmlrpcs_multicall($server, $m)\r
+       {\r
+               $result = array();\r
+               // let accept a plain list of php parameters, beside a single xmlrpc msg object\r
+               if (is_object($m))\r
+               {\r
+                       $calls = $m->getParam(0);\r
+                       $numCalls = $calls->arraysize();\r
+                       for($i = 0; $i < $numCalls; $i++)\r
+                       {\r
+                               $call = $calls->arraymem($i);\r
+                               $result[$i] = _xmlrpcs_multicall_do_call($server, $call);\r
+                       }\r
+               }\r
+               else\r
+               {\r
+                       $numCalls=count($m);\r
+                       for($i = 0; $i < $numCalls; $i++)\r
+                       {\r
+                               $result[$i] = _xmlrpcs_multicall_do_call_phpvals($server, $m[$i]);\r
+                       }\r
+               }\r
+\r
+               return new xmlrpcresp(new xmlrpcval($result, 'array'));\r
+       }\r
+\r
+       $GLOBALS['_xmlrpcs_dmap']=array(\r
+               'system.listMethods' => array(\r
+                       'function' => '_xmlrpcs_listMethods',\r
+                       'signature' => $_xmlrpcs_listMethods_sig,\r
+                       'docstring' => $_xmlrpcs_listMethods_doc,\r
+                       'signature_docs' => $_xmlrpcs_listMethods_sdoc),\r
+               'system.methodHelp' => array(\r
+                       'function' => '_xmlrpcs_methodHelp',\r
+                       'signature' => $_xmlrpcs_methodHelp_sig,\r
+                       'docstring' => $_xmlrpcs_methodHelp_doc,\r
+                       'signature_docs' => $_xmlrpcs_methodHelp_sdoc),\r
+               'system.methodSignature' => array(\r
+                       'function' => '_xmlrpcs_methodSignature',\r
+                       'signature' => $_xmlrpcs_methodSignature_sig,\r
+                       'docstring' => $_xmlrpcs_methodSignature_doc,\r
+                       'signature_docs' => $_xmlrpcs_methodSignature_sdoc),\r
+               'system.multicall' => array(\r
+                       'function' => '_xmlrpcs_multicall',\r
+                       'signature' => $_xmlrpcs_multicall_sig,\r
+                       'docstring' => $_xmlrpcs_multicall_doc,\r
+                       'signature_docs' => $_xmlrpcs_multicall_sdoc),\r
+               'system.getCapabilities' => array(\r
+                       'function' => '_xmlrpcs_getCapabilities',\r
+                       'signature' => $_xmlrpcs_getCapabilities_sig,\r
+                       'docstring' => $_xmlrpcs_getCapabilities_doc,\r
+                       'signature_docs' => $_xmlrpcs_getCapabilities_sdoc)\r
+       );\r
+\r
+       $GLOBALS['_xmlrpcs_occurred_errors'] = '';\r
+       $GLOBALS['_xmlrpcs_prev_ehandler'] = '';\r
+       /**\r
+       * Error handler used to track errors that occur during server-side execution of PHP code.\r
+       * This allows to report back to the client whether an internal error has occurred or not\r
+       * using an xmlrpc response object, instead of letting the client deal with the html junk\r
+       * that a PHP execution error on the server generally entails.\r
+       *\r
+       * NB: in fact a user defined error handler can only handle WARNING, NOTICE and USER_* errors.\r
+       *\r
+       */\r
+       function _xmlrpcs_errorHandler($errcode, $errstring, $filename=null, $lineno=null, $context=null)\r
+       {\r
+               // obey the @ protocol\r
+               if (error_reporting() == 0)\r
+                       return;\r
+\r
+               //if($errcode != E_NOTICE && $errcode != E_WARNING && $errcode != E_USER_NOTICE && $errcode != E_USER_WARNING)\r
+               if($errcode != 2048) // do not use E_STRICT by name, since on PHP 4 it will not be defined\r
+               {\r
+                       $GLOBALS['_xmlrpcs_occurred_errors'] = $GLOBALS['_xmlrpcs_occurred_errors'] . $errstring . "\n";\r
+               }\r
+               // Try to avoid as much as possible disruption to the previous error handling\r
+               // mechanism in place\r
+               if($GLOBALS['_xmlrpcs_prev_ehandler'] == '')\r
+               {\r
+                       // The previous error handler was the default: all we should do is log error\r
+                       // to the default error log (if level high enough)\r
+                       if(ini_get('log_errors') && (intval(ini_get('error_reporting')) & $errcode))\r
+                       {\r
+                               error_log($errstring);\r
+                       }\r
+               }\r
+               else\r
+               {\r
+                       // Pass control on to previous error handler, trying to avoid loops...\r
+                       if($GLOBALS['_xmlrpcs_prev_ehandler'] != '_xmlrpcs_errorHandler')\r
+                       {\r
+                               // NB: this code will NOT work on php < 4.0.2: only 2 params were used for error handlers\r
+                               if(is_array($GLOBALS['_xmlrpcs_prev_ehandler']))\r
+                               {\r
+                                       // the following works both with static class methods and plain object methods as error handler\r
+                                       call_user_func_array($GLOBALS['_xmlrpcs_prev_ehandler'], array($errcode, $errstring, $filename, $lineno, $context));\r
+                               }\r
+                               else\r
+                               {\r
+                                       $GLOBALS['_xmlrpcs_prev_ehandler']($errcode, $errstring, $filename, $lineno, $context);\r
+                               }\r
+                       }\r
+               }\r
+       }\r
+\r
+       $GLOBALS['_xmlrpc_debuginfo']='';\r
+\r
+       /**\r
+       * Add a string to the debug info that can be later seralized by the server\r
+       * as part of the response message.\r
+       * Note that for best compatbility, the debug string should be encoded using\r
+       * the $GLOBALS['xmlrpc_internalencoding'] character set.\r
+       * @param string $m\r
+       * @access public\r
+       */\r
+       function xmlrpc_debugmsg($m)\r
+       {\r
+               $GLOBALS['_xmlrpc_debuginfo'] .= $m . "\n";\r
+       }\r
+\r
+       class xmlrpc_server\r
+       {\r
+               /// array defining php functions exposed as xmlrpc methods by this server\r
+               var $dmap=array();\r
+               /**\r
+               * Defines how functions in dmap will be invokde: either using an xmlrpc msg object\r
+               * or plain php values.\r
+               * valid strings are 'xmlrpcvals', 'phpvals' or 'epivals'\r
+               */\r
+               var $functions_parameters_type='xmlrpcvals';\r
+               /// controls wether the server is going to echo debugging messages back to the client as comments in response body. valid values: 0,1,2,3\r
+               var $debug = 1;\r
+               /**\r
+               * When set to true, it will enable HTTP compression of the response, in case\r
+               * the client has declared its support for compression in the request.\r
+               */\r
+               var $compress_response = false;\r
+               /**\r
+               * List of http compression methods accepted by the server for requests.\r
+               * NB: PHP supports deflate, gzip compressions out of the box if compiled w. zlib\r
+               */\r
+               var $accepted_compression = array();\r
+               /// shall we serve calls to system.* methods?\r
+               var $allow_system_funcs = true;\r
+               /// list of charset encodings natively accepted for requests\r
+               var $accepted_charset_encodings = array();\r
+               /**\r
+               * charset encoding to be used for response.\r
+               * NB: if we can, we will convert the generated response from internal_encoding to the intended one.\r
+               * can be: a supported xml encoding (only UTF-8 and ISO-8859-1 at present, unless mbstring is enabled),\r
+               * null (leave unspecified in response, convert output stream to US_ASCII),\r
+               * 'default' (use xmlrpc library default as specified in xmlrpc.inc, convert output stream if needed),\r
+               * or 'auto' (use client-specified charset encoding or same as request if request headers do not specify it (unless request is US-ASCII: then use library default anyway).\r
+               * NB: pretty dangerous if you accept every charset and do not have mbstring enabled)\r
+               */\r
+               var $response_charset_encoding = '';\r
+               /// storage for internal debug info\r
+               var $debug_info = '';\r
+               /// extra data passed at runtime to method handling functions. Used only by EPI layer\r
+               var $user_data = null;\r
+\r
+               /**\r
+               * @param array $dispmap the dispatch map withd efinition of exposed services\r
+               * @param boolean $servicenow set to false to prevent the server from runnung upon construction\r
+               */\r
+               function xmlrpc_server($dispMap=null, $serviceNow=true)\r
+               {\r
+                       // if ZLIB is enabled, let the server by default accept compressed requests,\r
+                       // and compress responses sent to clients that support them\r
+                       if(function_exists('gzinflate'))\r
+                       {\r
+                               $this->accepted_compression = array('gzip', 'deflate');\r
+                               $this->compress_response = true;\r
+                       }\r
+\r
+                       // by default the xml parser can support these 3 charset encodings\r
+                       $this->accepted_charset_encodings = array('UTF-8', 'ISO-8859-1', 'US-ASCII');\r
+\r
+                       // dispMap is a dispatch array of methods\r
+                       // mapped to function names and signatures\r
+                       // if a method\r
+                       // doesn't appear in the map then an unknown\r
+                       // method error is generated\r
+                       /* milosch - changed to make passing dispMap optional.\r
+                        * instead, you can use the class add_to_map() function\r
+                        * to add functions manually (borrowed from SOAPX4)\r
+                        */\r
+                       if($dispMap)\r
+                       {\r
+                               $this->dmap = $dispMap;\r
+                               if($serviceNow)\r
+                               {\r
+                                       $this->service();\r
+                               }\r
+                       }\r
+               }\r
+\r
+               /**\r
+               * Set debug level of server.\r
+               * @param integer $in debug lvl: determines info added to xmlrpc responses (as xml comments)\r
+               * 0 = no debug info,\r
+               * 1 = msgs set from user with debugmsg(),\r
+               * 2 = add complete xmlrpc request (headers and body),\r
+               * 3 = add also all processing warnings happened during method processing\r
+               * (NB: this involves setting a custom error handler, and might interfere\r
+               * with the standard processing of the php function exposed as method. In\r
+               * particular, triggering an USER_ERROR level error will not halt script\r
+               * execution anymore, but just end up logged in the xmlrpc response)\r
+               * Note that info added at elevel 2 and 3 will be base64 encoded\r
+               * @access public\r
+               */\r
+               function setDebug($in)\r
+               {\r
+                       $this->debug=$in;\r
+               }\r
+\r
+               /**\r
+               * Return a string with the serialized representation of all debug info\r
+               * @param string $charset_encoding the target charset encoding for the serialization\r
+               * @return string an XML comment (or two)\r
+               */\r
+               function serializeDebug($charset_encoding='')\r
+               {\r
+                       // Tough encoding problem: which internal charset should we assume for debug info?\r
+                       // It might contain a copy of raw data received from client, ie with unknown encoding,\r
+                       // intermixed with php generated data and user generated data...\r
+                       // so we split it: system debug is base 64 encoded,\r
+                       // user debug info should be encoded by the end user using the INTERNAL_ENCODING\r
+                       $out = '';\r
+                       if ($this->debug_info != '')\r
+                       {\r
+                               $out .= "<!-- SERVER DEBUG INFO (BASE64 ENCODED):\n".base64_encode($this->debug_info)."\n-->\n";\r
+                       }\r
+                       if($GLOBALS['_xmlrpc_debuginfo']!='')\r
+                       {\r
+\r
+                               $out .= "<!-- DEBUG INFO:\n" . xmlrpc_encode_entitites(str_replace('--', '_-', $GLOBALS['_xmlrpc_debuginfo']), $GLOBALS['xmlrpc_internalencoding'], $charset_encoding) . "\n-->\n";\r
+                               // NB: a better solution MIGHT be to use CDATA, but we need to insert it\r
+                               // into return payload AFTER the beginning tag\r
+                               //$out .= "<![CDATA[ DEBUG INFO:\n\n" . str_replace(']]>', ']_]_>', $GLOBALS['_xmlrpc_debuginfo']) . "\n]]>\n";\r
+                       }\r
+                       return $out;\r
+               }\r
+\r
+               /**\r
+               * Execute the xmlrpc request, printing the response\r
+               * @param string $data the request body. If null, the http POST request will be examined\r
+               * @return xmlrpcresp the response object (usually not used by caller...)\r
+               * @access public\r
+               */\r
+               function service($data=null, $return_payload=false)\r
+               {\r
+                       if ($data === null)\r
+                       {\r
+                               // workaround for a known bug in php ver. 5.2.2 that broke $HTTP_RAW_POST_DATA\r
+                               $ver = phpversion();\r
+                               if ($ver[0] >= 5)\r
+                               {\r
+                                       $data = file_get_contents('php://input');\r
+                               }\r
+                               else\r
+                               {\r
+                                       $data = isset($GLOBALS['HTTP_RAW_POST_DATA']) ? $GLOBALS['HTTP_RAW_POST_DATA'] : '';\r
+                               }\r
+                       }\r
+                       $raw_data = $data;\r
+\r
+                       // reset internal debug info\r
+                       $this->debug_info = '';\r
+\r
+                       // Echo back what we received, before parsing it\r
+                       if($this->debug > 1)\r
+                       {\r
+                               $this->debugmsg("+++GOT+++\n" . $data . "\n+++END+++");\r
+                       }\r
+\r
+                       $r = $this->parseRequestHeaders($data, $req_charset, $resp_charset, $resp_encoding);\r
+                       if (!$r)\r
+                       {\r
+                               $r=$this->parseRequest($data, $req_charset);\r
+                       }\r
+\r
+                       // save full body of request into response, for more debugging usages\r
+                       $r->raw_data = $raw_data;\r
+\r
+                       if($this->debug > 2 && $GLOBALS['_xmlrpcs_occurred_errors'])\r
+                       {\r
+                               $this->debugmsg("+++PROCESSING ERRORS AND WARNINGS+++\n" .\r
+                                       $GLOBALS['_xmlrpcs_occurred_errors'] . "+++END+++");\r
+                       }\r
+\r
+                       $payload=$this->xml_header($resp_charset);\r
+                       if($this->debug > 0)\r
+                       {\r
+                               $payload = $payload . $this->serializeDebug($resp_charset);\r
+                       }\r
+\r
+                       // G. Giunta 2006-01-27: do not create response serialization if it has\r
+                       // already happened. Helps building json magic\r
+                       if (empty($r->payload))\r
+                       {\r
+                               $r->serialize($resp_charset);\r
+                       }\r
+                       $payload = $payload . $r->payload;\r
+\r
+                       if ($return_payload)\r
+                       {\r
+                               return $payload;\r
+                       }\r
+\r
+                       // if we get a warning/error that has output some text before here, then we cannot\r
+                       // add a new header. We cannot say we are sending xml, either...\r
+                       if(!headers_sent())\r
+                       {\r
+                               header('Content-Type: '.$r->content_type);\r
+                               // we do not know if client actually told us an accepted charset, but if he did\r
+                               // we have to tell him what we did\r
+                               header("Vary: Accept-Charset");\r
+\r
+                               // http compression of output: only\r
+                               // if we can do it, and we want to do it, and client asked us to,\r
+                               // and php ini settings do not force it already\r
+                               $php_no_self_compress = !ini_get('zlib.output_compression') && (ini_get('output_handler') != 'ob_gzhandler');\r
+                               if($this->compress_response && function_exists('gzencode') && $resp_encoding != ''\r
+                                       && $php_no_self_compress)\r
+                               {\r
+                                       if(strpos($resp_encoding, 'gzip') !== false)\r
+                                       {\r
+                                               $payload = gzencode($payload);\r
+                                               header("Content-Encoding: gzip");\r
+                                               header("Vary: Accept-Encoding");\r
+                                       }\r
+                                       elseif (strpos($resp_encoding, 'deflate') !== false)\r
+                                       {\r
+                                               $payload = gzcompress($payload);\r
+                                               header("Content-Encoding: deflate");\r
+                                               header("Vary: Accept-Encoding");\r
+                                       }\r
+                               }\r
+\r
+                               // do not ouput content-length header if php is compressing output for us:\r
+                               // it will mess up measurements\r
+                               if($php_no_self_compress)\r
+                               {\r
+                                       header('Content-Length: ' . (int)strlen($payload));\r
+                               }\r
+                       }\r
+                       else\r
+                       {\r
+                               error_log('XML-RPC: xmlrpc_server::service: http headers already sent before response is fully generated. Check for php warning or error messages');\r
+                       }\r
+\r
+                       print $payload;\r
+\r
+                       // return request, in case subclasses want it\r
+                       return $r;\r
+               }\r
+\r
+               /**\r
+               * Add a method to the dispatch map\r
+               * @param string $methodname the name with which the method will be made available\r
+               * @param string $function the php function that will get invoked\r
+               * @param array $sig the array of valid method signatures\r
+               * @param string $doc method documentation\r
+               * @param array $sigdoc the array of valid method signatures docs (one string per param, one for return type)\r
+               * @access public\r
+               */\r
+               function add_to_map($methodname,$function,$sig=null,$doc=false,$sigdoc=false)\r
+               {\r
+                       $this->dmap[$methodname] = array(\r
+                               'function'      => $function,\r
+                               'docstring' => $doc\r
+                       );\r
+                       if ($sig)\r
+                       {\r
+                               $this->dmap[$methodname]['signature'] = $sig;\r
+                       }\r
+                       if ($sigdoc)\r
+                       {\r
+                           $this->dmap[$methodname]['signature_docs'] = $sigdoc;\r
+                       }\r
+               }\r
+\r
+               /**\r
+               * Verify type and number of parameters received against a list of known signatures\r
+               * @param array $in array of either xmlrpcval objects or xmlrpc type definitions\r
+               * @param array $sig array of known signatures to match against\r
+               * @access private\r
+               */\r
+               function verifySignature($in, $sig)\r
+               {\r
+                       // check each possible signature in turn\r
+                       if (is_object($in))\r
+                       {\r
+                               $numParams = $in->getNumParams();\r
+                       }\r
+                       else\r
+                       {\r
+                               $numParams = count($in);\r
+                       }\r
+                       foreach($sig as $cursig)\r
+                       {\r
+                               if(count($cursig)==$numParams+1)\r
+                               {\r
+                                       $itsOK=1;\r
+                                       for($n=0; $n<$numParams; $n++)\r
+                                       {\r
+                                               if (is_object($in))\r
+                                               {\r
+                                                       $p=$in->getParam($n);\r
+                                                       if($p->kindOf() == 'scalar')\r
+                                                       {\r
+                                                               $pt=$p->scalartyp();\r
+                                                       }\r
+                                                       else\r
+                                                       {\r
+                                                               $pt=$p->kindOf();\r
+                                                       }\r
+                                               }\r
+                                               else\r
+                                               {\r
+                                                       $pt= $in[$n] == 'i4' ? 'int' : $in[$n]; // dispatch maps never use i4...\r
+                                               }\r
+\r
+                                               // param index is $n+1, as first member of sig is return type\r
+                                               if($pt != $cursig[$n+1] && $cursig[$n+1] != $GLOBALS['xmlrpcValue'])\r
+                                               {\r
+                                                       $itsOK=0;\r
+                                                       $pno=$n+1;\r
+                                                       $wanted=$cursig[$n+1];\r
+                                                       $got=$pt;\r
+                                                       break;\r
+                                               }\r
+                                       }\r
+                                       if($itsOK)\r
+                                       {\r
+                                               return array(1,'');\r
+                                       }\r
+                               }\r
+                       }\r
+                       if(isset($wanted))\r
+                       {\r
+                               return array(0, "Wanted ${wanted}, got ${got} at param ${pno}");\r
+                       }\r
+                       else\r
+                       {\r
+                               return array(0, "No method signature matches number of parameters");\r
+                       }\r
+               }\r
+\r
+               /**\r
+               * Parse http headers received along with xmlrpc request. If needed, inflate request\r
+               * @return null on success or an xmlrpcresp\r
+               * @access private\r
+               */\r
+               function parseRequestHeaders(&$data, &$req_encoding, &$resp_encoding, &$resp_compression)\r
+               {\r
+                       // Play nice to PHP 4.0.x: superglobals were not yet invented...\r
+                       if(!isset($_SERVER))\r
+                       {\r
+                               $_SERVER = $GLOBALS['HTTP_SERVER_VARS'];\r
+                       }\r
+\r
+                       if($this->debug > 1)\r
+                       {\r
+                               if(function_exists('getallheaders'))\r
+                               {\r
+                                       $this->debugmsg(''); // empty line\r
+                                       foreach(getallheaders() as $name => $val)\r
+                                       {\r
+                                               $this->debugmsg("HEADER: $name: $val");\r
+                                       }\r
+                               }\r
+\r
+                       }\r
+\r
+                       if(isset($_SERVER['HTTP_CONTENT_ENCODING']))\r
+                       {\r
+                               $content_encoding = str_replace('x-', '', $_SERVER['HTTP_CONTENT_ENCODING']);\r
+                       }\r
+                       else\r
+                       {\r
+                               $content_encoding = '';\r
+                       }\r
+\r
+                       // check if request body has been compressed and decompress it\r
+                       if($content_encoding != '' && strlen($data))\r
+                       {\r
+                               if($content_encoding == 'deflate' || $content_encoding == 'gzip')\r
+                               {\r
+                                       // if decoding works, use it. else assume data wasn't gzencoded\r
+                                       if(function_exists('gzinflate') && in_array($content_encoding, $this->accepted_compression))\r
+                                       {\r
+                                               if($content_encoding == 'deflate' && $degzdata = @gzuncompress($data))\r
+                                               {\r
+                                                       $data = $degzdata;\r
+                                                       if($this->debug > 1)\r
+                                                       {\r
+                                                               $this->debugmsg("\n+++INFLATED REQUEST+++[".strlen($data)." chars]+++\n" . $data . "\n+++END+++");\r
+                                                       }\r
+                                               }\r
+                                               elseif($content_encoding == 'gzip' && $degzdata = @gzinflate(substr($data, 10)))\r
+                                               {\r
+                                                       $data = $degzdata;\r
+                                                       if($this->debug > 1)\r
+                                                               $this->debugmsg("+++INFLATED REQUEST+++[".strlen($data)." chars]+++\n" . $data . "\n+++END+++");\r
+                                               }\r
+                                               else\r
+                                               {\r
+                                                       $r =& new xmlrpcresp(0, $GLOBALS['xmlrpcerr']['server_decompress_fail'], $GLOBALS['xmlrpcstr']['server_decompress_fail']);\r
+                                                       return $r;\r
+                                               }\r
+                                       }\r
+                                       else\r
+                                       {\r
+                                               //error_log('The server sent deflated data. Your php install must have the Zlib extension compiled in to support this.');\r
+                                               $r =& new xmlrpcresp(0, $GLOBALS['xmlrpcerr']['server_cannot_decompress'], $GLOBALS['xmlrpcstr']['server_cannot_decompress']);\r
+                                               return $r;\r
+                                       }\r
+                               }\r
+                       }\r
+\r
+                       // check if client specified accepted charsets, and if we know how to fulfill\r
+                       // the request\r
+                       if ($this->response_charset_encoding == 'auto')\r
+                       {\r
+                               $resp_encoding = '';\r
+                               if (isset($_SERVER['HTTP_ACCEPT_CHARSET']))\r
+                               {\r
+                                       // here we should check if we can match the client-requested encoding\r
+                                       // with the encodings we know we can generate.\r
+                                       /// @todo we should parse q=0.x preferences instead of getting first charset specified...\r
+                                       $client_accepted_charsets = explode(',', strtoupper($_SERVER['HTTP_ACCEPT_CHARSET']));\r
+                                       // Give preference to internal encoding\r
+                                       $known_charsets = array($GLOBALS['xmlrpc_internalencoding'], 'UTF-8', 'ISO-8859-1', 'US-ASCII');\r
+                                       foreach ($known_charsets as $charset)\r
+                                       {\r
+                                               foreach ($client_accepted_charsets as $accepted)\r
+                                                       if (strpos($accepted, $charset) === 0)\r
+                                                       {\r
+                                                               $resp_encoding = $charset;\r
+                                                               break;\r
+                                                       }\r
+                                               if ($resp_encoding)\r
+                                                       break;\r
+                                       }\r
+                               }\r
+                       }\r
+                       else\r
+                       {\r
+                               $resp_encoding = $this->response_charset_encoding;\r
+                       }\r
+\r
+                       if (isset($_SERVER['HTTP_ACCEPT_ENCODING']))\r
+                       {\r
+                               $resp_compression = $_SERVER['HTTP_ACCEPT_ENCODING'];\r
+                       }\r
+                       else\r
+                       {\r
+                               $resp_compression = '';\r
+                       }\r
+\r
+                       // 'guestimate' request encoding\r
+                       /// @todo check if mbstring is enabled and automagic input conversion is on: it might mingle with this check???\r
+                       $req_encoding = guess_encoding(isset($_SERVER['CONTENT_TYPE']) ? $_SERVER['CONTENT_TYPE'] : '',\r
+                               $data);\r
+\r
+                       return null;\r
+               }\r
+\r
+               /**\r
+               * Parse an xml chunk containing an xmlrpc request and execute the corresponding\r
+               * php function registered with the server\r
+               * @param string $data the xml request\r
+               * @param string $req_encoding (optional) the charset encoding of the xml request\r
+               * @return xmlrpcresp\r
+               * @access private\r
+               */\r
+               function parseRequest($data, $req_encoding='')\r
+               {\r
+                       // 2005/05/07 commented and moved into caller function code\r
+                       //if($data=='')\r
+                       //{\r
+                       //      $data=$GLOBALS['HTTP_RAW_POST_DATA'];\r
+                       //}\r
+\r
+                       // G. Giunta 2005/02/13: we do NOT expect to receive html entities\r
+                       // so we do not try to convert them into xml character entities\r
+                       //$data = xmlrpc_html_entity_xlate($data);\r
+\r
+                       $GLOBALS['_xh']=array();\r
+                       $GLOBALS['_xh']['ac']='';\r
+                       $GLOBALS['_xh']['stack']=array();\r
+                       $GLOBALS['_xh']['valuestack'] = array();\r
+                       $GLOBALS['_xh']['params']=array();\r
+                       $GLOBALS['_xh']['pt']=array();\r
+                       $GLOBALS['_xh']['isf']=0;\r
+                       $GLOBALS['_xh']['isf_reason']='';\r
+                       $GLOBALS['_xh']['method']=false; // so we can check later if we got a methodname or not\r
+                       $GLOBALS['_xh']['rt']='';\r
+\r
+                       // decompose incoming XML into request structure\r
+                       if ($req_encoding != '')\r
+                       {\r
+                               if (!in_array($req_encoding, array('UTF-8', 'ISO-8859-1', 'US-ASCII')))\r
+                               // the following code might be better for mb_string enabled installs, but\r
+                               // makes the lib about 200% slower...\r
+                               //if (!is_valid_charset($req_encoding, array('UTF-8', 'ISO-8859-1', 'US-ASCII')))\r
+                               {\r
+                                       error_log('XML-RPC: xmlrpc_server::parseRequest: invalid charset encoding of received request: '.$req_encoding);\r
+                                       $req_encoding = $GLOBALS['xmlrpc_defencoding'];\r
+                               }\r
+                               /// @BUG this will fail on PHP 5 if charset is not specified in the xml prologue,\r
+                               // the encoding is not UTF8 and there are non-ascii chars in the text...\r
+                               /// @todo use an ampty string for php 5 ???\r
+                               $parser = xml_parser_create($req_encoding);\r
+                       }\r
+                       else\r
+                       {\r
+                               $parser = xml_parser_create();\r
+                       }\r
+\r
+                       xml_parser_set_option($parser, XML_OPTION_CASE_FOLDING, true);\r
+                       // G. Giunta 2005/02/13: PHP internally uses ISO-8859-1, so we have to tell\r
+                       // the xml parser to give us back data in the expected charset\r
+                       // What if internal encoding is not in one of the 3 allowed?\r
+                       // we use the broadest one, ie. utf8\r
+                       // This allows to send data which is native in various charset,\r
+                       // by extending xmlrpc_encode_entitites() and setting xmlrpc_internalencoding\r
+                       if (!in_array($GLOBALS['xmlrpc_internalencoding'], array('UTF-8', 'ISO-8859-1', 'US-ASCII')))\r
+                       {\r
+                               xml_parser_set_option($parser, XML_OPTION_TARGET_ENCODING, 'UTF-8');\r
+                       }\r
+                       else\r
+                       {\r
+                               xml_parser_set_option($parser, XML_OPTION_TARGET_ENCODING, $GLOBALS['xmlrpc_internalencoding']);\r
+                       }\r
+\r
+                       if ($this->functions_parameters_type != 'xmlrpcvals')\r
+                               xml_set_element_handler($parser, 'xmlrpc_se', 'xmlrpc_ee_fast');\r
+                       else\r
+                               xml_set_element_handler($parser, 'xmlrpc_se', 'xmlrpc_ee');\r
+                       xml_set_character_data_handler($parser, 'xmlrpc_cd');\r
+                       xml_set_default_handler($parser, 'xmlrpc_dh');\r
+                       if(!xml_parse($parser, $data, 1))\r
+                       {\r
+                               // return XML error as a faultCode\r
+                               $r=&new xmlrpcresp(0,\r
+                               $GLOBALS['xmlrpcerrxml']+xml_get_error_code($parser),\r
+                               sprintf('XML error: %s at line %d, column %d',\r
+                                       xml_error_string(xml_get_error_code($parser)),\r
+                                       xml_get_current_line_number($parser), xml_get_current_column_number($parser)));\r
+                               xml_parser_free($parser);\r
+                       }\r
+                       elseif ($GLOBALS['_xh']['isf'])\r
+                       {\r
+                               xml_parser_free($parser);\r
+                               $r=&new xmlrpcresp(0,\r
+                                       $GLOBALS['xmlrpcerr']['invalid_request'],\r
+                                       $GLOBALS['xmlrpcstr']['invalid_request'] . ' ' . $GLOBALS['_xh']['isf_reason']);\r
+                       }\r
+                       else\r
+                       {\r
+                               xml_parser_free($parser);\r
+                               if ($this->functions_parameters_type != 'xmlrpcvals')\r
+                               {\r
+                                       if($this->debug > 1)\r
+                                       {\r
+                                               $this->debugmsg("\n+++PARSED+++\n".var_export($GLOBALS['_xh']['params'], true)."\n+++END+++");\r
+                                       }\r
+                                       $r = $this->execute($GLOBALS['_xh']['method'], $GLOBALS['_xh']['params'], $GLOBALS['_xh']['pt']);\r
+                               }\r
+                               else\r
+                               {\r
+                                       // build an xmlrpcmsg object with data parsed from xml\r
+                                       $m=&new xmlrpcmsg($GLOBALS['_xh']['method']);\r
+                                       // now add parameters in\r
+                                       for($i=0; $i<count($GLOBALS['_xh']['params']); $i++)\r
+                                       {\r
+                                               $m->addParam($GLOBALS['_xh']['params'][$i]);\r
+                                       }\r
+\r
+                                       if($this->debug > 1)\r
+                                       {\r
+                                               $this->debugmsg("\n+++PARSED+++\n".var_export($m, true)."\n+++END+++");\r
+                                       }\r
+                                       $r = $this->execute($m);\r
+                               }\r
+                       }\r
+                       return $r;\r
+               }\r
+\r
+               /**\r
+               * Execute a method invoked by the client, checking parameters used\r
+               * @param mixed $m either an xmlrpcmsg obj or a method name\r
+               * @param array $params array with method parameters as php types (if m is method name only)\r
+               * @param array $paramtypes array with xmlrpc types of method parameters (if m is method name only)\r
+               * @return xmlrpcresp\r
+               * @access private\r
+               */\r
+               function execute($m, $params=null, $paramtypes=null)\r
+               {\r
+                       if (is_object($m))\r
+                       {\r
+                               $methName = $m->method();\r
+                       }\r
+                       else\r
+                       {\r
+                               $methName = $m;\r
+                       }\r
+                       $sysCall = $this->allow_system_funcs && (strpos($methName, "system.") === 0);\r
+                       $dmap = $sysCall ? $GLOBALS['_xmlrpcs_dmap'] : $this->dmap;\r
+\r
+                       if(!isset($dmap[$methName]['function']))\r
+                       {\r
+                               // No such method\r
+                               return new xmlrpcresp(0,\r
+                                       $GLOBALS['xmlrpcerr']['unknown_method'],\r
+                                       $GLOBALS['xmlrpcstr']['unknown_method']);\r
+                       }\r
+\r
+                       // Check signature\r
+                       if(isset($dmap[$methName]['signature']))\r
+                       {\r
+                               $sig = $dmap[$methName]['signature'];\r
+                               if (is_object($m))\r
+                               {\r
+                                       list($ok, $errstr) = $this->verifySignature($m, $sig);\r
+                               }\r
+                               else\r
+                               {\r
+                                       list($ok, $errstr) = $this->verifySignature($paramtypes, $sig);\r
+                               }\r
+                               if(!$ok)\r
+                               {\r
+                                       // Didn't match.\r
+                                       return new xmlrpcresp(\r
+                                               0,\r
+                                               $GLOBALS['xmlrpcerr']['incorrect_params'],\r
+                                               $GLOBALS['xmlrpcstr']['incorrect_params'] . ": ${errstr}"\r
+                                       );\r
+                               }\r
+                       }\r
+\r
+                       $func = $dmap[$methName]['function'];\r
+                       // let the 'class::function' syntax be accepted in dispatch maps\r
+                       if(is_string($func) && strpos($func, '::'))\r
+                       {\r
+                               $func = explode('::', $func);\r
+                       }\r
+                       // verify that function to be invoked is in fact callable\r
+                       if(!is_callable($func))\r
+                       {\r
+                               error_log("XML-RPC: xmlrpc_server::execute: function $func registered as method handler is not callable");\r
+                               return new xmlrpcresp(\r
+                                       0,\r
+                                       $GLOBALS['xmlrpcerr']['server_error'],\r
+                                       $GLOBALS['xmlrpcstr']['server_error'] . ": no function matches method"\r
+                               );\r
+                       }\r
+\r
+                       // If debug level is 3, we should catch all errors generated during\r
+                       // processing of user function, and log them as part of response\r
+                       if($this->debug > 2)\r
+                       {\r
+                               $GLOBALS['_xmlrpcs_prev_ehandler'] = set_error_handler('_xmlrpcs_errorHandler');\r
+                       }\r
+                       if (is_object($m))\r
+                       {\r
+                               if($sysCall)\r
+                               {\r
+                                       $r = call_user_func($func, $this, $m);\r
+                               }\r
+                               else\r
+                               {\r
+                                       $r = call_user_func($func, $m);\r
+                               }\r
+                               if (!is_a($r, 'xmlrpcresp'))\r
+                               {\r
+                                       error_log("XML-RPC: xmlrpc_server::execute: function $func registered as method handler does not return an xmlrpcresp object");\r
+                                       if (is_a($r, 'xmlrpcval'))\r
+                                       {\r
+                                               $r =& new xmlrpcresp($r);\r
+                                       }\r
+                                       else\r
+                                       {\r
+                                               $r =& new xmlrpcresp(\r
+                                                       0,\r
+                                                       $GLOBALS['xmlrpcerr']['server_error'],\r
+                                                       $GLOBALS['xmlrpcstr']['server_error'] . ": function does not return xmlrpcresp object"\r
+                                               );\r
+                                       }\r
+                               }\r
+                       }\r
+                       else\r
+                       {\r
+                               // call a 'plain php' function\r
+                               if($sysCall)\r
+                               {\r
+                                       array_unshift($params, $this);\r
+                                       $r = call_user_func_array($func, $params);\r
+                               }\r
+                               else\r
+                               {\r
+                                       // 3rd API convention for method-handling functions: EPI-style\r
+                                       if ($this->functions_parameters_type == 'epivals')\r
+                                       {\r
+                                               $r = call_user_func_array($func, array($methName, $params, $this->user_data));\r
+                                               // mimic EPI behaviour: if we get an array that looks like an error, make it\r
+                                               // an eror response\r
+                                               if (is_array($r) && array_key_exists('faultCode', $r) && array_key_exists('faultString', $r))\r
+                                               {\r
+                                                       $r =& new xmlrpcresp(0, (integer)$r['faultCode'], (string)$r['faultString']);\r
+                                               }\r
+                                               else\r
+                                               {\r
+                                                       // functions using EPI api should NOT return resp objects,\r
+                                                       // so make sure we encode the return type correctly\r
+                                                       $r =& new xmlrpcresp(php_xmlrpc_encode($r, array('extension_api')));\r
+                                               }\r
+                                       }\r
+                                       else\r
+                                       {\r
+                                               $r = call_user_func_array($func, $params);\r
+                                       }\r
+                               }\r
+                               // the return type can be either an xmlrpcresp object or a plain php value...\r
+                               if (!is_a($r, 'xmlrpcresp'))\r
+                               {\r
+                                       // what should we assume here about automatic encoding of datetimes\r
+                                       // and php classes instances???\r
+                                       $r =& new xmlrpcresp(php_xmlrpc_encode($r, array('auto_dates')));\r
+                               }\r
+                       }\r
+                       if($this->debug > 2)\r
+                       {\r
+                               // note: restore the error handler we found before calling the\r
+                               // user func, even if it has been changed inside the func itself\r
+                               if($GLOBALS['_xmlrpcs_prev_ehandler'])\r
+                               {\r
+                                       set_error_handler($GLOBALS['_xmlrpcs_prev_ehandler']);\r
+                               }\r
+                               else\r
+                               {\r
+                                       restore_error_handler();\r
+                               }\r
+                       }\r
+                       return $r;\r
+               }\r
+\r
+               /**\r
+               * add a string to the 'internal debug message' (separate from 'user debug message')\r
+               * @param string $strings\r
+               * @access private\r
+               */\r
+               function debugmsg($string)\r
+               {\r
+                       $this->debug_info .= $string."\n";\r
+               }\r
+\r
+               /**\r
+               * @access private\r
+               */\r
+               function xml_header($charset_encoding='')\r
+               {\r
+                       if ($charset_encoding != '')\r
+                       {\r
+                               return "<?xml version=\"1.0\" encoding=\"$charset_encoding\"?" . ">\n";\r
+                       }\r
+                       else\r
+                       {\r
+                               return "<?xml version=\"1.0\"?" . ">\n";\r
+                       }\r
+               }\r
+\r
+               /**\r
+               * A debugging routine: just echoes back the input packet as a string value\r
+               * DEPRECATED!\r
+               */\r
+               function echoInput()\r
+               {\r
+                       $r=&new xmlrpcresp(new xmlrpcval( "'Aha said I: '" . $GLOBALS['HTTP_RAW_POST_DATA'], 'string'));\r
+                       print $r->serialize();\r
+               }\r
+       }\r
+?>
\ No newline at end of file
diff --git a/test/PHPUnit/Assert.php b/test/PHPUnit/Assert.php
new file mode 100644 (file)
index 0000000..04513d7
--- /dev/null
@@ -0,0 +1,400 @@
+<?php
+/* vim: set expandtab tabstop=4 shiftwidth=4 softtabstop=4: */
+
+/**
+ * PHP Version 4
+ *
+ * LICENSE: This source file is subject to version 3.0 of the PHP license
+ * that is available through the world-wide-web at the following URI:
+ * http://www.php.net/license/3_0.txt.  If you did not receive a copy of
+ * the PHP License and are unable to obtain it through the web, please
+ * send a note to license@php.net so we can mail you a copy immediately.
+ *
+ * @category   Testing
+ * @package    PHPUnit
+ * @author     Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @copyright  2002-2005 Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    CVS: $Id$
+ * @link       http://pear.php.net/package/PHPUnit
+ * @since      File available since Release 1.0.0
+ */
+
+/**
+ * A set of assert methods.
+ *
+ * @category   Testing
+ * @package    PHPUnit
+ * @author     Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @copyright  2002-2005 Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    Release: @package_version@
+ * @link       http://pear.php.net/package/PHPUnit
+ * @since      Class available since Release 1.0.0
+ */
+class PHPUnit_Assert {
+    /**
+     * @var    boolean
+     * @access private
+     */
+    var $_looselyTyped = FALSE;
+
+    /**
+     * Asserts that a haystack contains a needle.
+     *
+     * @param  mixed
+     * @param  mixed
+     * @param  string
+     * @access public
+     * @since  Method available since Release 1.1.0
+     */
+    function assertContains($needle, $haystack, $message = '') {
+        if (is_string($needle) && is_string($haystack)) {
+            $this->assertTrue(strpos($haystack, $needle) !== FALSE, $message);
+        }
+
+        else if (is_array($haystack) && !is_object($needle)) {
+            $this->assertTrue(in_array($needle, $haystack), $message);
+        }
+
+        else {
+            $this->fail('Unsupported parameter passed to assertContains().');
+        }
+    }
+
+    /**
+     * Asserts that a haystack does not contain a needle.
+     *
+     * @param  mixed
+     * @param  mixed
+     * @param  string
+     * @access public
+     * @since  Method available since Release 1.1.0
+     */
+    function assertNotContains($needle, $haystack, $message = '') {
+        if (is_string($needle) && is_string($haystack)) {
+            $this->assertFalse(strpos($haystack, $needle) !== FALSE, $message);
+        }
+
+        else if (is_array($haystack) && !is_object($needle)) {
+            $this->assertFalse(in_array($needle, $haystack), $message);
+        }
+
+        else {
+            $this->fail('Unsupported parameter passed to assertNotContains().');
+        }
+    }
+
+    /**
+     * Asserts that two variables are equal.
+     *
+     * @param  mixed
+     * @param  mixed
+     * @param  string
+     * @param  mixed
+     * @access public
+     */
+    function assertEquals($expected, $actual, $message = '', $delta = 0) {
+        if ((is_array($actual)  && is_array($expected)) ||
+            (is_object($actual) && is_object($expected))) {
+            if (is_array($actual) && is_array($expected)) {
+                ksort($actual);
+                ksort($expected);
+            }
+
+            if ($this->_looselyTyped) {
+                $actual   = $this->_convertToString($actual);
+                $expected = $this->_convertToString($expected);
+            }
+
+            $actual   = serialize($actual);
+            $expected = serialize($expected);
+
+            $message = sprintf(
+              '%sexpected %s, actual %s',
+
+              !empty($message) ? $message . ' ' : '',
+              $expected,
+              $actual
+            );
+
+            if ($actual !== $expected) {
+                return $this->fail($message);
+            }
+        }
+
+        elseif (is_numeric($actual) && is_numeric($expected)) {
+            $message = sprintf(
+              '%sexpected %s%s, actual %s',
+
+              !empty($message) ? $message . ' ' : '',
+              $expected,
+              ($delta != 0) ? ('+/- ' . $delta) : '',
+              $actual
+            );
+
+            if (!($actual >= ($expected - $delta) && $actual <= ($expected + $delta))) {
+                return $this->fail($message);
+            }
+        }
+
+        else {
+            $message = sprintf(
+              '%sexpected %s, actual %s',
+
+              !empty($message) ? $message . ' ' : '',
+              $expected,
+              $actual
+            );
+
+            if ($actual !== $expected) {
+                return $this->fail($message);
+            }
+        }
+    }
+
+    /**
+     * Asserts that two variables reference the same object.
+     * This requires the Zend Engine 2 to work.
+     *
+     * @param  object
+     * @param  object
+     * @param  string
+     * @access public
+     * @deprecated
+     */
+    function assertSame($expected, $actual, $message = '') {
+        if (!version_compare(phpversion(), '5.0.0', '>=')) {
+            $this->fail('assertSame() only works with PHP >= 5.0.0.');
+        }
+
+        if ((is_object($expected) || is_null($expected)) &&
+            (is_object($actual)   || is_null($actual))) {
+            $message = sprintf(
+              '%sexpected two variables to reference the same object',
+
+              !empty($message) ? $message . ' ' : ''
+            );
+
+            if ($expected !== $actual) {
+                return $this->fail($message);
+            }
+        } else {
+            $this->fail('Unsupported parameter passed to assertSame().');
+        }
+    }
+
+    /**
+     * Asserts that two variables do not reference the same object.
+     * This requires the Zend Engine 2 to work.
+     *
+     * @param  object
+     * @param  object
+     * @param  string
+     * @access public
+     * @deprecated
+     */
+    function assertNotSame($expected, $actual, $message = '') {
+        if (!version_compare(phpversion(), '5.0.0', '>=')) {
+            $this->fail('assertNotSame() only works with PHP >= 5.0.0.');
+        }
+
+        if ((is_object($expected) || is_null($expected)) &&
+            (is_object($actual)   || is_null($actual))) {
+            $message = sprintf(
+              '%sexpected two variables to reference different objects',
+
+              !empty($message) ? $message . ' ' : ''
+            );
+
+            if ($expected === $actual) {
+                return $this->fail($message);
+            }
+        } else {
+            $this->fail('Unsupported parameter passed to assertNotSame().');
+        }
+    }
+
+    /**
+     * Asserts that a variable is not NULL.
+     *
+     * @param  mixed
+     * @param  string
+     * @access public
+     */
+    function assertNotNull($actual, $message = '') {
+        $message = sprintf(
+          '%sexpected NOT NULL, actual NULL',
+
+          !empty($message) ? $message . ' ' : ''
+        );
+
+        if (is_null($actual)) {
+            return $this->fail($message);
+        }
+    }
+
+    /**
+     * Asserts that a variable is NULL.
+     *
+     * @param  mixed
+     * @param  string
+     * @access public
+     */
+    function assertNull($actual, $message = '') {
+        $message = sprintf(
+          '%sexpected NULL, actual NOT NULL',
+
+          !empty($message) ? $message . ' ' : ''
+        );
+
+        if (!is_null($actual)) {
+            return $this->fail($message);
+        }
+    }
+
+    /**
+     * Asserts that a condition is true.
+     *
+     * @param  boolean
+     * @param  string
+     * @access public
+     */
+    function assertTrue($condition, $message = '') {
+        $message = sprintf(
+          '%sexpected TRUE, actual FALSE',
+
+          !empty($message) ? $message . ' ' : ''
+        );
+
+        if (!$condition) {
+            return $this->fail($message);
+        }
+    }
+
+    /**
+     * Asserts that a condition is false.
+     *
+     * @param  boolean
+     * @param  string
+     * @access public
+     */
+    function assertFalse($condition, $message = '') {
+        $message = sprintf(
+          '%sexpected FALSE, actual TRUE',
+
+          !empty($message) ? $message . ' ' : ''
+        );
+
+        if ($condition) {
+            return $this->fail($message);
+        }
+    }
+
+    /**
+     * Asserts that a string matches a given regular expression.
+     *
+     * @param  string
+     * @param  string
+     * @param  string
+     * @access public
+     */
+    function assertRegExp($pattern, $string, $message = '') {
+        $message = sprintf(
+          '%s"%s" does not match pattern "%s"',
+
+          !empty($message) ? $message . ' ' : '',
+          $string,
+          $pattern
+        );
+
+        if (!preg_match($pattern, $string)) {
+            return $this->fail($message);
+        }
+    }
+
+    /**
+     * Asserts that a string does not match a given regular expression.
+     *
+     * @param  string
+     * @param  string
+     * @param  string
+     * @access public
+     * @since  Method available since Release 1.1.0
+     */
+    function assertNotRegExp($pattern, $string, $message = '') {
+        $message = sprintf(
+          '%s"%s" matches pattern "%s"',
+
+          !empty($message) ? $message . ' ' : '',
+          $string,
+          $pattern
+        );
+
+        if (preg_match($pattern, $string)) {
+            return $this->fail($message);
+        }
+    }
+
+    /**
+     * Asserts that a variable is of a given type.
+     *
+     * @param  string          $expected
+     * @param  mixed           $actual
+     * @param  optional string $message
+     * @access public
+     */
+    function assertType($expected, $actual, $message = '') {
+        return $this->assertEquals(
+          $expected,
+          gettype($actual),
+          $message
+        );
+    }
+
+    /**
+     * Converts a value to a string.
+     *
+     * @param  mixed   $value
+     * @access private
+     */
+    function _convertToString($value) {
+        foreach ($value as $k => $v) {
+            if (is_array($v)) {
+                $value[$k] = $this->_convertToString($value[$k]);
+            } else {
+                settype($value[$k], 'string');
+            }
+        }
+
+        return $value;
+    }
+
+    /**
+     * @param  boolean $looselyTyped
+     * @access public
+     */
+    function setLooselyTyped($looselyTyped) {
+        if (is_bool($looselyTyped)) {
+            $this->_looselyTyped = $looselyTyped;
+        }
+    }
+
+    /**
+     * Fails a test with the given message.
+     *
+     * @param  string
+     * @access protected
+     * @abstract
+     */
+    function fail($message = '') { /* abstract */ }
+}
+
+/*
+ * Local variables:
+ * tab-width: 4
+ * c-basic-offset: 4
+ * c-hanging-comment-ender-p: nil
+ * End:
+ */
+?>
diff --git a/test/PHPUnit/TestCase.php b/test/PHPUnit/TestCase.php
new file mode 100644 (file)
index 0000000..be46b88
--- /dev/null
@@ -0,0 +1,267 @@
+<?php
+/* vim: set expandtab tabstop=4 shiftwidth=4 softtabstop=4: */
+
+/**
+ * PHP Version 4
+ *
+ * LICENSE: This source file is subject to version 3.0 of the PHP license
+ * that is available through the world-wide-web at the following URI:
+ * http://www.php.net/license/3_0.txt.  If you did not receive a copy of
+ * the PHP License and are unable to obtain it through the web, please
+ * send a note to license@php.net so we can mail you a copy immediately.
+ *
+ * @category   Testing
+ * @package    PHPUnit
+ * @author     Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @copyright  2002-2005 Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    CVS: $Id$
+ * @link       http://pear.php.net/package/PHPUnit
+ * @since      File available since Release 1.0.0
+ */
+
+require_once 'PHPUnit/Assert.php';
+require_once 'PHPUnit/TestResult.php';
+
+/**
+ * A TestCase defines the fixture to run multiple tests.
+ *
+ * To define a TestCase
+ *
+ *   1) Implement a subclass of PHPUnit_TestCase.
+ *   2) Define instance variables that store the state of the fixture.
+ *   3) Initialize the fixture state by overriding setUp().
+ *   4) Clean-up after a test by overriding tearDown().
+ *
+ * Each test runs in its own fixture so there can be no side effects
+ * among test runs.
+ *
+ * Here is an example:
+ *
+ * <code>
+ * <?php
+ * class MathTest extends PHPUnit_TestCase {
+ *     var $fValue1;
+ *     var $fValue2;
+ *
+ *     function MathTest($name) {
+ *         $this->PHPUnit_TestCase($name);
+ *     }
+ *
+ *     function setUp() {
+ *         $this->fValue1 = 2;
+ *         $this->fValue2 = 3;
+ *     }
+ * }
+ * ?>
+ * </code>
+ *
+ * For each test implement a method which interacts with the fixture.
+ * Verify the expected results with assertions specified by calling
+ * assert with a boolean.
+ *
+ * <code>
+ * <?php
+ * function testPass() {
+ *     $this->assertTrue($this->fValue1 + $this->fValue2 == 5);
+ * }
+ * ?>
+ * </code>
+ *
+ * @category   Testing
+ * @package    PHPUnit
+ * @author     Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @copyright  2002-2005 Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    Release: @package_version@
+ * @link       http://pear.php.net/package/PHPUnit
+ * @since      Class available since Release 1.0.0
+ */
+class PHPUnit_TestCase extends PHPUnit_Assert {
+    /**
+     * @var    boolean
+     * @access private
+     */
+    var $_failed = FALSE;
+
+    /**
+     * The name of the test case.
+     *
+     * @var    string
+     * @access private
+     */
+    var $_name = '';
+
+    /**
+     * PHPUnit_TestResult object
+     *
+     * @var    object
+     * @access private
+     */
+    var $_result;
+
+    /**
+     * Constructs a test case with the given name.
+     *
+     * @param  string
+     * @access public
+     */
+    function PHPUnit_TestCase($name = FALSE) {
+        if ($name !== FALSE) {
+            $this->setName($name);
+        }
+    }
+
+    /**
+     * Counts the number of test cases executed by run(TestResult result).
+     *
+     * @return integer
+     * @access public
+     */
+    function countTestCases() {
+        return 1;
+    }
+
+    /**
+     * Gets the name of a TestCase.
+     *
+     * @return string
+     * @access public
+     */
+    function getName() {
+        return $this->_name;
+    }
+
+    /**
+     * Runs the test case and collects the results in a given TestResult object.
+     *
+     * @param  object
+     * @return object
+     * @access public
+     */
+    function run(&$result) {
+        $this->_result = &$result;
+        $this->_result->run($this);
+
+        return $this->_result;
+    }
+
+    /**
+     * Runs the bare test sequence.
+     *
+     * @access public
+     */
+    function runBare() {
+        $this->setUp();
+        $this->runTest();
+        $this->tearDown();
+        $this->pass();
+    }
+
+    /**
+     * Override to run the test and assert its state.
+     *
+     * @access protected
+     */
+    function runTest() {
+        call_user_func(
+          array(
+            &$this,
+            $this->_name
+          )
+        );
+    }
+
+    /**
+     * Sets the name of a TestCase.
+     *
+     * @param  string
+     * @access public
+     */
+    function setName($name) {
+        $this->_name = $name;
+    }
+
+    /**
+     * Returns a string representation of the test case.
+     *
+     * @return string
+     * @access public
+     */
+    function toString() {
+        return '';
+    }
+
+    /**
+     * Creates a default TestResult object.
+     *
+     * @return object
+     * @access protected
+     */
+    function &createResult() {
+        return new PHPUnit_TestResult;
+    }
+
+    /**
+     * Fails a test with the given message.
+     *
+     * @param  string
+     * @access protected
+     */
+    function fail($message = '') {
+        if (function_exists('debug_backtrace')) {
+            $trace = debug_backtrace();
+
+            if (isset($trace['1']['file'])) {
+                $message = sprintf(
+                  "%s in %s:%s",
+
+                  $message,
+                  $trace['1']['file'],
+                  $trace['1']['line']
+                );
+            }
+        }
+
+        $this->_result->addFailure($this, $message);
+        $this->_failed = TRUE;
+    }
+
+    /**
+     * Passes a test.
+     *
+     * @access protected
+     */
+    function pass() {
+        if (!$this->_failed) {
+            $this->_result->addPassedTest($this);
+        }
+    }
+
+    /**
+     * Sets up the fixture, for example, open a network connection.
+     * This method is called before a test is executed.
+     *
+     * @access protected
+     * @abstract
+     */
+    function setUp() { /* abstract */ }
+
+    /**
+     * Tears down the fixture, for example, close a network connection.
+     * This method is called after a test is executed.
+     *
+     * @access protected
+     * @abstract
+     */
+    function tearDown() { /* abstract */ }
+}
+
+/*
+ * Local variables:
+ * tab-width: 4
+ * c-basic-offset: 4
+ * c-hanging-comment-ender-p: nil
+ * End:
+ */
+?>
diff --git a/test/PHPUnit/TestDecorator.php b/test/PHPUnit/TestDecorator.php
new file mode 100644 (file)
index 0000000..bf9afe0
--- /dev/null
@@ -0,0 +1,130 @@
+<?php
+/* vim: set expandtab tabstop=4 shiftwidth=4 softtabstop=4: */
+
+/**
+ * PHP Version 4
+ *
+ * LICENSE: This source file is subject to version 3.0 of the PHP license
+ * that is available through the world-wide-web at the following URI:
+ * http://www.php.net/license/3_0.txt.  If you did not receive a copy of
+ * the PHP License and are unable to obtain it through the web, please
+ * send a note to license@php.net so we can mail you a copy immediately.
+ *
+ * @category   Testing
+ * @package    PHPUnit
+ * @author     Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @copyright  2002-2005 Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    CVS: $Id$
+ * @link       http://pear.php.net/package/PHPUnit
+ * @since      File available since Release 1.0.0
+ */
+
+require_once 'PHPUnit/TestCase.php';
+require_once 'PHPUnit/TestSuite.php';
+
+if (!function_exists('is_a')) {
+    require_once 'PHP/Compat/Function/is_a.php';
+}
+
+/**
+ * A Decorator for Tests.
+ *
+ * Use TestDecorator as the base class for defining new
+ * test decorators. Test decorator subclasses can be introduced
+ * to add behaviour before or after a test is run.
+ *
+ * @category   Testing
+ * @package    PHPUnit
+ * @author     Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @copyright  2002-2005 Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    Release: @package_version@
+ * @link       http://pear.php.net/package/PHPUnit
+ * @since      Class available since Release 1.0.0
+ */
+class PHPUnit_TestDecorator {
+    /**
+     * The Test to be decorated.
+     *
+     * @var    object
+     * @access protected
+     */
+    var $_test = NULL;
+
+    /**
+     * Constructor.
+     *
+     * @param  object
+     * @access public
+     */
+    function PHPUnit_TestDecorator(&$test) {
+        if (is_object($test) &&
+            (is_a($test, 'PHPUnit_TestCase') ||
+             is_a($test, 'PHPUnit_TestSuite'))) {
+
+            $this->_test = &$test;
+        }
+    }
+
+    /**
+     * Runs the test and collects the
+     * result in a TestResult.
+     *
+     * @param  object
+     * @access public
+     */
+    function basicRun(&$result) {
+        $this->_test->run($result);
+    }
+
+    /**
+     * Counts the number of test cases that
+     * will be run by this test.
+     *
+     * @return integer
+     * @access public
+     */
+    function countTestCases() {
+        return $this->_test->countTestCases();
+    }
+
+    /**
+     * Returns the test to be run.
+     *
+     * @return object
+     * @access public
+     */
+    function &getTest() {
+        return $this->_test;
+    }
+
+    /**
+     * Runs the decorated test and collects the
+     * result in a TestResult.
+     *
+     * @param  object
+     * @access public
+     * @abstract
+     */
+    function run(&$result) { /* abstract */ }
+
+    /**
+     * Returns a string representation of the test.
+     *
+     * @return string
+     * @access public
+     */
+    function toString() {
+        return $this->_test->toString();
+    }
+}
+
+/*
+ * Local variables:
+ * tab-width: 4
+ * c-basic-offset: 4
+ * c-hanging-comment-ender-p: nil
+ * End:
+ */
+?>
diff --git a/test/PHPUnit/TestFailure.php b/test/PHPUnit/TestFailure.php
new file mode 100644 (file)
index 0000000..f30d451
--- /dev/null
@@ -0,0 +1,104 @@
+<?php
+/* vim: set expandtab tabstop=4 shiftwidth=4 softtabstop=4: */
+
+/**
+ * PHP Version 4
+ *
+ * LICENSE: This source file is subject to version 3.0 of the PHP license
+ * that is available through the world-wide-web at the following URI:
+ * http://www.php.net/license/3_0.txt.  If you did not receive a copy of
+ * the PHP License and are unable to obtain it through the web, please
+ * send a note to license@php.net so we can mail you a copy immediately.
+ *
+ * @category   Testing
+ * @package    PHPUnit
+ * @author     Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @copyright  2002-2005 Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    CVS: $Id$
+ * @link       http://pear.php.net/package/PHPUnit
+ * @since      File available since Release 1.0.0
+ */
+
+/**
+ * A TestFailure collects a failed test together with the caught exception.
+ *
+ * @category   Testing
+ * @package    PHPUnit
+ * @author     Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @copyright  2002-2005 Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    Release: @package_version@
+ * @link       http://pear.php.net/package/PHPUnit
+ * @since      Class available since Release 1.0.0
+ */
+class PHPUnit_TestFailure {
+    /**
+     * @var    object
+     * @access private
+     */
+    var $_failedTest;
+
+    /**
+     * @var    string
+     * @access private
+     */
+    var $_thrownException;
+
+    /**
+     * Constructs a TestFailure with the given test and exception.
+     *
+     * @param  object
+     * @param  string
+     * @access public
+     */
+    function PHPUnit_TestFailure(&$failedTest, &$thrownException) {
+        $this->_failedTest      = &$failedTest;
+        $this->_thrownException = &$thrownException;
+    }
+
+    /**
+     * Gets the failed test.
+     *
+     * @return object
+     * @access public
+     */
+    function &failedTest() {
+        return $this->_failedTest;
+    }
+
+    /**
+     * Gets the thrown exception.
+     *
+     * @return object
+     * @access public
+     */
+    function &thrownException() {
+        return $this->_thrownException;
+    }
+
+    /**
+     * Returns a short description of the failure.
+     *
+     * @return string
+     * @access public
+     */
+    function toString() {
+        return sprintf(
+          "TestCase %s->%s() failed: %s\n",
+
+          get_class($this->_failedTest),
+          $this->_failedTest->getName(),
+          $this->_thrownException
+        );
+    }
+}
+
+/*
+ * Local variables:
+ * tab-width: 4
+ * c-basic-offset: 4
+ * c-hanging-comment-ender-p: nil
+ * End:
+ */
+?>
diff --git a/test/PHPUnit/TestListener.php b/test/PHPUnit/TestListener.php
new file mode 100644 (file)
index 0000000..b74f837
--- /dev/null
@@ -0,0 +1,136 @@
+<?php
+/* vim: set expandtab tabstop=4 shiftwidth=4 softtabstop=4: */
+
+/**
+ * PHP Version 4
+ *
+ * LICENSE: This source file is subject to version 3.0 of the PHP license
+ * that is available through the world-wide-web at the following URI:
+ * http://www.php.net/license/3_0.txt.  If you did not receive a copy of
+ * the PHP License and are unable to obtain it through the web, please
+ * send a note to license@php.net so we can mail you a copy immediately.
+ *
+ * @category   Testing
+ * @package    PHPUnit
+ * @author     Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @copyright  2002-2005 Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    CVS: $Id$
+ * @link       http://pear.php.net/package/PHPUnit
+ * @since      File available since Release 1.0.0
+ */
+
+/**
+ * A Listener for test progress.
+ *
+ * Here is an example:
+ *
+ * <code>
+ * <?php
+ * require_once 'PHPUnit.php';
+ * require_once 'PHPUnit/TestListener.php';
+ *
+ * class MathTest extends PHPUnit_TestCase {
+ *     var $fValue1;
+ *     var $fValue2;
+ *
+ *     function MathTest($name) {
+ *         $this->PHPUnit_TestCase($name);
+ *     }
+ *
+ *     function setUp() {
+ *         $this->fValue1 = 2;
+ *         $this->fValue2 = 3;
+ *     }
+ *
+ *     function testAdd() {
+ *         $this->assertTrue($this->fValue1 + $this->fValue2 == 4);
+ *     }
+ * }
+ *
+ * class MyListener extends PHPUnit_TestListener {
+ *     function addError(&$test, &$t) {
+ *         print "MyListener::addError() called.\n";
+ *     }
+ *
+ *     function addFailure(&$test, &$t) {
+ *         print "MyListener::addFailure() called.\n";
+ *     }
+ *
+ *     function endTest(&$test) {
+ *         print "MyListener::endTest() called.\n";
+ *     }
+ *
+ *     function startTest(&$test) {
+ *         print "MyListener::startTest() called.\n";
+ *     }
+ * }
+ *
+ * $suite = new PHPUnit_TestSuite;
+ * $suite->addTest(new MathTest('testAdd'));
+ *
+ * $result = new PHPUnit_TestResult;
+ * $result->addListener(new MyListener);
+ *
+ * $suite->run($result);
+ * print $result->toString();
+ * ?>
+ * </code>
+ *
+ * @category   Testing
+ * @package    PHPUnit
+ * @author     Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @copyright  2002-2005 Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    Release: @package_version@
+ * @link       http://pear.php.net/package/PHPUnit
+ * @since      Class available since Release 1.0.0
+ */
+class PHPUnit_TestListener {
+    /**
+     * An error occurred.
+     *
+     * @param  object
+     * @param  object
+     * @access public
+     * @abstract
+     */
+    function addError(&$test, &$t) { /*abstract */ }
+
+    /**
+     * A failure occurred.
+     *
+     * @param  object
+     * @param  object
+     * @access public
+     * @abstract
+     */
+    function addFailure(&$test, &$t) { /*abstract */ }
+
+    /**
+     * A test ended.
+     *
+     * @param  object
+     * @access public
+     * @abstract
+     */
+    function endTest(&$test) { /*abstract */ }
+
+    /**
+     * A test started.
+     *
+     * @param  object
+     * @access public
+     * @abstract
+     */
+    function startTest(&$test) { /*abstract */ }
+}
+
+/*
+ * Local variables:
+ * tab-width: 4
+ * c-basic-offset: 4
+ * c-hanging-comment-ender-p: nil
+ * End:
+ */
+?>
diff --git a/test/PHPUnit/TestResult.php b/test/PHPUnit/TestResult.php
new file mode 100644 (file)
index 0000000..6d1c37a
--- /dev/null
@@ -0,0 +1,321 @@
+<?php
+/* vim: set expandtab tabstop=4 shiftwidth=4 softtabstop=4: */
+
+/**
+ * PHP Version 4
+ *
+ * LICENSE: This source file is subject to version 3.0 of the PHP license
+ * that is available through the world-wide-web at the following URI:
+ * http://www.php.net/license/3_0.txt.  If you did not receive a copy of
+ * the PHP License and are unable to obtain it through the web, please
+ * send a note to license@php.net so we can mail you a copy immediately.
+ *
+ * @category   Testing
+ * @package    PHPUnit
+ * @author     Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @copyright  2002-2005 Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    CVS: $Id$
+ * @link       http://pear.php.net/package/PHPUnit
+ * @since      File available since Release 1.0.0
+ */
+
+require_once 'PHPUnit/TestFailure.php';
+require_once 'PHPUnit/TestListener.php';
+
+if (!function_exists('is_a')) {
+    require_once 'PHP/Compat/Function/is_a.php';
+}
+
+/**
+ * A TestResult collects the results of executing a test case.
+ *
+ * @category   Testing
+ * @package    PHPUnit
+ * @author     Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @copyright  2002-2005 Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    Release: @package_version@
+ * @link       http://pear.php.net/package/PHPUnit
+ * @since      Class available since Release 1.0.0
+ */
+class PHPUnit_TestResult {
+    /**
+     * @var    array
+     * @access protected
+     */
+    var $_errors = array();
+
+    /**
+     * @var    array
+     * @access protected
+     */
+    var $_failures = array();
+
+     /**
+     * @var    array
+     * @access protected
+     */
+    var $_listeners = array();
+
+    /**
+     * @var    array
+     * @access protected
+     */
+    var $_passedTests = array();
+
+    /**
+     * @var    integer
+     * @access protected
+     */
+    var $_runTests = 0;
+
+    /**
+     * @var    boolean
+     * @access private
+     */
+    var $_stop = FALSE;
+
+    /**
+     * Adds an error to the list of errors.
+     * The passed in exception caused the error.
+     *
+     * @param  object
+     * @param  object
+     * @access public
+     */
+    function addError(&$test, &$t) {
+        $this->_errors[] = new PHPUnit_TestFailure($test, $t);
+
+        for ($i = 0; $i < sizeof($this->_listeners); $i++) {
+            $this->_listeners[$i]->addError($test, $t);
+        }
+    }
+
+    /**
+     * Adds a failure to the list of failures.
+     * The passed in exception caused the failure.
+     *
+     * @param  object
+     * @param  object
+     * @access public
+     */
+    function addFailure(&$test, &$t) {
+        $this->_failures[] = new PHPUnit_TestFailure($test, $t);
+
+        for ($i = 0; $i < sizeof($this->_listeners); $i++) {
+            $this->_listeners[$i]->addFailure($test, $t);
+        }
+    }
+
+    /**
+     * Registers a TestListener.
+     *
+     * @param  object
+     * @access public
+     */
+    function addListener(&$listener) {
+        if (is_object($listener) &&
+            is_a($listener, 'PHPUnit_TestListener')) {
+            $this->_listeners[] = &$listener;
+        }
+    }
+
+    /**
+     * Adds a passed test to the list of passed tests.
+     *
+     * @param  object
+     * @access public
+     */
+    function addPassedTest(&$test) {
+        $this->_passedTests[] = &$test;
+    }
+
+    /**
+     * Informs the result that a test was completed.
+     *
+     * @param  object
+     * @access public
+     */
+    function endTest(&$test) {
+        for ($i = 0; $i < sizeof($this->_listeners); $i++) {
+            $this->_listeners[$i]->endTest($test);
+        }
+    }
+
+    /**
+     * Gets the number of detected errors.
+     *
+     * @return integer
+     * @access public
+     */
+    function errorCount() {
+        return sizeof($this->_errors);
+    }
+
+    /**
+     * Returns an Enumeration for the errors.
+     *
+     * @return array
+     * @access public
+     */
+    function &errors() {
+        return $this->_errors;
+    }
+
+    /**
+     * Gets the number of detected failures.
+     *
+     * @return integer
+     * @access public
+     */
+    function failureCount() {
+        return sizeof($this->_failures);
+    }
+
+    /**
+     * Returns an Enumeration for the failures.
+     *
+     * @return array
+     * @access public
+     */
+    function &failures() {
+        return $this->_failures;
+    }
+
+    /**
+     * Returns an Enumeration for the passed tests.
+     *
+     * @return array
+     * @access public
+     */
+    function &passedTests() {
+        return $this->_passedTests;
+    }
+
+    /**
+     * Unregisters a TestListener.
+     * This requires the Zend Engine 2 (to work properly).
+     *
+     * @param  object
+     * @access public
+     */
+    function removeListener(&$listener) {
+        for ($i = 0; $i < sizeof($this->_listeners); $i++) {
+            if ($this->_listeners[$i] === $listener) {
+                unset($this->_listeners[$i]);
+            }
+        }
+    }
+
+    /**
+     * Runs a TestCase.
+     *
+     * @param  object
+     * @access public
+     */
+    function run(&$test) {
+        $this->startTest($test);
+        $this->_runTests++;
+        $test->runBare();
+        $this->endTest($test);
+    }
+
+    /**
+     * Gets the number of run tests.
+     *
+     * @return integer
+     * @access public
+     */
+    function runCount() {
+        return $this->_runTests;
+    }
+
+    /**
+     * Checks whether the test run should stop.
+     *
+     * @access public
+     */
+    function shouldStop() {
+        return $this->_stop;
+    }
+
+    /**
+     * Informs the result that a test will be started.
+     *
+     * @param  object
+     * @access public
+     */
+    function startTest(&$test) {
+        for ($i = 0; $i < sizeof($this->_listeners); $i++) {
+            $this->_listeners[$i]->startTest($test);
+        }
+    }
+
+    /**
+     * Marks that the test run should stop.
+     *
+     * @access public
+     */
+    function stop() {
+        $this->_stop = TRUE;
+    }
+
+    /**
+     * Returns a HTML representation of the test result.
+     *
+     * @return string
+     * @access public
+     */
+    function toHTML() {
+        return '<pre>' . htmlspecialchars($this->toString()) . '</pre>';
+    }
+
+    /**
+     * Returns a text representation of the test result.
+     *
+     * @return string
+     * @access public
+     */
+    function toString() {
+        $result = '';
+
+        foreach ($this->_passedTests as $passedTest) {
+            $result .= sprintf(
+              "TestCase %s->%s() passed\n",
+
+              get_class($passedTest),
+              $passedTest->getName()
+            );
+        }
+
+        foreach ($this->_failures as $failedTest) {
+            $result .= $failedTest->toString();
+        }
+
+        return $result;
+    }
+
+    /**
+     * Returns whether the entire test was successful or not.
+     *
+     * @return boolean
+     * @access public
+     */
+    function wasSuccessful() {
+        if (empty($this->_errors) && empty($this->_failures)) {
+            return TRUE;
+        } else {
+            return FALSE;
+        }
+    }
+}
+
+/*
+ * Local variables:
+ * tab-width: 4
+ * c-basic-offset: 4
+ * c-hanging-comment-ender-p: nil
+ * End:
+ */
+?>
diff --git a/test/PHPUnit/TestSuite.php b/test/PHPUnit/TestSuite.php
new file mode 100644 (file)
index 0000000..f0618d0
--- /dev/null
@@ -0,0 +1,239 @@
+<?php
+/* vim: set expandtab tabstop=4 shiftwidth=4 softtabstop=4: */
+
+/**
+ * PHP Version 4
+ *
+ * LICENSE: This source file is subject to version 3.0 of the PHP license
+ * that is available through the world-wide-web at the following URI:
+ * http://www.php.net/license/3_0.txt.  If you did not receive a copy of
+ * the PHP License and are unable to obtain it through the web, please
+ * send a note to license@php.net so we can mail you a copy immediately.
+ *
+ * @category   Testing
+ * @package    PHPUnit
+ * @author     Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @copyright  2002-2005 Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    CVS: $Id$
+ * @link       http://pear.php.net/package/PHPUnit
+ * @since      File available since Release 1.0.0
+ */
+
+require_once 'PHPUnit/TestCase.php';
+
+/**
+ * A TestSuite is a Composite of Tests. It runs a collection of test cases.
+ *
+ * Here is an example using the dynamic test definition.
+ *
+ * <code>
+ * <?php
+ * $suite = new PHPUnit_TestSuite();
+ * $suite->addTest(new MathTest('testPass'));
+ * ?>
+ * </code>
+ *
+ * Alternatively, a TestSuite can extract the tests to be run automatically.
+ * To do so you pass the classname of your TestCase class to the TestSuite
+ * constructor.
+ *
+ * <code>
+ * <?php
+ * $suite = new TestSuite('classname');
+ * ?>
+ * </code>
+ *
+ * This constructor creates a suite with all the methods starting with
+ * "test" that take no arguments.
+ *
+ * @category   Testing
+ * @package    PHPUnit
+ * @author     Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @copyright  2002-2005 Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    Release: @package_version@
+ * @link       http://pear.php.net/package/PHPUnit
+ * @since      Class available since Release 1.0.0
+ */
+class PHPUnit_TestSuite {
+    /**
+     * The name of the test suite.
+     *
+     * @var    string
+     * @access private
+     */
+    var $_name = '';
+
+    /**
+     * The tests in the test suite.
+     *
+     * @var    array
+     * @access private
+     */
+    var $_tests = array();
+
+    /**
+     * Constructs a TestSuite.
+     *
+     * @param  mixed
+     * @access public
+     */
+    function PHPUnit_TestSuite($test = FALSE) {
+        if ($test !== FALSE) {
+            $this->setName($test);
+            $this->addTestSuite($test);
+        }
+    }
+
+    /**
+     * Adds a test to the suite.
+     *
+     * @param  object
+     * @access public
+     */
+    function addTest(&$test) {
+        $this->_tests[] = &$test;
+    }
+
+    /**
+     * Adds the tests from the given class to the suite.
+     *
+     * @param  string
+     * @access public
+     */
+    function addTestSuite($testClass) {
+        if (class_exists($testClass)) {
+            $methods       = get_class_methods($testClass);
+            $parentClasses = array(strtolower($testClass));
+            $parentClass   = $testClass;
+
+            while(is_string($parentClass = get_parent_class($parentClass))) {
+                $parentClasses[] = $parentClass;
+            }
+
+            foreach ($methods as $method) {
+                if (substr($method, 0, 4) == 'test' &&
+                    !in_array($method, $parentClasses)) {
+                    $this->addTest(new $testClass($method));
+                }
+            }
+        }
+    }
+
+    /**
+     * Counts the number of test cases that will be run by this test.
+     *
+     * @return integer
+     * @access public
+     */
+    function countTestCases() {
+        $count = 0;
+
+        foreach ($this->_tests as $test) {
+            $count += $test->countTestCases();
+        }
+
+        return $count;
+    }
+
+    /**
+     * Returns the name of the suite.
+     *
+     * @return string
+     * @access public
+     */
+    function getName() {
+        return $this->_name;
+    }
+
+    /**
+     * Runs the tests and collects their result in a TestResult.
+     *
+     * @param  object
+     * @access public
+     */
+    function run(&$result, $show_progress='') {
+        for ($i = 0; $i < sizeof($this->_tests) && !$result->shouldStop(); $i++) {
+            $this->_tests[$i]->run($result);
+            if ($show_progress != '') {
+                echo $show_progress; flush();
+            }
+        }
+    }
+
+    /**
+     * Runs a test.
+     *
+     * @param  object
+     * @param  object
+     * @access public
+     */
+    function runTest(&$test, &$result) {
+        $test->run($result);
+    }
+
+    /**
+     * Sets the name of the suite.
+     *
+     * @param  string
+     * @access public
+     */
+    function setName($name) {
+        $this->_name = $name;
+    }
+
+    /**
+     * Returns the test at the given index.
+     *
+     * @param  integer
+     * @return object
+     * @access public
+     */
+    function &testAt($index) {
+        if (isset($this->_tests[$index])) {
+            return $this->_tests[$index];
+        } else {
+            return FALSE;
+        }
+    }
+
+    /**
+     * Returns the number of tests in this suite.
+     *
+     * @return integer
+     * @access public
+     */
+    function testCount() {
+        return sizeof($this->_tests);
+    }
+
+    /**
+     * Returns the tests as an enumeration.
+     *
+     * @return array
+     * @access public
+     */
+    function &tests() {
+        return $this->_tests;
+    }
+
+    /**
+     * Returns a string representation of the test suite.
+     *
+     * @return string
+     * @access public
+     */
+    function toString() {
+        return '';
+    }
+}
+
+/*
+ * Local variables:
+ * tab-width: 4
+ * c-basic-offset: 4
+ * c-hanging-comment-ender-p: nil
+ * End:
+ */
+?>
diff --git a/test/PHPUnit/license.txt b/test/PHPUnit/license.txt
new file mode 100644 (file)
index 0000000..6c1c170
--- /dev/null
@@ -0,0 +1,68 @@
+-------------------------------------------------------------------- 
+                  The PHP License, version 3.0
+Copyright (c) 1999 - 2006 The PHP Group. All rights reserved.
+-------------------------------------------------------------------- 
+
+Redistribution and use in source and binary forms, with or without
+modification, is permitted provided that the following conditions
+are met:
+
+  1. Redistributions of source code must retain the above copyright
+     notice, this list of conditions and the following disclaimer.
+  2. Redistributions in binary form must reproduce the above copyright
+     notice, this list of conditions and the following disclaimer in
+     the documentation and/or other materials provided with the
+     distribution.
+  3. The name "PHP" must not be used to endorse or promote products
+     derived from this software without prior written permission. For
+     written permission, please contact group@php.net.
+  
+  4. Products derived from this software may not be called "PHP", nor
+     may "PHP" appear in their name, without prior written permission
+     from group@php.net.  You may indicate that your software works in
+     conjunction with PHP by saying "Foo for PHP" instead of calling
+     it "PHP Foo" or "phpfoo"
+  5. The PHP Group may publish revised and/or new versions of the
+     license from time to time. Each version will be given a
+     distinguishing version number.
+     Once covered code has been published under a particular version
+     of the license, you may always continue to use it under the terms
+     of that version. You may also choose to use such covered code
+     under the terms of any subsequent version of the license
+     published by the PHP Group. No one other than the PHP Group has
+     the right to modify the terms applicable to covered code created
+     under this License.
+
+  6. Redistributions of any form whatsoever must retain the following
+     acknowledgment:
+     "This product includes PHP, freely available from
+     <http://www.php.net/>".
+
+THIS SOFTWARE IS PROVIDED BY THE PHP DEVELOPMENT TEAM ``AS IS'' AND 
+ANY EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
+THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A 
+PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE PHP
+DEVELOPMENT TEAM OR ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, 
+INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES 
+(INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR 
+SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
+STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
+ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
+OF THE POSSIBILITY OF SUCH DAMAGE.
+
+-------------------------------------------------------------------- 
+
+This software consists of voluntary contributions made by many
+individuals on behalf of the PHP Group.
+
+The PHP Group can be contacted via Email at group@php.net.
+
+For more information on the PHP Group and the PHP project, 
+please see <http://www.php.net>.
+
+This product includes the Zend Engine, freely available at
+<http://www.zend.com>.
diff --git a/test/benchmark.php b/test/benchmark.php
new file mode 100644 (file)
index 0000000..308c01b
--- /dev/null
@@ -0,0 +1,264 @@
+<?php
+/**
+ * Benchamrking suite for the PHP-XMLRPC lib
+ * @author Gaetano Giunta
+ * @version $Id$
+ * @copyright (c) 2005-2008 G. Giunta
+ * @license code licensed under the BSD License: http://phpxmlrpc.sourceforge.net/license.txt
+ **/
+
+       include(getcwd().'/parse_args.php');
+
+       require_once('xmlrpc.inc');
+
+       // Set up PHP structures to be used in many tests
+       $data1 = array(1, 1.0, 'hello world', true, '20051021T23:43:00', -1, 11.0, '~!@#$%^&*()_+|', false, '20051021T23:43:00');
+       $data2 = array('zero' => $data1, 'one' => $data1, 'two' => $data1, 'three' => $data1, 'four' => $data1, 'five' => $data1, 'six' => $data1, 'seven' => $data1, 'eight' => $data1, 'nine' => $data1);
+       $data = array($data2, $data2, $data2, $data2, $data2, $data2, $data2, $data2, $data2, $data2);
+       $keys = array('zero', 'one', 'two', 'three', 'four', 'five', 'six', 'seven', 'eight', 'nine');
+
+       $test_results=array();
+       $xd = extension_loaded('xdebug') && ini_get('xdebug.profiler_enable');
+       if ($xd)
+               $num_tests = 1;
+       else
+               $num_tests = 10;
+
+       $title = 'XML-RPC Benchmark Tests';
+
+       if(isset($_SERVER['REQUEST_METHOD']))
+       {
+               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
+       {
+               echo "$title\n\n";
+       }
+
+       if(isset($_SERVER['REQUEST_METHOD']))
+       {
+               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";
+               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";
+       }
+
+       // test 'old style' data encoding vs. 'automatic style' encoding
+       begin_test('Data encoding (large array)', 'manual encoding');
+       for ($i = 0; $i < $num_tests; $i++)
+       {
+               $vals = array();
+               for ($j = 0; $j < 10; $j++)
+               {
+                       $valarray = array();
+                       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], 'i4');
+                               $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');
+                       }
+                       $vals[] =& new xmlrpcval($valarray, 'struct');
+               }
+               $value =& new xmlrpcval($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'));
+               $out = $value->serialize();
+       }
+       end_test('Data encoding (large array)', 'automatic encoding', $out);
+
+       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)
+                       {
+                               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();
+
+       begin_test('Data decoding (large array)', 'manual decoding');
+       for ($i = 0; $i < $num_tests; $i++)
+       {
+               $response =& $dummy->ParseResponse($in, true);
+               $value = $response->value();
+               $result = array();
+               for ($k = 0; $k < $value->arraysize(); $k++)
+               {
+                       $val1 = $value->arraymem($k);
+                       $out = array();
+                       while (list($name, $val) = $val1->structeach())
+                       {
+                               $out[$name] = array();
+                               for ($j = 0; $j < $val->arraysize(); $j++)
+                               {
+                                       $data = $val->arraymem($j);
+                                       $out[$name][] = $data->scalarval();
+                               }
+                       } // while
+                       $result[] = $out;
+               }
+       }
+       end_test('Data decoding (large array)', 'manual decoding', $result);
+
+       begin_test('Data decoding (large array)', 'automatic decoding');
+       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'))
+       {
+       begin_test('Data decoding (large array)', 'xmlrpc-epi decoding');
+       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) {
+
+       /// test multicall vs. many calls vs. keep-alives
+       $value = php_xmlrpc_encode($data1);
+       $msg =& new xmlrpcmsg('interopEchoTests.echoValue', array($value));
+       $msgs=array();
+       for ($i = 0; $i < 25; $i++)
+               $msgs[] = $msg;
+       $server = split(':', $LOCALSERVER);
+       if(count($server) > 1)
+       {
+               $c =& new xmlrpc_client($URI, $server[0], $server[1]);
+       }
+       else
+       {
+               $c =& new xmlrpc_client($URI, $LOCALSERVER);
+       }
+       // do not interfere with http compression
+       $c->accepted_compression = array();
+       //$c->debug=true;
+
+       if (function_exists('gzinflate')) {
+               $c->accepted_compression = null;
+       }
+       begin_test('Repeated send (small array)', 'http 10');
+       $response = array();
+       for ($i = 0; $i < 25; $i++)
+       {
+               $resp =& $c->send($msg);
+               $response[] = $resp->value();
+       }
+       end_test('Repeated send (small array)', 'http 10', $response);
+
+       if (function_exists('curl_init'))
+       {
+               begin_test('Repeated send (small array)', 'http 11 w. keep-alive');
+               $response = array();
+               for ($i = 0; $i < 25; $i++)
+               {
+                       $resp =& $c->send($msg, 10, 'http11');
+                       $response[] = $resp->value();
+               }
+               end_test('Repeated send (small array)', 'http 11 w. keep-alive', $response);
+
+               $c->keepalive = false;
+               begin_test('Repeated send (small array)', 'http 11');
+               $response = array();
+               for ($i = 0; $i < 25; $i++)
+               {
+                       $resp =& $c->send($msg, 10, 'http11');
+                       $response[] = $resp->value();
+               }
+               end_test('Repeated send (small array)', 'http 11', $response);
+       }
+
+       begin_test('Repeated send (small array)', 'multicall');
+       $response =& $c->send($msgs);
+       end_test('Repeated send (small array)', 'multicall', $response);
+
+       if (function_exists('gzinflate'))
+       {
+               $c->accepted_compression = array('gzip');
+               $c->request_compression = 'gzip';
+
+               begin_test('Repeated send (small array)', 'http 10 w. compression');
+               $response = array();
+               for ($i = 0; $i < 25; $i++)
+               {
+                       $resp =& $c->send($msg);
+                       $response[] = $resp->value();
+               }
+               end_test('Repeated send (small array)', 'http 10 w. compression', $response);
+       }
+
+       } // end of 'if no xdebug profiling'
+
+       function begin_test($test_name, $test_case)
+       {
+               global $test_results;
+               if (!isset($test_results[$test_name]))
+                       $test_results[$test_name]=array();
+               $test_results[$test_name][$test_case] = array();
+               list($micro, $sec) = explode(' ', microtime());
+               $test_results[$test_name][$test_case]['time'] = $sec + $micro;
+       }
+
+       function end_test($test_name, $test_case, $test_result)
+       {
+               global $test_results;
+               list($micro, $sec) = explode(' ', microtime());
+               if (!isset($test_results[$test_name][$test_case]))
+                       trigger_error('ending test that was not sterted');
+               $test_results[$test_name][$test_case]['time'] = $sec + $micro - $test_results[$test_name][$test_case]['time'];
+               $test_results[$test_name][$test_case]['result'] = $test_result;
+               echo '.';
+               flush();
+       }
+
+
+       echo "\n";
+       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";
+       }
+
+
+       if(isset($_SERVER['REQUEST_METHOD']))
+       {
+               echo "\n</pre>\n</body>\n</html>\n";
+       }
+?>
\ No newline at end of file
diff --git a/test/parse_args.php b/test/parse_args.php
new file mode 100644 (file)
index 0000000..25f0bf9
--- /dev/null
@@ -0,0 +1,132 @@
+<?php
+/**
+ * Common parameter parsing for benchmarks and tests scripts
+ *
+ * @param integer DEBUG
+ * @param string  LOCALSERVER
+ * @param string  URI
+ * @param string  HTTPSSERVER
+ * @param string  HTTPSSURI
+ * @param string  PROXY
+ *
+ * @version $Id$
+ * @copyright (C) 2007-2008 G. Giunta
+ * @license code licensed under the BSD License: http://phpxmlrpc.sourceforge.net/license.txt
+ **/
+
+       require_once('xmlrpc.inc');
+       require_once('xmlrpcs.inc');
+
+       // play nice to older PHP versions that miss superglobals
+       if(!isset($_SERVER))
+       {
+               $_SERVER = $HTTP_SERVER_VARS;
+               $_GET = isset($HTTP_GET_VARS) ? $HTTP_GET_VARS : array();
+               $_POST = isset($HTTP_POST_VARS) ? $HTTP_POST_VARS : array();
+       }
+
+       // check for command line vs web page input params
+       if(!isset($_SERVER['REQUEST_METHOD']))
+       {
+               if(isset($argv))
+               {
+                       foreach($argv as $param)
+                       {
+                               $param = explode('=', $param);
+                               if(count($param) > 1)
+                               {
+                                       $$param[0]=$param[1];
+                               }
+                       }
+               }
+       }
+       elseif(!ini_get('register_globals'))
+       {
+               // play nice to 'safe' PHP installations with register globals OFF
+               // NB: we might as well consider using $_GET stuff later on...
+               extract($_GET);
+               extract($_POST);
+       }
+
+       if(!isset($DEBUG))
+       {
+               $DEBUG = 0;
+       }
+       else
+       {
+               $DEBUG = intval($DEBUG);
+       }
+
+       if(!isset($LOCALSERVER))
+       {
+               if(isset($HTTP_HOST))
+               {
+                       $LOCALSERVER = $HTTP_HOST;
+               }
+               elseif(isset($_SERVER['HTTP_HOST']))
+               {
+                       $LOCALSERVER = $_SERVER['HTTP_HOST'];
+               }
+               else
+               {
+                       $LOCALSERVER = 'localhost';
+               }
+       }
+       if(!isset($HTTPSSERVER))
+       {
+               $HTTPSSERVER = 'xmlrpc.usefulinc.com';
+       }
+       if(!isset($HTTPSURI))
+       {
+               $HTTPSURI = '/server.php';
+       }
+       if(!isset($PROXY))
+       {
+               $PROXYSERVER = null;
+       }
+       else
+       {
+               $arr = explode(':',$PROXY);
+               $PROXYSERVER = $arr[0];
+               if(count($arr) > 1)
+               {
+                       $PROXYPORT = $arr[1];
+               }
+               else
+               {
+                       $PROXYPORT = 8080;
+               }
+       }
+       if(!isset($URI))
+       {
+               // GUESTIMATE the url of local demo server
+               // play nice to php 3 and 4-5 in retrieving URL of server.php
+               /// @todo filter out query string from REQUEST_URI
+               if(isset($REQUEST_URI))
+               {
+                       $URI = str_replace('/test/testsuite.php', '/demo/server/server.php', $REQUEST_URI);
+                       $URI = str_replace('/testsuite.php', '/server.php', $URI);
+                       $URI = str_replace('/test/benchmark.php', '/server.php', $URI);
+                       $URI = str_replace('/benchmark.php', '/server.php', $URI);
+               }
+               elseif(isset($_SERVER['PHP_SELF']) && isset($_SERVER['REQUEST_METHOD']))
+               {
+                       $URI = str_replace('/test/testsuite.php', '/demo/server/server.php', $_SERVER['PHP_SELF']);
+                       $URI = str_replace('/testsuite.php', '/server.php', $URI);
+                       $URI = str_replace('/test/benchmark.php', '/server.php', $URI);
+                       $URI = str_replace('/benchmark.php', '/server.php', $URI);
+               }
+               else
+               {
+                       $URI = '/demo/server/server.php';
+               }
+       }
+       if($URI[0] != '/')
+       {
+               $URI = '/'.$URI;
+       }
+       if(!isset($LOCALPATH))
+       {
+               $LOCALPATH = dirname(__FILE__);
+       }
+?>
diff --git a/test/phpunit.php b/test/phpunit.php
new file mode 100644 (file)
index 0000000..8b82202
--- /dev/null
@@ -0,0 +1,106 @@
+<?php
+/* vim: set expandtab tabstop=4 shiftwidth=4 softtabstop=4: */
+
+/**
+ * PHP Version 4
+ *
+ * LICENSE: This source file is subject to version 3.0 of the PHP license
+ * that is available through the world-wide-web at the following URI:
+ * http://www.php.net/license/3_0.txt.  If you did not receive a copy of
+ * the PHP License and are unable to obtain it through the web, please
+ * send a note to license@php.net so we can mail you a copy immediately.
+ *
+ * @category   Testing
+ * @package    PHPUnit
+ * @author     Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @copyright  2002-2005 Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    CVS: $Id$
+ * @link       http://pear.php.net/package/PHPUnit
+ * @since      File available since Release 1.0.0
+ */
+
+require_once 'PHPUnit/TestCase.php';
+require_once 'PHPUnit/TestResult.php';
+require_once 'PHPUnit/TestSuite.php';
+
+/**
+ * PHPUnit runs a TestSuite and returns a TestResult object.
+ *
+ * Here is an example:
+ *
+ * <code>
+ * <?php
+ * require_once 'PHPUnit.php';
+ *
+ * class MathTest extends PHPUnit_TestCase {
+ *     var $fValue1;
+ *     var $fValue2;
+ *
+ *     function MathTest($name) {
+ *       $this->PHPUnit_TestCase($name);
+ *     }
+ *
+ *     function setUp() {
+ *       $this->fValue1 = 2;
+ *       $this->fValue2 = 3;
+ *     }
+ *
+ *     function testAdd() {
+ *       $this->assertTrue($this->fValue1 + $this->fValue2 == 5);
+ *     }
+ * }
+ *
+ * $suite = new PHPUnit_TestSuite();
+ * $suite->addTest(new MathTest('testAdd'));
+ *
+ * $result = PHPUnit::run($suite);
+ * print $result->toHTML();
+ * ?>
+ * </code>
+ *
+ * Alternatively, you can pass a class name to the PHPUnit_TestSuite()
+ * constructor and let it automatically add all methods of that class
+ * that start with 'test' to the suite:
+ *
+ * <code>
+ * <?php
+ * $suite  = new PHPUnit_TestSuite('MathTest');
+ * $result = PHPUnit::run($suite);
+ * print $result->toHTML();
+ * ?>
+ * </code>
+ *
+ * @category   Testing
+ * @package    PHPUnit
+ * @author     Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @copyright  2002-2005 Sebastian Bergmann <sb@sebastian-bergmann.de>
+ * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
+ * @version    Release: @package_version@
+ * @link       http://pear.php.net/package/PHPUnit
+ * @since      Class available since Release 1.0.0
+ */
+class PHPUnit {
+    /**
+     * Runs a test(suite).
+     *
+     * @param  mixed
+     * @return PHPUnit_TestResult
+     * @access public
+     */
+    function &run(&$suite, $show_progress=false) {
+        $result = new PHPUnit_TestResult();
+        $suite->run($result, $show_progress);
+
+        return $result;
+    }
+}
+
+/*
+ * Local variables:
+ * tab-width: 4
+ * c-basic-offset: 4
+ * c-hanging-comment-ender-p: nil
+ * End:
+ */
+?>
diff --git a/test/testsuite.php b/test/testsuite.php
new file mode 100644 (file)
index 0000000..08b7d91
--- /dev/null
@@ -0,0 +1,1473 @@
+<?php
+       /* $Id$ */
+
+       include(getcwd().'/parse_args.php');
+
+       require_once('xmlrpc.inc');
+       require_once('xmlrpcs.inc');
+       require_once('xmlrpc_wrappers.inc');
+
+       require_once 'phpunit.php';
+       //require_once 'PHPUnit/TestDecorator.php';
+
+       // let testuite run for the needed time
+       if ((int)ini_get('max_execution_time') < 180)
+               ini_set('max_execution_time', 180);
+
+
+       $suite = new PHPUnit_TestSuite();
+
+       // array with list of failed tests
+       $failed_tests = array();
+
+       class LocalhostTests extends PHPUnit_TestCase
+       {
+               var $client = null;
+               var $method = 'http';
+               var $timeout = 10;
+               var $request_compression = null;
+               var $accepted_compression = '';
+
+               function fail($message = '')
+               {
+                       PHPUnit_TestCase::fail($message);
+                       // save in global var that this particular test has failed
+                       // (but only if not called from subclass objects / multitests)
+                       if (function_exists('debug_backtrace') && strtolower(get_class($this)) == 'localhosttests')
+                       {
+                               global $failed_tests;
+                               $trace = debug_backtrace();
+                               for ($i = 0; $i < count($trace); $i++)
+                               {
+                                       if (strpos($trace[$i]['function'], 'test') === 0)
+                                       {
+                                               $failed_tests[$trace[$i]['function']] = true;
+                                               break;
+                                       }
+                               }
+                       }
+               }
+
+               function setUp()
+               {
+                       global $DEBUG, $LOCALSERVER, $URI;
+                       $server = split(':', $LOCALSERVER);
+                       if(count($server) > 1)
+                       {
+                               $this->client=&new xmlrpc_client($URI, $server[0], $server[1]);
+                       }
+                       else
+                       {
+                               $this->client=&new xmlrpc_client($URI, $LOCALSERVER);
+                       }
+                       if($DEBUG)
+                       {
+                               $this->client->setDebug($DEBUG);
+                       }
+                       $this->client->request_compression = $this->request_compression;
+                       $this->client->accepted_compression = $this->accepted_compression;
+               }
+
+               function send($msg, $errrorcode=0, $return_response=false)
+               {
+                       $r = $this->client->send($msg, $this->timeout, $this->method);
+                       // for multicall, return directly array of responses
+                       if(is_array($r))
+                       {
+                               return $r;
+                       }
+                       $this->assertEquals($r->faultCode(), $errrorcode, 'Error '.$r->faultCode().' connecting to server: '.$r->faultString());
+                       if(!$r->faultCode())
+                       {
+                               if($return_response)
+                                       return $r;
+                               else
+                                       return $r->value();
+                       }
+                       else
+                       {
+                               return null;
+                       }
+               }
+
+               function testString()
+               {
+                       $sendstring="here are 3 \"entities\": < > &" .
+                               "and here's a dollar sign: \$pretendvarname and a backslash too: " . chr(92) .
+                               " - isn't that great? \\\"hackery\\\" at it's best " .
+                               " also don't want to miss out on \$item[0]. ".
+                               "The real weird stuff follows: CRLF here".chr(13).chr(10).
+                               "a simple CR here".chr(13).
+                               "a simple LF here".chr(10).
+                               "and then LFCR".chr(10).chr(13).
+                               "last but not least weird names: Günter, Elène, and an xml comment closing tag: -->";
+                       $f=new xmlrpcmsg('examples.stringecho', array(
+                               new xmlrpcval($sendstring, 'string')
+                       ));
+                       $v=$this->send($f);
+                       if($v)
+                       {
+                               // when sending/receiving non-US-ASCII encoded strings, XML says cr-lf can be normalized.
+                               // so we relax our tests...
+                               $l1 = strlen($sendstring);
+                               $l2 = strlen($v->scalarval());
+                               if ($l1 == $l2)
+                                       $this->assertEquals($sendstring, $v->scalarval());
+                               else
+                                       $this->assertEquals(str_replace(array("\r\n", "\r"), array("\n", "\n"), $sendstring), $v->scalarval());
+                       }
+               }
+
+               function testAddingDoubles()
+               {
+                       // note that rounding errors mean i
+                       // keep precision to sensible levels here ;-)
+                       $a=12.13; $b=-23.98;
+                       $f=new xmlrpcmsg('examples.addtwodouble',array(
+                               new xmlrpcval($a, 'double'),
+                               new xmlrpcval($b, 'double')
+                       ));
+                       $v=$this->send($f);
+                       if($v)
+                       {
+                               $this->assertEquals($a+$b,$v->scalarval());
+                       }
+               }
+
+               function testAdding()
+               {
+                       $f=new xmlrpcmsg('examples.addtwo',array(
+                               new xmlrpcval(12, 'int'),
+                               new xmlrpcval(-23, 'int')
+                       ));
+                       $v=$this->send($f);
+                       if($v)
+                       {
+                               $this->assertEquals(12-23, $v->scalarval());
+                       }
+               }
+
+               function testInvalidNumber()
+               {
+                       $f=new xmlrpcmsg('examples.addtwo',array(
+                               new xmlrpcval('fred', 'int'),
+                               new xmlrpcval("\"; exec('ls')", 'int')
+                       ));
+                       $v=$this->send($f);
+                       /// @todo a fault condition should be generated here
+                       /// by the server, which we pick up on
+                       if($v)
+                       {
+                               $this->assertEquals(0, $v->scalarval());
+                       }
+               }
+
+               function testBoolean()
+               {
+                       $f=new xmlrpcmsg('examples.invertBooleans', array(
+                               new xmlrpcval(array(
+                                       new xmlrpcval(true, 'boolean'),
+                                       new xmlrpcval(false, 'boolean'),
+                                       new xmlrpcval(1, 'boolean'),
+                                       new xmlrpcval(0, 'boolean'),
+                                       //new xmlrpcval('true', 'boolean'),
+                                       //new xmlrpcval('false', 'boolean')
+                               ),
+                               'array'
+                       )));
+                       $answer='0101';
+                       $v=$this->send($f);
+                       if($v)
+                       {
+                               $sz=$v->arraysize();
+                               $got='';
+                               for($i=0; $i<$sz; $i++)
+                               {
+                                       $b=$v->arraymem($i);
+                                       if($b->scalarval())
+                                       {
+                                               $got.='1';
+                                       }
+                                       else
+                                       {
+                                               $got.='0';
+                                       }
+                               }
+                               $this->assertEquals($answer, $got);
+                       }
+               }
+
+               function testBase64()
+               {
+                       $sendstring='Mary had a little lamb,
+Whose fleece was white as snow,
+And everywhere that Mary went
+the lamb was sure to go.
+
+Mary had a little lamb
+She tied it to a pylon
+Ten thousand volts went down its back
+And turned it into nylon';
+                       $f=new xmlrpcmsg('examples.decode64',array(
+                               new xmlrpcval($sendstring, 'base64')
+                       ));
+                       $v=$this->send($f);
+                       if($v)
+                       {
+                               if (strlen($sendstring) == strlen($v->scalarval()))
+                                       $this->assertEquals($sendstring, $v->scalarval());
+                               else
+                                       $this->assertEquals(str_replace(array("\r\n", "\r"), array("\n", "\n"), $sendstring), $v->scalarval());
+                       }
+               }
+
+               function testCountEntities()
+               {
+                       $sendstring = "h'fd>onc>>l>>rw&bpu>q>e<v&gxs<ytjzkami<";
+                       $f = new xmlrpcmsg('validator1.countTheEntities',array(
+                               new xmlrpcval($sendstring, 'string')
+                       ));
+                       $v = $this->send($f);
+                       if($v)
+                       {
+                               $got = '';
+                               $expected = '37210';
+                               $expect_array = array('ctLeftAngleBrackets','ctRightAngleBrackets','ctAmpersands','ctApostrophes','ctQuotes');
+                               while(list(,$val) = each($expect_array))
+                               {
+                                       $b = $v->structmem($val);
+                                       $got .= $b->me['int'];
+                               }
+                               $this->assertEquals($expected, $got);
+                       }
+               }
+
+               function _multicall_msg($method, $params)
+               {
+                       $struct['methodName'] = new xmlrpcval($method, 'string');
+                       $struct['params'] = new xmlrpcval($params, 'array');
+                       return new xmlrpcval($struct, 'struct');
+               }
+
+               function testServerMulticall()
+               {
+                       // We manually construct a system.multicall() call to ensure
+                       // that the server supports it.
+
+                       // NB: This test will NOT pass if server does not support system.multicall.
+
+                       // Based on http://xmlrpc-c.sourceforge.net/hacks/test_multicall.py
+                       $good1 = $this->_multicall_msg(
+                               'system.methodHelp',
+                               array(php_xmlrpc_encode('system.listMethods')));
+                       $bad = $this->_multicall_msg(
+                               'test.nosuch',
+                               array(php_xmlrpc_encode(1), php_xmlrpc_encode(2)));
+                       $recursive = $this->_multicall_msg(
+                               'system.multicall',
+                               array(new xmlrpcval(array(), 'array')));
+                       $good2 = $this->_multicall_msg(
+                               'system.methodSignature',
+                               array(php_xmlrpc_encode('system.listMethods')));
+                       $arg = new xmlrpcval(
+                               array($good1, $bad, $recursive, $good2),
+                               'array'
+                       );
+
+                       $f = new xmlrpcmsg('system.multicall', array($arg));
+                       $v = $this->send($f);
+                       if($v)
+                       {
+                               //$this->assertTrue($r->faultCode() == 0, "fault from system.multicall");
+                               $this->assertTrue($v->arraysize() == 4, "bad number of return values");
+
+                               $r1 = $v->arraymem(0);
+                               $this->assertTrue(
+                                       $r1->kindOf() == 'array' && $r1->arraysize() == 1,
+                                       "did not get array of size 1 from good1"
+                               );
+
+                               $r2 = $v->arraymem(1);
+                               $this->assertTrue(
+                                       $r2->kindOf() == 'struct',
+                                       "no fault from bad"
+                               );
+
+                               $r3 = $v->arraymem(2);
+                               $this->assertTrue(
+                                       $r3->kindOf() == 'struct',
+                                       "recursive system.multicall did not fail"
+                               );
+
+                               $r4 = $v->arraymem(3);
+                               $this->assertTrue(
+                                       $r4->kindOf() == 'array' && $r4->arraysize() == 1,
+                                       "did not get array of size 1 from good2"
+                               );
+                       }
+               }
+
+               function testClientMulticall1()
+               {
+                       // NB: This test will NOT pass if server does not support system.multicall.
+
+                       $this->client->no_multicall = false;
+
+                       $good1 = new xmlrpcmsg('system.methodHelp',
+                               array(php_xmlrpc_encode('system.listMethods')));
+                       $bad = new xmlrpcmsg('test.nosuch',
+                               array(php_xmlrpc_encode(1), php_xmlrpc_encode(2)));
+                       $recursive = new xmlrpcmsg('system.multicall',
+                               array(new xmlrpcval(array(), 'array')));
+                       $good2 = new xmlrpcmsg('system.methodSignature',
+                               array(php_xmlrpc_encode('system.listMethods'))
+                       );
+
+                       $r = $this->send(array($good1, $bad, $recursive, $good2));
+                       if($r)
+                       {
+                               $this->assertTrue(count($r) == 4, "wrong number of return values");
+                       }
+
+                       $this->assertTrue($r[0]->faultCode() == 0, "fault from good1");
+                       if(!$r[0]->faultCode())
+                       {
+                               $val = $r[0]->value();
+                               $this->assertTrue(
+                                       $val->kindOf() == 'scalar' && $val->scalartyp() == 'string',
+                                       "good1 did not return string"
+                               );
+                       }
+                       $this->assertTrue($r[1]->faultCode() != 0, "no fault from bad");
+                       $this->assertTrue($r[2]->faultCode() != 0, "no fault from recursive system.multicall");
+                       $this->assertTrue($r[3]->faultCode() == 0, "fault from good2");
+                       if(!$r[3]->faultCode())
+                       {
+                               $val = $r[3]->value();
+                               $this->assertTrue($val->kindOf() == 'array', "good2 did not return array");
+                       }
+                       // This is the only assert in this test which should fail
+                       // if the test server does not support system.multicall.
+                       $this->assertTrue($this->client->no_multicall == false,
+                               "server does not support system.multicall"
+                       );
+               }
+
+               function testClientMulticall2()
+               {
+                       // NB: This test will NOT pass if server does not support system.multicall.
+
+                       $this->client->no_multicall = true;
+
+                       $good1 = new xmlrpcmsg('system.methodHelp',
+                               array(php_xmlrpc_encode('system.listMethods')));
+                       $bad = new xmlrpcmsg('test.nosuch',
+                               array(php_xmlrpc_encode(1), php_xmlrpc_encode(2)));
+                       $recursive = new xmlrpcmsg('system.multicall',
+                               array(new xmlrpcval(array(), 'array')));
+                       $good2 = new xmlrpcmsg('system.methodSignature',
+                               array(php_xmlrpc_encode('system.listMethods'))
+                       );
+
+                       $r = $this->send(array($good1, $bad, $recursive, $good2));
+                       if($r)
+                       {
+                               $this->assertTrue(count($r) == 4, "wrong number of return values");
+                       }
+
+                       $this->assertTrue($r[0]->faultCode() == 0, "fault from good1");
+                       if(!$r[0]->faultCode())
+                       {
+                               $val = $r[0]->value();
+                               $this->assertTrue(
+                                       $val->kindOf() == 'scalar' && $val->scalartyp() == 'string',
+                                       "good1 did not return string");
+                       }
+                       $this->assertTrue($r[1]->faultCode() != 0, "no fault from bad");
+                       $this->assertTrue($r[2]->faultCode() == 0, "fault from (non recursive) system.multicall");
+                       $this->assertTrue($r[3]->faultCode() == 0, "fault from good2");
+                       if(!$r[3]->faultCode())
+                       {
+                               $val = $r[3]->value();
+                               $this->assertTrue($val->kindOf() == 'array', "good2 did not return array");
+                       }
+               }
+
+               function testClientMulticall3()
+               {
+                       // NB: This test will NOT pass if server does not support system.multicall.
+
+                       $this->client->return_type = 'phpvals';
+                       $this->client->no_multicall = false;
+
+                       $good1 = new xmlrpcmsg('system.methodHelp',
+                               array(php_xmlrpc_encode('system.listMethods')));
+                       $bad = new xmlrpcmsg('test.nosuch',
+                               array(php_xmlrpc_encode(1), php_xmlrpc_encode(2)));
+                       $recursive = new xmlrpcmsg('system.multicall',
+                               array(new xmlrpcval(array(), 'array')));
+                       $good2 = new xmlrpcmsg('system.methodSignature',
+                               array(php_xmlrpc_encode('system.listMethods'))
+                       );
+
+                       $r = $this->send(array($good1, $bad, $recursive, $good2));
+                       if($r)
+                       {
+                               $this->assertTrue(count($r) == 4, "wrong number of return values");
+                       }
+                       $this->assertTrue($r[0]->faultCode() == 0, "fault from good1");
+                       if(!$r[0]->faultCode())
+                       {
+                               $val = $r[0]->value();
+                               $this->assertTrue(
+                                       is_string($val) , "good1 did not return string");
+                       }
+                       $this->assertTrue($r[1]->faultCode() != 0, "no fault from bad");
+                       $this->assertTrue($r[2]->faultCode() != 0, "no fault from recursive system.multicall");
+                       $this->assertTrue($r[3]->faultCode() == 0, "fault from good2");
+                       if(!$r[3]->faultCode())
+                       {
+                               $val = $r[3]->value();
+                               $this->assertTrue(is_array($val), "good2 did not return array");
+                       }
+                       $this->client->return_type = 'xmlrpcvals';
+               }
+
+               function testCatchWarnings()
+               {
+                       $f = new xmlrpcmsg('examples.generatePHPWarning', array(
+                               new xmlrpcval('whatever', 'string')
+                       ));
+                       $v = $this->send($f);
+                       if($v)
+                       {
+                               $this->assertEquals($v->scalarval(), true);
+                       }
+               }
+
+               function testZeroParams()
+               {
+                       $f = new xmlrpcmsg('system.listMethods');
+                       $v = $this->send($f);
+               }
+
+               function testCodeInjectionServerSide()
+               {
+                       $f = new xmlrpcmsg('system.MethodHelp');
+                       $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>";
+                       $v = $this->send($f);
+                       //$v = $r->faultCode();
+                       if ($v)
+                       {
+                               $this->assertEquals(0, $v->structsize());
+                       }
+               }
+
+               function testAutoRegisteredFunction()
+               {
+                       $f=new xmlrpcmsg('examples.php.getStateName',array(
+                               new xmlrpcval(23, 'int')
+                       ));
+                       $v=$this->send($f);
+                       if($v)
+                       {
+                               $this->assertEquals('Michigan', $v->scalarval());
+                       }
+                       else
+                       {
+                               $this->fail('Note: server can only auto register functions if running with PHP 5.0.3 and up');
+                       }
+               }
+
+               function testAutoRegisteredClass()
+               {
+                       $f=new xmlrpcmsg('examples.php2.getStateName',array(
+                               new xmlrpcval(23, 'int')
+                       ));
+                       $v=$this->send($f);
+                       if($v)
+                       {
+                               $this->assertEquals('Michigan', $v->scalarval());
+                       $f=new xmlrpcmsg('examples.php3.getStateName',array(
+                               new xmlrpcval(23, 'int')
+                       ));
+                       $v=$this->send($f);
+                       if($v)
+                       {
+                               $this->assertEquals('Michigan', $v->scalarval());
+                       }
+               }
+                       else
+                       {
+                               $this->fail('Note: server can only auto register class methods if running with PHP 5.0.3 and up');
+                       }
+               }
+
+               function testAutoRegisteredMethod()
+               {
+                       $func=wrap_xmlrpc_method($this->client, 'examples.getStateName');
+                       if($func == '')
+                       {
+                               $this->fail('Registration of examples.getStateName failed');
+                       }
+                       else
+                       {
+                               $v=$func(23);
+                               $this->assertEquals('Michigan', $v);
+                       }
+               }
+
+               function testGetCookies()
+               {
+                       // let server set to us some cookies we tell it
+                       $cookies = array(
+                               //'c1' => array(),
+                               'c2' => array('value' => 'c2'),
+                               'c3' => array('value' => 'c3', 'expires' => time()+60*60*24*30),
+                               'c4' => array('value' => 'c4', 'expires' => time()+60*60*24*30, 'path' => '/'),
+                               'c5' => array('value' => 'c5', 'expires' => time()+60*60*24*30, 'path' => '/', 'domain' => 'localhost'),
+                       );
+                       $cookiesval =& php_xmlrpc_encode($cookies);
+                       $f=new xmlrpcmsg('examples.setcookies',array($cookiesval));
+                       $r=$this->send($f, 0, true);
+                       if($r)
+                       {
+                               $v = $r->value();
+                               $this->assertEquals(1, $v->scalarval());
+                               // now check if we decoded the cookies as we had set them
+                               $rcookies = $r->cookies();
+                               foreach($cookies as $c => $v)
+                               // format for date string in cookies: 'Mon, 31 Oct 2005 13:50:56 GMT'
+                               // but PHP versions differ on that, some use 'Mon, 31-Oct-2005 13:50:56 GMT'...
+                                       if(isset($v['expires']))
+                                       {
+                                               if (isset($rcookies[$c]['expires']) && strpos($rcookies[$c]['expires'], '-'))
+                                               {
+                                                       $cookies[$c]['expires'] = gmdate('D, d\-M\-Y H:i:s \G\M\T' ,$cookies[$c]['expires']);
+                                               }
+                                               else
+                                               {
+                                                       $cookies[$c]['expires'] = gmdate('D, d M Y H:i:s \G\M\T' ,$cookies[$c]['expires']);
+                                               }
+                                       }
+                               $this->assertEquals($cookies, $rcookies);
+                       }
+               }
+
+               function testSetCookies()
+               {
+                       // let server set to us some cookies we tell it
+                       $cookies = array(
+                               'c0' => null,
+                               'c1' => 1,
+                               'c2' => '2 3',
+                               'c3' => '!@#$%^&*()_+|}{":?><,./\';[]\\=-'
+                       );
+                       $f=new xmlrpcmsg('examples.getcookies',array());
+                       foreach ($cookies as $cookie => $val)
+                       {
+                               $this->client->setCookie($cookie, $val);
+                               $cookies[$cookie] = (string) $cookies[$cookie];
+                       }
+                       $r = $this->client->send($f, $this->timeout, $this->method);
+                       $this->assertEquals($r->faultCode(), 0, 'Error '.$r->faultCode().' connecting to server: '.$r->faultString());
+                       if(!$r->faultCode())
+                       {
+                               $v = $r->value();
+                               $v = php_xmlrpc_decode($v);
+                               // on IIS and Apache getallheaders returns something slightly different...
+                               $this->assertEquals($v, $cookies);
+                       }
+               }
+
+               function testSendTwiceSameMsg()
+               {
+                       $f=new xmlrpcmsg('examples.stringecho', array(
+                               new xmlrpcval('hello world', 'string')
+                       ));
+                       $v1 = $this->send($f);
+                       $v2 = $this->send($f);
+                       //$v = $r->faultCode();
+                       if ($v1 && $v2)
+                       {
+                               $this->assertEquals($v2, $v1);
+                       }
+               }
+       }
+
+       class LocalHostMultiTests extends LocalhostTests
+       {
+               function _runtests()
+               {
+                       global $failed_tests;
+                       foreach(get_class_methods('LocalhostTests') as $meth)
+                       {
+                               if(strpos($meth, 'test') === 0 && $meth != 'testHttps')
+                               {
+                                       if (!isset($failed_tests[$meth]))
+                                               $this->$meth();
+                               }
+                               if ($this->_failed)
+                               {
+                                       break;
+                               }
+                       }
+               }
+
+               function testDeflate()
+               {
+                       if(!function_exists('gzdeflate'))
+                       {
+                               $this->fail('Zlib missing: cannot test deflate functionality');
+                               return;
+                       }
+                       $this->client->accepted_compression = array('deflate');
+                       $this->client->request_compression = 'deflate';
+                       $this->_runtests();
+               }
+
+               function testGzip()
+               {
+                       if(!function_exists('gzdeflate'))
+                       {
+                               $this->fail('Zlib missing: cannot test gzip functionality');
+                               return;
+                       }
+                       $this->client->accepted_compression = array('gzip');
+                       $this->client->request_compression = 'gzip';
+                       $this->_runtests();
+               }
+
+               function testKeepAlives()
+               {
+                       if(!function_exists('curl_init'))
+                       {
+                               $this->fail('CURL missing: cannot test http 1.1');
+                               return;
+                       }
+                       $this->method = 'http11';
+                       $this->client->keepalive = true;
+                       $this->_runtests();
+               }
+
+               function testProxy()
+               {
+                       global $PROXYSERVER, $PROXYPORT;
+            if ($PROXYSERVER)
+            {
+                               $this->client->setProxy($PROXYSERVER, $PROXYPORT);
+                               $this->_runtests();
+            }
+            else
+               $this->fail('PROXY definition missing: cannot test proxy');
+               }
+
+               function testHttp11()
+               {
+                       if(!function_exists('curl_init'))
+                       {
+                               $this->fail('CURL missing: cannot test http 1.1');
+                               return;
+                       }
+                       $this->method = 'http11'; // not an error the double assignment!
+                       $this->client->method = 'http11';
+                       //$this->client->verifyhost = 0;
+                       //$this->client->verifypeer = 0;
+                       $this->client->keepalive = false;
+                       $this->_runtests();
+               }
+
+               function testHttp11Gzip()
+               {
+                       if(!function_exists('curl_init'))
+                       {
+                               $this->fail('CURL missing: cannot test http 1.1');
+                               return;
+                       }
+                       $this->method = 'http11'; // not an error the double assignment!
+                       $this->client->method = 'http11';
+                       $this->client->keepalive = false;
+                       $this->client->accepted_compression = array('gzip');
+                       $this->client->request_compression = 'gzip';
+                       $this->_runtests();
+               }
+
+               function testHttp11Deflate()
+               {
+                       if(!function_exists('curl_init'))
+                       {
+                               $this->fail('CURL missing: cannot test http 1.1');
+                               return;
+                       }
+                       $this->method = 'http11'; // not an error the double assignment!
+                       $this->client->method = 'http11';
+                       $this->client->keepalive = false;
+                       $this->client->accepted_compression = array('deflate');
+                       $this->client->request_compression = 'deflate';
+                       $this->_runtests();
+               }
+
+               function testHttp11Proxy()
+               {
+                       global $PROXYSERVER, $PROXYPORT;
+                       if(!function_exists('curl_init'))
+                       {
+                               $this->fail('CURL missing: cannot test http 1.1 w. proxy');
+                               return;
+                       }
+            else if ($PROXYSERVER == '')
+            {
+               $this->fail('PROXY definition missing: cannot test proxy w. http 1.1');
+                return;
+            }
+                       $this->method = 'http11'; // not an error the double assignment!
+                       $this->client->method = 'http11';
+            $this->client->setProxy($PROXYSERVER, $PROXYPORT);
+                       //$this->client->verifyhost = 0;
+                       //$this->client->verifypeer = 0;
+                       $this->client->keepalive = false;
+                       $this->_runtests();
+               }
+
+               function testHttps()
+               {
+                       global $HTTPSSERVER, $HTTPSURI;
+                       if(!function_exists('curl_init'))
+                       {
+                               $this->fail('CURL missing: cannot test https functionality');
+                               return;
+                       }
+                       $this->client->server = $HTTPSSERVER;
+                       $this->method = 'https';
+                       $this->client->method = 'https';
+                       $this->client->path = $HTTPSURI;
+                       $this->_runtests();
+               }
+
+               function testHttpsProxy()
+               {
+                       global $HTTPSSERVER, $HTTPSURI, $PROXYSERVER, $PROXYPORT;;
+                       if(!function_exists('curl_init'))
+                       {
+                               $this->fail('CURL missing: cannot test https functionality');
+                               return;
+                       }
+            else if ($PROXYSERVER == '')
+            {
+               $this->fail('PROXY definition missing: cannot test proxy w. http 1.1');
+                return;
+            }
+                       $this->client->server = $HTTPSSERVER;
+                       $this->method = 'https';
+                       $this->client->method = 'https';
+            $this->client->setProxy($PROXYSERVER, $PROXYPORT);
+                       $this->client->path = $HTTPSURI;
+                       $this->_runtests();
+               }
+
+               function testUTF8Responses()
+               {
+                       global $URI;
+                       //$this->client->path = strpos($URI, '?') === null ? $URI.'?RESPONSE_ENCODING=UTF-8' : $URI.'&RESPONSE_ENCODING=UTF-8';
+                       $this->client->path = $URI.'?RESPONSE_ENCODING=UTF-8';
+                       $this->_runtests();
+               }
+
+               function testUTF8Requests()
+               {
+                       $this->client->request_charset_encoding = 'UTF-8';
+                       $this->_runtests();
+               }
+
+               function testISOResponses()
+               {
+                       global $URI;
+                       //$this->client->path = strpos($URI, '?') === null ? $URI.'?RESPONSE_ENCODING=UTF-8' : $URI.'&RESPONSE_ENCODING=UTF-8';
+                       $this->client->path = $URI.'?RESPONSE_ENCODING=ISO-8859-1';
+                       $this->_runtests();
+               }
+
+               function testISORequests()
+               {
+                       $this->client->request_charset_encoding = 'ISO-8859-1';
+                       $this->_runtests();
+               }
+       }
+
+       class ParsingBugsTests extends PHPUnit_TestCase
+       {
+               function testMinusOneString()
+               {
+                       $v=new xmlrpcval('-1');
+                       $u=new xmlrpcval('-1', 'string');
+                       $this->assertEquals($u->scalarval(), $v->scalarval());
+               }
+
+               function testUnicodeInMemberName(){
+                       $v = array('Günter, Elène' => new xmlrpcval(1));
+                       $r = new xmlrpcresp(new xmlrpcval($v, 'struct'));
+                       $r = $r->serialize();
+                       $m = new xmlrpcmsg('dummy');
+                       $r = $m->parseResponse($r);
+                       $v = $r->value();
+                       $this->assertEquals($v->structmemexists('Günter, Elène'), true);
+               }
+
+               function testUnicodeInErrorString()
+               {
+                       $response = utf8_encode(
+'<?xml version="1.0"?>
+<!-- $Id -->
+<!-- found by G. giunta, covers what happens when lib receives
+  UTF8 chars in reponse text and comments -->
+<!-- àüè&#224;&#252;&#232; -->
+<methodResponse>
+<fault>
+<value>
+<struct>
+<member>
+<name>faultCode</name>
+<value><int>888</int></value>
+</member>
+<member>
+<name>faultString</name>
+<value><string>àüè&#224;&#252;&#232;</string></value>
+</member>
+</struct>
+</value>
+</fault>
+</methodResponse>');
+                       $m=new xmlrpcmsg('dummy');
+                       $r=$m->parseResponse($response);
+                       $v=$r->faultString();
+                       $this->assertEquals('àüèàüè', $v);
+               }
+
+               function testValidNumbers()
+               {
+                       $m=new xmlrpcmsg('dummy');
+                       $fp=
+'<?xml version="1.0"?>
+<methodResponse>
+<params>
+<param>
+<value>
+<struct>
+<member>
+<name>integer1</name>
+<value><int>01</int></value>
+</member>
+<member>
+<name>float1</name>
+<value><double>01.10</double></value>
+</member>
+<member>
+<name>integer2</name>
+<value><int>+1</int></value>
+</member>
+<member>
+<name>float2</name>
+<value><double>+1.10</double></value>
+</member>
+<member>
+<name>float3</name>
+<value><double>-1.10e2</double></value>
+</member>
+</struct>
+</value>
+</param>
+</params>
+</methodResponse>';
+                       $r=$m->parseResponse($fp);
+                       $v=$r->value();
+                       $s=$v->structmem('integer1');
+                       $t=$v->structmem('float1');
+                       $u=$v->structmem('integer2');
+                       $w=$v->structmem('float2');
+                       $x=$v->structmem('float3');
+                       $this->assertEquals(1, $s->scalarval());
+                       $this->assertEquals(1.1, $t->scalarval());
+                       $this->assertEquals(1, $u->scalarval());
+                       $this->assertEquals(1.1, $w->scalarval());
+                       $this->assertEquals(-110.0, $x->scalarval());
+               }
+
+               function testAddScalarToStruct()
+               {
+                       $v=new xmlrpcval(array('a' => 'b'), 'struct');
+                       // use @ operator in case error_log gets on screen
+                       $r= @$v->addscalar('c');
+                       $this->assertEquals(0, $r);
+               }
+
+               function testAddStructToStruct()
+               {
+                       $v=new xmlrpcval(array('a' => new xmlrpcval('b')), 'struct');
+                       $r=$v->addstruct(array('b' => new xmlrpcval('c')));
+                       $this->assertEquals(2, $v->structsize());
+                       $this->assertEquals(1, $r);
+                       $r=$v->addstruct(array('b' => new xmlrpcval('b')));
+                       $this->assertEquals(2, $v->structsize());
+               }
+
+               function testAddArrayToArray()
+               {
+                       $v=new xmlrpcval(array(new xmlrpcval('a'), new xmlrpcval('b')), 'array');
+                       $r=$v->addarray(array(new xmlrpcval('b'), new xmlrpcval('c')));
+                       $this->assertEquals(4, $v->arraysize());
+                       $this->assertEquals(1, $r);
+               }
+
+               function testEncodeArray()
+               {
+                       $r=range(1, 100);
+                       $v = php_xmlrpc_encode($r);
+                       $this->assertEquals('array', $v->kindof());
+               }
+
+               function testEncodeRecursive()
+               {
+                       $v = php_xmlrpc_encode(php_xmlrpc_encode('a simple string'));
+                       $this->assertEquals('scalar', $v->kindof());
+               }
+
+               function testBrokenRequests()
+               {
+                       $s = new xmlrpc_server();
+// omitting the 'params' tag: not tolerated by the lib anymore
+$f = '<?xml version="1.0"?>
+<methodCall>
+<methodName>system.methodHelp</methodName>
+<param>
+<value><string>system.methodHelp</string></value>
+</param>
+</methodCall>';
+                       $r = $s->parserequest($f);
+                       $this->assertEquals(15, $r->faultCode());
+// omitting a 'param' tag
+$f = '<?xml version="1.0"?>
+<methodCall>
+<methodName>system.methodHelp</methodName>
+<params>
+<value><string>system.methodHelp</string></value>
+</params>
+</methodCall>';
+                       $r = $s->parserequest($f);
+                       $this->assertEquals(15, $r->faultCode());
+// omitting a 'value' tag
+$f = '<?xml version="1.0"?>
+<methodCall>
+<methodName>system.methodHelp</methodName>
+<params>
+<param><string>system.methodHelp</string></param>
+</params>
+</methodCall>';
+                       $r = $s->parserequest($f);
+                       $this->assertEquals(15, $r->faultCode());
+               }
+
+               function testBrokenResponses()
+               {
+                       $m=new xmlrpcmsg('dummy');
+                       //$m->debug = 1;
+// omitting the 'params' tag: no more tolerated by the lib...
+$f = '<?xml version="1.0"?>
+<methodResponse>
+<param>
+<value><string>system.methodHelp</string></value>
+</param>
+</methodResponse>';
+                       $r = $m->parseResponse($f);
+                       $this->assertEquals(2, $r->faultCode());
+// omitting the 'param' tag: no more tolerated by the lib...
+$f = '<?xml version="1.0"?>
+<methodResponse>
+<params>
+<value><string>system.methodHelp</string></value>
+</params>
+</methodResponse>';
+                       $r = $m->parseResponse($f);
+                       $this->assertEquals(2, $r->faultCode());
+// omitting a 'value' tag: KO
+$f = '<?xml version="1.0"?>
+<methodResponse>
+<params>
+<param><string>system.methodHelp</string></param>
+</params>
+</methodResponse>';
+                       $r = $m->parseResponse($f);
+                       $this->assertEquals(2, $r->faultCode());
+               }
+
+               function testBuggyHttp()
+               {
+                       $s = new xmlrpcmsg('dummy');
+$f = 'HTTP/1.1 100 Welcome to the jungle
+
+HTTP/1.0 200 OK
+X-Content-Marx-Brothers: Harpo
+                       Chico and Groucho
+Content-Length: who knows?
+
+
+
+<?xml version="1.0"?>
+<!-- First of all, let\'s check out if the lib properly handles a commented </methodResponse> tag... -->
+<methodResponse><params><param><value><struct><member><name>userid</name><value>311127</value></member>
+<member><name>dateCreated</name><value><dateTime.iso8601>20011126T09:17:52</dateTime.iso8601></value></member><member><name>content</name><value>hello world. 2 newlines follow
+
+
+and there they were.</value></member><member><name>postid</name><value>7414222</value></member></struct></value></param></params></methodResponse>
+<script type="text\javascript">document.write(\'Hello, my name is added nag, I\\\'m happy to serve your content for free\');</script>
+ ';
+                       $r = $s->parseResponse($f);
+                       $v = $r->value();
+                       $s = $v->structmem('content');
+                       $this->assertEquals("hello world. 2 newlines follow\n\n\nand there they were.", $s->scalarval());
+               }
+
+               function testStringBug()
+               {
+                       $s = new xmlrpcmsg('dummy');
+$f = '<?xml version="1.0"?>
+<!-- $Id -->
+<!-- found by 2z69xks7bpy001@sneakemail.com, amongst others
+ covers what happens when there\'s character data after </string>
+ and before </value> -->
+<methodResponse>
+<params>
+<param>
+<value>
+<struct>
+<member>
+<name>success</name>
+<value>
+<boolean>1</boolean>
+</value>
+</member>
+<member>
+<name>sessionID</name>
+<value>
+<string>S300510007I</string>
+</value>
+</member>
+</struct>
+</value>
+</param>
+</params>
+</methodResponse> ';
+                       $r = $s->parseResponse($f);
+                       $v = $r->value();
+                       $s = $v->structmem('sessionID');
+                       $this->assertEquals('S300510007I', $s->scalarval());
+               }
+
+               function testWhiteSpace()
+               {
+                       $s = new xmlrpcmsg('dummy');
+$f = '<?xml version="1.0"?><methodResponse><params><param><value><struct><member><name>userid</name><value>311127</value></member>
+<member><name>dateCreated</name><value><dateTime.iso8601>20011126T09:17:52</dateTime.iso8601></value></member><member><name>content</name><value>hello world. 2 newlines follow
+
+
+and there they were.</value></member><member><name>postid</name><value>7414222</value></member></struct></value></param></params></methodResponse>
+';
+                       $r = $s->parseResponse($f);
+                       $v = $r->value();
+                       $s = $v->structmem('content');
+                       $this->assertEquals("hello world. 2 newlines follow\n\n\nand there they were.", $s->scalarval());
+               }
+
+               function testDoubleDataInArrayTag()
+               {
+                       $s = new xmlrpcmsg('dummy');
+$f = '<?xml version="1.0"?><methodResponse><params><param><value><array>
+<data></data>
+<data></data>
+</array></value></param></params></methodResponse>
+';
+                       $r = $s->parseResponse($f);
+                       $v = $r->faultCode();
+                       $this->assertEquals(2, $v);
+$f = '<?xml version="1.0"?><methodResponse><params><param><value><array>
+<data><value>Hello world</value></data>
+<data></data>
+</array></value></param></params></methodResponse>
+';
+                       $r = $s->parseResponse($f);
+                       $v = $r->faultCode();
+                       $this->assertEquals(2, $v);
+               }
+
+               function testDoubleStuffInValueTag()
+               {
+                       $s = new xmlrpcmsg('dummy');
+$f = '<?xml version="1.0"?><methodResponse><params><param><value>
+<string>hello world</string>
+<array><data></data></array>
+</value></param></params></methodResponse>
+';
+                       $r = $s->parseResponse($f);
+                       $v = $r->faultCode();
+                       $this->assertEquals(2, $v);
+$f = '<?xml version="1.0"?><methodResponse><params><param><value>
+<string>hello</string>
+<string>world</string>
+</value></param></params></methodResponse>
+';
+                       $r = $s->parseResponse($f);
+                       $v = $r->faultCode();
+                       $this->assertEquals(2, $v);
+$f = '<?xml version="1.0"?><methodResponse><params><param><value>
+<string>hello</string>
+<struct><member><name>hello><value>world</value></member></struct>
+</value></param></params></methodResponse>
+';
+                       $r = $s->parseResponse($f);
+                       $v = $r->faultCode();
+                       $this->assertEquals(2, $v);
+               }
+
+               function testAutodecodeResponse()
+               {
+                       $s = new xmlrpcmsg('dummy');
+$f = '<?xml version="1.0"?><methodResponse><params><param><value><struct><member><name>userid</name><value>311127</value></member>
+<member><name>dateCreated</name><value><dateTime.iso8601>20011126T09:17:52</dateTime.iso8601></value></member><member><name>content</name><value>hello world. 2 newlines follow
+
+
+and there they were.</value></member><member><name>postid</name><value>7414222</value></member></struct></value></param></params></methodResponse>
+';
+                       $r = $s->parseResponse($f, true, 'phpvals');
+                       $v = $r->value();
+                       $s = $v['content'];
+                       $this->assertEquals("hello world. 2 newlines follow\n\n\nand there they were.", $s);
+               }
+
+               function testNoDecodeResponse()
+               {
+                       $s = new xmlrpcmsg('dummy');
+$f = '<?xml version="1.0"?><methodResponse><params><param><value><struct><member><name>userid</name><value>311127</value></member>
+<member><name>dateCreated</name><value><dateTime.iso8601>20011126T09:17:52</dateTime.iso8601></value></member><member><name>content</name><value>hello world. 2 newlines follow
+
+
+and there they were.</value></member><member><name>postid</name><value>7414222</value></member></struct></value></param></params></methodResponse>';
+                       $r = $s->parseResponse($f, true, 'xml');
+                       $v = $r->value();
+                       $this->assertEquals($f, $v);
+               }
+
+               function testAutoCoDec()
+               {
+                       $data1 = array(1, 1.0, 'hello world', true, '20051021T23:43:00', -1, 11.0, '~!@#$%^&*()_+|', false, '20051021T23:43:00');
+                       $data2 = array('zero' => $data1, 'one' => $data1, 'two' => $data1, 'three' => $data1, 'four' => $data1, 'five' => $data1, 'six' => $data1, 'seven' => $data1, 'eight' => $data1, 'nine' => $data1);
+                       $data = array($data2, $data2, $data2, $data2, $data2, $data2, $data2, $data2, $data2, $data2);
+                       //$keys = array('zero', 'one', 'two', 'three', 'four', 'five', 'six', 'seven', 'eight', 'nine');
+                       $v1 = php_xmlrpc_encode($data, array('auto_dates'));
+                       $v2 = php_xmlrpc_decode_xml($v1->serialize());
+                       $this->assertEquals($v1, $v2);
+                       $r1 =& new xmlrpcresp($v1);
+                       $r2 = php_xmlrpc_decode_xml($r1->serialize());
+                       $r2->serialize(); // needed to set internal member payload
+                       $this->assertEquals($r1, $r2);
+                       $m1 =& new xmlrpcmsg('hello dolly', array($v1));
+                       $m2 = php_xmlrpc_decode_xml($m1->serialize());
+                       $m2->serialize(); // needed to set internal member payload
+                       $this->assertEquals($m1, $m2);
+               }
+
+               function testUTF8Request()
+               {
+                       $sendstring='κόσμε'; // Greek word 'kosme'. NB: NOT a valid ISO8859 string!
+                       $GLOBALS['xmlrpc_internalencoding'] = 'UTF-8';
+                       $f = new xmlrpcval($sendstring, 'string');
+                       $v=$f->serialize();
+                       $this->assertEquals("<value><string>&#954;&#8057;&#963;&#956;&#949;</string></value>\n", $v);
+                       $GLOBALS['xmlrpc_internalencoding'] = 'ISO-8859-1';
+               }
+
+               function testUTF8Response()
+               {
+                       $s = new xmlrpcmsg('dummy');
+$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>
+<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>
+';
+                       $r = $s->parseResponse($f, false, 'phpvals');
+                       $v = $r->value();
+                       $v = $v['content'];
+                       $this->assertEquals("àüèàüè", $v);
+$f = '<?xml version="1.0" encoding="utf-8"?><methodResponse><params><param><value><struct><member><name>userid</name><value>311127</value></member>
+<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>
+';
+                       $r = $s->parseResponse($f, false, 'phpvals');
+                       $v = $r->value();
+                       $v = $v['content'];
+                       $this->assertEquals("àüèàüè", $v);
+               }
+
+               function testUTF8IntString()
+               {
+                       $v=new xmlrpcval(100, 'int');
+                       $s=$v->serialize('UTF-8');
+                       $this->assertequals("<value><int>100</int></value>\n", $s);
+               }
+
+               function testStringInt()
+               {
+                       $v=new xmlrpcval('hello world', 'int');
+                       $s=$v->serialize();
+                       $this->assertequals("<value><int>0</int></value>\n", $s);
+               }
+
+               function testStructMemExists()
+               {
+                       $v=php_xmlrpc_encode(array('hello' => 'world'));
+                       $b=$v->structmemexists('hello');
+                       $this->assertequals(true, $b);
+                       $b=$v->structmemexists('world');
+                       $this->assertequals(false, $b);
+               }
+
+               function testNilvalue()
+               {
+                       // default case: we do not accept nil values received
+                       $v = new xmlrpcval('hello', 'null');
+                       $r = new xmlrpcresp($v);
+                       $s = $r->serialize();
+                       $m = new xmlrpcmsg('dummy');
+                       $r = $m->parseresponse($s);
+                       $this->assertequals(2, $r->faultCode());
+                       // enable reception of nil values
+                       $GLOBALS['xmlrpc_null_extension'] = true;
+                       $r = $m->parseresponse($s);
+                       $v = $r->value();
+                       $this->assertequals('null', $v->scalartyp());
+               }
+
+               function TestLocale()
+        {
+            $locale = setlocale(LC_NUMERIC,0);
+            if ( setlocale(LC_NUMERIC,'deu', 'de_DE@euro', 'de_DE', 'de', 'ge') !== false )
+            {
+                       $v = new xmlrpcval(1.1,'double');
+                       $r = $v->serialize();
+                       $this->assertequals(false, strpos($r,','));
+                       $this->assertequals(1, strpos($v->scalarval(),','));
+                       setlocale(LC_NUMERIC,$locale);
+               }
+               }
+       }
+
+       class InvalidHostTests extends PHPUnit_TestCase
+       {
+               var $client = null;
+
+               function setUp()
+               {
+                       global $DEBUG,$LOCALSERVER;
+                       $this->client=new xmlrpc_client('/NOTEXIST.php', $LOCALSERVER, 80);
+                       if($DEBUG)
+                       {
+                               $this->client->setDebug($DEBUG);
+                       }
+               }
+
+               function test404()
+               {
+                       $f = new xmlrpcmsg('examples.echo',array(
+                               new xmlrpcval('hello', 'string')
+                       ));
+                       $r = $this->client->send($f, 5);
+                       $this->assertEquals(5, $r->faultCode());
+               }
+
+               function testSrvNotFound()
+               {
+                       $f = new xmlrpcmsg('examples.echo',array(
+                               new xmlrpcval('hello', 'string')
+                       ));
+                       $this->client->server .= 'XXX';
+                       $r = $this->client->send($f, 5);
+                       $this->assertEquals(5, $r->faultCode());
+               }
+
+               function testCurlKAErr()
+               {
+                       global $LOCALSERVER, $URI;
+                       if(!function_exists('curl_init'))
+                       {
+                               $this->fail('CURL missing: cannot test curl keepalive errors');
+                               return;
+                       }
+                       $f = new xmlrpcmsg('examples.stringecho',array(
+                               new xmlrpcval('hello', 'string')
+                       ));
+                       // test 2 calls w. keepalive: 1st time connection ko, second time ok
+                       $this->client->server .= 'XXX';
+                       $this->client->keepalive = true;
+                       $r = $this->client->send($f, 5, 'http11');
+                       $this->assertEquals(8, $r->faultCode());
+
+                       // now test a successful connection
+                       $server = split(':', $LOCALSERVER);
+                       if(count($server) > 1)
+                       {
+                               $this->client->port = $server[1];
+                       }
+                       $this->client->server = $server[0];
+                       $this->client->path = $URI;
+
+                       $r = $this->client->send($f, 5, 'http11');
+                       $r = $r->value();
+                       $this->assertEquals('hello', $r->scalarVal());
+               }
+       }
+
+
+       $suite->addTest(new LocalhostTests('testString'));
+       $suite->addTest(new LocalhostTests('testAdding'));
+       $suite->addTest(new LocalhostTests('testAddingDoubles'));
+       $suite->addTest(new LocalhostTests('testInvalidNumber'));
+       $suite->addTest(new LocalhostTests('testBoolean'));
+       $suite->addTest(new LocalhostTests('testCountEntities'));
+       $suite->addTest(new LocalhostTests('testBase64'));
+       $suite->addTest(new LocalhostTests('testServerMulticall'));
+       $suite->addTest(new LocalhostTests('testClientMulticall1'));
+       $suite->addTest(new LocalhostTests('testClientMulticall2'));
+       $suite->addTest(new LocalhostTests('testClientMulticall3'));
+       $suite->addTest(new LocalhostTests('testCatchWarnings'));
+       $suite->addTest(new LocalhostTests('testZeroParams'));
+       $suite->addTest(new LocalhostTests('testCodeInjectionServerSide'));
+       $suite->addTest(new LocalhostTests('testAutoRegisteredFunction'));
+       $suite->addTest(new LocalhostTests('testAutoRegisteredMethod'));
+       $suite->addTest(new LocalhostTests('testSetCookies'));
+       $suite->addTest(new LocalhostTests('testGetCookies'));
+       $suite->addTest(new LocalhostTests('testSendTwiceSameMsg'));
+
+       $suite->addTest(new LocalhostMultiTests('testUTF8Requests'));
+       $suite->addTest(new LocalhostMultiTests('testUTF8Responses'));
+       $suite->addTest(new LocalhostMultiTests('testISORequests'));
+       $suite->addTest(new LocalhostMultiTests('testISOResponses'));
+       $suite->addTest(new LocalhostMultiTests('testGzip'));
+       $suite->addTest(new LocalhostMultiTests('testDeflate'));
+       $suite->addTest(new LocalhostMultiTests('testProxy'));
+       $suite->addTest(new LocalhostMultiTests('testHttp11'));
+       $suite->addTest(new LocalhostMultiTests('testHttp11Gzip'));
+       $suite->addTest(new LocalhostMultiTests('testHttp11Deflate'));
+       $suite->addTest(new LocalhostMultiTests('testKeepAlives'));
+       $suite->addTest(new LocalhostMultiTests('testHttp11Proxy'));
+       $suite->addTest(new LocalhostMultiTests('testHttps'));
+       $suite->addTest(new LocalhostMultiTests('testHttpsProxy'));
+
+       $suite->addTest(new InvalidHostTests('test404'));
+       //$suite->addTest(new InvalidHostTests('testSrvNotFound'));
+       $suite->addTest(new InvalidHostTests('testCurlKAErr'));
+
+       $suite->addTest(new ParsingBugsTests('testMinusOneString'));
+       $suite->addTest(new ParsingBugsTests('testUnicodeInMemberName'));
+       $suite->addTest(new ParsingBugsTests('testUnicodeInErrorString'));
+       $suite->addTest(new ParsingBugsTests('testValidNumbers'));
+       $suite->addTest(new ParsingBugsTests('testAddScalarToStruct'));
+       $suite->addTest(new ParsingBugsTests('testAddStructToStruct'));
+       $suite->addTest(new ParsingBugsTests('testAddArrayToArray'));
+       $suite->addTest(new ParsingBugsTests('testEncodeArray'));
+       $suite->addTest(new ParsingBugsTests('testEncodeRecursive'));
+       $suite->addTest(new ParsingBugsTests('testBrokenrequests'));
+       $suite->addTest(new ParsingBugsTests('testBrokenresponses'));
+       $suite->addTest(new ParsingBugsTests('testBuggyHttp'));
+       $suite->addTest(new ParsingBugsTests('testStringBug'));
+       $suite->addTest(new ParsingBugsTests('testWhiteSpace'));
+       $suite->addTest(new ParsingBugsTests('testAutodecodeResponse'));
+       $suite->addTest(new ParsingBugsTests('testNoDecodeResponse'));
+       $suite->addTest(new ParsingBugsTests('testAutoCoDec'));
+       $suite->addTest(new ParsingBugsTests('testUTF8Response'));
+       $suite->addTest(new ParsingBugsTests('testUTF8Request'));
+       $suite->addTest(new ParsingBugsTests('testUTF8IntString'));
+       $suite->addTest(new ParsingBugsTests('testStringInt'));
+       $suite->addTest(new ParsingBugsTests('testStructMemExists'));
+       $suite->addTest(new ParsingBugsTests('testDoubleDataInArrayTag'));
+       $suite->addTest(new ParsingBugsTests('testDoubleStuffInValueTag'));
+       $suite->addTest(new ParsingBugsTests('testNilValue'));
+       $suite->addTest(new ParsingBugsTests('testLocale'));
+
+       $title = 'XML-RPC Unit Tests';
+
+       if(isset($only))
+       {
+               $suite = new PHPUnit_TestSuite($only);
+       }
+
+       if(isset($_SERVER['REQUEST_METHOD']))
+       {
+               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";
+       }
+       else
+       {
+               echo "$title\n\n";
+       }
+
+       if(isset($_SERVER['REQUEST_METHOD']))
+       {
+               echo "<h3>Using lib version: $xmlrpcVersion on PHP version: ".phpversion()."</h3>\n";
+               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";
+               flush();
+       }
+       else
+       {
+               echo "Using lib version: $xmlrpcVersion on PHP version: ".phpversion()."\n";
+               echo 'Running '.$suite->testCount().' tests (some of which are multiple) against servers: http://'.$LOCALSERVER.$URI.' and https://'.$HTTPSSERVER.$HTTPSURI."\n\n";
+       }
+
+       // do some basic timing measurement
+       list($micro, $sec) = explode(' ', microtime());
+       $start_time = $sec + $micro;
+
+       $PHPUnit = new PHPUnit;
+       $result = $PHPUnit->run($suite, ($DEBUG == 0 ? '.' : '<hr/>'));
+
+       list($micro, $sec) = explode(' ', microtime());
+       $end_time = $sec + $micro;
+
+       if(!isset($_SERVER['REQUEST_METHOD']))
+       {
+               echo $result->toString()."\n";
+       }
+
+       if(isset($_SERVER['REQUEST_METHOD']))
+       {
+               echo '<h3>'.$result->failureCount()." test failures</h3>\n";
+               printf("Time spent: %.2f secs<br/>\n", $end_time - $start_time);
+       }
+       else
+       {
+               echo $result->failureCount()." test failures\n";
+               printf("Time spent: %.2f secs\n", $end_time - $start_time);
+       }
+
+       if($result->failureCount() && !$DEBUG)
+       {
+               $target = strpos($_SERVER['PHP_SELF'], '?') ? $_SERVER['PHP_SELF'].'&amp;DEBUG=1' : $_SERVER['PHP_SELF'].'?DEBUG=1';
+               $t2 = strpos($_SERVER['PHP_SELF'], '?') ? $_SERVER['PHP_SELF'].'&amp;DEBUG=2' : $_SERVER['PHP_SELF'].'?DEBUG=2';
+               if(isset($_SERVER['REQUEST_METHOD']))
+               {
+                       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";
+               }
+               else
+               {
+                       echo "Run testsuite with DEBUG=1 (or 2) to have more detail about tests results\n";
+               }
+       }
+
+       if(isset($_SERVER['REQUEST_METHOD']))
+       {
+?>
+<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>
+<div id="opts" style="display: none;">
+<form method="GET" style="border: 1px solid silver; margin: 5px; padding: 5px; font-family: monospace;">
+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/>
+HTTPS Server: <input name="HTTPSSERVER" size="30" value="<?php echo htmlspecialchars($HTTPSSERVER); ?>"/> Path: <input name="HTTPSURI"  size="30" value="<?php echo htmlspecialchars($HTTPSURI); ?>"/><br/>
+Proxy Server: <input name="PROXY" size="30" value="<?php echo isset($PROXY) ? htmlspecialchars($PROXY) : ''; ?>"/> <input type="submit" value="Run Testsuite"/>
+</form>
+</div>
+<?php
+               echo $result->toHTML()."\n</body>\n</html>\n";
+       }
+?>
diff --git a/test/verify_compat.php b/test/verify_compat.php
new file mode 100644 (file)
index 0000000..47c320e
--- /dev/null
@@ -0,0 +1,202 @@
+<?php
+/**
+ * Verify compatibility level of current php install with php-xmlrpc lib
+ *
+ * @version $Id$
+ * @author Gaetano Giunta
+ * @copyright (C) 2006-2008 G. Giunta
+ * @license code licensed under the BSD License: http://phpxmlrpc.sourceforge.net/license.txt
+ */
+
+// be backward compat up to version 4.0.5...
+if (!function_exists('version_compare'))
+{
+               // give an opportunity to user to specify where to include other files from
+  if(!defined('PHP_XMLRPC_COMPAT_DIR'))
+  {
+    define('PHP_XMLRPC_COMPAT_DIR',dirname(__FILE__).'/compat/');
+  }
+  include(PHP_XMLRPC_COMPAT_DIR.'version_compare.php');
+}
+
+function phpxmlrpc_verify_compat($mode='client')
+{
+  $tests = array();
+
+  if ($mode == 'server')
+  {
+    // test for php version
+    $ver = phpversion();
+    $tests['php_version'] = array();
+    $tests['php_version']['description'] = 'PHP version found: '.$ver.".\n\n";
+    if (version_compare($ver, '4') < 0)
+    {
+      $tests['php_version']['status'] = 0;
+      $tests['php_version']['description'] .= 'This version of PHP is not compatible with the PHP XMLRPC library. Please upgrade to 4.2 or later';
+    }
+    else if (version_compare($ver, '4.2') < 0)
+    {
+      $tests['php_version']['status'] = 1;
+      $tests['php_version']['description'] .= "This version of PHP is partially compatible with the PHP XMLRPC library.\nIn order to use the library, you will need to make sure the files from the compat directory are available on your server";
+    }
+    else if (version_compare($ver, '5.0.3') < 0)
+    {
+      $tests['php_version']['status'] = 1;
+      $tests['php_version']['description'] .= "This version of PHP is almost completely compatible with the PHP XMLRPC library.\nThe only unavailable function is automatic mapping of php functions to xmlrpc methods";
+    }
+    else
+    {
+      $tests['php_version']['status'] = 2;
+      $tests['php_version']['description'] .= 'This version of PHP is fully compatible with the PHP XMLRPC library';
+    }
+
+    // test for zlib
+    $tests['zlib'] = array();
+    if (!function_exists('gzinflate'))
+    {
+      $tests['zlib']['status'] = 0;
+      $tests['zlib']['description'] = "The zlib extension is not enabled.\n\nYou will not be able to receive compressed requests or send compressed responses, unless using the cURL library (for 'HTTPS' and 'HTTP 1.1' connections)";
+    }
+    else
+    {
+      $tests['zlib']['status'] = 2;
+      $tests['zlib']['description'] = "The zlib extension is enabled.\n\nYou will be able to receive compressed requests and send compressed responses for the 'HTTP' protocol";
+    }
+
+    // test for diaply of php errors in xml reponse
+    if (ini_get('display_errors'))
+    {
+      if (intval(ini_get('error_reporting')) && E_NOTICE )
+      {
+        $tests['display_errors']['status'] = 1;
+        $tests['display_errors']['description'] = "Error reporting level includes E_NOTICE errors, and display_errors is set to ON.\n\nAny error, warning or notice raised while executing php code exposed as xmlrpc method will result in an invalid xmlrpc response";
+      }
+      else
+      {
+        $tests['display_errors']['status'] = 1;
+        $tests['display_errors']['description'] = "display_errors is set to ON.\n\nAny error raised while executing php code exposed as xmlrpc method will result in an invalid xmlrpc response";
+      }
+    }
+
+  }
+  else
+  {
+
+    // test for php version
+    $ver = phpversion();
+    $tests['php_version'] = array();
+    $tests['php_version']['description'] = 'PHP version found: '.$ver.".\n\n";
+    if (version_compare($ver, '4') < 0)
+    {
+      $tests['php_version']['status'] = 0;
+      $tests['php_version']['description'] .= 'This version of PHP is not compatible with the PHP XMLRPC library. Please upgrade to 4.2 or later';
+    }
+    else if (version_compare($ver, '4.2') < 0)
+    {
+      $tests['php_version']['status'] = 1;
+      $tests['php_version']['description'] .= "This version of PHP is partially compatible with the PHP XMLRPC library.\nIn order to use the library, you will need to make sure the files from the compat directory are available on your server";
+    }
+    else
+    {
+      $tests['php_version']['status'] = 2;
+      $tests['php_version']['description'] .= 'This version of PHP is fully compatible with the PHP XMLRPC library';
+    }
+
+    // test for zlib
+    $tests['zlib'] = array();
+    if (!function_exists('gzinflate'))
+    {
+      $tests['zlib']['status'] = 0;
+      $tests['zlib']['description'] = "The zlib extension is not enabled.\n\nYou will not be able to send compressed requests or receive compressed responses, unless using the cURL library (for 'HTTPS' and 'HTTP 1.1' connections)";
+    }
+    else
+    {
+      $tests['zlib']['status'] = 2;
+      $tests['zlib']['description'] = "The zlib extension is enabled.\n\nYou will be able to send compressed requests and receive compressed responses for the 'HTTP' protocol";
+    }
+
+    // test for CURL
+    $tests['curl'] = array();
+    if (!extension_loaded('curl'))
+    {
+      $tests['curl']['status'] = 0;
+      $tests['curl']['description'] = "The cURL extension is not enabled.\n\nYou will not be able to send and receive messages using 'HTTPS' and 'HTTP 1.1' protocols";
+    }
+    else
+    {
+      $info = curl_version();
+      $tests['curl']['status'] = 2;
+      $tests['curl']['description'] = "The cURL extension is enabled.\n\nYou will be able to send and receive messages using 'HTTPS' and 'HTTP 1.1' protocols";
+      if (version_compare($ver, '4.3.8') < 0)
+      {
+        $tests['curl']['status'] = 1;
+        $tests['curl']['description'] .= ".\nPlease note that the current cURL install does not support keep-alives";
+      }
+      if (!((is_string($info) && strpos($info, 'zlib') !== null) || isset($info['libz_version'])))
+      {
+        $tests['curl']['status'] = 1;
+        $tests['curl']['description'] .= ".\nPlease note that the current cURL install does not support compressed messages";
+      }
+      if (!((is_string($info) && strpos($info, 'OpenSSL') !== null) || isset($info['ssl_version'])))
+      {
+        $tests['curl']['status'] = 1;
+        $tests['curl']['description'] .= ".\nPlease note that the current cURL install does not support HTTPS connections";
+      }
+    }
+
+  }
+  return $tests;
+}
+
+?>
+<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
+<html xmlns="http://www.w3.org/1999/xhtml" lang="en" xml:lang="en">
+<head>
+<title>PHP XMLRPC compatibility assessment</title>
+<style type="text/css">
+body, html {background-color: white; font-family: Arial, Verdana, Geneva, sans-serif; font-size: small; }
+table { border: 1px solid gray; padding: 0;}
+thead { background-color: silver; color: black; }
+td { margin: 0; padding: 0.5em; }
+tbody td { border-top: 1px solid gray; }
+.res0 { background-color: red; color: black; border-right: 1px solid gray; }
+.res1 { background-color: yellow; color: black; border-right: 1px solid gray; }
+.res2 { background-color: green; color: black; border-right: 1px solid gray; }
+.result { white-space: pre; }
+</style>
+</head>
+<body>
+<h1>PHPXMLRPC compatibility assessment with the current PHP install</h1>
+<h4>For phpxmlrpc version 2.0 or later</h4>
+<h3>Server usage</h3>
+<table cellspacing="0">
+<thead>
+<tr><td>Test</td><td>Result</td></tr>
+</thead>
+<tbody>
+<?php
+  $res = phpxmlrpc_verify_compat('server');
+  foreach($res as $test => $result)
+  {
+      echo '<tr><td class="res'.$result['status'].'">'.htmlspecialchars($test).'</td><td class="result">'.htmlspecialchars($result['description'])."</td></tr>\n";
+  }
+?>
+</tbody>
+</table>
+<h3>Client usage</h3>
+<table cellspacing="0">
+<thead>
+<tr><td>Test</td><td>Result</td></tr>
+</thead>
+<tbody>
+<?php
+  $res = phpxmlrpc_verify_compat('client');
+  foreach($res as $test => $result)
+  {
+      echo '<tr><td class="res'.$result['status'].'">'.htmlspecialchars($test).'</td><td class="result">'.htmlspecialchars($result['description'])."</td></tr>\n";
+  }
+?>
+</tbody>
+</table>
+</body>
+</html>
\ No newline at end of file