| line |
true |
false |
branch |
|
90
|
207 |
0 |
if (defined $sname and length $sname and length $sname <= 20) { } |
|
96
|
207 |
0 |
if (defined $self) |
|
198
|
89 |
0 |
if (pflock($file, 1)) |
|
199
|
67 |
22 |
if ($self->bread(\$raw, 0, 40) == 40) { } |
|
208
|
0 |
67 |
unless ($type eq "PIOFMSTRM") |
|
214
|
0 |
67 |
unless ($sname eq $self->{'streamName'}) |
|
221
|
0 |
67 |
unless (defined $eos) |
|
228
|
67 |
0 |
if ($rv) { } |
|
258
|
566 |
0 |
if (defined $eos) { } |
|
260
|
566 |
0 |
if ($self->bwrite($raw, 31) == 8) |
|
284
|
2959 |
0 |
if ($self->bread(\$raw, 31, 8) == 8) |
|
286
|
65 |
2894 |
if defined $rv and $rv == 0 |
|
305
|
2959 |
0 |
if $self->{'eos'} == $self->readEOS |
|
326
|
0 |
0 |
if (pflock($file, 2)) |
|
332
|
0 |
0 |
unless $self->bwrite(pack("NN", quad2Longs($rec)), $pos) == 8 |
|
336
|
0 |
0 |
unless $rv |
|
342
|
0 |
0 |
unless $rv |
|
365
|
67 |
0 |
if ($self->bread(\$raw, 40)) { } |
|
376
|
67 |
45 |
unless defined $bn and $bn > $self->{'blockNum'} |
|
379
|
0 |
45 |
unless (not defined $prev or $bn > $prev) |
|
417
|
55 |
22 |
if (defined $bn and $bn > $self->{'blockNum'}) { } |
|
420
|
0 |
55 |
if (scalar grep({$_ eq $bn;} @{$$self{"bats"};})) |
|
426
|
0 |
55 |
if (scalar grep({$_ > $bn;} @{$$self{"bats"};})) |
|
432
|
55 |
0 |
if ($rv) |
|
437
|
0 |
55 |
unless $self->bwrite(pack("NN", quad2Longs($bn)), 40 + 8 * $#{$$self{"bats"};}) == 8 |