Implement interface ArrayAccess in the Value class
[plcapi.git] / demo / server / server.php
index b6fa526..d060d97 100644 (file)
@@ -28,45 +28,68 @@ if (isset($_COOKIE['PHPUNIT_SELENIUM_TEST_ID']) && extension_loaded('xdebug')) {
     include_once __DIR__ . "/../../vendor/phpunit/phpunit-selenium/PHPUnit/Extensions/SeleniumCommon/prepend.php";
 }
 
-include_once __DIR__ . "/../../lib/xmlrpc.inc";
-include_once __DIR__ . "/../../lib/xmlrpcs.inc";
-include_once __DIR__ . "/../../lib/xmlrpc_wrappers.inc";
+use PhpXmlRpc\Value;
 
 /**
  * Used to test usage of object methods in dispatch maps and in wrapper code.
  */
-class xmlrpc_server_methods_container
+class xmlrpcServerMethodsContainer
 {
     /**
      * Method used to test logging of php warnings generated by user functions.
+     * @param PhpXmlRpc\Request $req
+     * @return PhpXmlRpc\Response
      */
-    public function phpwarninggenerator($m)
+    public function phpWarningGenerator($req)
     {
-        $a = $b; // this triggers a warning in E_ALL mode, since $b is undefined
-        return new xmlrpcresp(new xmlrpcval(1, 'boolean'));
+        $a = $undefinedVariable; // this triggers a warning in E_ALL mode, since $undefinedVariable is undefined
+        return new PhpXmlRpc\Response(new Value(1, 'boolean'));
     }
 
     /**
      * Method used to test catching of exceptions in the server.
+     * @param PhpXmlRpc\Request $req
+     * @throws Exception
      */
-    public function exceptiongenerator($m)
+    public function exceptionGenerator($req)
     {
         throw new Exception("it's just a test", 1);
     }
 
-    /*
-    * a PHP version of the state-number server. Send me an integer and i'll sell you a state
-    * @param integer $s
-    * @return string
-    */
-    public static function findstate($s)
+    /**
+     * @param string $msg
+     */
+    public function debugMessageGenerator($msg)
+    {
+        PhpXmlRpc\Server::xmlrpc_debugmsg($msg);
+    }
+
+    /**
+     * A PHP version of the state-number server. Send me an integer and i'll sell you a state.
+     * Used to test wrapping of PHP methods into xmlrpc methods.
+     *
+     * @param integer $num
+     * @return string
+     * @throws Exception
+     */
+    public static function findState($num)
     {
-        return inner_findstate($s);
+        return inner_findstate($num);
+    }
+
+    /**
+     * Returns an instance of stdClass.
+     * Used to test wrapping of PHP objects with class preservation
+     */
+    public function returnObject()
+    {
+        $obj = new stdClass();
+        $obj->hello = 'world';
+        return $obj;
     }
 }
 
