| line |
true |
false |
branch |
|
23
|
0 |
0 |
unless $args{'dbh'} |
|
42
|
0 |
0 |
unless $_[0]{'repeated_deadlocks'} >= $_[0]{'max_repeated_deadlocks'} |
|
68
|
0 |
0 |
ref $_[0] eq 'HASH' ? : |
|
78
|
0 |
0 |
if $self->{'_amnt_nested_signals'} |
|
83
|
0 |
0 |
if (not $self->{'sort_callback'}) |
|
96
|
0 |
0 |
if @{$self->{'pool'};} >= $self->{'size'} |
|
99
|
0 |
0 |
if $self->{'_amnt_nested_signals'} |
|
112
|
0 |
0 |
if (defined $dbi_error and $dbi_error == 1213 || $dbi_error == 1205) { } |
|
114
|
0 |
0 |
if ($self->{'repeated_deadlocks'} >= $self->{'max_repeated_deadlocks'}) { } |
|
154
|
0 |
0 |
if $self->{'_amnt_nested_signals'} |
|
156
|
0 |
0 |
if ($self->{'sort_callback'} and @{$self->{'pool'};}) |
|
168
|
0 |
0 |
if (exists $self->{'post_item_callback'}) |
|
178
|
0 |
0 |
if $self->{'_amnt_nested_signals'} |
|
184
|
0 |
0 |
if (not $self->{'in_txn'}) |
|
186
|
0 |
0 |
unless $self->{'dbh'}->begin_work |
|
195
|
0 |
0 |
if ($self->{'in_txn'}) |
|
197
|
0 |
0 |
unless $self->{'dbh'}->rollback |
|
206
|
0 |
0 |
if ($self->{'in_txn'}) |
|
209
|
0 |
0 |
unless $self->{'dbh'}->commit |
|
218
|
0 |
0 |
unless &try(sub {
$self->_safe_signals(sub {
confess('DBI error: ' . $self->{'dbh'}->errstr) unless $self->{'dbh'}->commit;
$self->{'in_txn'} = undef;
}
);
1;
}
, &catch(sub {
$self->_check_deadlock($_);
$self->commit_txn;
0;
}
)) |
|
222
|
0 |
0 |
if exists $self->{'commit_callback'} |
|
231
|
0 |
0 |
unless ($self->{'_amnt_nested_signals'}++) |
|
244
|
0 |
0 |
if (not --$self->{'_amnt_nested_signals'}) |