fixes #2009: padding problem in -m 13400 tests

2020-01-06 13:25:58 +01:00
parent 4bef41ed1b
commit a86235a68c
1 changed files with 2 additions and 0 deletions
--- a/tools/test_modules/m13400.pm
+++ b/tools/test_modules/m13400.pm
@@ -299,6 +299,8 @@ sub module_generate_hash

    $expected_bytes = $cipher->decrypt ($contents_hash);

+    $expected_bytes = substr ($expected_bytes . "\x00" x 32, 0, 32); # padding
+
    $hash = sprintf ('$keepass$*%d*%d*%d*%s*%s*%s*%s*%s%s',
          $version,
          $iteration,