Fix safestack issues in x509.h
[openssl.git] / test / ssl_test_ctx.c
1 /*
2  * Copyright 2016-2020 The OpenSSL Project Authors. All Rights Reserved.
3  *
4  * Licensed under the Apache License 2.0 (the "License").  You may not use
5  * this file except in compliance with the License.  You can obtain a copy
6  * in the file LICENSE in the source distribution or at
7  * https://www.openssl.org/source/license.html
8  */
9
10 #include <string.h>
11
12 #include <openssl/e_os2.h>
13 #include <openssl/crypto.h>
14
15 #include "internal/nelem.h"
16 #include "ssl_test_ctx.h"
17 #include "testutil.h"
18
19 #ifdef OPENSSL_SYS_WINDOWS
20 # define strcasecmp _stricmp
21 #endif
22
23 DEFINE_STACK_OF(CONF_VALUE)
24
25 static const int default_app_data_size = 256;
26 /* Default set to be as small as possible to exercise fragmentation. */
27 static const int default_max_fragment_size = 512;
28
29 static int parse_boolean(const char *value, int *result)
30 {
31     if (strcasecmp(value, "Yes") == 0) {
32         *result = 1;
33         return 1;
34     }
35     else if (strcasecmp(value, "No") == 0) {
36         *result = 0;
37         return 1;
38     }
39     TEST_error("parse_boolean given: '%s'", value);
40     return 0;
41 }
42
43 #define IMPLEMENT_SSL_TEST_BOOL_OPTION(struct_type, name, field)        \
44     static int parse_##name##_##field(struct_type *ctx, const char *value) \
45     {                                                                   \
46         return parse_boolean(value, &ctx->field);                       \
47     }
48
49 #define IMPLEMENT_SSL_TEST_STRING_OPTION(struct_type, name, field)      \
50     static int parse_##name##_##field(struct_type *ctx, const char *value) \
51     {                                                                   \
52         OPENSSL_free(ctx->field);                                       \
53         ctx->field = OPENSSL_strdup(value);                             \
54         return TEST_ptr(ctx->field);                                    \
55     }
56
57 #define IMPLEMENT_SSL_TEST_INT_OPTION(struct_type, name, field)        \
58     static int parse_##name##_##field(struct_type *ctx, const char *value) \
59     {                                                                   \
60         ctx->field = atoi(value);                                       \
61         return 1;                                                       \
62     }
63
64 /* True enums and other test configuration values that map to an int. */
65 typedef struct {
66     const char *name;
67     int value;
68 } test_enum;
69
70
71 __owur static int parse_enum(const test_enum *enums, size_t num_enums,
72                              int *value, const char *name)
73 {
74     size_t i;
75     for (i = 0; i < num_enums; i++) {
76         if (strcmp(enums[i].name, name) == 0) {
77             *value = enums[i].value;
78             return 1;
79         }
80     }
81     return 0;
82 }
83
84 static const char *enum_name(const test_enum *enums, size_t num_enums,
85                              int value)
86 {
87     size_t i;
88     for (i = 0; i < num_enums; i++) {
89         if (enums[i].value == value) {
90             return enums[i].name;
91         }
92     }
93     return "InvalidValue";
94 }
95
96
97 /* ExpectedResult */
98
99 static const test_enum ssl_test_results[] = {
100     {"Success", SSL_TEST_SUCCESS},
101     {"ServerFail", SSL_TEST_SERVER_FAIL},
102     {"ClientFail", SSL_TEST_CLIENT_FAIL},
103     {"InternalError", SSL_TEST_INTERNAL_ERROR},
104     {"FirstHandshakeFailed", SSL_TEST_FIRST_HANDSHAKE_FAILED},
105 };
106
107 __owur static int parse_expected_result(SSL_TEST_CTX *test_ctx, const char *value)
108 {
109     int ret_value;
110     if (!parse_enum(ssl_test_results, OSSL_NELEM(ssl_test_results),
111                     &ret_value, value)) {
112         return 0;
113     }
114     test_ctx->expected_result = ret_value;
115     return 1;
116 }
117
118 const char *ssl_test_result_name(ssl_test_result_t result)
119 {
120     return enum_name(ssl_test_results, OSSL_NELEM(ssl_test_results), result);
121 }
122
123 /* ExpectedClientAlert / ExpectedServerAlert */
124
125 static const test_enum ssl_alerts[] = {
126     {"UnknownCA", SSL_AD_UNKNOWN_CA},
127     {"HandshakeFailure", SSL_AD_HANDSHAKE_FAILURE},
128     {"UnrecognizedName", SSL_AD_UNRECOGNIZED_NAME},
129     {"BadCertificate", SSL_AD_BAD_CERTIFICATE},
130     {"NoApplicationProtocol", SSL_AD_NO_APPLICATION_PROTOCOL},
131     {"CertificateRequired", SSL_AD_CERTIFICATE_REQUIRED},
132 };
133
134 __owur static int parse_alert(int *alert, const char *value)
135 {
136     return parse_enum(ssl_alerts, OSSL_NELEM(ssl_alerts), alert, value);
137 }
138
139 __owur static int parse_client_alert(SSL_TEST_CTX *test_ctx, const char *value)
140 {
141     return parse_alert(&test_ctx->expected_client_alert, value);
142 }
143
144 __owur static int parse_server_alert(SSL_TEST_CTX *test_ctx, const char *value)
145 {
146     return parse_alert(&test_ctx->expected_server_alert, value);
147 }
148
149 const char *ssl_alert_name(int alert)
150 {
151     return enum_name(ssl_alerts, OSSL_NELEM(ssl_alerts), alert);
152 }
153
154 /* ExpectedProtocol */
155
156 static const test_enum ssl_protocols[] = {
157      {"TLSv1.3", TLS1_3_VERSION},
158      {"TLSv1.2", TLS1_2_VERSION},
159      {"TLSv1.1", TLS1_1_VERSION},
160      {"TLSv1", TLS1_VERSION},
161      {"SSLv3", SSL3_VERSION},
162      {"DTLSv1", DTLS1_VERSION},
163      {"DTLSv1.2", DTLS1_2_VERSION},
164 };
165
166 __owur static int parse_protocol(SSL_TEST_CTX *test_ctx, const char *value)
167 {
168     return parse_enum(ssl_protocols, OSSL_NELEM(ssl_protocols),
169                       &test_ctx->expected_protocol, value);
170 }
171
172 const char *ssl_protocol_name(int protocol)
173 {
174     return enum_name(ssl_protocols, OSSL_NELEM(ssl_protocols), protocol);
175 }
176
177 /* VerifyCallback */
178
179 static const test_enum ssl_verify_callbacks[] = {
180     {"None", SSL_TEST_VERIFY_NONE},
181     {"AcceptAll", SSL_TEST_VERIFY_ACCEPT_ALL},
182     {"RejectAll", SSL_TEST_VERIFY_REJECT_ALL},
183 };
184
185 __owur static int parse_client_verify_callback(SSL_TEST_CLIENT_CONF *client_conf,
186                                                const char *value)
187 {
188     int ret_value;
189     if (!parse_enum(ssl_verify_callbacks, OSSL_NELEM(ssl_verify_callbacks),
190                     &ret_value, value)) {
191         return 0;
192     }
193     client_conf->verify_callback = ret_value;
194     return 1;
195 }
196
197 const char *ssl_verify_callback_name(ssl_verify_callback_t callback)
198 {
199     return enum_name(ssl_verify_callbacks, OSSL_NELEM(ssl_verify_callbacks),
200                      callback);
201 }
202
203 /* ServerName */
204
205 static const test_enum ssl_servername[] = {
206     {"None", SSL_TEST_SERVERNAME_NONE},
207     {"server1", SSL_TEST_SERVERNAME_SERVER1},
208     {"server2", SSL_TEST_SERVERNAME_SERVER2},
209     {"invalid", SSL_TEST_SERVERNAME_INVALID},
210 };
211
212 __owur static int parse_servername(SSL_TEST_CLIENT_CONF *client_conf,
213                                    const char *value)
214 {
215     int ret_value;
216     if (!parse_enum(ssl_servername, OSSL_NELEM(ssl_servername),
217                     &ret_value, value)) {
218         return 0;
219     }
220     client_conf->servername = ret_value;
221     return 1;
222 }
223
224 __owur static int parse_expected_servername(SSL_TEST_CTX *test_ctx,
225                                             const char *value)
226 {
227     int ret_value;
228     if (!parse_enum(ssl_servername, OSSL_NELEM(ssl_servername),
229                     &ret_value, value)) {
230         return 0;
231     }
232     test_ctx->expected_servername = ret_value;
233     return 1;
234 }
235
236 const char *ssl_servername_name(ssl_servername_t server)
237 {
238     return enum_name(ssl_servername, OSSL_NELEM(ssl_servername),
239                      server);
240 }
241
242 /* ServerNameCallback */
243
244 static const test_enum ssl_servername_callbacks[] = {
245     {"None", SSL_TEST_SERVERNAME_CB_NONE},
246     {"IgnoreMismatch", SSL_TEST_SERVERNAME_IGNORE_MISMATCH},
247     {"RejectMismatch", SSL_TEST_SERVERNAME_REJECT_MISMATCH},
248     {"ClientHelloIgnoreMismatch",
249      SSL_TEST_SERVERNAME_CLIENT_HELLO_IGNORE_MISMATCH},
250     {"ClientHelloRejectMismatch",
251      SSL_TEST_SERVERNAME_CLIENT_HELLO_REJECT_MISMATCH},
252     {"ClientHelloNoV12", SSL_TEST_SERVERNAME_CLIENT_HELLO_NO_V12},
253 };
254
255 __owur static int parse_servername_callback(SSL_TEST_SERVER_CONF *server_conf,
256                                             const char *value)
257 {
258     int ret_value;
259     if (!parse_enum(ssl_servername_callbacks,
260                     OSSL_NELEM(ssl_servername_callbacks), &ret_value, value)) {
261         return 0;
262     }
263     server_conf->servername_callback = ret_value;
264     return 1;
265 }
266
267 const char *ssl_servername_callback_name(ssl_servername_callback_t callback)
268 {
269     return enum_name(ssl_servername_callbacks,
270                      OSSL_NELEM(ssl_servername_callbacks), callback);
271 }
272
273 /* SessionTicketExpected */
274
275 static const test_enum ssl_session_ticket[] = {
276     {"Ignore", SSL_TEST_SESSION_TICKET_IGNORE},
277     {"Yes", SSL_TEST_SESSION_TICKET_YES},
278     {"No", SSL_TEST_SESSION_TICKET_NO},
279 };
280
281 __owur static int parse_session_ticket(SSL_TEST_CTX *test_ctx, const char *value)
282 {
283     int ret_value;
284     if (!parse_enum(ssl_session_ticket, OSSL_NELEM(ssl_session_ticket),
285                     &ret_value, value)) {
286         return 0;
287     }
288     test_ctx->session_ticket_expected = ret_value;
289     return 1;
290 }
291
292 const char *ssl_session_ticket_name(ssl_session_ticket_t server)
293 {
294     return enum_name(ssl_session_ticket,
295                      OSSL_NELEM(ssl_session_ticket),
296                      server);
297 }
298
299 /* CompressionExpected */
300
301 IMPLEMENT_SSL_TEST_BOOL_OPTION(SSL_TEST_CTX, test, compression_expected)
302
303 /* SessionIdExpected */
304
305 static const test_enum ssl_session_id[] = {
306     {"Ignore", SSL_TEST_SESSION_ID_IGNORE},
307     {"Yes", SSL_TEST_SESSION_ID_YES},
308     {"No", SSL_TEST_SESSION_ID_NO},
309 };
310
311 __owur static int parse_session_id(SSL_TEST_CTX *test_ctx, const char *value)
312 {
313     int ret_value;
314     if (!parse_enum(ssl_session_id, OSSL_NELEM(ssl_session_id),
315                     &ret_value, value)) {
316         return 0;
317     }
318     test_ctx->session_id_expected = ret_value;
319     return 1;
320 }
321
322 const char *ssl_session_id_name(ssl_session_id_t server)
323 {
324     return enum_name(ssl_session_id,
325                      OSSL_NELEM(ssl_session_id),
326                      server);
327 }
328
329 /* Method */
330
331 static const test_enum ssl_test_methods[] = {
332     {"TLS", SSL_TEST_METHOD_TLS},
333     {"DTLS", SSL_TEST_METHOD_DTLS},
334 };
335
336 __owur static int parse_test_method(SSL_TEST_CTX *test_ctx, const char *value)
337 {
338     int ret_value;
339     if (!parse_enum(ssl_test_methods, OSSL_NELEM(ssl_test_methods),
340                     &ret_value, value)) {
341         return 0;
342     }
343     test_ctx->method = ret_value;
344     return 1;
345 }
346
347 const char *ssl_test_method_name(ssl_test_method_t method)
348 {
349     return enum_name(ssl_test_methods, OSSL_NELEM(ssl_test_methods), method);
350 }
351
352 /* NPN and ALPN options */
353
354 IMPLEMENT_SSL_TEST_STRING_OPTION(SSL_TEST_CLIENT_CONF, client, npn_protocols)
355 IMPLEMENT_SSL_TEST_STRING_OPTION(SSL_TEST_SERVER_CONF, server, npn_protocols)
356 IMPLEMENT_SSL_TEST_STRING_OPTION(SSL_TEST_CTX, test, expected_npn_protocol)
357 IMPLEMENT_SSL_TEST_STRING_OPTION(SSL_TEST_CLIENT_CONF, client, alpn_protocols)
358 IMPLEMENT_SSL_TEST_STRING_OPTION(SSL_TEST_SERVER_CONF, server, alpn_protocols)
359 IMPLEMENT_SSL_TEST_STRING_OPTION(SSL_TEST_CTX, test, expected_alpn_protocol)
360
361 /* SRP options */
362 IMPLEMENT_SSL_TEST_STRING_OPTION(SSL_TEST_CLIENT_CONF, client, srp_user)
363 IMPLEMENT_SSL_TEST_STRING_OPTION(SSL_TEST_SERVER_CONF, server, srp_user)
364 IMPLEMENT_SSL_TEST_STRING_OPTION(SSL_TEST_CLIENT_CONF, client, srp_password)
365 IMPLEMENT_SSL_TEST_STRING_OPTION(SSL_TEST_SERVER_CONF, server, srp_password)
366
367 /* Session Ticket App Data options */
368 IMPLEMENT_SSL_TEST_STRING_OPTION(SSL_TEST_CTX, test, expected_session_ticket_app_data)
369 IMPLEMENT_SSL_TEST_STRING_OPTION(SSL_TEST_SERVER_CONF, server, session_ticket_app_data)
370
371 /* Handshake mode */
372
373 static const test_enum ssl_handshake_modes[] = {
374     {"Simple", SSL_TEST_HANDSHAKE_SIMPLE},
375     {"Resume", SSL_TEST_HANDSHAKE_RESUME},
376     {"RenegotiateServer", SSL_TEST_HANDSHAKE_RENEG_SERVER},
377     {"RenegotiateClient", SSL_TEST_HANDSHAKE_RENEG_CLIENT},
378     {"KeyUpdateServer", SSL_TEST_HANDSHAKE_KEY_UPDATE_SERVER},
379     {"KeyUpdateClient", SSL_TEST_HANDSHAKE_KEY_UPDATE_CLIENT},
380     {"PostHandshakeAuth", SSL_TEST_HANDSHAKE_POST_HANDSHAKE_AUTH},
381 };
382
383 __owur static int parse_handshake_mode(SSL_TEST_CTX *test_ctx, const char *value)
384 {
385     int ret_value;
386     if (!parse_enum(ssl_handshake_modes, OSSL_NELEM(ssl_handshake_modes),
387                     &ret_value, value)) {
388         return 0;
389     }
390     test_ctx->handshake_mode = ret_value;
391     return 1;
392 }
393
394 const char *ssl_handshake_mode_name(ssl_handshake_mode_t mode)
395 {
396     return enum_name(ssl_handshake_modes, OSSL_NELEM(ssl_handshake_modes),
397                      mode);
398 }
399
400 /* Renegotiation Ciphersuites */
401
402 IMPLEMENT_SSL_TEST_STRING_OPTION(SSL_TEST_CLIENT_CONF, client, reneg_ciphers)
403
404 /* KeyUpdateType */
405
406 static const test_enum ssl_key_update_types[] = {
407     {"KeyUpdateRequested", SSL_KEY_UPDATE_REQUESTED},
408     {"KeyUpdateNotRequested", SSL_KEY_UPDATE_NOT_REQUESTED},
409 };
410
411 __owur static int parse_key_update_type(SSL_TEST_CTX *test_ctx, const char *value)
412 {
413     int ret_value;
414     if (!parse_enum(ssl_key_update_types, OSSL_NELEM(ssl_key_update_types),
415                     &ret_value, value)) {
416         return 0;
417     }
418     test_ctx->key_update_type = ret_value;
419     return 1;
420 }
421
422 /* CT Validation */
423
424 static const test_enum ssl_ct_validation_modes[] = {
425     {"None", SSL_TEST_CT_VALIDATION_NONE},
426     {"Permissive", SSL_TEST_CT_VALIDATION_PERMISSIVE},
427     {"Strict", SSL_TEST_CT_VALIDATION_STRICT},
428 };
429
430 __owur static int parse_ct_validation(SSL_TEST_CLIENT_CONF *client_conf,
431                                       const char *value)
432 {
433     int ret_value;
434     if (!parse_enum(ssl_ct_validation_modes, OSSL_NELEM(ssl_ct_validation_modes),
435                     &ret_value, value)) {
436         return 0;
437     }
438     client_conf->ct_validation = ret_value;
439     return 1;
440 }
441
442 const char *ssl_ct_validation_name(ssl_ct_validation_t mode)
443 {
444     return enum_name(ssl_ct_validation_modes, OSSL_NELEM(ssl_ct_validation_modes),
445                      mode);
446 }
447
448 IMPLEMENT_SSL_TEST_BOOL_OPTION(SSL_TEST_CTX, test, resumption_expected)
449 IMPLEMENT_SSL_TEST_BOOL_OPTION(SSL_TEST_SERVER_CONF, server, broken_session_ticket)
450 IMPLEMENT_SSL_TEST_BOOL_OPTION(SSL_TEST_CTX, test, use_sctp)
451 IMPLEMENT_SSL_TEST_BOOL_OPTION(SSL_TEST_CTX, test, enable_client_sctp_label_bug)
452 IMPLEMENT_SSL_TEST_BOOL_OPTION(SSL_TEST_CTX, test, enable_server_sctp_label_bug)
453
454 /* CertStatus */
455
456 static const test_enum ssl_certstatus[] = {
457     {"None", SSL_TEST_CERT_STATUS_NONE},
458     {"GoodResponse", SSL_TEST_CERT_STATUS_GOOD_RESPONSE},
459     {"BadResponse", SSL_TEST_CERT_STATUS_BAD_RESPONSE}
460 };
461
462 __owur static int parse_certstatus(SSL_TEST_SERVER_CONF *server_conf,
463                                             const char *value)
464 {
465     int ret_value;
466     if (!parse_enum(ssl_certstatus, OSSL_NELEM(ssl_certstatus), &ret_value,
467                     value)) {
468         return 0;
469     }
470     server_conf->cert_status = ret_value;
471     return 1;
472 }
473
474 const char *ssl_certstatus_name(ssl_cert_status_t cert_status)
475 {
476     return enum_name(ssl_certstatus,
477                      OSSL_NELEM(ssl_certstatus), cert_status);
478 }
479
480 /* ApplicationData */
481
482 IMPLEMENT_SSL_TEST_INT_OPTION(SSL_TEST_CTX, test, app_data_size)
483
484
485 /* MaxFragmentSize */
486
487 IMPLEMENT_SSL_TEST_INT_OPTION(SSL_TEST_CTX, test, max_fragment_size)
488
489 /* Maximum-Fragment-Length TLS extension mode */
490 static const test_enum ssl_max_fragment_len_mode[] = {
491     {"None", TLSEXT_max_fragment_length_DISABLED},
492     { "512", TLSEXT_max_fragment_length_512},
493     {"1024", TLSEXT_max_fragment_length_1024},
494     {"2048", TLSEXT_max_fragment_length_2048},
495     {"4096", TLSEXT_max_fragment_length_4096}
496 };
497
498 __owur static int parse_max_fragment_len_mode(SSL_TEST_CLIENT_CONF *client_conf,
499                                               const char *value)
500 {
501     int ret_value;
502
503     if (!parse_enum(ssl_max_fragment_len_mode,
504                     OSSL_NELEM(ssl_max_fragment_len_mode), &ret_value, value)) {
505         return 0;
506     }
507     client_conf->max_fragment_len_mode = ret_value;
508     return 1;
509 }
510
511 const char *ssl_max_fragment_len_name(int MFL_mode)
512 {
513     return enum_name(ssl_max_fragment_len_mode,
514                      OSSL_NELEM(ssl_max_fragment_len_mode), MFL_mode);
515 }
516
517
518 /* Expected key and signature types */
519
520 __owur static int parse_expected_key_type(int *ptype, const char *value)
521 {
522     int nid;
523     const EVP_PKEY_ASN1_METHOD *ameth;
524
525     if (value == NULL)
526         return 0;
527     ameth = EVP_PKEY_asn1_find_str(NULL, value, -1);
528     if (ameth != NULL)
529         EVP_PKEY_asn1_get0_info(&nid, NULL, NULL, NULL, NULL, ameth);
530     else
531         nid = OBJ_sn2nid(value);
532     if (nid == NID_undef)
533         nid = OBJ_ln2nid(value);
534 #ifndef OPENSSL_NO_EC
535     if (nid == NID_undef)
536         nid = EC_curve_nist2nid(value);
537 #endif
538     if (nid == NID_undef)
539         return 0;
540     *ptype = nid;
541     return 1;
542 }
543
544 __owur static int parse_expected_tmp_key_type(SSL_TEST_CTX *test_ctx,
545                                               const char *value)
546 {
547     return parse_expected_key_type(&test_ctx->expected_tmp_key_type, value);
548 }
549
550 __owur static int parse_expected_server_cert_type(SSL_TEST_CTX *test_ctx,
551                                                   const char *value)
552 {
553     return parse_expected_key_type(&test_ctx->expected_server_cert_type,
554                                    value);
555 }
556
557 __owur static int parse_expected_server_sign_type(SSL_TEST_CTX *test_ctx,
558                                                  const char *value)
559 {
560     return parse_expected_key_type(&test_ctx->expected_server_sign_type,
561                                    value);
562 }
563
564 __owur static int parse_expected_client_cert_type(SSL_TEST_CTX *test_ctx,
565                                                   const char *value)
566 {
567     return parse_expected_key_type(&test_ctx->expected_client_cert_type,
568                                    value);
569 }
570
571 __owur static int parse_expected_client_sign_type(SSL_TEST_CTX *test_ctx,
572                                                  const char *value)
573 {
574     return parse_expected_key_type(&test_ctx->expected_client_sign_type,
575                                    value);
576 }
577
578
579 /* Expected signing hash */
580
581 __owur static int parse_expected_sign_hash(int *ptype, const char *value)
582 {
583     int nid;
584
585     if (value == NULL)
586         return 0;
587     nid = OBJ_sn2nid(value);
588     if (nid == NID_undef)
589         nid = OBJ_ln2nid(value);
590     if (nid == NID_undef)
591         return 0;
592     *ptype = nid;
593     return 1;
594 }
595
596 __owur static int parse_expected_server_sign_hash(SSL_TEST_CTX *test_ctx,
597                                                   const char *value)
598 {
599     return parse_expected_sign_hash(&test_ctx->expected_server_sign_hash,
600                                     value);
601 }
602
603 __owur static int parse_expected_client_sign_hash(SSL_TEST_CTX *test_ctx,
604                                                   const char *value)
605 {
606     return parse_expected_sign_hash(&test_ctx->expected_client_sign_hash,
607                                     value);
608 }
609
610 __owur static int parse_expected_ca_names(STACK_OF(X509_NAME) **pnames,
611                                           const char *value, OPENSSL_CTX *libctx)
612 {
613     if (value == NULL)
614         return 0;
615     if (!strcmp(value, "empty"))
616         *pnames = sk_X509_NAME_new_null();
617     else
618         *pnames = SSL_load_client_CA_file_with_libctx(value, libctx, NULL);
619     return *pnames != NULL;
620 }
621 __owur static int parse_expected_server_ca_names(SSL_TEST_CTX *test_ctx,
622                                                  const char *value)
623 {
624     return parse_expected_ca_names(&test_ctx->expected_server_ca_names, value,
625                                    test_ctx->libctx);
626 }
627 __owur static int parse_expected_client_ca_names(SSL_TEST_CTX *test_ctx,
628                                                  const char *value)
629 {
630     return parse_expected_ca_names(&test_ctx->expected_client_ca_names, value,
631                                    test_ctx->libctx);
632 }
633
634 /* ExpectedCipher */
635
636 IMPLEMENT_SSL_TEST_STRING_OPTION(SSL_TEST_CTX, test, expected_cipher)
637
638 /* Client and Server PHA */
639
640 IMPLEMENT_SSL_TEST_BOOL_OPTION(SSL_TEST_CLIENT_CONF, client, enable_pha)
641 IMPLEMENT_SSL_TEST_BOOL_OPTION(SSL_TEST_SERVER_CONF, server, force_pha)
642 IMPLEMENT_SSL_TEST_BOOL_OPTION(SSL_TEST_CLIENT_CONF, client, no_extms_on_reneg)
643
644 /* Known test options and their corresponding parse methods. */
645
646 /* Top-level options. */
647 typedef struct {
648     const char *name;
649     int (*parse)(SSL_TEST_CTX *test_ctx, const char *value);
650 } ssl_test_ctx_option;
651
652 static const ssl_test_ctx_option ssl_test_ctx_options[] = {
653     { "ExpectedResult", &parse_expected_result },
654     { "ExpectedClientAlert", &parse_client_alert },
655     { "ExpectedServerAlert", &parse_server_alert },
656     { "ExpectedProtocol", &parse_protocol },
657     { "ExpectedServerName", &parse_expected_servername },
658     { "SessionTicketExpected", &parse_session_ticket },
659     { "CompressionExpected", &parse_test_compression_expected },
660     { "SessionIdExpected", &parse_session_id },
661     { "Method", &parse_test_method },
662     { "ExpectedNPNProtocol", &parse_test_expected_npn_protocol },
663     { "ExpectedALPNProtocol", &parse_test_expected_alpn_protocol },
664     { "HandshakeMode", &parse_handshake_mode },
665     { "KeyUpdateType", &parse_key_update_type },
666     { "ResumptionExpected", &parse_test_resumption_expected },
667     { "ApplicationData", &parse_test_app_data_size },
668     { "MaxFragmentSize", &parse_test_max_fragment_size },
669     { "ExpectedTmpKeyType", &parse_expected_tmp_key_type },
670     { "ExpectedServerCertType", &parse_expected_server_cert_type },
671     { "ExpectedServerSignHash", &parse_expected_server_sign_hash },
672     { "ExpectedServerSignType", &parse_expected_server_sign_type },
673     { "ExpectedServerCANames", &parse_expected_server_ca_names },
674     { "ExpectedClientCertType", &parse_expected_client_cert_type },
675     { "ExpectedClientSignHash", &parse_expected_client_sign_hash },
676     { "ExpectedClientSignType", &parse_expected_client_sign_type },
677     { "ExpectedClientCANames", &parse_expected_client_ca_names },
678     { "UseSCTP", &parse_test_use_sctp },
679     { "EnableClientSCTPLabelBug", &parse_test_enable_client_sctp_label_bug },
680     { "EnableServerSCTPLabelBug", &parse_test_enable_server_sctp_label_bug },
681     { "ExpectedCipher", &parse_test_expected_cipher },
682     { "ExpectedSessionTicketAppData", &parse_test_expected_session_ticket_app_data },
683 };
684
685 /* Nested client options. */
686 typedef struct {
687     const char *name;
688     int (*parse)(SSL_TEST_CLIENT_CONF *conf, const char *value);
689 } ssl_test_client_option;
690
691 static const ssl_test_client_option ssl_test_client_options[] = {
692     { "VerifyCallback", &parse_client_verify_callback },
693     { "ServerName", &parse_servername },
694     { "NPNProtocols", &parse_client_npn_protocols },
695     { "ALPNProtocols", &parse_client_alpn_protocols },
696     { "CTValidation", &parse_ct_validation },
697     { "RenegotiateCiphers", &parse_client_reneg_ciphers},
698     { "SRPUser", &parse_client_srp_user },
699     { "SRPPassword", &parse_client_srp_password },
700     { "MaxFragmentLenExt", &parse_max_fragment_len_mode },
701     { "EnablePHA", &parse_client_enable_pha },
702     { "RenegotiateNoExtms", &parse_client_no_extms_on_reneg },
703 };
704
705 /* Nested server options. */
706 typedef struct {
707     const char *name;
708     int (*parse)(SSL_TEST_SERVER_CONF *conf, const char *value);
709 } ssl_test_server_option;
710
711 static const ssl_test_server_option ssl_test_server_options[] = {
712     { "ServerNameCallback", &parse_servername_callback },
713     { "NPNProtocols", &parse_server_npn_protocols },
714     { "ALPNProtocols", &parse_server_alpn_protocols },
715     { "BrokenSessionTicket", &parse_server_broken_session_ticket },
716     { "CertStatus", &parse_certstatus },
717     { "SRPUser", &parse_server_srp_user },
718     { "SRPPassword", &parse_server_srp_password },
719     { "ForcePHA", &parse_server_force_pha },
720     { "SessionTicketAppData", &parse_server_session_ticket_app_data },
721 };
722
723 SSL_TEST_CTX *SSL_TEST_CTX_new(OPENSSL_CTX *libctx)
724 {
725     SSL_TEST_CTX *ret;
726
727     /* The return code is checked by caller */
728     if ((ret = OPENSSL_zalloc(sizeof(*ret))) != NULL) {
729         ret->libctx = libctx;
730         ret->app_data_size = default_app_data_size;
731         ret->max_fragment_size = default_max_fragment_size;
732     }
733     return ret;
734 }
735
736 static void ssl_test_extra_conf_free_data(SSL_TEST_EXTRA_CONF *conf)
737 {
738     OPENSSL_free(conf->client.npn_protocols);
739     OPENSSL_free(conf->server.npn_protocols);
740     OPENSSL_free(conf->server2.npn_protocols);
741     OPENSSL_free(conf->client.alpn_protocols);
742     OPENSSL_free(conf->server.alpn_protocols);
743     OPENSSL_free(conf->server2.alpn_protocols);
744     OPENSSL_free(conf->client.reneg_ciphers);
745     OPENSSL_free(conf->server.srp_user);
746     OPENSSL_free(conf->server.srp_password);
747     OPENSSL_free(conf->server2.srp_user);
748     OPENSSL_free(conf->server2.srp_password);
749     OPENSSL_free(conf->client.srp_user);
750     OPENSSL_free(conf->client.srp_password);
751     OPENSSL_free(conf->server.session_ticket_app_data);
752     OPENSSL_free(conf->server2.session_ticket_app_data);
753 }
754
755 static void ssl_test_ctx_free_extra_data(SSL_TEST_CTX *ctx)
756 {
757     ssl_test_extra_conf_free_data(&ctx->extra);
758     ssl_test_extra_conf_free_data(&ctx->resume_extra);
759 }
760
761 void SSL_TEST_CTX_free(SSL_TEST_CTX *ctx)
762 {
763     if (ctx == NULL)
764         return;
765     ssl_test_ctx_free_extra_data(ctx);
766     OPENSSL_free(ctx->expected_npn_protocol);
767     OPENSSL_free(ctx->expected_alpn_protocol);
768     OPENSSL_free(ctx->expected_session_ticket_app_data);
769     sk_X509_NAME_pop_free(ctx->expected_server_ca_names, X509_NAME_free);
770     sk_X509_NAME_pop_free(ctx->expected_client_ca_names, X509_NAME_free);
771     OPENSSL_free(ctx->expected_cipher);
772     OPENSSL_free(ctx);
773 }
774
775 static int parse_client_options(SSL_TEST_CLIENT_CONF *client, const CONF *conf,
776                                 const char *client_section)
777 {
778     STACK_OF(CONF_VALUE) *sk_conf;
779     int i;
780     size_t j;
781
782     if (!TEST_ptr(sk_conf = NCONF_get_section(conf, client_section)))
783         return 0;
784
785     for (i = 0; i < sk_CONF_VALUE_num(sk_conf); i++) {
786         int found = 0;
787         const CONF_VALUE *option = sk_CONF_VALUE_value(sk_conf, i);
788         for (j = 0; j < OSSL_NELEM(ssl_test_client_options); j++) {
789             if (strcmp(option->name, ssl_test_client_options[j].name) == 0) {
790                 if (!ssl_test_client_options[j].parse(client, option->value)) {
791                     TEST_info("Bad value %s for option %s",
792                               option->value, option->name);
793                     return 0;
794                 }
795                 found = 1;
796                 break;
797             }
798         }
799         if (!found) {
800             TEST_info("Unknown test option: %s", option->name);
801             return 0;
802         }
803     }
804
805     return 1;
806 }
807
808 static int parse_server_options(SSL_TEST_SERVER_CONF *server, const CONF *conf,
809                                 const char *server_section)
810 {
811     STACK_OF(CONF_VALUE) *sk_conf;
812     int i;
813     size_t j;
814
815     if (!TEST_ptr(sk_conf = NCONF_get_section(conf, server_section)))
816         return 0;
817
818     for (i = 0; i < sk_CONF_VALUE_num(sk_conf); i++) {
819         int found = 0;
820         const CONF_VALUE *option = sk_CONF_VALUE_value(sk_conf, i);
821         for (j = 0; j < OSSL_NELEM(ssl_test_server_options); j++) {
822             if (strcmp(option->name, ssl_test_server_options[j].name) == 0) {
823                 if (!ssl_test_server_options[j].parse(server, option->value)) {
824                     TEST_info("Bad value %s for option %s",
825                                option->value, option->name);
826                     return 0;
827                 }
828                 found = 1;
829                 break;
830             }
831         }
832         if (!found) {
833             TEST_info("Unknown test option: %s", option->name);
834             return 0;
835         }
836     }
837
838     return 1;
839 }
840
841 SSL_TEST_CTX *SSL_TEST_CTX_create(const CONF *conf, const char *test_section,
842                                   OPENSSL_CTX *libctx)
843 {
844     STACK_OF(CONF_VALUE) *sk_conf = NULL;
845     SSL_TEST_CTX *ctx = NULL;
846     int i;
847     size_t j;
848
849     if (!TEST_ptr(sk_conf = NCONF_get_section(conf, test_section))
850             || !TEST_ptr(ctx = SSL_TEST_CTX_new(libctx)))
851         goto err;
852
853     for (i = 0; i < sk_CONF_VALUE_num(sk_conf); i++) {
854         int found = 0;
855         const CONF_VALUE *option = sk_CONF_VALUE_value(sk_conf, i);
856
857         /* Subsections */
858         if (strcmp(option->name, "client") == 0) {
859             if (!parse_client_options(&ctx->extra.client, conf, option->value))
860                 goto err;
861         } else if (strcmp(option->name, "server") == 0) {
862             if (!parse_server_options(&ctx->extra.server, conf, option->value))
863                 goto err;
864         } else if (strcmp(option->name, "server2") == 0) {
865             if (!parse_server_options(&ctx->extra.server2, conf, option->value))
866                 goto err;
867         } else if (strcmp(option->name, "resume-client") == 0) {
868             if (!parse_client_options(&ctx->resume_extra.client, conf,
869                                       option->value))
870                 goto err;
871         } else if (strcmp(option->name, "resume-server") == 0) {
872             if (!parse_server_options(&ctx->resume_extra.server, conf,
873                                       option->value))
874                 goto err;
875         } else if (strcmp(option->name, "resume-server2") == 0) {
876             if (!parse_server_options(&ctx->resume_extra.server2, conf,
877                                       option->value))
878                 goto err;
879         } else {
880             for (j = 0; j < OSSL_NELEM(ssl_test_ctx_options); j++) {
881                 if (strcmp(option->name, ssl_test_ctx_options[j].name) == 0) {
882                     if (!ssl_test_ctx_options[j].parse(ctx, option->value)) {
883                         TEST_info("Bad value %s for option %s",
884                                    option->value, option->name);
885                         goto err;
886                     }
887                     found = 1;
888                     break;
889                 }
890             }
891             if (!found) {
892                 TEST_info("Unknown test option: %s", option->name);
893                 goto err;
894             }
895         }
896     }
897
898     goto done;
899
900  err:
901     SSL_TEST_CTX_free(ctx);
902     ctx = NULL;
903  done:
904     return ctx;
905 }