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
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
|
--TEST--
unpack of template converter: multiple variable: class unpacker (array: object)
--SKIPIF--
<?php
if (version_compare(PHP_VERSION, '5.2.0') < 0) {
echo "skip tests in PHP 5.2 or newer";
}
--FILE--
<?php
if(!extension_loaded('msgpack'))
{
dl('msgpack.' . PHP_SHLIB_SUFFIX);
}
//error_reporting(0);
function test($type, $variable, $object, $result = null)
{
$msgpack = new MessagePack();
$serialized = $msgpack->pack($variable);
$unserialized = $msgpack->unpack($serialized, $object);
var_dump($unserialized);
if ($result)
{
echo $unserialized == $result ? 'OK' : 'ERROR', PHP_EOL;
}
else
{
echo 'SKIP', PHP_EOL;
}
}
class MyObj
{
private $data = null;
private $priv = "privdata";
public $pdata = null;
public $subary = null;
function __construct()
{
$this->data = "datadata";
$this->subary = new SubObj();
}
}
class SubObj
{
private $subdata = null;
private $subpriv = "subprivdata";
public $subpdata = null;
function __construct()
{
$this->subdata = "subdatadata";
}
}
$obj0 = new MyObj();
$obj0->pdata = "pubdata0";
$obj0->subary->subpdata = "subpubdata0";
$obj1 = new MyObj();
$obj1->pdata = "pubdata1";
$obj1->subary->subpdata = "subpubdata1";
$ary = array($obj0, $obj1);
$tpl = array(new MyObj());
test("recursive object list /w instance", $ary, $tpl, $ary);
--EXPECTF--
array(2) {
[0]=>
object(MyObj)#%d (4) {
[%r"?data"?:("MyObj":)?private"?%r]=>
string(8) "datadata"
[%r"?priv"?:("MyObj":)?private"?%r]=>
string(8) "privdata"
["pdata"]=>
string(8) "pubdata0"
["subary"]=>
object(SubObj)#%d (3) {
[%r"?subdata"?:("SubObj":)?private"?%r]=>
string(11) "subdatadata"
[%r"?subpriv"?:("SubObj":)?private"?%r]=>
string(11) "subprivdata"
["subpdata"]=>
string(11) "subpubdata0"
}
}
[1]=>
object(MyObj)#%d (4) {
[%r"?data"?:("MyObj":)?private"?%r]=>
string(8) "datadata"
[%r"?priv"?:("MyObj":)?private"?%r]=>
string(8) "privdata"
["pdata"]=>
string(8) "pubdata1"
["subary"]=>
object(SubObj)#%d (3) {
[%r"?subdata"?:("SubObj":)?private"?%r]=>
string(11) "subdatadata"
[%r"?subpriv"?:("SubObj":)?private"?%r]=>
string(11) "subprivdata"
["subpdata"]=>
string(11) "subpubdata1"
}
}
}
OK
|
