| line |
true |
false |
branch |
|
53
|
0 |
115 |
if $constname eq 'constant' |
|
55
|
0 |
115 |
if ($error) |
|
81
|
0 |
8 |
unless $self |
|
82
|
3 |
5 |
unless ref $eflags |
|
84
|
0 |
8 |
if $eflags->{'mapsize'} and $self->set_mapsize($eflags->{'mapsize'}) |
|
86
|
0 |
8 |
if $eflags->{'maxdbs'} and $self->set_maxdbs($eflags->{'maxdbs'}) |
|
88
|
0 |
8 |
if $eflags->{'maxreaders'} and $self->set_maxreaders($eflags->{'maxreaders'}) |
|
89
|
0 |
8 |
if ($^O =~ /openbsd/) |
|
93
|
0 |
0 |
unless $eflags->{'flags'} & LMDB_File::MDB_RDONLY() |
|
95
|
0 |
6 |
if $self->open($path, $eflags->{'flags'}, $eflags->{'mode'} || 384) |
|
97
|
0 |
6 |
if $LMDB_File::DEBUG |
|
103
|
0 |
0 |
unless my $txl = $Envs{$$self}[0] |
|
104
|
0 |
0 |
if (@$txl) |
|
114
|
0 |
6 |
if ($txl and @$txl and my $topTxn = $$txl[$#$txl]) |
|
117
|
0 |
0 |
if $LMDB_File::DEBUG |
|
121
|
0 |
8 |
if $LMDB_File::DEBUG |
|
130
|
0 |
20 |
if $LMDB_File::DEBUG |
|
131
|
1 |
19 |
if @$txl |
|
150
|
0 |
20 |
if not ref $parent and @$txl |
|
153
|
0 |
20 |
unless $self |
|
161
|
0 |
20 |
if $LMDB_File::DEBUG |
|
167
|
0 |
1 |
if ($^O =~ /openbsd/) |
|
177
|
5 |
15 |
unless my $td = $Txns{$$self} |
|
178
|
3 |
12 |
if ($td->{'Active'} and not $td->{'RO'} and $td->{'AC'}) { } |
|
179
|
1 |
2 |
if $LMDB_File::DEBUG |
|
183
|
0 |
12 |
if $LMDB_File::DEBUG |
|
192
|
20 |
0 |
if (my $txl = $LMDB::Env::Envs{$eid} && $LMDB::Env::Envs{$eid}[0]) |
|
196
|
20 |
0 |
if $$rel == $$self |
|
198
|
0 |
20 |
if $LMDB_File::DEBUG > 2 |
|
200
|
0 |
20 |
if $LMDB_File::DEBUG > 1 |
|
206
|
1 |
12 |
unless ($Txns{$$self}) |
|
212
|
0 |
12 |
if $LMDB_File::DEBUG |
|
218
|
1 |
8 |
unless my $td = $Txns{$$self} |
|
219
|
0 |
8 |
unless $td->{'Active'} |
|
222
|
1 |
7 |
if $LMDB_File::DEBUG |
|
228
|
0 |
0 |
unless my $td = $Txns{$$self} |
|
229
|
0 |
0 |
unless $td->{'Active'} |
|
233
|
0 |
0 |
unless $$ntxn == $$self |
|
239
|
0 |
0 |
unless my $td = $Txns{$$self} |
|
240
|
0 |
0 |
unless $td->{'RO'} |
|
241
|
0 |
0 |
if $td->{'Active'} |
|
247
|
0 |
0 |
unless my $td = $Txns{$$self} |
|
248
|
0 |
0 |
if $td->{'Active'} |
|
255
|
3 |
15 |
ref $name eq 'HASH' ? : |
|
261
|
3 |
0 |
if $Txns{$$self} |
|
266
|
0 |
3 |
unless my $td = $Txns{$$self} |
|
268
|
3 |
0 |
if @_ |
|
276
|
1 |
21 |
unless $Txns{$$txn} |
|
278
|
0 |
21 |
unless ${$LMDB::Env::Envs{$txn->_env}[0][0];} == $$txn |
|
280
|
0 |
17 |
if $dbi and $LMDB_File::DEBUG |
|
311
|
0 |
6 |
unless $Cursors{$$self} |
|
326
|
0 |
4 |
unless $txn->isa('LMDB::Txn') |
|
333
|
2 |
19 |
$class ? : |
|
334
|
0 |
21 |
unless $txn->isa('LMDB::Txn') |
|
335
|
0 |
16 |
unless my $dbi = $txn->open(@_) |
|
347
|
0 |
100281 |
unless $txn and $LMDB::Txn::Txns{$$txn} || undef $self->[0] and $LMDB::Txn::Txns{$$txn}{'Active'} |
|
351
|
0 |
100281 |
unless ${$LMDB::Env::Envs{$txn->_env}[0][0];} == $$txn |
|
358
|
7 |
0 |
if $txn |
|
369
|
0 |
91 |
if $DEBUG > 2 |
|
375
|
0 |
100034 |
if $DEBUG > 2 |
|
377
|
100006 |
27 |
if @_ > 2 |
|
383
|
0 |
27 |
if $res and $die_on_err and $res != MDB_NOTFOUND() or undef $@ |
|
388
|
0 |
2 |
if $DEBUG > 2 |
|
419
|
0 |
6 |
unless $cursor |
|
422
|
0 |
6 |
if $DEBUG |
|
436
|
2 |
1 |
if ref $proto and _chkalive($proto) |
|
439
|
0 |
1 |
unless ref $options |
|
441
|
0 |
1 |
if (ref $mux eq 'LMDB::Txn') { } |
|
|
0 |
1 |
elsif (ref $mux eq 'LMDB::Env') { } |
|
447
|
0 |
1 |
if @_ |
|
461
|
0 |
7 |
if $res and $die_on_err and $res != MDB_NOTFOUND() or undef $@ |
|
471
|
0 |
3 |
unless $txn and $LMDB::Txn::Txns{$$txn} || undef $self->[0] |
|
490
|
1 |
0 |
if (_get(@self, $key, $data) != MDB_NOTFOUND()) |
|
505
|
81 |
4 |
defined $key ? : |
|
508
|
4 |
81 |
if ($res == MDB_NOTFOUND()) |
|
511
|
0 |
81 |
wantarray ? : |
|
518
|
3 |
4 |
if (@_ > 3) |
|
519
|
3 |
0 |
$_[3] ? : |