| line |
true |
false |
branch |
|
59
|
0 |
8 |
if ($mmap & MAP_ANON()) |
|
61
|
0 |
0 |
unless ref $file eq '' |
|
64
|
0 |
0 |
unless (-e $file) |
|
65
|
0 |
0 |
unless open my $fd, '>', $file |
|
68
|
0 |
0 |
unless (-r $file) |
|
75
|
0 |
0 |
unless my $sem = 'IPC::Semaphore'->new($unique_id, 1, 438 | IPC_CREAT()) |
|
79
|
0 |
0 |
unless $sem->op(0, 1, 0) |
|
83
|
0 |
0 |
unless defined $mapaddr |
|
99
|
0 |
8 |
unless defined $file or $mmap & MAP_ANON() |
|
102
|
0 |
8 |
if defined $file and ref $file and ref $file ne 'GLOB' |
|
105
|
0 |
8 |
if (ref $file) { } |
|
|
8 |
0 |
elsif (not $mmap & MAP_ANON()) { } |
|
114
|
1 |
7 |
$prot == PROT_READ() ? : |
|
115
|
2 |
6 |
unless -e $file |
|
117
|
0 |
8 |
unless sysopen $fh, $file, $flags |
|
122
|
2 |
6 |
if ($filestats[7] < $length) |
|
127
|
0 |
2 |
unless $prot & PROT_WRITE() |
|
138
|
0 |
8 |
unless defined $mapaddr |
|
154
|
0 |
8 |
if (defined $_[0]{'semaphore'}) |
|
176
|
0 |
9 |
if (defined $$self{'semaphore'}) |
|
178
|
0 |
0 |
unless $$self{'semaphore'}->op(0, -1, 0) |
|
184
|
1 |
8 |
$$self{'_access'} == PROT_READ() ? : |
|
195
|
0 |
7 |
if (defined $$self{'semaphore'}) |
|
197
|
0 |
0 |
unless $$self{'semaphore'}->op(0, 1, 0) |
|
218
|
0 |
0 |
if $$self{'_addr'} |
|
220
|
0 |
0 |
if $$self{'_fh'} |
|
229
|
0 |
0 |
if $$self{'_addr'} |
|
231
|
0 |
0 |
if $$self{'_fh'} |