mirror of
https://github.com/MariaDB/server.git
synced 2026-05-03 13:45:34 +02:00
my_md5sum:
Exit properly Build-tools/my_md5sum: Exit properly
This commit is contained in:
parent
7b6712a061
commit
fc3c71e9b6
1 changed files with 7 additions and 1 deletions
|
|
@ -24,7 +24,8 @@ BEGIN
|
|||
use Digest::MD5;
|
||||
use Getopt::Long;
|
||||
|
||||
my $VER= "1.2";
|
||||
my $VER= "1.3";
|
||||
my $EXIT= 0;
|
||||
|
||||
#
|
||||
# Strip the leading path info off the program name ($0). We want 'my_md5sum'
|
||||
|
|
@ -78,6 +79,9 @@ if ($opt_check)
|
|||
# Print an error message if they don't match, else print OK
|
||||
print "$checkfile: FAILED\n" if $digest ne $checksum;
|
||||
print "$checkfile: OK\n" if $digest eq $checksum;
|
||||
|
||||
# Set the exit() status to non-zero if FAILED
|
||||
$EXIT= 1 if $digest ne $checksum;
|
||||
}
|
||||
}
|
||||
# Else generate the MD5 digest to STDOUT
|
||||
|
|
@ -91,6 +95,8 @@ else
|
|||
}
|
||||
}
|
||||
|
||||
exit($EXIT);
|
||||
|
||||
|
||||
#
|
||||
# This routine generates the MD5 digest of a file
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue