line |
true |
false |
branch |
59
|
0 |
0 |
if ($conf_dir and $home_for_test)
|
70
|
0 |
0 |
if $conf_dir and $conf_file_name
|
79
|
0 |
0 |
if (my $setup = $t_data->{'setup'}) { }
|
|
0 |
0 |
elsif ($ex_data->is_dir) { }
|
|
0 |
0 |
elsif ($ex_data->exists) { }
|
84
|
0 |
0 |
ref $map eq 'ARRAY' ? :
|
|
0 |
0 |
ref $map eq 'HASH' ? :
|
86
|
0 |
0 |
unless (defined $destination_str)
|
89
|
0 |
0 |
if $home_for_test
|
93
|
0 |
0 |
unless $data_file->exists
|
96
|
0 |
0 |
if (ref $map eq "ARRAY")
|
100
|
0 |
0 |
if $home_for_test
|
111
|
0 |
0 |
$conf_dir ? :
|
113
|
0 |
0 |
if $trace
|
115
|
0 |
0 |
unless dircopy($ex_data->stringify, $destination_dir->stringify)
|
121
|
0 |
0 |
unless defined $conf_dir
|
122
|
0 |
0 |
unless defined $conf_file
|
125
|
0 |
0 |
if $trace
|
127
|
0 |
0 |
unless fcopy($ex_data->stringify, $conf_file->stringify)
|
149
|
0 |
0 |
if $child->is_dir
|
162
|
0 |
0 |
if ($t->{'config_file'})
|
163
|
0 |
0 |
$conf_dir ? :
|
172
|
0 |
0 |
if (my $info = $t->{'log4perl_load_warnings'} or $main::_use_log4perl_to_warn) { }
|
|
0 |
0 |
elsif ($t->{'no_warnings'} || exists $t->{'load_warnings'} and not defined $t->{'load_warnings'}) { }
|
197
|
0 |
0 |
if (my $info = $t->{'log4perl_update_warnings'}) { }
|
|
0 |
0 |
elsif (my $uw = delete $args{'update_warnings'}) { }
|
213
|
0 |
0 |
if (defined $ret) { }
|
224
|
0 |
0 |
if $trace
|
239
|
0 |
0 |
if $trace
|
245
|
0 |
0 |
if (defined $t->{'dump_errors'})
|
257
|
0 |
0 |
if ($test_logs and (my $info = $t->{'log4perl_dump_warnings'}) || $main::_use_log4perl_to_warn) { }
|
|
0 |
0 |
elsif (not $test_logs or $no_warnings) { }
|
|
0 |
0 |
elsif (exists $t->{'dump_warnings'} and not defined $t->{'dump_warnings'}) { }
|
273
|
0 |
0 |
if $t->{'dump_warnings'}
|
278
|
0 |
0 |
if $trace
|
287
|
0 |
0 |
ref $c eq 'ARRAY' ? :
|
299
|
0 |
0 |
ref $check_data_l eq 'ARRAY' ? :
|
302
|
0 |
0 |
ref $check_data eq 'HASH' ? :
|
303
|
0 |
0 |
ref $check_data eq 'HASH' ? :
|
304
|
0 |
0 |
@check_args ? :
|
308
|
0 |
0 |
ref $check_v_l eq 'ARRAY' ? :
|
310
|
0 |
0 |
if (ref $check_v eq 'Regexp') { }
|
346
|
0 |
0 |
ref $c eq 'ARRAY' ? :
|
351
|
0 |
0 |
ref $spec eq 'ARRAY' ? :
|
359
|
0 |
0 |
if (ref $check eq 'Regexp') { }
|
360
|
0 |
0 |
if $k =~ /$check/l
|
363
|
0 |
0 |
if $k eq $check
|
366
|
0 |
0 |
if ($invert) { }
|
386
|
0 |
0 |
if ($^O eq "MSWin32" and my $fm = $t->{'file_mode'})
|
391
|
0 |
0 |
if (my $fm = $t->{'file_mode'})
|
396
|
0 |
0 |
if ($stat)
|
407
|
0 |
0 |
if (my $fc = $t->{'file_contents'} || $t->{'file_content'})
|
410
|
0 |
0 |
ref $t eq 'ARRAY' ? :
|
418
|
0 |
0 |
if (my $fc = $t->{'file_contents_like'})
|
421
|
0 |
0 |
ref $t eq 'ARRAY' ? :
|
429
|
0 |
0 |
if (my $fc = $t->{'file_contents_unlike'})
|
432
|
0 |
0 |
ref $t eq 'ARRAY' ? :
|
446
|
0 |
0 |
$conf_dir ? :
|
|
0 |
0 |
$t->{'setup'} ? :
|
450
|
0 |
0 |
if defined $t->{'file_check_sub'}
|
458
|
0 |
0 |
unless dircopy($wr_dir->stringify, $wr_dir2->stringify)
|
462
|
0 |
0 |
if $t->{'backend_arg'}
|
486
|
0 |
0 |
unless $config_classes
|
489
|
0 |
0 |
ref $c eq 'HASH' ? :
|
512
|
0 |
0 |
unless ($result = do "./$test_group_conf")
|
513
|
0 |
0 |
if $@
|
514
|
0 |
0 |
unless defined $result
|
515
|
0 |
0 |
unless $result
|
519
|
0 |
0 |
if (ref $result eq 'ARRAY') { }
|
|
0 |
0 |
elsif (ref $result eq 'HASH') { }
|
544
|
0 |
0 |
if ($test_suite_data->{'skip'})
|
555
|
0 |
0 |
unless (defined $test_suite_data->{'model_to_test'})
|
557
|
0 |
0 |
unless (defined $test_suite_data->{'model_to_test'})
|
579
|
0 |
0 |
if defined $conf_file_name
|
586
|
0 |
0 |
if (defined $do and not $t_name =~ /$do/l)
|
599
|
0 |
0 |
if $model->has_instance($inst_name)
|
603
|
0 |
0 |
if $t->{'backend_arg'}
|
622
|
0 |
0 |
if $test_logs
|
624
|
0 |
0 |
if $t->{'update'}
|
626
|
0 |
0 |
if $t->{'load'}
|
629
|
0 |
0 |
if $t->{'check_before_fix'}
|
631
|
0 |
0 |
if $t->{'apply_fix'}
|
637
|
0 |
0 |
if $t->{'check'}
|
639
|
0 |
0 |
if $t->{'has_key'}
|
640
|
0 |
0 |
if $t->{'has_not_key'}
|
642
|
0 |
0 |
if $t->{'verify_annotation'}
|
650
|
0 |
0 |
if $ex_data->is_dir
|
654
|
0 |
0 |
if $t->{'load2'}
|
667
|
0 |
0 |
if defined $test_suite_data->{'conf_file_name'}
|
669
|
0 |
0 |
if $t->{'wr_check'}
|
681
|
0 |
0 |
if $t->{$_}
|
687
|
0 |
0 |
if ($@)
|
699
|
1 |
0 |
if (@_) { }
|
706
|
0 |
1 |
$arg =~ /t/l ? :
|
707
|
0 |
1 |
if $arg =~ /l/l
|
711
|
0 |
1 |
if ($log and -e $log4perl_user_conf_file) { }
|
715
|
0 |
1 |
$log ? :
|
718
|
0 |
1 |
if $arg =~ /e/l
|
728
|
0 |
0 |
$opts->{'log'} ? :
|
738
|
0 |
0 |
if $test_only_app and $test_only_app ne $test_group
|
740
|
0 |
0 |
unless $model
|