Branch Coverage

blib/lib/POEx/HTTP/Server.pm
Criterion Covered Total %
branch 118 206 57.2


line true false branch
54 142 0 if (2 == @_)
79 0 0 if $$self{'state'}
83 0 0 unless ($msg =~ /\n$/)
97 60 20 unless $handler
108 0 36 if ($@)
110 0 0 if ($$self{'resp'})
120 0 0 unless ($$self{'specials'}{'on_error'})
123 0 0 if $op eq 'bind' and $errnum == 98
184 6 0 unless defined $$self{'retry'}
187 6 0 unless defined $$self{'concurrency'}
194 6 0 unless defined $$I{'Reuse'}
195 5 1 unless defined $$I{'LocalPort'}
196 0 6 if $$I{'LocalAddr'} and not defined $$I{'BindAddr'}
198 1 5 if $$I{'LocalPort'} and not defined $$I{'BindPort'}
205 0 6 if ($$opt{'error'})
213 0 1 if (defined $$self{'keepalive'} and $$self{'keepalive'} and !($$self{'keepalive'} =~ /^\d+$/) || $$self{'keepalive'} == 1)
224 6 0 unless (defined $$self{'timeout'})
232 1 5 if (not defined $$self{'keepalivetimeout'} and $$self{'keepalive'})
257 0 12 unless ($$self{'handlers'})
258 0 0 unless $$self{'handler'}
264 2 10 if (not ref $$self{'handlers'}) { }
2 8 elsif ('HASH' eq ref $$self{'handlers'}) { }
277 16 9 unless __is_special($re)
288 30 0 unless blessed($$H{$re})
289 21 9 unless __is_special($re)
382 0 5 if ($$self{'prefork'})
410 5 0 if $$self{'alias'}
411 0 5 unless $$self{'clients'}
452 13 4 if ($$self{'C'} == 0)
456 5 12 unless ($$self{'C'} > 0 or $$self{'server'})
465 17 0 unless $$self{'concurrency'} > 0
466 0 0 if ($$self{'C'} >= $$self{'concurrency'})
478 17 0 unless $$self{'concurrency'} > 0
479 0 0 unless ($$self{'C'} >= $$self{'concurrency'} and $$self{'paused'})
480 0 0 if ($$self{'server'})
504 0 0 unless $$self{'retry'}
543 0 3 unless defined $new
554 0 12 if $$self{'handlers'}{$re}
570 1 2 if (not ref $del) { }
1 1 elsif ('HASH' eq ref $del) { }
580 0 5 if (__is_special($re)) { }
591 5 9 if $R{$re}
602 0 0 unless $$self{'prefork'}
637 0 0 if ($$self{'resume_once'}) { }
652 17 0 unless $$self{'prefork'}
665 13 0 unless $$self{'prefork'}
738 11 2 unless (defined $HAVE_SENDFILE)
744 0 11 unless $@
800 16 0 if $$self{'req'}
833 3 0 if ($op eq 'read' and $errnum == 0) { }
872 17 0 if ($W)
875 17 0 if ($socket)
908 0 18 if ($$self{'req'})
914 2 16 if ($req->isa('HTTP::Response'))
953 0 18 if (delete $$self{'stream_wheel'})
982 1 28 if ($$self{'sendfile'})
987 18 10 if (not $$self{'resp'} or $$self{'S'}{'done'} or $$self{'resp'}->finished) { }
10 0 elsif ($$self{'resp'}->streaming) { }
1011 4 14 if ($self->keepalive_start)
1021 14 4 if $$self{'will_close'}
1035 16 0 $$self{'req'} && $$self{'req'}->uri ? :
1039 16 0 if ($handler) { }
1054 20 19 unless $re eq '' or $path =~ /$re/
1067 0 16 if $$self{'once'}++
1069 16 0 unless ($$self{'resp'}->headers_sent)
1096 0 18 if $$self{'resp'}->header($h)
1101 14 0 if ($$self{'will_close'} and $$self{'req'} and $$self{'req'}->protocol eq 'HTTP/1.1')
1103 0 14 if ($c) { }
1114 18 0 if ($$self{'req'} and $$self{'req'}->protocol eq 'HTTP/1.1') { }
1119 12 6 if ",$conn," =~ /,\s*close\s*,/i
1123 0 18 if ",$conn," =~ /,\s*close\s*,/i
1133 1 17 if $$self{'resp'}->streaming
1135 14 4 unless $$self{'keepalive'} > 1
1137 2 16 if $$self{'shutdown'}
1148 0 13 unless $$self{'resp'}
1149 2 11 unless ($$self{'resp'}->headers_sent)
1154 1 1 if ($$self{'resp'}->streaming)
1159 0 1 if $@
1163 11 2 if defined $something
1164 11 2 if ($$self{'resp'}->streaming and $$self{'wheel'})
1188 0 1 unless setsockopt $h, 6, 1, 1
1193 0 1 unless setsockopt $h, 1, 7, 576
1222 0 1 if $$self{'sendfile'}
1228 0 1 unless ($fh->open($file))
1248 0 1 if ($HAVE_SENDFILE) { }
1252 0 0 unless (defined $len)
1262 1 0 if ($len > 0)
1268 1 0 if ($$S{'offset'} >= $$S{'size'})
1270 0 1 if $$S{'offset'} > $$S{'size'}
1287 0 15 if (not $$self{'flushing'} and $$self{'req'})
1297 14 4 if $$self{'will_close'}
1299 0 4 unless $$self{'keepalive'} > 0
1324 34 4 unless $$self{'KAID'}
1335 1 47 unless $$self{'timeout'} and $$self{'connection'}
1336 3 44 if ($$self{'TID'}) { }
1356 5 44 unless $$self{'TID'}
1373 3 0 unless $$self{'flushing'} or $state eq 'handling'
1390 18 0 unless $$self{'pending'} and @{$$self{'pending'};}
1391 0 0 if ($$self{'S'}{'shutdown'} or $$self{'S'}{'closing'})
1397 0 0 unless $next
1406 0 0 unless $$self{'wheel'}
1411 0 0 unless $$self{'wheel'}
1413 0 0 if $$self{'wheel'}