blob: a415874b2e934ab8b235169e89ce3a1cd49c95d8 [file] [log] [blame]
Philippe Antoine72333522018-05-03 16:40:24 +02001#include "mbedtls/ssl.h"
2#include "mbedtls/entropy.h"
3#include "mbedtls/ctr_drbg.h"
4#include "mbedtls/certs.h"
Philippe Antoine08633822019-06-04 14:03:06 +02005#include "common.h"
Philippe Antoine72333522018-05-03 16:40:24 +02006#include <string.h>
7#include <stdlib.h>
Philippe Antoine72333522018-05-03 16:40:24 +02008#include <stdint.h>
9
10
Manuel Pégourié-Gonnarda89040c2020-05-20 10:35:01 +020011#if defined(MBEDTLS_SSL_CLI_C) && \
12 defined(MBEDTLS_ENTROPY_C) && \
13 defined(MBEDTLS_CTR_DRBG_C)
Philippe Antoine42a2ce82019-07-10 14:26:31 +020014static int initialized = 0;
Philippe Antoinedaab28a2019-06-28 12:31:23 +020015#if defined(MBEDTLS_X509_CRT_PARSE_C) && defined(MBEDTLS_PEM_PARSE_C)
Philippe Antoine72333522018-05-03 16:40:24 +020016static mbedtls_x509_crt cacert;
17#endif
18const char *alpn_list[3];
19
20
Gilles Peskineeccd8882020-03-10 12:19:08 +010021#if defined(MBEDTLS_KEY_EXCHANGE_SOME_PSK_ENABLED)
Philippe Antoine72333522018-05-03 16:40:24 +020022const unsigned char psk[] = {
23 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
24 0x08, 0x09, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f
25};
26const char psk_id[] = "Client_identity";
27#endif
28
29const char *pers = "fuzz_client";
Manuel Pégourié-Gonnarda89040c2020-05-20 10:35:01 +020030#endif /* MBEDTLS_SSL_CLI_C && MBEDTLS_ENTROPY_C && MBEDTLS_CTR_DRBG_C */
Philippe Antoine72333522018-05-03 16:40:24 +020031
32
Gilles Peskine1b6c09a2023-01-11 14:52:35 +010033int LLVMFuzzerTestOneInput(const uint8_t *Data, size_t Size)
34{
Manuel Pégourié-Gonnarda89040c2020-05-20 10:35:01 +020035#if defined(MBEDTLS_SSL_CLI_C) && \
36 defined(MBEDTLS_ENTROPY_C) && \
37 defined(MBEDTLS_CTR_DRBG_C)
Philippe Antoine72333522018-05-03 16:40:24 +020038 int ret;
39 size_t len;
40 mbedtls_ssl_context ssl;
41 mbedtls_ssl_config conf;
42 mbedtls_ctr_drbg_context ctr_drbg;
43 mbedtls_entropy_context entropy;
44 unsigned char buf[4096];
45 fuzzBufferOffset_t biomemfuzz;
46 uint16_t options;
47
48 if (initialized == 0) {
Gilles Peskine90420aa2023-02-01 18:20:16 +010049#if defined(MBEDTLS_X509_CRT_PARSE_C) && defined(MBEDTLS_PEM_PARSE_C) && \
50 defined(MBEDTLS_CERTS_C)
Gilles Peskine1b6c09a2023-01-11 14:52:35 +010051 mbedtls_x509_crt_init(&cacert);
52 if (mbedtls_x509_crt_parse(&cacert, (const unsigned char *) mbedtls_test_cas_pem,
53 mbedtls_test_cas_pem_len) != 0) {
Philippe Antoine72333522018-05-03 16:40:24 +020054 return 1;
Gilles Peskine1b6c09a2023-01-11 14:52:35 +010055 }
Philippe Antoine72333522018-05-03 16:40:24 +020056#endif
57
58 alpn_list[0] = "HTTP";
59 alpn_list[1] = "fuzzalpn";
60 alpn_list[2] = NULL;
61
Philippe Antoine08633822019-06-04 14:03:06 +020062 dummy_init();
63
Philippe Antoine72333522018-05-03 16:40:24 +020064 initialized = 1;
65 }
66
67 //we take 1 byte as options input
68 if (Size < 2) {
69 return 0;
70 }
71 options = (Data[Size - 2] << 8) | Data[Size - 1];
72 //Avoid warnings if compile options imply no options
73 (void) options;
74
Gilles Peskine1b6c09a2023-01-11 14:52:35 +010075 mbedtls_ssl_init(&ssl);
76 mbedtls_ssl_config_init(&conf);
77 mbedtls_ctr_drbg_init(&ctr_drbg);
78 mbedtls_entropy_init(&entropy);
Philippe Antoine72333522018-05-03 16:40:24 +020079
Gilles Peskine1b6c09a2023-01-11 14:52:35 +010080 if (mbedtls_ctr_drbg_seed(&ctr_drbg, dummy_entropy, &entropy,
81 (const unsigned char *) pers, strlen(pers)) != 0) {
Philippe Antoine72333522018-05-03 16:40:24 +020082 goto exit;
Gilles Peskine1b6c09a2023-01-11 14:52:35 +010083 }
Philippe Antoine72333522018-05-03 16:40:24 +020084
Gilles Peskine1b6c09a2023-01-11 14:52:35 +010085 if (mbedtls_ssl_config_defaults(&conf,
Philippe Antoine72333522018-05-03 16:40:24 +020086 MBEDTLS_SSL_IS_CLIENT,
87 MBEDTLS_SSL_TRANSPORT_STREAM,
Gilles Peskine1b6c09a2023-01-11 14:52:35 +010088 MBEDTLS_SSL_PRESET_DEFAULT) != 0) {
Philippe Antoine72333522018-05-03 16:40:24 +020089 goto exit;
Gilles Peskine1b6c09a2023-01-11 14:52:35 +010090 }
Philippe Antoine72333522018-05-03 16:40:24 +020091
Gilles Peskineeccd8882020-03-10 12:19:08 +010092#if defined(MBEDTLS_KEY_EXCHANGE_SOME_PSK_ENABLED)
Philippe Antoine72333522018-05-03 16:40:24 +020093 if (options & 2) {
Gilles Peskine1b6c09a2023-01-11 14:52:35 +010094 mbedtls_ssl_conf_psk(&conf, psk, sizeof(psk),
95 (const unsigned char *) psk_id, sizeof(psk_id) - 1);
Philippe Antoine72333522018-05-03 16:40:24 +020096 }
97#endif
98
Philippe Antoinedaab28a2019-06-28 12:31:23 +020099#if defined(MBEDTLS_X509_CRT_PARSE_C) && defined(MBEDTLS_PEM_PARSE_C)
Philippe Antoine72333522018-05-03 16:40:24 +0200100 if (options & 4) {
Gilles Peskine1b6c09a2023-01-11 14:52:35 +0100101 mbedtls_ssl_conf_ca_chain(&conf, &cacert, NULL);
102 mbedtls_ssl_conf_authmode(&conf, MBEDTLS_SSL_VERIFY_REQUIRED);
Philippe Antoine72333522018-05-03 16:40:24 +0200103 } else
104#endif
105 {
Gilles Peskine1b6c09a2023-01-11 14:52:35 +0100106 mbedtls_ssl_conf_authmode(&conf, MBEDTLS_SSL_VERIFY_NONE);
Philippe Antoine72333522018-05-03 16:40:24 +0200107 }
108#if defined(MBEDTLS_SSL_TRUNCATED_HMAC)
Gilles Peskine1b6c09a2023-01-11 14:52:35 +0100109 mbedtls_ssl_conf_truncated_hmac(&conf,
110 (options &
111 8) ? MBEDTLS_SSL_TRUNC_HMAC_ENABLED : MBEDTLS_SSL_TRUNC_HMAC_DISABLED);
Philippe Antoine72333522018-05-03 16:40:24 +0200112#endif
113#if defined(MBEDTLS_SSL_EXTENDED_MASTER_SECRET)
Gilles Peskine1b6c09a2023-01-11 14:52:35 +0100114 mbedtls_ssl_conf_extended_master_secret(&conf,
115 (options &
116 0x10) ? MBEDTLS_SSL_EXTENDED_MS_DISABLED : MBEDTLS_SSL_EXTENDED_MS_ENABLED);
Philippe Antoine72333522018-05-03 16:40:24 +0200117#endif
118#if defined(MBEDTLS_SSL_ENCRYPT_THEN_MAC)
Gilles Peskine1b6c09a2023-01-11 14:52:35 +0100119 mbedtls_ssl_conf_encrypt_then_mac(&conf,
120 (options &
121 0x20) ? MBEDTLS_SSL_ETM_DISABLED : MBEDTLS_SSL_ETM_ENABLED);
Philippe Antoine72333522018-05-03 16:40:24 +0200122#endif
123#if defined(MBEDTLS_SSL_CBC_RECORD_SPLITTING)
Gilles Peskine1b6c09a2023-01-11 14:52:35 +0100124 mbedtls_ssl_conf_cbc_record_splitting(&conf,
125 (options &
126 0x40) ? MBEDTLS_SSL_CBC_RECORD_SPLITTING_ENABLED : MBEDTLS_SSL_CBC_RECORD_SPLITTING_DISABLED);
Philippe Antoine72333522018-05-03 16:40:24 +0200127#endif
128#if defined(MBEDTLS_SSL_RENEGOTIATION)
Gilles Peskine1b6c09a2023-01-11 14:52:35 +0100129 mbedtls_ssl_conf_renegotiation(&conf,
130 (options &
131 0x80) ? MBEDTLS_SSL_RENEGOTIATION_ENABLED : MBEDTLS_SSL_RENEGOTIATION_DISABLED);
Philippe Antoine72333522018-05-03 16:40:24 +0200132#endif
133#if defined(MBEDTLS_SSL_SESSION_TICKETS)
Gilles Peskine1b6c09a2023-01-11 14:52:35 +0100134 mbedtls_ssl_conf_session_tickets(&conf,
135 (options &
136 0x100) ? MBEDTLS_SSL_SESSION_TICKETS_DISABLED : MBEDTLS_SSL_SESSION_TICKETS_ENABLED);
Philippe Antoine72333522018-05-03 16:40:24 +0200137#endif
138#if defined(MBEDTLS_SSL_ALPN)
139 if (options & 0x200) {
Gilles Peskine1b6c09a2023-01-11 14:52:35 +0100140 mbedtls_ssl_conf_alpn_protocols(&conf, alpn_list);
Philippe Antoine72333522018-05-03 16:40:24 +0200141 }
142#endif
143 //There may be other options to add :
144 // mbedtls_ssl_conf_cert_profile, mbedtls_ssl_conf_sig_hashes
145
Philippe Antoine2b7c9a22019-06-04 12:05:36 +0200146 srand(1);
Gilles Peskine1b6c09a2023-01-11 14:52:35 +0100147 mbedtls_ssl_conf_rng(&conf, dummy_random, &ctr_drbg);
Philippe Antoine72333522018-05-03 16:40:24 +0200148
Gilles Peskine1b6c09a2023-01-11 14:52:35 +0100149 if (mbedtls_ssl_setup(&ssl, &conf) != 0) {
Philippe Antoine72333522018-05-03 16:40:24 +0200150 goto exit;
Gilles Peskine1b6c09a2023-01-11 14:52:35 +0100151 }
Philippe Antoine72333522018-05-03 16:40:24 +0200152
Philippe Antoinedaab28a2019-06-28 12:31:23 +0200153#if defined(MBEDTLS_X509_CRT_PARSE_C) && defined(MBEDTLS_PEM_PARSE_C)
Philippe Antoine72333522018-05-03 16:40:24 +0200154 if ((options & 1) == 0) {
Gilles Peskine1b6c09a2023-01-11 14:52:35 +0100155 if (mbedtls_ssl_set_hostname(&ssl, "localhost") != 0) {
Philippe Antoine72333522018-05-03 16:40:24 +0200156 goto exit;
Gilles Peskine1b6c09a2023-01-11 14:52:35 +0100157 }
Philippe Antoine72333522018-05-03 16:40:24 +0200158 }
159#endif
160
161 biomemfuzz.Data = Data;
162 biomemfuzz.Size = Size-2;
163 biomemfuzz.Offset = 0;
Gilles Peskine1b6c09a2023-01-11 14:52:35 +0100164 mbedtls_ssl_set_bio(&ssl, &biomemfuzz, dummy_send, fuzz_recv, NULL);
Philippe Antoine72333522018-05-03 16:40:24 +0200165
Gilles Peskine1b6c09a2023-01-11 14:52:35 +0100166 ret = mbedtls_ssl_handshake(&ssl);
167 if (ret == 0) {
Philippe Antoine72333522018-05-03 16:40:24 +0200168 //keep reading data from server until the end
Gilles Peskine1b6c09a2023-01-11 14:52:35 +0100169 do {
170 len = sizeof(buf) - 1;
171 ret = mbedtls_ssl_read(&ssl, buf, len);
Philippe Antoine72333522018-05-03 16:40:24 +0200172
Gilles Peskine1b6c09a2023-01-11 14:52:35 +0100173 if (ret == MBEDTLS_ERR_SSL_WANT_READ) {
Philippe Antoine72333522018-05-03 16:40:24 +0200174 continue;
Gilles Peskine1b6c09a2023-01-11 14:52:35 +0100175 } else if (ret <= 0) {
Philippe Antoine72333522018-05-03 16:40:24 +0200176 //EOF or error
177 break;
Gilles Peskine1b6c09a2023-01-11 14:52:35 +0100178 }
179 } while (1);
Philippe Antoine72333522018-05-03 16:40:24 +0200180 }
181
182exit:
Gilles Peskine1b6c09a2023-01-11 14:52:35 +0100183 mbedtls_entropy_free(&entropy);
184 mbedtls_ctr_drbg_free(&ctr_drbg);
185 mbedtls_ssl_config_free(&conf);
186 mbedtls_ssl_free(&ssl);
Philippe Antoine72333522018-05-03 16:40:24 +0200187
Philippe Antoinec32fd242019-06-06 09:12:53 +0200188#else
189 (void) Data;
190 (void) Size;
Manuel Pégourié-Gonnarda89040c2020-05-20 10:35:01 +0200191#endif /* MBEDTLS_SSL_CLI_C && MBEDTLS_ENTROPY_C && MBEDTLS_CTR_DRBG_C */
Philippe Antoinec32fd242019-06-06 09:12:53 +0200192
Philippe Antoine72333522018-05-03 16:40:24 +0200193 return 0;
194}