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
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
|
<?php
/**
* Elgg XML library.
* Contains functions for generating and parsing XML.
*
* @package Elgg
* @subpackage Core
* @license http://www.gnu.org/licenses/old-licenses/gpl-2.0.html GNU Public License version 2
* @author Marcus Povey
* @copyright Curverider Ltd 2008
* @link http://elgg.org/
*/
/**
* This function serialises an object recursively into an XML representation.
* The function attempts to call $data->export() which expects a stdClass in return, otherwise it will attempt to
* get the object variables using get_object_vars (which will only return public variables!)
* @param $data object The object to serialise.
* @param $n int Level, only used for recursion.
* @return string The serialised XML output.
*/
function serialise_object_to_xml($data, $name = "", $n = 0)
{
$classname = ($name=="" ? get_class($data) : $name);
$vars = method_exists($data, "export") ? get_object_vars($data->export()) : get_object_vars($data);
$output = "";
if (($n==0) || ( is_object($data) && !($data instanceof stdClass))) $output = "<$classname>";
foreach ($vars as $key => $value)
{
$output .= "<$key type=\"".gettype($value)."\">";
if (is_object($value))
$output .= serialise_object_to_xml($value, $key, $n+1);
else if (is_array($value))
$output .= serialise_array_to_xml($value, $n+1);
else
$output .= htmlentities($value);
$output .= "</$key>\n";
}
if (($n==0) || ( is_object($data) && !($data instanceof stdClass))) $output .= "</$classname>\n";
return $output;
}
/**
* Serialise an array.
*
* @param array $data
* @param int $n Used for recursion
* @return string
*/
function serialise_array_to_xml(array $data, $n = 0)
{
$output = "";
if ($n==0) $output = "<array>\n";
foreach ($data as $key => $value)
{
$item = "array_item";
if (is_numeric($key))
$output .= "<$item name=\"$key\" type=\"".gettype($value)."\">";
else
{
$item = $key;
$output .= "<$item type=\"".gettype($value)."\">";
}
if (is_object($value))
$output .= serialise_object_to_xml($value, "", $n+1);
else if (is_array($value))
$output .= serialise_array_to_xml($value, $n+1);
else
$output .= htmlentities($value);
$output .= "</$item>\n";
}
if ($n==0) $output = "</array>\n";
return $output;
}
/**
* XML 2 Array function.
* Taken from http://www.bytemycode.com/snippets/snippet/445/
* @license UNKNOWN - Please contact if you are the original author of this code.
* @author UNKNOWN
*/
function xml2array($xml)
{
$xmlary = array();
$reels = '/<(\w+)\s*([^\/>]*)\s*(?:\/>|>(.*)<\/\s*\\1\s*>)/s';
$reattrs = '/(\w+)=(?:"|\')([^"\']*)(:?"|\')/';
preg_match_all($reels, $xml, $elements);
foreach ($elements[1] as $ie => $xx) {
$xmlary[$ie]["name"] = $elements[1][$ie];
if ($attributes = trim($elements[2][$ie])) {
preg_match_all($reattrs, $attributes, $att);
foreach ($att[1] as $ia => $xx)
$xmlary[$ie]["attributes"][$att[1][$ia]] = $att[2][$ia];
}
$cdend = strpos($elements[3][$ie], "<");
if ($cdend > 0) {
$xmlary[$ie]["text"] = substr($elements[3][$ie], 0, $cdend - 1);
}
if (preg_match($reels, $elements[3][$ie]))
$xmlary[$ie]["elements"] = __xml2array($elements[3][$ie]);
else if ($elements[3][$ie]) {
$xmlary[$ie]["text"] = $elements[3][$ie];
}
}
return $xmlary;
}
?>
|
