Minahito
minah****@users*****
2006年 10月 14日 (土) 23:55:28 JST
Index: xoops2jp/html/modules/legacy/lib/ShadePlus/SoapClient.class.php diff -u /dev/null xoops2jp/html/modules/legacy/lib/ShadePlus/SoapClient.class.php:1.1.2.1 --- /dev/null Sat Oct 14 23:55:28 2006 +++ xoops2jp/html/modules/legacy/lib/ShadePlus/SoapClient.class.php Sat Oct 14 23:55:28 2006 @@ -0,0 +1,96 @@ +<?php +/** + * @package ShadePlus + * @varsion $Id$ + * + * In the original BSD license, both occurrences of the phrase "COPYRIGHT + * HOLDERS AND CONTRIBUTORS" in the disclaimer read "REGENTS AND CONTRIBUTORS". + * + * Copyright (c) 2006, XOOPS Cube Project team/minahito (minah****@users*****) + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions are met: + * + * a) Redistributions of source code must retain the above copyright notice, + * this list of conditions and the following disclaimer. + * b) Redistributions in binary form must reproduce the above copyright notice, + * this list of conditions and the following disclaimer in the documentation + * and/or other materials provided with the distribution. + * c) Neither the name of the XOOPS Cube Project team nor the names of its + * contributors may be used to endorse or promote products derived from this + * software without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" + * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE + * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR + * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF + * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS + * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN + * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) + * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE + * POSSIBILITY OF SUCH DAMAGE. + */ + +if (!defined('XCube_AbstractServiceClient')) exit(); + +class ShadePlus_SoapClient extends XCube_AbstractServiceClient +{ + var $mClient = null; + + function Shade_SoapClient(&$service) + { + parent::XCube_AbstractServiceClient($service); + $this->mClient =& new soap_client($service, true); + } + + function call($operation, $args) + { + $root =& XCube_Root::getSingleton(); + + $args = $this->_encodeUTF8($args, $root->mLanguageManager); + + $retValue = $this->mClient->call($operation, $args); + + if (is_array($retValue)) { + $retValue = $this->_decodeUTF8($retValue, $root->mLanguageManager); + } + else { + $retValue = $root->mLanguageManager->decodeUTF8($retValue); + } + + return $retValue; + } + + function _encodeUTF8($arr, &$languageManager) + { + foreach (array_keys($arr) as $key) { + if (is_array($arr[$key])) { + $arr[$key] = $this->_encodeUTF8($arr[$key], $languageManager); + } + else { + $arr[$key] = $languageManager->encodeUTF8($arr[$key]); + } + } + + return $arr; + } + + function _decodeUTF8($arr, &$languageManager) + { + foreach (array_keys($arr) as $key) { + if (is_array($arr[$key])) { + $arr[$key] = $this->_decodeUTF8($arr[$Key], $languageManager); + } + else { + $arr[$Key] = $languageManager->decodeUTF8($arr[$key]); + } + } + + return $arr; + } +} + +?> \ No newline at end of file Index: xoops2jp/html/modules/legacy/lib/ShadePlus/ServiceServer.class.php diff -u /dev/null xoops2jp/html/modules/legacy/lib/ShadePlus/ServiceServer.class.php:1.1.2.1 --- /dev/null Sat Oct 14 23:55:28 2006 +++ xoops2jp/html/modules/legacy/lib/ShadePlus/ServiceServer.class.php Sat Oct 14 23:55:28 2006 @@ -0,0 +1,158 @@ +<?php +/** + * @package ShadePlus + * @varsion $Id$ + * + * In the original BSD license, both occurrences of the phrase "COPYRIGHT + * HOLDERS AND CONTRIBUTORS" in the disclaimer read "REGENTS AND CONTRIBUTORS". + * + * Copyright (c) 2006, XOOPS Cube Project team/minahito (minah****@users*****) + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions are met: + * + * a) Redistributions of source code must retain the above copyright notice, + * this list of conditions and the following disclaimer. + * b) Redistributions in binary form must reproduce the above copyright notice, + * this list of conditions and the following disclaimer in the documentation + * and/or other materials provided with the distribution. + * c) Neither the name of the XOOPS Cube Project team nor the names of its + * contributors may be used to endorse or promote products derived from this + * software without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" + * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE + * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR + * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF + * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS + * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN + * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) + * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE + * POSSIBILITY OF SUCH DAMAGE. + */ + +class ShadePlus_ServiceServer +{ + var $_mService; + + var $_mServer; + + function ShadePlus_ServiceServer(&$service) + { + $this->_mService =& $service; + $this->_mServer =& new ShadeSoap_NusoapServer(); + + $this->_mServer->configureWSDL($this->_mService->mServiceName, $this->_mService->mNameSpace); + $this->_mServer->wsdl->schemaTargetNamespace = $this->_mService->mNameSpace; + } + + function prepare() + { + $this->_parseType(); + $this->_parseFunction(); + } + + function _parseType() + { + // + // FIXME + // + foreach ($this->_mService->_mTypes as $className) { + if (class_exists($className)) { + if (call_user_func(array($className, 'isArray')) == true) { + $targetClassName = call_user_func(array($className, 'getClassName')); + + if (XCube_ServiceUtils::isXSD($targetClassName)) { + $targetClassName = 'xsd:' . $targetClassName; + } + else { + $targetClassName = 'tns:' . $targetClassName; + } + + $this->_mServer->wsdl->addComplexType( + $className, + 'complexType', + 'array', + '', + 'SOAP-ENC:Array', + array(), + array( + array('ref' => 'SOAP-ENC:arrayType', 'wsdl:arrayType' => $targetClassName . '[]') + ), + $targetClassName + ); + } + else { + $t_fieldArr = call_user_func(array($className, 'getPropertyDefinition')); + $t_arr = array(); + foreach ($t_fieldArr as $t_field) { + $name = $t_field['name']; + $type = $t_field['type']; + + if (XCube_ServiceUtils::isXSD($t_field['type'])) { + $type = 'xsd:' . $type; + } + else { + $type = 'tns:' . $type; + } + + $t_arr[$name] = array('name' => $name, 'type' => $type); + } + + $this->_mServer->wsdl->addComplexType( + $className, + 'complexType', + 'struct', + 'all', + '', + $t_arr + ); + } + } + } + } + + function _parseFunction() + { + // + // FIXME + // + foreach ($this->_mService->_mFunctions as $func) { + if (XCube_ServiceUtils::isXSD($func['out'])) { + $t_out = 'xsd:' . $func['out']; + } + else { + $t_out = 'tns:' . $func['out']; + } + + $out['return'] = $t_out; + + // + // Parse IN + // + $in = array(); + foreach ($func['in'] as $name => $type) { + if (XCube_ServiceUtils::isXSD($type)) { + $t_type = 'xsd:' . $type; + } + else { + $t_type = 'tns:' . $type; + } + $in[$name] = $t_type; + } + + $this->_mServer->register($this->_mService->mClassName . "." . $func['name'], $in, $out, $this->_mService->mNameSpace); + } + } + + function executeService() + { + $HTTP_RAW_POST_DATA = isset($GLOBALS['HTTP_RAW_POST_DATA'])? $GLOBALS['HTTP_RAW_POST_DATA'] : null; + $this->_mServer->service($HTTP_RAW_POST_DATA); + } +} + +?> \ No newline at end of file
