- attempt to fix PHP-5.0 build at pecl4win
[m6w6/ext-http] / lib / XmlRpcClient.php
1 <?php
2
3 /**
4 * XMLRPC Client, very KISS
5 * $Id$
6 *
7 * NOTE: requires ext/xmlrpc
8 *
9 * Usage:
10 * <code>
11 * <?php
12 * $rpc = new XmlRpcClient('http://mike:secret@example.com/cgi-bin/vpop-xmlrpc');
13 * $rpc->__request->setOptions(array('compress' => true));
14 * try {
15 * print_r($rpc->vpop->listdomain(array('domain' => 'example.com')));
16 * } catch (Exception $ex) {
17 * echo $ex;
18 * }
19 * ?>
20 * </code>
21 *
22 * @copyright Michael Wallner, <mike@iworks.at>
23 * @license BSD, revised
24 * @package pecl/http
25 * @version $Revision$
26 */
27 class XmlRpcClient
28 {
29 /**
30 * RPC namespace
31 *
32 * @var string
33 */
34 public $__namespace;
35
36 /**
37 * HttpRequest instance
38 *
39 * @var HttpRequest
40 */
41 public $__request;
42
43 /**
44 * Client charset
45 *
46 * @var string
47 */
48 public $__encoding = "iso-8859-1";
49
50 /**
51 * Constructor
52 *
53 * @param string $url RPC endpoint
54 * @param string $namespace RPC namespace
55 * @param array $options HttpRequest options
56 */
57 public function __construct($url, $namespace = '', array $options = null)
58 {
59 $this->__request = new HttpRequest($url, HttpRequest::METH_POST, $options);
60 $this->__namespace = $namespace;
61 }
62
63 /**
64 * RPC method proxy
65 *
66 * @param string $method RPC method name
67 * @param array $params RPC method arguments
68 * @return mixed decoded RPC response
69 * @throws Exception
70 */
71 public function __call($method, array $params)
72 {
73 if ($this->__namespace) {
74 $method = $this->__namespace .'.'. $method;
75 }
76 $this->__request->setContentType("text/xml; charset=". $this->__encoding);
77 $this->__request->setRawPostData(
78 xmlrpc_encode_request($method, $params,
79 array("encoding" => $this->__encoding)));
80 $this->__request->send();
81 $response = $this->__request->getResponseMessage();
82 if ($response->getResponseCode() != 200) {
83 throw new Exception(
84 $response->getResponseStatus(),
85 $response->getResponseCode()
86 );
87 }
88
89 $data = xmlrpc_decode($response->getBody(), $this->__encoding);
90 if (xmlrpc_is_fault($data)) {
91 throw new Exception(
92 (string) $data['faultString'],
93 (int) $data['faultCode']
94 );
95 }
96
97 return $data;
98 }
99
100 /**
101 * Returns self, where namespace is set to variable name
102 *
103 * @param string $ns
104 * @return XmlRpcRequest
105 */
106 public function __get($ns)
107 {
108 $this->__namespace = $ns;
109 return $this;
110 }
111 }
112
113 ?>