/libfido2/src/es384.c

Source
/*
 * Copyright (c) 2022 Yubico AB. All rights reserved.
 * Use of this source code is governed by a BSD-style
 * license that can be found in the LICENSE file.
 * SPDX-License-Identifier: BSD-2-Clause
 */

#include <openssl/bn.h>
#include <openssl/ecdsa.h>
#include <openssl/obj_mac.h>

#include "fido.h"
#include "fido/es384.h"

#if OPENSSL_VERSION_NUMBER >= 0x30000000
#define get0_EC_KEY(x)  EVP_PKEY_get0_EC_KEY((x))
#else
#define get0_EC_KEY(x)  EVP_PKEY_get0((x))
#endif

static int
decode_coord(const cbor_item_t *item, void *xy, size_t xy_len)
{
        if (cbor_isa_bytestring(item) == false ||
            cbor_bytestring_is_definite(item) == false ||
            cbor_bytestring_length(item) != xy_len) {
                fido_log_debug("%s: cbor type", __func__);
                return (-1);
        }

        memcpy(xy, cbor_bytestring_handle(item), xy_len);

        return (0);
}

static int
decode_pubkey_point(const cbor_item_t *key, const cbor_item_t *val, void *arg)
{
        es384_pk_t *k = arg;

        if (cbor_isa_negint(key) == false ||
            cbor_int_get_width(key) != CBOR_INT_8)
                return (0); /* ignore */

        switch (cbor_get_uint8(key)) {
        case 1: /* x coordinate */
                return (decode_coord(val, &k->x, sizeof(k->x)));
        case 2: /* y coordinate */
                return (decode_coord(val, &k->y, sizeof(k->y)));
        }

        return (0); /* ignore */
}

int
es384_pk_decode(const cbor_item_t *item, es384_pk_t *k)
{
        if (cbor_isa_map(item) == false ||
            cbor_map_is_definite(item) == false ||
            cbor_map_iter(item, k, decode_pubkey_point) < 0) {
                fido_log_debug("%s: cbor type", __func__);
                return (-1);
        }

        return (0);
}

es384_pk_t *
es384_pk_new(void)
{
        return (calloc(1, sizeof(es384_pk_t)));
}

void
es384_pk_free(es384_pk_t **pkp)
{
        es384_pk_t *pk;

        if (pkp == NULL || (pk = *pkp) == NULL)
                return;

        freezero(pk, sizeof(*pk));
        *pkp = NULL;
}

int
es384_pk_from_ptr(es384_pk_t *pk, const void *ptr, size_t len)
{
        const uint8_t   *p = ptr;
        EVP_PKEY        *pkey;

        if (len < sizeof(*pk))
                return (FIDO_ERR_INVALID_ARGUMENT);

        if (len == sizeof(*pk) + 1 && *p == 0x04)
                memcpy(pk, ++p, sizeof(*pk)); /* uncompressed format */
        else
                memcpy(pk, ptr, sizeof(*pk)); /* libfido2 x||y format */

        if ((pkey = es384_pk_to_EVP_PKEY(pk)) == NULL) {
                fido_log_debug("%s: es384_pk_to_EVP_PKEY", __func__);
                explicit_bzero(pk, sizeof(*pk));
                return (FIDO_ERR_INVALID_ARGUMENT);
        }

        EVP_PKEY_free(pkey);

        return (FIDO_OK);
}

EVP_PKEY *
es384_pk_to_EVP_PKEY(const es384_pk_t *k)
{
        BN_CTX          *bnctx = NULL;
        EC_KEY          *ec = NULL;
        EC_POINT        *q = NULL;
        EVP_PKEY        *pkey = NULL;
        BIGNUM          *x = NULL;
        BIGNUM          *y = NULL;
        const EC_GROUP  *g = NULL;
        int              ok = -1;

        if ((bnctx = BN_CTX_new()) == NULL)
                goto fail;

        BN_CTX_start(bnctx);

        if ((x = BN_CTX_get(bnctx)) == NULL ||
            (y = BN_CTX_get(bnctx)) == NULL)
                goto fail;

        if (BN_bin2bn(k->x, sizeof(k->x), x) == NULL ||
            BN_bin2bn(k->y, sizeof(k->y), y) == NULL) {
                fido_log_debug("%s: BN_bin2bn", __func__);
                goto fail;
        }

        if ((ec = EC_KEY_new_by_curve_name(NID_secp384r1)) == NULL ||
            (g = EC_KEY_get0_group(ec)) == NULL) {
                fido_log_debug("%s: EC_KEY init", __func__);
                goto fail;
        }

        if ((q = EC_POINT_new(g)) == NULL ||
            EC_POINT_set_affine_coordinates_GFp(g, q, x, y, bnctx) == 0 ||
            EC_KEY_set_public_key(ec, q) == 0) {
                fido_log_debug("%s: EC_KEY_set_public_key", __func__);
                goto fail;
        }

        if ((pkey = EVP_PKEY_new()) == NULL ||
            EVP_PKEY_assign_EC_KEY(pkey, ec) == 0) {
                fido_log_debug("%s: EVP_PKEY_assign_EC_KEY", __func__);
                goto fail;
        }

        ec = NULL; /* at this point, ec belongs to evp */

        ok = 0;
fail:
        if (bnctx != NULL) {
                BN_CTX_end(bnctx);
                BN_CTX_free(bnctx);
        }

        if (ec != NULL)
                EC_KEY_free(ec);
        if (q != NULL)
                EC_POINT_free(q);

        if (ok < 0 && pkey != NULL) {
                EVP_PKEY_free(pkey);
                pkey = NULL;
        }

        return (pkey);
}

