| line |
true |
false |
branch |
|
27
|
0 |
0 |
if ($^O eq 'MSWin32') |
|
40
|
0 |
0 |
if ($_[0] == 1) { } |
|
47
|
0 |
0 |
if defined $opts |
|
51
|
0 |
0 |
if (@{$opts;}) |
|
64
|
0 |
0 |
unless (defined $$self{'sig_ignore_off'}) |
|
78
|
0 |
0 |
if $$self{'done'} |
|
83
|
0 |
0 |
if ($$self{'done'}) |
|
85
|
0 |
0 |
if ($$self{'dbh'}) |
|
96
|
0 |
0 |
if $d |
|
109
|
0 |
0 |
unless ($self->process) |
|
110
|
0 |
0 |
if $$self{'done'} |
|
112
|
0 |
0 |
if ($$self{'reconnect'}) |
|
118
|
0 |
0 |
if $$self{'done'} |
|
124
|
0 |
0 |
if ($$self{'dbh'}) |
|
157
|
0 |
0 |
ref $$self{'options'} eq 'HASH' ? : |
|
172
|
0 |
0 |
if (not defined $$self{'dbh'}) |
|
180
|
0 |
0 |
if ($$self{'error'} and $$self{'no_connect_failures'}) { } |
|
|
0 |
0 |
elsif ($$self{'error'}) { } |
|
181
|
0 |
0 |
if $$self{'reconnect_wait'} |
|
205
|
0 |
0 |
unless @{$$self{'queue'};} |
|
212
|
0 |
0 |
if ($$input{'action'} eq 'exit') |
|
219
|
0 |
0 |
($$self{'ping_timeout'} == 0 || $$self{'ping_timeout'} > 0) && $now - $$self{'lastpingtime'} >= $$self{'ping_timeout'} ? : |
|
222
|
0 |
0 |
if ($$self{'dbh'}) { } |
|
232
|
0 |
0 |
if ($needping) |
|
233
|
0 |
0 |
if (eval {
do {
$$self{'dbh'}->ping
}
}) { } |
|
256
|
0 |
0 |
if (defined $$self{'no_cache'} and not defined $$input{'no_cache'}) |
|
260
|
0 |
0 |
if (defined $$input{'sql'}) |
|
265
|
0 |
0 |
if ($$input{'action'} =~ /^(func|commit|rollback|begin_work)$/) { } |
|
|
0 |
0 |
elsif ($$input{'action'} eq 'method') { } |
|
|
0 |
0 |
elsif ($$input{'action'} eq 'insert') { } |
|
|
0 |
0 |
elsif ($$input{'action'} eq 'do') { } |
|
|
0 |
0 |
elsif ($$input{'action'} eq 'single') { } |
|
|
0 |
0 |
elsif ($$input{'action'} eq 'quote') { } |
|
|
0 |
0 |
elsif ($$input{'action'} eq 'arrayhash') { } |
|
|
0 |
0 |
elsif ($$input{'action'} eq 'hashhash') { } |
|
|
0 |
0 |
elsif ($$input{'action'} eq 'hasharray') { } |
|
|
0 |
0 |
elsif ($$input{'action'} eq 'array') { } |
|
|
0 |
0 |
elsif ($$input{'action'} eq 'arrayarray') { } |
|
|
0 |
0 |
elsif ($$input{'action'} eq 'hash') { } |
|
|
0 |
0 |
elsif ($$input{'action'} eq 'keyvalhash') { } |
|
312
|
0 |
0 |
if ($$input{'id'} eq 'DBI' or $$self{'output'}{'error'} and $$self{'output'}{'error'} =~ /no connection to the server/i || $$self{'output'}{'error'} =~ /server has gone away/i || $$self{'output'}{'error'} =~ /server closed the connection/i || $$self{'output'}{'error'} =~ /connect failed/i) |
|
336
|
0 |
0 |
$$self{'output'} ? : |
|
347
|
0 |
0 |
$$self{'output'} ? : |
|
360
|
0 |
0 |
if (ref $error and ref $error eq 'Error::Simple') { } |
|
366
|
0 |
0 |
if ($$data{'error'} =~ /has gone away/i or $$data{'error'} =~ /lost connection/i) |
|
392
|
0 |
0 |
if ($$data{'begin_work'}) |
|
393
|
0 |
0 |
unless $self->begin_work($data) |
|
398
|
0 |
0 |
if ($$data{'args'} and ref $$data{'args'} eq 'ARRAY') { } |
|
411
|
0 |
0 |
unless (defined $$self{'output'}) |
|
437
|
0 |
0 |
unless (defined $$self{'output'}) |
|
463
|
0 |
0 |
if ($$data{'begin_work'}) |
|
464
|
0 |
0 |
unless $self->begin_work($data) |
|
470
|
0 |
0 |
if ($$data{'no_cache'}) { } |
|
478
|
0 |
0 |
if (not defined $sth) { } |
|
485
|
0 |
0 |
defined $sth->errstr ? : |
|
487
|
0 |
0 |
if $$self{'dbh'}->errstr |
|
494
|
0 |
0 |
if (exists $$data{'separator'}) { } |
|
503
|
0 |
0 |
if $$self{'dbh'}->errstr |
|
510
|
0 |
0 |
unless (defined $$self{'output'}) |
|
516
|
0 |
0 |
if (defined $sth) |
|
541
|
0 |
0 |
if (defined $$data{'hash'} and not defined $$data{'insert'}) |
|
545
|
0 |
0 |
if (defined $$data{'insert'} and ref $$data{'insert'} eq 'HASH') |
|
550
|
0 |
0 |
if (defined $$data{'insert'} and ref $$data{'insert'} eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (not defined $$data{'sql'} && $$data{'sql'} =~ /^INSERT/i) { } |
|
575
|
0 |
0 |
if ($$data{'begin_work'} and $i == 0) |
|
576
|
0 |
0 |
unless $self->begin_work($data) |
|
582
|
0 |
0 |
if ($$data{'no_cache'}) { } |
|
590
|
0 |
0 |
if (not defined $sth) { } |
|
597
|
0 |
0 |
if (defined $sth->errstr) { } |
|
603
|
0 |
0 |
if $$self{'dbh'}->errstr |
|
610
|
0 |
0 |
if $do_last |
|
613
|
0 |
0 |
if ($$data{'commit'} and defined $rows and not defined $$self{'output'}) |
|
618
|
0 |
0 |
if (defined $rows and not defined $$self{'output'}) { } |
|
|
0 |
0 |
elsif (not defined $rows || defined $$self{'output'}) { } |
|
622
|
0 |
0 |
unless ($$data{'last_insert_id'}) |
|
623
|
0 |
0 |
if (defined $sth) |
|
631
|
0 |
0 |
if (ref $$data{'last_insert_id'} eq 'HASH') { } |
|
634
|
0 |
0 |
if ($dsn =~ /dbi:pg/i) { } |
|
|
0 |
0 |
elsif ($dsn =~ /dbi:mysql/i) { } |
|
|
0 |
0 |
elsif ($dsn =~ /dbi:oracle/i) { } |
|
|
0 |
0 |
elsif ($dsn =~ /dbi:sqlite/i) { } |
|
637
|
0 |
0 |
if (defined $$self{'dbh'}{'mysql_insertid'}) { } |
|
654
|
0 |
0 |
if (defined $sth) |
|
658
|
0 |
0 |
if ($qry) |
|
665
|
0 |
0 |
if $$self{'dbh'}->errstr |
|
678
|
0 |
0 |
if (defined $sth) |
|
705
|
0 |
0 |
if ($$data{'begin_work'}) |
|
706
|
0 |
0 |
unless $self->begin_work($data) |
|
712
|
0 |
0 |
if ($$data{'no_cache'}) { } |
|
720
|
0 |
0 |
if (not defined $sth) { } |
|
727
|
0 |
0 |
defined $sth->errstr ? : |
|
729
|
0 |
0 |
if $$self{'dbh'}->errstr |
|
737
|
0 |
0 |
if ($$data{'commit'} and defined $rows and not defined $$self{'output'}) |
|
742
|
0 |
0 |
if (defined $rows and not defined $$self{'output'}) { } |
|
|
0 |
0 |
elsif (not defined $rows || defined $$self{'output'}) { } |
|
752
|
0 |
0 |
if (defined $sth) |
|
779
|
0 |
0 |
if ($$data{'begin_work'}) |
|
780
|
0 |
0 |
unless $self->begin_work($data) |
|
786
|
0 |
0 |
if ($$data{'no_cache'}) { } |
|
794
|
0 |
0 |
if (not defined $sth) { } |
|
801
|
0 |
0 |
defined $sth->errstr ? : |
|
803
|
0 |
0 |
if $$self{'dbh'}->errstr |
|
818
|
0 |
0 |
if (exists $$data{'chunked'} and defined $$self{'output'}) |
|
827
|
0 |
0 |
if (exists $$data{'chunked'} and $$data{'chunked'} == $rows) |
|
840
|
0 |
0 |
if $$self{'dbh'}->errstr |
|
843
|
0 |
0 |
if ($sth->err) |
|
854
|
0 |
0 |
unless (defined $$self{'output'}) |
|
857
|
0 |
0 |
if (exists $$data{'chunked'}) |
|
864
|
0 |
0 |
if (defined $sth) |
|
893
|
0 |
0 |
if ($$data{'begin_work'}) |
|
894
|
0 |
0 |
unless $self->begin_work($data) |
|
900
|
0 |
0 |
if ($$data{'no_cache'}) { } |
|
908
|
0 |
0 |
if (not defined $sth) { } |
|
915
|
0 |
0 |
defined $sth->errstr ? : |
|
917
|
0 |
0 |
if $$self{'dbh'}->errstr |
|
927
|
0 |
0 |
unless (defined $$data{'primary_key'}) |
|
931
|
0 |
0 |
if ($$data{'primary_key'} =~ /^\d+$/) |
|
933
|
0 |
0 |
if ($$data{'primary_key'} > $$sth{'NUM_OF_FIELDS'}) |
|
945
|
0 |
0 |
if $$sth{'NAME'}[$i] eq $$data{'primary_key'} |
|
948
|
0 |
0 |
unless ($foundprimary == 1) |
|
955
|
0 |
0 |
if (exists $$data{'chunked'} and defined $$self{'output'}) |
|
965
|
0 |
0 |
if (exists $$data{'chunked'} and $$data{'chunked'} == $rows) |
|
984
|
0 |
0 |
if $$self{'dbh'}->errstr |
|
987
|
0 |
0 |
if ($sth->err) |
|
998
|
0 |
0 |
unless (defined $$self{'output'}) |
|
1001
|
0 |
0 |
if (exists $$data{'chunked'}) |
|
1008
|
0 |
0 |
if (defined $sth) |
|
1037
|
0 |
0 |
if ($$data{'begin_work'}) |
|
1038
|
0 |
0 |
unless $self->begin_work($data) |
|
1044
|
0 |
0 |
if ($$data{'no_cache'}) { } |
|
1052
|
0 |
0 |
if (not defined $sth) { } |
|
1059
|
0 |
0 |
defined $sth->errstr ? : |
|
1061
|
0 |
0 |
if $$self{'dbh'}->errstr |
|
1070
|
0 |
0 |
if ($$data{'primary_key'} =~ /^\d+$/) |
|
1072
|
0 |
0 |
if ($$data{'primary_key'} > $$sth{'NUM_OF_FIELDS'}) |
|
1084
|
0 |
0 |
if $$sth{'NAME'}[$i] eq $$data{'primary_key'} |
|
1087
|
0 |
0 |
unless ($foundprimary == 1) |
|
1094
|
0 |
0 |
if (exists $$data{'chunked'} and defined $$self{'output'}) |
|
1102
|
0 |
0 |
if (exists $$data{'chunked'} and $$data{'chunked'} == $rows) |
|
1114
|
0 |
0 |
if $$self{'dbh'}->errstr |
|
1117
|
0 |
0 |
if ($sth->err) |
|
1128
|
0 |
0 |
unless (defined $$self{'output'}) |
|
1131
|
0 |
0 |
if (exists $$data{'chunked'}) |
|
1138
|
0 |
0 |
if (defined $sth) |
|
1165
|
0 |
0 |
if ($$data{'begin_work'}) |
|
1166
|
0 |
0 |
unless $self->begin_work($data) |
|
1172
|
0 |
0 |
if ($$data{'no_cache'}) { } |
|
1180
|
0 |
0 |
if (not defined $sth) { } |
|
1187
|
0 |
0 |
defined $sth->errstr ? : |
|
1189
|
0 |
0 |
if $$self{'dbh'}->errstr |
|
1201
|
0 |
0 |
if (exists $$data{'chunked'} and defined $$self{'output'}) |
|
1208
|
0 |
0 |
if (exists $$data{'separator'}) { } |
|
1213
|
0 |
0 |
if (exists $$data{'chunked'} and $$data{'chunked'} == $rows) |
|
1226
|
0 |
0 |
if $$self{'dbh'}->errstr |
|
1229
|
0 |
0 |
if ($sth->err) |
|
1240
|
0 |
0 |
unless (defined $$self{'output'}) |
|
1243
|
0 |
0 |
if (exists $$data{'chunked'}) |
|
1250
|
0 |
0 |
if (defined $sth) |
|
1277
|
0 |
0 |
if ($$data{'begin_work'}) |
|
1278
|
0 |
0 |
unless $self->begin_work($data) |
|
1284
|
0 |
0 |
if ($$data{'no_cache'}) { } |
|
1292
|
0 |
0 |
if (not defined $sth) { } |
|
1299
|
0 |
0 |
defined $sth->errstr ? : |
|
1301
|
0 |
0 |
if $$self{'dbh'}->errstr |
|
1310
|
0 |
0 |
if (exists $$data{'chunked'} and defined $$self{'output'}) |
|
1319
|
0 |
0 |
if (exists $$data{'chunked'} and $$data{'chunked'} == $rows) |
|
1332
|
0 |
0 |
if $$self{'dbh'}->errstr |
|
1335
|
0 |
0 |
if ($sth->err) |
|
1347
|
0 |
0 |
unless (defined $$self{'output'}) |
|
1350
|
0 |
0 |
if (exists $$data{'chunked'}) |
|
1357
|
0 |
0 |
if (defined $sth) |
|
1384
|
0 |
0 |
if ($$data{'begin_work'}) |
|
1385
|
0 |
0 |
unless $self->begin_work($data) |
|
1391
|
0 |
0 |
if ($$data{'no_cache'}) { } |
|
1399
|
0 |
0 |
if (not defined $sth) { } |
|
1406
|
0 |
0 |
defined $sth->errstr ? : |
|
1408
|
0 |
0 |
if $$self{'dbh'}->errstr |
|
1419
|
0 |
0 |
if (@row) |
|
1430
|
0 |
0 |
if $$self{'dbh'}->errstr |
|
1433
|
0 |
0 |
if ($sth->err) |
|
1444
|
0 |
0 |
unless (defined $$self{'output'}) |
|
1450
|
0 |
0 |
if (defined $sth) |
|
1477
|
0 |
0 |
if ($$data{'begin_work'}) |
|
1478
|
0 |
0 |
unless $self->begin_work($data) |
|
1484
|
0 |
0 |
if ($$data{'no_cache'}) { } |
|
1492
|
0 |
0 |
if (not defined $sth) { } |
|
1499
|
0 |
0 |
defined $sth->errstr ? : |
|
1501
|
0 |
0 |
if $$self{'dbh'}->errstr |
|
1507
|
0 |
0 |
if ($#row < 1) |
|
1510
|
0 |
0 |
if (exists $$data{'chunked'} and defined $$self{'output'}) |
|
1518
|
0 |
0 |
if (exists $$data{'chunked'} and $$data{'chunked'} == $rows) |
|
1530
|
0 |
0 |
if $$self{'dbh'}->errstr |
|
1533
|
0 |
0 |
if ($sth->err) |
|
1544
|
0 |
0 |
unless (defined $$self{'output'}) |
|
1547
|
0 |
0 |
if (exists $$data{'chunked'}) |
|
1554
|
0 |
0 |
if (defined $sth) |
|
1568
|
0 |
0 |
unless (defined $data) |