Branch Coverage

blib/lib/Apache/TestRun.pm
Criterion Covered Total %
branch 0 246 0.0


line true false branch
102 0 0 unless -e $^X
112 0 0 if @_
150 0 0 if (-d $file and $_ ne '/') { }
153 0 0 if (@files)
159 0 0 if ($file =~ /\.t$/ and -e $file) { }
0 0 elsif (-e "$file.t") { }
0 0 elsif (/^[\d.]+$/) { }
170 0 0 if (/^(\d+)\.\.(\d+)$/)
190 0 0 if (@invalid_argv)
201 0 0 if $ENV{$_}
215 0 0 $1 ? :
0 0 /-verbose=(\d)/ ? :
239 0 0 if ($val =~ /^--?(.+)/)
242 0 0 if (exists $Apache::TestConfig::Usage{$key}) { }
0 0 elsif (exists $$req_wanted_args{$key}) { }
281 0 0 if (exists $opts{'debug'})
286 0 0 if ($opts{'trace'})
288 0 0 if (exists $levels{$opts{'trace'}}) { }
302 0 0 if (@{$opts{'breakpoint'};})
306 0 0 if ($$self{'reconfigure'}) { }
327 0 0 unless (grep {exists $$opts{$_};} @std_run, @request_opts)
328 0 0 if (@$tests and $$self{'server'}->ping) { }
353 0 0 unless $_[0] =~ /^Failed/i
358 0 0 if (caller 1)[3] or !1
360 0 0 if $$opts{'start-httpd'}
366 0 0 if ($caught_sig_int++)
371 0 0 if $$opts{'start-httpd'}
390 0 0 if $@
396 0 0 if ($? and not $self->user_error and $$self{'opts'}{'bugreport'} and $self->can('bug_report'))
419 0 0 $$opts{'ssl'} ? :
423 0 0 if ($$opts{'http11'})
428 0 0 if (not $$save and my(@reasons) = $$self{'test_config'}->need_reconfiguration($$self{'conf_opts'}))
433 0 0 unless ($refreshed)
441 0 0 if (not $$save and exists $$opts{'proxy'}) { }
446 0 0 if (not $$save and $$opts{'proxy'} eq 'on' and $max == 1)
449 0 0 unless ($refreshed)
462 0 0 unless $$save
476 0 0 if ($$self{'opts'}{'no-httpd'})
488 0 0 unless ($$save)
491 0 0 unless ($$addr eq $remote_addr)
505 0 0 if $$self{'opts'}{'ssl'}
513 0 0 if ($$self{'opts'}{'save'} or not Apache::TestConfig::custom_config_exists())
524 0 0 unless exists $$self{'opts'}{$_}
527 0 0 if $rc
530 0 0 if ($$self{'opts'}{'stop-httpd'})
532 0 0 if ($$self{'server'}->ping) { }
534 0 0 $ok < 0 ? :
540 0 0 if -e $pid_file
554 0 0 if (-e $file and $$opts{'start-httpd'})
555 0 0 if ($server->ping) { }
568 0 0 if ($$opts{'start-httpd'}) { }
0 0 elsif ($$opts{'run-tests'}) { }
569 0 0 unless $server->start
576 0 0 unless ($is_up)
594 0 0 if (grep {exists $$self{'opts'}{$_};} @request_opts) { }
598 0 0 if $$self{'opts'}{'run-tests'}
608 0 0 if $$self{'opts'}{'stop-httpd'}
619 0 0 if $ENV{'APACHE_TEST_ULIMIT_SET'}
632 0 0 unless -e $binsh
636 0 0 unless open $sh, "echo ulimit -a | $binsh|"
639 0 0 if (/^core.*unlimited$/)
650 0 0 unless exec $orig_command
673 0 0 if (-e $0)
675 0 0 if $top and -d $top
679 0 0 /^-/ ? :
717 0 0 if ($$self{'opts'}{'configure'})
724 0 0 unless ($$self{'opts'}{'clean'})
726 0 0 if ($@)
735 0 0 if ($$self{'opts'}{'configure'})
746 0 0 unless $$self{'opts'}{'no-httpd'}
750 0 0 unless $$self{'opts'}{'no-httpd'}
763 0 0 if $$vars{'apxs'}
768 0 0 if $$orig_conf_opts{'httpd'}
770 0 0 if $$orig_conf_opts{'httpd'} and $$vars{'apxs'}
779 0 0 unless exec $new_command
794 0 0 unless -e $config_file
799 0 0 if $@
808 0 0 unless $cfg_top_dir
809 0 0 if $cfg_top_dir eq $cur_top_dir
859 0 0 if ($only_t_dir)
864 0 0 unless -f $file
865 0 0 unless /$core_pat/o
866 0 0 if exists $core_files{$file} and $core_files{$file} == -M $file
873 0 0 @cores ? :
880 0 0 unless -f $_
882 0 0 unless $file =~ /$core_pat/o
884 0 0 unless (exists $core_files{$core} and $core_files{$core} == -M $core)
914 0 0 unless -f $_
916 0 0 unless $file =~ /$core_pat/o
918 0 0 if (exists $core_files{$core} and $core_files{$core} == -M $core) { }
924 0 0 $times++ ? :
943 0 0 unless -f $_
944 0 0 unless /$core_pat/o
977 0 0 if ($user eq 'root')
980 0 0 unless my($uid, $gid) = (getpwnam $user)[2, 3]
1001 0 0 if (%original_t_perms)
1005 0 0 unless -e $file
1020 0 0 unless $( eq $groups and $) eq $groups
1025 0 0 unless $< == $uid and $> == $uid
1037 0 0 unless open TEST, ">$file"
1040 0 0 unless -f $file
1044 0 0 unless opendir DIR, $dir
1045 0 0 unless defined readdir DIR
1071 0 0 unless ($res eq 'OK')
1114 0 0 unless $( eq $groups and $) eq $groups
1118 0 0 unless $< == $uid and $> == $uid
1129 0 0 unless exists $$opts{$_}
1130 0 0 if $$opts{$_}
1131 0 0 $request ? :
1134 0 0 if ($request)
1159 0 0 if ($pid)
1160 0 0 if ($pid == -1) { }
1171 0 0 if (exists $$self{'opts'}{'ping'} and $$self{'opts'}{'ping'} eq 'block') { }
1208 0 0 if (my $db = $$opts{'debugger'})
1209 0 0 if ($db =~ s/^perl=?//) { }
0 0 elsif ($db =~ s/^lwp[=:]?//) { }
1213 0 0 if $db eq 'nostop'
1256 0 0 if (@opts == 1) { }
1277 0 0 if (my $report = $opts{'bugreport'})
1292 0 0 $_[0] ? :
1314 0 0 unless (-t STDIN or $ENV{'APACHE_TEST_INTERACTIVE_PROMPT_OK'})
1327 0 0 unless ($no_doubt)
1331 0 0 if lc($ans) =~ /no/