From 1dcc0e28681755d612303b9042e239ef6cf92fcc Mon Sep 17 00:00:00 2001 From: philsmd Date: Sat, 19 Aug 2023 11:45:58 +0200 Subject: [PATCH] verify test fix for -m 3730 = md5($s1.uc(md5($s2.$p))) --- tools/test_modules/m03730.pm | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/tools/test_modules/m03730.pm b/tools/test_modules/m03730.pm index e50da02c8..9163abe55 100644 --- a/tools/test_modules/m03730.pm +++ b/tools/test_modules/m03730.pm @@ -29,17 +29,18 @@ sub module_verify_hash { my $line = shift; - my ($hash, $salt, $word) = split (':', $line); + my ($hash, $salt1, $salt2, $word) = split (':', $line); return unless defined $hash; - return unless defined $salt; + return unless defined $salt1; + return unless defined $salt2; return unless defined $word; my $word_packed = pack_if_HEX_notation ($word); - my $new_hash = module_generate_hash ($word_packed, $salt); + my $new_hash = module_generate_hash ($word_packed, $salt1, $salt2); return ($new_hash, $word); } -1; \ No newline at end of file +1;