| line |
true |
false |
branch |
|
164
|
0 |
0 |
unless 'DBIx::RetryOverDisconnects::db'->can('is_disconnect_' . lc($driver)) |
|
175
|
0 |
0 |
exists $$attrs{'ReconnectRetries'} ? : |
|
194
|
0 |
0 |
unless my $new_self = $self->SUPER::clone(@_) |
|
302
|
0 |
0 |
if $$data{'Intercept'} |
|
313
|
0 |
0 |
$wa ? : |
|
|
0 |
0 |
defined $wa ? : |
|
320
|
0 |
0 |
if $ok |
|
323
|
0 |
0 |
unless $self->take_measures($e, undef, $autocommit) |
|
326
|
0 |
0 |
$wa ? : |
|
339
|
0 |
0 |
if $self->SUPER::ping |
|
340
|
0 |
0 |
if $$self{'private_DBIx-RetryOverDisconnects_data'}{'is_cloning'} |
|
343
|
0 |
0 |
if $in_trans |
|
351
|
0 |
0 |
if eval {
do {
$self->SUPER::ping
}
} |
|
354
|
0 |
0 |
if ($self->$is_disconnect_method($e)) |
|
355
|
0 |
0 |
if $$self{'PrintError'} |
|
356
|
0 |
0 |
unless $self->reconnect($sth) |
|
357
|
0 |
0 |
unless $autocommit |
|
367
|
0 |
0 |
if /lost\s+connection/i or /can't\s+connect/i or /server\s+shutdown/i or /MySQL\s+server\s+has\s+gone\s+away/i |
|
375
|
0 |
0 |
if /server\s+closed\s+the\s+connection\s+unexpectedly/i or /terminating connection/ or /no\s+more\s+connections\s+allowed/ or /no\s+working\s+server\s+connection/ or /_timeout/ or /pgbouncer\s+cannot\s+connect\s+to\s+server/ |
|
391
|
0 |
0 |
if /ORA-03135/ or /ORA-03113/ |
|
410
|
0 |
0 |
if $$self{'PrintError'} |
|
425
|
0 |
0 |
if ($new_dbh) |
|
426
|
0 |
0 |
if $$self{'PrintError'} |
|
432
|
0 |
0 |
unless $new_dbh |
|
440
|
0 |
0 |
if ($sth) |
|
453
|
0 |
0 |
if ($$self{'private_DBIx-RetryOverDisconnects_data'}{'callback'} and my $code = $$self{'private_DBIx-RetryOverDisconnects_data'}{'callback'}{'afterReconnect'}) |
|
454
|
0 |
0 |
if ref $code eq 'CODE' |
|
477
|
0 |
0 |
unless ref $coderef eq 'CODE' |
|
480
|
0 |
0 |
unless $$self{'AutoCommit'} |
|
489
|
0 |
0 |
$wa ? : |
|
|
0 |
0 |
defined $wa ? : |
|
495
|
0 |
0 |
if $ok |
|
497
|
0 |
0 |
if $$self{'private_DBIx-RetryOverDisconnects_data'}{'txn_retries'} <= $i++ |
|
498
|
0 |
0 |
if $self->is_trans_disconnect |
|
499
|
0 |
0 |
if $self->is_fatal_disconnect |
|
502
|
0 |
0 |
$rollback_ok ? : |
|
506
|
0 |
0 |
$wa ? : |
|
523
|
0 |
0 |
if $$data{'Intercept'} |
|
534
|
0 |
0 |
$wa ? : |
|
|
0 |
0 |
defined $wa ? : |
|
541
|
0 |
0 |
if $ok |
|
544
|
0 |
0 |
unless $dbh->take_measures($e, $self, $autocommit) |
|
546
|
0 |
0 |
$wa ? : |
|
558
|
0 |
0 |
$$types{$bind} ? : |
|
565
|
0 |
0 |
$$types{$bind_name} ? : |