test/ssl_test_ctx.c

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