| line |
true |
false |
branch |
|
45
|
0 |
0 |
unless ($opt->{'config'}) |
|
50
|
0 |
0 |
@json_files > 1 ? : |
|
53
|
0 |
0 |
unless ($opt->{'config'}) |
|
60
|
0 |
0 |
if not eval {
do {
$json->decode($json_text);
1
}
} |
|
66
|
0 |
32 |
unless ($opt->{'config'}) |
|
77
|
32 |
0 |
if $args->[0] |
|
81
|
0 |
96 |
unless ($json->{$needed}) |
|
96
|
3 |
52 |
if ('HASH' eq ref $framework) |
|
102
|
2 |
53 |
$min ? : |
|
|
2 |
53 |
$max ? : |
|
111
|
2 |
30 |
if (2 <= keys %major_versions) |
|
126
|
1 |
31 |
if (uc $json->{'product'} eq 'KIX') |
|
133
|
14 |
18 |
if ($json->{'requires'}) |
|
150
|
32 |
0 |
if ($json->{'description'}) |
|
156
|
32 |
0 |
if ($json->{'license'}) |
|
168
|
154 |
0 |
if substr($_, 0, 1) ne '.' and not $_ =~ m[[\\/]\.] |
|
171
|
1 |
31 |
if ($json->{'exclude_files'} and 'ARRAY' eq ref $json->{'exclude_files'}) |
|
178
|
1 |
1 |
if $excluded |
|
186
|
0 |
152 |
$_ =~ /^bin/ ? : |
|
189
|
1 |
31 |
if ($json->{'changes_file'} and -f $config->dir . '/' . $json->{'changes_file'}) |
|
219
|
31 |
1 |
unless $json->{'changes'} |
|
224
|
1 |
1 |
if (not ref $change) { } |
|
|
1 |
0 |
elsif ('HASH' eq ref $change) { } |
|
229
|
1 |
0 |
if $change->{'version'} |
|
230
|
1 |
0 |
if $change->{'date'} |
|
233
|
0 |
2 |
unless length $info |
|
267
|
18 |
14 |
unless $json->{'database'} |
|
269
|
5 |
22 |
ref $tmp_version ? : |
|
273
|
9 |
23 |
$version ? : |
|
276
|
1 |
31 |
if ($action->{'uninstall'}) |
|
280
|
0 |
32 |
unless $action_code{$op} |
|
282
|
13 |
19 |
if ($op eq 'TableCreate') { } |
|
|
0 |
19 |
elsif ($op eq 'TableDrop') { } |
|
292
|
3 |
29 |
if ($op eq 'ColumnAdd') |
|
294
|
2 |
1 |
unless ($own_tables{$table}) |
|
297
|
0 |
2 |
unless $action->{'columns'} |
|
311
|
10 |
19 |
if (%tables_to_delete) |
|
319
|
58 |
29 |
unless $db_actions{$action_type} |
|
329
|
15 |
14 |
unless $json->{'code'} |
|
330
|
4 |
23 |
unless (ref $code) |
|
331
|
2 |
2 |
$code eq 'Uninstall' ? : |
|
348
|
28 |
1 |
unless $json->{'intro'} |
|
353
|
1 |
28 |
if ($opt->{'cvs'}) |
|
371
|
0 |
29 |
unless my $fh = 'IO::File'->new($name . '.sopm', 'w') |
|
379
|
0 |
2 |
$intro->{'version'} ? : |
|
381
|
1 |
1 |
ref $intro->{'text'} ? : |
|
383
|
1 |
1 |
$intro->{'lang'} ? : |
|
384
|
1 |
1 |
$intro->{'title'} ? : |
|
398
|
5 |
5 |
$version ? : |
|
403
|
0 |
10 |
unless $action->{'columns'} |
|
404
|
2 |
68 |
ref $column->{'value'} ? : |
|
410
|
40 |
30 |
$column->{'type'} ? : |
|
434
|
0 |
13 |
$version ? : |
|
439
|
0 |
13 |
unless $action->{'columns'} |
|
447
|
12 |
24 |
$column->{'size'} ? : |
|
|
12 |
24 |
$column->{'auto_increment'} ? : |
|
|
12 |
24 |
$column->{'primary_key'} ? : |
|
451
|
10 |
2 |
unless $action->{'unique'} |
|
455
|
0 |
2 |
unless $unique->{'columns'} |
|
463
|
4 |
8 |
unless $action->{'keys'} |
|
467
|
0 |
8 |
unless $key->{'references'} |
|
487
|
0 |
3 |
$version ? : |
|
492
|
0 |
3 |
unless $action->{'columns'} |
|
500
|
2 |
0 |
$column->{'size'} ? : |
|
|
0 |
2 |
$column->{'auto_increment'} ? : |
|
|
0 |
2 |
$column->{'primary_key'} ? : |
|
514
|
0 |
2 |
$version ? : |
|
519
|
0 |
2 |
unless $action->{'columns'} |
|
534
|
1 |
0 |
$version ? : |
|
539
|
0 |
1 |
unless $action->{'references'} |
|
559
|
1 |
0 |
$version ? : |
|
564
|
0 |
1 |
unless $action->{'references'} |
|
584
|
1 |
0 |
$version ? : |
|
590
|
0 |
1 |
unless $action->{'columns'} |
|
607
|
1 |
0 |
$version ? : |
|
625
|
0 |
1 |
$version ? : |
|
630
|
0 |
1 |
unless $action->{'columns'} |
|
639
|
0 |
0 |
$column->{'size'} ? : |
|
|
0 |
0 |
$column->{'auto_increment'} ? : |
|
|
0 |
0 |
$column->{'primary_key'} ? : |
|
660
|
3 |
38 |
unless ($types{$type}) |