more precise failure reporting
This commit is contained in:
parent
3d81ccbf21
commit
5297425918
|
@ -477,7 +477,7 @@ sub ckbox($$$@)
|
||||||
|
|
||||||
my ($mu, %ms) = readbox($bn);
|
my ($mu, %ms) = readbox($bn);
|
||||||
if ($mu != $MU) {
|
if ($mu != $MU) {
|
||||||
print STDERR "MAXUID mismatch for '$bn'.\n";
|
print STDERR "MAXUID mismatch for '$bn' (got $mu, wanted $MU).\n";
|
||||||
return 1;
|
return 1;
|
||||||
}
|
}
|
||||||
while (@MS) {
|
while (@MS) {
|
||||||
|
@ -522,12 +522,20 @@ sub ckstate($@)
|
||||||
return 1;
|
return 1;
|
||||||
} else {
|
} else {
|
||||||
for $l (@ls) {
|
for $l (@ls) {
|
||||||
|
if (!@T) {
|
||||||
|
print STDERR "Excess sync state entry: '$l'.\n";
|
||||||
|
return 1;
|
||||||
|
}
|
||||||
$xl = shift(@T)." ".shift(@T)." ".shift(@T);
|
$xl = shift(@T)." ".shift(@T)." ".shift(@T);
|
||||||
if ($l ne $xl) {
|
if ($l ne $xl) {
|
||||||
print STDERR "Sync state entry mismatch: '$l' instead of '$xl'.\n";
|
print STDERR "Sync state entry mismatch: '$l' instead of '$xl'.\n";
|
||||||
return 1;
|
return 1;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
if (@T) {
|
||||||
|
print STDERR "Missing sync state entry: '".shift(@T)." ".shift(@T)." ".shift(@T)."'.\n";
|
||||||
|
return 1;
|
||||||
|
}
|
||||||
}
|
}
|
||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue
Block a user