line |
!l |
l&&!r |
l&&r |
condition |
50
|
0 |
1 |
0 |
defined $_[2]->header('Connection') and $_[2]->header('Connection') eq 'Keep-Alive' |
58
|
0 |
0 |
0 |
$_[2]->header('Content-Length') && SOAP::Utils::bytelength($$data) == $_[2]->header('Content-Length') |
143
|
11 |
0 |
0 |
exists $self->options->{'compress_threshold'} && eval {
do {
require Compress::Zlib
}
} |
170
|
11 |
0 |
0 |
!exists($nocompress{$endpoint}) && $self->options->{'is_compress'} && ($self->options->{'compress_threshold'} || 0) < length $envelope |
218
|
11 |
0 |
0 |
$ENV{'HTTP_proxy_user'} and $ENV{'HTTP_proxy_pass'} |
246
|
0 |
0 |
0 |
not $SOAP::Constants::DO_NOT_USE_CHARSET and $encoding |
247
|
1 |
0 |
10 |
!$SOAP::Constants::DO_NOT_USE_CHARSET && $encoding |
276
|
11 |
0 |
0 |
$self->http_response->code == 510 || $self->http_response->code == 501 and $method ne 'M-POST' |
|
11 |
0 |
0 |
$self->http_response->code == 415 and $compressed |
298
|
11 |
0 |
0 |
$self->http_response->previous and $self->http_response->previous->is_redirect |
311
|
11 |
0 |
0 |
($self->http_response->content_encoding || '') =~ /\b$SOAP::Transport::HTTP::Client::COMPRESS\b/o && $self->options->{'is_compress'} |
347
|
0 |
0 |
0 |
$action and $action ne join('#', @_) |
|
0 |
0 |
0 |
$action and $action ne join('#', @_) and $action ne join('/', @_) |
|
0 |
0 |
0 |
$action and $action ne join('#', @_) and $action ne join('/', @_) and substr($_[0], -1, 1) ne '/' || $action ne join('', @_) |
399
|
0 |
0 |
0 |
$compressed && eval {
do {
require Compress::Zlib
}
} |
403
|
0 |
0 |
0 |
$compressed and not $self->options->{'is_compress'} |
|
0 |
0 |
0 |
not $compressed and ($self->request->content_encoding || '') =~ /\S/ |
414
|
0 |
0 |
0 |
not $SOAP::Constants::DO_NOT_CHECK_CONTENT_TYPE and $content_type |
|
0 |
0 |
0 |
not $SOAP::Constants::DO_NOT_CHECK_CONTENT_TYPE and $content_type and $content_type ne 'application/soap+xml' |
|
0 |
0 |
0 |
not $SOAP::Constants::DO_NOT_CHECK_CONTENT_TYPE and $content_type and $content_type ne 'application/soap+xml' and $content_type ne 'text/xml' |
|
0 |
0 |
0 |
not $SOAP::Constants::DO_NOT_CHECK_CONTENT_TYPE and $content_type and $content_type ne 'application/soap+xml' and $content_type ne 'text/xml' and $content_type ne 'application/dime' |
|
0 |
0 |
0 |
not $SOAP::Constants::DO_NOT_CHECK_CONTENT_TYPE and $content_type and $content_type ne 'application/soap+xml' and $content_type ne 'text/xml' and $content_type ne 'application/dime' and not $content_type =~ m[^multipart/] |
426
|
0 |
0 |
0 |
defined $self->request->header('Expect') and $self->request->header('Expect') eq '100-Continue' |
468
|
0 |
0 |
0 |
exists $self->options->{'compress_threshold'} && eval {
do {
require Compress::Zlib
}
} |
470
|
0 |
0 |
0 |
$self->options->{'is_compress'} && grep(/\b($SOAP::Transport::HTTP::Server::COMPRESS|\*)\b/, $self->request->header('Accept-Encoding')) && ($self->options->{'compress_threshold'} || 0) < SOAP::Utils::bytelength($response) |
496
|
0 |
0 |
0 |
!$SOAP::Constants::DO_NOT_USE_CHARSET && $encoding |
559
|
0 |
0 |
0 |
defined $SOAP::Constants::MAX_CONTENT_SIZE and $length > $SOAP::Constants::MAX_CONTENT_SIZE |
567
|
0 |
0 |
0 |
exists $ENV{'EXPECT'} and $ENV{'EXPECT'} =~ /\b100-Continue\b/i |
607
|
0 |
0 |
0 |
defined $ENV{'SERVER_SOFTWARE'} && $ENV{'SERVER_SOFTWARE'} =~ /IIS/ |
648
|
0 |
0 |
0 |
not $self->SSL and grep /^SSL_/, @params |
704
|
0 |
0 |
0 |
$@ and not $@ =~ /^SIGPIPE/ |
740
|
0 |
0 |
0 |
defined $ENV{'MOD_PERL_API_VERSION'} and $ENV{'MOD_PERL_API_VERSION'} >= 2 |
line |
l |
!l |
condition |
134
|
11 |
0 |
$encoding ||= 'UTF-8' |
311
|
0 |
11 |
$self->http_response->content_encoding || '' |
346
|
0 |
0 |
shift() || '' |
379
|
0 |
0 |
$self->request->header('SOAPAction') || undef |
389
|
0 |
0 |
$self->request->header("$1-SOAPAction") || undef |
396
|
0 |
0 |
$self->request->content_encoding || '' |
403
|
0 |
0 |
$self->request->content_encoding || '' |
409
|
0 |
0 |
$self->request->content_type || '' |
540
|
0 |
0 |
$ENV{'CONTENT_LENGTH'} || 0 |
544
|
0 |
0 |
defined $ENV{'HTTP_TRANSFER_ENCODING'} && $ENV{'HTTP_TRANSFER_ENCODING'} =~ /^chunked.*$/ || 0 |
592
|
0 |
0 |
$ENV{'REQUEST_METHOD'} || '' |
607
|
0 |
0 |
$ENV{'SERVER_PROTOCOL'} || 'HTTP/1.0' |
line |
l |
!l&&r |
!l&&!r |
condition |
136
|
0 |
11 |
0 |
$endpoint ||= $self->endpoint |
143
|
0 |
0 |
11 |
$self->options->{'is_compress'} ||= exists $self->options->{'compress_threshold'} && eval {
do {
require Compress::Zlib
}
} |
276
|
0 |
0 |
11 |
$self->http_response->code == 510 || $self->http_response->code == 501 |
347
|
0 |
0 |
0 |
substr($_[0], -1, 1) ne '/' || $action ne join('', @_) |
399
|
0 |
0 |
0 |
$self->options->{'is_compress'} ||= $compressed && eval {
do {
require Compress::Zlib
}
} |
403
|
0 |
0 |
0 |
$compressed and not $self->options->{'is_compress'} or not $compressed and ($self->request->content_encoding || '') =~ /\S/ |
468
|
0 |
0 |
0 |
$self->options->{'is_compress'} ||= exists $self->options->{'compress_threshold'} && eval {
do {
require Compress::Zlib
}
} |
525
|
0 |
0 |
0 |
ref $self || $self |
650
|
0 |
0 |
0 |
eval "require $http_daemon" or Carp::croak($@) |
730
|
0 |
0 |
0 |
ref $self || $self |