-// a PHP version
-// of the state-number server
+// a PHP version of the state-number server
 // send me an integer and i'll sell you a state
 
 $stateNames = array(
@@ -81,137 +104,174 @@ $stateNames = array(
     "Virginia", "Washington", "West Virginia", "Wisconsin", "Wyoming",
 );
 
-$findstate_sig = array(array($xmlrpcString, $xmlrpcInt));
+$findstate_sig = array(array(Value::$xmlrpcString, Value::$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)
+function findState($req)
 {
-    global $xmlrpcerruser, $stateNames;
+    global $stateNames;
+
     $err = "";
     // get the first param
-    $sno = $m->getParam(0);
+    $sno = $req->getParam(0);
 
-    // param must be there and of the correct type: server object does the
-    // validation for us
+    // 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];
+        $stateName = $stateNames[$snv - 1];
     } else {
-        // not, there so complain
+        // 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);
+        return new PhpXmlRpc\Response(0, PhpXmlRpc\PhpXmlRpc::$xmlrpcerruser, $err);
     } else {
-        // otherwise, we create the right response
-        // with the state name
-        return new xmlrpcresp(new xmlrpcval($sname));
+        // otherwise, we create the right response with the state name
+        return new PhpXmlRpc\Response(new Value($stateName));
     }
 }
 
 /**
  * Inner code of the state-number server.
- * Used to test auto-registration of PHP funcions as xmlrpc methods.
+ * Used to test wrapping of PHP functions into xmlrpc methods.
  *
- * @param integer $stateno the state number
+ * @param integer $stateNo the state number
  *
- * @return string the name of the state (or error descrption)
+ * @return string the name of the state (or error description)
+ *
+ * @throws Exception if state is not found
  */
-function inner_findstate($stateno)
+function inner_findstate($stateNo)
 {
     global $stateNames;
-    if (isset($stateNames[$stateno - 1])) {
-        return $stateNames[$stateno - 1];
+
+    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 . "'";
+        throw new Exception("I don't have a state for the index '" . $stateNo . "'", PhpXmlRpc\PhpXmlRpc::$xmlrpcerruser);
     }
 }
 
-$findstate2_sig = wrap_php_function('inner_findstate');
+$wrapper = new PhpXmlRpc\Wrapper();
+
+$findstate2_sig = $wrapper->wrapPhpFunction('inner_findstate');
+
+$findstate3_sig = $wrapper->wrapPhpFunction(array('xmlrpcServerMethodsContainer', 'findState'));
+
+$obj = new xmlrpcServerMethodsContainer();
+$findstate4_sig = $wrapper->wrapPhpFunction(array($obj, 'findstate'));
+
+$findstate5_sig = $wrapper->wrapPhpFunction('xmlrpcServerMethodsContainer::findState', '', array('return_source' => true));
+eval($findstate5_sig['source']);
+
+$findstate6_sig = $wrapper->wrapPhpFunction('inner_findstate', '', array('return_source' => true));
+eval($findstate6_sig['source']);
+
+$findstate7_sig = $wrapper->wrapPhpFunction(array('xmlrpcServerMethodsContainer', 'findState'), '', array('return_source' => true));
+eval($findstate7_sig['source']);
+
+$obj = new xmlrpcServerMethodsContainer();
+$findstate8_sig = $wrapper->wrapPhpFunction(array($obj, 'findstate'), '', array('return_source' => true));
+eval($findstate8_sig['source']);
+
+$findstate9_sig = $wrapper->wrapPhpFunction('xmlrpcServerMethodsContainer::findState', '', array('return_source' => true));
+eval($findstate9_sig['source']);
+
+$findstate10_sig = array(
+    "function" => function ($req) { return findState($req); },
+    "signature" => $findstate_sig,
+    "docstring" => $findstate_doc,
+);
+
+$findstate11_sig = $wrapper->wrapPhpFunction(function ($stateNo) { return inner_findstate($stateNo); });
+
+$c = new xmlrpcServerMethodsContainer;
+$moreSignatures = $wrapper->wrapPhpClass($c, array('prefix' => 'tests.', 'method_type' => 'all'));
 
-$findstate3_sig = wrap_php_function(array('xmlrpc_server_methods_container', 'findstate'));
+$returnObj_sig =  $wrapper->wrapPhpFunction(array($c, 'returnObject'), '', array('encode_php_objs' => true));
 
-$findstate5_sig = wrap_php_function('xmlrpc_server_methods_container::findstate');
+// used to test signatures with NULL params
+$findstate12_sig = array(
+    array(Value::$xmlrpcString, Value::$xmlrpcInt, Value::$xmlrpcNull),
+    array(Value::$xmlrpcString, Value::$xmlrpcNull, Value::$xmlrpcInt),
+);
+
+function findStateWithNulls($req)
+{
+    $a = $req->getParam(0);
+    $b = $req->getParam(1);
 
-$obj = new xmlrpc_server_methods_container();
-$findstate4_sig = wrap_php_function(array($obj, 'findstate'));
+    if ($a->scalartyp() == Value::$xmlrpcNull)
+        return new PhpXmlRpc\Response(new Value(inner_findstate($b->scalarval())));
+    else
+        return new PhpXmlRpc\Response(new Value(inner_findstate($a->scalarval())));
+}
 
-$addtwo_sig = array(array($xmlrpcInt, $xmlrpcInt, $xmlrpcInt));
+$addtwo_sig = array(array(Value::$xmlrpcInt, Value::$xmlrpcInt, Value::$xmlrpcInt));
 $addtwo_doc = 'Add two integers together and return the result';
-function addtwo($m)
+function addTwo($req)
 {
-    $s = $m->getParam(0);
-    $t = $m->getParam(1);
+    $s = $req->getParam(0);
+    $t = $req->getParam(1);
 
-    return new xmlrpcresp(new xmlrpcval($s->scalarval() + $t->scalarval(), "int"));
+    return new PhpXmlRpc\Response(new Value($s->scalarval() + $t->scalarval(), "int"));
 }
 
-$addtwodouble_sig = array(array($xmlrpcDouble, $xmlrpcDouble, $xmlrpcDouble));
+$addtwodouble_sig = array(array(Value::$xmlrpcDouble, Value::$xmlrpcDouble, Value::$xmlrpcDouble));
 $addtwodouble_doc = 'Add two doubles together and return the result';
-function addtwodouble($m)
+function addTwoDouble($req)
 {
-    $s = $m->getParam(0);
-    $t = $m->getParam(1);
+    $s = $req->getParam(0);
+    $t = $req->getParam(1);
 
-    return new xmlrpcresp(new xmlrpcval($s->scalarval() + $t->scalarval(), "double"));
+    return new PhpXmlRpc\Response(new Value($s->scalarval() + $t->scalarval(), "double"));
 }
 
-$stringecho_sig = array(array($xmlrpcString, $xmlrpcString));
+$stringecho_sig = array(array(Value::$xmlrpcString, Value::$xmlrpcString));
 $stringecho_doc = 'Accepts a string parameter, returns the string.';
-function stringecho($m)
+function stringEcho($req)
 {
     // just sends back a string
-    $s = $m->getParam(0);
-    $v = $s->scalarval();
-
-    return new xmlrpcresp(new xmlrpcval($s->scalarval()));
+    return new PhpXmlRpc\Response(new Value($req->getParam(0)->scalarval()));
 }
 
-$echoback_sig = array(array($xmlrpcString, $xmlrpcString));
+$echoback_sig = array(array(Value::$xmlrpcString, Value::$xmlrpcString));
 $echoback_doc = 'Accepts a string parameter, returns the entire incoming payload';
-function echoback($m)
+function echoBack($req)
 {
-    // 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();
+    // just sends back a string with what i got sent to me, just escaped, that's all
+    $s = "I got the following message:\n" . $req->serialize();
 
-    return new xmlrpcresp(new xmlrpcval($s));
+    return new PhpXmlRpc\Response(new Value($s));
 }
 
-$echosixtyfour_sig = array(array($xmlrpcString, $xmlrpcBase64));
+$echosixtyfour_sig = array(array(Value::$xmlrpcString, Value::$xmlrpcBase64));
 $echosixtyfour_doc = 'Accepts a base64 parameter and returns it decoded as a string';
-function echosixtyfour($m)
+function echoSixtyFour($req)
 {
-    // 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);
+    // Accepts an encoded value, but sends it back as a normal string.
+    // This is to test that base64 encoding is working as expected
+    $incoming = $req->getParam(0);
 
-    return new xmlrpcresp(new xmlrpcval($incoming->scalarval(), "string"));
+    return new PhpXmlRpc\Response(new Value($incoming->scalarval(), "string"));
 }
 
-$bitflipper_sig = array(array($xmlrpcArray, $xmlrpcArray));
+$bitflipper_sig = array(array(Value::$xmlrpcArray, Value::$xmlrpcArray));
 $bitflipper_doc = 'Accepts an array of booleans, and returns them inverted';
-function bitflipper($m)
+function bitFlipper($req)
 {
-    global $xmlrpcArray;
-
-    $v = $m->getParam(0);
-    $sz = $v->arraysize();
-    $rv = new xmlrpcval(array(), $xmlrpcArray);
+    $v = $req->getParam(0);
+    $rv = new Value(array(), Value::$xmlrpcArray);
 
-    for ($j = 0; $j < $sz; $j++) {
-        $b = $v->arraymem($j);
+    foreach ($v as $b) {
         if ($b->scalarval()) {
             $rv->addScalar(false, "boolean");
         } else {
@@ -219,7 +279,7 @@ function bitflipper($m)
         }
     }
 
-    return new xmlrpcresp($rv);
+    return new PhpXmlRpc\Response($rv);
 }
 
 // Sorting demo
@@ -237,8 +297,7 @@ 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
+    // don't even ask me _why_ these come padded with hyphens, I couldn't tell you :p
     $a = str_replace("-", "", $a);
     $b = str_replace("-", "", $b);
 
@@ -249,7 +308,7 @@ function agesorter_compare($a, $b)
     return ($agesorter_arr[$a] > $agesorter_arr[$b]) ? -1 : 1;
 }
 
-$agesorter_sig = array(array($xmlrpcArray, $xmlrpcArray));
+$agesorter_sig = array(array(Value::$xmlrpcArray, Value::$xmlrpcArray));
 $agesorter_doc = 'Send this method an array of [string, int] structs, eg:
 <pre>
  Dave   35
@@ -259,69 +318,61 @@ $agesorter_doc = 'Send this method an array of [string, int] structs, eg:
 </pre>
 And the array will be returned with the entries sorted by their numbers.
 ';
-function agesorter($m)
+function ageSorter($req)
 {
-    global $agesorter_arr, $xmlrpcerruser, $s;
+    global $agesorter_arr, $s;
 
-    xmlrpc_debugmsg("Entering 'agesorter'");
+    PhpXmlRpc\Server::xmlrpc_debugmsg("Entering 'agesorter'");
     // get the parameter
-    $sno = $m->getParam(0);
+    $sno = $req->getParam(0);
     // error string for [if|when] things go wrong
     $err = "";
     // create the output value
-    $v = new xmlrpcval();
+    $v = new Value();
     $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();
+    $max = $sno->count();
+    PhpXmlRpc\Server::xmlrpc_debugmsg("Found $max array elements");
+    foreach ($sno as $rec) {
+        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";
+    $agesorter_arr = $agar;
+    // hack, must make global as uksort() won't
+    // allow us to pass any other auxiliary information
+    uksort($agesorter_arr, 'agesorter_compare');
+    $outAr = array();
+    while (list($key, $val) = each($agesorter_arr)) {
+        // recreate each struct element
+        $outAr[] = new Value(array("name" => new Value($key),
+            "age" => new Value($val, "int"),), "struct");
     }
+    // add this array to the output value
+    $v->addArray($outAr);
 
     if ($err) {
-        return new xmlrpcresp(0, $xmlrpcerruser, $err);
+        return new PhpXmlRpc\Response(0, PhpXmlRpc\PhpXmlRpc::$xmlrpcerruser, $err);
     } else {
-        return new xmlrpcresp($v);
+        return new PhpXmlRpc\Response($v);
     }
 }
 
-// signature and instructions, place these in the dispatch
-// map
-$mail_send_sig = array(array(
-    $xmlrpcBoolean, $xmlrpcString, $xmlrpcString,
-    $xmlrpcString, $xmlrpcString, $xmlrpcString,
-    $xmlrpcString, $xmlrpcString,
+// signature and instructions, place these in the dispatch map
+$mailsend_sig = array(array(
+    Value::$xmlrpcBoolean, Value::$xmlrpcString, Value::$xmlrpcString,
+    Value::$xmlrpcString, Value::$xmlrpcString, Value::$xmlrpcString,
+    Value::$xmlrpcString, Value::$xmlrpcString,
 ));
-
-$mail_send_doc = 'mail.send(recipient, subject, text, sender, cc, bcc, mimetype)<br/>
+$mailsend_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
@@ -332,18 +383,17 @@ 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)
+function mailSend($req)
 {
-    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);
+    $mTo = $req->getParam(0);
+    $mSub = $req->getParam(1);
+    $mBody = $req->getParam(2);
+    $mFrom = $req->getParam(3);
+    $mCc = $req->getParam(4);
+    $mBcc = $req->getParam(5);
+    $mMime = $req->getParam(6);
 
     if ($mTo->scalarval() == "") {
         $err = "Error, no 'To' field specified";
@@ -353,44 +403,45 @@ function mail_send($m)
         $err = "Error, no 'From' field specified";
     }
 
-    $msghdr = "From: " . $mFrom->scalarval() . "\n";
-    $msghdr .= "To: " . $mTo->scalarval() . "\n";
+    $msgHdr = "From: " . $mFrom->scalarval() . "\n";
+    $msgHdr .= "To: " . $mTo->scalarval() . "\n";
 
     if ($mCc->scalarval() != "") {
-        $msghdr .= "Cc: " . $mCc->scalarval() . "\n";
+        $msgHdr .= "Cc: " . $mCc->scalarval() . "\n";
     }
     if ($mBcc->scalarval() != "") {
-        $msghdr .= "Bcc: " . $mBcc->scalarval() . "\n";
+        $msgHdr .= "Bcc: " . $mBcc->scalarval() . "\n";
     }
     if ($mMime->scalarval() != "") {
-        $msghdr .= "Content-type: " . $mMime->scalarval() . "\n";
+        $msgHdr .= "Content-type: " . $mMime->scalarval() . "\n";
     }
-    $msghdr .= "X-Mailer: XML-RPC for PHP mailer 1.0";
+    $msgHdr .= "X-Mailer: XML-RPC for PHP mailer 1.0";
 
     if ($err == "") {
         if (!mail("",
             $mSub->scalarval(),
             $mBody->scalarval(),
-            $msghdr)
+            $msgHdr)
         ) {
             $err = "Error, could not send the mail.";
         }
     }
 
     if ($err) {
-        return new xmlrpcresp(0, $xmlrpcerruser, $err);
+        return new PhpXmlRpc\Response(0, PhpXmlRpc\PhpXmlRpc::$xmlrpcerruser, $err);
     } else {
-        return new xmlrpcresp(new xmlrpcval("true", $xmlrpcBoolean));
+        return new PhpXmlRpc\Response(new Value("true", Value::$xmlrpcBoolean));
     }
 }
 
-$getallheaders_sig = array(array($xmlrpcStruct));
+$getallheaders_sig = array(array(Value::$xmlrpcStruct));
 $getallheaders_doc = 'Returns a struct containing all the HTTP headers received with the request. Provides limited functionality with IIS';
-function getallheaders_xmlrpc($m)
+function getAllHeaders_xmlrpc($req)
 {
-    global $xmlrpcerruser;
+    $encoder = new PhpXmlRpc\Encoder();
+
     if (function_exists('getallheaders')) {
-        return new xmlrpcresp(php_xmlrpc_encode(getallheaders()));
+        return new PhpXmlRpc\Response($encoder->encode(getallheaders()));
     } else {
         $headers = array();
         // IIS: poor man's version of getallheaders
@@ -401,123 +452,125 @@ function getallheaders_xmlrpc($m)
             }
         }
 
-        return new xmlrpcresp(php_xmlrpc_encode($headers));
+        return new PhpXmlRpc\Response($encoder->encode($headers));
     }
 }
 
