test/ssl_test_ctx.c

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