diff options
author | Norbert Preining <preining@logic.at> | 2016-04-12 06:12:20 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2016-04-12 06:12:20 +0000 |
commit | 3c6b3c84c968c38b4331ff5aa3625238a5c970d9 (patch) | |
tree | c014c53b3999864dbfc1962315eaeab8b308276e /Master/tlpkg/TeXLive | |
parent | 9ebb44b0f1f7501c50e1384ab2bc6e48f66da8c8 (diff) |
switch consistently to sha512 for all checksums, sign installer and iso etc
git-svn-id: svn://tug.org/texlive/trunk@40455 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive')
-rw-r--r-- | Master/tlpkg/TeXLive/TLConfig.pm | 3 | ||||
-rw-r--r-- | Master/tlpkg/TeXLive/TLUtils.pm | 6 |
2 files changed, 6 insertions, 3 deletions
diff --git a/Master/tlpkg/TeXLive/TLConfig.pm b/Master/tlpkg/TeXLive/TLConfig.pm index 1242ce98b30..27bafd41df5 100644 --- a/Master/tlpkg/TeXLive/TLConfig.pm +++ b/Master/tlpkg/TeXLive/TLConfig.pm @@ -52,6 +52,7 @@ BEGIN { $F_OK $F_WARNING $F_ERROR $F_NOPOSTACTION $ChecksumLength $ChecksumProgram + $ChecksumExtension ); @EXPORT = @EXPORT_OK; } @@ -224,6 +225,8 @@ $ChecksumLength = 128; # argument $ChecksumProgram = "sha512sum"; +# The extension of the checksum file +$ChecksumExtension = "sha512"; 1; diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm index 115b98cb6dd..72c01ef7713 100644 --- a/Master/tlpkg/TeXLive/TLUtils.pm +++ b/Master/tlpkg/TeXLive/TLUtils.pm @@ -3747,8 +3747,8 @@ sub download_to_temp_or_file { =item C<< verify_download($file, $url) >> -Verifies a download of C<$url> into C<$file> by checking C<$url.checksum> -and if gpg is available, verifying that with C<$url.checksum.asc>. +Verifies a download of C<$url> into C<$file> by checking C<$url.sha512> +and if gpg is available, verifying that with C<$url.sha512.asc>. Returns 0 on success, -1 on connection error, 1 on checksum error. In case of errors returns an informal message as second argument. @@ -3758,7 +3758,7 @@ In case of errors returns an informal message as second argument. sub verify_download { my ($file, $url) = @_; # download checksum file - my $checksum_url = "$url.checksum"; + my $checksum_url = "$url.$TeXLive::TLConfig::ChecksumExtension"; my $signature_url = "$checksum_url.asc"; my $checksum_file = download_to_temp_or_file($checksum_url); |