| line |
true |
false |
branch |
|
43
|
0 |
0 |
unless ($opt->{'config'}) |
|
48
|
0 |
0 |
@json_files > 1 ? : |
|
51
|
0 |
0 |
unless ($opt->{'config'}) |
|
58
|
0 |
0 |
if not eval {
do {
$json->decode($json_text);
1
}
} |
|
64
|
0 |
36 |
unless ($opt->{'config'}) |
|
75
|
36 |
0 |
if $args->[0] |
|
79
|
0 |
108 |
unless ($json->{$needed}) |
|
94
|
3 |
58 |
if ("HASH" eq ref $framework) |
|
100
|
2 |
59 |
$min ? : |
|
|
2 |
59 |
$max ? : |
|
109
|
2 |
34 |
if (2 <= keys %major_versions) |
|
133
|
1 |
35 |
if ($product eq "KIX") |
|
140
|
16 |
20 |
if ($json->{'requires'}) |
|
157
|
36 |
0 |
if ($json->{'description'}) |
|
163
|
36 |
0 |
if ($json->{'license'}) |
|
175
|
166 |
0 |
if substr($_, 0, 1) ne "." and not $_ =~ m[[\\/]\.] |
|
178
|
1 |
35 |
if ($json->{'exclude_files'} and "ARRAY" eq ref $json->{'exclude_files'}) |
|
185
|
1 |
1 |
if $excluded |
|
193
|
0 |
164 |
$_ =~ /^bin/ ? : |
|
196
|
1 |
35 |
if ($json->{'changes_file'} and -f $config->dir . "/" . $json->{'changes_file'}) |
|
226
|
35 |
1 |
unless $json->{'changes'} |
|
231
|
1 |
1 |
if (not ref $change) { } |
|
|
1 |
0 |
elsif ('HASH' eq ref $change) { } |
|
236
|
1 |
0 |
if $change->{'version'} |
|
237
|
1 |
0 |
if $change->{'date'} |
|
240
|
0 |
2 |
unless length $info |
|
274
|
20 |
16 |
unless $json->{'database'} |
|
276
|
8 |
24 |
ref $tmp_version ? : |
|
280
|
12 |
28 |
$version ? : |
|
283
|
1 |
39 |
if ($action->{'uninstall'}) |
|
287
|
0 |
40 |
unless $action_code{$op} |
|
291
|
15 |
25 |
if ($op eq 'TableCreate') { } |
|
|
0 |
25 |
elsif ($op eq 'TableDrop') { } |
|
301
|
3 |
37 |
if ($op eq "ColumnAdd") |
|
303
|
2 |
1 |
unless ($own_tables{$table}) |
|
306
|
0 |
2 |
unless $action->{'columns'} |
|
320
|
11 |
22 |
if (%tables_to_delete) |
|
329
|
164 |
34 |
unless $db_actions{$action_type}{$phase} |
|
339
|
17 |
16 |
unless $json->{'code'} |
|
340
|
4 |
26 |
unless (ref $code) |
|
341
|
2 |
2 |
$code eq 'Uninstall' ? : |
|
350
|
1 |
29 |
if ($code->{'inline'}) |
|
364
|
32 |
1 |
unless $json->{'intro'} |
|
369
|
1 |
32 |
if ($opt->{'cvs'}) |
|
397
|
0 |
33 |
unless my $fh = "IO::File"->new($name . ".sopm", "w") |
|
420
|
0 |
1 |
$code->{'version'} ? : |
|
433
|
0 |
2 |
$intro->{'version'} ? : |
|
435
|
1 |
1 |
ref $intro->{'text'} ? : |
|
437
|
1 |
1 |
$intro->{'lang'} ? : |
|
438
|
1 |
1 |
$intro->{'title'} ? : |
|
452
|
8 |
8 |
$version ? : |
|
457
|
0 |
16 |
unless $action->{'columns'} |
|
458
|
6 |
106 |
ref $column->{'value'} ? : |
|
464
|
64 |
48 |
$column->{'type'} ? : |
|
488
|
0 |
15 |
$version ? : |
|
493
|
0 |
15 |
unless $action->{'columns'} |
|
501
|
14 |
28 |
$column->{'size'} ? : |
|
|
14 |
28 |
$column->{'auto_increment'} ? : |
|
|
14 |
28 |
$column->{'primary_key'} ? : |
|
505
|
10 |
4 |
unless $action->{'unique'} |
|
509
|
0 |
4 |
unless $unique->{'columns'} |
|
517
|
4 |
10 |
unless $action->{'keys'} |
|
521
|
0 |
10 |
unless $key->{'references'} |
|
541
|
0 |
3 |
$version ? : |
|
546
|
0 |
3 |
unless $action->{'columns'} |
|
554
|
2 |
0 |
$column->{'size'} ? : |
|
|
0 |
2 |
$column->{'auto_increment'} ? : |
|
|
0 |
2 |
$column->{'primary_key'} ? : |
|
568
|
0 |
2 |
$version ? : |
|
573
|
0 |
2 |
unless $action->{'columns'} |
|
588
|
1 |
0 |
$version ? : |
|
593
|
0 |
1 |
unless $action->{'references'} |
|
613
|
1 |
0 |
$version ? : |
|
618
|
0 |
1 |
unless $action->{'references'} |
|
638
|
1 |
0 |
$version ? : |
|
644
|
0 |
1 |
unless $action->{'columns'} |
|
661
|
1 |
0 |
$version ? : |
|
679
|
0 |
1 |
$version ? : |
|
684
|
0 |
1 |
unless $action->{'columns'} |
|
693
|
0 |
0 |
$column->{'size'} ? : |
|
|
0 |
0 |
$column->{'auto_increment'} ? : |
|
|
0 |
0 |
$column->{'primary_key'} ? : |
|
714
|
3 |
44 |
unless ($types{$type}) |