| blib/lib/PAGI/Server/Protocol/HTTP1.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 43 | 55 | 78.1 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 301 | 0 | 2 | 4 | @codings and $codings[-1] eq "chunked" |
| 312 | 664 | 0 | 1 | $header_name eq "expect" and lc $value eq "100-continue" |
| 363 | 214 | 3 | 1 | $chunked and defined $content_length |
| 369 | 0 | 0 | 217 | $env{'SERVER_PROTOCOL'} and index($env{'SERVER_PROTOCOL'}, "HTTP/") == 0 |
| 376 | 3 | 213 | 1 | $http_version eq "1.1" and not defined $env{'HTTP_HOST'} |
| 420 | 48 | 1 | 155 | $chunked and $http_version eq "1.1" |
| 432 | 0 | 0 | 1 | defined $chunk and length $chunk |
| line | l | !l | condition |
|---|---|---|---|
| 213 | 364 | 34 | $args{'max_header_size'} // 8192 |
| 1 | 397 | $args{'max_request_line_size'} // 8192 | |
| 363 | 35 | $args{'max_header_count'} // 100 | |
| 1 | 397 | $args{'max_chunk_size'} // 10485760 | |
| 255 | 226 | 0 | $env{'REQUEST_URI'} // "/" |
| 259 | 226 | 0 | $raw_path //= "/" |
| 260 | 12 | 214 | $query_string //= "" |
| 397 | 201 | 15 | $chunked //= 0 |
| 398 | 160 | 56 | $http_version //= "1.1" |
| 400 | 214 | 2 | $STATUS_PHRASES{$status} // "Unknown" |
| 430 | 1 | 0 | $chunked //= 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 273 | 2 | 1 | 0 | eval { do { &decode("UTF-8", $unescaped, 1) } } // $unescaped |
| 345 | 1 | 0 | 11 | length $cl_value > 10 or $cl_value > 2147483647 |
| 415 | 163 | 40 | 0 | $_server_header //= "Server: PAGI::Server/$PAGI::Server::VERSION\r\n" |
| 523 | 1 | 3 | 21 | $size_line eq "" or not $size_line =~ /^[0-9a-fA-F]+$/ |