| line |
true |
false |
branch |
|
25
|
12 |
0 |
if ($$ == $par_pid) |
|
26
|
12 |
0 |
unless $ENV{'BRACKUP_TEST_NOCLEANUP'} |
|
39
|
0 |
8 |
if %opts |
|
54
|
7 |
1 |
unless ($target) |
|
55
|
0 |
7 |
$ENV{'BRACKUP_TEST_NOCLEANUP'} ? : |
|
65
|
6 |
1 |
unless exists $$confsec{'type'} |
|
86
|
0 |
8 |
if ($@) |
|
93
|
4 |
4 |
wantarray ? : |
|
101
|
0 |
9 |
unless my $inv_db = $target->inventory_db |
|
102
|
9 |
0 |
$inv_db->backing_file ? : |
|
109
|
0 |
107 |
unless my $dataref = $target->load_chunk($enc_dig) |
|
110
|
0 |
107 |
unless length $$dataref == $enc_size |
|
111
|
0 |
107 |
unless $enc_dig eq 'sha1:' . sha1_hex($$dataref) |
|
114
|
11 |
96 |
if ($range) |
|
122
|
33 |
74 |
if ($gpg_rcpt =~ /^to=(.*)$/) { } |
|
132
|
0 |
107 |
unless $raw_dig eq 'sha1:' . sha1_hex($$dec_ref) |
|
135
|
0 |
9 |
unless ok !$@, "inventory db$inv_db_file is good" |
|
142
|
0 |
11 |
if %opts |
|
143
|
0 |
11 |
$ENV{'BRACKUP_TEST_NOCLEANUP'} ? : |
|
153
|
1 |
10 |
if ($restore_should_die) { } |
|
154
|
0 |
1 |
unless ok !defined($rv), "restore died: $@" |
|
159
|
0 |
10 |
unless ok $rv, 'did the restore' |
|
171
|
0 |
8 |
if ($has_diff) { } |
|
188
|
0 |
2 |
if ($has_diff) { } |
|
201
|
0 |
18 |
unless (-d $dir) |
|
202
|
0 |
18 |
unless opendir my $dh, $dir |
|
211
|
164 |
38 |
unless -d $path |
|
212
|
164 |
38 |
if -f $path |
|
213
|
0 |
202 |
if -l $path |
|
214
|
0 |
202 |
if ($$meta{'is_link'}) { } |
|
228
|
16 |
186 |
if $path eq '.' |
|
238
|
0 |
16 |
unless chdir $dir |
|
249
|
0 |
16 |
unless chdir $cwd |