test/ssl_test_ctx.c

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