when checking filesystem don't stop for missing/corrupt file just print a message

and keep checking.
This commit is contained in:
Andrew Gildfind
2001-04-26 23:48:06 +00:00
parent 1ab9178526
commit c5d447557d
+8 -4
View File
@@ -39,22 +39,26 @@
# Read a manifest generated by fill2fs from the command
# line or stdin, checksum every file listed
#
# $Id$
# $Id: fill2fs_check,v 1.1 2001/04/26 23:46:25 ajag Exp ajag $
#
use File::Basename;
while (<>) {
$status = 0;
file: while (<>) {
chomp;
if ( ! -e $_) {
print "$0: $_ not found\n";
exit(1);
$status = 1; next file;
}
(undef, $expected) = split(/\./, basename $_);
chomp($sum = `sum -r $_`);
($actual) = split(/\s+/, $sum);
if ($actual != $expected) {
print "$0: checksum is wrong for \"$_\"\n";
exit(1);
$status = 1; next file;
}
}
exit($status);