line | % | coverage | branch |
109 | 50 | T | F | unless &checksums_is_supported($alg) |
170 | 50 | T | F | exists $opts{'key'} ? : |
172 | 50 | T | F | if (exists $opts{'checksums'}) { } |
178 | 50 | T | F | unless exists $self->{'size'}{$key} |
179 | 50 | T | F | unless my(@s) = stat $file |
180 | 50 | T | F | if (not $opts{'update'} and exists $self->{'size'}{$key} and $self->{'size'}{$key} != $s[7]) |
189 | 50 | T | F | unless open my $fh, "<", $file |
194 | 50 | T | F | if (not $opts{'update'} and exists $self->{'checksums'}{$key}{$alg} and $self->{'checksums'}{$key}{$alg} ne $newsum) |
225 | 100 | T | F | if $checksum eq "" |
226 | 50 | T | F | unless ($checksum =~ /^($regex)\s+(\d+)\s+($rx_fname)$/) |
231 | 50 | T | F | if (not $opts{'update'} and exists $checksums->{$file}{$alg} and $checksums->{$file}{$alg} ne $sum) |
236 | 50 | T | F | if (not $opts{'update'} and exists $self->{'size'}{$file} and $self->{'size'}{$file} != $size) |
241 | 100 | T | F | unless exists $self->{'size'}{$file} |
264 | 50 | T | F | if $opts{'use_files_for_md5'} and $alg eq "md5" |
265 | 50 | T | F | if (exists $control->{$key}) |
302 | 50 | T | F | unless $self->has_file($file) |
322 | 100 | T | F | if defined $alg |
323 | 50 | T | F | if (exists $self->{'checksums'}{$file}) |
324 | 100 | T | F | unless defined $alg |
351 | 0 | T | F | if defined $self->get_checksum($file, $alg) and &checksums_get_property($alg, "strong") |
372 | 50 | T | F | unless defined $sum and defined $size |
390 | 50 | T | F | if $opts{'use_files_for_md5'} and $alg eq "md5" |