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