line | % | coverage | branch |
110 | 50 | T | F | unless &checksums_is_supported($alg) |
171 | 50 | T | F | exists $opts{'key'} ? : |
173 | 50 | T | F | if (exists $opts{'checksums'}) { } |
179 | 50 | T | F | unless exists $self->{'size'}{$key} |
180 | 50 | T | F | unless my(@s) = stat $file |
181 | 50 | T | F | if (not $opts{'update'} and exists $self->{'size'}{$key} and $self->{'size'}{$key} != $s[7]) |
190 | 50 | T | F | unless open my $fh, "<", $file |
195 | 50 | T | F | if (not $opts{'update'} and exists $self->{'checksums'}{$key}{$alg} and $self->{'checksums'}{$key}{$alg} ne $newsum) |
226 | 100 | T | F | if $checksum eq "" |
227 | 50 | T | F | unless ($checksum =~ /^($regex)\s+(\d+)\s+($rx_fname)$/) |
233 | 50 | T | F | if (not $opts{'update'} and exists $checksums->{$file}{$alg} and $checksums->{$file}{$alg} ne $sum) |
238 | 50 | T | F | if (not $opts{'update'} and exists $self->{'size'}{$file} and $self->{'size'}{$file} != $size) |
243 | 100 | T | F | unless exists $self->{'size'}{$file} |
266 | 50 | T | F | if $opts{'use_files_for_md5'} and $alg eq "md5" |
267 | 50 | T | F | if (exists $control->{$key}) |
304 | 50 | T | F | unless $self->has_file($file) |
324 | 100 | T | F | if defined $alg |
325 | 50 | T | F | if (exists $self->{'checksums'}{$file}) |
326 | 100 | T | F | unless defined $alg |
353 | 0 | T | F | if defined $self->get_checksum($file, $alg) and &checksums_get_property($alg, "strong") |
374 | 50 | T | F | unless defined $sum and defined $size |
392 | 50 | T | F | if $opts{'use_files_for_md5'} and $alg eq "md5" |