1
mirror of https://github.com/hashcat/hashcat synced 2024-12-23 14:13:43 +01:00

Remove some debugging code from tools/test_modules/m26000.pm

This commit is contained in:
Jens Steube 2021-04-17 21:28:20 +02:00
parent ee7d8ef0e7
commit 35aa0911d1

View File

@ -31,11 +31,11 @@ sub module_generate_hash
my $chp = sha1 ($hp . $entry_salt_bin); my $chp = sha1 ($hp . $entry_salt_bin);
my $k1 = hmac ($pes . $entry_salt_bin, $chp, \&sha1, 64); my $k1 = hmac ($pes . $entry_salt_bin, $chp, \&sha1, 64);
my $tk = hmac ($pes, $chp, \&sha1, 64); my $tk = hmac ($pes, $chp, \&sha1, 64);
my $k2 = hmac ($tk . $entry_salt_bin, $chp, \&sha1, 64); my $k2 = hmac ($tk . $entry_salt_bin, $chp, \&sha1, 64);
my $k = $k1 . $k2; my $k = $k1 . $k2;
@ -57,17 +57,10 @@ sub module_generate_hash
$pt1 = exclusive_or ($pt1, $iv); $pt1 = exclusive_or ($pt1, $iv);
print unpack ("H*", $ct1_bin), "\n";
print unpack ("H*", $ct2_bin), "\n";
my $pt2 = $ede3->decrypt ($ct2_bin); my $pt2 = $ede3->decrypt ($ct2_bin);
print unpack ("H*", $pt2), "\n";
$pt2 = exclusive_or ($pt2, $ct1_bin); $pt2 = exclusive_or ($pt2, $ct1_bin);
print unpack ("H*", $pt2), "\n";
$pt = $pt1 . $pt2; $pt = $pt1 . $pt2;
if ($pt ne "password-check\x02\x02") if ($pt ne "password-check\x02\x02")