|
1
|
<?php
|
|
2
|
/*
|
|
3
|
$Id$
|
|
4
|
|
|
5
|
xmlrpc.inc
|
|
6
|
Copyright (C) 2005-2006 Colin Smith
|
|
7
|
All rights reserved.
|
|
8
|
|
|
9
|
Redistribution and use in source and binary forms, with or without
|
|
10
|
modification, are permitted provided that the following conditions are met:
|
|
11
|
|
|
12
|
1. Redistributions of source code must retain the above copyright notice,
|
|
13
|
this list of conditions and the following disclaimer.
|
|
14
|
|
|
15
|
2. Redistributions in binary form must reproduce the above copyright
|
|
16
|
notice, this list of conditions and the following disclaimer in the
|
|
17
|
documentation and/or other materials provided with the distribution.
|
|
18
|
|
|
19
|
THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
|
|
20
|
INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
|
|
21
|
AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
|
|
22
|
AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY,
|
|
23
|
OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
|
|
24
|
SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
|
|
25
|
INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
|
|
26
|
CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
|
|
27
|
ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
|
28
|
POSSIBILITY OF SUCH DAMAGE.
|
|
29
|
*/
|
|
30
|
|
|
31
|
require_once("xmlrpc_client.inc");
|
|
32
|
|
|
33
|
/*
|
|
34
|
* xmlrpc_params_to_php: Convert params array passed from XMLRPC server into a PHP array and return it.
|
|
35
|
*/
|
|
36
|
function xmlrpc_params_to_php($params) {
|
|
37
|
$array = array();
|
|
38
|
for($i = 0; $i < $params->getNumParams(); $i++) {
|
|
39
|
$value = $params->getParam($i);
|
|
40
|
$array[] = XML_RPC_decode($value);
|
|
41
|
}
|
|
42
|
return $array;
|
|
43
|
}
|
|
44
|
|
|
45
|
/*
|
|
46
|
* xmlrpc_value_to_php: Convert an XMLRPC value into a PHP scalar/array and return it.
|
|
47
|
*/
|
|
48
|
function xmlrpc_value_to_php($raw_value) {
|
|
49
|
/*
|
|
50
|
switch($raw_value->kindOf()) {
|
|
51
|
case "scalar":
|
|
52
|
if($raw_value->scalartyp() == "boolean") $return = (boolean) $raw_value->scalarval();
|
|
53
|
$return = $raw_value->scalarval();
|
|
54
|
break;
|
|
55
|
case "array":
|
|
56
|
$return = array();
|
|
57
|
for($i = 0; $i < $raw_value->arraysize(); $i++) {
|
|
58
|
$value = $raw_value->arraymem($i);
|
|
59
|
$return[] = xmlrpc_value_to_php($value);
|
|
60
|
}
|
|
61
|
break;
|
|
62
|
case "struct":
|
|
63
|
$return = array();
|
|
64
|
for($i = 0; $i < $raw_value->arraysize(); $i++) {
|
|
65
|
list($key, $value) = $raw_value->structeach();
|
|
66
|
$return[$key] = xmlrpc_value_to_php($value);
|
|
67
|
}
|
|
68
|
break;
|
|
69
|
}
|
|
70
|
*/
|
|
71
|
return XML_RPC_decode($raw_value);
|
|
72
|
}
|
|
73
|
|
|
74
|
/*
|
|
75
|
* php_value_to_xmlrpc: Convert a PHP scalar or array into its XMLRPC equivalent.
|
|
76
|
*/
|
|
77
|
function php_value_to_xmlrpc($value, $force_array = false) {
|
|
78
|
$toreturn = XML_RPC_encode($value);
|
|
79
|
return $force_array ? array($toreturn) : $toreturn;
|
|
80
|
/*
|
|
81
|
if(gettype($value) == "array") {
|
|
82
|
$xmlrpc_type = "array";
|
|
83
|
$toreturn = array();
|
|
84
|
foreach($value as $key => $val) {
|
|
85
|
if(is_string($key)) $xmlrpc_type = "struct";
|
|
86
|
$toreturn[$key] = php_value_to_xmlrpc($val);
|
|
87
|
}
|
|
88
|
return new XML_RPC_Value($toreturn, $xmlrpc_type);
|
|
89
|
} else {
|
|
90
|
if($force_array == true) {
|
|
91
|
return new XML_RPC_Value(array(new XML_RPC_Value($value, gettype($value))), "array");
|
|
92
|
} else {
|
|
93
|
return new XML_RPC_Value($value, gettype($value));
|
|
94
|
}
|
|
95
|
}
|
|
96
|
*/
|
|
97
|
}
|
|
98
|
|
|
99
|
/*
|
|
100
|
* xmlrpc_auth: Handle basic crypt() authentication of an XMLRPC request. This function assumes that
|
|
101
|
* $params[0] contains the local system's plaintext password and removes the password from
|
|
102
|
* the array before returning it.
|
|
103
|
*/
|
|
104
|
function xmlrpc_auth(&$params) {
|
|
105
|
global $config;
|
|
106
|
$localpass = $config['system']['password'];
|
|
107
|
if(crypt($params[0], $localpass) == $localpass) {
|
|
108
|
array_shift($params);
|
|
109
|
return true;
|
|
110
|
} else if(crypt($params['xmlrpcauth'], $localpass) != $localpass) {
|
|
111
|
unset($params['xmlrpcauth']);
|
|
112
|
return false;
|
|
113
|
}
|
|
114
|
unset($params['xmlrpcauth']);
|
|
115
|
return false;
|
|
116
|
}
|
|
117
|
|
|
118
|
?>
|