| line |
true |
false |
branch |
|
32
|
0 |
0 |
if (defined $params{'-dbh'} and defined $params{'-connect'}) |
|
44
|
0 |
0 |
unless (defined $sqlQuery::DBI) |
|
45
|
0 |
0 |
if (defined $sqlQuery::PARAMS{'-dbh'}) { } |
|
|
0 |
0 |
elsif (defined $sqlQuery::PARAMS{'-connect'}) { } |
|
49
|
0 |
0 |
if $@ |
|
69
|
0 |
0 |
if (&blessed($rows) and $rows->isa('sqlQueryResult')) |
|
98
|
0 |
0 |
ref $_[0] ? : |
|
102
|
0 |
0 |
if (not &blessed($sql)) { } |
|
103
|
0 |
0 |
if not defined $sql or ref $sql or &looks_like_number($sql) |
|
106
|
0 |
0 |
unless $sql->isa('sqlSelectAssemble') |
|
123
|
0 |
0 |
if (@_) { } |
|
|
0 |
0 |
elsif (&blessed($self->{'-sql'})) { } |
|
129
|
0 |
0 |
if (defined $self->{'-params'}) |
|
142
|
0 |
0 |
if (@_) { } |
|
|
0 |
0 |
elsif (&blessed($self->{'-sql'})) { } |
|
152
|
0 |
0 |
if $@ |
|
175
|
0 |
0 |
if (defined $self->{'-params'}) |
|
180
|
0 |
0 |
if (1 == scalar @_ and 'HASH' eq ref $_[0]) { } |
|
186
|
0 |
0 |
unless defined $self->{'-params'}{$p} |
|
190
|
0 |
0 |
if 'HASH' eq ref $_ |
|
200
|
0 |
0 |
unless defined $self->{'-params'}[$index] |
|
211
|
0 |
0 |
if ($self->{'-named'}) { } |
|
227
|
0 |
0 |
if $pos >= length $sql or 0 > ($pos = index($sql, $sqlQuery::PARAMETER_PLACEHOLDER, $pos)) |
|
230
|
0 |
0 |
if $@ |
|
233
|
0 |
0 |
0 < $pos ? : |
|
252
|
0 |
0 |
if $pos >= length $sql or 0 > ($pos = index($sql, ':', $pos)) |
|
256
|
0 |
0 |
if $@ |
|
259
|
0 |
0 |
0 < $pos ? : |
|
275
|
0 |
0 |
if (defined $name) { } |
|
276
|
0 |
0 |
unless (exists $self->{'-params'}{$name}) |
|
281
|
0 |
0 |
unless (ref $self->{'-params'} and @{$self->{'-params'};}) |
|
293
|
0 |
0 |
if ('ARRAY' eq ref $self->{'-params'} and @{$self->{'-params'};}) |
|
308
|
0 |
0 |
unless ($sql =~ /^select/i) |
|
312
|
0 |
0 |
unless (eval {
do {
$dbh->do($sql);
1
}
}) |
|
323
|
0 |
0 |
unless (eval {
do {
$self->{'-sth'}->execute;
1
}
}) |
|
344
|
0 |
0 |
if (ref $table) |
|
352
|
0 |
0 |
if '*' eq $table |
|
363
|
0 |
0 |
if ref $table or ".$table" =~ /^(?:[.][[:lower:]_][[:lower:]\d_]*){1,2}$/i |
|
366
|
0 |
0 |
if ($table =~ /^([[:lower:]_][[:lower:]\d_]*)[.][*]$/i) { } |
|
378
|
0 |
0 |
unless (defined $value) |
|
390
|
0 |
0 |
if (not ref $arg) { } |
|
|
0 |
0 |
elsif ('ARRAY' eq ref $arg) { } |
|
|
0 |
0 |
elsif (&blessed($arg) and $arg->isa('sqlParameter')) { } |
|
391
|
0 |
0 |
unless defined $arg |
|
393
|
0 |
0 |
if $arg =~ /^-?\d+$/ |
|
395
|
0 |
0 |
if $arg =~ /^-?\d+[.]\d+$/ |
|
416
|
0 |
0 |
ref $_[0] ? : |
|
441
|
0 |
0 |
if (&looks_like_number($column)) { } |
|
443
|
0 |
0 |
if $column > $#row |
|
449
|
0 |
0 |
unless exists $row->{$column} |
|
475
|
0 |
0 |
unless defined $self->{'-result'} |
|
492
|
0 |
0 |
if (@_ and 'ARRAY' eq ref $_[-1]) |
|
496
|
0 |
0 |
if (not @_) { } |
|
520
|
0 |
0 |
ref $_[0] ? : |
|
593
|
0 |
0 |
unless (@{$$self{-'value'};}) |
|
618
|
0 |
0 |
if (not defined $$self{-'value'}) { } |
|
|
0 |
0 |
elsif (&looks_like_number($$self{-'value'})) { } |
|
672
|
0 |
0 |
if ($prevClass) |
|
674
|
0 |
0 |
unless ref $self->{'prev'} and $self->{'prev'}->isa($prevClass) |
|
693
|
0 |
0 |
if $self->{'boundArgs'} |
|
696
|
0 |
0 |
if ($self->{'prev'}) |
|
711
|
0 |
0 |
if $self->{'prev'} |
|
730
|
0 |
0 |
ref $_[0] ? : |
|
763
|
0 |
0 |
if (not 'HASH' eq ref $fieldIn) { } |
|
772
|
0 |
0 |
if (&blessed($field) and $field->isa('sqlParameter')) |
|
774
|
0 |
0 |
unless $alias |
|
776
|
0 |
0 |
if $alias |
|
784
|
0 |
0 |
if '*' ne $field and 0 == ~index($field, ' ') |
|
787
|
0 |
0 |
if (not $alias) { } |
|
790
|
0 |
0 |
unless ~index($alias, ' ') |
|
806
|
0 |
0 |
if @{$self->{'params'};} |
|
809
|
0 |
0 |
if (defined $self->{'tables'}) |
|
816
|
0 |
0 |
if ('HASH' eq ref $tableSpec) { } |
|
825
|
0 |
0 |
unless $alias |
|
827
|
0 |
0 |
if $alias |
|
854
|
0 |
0 |
if (not @_ or 1 == @_ and not defined $_[0] or 2 == @_ and not defined $_[0] and not defined $_[1]) { } |
|
858
|
0 |
0 |
if @_ |
|
868
|
0 |
0 |
if (not defined $self->{'limit'}) { } |
|
|
0 |
0 |
elsif (defined $self->{'offset'}) { } |
|
901
|
0 |
0 |
if (not defined $self->{'ordering'}) { } |
|
908
|
0 |
0 |
if ('HASH' eq ref $theOrder) |
|
913
|
0 |
0 |
unless $direction |
|
915
|
0 |
0 |
if $direction |
|
942
|
0 |
0 |
unless ref $condition and $condition->isa('sqlCondition') |
|
955
|
0 |
0 |
if $self->{'havingCond'} |
|
964
|
0 |
0 |
if (not defined $self->{'havingCond'} && defined($s = $self->{'havingCond'}->assemble)) { } |
|
1003
|
0 |
0 |
if (defined $self->{'grouping'}) |
|
1023
|
0 |
0 |
if defined $condition and not ref $condition && $condition->isa('sqlCondition') |
|
1036
|
0 |
0 |
if $self->{'whereCond'} |
|
1045
|
0 |
0 |
if ($self->{'whereCond'} and defined($c = $self->{'whereCond'}->assemble)) |
|
1069
|
0 |
0 |
if ($self->isa('sqlSelectJoin')) |
|
1072
|
0 |
0 |
if ref $condition |
|
1098
|
0 |
0 |
if (not $self->isa('sqlSelectJoin')) { } |
|
1108
|
0 |
0 |
if (not ref $condition) { } |
|
|
0 |
0 |
elsif ($condition->isa('sqlCondition')) { } |
|
1149
|
0 |
0 |
ref $_[0] ? : |
|
1160
|
0 |
0 |
if (4 == $self->{'type'}) |
|
1164
|
0 |
0 |
unless ref $self->{'_argument'} and $self->{'_argument'}->isa('sqlCondition') |
|
1178
|
0 |
0 |
unless $self->{'_parts'} |
|
1179
|
0 |
0 |
2 == $self->{'type'} ? : |
|
1185
|
0 |
0 |
unless ref $self->{'_condition'} and $self->{'_condition'}->isa('sqlCondition') |
|
1202
|
0 |
0 |
if defined $leftConstant |
|
1211
|
0 |
0 |
if $swap |
|
1213
|
0 |
0 |
unless ref $lhs |
|
1214
|
0 |
0 |
unless ref $rhs |
|
1216
|
0 |
0 |
unless &blessed($lhs) and $lhs->isa('sqlCondition') |
|
1217
|
0 |
0 |
unless &blessed($rhs) and $rhs->isa('sqlCondition') |
|
1242
|
0 |
0 |
unless $self->{'_parts'} |
|
1262
|
0 |
0 |
if (1 == scalar @_ and not defined $_[0] and defined $self->{'_alterForNull'}) |
|
1264
|
0 |
0 |
$self->{'_alterForNull'} ? : |
|
1289
|
0 |
0 |
unless @_ |
|
1296
|
0 |
0 |
unless @_ |
|
1309
|
0 |
0 |
if (1 == scalar @_) { } |
|
1393
|
0 |
0 |
3 != scalar @_ ? : |
|
1407
|
0 |
0 |
unless (&blessed($a) and $a->isa('sqlCondition')) |
|
1412
|
0 |
0 |
if ($a->{'type'} != $type) |
|
1428
|
0 |
0 |
unless $self->{'_parts'} |
|
1439
|
0 |
0 |
unless $self->{'parent'} |
|
1441
|
0 |
0 |
if $self->{'parent'} |
|
1463
|
0 |
0 |
unless defined $self->{'parent'} |