int
es384_pk_from_EC_KEY(es384_pk_t *pk, const EC_KEY *ec)
{
        BN_CTX          *bnctx = NULL;
        BIGNUM          *x = NULL;
        BIGNUM          *y = NULL;
        const EC_POINT  *q = NULL;
        EC_GROUP        *g = NULL;
        size_t           dx;
        size_t           dy;
        int              ok = FIDO_ERR_INTERNAL;
        int              nx;
        int              ny;

        if ((q = EC_KEY_get0_public_key(ec)) == NULL ||
            (g = EC_GROUP_new_by_curve_name(NID_secp384r1)) == NULL ||
            (bnctx = BN_CTX_new()) == NULL)
                goto fail;

        BN_CTX_start(bnctx);

        if ((x = BN_CTX_get(bnctx)) == NULL ||
            (y = BN_CTX_get(bnctx)) == NULL)
                goto fail;

        if (EC_POINT_is_on_curve(g, q, bnctx) != 1) {
                fido_log_debug("%s: EC_POINT_is_on_curve", __func__);
                ok = FIDO_ERR_INVALID_ARGUMENT;
                goto fail;
        }

        if (EC_POINT_get_affine_coordinates_GFp(g, q, x, y, bnctx) == 0 ||
            (nx = BN_num_bytes(x)) < 0 || (size_t)nx > sizeof(pk->x) ||
            (ny = BN_num_bytes(y)) < 0 || (size_t)ny > sizeof(pk->y)) {
                fido_log_debug("%s: EC_POINT_get_affine_coordinates_GFp",
                    __func__);
                goto fail;
        }

        dx = sizeof(pk->x) - (size_t)nx;
        dy = sizeof(pk->y) - (size_t)ny;

        if ((nx = BN_bn2bin(x, pk->x + dx)) < 0 || (size_t)nx > sizeof(pk->x) ||
            (ny = BN_bn2bin(y, pk->y + dy)) < 0 || (size_t)ny > sizeof(pk->y)) {
                fido_log_debug("%s: BN_bn2bin", __func__);
                goto fail;
        }

        ok = FIDO_OK;
fail:
        EC_GROUP_free(g);

        if (bnctx != NULL) {
                BN_CTX_end(bnctx);
                BN_CTX_free(bnctx);
        }

        return (ok);
}

int
es384_pk_from_EVP_PKEY(es384_pk_t *pk, const EVP_PKEY *pkey)
{
        const EC_KEY *ec;

        if (EVP_PKEY_base_id(pkey) != EVP_PKEY_EC ||
            (ec = get0_EC_KEY(pkey)) == NULL)
                return (FIDO_ERR_INVALID_ARGUMENT);

        return (es384_pk_from_EC_KEY(pk, ec));
}

int
es384_verify_sig(const fido_blob_t *dgst, EVP_PKEY *pkey,
    const fido_blob_t *sig)
{
        EVP_PKEY_CTX    *pctx = NULL;
        int              ok = -1;

        if (EVP_PKEY_base_id(pkey) != EVP_PKEY_EC) {
                fido_log_debug("%s: EVP_PKEY_base_id", __func__);
                goto fail;
        }

        if ((pctx = EVP_PKEY_CTX_new(pkey, NULL)) == NULL ||
            EVP_PKEY_verify_init(pctx) != 1 ||
            EVP_PKEY_verify(pctx, sig->ptr, sig->len, dgst->ptr,
            dgst->len) != 1) {
                fido_log_debug("%s: EVP_PKEY_verify", __func__);
                goto fail;
        }

        ok = 0;
fail:
        EVP_PKEY_CTX_free(pctx);

        return (ok);
}

