test/tls13encryptiontest.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 <openssl/ssl.h>
  11 #include <openssl/evp.h>
  12 #include "../ssl/ssl_locl.h"
  13 #include "../ssl/record/record_locl.h"
  14
  15 #include "testutil.h"
  16 #include "test_main.h"
  17
  18 /*
  19  * Based on the test vectors provided in:
  20  * https://www.ietf.org/id/draft-thomson-tls-tls13-vectors-01.txt
  21  */
  22
  23 typedef struct {
  24     /*
  25      * We split these into 3 chunks in order to work around the 509 character
  26      * limit that the standard specifies for string literals
  27      */
  28     const char *plaintext[3];
  29     const char *ciphertext[3];
  30     const char *key;
  31     const char *iv;
  32     const char *seq;
  33 } RECORD_DATA;
  34
  35 static RECORD_DATA refdata[] = {
  36     {
  37         {
  38             "0800001e001c000a00140012001d001700180019010001010102010301040000"
  39             "00000b0001b9000001b50001b0308201ac30820115a003020102020102300d06"
  40             "092a864886f70d01010b0500300e310c300a06035504031303727361301e170d"
  41             "3136303733303031323335395a170d3236303733303031323335395a300e310c"
  42             "300a0603550403130372736130819f300d06092a864886f70d01010105000381"
  43             "8d0030818902818100b4bb498f8279303d980836399b36c6988c0c68de55e1bd"
  44             "b826d3901a2461eafd2de49a91d015abbc9a95137ace6c1af19eaa6af98c7ced",
  45             "43120998e187a80ee0ccb0524b1b018c3e0b63264d449a6d38e22a5fda430846"
  46             "748030530ef0461c8ca9d9efbfae8ea6d1d03e2bd193eff0ab9a8002c47428a6"
  47             "d35a8d88d79f7f1e3f0203010001a31a301830090603551d1304023000300b06"
  48             "03551d0f0404030205a0300d06092a864886f70d01010b05000381810085aad2"
  49             "a0e5b9276b908c65f73a7267170618a54c5f8a7b337d2df7a594365417f2eae8"
  50             "f8a58c8f8172f9319cf36b7fd6c55b80f21a03015156726096fd335e5e67f2db"
  51             "f102702e608ccae6bec1fc63a42a99be5c3eb7107c3c54e9b9eb2bd5203b1c3b",
  52             "84e0a8b2f759409ba3eac9d91d402dcc0cc8f8961229ac9187b42b4de100000f"
  53             "00008408040080134e22eac57321ab47db6b38b2992cec2dd79bd065a034a9af"
  54             "6b9e3d03475e4309e6523ccdf055453fb480804a3a7e996229eb28e734f6702b"
  55             "ea2b32149899ac043a4b44468197868da77147ce9f73c0543c4e3fc33e306cac"
  56             "8506faa80a959c5f1edccbee76eda1ad7a4fa440de35dcb87e82ec94e8725355"
  57             "ce7507713a609e140000207304bb73321f01b71dd94622fae98daf634490d220"
  58             "e4c8f3ffa2559911a56e5116"
  59         },
  60         {
  61             "40ae92071a3a548b26af31e116dfc0ba4549210b17e70da16cfbda9ccdad844d"
  62             "94264a9ae65b786b3eaf0de20aa89c6babb448b6f32d07f233584296eefe1931"
  63             "6bd979659472ee8567cb01d70b0366cddb3c60eb9e1d789a3691dc254c14de73"
  64             "f4f20100504544ce184d44547e124b1f18303b4859f8f2e2b04423d23a866b43"
  65             "866374d54af41649d25f4a3ec2cecd5d4e6de1b24953440b46fbb74c1dbec6fb"
  66             "b1f16bc21d4aa0e1e936a49c07127e19719bc652a2f0b7f8df4a150b2b3c9e9e"
  67             "353d6ed101970ddc611abad0632c6793f9379c9d06846c311fcbd6f85edd569b",
  68             "8782c4c5f62294c4611ae60f83230a53aa95e3bcbed204f19a7a1db83c0fbfec"
  69             "1edd2c17498fa7b5aa2321248a92592d891e4947df6bcef52f4481797d032ad3"
  70             "32046a384abece6454b3e356d7249bfa5696793c7f7d3048dc87fa7409a46918"
  71             "87caaf0982c402b902d699f62dc4d5e153f13e8589e4a6206c7f74eb26ddefbb"
  72             "92309fb753decfea972dec7de02eda9c6d26acd7be53a8aa20f1a93f082ae6eb"
  73             "927a6a1b7bd9153551aedfaf94f61dd4cb9355ad7ab09f615d9f92c21712c732"
  74             "c0e7e117797f38cbdc184e3a65e15a89f46cb3624f5fdb8dbbd275f2c8492f8d",
  75             "95bdbd8d1dc1b9f21107bd433acbbac247239c073a2f24a4a9f8074f325f277d"
  76             "579b6bff0269ff19aed3809a9ddd21dd29c1363c9dc44812dd41d2111f9c2e83"
  77             "42046c14133b853262676f15e94de18660e04ae5c0c661ea43559af5842e161c"
  78             "83dd29f64508b2ec3e635a2134fc0e1a39d3ecb51dcddfcf8382c88ffe2a7378"
  79             "42ad1de7fe505b6c4d1673870f6fc2a0f2f7972acaee368a1599d64ba18798f1"
  80             "0333f9779bd5b05f9b084d03dab2f3d80c2eb74ec70c9866ea31c18b491cd597"
  81             "aae3e941205fcc38a3a10ce8c0269f02ccc9c51278e25f1a0f0731a9"
  82         },
  83         "d2dd45f87ad87801a85ac38187f9023b",
  84         "f0a14f808692cef87a3daf70",
  85         "0000000000000000"
  86     },
  87     {
  88         {
  89             "1400002078367856d3c8cc4e0a95eb98906ca7a48bd3cc7029f48bd4ae0dc91a"
  90             "b903ca8916","",""
  91         },
  92         {
  93             "fa15e92daa21cd05d8f9c3152a61748d9aaf049da559718e583f95aacecad657"
  94             "b52a6562da09a5819e864d86ac2989360a1eb22795","",""
  95         },
  96         "40e1201d75d419627f04c88530a15c9d",
  97         "a0f073f3b35e18f96969696b",
  98         "0000000000000000"
  99     },
 100     {
 101         {
 102             "040000a60002a3004abe594b00924e535321cadc96238da09caf9b02fecafdd6"
 103             "5e3e418f03e43772cf512ed8066100503b1c08abbbf298a9d138ce821dd12fe1"
 104             "710e2137cd12e6a85cd3fd7f73706e7f5dddefb87c1ef83824638464099c9d13"
 105             "63e3c64ed2075c16b8ccd8e524a6bbd7a6a6e34ea1579782b15bbe7dfed5c0c0"
 106             "d980fb330f9d8ab252ffe7be1277d418b6828ead4dae3b30d448442417ef76af"
 107             "0008002e00040002000016","",""
 108         },
 109         {
 110             "45a6626fa13b66ce2c5b3ef807e299a118296f26a2dd9ec7487a0673e2460d4c"
 111             "79f40087dcd014c59c51379c90d26b4e4f9bb2b78f5b6761594f013ff3e4c78d"
 112             "836905229eac811c4ef8b2faa89867e9ffc586f7f03c216591aa5e620eac3c62"
 113             "dfe60f846036bd7ecc4464b584af184e9644e94ee1d7834dba408a51cbe42480"
 114             "04796ed9c558e0f5f96115a6f6ba487e17d16a2e20a3d3a650a9a070fb53d9da"
 115             "82864b5621d77650bd0c7947e9889917b53d0515627c72b0ded521","",""
 116         },
 117         "3381f6b3f94500f16226de440193e858",
 118         "4f1d73cc1d465eb30021c41f",
 119         "0000000000000000"
 120     },
 121     {
 122         {
 123             "000102030405060708090a0b0c0d0e0f101112131415161718191a1b1c1d1e1f"
 124             "202122232425262728292a2b2c2d2e2f303117","",""
 125         },
 126         {
 127             "e306178ad97f74bb64f35eaf3c39846b83aef8472cbc9046749b81a949dfb12c"
 128             "fbc65cbabd20ade92c1f944605892ceeb12fdee8a927bce77c83036ac5a794a8"
 129             "f54a69","",""
 130         },
 131         "eb23a804904b80ba4fe8399e09b1ce42",
 132         "efa8c50c06b9c9b8c483e174",
 133         "0000000000000000"
 134     },
 135     {
 136         {
 137             "000102030405060708090a0b0c0d0e0f101112131415161718191a1b1c1d1e1f"
 138             "202122232425262728292a2b2c2d2e2f303117","",""
 139         },
 140         {
 141             "467d99a807dbf778e6ffd8be52456c70665f890811ef2f3c495d5bbe983feeda"
 142             "b0c251dde596bc7e2b135909ec9f9166fb0152e8c16a84e4b1039256467f9538"
 143             "be4463","",""
 144         },
 145         "3381f6b3f94500f16226de440193e858",
 146         "4f1d73cc1d465eb30021c41f",
 147         "0000000000000001"
 148     },
 149     {
 150         {
 151             "010015","",""
 152         },
 153         {
 154             "6bdf60847ba6fb650da36e872adc684a4af2e8","",""
 155         },
 156         "eb23a804904b80ba4fe8399e09b1ce42",
 157         "efa8c50c06b9c9b8c483e174",
 158         "0000000000000001"
 159     },
 160     {
 161         {
 162             "010015","",""
 163         },
 164         {
 165             "621b7cc1962cd8a70109fee68a52efedf87d2e","",""
 166         },
 167         "3381f6b3f94500f16226de440193e858",
 168         "4f1d73cc1d465eb30021c41f",
 169         "0000000000000002"
 170     }
 171 };
 172
 173 /*
 174  * Same thing as OPENSSL_hexstr2buf() but enables us to pass the string in
 175  * 3 chunks
 176  */
 177 static unsigned char *multihexstr2buf(const char *str[3], size_t *len)
 178 {
 179     size_t outer, inner, curr = 0;
 180     unsigned char *outbuf;
 181     size_t totlen = 0;
 182
 183     /* Check lengths of all input strings are even */
 184     for (outer = 0; outer < 3; outer++) {
 185         totlen += strlen(str[outer]);
 186         if ((totlen & 1) != 0)
 187             return NULL;
 188     }
 189
 190     totlen /= 2;
 191     outbuf = OPENSSL_malloc(totlen);
 192     if (outbuf == NULL)
 193         return NULL;
 194
 195     for (outer = 0; outer < 3; outer++) {
 196         for (inner = 0; str[outer][inner] != 0; inner += 2) {
 197             int hi, lo;
 198
 199             hi = OPENSSL_hexchar2int(str[outer][inner]);
 200             lo = OPENSSL_hexchar2int(str[outer][inner + 1]);
 201
 202             if (hi < 0 || lo < 0) {
 203                 OPENSSL_free(outbuf);
 204                 return NULL;
 205             }
 206             outbuf[curr++] = (hi << 4) | lo;
 207         }
 208     }
 209
 210     *len = totlen;
 211     return outbuf;
 212 }
 213
 214 static int load_record(SSL3_RECORD *rec, RECORD_DATA *recd, unsigned char **key,
 215                        unsigned char *iv, size_t ivlen, unsigned char *seq)
 216 {
 217     unsigned char *pt = NULL, *sq = NULL, *ivtmp = NULL;
 218     size_t ptlen;
 219
 220     *key = OPENSSL_hexstr2buf(recd->key, NULL);
 221     ivtmp = OPENSSL_hexstr2buf(recd->iv, NULL);
 222     sq = OPENSSL_hexstr2buf(recd->seq, NULL);
 223     pt = multihexstr2buf(recd->plaintext, &ptlen);
 224
 225     if (*key == NULL || ivtmp == NULL || sq == NULL || pt == NULL)
 226         goto err;
 227
 228     rec->data = rec->input = OPENSSL_malloc(ptlen + EVP_GCM_TLS_TAG_LEN);
 229
 230     if (rec->data == NULL)
 231         goto err;
 232
 233     rec->length = ptlen;
 234     memcpy(rec->data, pt, ptlen);
 235     OPENSSL_free(pt);
 236     memcpy(seq, sq, SEQ_NUM_SIZE);
 237     OPENSSL_free(sq);
 238     memcpy(iv, ivtmp, ivlen);
 239     OPENSSL_free(ivtmp);
 240
 241     return 1;
 242  err:
 243     OPENSSL_free(*key);
 244     *key = NULL;
 245     OPENSSL_free(ivtmp);
 246     OPENSSL_free(sq);
 247     OPENSSL_free(pt);
 248     return 0;
 249 }
 250
 251 static int test_record(SSL3_RECORD *rec, RECORD_DATA *recd, int enc)
 252 {
 253     int ret = 0;
 254     unsigned char *refd;
 255     size_t refdatalen;
 256
 257     if (enc)
 258         refd = multihexstr2buf(recd->ciphertext, &refdatalen);
 259     else
 260         refd = multihexstr2buf(recd->plaintext, &refdatalen);
 261
 262     if (refd == NULL) {
 263         fprintf(stderr, "Failed to get reference data\n");
 264         goto err;
 265     }
 266
 267     if (rec->length != refdatalen) {
 268         fprintf(stderr, "Unexpected length\n");
 269         goto err;
 270     }
 271
 272     if (memcmp(rec->data, refd, refdatalen) != 0) {
 273         fprintf(stderr, "Data does not match\n");
 274         goto err;
 275     }
 276
 277     ret = 1;
 278
 279  err:
 280     OPENSSL_free(refd);
 281     return ret;
 282 }
 283
 284 static int test_tls13_encryption(void)
 285 {
 286     SSL_CTX *ctx = NULL;
 287     SSL *s = NULL;
 288     SSL3_RECORD rec;
 289     unsigned char *key = NULL, *iv = NULL, *seq = NULL;
 290     const EVP_CIPHER *ciph = EVP_aes_128_gcm();
 291     int ret = 0;
 292     size_t ivlen, ctr;
 293
 294     rec.data = NULL;
 295
 296     ctx = SSL_CTX_new(TLS_method());
 297     if (ctx == NULL) {
 298         fprintf(stderr, "Failed creating SSL_CTX\n");
 299         goto err;
 300     }
 301
 302     s = SSL_new(ctx);
 303     if (s == NULL) {
 304         fprintf(stderr, "Failed creating SSL\n");
 305         goto err;
 306     }
 307
 308     s->enc_read_ctx = EVP_CIPHER_CTX_new();
 309     s->enc_write_ctx = EVP_CIPHER_CTX_new();
 310     if (s->enc_read_ctx == NULL || s->enc_write_ctx == NULL) {
 311         fprintf(stderr, "Failed creating EVP_CIPHER_CTX\n");
 312         goto err;
 313     }
 314
 315     for (ctr = 0; ctr < OSSL_NELEM(refdata); ctr++) {
 316         /* Load the record */
 317         ivlen = EVP_CIPHER_iv_length(ciph);
 318         if (!load_record(&rec, &refdata[ctr], &key, s->read_iv, ivlen,
 319                          RECORD_LAYER_get_read_sequence(&s->rlayer))) {
 320             fprintf(stderr, "Failed loading key into EVP_CIPHER_CTX\n");
 321             goto err;
 322         }
 323
 324         /* Set up the read/write sequences */
 325         memcpy(RECORD_LAYER_get_write_sequence(&s->rlayer),
 326                RECORD_LAYER_get_read_sequence(&s->rlayer), SEQ_NUM_SIZE);
 327         memcpy(s->write_iv, s->read_iv, ivlen);
 328
 329         /* Load the key into the EVP_CIPHER_CTXs */
 330         if (EVP_CipherInit_ex(s->enc_write_ctx, ciph, NULL, key, NULL, 1) <= 0
 331                 || EVP_CipherInit_ex(s->enc_read_ctx, ciph, NULL, key, NULL, 0)
 332                    <= 0) {
 333             fprintf(stderr, "Failed loading key into EVP_CIPHER_CTX\n");
 334             goto err;
 335         }
 336
 337         /* Encrypt it */
 338         if (tls13_enc(s, &rec, 1, 1) != 1) {
 339             fprintf(stderr, "Failed to encrypt record %"OSSLzu"\n", ctr);
 340             goto err;
 341         }
 342         if (!test_record(&rec, &refdata[ctr], 1)) {
 343             fprintf(stderr, "Record %"OSSLzu" encryption test failed\n", ctr);
 344             goto err;
 345         }
 346
 347         /* Decrypt it */
 348         if (tls13_enc(s, &rec, 1, 0) != 1) {
 349             fprintf(stderr, "Failed to decrypt record %"OSSLzu"\n", ctr);
 350             goto err;
 351         }
 352         if (!test_record(&rec, &refdata[ctr], 0)) {
 353             fprintf(stderr, "Record %"OSSLzu" decryption test failed\n", ctr);
 354             goto err;
 355         }
 356
 357         OPENSSL_free(rec.data);
 358         OPENSSL_free(key);
 359         OPENSSL_free(iv);
 360         OPENSSL_free(seq);
 361         rec.data = NULL;
 362         key = NULL;
 363         iv = NULL;
 364         seq = NULL;
 365     }
 366
 367     fprintf(stderr, "PASS: %"OSSLzu" records tested\n", ctr);
 368     ret = 1;
 369
 370  err:
 371     OPENSSL_free(rec.data);
 372     OPENSSL_free(key);
 373     OPENSSL_free(iv);
 374     OPENSSL_free(seq);
 375     SSL_free(s);
 376     SSL_CTX_free(ctx);
 377     return ret;
 378 }
 379
 380 void register_tests(void)
 381 {
 382     ADD_TEST(test_tls13_encryption);
 383 }