Re: [Soaplite-devel] another Expect: 100-continue problem

[Felix J. O. <fjo...@og...>]

Hi Martin,

that's on the wire:

POST /soap HTTP/1.1
User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; MS Web Services Client
Protocol 2.0.50727.1433)
VsDebuggerCausalityData:
uIDPo2vDfno51ExKp/wPCQq4mlUAAAAA9O1ffVSkc0y4KYb7mMHMmU4ykIL3HWpIqwW7cp9xR5QA
CQAA
Content-Type: text/xml; charset=utf-8
SOAPAction: ""
Host: fjo-otrs.dts-online.net
Content-Length: 498
Expect: 100-continue
Connection: Keep-Alive

HTTP/1.1 100 Continue

<?xml version="1.0" encoding="utf-8"?><soap:Envelope
xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"
xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/"
xmlns:tns="http://fjo-otrs.dts-online.net/soaptest"
xmlns:types="http://fjo-otrs.dts-online.net/soaptest/encodedTypes"
xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
xmlns:xsd="http://www.w3.org/2001/XMLSchema"><soap:Body
soap:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"><tns:test
/></soap:Body></soap:Envelope>

HTTP/1.1 200 OK
Date: Thu, 29 Nov 2007 08:16:13 GMT
Server: Apache/2.2.6 (FreeBSD) mod_perl/2.0.3 Perl/v5.8.8
Content-Length: 501
Content-Type: text/xml; charset=utf-8
SOAPServer: SOAP::Lite/Perl/0.69
Keep-Alive: timeout=5, max=100
Connection: Keep-Alive

HTTP/1.1 100 Continue

<?xml version="1.0" encoding="UTF-8"?><soap:Envelope
xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/"
xmlns:xsd="http://www.w3.org/2001/XMLSchema"
soap:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"
xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"><soap:Body><testRespo
nse xmlns="http://fjo-otrs.dts-online.net/soaptest"><s-gensym3
xsi:type="xsd:string">hello, world</s-gensym3></testResponse></s

As you can see, </soap:Body> is chopped, and </soap:Envelope> is missing,
since that additional "HTTP/1.1 100 Continue" eats exactly their content
length.

My httpd.conf:

ServerRoot      /usr/local
LoadModule      alias_module libexec/apache22/mod_alias.so
LoadModule      perl_module  libexec/apache22/mod_perl.so
LoadModule      mime_module  libexec/apache22/mod_mime.so
TypesConfig     etc/apache22/mime.types
AcceptMutex     sysvsem
NameVirtualHost *
PerlOptions     +ParseHeaders
PerlOptions     +SetupEnv
...
<LocationMatch ^/soap$>
  SetHandler perl-script
  PerlResponseHandler Apache::SOAP
  PerlSetVar dispatch_to /usr/local/soap
</LocationMatch>

/usr/local/soap/soaptest.pm:

#!/usr/bin/perl

package soaptest;

=begin WSDL

_RETURN $string just hello world
_DOC test function

=end WSDL

=cut

sub test ()
{
    return "hello, world";
}

1;

HTH,
Felix