Passed
Push — master ( 593257...e1cd2d )
by Gaetano
03:24
created

Wrapper::buildMethodSignatures()   B

Complexity

Conditions 9
Paths 60

Size

Total Lines 56
Code Lines 30

Duplication

Lines 0
Ratio 0 %

Code Coverage

Tests 28
CRAP Score 9.0033

Importance

Changes 3
Bugs 1 Features 0
Metric Value
cc 9
eloc 30
c 3
b 1
f 0
nc 60
nop 1
dl 0
loc 56
rs 8.0555
ccs 28
cts 29
cp 0.9655
crap 9.0033

How to fix   Long Method   

Long Method

Small methods make your code easier to understand, in particular if combined with a good name. Besides, if your method is small, finding a good name is usually much easier.

For example, if you find yourself adding comments to a method's body, this is usually a good sign to extract the commented part to a new method, and use the comment as a starting point when coming up with a good name for this new method.

Commonly applied refactorings include:

1
<?php
2
/**
3
 * @author Gaetano Giunta
4
 * @copyright (C) 2006-2020 G. Giunta
5
 * @license code licensed under the BSD License: see file license.txt
6
 */
7
8
namespace PhpXmlRpc;
9
10
use PhpXmlRpc\Helper\Logger;
11
12
/**
13
 * PHP-XMLRPC "wrapper" class - generate stubs to transparently access xmlrpc methods as php functions and vice-versa.
14
 * Note: this class implements the PROXY pattern, but it is not named so to avoid confusion with http proxies.
15
 *
16
 * @todo use some better templating system for code generation?
17
 * @todo implement method wrapping with preservation of php objs in calls
18
 * @todo when wrapping methods without obj rebuilding, use return_type = 'phpvals' (faster)
19
 */
