reinstate access to xmlrpc_server->dmap (for users of the v3 API)
[plcapi.git] / lib / xmlrpc.inc
1 <?php
2 // by Edd Dumbill (C) 1999-2002
3 // <edd@usefulinc.com>
4
5 // Copyright (c) 1999,2000,2002 Edd Dumbill.
6 // All rights reserved.
7 //
8 // Redistribution and use in source and binary forms, with or without
9 // modification, are permitted provided that the following conditions
10 // are met:
11 //
12 //    * Redistributions of source code must retain the above copyright
13 //      notice, this list of conditions and the following disclaimer.
14 //
15 //    * Redistributions in binary form must reproduce the above
16 //      copyright notice, this list of conditions and the following
17 //      disclaimer in the documentation and/or other materials provided
18 //      with the distribution.
19 //
20 //    * Neither the name of the "XML-RPC for PHP" nor the names of its
21 //      contributors may be used to endorse or promote products derived
22 //      from this software without specific prior written permission.
23 //
24 // THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
25 // "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
26 // LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
27 // FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
28 // REGENTS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
29 // INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
30 // (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
31 // SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
32 // HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
33 // STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
34 // ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
35 // OF THE POSSIBILITY OF SUCH DAMAGE.
36
37 /******************************************************************************
38  *
39  * *** DEPRECATED ***
40  *
41  * This file is only used to insure backwards compatibility
42  * with the API of the library <= rev. 3
43  *
44  * If it is included, the library will work without any further autoloading
45  *****************************************************************************/
46
47 include_once(__DIR__.'/../src/Client.php');
48 include_once(__DIR__.'/../src/Encoder.php');
49 include_once(__DIR__.'/../src/PhpXmlRpc.php');
50 include_once(__DIR__.'/../src/Request.php');
51 include_once(__DIR__.'/../src/Response.php');
52 include_once(__DIR__.'/../src/Value.php');
53 include_once(__DIR__.'/../src/Helper/Charset.php');
54 include_once(__DIR__.'/../src/Helper/Date.php');
55 include_once(__DIR__.'/../src/Helper/Http.php');
56 include_once(__DIR__.'/../src/Helper/Logger.php');
57 include_once(__DIR__.'/../src/Helper/XMLParser.php');
58
59 use PhpXmlRpc\Client;
60 use PhpXmlRpc\Encoder;
61 use PhpXmlRpc\Request;
62 use PhpXmlRpc\Response;
63 use PhpXmlRpc\Value;
64 use PhpXmlRpc\Helper\Charset;
65 use PhpXmlRpc\Helper\Date;
66 use PhpXmlRpc\Helper\Http;
67 use PhpXmlRpc\Helper\XMLParser;
68
69 /* Expose the global variables which used to be defined */
70 PhpXmlRpc\PhpXmlRpc::$xmlrpc_internalencoding = 'ISO-8859-1'; // old default
71 PhpXmlRpc\PhpXmlRpc::exportGlobals();
72
73 /* some stuff deprecated enough that we do not want to put it in the new lib version */
74
75 /// @deprecated
76 $GLOBALS['xmlEntities'] = array(
77     'amp'  => '&',
78     'quot' => '"',
79     'lt'   => '<',
80     'gt'   => '>',
81     'apos' => "'"
82 );
83
84 // formulate backslashes for escaping regexp
85 // Not in use anymore since 2.0. Shall we remove it?
86 /// @deprecated
87 $GLOBALS['xmlrpc_backslash'] = chr(92).chr(92);
88
89 /* Expose with the old names the classes which have been namespaced */
90
91 class xmlrpcval extends Value
92 {
93     /**
94      * @deprecated
95      * @param xmlrpcval $o
96      * @return string
97      */
98     public function serializeval($o)
99     {
100         // add check? slower, but helps to avoid recursion in serializing broken xmlrpcvals...
101         //if (is_object($o) && (get_class($o) == 'xmlrpcval' || is_subclass_of($o, 'xmlrpcval')))
102         //{
103         $ar = $o->me;
104         $val = reset($ar);
105         $typ = key($ar);
106
107         return '<value>' . $this->serializedata($typ, $val) . "</value>\n";
108         //}
109     }
110
111     /**
112      * @deprecated this code looks like it is very fragile and has not been fixed
113      * for a long long time. Shall we remove it for 2.0?
114      */
115     public function getval()
116     {
117         // UNSTABLE
118         $b = reset($this->me);
119         $a = key($this->me);
120         // contributed by I Sofer, 2001-03-24
121         // add support for nested arrays to scalarval
122         // i've created a new method here, so as to
123         // preserve back compatibility
124
125         if (is_array($b)) {
126             foreach($b as $id => $cont) {
127                 $b[$id] = $cont->scalarval();
128             }
129         }
130
131         // add support for structures directly encoding php objects
132         if (is_object($b)) {
133             $t = get_object_vars($b);
134             foreach($t as $id => $cont) {
135                 $t[$id] = $cont->scalarval();
136             }
137             foreach($t as $id => $cont) {
138                 @$b->$id = $cont;
139             }
140         }
141         // end contrib
142         return $b;
143     }
144
145     /// reset functionality added by parent class: same as it would happen if no interface was declared
146     public function count()
147     {
148         return 1;
149     }
150
151     /// reset functionality added by parent class: same as it would happen if no interface was declared
152     public function getIterator()
153     {
154         return new ArrayIterator($this);
155     }
156 }
157
158 class xmlrpcmsg extends Request
159 {
160 }
161
162 class xmlrpcresp extends Response
163 {
164 }
165
166 class xmlrpc_client extends Client
167 {
168 }
169
170 /* Expose as global functions the ones which are now class methods */
171
172 /// Wrong speling, but we are adamant on backwards compatibility!
173 function xmlrpc_encode_entitites($data, $srcEncoding='', $destEncoding='')
174 {
175     return Charset::instance()->encodeEntities($data, $srcEncoding, $destEncoding);
176 }
177
178 function iso8601_encode($timeT, $utc=0)
179 {
180     return Date::iso8601Encode($timeT, $utc);
181 }
182
183 function iso8601_decode($iDate, $utc=0)
184 {
185     return Date::iso8601Decode($iDate, $utc);
186 }
187
188 function decode_chunked($buffer)
189 {
190     return Http::decodeChunked($buffer);
191 }
192
193 function php_xmlrpc_decode($xmlrpcVal, $options=array())
194 {
195     $encoder = new Encoder();
196     return $encoder->decode($xmlrpcVal, $options);
197 }
198
199 function php_xmlrpc_encode($phpVal, $options=array())
200 {
201     $encoder = new Encoder();
202     return $encoder->encode($phpVal, $options);
203 }
204
205 function php_xmlrpc_decode_xml($xmlVal, $options=array())
206 {
207     $encoder = new Encoder();
208     return $encoder->decodeXml($xmlVal, $options);
209 }
210
211 function guess_encoding($httpHeader='', $xmlChunk='', $encodingPrefs=null)
212 {
213     return XMLParser::guessEncoding($httpHeader, $xmlChunk, $encodingPrefs);
214 }
215
216 function has_encoding($xmlChunk)
217 {
218     return XMLParser::hasEncoding($xmlChunk);
219 }
220
221 function is_valid_charset($encoding, $validList)
222 {
223     return Charset::instance()->isValidCharset($encoding, $validList);
224 }