我在编写 SOAP/XML 客户端以与一家名为 Domainbox 的公司提供的 API 通信时遇到问题。我正在使用 SOAP::Lite 模块/库在 Perl 中编写客户端。我收到以下错误消息:
可能的 SOAP 版本不匹配:信封命名空间http://schemas.xmlsoap.org/soap/envelope/是意外的。期待http://www.w3.org/2003/05/soap-envelope。
这是因为库使用 SOAP 1.1 命名空间发送 SOAP 信封,而服务器需要 SOAP 1.2。
但我无法提出解决方案,我尝试明确设置 $soap->soapversion('1.2'); 在 SOAP::Lite 对象中,但这只会影响在响应消息中收到的信封,而不影响客户端发送的信封。
服务器正在运行 ASP.net,并且似乎不想接受 SOAP 版本 1.1 消息。
默认情况下查询soapversion()方法它返回版本1.1,当我将它更改为1.2时它返回1.2但在内部它显然在某处忽略了这一点。
WSDL 似乎没有正确定义 xmlns:soap 或 xmlns:soap12 但 SOAP::Lite 也没有使用这些命名空间。我会提供一个链接,但我不能在这里发布超过两个。
我也尝试使用 SOAP::Lite 的 service() 方法,但这根本没有区别。
这是我正在使用的代码:
#!/usr/bin/perl -w
use strict;
use SOAP::Lite;
use Data::Dumper;
### API Info
my $reseller = 'Removed';
my $username = 'Removed';
my $password = 'Removed';
my $soap = SOAP::Lite->new(proxy => 'https://sandbox.domainbox.net/');
$soap->default_ns('https://sandbox.domainbox.net/');
$soap->soapversion('1.2');
my $header = SOAP::Header->new->attr({xmlns => 'https://sandbox.domainbox.net/'});
my $body = SOAP::Data->name('CheckDomainAvailability' => \SOAP::Data->value(
SOAP::Data->name('AuthenticationParameters' => \SOAP::Data->value(
SOAP::Data->name('Reseller' => $reseller),
SOAP::Data->name('Username' => $username),
SOAP::Data->name('Password' => $password),
)
)
)
);
$soap->on_action( sub { "https://sandbox.domainbox.net/" });
my $som = $soap->call('',
$header,
$body
);
die $som->faultstring if ($som->fault);
print $som->result, "\n";
#print Dumper($som);
额外的:
信封中的 xmlns:soap 属性设置为http://schemas.xmlsoap.org/soap/envelope,无论类中的 soapversion 设置如何。我认为这是 Perl 模块中的错误或导致它的 WSDL 的一些奇怪之处。这是 WSDL:http ://sandbox.domainbox.net/?WSDL
XML 请求消息:
<?xml version="1.0" encoding="UTF-8"?><Envelope
soap:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"
xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"
xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/"
xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org
/2001/XMLSchema-instance"><Header><c-gensym3
xmlns="https://sandbox.domainbox.net/" /></Header><Body><DomainboxAPI
xmlns="https://sandbox.domainbox.net/"><CheckDomainAvailability>
<AuthenticationParameters><Reseller
xsi:type="xsd:string">Removed</Reseller><Username
xsi:type="xsd:string">Removed</Username><Password
xsi:type="xsd:string">Removed</Password></AuthenticationParameters>
</CheckDomainAvailability></DomainboxAPI></Body></Envelope>
XML 响应消息:
<?xml version="1.0" encoding="utf-8"?><soap:Envelope
xmlns:soap="http://www.w3.org/2003/05/soap-envelope"
xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
xmlns:xsd="http://www.w3.org/2001/XMLSchema"><soap:Header>
<soap12:Upgrade xmlns:soap12="http://www.w3.org/2003/05/soap-envelope">
<soap12:SupportedEnvelope qname="soap12:Envelope"
xmlns:soap12="http://www.w3.org/2003/05/soap-envelope"/></soap12:Upgrade>
</soap:Header><soap:Body><soap:Fault><soap:Code>
<soap:Value>soap:VersionMismatch</soap:Value></soap:Code><soap:Reason>
<soap:Text xml:lang="en">Possible SOAP version mismatch: Envelope
namespace was unexpected. Expecting http://www.w3.org/2003/05/soap-
envelope.</soap:Text></soap:Reason><soap:Detail /></soap:Fault>
</soap:Body></soap:Envelope>
更新:
谢谢鲍罗丁,你是正确的。SOAP::Lite 模块似乎没有将soapversion 参数传递给SOAP::Lite::Serializer 对象。我现在使用下面的代码来初始化 SOAP 对象,它工作得很好。
my $soap = SOAP::Lite->new(proxy => 'https://sandbox.domainbox.net/');
$soap->default_ns('https://sandbox.domainbox.net/');
$soap->soapversion('1.2');
$soap->serializer->soapversion('1.2');
我应该指出,我还必须调整我的代码以适应 Domainbox 所需的 XML 格式,但我现在得到了有效的响应。
我现在唯一的问题是如何处理 SOAP::Lite::SOM 作为消息结果返回的哈希引用。我认为这需要一个单独的问题。