/usr/share/pear/test/XML_RPC/tests/encode.php


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
<?php

/**
 * Tests encoding values.
 *
 * PHP versions 4 and 5
 *
 * @category   Web Services
 * @package    XML_RPC
 * @author     Daniel Convissor <danielc@php.net>
 * @copyright  2005-2010 The PHP Group
 * @license    http://www.php.net/license/3_01.txt  PHP License
 * @version    SVN: $Id: extra-lines.php 293218 2010-01-07 14:20:08Z danielc $
 * @link       http://pear.php.net/package/XML_RPC
 * @since      File available since Release 1.5.3
 */

/*
 * If the package version number is found in the left hand
 * portion of the if() expression below, that means this file has
 * come from the PEAR installer.  Therefore, let's test the
 * installed version of XML_RPC which should be in the include path.
 *
 * If the version has not been substituted in the if() expression,
 * this file has likely come from a SVN checkout or a .tar file.
 * Therefore, we'll assume the tests should use the version of
 * XML_RPC that has come from there as well.
 */
if ('1.5.4' == '@'.'package_version'.'@') {
    
ini_set('include_path''../'
            
PATH_SEPARATOR '.' PATH_SEPARATOR
            
ini_get('include_path')
    );
}
require_once 
'XML/RPC.php';


$input = array(101112);

$expect = <<<EOT
<?xml version="1.0" encoding="UTF-8"?>
<methodCall>
<methodName>nada</methodName>
<params>
<param>
<value><array>
<data>
<value><int>10</int></value>
<value><int>11</int></value>
<value><int>12</int></value>
</data>
</array></value>
</param>
</params>
</methodCall>
EOT;

$expect trim(preg_replace("/\r\n/""\n"$expect));

$msg = new XML_RPC_Message('nada', array(XML_RPC_encode($input)));
$msg->createPayload();
$actual trim(preg_replace("/\r\n/""\n"$msg->payload));
if (
$actual == $expect) {
    echo 
"passed\n";
} else {
    echo 
"PROBLEM\n";
    echo 
$actual;
}

$msg = new XML_RPC_Message('nada',
    array(
        new 
XML_RPC_Value(
            array(
                new 
XML_RPC_Value(10'int'),
                new 
XML_RPC_Value(11'int'),
                new 
XML_RPC_Value(12'int'),
            ),
            
'array'
        
)
    )
);
$msg->createPayload();
$actual trim(preg_replace("/\r\n/""\n"$msg->payload));
if (
$actual == $expect) {
    echo 
"passed\n";
} else {
    echo 
"PROBLEM\n";
    echo 
$actual;
}