More newline fixes
authorgggeek <giunta.gaetano@gmail.com>
Sat, 21 Feb 2015 21:25:08 +0000 (21:25 +0000)
committergggeek <giunta.gaetano@gmail.com>
Sat, 21 Feb 2015 21:25:08 +0000 (21:25 +0000)
demo/client/agesort.php

index 8ae87ff..6e00de0 100644 (file)
@@ -1 +1,64 @@
-<html>\r<head><title>xmlrpc</title></head>\r<body>\r<h1>Agesort demo</h1>\r\r<h2>Send an array of 'name' => 'age' pairs to the server that will send it back sorted.</h2>\r\r<h3>The source code demonstrates basic lib usage, including handling of xmlrpc arrays and structs</h3>\r\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</body>\r</html>\r
\ No newline at end of file
+<html>
+<head><title>xmlrpc</title></head>
+<body>
+<h1>Agesort demo</h1>
+
+<h2>Send an array of 'name' => 'age' pairs to the server that will send it back sorted.</h2>
+
+<h3>The source code demonstrates basic lib usage, including handling of xmlrpc arrays and structs</h3>
+
+<p></p>
+<?php
+include "xmlrpc.inc";
+
+$inAr = array("Dave" => 24, "Edd" => 45, "Joe" => 37, "Fred" => 27);
+reset($inAr);
+print "This is the input data:<br/><pre>";
+while (list($key, $val) = each($inAr)) {
+    print $key . ", " . $val . "\n";
+}
+print "</pre>";
+
+// create parameters from the input array: an xmlrpc array of xmlrpc structs
+$p = array();
+foreach ($inAr as $key => $val) {
+    $p[] = new xmlrpcval(array("name" => new xmlrpcval($key),
+        "age" => new xmlrpcval($val, "int")), "struct");
+}
+$v = new xmlrpcval($p, "array");
+print "Encoded into xmlrpc format it looks like this: <pre>\n" . htmlentities($v->serialize()) . "</pre>\n";
+
+// create client and message objects
+$f = new xmlrpcmsg('examples.sortByAge', array($v));
+$c = new xmlrpc_client("/server.php", "phpxmlrpc.sourceforge.net", 80);
+
+// set maximum debug level, to have the complete communication printed to screen
+$c->setDebug(2);
+
+// send request
+print "Now sending request (detailed debug info follows)";
+$r = &$c->send($f);
+
+// check response for errors, and take appropriate action
+if (!$r->faultCode()) {
+    print "The server gave me these results:<pre>";
+    $v = $r->value();
+    $max = $v->arraysize();
+    for ($i = 0; $i < $max; $i++) {
+        $rec = $v->arraymem($i);
+        $n = $rec->structmem("name");
+        $a = $rec->structmem("age");
+        print htmlspecialchars($n->scalarval()) . ", " . htmlspecialchars($a->scalarval()) . "\n";
+    }
+
+    print "<hr/>For nerds: I got this value back<br/><pre>" .
+        htmlentities($r->serialize()) . "</pre><hr/>\n";
+} else {
+    print "An error occurred:<pre>";
+    print "Code: " . htmlspecialchars($r->faultCode()) .
+        "\nReason: '" . htmlspecialchars($r->faultString()) . '\'</pre><hr/>';
+}
+
+?>
+</body>
+</html>