| line |
true |
false |
branch |
|
88
|
0 |
0 |
if $dsn =~ /dbname=([^;]+)/ |
|
89
|
0 |
0 |
unless ($dbname) |
|
91
|
0 |
0 |
if $dsn =~ /^dbi:SQLite:(.+)$/i |
|
93
|
0 |
0 |
unless $dbname and -f $dbname |
|
103
|
0 |
0 |
unless -f $dir |
|
107
|
0 |
0 |
unless $res |
|
131
|
0 |
14 |
if (not &modver_gt_or_eq('DBD::SQLite', '1.33') and $self->_dbh->FETCH('AutoCommit')) |
|
152
|
0 |
143 |
unless my $dbh = $self->_dbh |
|
153
|
0 |
143 |
unless $dbh->FETCH('Active') |
|
154
|
0 |
143 |
unless $dbh->ping |
|
160
|
26 |
117 |
unless (defined $DBD::SQLite::__DBIC_TXN_SYNC_SANE__) |
|
165
|
0 |
143 |
unless ($DBD::SQLite::__DBIC_TXN_SYNC_SANE__) |
|
187
|
0 |
0 |
$_[0] =~ qr/transaction within a transaction/ ? : |
|
194
|
0 |
0 |
if (not defined $really_not_in_txn) { } |
|
|
0 |
0 |
elsif ($really_not_in_txn xor $dbh->{'AutoCommit'}) { } |
|
205
|
0 |
0 |
$really_not_in_txn ? : |
|
|
0 |
0 |
$dbh->{'AutoCommit'} ? : |
|
216
|
143 |
0 |
unless $ping_fail ||= !&dbic_internal_try(sub {
$dbh->do('SELECT * FROM sqlite_master LIMIT 1');
1;
}
) |
|
234
|
1 |
0 |
if (not exists $sqltargs->{'producer_args'}{'sqlite_version'} and my $dver = $self->_server_info->{'normalized_dbms_version'}) |
|
253
|
685 |
1729 |
$_[1] =~ /^ (?: int(?:[1248]|eger)? | (?:tiny|small|medium|big)int ) $/xi ? : |
|
309
|
205 |
17659 |
unless (defined $DBD::SQLite::__DBIC_CHECK_dbd_can_bind_bigint_values) |
|
310
|
205 |
0 |
&modver_gt_or_eq('DBD::SQLite', '1.37') ? : |
|
315
|
30375 |
355 |
if (defined $bindattrs->[$i] and defined $bind->[$i][1] and grep {$bindattrs->[$i] eq $_;} &DBI::SQL_INTEGER(), &DBI::SQL_TINYINT(), &DBI::SQL_SMALLINT(), &DBI::SQL_BIGINT()) |
|
324
|
2 |
30373 |
if (not $bind->[$i][1] =~ /^ [\+\-]? [0-9]+ (?: \. 0* )? $/x) { } |
|
|
0 |
30373 |
elsif (not $DBD::SQLite::__DBIC_CHECK_dbd_can_bind_bigint_values) { } |
|
339
|
0 |
0 |
if ($bind->[$i][1] > 2147483647 or $bind->[$i][1] < -2147483648) { } |