Branch Coverage

blib/lib/AnyEvent/UWSGI.pm
Criterion Covered Total %
branch 1 242 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'}
381 0 0 if (my $hdr = $arg{'headers'})
389 0 0 if exists $arg{'Redirect'}
391 0 0 exists $arg{'recurse'} ? :
393 0 0 if $recurse < 0
396 0 0 exists $arg{'proxy'} ? :
406 0 0 unless $uauthority =~ /^(?: .*\@ )? ([^\@]+?) (?: : (\d+) )?$/ux
410 0 0 if defined $2
413 0 0 defined $2 ? :
0 0 unless exists $hdr{'host'}
416 0 0 if length $query
421 0 0 if (my $jar = $arg{'cookie_jar'})
424 0 0 if @$cookies
430 0 0 if ($proxy) { }
433 0 0 unless defined $rscheme
441 0 0 unless exists $hdr{'referer'}
442 0 0 unless exists $hdr{'user-agent'}
445 0 0 if length $arg{'body'} or $method ne 'GET'
450 0 0 exists $arg{'persistent'} ? :
451 0 0 exists $arg{'keepalive'} ? :
457 0 0 $keepalive ? :
0 0 $persistent ? :
458 0 0 unless exists $hdr{'te'}
473 0 0 $query =~ /^\?(.*)$/u ? :
475 0 0 defined $hdr{'content-length'} ? :
476 0 0 $method =~ /post/iu ? :
478 0 0 $rpath =~ /^([^\?]+)/u ? :
485 0 0 if ($hdr{'x-uwsgi-nginx-compatible-mode'})
491 0 0 defined $hdr{$k} ? :
496 0 0 unless defined $env->{$k}
510 0 0 unless %state
517 0 0 unless %state
521 0 0 unless m[^HTTP/0*([0-9\.]+) \s+ ([0-9]{3}) (?: \s+ ([^\012]*) )? \012]cgiux
530 0 0 if $1 eq 100
538 0 0 unless my $hdr = &_parse_hdr()
547 0 0 if (exists $hdr{'location'})
550 0 0 if ($loc =~ m[^//]u) { }
0 0 elsif ($loc eq '') { }
0 0 elsif (not $loc =~ m[^(?: $ | [^:/?\#]+ : )]ux) { }
559 0 0 if (not $loc =~ /^[.?#]/u) { }
0 0 elsif (eval { do { require URI } }) { }
562 0 0 unless ($loc =~ s[^/][]u)
582 0 0 if ($recurse)
591 0 0 if ($status == 301 or $status == 302 or $status == 303) { }
0 0 elsif ($status == 307 or $status == 308) { }
594 0 0 unless ($method eq 'HEAD')
604 0 0 if ($state{'handle'})
606 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)) { }
622 0 0 if (defined $_[1])
628 0 0 if ($arg{'cookie_jar'})
632 0 0 if ($redirect and exists $hdr{'location'}) { }
656 0 0 $chunked ? :
664 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'}) { }
687 0 0 unless $_[1] =~ /^([0-9a-fA-F]+)/u
692 0 0 if ($len) { }
696 0 0 unless &$on_body($_[1], \%hdr)
700 0 0 if length $_[1]
709 0 0 if (length $_[1])
713 0 0 unless my $hdr = &_parse_hdr()
728 0 0 if (defined $len) { }
732 0 0 unless $arg{'on_body'}->(delete $_[0]{'rbuf'}, \%hdr)
735 0 0 unless $len > 0
743 0 0 unless $arg{'on_body'}->(delete $_[0]{'rbuf'}, \%hdr)
750 0 0 if (defined $len) { }
753 0 0 if $len <= length $_[0]{'rbuf'}
759 0 0 $! == 32 || !$! ? :
768 0 0 if ($was_persistent and $idempotent) { }
787 0 0 unless %state
814 0 0 unless my $fh = shift()
817 0 0 unless delete $state{'connect_guard'}
828 0 0 unless $proxy
835 0 0 unless $state{'connect_guard'}
839 0 0 if ($persistent and $KA_CACHE{$ka_key}) { }
844 0 0 if $state{'handle'}->destroyed
847 0 0 if $state{'handle'}->destroyed
859 0 0 if defined wantarray
911 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) { }
919 0 0 $3 < 69 ? :
928 0 0 if ($m eq $month[$_])
938 0 1 if (length $_[0]) { }
939 0 0 unless $_[0] =~ m[^(uwsgi):// ([^:/]+) (?: : (\d*) )?]iux