Branch Coverage

blib/lib/AnyEvent/UWSGI.pm
Criterion Covered Total %
branch 1 246 0.4


line true false branch
62 0 0 if (my $cb = shift @{$CO_SLOT{$host}[1];}) { }
74 0 0 unless $CO_SLOT{$host}[0]
94 0 0 if $jar->{'version'} != 1
99 0 0 unless ref $paths
103 0 0 if (exists $kv->{'_expires'}) { }
0 0 elsif ($session_end) { }
105 0 0 if $anow > $kv->{'_expires'}
111 0 0 unless %$cookies
115 0 0 unless %$paths
124 0 0 if $jar->{'version'} != 1
129 0 0 unless ref $paths
131 0 0 if ($chost =~ /^\./u) { }
0 0 elsif ($chost =~ /\./u) { }
132 0 0 unless $chost eq substr($host, -length($chost))
134 0 0 unless $chost eq $host
140 0 0 unless $cpath eq substr($path, 0, length $cpath)
143 0 0 if (exists $kv->{'_expires'} and &AE::now() > $kv->{'_expires'})
150 0 0 if ($value =~ /[=;,[:space:]]/u)
188 0 0 if (defined $1) { }
0 0 elsif (defined $3) { }
198 0 0 @kv ? :
200 0 0 unless /\G\s*;/cgu
203 0 0 unless @kv
208 0 0 if (exists $kv{'max-age'}) { }
0 0 elsif (exists $kv{'expires'}) { }
220 0 0 if (exists $kv{'domain'}) { }
225 0 0 if $cdom =~ /\.$/u
229 0 0 $cdom =~ /\.[^.][^.]\.[^.][^.]$/u ? :
0 0 if $ndots < ($cdom =~ /\.[^.][^.]\.[^.][^.]$/u ? 3 : 2)
238 0 0 if /\G\s*,/cgu
251 0 0 unless @{$KA_CACHE{$ka_key};}
268 0 0 @ka ? :
299 0 0 unless /\G$/u
317 0 0 if $state->{'handle'}
382 0 0 if (my $hdr = $arg{'headers'})
390 0 0 if exists $arg{'Redirect'}
392 0 0 exists $arg{'recurse'} ? :
394 0 0 if $recurse < 0
397 0 0 exists $arg{'proxy'} ? :
407 0 0 unless $uauthority =~ /^(?: .*\@ )? ([^\@]+?) (?: : (\d+) )?$/ux
411 0 0 if defined $2
414 0 0 defined $2 ? :
0 0 unless exists $hdr{'host'}
417 0 0 if length $query
422 0 0 if (my $jar = $arg{'cookie_jar'})
425 0 0 if @$cookies
431 0 0 if ($proxy) { }
434 0 0 unless defined $rscheme
442 0 0 unless exists $hdr{'referer'}
443 0 0 unless exists $hdr{'user-agent'}
446 0 0 if length $arg{'body'} or $method ne 'GET'
451 0 0 exists $arg{'persistent'} ? :
452 0 0 exists $arg{'keepalive'} ? :
458 0 0 $keepalive ? :
0 0 $persistent ? :
459 0 0 unless exists $hdr{'te'}
474 0 0 $query =~ /^\?(.*)$/u ? :
476 0 0 defined $hdr{'content-length'} ? :
477 0 0 $method =~ /post/iu ? :
479 0 0 $rpath =~ /^([^\?]+)/u ? :
486 0 0 if ($hdr{'x-uwsgi-nginx-compatible-mode'})
492 0 0 defined $hdr{$k} ? :
497 0 0 unless defined $env->{$k}
504 0 0 defined $arg{'modifier1'} ? :
0 0 defined $arg{'modifier2'} ? :
511 0 0 unless %state
518 0 0 unless %state
522 0 0 unless m[^HTTP/0*([0-9\.]+) \s+ ([0-9]{3}) (?: \s+ ([^\012]*) )? \012]cgiux
531 0 0 if $1 eq 100
539 0 0 unless my $hdr = &_parse_hdr()
548 0 0 if (exists $hdr{'location'})
551 0 0 if ($loc =~ m[^//]u) { }
0 0 elsif ($loc eq '') { }
0 0 elsif (not $loc =~ m[^(?: $ | [^:/?\#]+ : )]ux) { }
560 0 0 if (not $loc =~ /^[.?#]/u) { }
0 0 elsif (eval { do { require URI } }) { }
563 0 0 unless ($loc =~ s[^/][]u)
583 0 0 if ($recurse)
592 0 0 if ($status == 301 or $status == 302 or $status == 303) { }
0 0 elsif ($status == 307 or $status == 308) { }
595 0 0 unless ($method eq 'HEAD')
605 0 0 if ($state{'handle'})
607 0 0 $hdr{'HTTPVersion'} < 1.1 ? :
0 0 if ($persistent and $_[3] and $hdr{'HTTPVersion'} < 1.1 ? $hdr{'connection'} =~ /\bkeep-?alive\b/iu : !($hdr{'connection'} =~ /\bclose\b/iu)) { }
623 0 0 if (defined $_[1])
629 0 0 if ($arg{'cookie_jar'})
633 0 0 if ($redirect and exists $hdr{'location'}) { }
657 0 0 $chunked ? :
665 0 0 if (not $redirect and $arg{'on_header'} and not $arg{'on_header'}->(\%hdr)) { }
0 0 elsif ($hdr{'Status'} =~ /^(?:1..|204|205|304)$/u or $method eq 'HEAD' or defined $len and $len == 0) { }
0 0 elsif (not $redirect and $arg{'want_body_handle'}) { }
0 0 elsif ($chunked) { }
0 0 elsif ($arg{'on_body'}) { }
688 0 0 unless $_[1] =~ /^([0-9a-fA-F]+)/u
693 0 0 if ($len) { }
697 0 0 unless &$on_body($_[1], \%hdr)
701 0 0 if length $_[1]
710 0 0 if (length $_[1])
714 0 0 unless my $hdr = &_parse_hdr()
729 0 0 if (defined $len) { }
733 0 0 unless $arg{'on_body'}->(delete $_[0]{'rbuf'}, \%hdr)
736 0 0 unless $len > 0
744 0 0 unless $arg{'on_body'}->(delete $_[0]{'rbuf'}, \%hdr)
751 0 0 if (defined $len) { }
754 0 0 if $len <= length $_[0]{'rbuf'}
760 0 0 $! == 32 || !$! ? :
769 0 0 if ($was_persistent and $idempotent) { }
788 0 0 unless %state
815 0 0 unless my $fh = shift()
818 0 0 unless delete $state{'connect_guard'}
829 0 0 unless $proxy
836 0 0 unless $state{'connect_guard'}
840 0 0 if ($persistent and $KA_CACHE{$ka_key}) { }
845 0 0 if $state{'handle'}->destroyed
848 0 0 if $state{'handle'}->destroyed
860 0 0 if defined wantarray
912 0 0 if ($date =~ /^[A-Z][a-z][a-z]+, ([0-9][0-9]?)[\- ]([A-Z][a-z][a-z])[\- ]([0-9][0-9][0-9][0-9]) ([0-9][0-9]?):([0-9][0-9]?):([0-9][0-9]?) GMT$/u) { }
0 0 elsif ($date =~ /^[A-Z][a-z][a-z]+, ([0-9][0-9]?)-([A-Z][a-z][a-z])-([0-9][0-9]) ([0-9][0-9]?):([0-9][0-9]?):([0-9][0-9]?) GMT$/u) { }
0 0 elsif ($date =~ /^[A-Z][a-z][a-z]+ ([A-Z][a-z][a-z]) ([0-9 ]?[0-9]) ([0-9][0-9]?):([0-9][0-9]?):([0-9][0-9]?) ([0-9][0-9][0-9][0-9])$/u) { }
920 0 0 $3 < 69 ? :
929 0 0 if ($m eq $month[$_])
939 0 1 if (length $_[0]) { }
940 0 0 unless $_[0] =~ m[^(uwsgi):// ([^:/]+) (?: : (\d*) )?]iux