1 | <?php |
---|
2 | /** |
---|
3 | * WSDL client. |
---|
4 | * |
---|
5 | * PHP versions 4 and 5 |
---|
6 | * |
---|
7 | * LICENSE: This source file is subject to version 2.02 of the PHP license, |
---|
8 | * that is bundled with this package in the file LICENSE, and is available at |
---|
9 | * through the world-wide-web at http://www.php.net/license/2_02.txt. If you |
---|
10 | * did not receive a copy of the PHP license and are unable to obtain it |
---|
11 | * through the world-wide-web, please send a note to license@php.net so we can |
---|
12 | * mail you a copy immediately. |
---|
13 | * |
---|
14 | * @category Web Services |
---|
15 | * @package SOAP |
---|
16 | * @author Shane Caraveo <Shane@Caraveo.com> Port to PEAR and more |
---|
17 | * @author Jan Schneider <jan@horde.org> Maintenance |
---|
18 | * @copyright 2003-2007 The PHP Group |
---|
19 | * @license http://www.php.net/license/2_02.txt PHP License 2.02 |
---|
20 | * @link http://pear.php.net/package/SOAP |
---|
21 | */ |
---|
22 | |
---|
23 | require_once 'SOAP/Client.php'; |
---|
24 | |
---|
25 | /* This client runs against the example server in SOAP/example/server.php. It |
---|
26 | * does not use WSDL to run these requests, but that can be changed easily by |
---|
27 | * simply adding '?wsdl' to the end of the url. */ |
---|
28 | $wsdl = new SOAP_WSDL('http://localhost/SOAP/example/server.php?wsdl'); |
---|
29 | $soapclient = $wsdl->getProxy(); |
---|
30 | |
---|
31 | $ret = $soapclient->echoStringSimple('this is a test string'); |
---|
32 | // echo $soapclient->getWire(); |
---|
33 | print_r($ret); |
---|
34 | |
---|
35 | $ret = $soapclient->echoString('this is a test string'); |
---|
36 | print_r($ret); |
---|
37 | |
---|
38 | $ret = $soapclient->divide(22, 7); |
---|
39 | // echo $soapclient->getWire(); |
---|
40 | if (is_a($ret, 'PEAR_Error')) { |
---|
41 | echo 'Error: ' . $ret->getMessage() . "\n"; |
---|
42 | } else { |
---|
43 | echo 'Quotient is ' . $ret . "\n"; |
---|
44 | } |
---|
45 | |
---|
46 | $ret = $soapclient->divide(22, 0); |
---|
47 | if (is_a($ret, 'PEAR_Error')) { |
---|
48 | echo 'Error: ' . $ret->getMessage() . "\n"; |
---|
49 | } else { |
---|
50 | echo 'Quotient is ' . $ret . "\n"; |
---|
51 | } |
---|
52 | |
---|
53 | /* SOAPStruct is defined in the following file. */ |
---|
54 | require_once './example_types.php'; |
---|
55 | $struct = new SOAPStruct('test string', 123, 123.123); |
---|
56 | |
---|
57 | /* Tell the client to translate to classes we provide if possible. |
---|
58 | * You can explicitly set the translation for a specific class. |
---|
59 | * auto_translation works for all cases, but opens ANY class in the script to |
---|
60 | * be used as a data type, and may not be desireable. Both can be used on |
---|
61 | * client or server. */ |
---|
62 | $soapclient->_auto_translation = true; |
---|
63 | |
---|
64 | $soapclient->setTypeTranslation('{http://soapinterop.org/xsd}SOAPStruct', |
---|
65 | 'SOAPStruct'); |
---|
66 | $ret = $soapclient->echoStruct($struct->__to_soap()); |
---|
67 | // echo $soapclient->getWire(); |
---|
68 | print_r($ret); |
---|
69 | |
---|
70 | /* PHP doesn't support multiple OUT parameters in function calls, so we must |
---|
71 | * do a little work to make it happen here. This requires knowledge on the |
---|
72 | * developers part to figure out how they want to deal with it. */ |
---|
73 | $ret = $soapclient->echoStructAsSimpleTypes($struct->__to_soap()); |
---|
74 | if (is_a($ret, 'PEAR_Error')) { |
---|
75 | echo 'Error: ' . $ret->getMessage() . "\n"; |
---|
76 | } else { |
---|
77 | list($string, $int, $float) = array_values($ret); |
---|
78 | } |
---|
79 | echo "varString: $string\nvarInt: $int\nvarFloat: $float\n"; |
---|