line |
true |
false |
branch |
26
|
0 |
0 |
if (ref $class) { } |
40
|
0 |
0 |
if ($DBI::errstr) |
52
|
0 |
0 |
unless ($obj->db->ping) |
60
|
0 |
0 |
unless $table |
62
|
0 |
0 |
if ($DBI::errstr) |
67
|
0 |
0 |
if ($need_rebackup) |
69
|
0 |
0 |
unless $obj->redump |
88
|
0 |
0 |
unless @_ or scalar @_ % 2 == 0 |
95
|
0 |
0 |
if not $name or ref $name or not $param or ref $param ne 'HASH' or not exists $$param{'fields'} |
97
|
0 |
0 |
if $$exisis_table{$name}++ |
100
|
0 |
0 |
if (exists $$param{'meta'}) |
102
|
0 |
0 |
if (exists $$param{'meta'}{'default'} and scalar @{$$param{'meta'}{'default'};} % 2) |
104
|
0 |
0 |
if (exists $$param{'fields'}{$fild}) |
111
|
0 |
0 |
if (exists $$param{'meta'}{'not_null'}) |
113
|
0 |
0 |
if (exists $$param{'fields'}{$_}) |
120
|
0 |
0 |
if (exists $$param{'meta'}{'unique'}) |
122
|
0 |
0 |
if (exists $$param{'fields'}{$_}) |
129
|
0 |
0 |
if (exists $$param{'meta'}{'pk'}) |
134
|
0 |
0 |
if ($can_fk and exists $$param{'meta'}{'fk'}) |
135
|
0 |
0 |
unless ($$can_fk[0]) |
140
|
0 |
0 |
if (@fk and scalar @fk % 2 == 0) |
143
|
0 |
0 |
if not $fk_field or ref $fk_field or ref $fk_param ne 'HASH' or not exists $$param{'fields'}{$fk_field} |
145
|
0 |
0 |
if exists $$fk_param{'on_update'} |
146
|
0 |
0 |
if exists $$fk_param{'on_delete'} |
152
|
0 |
0 |
if (exists $$param{'meta'}{'index'}) |
162
|
0 |
0 |
$$index{$ind_md5}++ ? : |
173
|
0 |
0 |
$_ eq 'PRIMARY KEY' ? : |
|
0 |
0 |
exists $$param{'fields'}{$_} ? : |
182
|
0 |
0 |
if ($CCCP::SQLiteWrap::OnlyPrint) { } |
191
|
0 |
0 |
wantarray ? : |
197
|
0 |
0 |
unless @query |
198
|
0 |
0 |
unless $obj->db->begin_work |
199
|
0 |
0 |
if $_ |
205
|
0 |
0 |
if (wantarray) { } |
225
|
0 |
0 |
if (-e $obj->path and -s _) { } |
236
|
0 |
0 |
-e $obj->path ? : |
242
|
0 |
0 |
unless @_ or scalar @_ % 2 == 0 |
250
|
0 |
0 |
unless $t_name and exists $$exisis_table{$t_name} and $ind_array |
259
|
0 |
0 |
unless $index_name |
263
|
0 |
0 |
if $index_fields |
267
|
0 |
0 |
if not $new_index_fields or ref $new_index_fields ne 'ARRAY' |
268
|
0 |
0 |
if $$exists_index{md5_hex(join(',', (sort {$a cmp $b;} @$new_index_fields)))}++ |
280
|
0 |
0 |
if ($CCCP::SQLiteWrap::OnlyPrint) { } |
294
|
0 |
0 |
unless $table |
296
|
0 |
0 |
scalar grep({/^\Q$table\E$/i;} map({$_ =~ s/"//g;
$_;} $obj->db->tables)) ? : |
304
|
0 |
0 |
unless $table and $ind_fields and ref $ind_fields eq 'ARRAY' |
305
|
0 |
0 |
unless $obj->table_exists($table) |
308
|
0 |
0 |
unless $index_name |
313
|
0 |
0 |
if ($index_fields) |
321
|
0 |
0 |
exists $$exists_index{$ind_fields_md5} ? : |
326
|
0 |
0 |
unless @_ or scalar @_ % 2 == 0 |
333
|
0 |
0 |
if not $t_name && exists $$exisis_table{$t_name} && $param or ref $param ne 'HASH' or not keys %$param |
336
|
0 |
0 |
if not $t_event_1 && $event_param or ref $event_param ne 'HASH' or not keys %$event_param |
339
|
0 |
0 |
unless $t_event_2 and $sql and ref $sql eq 'ARRAY' and scalar @$sql |
361
|
0 |
0 |
if ($CCCP::SQLiteWrap::OnlyPrint) { } |