mirror of https://github.com/hashcat/hashcat.git
Robert Gützkow
3 years ago
parent
6daea9c7c1
commit
9a4a8d942e
@ -0,0 +1,401 @@
|
||||
/**
|
||||
* Author......: See docs/credits.txt and Robert Guetzkow
|
||||
* License.....: MIT
|
||||
*/
|
||||
|
||||
// The code is mostly reused from m10900-pure.cl and m19800-pure.cl
|
||||
|
||||
#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"
|
||||
#include "inc_hash_sha256.cl"
|
||||
#include "inc_cipher_aes.cl"
|
||||
#endif
|
||||
|
||||
#define COMPARE_S "inc_comp_single.cl"
|
||||
#define COMPARE_M "inc_comp_multi.cl"
|
||||
|
||||
typedef struct blocks
|
||||
{
|
||||
u32 b1[4];
|
||||
u32 b2[4];
|
||||
u32 b3[4];
|
||||
|
||||
} blocks_t;
|
||||
|
||||
typedef struct pbkdf2_sha256_tmp
|
||||
{
|
||||
u32 ipad[8];
|
||||
u32 opad[8];
|
||||
|
||||
u32 dgst[32];
|
||||
u32 out[32];
|
||||
|
||||
} pbkdf2_sha256_tmp_t;
|
||||
|
||||
DECLSPEC void hmac_sha256_run_V (u32x *w0, u32x *w1, u32x *w2, u32x *w3, u32x *ipad, u32x *opad, u32x *digest)
|
||||
{
|
||||
digest[0] = ipad[0];
|
||||
digest[1] = ipad[1];
|
||||
digest[2] = ipad[2];
|
||||
digest[3] = ipad[3];
|
||||
digest[4] = ipad[4];
|
||||
digest[5] = ipad[5];
|
||||
digest[6] = ipad[6];
|
||||
digest[7] = ipad[7];
|
||||
|
||||
sha256_transform_vector(w0, w1, w2, w3, digest);
|
||||
|
||||
w0[0] = digest[0];
|
||||
w0[1] = digest[1];
|
||||
w0[2] = digest[2];
|
||||
w0[3] = digest[3];
|
||||
w1[0] = digest[4];
|
||||
w1[1] = digest[5];
|
||||
w1[2] = digest[6];
|
||||
w1[3] = digest[7];
|
||||
w2[0] = 0x80000000;
|
||||
w2[1] = 0;
|
||||
w2[2] = 0;
|
||||
w2[3] = 0;
|
||||
w3[0] = 0;
|
||||
w3[1] = 0;
|
||||
w3[2] = 0;
|
||||
w3[3] = (64 + 32) * 8;
|
||||
|
||||
digest[0] = opad[0];
|
||||
digest[1] = opad[1];
|
||||
digest[2] = opad[2];
|
||||
digest[3] = opad[3];
|
||||
digest[4] = opad[4];
|
||||
digest[5] = opad[5];
|
||||
digest[6] = opad[6];
|
||||
digest[7] = opad[7];
|
||||
|
||||
sha256_transform_vector(w0, w1, w2, w3, digest);
|
||||
}
|
||||
|
||||
DECLSPEC void aes128_encrypt_cbc (const u32 *aes_ks, u32 *aes_iv, const u32 *in, u32 *out, SHM_TYPE u32 *s_te0, SHM_TYPE u32 *s_te1, SHM_TYPE u32 *s_te2, SHM_TYPE u32 *s_te3, SHM_TYPE u32 *s_te4)
|
||||
{
|
||||
u32 in_s[4];
|
||||
|
||||
in_s[0] = in[0];
|
||||
in_s[1] = in[1];
|
||||
in_s[2] = in[2];
|
||||
in_s[3] = in[3];
|
||||
|
||||
in_s[0] ^= aes_iv[0];
|
||||
in_s[1] ^= aes_iv[1];
|
||||
in_s[2] ^= aes_iv[2];
|
||||
in_s[3] ^= aes_iv[3];
|
||||
|
||||
aes128_encrypt (aes_ks, in_s, out, s_te0, s_te1, s_te2, s_te3, s_te4);
|
||||
|
||||
aes_iv[0] = out[0];
|
||||
aes_iv[1] = out[1];
|
||||
aes_iv[2] = out[2];
|
||||
aes_iv[3] = out[3];
|
||||
}
|
||||
|
||||
KERNEL_FQ void m25900_init(KERN_ATTR_TMPS(pbkdf2_sha256_tmp_t))
|
||||
{
|
||||
/**
|
||||
* base
|
||||
*/
|
||||
|
||||
const u64 gid = get_global_id(0);
|
||||
|
||||
if (gid >= gid_max) return;
|
||||
|
||||
sha256_hmac_ctx_t sha256_hmac_ctx;
|
||||
|
||||
sha256_hmac_init_global_swap(&sha256_hmac_ctx, pws[gid].i, pws[gid].pw_len);
|
||||
|
||||
tmps[gid].ipad[0] = sha256_hmac_ctx.ipad.h[0];
|
||||
tmps[gid].ipad[1] = sha256_hmac_ctx.ipad.h[1];
|
||||
tmps[gid].ipad[2] = sha256_hmac_ctx.ipad.h[2];
|
||||
tmps[gid].ipad[3] = sha256_hmac_ctx.ipad.h[3];
|
||||
tmps[gid].ipad[4] = sha256_hmac_ctx.ipad.h[4];
|
||||
tmps[gid].ipad[5] = sha256_hmac_ctx.ipad.h[5];
|
||||
tmps[gid].ipad[6] = sha256_hmac_ctx.ipad.h[6];
|
||||
tmps[gid].ipad[7] = sha256_hmac_ctx.ipad.h[7];
|
||||
|
||||
tmps[gid].opad[0] = sha256_hmac_ctx.opad.h[0];
|
||||
tmps[gid].opad[1] = sha256_hmac_ctx.opad.h[1];
|
||||
tmps[gid].opad[2] = sha256_hmac_ctx.opad.h[2];
|
||||
tmps[gid].opad[3] = sha256_hmac_ctx.opad.h[3];
|
||||
tmps[gid].opad[4] = sha256_hmac_ctx.opad.h[4];
|
||||
tmps[gid].opad[5] = sha256_hmac_ctx.opad.h[5];
|
||||
tmps[gid].opad[6] = sha256_hmac_ctx.opad.h[6];
|
||||
tmps[gid].opad[7] = sha256_hmac_ctx.opad.h[7];
|
||||
|
||||
sha256_hmac_update_global_swap(&sha256_hmac_ctx, salt_bufs[SALT_POS].salt_buf, salt_bufs[SALT_POS].salt_len);
|
||||
|
||||
for (u32 i = 0, j = 1; i < 8; i += 8, j += 1)
|
||||
{
|
||||
sha256_hmac_ctx_t sha256_hmac_ctx2 = sha256_hmac_ctx;
|
||||
|
||||
u32 w0[4];
|
||||
u32 w1[4];
|
||||
u32 w2[4];
|
||||
u32 w3[4];
|
||||
|
||||
w0[0] = j;
|
||||
w0[1] = 0;
|
||||
w0[2] = 0;
|
||||
w0[3] = 0;
|
||||
w1[0] = 0;
|
||||
w1[1] = 0;
|
||||
w1[2] = 0;
|
||||
w1[3] = 0;
|
||||
w2[0] = 0;
|
||||
w2[1] = 0;
|
||||
w2[2] = 0;
|
||||
w2[3] = 0;
|
||||
w3[0] = 0;
|
||||
w3[1] = 0;
|
||||
w3[2] = 0;
|
||||
w3[3] = 0;
|
||||
|
||||
sha256_hmac_update_64(&sha256_hmac_ctx2, w0, w1, w2, w3, 4);
|
||||
|
||||
sha256_hmac_final(&sha256_hmac_ctx2);
|
||||
|
||||
tmps[gid].dgst[i + 0] = sha256_hmac_ctx2.opad.h[0];
|
||||
tmps[gid].dgst[i + 1] = sha256_hmac_ctx2.opad.h[1];
|
||||
tmps[gid].dgst[i + 2] = sha256_hmac_ctx2.opad.h[2];
|
||||
tmps[gid].dgst[i + 3] = sha256_hmac_ctx2.opad.h[3];
|
||||
tmps[gid].dgst[i + 4] = sha256_hmac_ctx2.opad.h[4];
|
||||
tmps[gid].dgst[i + 5] = sha256_hmac_ctx2.opad.h[5];
|
||||
tmps[gid].dgst[i + 6] = sha256_hmac_ctx2.opad.h[6];
|
||||
tmps[gid].dgst[i + 7] = sha256_hmac_ctx2.opad.h[7];
|
||||
|
||||
tmps[gid].out[i + 0] = tmps[gid].dgst[i + 0];
|
||||
tmps[gid].out[i + 1] = tmps[gid].dgst[i + 1];
|
||||
tmps[gid].out[i + 2] = tmps[gid].dgst[i + 2];
|
||||
tmps[gid].out[i + 3] = tmps[gid].dgst[i + 3];
|
||||
tmps[gid].out[i + 4] = tmps[gid].dgst[i + 4];
|
||||
tmps[gid].out[i + 5] = tmps[gid].dgst[i + 5];
|
||||
tmps[gid].out[i + 6] = tmps[gid].dgst[i + 6];
|
||||
tmps[gid].out[i + 7] = tmps[gid].dgst[i + 7];
|
||||
}
|
||||
}
|
||||
|
||||
KERNEL_FQ void m25900_loop(KERN_ATTR_TMPS(pbkdf2_sha256_tmp_t))
|
||||
{
|
||||
const u64 gid = get_global_id(0);
|
||||
|
||||
if ((gid * VECT_SIZE) >= gid_max) return;
|
||||
|
||||
u32x ipad[8];
|
||||
u32x opad[8];
|
||||
|
||||
ipad[0] = packv(tmps, ipad, gid, 0);
|
||||
ipad[1] = packv(tmps, ipad, gid, 1);
|
||||
ipad[2] = packv(tmps, ipad, gid, 2);
|
||||
ipad[3] = packv(tmps, ipad, gid, 3);
|
||||
ipad[4] = packv(tmps, ipad, gid, 4);
|
||||
ipad[5] = packv(tmps, ipad, gid, 5);
|
||||
ipad[6] = packv(tmps, ipad, gid, 6);
|
||||
ipad[7] = packv(tmps, ipad, gid, 7);
|
||||
|
||||
opad[0] = packv(tmps, opad, gid, 0);
|
||||
opad[1] = packv(tmps, opad, gid, 1);
|
||||
opad[2] = packv(tmps, opad, gid, 2);
|
||||
opad[3] = packv(tmps, opad, gid, 3);
|
||||
opad[4] = packv(tmps, opad, gid, 4);
|
||||
opad[5] = packv(tmps, opad, gid, 5);
|
||||
opad[6] = packv(tmps, opad, gid, 6);
|
||||
opad[7] = packv(tmps, opad, gid, 7);
|
||||
|
||||
for (u32 i = 0; i < 8; i += 8)
|
||||
{
|
||||
u32x dgst[8];
|
||||
u32x out[8];
|
||||
|
||||
dgst[0] = packv(tmps, dgst, gid, i + 0);
|
||||
dgst[1] = packv(tmps, dgst, gid, i + 1);
|
||||
dgst[2] = packv(tmps, dgst, gid, i + 2);
|
||||
dgst[3] = packv(tmps, dgst, gid, i + 3);
|
||||
dgst[4] = packv(tmps, dgst, gid, i + 4);
|
||||
dgst[5] = packv(tmps, dgst, gid, i + 5);
|
||||
dgst[6] = packv(tmps, dgst, gid, i + 6);
|
||||
dgst[7] = packv(tmps, dgst, gid, i + 7);
|
||||
|
||||
out[0] = packv(tmps, out, gid, i + 0);
|
||||
out[1] = packv(tmps, out, gid, i + 1);
|
||||
out[2] = packv(tmps, out, gid, i + 2);
|
||||
out[3] = packv(tmps, out, gid, i + 3);
|
||||
out[4] = packv(tmps, out, gid, i + 4);
|
||||
out[5] = packv(tmps, out, gid, i + 5);
|
||||
out[6] = packv(tmps, out, gid, i + 6);
|
||||
out[7] = packv(tmps, out, gid, i + 7);
|
||||
|
||||
for (u32 j = 0; j < loop_cnt; j++)
|
||||
{
|
||||
u32x w0[4];
|
||||
u32x w1[4];
|
||||
u32x w2[4];
|
||||
u32x w3[4];
|
||||
|
||||
w0[0] = dgst[0];
|
||||
w0[1] = dgst[1];
|
||||
w0[2] = dgst[2];
|
||||
w0[3] = dgst[3];
|
||||
w1[0] = dgst[4];
|
||||
w1[1] = dgst[5];
|
||||
w1[2] = dgst[6];
|
||||
w1[3] = dgst[7];
|
||||
w2[0] = 0x80000000;
|
||||
w2[1] = 0;
|
||||
w2[2] = 0;
|
||||
w2[3] = 0;
|
||||
w3[0] = 0;
|
||||
w3[1] = 0;
|
||||
w3[2] = 0;
|
||||
w3[3] = (64 + 32) * 8;
|
||||
|
||||
hmac_sha256_run_V(w0, w1, w2, w3, ipad, opad, dgst);
|
||||
|
||||
out[0] ^= dgst[0];
|
||||
out[1] ^= dgst[1];
|
||||
out[2] ^= dgst[2];
|
||||
out[3] ^= dgst[3];
|
||||
out[4] ^= dgst[4];
|
||||
out[5] ^= dgst[5];
|
||||
out[6] ^= dgst[6];
|
||||
out[7] ^= dgst[7];
|
||||
}
|
||||
|
||||
unpackv(tmps, dgst, gid, i + 0, dgst[0]);
|
||||
unpackv(tmps, dgst, gid, i + 1, dgst[1]);
|
||||
unpackv(tmps, dgst, gid, i + 2, dgst[2]);
|
||||
unpackv(tmps, dgst, gid, i + 3, dgst[3]);
|
||||
unpackv(tmps, dgst, gid, i + 4, dgst[4]);
|
||||
unpackv(tmps, dgst, gid, i + 5, dgst[5]);
|
||||
unpackv(tmps, dgst, gid, i + 6, dgst[6]);
|
||||
unpackv(tmps, dgst, gid, i + 7, dgst[7]);
|
||||
|
||||
unpackv(tmps, out, gid, i + 0, out[0]);
|
||||
unpackv(tmps, out, gid, i + 1, out[1]);
|
||||
unpackv(tmps, out, gid, i + 2, out[2]);
|
||||
unpackv(tmps, out, gid, i + 3, out[3]);
|
||||
unpackv(tmps, out, gid, i + 4, out[4]);
|
||||
unpackv(tmps, out, gid, i + 5, out[5]);
|
||||
unpackv(tmps, out, gid, i + 6, out[6]);
|
||||
unpackv(tmps, out, gid, i + 7, out[7]);
|
||||
}
|
||||
}
|
||||
|
||||
KERNEL_FQ void m25900_comp(KERN_ATTR_TMPS_ESALT(pbkdf2_sha256_tmp_t, blocks_t))
|
||||
{
|
||||
/**
|
||||
* base
|
||||
*/
|
||||
|
||||
const u64 gid = get_global_id(0);
|
||||
const u64 lid = get_local_id(0);
|
||||
const u64 lsz = get_local_size(0);
|
||||
|
||||
/**
|
||||
* aes shared
|
||||
*/
|
||||
|
||||
#ifdef REAL_SHM
|
||||
|
||||
LOCAL_VK u32 s_td0[256];
|
||||
LOCAL_VK u32 s_td1[256];
|
||||
LOCAL_VK u32 s_td2[256];
|
||||
LOCAL_VK u32 s_td3[256];
|
||||
LOCAL_VK u32 s_td4[256];
|
||||
|
||||
LOCAL_VK u32 s_te0[256];
|
||||
LOCAL_VK u32 s_te1[256];
|
||||
LOCAL_VK u32 s_te2[256];
|
||||
LOCAL_VK u32 s_te3[256];
|
||||
LOCAL_VK u32 s_te4[256];
|
||||
|
||||
for (u32 i = lid; i < 256; i += lsz)
|
||||
{
|
||||
s_td0[i] = td0[i];
|
||||
s_td1[i] = td1[i];
|
||||
s_td2[i] = td2[i];
|
||||
s_td3[i] = td3[i];
|
||||
s_td4[i] = td4[i];
|
||||
|
||||
s_te0[i] = te0[i];
|
||||
s_te1[i] = te1[i];
|
||||
s_te2[i] = te2[i];
|
||||
s_te3[i] = te3[i];
|
||||
s_te4[i] = te4[i];
|
||||
}
|
||||
|
||||
SYNC_THREADS();
|
||||
|
||||
#else
|
||||
|
||||
CONSTANT_AS u32a* s_td0 = td0;
|
||||
CONSTANT_AS u32a* s_td1 = td1;
|
||||
CONSTANT_AS u32a* s_td2 = td2;
|
||||
CONSTANT_AS u32a* s_td3 = td3;
|
||||
CONSTANT_AS u32a* s_td4 = td4;
|
||||
|
||||
CONSTANT_AS u32a* s_te0 = te0;
|
||||
CONSTANT_AS u32a* s_te1 = te1;
|
||||
CONSTANT_AS u32a* s_te2 = te2;
|
||||
CONSTANT_AS u32a* s_te3 = te3;
|
||||
CONSTANT_AS u32a* s_te4 = te4;
|
||||
|
||||
#endif
|
||||
|
||||
if (gid >= gid_max) return;
|
||||
|
||||
u32 key[4];
|
||||
|
||||
key[0] = tmps[gid].out[DGST_R0];
|
||||
key[1] = tmps[gid].out[DGST_R1];
|
||||
key[2] = tmps[gid].out[DGST_R2];
|
||||
key[3] = tmps[gid].out[DGST_R3];
|
||||
|
||||
u32 aes_ks[44];
|
||||
|
||||
AES128_set_encrypt_key (aes_ks, key, s_te0, s_te1, s_te2, s_te3);
|
||||
|
||||
u32 b0[4] = { 0 };
|
||||
|
||||
u32 aes_cbc_iv[4] = { 0 };
|
||||
|
||||
u32 yn[4];
|
||||
|
||||
aes128_encrypt_cbc (aes_ks, aes_cbc_iv, b0, yn, s_te0, s_te1, s_te2, s_te3, s_te4);
|
||||
aes128_encrypt_cbc (aes_ks, aes_cbc_iv, esalt_bufs[DIGESTS_OFFSET].b1, yn, s_te0, s_te1, s_te2, s_te3, s_te4);
|
||||
aes128_encrypt_cbc (aes_ks, aes_cbc_iv, esalt_bufs[DIGESTS_OFFSET].b2, yn, s_te0, s_te1, s_te2, s_te3, s_te4);
|
||||
aes128_encrypt_cbc (aes_ks, aes_cbc_iv, esalt_bufs[DIGESTS_OFFSET].b3, yn, s_te0, s_te1, s_te2, s_te3, s_te4);
|
||||
|
||||
u32 nonce[4];
|
||||
|
||||
nonce[0] = 0;
|
||||
nonce[1] = 0;
|
||||
nonce[2] = 0;
|
||||
nonce[3] = 0x00ff0000; // already swapped
|
||||
|
||||
u32 s0[4];
|
||||
|
||||
aes128_encrypt(aes_ks, nonce, s0, s_te0, s_te1, s_te2, s_te3, s_te4);
|
||||
|
||||
const u32 r0 = yn[0] ^ s0[0];
|
||||
const u32 r1 = yn[1] ^ s0[1];
|
||||
const u32 r2 = yn[2] ^ s0[2];
|
||||
const u32 r3 = yn[3] ^ s0[3];
|
||||
|
||||
#define il_pos 0
|
||||
|
||||
#ifdef KERNEL_STATIC
|
||||
#include COMPARE_M
|
||||
#endif
|
||||
}
|
||||
@ -0,0 +1,326 @@
|
||||
/**
|
||||
* Author......: Robert Guetzkow
|
||||
* 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_OUTSIDE_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_NETWORK_PROTOCOL;
|
||||
static const char *HASH_NAME = "KNX IP Secure - Device Authentication Code";
|
||||
static const u64 KERN_TYPE = 25900;
|
||||
static const u32 OPTI_TYPE = OPTI_TYPE_SLOW_HASH_SIMD_LOOP;
|
||||
static const u64 OPTS_TYPE = OPTS_TYPE_PT_GENERATE_LE;
|
||||
static const u32 SALT_TYPE = SALT_TYPE_EMBEDDED;
|
||||
static const char *ST_PASS = "hashcat";
|
||||
static const char *ST_HASH = "$knx-ip-secure-device-authentication-code$*3033*fa7c0d787a9467c209f0a6e7cf16069ed704f3959dce19e45d7935c0a91bce41*f927640d9bbe9a4b0b74dd3289ad41ec";
|
||||
|
||||
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; }
|
||||
|
||||
/* Details of the protocol design can be found in ISO 22510:2019 and the application notes published by the KNX Association. */
|
||||
|
||||
typedef struct blocks
|
||||
{
|
||||
u32 b1[4];
|
||||
u32 b2[4];
|
||||
u32 b3[4];
|
||||
|
||||
} blocks_t;
|
||||
|
||||
typedef struct pbkdf2_sha256_tmp
|
||||
{
|
||||
u32 ipad[8];
|
||||
u32 opad[8];
|
||||
|
||||
u32 dgst[32];
|
||||
u32 out[32];
|
||||
|
||||
} pbkdf2_sha256_tmp_t;
|
||||
|
||||
static const char *SIGNATURE_DEVICE_AUTHENTICATION_CODE = "$knx-ip-secure-device-authentication-code$";
|
||||
static const char *SALT_DEVICE_AUTHENTICATION_CODE = "device-authentication-code.1.secure.ip.knx.org";
|
||||
static const int ROUNDS_DEVICE_AUTHENTICATION_CODE = 65536;
|
||||
|
||||
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;
|
||||
}
|
||||
|
||||
// NVIDIA GPU
|
||||
if (device_param->opencl_device_vendor_id == VENDOR_ID_NV)
|
||||
{
|
||||
hc_asprintf(&jit_build_options, "-D _unroll");
|
||||
}
|
||||
|
||||
// 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;
|
||||
}
|
||||
|
||||
u64 module_esalt_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)
|
||||
{
|
||||
const u64 esalt_size = (const u64) sizeof (blocks_t);
|
||||
|
||||
return esalt_size;
|
||||
}
|
||||
|
||||
u64 module_tmp_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)
|
||||
{
|
||||
const u64 tmp_size = (const u64) sizeof (pbkdf2_sha256_tmp_t);
|
||||
|
||||
return tmp_size;
|
||||
}
|
||||
|
||||
u32 module_pw_min(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_min = 0;
|
||||
|
||||
return pw_min;
|
||||
}
|
||||
|
||||
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)
|
||||
{
|
||||
// The ETS 5 allows a maximum of 20 ASCII characters for the password used to derive the device authentication code.
|
||||
const u32 pw_max = 20;
|
||||
|
||||
return pw_max;
|
||||
}
|
||||
|
||||
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;
|
||||
|
||||
blocks_t *blocks = (blocks_t *) esalt_buf;
|
||||
|
||||
token_t token;
|
||||
|
||||
token.token_cnt = 4;
|
||||
|
||||
token.signatures_cnt = 1;
|
||||
token.signatures_buf[0] = SIGNATURE_DEVICE_AUTHENTICATION_CODE;
|
||||
|
||||
// Signature
|
||||
token.sep[0] = '*';
|
||||
token.len_min[0] = 42;
|
||||
token.len_max[0] = 42;
|
||||
token.attr[0] = TOKEN_ATTR_VERIFY_LENGTH
|
||||
| TOKEN_ATTR_VERIFY_SIGNATURE;
|
||||
|
||||
// Secure Session Identifier (from SESSION_RESPONSE)
|
||||
token.sep[1] = '*';
|
||||
token.len_min[1] = 4;
|
||||
token.len_max[1] = 4;
|
||||
token.attr[1] = TOKEN_ATTR_VERIFY_LENGTH
|
||||
| TOKEN_ATTR_VERIFY_HEX;
|
||||
|
||||
// XOR of Client Public Value X (from SESSION_REQUEST)
|
||||
// and Server Public Value Y (from SESSION_RESPONSE)
|
||||
token.sep[2] = '*';
|
||||
token.len_min[2] = 64;
|
||||
token.len_max[2] = 64;
|
||||
token.attr[2] = TOKEN_ATTR_VERIFY_LENGTH
|
||||
| TOKEN_ATTR_VERIFY_HEX;
|
||||
|
||||
// Message Authentication Code (from SESSION_RESPONSE)
|
||||
token.sep[3] = '*';
|
||||
token.len_min[3] = 32;
|
||||
token.len_max[3] = 32;
|
||||
token.attr[3] = TOKEN_ATTR_VERIFY_LENGTH
|
||||
| TOKEN_ATTR_VERIFY_HEX;
|
||||
|
||||
const int rc_tokenizer = input_tokenizer ((const u8 *) line_buf, line_len, &token);
|
||||
|
||||
if (rc_tokenizer != PARSER_OK) return (rc_tokenizer);
|
||||
|
||||
const u8 *secure_session_identifier_pos = token.buf[1];
|
||||
const int secure_session_identifier_len = token.len[1];
|
||||
|
||||
const u8 *public_value_xor_pos = token.buf[2];
|
||||
const int public_value_xor_len = token.len[2];
|
||||
|
||||
const u8 *mac_pos = token.buf[3];
|
||||
|
||||
u8 secure_session_identifier[2];
|
||||
u8 public_value_xor[32];
|
||||
|
||||
hex_decode (secure_session_identifier_pos, secure_session_identifier_len, (u8 *) &secure_session_identifier);
|
||||
hex_decode (public_value_xor_pos, public_value_xor_len, (u8 *) &public_value_xor);
|
||||
|
||||
digest[0] = hex_to_u32 ((const u8 *) &mac_pos[0]);
|
||||
digest[1] = hex_to_u32 ((const u8 *) &mac_pos[8]);
|
||||
digest[2] = hex_to_u32 ((const u8 *) &mac_pos[16]);
|
||||
digest[3] = hex_to_u32 ((const u8 *) &mac_pos[24]);
|
||||
|
||||
u8 b1[16] = { 0x00, //-x Length of the associated data
|
||||
0x28, //_|
|
||||
0x06, //-x KNX IP Secure header of SESSION_RESPONSE
|
||||
0x10, // |
|
||||
0x09, // |
|
||||
0x52, // |
|
||||
0x00, // |
|
||||
0x38, //_|
|
||||
secure_session_identifier[0],
|
||||
secure_session_identifier[1],
|
||||
public_value_xor[0],
|
||||
public_value_xor[1],
|
||||
public_value_xor[2],
|
||||
public_value_xor[3],
|
||||
public_value_xor[4],
|
||||
public_value_xor[5] };
|
||||
memcpy (blocks->b1, b1, sizeof(b1));
|
||||
|
||||
memcpy (blocks->b2, &public_value_xor[6], 16);
|
||||
|
||||
// The bytes that don't get set are zero padding
|
||||
memset (blocks->b3, 0, 16);
|
||||
memcpy (blocks->b3, &public_value_xor[22], 10);
|
||||
|
||||
// The salt used in the derivation of the device authentication code is constant
|
||||
size_t salt_len = strlen(SALT_DEVICE_AUTHENTICATION_CODE); // exclude the null byte
|
||||
memcpy (salt->salt_buf, SALT_DEVICE_AUTHENTICATION_CODE, salt_len);
|
||||
salt->salt_len = salt_len;
|
||||
salt->salt_iter = ROUNDS_DEVICE_AUTHENTICATION_CODE - 1;
|
||||
|
||||
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 u32 *digest = (const u32 *) digest_buf;
|
||||
|
||||
blocks_t *blocks = (blocks_t *) esalt_buf;
|
||||
|
||||
u8 secure_session_identifier[2];
|
||||
u8 secure_session_identifier_hex[5] = { 0 };
|
||||
u8 public_value_xor[32];
|
||||
u8 public_value_xor_hex[65] = { 0 };
|
||||
|
||||
memcpy (secure_session_identifier, &(blocks->b1[2]), 2);
|
||||
|
||||
memcpy (&public_value_xor[ 0], ((u8 *) &blocks->b1[2]) + 2, 6);
|
||||
memcpy (&public_value_xor[ 6], &(blocks->b2[0]), 16);
|
||||
memcpy (&public_value_xor[22], &(blocks->b3[0]), 10);
|
||||
|
||||
hex_encode(secure_session_identifier, 2, secure_session_identifier_hex);
|
||||
hex_encode(public_value_xor, 32, public_value_xor_hex);
|
||||
|
||||
const int line_len = snprintf (line_buf, line_size, "%s*%s*%s*%08x%08x%08x%08x",
|
||||
SIGNATURE_DEVICE_AUTHENTICATION_CODE,
|
||||
secure_session_identifier_hex,
|
||||
public_value_xor_hex,
|
||||
byte_swap_32 (digest[0]),
|
||||
byte_swap_32 (digest[1]),
|
||||
byte_swap_32 (digest[2]),
|
||||
byte_swap_32 (digest[3])
|
||||
);
|
||||
|
||||
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_esalt_size;
|
||||
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_pw_min;
|
||||
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_tmp_size;
|
||||
module_ctx->module_unstable_warning = MODULE_DEFAULT;
|
||||
module_ctx->module_warmup_disable = MODULE_DEFAULT;
|
||||
}
|
||||
@ -0,0 +1,144 @@
|
||||
#!/usr/bin/env perl
|
||||
|
||||
##
|
||||
## Author......: Robert Guetzkow
|
||||
## License.....: MIT
|
||||
##
|
||||
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
use Crypt::PBKDF2;
|
||||
use Crypt::Mode::CBC;
|
||||
use Crypt::Mode::ECB;
|
||||
|
||||
# Details of the protocol design can be found in ISO 22510:2019 and
|
||||
# application notes published by the KNX Association.
|
||||
|
||||
# ETS 5 allows a maximum of 20 characters in a password.
|
||||
# The salt is used as Secure Session Identifier, which is 2 Bytes long.
|
||||
sub module_constraints { [[0, 20], [2, 2], [-1, -1], [-1, -1], [-1, -1]] }
|
||||
|
||||
sub device_authentication_code
|
||||
{
|
||||
my $password = shift;
|
||||
|
||||
my $pbkdf2 = Crypt::PBKDF2->new
|
||||
(
|
||||
hasher => Crypt::PBKDF2->hasher_from_algorithm ("HMACSHA2", 256),
|
||||
iterations => 65536,
|
||||
output_len => 16
|
||||
);
|
||||
|
||||
my $device_authentication_code = $pbkdf2->PBKDF2 ("device-authentication-code.1.secure.ip.knx.org",
|
||||
$password);
|
||||
|
||||
return $device_authentication_code;
|
||||
}
|
||||
|
||||
sub block_formatting
|
||||
{
|
||||
# Simplified block formatting function, where payload is always empty
|
||||
my $b0 = shift;
|
||||
my $associated_data = shift;
|
||||
my $associated_data_length = pack ("s>", length ($associated_data));
|
||||
my $blocks_unpadded = $associated_data_length . $associated_data;
|
||||
my $pad_len = int ((length ($blocks_unpadded) + 16 - 1) / 16) * 16;
|
||||
my $blocks_padded = $blocks_unpadded . "\0" x ($pad_len - length ($blocks_unpadded));
|
||||
|
||||
return $b0 . $blocks_padded;
|
||||
}
|
||||
|
||||
sub encrypt
|
||||
{
|
||||
# Simplified encryption that only performs steps required for the MAC, not full CCM
|
||||
my $blocks = shift;
|
||||
my $nonce = shift;
|
||||
my $key = shift;
|
||||
my $iv = "\0" x 16;
|
||||
|
||||
my $aes_cbc = Crypt::Mode::CBC->new ("AES", 0);
|
||||
my $ciphertext = $aes_cbc->encrypt ($blocks, $key, $iv);
|
||||
my $y_n = substr ($ciphertext, length ($ciphertext) - 16, 16);
|
||||
|
||||
my $aes_ecb = Crypt::Mode::ECB->new ("AES", 0);
|
||||
my $s_0 = $aes_ecb->encrypt ($nonce, $key);
|
||||
|
||||
return $y_n ^ $s_0;
|
||||
}
|
||||
|
||||
sub generate_session_response_mac
|
||||
{
|
||||
my $secure_session_identifier = shift;
|
||||
my $public_value_xor = shift;
|
||||
my $key = shift;
|
||||
|
||||
# Constants used for the cryptography in Session_Response frames
|
||||
my $knx_ip_header = pack ("H*", "061009520038");
|
||||
my $b0 = pack ("H*", "00000000000000000000000000000000");
|
||||
my $nonce = pack ("H*", "0000000000000000000000000000ff00");
|
||||
|
||||
my $associated_data = $knx_ip_header . $secure_session_identifier . $public_value_xor;
|
||||
|
||||
my $blocks = block_formatting ($b0, $associated_data);
|
||||
|
||||
return encrypt ($blocks, $nonce, $key);
|
||||
}
|
||||
|
||||
sub module_generate_hash
|
||||
{
|
||||
my $word = shift;
|
||||
|
||||
# Parameters that would be found in the Session_Request and Session_Response frames
|
||||
my $secure_session_identifier = shift;
|
||||
my $public_value_xor = shift // random_bytes (32);
|
||||
|
||||
my $device_authentication_code = device_authentication_code ($word);
|
||||
|
||||
my $mac = generate_session_response_mac ($secure_session_identifier,
|
||||
$public_value_xor,
|
||||
$device_authentication_code);
|
||||
|
||||
my $hash = sprintf ("\$knx-ip-secure-device-authentication-code\$*%s*%s*%s",
|
||||
unpack ("H*", $secure_session_identifier),
|
||||
unpack ("H*", $public_value_xor),
|
||||
unpack ("H*", $mac));
|
||||
|
||||
return $hash;
|
||||
}
|
||||
|
||||
sub module_verify_hash
|
||||
{
|
||||
my $line = shift;
|
||||
|
||||
my ($hash, $word) = split (':', $line);
|
||||
|
||||
return unless defined $hash;
|
||||
return unless defined $word;
|
||||
|
||||
my @data = split ('\*', $hash);
|
||||
|
||||
return unless scalar (@data) == 4;
|
||||
|
||||
my $signature = shift @data;
|
||||
|
||||
return unless ($signature eq "\$knx-ip-secure-device-authentication-code\$");
|
||||
|
||||
my $secure_session_identifier = pack ("H*", shift @data); # 2 Bytes expected (using the "salt" for this purpose)
|
||||
my $public_value_xor = pack ("H*", shift @data); # 32 Bytes expected (xor of client's and server's public value)
|
||||
my $mac = pack ("H*", shift @data); # 16 Bytes expected
|
||||
|
||||
return unless (length ($secure_session_identifier) == 2);
|
||||
return unless (length ($public_value_xor) == 32);
|
||||
return unless (length ($mac) == 16);
|
||||
|
||||
my $word_packed = pack_if_HEX_notation ($word);
|
||||
|
||||
my $new_hash = module_generate_hash ($word_packed,
|
||||
$secure_session_identifier,
|
||||
$public_value_xor);
|
||||
|
||||
return ($new_hash, $word);
|
||||
}
|
||||
|
||||
1;
|
||||
Loading…
Reference in new issue