fixes #2200: new WinZip tokenizer hex data length problem
This commit is contained in:
@@ -94,7 +94,7 @@ sub module_generate_hash
|
||||
|
||||
my $auth = hmac_hex ($data, $key_bin, \&sha1, 64);
|
||||
|
||||
my $hash = sprintf ('$zip2$*%u*%u*%u*%s*%s*%u*%s*%s*$/zip2$', $type, $mode, $magic, $salt, $verify_bytes, $compress_length, $data, substr ($auth, 0, 20));
|
||||
my $hash = sprintf ('$zip2$*%u*%u*%u*%s*%s*%x*%s*%s*$/zip2$', $type, $mode, $magic, $salt, $verify_bytes, $compress_length, $data, substr ($auth, 0, 20));
|
||||
|
||||
return $hash;
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user