test/ssl_test_ctx.c

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