ssl/s3_enc.c

   1 /*
   2  * Copyright 1995-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 /* ====================================================================
  11  * Copyright 2005 Nokia. All rights reserved.
  12  *
  13  * The portions of the attached software ("Contribution") is developed by
  14  * Nokia Corporation and is licensed pursuant to the OpenSSL open source
  15  * license.
  16  *
  17  * The Contribution, originally written by Mika Kousa and Pasi Eronen of
  18  * Nokia Corporation, consists of the "PSK" (Pre-Shared Key) ciphersuites
  19  * support (see RFC 4279) to OpenSSL.
  20  *
  21  * No patent licenses or other rights except those expressly stated in
  22  * the OpenSSL open source license shall be deemed granted or received
  23  * expressly, by implication, estoppel, or otherwise.
  24  *
  25  * No assurances are provided by Nokia that the Contribution does not
  26  * infringe the patent or other intellectual property rights of any third
  27  * party or that the license provides you with all the necessary rights
  28  * to make use of the Contribution.
  29  *
  30  * THE SOFTWARE IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND. IN
  31  * ADDITION TO THE DISCLAIMERS INCLUDED IN THE LICENSE, NOKIA
  32  * SPECIFICALLY DISCLAIMS ANY LIABILITY FOR CLAIMS BROUGHT BY YOU OR ANY
  33  * OTHER ENTITY BASED ON INFRINGEMENT OF INTELLECTUAL PROPERTY RIGHTS OR
  34  * OTHERWISE.
  35  */
  36
  37 #include <stdio.h>
  38 #include "ssl_locl.h"
  39 #include <openssl/evp.h>
  40 #include <openssl/md5.h>
  41
  42 static int ssl3_generate_key_block(SSL *s, unsigned char *km, int num)
  43 {
  44     EVP_MD_CTX *m5;
  45     EVP_MD_CTX *s1;
  46     unsigned char buf[16], smd[SHA_DIGEST_LENGTH];
  47     unsigned char c = 'A';
  48     unsigned int i, j, k;
  49     int ret = 0;
  50
  51 #ifdef CHARSET_EBCDIC
  52     c = os_toascii[c];          /* 'A' in ASCII */
  53 #endif
  54     k = 0;
  55     m5 = EVP_MD_CTX_new();
  56     s1 = EVP_MD_CTX_new();
  57     if (m5 == NULL || s1 == NULL) {
  58         SSLerr(SSL_F_SSL3_GENERATE_KEY_BLOCK, ERR_R_MALLOC_FAILURE);
  59         goto err;
  60     }
  61     EVP_MD_CTX_set_flags(m5, EVP_MD_CTX_FLAG_NON_FIPS_ALLOW);
  62     for (i = 0; (int)i < num; i += MD5_DIGEST_LENGTH) {
  63         k++;
  64         if (k > sizeof buf) {
  65             /* bug: 'buf' is too small for this ciphersuite */
  66             SSLerr(SSL_F_SSL3_GENERATE_KEY_BLOCK, ERR_R_INTERNAL_ERROR);
  67             return 0;
  68         }
  69
  70         for (j = 0; j < k; j++)
  71             buf[j] = c;
  72         c++;
  73         EVP_DigestInit_ex(s1, EVP_sha1(), NULL);
  74         EVP_DigestUpdate(s1, buf, k);
  75         EVP_DigestUpdate(s1, s->session->master_key,
  76                          s->session->master_key_length);
  77         EVP_DigestUpdate(s1, s->s3->server_random, SSL3_RANDOM_SIZE);
  78         EVP_DigestUpdate(s1, s->s3->client_random, SSL3_RANDOM_SIZE);
  79         EVP_DigestFinal_ex(s1, smd, NULL);
  80
  81         EVP_DigestInit_ex(m5, EVP_md5(), NULL);
  82         EVP_DigestUpdate(m5, s->session->master_key,
  83                          s->session->master_key_length);
  84         EVP_DigestUpdate(m5, smd, SHA_DIGEST_LENGTH);
  85         if ((int)(i + MD5_DIGEST_LENGTH) > num) {
  86             EVP_DigestFinal_ex(m5, smd, NULL);
  87             memcpy(km, smd, (num - i));
  88         } else
  89             EVP_DigestFinal_ex(m5, km, NULL);
  90
  91         km += MD5_DIGEST_LENGTH;
  92     }
  93     OPENSSL_cleanse(smd, sizeof(smd));
  94     ret = 1;
  95  err:
  96     EVP_MD_CTX_free(m5);
  97     EVP_MD_CTX_free(s1);
  98     return ret;
  99 }
 100
 101 int ssl3_change_cipher_state(SSL *s, int which)
 102 {
 103     unsigned char *p, *mac_secret;
 104     unsigned char exp_key[EVP_MAX_KEY_LENGTH];
 105     unsigned char exp_iv[EVP_MAX_IV_LENGTH];
 106     unsigned char *ms, *key, *iv;
 107     EVP_CIPHER_CTX *dd;
 108     const EVP_CIPHER *c;
 109 #ifndef OPENSSL_NO_COMP
 110     COMP_METHOD *comp;
 111 #endif
 112     const EVP_MD *m;
 113     int n, i, j, k, cl;
 114     int reuse_dd = 0;
 115
 116     c = s->s3->tmp.new_sym_enc;
 117     m = s->s3->tmp.new_hash;
 118     /* m == NULL will lead to a crash later */
 119     OPENSSL_assert(m);
 120 #ifndef OPENSSL_NO_COMP
 121     if (s->s3->tmp.new_compression == NULL)
 122         comp = NULL;
 123     else
 124         comp = s->s3->tmp.new_compression->method;
 125 #endif
 126
 127     if (which & SSL3_CC_READ) {
 128         if (s->enc_read_ctx != NULL)
 129             reuse_dd = 1;
 130         else if ((s->enc_read_ctx = EVP_CIPHER_CTX_new()) == NULL)
 131             goto err;
 132         else
 133             /*
 134              * make sure it's initialised in case we exit later with an error
 135              */
 136             EVP_CIPHER_CTX_reset(s->enc_read_ctx);
 137         dd = s->enc_read_ctx;
 138
 139         if (ssl_replace_hash(&s->read_hash, m) == NULL) {
 140                 SSLerr(SSL_F_SSL3_CHANGE_CIPHER_STATE, ERR_R_INTERNAL_ERROR);
 141                 goto err2;
 142         }
 143 #ifndef OPENSSL_NO_COMP
 144         /* COMPRESS */
 145         COMP_CTX_free(s->expand);
 146         s->expand = NULL;
 147         if (comp != NULL) {
 148             s->expand = COMP_CTX_new(comp);
 149             if (s->expand == NULL) {
 150                 SSLerr(SSL_F_SSL3_CHANGE_CIPHER_STATE,
 151                        SSL_R_COMPRESSION_LIBRARY_ERROR);
 152                 goto err2;
 153             }
 154         }
 155 #endif
 156         RECORD_LAYER_reset_read_sequence(&s->rlayer);
 157         mac_secret = &(s->s3->read_mac_secret[0]);
 158     } else {
 159         if (s->enc_write_ctx != NULL)
 160             reuse_dd = 1;
 161         else if ((s->enc_write_ctx = EVP_CIPHER_CTX_new()) == NULL)
 162             goto err;
 163         else
 164             /*
 165              * make sure it's initialised in case we exit later with an error
 166              */
 167             EVP_CIPHER_CTX_reset(s->enc_write_ctx);
 168         dd = s->enc_write_ctx;
 169         if (ssl_replace_hash(&s->write_hash, m) == NULL) {
 170                 SSLerr(SSL_F_SSL3_CHANGE_CIPHER_STATE, ERR_R_INTERNAL_ERROR);
 171                 goto err2;
 172         }
 173 #ifndef OPENSSL_NO_COMP
 174         /* COMPRESS */
 175         COMP_CTX_free(s->compress);
 176         s->compress = NULL;
 177         if (comp != NULL) {
 178             s->compress = COMP_CTX_new(comp);
 179             if (s->compress == NULL) {
 180                 SSLerr(SSL_F_SSL3_CHANGE_CIPHER_STATE,
 181                        SSL_R_COMPRESSION_LIBRARY_ERROR);
 182                 goto err2;
 183             }
 184         }
 185 #endif
 186         RECORD_LAYER_reset_write_sequence(&s->rlayer);
 187         mac_secret = &(s->s3->write_mac_secret[0]);
 188     }
 189
 190     if (reuse_dd)
 191         EVP_CIPHER_CTX_reset(dd);
 192
 193     p = s->s3->tmp.key_block;
 194     i = EVP_MD_size(m);
 195     if (i < 0)
 196         goto err2;
 197     cl = EVP_CIPHER_key_length(c);
 198     j = cl;
 199     k = EVP_CIPHER_iv_length(c);
 200     if ((which == SSL3_CHANGE_CIPHER_CLIENT_WRITE) ||
 201         (which == SSL3_CHANGE_CIPHER_SERVER_READ)) {
 202         ms = &(p[0]);
 203         n = i + i;
 204         key = &(p[n]);
 205         n += j + j;
 206         iv = &(p[n]);
 207         n += k + k;
 208     } else {
 209         n = i;
 210         ms = &(p[n]);
 211         n += i + j;
 212         key = &(p[n]);
 213         n += j + k;
 214         iv = &(p[n]);
 215         n += k;
 216     }
 217
 218     if (n > s->s3->tmp.key_block_length) {
 219         SSLerr(SSL_F_SSL3_CHANGE_CIPHER_STATE, ERR_R_INTERNAL_ERROR);
 220         goto err2;
 221     }
 222
 223     memcpy(mac_secret, ms, i);
 224
 225     EVP_CipherInit_ex(dd, c, NULL, key, iv, (which & SSL3_CC_WRITE));
 226
 227 #ifdef OPENSSL_SSL_TRACE_CRYPTO
 228     if (s->msg_callback) {
 229
 230         int wh = which & SSL3_CC_WRITE ?
 231             TLS1_RT_CRYPTO_WRITE : TLS1_RT_CRYPTO_READ;
 232         s->msg_callback(2, s->version, wh | TLS1_RT_CRYPTO_MAC,
 233                         mac_secret, EVP_MD_size(m), s, s->msg_callback_arg);
 234         if (c->key_len)
 235             s->msg_callback(2, s->version, wh | TLS1_RT_CRYPTO_KEY,
 236                             key, c->key_len, s, s->msg_callback_arg);
 237         if (k) {
 238             s->msg_callback(2, s->version, wh | TLS1_RT_CRYPTO_IV,
 239                             iv, k, s, s->msg_callback_arg);
 240         }
 241     }
 242 #endif
 243
 244     OPENSSL_cleanse(exp_key, sizeof(exp_key));
 245     OPENSSL_cleanse(exp_iv, sizeof(exp_iv));
 246     return (1);
 247  err:
 248     SSLerr(SSL_F_SSL3_CHANGE_CIPHER_STATE, ERR_R_MALLOC_FAILURE);
 249  err2:
 250     OPENSSL_cleanse(exp_key, sizeof(exp_key));
 251     OPENSSL_cleanse(exp_iv, sizeof(exp_iv));
 252     return (0);
 253 }
 254
 255 int ssl3_setup_key_block(SSL *s)
 256 {
 257     unsigned char *p;
 258     const EVP_CIPHER *c;
 259     const EVP_MD *hash;
 260     int num;
 261     int ret = 0;
 262     SSL_COMP *comp;
 263
 264     if (s->s3->tmp.key_block_length != 0)
 265         return (1);
 266
 267     if (!ssl_cipher_get_evp(s->session, &c, &hash, NULL, NULL, &comp, 0)) {
 268         SSLerr(SSL_F_SSL3_SETUP_KEY_BLOCK, SSL_R_CIPHER_OR_HASH_UNAVAILABLE);
 269         return (0);
 270     }
 271
 272     s->s3->tmp.new_sym_enc = c;
 273     s->s3->tmp.new_hash = hash;
 274 #ifdef OPENSSL_NO_COMP
 275     s->s3->tmp.new_compression = NULL;
 276 #else
 277     s->s3->tmp.new_compression = comp;
 278 #endif
 279
 280     num = EVP_MD_size(hash);
 281     if (num < 0)
 282         return 0;
 283
 284     num = EVP_CIPHER_key_length(c) + num + EVP_CIPHER_iv_length(c);
 285     num *= 2;
 286
 287     ssl3_cleanup_key_block(s);
 288
 289     if ((p = OPENSSL_malloc(num)) == NULL)
 290         goto err;
 291
 292     s->s3->tmp.key_block_length = num;
 293     s->s3->tmp.key_block = p;
 294
 295     ret = ssl3_generate_key_block(s, p, num);
 296
 297     if (!(s->options & SSL_OP_DONT_INSERT_EMPTY_FRAGMENTS)) {
 298         /*
 299          * enable vulnerability countermeasure for CBC ciphers with known-IV
 300          * problem (http://www.openssl.org/~bodo/tls-cbc.txt)
 301          */
 302         s->s3->need_empty_fragments = 1;
 303
 304         if (s->session->cipher != NULL) {
 305             if (s->session->cipher->algorithm_enc == SSL_eNULL)
 306                 s->s3->need_empty_fragments = 0;
 307
 308 #ifndef OPENSSL_NO_RC4
 309             if (s->session->cipher->algorithm_enc == SSL_RC4)
 310                 s->s3->need_empty_fragments = 0;
 311 #endif
 312         }
 313     }
 314
 315     return ret;
 316
 317  err:
 318     SSLerr(SSL_F_SSL3_SETUP_KEY_BLOCK, ERR_R_MALLOC_FAILURE);
 319     return (0);
 320 }
 321
 322 void ssl3_cleanup_key_block(SSL *s)
 323 {
 324     OPENSSL_clear_free(s->s3->tmp.key_block, s->s3->tmp.key_block_length);
 325     s->s3->tmp.key_block = NULL;
 326     s->s3->tmp.key_block_length = 0;
 327 }
 328
 329 int ssl3_init_finished_mac(SSL *s)
 330 {
 331     BIO *buf = BIO_new(BIO_s_mem());
 332
 333     if (buf == NULL) {
 334         SSLerr(SSL_F_SSL3_INIT_FINISHED_MAC, ERR_R_MALLOC_FAILURE);
 335         return 0;
 336     }
 337     ssl3_free_digest_list(s);
 338     s->s3->handshake_buffer = buf;
 339     (void)BIO_set_close(s->s3->handshake_buffer, BIO_CLOSE);
 340     return 1;
 341 }
 342
 343 /*
 344  * Free digest list. Also frees handshake buffer since they are always freed
 345  * together.
 346  */
 347
 348 void ssl3_free_digest_list(SSL *s)
 349 {
 350     BIO_free(s->s3->handshake_buffer);
 351     s->s3->handshake_buffer = NULL;
 352     EVP_MD_CTX_free(s->s3->handshake_dgst);
 353     s->s3->handshake_dgst = NULL;
 354 }
 355
 356 void ssl3_finish_mac(SSL *s, const unsigned char *buf, int len)
 357 {
 358     if (s->s3->handshake_dgst == NULL)
 359         BIO_write(s->s3->handshake_buffer, (void *)buf, len);
 360     else
 361         EVP_DigestUpdate(s->s3->handshake_dgst, buf, len);
 362 }
 363
 364 int ssl3_digest_cached_records(SSL *s, int keep)
 365 {
 366     const EVP_MD *md;
 367     long hdatalen;
 368     void *hdata;
 369
 370     if (s->s3->handshake_dgst == NULL) {
 371         hdatalen = BIO_get_mem_data(s->s3->handshake_buffer, &hdata);
 372         if (hdatalen <= 0) {
 373             SSLerr(SSL_F_SSL3_DIGEST_CACHED_RECORDS, SSL_R_BAD_HANDSHAKE_LENGTH);
 374             return 0;
 375         }
 376
 377         s->s3->handshake_dgst = EVP_MD_CTX_new();
 378         if (s->s3->handshake_dgst == NULL) {
 379             SSLerr(SSL_F_SSL3_DIGEST_CACHED_RECORDS, ERR_R_MALLOC_FAILURE);
 380             return 0;
 381         }
 382
 383         md = ssl_handshake_md(s);
 384         if (   md == NULL
 385             || !EVP_DigestInit_ex(s->s3->handshake_dgst, md, NULL)
 386             || !EVP_DigestUpdate(s->s3->handshake_dgst, hdata, hdatalen))
 387         {
 388             SSLerr(SSL_F_SSL3_DIGEST_CACHED_RECORDS, ERR_R_INTERNAL_ERROR);
 389             return 0;
 390         }
 391     }
 392     if (keep == 0) {
 393         BIO_free(s->s3->handshake_buffer);
 394         s->s3->handshake_buffer = NULL;
 395     }
 396
 397     return 1;
 398 }
 399
 400 int ssl3_final_finish_mac(SSL *s, const char *sender, int len, unsigned char *p)
 401 {
 402     int ret;
 403     EVP_MD_CTX *ctx = NULL;
 404
 405     if (!ssl3_digest_cached_records(s, 0))
 406         return 0;
 407
 408     if (EVP_MD_CTX_type(s->s3->handshake_dgst) != NID_md5_sha1) {
 409         SSLerr(SSL_F_SSL3_FINAL_FINISH_MAC, SSL_R_NO_REQUIRED_DIGEST);
 410         return 0;
 411     }
 412
 413     ctx = EVP_MD_CTX_new();
 414     if (ctx == NULL) {
 415         SSLerr(SSL_F_SSL3_FINAL_FINISH_MAC, ERR_R_MALLOC_FAILURE);
 416         return 0;
 417     }
 418     EVP_MD_CTX_copy_ex(ctx, s->s3->handshake_dgst);
 419
 420     ret = EVP_MD_CTX_size(ctx);
 421     if (ret < 0) {
 422         EVP_MD_CTX_reset(ctx);
 423         return 0;
 424     }
 425
 426     if ((sender != NULL && EVP_DigestUpdate(ctx, sender, len) <= 0)
 427             || EVP_MD_CTX_ctrl(ctx, EVP_CTRL_SSL3_MASTER_SECRET,
 428                                s->session->master_key_length,
 429                                s->session->master_key) <= 0
 430             || EVP_DigestFinal_ex(ctx, p, NULL) <= 0) {
 431         SSLerr(SSL_F_SSL3_FINAL_FINISH_MAC, ERR_R_INTERNAL_ERROR);
 432         ret = 0;
 433     }
 434
 435     EVP_MD_CTX_free(ctx);
 436
 437     return ret;
 438 }
 439
 440 int ssl3_generate_master_secret(SSL *s, unsigned char *out, unsigned char *p,
 441                                 int len)
 442 {
 443     static const unsigned char *salt[3] = {
 444 #ifndef CHARSET_EBCDIC
 445         (const unsigned char *)"A",
 446         (const unsigned char *)"BB",
 447         (const unsigned char *)"CCC",
 448 #else
 449         (const unsigned char *)"\x41",
 450         (const unsigned char *)"\x42\x42",
 451         (const unsigned char *)"\x43\x43\x43",
 452 #endif
 453     };
 454     unsigned char buf[EVP_MAX_MD_SIZE];
 455     EVP_MD_CTX *ctx = EVP_MD_CTX_new();
 456     int i, ret = 0;
 457     unsigned int n;
 458 #ifdef OPENSSL_SSL_TRACE_CRYPTO
 459     unsigned char *tmpout = out;
 460 #endif
 461
 462     if (ctx == NULL) {
 463         SSLerr(SSL_F_SSL3_GENERATE_MASTER_SECRET, ERR_R_MALLOC_FAILURE);
 464         return 0;
 465     }
 466     for (i = 0; i < 3; i++) {
 467         if (EVP_DigestInit_ex(ctx, s->ctx->sha1, NULL) <= 0
 468                 || EVP_DigestUpdate(ctx, salt[i],
 469                                     strlen((const char *)salt[i])) <= 0
 470                 || EVP_DigestUpdate(ctx, p, len) <= 0
 471                 || EVP_DigestUpdate(ctx, &(s->s3->client_random[0]),
 472                                     SSL3_RANDOM_SIZE) <= 0
 473                 || EVP_DigestUpdate(ctx, &(s->s3->server_random[0]),
 474                                     SSL3_RANDOM_SIZE) <= 0
 475                 || EVP_DigestFinal_ex(ctx, buf, &n) <= 0
 476
 477                 || EVP_DigestInit_ex(ctx, s->ctx->md5, NULL) <= 0
 478                 || EVP_DigestUpdate(ctx, p, len) <= 0
 479                 || EVP_DigestUpdate(ctx, buf, n) <= 0
 480                 || EVP_DigestFinal_ex(ctx, out, &n) <= 0) {
 481             SSLerr(SSL_F_SSL3_GENERATE_MASTER_SECRET, ERR_R_INTERNAL_ERROR);
 482             ret = 0;
 483             break;
 484         }
 485         out += n;
 486         ret += n;
 487     }
 488     EVP_MD_CTX_free(ctx);
 489
 490 #ifdef OPENSSL_SSL_TRACE_CRYPTO
 491     if (ret > 0 && s->msg_callback) {
 492         s->msg_callback(2, s->version, TLS1_RT_CRYPTO_PREMASTER,
 493                         p, len, s, s->msg_callback_arg);
 494         s->msg_callback(2, s->version, TLS1_RT_CRYPTO_CLIENT_RANDOM,
 495                         s->s3->client_random, SSL3_RANDOM_SIZE,
 496                         s, s->msg_callback_arg);
 497         s->msg_callback(2, s->version, TLS1_RT_CRYPTO_SERVER_RANDOM,
 498                         s->s3->server_random, SSL3_RANDOM_SIZE,
 499                         s, s->msg_callback_arg);
 500         s->msg_callback(2, s->version, TLS1_RT_CRYPTO_MASTER,
 501                         tmpout, SSL3_MASTER_SECRET_SIZE,
 502                         s, s->msg_callback_arg);
 503     }
 504 #endif
 505     OPENSSL_cleanse(buf, sizeof(buf));
 506     return (ret);
 507 }
 508
 509 int ssl3_alert_code(int code)
 510 {
 511     switch (code) {
 512     case SSL_AD_CLOSE_NOTIFY:
 513         return (SSL3_AD_CLOSE_NOTIFY);
 514     case SSL_AD_UNEXPECTED_MESSAGE:
 515         return (SSL3_AD_UNEXPECTED_MESSAGE);
 516     case SSL_AD_BAD_RECORD_MAC:
 517         return (SSL3_AD_BAD_RECORD_MAC);
 518     case SSL_AD_DECRYPTION_FAILED:
 519         return (SSL3_AD_BAD_RECORD_MAC);
 520     case SSL_AD_RECORD_OVERFLOW:
 521         return (SSL3_AD_BAD_RECORD_MAC);
 522     case SSL_AD_DECOMPRESSION_FAILURE:
 523         return (SSL3_AD_DECOMPRESSION_FAILURE);
 524     case SSL_AD_HANDSHAKE_FAILURE:
 525         return (SSL3_AD_HANDSHAKE_FAILURE);
 526     case SSL_AD_NO_CERTIFICATE:
 527         return (SSL3_AD_NO_CERTIFICATE);
 528     case SSL_AD_BAD_CERTIFICATE:
 529         return (SSL3_AD_BAD_CERTIFICATE);
 530     case SSL_AD_UNSUPPORTED_CERTIFICATE:
 531         return (SSL3_AD_UNSUPPORTED_CERTIFICATE);
 532     case SSL_AD_CERTIFICATE_REVOKED:
 533         return (SSL3_AD_CERTIFICATE_REVOKED);
 534     case SSL_AD_CERTIFICATE_EXPIRED:
 535         return (SSL3_AD_CERTIFICATE_EXPIRED);
 536     case SSL_AD_CERTIFICATE_UNKNOWN:
 537         return (SSL3_AD_CERTIFICATE_UNKNOWN);
 538     case SSL_AD_ILLEGAL_PARAMETER:
 539         return (SSL3_AD_ILLEGAL_PARAMETER);
 540     case SSL_AD_UNKNOWN_CA:
 541         return (SSL3_AD_BAD_CERTIFICATE);
 542     case SSL_AD_ACCESS_DENIED:
 543         return (SSL3_AD_HANDSHAKE_FAILURE);
 544     case SSL_AD_DECODE_ERROR:
 545         return (SSL3_AD_HANDSHAKE_FAILURE);
 546     case SSL_AD_DECRYPT_ERROR:
 547         return (SSL3_AD_HANDSHAKE_FAILURE);
 548     case SSL_AD_EXPORT_RESTRICTION:
 549         return (SSL3_AD_HANDSHAKE_FAILURE);
 550     case SSL_AD_PROTOCOL_VERSION:
 551         return (SSL3_AD_HANDSHAKE_FAILURE);
 552     case SSL_AD_INSUFFICIENT_SECURITY:
 553         return (SSL3_AD_HANDSHAKE_FAILURE);
 554     case SSL_AD_INTERNAL_ERROR:
 555         return (SSL3_AD_HANDSHAKE_FAILURE);
 556     case SSL_AD_USER_CANCELLED:
 557         return (SSL3_AD_HANDSHAKE_FAILURE);
 558     case SSL_AD_NO_RENEGOTIATION:
 559         return (-1);            /* Don't send it :-) */
 560     case SSL_AD_UNSUPPORTED_EXTENSION:
 561         return (SSL3_AD_HANDSHAKE_FAILURE);
 562     case SSL_AD_CERTIFICATE_UNOBTAINABLE:
 563         return (SSL3_AD_HANDSHAKE_FAILURE);
 564     case SSL_AD_UNRECOGNIZED_NAME:
 565         return (SSL3_AD_HANDSHAKE_FAILURE);
 566     case SSL_AD_BAD_CERTIFICATE_STATUS_RESPONSE:
 567         return (SSL3_AD_HANDSHAKE_FAILURE);
 568     case SSL_AD_BAD_CERTIFICATE_HASH_VALUE:
 569         return (SSL3_AD_HANDSHAKE_FAILURE);
 570     case SSL_AD_UNKNOWN_PSK_IDENTITY:
 571         return (TLS1_AD_UNKNOWN_PSK_IDENTITY);
 572     case SSL_AD_INAPPROPRIATE_FALLBACK:
 573         return (TLS1_AD_INAPPROPRIATE_FALLBACK);
 574     case SSL_AD_NO_APPLICATION_PROTOCOL:
 575         return (TLS1_AD_NO_APPLICATION_PROTOCOL);
 576     default:
 577         return (-1);
 578     }
 579 }