From b577f65eedd59aecb2cb2d0b955614ff90ca4599 Mon Sep 17 00:00:00 2001 From: Martin Whitaker Date: Fri, 22 Feb 2019 21:43:45 +0000 Subject: Allow user to select which checksums are generated and support sha3-512. --- lib/MGA/DrakISO/BuildISO.pm | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) (limited to 'lib/MGA/DrakISO/BuildISO.pm') diff --git a/lib/MGA/DrakISO/BuildISO.pm b/lib/MGA/DrakISO/BuildISO.pm index 2711e4c..eb89965 100644 --- a/lib/MGA/DrakISO/BuildISO.pm +++ b/lib/MGA/DrakISO/BuildISO.pm @@ -148,9 +148,11 @@ sub build_iso_image { ) or die "ERROR: unable to run xorrisofs\n"; run_("mgaiso-addmd5 $dest > /dev/null 2> /dev/null"); - run_("cd $build_dir && md5sum $iso_name > $iso_name.md5"); - run_("cd $build_dir && sha1sum $iso_name > $iso_name.sha1"); - run_("cd $build_dir && sha512sum $iso_name > $iso_name.sha512"); + my $checksums = $build->{media}{checksums}; + member('md5', @$checksums) and run_("cd $build_dir && md5sum $iso_name > $iso_name.md5"); + member('sha1', @$checksums) and run_("cd $build_dir && sha1sum $iso_name > $iso_name.sha1"); + member('sha2', @$checksums) and run_("cd $build_dir && sha512sum $iso_name > $iso_name.sha512"); + member('sha3', @$checksums) and run_("cd $build_dir && sha3-512sum $iso_name > $iso_name.sha3"); if (my $suffix = $build->get_set_suffix) { if (my ($prefix, $ext) = $dest =~ /(.*)(\.[^.]+)$/) { my $link = $prefix . $suffix . $ext; -- cgit v1.2.1