[Bug 663931] New: regression from 0.710.08 soap:Client,Application failed during request deserialization

bugzilla at redhat.com bugzilla at redhat.com
Fri Dec 17 12:17:38 UTC 2010


Please do not reply directly to this email. All additional
comments should be made in the comments box of this bug.

Summary: regression from 0.710.08 soap:Client,Application failed during request deserialization

https://bugzilla.redhat.com/show_bug.cgi?id=663931

           Summary: regression from 0.710.08 soap:Client,Application
                    failed during request deserialization
           Product: Fedora
           Version: 14
          Platform: Unspecified
        OS/Version: Unspecified
            Status: NEW
          Severity: medium
          Priority: low
         Component: perl-SOAP-Lite
        AssignedTo: mmcgrath at redhat.com
        ReportedBy: michiel.beijen at gmail.com
         QAContact: extras-qa at fedoraproject.org
                CC: fedora-perl-devel-list at redhat.com, mmcgrath at redhat.com
    Classification: Fedora


Description of problem:
Running SOAP::Lite under mod_perl the XML-RPC interface is not working with the
latest version of SOAP::Lite, included in (at least) F14 and rawhide.

https://rt.cpan.org/Public/Bug/Display.html?id=58538

Version-Release number of selected component (if applicable): 0.712


How reproducible:
See https://rt.cpan.org/Public/Bug/Display.html?id=58538

Steps to Reproduce:
see https://rt.cpan.org/Public/Bug/Display.html?id=58538

Here's a patch:

--- lib/SOAP/Transport/HTTP.pm.orig 2010-10-05 16:06:05.563710856 +0100
+++ lib/SOAP/Transport/HTTP.pm 2010-10-05 16:09:20.142813758 +0100
@@ -566,9 +566,16 @@
if ( !$chunked ) {
my $buffer;
binmode(STDIN);
- while ( sysread( STDIN, $buffer, $length ) ) {
- $content .= $buffer;
- last if ( length($content) >= $length );
+ if ( defined $ENV{'MOD_PERL'} ) {
+ while ( read( STDIN, $buffer, $length ) ) {
+ $content .= $buffer;
+ last if ( length($content) >= $length );
+ }
+ } else {
+ while ( sysread( STDIN, $buffer, $length ) ) {
+ $content .= $buffer;
+ last if ( length($content) >= $length );
+ }
}
}

-- 
Configure bugmail: https://bugzilla.redhat.com/userprefs.cgi?tab=email
------- You are receiving this mail because: -------
You are on the CC list for the bug.



More information about the perl-devel mailing list