mirror of
https://github.com/ACSPRI/queXS
synced 2024-04-02 12:12:16 +00:00
Updated XMLRPC to 3.0.0 beta
This commit is contained in:
93
include/limesurvey/admin/classes/xmlrpc/demo/vardemo.php
Normal file
93
include/limesurvey/admin/classes/xmlrpc/demo/vardemo.php
Normal file
@@ -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: vardemo.php 2 2009-03-16 20:22:51Z ggiunta $</em>
|
||||
</body>
|
||||
</html>
|
||||
Reference in New Issue
Block a user