-$setcookies_sig = array(array($xmlrpcInt, $xmlrpcStruct));
+$setcookies_sig = array(array(Value::$xmlrpcInt, Value::$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)
+function setCookies($req)
 {
-    $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']);
+    $encoder = new PhpXmlRpc\Encoder();
+    $cookies = $req->getParam(0);
+    foreach ($cookies as $name => $value) {
+        $cookieDesc = $encoder->decode($value);
+        setcookie($name, @$cookieDesc['value'], @$cookieDesc['expires'], @$cookieDesc['path'], @$cookieDesc['domain'], @$cookieDesc['secure']);
     }
 
-    return new xmlrpcresp(new xmlrpcval(1, 'int'));
+    return new PhpXmlRpc\Response(new Value(1, 'int'));
 }
 
-$getcookies_sig = array(array($xmlrpcStruct));
+$getcookies_sig = array(array(Value::$xmlrpcStruct));
 $getcookies_doc = 'Sends to client a response containing all http cookies as received in the request (as struct)';
-function getcookies($m)
+function getCookies($req)
 {
-    return new xmlrpcresp(php_xmlrpc_encode($_COOKIE));
+    $encoder = new PhpXmlRpc\Encoder();
+    return new PhpXmlRpc\Response($encoder->encode($_COOKIE));
 }
 
-$v1_arrayOfStructs_sig = array(array($xmlrpcInt, $xmlrpcArray));
+$v1_arrayOfStructs_sig = array(array(Value::$xmlrpcInt, Value::$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()) {
+function v1_arrayOfStructs($req)
+{
+    $sno = $req->getParam(0);
+    $numCurly = 0;
+    foreach ($sno as $str) {
+        foreach ($str as $key => $val) {
             if ($key == "curly") {
-                $numcurly += $val->scalarval();
+                $numCurly += $val->scalarval();
             }
         }
     }
 
-    return new xmlrpcresp(new xmlrpcval($numcurly, "int"));
+    return new PhpXmlRpc\Response(new Value($numCurly, "int"));
 }
 
-$v1_easyStruct_sig = array(array($xmlrpcInt, $xmlrpcStruct));
+$v1_easyStruct_sig = array(array(Value::$xmlrpcInt, Value::$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)
+function v1_easyStruct($req)
 {
-    $sno = $m->getParam(0);
+    $sno = $req->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"));
+    return new PhpXmlRpc\Response(new Value($num, "int"));
 }
 
-$v1_echoStruct_sig = array(array($xmlrpcStruct, $xmlrpcStruct));
+$v1_echoStruct_sig = array(array(Value::$xmlrpcStruct, Value::$xmlrpcStruct));
 $v1_echoStruct_doc = 'This handler takes a single parameter, a struct. Your handler must return the struct.';
-function v1_echoStruct($m)
+function v1_echoStruct($req)
 {
-    $sno = $m->getParam(0);
+    $sno = $req->getParam(0);
 
-    return new xmlrpcresp($sno);
+    return new PhpXmlRpc\Response($sno);
 }
 
 $v1_manyTypes_sig = array(array(
-    $xmlrpcArray, $xmlrpcInt, $xmlrpcBoolean,
-    $xmlrpcString, $xmlrpcDouble, $xmlrpcDateTime,
-    $xmlrpcBase64,
+    Value::$xmlrpcArray, Value::$xmlrpcInt, Value::$xmlrpcBoolean,
+    Value::$xmlrpcString, Value::$xmlrpcDouble, Value::$xmlrpcDateTime,
+    Value::$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),),
+function v1_manyTypes($req)
+{
+    return new PhpXmlRpc\Response(new Value(array(
+        $req->getParam(0),
+        $req->getParam(1),
+        $req->getParam(2),
+        $req->getParam(3),
+        $req->getParam(4),
+        $req->getParam(5),),
         "array"
     ));
 }
 
-$v1_moderateSizeArrayCheck_sig = array(array($xmlrpcString, $xmlrpcArray));
+$v1_moderateSizeArrayCheck_sig = array(array(Value::$xmlrpcString, Value::$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)
+function v1_moderateSizeArrayCheck($req)
 {
-    $ar = $m->getParam(0);
-    $sz = $ar->arraysize();
-    $first = $ar->arraymem(0);
-    $last = $ar->arraymem($sz - 1);
+    $ar = $req->getParam(0);
+    $sz = $ar->count();
+    //$first = $ar->arraymem(0);
+    $first = $ar[0];
+    //$last = $ar->arraymem($sz - 1);
+    $last = $ar[$sz - 1];
 
-    return new xmlrpcresp(new xmlrpcval($first->scalarval() .
+    return new PhpXmlRpc\Response(new Value($first->scalarval() .
         $last->scalarval(), "string"));
 }
 
-$v1_simpleStructReturn_sig = array(array($xmlrpcStruct, $xmlrpcInt));
+$v1_simpleStructReturn_sig = array(array(Value::$xmlrpcStruct, Value::$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)
+function v1_simpleStructReturn($req)
 {
-    $sno = $m->getParam(0);
+    $sno = $req->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"),),
+    return new PhpXmlRpc\Response(new Value(array(
+        "times10" => new Value($v * 10, "int"),
+        "times100" => new Value($v * 100, "int"),
+        "times1000" => new Value($v * 1000, "int"),),
         "struct"
     ));
 }
 
-$v1_nestedStruct_sig = array(array($xmlrpcInt, $xmlrpcStruct));
+$v1_nestedStruct_sig = array(array(Value::$xmlrpcInt, Value::$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)
+function v1_nestedStruct($req)
 {
-    $sno = $m->getParam(0);
+    $sno = $req->getParam(0);
 
     $twoK = $sno->structmem("2000");
     $april = $twoK->structmem("04");
@@ -526,14 +579,14 @@ function v1_nestedStruct($m)
     $larry = $fools->structmem("larry");
     $moe = $fools->structmem("moe");
 
-    return new xmlrpcresp(new xmlrpcval($curly->scalarval() + $larry->scalarval() + $moe->scalarval(), "int"));
+    return new PhpXmlRpc\Response(new Value($curly->scalarval() + $larry->scalarval() + $moe->scalarval(), "int"));
 }
 
-$v1_countTheEntities_sig = array(array($xmlrpcStruct, $xmlrpcString));
+$v1_countTheEntities_sig = array(array(Value::$xmlrpcStruct, Value::$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)
+function v1_countTheEntities($req)
 {
-    $sno = $m->getParam(0);
+    $sno = $req->getParam(0);
     $str = $sno->scalarval();
     $gt = 0;
     $lt = 0;
@@ -563,12 +616,12 @@ function v1_countTheEntities($m)
         }
     }
 
-    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"),),
+    return new PhpXmlRpc\Response(new Value(array(
+        "ctLeftAngleBrackets" => new Value($lt, "int"),
+        "ctRightAngleBrackets" => new Value($gt, "int"),
+        "ctAmpersands" => new Value($amp, "int"),
+        "ctApostrophes" => new Value($ap, "int"),
+        "ctQuotes" => new Value($qu, "int"),),
         "struct"
     ));
 }
@@ -576,185 +629,199 @@ function v1_countTheEntities($m)
 // trivial interop tests
 // http://www.xmlrpc.com/stories/storyReader$1636
 
-$i_echoString_sig = array(array($xmlrpcString, $xmlrpcString));
+$i_echoString_sig = array(array(Value::$xmlrpcString, Value::$xmlrpcString));
 $i_echoString_doc = "Echoes string.";
 
-$i_echoStringArray_sig = array(array($xmlrpcArray, $xmlrpcArray));
+$i_echoStringArray_sig = array(array(Value::$xmlrpcArray, Value::$xmlrpcArray));
 $i_echoStringArray_doc = "Echoes string array.";
 
-$i_echoInteger_sig = array(array($xmlrpcInt, $xmlrpcInt));
+$i_echoInteger_sig = array(array(Value::$xmlrpcInt, Value::$xmlrpcInt));
 $i_echoInteger_doc = "Echoes integer.";
 
-$i_echoIntegerArray_sig = array(array($xmlrpcArray, $xmlrpcArray));
+$i_echoIntegerArray_sig = array(array(Value::$xmlrpcArray, Value::$xmlrpcArray));
 $i_echoIntegerArray_doc = "Echoes integer array.";
 
-$i_echoFloat_sig = array(array($xmlrpcDouble, $xmlrpcDouble));
+$i_echoFloat_sig = array(array(Value::$xmlrpcDouble, Value::$xmlrpcDouble));
 $i_echoFloat_doc = "Echoes float.";
 
-$i_echoFloatArray_sig = array(array($xmlrpcArray, $xmlrpcArray));
+$i_echoFloatArray_sig = array(array(Value::$xmlrpcArray, Value::$xmlrpcArray));
 $i_echoFloatArray_doc = "Echoes float array.";
 
-$i_echoStruct_sig = array(array($xmlrpcStruct, $xmlrpcStruct));
+$i_echoStruct_sig = array(array(Value::$xmlrpcStruct, Value::$xmlrpcStruct));
 $i_echoStruct_doc = "Echoes struct.";
 
-$i_echoStructArray_sig = array(array($xmlrpcArray, $xmlrpcArray));
+$i_echoStructArray_sig = array(array(Value::$xmlrpcArray, Value::$xmlrpcArray));
 $i_echoStructArray_doc = "Echoes struct array.";
 
 $i_echoValue_doc = "Echoes any value back.";
-$i_echoValue_sig = array(array($xmlrpcValue, $xmlrpcValue));
+$i_echoValue_sig = array(array(Value::$xmlrpcValue, Value::$xmlrpcValue));
 
-$i_echoBase64_sig = array(array($xmlrpcBase64, $xmlrpcBase64));
+$i_echoBase64_sig = array(array(Value::$xmlrpcBase64, Value::$xmlrpcBase64));
 $i_echoBase64_doc = "Echoes base64.";
 
-$i_echoDate_sig = array(array($xmlrpcDateTime, $xmlrpcDateTime));
+$i_echoDate_sig = array(array(Value::$xmlrpcDateTime, Value::$xmlrpcDateTime));
 $i_echoDate_doc = "Echoes dateTime.";
 
-function i_echoParam($m)
+function i_echoParam($req)
 {
-    $s = $m->getParam(0);
+    $s = $req->getParam(0);
 
-    return new xmlrpcresp($s);
+    return new PhpXmlRpc\Response($s);
 }
 
-function i_echoString($m)
+function i_echoString($req)
 {
-    return i_echoParam($m);
+    return i_echoParam($req);
 }
 
-function i_echoInteger($m)
+function i_echoInteger($req)
 {
-    return i_echoParam($m);
+    return i_echoParam($req);
 }
 
-function i_echoFloat($m)
+function i_echoFloat($req)
 {
-    return i_echoParam($m);
+    return i_echoParam($req);
 }
 
-function i_echoStruct($m)
+function i_echoStruct($req)
 {
-    return i_echoParam($m);
+    return i_echoParam($req);
 }
 
-function i_echoStringArray($m)
+function i_echoStringArray($req)
 {
-    return i_echoParam($m);
+    return i_echoParam($req);
 }
 
-function i_echoIntegerArray($m)
+function i_echoIntegerArray($req)
 {
-    return i_echoParam($m);
+    return i_echoParam($req);
 }
 
-function i_echoFloatArray($m)
+function i_echoFloatArray($req)
 {
-    return i_echoParam($m);
+    return i_echoParam($req);
 }
 
-function i_echoStructArray($m)
+function i_echoStructArray($req)
 {
-    return i_echoParam($m);
+    return i_echoParam($req);
 }
 
-function i_echoValue($m)
+function i_echoValue($req)
 {
-    return i_echoParam($m);
+    return i_echoParam($req);
 }
 
-function i_echoBase64($m)
+function i_echoBase64($req)
 {
-    return i_echoParam($m);
+    return i_echoParam($req);
 }
 
-function i_echoDate($m)
+function i_echoDate($req)
 {
-    return i_echoParam($m);
+    return i_echoParam($req);
 }
 
-$i_whichToolkit_sig = array(array($xmlrpcStruct));
+$i_whichToolkit_sig = array(array(Value::$xmlrpcStruct));
 $i_whichToolkit_doc = "Returns a struct containing the following strings: toolkitDocsUrl, toolkitName, toolkitVersion, toolkitOperatingSystem.";
 
-function i_whichToolkit($m)
+function i_whichToolkit($req)
 {
-    global $xmlrpcName, $xmlrpcVersion, $SERVER_SOFTWARE;
+    global $SERVER_SOFTWARE;
     $ret = array(
         "toolkitDocsUrl" => "http://phpxmlrpc.sourceforge.net/",
-        "toolkitName" => $xmlrpcName,
-        "toolkitVersion" => $xmlrpcVersion,
+        "toolkitName" => PhpXmlRpc\PhpXmlRpc::$xmlrpcName,
+        "toolkitVersion" => PhpXmlRpc\PhpXmlRpc::$xmlrpcVersion,
         "toolkitOperatingSystem" => isset($SERVER_SOFTWARE) ? $SERVER_SOFTWARE : $_SERVER['SERVER_SOFTWARE'],
     );
 
-    return new xmlrpcresp(php_xmlrpc_encode($ret));
+    $encoder = new PhpXmlRpc\Encoder();
+    return new PhpXmlRpc\Response($encoder->encode($ret));
 }
 
-$o = new xmlrpc_server_methods_container();
-$a = array(
+$object = new xmlrpcServerMethodsContainer();
+$signatures = array(
     "examples.getStateName" => array(
-        "function" => "findstate",
+        "function" => "findState",
         "signature" => $findstate_sig,
         "docstring" => $findstate_doc,
     ),
     "examples.sortByAge" => array(
-        "function" => "agesorter",
+        "function" => "ageSorter",
         "signature" => $agesorter_sig,
         "docstring" => $agesorter_doc,
     ),
     "examples.addtwo" => array(
-        "function" => "addtwo",
+        "function" => "addTwo",
         "signature" => $addtwo_sig,
         "docstring" => $addtwo_doc,
     ),
     "examples.addtwodouble" => array(
-        "function" => "addtwodouble",
+        "function" => "addTwoDouble",
         "signature" => $addtwodouble_sig,
         "docstring" => $addtwodouble_doc,
     ),
     "examples.stringecho" => array(
-        "function" => "stringecho",
+        "function" => "stringEcho",
         "signature" => $stringecho_sig,
         "docstring" => $stringecho_doc,
     ),
     "examples.echo" => array(
-        "function" => "echoback",
+        "function" => "echoBack",
         "signature" => $echoback_sig,
         "docstring" => $echoback_doc,
     ),
     "examples.decode64" => array(
-        "function" => "echosixtyfour",
+        "function" => "echoSixtyFour",
         "signature" => $echosixtyfour_sig,
         "docstring" => $echosixtyfour_doc,
     ),
     "examples.invertBooleans" => array(
-        "function" => "bitflipper",
+        "function" => "bitFlipper",
         "signature" => $bitflipper_sig,
         "docstring" => $bitflipper_doc,
     ),
-    "examples.generatePHPWarning" => array(
-        "function" => array($o, "phpwarninggenerator"),
-        //'function' => 'xmlrpc_server_methods_container::phpwarninggenerator'
+    // signature omitted on purpose
+    "tests.generatePHPWarning" => array(
+        "function" => array($object, "phpWarningGenerator"),
     ),
-    "examples.raiseException" => array(
-        "function" => array($o, "exceptiongenerator"),
+    // signature omitted on purpose
+    "tests.raiseException" => array(
+        "function" => array($object, "exceptionGenerator"),
     ),
+    // Greek word 'kosme'. NB: NOT a valid ISO8859 string!
+    // NB: we can only register this when setting internal encoding to UTF-8, or it will break system.listMethods
+    "tests.utf8methodname." . 'κόσμε' => array(
+        "function" => "stringEcho",
+        "signature" => $stringecho_sig,
+        "docstring" => $stringecho_doc,
+    ),
+    /*"tests.iso88591methodname." . chr(224) . chr(252) . chr(232) => array(
+        "function" => "stringEcho",
+        "signature" => $stringecho_sig,
+        "docstring" => $stringecho_doc,
+    ),*/
     "examples.getallheaders" => array(
-        "function" => 'getallheaders_xmlrpc',
+        "function" => 'getAllHeaders_xmlrpc',
         "signature" => $getallheaders_sig,
         "docstring" => $getallheaders_doc,
     ),
     "examples.setcookies" => array(
-        "function" => 'setcookies',
+        "function" => 'setCookies',
         "signature" => $setcookies_sig,
         "docstring" => $setcookies_doc,
     ),
     "examples.getcookies" => array(
-        "function" => 'getcookies',
+        "function" => 'getCookies',
         "signature" => $getcookies_sig,
         "docstring" => $getcookies_doc,
     ),
     "mail.send" => array(
-        "function" => "mail_send",
-        "signature" => $mail_send_sig,
-        "docstring" => $mail_send_doc,
+        "function" => "mailSend",
+        "signature" => $mailsend_sig,
+        "docstring" => $mailsend_doc,
     ),
     "validator1.arrayOfStructsTest" => array(
         "function" => "v1_arrayOfStructs",
@@ -856,25 +923,33 @@ $a = array(
         "signature" => $i_whichToolkit_sig,
         "docstring" => $i_whichToolkit_doc,
     ),
-);
 
-if ($findstate2_sig) {
-    $a['examples.php.getStateName'] = $findstate2_sig;
-}
+    'tests.getStateName.2' => $findstate2_sig,
+    'tests.getStateName.3' => $findstate3_sig,
+    'tests.getStateName.4' => $findstate4_sig,
+    'tests.getStateName.5' => $findstate5_sig,
+    'tests.getStateName.6' => $findstate6_sig,
+    'tests.getStateName.7' => $findstate7_sig,
+    'tests.getStateName.8' => $findstate8_sig,
+    'tests.getStateName.9' => $findstate9_sig,
+    'tests.getStateName.10' => $findstate10_sig,
+    'tests.getStateName.11' => $findstate11_sig,
+
+    'tests.getStateName.12' => array(
+        "function" => "findStateWithNulls",
+        "signature" => $findstate12_sig,
+        "docstring" => $findstate_doc,
+    ),
 
-if ($findstate3_sig) {
-    $a['examples.php2.getStateName'] = $findstate3_sig;
-}
+    'tests.returnPhpObject' => $returnObj_sig,
+);
 
-if ($findstate4_sig) {
-    $a['examples.php3.getStateName'] = $findstate4_sig;
-}
+$signatures = array_merge($signatures, $moreSignatures);
 
-if ($findstate5_sig) {
-    $a['examples.php4.getStateName'] = $findstate5_sig;
-}
+// enable support for the NULL extension
+PhpXmlRpc\PhpXmlRpc::$xmlrpc_null_extension = true;
 
-$s = new xmlrpc_server($a, false);
+$s = new PhpXmlRpc\Server($signatures, false);
 $s->setdebug(3);
 $s->compress_response = true;
 
@@ -883,6 +958,9 @@ $s->compress_response = true;
 if (isset($_GET['RESPONSE_ENCODING'])) {
     $s->response_charset_encoding = $_GET['RESPONSE_ENCODING'];
 }
+if (isset($_GET['DETECT_ENCODINGS'])) {
+    PhpXmlRpc\PhpXmlRpc::$xmlrpc_detectencodings = $_GET['DETECT_ENCODINGS'];
+}
 if (isset($_GET['EXCEPTION_HANDLING'])) {
     $s->exception_handling = $_GET['EXCEPTION_HANDLING'];
 }
@@ -893,4 +971,4 @@ $s->service();
 // we do this to help the testsuite script: do not reproduce in production!
 if (isset($_COOKIE['PHPUNIT_SELENIUM_TEST_ID']) && extension_loaded('xdebug')) {
     include_once __DIR__ . "/../../vendor/phpunit/phpunit-selenium/PHPUnit/Extensions/SeleniumCommon/append.php";
-}
\ No newline at end of file
+}