| line |
true |
false |
branch |
|
18
|
1 |
0 |
if ($self->_can_run_in_src) |
|
20
|
0 |
1 |
unless $^O eq "linux" |
|
22
|
0 |
1 |
if ($self->src_abs ne "/") |
|
25
|
0 |
0 |
unless -x $chroot |
|
26
|
0 |
0 |
if $self->{'_log_trace'} |
|
32
|
1 |
0 |
unless -x $strace |
|
33
|
0 |
0 |
if $self->{'_log_trace'} |
|
43
|
0 |
0 |
unless $self->src_abs eq "/" |
|
46
|
0 |
0 |
unless open my $devnull, "+<", "/dev/null" |
|
50
|
0 |
0 |
if (not $pid) { } |
|
54
|
0 |
0 |
unless chdir $self->src_abs |
|
55
|
0 |
0 |
unless POSIX::dup2(fileno $devnull, 0) |
|
56
|
0 |
0 |
unless POSIX::dup2(fileno $devnull, 1) |
|
57
|
0 |
0 |
unless POSIX::dup2(fileno $devnull, 2) |
|
58
|
0 |
0 |
unless POSIX::dup2(fileno $w, 3) |
|
61
|
0 |
0 |
unless exec @argv |
|
73
|
0 |
0 |
if (length $err) |
|
77
|
0 |
0 |
if $self->{'_log_trace'} |
|
79
|
0 |
0 |
if $self->{'_log_trace'} |
|
80
|
0 |
0 |
if /^open(?:at)?\(.*?"(.*?)",.*?= [0-9]/u |
|
82
|
0 |
0 |
if $self->{'_log_trace'} |
|
85
|
0 |
0 |
if $self->{'_log_trace'} |
|
86
|
0 |
0 |
if $wstat |
|
98
|
14 |
32 |
if /^\s*(#|\z)/u |
|
99
|
6 |
26 |
if (/^\s*include (\S+)/u) { } |
|
|
26 |
0 |
elsif (m[^/]u) { } |
|
102
|
4 |
2 |
$pattern =~ s[^/][]u ? : |
|
119
|
3 |
0 |
if (defined $self->_src_abs_path("etc/ld.so.conf")) |
|
120
|
0 |
3 |
unless eval {
do {
$paths = $self->_distinct_abs_directories(1, @$paths, $self->parse_ld_so_conf)
}
} |
|
132
|
0 |
0 |
if /^\s*(#|\z)/u |
|
133
|
0 |
0 |
if (/^\s*([^\s:]+)\s*:\s*(\S.+)/u) { } |
|
145
|
0 |
0 |
unless (@module_names) |
|
148
|
0 |
0 |
unless ref $_ eq "ARRAY" |
|
159
|
0 |
0 |
if (my(@match) = glob($abs . $pattern)) |
|
188
|
0 |
0 |
if (exists $self->{'dst_path_set'}{"usr/share/zoneinfo/$tz_name"} or $self->_dst->can('dst_abs') and -f $self->_dst->dst_abs . $tz_name) { } |
|
|
0 |
0 |
elsif (defined(my $src_path = $self->_src_abs_path("usr/share/zoneinfo/$tz_name"))) { } |
|
|
0 |
0 |
elsif (defined(my $path = abs_path("/usr/share/zoneinfo/$tz_name"))) { } |