20
class Wrapper
21
{
22
    /// used to hold a reference to object instances whose methods get wrapped by wrapPhpFunction(), in 'create source' mode
23
    public static $objHolder = array();
24
25
    /**
26
     * Given a string defining a php type or phpxmlrpc type (loosely defined: strings
27
     * accepted come from javadoc blocks), return corresponding phpxmlrpc type.
28
     * Notes:
29
     * - for php 'resource' types returns empty string, since resources cannot be serialized;
30
     * - for php class names returns 'struct', since php objects can be serialized as xmlrpc structs
31
     * - for php arrays always return array, even though arrays sometimes serialize as json structs
32
     * - for 'void' and 'null' returns 'undefined'
33
     *
34
     * @param string $phpType
35
     *
36
     * @return string
37
     */
38 413
    public function php2XmlrpcType($phpType)
39
    {
40 413
        switch (strtolower($phpType)) {
41 413
            case 'string':
42 413
                return Value::$xmlrpcString;
43 413
            case 'integer':
44 413
            case Value::$xmlrpcInt: // 'int'
45 413
            case Value::$xmlrpcI4:
46 413
            case Value::$xmlrpcI8:
47 413
                return Value::$xmlrpcInt;
48 413
            case Value::$xmlrpcDouble: // 'double'
49
                return Value::$xmlrpcDouble;
50 413
            case 'bool':
51 413
            case Value::$xmlrpcBoolean: // 'boolean'
52 413
            case 'false':
53 413
            case 'true':
54
                return Value::$xmlrpcBoolean;
55 413
            case Value::$xmlrpcArray: // 'array':
56
                return Value::$xmlrpcArray;
57 413
            case 'object':
58 413
            case Value::$xmlrpcStruct: // 'struct'
59
                return Value::$xmlrpcStruct;
60 413
            case Value::$xmlrpcBase64:
61
                return Value::$xmlrpcBase64;
62 413
            case 'resource':
63
                return '';
64
            default:
65 413
                if (class_exists($phpType)) {
66 413
                    return Value::$xmlrpcStruct;
67
                } else {
68
                    // unknown: might be any 'extended' xmlrpc type
69 413
                    return Value::$xmlrpcValue;
70
                }
71
        }
72
    }
73
74
    /**
75
     * Given a string defining a phpxmlrpc type return the corresponding php type.
76
     *
77
     * @param string $xmlrpcType
78
     *
79
     * @return string
80
     */
81 65
    public function xmlrpc2PhpType($xmlrpcType)
82
    {
83 65
        switch (strtolower($xmlrpcType)) {
84 65
            case 'base64':
85 65
            case 'datetime.iso8601':
86 65
            case 'string':
87 49
                return Value::$xmlrpcString;
88 65
            case 'int':
89 17
            case 'i4':
90 17
            case 'i8':
91 49
                return 'integer';
92 17
            case 'struct':
93 17
            case 'array':
94
                return 'array';
95 17
            case 'double':
96
                return 'float';
97 17
            case 'undefined':
98 17
                return 'mixed';
99
            case 'boolean':
100
            case 'null':
101
            default:
102
                // unknown: might be any xmlrpc type
103
                return strtolower($xmlrpcType);
104
        }
105
    }
106
107
    /**
108
     * Given a user-defined PHP function, create a PHP 'wrapper' function that can
109
     * be exposed as xmlrpc method from an xmlrpc server object and called from remote
110
     * clients (as well as its corresponding signature info).
111
     *
112
     * Since php is a typeless language, to infer types of input and output parameters,
113
     * it relies on parsing the javadoc-style comment block associated with the given
114
     * function. Usage of xmlrpc native types (such as datetime.dateTime.iso8601 and base64)
115
     * in the '@param' tag is also allowed, if you need the php function to receive/send
116
     * data in that particular format (note that base64 encoding/decoding is transparently
117
     * carried out by the lib, while datetime vals are passed around as strings)
118
     *
119
     * Known limitations:
120
     * - only works for user-defined functions, not for PHP internal functions
121
     *   (reflection does not support retrieving number/type of params for those)
122
     * - functions returning php objects will generate special structs in xmlrpc responses:
123
     *   when the xmlrpc decoding of those responses is carried out by this same lib, using
124
     *   the appropriate param in php_xmlrpc_decode, the php objects will be rebuilt.
125
     *   In short: php objects can be serialized, too (except for their resource members),
126
     *   using this function.
127
     *   Other libs might choke on the very same xml that will be generated in this case
128
     *   (i.e. it has a nonstandard attribute on struct element tags)
129
     *
130
     * Note that since rel. 2.0RC3 the preferred method to have the server call 'standard'
131
     * php functions (ie. functions not expecting a single Request obj as parameter)
132
     * is by making use of the functions_parameters_type class member.
133
     *
134
     * @param callable $callable the PHP user function to be exposed as xmlrpc method/ a closure, function name, array($obj, 'methodname') or array('class', 'methodname') are ok
135
     * @param string $newFuncName (optional) name for function to be created. Used only when return_source in $extraOptions is true
136
     * @param array $extraOptions (optional) array of options for conversion. valid values include:
137
     *                            - bool return_source     when true, php code w. function definition will be returned, instead of a closure
138
     *                            - bool encode_php_objs   let php objects be sent to server using the 'improved' xmlrpc notation, so server can deserialize them as php objects
139
     *                            - bool decode_php_objs   --- WARNING !!! possible security hazard. only use it with trusted servers ---
140
     *                            - bool suppress_warnings remove from produced xml any warnings generated at runtime by the php function being invoked
141
     *
142
     * @return array|false false on error, or an array containing the name of the new php function,
143
     *                     its signature and docs, to be used in the server dispatch map
144
     *
145
     * @todo decide how to deal with params passed by ref in function definition: bomb out or allow?
146
     * @todo finish using phpdoc info to build method sig if all params are named but out of order
147
     * @todo add a check for params of 'resource' type
148
     * @todo add some trigger_errors / error_log when returning false?
149
     * @todo what to do when the PHP function returns NULL? We are currently returning an empty string value...
150
     * @todo add an option to suppress php warnings in invocation of user function, similar to server debug level 3?
151
     * @todo add a verbatim_object_copy parameter to allow avoiding usage the same obj instance?
152
     * @todo add an option to allow generated function to skip validation of number of parameters, as that is done by the server anyway
153
     */
154 413
    public function wrapPhpFunction($callable, $newFuncName = '', $extraOptions = array())
155
    {
156 413
        $buildIt = isset($extraOptions['return_source']) ? !($extraOptions['return_source']) : true;
157
158 413
        if (is_string($callable) && strpos($callable, '::') !== false) {
159 413
            $callable = explode('::', $callable);
160
        }
161 413
        if (is_array($callable)) {
162 413
            if (count($callable) < 2 || (!is_string($callable[0]) && !is_object($callable[0]))) {
163
                Logger::instance()->errorLog('XML-RPC: ' . __METHOD__ . ': syntax for function to be wrapped is wrong');
164
                return false;
165
            }
166 413
            if (is_string($callable[0])) {
167 413
                $plainFuncName = implode('::', $callable);
168 413
            } elseif (is_object($callable[0])) {
169 413
                $plainFuncName = get_class($callable[0]) . '->' . $callable[1];
170
            }
171 413
            $exists = method_exists($callable[0], $callable[1]);
172 413
        } else if ($callable instanceof \Closure) {
173
            // we do not support creating code which wraps closures, as php does not allow to serialize them
174 413
            if (!$buildIt) {
175
                Logger::instance()->errorLog('XML-RPC: ' . __METHOD__ . ': a closure can not be wrapped in generated source code');
176
                return false;
177
            }
178
179 413
            $plainFuncName = 'Closure';
180 413
            $exists = true;
181
        } else {
182 413
            $plainFuncName = $callable;
183 413
            $exists = function_exists($callable);
0 ignored issues
show
Bug introduced by
$callable of type callable is incompatible with the type string expected by parameter $function_name of function_exists(). ( Ignorable by Annotation )

If this is a false-positive, you can also ignore this issue in your code via the ignore-type  annotation

183
            $exists = function_exists(/** @scrutinizer ignore-type */ $callable);
Loading history...
184
        }
185
186 413
        if (!$exists) {
187
            Logger::instance()->errorLog('XML-RPC: ' . __METHOD__ . ': function to be wrapped is not defined: ' . $plainFuncName);
0 ignored issues
show
Comprehensibility Best Practice introduced by
The variable $plainFuncName does not seem to be defined for all execution paths leading up to this point.
Loading history...
188
            return false;
189
        }
190
191 413
        $funcDesc = $this->introspectFunction($callable, $plainFuncName);
192 413
        if (!$funcDesc) {
193
            return false;
194
        }
195
196 413
        $funcSigs = $this->buildMethodSignatures($funcDesc);
197
198 413
        if ($buildIt) {
199 413
            $callable = $this->buildWrapFunctionClosure($callable, $extraOptions, $plainFuncName, $funcDesc);
200
        } else {
201 413
            $newFuncName = $this->newFunctionName($callable, $newFuncName, $extraOptions);
202 413
            $code = $this->buildWrapFunctionSource($callable, $newFuncName, $extraOptions, $plainFuncName, $funcDesc);
203
        }
204
205
        $ret = array(
206 413
            'function' => $callable,
207 413
            'signature' => $funcSigs['sigs'],
208 413
            'docstring' => $funcDesc['desc'],
209 413
            'signature_docs' => $funcSigs['sigsDocs'],
210
        );
211 413
        if (!$buildIt) {
212 413
            $ret['function'] = $newFuncName;
213 413
            $ret['source'] = $code;
0 ignored issues
show
Comprehensibility Best Practice introduced by
The variable $code does not seem to be defined for all execution paths leading up to this point.
Loading history...
214
        }
215 413
        return $ret;
216
    }
217
218
    /**
219
     * Introspect a php callable and its phpdoc block and extract information about its signature
220
     *
221
     * @param callable $callable
222
     * @param string $plainFuncName
223
     * @return array|false
224
     */
225 413
    protected function introspectFunction($callable, $plainFuncName)
226
    {
227
        // start to introspect PHP code
228 413
        if (is_array($callable)) {
229 413
            $func = new \ReflectionMethod($callable[0], $callable[1]);
230 413
            if ($func->isPrivate()) {
231
                Logger::instance()->errorLog('XML-RPC: ' . __METHOD__ . ': method to be wrapped is private: ' . $plainFuncName);
232
                return false;
233
            }
234 413
            if ($func->isProtected()) {
235
                Logger::instance()->errorLog('XML-RPC: ' . __METHOD__ . ': method to be wrapped is protected: ' . $plainFuncName);
236
                return false;
237
            }
238 413
            if ($func->isConstructor()) {
239
                Logger::instance()->errorLog('XML-RPC: ' . __METHOD__ . ': method to be wrapped is the constructor: ' . $plainFuncName);
240
                return false;
241
            }
242 413
            if ($func->isDestructor()) {
243
                Logger::instance()->errorLog('XML-RPC: ' . __METHOD__ . ': method to be wrapped is the destructor: ' . $plainFuncName);
244
                return false;
245
            }
246 413
            if ($func->isAbstract()) {
247
                Logger::instance()->errorLog('XML-RPC: ' . __METHOD__ . ': method to be wrapped is abstract: ' . $plainFuncName);
248
                return false;
249
            }
250
            /// @todo add more checks for static vs. nonstatic?
251
        } else {
252 413
            $func = new \ReflectionFunction($callable);
253
        }
254 413
        if ($func->isInternal()) {
255
            // Note: from PHP 5.1.0 onward, we will possibly be able to use invokeargs
256
            // instead of getparameters to fully reflect internal php functions ?
257
            Logger::instance()->errorLog('XML-RPC: ' . __METHOD__ . ': function to be wrapped is internal: ' . $plainFuncName);
258
            return false;
259
        }
260
261
        // retrieve parameter names, types and description from javadoc comments
262
263
        // function description
264 413
        $desc = '';
265
        // type of return val: by default 'any'
266 413
        $returns = Value::$xmlrpcValue;
267
        // desc of return val
268 413
        $returnsDocs = '';
269
        // type + name of function parameters
270 413
        $paramDocs = array();
271
272 413
        $docs = $func->getDocComment();
273 413
        if ($docs != '') {
274 413
            $docs = explode("\n", $docs);
275 413
            $i = 0;
276 413
            foreach ($docs as $doc) {
277 413
                $doc = trim($doc, " \r\t/*");
278 413
                if (strlen($doc) && strpos($doc, '@') !== 0 && !$i) {
279 413
                    if ($desc) {
280 413
                        $desc .= "\n";
281
                    }
282 413
                    $desc .= $doc;
283 413
                } elseif (strpos($doc, '@param') === 0) {
284
                    // syntax: @param type $name [desc]
285 413
                    if (preg_match('/@param\s+(\S+)\s+(\$\S+)\s*(.+)?/', $doc, $matches)) {
286 413
                        $name = strtolower(trim($matches[2]));
287
                        //$paramDocs[$name]['name'] = trim($matches[2]);
288 413
                        $paramDocs[$name]['doc'] = isset($matches[3]) ? $matches[3] : '';
289 413
                        $paramDocs[$name]['type'] = $matches[1];
290
                    }
291 413
                    $i++;
292 413
                } elseif (strpos($doc, '@return') === 0) {
293
                    // syntax: @return type [desc]
294 413
                    if (preg_match('/@return\s+(\S+)(\s+.+)?/', $doc, $matches)) {
295 413
                        $returns = $matches[1];
296 413
                        if (isset($matches[2])) {
297 413
                            $returnsDocs = trim($matches[2]);
298
                        }
299
                    }
300
                }
301
            }
302
        }
303
304
        // execute introspection of actual function prototype
305 413
        $params = array();
306 413
        $i = 0;
307 413
        foreach ($func->getParameters() as $paramObj) {
308 413
            $params[$i] = array();
309 413
            $params[$i]['name'] = '$' . $paramObj->getName();
310 413
            $params[$i]['isoptional'] = $paramObj->isOptional();
311 413
            $i++;
312
        }
313
314
        return array(
315 413
            'desc' => $desc,
316 413
            'docs' => $docs,
317 413
            'params' => $params, // array, positionally indexed
318 413
            'paramDocs' => $paramDocs, // array, indexed by name
319 413
            'returns' => $returns,
320 413
            'returnsDocs' =>$returnsDocs,
321
        );
322
    }
323
324
    /**
325
     * Given the method description given by introspection, create method signature data
326
     *
327
     * @todo support better docs with multiple types separated by pipes by creating multiple signatures
328
     *       (this is questionable, as it might produce a big matrix of possible signatures with many such occurrences)
329
     *
330
     * @param array $funcDesc as generated by self::introspectFunction()
331
     *
332
     * @return array
333
     */
334 413
    protected function buildMethodSignatures($funcDesc)
335
    {
336 413
        $i = 0;
337 413
        $parsVariations = array();
338 413
        $pars = array();
339 413
        $pNum = count($funcDesc['params']);
340 413
        foreach ($funcDesc['params'] as $param) {
341
            /* // match by name real param and documented params
342
            $name = strtolower($param['name']);
343
            if (!isset($funcDesc['paramDocs'][$name])) {
344
                $funcDesc['paramDocs'][$name] = array();
345
            }
346
            if (!isset($funcDesc['paramDocs'][$name]['type'])) {
347
                $funcDesc['paramDocs'][$name]['type'] = 'mixed';
348
            }*/
349
350 413
            if ($param['isoptional']) {
351
                // this particular parameter is optional. save as valid previous list of parameters
352
                $parsVariations[] = $pars;
353
            }
354
355 413
            $pars[] = "\$p$i";
356 413
            $i++;
357 413
            if ($i == $pNum) {
358
                // last allowed parameters combination
359 413
                $parsVariations[] = $pars;
360
            }
361
        }
362
363 413
        if (count($parsVariations) == 0) {
364
            // only known good synopsis = no parameters
365 413
            $parsVariations[] = array();
366
        }
367
368 413
        $sigs = array();
369 413
        $sigsDocs = array();
370 413
        foreach ($parsVariations as $pars) {
371
            // build a signature
372 413
            $sig = array($this->php2XmlrpcType($funcDesc['returns']));
373 413
            $pSig = array($funcDesc['returnsDocs']);
374 413
            for ($i = 0; $i < count($pars); $i++) {
0 ignored issues
show
Performance Best Practice introduced by
It seems like you are calling the size function count() as part of the test condition. You might want to compute the size beforehand, and not on each iteration.

If the size of the collection does not change during the iteration, it is generally a good practice to compute it beforehand, and not on each iteration:

for ($i=0; $i<count($array); $i++) { // calls count() on each iteration
}

// Better
for ($i=0, $c=count($array); $i<$c; $i++) { // calls count() just once
}
Loading history...
375 413
                $name = strtolower($funcDesc['params'][$i]['name']);
376 413
                if (isset($funcDesc['paramDocs'][$name]['type'])) {
377 413
                    $sig[] = $this->php2XmlrpcType($funcDesc['paramDocs'][$name]['type']);
378
                } else {
379 413
                    $sig[] = Value::$xmlrpcValue;
380
                }
381 413
                $pSig[] = isset($funcDesc['paramDocs'][$name]['doc']) ? $funcDesc['paramDocs'][$name]['doc'] : '';
382
            }
383 413
            $sigs[] = $sig;
384 413
            $sigsDocs[] = $pSig;
385
        }
386
387
        return array(
388 413
            'sigs' => $sigs,
389 413
            'sigsDocs' => $sigsDocs
390
        );
391
    }
392
393
    /**
394
     * Creates a closure that will execute $callable
395
     * @todo validate params? In theory all validation is left to the dispatch map...
396
     * @todo add support for $catchWarnings
397
     *
398
     * @param $callable
399
     * @param array $extraOptions
400
     * @param string $plainFuncName
401
     * @param array $funcDesc
402
     * @return \Closure
403
     */
404 413
    protected function buildWrapFunctionClosure($callable, $extraOptions, $plainFuncName, $funcDesc)
405
    {
406
        /**
407
         * @param Request $req
408
         * @return mixed
409
         */
410
        $function = function($req) use($callable, $extraOptions, $funcDesc)
411
        {
412 67
            $nameSpace = '\\PhpXmlRpc\\';
413 67
            $encoderClass = $nameSpace.'Encoder';
414 67
            $responseClass = $nameSpace.'Response';
415 67
            $valueClass = $nameSpace.'Value';
416
417
            // validate number of parameters received
418
            // this should be optional really, as we assume the server does the validation
419 67
            $minPars = count($funcDesc['params']);
420 67
            $maxPars = $minPars;
421 67
            foreach ($funcDesc['params'] as $i => $param) {
422 67
                if ($param['isoptional']) {
423
                    // this particular parameter is optional. We assume later ones are as well
424
                    $minPars = $i;
425
                    break;
426
                }
427
            }
428 67
            $numPars = $req->getNumParams();
429 67
            if ($numPars < $minPars || $numPars > $maxPars) {
430
                return new $responseClass(0, 3, 'Incorrect parameters passed to method');
431
            }
432
433 67
            $encoder = new $encoderClass();
434 67
            $options = array();
435 67
            if (isset($extraOptions['decode_php_objs']) && $extraOptions['decode_php_objs']) {
436
                $options[] = 'decode_php_objs';
437
            }
438 67
            $params = $encoder->decode($req, $options);
439
440 67
            $result = call_user_func_array($callable, $params);
441
442 67
            if (! is_a($result, $responseClass)) {
443 67
                if ($funcDesc['returns'] == Value::$xmlrpcDateTime || $funcDesc['returns'] == Value::$xmlrpcBase64) {
444
                    $result = new $valueClass($result, $funcDesc['returns']);
445
                } else {
446 67
                    $options = array();
447 67
                    if (isset($extraOptions['encode_php_objs']) && $extraOptions['encode_php_objs']) {
448 1
                        $options[] = 'encode_php_objs';
449
                    }
450
451 67
                    $result = $encoder->encode($result, $options);
452
                }
453 67
                $result = new $responseClass($result);
454
            }
455
456 67
            return $result;
457 413
        };
458
459 413
        return $function;
460
    }
461
462
    /**
463
     * Return a name for a new function, based on $callable, insuring its uniqueness
464
     * @param mixed $callable a php callable, or the name of an xmlrpc method
465
     * @param string $newFuncName when not empty, it is used instead of the calculated version
466
     * @return string
467
     */
468 477
    protected function newFunctionName($callable, $newFuncName, $extraOptions)
469
    {
470
        // determine name of new php function
471
472 477
        $prefix = isset($extraOptions['prefix']) ? $extraOptions['prefix'] : 'xmlrpc';
473
474 477
        if ($newFuncName == '') {
475 461
            if (is_array($callable)) {
476 413
                if (is_string($callable[0])) {
477 413
                    $xmlrpcFuncName = "{$prefix}_" . implode('_', $callable);
478
                } else {
479 413
                    $xmlrpcFuncName = "{$prefix}_" . get_class($callable[0]) . '_' . $callable[1];
480
                }
481
            } else {
482 461
                if ($callable instanceof \Closure) {
483
                    $xmlrpcFuncName = "{$prefix}_closure";
484
                } else {
485 461
                    $callable = preg_replace(array('/\./', '/[^a-zA-Z0-9_\x7f-\xff]/'),
486 461
                        array('_', ''), $callable);
487 461
                    $xmlrpcFuncName = "{$prefix}_$callable";
488
                }
489
            }
490
        } else {
491 17
            $xmlrpcFuncName = $newFuncName;
492
        }
493
494 477
        while (function_exists($xmlrpcFuncName)) {
495 459
            $xmlrpcFuncName .= 'x';
496
        }
497
498 477
        return $xmlrpcFuncName;
499
    }
500
501
    /**
502
     * @param $callable
503
     * @param string $newFuncName
504
     * @param array $extraOptions
505
     * @param string $plainFuncName
506
     * @param array $funcDesc
507
     * @return string
508
     *
509
     * @todo add a nice phpdoc block in the generated source
510
     */
511 413
    protected function buildWrapFunctionSource($callable, $newFuncName, $extraOptions, $plainFuncName, $funcDesc)
512
    {
513 413
        $namespace = '\\PhpXmlRpc\\';
514
515 413
        $encodePhpObjects = isset($extraOptions['encode_php_objs']) ? (bool)$extraOptions['encode_php_objs'] : false;
516 413
        $decodePhpObjects = isset($extraOptions['decode_php_objs']) ? (bool)$extraOptions['decode_php_objs'] : false;
517 413
        $catchWarnings = isset($extraOptions['suppress_warnings']) && $extraOptions['suppress_warnings'] ? '@' : '';
518
519 413
        $i = 0;
520 413
        $parsVariations = array();
521 413
        $pars = array();
522 413
        $pNum = count($funcDesc['params']);
523 413
        foreach ($funcDesc['params'] as $param) {
524
525 413
            if ($param['isoptional']) {
526
                // this particular parameter is optional. save as valid previous list of parameters
527
                $parsVariations[] = $pars;
528
            }
529
530 413
            $pars[] = "\$p[$i]";
531 413
            $i++;
532 413
            if ($i == $pNum) {
533
                // last allowed parameters combination
534 413
                $parsVariations[] = $pars;
535
            }
536
        }
537
538 413
        if (count($parsVariations) == 0) {
539
            // only known good synopsis = no parameters
540
            $parsVariations[] = array();
541
            $minPars = 0;
542
            $maxPars = 0;
543
        } else {
544 413
            $minPars = count($parsVariations[0]);
545 413
            $maxPars = count($parsVariations[count($parsVariations)-1]);
546
        }
547
548
        // build body of new function
549
550 413
        $innerCode = "\$paramCount = \$req->getNumParams();\n";
551 413
        $innerCode .= "if (\$paramCount < $minPars || \$paramCount > $maxPars) return new {$namespace}Response(0, " . PhpXmlRpc::$xmlrpcerr['incorrect_params'] . ", '" . PhpXmlRpc::$xmlrpcstr['incorrect_params'] . "');\n";
552
553 413
        $innerCode .= "\$encoder = new {$namespace}Encoder();\n";
554 413
        if ($decodePhpObjects) {
555
            $innerCode .= "\$p = \$encoder->decode(\$req, array('decode_php_objs'));\n";
556
        } else {
557 413
            $innerCode .= "\$p = \$encoder->decode(\$req);\n";
558
        }
559
560
        // since we are building source code for later use, if we are given an object instance,
561
        // we go out of our way and store a pointer to it in a static class var var...
562 413
        if (is_array($callable) && is_object($callable[0])) {
563 413
            self::$objHolder[$newFuncName] = $callable[0];
564 413
            $innerCode .= "\$obj = PhpXmlRpc\\Wrapper::\$objHolder['$newFuncName'];\n";
565 413
            $realFuncName = '$obj->' . $callable[1];
566
        } else {
567 413
            $realFuncName = $plainFuncName;
568
        }
569 413
        foreach ($parsVariations as $i => $pars) {
570 413
            $innerCode .= "if (\$paramCount == " . count($pars) . ") \$retval = {$catchWarnings}$realFuncName(" . implode(',', $pars) . ");\n";
571 413
            if ($i < (count($parsVariations) - 1))
572
                $innerCode .= "else\n";
573
        }
574 413
        $innerCode .= "if (is_a(\$retval, '{$namespace}Response')) return \$retval; else\n";
575 413
        if ($funcDesc['returns'] == Value::$xmlrpcDateTime || $funcDesc['returns'] == Value::$xmlrpcBase64) {
576
            $innerCode .= "return new {$namespace}Response(new {$namespace}Value(\$retval, '{$funcDesc['returns']}'));";
577
        } else {
578 413
            if ($encodePhpObjects) {
579
                $innerCode .= "return new {$namespace}Response(\$encoder->encode(\$retval, array('encode_php_objs')));\n";
580
            } else {
581 413
                $innerCode .= "return new {$namespace}Response(\$encoder->encode(\$retval));\n";
582
            }
583
        }
584
        // shall we exclude functions returning by ref?
585
        // if($func->returnsReference())
586
        //     return false;
587
588 413
        $code = "function $newFuncName(\$req) {\n" . $innerCode . "\n}";
589
590 413
        return $code;
591
    }
592
593
    /**
594
     * Given a user-defined PHP class or php object, map its methods onto a list of
595
     * PHP 'wrapper' functions that can be exposed as xmlrpc methods from an xmlrpc server
596
     * object and called from remote clients (as well as their corresponding signature info).
597
     *
598
     * @param string|object $className the name of the class whose methods are to be exposed as xmlrpc methods, or an object instance of that class
599
     * @param array $extraOptions see the docs for wrapPhpMethod for basic options, plus
600
     *                            - string method_type    'static', 'nonstatic', 'all' and 'auto' (default); the latter will switch between static and non-static depending on whether $className is a class name or object instance
601
     *                            - string method_filter  a regexp used to filter methods to wrap based on their names
602
     *                            - string prefix         used for the names of the xmlrpc methods created
603
     *
604
     * @return array|false false on failure
605
     */
606 413
    public function wrapPhpClass($className, $extraOptions = array())
607
    {
608 413
        $methodFilter = isset($extraOptions['method_filter']) ? $extraOptions['method_filter'] : '';
609 413
        $methodType = isset($extraOptions['method_type']) ? $extraOptions['method_type'] : 'auto';
610 413
        $prefix = isset($extraOptions['prefix']) ? $extraOptions['prefix'] : '';
611
612 413
        $results = array();
613 413
        $mList = get_class_methods($className);
614 413
        foreach ($mList as $mName) {
615 413
            if ($methodFilter == '' || preg_match($methodFilter, $mName)) {
616 413
                $func = new \ReflectionMethod($className, $mName);
617 413
                if (!$func->isPrivate() && !$func->isProtected() && !$func->isConstructor() && !$func->isDestructor() && !$func->isAbstract()) {
618 413
                    if (($func->isStatic() && ($methodType == 'all' || $methodType == 'static' || ($methodType == 'auto' && is_string($className)))) ||
0 ignored issues
show
introduced by
Consider adding parentheses for clarity. Current Interpretation: ($func->isStatic() && $m...& is_object($className), Probably Intended Meaning: $func->isStatic() && ($m... is_object($className))
Loading history...
619 413
                        (!$func->isStatic() && ($methodType == 'all' || $methodType == 'nonstatic' || ($methodType == 'auto' && is_object($className))))
620
                    ) {
621 413
                        $methodWrap = $this->wrapPhpFunction(array($className, $mName), '', $extraOptions);
622 413
                        if ($methodWrap) {
623 413
                            if (is_object($className)) {
624 413
                                $realClassName = get_class($className);
625
                            }else {
626
                                $realClassName = $className;
627
                            }
628 413
                            $results[$prefix."$realClassName.$mName"] = $methodWrap;
629
                        }
630
                    }
631
                }
632
            }
633
        }
634
635 413
        return $results;
636
    }
637
638
    /**
639
     * Given an xmlrpc client and a method name, register a php wrapper function
640
     * that will call it and return results using native php types for both
641
     * params and results. The generated php function will return a Response
642
     * object for failed xmlrpc calls.
643
     *
644
     * Known limitations:
645
     * - server must support system.methodsignature for the wanted xmlrpc method
646
     * - for methods that expose many signatures, only one can be picked (we
647
     *   could in principle check if signatures differ only by number of params
648
     *   and not by type, but it would be more complication than we can spare time)
649
     * - nested xmlrpc params: the caller of the generated php function has to
650
     *   encode on its own the params passed to the php function if these are structs
651
     *   or arrays whose (sub)members include values of type datetime or base64
652
     *
653
     * Notes: the connection properties of the given client will be copied
654
     * and reused for the connection used during the call to the generated
655
     * php function.
656
     * Calling the generated php function 'might' be slow: a new xmlrpc client
657
     * is created on every invocation and an xmlrpc-connection opened+closed.
658
     * An extra 'debug' param is appended to param list of xmlrpc method, useful
659
     * for debugging purposes.
660
     *
661
     * @todo allow caller to give us the method signature instead of querying for it, or just say 'skip it'
662
     * @todo if we can not retrieve method signature, create a php function with varargs
663
     * @todo allow the created function to throw exceptions on method calls failures
664
     * @todo if caller did not specify a specific sig, shall we support all of them?
665
     *       It might be hard (hence slow) to match based on type and number of arguments...
666
     *
667
     * @param Client $client an xmlrpc client set up correctly to communicate with target server
668
     * @param string $methodName the xmlrpc method to be mapped to a php function
669
     * @param array $extraOptions array of options that specify conversion details. Valid options include
670
     *                            - integer signum              the index of the method signature to use in mapping (if method exposes many sigs)
671
     *                            - integer timeout             timeout (in secs) to be used when executing function/calling remote method
672
     *                            - string  protocol            'http' (default), 'http11' or 'https'
673
     *                            - string  new_function_name   the name of php function to create, when return_source is used. If unspecified, lib will pick an appropriate name
674
     *                            - string  return_source       if true return php code w. function definition instead of function itself (closure)
675
     *                            - bool    encode_php_objs     let php objects be sent to server using the 'improved' xmlrpc notation, so server can deserialize them as php objects
676
     *                            - bool    decode_php_objs     --- WARNING !!! possible security hazard. only use it with trusted servers ---
677
     *                            - mixed   return_on_fault     a php value to be returned when the xmlrpc call fails/returns a fault response (by default the Response object is returned in this case). If a string is used, '%faultCode%' and '%faultString%' tokens will be substituted with actual error values
678
     *                            - bool    debug               set it to 1 or 2 to see debug results of querying server for method synopsis
679
     *                            - int     simple_client_copy  set it to 1 to have a lightweight copy of the $client object made in the generated code (only used when return_source = true)
680
     *
681
     * @return \closure|array|false false on failure, closure by default and array for return_source = true
682
     */
683 65
    public function wrapXmlrpcMethod($client, $methodName, $extraOptions = array())
684
    {
685 65
        $newFuncName = isset($extraOptions['new_function_name']) ? $extraOptions['new_function_name'] : '';
686
687 65
        $buildIt = isset($extraOptions['return_source']) ? !($extraOptions['return_source']) : true;
688
689 65
        $mSig = $this->retrieveMethodSignature($client, $methodName, $extraOptions);
690 65
        if (!$mSig) {
691
            return false;
692
        }
693
694 65
        if ($buildIt) {
695
            return $this->buildWrapMethodClosure($client, $methodName, $extraOptions, $mSig);
696
        } else {
697
            // if in 'offline' mode, retrieve method description too.
698
            // in online mode, favour speed of operation
699 65
            $mDesc = $this->retrieveMethodHelp($client, $methodName, $extraOptions);
700
701 65
            $newFuncName = $this->newFunctionName($methodName, $newFuncName, $extraOptions);
702
703 65
            $results = $this->buildWrapMethodSource($client, $methodName, $extraOptions, $newFuncName, $mSig, $mDesc);
704
            /* was: $results = $this->build_remote_method_wrapper_code($client, $methodName,
705
                $newFuncName, $mSig, $mDesc, $timeout, $protocol, $simpleClientCopy,
706
                $prefix, $decodePhpObjects, $encodePhpObjects, $decodeFault,
707
                $faultResponse, $namespace);*/
708
709 65
            $results['function'] = $newFuncName;
710
711 65
            return $results;
712
        }
713
714
    }
715
716
    /**
717
     * Retrieves an xmlrpc method signature from a server which supports system.methodSignature
718
     * @param Client $client
719
     * @param string $methodName
720
     * @param array $extraOptions
721
     * @return false|array
722
     */
723 65
    protected function retrieveMethodSignature($client, $methodName, array $extraOptions = array())
724
    {
725 65
        $namespace = '\\PhpXmlRpc\\';
726 65
        $reqClass = $namespace . 'Request';
727 65
        $valClass = $namespace . 'Value';
728 65
        $decoderClass = $namespace . 'Encoder';
729
730 65
        $debug = isset($extraOptions['debug']) ? ($extraOptions['debug']) : 0;
731 65
        $timeout = isset($extraOptions['timeout']) ? (int)$extraOptions['timeout'] : 0;
732 65
        $protocol = isset($extraOptions['protocol']) ? $extraOptions['protocol'] : '';
733 65
        $sigNum = isset($extraOptions['signum']) ? (int)$extraOptions['signum'] : 0;
734
735 65
        $req = new $reqClass('system.methodSignature');
736 65
        $req->addparam(new $valClass($methodName));
737 65
        $client->setDebug($debug);
738 65
        $response = $client->send($req, $timeout, $protocol);
739 65
        if ($response->faultCode()) {
740
            Logger::instance()->errorLog('XML-RPC: ' . __METHOD__ . ': could not retrieve method signature from remote server for method ' . $methodName);
741
            return false;
742
        }
743
744 65
        $mSig = $response->value();
745 65
        if ($client->return_type != 'phpvals') {
746 65
            $decoder = new $decoderClass();
747 65
            $mSig = $decoder->decode($mSig);
748
        }
749
750 65
        if (!is_array($mSig) || count($mSig) <= $sigNum) {
751
            Logger::instance()->errorLog('XML-RPC: ' . __METHOD__ . ': could not retrieve method signature nr.' . $sigNum . ' from remote server for method ' . $methodName);
752
            return false;
753
        }
754
755 65
        return $mSig[$sigNum];
756
    }
757
758
    /**
759
     * @param Client $client
760
     * @param string $methodName
761
     * @param array $extraOptions
762
     * @return string in case of any error, an empty string is returned, no warnings generated
763
     */
764 65
    protected function retrieveMethodHelp($client, $methodName, array $extraOptions = array())
765
    {
766 65
        $namespace = '\\PhpXmlRpc\\';
767 65
        $reqClass = $namespace . 'Request';
768 65
        $valClass = $namespace . 'Value';
769
770 65
        $debug = isset($extraOptions['debug']) ? ($extraOptions['debug']) : 0;
771 65
        $timeout = isset($extraOptions['timeout']) ? (int)$extraOptions['timeout'] : 0;
772 65
        $protocol = isset($extraOptions['protocol']) ? $extraOptions['protocol'] : '';
773
774 65
        $mDesc = '';
775
776 65
        $req = new $reqClass('system.methodHelp');
777 65
        $req->addparam(new $valClass($methodName));
778 65
        $client->setDebug($debug);
779 65
        $response = $client->send($req, $timeout, $protocol);
780 65
        if (!$response->faultCode()) {
781 65
            $mDesc = $response->value();
782 65
            if ($client->return_type != 'phpvals') {
783 65
                $mDesc = $mDesc->scalarval();
0 ignored issues
show
Bug introduced by
The method scalarval() does not exist on integer. ( Ignorable by Annotation )

If this is a false-positive, you can also ignore this issue in your code via the ignore-call  annotation

783
                /** @scrutinizer ignore-call */ 
784
                $mDesc = $mDesc->scalarval();

This check looks for calls to methods that do not seem to exist on a given type. It looks for the method on the type itself as well as in inherited classes or implemented interfaces.

This is most likely a typographical error or the method has been renamed.

Loading history...
784
            }
785
        }
786
787 65
        return $mDesc;
788
    }
789
790
    /**
791
     * @param Client $client
792
     * @param string $methodName
793
     * @param array $extraOptions
794
     * @param array $mSig
795
     * @return \Closure
796
     *
797
     * @todo should we allow usage of parameter simple_client_copy to mean 'do not clone' in this case?
798
     */
799
    protected function buildWrapMethodClosure($client, $methodName, array $extraOptions, $mSig)
800
    {
801
        // we clone the client, so that we can modify it a bit independently of the original
802
        $clientClone = clone $client;
803
        $function = function() use($clientClone, $methodName, $extraOptions, $mSig)
804
        {
805
            $timeout = isset($extraOptions['timeout']) ? (int)$extraOptions['timeout'] : 0;
806
            $protocol = isset($extraOptions['protocol']) ? $extraOptions['protocol'] : '';
807
            $encodePhpObjects = isset($extraOptions['encode_php_objs']) ? (bool)$extraOptions['encode_php_objs'] : false;
808
            $decodePhpObjects = isset($extraOptions['decode_php_objs']) ? (bool)$extraOptions['decode_php_objs'] : false;
809
            if (isset($extraOptions['return_on_fault'])) {
810
                $decodeFault = true;
811
                $faultResponse = $extraOptions['return_on_fault'];
812
            } else {
813
                $decodeFault = false;
814
            }
815
816
            $namespace = '\\PhpXmlRpc\\';
817
            $reqClass = $namespace . 'Request';
818
            $encoderClass = $namespace . 'Encoder';
819
            $valueClass = $namespace . 'Value';
820
821
            $encoder = new $encoderClass();
822
            $encodeOptions = array();
823
            if ($encodePhpObjects) {
824
                $encodeOptions[] = 'encode_php_objs';
825
            }
826
            $decodeOptions = array();
827
            if ($decodePhpObjects) {
828
                $decodeOptions[] = 'decode_php_objs';
829
            }
830
831
            /// @todo check for insufficient nr. of args besides excess ones? note that 'source' version does not...
832
833
            // support one extra parameter: debug
834
            $maxArgs = count($mSig)-1; // 1st element is the return type
835
            $currentArgs = func_get_args();
836
            if (func_num_args() == ($maxArgs+1)) {
837
                $debug = array_pop($currentArgs);
838
                $clientClone->setDebug($debug);
839
            }
840
841
            $xmlrpcArgs = array();
842
            foreach($currentArgs as $i => $arg) {
843
                if ($i == $maxArgs) {
844
                    break;
845
                }
846
                $pType = $mSig[$i+1];
847
                if ($pType == 'i4' || $pType == 'i8' || $pType == 'int' || $pType == 'boolean' || $pType == 'double' ||
848
                    $pType == 'string' || $pType == 'dateTime.iso8601' || $pType == 'base64' || $pType == 'null'
849
                ) {
850
                    // by building directly xmlrpc values when type is known and scalar (instead of encode() calls),
851
                    // we make sure to honour the xmlrpc signature
852
                    $xmlrpcArgs[] = new $valueClass($arg, $pType);
853
                } else {
854
                    $xmlrpcArgs[] = $encoder->encode($arg, $encodeOptions);
855
                }
856
            }
857
858
            $req = new $reqClass($methodName, $xmlrpcArgs);
859
            // use this to get the maximum decoding flexibility
860
            $clientClone->return_type = 'xmlrpcvals';
861
            $resp = $clientClone->send($req, $timeout, $protocol);
862
            if ($resp->faultcode()) {
863
                if ($decodeFault) {
864
                    if (is_string($faultResponse) && ((strpos($faultResponse, '%faultCode%') !== false) ||
0 ignored issues
show
Comprehensibility Best Practice introduced by
The variable $faultResponse does not seem to be defined for all execution paths leading up to this point.
Loading history...
865
                            (strpos($faultResponse, '%faultString%') !== false))) {
866
                        $faultResponse = str_replace(array('%faultCode%', '%faultString%'),
867
                            array($resp->faultCode(), $resp->faultString()), $faultResponse);
868
                    }
869
                    return $faultResponse;
870
                } else {
871
                    return $resp;
872
                }
873
            } else {
874
                return $encoder->decode($resp->value(), $decodeOptions);
875
            }
876
        };
877
878
        return $function;
879
    }
880
881
    /**
882
     * @param Client $client
883
     * @param string $methodName
884
     * @param array $extraOptions
885
     * @param string $newFuncName
886
     * @param array $mSig
887
     * @param string $mDesc
888
     * @return array
889
     */
890 65
    public function buildWrapMethodSource($client, $methodName, array $extraOptions, $newFuncName, $mSig, $mDesc='')
891
    {
892 65
        $timeout = isset($extraOptions['timeout']) ? (int)$extraOptions['timeout'] : 0;
893 65
        $protocol = isset($extraOptions['protocol']) ? $extraOptions['protocol'] : '';
894 65
        $encodePhpObjects = isset($extraOptions['encode_php_objs']) ? (bool)$extraOptions['encode_php_objs'] : false;
895 65
        $decodePhpObjects = isset($extraOptions['decode_php_objs']) ? (bool)$extraOptions['decode_php_objs'] : false;
896 65
        $clientCopyMode = isset($extraOptions['simple_client_copy']) ? (int)($extraOptions['simple_client_copy']) : 0;
897 65
        $prefix = isset($extraOptions['prefix']) ? $extraOptions['prefix'] : 'xmlrpc';
898 65
        if (isset($extraOptions['return_on_fault'])) {
899
            $decodeFault = true;
900
            $faultResponse = $extraOptions['return_on_fault'];
901
        } else {
902 65
            $decodeFault = false;
903 65
            $faultResponse = '';
904
        }
905
906 65
        $namespace = '\\PhpXmlRpc\\';
907
908 65
        $code = "function $newFuncName (";
909 65
        if ($clientCopyMode < 2) {
910
            // client copy mode 0 or 1 == full / partial client copy in emitted code
911 49
            $verbatimClientCopy = !$clientCopyMode;
912 49
            $innerCode = $this->buildClientWrapperCode($client, $verbatimClientCopy, $prefix, $namespace);
913 49
            $innerCode .= "\$client->setDebug(\$debug);\n";
914 49
            $this_ = '';
915
        } else {
916
            // client copy mode 2 == no client copy in emitted code
917 17
            $innerCode = '';
918 17
            $this_ = 'this->';
919
        }
920 65
        $innerCode .= "\$req = new {$namespace}Request('$methodName');\n";
921
922 65
        if ($mDesc != '') {
923
            // take care that PHP comment is not terminated unwillingly by method description
924 65
            $mDesc = "/**\n* " . str_replace('*/', '* /', $mDesc) . "\n";
925
        } else {
926
            $mDesc = "/**\nFunction $newFuncName\n";
927
        }
928
929
        // param parsing
930 65
        $innerCode .= "\$encoder = new {$namespace}Encoder();\n";
931 65
        $plist = array();
932 65
        $pCount = count($mSig);
933 65
        for ($i = 1; $i < $pCount; $i++) {
934 49
            $plist[] = "\$p$i";
935 49
            $pType = $mSig[$i];
936 49
            if ($pType == 'i4' || $pType == 'i8' || $pType == 'int' || $pType == 'boolean' || $pType == 'double' ||
937 49
                $pType == 'string' || $pType == 'dateTime.iso8601' || $pType == 'base64' || $pType == 'null'
938
            ) {
939
                // only build directly xmlrpc values when type is known and scalar
940 49
                $innerCode .= "\$p$i = new {$namespace}Value(\$p$i, '$pType');\n";
941
            } else {
942
                if ($encodePhpObjects) {
943
                    $innerCode .= "\$p$i = \$encoder->encode(\$p$i, array('encode_php_objs'));\n";
944
                } else {
945
                    $innerCode .= "\$p$i = \$encoder->encode(\$p$i);\n";
946
                }
947
            }
948 49
            $innerCode .= "\$req->addparam(\$p$i);\n";
949 49
            $mDesc .= '* @param ' . $this->xmlrpc2PhpType($pType) . " \$p$i\n";
950
        }
951 65
        if ($clientCopyMode < 2) {
952 49
            $plist[] = '$debug=0';
953 49
            $mDesc .= "* @param int \$debug when 1 (or 2) will enable debugging of the underlying {$prefix} call (defaults to 0)\n";
954
        }
955 65
        $plist = implode(', ', $plist);
956 65
        $mDesc .= '* @return ' . $this->xmlrpc2PhpType($mSig[0]) . " (or an {$namespace}Response obj instance if call fails)\n*/\n";
957
958 65
        $innerCode .= "\$res = \${$this_}client->send(\$req, $timeout, '$protocol');\n";
959 65
        if ($decodeFault) {
960
            if (is_string($faultResponse) && ((strpos($faultResponse, '%faultCode%') !== false) || (strpos($faultResponse, '%faultString%') !== false))) {
961
                $respCode = "str_replace(array('%faultCode%', '%faultString%'), array(\$res->faultCode(), \$res->faultString()), '" . str_replace("'", "''", $faultResponse) . "')";
962
            } else {
963
                $respCode = var_export($faultResponse, true);
964
            }
965
        } else {
966 65
            $respCode = '$res';
967
        }
968 65
        if ($decodePhpObjects) {
969 17
            $innerCode .= "if (\$res->faultcode()) return $respCode; else return \$encoder->decode(\$res->value(), array('decode_php_objs'));";
970
        } else {
971 49
            $innerCode .= "if (\$res->faultcode()) return $respCode; else return \$encoder->decode(\$res->value());";
972
        }
973
974 65
        $code = $code . $plist . ") {\n" . $innerCode . "\n}\n";
975
976 65
        return array('source' => $code, 'docstring' => $mDesc);
977
    }
978
979
    /**
980
     * Similar to wrapXmlrpcMethod, but will generate a php class that wraps
981
     * all xmlrpc methods exposed by the remote server as own methods.
982
     * For more details see wrapXmlrpcMethod.
983
     *
984
     * For a slimmer alternative, see the code in demo/client/proxy.php
985
     *
986
     * Note that unlike wrapXmlrpcMethod, we always have to generate php code here. It seems that php 7 will have anon classes...
987
     *
988
     * @param Client $client the client obj all set to query the desired server
989
     * @param array $extraOptions list of options for wrapped code. See the ones from wrapXmlrpcMethod plus
990
     *              - string method_filter      regular expression
991
     *              - string new_class_name
992
     *              - string prefix
993
     *              - bool   simple_client_copy set it to true to avoid copying all properties of $client into the copy made in the new class
994
     *
995
     * @return mixed false on error, the name of the created class if all ok or an array with code, class name and comments (if the appropriate option is set in extra_options)
996
     */
997 17
    public function wrapXmlrpcServer($client, $extraOptions = array())
998
    {
999 17
        $methodFilter = isset($extraOptions['method_filter']) ? $extraOptions['method_filter'] : '';
1000 17
        $timeout = isset($extraOptions['timeout']) ? (int)$extraOptions['timeout'] : 0;
1001 17
        $protocol = isset($extraOptions['protocol']) ? $extraOptions['protocol'] : '';
1002 17
        $newClassName = isset($extraOptions['new_class_name']) ? $extraOptions['new_class_name'] : '';
1003 17
        $encodePhpObjects = isset($extraOptions['encode_php_objs']) ? (bool)$extraOptions['encode_php_objs'] : false;
1004 17
        $decodePhpObjects = isset($extraOptions['decode_php_objs']) ? (bool)$extraOptions['decode_php_objs'] : false;
1005 17
        $verbatimClientCopy = isset($extraOptions['simple_client_copy']) ? !($extraOptions['simple_client_copy']) : true;
1006 17
        $buildIt = isset($extraOptions['return_source']) ? !($extraOptions['return_source']) : true;
1007 17
        $prefix = isset($extraOptions['prefix']) ? $extraOptions['prefix'] : 'xmlrpc';
1008 17
        $namespace = '\\PhpXmlRpc\\';
1009
1010 17
        $reqClass = $namespace . 'Request';
1011 17
        $decoderClass = $namespace . 'Encoder';
1012
1013 17
        $req = new $reqClass('system.listMethods');
1014 17
        $response = $client->send($req, $timeout, $protocol);
1015 17
        if ($response->faultCode()) {
1016
            Logger::instance()->errorLog('XML-RPC: ' . __METHOD__ . ': could not retrieve method list from remote server');
1017
1018
            return false;
1019
        } else {
1020 17
            $mList = $response->value();
1021 17
            if ($client->return_type != 'phpvals') {
1022 17
                $decoder = new $decoderClass();
1023 17
                $mList = $decoder->decode($mList);
1024
            }
1025 17
            if (!is_array($mList) || !count($mList)) {
1026
                Logger::instance()->errorLog('XML-RPC: ' . __METHOD__ . ': could not retrieve meaningful method list from remote server');
1027
1028
                return false;
1029
            } else {
1030
                // pick a suitable name for the new function, avoiding collisions
1031 17
                if ($newClassName != '') {
1032
                    $xmlrpcClassName = $newClassName;
1033
                } else {
1034 17
                    $xmlrpcClassName = $prefix . '_' . preg_replace(array('/\./', '/[^a-zA-Z0-9_\x7f-\xff]/'),
1035 17
                            array('_', ''), $client->server) . '_client';
1036
                }
1037 17
                while ($buildIt && class_exists($xmlrpcClassName)) {
1038 16
                    $xmlrpcClassName .= 'x';
1039
                }
1040
1041
                /// @todo add function setdebug() to new class, to enable/disable debugging
1042 17
                $source = "class $xmlrpcClassName\n{\npublic \$client;\n\n";
1043 17
                $source .= "function __construct()\n{\n";
1044 17
                $source .= $this->buildClientWrapperCode($client, $verbatimClientCopy, $prefix, $namespace);
1045 17
                $source .= "\$this->client = \$client;\n}\n\n";
1046
                $opts = array(
1047 17
                    'return_source' => true,
1048 17
                    'simple_client_copy' => 2, // do not produce code to copy the client object
1049 17
                    'timeout' => $timeout,
1050 17
                    'protocol' => $protocol,
1051 17
                    'encode_php_objs' => $encodePhpObjects,
1052 17
                    'decode_php_objs' => $decodePhpObjects,
1053 17
                    'prefix' => $prefix,
1054
                );
1055
                /// @todo build phpdoc for class definition, too
1056 17
                foreach ($mList as $mName) {
1057 17
                    if ($methodFilter == '' || preg_match($methodFilter, $mName)) {
1058
                        // note: this will fail if server exposes 2 methods called f.e. do.something and do_something
1059 17
                        $opts['new_function_name'] = preg_replace(array('/\./', '/[^a-zA-Z0-9_\x7f-\xff]/'),
1060 17
                            array('_', ''), $mName);
1061 17
                        $methodWrap = $this->wrapXmlrpcMethod($client, $mName, $opts);
1062 17
                        if ($methodWrap) {
1063 17
                            if (!$buildIt) {
1064
                                $source .= $methodWrap['docstring'];
1065
                            }
1066 17
                            $source .= $methodWrap['source'] . "\n";
1067
                        } else {
1068
                            Logger::instance()->errorLog('XML-RPC: ' . __METHOD__ . ': will not create class method to wrap remote method ' . $mName);
1069
                        }
1070
                    }
1071
                }
1072 17
                $source .= "}\n";
1073 17
                if ($buildIt) {
1074 17
                    $allOK = 0;
1075 17
                    eval($source . '$allOK=1;');
0 ignored issues
show
introduced by
The use of eval() is discouraged.
Loading history...
1076 17
                    if ($allOK) {
1077 17
                        return $xmlrpcClassName;
1078
                    } else {
1079
                        Logger::instance()->errorLog('XML-RPC: ' . __METHOD__ . ': could not create class ' . $xmlrpcClassName . ' to wrap remote server ' . $client->server);
1080
                        return false;
1081
                    }
1082
                } else {
1083
                    return array('class' => $xmlrpcClassName, 'code' => $source, 'docstring' => '');
1084
                }
1085
            }
1086
        }
1087
    }
1088
1089
    /**
1090
     * Given necessary info, generate php code that will build a client object just like the given one.
1091
     * Take care that no full checking of input parameters is done to ensure that
1092
     * valid php code is emitted.
1093
     * @param Client $client
1094
     * @param bool $verbatimClientCopy when true, copy all of the state of the client, except for 'debug' and 'return_type'
1095
     * @param string $prefix used for the return_type of the created client
1096
     * @param string $namespace
1097
     *
1098
     * @return string
1099
     */
1100 65
    protected function buildClientWrapperCode($client, $verbatimClientCopy, $prefix = 'xmlrpc', $namespace = '\\PhpXmlRpc\\' )
1101
    {
1102 65
        $code = "\$client = new {$namespace}Client('" . str_replace("'", "\'", $client->path) .
1103 65
            "', '" . str_replace("'", "\'", $client->server) . "', $client->port);\n";
1104
1105
        // copy all client fields to the client that will be generated runtime
1106
        // (this provides for future expansion or subclassing of client obj)
1107 65
        if ($verbatimClientCopy) {
1108 65
            foreach ($client as $fld => $val) {
1109 65
                if ($fld != 'debug' && $fld != 'return_type') {
1110 65
                    $val = var_export($val, true);
1111 65
                    $code .= "\$client->$fld = $val;\n";
1112
                }
1113
            }
1114
        }
1115
        // only make sure that client always returns the correct data type
1116 65
        $code .= "\$client->return_type = '{$prefix}vals';\n";
1117
        //$code .= "\$client->setDebug(\$debug);\n";
1118 65
        return $code;
1119
    }
1120
}
1121