int
es384_pk_verify_sig(const fido_blob_t *dgst, const es384_pk_t *pk,
    const fido_blob_t *sig)
{
        EVP_PKEY        *pkey;
        int              ok = -1;

        if ((pkey = es384_pk_to_EVP_PKEY(pk)) == NULL ||
            es384_verify_sig(dgst, pkey, sig) < 0) {
                fido_log_debug("%s: es384_verify_sig", __func__);
                goto fail;
        }

        ok = 0;
fail:
        EVP_PKEY_free(pkey);

        return (ok);
}

Coverage Report

Created: 2025-10-04 18:33

Line	Count	Source
1		/*
2		* Copyright (c) 2022 Yubico AB. All rights reserved.
3		* Use of this source code is governed by a BSD-style
4		* license that can be found in the LICENSE file.
5		* SPDX-License-Identifier: BSD-2-Clause
6		*/
7
8		#include <openssl/bn.h>
9		#include <openssl/ecdsa.h>
10		#include <openssl/obj_mac.h>
11
12		#include "fido.h"
13		#include "fido/es384.h"
14
15		#if OPENSSL_VERSION_NUMBER >= 0x30000000
16	292	#define get0_EC_KEY(x) EVP_PKEY_get0_EC_KEY((x))
17		#else
18		#define get0_EC_KEY(x) EVP_PKEY_get0((x))
19		#endif
20
21		static int
22		decode_coord(const cbor_item_t item, void xy, size_t xy_len)
23	2.31k	{
24	2.31k	if (cbor_isa_bytestring(item) == false \|\|
25	2.31k	cbor_bytestring_is_definite(item) == false \|\|
26	2.31k	cbor_bytestring_length(item) != xy_len) {
27	36	fido_log_debug("%s: cbor type", __func__);
28	36	return (-1);
29	36	}
30
31	2.27k	memcpy(xy, cbor_bytestring_handle(item), xy_len);
32
33	2.27k	return (0);
34	2.31k	}
35
36		static int
37		decode_pubkey_point(const cbor_item_t key, const cbor_item_t val, void *arg)
38	6.22k	{
39	6.22k	es384_pk_t *k = arg;
40
41	6.22k	if (cbor_isa_negint(key) == false \|\|
42	6.22k	cbor_int_get_width(key) != CBOR_INT_8)
43	2.60k	return (0); /* ignore */
44
45	3.61k	switch (cbor_get_uint8(key)) {
46	1.18k	case 1: /* x coordinate */
47	1.18k	return (decode_coord(val, &k->x, sizeof(k->x)));
48	1.12k	case 2: /* y coordinate */
49	1.12k	return (decode_coord(val, &k->y, sizeof(k->y)));
50	3.61k	}
51
52	1.30k	return (0); /* ignore */
53	3.61k	}
54
55		int
56		es384_pk_decode(const cbor_item_t item, es384_pk_t k)
57	1.25k	{
58	1.25k	if (cbor_isa_map(item) == false \|\|
59	1.25k	cbor_map_is_definite(item) == false \|\|
60	1.25k	cbor_map_iter(item, k, decode_pubkey_point) < 0) {
61	46	fido_log_debug("%s: cbor type", __func__);
62	46	return (-1);
63	46	}
64
65	1.21k	return (0);
66	1.25k	}
67
68		es384_pk_t *
69		es384_pk_new(void)
70	3.63k	{
71	3.63k	return (calloc(1, sizeof(es384_pk_t)));
72	3.63k	}
73
74		void
75		es384_pk_free(es384_pk_t **pkp)
76	20.2k	{
77	20.2k	es384_pk_t *pk;
78
79	20.2k	if (pkp == NULL \|\| (pk = *pkp) == NULL)
80	16.9k	return;
81
82	3.34k	freezero(pk, sizeof(*pk));
83	3.34k	*pkp = NULL;
84	3.34k	}
85
86		int
87		es384_pk_from_ptr(es384_pk_t pk, const void ptr, size_t len)
88	3.05k	{
89	3.05k	const uint8_t *p = ptr;
90	3.05k	EVP_PKEY *pkey;
91
92	3.05k	if (len < sizeof(*pk))
93	1.83k	return (FIDO_ERR_INVALID_ARGUMENT);
94
95	1.22k	if (len == sizeof(pk) + 1 && p == 0x04)
96	7	memcpy(pk, ++p, sizeof(pk)); / uncompressed format */
97	1.21k	else
98	1.21k	memcpy(pk, ptr, sizeof(pk)); / libfido2 x\|\|y format */
99
100	1.22k	if ((pkey = es384_pk_to_EVP_PKEY(pk)) == NULL) {
101	568	fido_log_debug("%s: es384_pk_to_EVP_PKEY", __func__);
102	568	explicit_bzero(pk, sizeof(*pk));
103	568	return (FIDO_ERR_INVALID_ARGUMENT);
104	568	}
105
106	653	EVP_PKEY_free(pkey);
107
108	653	return (FIDO_OK);
109	1.22k	}
110
111		EVP_PKEY *
112		es384_pk_to_EVP_PKEY(const es384_pk_t *k)
113	6.48k	{
114	6.48k	BN_CTX *bnctx = NULL;
115	6.48k	EC_KEY *ec = NULL;
116	6.48k	EC_POINT *q = NULL;
117	6.48k	EVP_PKEY *pkey = NULL;
118	6.48k	BIGNUM *x = NULL;
119	6.48k	BIGNUM *y = NULL;
120	6.48k	const EC_GROUP *g = NULL;
121	6.48k	int ok = -1;
122
123	6.48k	if ((bnctx = BN_CTX_new()) == NULL)
124	39	goto fail;
125
126	6.44k	BN_CTX_start(bnctx);
127
128	6.44k	if ((x = BN_CTX_get(bnctx)) == NULL \|\|
129	6.44k	(y = BN_CTX_get(bnctx)) == NULL)
130	134	goto fail;
131
132	6.30k	if (BN_bin2bn(k->x, sizeof(k->x), x) == NULL \|\|
133	6.30k	BN_bin2bn(k->y, sizeof(k->y), y) == NULL) {
134	283	fido_log_debug("%s: BN_bin2bn", __func__);
135	283	goto fail;
136	283	}
137
138	6.02k	if ((ec = EC_KEY_new_by_curve_name(NID_secp384r1)) == NULL \|\|
139	6.02k	(g = EC_KEY_get0_group(ec)) == NULL) {
140	173	fido_log_debug("%s: EC_KEY init", __func__);
141	173	goto fail;
142	173	}
143
144	5.85k	if ((q = EC_POINT_new(g)) == NULL \|\|
145	5.85k	EC_POINT_set_affine_coordinates_GFp(g, q, x, y, bnctx) == 0 \|\|
146	5.85k	EC_KEY_set_public_key(ec, q) == 0) {
147	2.80k	fido_log_debug("%s: EC_KEY_set_public_key", __func__);
148	2.80k	goto fail;
149	2.80k	}
150
151	3.05k	if ((pkey = EVP_PKEY_new()) == NULL \|\|
152	3.05k	EVP_PKEY_assign_EC_KEY(pkey, ec) == 0) {
153	65	fido_log_debug("%s: EVP_PKEY_assign_EC_KEY", __func__);
154	65	goto fail;
155	65	}
156
157	2.98k	ec = NULL; /* at this point, ec belongs to evp */
158
159	2.98k	ok = 0;
160	6.48k	fail:
161	6.48k	if (bnctx != NULL) {
162	6.44k	BN_CTX_end(bnctx);
163	6.44k	BN_CTX_free(bnctx);
164	6.44k	}
165
166	6.48k	if (ec != NULL)
167	2.89k	EC_KEY_free(ec);
168	6.48k	if (q != NULL)
169	5.83k	EC_POINT_free(q);
170
171	6.48k	if (ok < 0 && pkey != NULL) {
172	26	EVP_PKEY_free(pkey);
173	26	pkey = NULL;
174	26	}
175
176	6.48k	return (pkey);
177	2.98k	}
178
179		int
180		es384_pk_from_EC_KEY(es384_pk_t pk, const EC_KEY ec)
181	270	{
182	270	BN_CTX *bnctx = NULL;
183	270	BIGNUM *x = NULL;
184	270	BIGNUM *y = NULL;
185	270	const EC_POINT *q = NULL;
186	270	EC_GROUP *g = NULL;
187	270	size_t dx;
188	270	size_t dy;
189	270	int ok = FIDO_ERR_INTERNAL;
190	270	int nx;
191	270	int ny;
192
193	270	if ((q = EC_KEY_get0_public_key(ec)) == NULL \|\|
194	270	(g = EC_GROUP_new_by_curve_name(NID_secp384r1)) == NULL \|\|
195	270	(bnctx = BN_CTX_new()) == NULL)
196	11	goto fail;
197
198	259	BN_CTX_start(bnctx);
199
200	259	if ((x = BN_CTX_get(bnctx)) == NULL \|\|
201	259	(y = BN_CTX_get(bnctx)) == NULL)
202	10	goto fail;
203
204	249	if (EC_POINT_is_on_curve(g, q, bnctx) != 1) {
205	0	fido_log_debug("%s: EC_POINT_is_on_curve", __func__);
206	0	ok = FIDO_ERR_INVALID_ARGUMENT;
207	0	goto fail;
208	0	}
209
210	249	if (EC_POINT_get_affine_coordinates_GFp(g, q, x, y, bnctx) == 0 \|\|
211	249	(nx = BN_num_bytes(x)) < 0 \|\| (size_t)nx > sizeof(pk->x) \|\|
212	249	(ny = BN_num_bytes(y)) < 0 \|\| (size_t)ny > sizeof(pk->y)) {
213	4	fido_log_debug("%s: EC_POINT_get_affine_coordinates_GFp",
214	4	__func__);
215	4	goto fail;
216	4	}
217
218	245	dx = sizeof(pk->x) - (size_t)nx;
219	245	dy = sizeof(pk->y) - (size_t)ny;
220
221	245	if ((nx = BN_bn2bin(x, pk->x + dx)) < 0 \|\| (size_t)nx > sizeof(pk->x) \|\|
222	245	(ny = BN_bn2bin(y, pk->y + dy)) < 0 \|\| (size_t)ny > sizeof(pk->y)) {
223	8	fido_log_debug("%s: BN_bn2bin", __func__);
224	8	goto fail;
225	8	}
226
227	237	ok = FIDO_OK;
228	270	fail:
229	270	EC_GROUP_free(g);
230
231	270	if (bnctx != NULL) {
232	259	BN_CTX_end(bnctx);
233	259	BN_CTX_free(bnctx);
234	259	}
235
236	270	return (ok);
237	237	}
238
239		int
240		es384_pk_from_EVP_PKEY(es384_pk_t pk, const EVP_PKEY pkey)
241	292	{
242	292	const EC_KEY *ec;
243
244	292	if (EVP_PKEY_base_id(pkey) != EVP_PKEY_EC \|\|
245	292	(ec = get0_EC_KEY(pkey)) == NULL)
246	22	return (FIDO_ERR_INVALID_ARGUMENT);
247
248	270	return (es384_pk_from_EC_KEY(pk, ec));
249	292	}
250
251		int
252		es384_verify_sig(const fido_blob_t dgst, EVP_PKEY pkey,
253		const fido_blob_t *sig)
254	1.79k	{
255	1.79k	EVP_PKEY_CTX *pctx = NULL;
256	1.79k	int ok = -1;
257
258	1.79k	if (EVP_PKEY_base_id(pkey) != EVP_PKEY_EC) {
259	0	fido_log_debug("%s: EVP_PKEY_base_id", __func__);
260	0	goto fail;
261	0	}
262
263	1.79k	if ((pctx = EVP_PKEY_CTX_new(pkey, NULL)) == NULL \|\|
264	1.79k	EVP_PKEY_verify_init(pctx) != 1 \|\|
265	1.79k	EVP_PKEY_verify(pctx, sig->ptr, sig->len, dgst->ptr,
266	1.79k	dgst->len) != 1) {
267	1.79k	fido_log_debug("%s: EVP_PKEY_verify", __func__);
268	1.79k	goto fail;
269	1.79k	}
270
271	0	ok = 0;
272	1.79k	fail:
273	1.79k	EVP_PKEY_CTX_free(pctx);
274
275	1.79k	return (ok);
276	0	}
277
278		int
279		es384_pk_verify_sig(const fido_blob_t dgst, const es384_pk_t pk,
280		const fido_blob_t *sig)
281	2.20k	{
282	2.20k	EVP_PKEY *pkey;
283	2.20k	int ok = -1;
284
285	2.20k	if ((pkey = es384_pk_to_EVP_PKEY(pk)) == NULL \|\|
286	2.20k	es384_verify_sig(dgst, pkey, sig) < 0) {
287	2.20k	fido_log_debug("%s: es384_verify_sig", __func__);
288	2.20k	goto fail;
289	2.20k	}
290
291	0	ok = 0;
292	2.20k	fail:
293	2.20k	EVP_PKEY_free(pkey);
294
295	2.20k	return (ok);
296	0	}