Mateusz Starzyk | 6c2e9b6 | 2021-05-19 17:54:54 +0200 | [diff] [blame] | 1 | #define MBEDTLS_ALLOW_PRIVATE_ACCESS |
| 2 | |
Philippe Antoine | 7233352 | 2018-05-03 16:40:24 +0200 | [diff] [blame] | 3 | #include <stdint.h> |
Philippe Antoine | 8b1ed1c | 2020-01-22 16:22:36 +0100 | [diff] [blame] | 4 | #include <stdlib.h> |
Philippe Antoine | 7233352 | 2018-05-03 16:40:24 +0200 | [diff] [blame] | 5 | #include "mbedtls/pk.h" |
Manuel Pégourié-Gonnard | 7f93da1 | 2021-06-16 10:20:30 +0200 | [diff] [blame] | 6 | #include "common.h" |
Philippe Antoine | 7233352 | 2018-05-03 16:40:24 +0200 | [diff] [blame] | 7 | |
Mateusz Starzyk | c0eabdc | 2021-08-03 14:09:02 +0200 | [diff] [blame^] | 8 | // 4 Kb should be enough for every bug ;-) |
Philippe Antoine | 7233352 | 2018-05-03 16:40:24 +0200 | [diff] [blame] | 9 | #define MAX_LEN 0x1000 |
| 10 | |
Mateusz Starzyk | c0eabdc | 2021-08-03 14:09:02 +0200 | [diff] [blame^] | 11 | int LLVMFuzzerTestOneInput(const uint8_t *Data, size_t Size) |
| 12 | { |
Philippe Antoine | 7233352 | 2018-05-03 16:40:24 +0200 | [diff] [blame] | 13 | #ifdef MBEDTLS_PK_PARSE_C |
| 14 | int ret; |
| 15 | mbedtls_pk_context pk; |
| 16 | |
| 17 | if (Size > MAX_LEN) { |
Mateusz Starzyk | c0eabdc | 2021-08-03 14:09:02 +0200 | [diff] [blame^] | 18 | // only work on small inputs |
Philippe Antoine | 7233352 | 2018-05-03 16:40:24 +0200 | [diff] [blame] | 19 | Size = MAX_LEN; |
| 20 | } |
| 21 | |
Mateusz Starzyk | c0eabdc | 2021-08-03 14:09:02 +0200 | [diff] [blame^] | 22 | mbedtls_pk_init(&pk); |
| 23 | ret = mbedtls_pk_parse_key(&pk, Data, Size, NULL, 0, dummy_random, NULL); |
Philippe Antoine | 7233352 | 2018-05-03 16:40:24 +0200 | [diff] [blame] | 24 | if (ret == 0) { |
Mateusz Starzyk | c0eabdc | 2021-08-03 14:09:02 +0200 | [diff] [blame^] | 25 | # if defined(MBEDTLS_RSA_C) |
| 26 | if (mbedtls_pk_get_type(&pk) == MBEDTLS_PK_RSA) { |
Philippe Antoine | 7233352 | 2018-05-03 16:40:24 +0200 | [diff] [blame] | 27 | mbedtls_mpi N, P, Q, D, E, DP, DQ, QP; |
| 28 | mbedtls_rsa_context *rsa; |
| 29 | |
Mateusz Starzyk | c0eabdc | 2021-08-03 14:09:02 +0200 | [diff] [blame^] | 30 | mbedtls_mpi_init(&N); |
| 31 | mbedtls_mpi_init(&P); |
| 32 | mbedtls_mpi_init(&Q); |
| 33 | mbedtls_mpi_init(&D); |
| 34 | mbedtls_mpi_init(&E); |
| 35 | mbedtls_mpi_init(&DP); |
| 36 | mbedtls_mpi_init(&DQ); |
| 37 | mbedtls_mpi_init(&QP); |
Philippe Antoine | 7233352 | 2018-05-03 16:40:24 +0200 | [diff] [blame] | 38 | |
Mateusz Starzyk | c0eabdc | 2021-08-03 14:09:02 +0200 | [diff] [blame^] | 39 | rsa = mbedtls_pk_rsa(pk); |
| 40 | if (mbedtls_rsa_export(rsa, &N, &P, &Q, &D, &E) != 0) { |
Philippe Antoine | 66070bc | 2020-01-22 13:54:56 +0100 | [diff] [blame] | 41 | abort(); |
| 42 | } |
Mateusz Starzyk | c0eabdc | 2021-08-03 14:09:02 +0200 | [diff] [blame^] | 43 | if (mbedtls_rsa_export_crt(rsa, &DP, &DQ, &QP) != 0) { |
Philippe Antoine | 7d4bd6f | 2020-01-22 14:13:08 +0100 | [diff] [blame] | 44 | abort(); |
| 45 | } |
Philippe Antoine | 7233352 | 2018-05-03 16:40:24 +0200 | [diff] [blame] | 46 | |
Mateusz Starzyk | c0eabdc | 2021-08-03 14:09:02 +0200 | [diff] [blame^] | 47 | mbedtls_mpi_free(&N); |
| 48 | mbedtls_mpi_free(&P); |
| 49 | mbedtls_mpi_free(&Q); |
| 50 | mbedtls_mpi_free(&D); |
| 51 | mbedtls_mpi_free(&E); |
| 52 | mbedtls_mpi_free(&DP); |
| 53 | mbedtls_mpi_free(&DQ); |
| 54 | mbedtls_mpi_free(&QP); |
| 55 | } else |
| 56 | # endif |
| 57 | # if defined(MBEDTLS_ECP_C) |
| 58 | if (mbedtls_pk_get_type(&pk) == MBEDTLS_PK_ECKEY || |
| 59 | mbedtls_pk_get_type(&pk) == MBEDTLS_PK_ECKEY_DH) { |
| 60 | mbedtls_ecp_keypair *ecp = mbedtls_pk_ec(pk); |
Gilles Peskine | f02b984 | 2020-02-25 19:52:44 +0100 | [diff] [blame] | 61 | mbedtls_ecp_group_id grp_id = ecp->grp.id; |
| 62 | const mbedtls_ecp_curve_info *curve_info = |
Mateusz Starzyk | c0eabdc | 2021-08-03 14:09:02 +0200 | [diff] [blame^] | 63 | mbedtls_ecp_curve_info_from_grp_id(grp_id); |
Philippe Antoine | 7233352 | 2018-05-03 16:40:24 +0200 | [diff] [blame] | 64 | |
Gilles Peskine | f02b984 | 2020-02-25 19:52:44 +0100 | [diff] [blame] | 65 | /* If the curve is not supported, the key should not have been |
| 66 | * accepted. */ |
Mateusz Starzyk | c0eabdc | 2021-08-03 14:09:02 +0200 | [diff] [blame^] | 67 | if (curve_info == NULL) |
| 68 | abort(); |
| 69 | } else |
| 70 | # endif |
Gilles Peskine | d7fb66f | 2020-02-25 19:54:27 +0100 | [diff] [blame] | 71 | { |
| 72 | /* The key is valid but is not of a supported type. |
| 73 | * This should not happen. */ |
Mateusz Starzyk | c0eabdc | 2021-08-03 14:09:02 +0200 | [diff] [blame^] | 74 | abort(); |
Gilles Peskine | d7fb66f | 2020-02-25 19:54:27 +0100 | [diff] [blame] | 75 | } |
Philippe Antoine | 7233352 | 2018-05-03 16:40:24 +0200 | [diff] [blame] | 76 | } |
Mateusz Starzyk | c0eabdc | 2021-08-03 14:09:02 +0200 | [diff] [blame^] | 77 | mbedtls_pk_free(&pk); |
Philippe Antoine | 7233352 | 2018-05-03 16:40:24 +0200 | [diff] [blame] | 78 | #else |
Mateusz Starzyk | c0eabdc | 2021-08-03 14:09:02 +0200 | [diff] [blame^] | 79 | (void)Data; |
| 80 | (void)Size; |
| 81 | #endif // MBEDTLS_PK_PARSE_C |
Philippe Antoine | 7233352 | 2018-05-03 16:40:24 +0200 | [diff] [blame] | 82 | |
| 83 | return 0; |
| 84 | } |