arno/hashcat
1
0
Fork 0
mirror of https://github.com/hashcat/hashcat.git synced 2025-02-21 03:52:09 +00:00
Code Issues Releases Wiki Activity

Fix selftest for hash-mode 18400

Browse Source
This commit is contained in:
R. Yushaev 2018-12-14 13:09:54 +01:00
parent 478fd2c8cf
commit 875d6eb516
2 changed files with 11 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/interface.c
View File

@ -11081,10 +11081,10 @@ int odf12_parse_hash (u8 *input_buf, u32 input_len, hash_t *hash_buf, MAYBE_UNUS
if (rc_tokenizer != PARSER_OK) return (rc_tokenizer); if (rc_tokenizer != PARSER_OK) return (rc_tokenizer);
u8 *checksum = token.buf[5]; const u8 *checksum = token.buf[5];
u8 *iv = token.buf[7]; const u8 *iv = token.buf[7];
u8 *salt = token.buf[9]; const u8 *salt = token.buf[9];
u8 *encrypted_data = token.buf[11]; const u8 *encrypted_data = token.buf[11];
const u32 cipher_type = strtol ((const char *) token.buf[1], NULL, 10); const u32 cipher_type = strtol ((const char *) token.buf[1], NULL, 10);
const u32 checksum_type = strtol ((const char *) token.buf[2], NULL, 10); const u32 checksum_type = strtol ((const char *) token.buf[2], NULL, 10);
@ -28605,7 +28605,7 @@ int hashconfig_init (hashcat_ctx_t *hashcat_ctx)
hashconfig->dgst_pos2 = 2; hashconfig->dgst_pos2 = 2;
hashconfig->dgst_pos3 = 3; hashconfig->dgst_pos3 = 3;
hashconfig->st_hash = ST_HASH_18400; hashconfig->st_hash = ST_HASH_18400;
hashconfig->st_pass = ST_HASH_18500; hashconfig->st_pass = ST_PASS_HASHCAT_PLAIN;
break; break;
case 18500: hashconfig->hash_type = HASH_TYPE_SHA1; case 18500: hashconfig->hash_type = HASH_TYPE_SHA1;

12
tools/test.pl
View File

@ -3211,13 +3211,13 @@ sub verify
( (
hash_class => 'HMACSHA1', hash_class => 'HMACSHA1',
iterations => $iter, iterations => $iter,
output_len => 32, output_len => 32
); );
my $pass_hash = sha256 ($word); my $pass_hash = sha256 ($word);
my $derived_key = $kdf->PBKDF2 ($b_salt, $pass_hash); my $derived_key = $kdf->PBKDF2 ($b_salt, $pass_hash);
my $cbc = Crypt::Mode::CBC->new('AES', 0); my $cbc = Crypt::Mode::CBC->new ('AES', 0);
my $b_plaintext = $cbc->decrypt($b_ciphertext, $derived_key, $b_iv); my $b_plaintext = $cbc->decrypt ($b_ciphertext, $derived_key, $b_iv);
my $plaintext = unpack ("H*", $b_plaintext); my $plaintext = unpack ("H*", $b_plaintext);
@ -10716,15 +10716,15 @@ END_CODE
( (
hash_class => 'HMACSHA1', hash_class => 'HMACSHA1',
iterations => $iterations, iterations => $iterations,
output_len => 32, output_len => 32
); );
my $checksum = sha256_hex ($b_plaintext); my $checksum = sha256_hex ($b_plaintext);
my $pass_hash = sha256 ($word_buf); my $pass_hash = sha256 ($word_buf);
my $derived_key = $kdf->PBKDF2 ($b_salt, $pass_hash); my $derived_key = $kdf->PBKDF2 ($b_salt, $pass_hash);
my $cbc = Crypt::Mode::CBC->new('AES', 0); my $cbc = Crypt::Mode::CBC->new ('AES', 0);
my $b_ciphertext = $cbc->encrypt($b_plaintext, $derived_key, $b_iv); my $b_ciphertext = $cbc->encrypt ($b_plaintext, $derived_key, $b_iv);
my $ciphertext = unpack ("H*", $b_ciphertext); my $ciphertext = unpack ("H*", $b_ciphertext);