mirror of
https://github.com/hashcat/hashcat.git
synced 2024-11-22 16:18:09 +00:00
Merge pull request #2664 from matrix/hash-mode-26000
Added hash-mode 26000 - OpenEdge Progress Encode
This commit is contained in:
commit
eddd11441f
234
OpenCL/m26200_a0-pure.cl
Normal file
234
OpenCL/m26200_a0-pure.cl
Normal file
@ -0,0 +1,234 @@
|
|||||||
|
/**
|
||||||
|
* Author......: See docs/credits.txt
|
||||||
|
* License.....: MIT
|
||||||
|
*/
|
||||||
|
|
||||||
|
//#define NEW_SIMD_CODE
|
||||||
|
|
||||||
|
#ifdef KERNEL_STATIC
|
||||||
|
#include "inc_vendor.h"
|
||||||
|
#include "inc_types.h"
|
||||||
|
#include "inc_platform.cl"
|
||||||
|
#include "inc_common.cl"
|
||||||
|
#include "inc_rp.h"
|
||||||
|
#include "inc_rp.cl"
|
||||||
|
#include "inc_scalar.cl"
|
||||||
|
#endif
|
||||||
|
|
||||||
|
CONSTANT_VK u32a PE_CONST[256] =
|
||||||
|
{
|
||||||
|
0, 49345, 49537, 320, 49921, 960, 640, 49729, 50689, 1728, 1920, 51009, 1280, 50625, 50305, 1088,
|
||||||
|
52225, 3264, 3456, 52545, 3840, 53185, 52865, 3648, 2560, 51905, 52097, 2880, 51457, 2496, 2176, 51265,
|
||||||
|
55297, 6336, 6528, 55617, 6912, 56257, 55937, 6720, 7680, 57025, 57217, 8000, 56577, 7616, 7296, 56385,
|
||||||
|
5120, 54465, 54657, 5440, 55041, 6080, 5760, 54849, 53761, 4800, 4992, 54081, 4352, 53697, 53377, 4160,
|
||||||
|
61441, 12480, 12672, 61761, 13056, 62401, 62081, 12864, 13824, 63169, 63361, 14144, 62721, 13760, 13440, 62529,
|
||||||
|
15360, 64705, 64897, 15680, 65281, 16320, 16000, 65089, 64001, 15040, 15232, 64321, 14592, 63937, 63617, 14400,
|
||||||
|
10240, 59585, 59777, 10560, 60161, 11200, 10880, 59969, 60929, 11968, 12160, 61249, 11520, 60865, 60545, 11328,
|
||||||
|
58369, 9408, 9600, 58689, 9984, 59329, 59009, 9792, 8704, 58049, 58241, 9024, 57601, 8640, 8320, 57409,
|
||||||
|
40961, 24768, 24960, 41281, 25344, 41921, 41601, 25152, 26112, 42689, 42881, 26432, 42241, 26048, 25728, 42049,
|
||||||
|
27648, 44225, 44417, 27968, 44801, 28608, 28288, 44609, 43521, 27328, 27520, 43841, 26880, 43457, 43137, 26688,
|
||||||
|
30720, 47297, 47489, 31040, 47873, 31680, 31360, 47681, 48641, 32448, 32640, 48961, 32000, 48577, 48257, 31808,
|
||||||
|
46081, 29888, 30080, 46401, 30464, 47041, 46721, 30272, 29184, 45761, 45953, 29504, 45313, 29120, 28800, 45121,
|
||||||
|
20480, 37057, 37249, 20800, 37633, 21440, 21120, 37441, 38401, 22208, 22400, 38721, 21760, 38337, 38017, 21568,
|
||||||
|
39937, 23744, 23936, 40257, 24320, 40897, 40577, 24128, 23040, 39617, 39809, 23360, 39169, 22976, 22656, 38977,
|
||||||
|
34817, 18624, 18816, 35137, 19200, 35777, 35457, 19008, 19968, 36545, 36737, 20288, 36097, 19904, 19584, 35905,
|
||||||
|
17408, 33985, 34177, 17728, 34561, 18368, 18048, 34369, 33281, 17088, 17280, 33601, 16640, 33217, 32897, 16448
|
||||||
|
};
|
||||||
|
|
||||||
|
KERNEL_FQ void m26200_mxx (KERN_ATTR_RULES ())
|
||||||
|
{
|
||||||
|
/**
|
||||||
|
* modifier
|
||||||
|
*/
|
||||||
|
|
||||||
|
const u64 lid = get_local_id (0);
|
||||||
|
const u64 gid = get_global_id (0);
|
||||||
|
|
||||||
|
if (gid >= gid_max) return;
|
||||||
|
|
||||||
|
/**
|
||||||
|
* base
|
||||||
|
*/
|
||||||
|
|
||||||
|
COPY_PW (pws[gid]);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* loop
|
||||||
|
*/
|
||||||
|
|
||||||
|
for (u32 il_pos = 0; il_pos < il_cnt; il_pos++)
|
||||||
|
{
|
||||||
|
pw_t tmp = PASTE_PW;
|
||||||
|
|
||||||
|
tmp.pw_len = apply_rules (rules_buf[il_pos].cmds, tmp.i, tmp.pw_len);
|
||||||
|
|
||||||
|
u32 hash = 17;
|
||||||
|
|
||||||
|
u8 scratch[16] = { 0 };
|
||||||
|
|
||||||
|
u8 *input = (u8 *) tmp.i;
|
||||||
|
|
||||||
|
for (u32 i = 0; i < 5; i++)
|
||||||
|
{
|
||||||
|
for (u32 j = 0; j < tmp.pw_len; j++)
|
||||||
|
{
|
||||||
|
int idx = 15 - (j & 15);
|
||||||
|
|
||||||
|
scratch[idx] ^= input[j];
|
||||||
|
}
|
||||||
|
|
||||||
|
for (u32 j = 0; j < 16; j += 2)
|
||||||
|
{
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[15]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[14]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[13]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[12]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[11]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[10]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 9]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 8]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 7]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 6]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 5]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 4]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 3]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 2]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 1]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 0]]);
|
||||||
|
|
||||||
|
scratch[j] = (unsigned char)( hash & 0xff);
|
||||||
|
scratch[j + 1] = (unsigned char)((hash >> 8) & 0xff);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
u8 target[16] = { 0 };
|
||||||
|
|
||||||
|
for (u32 i = 0; i < 16; i++)
|
||||||
|
{
|
||||||
|
u8 lower = (scratch[i] & 0x7f);
|
||||||
|
|
||||||
|
if ((lower >= 'A' && lower <= 'Z') || (lower >= 'a' && lower <= 'z'))
|
||||||
|
{
|
||||||
|
target[i] = lower;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
target[i] = (u8)((scratch[i] >> 4) + 0x61);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
u32 *digest = (u32 *) target;
|
||||||
|
|
||||||
|
const u32 r0 = digest[DGST_R0];
|
||||||
|
const u32 r1 = digest[DGST_R1];
|
||||||
|
const u32 r2 = digest[DGST_R2];
|
||||||
|
const u32 r3 = digest[DGST_R3];
|
||||||
|
|
||||||
|
COMPARE_M_SCALAR (r0, r1, r2, r3);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
KERNEL_FQ void m26200_sxx (KERN_ATTR_RULES ())
|
||||||
|
{
|
||||||
|
/**
|
||||||
|
* modifier
|
||||||
|
*/
|
||||||
|
|
||||||
|
const u64 lid = get_local_id (0);
|
||||||
|
const u64 gid = get_global_id (0);
|
||||||
|
|
||||||
|
if (gid >= gid_max) return;
|
||||||
|
|
||||||
|
/**
|
||||||
|
* digest
|
||||||
|
*/
|
||||||
|
|
||||||
|
const u32 search[4] =
|
||||||
|
{
|
||||||
|
digests_buf[DIGESTS_OFFSET].digest_buf[DGST_R0],
|
||||||
|
digests_buf[DIGESTS_OFFSET].digest_buf[DGST_R1],
|
||||||
|
digests_buf[DIGESTS_OFFSET].digest_buf[DGST_R2],
|
||||||
|
digests_buf[DIGESTS_OFFSET].digest_buf[DGST_R3]
|
||||||
|
};
|
||||||
|
|
||||||
|
/**
|
||||||
|
* base
|
||||||
|
*/
|
||||||
|
|
||||||
|
COPY_PW (pws[gid]);
|
||||||
|
|
||||||
|
/**
|
||||||
|
* loop
|
||||||
|
*/
|
||||||
|
|
||||||
|
for (u32 il_pos = 0; il_pos < il_cnt; il_pos++)
|
||||||
|
{
|
||||||
|
pw_t tmp = PASTE_PW;
|
||||||
|
|
||||||
|
tmp.pw_len = apply_rules (rules_buf[il_pos].cmds, tmp.i, tmp.pw_len);
|
||||||
|
|
||||||
|
u32 hash = 17;
|
||||||
|
|
||||||
|
u8 scratch[16] = { 0 };
|
||||||
|
|
||||||
|
u8 *input = (u8 *) tmp.i;
|
||||||
|
|
||||||
|
for (u32 i = 0; i < 5; i++)
|
||||||
|
{
|
||||||
|
for (u32 j = 0; j < tmp.pw_len; j++)
|
||||||
|
{
|
||||||
|
int idx = 15 - (j & 15);
|
||||||
|
|
||||||
|
scratch[idx] ^= input[j];
|
||||||
|
}
|
||||||
|
|
||||||
|
for (u32 j = 0; j < 16; j += 2)
|
||||||
|
{
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[15]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[14]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[13]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[12]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[11]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[10]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 9]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 8]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 7]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 6]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 5]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 4]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 3]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 2]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 1]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 0]]);
|
||||||
|
|
||||||
|
scratch[j] = (unsigned char)( hash & 0xff);
|
||||||
|
scratch[j + 1] = (unsigned char)((hash >> 8) & 0xff);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
u8 target[16] = { 0 };
|
||||||
|
|
||||||
|
for (u32 i = 0; i < 16; i++)
|
||||||
|
{
|
||||||
|
u8 lower = (scratch[i] & 0x7f);
|
||||||
|
|
||||||
|
if ((lower >= 'A' && lower <= 'Z') || (lower >= 'a' && lower <= 'z'))
|
||||||
|
{
|
||||||
|
target[i] = lower;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
target[i] = (u8)((scratch[i] >> 4) + 0x61);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
u32 *digest = (u32 *) target;
|
||||||
|
|
||||||
|
const u32 r0 = digest[DGST_R0];
|
||||||
|
const u32 r1 = digest[DGST_R1];
|
||||||
|
const u32 r2 = digest[DGST_R2];
|
||||||
|
const u32 r3 = digest[DGST_R3];
|
||||||
|
|
||||||
|
COMPARE_S_SCALAR (r0, r1, r2, r3);
|
||||||
|
}
|
||||||
|
}
|
367
OpenCL/m26200_a1-pure.cl
Normal file
367
OpenCL/m26200_a1-pure.cl
Normal file
@ -0,0 +1,367 @@
|
|||||||
|
/**
|
||||||
|
* Author......: See docs/credits.txt
|
||||||
|
* License.....: MIT
|
||||||
|
*/
|
||||||
|
|
||||||
|
//#define NEW_SIMD_CODE
|
||||||
|
|
||||||
|
#ifdef KERNEL_STATIC
|
||||||
|
#include "inc_vendor.h"
|
||||||
|
#include "inc_types.h"
|
||||||
|
#include "inc_platform.cl"
|
||||||
|
#include "inc_common.cl"
|
||||||
|
#include "inc_simd.cl"
|
||||||
|
#endif
|
||||||
|
|
||||||
|
CONSTANT_VK u32a PE_CONST[256] =
|
||||||
|
{
|
||||||
|
0, 49345, 49537, 320, 49921, 960, 640, 49729, 50689, 1728, 1920, 51009, 1280, 50625, 50305, 1088,
|
||||||
|
52225, 3264, 3456, 52545, 3840, 53185, 52865, 3648, 2560, 51905, 52097, 2880, 51457, 2496, 2176, 51265,
|
||||||
|
55297, 6336, 6528, 55617, 6912, 56257, 55937, 6720, 7680, 57025, 57217, 8000, 56577, 7616, 7296, 56385,
|
||||||
|
5120, 54465, 54657, 5440, 55041, 6080, 5760, 54849, 53761, 4800, 4992, 54081, 4352, 53697, 53377, 4160,
|
||||||
|
61441, 12480, 12672, 61761, 13056, 62401, 62081, 12864, 13824, 63169, 63361, 14144, 62721, 13760, 13440, 62529,
|
||||||
|
15360, 64705, 64897, 15680, 65281, 16320, 16000, 65089, 64001, 15040, 15232, 64321, 14592, 63937, 63617, 14400,
|
||||||
|
10240, 59585, 59777, 10560, 60161, 11200, 10880, 59969, 60929, 11968, 12160, 61249, 11520, 60865, 60545, 11328,
|
||||||
|
58369, 9408, 9600, 58689, 9984, 59329, 59009, 9792, 8704, 58049, 58241, 9024, 57601, 8640, 8320, 57409,
|
||||||
|
40961, 24768, 24960, 41281, 25344, 41921, 41601, 25152, 26112, 42689, 42881, 26432, 42241, 26048, 25728, 42049,
|
||||||
|
27648, 44225, 44417, 27968, 44801, 28608, 28288, 44609, 43521, 27328, 27520, 43841, 26880, 43457, 43137, 26688,
|
||||||
|
30720, 47297, 47489, 31040, 47873, 31680, 31360, 47681, 48641, 32448, 32640, 48961, 32000, 48577, 48257, 31808,
|
||||||
|
46081, 29888, 30080, 46401, 30464, 47041, 46721, 30272, 29184, 45761, 45953, 29504, 45313, 29120, 28800, 45121,
|
||||||
|
20480, 37057, 37249, 20800, 37633, 21440, 21120, 37441, 38401, 22208, 22400, 38721, 21760, 38337, 38017, 21568,
|
||||||
|
39937, 23744, 23936, 40257, 24320, 40897, 40577, 24128, 23040, 39617, 39809, 23360, 39169, 22976, 22656, 38977,
|
||||||
|
34817, 18624, 18816, 35137, 19200, 35777, 35457, 19008, 19968, 36545, 36737, 20288, 36097, 19904, 19584, 35905,
|
||||||
|
17408, 33985, 34177, 17728, 34561, 18368, 18048, 34369, 33281, 17088, 17280, 33601, 16640, 33217, 32897, 16448
|
||||||
|
};
|
||||||
|
|
||||||
|
KERNEL_FQ void m26200_mxx (KERN_ATTR_BASIC ())
|
||||||
|
{
|
||||||
|
/**
|
||||||
|
* modifier
|
||||||
|
*/
|
||||||
|
|
||||||
|
const u64 lid = get_local_id (0);
|
||||||
|
const u64 gid = get_global_id (0);
|
||||||
|
|
||||||
|
if (gid >= gid_max) return;
|
||||||
|
|
||||||
|
/**
|
||||||
|
* base
|
||||||
|
*/
|
||||||
|
|
||||||
|
u32 pw_buf0[4];
|
||||||
|
|
||||||
|
pw_buf0[0] = pws[gid].i[0];
|
||||||
|
pw_buf0[1] = pws[gid].i[1];
|
||||||
|
pw_buf0[2] = pws[gid].i[2];
|
||||||
|
pw_buf0[3] = pws[gid].i[3];
|
||||||
|
|
||||||
|
const u32 pw_l_len = pws[gid].pw_len & 63;
|
||||||
|
|
||||||
|
/**
|
||||||
|
* loop
|
||||||
|
*/
|
||||||
|
|
||||||
|
for (u32 il_pos = 0; il_pos < il_cnt; il_pos++)
|
||||||
|
{
|
||||||
|
const u32 pw_r_len = pwlenx_create_combt (combs_buf, il_pos) & 63;
|
||||||
|
|
||||||
|
const u32 pw_len = (pw_l_len + pw_r_len) & 63;
|
||||||
|
|
||||||
|
/**
|
||||||
|
* concat password candidate
|
||||||
|
*/
|
||||||
|
|
||||||
|
u32 wordl0[4] = { 0 };
|
||||||
|
u32 wordl1[4] = { 0 };
|
||||||
|
u32 wordl2[4] = { 0 };
|
||||||
|
u32 wordl3[4] = { 0 };
|
||||||
|
|
||||||
|
wordl0[0] = pw_buf0[0];
|
||||||
|
wordl0[1] = pw_buf0[1];
|
||||||
|
wordl0[2] = pw_buf0[2];
|
||||||
|
wordl0[3] = pw_buf0[3];
|
||||||
|
|
||||||
|
u32 wordr0[4] = { 0 };
|
||||||
|
u32 wordr1[4] = { 0 };
|
||||||
|
u32 wordr2[4] = { 0 };
|
||||||
|
u32 wordr3[4] = { 0 };
|
||||||
|
|
||||||
|
wordr0[0] = ix_create_combt (combs_buf, il_pos, 0);
|
||||||
|
wordr0[1] = ix_create_combt (combs_buf, il_pos, 1);
|
||||||
|
wordr0[2] = ix_create_combt (combs_buf, il_pos, 2);
|
||||||
|
wordr0[3] = ix_create_combt (combs_buf, il_pos, 3);
|
||||||
|
wordr1[0] = ix_create_combt (combs_buf, il_pos, 4);
|
||||||
|
wordr1[1] = ix_create_combt (combs_buf, il_pos, 5);
|
||||||
|
wordr1[2] = ix_create_combt (combs_buf, il_pos, 6);
|
||||||
|
wordr1[3] = ix_create_combt (combs_buf, il_pos, 7);
|
||||||
|
|
||||||
|
if (combs_mode == COMBINATOR_MODE_BASE_LEFT)
|
||||||
|
{
|
||||||
|
switch_buffer_by_offset_le_VV (wordr0, wordr1, wordr2, wordr3, pw_l_len);
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
switch_buffer_by_offset_le_VV (wordl0, wordl1, wordl2, wordl3, pw_r_len);
|
||||||
|
}
|
||||||
|
|
||||||
|
u32 w0[4];
|
||||||
|
u32 w1[4];
|
||||||
|
|
||||||
|
w0[0] = wordl0[0] | wordr0[0];
|
||||||
|
w0[1] = wordl0[1] | wordr0[1];
|
||||||
|
w0[2] = wordl0[2] | wordr0[2];
|
||||||
|
w0[3] = wordl0[3] | wordr0[3];
|
||||||
|
w1[0] = wordl1[0] | wordr1[0];
|
||||||
|
w1[1] = wordl1[1] | wordr1[1];
|
||||||
|
w1[2] = wordl1[2] | wordr1[2];
|
||||||
|
w1[3] = wordl1[3] | wordr1[3];
|
||||||
|
|
||||||
|
u32 w[8] = { 0 };
|
||||||
|
|
||||||
|
w[ 0] = w0[0];
|
||||||
|
w[ 1] = w0[1];
|
||||||
|
w[ 2] = w0[2];
|
||||||
|
w[ 3] = w0[3];
|
||||||
|
w[ 4] = w1[0];
|
||||||
|
w[ 5] = w1[1];
|
||||||
|
w[ 6] = w1[2];
|
||||||
|
w[ 7] = w1[3];
|
||||||
|
|
||||||
|
u32 hash = 17;
|
||||||
|
|
||||||
|
u8 scratch[16] = { 0 };
|
||||||
|
|
||||||
|
u8 *input = (u8 *) w;
|
||||||
|
|
||||||
|
for (u32 i = 0; i < 5; i++)
|
||||||
|
{
|
||||||
|
for (u32 j = 0; j < pw_len; j++)
|
||||||
|
{
|
||||||
|
int idx = 15 - (j & 15);
|
||||||
|
|
||||||
|
scratch[idx] ^= input[j];
|
||||||
|
}
|
||||||
|
|
||||||
|
for (u32 j = 0; j < 16; j += 2)
|
||||||
|
{
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[15]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[14]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[13]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[12]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[11]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[10]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 9]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 8]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 7]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 6]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 5]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 4]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 3]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 2]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 1]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 0]]);
|
||||||
|
|
||||||
|
scratch[j] = (unsigned char)( hash & 0xff);
|
||||||
|
scratch[j + 1] = (unsigned char)((hash >> 8) & 0xff);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
u8 target[16] = { 0 };
|
||||||
|
|
||||||
|
for (u32 i = 0; i < 16; i++)
|
||||||
|
{
|
||||||
|
u8 lower = (scratch[i] & 0x7f);
|
||||||
|
|
||||||
|
if ((lower >= 'A' && lower <= 'Z') || (lower >= 'a' && lower <= 'z'))
|
||||||
|
{
|
||||||
|
target[i] = lower;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
target[i] = (u8)((scratch[i] >> 4) + 0x61);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
u32 *digest = (u32 *) target;
|
||||||
|
|
||||||
|
const u32 r0 = digest[DGST_R0];
|
||||||
|
const u32 r1 = digest[DGST_R1];
|
||||||
|
const u32 r2 = digest[DGST_R2];
|
||||||
|
const u32 r3 = digest[DGST_R3];
|
||||||
|
|
||||||
|
COMPARE_M_SIMD (r0, r1, r2, r3);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
KERNEL_FQ void m26200_sxx (KERN_ATTR_BASIC ())
|
||||||
|
{
|
||||||
|
/**
|
||||||
|
* modifier
|
||||||
|
*/
|
||||||
|
|
||||||
|
const u64 lid = get_local_id (0);
|
||||||
|
const u64 gid = get_global_id (0);
|
||||||
|
|
||||||
|
if (gid >= gid_max) return;
|
||||||
|
|
||||||
|
/**
|
||||||
|
* digest
|
||||||
|
*/
|
||||||
|
|
||||||
|
const u32 search[4] =
|
||||||
|
{
|
||||||
|
digests_buf[DIGESTS_OFFSET].digest_buf[DGST_R0],
|
||||||
|
digests_buf[DIGESTS_OFFSET].digest_buf[DGST_R1],
|
||||||
|
digests_buf[DIGESTS_OFFSET].digest_buf[DGST_R2],
|
||||||
|
digests_buf[DIGESTS_OFFSET].digest_buf[DGST_R3]
|
||||||
|
};
|
||||||
|
|
||||||
|
/**
|
||||||
|
* base
|
||||||
|
*/
|
||||||
|
|
||||||
|
u32 pw_buf0[4];
|
||||||
|
|
||||||
|
pw_buf0[0] = pws[gid].i[0];
|
||||||
|
pw_buf0[1] = pws[gid].i[1];
|
||||||
|
pw_buf0[2] = pws[gid].i[2];
|
||||||
|
pw_buf0[3] = pws[gid].i[3];
|
||||||
|
|
||||||
|
const u32 pw_l_len = pws[gid].pw_len & 63;
|
||||||
|
|
||||||
|
/**
|
||||||
|
* loop
|
||||||
|
*/
|
||||||
|
|
||||||
|
for (u32 il_pos = 0; il_pos < il_cnt; il_pos++)
|
||||||
|
{
|
||||||
|
|
||||||
|
const u32 pw_r_len = pwlenx_create_combt (combs_buf, il_pos) & 63;
|
||||||
|
|
||||||
|
const u32 pw_len = (pw_l_len + pw_r_len) & 63;
|
||||||
|
|
||||||
|
/**
|
||||||
|
* concat password candidate
|
||||||
|
*/
|
||||||
|
|
||||||
|
u32 wordl0[4] = { 0 };
|
||||||
|
u32 wordl1[4] = { 0 };
|
||||||
|
u32 wordl2[4] = { 0 };
|
||||||
|
u32 wordl3[4] = { 0 };
|
||||||
|
|
||||||
|
wordl0[0] = pw_buf0[0];
|
||||||
|
wordl0[1] = pw_buf0[1];
|
||||||
|
wordl0[2] = pw_buf0[2];
|
||||||
|
wordl0[3] = pw_buf0[3];
|
||||||
|
|
||||||
|
u32 wordr0[4] = { 0 };
|
||||||
|
u32 wordr1[4] = { 0 };
|
||||||
|
u32 wordr2[4] = { 0 };
|
||||||
|
u32 wordr3[4] = { 0 };
|
||||||
|
|
||||||
|
wordr0[0] = ix_create_combt (combs_buf, il_pos, 0);
|
||||||
|
wordr0[1] = ix_create_combt (combs_buf, il_pos, 1);
|
||||||
|
wordr0[2] = ix_create_combt (combs_buf, il_pos, 2);
|
||||||
|
wordr0[3] = ix_create_combt (combs_buf, il_pos, 3);
|
||||||
|
wordr1[0] = ix_create_combt (combs_buf, il_pos, 4);
|
||||||
|
wordr1[1] = ix_create_combt (combs_buf, il_pos, 5);
|
||||||
|
wordr1[2] = ix_create_combt (combs_buf, il_pos, 6);
|
||||||
|
wordr1[3] = ix_create_combt (combs_buf, il_pos, 7);
|
||||||
|
|
||||||
|
if (combs_mode == COMBINATOR_MODE_BASE_LEFT)
|
||||||
|
{
|
||||||
|
switch_buffer_by_offset_le_VV (wordr0, wordr1, wordr2, wordr3, pw_l_len);
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
switch_buffer_by_offset_le_VV (wordl0, wordl1, wordl2, wordl3, pw_r_len);
|
||||||
|
}
|
||||||
|
|
||||||
|
u32 w0[4];
|
||||||
|
u32 w1[4];
|
||||||
|
|
||||||
|
w0[0] = wordl0[0] | wordr0[0];
|
||||||
|
w0[1] = wordl0[1] | wordr0[1];
|
||||||
|
w0[2] = wordl0[2] | wordr0[2];
|
||||||
|
w0[3] = wordl0[3] | wordr0[3];
|
||||||
|
w1[0] = wordl1[0] | wordr1[0];
|
||||||
|
w1[1] = wordl1[1] | wordr1[1];
|
||||||
|
w1[2] = wordl1[2] | wordr1[2];
|
||||||
|
w1[3] = wordl1[3] | wordr1[3];
|
||||||
|
|
||||||
|
u32 w[8] = { 0 };
|
||||||
|
|
||||||
|
w[ 0] = w0[0];
|
||||||
|
w[ 1] = w0[1];
|
||||||
|
w[ 2] = w0[2];
|
||||||
|
w[ 3] = w0[3];
|
||||||
|
w[ 4] = w1[0];
|
||||||
|
w[ 5] = w1[1];
|
||||||
|
w[ 6] = w1[2];
|
||||||
|
w[ 7] = w1[3];
|
||||||
|
|
||||||
|
u32 hash = 17;
|
||||||
|
|
||||||
|
u8 scratch[16] = { 0 };
|
||||||
|
|
||||||
|
u8 *input = (u8 *) w;
|
||||||
|
|
||||||
|
for (u32 i = 0; i < 5; i++)
|
||||||
|
{
|
||||||
|
for (u32 j = 0; j < pw_len; j++)
|
||||||
|
{
|
||||||
|
int idx = 15 - (j & 15);
|
||||||
|
|
||||||
|
scratch[idx] ^= input[j];
|
||||||
|
}
|
||||||
|
|
||||||
|
for (u32 j = 0; j < 16; j += 2)
|
||||||
|
{
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[15]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[14]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[13]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[12]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[11]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[10]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 9]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 8]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 7]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 6]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 5]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 4]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 3]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 2]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 1]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 0]]);
|
||||||
|
|
||||||
|
scratch[j] = (unsigned char)( hash & 0xff);
|
||||||
|
scratch[j + 1] = (unsigned char)((hash >> 8) & 0xff);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
u8 target[16] = { 0 };
|
||||||
|
|
||||||
|
for (u32 i = 0; i < 16; i++)
|
||||||
|
{
|
||||||
|
u8 lower = (scratch[i] & 0x7f);
|
||||||
|
|
||||||
|
if ((lower >= 'A' && lower <= 'Z') || (lower >= 'a' && lower <= 'z'))
|
||||||
|
{
|
||||||
|
target[i] = lower;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
target[i] = (u8)((scratch[i] >> 4) + 0x61);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
u32 *digest = (u32 *) target;
|
||||||
|
|
||||||
|
const u32 r0 = digest[DGST_R0];
|
||||||
|
const u32 r1 = digest[DGST_R1];
|
||||||
|
const u32 r2 = digest[DGST_R2];
|
||||||
|
const u32 r3 = digest[DGST_R3];
|
||||||
|
|
||||||
|
COMPARE_S_SIMD (r0, r1, r2, r3);
|
||||||
|
}
|
||||||
|
}
|
254
OpenCL/m26200_a3-pure.cl
Normal file
254
OpenCL/m26200_a3-pure.cl
Normal file
@ -0,0 +1,254 @@
|
|||||||
|
/**
|
||||||
|
* Author......: See docs/credits.txt
|
||||||
|
* License.....: MIT
|
||||||
|
*/
|
||||||
|
|
||||||
|
//#define NEW_SIMD_CODE
|
||||||
|
|
||||||
|
#ifdef KERNEL_STATIC
|
||||||
|
#include "inc_vendor.h"
|
||||||
|
#include "inc_types.h"
|
||||||
|
#include "inc_platform.cl"
|
||||||
|
#include "inc_common.cl"
|
||||||
|
#include "inc_simd.cl"
|
||||||
|
#endif
|
||||||
|
|
||||||
|
CONSTANT_VK u32a PE_CONST[256] =
|
||||||
|
{
|
||||||
|
0, 49345, 49537, 320, 49921, 960, 640, 49729, 50689, 1728, 1920, 51009, 1280, 50625, 50305, 1088,
|
||||||
|
52225, 3264, 3456, 52545, 3840, 53185, 52865, 3648, 2560, 51905, 52097, 2880, 51457, 2496, 2176, 51265,
|
||||||
|
55297, 6336, 6528, 55617, 6912, 56257, 55937, 6720, 7680, 57025, 57217, 8000, 56577, 7616, 7296, 56385,
|
||||||
|
5120, 54465, 54657, 5440, 55041, 6080, 5760, 54849, 53761, 4800, 4992, 54081, 4352, 53697, 53377, 4160,
|
||||||
|
61441, 12480, 12672, 61761, 13056, 62401, 62081, 12864, 13824, 63169, 63361, 14144, 62721, 13760, 13440, 62529,
|
||||||
|
15360, 64705, 64897, 15680, 65281, 16320, 16000, 65089, 64001, 15040, 15232, 64321, 14592, 63937, 63617, 14400,
|
||||||
|
10240, 59585, 59777, 10560, 60161, 11200, 10880, 59969, 60929, 11968, 12160, 61249, 11520, 60865, 60545, 11328,
|
||||||
|
58369, 9408, 9600, 58689, 9984, 59329, 59009, 9792, 8704, 58049, 58241, 9024, 57601, 8640, 8320, 57409,
|
||||||
|
40961, 24768, 24960, 41281, 25344, 41921, 41601, 25152, 26112, 42689, 42881, 26432, 42241, 26048, 25728, 42049,
|
||||||
|
27648, 44225, 44417, 27968, 44801, 28608, 28288, 44609, 43521, 27328, 27520, 43841, 26880, 43457, 43137, 26688,
|
||||||
|
30720, 47297, 47489, 31040, 47873, 31680, 31360, 47681, 48641, 32448, 32640, 48961, 32000, 48577, 48257, 31808,
|
||||||
|
46081, 29888, 30080, 46401, 30464, 47041, 46721, 30272, 29184, 45761, 45953, 29504, 45313, 29120, 28800, 45121,
|
||||||
|
20480, 37057, 37249, 20800, 37633, 21440, 21120, 37441, 38401, 22208, 22400, 38721, 21760, 38337, 38017, 21568,
|
||||||
|
39937, 23744, 23936, 40257, 24320, 40897, 40577, 24128, 23040, 39617, 39809, 23360, 39169, 22976, 22656, 38977,
|
||||||
|
34817, 18624, 18816, 35137, 19200, 35777, 35457, 19008, 19968, 36545, 36737, 20288, 36097, 19904, 19584, 35905,
|
||||||
|
17408, 33985, 34177, 17728, 34561, 18368, 18048, 34369, 33281, 17088, 17280, 33601, 16640, 33217, 32897, 16448
|
||||||
|
};
|
||||||
|
|
||||||
|
KERNEL_FQ void m26200_mxx (KERN_ATTR_BASIC ())
|
||||||
|
{
|
||||||
|
/**
|
||||||
|
* modifier
|
||||||
|
*/
|
||||||
|
|
||||||
|
const u64 lid = get_local_id (0);
|
||||||
|
const u64 gid = get_global_id (0);
|
||||||
|
|
||||||
|
if (gid >= gid_max) return;
|
||||||
|
|
||||||
|
/**
|
||||||
|
* base
|
||||||
|
*/
|
||||||
|
|
||||||
|
const u32 pw_len = pws[gid].pw_len;
|
||||||
|
|
||||||
|
u32 w[64] = { 0 };
|
||||||
|
|
||||||
|
for (u32 i = 0, idx = 0; i < pw_len; i += 4, idx += 1)
|
||||||
|
{
|
||||||
|
w[idx] = pws[gid].i[idx];
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* loop
|
||||||
|
*/
|
||||||
|
|
||||||
|
u32 w0l = w[0];
|
||||||
|
|
||||||
|
for (u32 il_pos = 0; il_pos < il_cnt; il_pos += VECT_SIZE)
|
||||||
|
{
|
||||||
|
const u32 w0r = ix_create_bft (bfs_buf, il_pos);
|
||||||
|
|
||||||
|
const u32 w0 = w0l | w0r;
|
||||||
|
|
||||||
|
w[0] = w0;
|
||||||
|
|
||||||
|
u32 hash = 17;
|
||||||
|
|
||||||
|
u8 scratch[16] = { 0 };
|
||||||
|
|
||||||
|
u8 *input = (u8 *) w;
|
||||||
|
|
||||||
|
for (u32 i = 0; i < 5; i++)
|
||||||
|
{
|
||||||
|
for (u32 j = 0; j < pw_len; j++)
|
||||||
|
{
|
||||||
|
int idx = 15 - (j & 15);
|
||||||
|
|
||||||
|
scratch[idx] ^= input[j];
|
||||||
|
}
|
||||||
|
|
||||||
|
for (u32 j = 0; j < 16; j += 2)
|
||||||
|
{
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[15]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[14]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[13]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[12]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[11]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[10]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 9]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 8]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 7]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 6]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 5]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 4]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 3]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 2]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 1]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 0]]);
|
||||||
|
|
||||||
|
scratch[j] = (unsigned char)( hash & 0xff);
|
||||||
|
scratch[j + 1] = (unsigned char)((hash >> 8) & 0xff);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
u8 target[16] = { 0 };
|
||||||
|
|
||||||
|
for (u32 i = 0; i < 16; i++)
|
||||||
|
{
|
||||||
|
u8 lower = (scratch[i] & 0x7f);
|
||||||
|
|
||||||
|
if ((lower >= 'A' && lower <= 'Z') || (lower >= 'a' && lower <= 'z'))
|
||||||
|
{
|
||||||
|
target[i] = lower;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
target[i] = (u8)((scratch[i] >> 4) + 0x61);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
u32 *digest = (u32 *) target;
|
||||||
|
|
||||||
|
const u32 r0 = digest[DGST_R0];
|
||||||
|
const u32 r1 = digest[DGST_R1];
|
||||||
|
const u32 r2 = digest[DGST_R2];
|
||||||
|
const u32 r3 = digest[DGST_R3];
|
||||||
|
|
||||||
|
COMPARE_M_SIMD (r0, r1, r2, r3);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
KERNEL_FQ void m26200_sxx (KERN_ATTR_BASIC ())
|
||||||
|
{
|
||||||
|
/**
|
||||||
|
* modifier
|
||||||
|
*/
|
||||||
|
|
||||||
|
const u64 lid = get_local_id (0);
|
||||||
|
const u64 gid = get_global_id (0);
|
||||||
|
|
||||||
|
if (gid >= gid_max) return;
|
||||||
|
|
||||||
|
/**
|
||||||
|
* digest
|
||||||
|
*/
|
||||||
|
|
||||||
|
const u32 search[4] =
|
||||||
|
{
|
||||||
|
digests_buf[DIGESTS_OFFSET].digest_buf[DGST_R0],
|
||||||
|
digests_buf[DIGESTS_OFFSET].digest_buf[DGST_R1],
|
||||||
|
digests_buf[DIGESTS_OFFSET].digest_buf[DGST_R2],
|
||||||
|
digests_buf[DIGESTS_OFFSET].digest_buf[DGST_R3]
|
||||||
|
};
|
||||||
|
|
||||||
|
/**
|
||||||
|
* base
|
||||||
|
*/
|
||||||
|
|
||||||
|
const u32 pw_len = pws[gid].pw_len;
|
||||||
|
|
||||||
|
u32 w[64] = { 0 };
|
||||||
|
|
||||||
|
for (u32 i = 0, idx = 0; i < pw_len; i += 4, idx += 1)
|
||||||
|
{
|
||||||
|
w[idx] = pws[gid].i[idx];
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* loop
|
||||||
|
*/
|
||||||
|
|
||||||
|
u32 w0l = w[0];
|
||||||
|
|
||||||
|
for (u32 il_pos = 0; il_pos < il_cnt; il_pos += VECT_SIZE)
|
||||||
|
{
|
||||||
|
const u32 w0r = ix_create_bft (bfs_buf, il_pos);
|
||||||
|
|
||||||
|
const u32 w0 = w0l | w0r;
|
||||||
|
|
||||||
|
w[0] = w0;
|
||||||
|
|
||||||
|
u32 hash = 17;
|
||||||
|
|
||||||
|
u8 scratch[16] = { 0 };
|
||||||
|
|
||||||
|
u8 *input = (u8 *) w;
|
||||||
|
|
||||||
|
for (u32 i = 0; i < 5; i++)
|
||||||
|
{
|
||||||
|
for (u32 j = 0; j < pw_len; j++)
|
||||||
|
{
|
||||||
|
int idx = 15 - (j & 15);
|
||||||
|
|
||||||
|
scratch[idx] ^= input[j];
|
||||||
|
}
|
||||||
|
|
||||||
|
for (u32 j = 0; j < 16; j += 2)
|
||||||
|
{
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[15]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[14]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[13]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[12]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[11]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[10]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 9]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 8]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 7]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 6]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 5]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 4]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 3]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 2]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 1]]);
|
||||||
|
hash = (hash >> 8 ^ PE_CONST[hash & 0xff] ^ PE_CONST[scratch[ 0]]);
|
||||||
|
|
||||||
|
scratch[j] = (unsigned char)( hash & 0xff);
|
||||||
|
scratch[j + 1] = (unsigned char)((hash >> 8) & 0xff);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
u8 target[16] = { 0 };
|
||||||
|
|
||||||
|
for (u32 i = 0; i < 16; i++)
|
||||||
|
{
|
||||||
|
u8 lower = (scratch[i] & 0x7f);
|
||||||
|
|
||||||
|
if ((lower >= 'A' && lower <= 'Z') || (lower >= 'a' && lower <= 'z'))
|
||||||
|
{
|
||||||
|
target[i] = lower;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
target[i] = (u8)((scratch[i] >> 4) + 0x61);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
u32 *digest = (u32 *) target;
|
||||||
|
|
||||||
|
const u32 r0 = digest[DGST_R0];
|
||||||
|
const u32 r1 = digest[DGST_R1];
|
||||||
|
const u32 r2 = digest[DGST_R2];
|
||||||
|
const u32 r3 = digest[DGST_R3];
|
||||||
|
|
||||||
|
COMPARE_S_SIMD (r0, r1, r2, r3);
|
||||||
|
}
|
||||||
|
}
|
@ -112,6 +112,7 @@
|
|||||||
- Added hash-mode: Umbraco HMAC-SHA1
|
- Added hash-mode: Umbraco HMAC-SHA1
|
||||||
- Added hash-mode: sha1($salt.sha1($pass.$salt))
|
- Added hash-mode: sha1($salt.sha1($pass.$salt))
|
||||||
- Added hash-mode: sha1(sha1($pass).$salt)
|
- Added hash-mode: sha1(sha1($pass).$salt)
|
||||||
|
- Added hash-mode: OpenEdge Progress Encode
|
||||||
|
|
||||||
##
|
##
|
||||||
## Features
|
## Features
|
||||||
|
@ -351,6 +351,7 @@ NVIDIA GPUs require "NVIDIA Driver" (440.64 or later) and "CUDA Toolkit" (9.0 or
|
|||||||
- Web2py pbkdf2-sha512
|
- Web2py pbkdf2-sha512
|
||||||
- Django (PBKDF2-SHA256)
|
- Django (PBKDF2-SHA256)
|
||||||
- Django (SHA-1)
|
- Django (SHA-1)
|
||||||
|
- OpenEdge Progress Encode
|
||||||
- Atlassian (PBKDF2-HMAC-SHA1)
|
- Atlassian (PBKDF2-HMAC-SHA1)
|
||||||
- Ruby on Rails Restful-Authentication
|
- Ruby on Rails Restful-Authentication
|
||||||
- Python passlib pbkdf2-sha512
|
- Python passlib pbkdf2-sha512
|
||||||
|
191
src/modules/module_26200.c
Normal file
191
src/modules/module_26200.c
Normal file
@ -0,0 +1,191 @@
|
|||||||
|
/**
|
||||||
|
* Author......: See docs/credits.txt
|
||||||
|
* License.....: MIT
|
||||||
|
*/
|
||||||
|
|
||||||
|
#include "common.h"
|
||||||
|
#include "types.h"
|
||||||
|
#include "modules.h"
|
||||||
|
#include "bitops.h"
|
||||||
|
#include "convert.h"
|
||||||
|
#include "shared.h"
|
||||||
|
|
||||||
|
static const u32 ATTACK_EXEC = ATTACK_EXEC_INSIDE_KERNEL;
|
||||||
|
static const u32 DGST_POS0 = 0;
|
||||||
|
static const u32 DGST_POS1 = 1;
|
||||||
|
static const u32 DGST_POS2 = 2;
|
||||||
|
static const u32 DGST_POS3 = 3;
|
||||||
|
static const u32 DGST_SIZE = DGST_SIZE_4_4;
|
||||||
|
static const u32 HASH_CATEGORY = HASH_CATEGORY_EAS;
|
||||||
|
static const char *HASH_NAME = "OpenEdge Progress Encode";
|
||||||
|
static const u64 KERN_TYPE = 26200;
|
||||||
|
static const u32 OPTI_TYPE = OPTI_TYPE_ZERO_BYTE
|
||||||
|
| OPTI_TYPE_NOT_ITERATED
|
||||||
|
| OPTI_TYPE_NOT_SALTED;
|
||||||
|
static const u64 OPTS_TYPE = OPTS_TYPE_PT_GENERATE_LE
|
||||||
|
| OPTS_TYPE_HASH_COPY;
|
||||||
|
static const u32 SALT_TYPE = SALT_TYPE_NONE;
|
||||||
|
static const char *ST_PASS = "hashcat";
|
||||||
|
static const char *ST_HASH = "lebVZteiEsdpkncc";
|
||||||
|
|
||||||
|
u32 module_attack_exec (MAYBE_UNUSED const hashconfig_t *hashconfig, MAYBE_UNUSED const user_options_t *user_options, MAYBE_UNUSED const user_options_extra_t *user_options_extra) { return ATTACK_EXEC; }
|
||||||
|
u32 module_dgst_pos0 (MAYBE_UNUSED const hashconfig_t *hashconfig, MAYBE_UNUSED const user_options_t *user_options, MAYBE_UNUSED const user_options_extra_t *user_options_extra) { return DGST_POS0; }
|
||||||
|
u32 module_dgst_pos1 (MAYBE_UNUSED const hashconfig_t *hashconfig, MAYBE_UNUSED const user_options_t *user_options, MAYBE_UNUSED const user_options_extra_t *user_options_extra) { return DGST_POS1; }
|
||||||
|
u32 module_dgst_pos2 (MAYBE_UNUSED const hashconfig_t *hashconfig, MAYBE_UNUSED const user_options_t *user_options, MAYBE_UNUSED const user_options_extra_t *user_options_extra) { return DGST_POS2; }
|
||||||
|
u32 module_dgst_pos3 (MAYBE_UNUSED const hashconfig_t *hashconfig, MAYBE_UNUSED const user_options_t *user_options, MAYBE_UNUSED const user_options_extra_t *user_options_extra) { return DGST_POS3; }
|
||||||
|
u32 module_dgst_size (MAYBE_UNUSED const hashconfig_t *hashconfig, MAYBE_UNUSED const user_options_t *user_options, MAYBE_UNUSED const user_options_extra_t *user_options_extra) { return DGST_SIZE; }
|
||||||
|
u32 module_hash_category (MAYBE_UNUSED const hashconfig_t *hashconfig, MAYBE_UNUSED const user_options_t *user_options, MAYBE_UNUSED const user_options_extra_t *user_options_extra) { return HASH_CATEGORY; }
|
||||||
|
const char *module_hash_name (MAYBE_UNUSED const hashconfig_t *hashconfig, MAYBE_UNUSED const user_options_t *user_options, MAYBE_UNUSED const user_options_extra_t *user_options_extra) { return HASH_NAME; }
|
||||||
|
u64 module_kern_type (MAYBE_UNUSED const hashconfig_t *hashconfig, MAYBE_UNUSED const user_options_t *user_options, MAYBE_UNUSED const user_options_extra_t *user_options_extra) { return KERN_TYPE; }
|
||||||
|
u32 module_opti_type (MAYBE_UNUSED const hashconfig_t *hashconfig, MAYBE_UNUSED const user_options_t *user_options, MAYBE_UNUSED const user_options_extra_t *user_options_extra) { return OPTI_TYPE; }
|
||||||
|
u64 module_opts_type (MAYBE_UNUSED const hashconfig_t *hashconfig, MAYBE_UNUSED const user_options_t *user_options, MAYBE_UNUSED const user_options_extra_t *user_options_extra) { return OPTS_TYPE; }
|
||||||
|
u32 module_salt_type (MAYBE_UNUSED const hashconfig_t *hashconfig, MAYBE_UNUSED const user_options_t *user_options, MAYBE_UNUSED const user_options_extra_t *user_options_extra) { return SALT_TYPE; }
|
||||||
|
const char *module_st_hash (MAYBE_UNUSED const hashconfig_t *hashconfig, MAYBE_UNUSED const user_options_t *user_options, MAYBE_UNUSED const user_options_extra_t *user_options_extra) { return ST_HASH; }
|
||||||
|
const char *module_st_pass (MAYBE_UNUSED const hashconfig_t *hashconfig, MAYBE_UNUSED const user_options_t *user_options, MAYBE_UNUSED const user_options_extra_t *user_options_extra) { return ST_PASS; }
|
||||||
|
|
||||||
|
bool module_unstable_warning (MAYBE_UNUSED const hashconfig_t *hashconfig, MAYBE_UNUSED const user_options_t *user_options, MAYBE_UNUSED const user_options_extra_t *user_options_extra, MAYBE_UNUSED const hc_device_param_t *device_param)
|
||||||
|
{
|
||||||
|
if (device_param->opencl_platform_vendor_id == VENDOR_ID_APPLE)
|
||||||
|
{
|
||||||
|
// self-test failed
|
||||||
|
if ((device_param->opencl_device_vendor_id == VENDOR_ID_AMD) && (device_param->opencl_device_type & CL_DEVICE_TYPE_GPU))
|
||||||
|
{
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
u32 module_pw_max (MAYBE_UNUSED const hashconfig_t *hashconfig, MAYBE_UNUSED const user_options_t *user_options, MAYBE_UNUSED const user_options_extra_t *user_options_extra)
|
||||||
|
{
|
||||||
|
const u32 pw_max = 16;
|
||||||
|
|
||||||
|
return pw_max;
|
||||||
|
}
|
||||||
|
|
||||||
|
char *module_jit_build_options (MAYBE_UNUSED const hashconfig_t *hashconfig, MAYBE_UNUSED const user_options_t *user_options, MAYBE_UNUSED const user_options_extra_t *user_options_extra, MAYBE_UNUSED const hashes_t *hashes, MAYBE_UNUSED const hc_device_param_t *device_param)
|
||||||
|
{
|
||||||
|
char *jit_build_options = NULL;
|
||||||
|
|
||||||
|
// Extra treatment for Apple systems
|
||||||
|
if (device_param->opencl_platform_vendor_id == VENDOR_ID_APPLE)
|
||||||
|
{
|
||||||
|
return jit_build_options;
|
||||||
|
}
|
||||||
|
|
||||||
|
// ROCM
|
||||||
|
if ((device_param->opencl_device_vendor_id == VENDOR_ID_AMD) && (device_param->has_vperm == true))
|
||||||
|
{
|
||||||
|
hc_asprintf (&jit_build_options, "-D _unroll");
|
||||||
|
}
|
||||||
|
|
||||||
|
return jit_build_options;
|
||||||
|
}
|
||||||
|
|
||||||
|
int module_hash_decode (MAYBE_UNUSED const hashconfig_t *hashconfig, MAYBE_UNUSED void *digest_buf, MAYBE_UNUSED salt_t *salt, MAYBE_UNUSED void *esalt_buf, MAYBE_UNUSED void *hook_salt_buf, MAYBE_UNUSED hashinfo_t *hash_info, const char *line_buf, MAYBE_UNUSED const int line_len)
|
||||||
|
{
|
||||||
|
u32 *digest = (u32 *) digest_buf;
|
||||||
|
|
||||||
|
token_t token;
|
||||||
|
|
||||||
|
token.token_cnt = 1;
|
||||||
|
|
||||||
|
token.len_min[0] = 16;
|
||||||
|
token.len_max[0] = 16;
|
||||||
|
token.attr[0] = TOKEN_ATTR_VERIFY_LENGTH;
|
||||||
|
|
||||||
|
const int rc_tokenizer = input_tokenizer ((const u8 *) line_buf, line_len, &token);
|
||||||
|
|
||||||
|
if (rc_tokenizer != PARSER_OK) return (rc_tokenizer);
|
||||||
|
|
||||||
|
const u8 *hash_pos = (u8 *) token.buf[0];
|
||||||
|
const u32 hash_len = token.len[0];
|
||||||
|
|
||||||
|
memcpy ((u8 *)digest, hash_pos, hash_len);
|
||||||
|
|
||||||
|
return (PARSER_OK);
|
||||||
|
}
|
||||||
|
|
||||||
|
int module_hash_encode (MAYBE_UNUSED const hashconfig_t *hashconfig, MAYBE_UNUSED const void *digest_buf, MAYBE_UNUSED const salt_t *salt, MAYBE_UNUSED const void *esalt_buf, MAYBE_UNUSED const void *hook_salt_buf, MAYBE_UNUSED const hashinfo_t *hash_info, char *line_buf, MAYBE_UNUSED const int line_size)
|
||||||
|
{
|
||||||
|
const int line_len = snprintf (line_buf, line_size, "%s", hash_info->orighash);
|
||||||
|
|
||||||
|
return line_len;
|
||||||
|
}
|
||||||
|
|
||||||
|
void module_init (module_ctx_t *module_ctx)
|
||||||
|
{
|
||||||
|
module_ctx->module_context_size = MODULE_CONTEXT_SIZE_CURRENT;
|
||||||
|
module_ctx->module_interface_version = MODULE_INTERFACE_VERSION_CURRENT;
|
||||||
|
|
||||||
|
module_ctx->module_attack_exec = module_attack_exec;
|
||||||
|
module_ctx->module_benchmark_esalt = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_benchmark_hook_salt = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_benchmark_mask = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_benchmark_salt = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_build_plain_postprocess = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_deep_comp_kernel = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_dgst_pos0 = module_dgst_pos0;
|
||||||
|
module_ctx->module_dgst_pos1 = module_dgst_pos1;
|
||||||
|
module_ctx->module_dgst_pos2 = module_dgst_pos2;
|
||||||
|
module_ctx->module_dgst_pos3 = module_dgst_pos3;
|
||||||
|
module_ctx->module_dgst_size = module_dgst_size;
|
||||||
|
module_ctx->module_dictstat_disable = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_esalt_size = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_extra_buffer_size = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_extra_tmp_size = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_forced_outfile_format = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_hash_binary_count = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_hash_binary_parse = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_hash_binary_save = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_hash_decode_potfile = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_hash_decode_zero_hash = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_hash_decode = module_hash_decode;
|
||||||
|
module_ctx->module_hash_encode_status = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_hash_encode_potfile = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_hash_encode = module_hash_encode;
|
||||||
|
module_ctx->module_hash_init_selftest = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_hash_mode = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_hash_category = module_hash_category;
|
||||||
|
module_ctx->module_hash_name = module_hash_name;
|
||||||
|
module_ctx->module_hashes_count_min = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_hashes_count_max = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_hlfmt_disable = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_hook_extra_param_size = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_hook_extra_param_init = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_hook_extra_param_term = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_hook12 = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_hook23 = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_hook_salt_size = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_hook_size = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_jit_build_options = module_jit_build_options;
|
||||||
|
module_ctx->module_jit_cache_disable = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_kernel_accel_max = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_kernel_accel_min = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_kernel_loops_max = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_kernel_loops_min = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_kernel_threads_max = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_kernel_threads_min = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_kern_type = module_kern_type;
|
||||||
|
module_ctx->module_kern_type_dynamic = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_opti_type = module_opti_type;
|
||||||
|
module_ctx->module_opts_type = module_opts_type;
|
||||||
|
module_ctx->module_outfile_check_disable = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_outfile_check_nocomp = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_potfile_custom_check = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_potfile_disable = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_potfile_keep_all_hashes = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_pwdump_column = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_pw_max = module_pw_max;
|
||||||
|
module_ctx->module_pw_min = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_salt_max = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_salt_min = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_salt_type = module_salt_type;
|
||||||
|
module_ctx->module_separator = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_st_hash = module_st_hash;
|
||||||
|
module_ctx->module_st_pass = module_st_pass;
|
||||||
|
module_ctx->module_tmp_size = MODULE_DEFAULT;
|
||||||
|
module_ctx->module_unstable_warning = module_unstable_warning;
|
||||||
|
module_ctx->module_warmup_disable = MODULE_DEFAULT;
|
||||||
|
}
|
101
tools/test_modules/m26200.pm
Normal file
101
tools/test_modules/m26200.pm
Normal file
@ -0,0 +1,101 @@
|
|||||||
|
#!/usr/bin/env perl
|
||||||
|
|
||||||
|
##
|
||||||
|
## Author......: See docs/credits.txt
|
||||||
|
## License.....: MIT
|
||||||
|
##
|
||||||
|
|
||||||
|
use strict;
|
||||||
|
use warnings;
|
||||||
|
|
||||||
|
sub module_constraints { [[0, 16], [-1, -1], [-1, -1], [-1, -1], [0, 16]] }
|
||||||
|
|
||||||
|
my @PE_CONST = (
|
||||||
|
0, 49345, 49537, 320, 49921, 960, 640, 49729, 50689, 1728, 1920, 51009, 1280, 50625, 50305, 1088,
|
||||||
|
52225, 3264, 3456, 52545, 3840, 53185, 52865, 3648, 2560, 51905, 52097, 2880, 51457, 2496, 2176, 51265,
|
||||||
|
55297, 6336, 6528, 55617, 6912, 56257, 55937, 6720, 7680, 57025, 57217, 8000, 56577, 7616, 7296, 56385,
|
||||||
|
5120, 54465, 54657, 5440, 55041, 6080, 5760, 54849, 53761, 4800, 4992, 54081, 4352, 53697, 53377, 4160,
|
||||||
|
61441, 12480, 12672, 61761, 13056, 62401, 62081, 12864, 13824, 63169, 63361, 14144, 62721, 13760, 13440, 62529,
|
||||||
|
15360, 64705, 64897, 15680, 65281, 16320, 16000, 65089, 64001, 15040, 15232, 64321, 14592, 63937, 63617, 14400,
|
||||||
|
10240, 59585, 59777, 10560, 60161, 11200, 10880, 59969, 60929, 11968, 12160, 61249, 11520, 60865, 60545, 11328,
|
||||||
|
58369, 9408, 9600, 58689, 9984, 59329, 59009, 9792, 8704, 58049, 58241, 9024, 57601, 8640, 8320, 57409,
|
||||||
|
40961, 24768, 24960, 41281, 25344, 41921, 41601, 25152, 26112, 42689, 42881, 26432, 42241, 26048, 25728, 42049,
|
||||||
|
27648, 44225, 44417, 27968, 44801, 28608, 28288, 44609, 43521, 27328, 27520, 43841, 26880, 43457, 43137, 26688,
|
||||||
|
30720, 47297, 47489, 31040, 47873, 31680, 31360, 47681, 48641, 32448, 32640, 48961, 32000, 48577, 48257, 31808,
|
||||||
|
46081, 29888, 30080, 46401, 30464, 47041, 46721, 30272, 29184, 45761, 45953, 29504, 45313, 29120, 28800, 45121,
|
||||||
|
20480, 37057, 37249, 20800, 37633, 21440, 21120, 37441, 38401, 22208, 22400, 38721, 21760, 38337, 38017, 21568,
|
||||||
|
39937, 23744, 23936, 40257, 24320, 40897, 40577, 24128, 23040, 39617, 39809, 23360, 39169, 22976, 22656, 38977,
|
||||||
|
34817, 18624, 18816, 35137, 19200, 35777, 35457, 19008, 19968, 36545, 36737, 20288, 36097, 19904, 19584, 35905,
|
||||||
|
17408, 33985, 34177, 17728, 34561, 18368, 18048, 34369, 33281, 17088, 17280, 33601, 16640, 33217, 32897, 16448
|
||||||
|
);
|
||||||
|
|
||||||
|
sub PE_encode
|
||||||
|
{
|
||||||
|
my $word_str = shift;
|
||||||
|
|
||||||
|
my $word_str_len = length($word_str);
|
||||||
|
|
||||||
|
my @word = split('', $word_str, $word_str_len);
|
||||||
|
|
||||||
|
my @scratch = (0) x 16;
|
||||||
|
my @target = (0) x 16;
|
||||||
|
my $hash = 17;
|
||||||
|
|
||||||
|
for (my $i=0; $i<5; $i++) {
|
||||||
|
for (my $j=0; $j<$word_str_len; $j++) {
|
||||||
|
my $idx = 15 - ($j % 16);
|
||||||
|
$scratch[$idx] ^= ord($word[$j]);
|
||||||
|
}
|
||||||
|
|
||||||
|
for (my $j=0; $j<16; $j+=2) {
|
||||||
|
for (my $k=15; $k>=0; $k--) {
|
||||||
|
$hash = (($hash & 0xffff) >> 8 ^ $PE_CONST[($hash & 0xff)] ^ $PE_CONST[$scratch[$k]]);
|
||||||
|
}
|
||||||
|
|
||||||
|
$scratch[$j] = $hash & 0xff;
|
||||||
|
$scratch[$j+1] = ($hash >> 8) & 0xff;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
my $low;
|
||||||
|
for (my $i=0; $i<16; $i++) {
|
||||||
|
$low = $scratch[$i] & 0x7f;
|
||||||
|
|
||||||
|
if ($low >= 65 && $low <= 90 || $low >= 97 && $low <= 122) {
|
||||||
|
$target[$i] = $low;
|
||||||
|
} else {
|
||||||
|
$target[$i] = ((($scratch[$i] & 0xff) >> 4) + 0x61) & 0xff;
|
||||||
|
}
|
||||||
|
|
||||||
|
$target[$i] = chr($target[$i]);
|
||||||
|
}
|
||||||
|
|
||||||
|
return join '', @target;
|
||||||
|
}
|
||||||
|
|
||||||
|
sub module_generate_hash
|
||||||
|
{
|
||||||
|
my $word = shift;
|
||||||
|
|
||||||
|
my $hash = PE_encode ($word);
|
||||||
|
|
||||||
|
return $hash;
|
||||||
|
}
|
||||||
|
|
||||||
|
sub module_verify_hash
|
||||||
|
{
|
||||||
|
my $line = shift;
|
||||||
|
|
||||||
|
my ($hash, $word) = split (':', $line);
|
||||||
|
|
||||||
|
return unless defined $hash;
|
||||||
|
return unless defined $word;
|
||||||
|
|
||||||
|
my $word_packed = pack_if_HEX_notation ($word);
|
||||||
|
|
||||||
|
my $new_hash = module_generate_hash ($word_packed);
|
||||||
|
|
||||||
|
return ($new_hash, $word);
|
||||||
|
}
|
||||||
|
|
||||||
|
1;
|
Loading…
Reference in New Issue
Block a user