Added first commit with BIP and SLIP support for cryptowallets.

Needs more work.

Signed-off-by: Pol Henarejos <pol.henarejos@cttc.es>
This commit is contained in:
Pol Henarejos 2023-05-23 20:40:16 +02:00
parent 279df32acc
commit 46d85c029e
No known key found for this signature in database
GPG key ID: C0095B7870A4CCD3
5 changed files with 210 additions and 2 deletions

View file

@ -62,6 +62,7 @@ set(SOURCES ${SOURCES}
${CMAKE_CURRENT_LIST_DIR}/src/hsm/cmd_session_pin.c
${CMAKE_CURRENT_LIST_DIR}/src/hsm/cmd_puk_auth.c
${CMAKE_CURRENT_LIST_DIR}/src/hsm/cmd_pso.c
${CMAKE_CURRENT_LIST_DIR}/src/hsm/cmd_bip_slip.c
${CMAKE_CURRENT_LIST_DIR}/src/hsm/cvc.c
${CMAKE_CURRENT_LIST_DIR}/src/hsm/files.c
${CMAKE_CURRENT_LIST_DIR}/src/hsm/kek.c

@ -1 +1 @@
Subproject commit 579178ac56221ce005da24d963c9ee994efcfde4
Subproject commit 4cfbc19aa7df0c22d738e6567b62745358af2aaa

203
src/hsm/cmd_bip_slip.c Normal file
View file

@ -0,0 +1,203 @@
/*
* This file is part of the Pico HSM distribution (https://github.com/polhenarejos/pico-hsm).
* Copyright (c) 2022 Pol Henarejos.
*
* This program is free software: you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation, version 3.
*
* This program is distributed in the hope that it will be useful, but
* WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program. If not, see <http://www.gnu.org/licenses/>.
*/
#include "sc_hsm.h"
#include "files.h"
#include "random.h"
#include "kek.h"
#include "asn1.h"
const uint8_t *k1_seed = (const uint8_t *)"Bitcoin seed";
const uint8_t *p1_seed = (const uint8_t *)"Nist256p1 seed";
#define MAX_PATH_DEPTH 16
int node_derive_bip_child(const mbedtls_ecp_keypair *parent, const uint8_t cpar[32], uint32_t i, mbedtls_ecp_keypair *child, uint8_t cchild[32]) {
uint8_t data[1+32+4], I[64], *iL = I, *iR = I + 32;
mbedtls_mpi il, kchild;
mbedtls_mpi_init(&il);
mbedtls_mpi_init(&kchild);
if (i >= 0x80000000) {
if (mbedtls_mpi_cmp_int(&parent->d, 0) == 0) {
return CCID_ERR_NULL_PARAM;
}
data[0] = 0x00;
mbedtls_mpi_write_binary(&parent->d, data + 1, 32);
}
else {
size_t olen = 0;
mbedtls_ecp_point_write_binary(&parent->grp, &parent->Q, MBEDTLS_ECP_PF_COMPRESSED, &olen, data, 33);
}
do {
data[33] = i >> 24;
data[34] = i >> 16;
data[35] = i >> 8;
data[36] = i & 0xff;
mbedtls_md_hmac(mbedtls_md_info_from_type(MBEDTLS_MD_SHA512), cpar, 32, data, sizeof(data), I);
mbedtls_mpi_read_binary(&il, iL, 32);
mbedtls_mpi_add_mpi(&kchild, &il, &parent->d);
mbedtls_mpi_mod_mpi(&kchild, &kchild, &parent->grp.N);
data[0] = 0x01;
memcpy(data + 1, iR, 32);
} while (mbedtls_mpi_cmp_int(&il, 0) == 0 || mbedtls_mpi_cmp_int(&kchild, 0) == 0);
mbedtls_mpi_copy(&child->d, &kchild);
mbedtls_ecp_mul(&child->grp, &child->Q, &child->d, &child->grp.G, random_gen, NULL);
memcpy(cchild, iR, 32);
mbedtls_mpi_free(&il);
mbedtls_mpi_free(&kchild);
return CCID_OK;
}
int node_fingerprint(mbedtls_ecp_keypair *ctx, uint8_t *fingerprint) {
size_t olen = 0;
uint8_t buffer[33];
mbedtls_ecp_point_write_binary(&ctx->grp, &ctx->Q, MBEDTLS_ECP_PF_COMPRESSED, &olen, buffer, sizeof(buffer));
mbedtls_md(mbedtls_md_info_from_type(MBEDTLS_MD_SHA256), buffer, sizeof(buffer), buffer);
mbedtls_md(mbedtls_md_info_from_type(MBEDTLS_MD_RIPEMD160), buffer, 32, buffer);
memcpy(fingerprint, buffer, 4);
return CCID_OK;
}
int node_derive_bip_path(const uint32_t *path, size_t path_len, mbedtls_ecp_keypair *ctx, uint8_t chain[32], uint8_t fingerprint[4]) {
uint8_t mkey[65];
file_t *ef = search_dynamic_file(EF_MASTER_SEED | path[0]);
if (!file_has_data(ef)) {
return CCID_ERR_FILE_NOT_FOUND;
}
memcpy(mkey, file_get_data(ef), sizeof(mkey));
int r = mkek_decrypt(mkey + 1, sizeof(mkey) - 1);
if (r != CCID_OK) {
return CCID_EXEC_ERROR;
}
mbedtls_ecp_keypair_init(ctx);
if (mkey[0] == 0x1) {
mbedtls_ecp_group_load(&ctx->grp, MBEDTLS_ECP_DP_SECP256K1);
}
else if (mkey[0] == 0x2) {
mbedtls_ecp_group_load(&ctx->grp, MBEDTLS_ECP_DP_SECP256R1);
}
else {
return CCID_WRONG_DATA;
}
mbedtls_mpi_read_binary(&ctx->d, mkey + 1, 32);
memcpy(chain, mkey + 33, 32);
mbedtls_ecp_mul(&ctx->grp, &ctx->Q, &ctx->d, &ctx->grp.G, random_gen, NULL);
memset(fingerprint, 0, 4);
for (int ix = 1; ix < path_len; ix++) {
node_fingerprint(ctx, fingerprint);
if ((r = node_derive_bip_child(ctx, chain, path[ix], ctx, chain)) != CCID_OK) {
return r;
}
}
return CCID_OK;
}
int cmd_bip_slip() {
uint8_t p1 = P1(apdu), p2 = P2(apdu);
if (p1 == 0x1 || p1 == 0x2) { // Master generation (K1 and P1)
if (p2 >= 10) {
return SW_INCORRECT_P1P2();
}
uint8_t mkey[65], *seed = mkey + 1, seed_len = 64;
const uint8_t *key_seed = NULL;
mbedtls_mpi il;
mbedtls_mpi_init(&il);
mbedtls_ecp_group grp;
mbedtls_ecp_group_init(&grp);
if (p1 == 0x1) {
mbedtls_ecp_group_load(&grp, MBEDTLS_ECP_DP_SECP256K1);
key_seed = k1_seed;
}
else if (p1 == 0x2) {
mbedtls_ecp_group_load(&grp, MBEDTLS_ECP_DP_SECP256R1);
key_seed = p1_seed;
}
if (apdu.nc == 0) {
seed_len = 64;
random_gen(NULL, seed, seed_len);
}
else {
seed_len = MIN(apdu.nc, 64);
memcpy(seed, apdu.data, seed_len);
}
do {
mbedtls_md_hmac(mbedtls_md_info_from_type(MBEDTLS_MD_SHA512), key_seed, strlen((char *)key_seed), seed, seed_len, seed);
mbedtls_mpi_read_binary(&il, seed, 32);
seed_len = 64;
} while (mbedtls_mpi_cmp_int(&il, 0) == 0 || mbedtls_mpi_cmp_mpi(&il, &grp.N) != -1);
mbedtls_ecp_group_free(&grp);
mbedtls_mpi_free(&il);
mkey[0] = p1;
file_t *ef = file_new(EF_MASTER_SEED | p2);
int r = mkek_encrypt(mkey + 1, sizeof(mkey) - 1);
if (r != CCID_OK) {
return SW_EXEC_ERROR();
}
r = flash_write_data_to_file(ef, mkey, sizeof(mkey));
if (r != CCID_OK) {
return SW_EXEC_ERROR();
}
low_flash_available();
}
else if (p1 == 0x3) {
uint8_t *tag_data = NULL, *p = NULL;
size_t tag_len = 0;
uint16_t tag = 0x0;
if (apdu.nc == 0) {
return SW_WRONG_LENGTH();
}
uint32_t path[MAX_PATH_DEPTH] = {0};
uint8_t pos = 0;
for (; walk_tlv(apdu.data, apdu.nc, &p, &tag, &tag_len, &tag_data); pos++) {
if (tag != 0x02 || (pos == 0 && tag_len != 1) || (pos != 0 && tag_len != 4)) {
return SW_WRONG_DATA();
}
if (pos == 0 && tag_len == 1) {
path[pos] = tag_data[0];
}
else if (pos != 0 && tag_len == 4) {
path[pos] = (tag_data[0] << 24) | (tag_data[1] << 16) | (tag_data[2] << 8) | tag_data[3];
}
}
mbedtls_ecp_keypair ctx;
uint8_t chain[32], fgpt[4];
int r = node_derive_bip_path(path, pos, &ctx, chain, fgpt);
if (r != CCID_OK) {
mbedtls_ecp_keypair_free(&ctx);
return SW_EXEC_ERROR();
}
uint8_t pubkey[33];
memcpy(res_APDU, "\x04\x88\xB2\x1E", 4);
res_APDU_size += 4;
res_APDU[res_APDU_size++] = pos - 1;
memcpy(res_APDU + res_APDU_size, fgpt, 4);
res_APDU_size += 4;
res_APDU[res_APDU_size++] = path[pos - 1] >> 24;
res_APDU[res_APDU_size++] = path[pos - 1] >> 16;
res_APDU[res_APDU_size++] = path[pos - 1] >> 8;
res_APDU[res_APDU_size++] = path[pos - 1] & 0xff;
memcpy(res_APDU + res_APDU_size, chain, 32);
res_APDU_size += 32;
mbedtls_ecp_point_write_binary(&ctx.grp, &ctx.Q, MBEDTLS_ECP_PF_COMPRESSED, &tag_len, pubkey, sizeof(pubkey));
memcpy(res_APDU + res_APDU_size, pubkey, tag_len);
res_APDU_size += tag_len;
mbedtls_ecp_keypair_free(&ctx);
}
return SW_OK();
}

View file

@ -28,7 +28,8 @@
#define EF_DKEK 0x1090
#define EF_KEY_DOMAIN 0x10A0
#define EF_PUKAUT 0x10C0
#define EF_PUK 0X10D0
#define EF_PUK 0x10D0
#define EF_MASTER_SEED 0x1110
#define EF_PRKDFS 0x6040
#define EF_PUKDFS 0x6041
#define EF_CDFS 0x6042

View file

@ -76,6 +76,7 @@ extern int cmd_general_authenticate();
extern int cmd_session_pin();
extern int cmd_puk_auth();
extern int cmd_pso();
extern int cmd_bip_slip();
extern const uint8_t *ccid_atr;
@ -656,6 +657,7 @@ int load_private_key_ecdsa(mbedtls_ecdsa_context *ctx, file_t *fkey) {
#define INS_RESET_RETRY 0x2C
#define INS_KEYPAIR_GEN 0x46
#define INS_KEY_GEN 0x48
#define INS_BIP_SLIP 0x4A
#define INS_INITIALIZE 0x50
#define INS_KEY_DOMAIN 0x52
#define INS_PUK_AUTH 0x54
@ -705,6 +707,7 @@ static const cmd_t cmds[] = {
{ INS_PUK_AUTH, cmd_puk_auth },
{ INS_PSO, cmd_pso },
{ INS_EXTERNAL_AUTHENTICATE, cmd_external_authenticate },
{ INS_BIP_SLIP, cmd_bip_slip },
{ 0x00, 0x0 }
};