| blib/lib/MHFS/HTTP/Server/Client/Request.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 0 | 70 | 0.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 70 | 0 | 0 | 0 | $self->{'method'} ne "GET" and $self->{'method'} ne "HEAD" |
| 0 | 0 | 0 | $self->{'method'} ne "GET" and $self->{'method'} ne "HEAD" and $self->{'method'} ne "PUT" | |
| 168 | 0 | 0 | 0 | $self->{'client'}{'X-MHFS-PROXY-KEY'} and $self->{'header'}{'X-MHFS-PROXY-KEY'} |
| 188 | 0 | 0 | 0 | $netmap and $self->{'ip'} >> 24 == $netmap->[0] |
| 195 | 0 | 0 | 0 | defined $self->{'header'}{'Range'} and $self->{'header'}{'Range'} =~ /^bytes=([0-9]+)\-([0-9]*)$/u |
| 243 | 0 | 0 | 0 | $self->{'outheaders'}{'Transfer-Encoding'} and $self->{'outheaders'}{'Transfer-Encoding'} eq "chunked" |
| line | l | !l | condition |
|---|---|---|---|
| 158 | 0 | 0 | $self->{'header'}{'Host'} // "" |
| 230 | 0 | 0 | $datalength //= '99999999999' |
| 297 | 0 | 0 | $size // "*" |
| 349 | 0 | 0 | $self->{'outheaders'}{'Accept-Ranges'} //= "bytes" |
| 351 | 0 | 0 | $self->{'outheaders'}{'Connection'} //= "keep-alive" |
| 519 | 0 | 0 | $locksz || 0 |
| 523 | 0 | 0 | &$get_current_size() || 0 |
| 649 | 0 | 0 | $self->{'header'}{'_RangeStart'} // 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 156 | 0 | 0 | 0 | not $self->{'header'}{'Host'} or $self->{'header'}{'Host'} ne $self->{'client'}{'serverhostname'} |
| 225 | 0 | 0 | 0 | $self->{'client'}{'absurl'} // (defined $self->{'header'}{'Host'} ? 'http://' . $self->{'header'}{'Host'} : undef) |
| 231 | 0 | 0 | 0 | $self->{'header'}{'_RangeEnd'} // $datalength - 1 |
| 350 | 0 | 0 | 0 | $self->{'outheaders'}{'Connection'} //= $self->{'header'}{'Connection'} |
| 370 | 0 | 0 | 0 | $dataitem->{'get_current_length'} //= sub { return undef; } |
| 587 | 0 | 0 | 0 | $mime //= getMIME($filename) |
| 613 | 0 | 0 | 0 | $self->{'header'}{'_RangeEnd'} // $size - 1 |
| 648 | 0 | 0 | 0 | not $options->{'code'} or $options->{'code'} == 206 |
| 650 | 0 | 0 | 0 | $self->{'header'}{'_RangeEnd'} // $bytesize - 1 |
| 760 | 0 | 0 | 0 | not defined $requestfile or rindex($requestfile, $droot, 0) != 0 |
| 801 | 0 | 0 | 0 | not defined $requestfile or rindex($requestfile, $ml, 0) != 0 |
| 822 | 0 | 0 | 0 | $filename eq "." or $filename eq ".." |