verify test fix for -m 13400/-m 29700

pull/3840/head
philsmd 9 months ago
parent 91095845b9
commit 8743246641
No known key found for this signature in database
GPG Key ID: 4F25D016D9D6A8AF

@ -239,14 +239,32 @@ sub module_generate_hash
$final_algorithm = "Crypt::Rijndael";
}
my $cipher = Crypt::CBC->new ({
my $cipher;
if ($version == 1)
{
$cipher = Crypt::CBC->new ({
key => $final_key,
cipher => $final_algorithm,
iv => $enc_iv,
literal_key => 1,
header => "none",
padding => "standard",
keysize => 32
});
}
else
{
$cipher = Crypt::CBC->new ({
key => $final_key,
cipher => $final_algorithm,
iv => $enc_iv,
literal_key => 1,
header => "none",
padding => "none",
keysize => 32
});
}
my $hash;

@ -243,14 +243,32 @@ sub module_generate_hash
$final_algorithm = "Crypt::Rijndael";
}
my $cipher = Crypt::CBC->new ({
my $cipher;
if ($version == 1)
{
$cipher = Crypt::CBC->new ({
key => $final_key,
cipher => $final_algorithm,
iv => $enc_iv,
literal_key => 1,
header => "none",
padding => "standard",
keysize => 32
});
}
else
{
$cipher = Crypt::CBC->new ({
key => $final_key,
cipher => $final_algorithm,
iv => $enc_iv,
literal_key => 1,
header => "none",
padding => "none",
keysize => 32
});
}
my $hash;

Loading…
Cancel
Save