Branch Coverage

blib/lib/MDV/Packdrakeng/zlib.pm
Criterion Covered Total %
branch 32 48 66.6


line true false branch
42 13 17 unless (defined $sourcefh)
59 13 136 unless (defined $$data)
60 11 2 if (defined $$pack{'cstream_data'}{'object'})
69 11 125 unless (defined $$pack{'cstream_data'}{'object'})
82 0 136 unless ($wres == length $cbuf)
93 8 19 unless (defined $fileinfo)
98 8 8 if (defined $$pack{'ustream_data'} and $$fileinfo{'coff'} != $$pack{'ustream_data'}{'coff'} || $$fileinfo{'off'} < ($$pack{'ustream_data'}{'off'} || 0))
102 11 8 if (not defined $$pack{'ustream_data'}) { }
112 11 0 if (sysread($$pack{'handle'}, $buf, 2) == 2) { }
114 0 11 unless ($magic[0] == 31 and $magic[1] == 139)
123 11 0 if (sysread($$pack{'handle'}, $buf, 2) == 2) { }
130 0 11 if (sysread($$pack{'handle'}, $buf, 6) != 6)
136 0 11 if ($flags & 4)
137 0 0 if (sysread($$pack{'handle'}, $buf, 2) == 2) { }
140 0 0 if (sysread($$pack{'handle'}, $buf, $len) != $len)
158 129 8 unless (defined $out)
162 11 118 $$pack{'ustream_data'}{'cread'} + $$pack{'bufsize'} > $$fileinfo{'csize'} ? :
0 129 unless (my $cl = sysread($$pack{'handle'}, my $buf, $$pack{'ustream_data'}{'cread'} + $$pack{'bufsize'} > $$fileinfo{'csize'} ? $$fileinfo{'csize'} - $$pack{'ustream_data'}{'cread'} : $$pack{'bufsize'}))
168 0 129 unless ($status == Z_OK() or $status == Z_STREAM_END())
173 0 137 unless $l = length $out
174 0 137 if ($$pack{'ustream_data'}{'read'} < $$fileinfo{'off'} and $$pack{'ustream_data'}{'read'} + $l > $$fileinfo{'off'})
178 0 137 if ($$pack{'ustream_data'}{'read'} <= $$fileinfo{'off'})
181 8 129 if ($byteswritten + length($out) > $$fileinfo{'size'}) { }
188 0 137 unless (syswrite($destfh, $out, $bw) == $bw)