| line |
true |
false |
branch |
|
34
|
0 |
0 |
if ($$self{'references'}) |
|
47
|
0 |
0 |
unless defined $$params{$s} |
|
49
|
0 |
0 |
if (defined $$params{$o}) { } |
|
|
0 |
0 |
elsif ($$params{$s} =~ /^\d+$/) { } |
|
72
|
1 |
1 |
if (not defined $$conf{'table'}) { } |
|
|
0 |
1 |
elsif (not $$conf{'table'} =~ /^[a-z_]\w*$/) { } |
|
82
|
2 |
0 |
if (not defined $$conf{'primary_key'}) { } |
|
|
0 |
0 |
elsif (not $$conf{'primary_key'} =~ /^[a-z_]\w*$/) { } |
|
92
|
0 |
2 |
$$conf{'primary_key_regexp'} ? : |
|
93
|
0 |
2 |
$$conf{'primary_key_user_supplied'} ? : |
|
97
|
1 |
1 |
if (my $e = 'Apache::Voodoo::Exception::RunTime::BadConfig'->caught) { } |
|
|
0 |
1 |
elsif ($@) { } |
|
103
|
0 |
0 |
ref $@ ? : |
|
110
|
0 |
1 |
if (defined $$conf{'multiple'}) |
|
114
|
0 |
1 |
if (defined $$conf{'unique'}) |
|
119
|
0 |
1 |
if (defined $$self{'pkey'} and $name ne $$self{'pkey'}) |
|
124
|
0 |
1 |
if ($$conf{'type'} eq 'date') |
|
125
|
0 |
1 |
if ($$conf{'type'} eq 'time') |
|
127
|
0 |
1 |
if (defined $$conf{'references'}) |
|
137
|
0 |
0 |
unless $v{'table'} =~ /\w+/ |
|
138
|
0 |
0 |
unless $v{'pkey'} =~ /\w+/ |
|
139
|
0 |
0 |
unless $v{'slabel'} =~ /\w+/ |
|
141
|
0 |
0 |
if (defined $v{'columns'}) { } |
|
142
|
0 |
0 |
if (ref $v{'columns'}) { } |
|
143
|
0 |
0 |
if (ref $v{'columns'} ne 'ARRAY') |
|
161
|
0 |
0 |
ref $v eq 'ARRAY' ? : |
|
169
|
0 |
2 |
if ($$conf{'list_options'}{'group_by'}) |
|
171
|
0 |
0 |
unless $$self{'group_by'} =~ /\./ |
|
178
|
0 |
2 |
if (ref $$conf{'joins'} eq 'ARRAY') |
|
187
|
0 |
0 |
$context =~ /^(list|view)$/i ? : |
|
202
|
0 |
2 |
if ($$conf{'pager'}) { } |
|
208
|
2 |
0 |
unless $$conf{'list_options'}{'persist'} |
|
222
|
2 |
0 |
if (@errors) |
|
229
|
0 |
0 |
if ($_[0]) |
|
245
|
0 |
0 |
unless $$self{'success'} |
|
254
|
0 |
0 |
unless $$self{'success'} |
|
299
|
0 |
0 |
if ref $e eq 'HASH' |
|
302
|
0 |
0 |
if ($$self{'pkey_user_supplied'}) |
|
303
|
0 |
0 |
if ($$params{$$self{'pkey'}} =~ /$$self{'pkey_regexp'}/) { } |
|
311
|
0 |
0 |
if ($$res[0][0] == 1) |
|
328
|
0 |
0 |
if ($$res[0][0] == 1) |
|
343
|
0 |
0 |
unless ($$params{$$self{'pkey'}} =~ /$$self{'pkey_regexp'}/) |
|
359
|
0 |
0 |
if ref $e eq 'HASH' |
|
370
|
0 |
0 |
if ($$res[0][0] == 1) |
|
390
|
0 |
0 |
if ($$params{'cm'} eq 'add') |
|
393
|
0 |
0 |
if (scalar keys %{$errors;}) { } |
|
418
|
0 |
0 |
if ($$self{'pkey_user_supplied'}) |
|
467
|
0 |
0 |
if (length $additional_constraint) |
|
471
|
0 |
0 |
unless ($$params{$$self{'pkey'}} =~ /$$self{'pkey_regexp'}/) |
|
487
|
0 |
0 |
unless (defined $$res[0]) |
|
497
|
0 |
0 |
if ($$params{'cm'} eq 'update') { } |
|
500
|
0 |
0 |
if (scalar keys %{$errors;}) { } |
|
517
|
0 |
0 |
if ($$values{$_} ne $original_values{$_}) |
|
591
|
0 |
0 |
unless ($$params{$$self{'pkey'}} =~ /$$self{'pkey_regexp'}/) |
|
597
|
0 |
0 |
if (length $additional_constraint) |
|
610
|
0 |
0 |
unless ($$res[0][0] == 1) |
|
614
|
0 |
0 |
if ($$params{'confirm'} eq 'Yes') { } |
|
|
0 |
0 |
elsif ($$params{'confirm'} eq 'No') { } |
|
676
|
0 |
0 |
if (defined $$self{'list_sort'}{$$params{'sort'}}) { } |
|
684
|
0 |
0 |
if (defined $$self{'list_sort'}{$$params{'last_sort'}}) { } |
|
694
|
0 |
0 |
$$params{'count'} ? : |
|
695
|
0 |
0 |
$$params{'page'} ? : |
|
697
|
0 |
0 |
$$params{'start'} ? : |
|
704
|
0 |
0 |
if ($_ =~ /\./) { } |
|
712
|
0 |
0 |
if (ref $additional_constraint) |
|
713
|
0 |
0 |
if (defined $$additional_constraint{'additional_column'}) |
|
720
|
0 |
0 |
if ($$self{'references'}) |
|
722
|
0 |
0 |
$$join{'fkey'} =~ /\./ ? : |
|
736
|
0 |
0 |
if ($$join{'pkey'} and $$join{'fkey'}) |
|
737
|
0 |
0 |
$$join{'fkey'} =~ /\./ ? : |
|
|
0 |
0 |
$$join{'pkey'} =~ /\./ ? : |
|
744
|
0 |
0 |
if ($$join{'extra'}) |
|
745
|
0 |
0 |
unless ref $$join{'extra'} |
|
746
|
0 |
0 |
if ref $$join{'extra'} eq 'ARRAY' |
|
749
|
0 |
0 |
unless scalar @join_clauses |
|
753
|
0 |
0 |
if ($_ =~ /\./) { } |
|
762
|
0 |
0 |
if (defined $$self{'list_search'}{$limit} and $self->safe_text($pattern)) |
|
766
|
0 |
0 |
if ($additional_constraint) |
|
767
|
0 |
0 |
if (ref $additional_constraint eq 'HASH' and defined $$additional_constraint{'additional_constraint'}) { } |
|
|
0 |
0 |
elsif (not ref $additional_constraint) { } |
|
787
|
0 |
0 |
if ($r eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (not $r) { } |
|
788
|
0 |
0 |
unless ($$clause[0] =~ /\./) |
|
792
|
0 |
0 |
unless grep {$$clause[0];} @columns |
|
794
|
0 |
0 |
if (scalar @{$clause;} eq 1) { } |
|
|
0 |
0 |
elsif (scalar @{$clause;} == 3) { } |
|
798
|
0 |
0 |
if ($$clause[1] =~ /^is(\s+not)?$/i and $$clause[2] =~ /^null$/i) { } |
|
|
0 |
0 |
elsif ($$clause[1] =~ /^(=|!=|>|<|>=|<=)/) { } |
|
|
0 |
0 |
elsif ($$clause[1] =~ /^(not )?\s*like/i) { } |
|
806
|
0 |
0 |
if ($dbh->get_info(17) eq 'SQLite') { } |
|
826
|
0 |
0 |
if (scalar @where) |
|
830
|
0 |
0 |
if ($$self{'group_by'}) |
|
835
|
0 |
0 |
$dbh->get_info(17) eq 'MySQL' ? : |
|
837
|
0 |
0 |
$is_mysql ? : |
|
846
|
0 |
0 |
if (defined $sort) { } |
|
850
|
0 |
0 |
if ($sort eq $last_sort) { } |
|
851
|
0 |
0 |
if ($desc eq '1') { } |
|
873
|
0 |
0 |
unless $showall |
|
879
|
0 |
0 |
if ($is_mysql) { } |
|
930
|
0 |
0 |
if (defined $dates{$key}) { } |
|
|
0 |
0 |
elsif (defined $times{$key}) { } |
|
955
|
0 |
0 |
unless ($$params{$$self{'pkey'}} =~ /$$self{'pkey_regexp'}/) |
|
961
|
0 |
0 |
if (length $additional_constraint) |
|
983
|
0 |
0 |
if ($$join{'pkey'} and $$join{'fkey'}) |
|
984
|
0 |
0 |
$$join{'fkey'} =~ /\./ ? : |
|
|
0 |
0 |
$$join{'pkey'} =~ /\./ ? : |
|
991
|
0 |
0 |
if ($$join{'extra'}) |
|
992
|
0 |
0 |
unless ref $$join{'extra'} |
|
993
|
0 |
0 |
if ref $$join{'extra'} eq 'ARRAY' |
|
996
|
0 |
0 |
unless scalar @join_clauses |
|
1000
|
0 |
0 |
if ($_ =~ /\./) { } |
|
1023
|
0 |
0 |
if (defined $res and defined $$res[0]) { } |
|
1063
|
0 |
0 |
unless ($$params{$$self{'pkey'}} =~ /$$self{'pkey_regexp'}/) |
|
1067
|
0 |
0 |
unless ($column =~ /^\w+$/) |