| line |
true |
false |
branch |
|
19
|
0 |
1 |
unless my $self = shift @_ |
|
21
|
0 |
1 |
unless my $size = shift @_ |
|
22
|
0 |
1 |
unless open my $FILE, '<', '/dev/zero' |
|
28
|
0 |
1 |
unless my $size = shift @_ |
|
29
|
0 |
1 |
unless open my $FILE, '<', '/dev/zero' |
|
30
|
0 |
0 |
unless my $mmap = 'IPC::Mmap'->new($FILE, $size, PROT_READ() | PROT_WRITE(), MAP_SHARED() | MAP_ANONYMOUS()) |
|
35
|
0 |
0 |
unless my $self = shift @_ |
|
36
|
0 |
0 |
unless my $mmap = shift @_ |
|
41
|
0 |
0 |
unless my $self = shift @_ |
|
46
|
0 |
0 |
unless my $self = shift @_ |
|
52
|
0 |
0 |
unless my $var = shift @_ |
|
56
|
0 |
0 |
unless my $serialized = freeze($var_ref) |
|
59
|
0 |
0 |
if length $serialized > $self->get_size |
|
61
|
0 |
0 |
if $DEBUG |
|
64
|
0 |
0 |
unless $mmap->lock |
|
65
|
0 |
0 |
unless $mmap->write($serialized, 0, $size) |
|
66
|
0 |
0 |
unless $mmap->unlock |
|
75
|
0 |
0 |
unless $mmap->lock |
|
76
|
0 |
0 |
unless $mmap->read($unserialized, 0, $size) |
|
77
|
0 |
0 |
unless $mmap->unlock |
|
78
|
0 |
0 |
unless my $var_ref = thaw($unserialized) |
|
83
|
0 |
0 |
unless my $self = shift @_ |
|
84
|
0 |
0 |
unless my $mmap = $self->get_mmap |
|
85
|
0 |
0 |
unless $mmap->lock |
|
91
|
0 |
0 |
unless my $self = shift @_ |
|
92
|
0 |
0 |
unless my $mmap = $self->get_mmap |
|
93
|
0 |
0 |
unless $mmap->unlock |
|
98
|
0 |
0 |
unless my $self = shift @_ |
|
99
|
0 |
0 |
if $$self{'locked'} == 1 |
|
104
|
0 |
0 |
unless my $self = shift @_ |
|
105
|
0 |
0 |
unless my $mmap = $self->get_mmap |
|
106
|
0 |
0 |
if ($self->is_locked) |
|
107
|
0 |
0 |
unless $mmap->unlock |