Coverage Report

Created: 2020-09-01 07:05

/libfido2/src/es256.c
Line
Count
Source (jump to first uncovered line)
1
/*
2
 * Copyright (c) 2018 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
 */
6
7
#include <openssl/bn.h>
8
#include <openssl/ec.h>
9
#include <openssl/evp.h>
10
#include <openssl/obj_mac.h>
11
12
#include <string.h>
13
#include "fido.h"
14
#include "fido/es256.h"
15
16
static int
17
decode_coord(const cbor_item_t *item, void *xy, size_t xy_len)
18
8.06k
{
19
8.06k
        if (cbor_isa_bytestring(item) == false ||
20
8.06k
            cbor_bytestring_is_definite(item) == false ||
21
8.06k
            cbor_bytestring_length(item) != xy_len) {
22
97
                fido_log_debug("%s: cbor type", __func__);
23
97
                return (-1);
24
97
        }
25
7.96k
26
7.96k
        memcpy(xy, cbor_bytestring_handle(item), xy_len);
27
7.96k
28
7.96k
        return (0);
29
7.96k
}
30
31
static int
32
decode_pubkey_point(const cbor_item_t *key, const cbor_item_t *val, void *arg)
33
20.9k
{
34
20.9k
        es256_pk_t *k = arg;
35
20.9k
36
20.9k
        if (cbor_isa_negint(key) == false ||
37
20.9k
            cbor_int_get_width(key) != CBOR_INT_8)
38
10.4k
                return (0); /* ignore */
39
10.5k
40
10.5k
        switch (cbor_get_uint8(key)) {
41
4.11k
        case 1: /* x coordinate */
42
4.11k
                return (decode_coord(val, &k->x, sizeof(k->x)));
43
3.94k
        case 2: /* y coordinate */
44
3.94k
                return (decode_coord(val, &k->y, sizeof(k->y)));
45
2.45k
        }
46
2.45k
47
2.45k
        return (0); /* ignore */
48
2.45k
}
49
50
int
51
es256_pk_decode(const cbor_item_t *item, es256_pk_t *k)
52
4.25k
{
53
4.25k
        if (cbor_isa_map(item) == false ||
54
4.25k
            cbor_map_is_definite(item) == false ||
55
4.25k
            cbor_map_iter(item, k, decode_pubkey_point) < 0) {
56
192
                fido_log_debug("%s: cbor type", __func__);
57
192
                return (-1);
58
192
        }
59
4.06k
60
4.06k
        return (0);
61
4.06k
}
62
63
cbor_item_t *
64
es256_pk_encode(const es256_pk_t *pk, int ecdh)
65
2.73k
{
66
2.73k
        cbor_item_t             *item = NULL;
67
2.73k
        struct cbor_pair         argv[5];
68
2.73k
        int                      alg;
69
2.73k
        int                      ok = -1;
70
2.73k
71
2.73k
        memset(argv, 0, sizeof(argv));
72
2.73k
73
2.73k
        if ((item = cbor_new_definite_map(5)) == NULL)
74
2.73k
                goto fail;
75
2.72k
76
2.72k
        /* kty */
77
2.72k
        if ((argv[0].key = cbor_build_uint8(1)) == NULL ||
78
2.72k
            (argv[0].value = cbor_build_uint8(2)) == NULL ||
79
2.72k
            !cbor_map_add(item, argv[0]))
80
27
                goto fail;
81
2.69k
82
2.69k
        /*
83
2.69k
         * "The COSEAlgorithmIdentifier used is -25 (ECDH-ES +
84
2.69k
         * HKDF-256) although this is NOT the algorithm actually
85
2.69k
         * used. Setting this to a different value may result in
86
2.69k
         * compatibility issues."
87
2.69k
         */
88
2.69k
        if (ecdh)
89
2.65k
                alg = COSE_ECDH_ES256;
90
2.69k
        else
91
2.69k
                alg = COSE_ES256;
92
2.69k
93
2.69k
        /* alg */
94
2.69k
        if ((argv[1].key = cbor_build_uint8(3)) == NULL ||
95
2.69k
            (argv[1].value = cbor_build_negint8((uint8_t)(-alg - 1))) == NULL ||
96
2.69k
            !cbor_map_add(item, argv[1]))
97
24
                goto fail;
98
2.67k
99
2.67k
        /* crv */
100
2.67k
        if ((argv[2].key = cbor_build_negint8(0)) == NULL ||
101
2.67k
            (argv[2].value = cbor_build_uint8(1)) == NULL ||
102
2.67k
            !cbor_map_add(item, argv[2]))
103
32
                goto fail;
104
2.64k
105
2.64k
        /* x */
106
2.64k
        if ((argv[3].key = cbor_build_negint8(1)) == NULL ||
107
2.64k
            (argv[3].value = cbor_build_bytestring(pk->x,
108
2.63k
            sizeof(pk->x))) == NULL || !cbor_map_add(item, argv[3]))
109
28
                goto fail;
110
2.61k
111
2.61k
        /* y */
112
2.61k
        if ((argv[4].key = cbor_build_negint8(2)) == NULL ||
113
2.61k
            (argv[4].value = cbor_build_bytestring(pk->y,
114
2.60k
            sizeof(pk->y))) == NULL || !cbor_map_add(item, argv[4]))
115
24
                goto fail;
116
2.59k
117
2.59k
        ok = 0;
118
2.73k
fail:
119
2.73k
        if (ok < 0) {
120
143
                if (item != NULL) {
121
135
                        cbor_decref(&item);
122
135
                        item = NULL;
123
135
                }
124
143
        }
125
2.73k
126
16.4k
        for (size_t i = 0; i < 5; i++) {
127
13.6k
                if (argv[i].key)
128
13.3k
                        cbor_decref(&argv[i].key);
129
13.6k
                if (argv[i].value)
130
13.2k
                        cbor_decref(&argv[i].value);
131
13.6k
        }
132
2.73k
133
2.73k
        return (item);
134
2.59k
}
135
136
es256_sk_t *
137
es256_sk_new(void)
138
4.74k
{
139
4.74k
        return (calloc(1, sizeof(es256_sk_t)));
140
4.74k
}
141
142
void
143
es256_sk_free(es256_sk_t **skp)
144
4.74k
{
145
4.74k
        es256_sk_t *sk;
146
4.74k
147
4.74k
        if (skp == NULL || (sk = *skp) == NULL)
148
4.74k
                return;
149
4.72k
150
4.72k
        explicit_bzero(sk, sizeof(*sk));
151
4.72k
        free(sk);
152
4.72k
153
4.72k
        *skp = NULL;
154
4.72k
}
155
156
es256_pk_t *
157
es256_pk_new(void)
158
9.62k
{
159
9.62k
        return (calloc(1, sizeof(es256_pk_t)));
160
9.62k
}
161
162
void
163
es256_pk_free(es256_pk_t **pkp)
164
15.3k
{
165
15.3k
        es256_pk_t *pk;
166
15.3k
167
15.3k
        if (pkp == NULL || (pk = *pkp) == NULL)
168
15.3k
                return;
169
9.58k
170
9.58k
        explicit_bzero(pk, sizeof(*pk));
171
9.58k
        free(pk);
172
9.58k
173
9.58k
        *pkp = NULL;
174
9.58k
}
175
176
int
177
es256_pk_from_ptr(es256_pk_t *pk, const void *ptr, size_t len)
178
495
{
179
495
        const uint8_t *p = ptr;
180
495
181
495
        if (len < sizeof(*pk))
182
441
                return (FIDO_ERR_INVALID_ARGUMENT);
183
54
184
54
        if (len == sizeof(*pk) + 1 && *p == 0x04)
185
2
                memcpy(pk, ++p, sizeof(*pk)); /* uncompressed format */
186
52
        else
187
52
                memcpy(pk, ptr, sizeof(*pk)); /* libfido2 x||y format */
188
54
189
54
        return (FIDO_OK);
190
54
}
191
192
int
193
es256_pk_set_x(es256_pk_t *pk, const unsigned char *x)
194
45
{
195
45
        memcpy(pk->x, x, sizeof(pk->x));
196
45
197
45
        return (0);
198
45
}
199
200
int
201
es256_pk_set_y(es256_pk_t *pk, const unsigned char *y)
202
45
{
203
45
        memcpy(pk->y, y, sizeof(pk->y));
204
45
205
45
        return (0);
206
45
}
207
208
int
209
es256_sk_create(es256_sk_t *key)
210
4.70k
{
211
4.70k
        EVP_PKEY_CTX    *pctx = NULL;
212
4.70k
        EVP_PKEY_CTX    *kctx = NULL;
213
4.70k
        EVP_PKEY        *p = NULL;
214
4.70k
        EVP_PKEY        *k = NULL;
215
4.70k
        const EC_KEY    *ec;
216
4.70k
        const BIGNUM    *d;
217
4.70k
        const int        nid = NID_X9_62_prime256v1;
218
4.70k
        int              n;
219
4.70k
        int              ok = -1;
220
4.70k
221
4.70k
        if ((pctx = EVP_PKEY_CTX_new_id(EVP_PKEY_EC, NULL)) == NULL ||
222
4.70k
            EVP_PKEY_paramgen_init(pctx) <= 0 ||
223
4.70k
            EVP_PKEY_CTX_set_ec_paramgen_curve_nid(pctx, nid) <= 0 ||
224
4.70k
            EVP_PKEY_paramgen(pctx, &p) <= 0) {
225
65
                fido_log_debug("%s: EVP_PKEY_paramgen", __func__);
226
65
                goto fail;
227
65
        }
228
4.64k
229
4.64k
        if ((kctx = EVP_PKEY_CTX_new(p, NULL)) == NULL ||
230
4.64k
            EVP_PKEY_keygen_init(kctx) <= 0 || EVP_PKEY_keygen(kctx, &k) <= 0) {
231
49
                fido_log_debug("%s: EVP_PKEY_keygen", __func__);
232
49
                goto fail;
233
49
        }
234
4.59k
235
4.59k
        if ((ec = EVP_PKEY_get0_EC_KEY(k)) == NULL ||
236
4.59k
            (d = EC_KEY_get0_private_key(ec)) == NULL ||
237
4.59k
            (n = BN_num_bytes(d)) < 0 || (size_t)n > sizeof(key->d) ||
238
4.59k
            (n = BN_bn2bin(d, key->d)) < 0 || (size_t)n > sizeof(key->d)) {
239
51
                fido_log_debug("%s: EC_KEY_get0_private_key", __func__);
240
51
                goto fail;
241
51
        }
242
4.54k
243
4.54k
        ok = 0;
244
4.70k
fail:
245
4.70k
        if (p != NULL)
246
4.70k
                EVP_PKEY_free(p);
247
4.70k
        if (k != NULL)
248
4.70k
                EVP_PKEY_free(k);
249
4.70k
        if (pctx != NULL)
250
4.70k
                EVP_PKEY_CTX_free(pctx);
251
4.70k
        if (kctx != NULL)
252
4.70k
                EVP_PKEY_CTX_free(kctx);
253
4.70k
254
4.70k
        return (ok);
255
4.54k
}
256
257
EVP_PKEY *
258
es256_pk_to_EVP_PKEY(const es256_pk_t *k)
259
3.18k
{
260
3.18k
        BN_CTX          *bnctx = NULL;
261
3.18k
        EC_KEY          *ec = NULL;
262
3.18k
        EC_POINT        *q = NULL;
263
3.18k
        EVP_PKEY        *pkey = NULL;
264
3.18k
        BIGNUM          *x = NULL;
265
3.18k
        BIGNUM          *y = NULL;
266
3.18k
        const EC_GROUP  *g = NULL;
267
3.18k
        const int        nid = NID_X9_62_prime256v1;
268
3.18k
        int              ok = -1;
269
3.18k
270
3.18k
        if ((bnctx = BN_CTX_new()) == NULL)
271
3.18k
                goto fail;
272
3.16k
273
3.16k
        BN_CTX_start(bnctx);
274
3.16k
275
3.16k
        if ((x = BN_CTX_get(bnctx)) == NULL ||
276
3.16k
            (y = BN_CTX_get(bnctx)) == NULL)
277
3.16k
                goto fail;
278
3.15k
279
3.15k
        if (BN_bin2bn(k->x, sizeof(k->x), x) == NULL ||
280
3.15k
            BN_bin2bn(k->y, sizeof(k->y), y) == NULL) {
281
19
                fido_log_debug("%s: BN_bin2bn", __func__);
282
19
                goto fail;
283
19
        }
284
3.13k
285
3.13k
        if ((ec = EC_KEY_new_by_curve_name(nid)) == NULL ||
286
3.13k
            (g = EC_KEY_get0_group(ec)) == NULL) {
287
26
                fido_log_debug("%s: EC_KEY init", __func__);
288
26
                goto fail;
289
26
        }
290
3.11k
291
3.11k
        if ((q = EC_POINT_new(g)) == NULL ||
292
3.11k
            EC_POINT_set_affine_coordinates_GFp(g, q, x, y, bnctx) == 0 ||
293
3.11k
            EC_KEY_set_public_key(ec, q) == 0) {
294
195
                fido_log_debug("%s: EC_KEY_set_public_key", __func__);
295
195
                goto fail;
296
195
        }
297
2.91k
298
2.91k
        if ((pkey = EVP_PKEY_new()) == NULL ||
299
2.91k
            EVP_PKEY_assign_EC_KEY(pkey, ec) == 0) {
300
16
                fido_log_debug("%s: EVP_PKEY_assign_EC_KEY", __func__);
301
16
                goto fail;
302
16
        }
303
2.89k
304
2.89k
        ec = NULL; /* at this point, ec belongs to evp */
305
2.89k
306
2.89k
        ok = 0;
307
3.18k
fail:
308
3.18k
        if (bnctx != NULL) {
309
3.16k
                BN_CTX_end(bnctx);
310
3.16k
                BN_CTX_free(bnctx);
311
3.16k
        }
312
3.18k
313
3.18k
        if (ec != NULL)
314
3.18k
                EC_KEY_free(ec);
315
3.18k
        if (q != NULL)
316
3.18k
                EC_POINT_free(q);
317
3.18k
318
3.18k
        if (ok < 0 && pkey != NULL) {
319
8
                EVP_PKEY_free(pkey);
320
8
                pkey = NULL;
321
8
        }
322
3.18k
323
3.18k
        return (pkey);
324
2.89k
}
325
326
int
327
es256_pk_from_EC_KEY(es256_pk_t *pk, const EC_KEY *ec)
328
4.47k
{
329
4.47k
        BN_CTX          *bnctx = NULL;
330
4.47k
        BIGNUM          *x = NULL;
331
4.47k
        BIGNUM          *y = NULL;
332
4.47k
        const EC_POINT  *q = NULL;
333
4.47k
        const EC_GROUP  *g = NULL;
334
4.47k
        int              ok = FIDO_ERR_INTERNAL;
335
4.47k
        int              n;
336
4.47k
337
4.47k
        if ((q = EC_KEY_get0_public_key(ec)) == NULL ||
338
4.47k
            (g = EC_KEY_get0_group(ec)) == NULL ||
339
4.47k
            (bnctx = BN_CTX_new()) == NULL)
340
4.47k
                goto fail;
341
4.44k
342
4.44k
        BN_CTX_start(bnctx);
343
4.44k
344
4.44k
        if ((x = BN_CTX_get(bnctx)) == NULL ||
345
4.44k
            (y = BN_CTX_get(bnctx)) == NULL)
346
4.44k
                goto fail;
347
4.41k
348
4.41k
        if (EC_POINT_get_affine_coordinates_GFp(g, q, x, y, bnctx) == 0 ||
349
4.41k
            (n = BN_num_bytes(x)) < 0 || (size_t)n > sizeof(pk->x) ||
350
4.41k
            (n = BN_num_bytes(y)) < 0 || (size_t)n > sizeof(pk->y)) {
351
15
                fido_log_debug("%s: EC_POINT_get_affine_coordinates_GFp",
352
15
                    __func__);
353
15
                goto fail;
354
15
        }
355
4.39k
356
4.39k
        if ((n = BN_bn2bin(x, pk->x)) < 0 || (size_t)n > sizeof(pk->x) ||
357
4.39k
            (n = BN_bn2bin(y, pk->y)) < 0 || (size_t)n > sizeof(pk->y)) {
358
38
                fido_log_debug("%s: BN_bn2bin", __func__);
359
38
                goto fail;
360
38
        }
361
4.35k
362
4.35k
        ok = FIDO_OK;
363
4.47k
fail:
364
4.47k
        if (bnctx != NULL) {
365
4.44k
                BN_CTX_end(bnctx);
366
4.44k
                BN_CTX_free(bnctx);
367
4.44k
        }
368
4.47k
369
4.47k
        return (ok);
370
4.35k
}
371
372
EVP_PKEY *
373
es256_sk_to_EVP_PKEY(const es256_sk_t *k)
374
2.84k
{
375
2.84k
        BN_CTX          *bnctx = NULL;
376
2.84k
        EC_KEY          *ec = NULL;
377
2.84k
        EVP_PKEY        *pkey = NULL;
378
2.84k
        BIGNUM          *d = NULL;
379
2.84k
        const int        nid = NID_X9_62_prime256v1;
380
2.84k
        int              ok = -1;
381
2.84k
382
2.84k
        if ((bnctx = BN_CTX_new()) == NULL)
383
2.84k
                goto fail;
384
2.83k
385
2.83k
        BN_CTX_start(bnctx);
386
2.83k
387
2.83k
        if ((d = BN_CTX_get(bnctx)) == NULL ||
388
2.83k
            BN_bin2bn(k->d, sizeof(k->d), d) == NULL) {
389
17
                fido_log_debug("%s: BN_bin2bn", __func__);
390
17
                goto fail;
391
17
        }
392
2.82k
393
2.82k
        if ((ec = EC_KEY_new_by_curve_name(nid)) == NULL ||
394
2.82k
            EC_KEY_set_private_key(ec, d) == 0) {
395
5
                fido_log_debug("%s: EC_KEY_set_private_key", __func__);
396
5
                goto fail;
397
5
        }
398
2.81k
399
2.81k
        if ((pkey = EVP_PKEY_new()) == NULL ||
400
2.81k
            EVP_PKEY_assign_EC_KEY(pkey, ec) == 0) {
401
18
                fido_log_debug("%s: EVP_PKEY_assign_EC_KEY", __func__);
402
18
                goto fail;
403
18
        }
404
2.79k
405
2.79k
        ec = NULL; /* at this point, ec belongs to evp */
406
2.79k
407
2.79k
        ok = 0;
408
2.84k
fail:
409
2.84k
        if (bnctx != NULL) {
410
2.83k
                BN_CTX_end(bnctx);
411
2.83k
                BN_CTX_free(bnctx);
412
2.83k
        }
413
2.84k
414
2.84k
        if (ec != NULL)
415
2.84k
                EC_KEY_free(ec);
416
2.84k
417
2.84k
        if (ok < 0 && pkey != NULL) {
418
9
                EVP_PKEY_free(pkey);
419
9
                pkey = NULL;
420
9
        }
421
2.84k
422
2.84k
        return (pkey);
423
2.79k
}
424
425
int
426
es256_derive_pk(const es256_sk_t *sk, es256_pk_t *pk)
427
4.54k
{
428
4.54k
        BIGNUM          *d = NULL;
429
4.54k
        EC_KEY          *ec = NULL;
430
4.54k
        EC_POINT        *q = NULL;
431
4.54k
        const EC_GROUP  *g = NULL;
432
4.54k
        const int        nid = NID_X9_62_prime256v1;
433
4.54k
        int              ok = -1;
434
4.54k
435
4.54k
        if ((d = BN_bin2bn(sk->d, (int)sizeof(sk->d), NULL)) == NULL ||
436
4.54k
            (ec = EC_KEY_new_by_curve_name(nid)) == NULL ||
437
4.54k
            (g = EC_KEY_get0_group(ec)) == NULL ||
438
4.54k
            (q = EC_POINT_new(g)) == NULL) {
439
65
                fido_log_debug("%s: get", __func__);
440
65
                goto fail;
441
65
        }
442
4.47k
443
4.47k
        if (EC_POINT_mul(g, q, d, NULL, NULL, NULL) == 0 ||
444
4.47k
            EC_KEY_set_public_key(ec, q) == 0 ||
445
4.47k
            es256_pk_from_EC_KEY(pk, ec) != FIDO_OK) {
446
116
                fido_log_debug("%s: set", __func__);
447
116
                goto fail;
448
116
        }
449
4.35k
450
4.35k
        ok = 0;
451
4.54k
fail:
452
4.54k
        if (d != NULL)
453
4.54k
                BN_clear_free(d);
454
4.54k
        if (q != NULL)
455
4.54k
                EC_POINT_free(q);
456
4.54k
        if (ec != NULL)
457
4.54k
                EC_KEY_free(ec);
458
4.54k
459
4.54k
        return (ok);
460
4.35k
}