_ Git - BearSSL/blob - test/test_crypto.c

   1 /*
   2  * Copyright (c) 2016 Thomas Pornin <pornin@bolet.org>
   3  *
   4  * Permission is hereby granted, free of charge, to any person obtaining
   5  * a copy of this software and associated documentation files (the
   6  * "Software"), to deal in the Software without restriction, including
   7  * without limitation the rights to use, copy, modify, merge, publish,
   8  * distribute, sublicense, and/or sell copies of the Software, and to
   9  * permit persons to whom the Software is furnished to do so, subject to
  10  * the following conditions:
  11  *
  12  * The above copyright notice and this permission notice shall be
  13  * included in all copies or substantial portions of the Software.
  14  *
  15  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  16  * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  17  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
  18  * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
  19  * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
  20  * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
  21  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
  22  * SOFTWARE.
  23  */
  24
  25 #include <stdio.h>
  26 #include <stdlib.h>
  27 #include <string.h>
  28 #include "bearssl.h"
  29 #include "inner.h"
  30
  31 /*
  32  * Decode an hexadecimal string. Returned value is the number of decoded
  33  * bytes.
  34  */
  35 static size_t
  36 hextobin(unsigned char *dst, const char *src)
  37 {
  38         size_t num;
  39         unsigned acc;
  40         int z;
  41
  42         num = 0;
  43         z = 0;
  44         acc = 0;
  45         while (*src != 0) {
  46                 int c = *src ++;
  47                 if (c >= '0' && c <= '9') {
  48                         c -= '0';
  49                 } else if (c >= 'A' && c <= 'F') {
  50                         c -= ('A' - 10);
  51                 } else if (c >= 'a' && c <= 'f') {
  52                         c -= ('a' - 10);
  53                 } else {
  54                         continue;
  55                 }
  56                 if (z) {
  57                         *dst ++ = (acc << 4) + c;
  58                         num ++;
  59                 } else {
  60                         acc = c;
  61                 }
  62                 z = !z;
  63         }
  64         return num;
  65 }
  66
  67 static void
  68 check_equals(const char *banner, const void *v1, const void *v2, size_t len)
  69 {
  70         size_t u;
  71         const unsigned char *b;
  72
  73         if (memcmp(v1, v2, len) == 0) {
  74                 return;
  75         }
  76         fprintf(stderr, "\n%s failed\n", banner);
  77         fprintf(stderr, "v1: ");
  78         for (u = 0, b = v1; u < len; u ++) {
  79                 fprintf(stderr, "%02X", b[u]);
  80         }
  81         fprintf(stderr, "\nv2: ");
  82         for (u = 0, b = v2; u < len; u ++) {
  83                 fprintf(stderr, "%02X", b[u]);
  84         }
  85         fprintf(stderr, "\n");
  86         exit(EXIT_FAILURE);
  87 }
  88
  89 #define HASH_SIZE(cname)   br_ ## cname ## _SIZE
  90
  91 #define TEST_HASH(Name, cname) \
  92 static void \
  93 test_ ## cname ## _internal(char *data, char *refres) \
  94 { \
  95         br_ ## cname ## _context mc; \
  96         unsigned char res[HASH_SIZE(cname)], ref[HASH_SIZE(cname)]; \
  97         size_t u, n; \
  98  \
  99         hextobin(ref, refres); \
 100         n = strlen(data); \
 101         br_ ## cname ## _init(&mc); \
 102         br_ ## cname ## _update(&mc, data, n); \
 103         br_ ## cname ## _out(&mc, res); \
 104         check_equals("KAT " #Name " 1", res, ref, HASH_SIZE(cname)); \
 105         br_ ## cname ## _init(&mc); \
 106         for (u = 0; u < n; u ++) { \
 107                 br_ ## cname ## _update(&mc, data + u, 1); \
 108         } \
 109         br_ ## cname ## _out(&mc, res); \
 110         check_equals("KAT " #Name " 2", res, ref, HASH_SIZE(cname)); \
 111         for (u = 0; u < n; u ++) { \
 112                 br_ ## cname ## _context mc2; \
 113                 br_ ## cname ## _init(&mc); \
 114                 br_ ## cname ## _update(&mc, data, u); \
 115                 mc2 = mc; \
 116                 br_ ## cname ## _update(&mc, data + u, n - u); \
 117                 br_ ## cname ## _out(&mc, res); \
 118                 check_equals("KAT " #Name " 3", res, ref, HASH_SIZE(cname)); \
 119                 br_ ## cname ## _update(&mc2, data + u, n - u); \
 120                 br_ ## cname ## _out(&mc2, res); \
 121                 check_equals("KAT " #Name " 4", res, ref, HASH_SIZE(cname)); \
 122         } \
 123         memset(&mc, 0, sizeof mc); \
 124         memset(res, 0, sizeof res); \
 125         br_ ## cname ## _vtable.init(&mc.vtable); \
 126         mc.vtable->update(&mc.vtable, data, n); \
 127         mc.vtable->out(&mc.vtable, res); \
 128         check_equals("KAT " #Name " 5", res, ref, HASH_SIZE(cname)); \
 129         memset(res, 0, sizeof res); \
 130         mc.vtable->init(&mc.vtable); \
 131         mc.vtable->update(&mc.vtable, data, n); \
 132         mc.vtable->out(&mc.vtable, res); \
 133         check_equals("KAT " #Name " 6", res, ref, HASH_SIZE(cname)); \
 134 }
 135
 136 #define KAT_MILLION_A(Name, cname, refres)   do { \
 137                 br_ ## cname ## _context mc; \
 138                 unsigned char buf[1000]; \
 139                 unsigned char res[HASH_SIZE(cname)], ref[HASH_SIZE(cname)]; \
 140                 int i; \
 141  \
 142                 hextobin(ref, refres); \
 143                 memset(buf, 'a', sizeof buf); \
 144                 br_ ## cname ## _init(&mc); \
 145                 for (i = 0; i < 1000; i ++) { \
 146                         br_ ## cname ## _update(&mc, buf, sizeof buf); \
 147                 } \
 148                 br_ ## cname ## _out(&mc, res); \
 149                 check_equals("KAT " #Name " 5", res, ref, HASH_SIZE(cname)); \
 150         } while (0)
 151
 152 TEST_HASH(MD5, md5)
 153 TEST_HASH(SHA-1, sha1)
 154 TEST_HASH(SHA-224, sha224)
 155 TEST_HASH(SHA-256, sha256)
 156 TEST_HASH(SHA-384, sha384)
 157 TEST_HASH(SHA-512, sha512)
 158
 159 static void
 160 test_MD5(void)
 161 {
 162         printf("Test MD5: ");
 163         fflush(stdout);
 164         test_md5_internal("", "d41d8cd98f00b204e9800998ecf8427e");
 165         test_md5_internal("a", "0cc175b9c0f1b6a831c399e269772661");
 166         test_md5_internal("abc", "900150983cd24fb0d6963f7d28e17f72");
 167         test_md5_internal("message digest", "f96b697d7cb7938d525a2f31aaf161d0");
 168         test_md5_internal("abcdefghijklmnopqrstuvwxyz",
 169                 "c3fcd3d76192e4007dfb496cca67e13b");
 170         test_md5_internal("ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstu"
 171                 "vwxyz0123456789", "d174ab98d277d9f5a5611c2c9f419d9f");
 172         test_md5_internal("1234567890123456789012345678901234567890123456789"
 173                 "0123456789012345678901234567890",
 174                 "57edf4a22be3c955ac49da2e2107b67a");
 175         KAT_MILLION_A(MD5, md5,
 176                 "7707d6ae4e027c70eea2a935c2296f21");
 177         printf("done.\n");
 178         fflush(stdout);
 179 }
 180
 181 static void
 182 test_SHA1(void)
 183 {
 184         printf("Test SHA-1: ");
 185         fflush(stdout);
 186         test_sha1_internal("abc", "a9993e364706816aba3e25717850c26c9cd0d89d");
 187         test_sha1_internal("abcdbcdecdefdefgefghfghighijhijkijkljklmklmnlm"
 188                 "nomnopnopq", "84983e441c3bd26ebaae4aa1f95129e5e54670f1");
 189
 190         KAT_MILLION_A(SHA-1, sha1,
 191                 "34aa973cd4c4daa4f61eeb2bdbad27316534016f");
 192         printf("done.\n");
 193         fflush(stdout);
 194 }
 195
 196 static void
 197 test_SHA224(void)
 198 {
 199         printf("Test SHA-224: ");
 200         fflush(stdout);
 201         test_sha224_internal("abc",
 202    "23097d223405d8228642a477bda255b32aadbce4bda0b3f7e36c9da7");
 203         test_sha224_internal("abcdbcdecdefdefgefghfghighijhijkijkljklmklmnlm"
 204                 "nomnopnopq",
 205    "75388b16512776cc5dba5da1fd890150b0c6455cb4f58b1952522525");
 206
 207         KAT_MILLION_A(SHA-224, sha224,
 208                 "20794655980c91d8bbb4c1ea97618a4bf03f42581948b2ee4ee7ad67");
 209         printf("done.\n");
 210         fflush(stdout);
 211 }
 212
 213 static void
 214 test_SHA256(void)
 215 {
 216         printf("Test SHA-256: ");
 217         fflush(stdout);
 218         test_sha256_internal("abc",
 219    "ba7816bf8f01cfea414140de5dae2223b00361a396177a9cb410ff61f20015ad");
 220         test_sha256_internal("abcdbcdecdefdefgefghfghighijhijkijkljklmklmnlm"
 221                 "nomnopnopq",
 222    "248d6a61d20638b8e5c026930c3e6039a33ce45964ff2167f6ecedd419db06c1");
 223
 224         KAT_MILLION_A(SHA-256, sha256,
 225    "cdc76e5c9914fb9281a1c7e284d73e67f1809a48a497200e046d39ccc7112cd0");
 226         printf("done.\n");
 227         fflush(stdout);
 228 }
 229
 230 static void
 231 test_SHA384(void)
 232 {
 233         printf("Test SHA-384: ");
 234         fflush(stdout);
 235         test_sha384_internal("abc",
 236                 "cb00753f45a35e8bb5a03d699ac65007272c32ab0eded163"
 237                 "1a8b605a43ff5bed8086072ba1e7cc2358baeca134c825a7");
 238         test_sha384_internal(
 239                 "abcdefghbcdefghicdefghijdefghijkefghijklfghijklmghijklmn"
 240                 "hijklmnoijklmnopjklmnopqklmnopqrlmnopqrsmnopqrstnopqrstu",
 241                 "09330c33f71147e83d192fc782cd1b4753111b173b3b05d2"
 242                 "2fa08086e3b0f712fcc7c71a557e2db966c3e9fa91746039");
 243
 244         KAT_MILLION_A(SHA-384, sha384,
 245                 "9d0e1809716474cb086e834e310a4a1ced149e9c00f24852"
 246                 "7972cec5704c2a5b07b8b3dc38ecc4ebae97ddd87f3d8985");
 247         printf("done.\n");
 248         fflush(stdout);
 249 }
 250
 251 static void
 252 test_SHA512(void)
 253 {
 254         printf("Test SHA-512: ");
 255         fflush(stdout);
 256         test_sha512_internal("abc",
 257    "ddaf35a193617abacc417349ae20413112e6fa4e89a97ea20a9eeee64b55d39a"
 258    "2192992a274fc1a836ba3c23a3feebbd454d4423643ce80e2a9ac94fa54ca49f");
 259         test_sha512_internal(
 260                 "abcdefghbcdefghicdefghijdefghijkefghijklfghijklmghijklmn"
 261                 "hijklmnoijklmnopjklmnopqklmnopqrlmnopqrsmnopqrstnopqrstu",
 262    "8e959b75dae313da8cf4f72814fc143f8f7779c6eb9f7fa17299aeadb6889018"
 263    "501d289e4900f7e4331b99dec4b5433ac7d329eeb6dd26545e96e55b874be909");
 264
 265         KAT_MILLION_A(SHA-512, sha512,
 266    "e718483d0ce769644e2e42c7bc15b4638e1f98b13b2044285632a803afa973eb"
 267    "de0ff244877ea60a4cb0432ce577c31beb009c5c2c49aa2e4eadb217ad8cc09b");
 268         printf("done.\n");
 269         fflush(stdout);
 270 }
 271
 272 static void
 273 test_MD5_SHA1(void)
 274 {
 275         unsigned char buf[500], out[36], outM[16], outS[20];
 276         unsigned char seed[1];
 277         br_hmac_drbg_context rc;
 278         br_md5_context mc;
 279         br_sha1_context sc;
 280         br_md5sha1_context cc;
 281         size_t u;
 282
 283         printf("Test MD5+SHA-1: ");
 284         fflush(stdout);
 285
 286         seed[0] = 0;
 287         br_hmac_drbg_init(&rc, &br_sha256_vtable, seed, sizeof seed);
 288         for (u = 0; u < sizeof buf; u ++) {
 289                 size_t v;
 290
 291                 br_hmac_drbg_generate(&rc, buf, u);
 292                 br_md5_init(&mc);
 293                 br_md5_update(&mc, buf, u);
 294                 br_md5_out(&mc, outM);
 295                 br_sha1_init(&sc);
 296                 br_sha1_update(&sc, buf, u);
 297                 br_sha1_out(&sc, outS);
 298                 br_md5sha1_init(&cc);
 299                 br_md5sha1_update(&cc, buf, u);
 300                 br_md5sha1_out(&cc, out);
 301                 check_equals("MD5+SHA-1 [1]", out, outM, 16);
 302                 check_equals("MD5+SHA-1 [2]", out + 16, outS, 20);
 303                 br_md5sha1_init(&cc);
 304                 for (v = 0; v < u; v ++) {
 305                         br_md5sha1_update(&cc, buf + v, 1);
 306                 }
 307                 br_md5sha1_out(&cc, out);
 308                 check_equals("MD5+SHA-1 [3]", out, outM, 16);
 309                 check_equals("MD5+SHA-1 [4]", out + 16, outS, 20);
 310         }
 311
 312         printf("done.\n");
 313         fflush(stdout);
 314 }
 315
 316 /*
 317  * Compute a hash function, on some data, by ID. Returned value is
 318  * hash output length.
 319  */
 320 static size_t
 321 do_hash(int id, const void *data, size_t len, void *out)
 322 {
 323         br_md5_context cmd5;
 324         br_sha1_context csha1;
 325         br_sha224_context csha224;
 326         br_sha256_context csha256;
 327         br_sha384_context csha384;
 328         br_sha512_context csha512;
 329
 330         switch (id) {
 331         case br_md5_ID:
 332                 br_md5_init(&cmd5);
 333                 br_md5_update(&cmd5, data, len);
 334                 br_md5_out(&cmd5, out);
 335                 return 16;
 336         case br_sha1_ID:
 337                 br_sha1_init(&csha1);
 338                 br_sha1_update(&csha1, data, len);
 339                 br_sha1_out(&csha1, out);
 340                 return 20;
 341         case br_sha224_ID:
 342                 br_sha224_init(&csha224);
 343                 br_sha224_update(&csha224, data, len);
 344                 br_sha224_out(&csha224, out);
 345                 return 28;
 346         case br_sha256_ID:
 347                 br_sha256_init(&csha256);
 348                 br_sha256_update(&csha256, data, len);
 349                 br_sha256_out(&csha256, out);
 350                 return 32;
 351         case br_sha384_ID:
 352                 br_sha384_init(&csha384);
 353                 br_sha384_update(&csha384, data, len);
 354                 br_sha384_out(&csha384, out);
 355                 return 48;
 356         case br_sha512_ID:
 357                 br_sha512_init(&csha512);
 358                 br_sha512_update(&csha512, data, len);
 359                 br_sha512_out(&csha512, out);
 360                 return 64;
 361         default:
 362                 fprintf(stderr, "Uknown hash function: %d\n", id);
 363                 exit(EXIT_FAILURE);
 364                 return 0;
 365         }
 366 }
 367
 368 /*
 369  * Tests for a multihash. Returned value should be 258 multiplied by the
 370  * number of hash functions implemented by the context.
 371  */
 372 static int
 373 test_multihash_inner(br_multihash_context *mc)
 374 {
 375         /*
 376          * Try hashing messages for all lengths from 0 to 257 bytes
 377          * (inclusive). Each attempt is done twice, with data input
 378          * either in one go, or byte by byte. In the byte by byte
 379          * test, intermediate result are obtained and checked.
 380          */
 381         size_t len;
 382         unsigned char buf[258];
 383         int i;
 384         int tcount;
 385
 386         tcount = 0;
 387         for (len = 0; len < sizeof buf; len ++) {
 388                 br_sha1_context sc;
 389                 unsigned char tmp[20];
 390
 391                 br_sha1_init(&sc);
 392                 br_sha1_update(&sc, buf, len);
 393                 br_sha1_out(&sc, tmp);
 394                 buf[len] = tmp[0];
 395         }
 396         for (len = 0; len <= 257; len ++) {
 397                 size_t u;
 398
 399                 br_multihash_init(mc);
 400                 br_multihash_update(mc, buf, len);
 401                 for (i = 1; i <= 6; i ++) {
 402                         unsigned char tmp[64], tmp2[64];
 403                         size_t olen, olen2;
 404
 405                         olen = br_multihash_out(mc, i, tmp);
 406                         if (olen == 0) {
 407                                 continue;
 408                         }
 409                         olen2 = do_hash(i, buf, len, tmp2);
 410                         if (olen != olen2) {
 411                                 fprintf(stderr,
 412                                         "Bad hash output length: %u / %u\n",
 413                                         (unsigned)olen, (unsigned)olen2);
 414                                 exit(EXIT_FAILURE);
 415                         }
 416                         check_equals("Hash output", tmp, tmp2, olen);
 417                         tcount ++;
 418                 }
 419
 420                 br_multihash_init(mc);
 421                 for (u = 0; u < len; u ++) {
 422                         br_multihash_update(mc, buf + u, 1);
 423                         for (i = 1; i <= 6; i ++) {
 424                                 unsigned char tmp[64], tmp2[64];
 425                                 size_t olen, olen2;
 426
 427                                 olen = br_multihash_out(mc, i, tmp);
 428                                 if (olen == 0) {
 429                                         continue;
 430                                 }
 431                                 olen2 = do_hash(i, buf, u + 1, tmp2);
 432                                 if (olen != olen2) {
 433                                         fprintf(stderr, "Bad hash output"
 434                                                 " length: %u / %u\n",
 435                                                 (unsigned)olen,
 436                                                 (unsigned)olen2);
 437                                         exit(EXIT_FAILURE);
 438                                 }
 439                                 check_equals("Hash output", tmp, tmp2, olen);
 440                         }
 441                 }
 442         }
 443         return tcount;
 444 }
 445
 446 static void
 447 test_multihash(void)
 448 {
 449         br_multihash_context mc;
 450
 451         printf("Test MultiHash: ");
 452         fflush(stdout);
 453
 454         br_multihash_zero(&mc);
 455         br_multihash_setimpl(&mc, br_md5_ID, &br_md5_vtable);
 456         if (test_multihash_inner(&mc) != 258) {
 457                 fprintf(stderr, "Failed test count\n");
 458         }
 459         printf(".");
 460         fflush(stdout);
 461
 462         br_multihash_zero(&mc);
 463         br_multihash_setimpl(&mc, br_sha1_ID, &br_sha1_vtable);
 464         if (test_multihash_inner(&mc) != 258) {
 465                 fprintf(stderr, "Failed test count\n");
 466         }
 467         printf(".");
 468         fflush(stdout);
 469
 470         br_multihash_zero(&mc);
 471         br_multihash_setimpl(&mc, br_sha224_ID, &br_sha224_vtable);
 472         if (test_multihash_inner(&mc) != 258) {
 473                 fprintf(stderr, "Failed test count\n");
 474         }
 475         printf(".");
 476         fflush(stdout);
 477
 478         br_multihash_zero(&mc);
 479         br_multihash_setimpl(&mc, br_sha256_ID, &br_sha256_vtable);
 480         if (test_multihash_inner(&mc) != 258) {
 481                 fprintf(stderr, "Failed test count\n");
 482         }
 483         printf(".");
 484         fflush(stdout);
 485
 486         br_multihash_zero(&mc);
 487         br_multihash_setimpl(&mc, br_sha384_ID, &br_sha384_vtable);
 488         if (test_multihash_inner(&mc) != 258) {
 489                 fprintf(stderr, "Failed test count\n");
 490         }
 491         printf(".");
 492         fflush(stdout);
 493
 494         br_multihash_zero(&mc);
 495         br_multihash_setimpl(&mc, br_sha512_ID, &br_sha512_vtable);
 496         if (test_multihash_inner(&mc) != 258) {
 497                 fprintf(stderr, "Failed test count\n");
 498         }
 499         printf(".");
 500         fflush(stdout);
 501
 502         br_multihash_zero(&mc);
 503         br_multihash_setimpl(&mc, br_md5_ID, &br_md5_vtable);
 504         br_multihash_setimpl(&mc, br_sha1_ID, &br_sha1_vtable);
 505         br_multihash_setimpl(&mc, br_sha224_ID, &br_sha224_vtable);
 506         br_multihash_setimpl(&mc, br_sha256_ID, &br_sha256_vtable);
 507         br_multihash_setimpl(&mc, br_sha384_ID, &br_sha384_vtable);
 508         br_multihash_setimpl(&mc, br_sha512_ID, &br_sha512_vtable);
 509         if (test_multihash_inner(&mc) != 258 * 6) {
 510                 fprintf(stderr, "Failed test count\n");
 511         }
 512         printf(".");
 513         fflush(stdout);
 514
 515         printf("done.\n");
 516         fflush(stdout);
 517 }
 518
 519 static void
 520 do_KAT_HMAC_bin_bin(const br_hash_class *digest_class,
 521         const void *key, size_t key_len,
 522         const void *data, size_t data_len, const char *href)
 523 {
 524         br_hmac_key_context kc;
 525         br_hmac_context ctx;
 526         unsigned char tmp[64], ref[64];
 527         size_t u, len;
 528
 529         len = hextobin(ref, href);
 530         br_hmac_key_init(&kc, digest_class, key, key_len);
 531         br_hmac_init(&ctx, &kc, 0);
 532         br_hmac_update(&ctx, data, data_len);
 533         br_hmac_out(&ctx, tmp);
 534         check_equals("KAT HMAC 1", tmp, ref, len);
 535
 536         br_hmac_init(&ctx, &kc, 0);
 537         for (u = 0; u < data_len; u ++) {
 538                 br_hmac_update(&ctx, (const unsigned char *)data + u, 1);
 539         }
 540         br_hmac_out(&ctx, tmp);
 541         check_equals("KAT HMAC 2", tmp, ref, len);
 542
 543         for (u = 0; u < data_len; u ++) {
 544                 br_hmac_init(&ctx, &kc, 0);
 545                 br_hmac_update(&ctx, data, u);
 546                 br_hmac_out(&ctx, tmp);
 547                 br_hmac_update(&ctx,
 548                         (const unsigned char *)data + u, data_len - u);
 549                 br_hmac_out(&ctx, tmp);
 550                 check_equals("KAT HMAC 3", tmp, ref, len);
 551         }
 552 }
 553
 554 static void
 555 do_KAT_HMAC_str_str(const br_hash_class *digest_class, const char *key,
 556         const char *data, const char *href)
 557 {
 558         do_KAT_HMAC_bin_bin(digest_class, key, strlen(key),
 559                 data, strlen(data), href);
 560 }
 561
 562 static void
 563 do_KAT_HMAC_hex_hex(const br_hash_class *digest_class, const char *skey,
 564         const char *sdata, const char *href)
 565 {
 566         unsigned char key[1024];
 567         unsigned char data[1024];
 568
 569         do_KAT_HMAC_bin_bin(digest_class, key, hextobin(key, skey),
 570                 data, hextobin(data, sdata), href);
 571 }
 572
 573 static void
 574 do_KAT_HMAC_hex_str(const br_hash_class *digest_class,
 575         const char *skey, const char *data, const char *href)
 576 {
 577         unsigned char key[1024];
 578
 579         do_KAT_HMAC_bin_bin(digest_class, key, hextobin(key, skey),
 580                 data, strlen(data), href);
 581 }
 582
 583 static void
 584 test_HMAC_CT(const br_hash_class *digest_class,
 585         const void *key, size_t key_len, const void *data)
 586 {
 587         br_hmac_key_context kc;
 588         br_hmac_context hc1, hc2;
 589         unsigned char buf1[64], buf2[64];
 590         size_t u, v;
 591
 592         br_hmac_key_init(&kc, digest_class, key, key_len);
 593
 594         for (u = 0; u < 2; u ++) {
 595                 for (v = 0; v < 130; v ++) {
 596                         size_t min_len, max_len;
 597                         size_t w;
 598
 599                         min_len = v;
 600                         max_len = v + 256;
 601                         for (w = min_len; w <= max_len; w ++) {
 602                                 char tmp[30];
 603                                 size_t hlen1, hlen2;
 604
 605                                 br_hmac_init(&hc1, &kc, 0);
 606                                 br_hmac_update(&hc1, data, u + w);
 607                                 hlen1 = br_hmac_out(&hc1, buf1);
 608                                 br_hmac_init(&hc2, &kc, 0);
 609                                 br_hmac_update(&hc2, data, u);
 610                                 hlen2 = br_hmac_outCT(&hc2,
 611                                         (const unsigned char *)data + u, w,
 612                                         min_len, max_len, buf2);
 613                                 if (hlen1 != hlen2) {
 614                                         fprintf(stderr, "HMAC length mismatch:"
 615                                                 " %u / %u\n", (unsigned)hlen1,
 616                                                 (unsigned)hlen2);
 617                                         exit(EXIT_FAILURE);
 618                                 }
 619                                 sprintf(tmp, "HMAC CT %u,%u,%u",
 620                                         (unsigned)u, (unsigned)v, (unsigned)w);
 621                                 check_equals(tmp, buf1, buf2, hlen1);
 622                         }
 623                 }
 624                 printf(".");
 625                 fflush(stdout);
 626         }
 627         printf(" ");
 628         fflush(stdout);
 629 }
 630
 631 static void
 632 test_HMAC(void)
 633 {
 634         unsigned char data[1000];
 635         unsigned x;
 636         size_t u;
 637         const char key[] = "test HMAC key";
 638
 639         printf("Test HMAC: ");
 640         fflush(stdout);
 641         do_KAT_HMAC_hex_str(&br_md5_vtable,
 642                 "0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b",
 643                 "Hi There",
 644                 "9294727a3638bb1c13f48ef8158bfc9d");
 645         do_KAT_HMAC_str_str(&br_md5_vtable,
 646                 "Jefe",
 647                 "what do ya want for nothing?",
 648                 "750c783e6ab0b503eaa86e310a5db738");
 649         do_KAT_HMAC_hex_hex(&br_md5_vtable,
 650                 "AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA",
 651                 "DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD",
 652                 "56be34521d144c88dbb8c733f0e8b3f6");
 653         do_KAT_HMAC_hex_hex(&br_md5_vtable,
 654                 "0102030405060708090a0b0c0d0e0f10111213141516171819",
 655                 "CDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCD",
 656                 "697eaf0aca3a3aea3a75164746ffaa79");
 657         do_KAT_HMAC_hex_str(&br_md5_vtable,
 658                 "0c0c0c0c0c0c0c0c0c0c0c0c0c0c0c0c",
 659                 "Test With Truncation",
 660                 "56461ef2342edc00f9bab995690efd4c");
 661         do_KAT_HMAC_hex_str(&br_md5_vtable,
 662                 "AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA",
 663                 "Test Using Larger Than Block-Size Key - Hash Key First",
 664                 "6b1ab7fe4bd7bf8f0b62e6ce61b9d0cd");
 665         do_KAT_HMAC_hex_str(&br_md5_vtable,
 666                 "AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA",
 667                 "Test Using Larger Than Block-Size Key and Larger Than One Block-Size Data",
 668                 "6f630fad67cda0ee1fb1f562db3aa53e");
 669
 670         do_KAT_HMAC_hex_str(&br_sha1_vtable,
 671                 "0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b",
 672                 "Hi There",
 673                 "b617318655057264e28bc0b6fb378c8ef146be00");
 674         do_KAT_HMAC_str_str(&br_sha1_vtable,
 675                 "Jefe",
 676                 "what do ya want for nothing?",
 677                 "effcdf6ae5eb2fa2d27416d5f184df9c259a7c79");
 678         do_KAT_HMAC_hex_hex(&br_sha1_vtable,
 679                 "AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA",
 680                 "DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD",
 681                 "125d7342b9ac11cd91a39af48aa17b4f63f175d3");
 682         do_KAT_HMAC_hex_hex(&br_sha1_vtable,
 683                 "0102030405060708090a0b0c0d0e0f10111213141516171819",
 684                 "CDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCD",
 685                 "4c9007f4026250c6bc8414f9bf50c86c2d7235da");
 686         do_KAT_HMAC_hex_str(&br_sha1_vtable,
 687                 "0c0c0c0c0c0c0c0c0c0c0c0c0c0c0c0c0c0c0c0c",
 688                 "Test With Truncation",
 689                 "4c1a03424b55e07fe7f27be1d58bb9324a9a5a04");
 690         do_KAT_HMAC_hex_str(&br_sha1_vtable,
 691                 "AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA",
 692                 "Test Using Larger Than Block-Size Key - Hash Key First",
 693                 "aa4ae5e15272d00e95705637ce8a3b55ed402112");
 694         do_KAT_HMAC_hex_str(&br_sha1_vtable,
 695                 "AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA",
 696                 "Test Using Larger Than Block-Size Key and Larger Than One Block-Size Data",
 697                 "e8e99d0f45237d786d6bbaa7965c7808bbff1a91");
 698
 699         /* From RFC 4231 */
 700
 701         do_KAT_HMAC_hex_hex(&br_sha224_vtable,
 702                 "0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b",
 703                 "4869205468657265",
 704                 "896fb1128abbdf196832107cd49df33f"
 705                 "47b4b1169912ba4f53684b22");
 706
 707         do_KAT_HMAC_hex_hex(&br_sha256_vtable,
 708                 "0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b",
 709                 "4869205468657265",
 710                 "b0344c61d8db38535ca8afceaf0bf12b"
 711                 "881dc200c9833da726e9376c2e32cff7");
 712
 713         do_KAT_HMAC_hex_hex(&br_sha384_vtable,
 714                 "0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b",
 715                 "4869205468657265",
 716                 "afd03944d84895626b0825f4ab46907f"
 717                 "15f9dadbe4101ec682aa034c7cebc59c"
 718                 "faea9ea9076ede7f4af152e8b2fa9cb6");
 719
 720         do_KAT_HMAC_hex_hex(&br_sha512_vtable,
 721                 "0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b0b",
 722                 "4869205468657265",
 723                 "87aa7cdea5ef619d4ff0b4241a1d6cb0"
 724                 "2379f4e2ce4ec2787ad0b30545e17cde"
 725                 "daa833b7d6b8a702038b274eaea3f4e4"
 726                 "be9d914eeb61f1702e696c203a126854");
 727
 728         do_KAT_HMAC_hex_hex(&br_sha224_vtable,
 729                 "4a656665",
 730                 "7768617420646f2079612077616e7420"
 731                 "666f72206e6f7468696e673f",
 732                 "a30e01098bc6dbbf45690f3a7e9e6d0f"
 733                 "8bbea2a39e6148008fd05e44");
 734
 735         do_KAT_HMAC_hex_hex(&br_sha256_vtable,
 736                 "4a656665",
 737                 "7768617420646f2079612077616e7420"
 738                 "666f72206e6f7468696e673f",
 739                 "5bdcc146bf60754e6a042426089575c7"
 740                 "5a003f089d2739839dec58b964ec3843");
 741
 742         do_KAT_HMAC_hex_hex(&br_sha384_vtable,
 743                 "4a656665",
 744                 "7768617420646f2079612077616e7420"
 745                 "666f72206e6f7468696e673f",
 746                 "af45d2e376484031617f78d2b58a6b1b"
 747                 "9c7ef464f5a01b47e42ec3736322445e"
 748                 "8e2240ca5e69e2c78b3239ecfab21649");
 749
 750         do_KAT_HMAC_hex_hex(&br_sha512_vtable,
 751                 "4a656665",
 752                 "7768617420646f2079612077616e7420"
 753                 "666f72206e6f7468696e673f",
 754                 "164b7a7bfcf819e2e395fbe73b56e0a3"
 755                 "87bd64222e831fd610270cd7ea250554"
 756                 "9758bf75c05a994a6d034f65f8f0e6fd"
 757                 "caeab1a34d4a6b4b636e070a38bce737");
 758
 759         do_KAT_HMAC_hex_hex(&br_sha224_vtable,
 760                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 761                 "aaaaaaaa",
 762                 "dddddddddddddddddddddddddddddddd"
 763                 "dddddddddddddddddddddddddddddddd"
 764                 "dddddddddddddddddddddddddddddddd"
 765                 "dddd",
 766                 "7fb3cb3588c6c1f6ffa9694d7d6ad264"
 767                 "9365b0c1f65d69d1ec8333ea");
 768
 769         do_KAT_HMAC_hex_hex(&br_sha256_vtable,
 770                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 771                 "aaaaaaaa",
 772                 "dddddddddddddddddddddddddddddddd"
 773                 "dddddddddddddddddddddddddddddddd"
 774                 "dddddddddddddddddddddddddddddddd"
 775                 "dddd",
 776                 "773ea91e36800e46854db8ebd09181a7"
 777                 "2959098b3ef8c122d9635514ced565fe");
 778
 779         do_KAT_HMAC_hex_hex(&br_sha384_vtable,
 780                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 781                 "aaaaaaaa",
 782                 "dddddddddddddddddddddddddddddddd"
 783                 "dddddddddddddddddddddddddddddddd"
 784                 "dddddddddddddddddddddddddddddddd"
 785                 "dddd",
 786                 "88062608d3e6ad8a0aa2ace014c8a86f"
 787                 "0aa635d947ac9febe83ef4e55966144b"
 788                 "2a5ab39dc13814b94e3ab6e101a34f27");
 789
 790         do_KAT_HMAC_hex_hex(&br_sha512_vtable,
 791                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 792                 "aaaaaaaa",
 793                 "dddddddddddddddddddddddddddddddd"
 794                 "dddddddddddddddddddddddddddddddd"
 795                 "dddddddddddddddddddddddddddddddd"
 796                 "dddd",
 797                 "fa73b0089d56a284efb0f0756c890be9"
 798                 "b1b5dbdd8ee81a3655f83e33b2279d39"
 799                 "bf3e848279a722c806b485a47e67c807"
 800                 "b946a337bee8942674278859e13292fb");
 801
 802         do_KAT_HMAC_hex_hex(&br_sha224_vtable,
 803                 "0102030405060708090a0b0c0d0e0f10"
 804                 "111213141516171819",
 805                 "cdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcd"
 806                 "cdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcd"
 807                 "cdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcd"
 808                 "cdcd",
 809                 "6c11506874013cac6a2abc1bb382627c"
 810                 "ec6a90d86efc012de7afec5a");
 811
 812         do_KAT_HMAC_hex_hex(&br_sha256_vtable,
 813                 "0102030405060708090a0b0c0d0e0f10"
 814                 "111213141516171819",
 815                 "cdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcd"
 816                 "cdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcd"
 817                 "cdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcd"
 818                 "cdcd",
 819                 "82558a389a443c0ea4cc819899f2083a"
 820                 "85f0faa3e578f8077a2e3ff46729665b");
 821
 822         do_KAT_HMAC_hex_hex(&br_sha384_vtable,
 823                 "0102030405060708090a0b0c0d0e0f10"
 824                 "111213141516171819",
 825                 "cdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcd"
 826                 "cdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcd"
 827                 "cdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcd"
 828                 "cdcd",
 829                 "3e8a69b7783c25851933ab6290af6ca7"
 830                 "7a9981480850009cc5577c6e1f573b4e"
 831                 "6801dd23c4a7d679ccf8a386c674cffb");
 832
 833         do_KAT_HMAC_hex_hex(&br_sha512_vtable,
 834                 "0102030405060708090a0b0c0d0e0f10"
 835                 "111213141516171819",
 836                 "cdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcd"
 837                 "cdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcd"
 838                 "cdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcd"
 839                 "cdcd",
 840                 "b0ba465637458c6990e5a8c5f61d4af7"
 841                 "e576d97ff94b872de76f8050361ee3db"
 842                 "a91ca5c11aa25eb4d679275cc5788063"
 843                 "a5f19741120c4f2de2adebeb10a298dd");
 844
 845         do_KAT_HMAC_hex_hex(&br_sha224_vtable,
 846                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 847                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 848                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 849                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 850                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 851                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 852                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 853                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 854                 "aaaaaa",
 855                 "54657374205573696e67204c61726765"
 856                 "72205468616e20426c6f636b2d53697a"
 857                 "65204b6579202d2048617368204b6579"
 858                 "204669727374",
 859                 "95e9a0db962095adaebe9b2d6f0dbce2"
 860                 "d499f112f2d2b7273fa6870e");
 861
 862         do_KAT_HMAC_hex_hex(&br_sha256_vtable,
 863                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 864                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 865                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 866                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 867                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 868                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 869                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 870                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 871                 "aaaaaa",
 872                 "54657374205573696e67204c61726765"
 873                 "72205468616e20426c6f636b2d53697a"
 874                 "65204b6579202d2048617368204b6579"
 875                 "204669727374",
 876                 "60e431591ee0b67f0d8a26aacbf5b77f"
 877                 "8e0bc6213728c5140546040f0ee37f54");
 878
 879         do_KAT_HMAC_hex_hex(&br_sha384_vtable,
 880                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 881                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 882                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 883                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 884                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 885                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 886                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 887                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 888                 "aaaaaa",
 889                 "54657374205573696e67204c61726765"
 890                 "72205468616e20426c6f636b2d53697a"
 891                 "65204b6579202d2048617368204b6579"
 892                 "204669727374",
 893                 "4ece084485813e9088d2c63a041bc5b4"
 894                 "4f9ef1012a2b588f3cd11f05033ac4c6"
 895                 "0c2ef6ab4030fe8296248df163f44952");
 896
 897         do_KAT_HMAC_hex_hex(&br_sha512_vtable,
 898                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 899                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 900                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 901                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 902                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 903                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 904                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 905                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 906                 "aaaaaa",
 907                 "54657374205573696e67204c61726765"
 908                 "72205468616e20426c6f636b2d53697a"
 909                 "65204b6579202d2048617368204b6579"
 910                 "204669727374",
 911                 "80b24263c7c1a3ebb71493c1dd7be8b4"
 912                 "9b46d1f41b4aeec1121b013783f8f352"
 913                 "6b56d037e05f2598bd0fd2215d6a1e52"
 914                 "95e64f73f63f0aec8b915a985d786598");
 915
 916         do_KAT_HMAC_hex_hex(&br_sha224_vtable,
 917                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 918                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 919                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 920                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 921                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 922                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 923                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 924                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 925                 "aaaaaa",
 926                 "54686973206973206120746573742075"
 927                 "73696e672061206c6172676572207468"
 928                 "616e20626c6f636b2d73697a65206b65"
 929                 "7920616e642061206c61726765722074"
 930                 "68616e20626c6f636b2d73697a652064"
 931                 "6174612e20546865206b6579206e6565"
 932                 "647320746f2062652068617368656420"
 933                 "6265666f7265206265696e6720757365"
 934                 "642062792074686520484d414320616c"
 935                 "676f726974686d2e",
 936                 "3a854166ac5d9f023f54d517d0b39dbd"
 937                 "946770db9c2b95c9f6f565d1");
 938
 939         do_KAT_HMAC_hex_hex(&br_sha256_vtable,
 940                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 941                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 942                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 943                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 944                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 945                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 946                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 947                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 948                 "aaaaaa",
 949                 "54686973206973206120746573742075"
 950                 "73696e672061206c6172676572207468"
 951                 "616e20626c6f636b2d73697a65206b65"
 952                 "7920616e642061206c61726765722074"
 953                 "68616e20626c6f636b2d73697a652064"
 954                 "6174612e20546865206b6579206e6565"
 955                 "647320746f2062652068617368656420"
 956                 "6265666f7265206265696e6720757365"
 957                 "642062792074686520484d414320616c"
 958                 "676f726974686d2e",
 959                 "9b09ffa71b942fcb27635fbcd5b0e944"
 960                 "bfdc63644f0713938a7f51535c3a35e2");
 961
 962         do_KAT_HMAC_hex_hex(&br_sha384_vtable,
 963                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 964                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 965                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 966                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 967                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 968                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 969                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 970                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 971                 "aaaaaa",
 972                 "54686973206973206120746573742075"
 973                 "73696e672061206c6172676572207468"
 974                 "616e20626c6f636b2d73697a65206b65"
 975                 "7920616e642061206c61726765722074"
 976                 "68616e20626c6f636b2d73697a652064"
 977                 "6174612e20546865206b6579206e6565"
 978                 "647320746f2062652068617368656420"
 979                 "6265666f7265206265696e6720757365"
 980                 "642062792074686520484d414320616c"
 981                 "676f726974686d2e",
 982                 "6617178e941f020d351e2f254e8fd32c"
 983                 "602420feb0b8fb9adccebb82461e99c5"
 984                 "a678cc31e799176d3860e6110c46523e");
 985
 986         do_KAT_HMAC_hex_hex(&br_sha512_vtable,
 987                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 988                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 989                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 990                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 991                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 992                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 993                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 994                 "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
 995                 "aaaaaa",
 996                 "54686973206973206120746573742075"
 997                 "73696e672061206c6172676572207468"
 998                 "616e20626c6f636b2d73697a65206b65"
 999                 "7920616e642061206c61726765722074"
1000                 "68616e20626c6f636b2d73697a652064"
1001                 "6174612e20546865206b6579206e6565"
1002                 "647320746f2062652068617368656420"
1003                 "6265666f7265206265696e6720757365"
1004                 "642062792074686520484d414320616c"
1005                 "676f726974686d2e",
1006                 "e37b6a775dc87dbaa4dfa9f96e5e3ffd"
1007                 "debd71f8867289865df5a32d20cdc944"
1008                 "b6022cac3c4982b10d5eeb55c3e4de15"
1009                 "134676fb6de0446065c97440fa8c6a58");
1010
1011         for (x = 1, u = 0; u < sizeof data; u ++) {
1012                 data[u] = x;
1013                 x = (x * 45) % 257;
1014         }
1015         printf("(MD5) ");
1016         test_HMAC_CT(&br_md5_vtable, key, sizeof key, data);
1017         printf("(SHA-1) ");
1018         test_HMAC_CT(&br_sha1_vtable, key, sizeof key, data);
1019         printf("(SHA-224) ");
1020         test_HMAC_CT(&br_sha224_vtable, key, sizeof key, data);
1021         printf("(SHA-256) ");
1022         test_HMAC_CT(&br_sha256_vtable, key, sizeof key, data);
1023         printf("(SHA-384) ");
1024         test_HMAC_CT(&br_sha384_vtable, key, sizeof key, data);
1025         printf("(SHA-512) ");
1026         test_HMAC_CT(&br_sha512_vtable, key, sizeof key, data);
1027
1028         printf("done.\n");
1029         fflush(stdout);
1030 }
1031
1032 static void
1033 test_HMAC_DRBG(void)
1034 {
1035         br_hmac_drbg_context ctx;
1036         unsigned char seed[42], tmp[30];
1037         unsigned char ref1[30], ref2[30], ref3[30];
1038         size_t seed_len;
1039
1040         printf("Test HMAC_DRBG: ");
1041         fflush(stdout);
1042
1043         seed_len = hextobin(seed,
1044                 "009A4D6792295A7F730FC3F2B49CBC0F62E862272F"
1045                 "01795EDF0D54DB760F156D0DAC04C0322B3A204224");
1046         hextobin(ref1,
1047                 "9305A46DE7FF8EB107194DEBD3FD48AA"
1048                 "20D5E7656CBE0EA69D2A8D4E7C67");
1049         hextobin(ref2,
1050                 "C70C78608A3B5BE9289BE90EF6E81A9E"
1051                 "2C1516D5751D2F75F50033E45F73");
1052         hextobin(ref3,
1053                 "475E80E992140567FCC3A50DAB90FE84"
1054                 "BCD7BB03638E9C4656A06F37F650");
1055         br_hmac_drbg_init(&ctx, &br_sha256_vtable, seed, seed_len);
1056         br_hmac_drbg_generate(&ctx, tmp, sizeof tmp);
1057         check_equals("KAT HMAC_DRBG 1", tmp, ref1, sizeof tmp);
1058         br_hmac_drbg_generate(&ctx, tmp, sizeof tmp);
1059         check_equals("KAT HMAC_DRBG 2", tmp, ref2, sizeof tmp);
1060         br_hmac_drbg_generate(&ctx, tmp, sizeof tmp);
1061         check_equals("KAT HMAC_DRBG 3", tmp, ref3, sizeof tmp);
1062
1063         memset(&ctx, 0, sizeof ctx);
1064         br_hmac_drbg_vtable.init(&ctx.vtable,
1065                 &br_sha256_vtable, seed, seed_len);
1066         ctx.vtable->generate(&ctx.vtable, tmp, sizeof tmp);
1067         check_equals("KAT HMAC_DRBG 4", tmp, ref1, sizeof tmp);
1068         ctx.vtable->generate(&ctx.vtable, tmp, sizeof tmp);
1069         check_equals("KAT HMAC_DRBG 5", tmp, ref2, sizeof tmp);
1070         ctx.vtable->generate(&ctx.vtable, tmp, sizeof tmp);
1071         check_equals("KAT HMAC_DRBG 6", tmp, ref3, sizeof tmp);
1072
1073         printf("done.\n");
1074         fflush(stdout);
1075 }
1076
1077 static void
1078 do_KAT_PRF(br_tls_prf_impl prf,
1079         const char *ssecret, const char *label, const char *sseed,
1080         const char *sref)
1081 {
1082         unsigned char secret[100], seed[100], ref[500], out[500];
1083         size_t secret_len, seed_len, ref_len;
1084         br_tls_prf_seed_chunk chunks[2];
1085
1086         secret_len = hextobin(secret, ssecret);
1087         seed_len = hextobin(seed, sseed);
1088         ref_len = hextobin(ref, sref);
1089
1090         chunks[0].data = seed;
1091         chunks[0].len = seed_len;
1092         prf(out, ref_len, secret, secret_len, label, 1, chunks);
1093         check_equals("TLS PRF KAT 1", out, ref, ref_len);
1094
1095         chunks[0].data = seed;
1096         chunks[0].len = seed_len;
1097         chunks[1].data = NULL;
1098         chunks[1].len = 0;
1099         prf(out, ref_len, secret, secret_len, label, 2, chunks);
1100         check_equals("TLS PRF KAT 2", out, ref, ref_len);
1101
1102         chunks[0].data = NULL;
1103         chunks[0].len = 0;
1104         chunks[1].data = seed;
1105         chunks[1].len = seed_len;
1106         prf(out, ref_len, secret, secret_len, label, 2, chunks);
1107         check_equals("TLS PRF KAT 3", out, ref, ref_len);
1108
1109         chunks[0].data = seed;
1110         chunks[0].len = seed_len >> 1;
1111         chunks[1].data = seed + chunks[0].len;
1112         chunks[1].len = seed_len - chunks[0].len;
1113         prf(out, ref_len, secret, secret_len, label, 2, chunks);
1114         check_equals("TLS PRF KAT 4", out, ref, ref_len);
1115 }
1116
1117 static void
1118 test_PRF(void)
1119 {
1120         printf("Test TLS PRF: ");
1121         fflush(stdout);
1122
1123         /*
1124          * Test vector taken from an email that was on:
1125          * http://www.imc.org/ietf-tls/mail-archive/msg01589.html
1126          * but no longer exists there; a version archived in 2008
1127          * can be found on http://www.archive.org/
1128          */
1129         do_KAT_PRF(&br_tls10_prf,
1130                 "abababababababababababababababababababababababababababababababababababababababababababababababab",
1131                 "PRF Testvector",
1132                 "cdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcdcd",
1133                 "d3d4d1e349b5d515044666d51de32bab258cb521b6b053463e354832fd976754443bcf9a296519bc289abcbc1187e4ebd31e602353776c408aafb74cbc85eff69255f9788faa184cbb957a9819d84a5d7eb006eb459d3ae8de9810454b8b2d8f1afbc655a8c9a013");
1134
1135         /*
1136          * Test vectors are taken from:
1137          * https://www.ietf.org/mail-archive/web/tls/current/msg03416.html
1138          */
1139         do_KAT_PRF(&br_tls12_sha256_prf,
1140                 "9bbe436ba940f017b17652849a71db35",
1141                 "test label",
1142                 "a0ba9f936cda311827a6f796ffd5198c",
1143                 "e3f229ba727be17b8d122620557cd453c2aab21d07c3d495329b52d4e61edb5a6b301791e90d35c9c9a46b4e14baf9af0fa022f7077def17abfd3797c0564bab4fbc91666e9def9b97fce34f796789baa48082d122ee42c5a72e5a5110fff70187347b66");
1144         do_KAT_PRF(&br_tls12_sha384_prf,
1145                 "b80b733d6ceefcdc71566ea48e5567df",
1146                 "test label",
1147                 "cd665cf6a8447dd6ff8b27555edb7465",
1148                 "7b0c18e9ced410ed1804f2cfa34a336a1c14dffb4900bb5fd7942107e81c83cde9ca0faa60be9fe34f82b1233c9146a0e534cb400fed2700884f9dc236f80edd8bfa961144c9e8d792eca722a7b32fc3d416d473ebc2c5fd4abfdad05d9184259b5bf8cd4d90fa0d31e2dec479e4f1a26066f2eea9a69236a3e52655c9e9aee691c8f3a26854308d5eaa3be85e0990703d73e56f");
1149
1150         printf("done.\n");
1151         fflush(stdout);
1152 }
1153
1154 /*
1155  * AES known-answer tests. Order: key, plaintext, ciphertext.
1156  */
1157 static const char *const KAT_AES[] = {
1158         /*
1159          * From FIPS-197.
1160          */
1161         "000102030405060708090a0b0c0d0e0f",
1162         "00112233445566778899aabbccddeeff",
1163         "69c4e0d86a7b0430d8cdb78070b4c55a",
1164
1165         "000102030405060708090a0b0c0d0e0f1011121314151617",
1166         "00112233445566778899aabbccddeeff",
1167         "dda97ca4864cdfe06eaf70a0ec0d7191",
1168
1169         "000102030405060708090a0b0c0d0e0f101112131415161718191a1b1c1d1e1f",
1170         "00112233445566778899aabbccddeeff",
1171         "8ea2b7ca516745bfeafc49904b496089",
1172
1173         /*
1174          * From NIST validation suite (ECBVarTxt128.rsp).
1175          */
1176         "00000000000000000000000000000000",
1177         "80000000000000000000000000000000",
1178         "3ad78e726c1ec02b7ebfe92b23d9ec34",
1179
1180         "00000000000000000000000000000000",
1181         "c0000000000000000000000000000000",
1182         "aae5939c8efdf2f04e60b9fe7117b2c2",
1183
1184         "00000000000000000000000000000000",
1185         "e0000000000000000000000000000000",
1186         "f031d4d74f5dcbf39daaf8ca3af6e527",
1187
1188         "00000000000000000000000000000000",
1189         "f0000000000000000000000000000000",
1190         "96d9fd5cc4f07441727df0f33e401a36",
1191
1192         "00000000000000000000000000000000",
1193         "f8000000000000000000000000000000",
1194         "30ccdb044646d7e1f3ccea3dca08b8c0",
1195
1196         "00000000000000000000000000000000",
1197         "fc000000000000000000000000000000",
1198         "16ae4ce5042a67ee8e177b7c587ecc82",
1199
1200         "00000000000000000000000000000000",
1201         "fe000000000000000000000000000000",
1202         "b6da0bb11a23855d9c5cb1b4c6412e0a",
1203
1204         "00000000000000000000000000000000",
1205         "ff000000000000000000000000000000",
1206         "db4f1aa530967d6732ce4715eb0ee24b",
1207
1208         "00000000000000000000000000000000",
1209         "ff800000000000000000000000000000",
1210         "a81738252621dd180a34f3455b4baa2f",
1211
1212         "00000000000000000000000000000000",
1213         "ffc00000000000000000000000000000",
1214         "77e2b508db7fd89234caf7939ee5621a",
1215
1216         "00000000000000000000000000000000",
1217         "ffe00000000000000000000000000000",
1218         "b8499c251f8442ee13f0933b688fcd19",
1219
1220         "00000000000000000000000000000000",
1221         "fff00000000000000000000000000000",
1222         "965135f8a81f25c9d630b17502f68e53",
1223
1224         "00000000000000000000000000000000",
1225         "fff80000000000000000000000000000",
1226         "8b87145a01ad1c6cede995ea3670454f",
1227
1228         "00000000000000000000000000000000",
1229         "fffc0000000000000000000000000000",
1230         "8eae3b10a0c8ca6d1d3b0fa61e56b0b2",
1231
1232         "00000000000000000000000000000000",
1233         "fffe0000000000000000000000000000",
1234         "64b4d629810fda6bafdf08f3b0d8d2c5",
1235
1236         "00000000000000000000000000000000",
1237         "ffff0000000000000000000000000000",
1238         "d7e5dbd3324595f8fdc7d7c571da6c2a",
1239
1240         "00000000000000000000000000000000",
1241         "ffff8000000000000000000000000000",
1242         "f3f72375264e167fca9de2c1527d9606",
1243
1244         "00000000000000000000000000000000",
1245         "ffffc000000000000000000000000000",
1246         "8ee79dd4f401ff9b7ea945d86666c13b",
1247
1248         "00000000000000000000000000000000",
1249         "ffffe000000000000000000000000000",
1250         "dd35cea2799940b40db3f819cb94c08b",
1251
1252         "00000000000000000000000000000000",
1253         "fffff000000000000000000000000000",
1254         "6941cb6b3e08c2b7afa581ebdd607b87",
1255
1256         "00000000000000000000000000000000",
1257         "fffff800000000000000000000000000",
1258         "2c20f439f6bb097b29b8bd6d99aad799",
1259
1260         "00000000000000000000000000000000",
1261         "fffffc00000000000000000000000000",
1262         "625d01f058e565f77ae86378bd2c49b3",
1263
1264         "00000000000000000000000000000000",
1265         "fffffe00000000000000000000000000",
1266         "c0b5fd98190ef45fbb4301438d095950",
1267
1268         "00000000000000000000000000000000",
1269         "ffffff00000000000000000000000000",
1270         "13001ff5d99806efd25da34f56be854b",
1271
1272         "00000000000000000000000000000000",
1273         "ffffff80000000000000000000000000",
1274         "3b594c60f5c8277a5113677f94208d82",
1275
1276         "00000000000000000000000000000000",
1277         "ffffffc0000000000000000000000000",
1278         "e9c0fc1818e4aa46bd2e39d638f89e05",
1279
1280         "00000000000000000000000000000000",
1281         "ffffffe0000000000000000000000000",
1282         "f8023ee9c3fdc45a019b4e985c7e1a54",
1283
1284         "00000000000000000000000000000000",
1285         "fffffff0000000000000000000000000",
1286         "35f40182ab4662f3023baec1ee796b57",
1287
1288         "00000000000000000000000000000000",
1289         "fffffff8000000000000000000000000",
1290         "3aebbad7303649b4194a6945c6cc3694",
1291
1292         "00000000000000000000000000000000",
1293         "fffffffc000000000000000000000000",
1294         "a2124bea53ec2834279bed7f7eb0f938",
1295
1296         "00000000000000000000000000000000",
1297         "fffffffe000000000000000000000000",
1298         "b9fb4399fa4facc7309e14ec98360b0a",
1299
1300         "00000000000000000000000000000000",
1301         "ffffffff000000000000000000000000",
1302         "c26277437420c5d634f715aea81a9132",
1303
1304         "00000000000000000000000000000000",
1305         "ffffffff800000000000000000000000",
1306         "171a0e1b2dd424f0e089af2c4c10f32f",
1307
1308         "00000000000000000000000000000000",
1309         "ffffffffc00000000000000000000000",
1310         "7cadbe402d1b208fe735edce00aee7ce",
1311
1312         "00000000000000000000000000000000",
1313         "ffffffffe00000000000000000000000",
1314         "43b02ff929a1485af6f5c6d6558baa0f",
1315
1316         "00000000000000000000000000000000",
1317         "fffffffff00000000000000000000000",
1318         "092faacc9bf43508bf8fa8613ca75dea",
1319
1320         "00000000000000000000000000000000",
1321         "fffffffff80000000000000000000000",
1322         "cb2bf8280f3f9742c7ed513fe802629c",
1323
1324         "00000000000000000000000000000000",
1325         "fffffffffc0000000000000000000000",
1326         "215a41ee442fa992a6e323986ded3f68",
1327
1328         "00000000000000000000000000000000",
1329         "fffffffffe0000000000000000000000",
1330         "f21e99cf4f0f77cea836e11a2fe75fb1",
1331
1332         "00000000000000000000000000000000",
1333         "ffffffffff0000000000000000000000",
1334         "95e3a0ca9079e646331df8b4e70d2cd6",
1335
1336         "00000000000000000000000000000000",
1337         "ffffffffff8000000000000000000000",
1338         "4afe7f120ce7613f74fc12a01a828073",
1339
1340         "00000000000000000000000000000000",
1341         "ffffffffffc000000000000000000000",
1342         "827f000e75e2c8b9d479beed913fe678",
1343
1344         "00000000000000000000000000000000",
1345         "ffffffffffe000000000000000000000",
1346         "35830c8e7aaefe2d30310ef381cbf691",
1347
1348         "00000000000000000000000000000000",
1349         "fffffffffff000000000000000000000",
1350         "191aa0f2c8570144f38657ea4085ebe5",
1351
1352         "00000000000000000000000000000000",
1353         "fffffffffff800000000000000000000",
1354         "85062c2c909f15d9269b6c18ce99c4f0",
1355
1356         "00000000000000000000000000000000",
1357         "fffffffffffc00000000000000000000",
1358         "678034dc9e41b5a560ed239eeab1bc78",
1359
1360         "00000000000000000000000000000000",
1361         "fffffffffffe00000000000000000000",
1362         "c2f93a4ce5ab6d5d56f1b93cf19911c1",
1363
1364         "00000000000000000000000000000000",
1365         "ffffffffffff00000000000000000000",
1366         "1c3112bcb0c1dcc749d799743691bf82",
1367
1368         "00000000000000000000000000000000",
1369         "ffffffffffff80000000000000000000",
1370         "00c55bd75c7f9c881989d3ec1911c0d4",
1371
1372         "00000000000000000000000000000000",
1373         "ffffffffffffc0000000000000000000",
1374         "ea2e6b5ef182b7dff3629abd6a12045f",
1375
1376         "00000000000000000000000000000000",
1377         "ffffffffffffe0000000000000000000",
1378         "22322327e01780b17397f24087f8cc6f",
1379
1380         "00000000000000000000000000000000",
1381         "fffffffffffff0000000000000000000",
1382         "c9cacb5cd11692c373b2411768149ee7",
1383
1384         "00000000000000000000000000000000",
1385         "fffffffffffff8000000000000000000",
1386         "a18e3dbbca577860dab6b80da3139256",
1387
1388         "00000000000000000000000000000000",
1389         "fffffffffffffc000000000000000000",
1390         "79b61c37bf328ecca8d743265a3d425c",
1391
1392         "00000000000000000000000000000000",
1393         "fffffffffffffe000000000000000000",
1394         "d2d99c6bcc1f06fda8e27e8ae3f1ccc7",
1395
1396         "00000000000000000000000000000000",
1397         "ffffffffffffff000000000000000000",
1398         "1bfd4b91c701fd6b61b7f997829d663b",
1399
1400         "00000000000000000000000000000000",
1401         "ffffffffffffff800000000000000000",
1402         "11005d52f25f16bdc9545a876a63490a",
1403
1404         "00000000000000000000000000000000",
1405         "ffffffffffffffc00000000000000000",
1406         "3a4d354f02bb5a5e47d39666867f246a",
1407
1408         "00000000000000000000000000000000",
1409         "ffffffffffffffe00000000000000000",
1410         "d451b8d6e1e1a0ebb155fbbf6e7b7dc3",
1411
1412         "00000000000000000000000000000000",
1413         "fffffffffffffff00000000000000000",
1414         "6898d4f42fa7ba6a10ac05e87b9f2080",
1415
1416         "00000000000000000000000000000000",
1417         "fffffffffffffff80000000000000000",
1418         "b611295e739ca7d9b50f8e4c0e754a3f",
1419
1420         "00000000000000000000000000000000",
1421         "fffffffffffffffc0000000000000000",
1422         "7d33fc7d8abe3ca1936759f8f5deaf20",
1423
1424         "00000000000000000000000000000000",
1425         "fffffffffffffffe0000000000000000",
1426         "3b5e0f566dc96c298f0c12637539b25c",
1427
1428         "00000000000000000000000000000000",
1429         "ffffffffffffffff0000000000000000",
1430         "f807c3e7985fe0f5a50e2cdb25c5109e",
1431
1432         "00000000000000000000000000000000",
1433         "ffffffffffffffff8000000000000000",
1434         "41f992a856fb278b389a62f5d274d7e9",
1435
1436         "00000000000000000000000000000000",
1437         "ffffffffffffffffc000000000000000",
1438         "10d3ed7a6fe15ab4d91acbc7d0767ab1",
1439
1440         "00000000000000000000000000000000",
1441         "ffffffffffffffffe000000000000000",
1442         "21feecd45b2e675973ac33bf0c5424fc",
1443
1444         "00000000000000000000000000000000",
1445         "fffffffffffffffff000000000000000",
1446         "1480cb3955ba62d09eea668f7c708817",
1447
1448         "00000000000000000000000000000000",
1449         "fffffffffffffffff800000000000000",
1450         "66404033d6b72b609354d5496e7eb511",
1451
1452         "00000000000000000000000000000000",
1453         "fffffffffffffffffc00000000000000",
1454         "1c317a220a7d700da2b1e075b00266e1",
1455
1456         "00000000000000000000000000000000",
1457         "fffffffffffffffffe00000000000000",
1458         "ab3b89542233f1271bf8fd0c0f403545",
1459
1460         "00000000000000000000000000000000",
1461         "ffffffffffffffffff00000000000000",
1462         "d93eae966fac46dca927d6b114fa3f9e",
1463
1464         "00000000000000000000000000000000",
1465         "ffffffffffffffffff80000000000000",
1466         "1bdec521316503d9d5ee65df3ea94ddf",
1467
1468         "00000000000000000000000000000000",
1469         "ffffffffffffffffffc0000000000000",
1470         "eef456431dea8b4acf83bdae3717f75f",
1471
1472         "00000000000000000000000000000000",
1473         "ffffffffffffffffffe0000000000000",
1474         "06f2519a2fafaa596bfef5cfa15c21b9",
1475
1476         "00000000000000000000000000000000",
1477         "fffffffffffffffffff0000000000000",
1478         "251a7eac7e2fe809e4aa8d0d7012531a",
1479
1480         "00000000000000000000000000000000",
1481         "fffffffffffffffffff8000000000000",
1482         "3bffc16e4c49b268a20f8d96a60b4058",
1483
1484         "00000000000000000000000000000000",
1485         "fffffffffffffffffffc000000000000",
1486         "e886f9281999c5bb3b3e8862e2f7c988",
1487
1488         "00000000000000000000000000000000",
1489         "fffffffffffffffffffe000000000000",
1490         "563bf90d61beef39f48dd625fcef1361",
1491
1492         "00000000000000000000000000000000",
1493         "ffffffffffffffffffff000000000000",
1494         "4d37c850644563c69fd0acd9a049325b",
1495
1496         "00000000000000000000000000000000",
1497         "ffffffffffffffffffff800000000000",
1498         "b87c921b91829ef3b13ca541ee1130a6",
1499
1500         "00000000000000000000000000000000",
1501         "ffffffffffffffffffffc00000000000",
1502         "2e65eb6b6ea383e109accce8326b0393",
1503
1504         "00000000000000000000000000000000",
1505         "ffffffffffffffffffffe00000000000",
1506         "9ca547f7439edc3e255c0f4d49aa8990",
1507
1508         "00000000000000000000000000000000",
1509         "fffffffffffffffffffff00000000000",
1510         "a5e652614c9300f37816b1f9fd0c87f9",
1511
1512         "00000000000000000000000000000000",
1513         "fffffffffffffffffffff80000000000",
1514         "14954f0b4697776f44494fe458d814ed",
1515
1516         "00000000000000000000000000000000",
1517         "fffffffffffffffffffffc0000000000",
1518         "7c8d9ab6c2761723fe42f8bb506cbcf7",
1519
1520         "00000000000000000000000000000000",
1521         "fffffffffffffffffffffe0000000000",
1522         "db7e1932679fdd99742aab04aa0d5a80",
1523
1524         "00000000000000000000000000000000",
1525         "ffffffffffffffffffffff0000000000",
1526         "4c6a1c83e568cd10f27c2d73ded19c28",
1527
1528         "00000000000000000000000000000000",
1529         "ffffffffffffffffffffff8000000000",
1530         "90ecbe6177e674c98de412413f7ac915",
1531
1532         "00000000000000000000000000000000",
1533         "ffffffffffffffffffffffc000000000",
1534         "90684a2ac55fe1ec2b8ebd5622520b73",
1535
1536         "00000000000000000000000000000000",
1537         "ffffffffffffffffffffffe000000000",
1538         "7472f9a7988607ca79707795991035e6",
1539
1540         "00000000000000000000000000000000",
1541         "fffffffffffffffffffffff000000000",
1542         "56aff089878bf3352f8df172a3ae47d8",
1543
1544         "00000000000000000000000000000000",
1545         "fffffffffffffffffffffff800000000",
1546         "65c0526cbe40161b8019a2a3171abd23",
1547
1548         "00000000000000000000000000000000",
1549         "fffffffffffffffffffffffc00000000",
1550         "377be0be33b4e3e310b4aabda173f84f",
1551
1552         "00000000000000000000000000000000",
1553         "fffffffffffffffffffffffe00000000",
1554         "9402e9aa6f69de6504da8d20c4fcaa2f",
1555
1556         "00000000000000000000000000000000",
1557         "ffffffffffffffffffffffff00000000",
1558         "123c1f4af313ad8c2ce648b2e71fb6e1",
1559
1560         "00000000000000000000000000000000",
1561         "ffffffffffffffffffffffff80000000",
1562         "1ffc626d30203dcdb0019fb80f726cf4",
1563
1564         "00000000000000000000000000000000",
1565         "ffffffffffffffffffffffffc0000000",
1566         "76da1fbe3a50728c50fd2e621b5ad885",
1567
1568         "00000000000000000000000000000000",
1569         "ffffffffffffffffffffffffe0000000",
1570         "082eb8be35f442fb52668e16a591d1d6",
1571
1572         "00000000000000000000000000000000",
1573         "fffffffffffffffffffffffff0000000",
1574         "e656f9ecf5fe27ec3e4a73d00c282fb3",
1575
1576         "00000000000000000000000000000000",
1577         "fffffffffffffffffffffffff8000000",
1578         "2ca8209d63274cd9a29bb74bcd77683a",
1579
1580         "00000000000000000000000000000000",
1581         "fffffffffffffffffffffffffc000000",
1582         "79bf5dce14bb7dd73a8e3611de7ce026",
1583
1584         "00000000000000000000000000000000",
1585         "fffffffffffffffffffffffffe000000",
1586         "3c849939a5d29399f344c4a0eca8a576",
1587
1588         "00000000000000000000000000000000",
1589         "ffffffffffffffffffffffffff000000",
1590         "ed3c0a94d59bece98835da7aa4f07ca2",
1591
1592         "00000000000000000000000000000000",
1593         "ffffffffffffffffffffffffff800000",
1594         "63919ed4ce10196438b6ad09d99cd795",
1595
1596         "00000000000000000000000000000000",
1597         "ffffffffffffffffffffffffffc00000",
1598         "7678f3a833f19fea95f3c6029e2bc610",
1599
1600         "00000000000000000000000000000000",
1601         "ffffffffffffffffffffffffffe00000",
1602         "3aa426831067d36b92be7c5f81c13c56",
1603
1604         "00000000000000000000000000000000",
1605         "fffffffffffffffffffffffffff00000",
1606         "9272e2d2cdd11050998c845077a30ea0",
1607
1608         "00000000000000000000000000000000",
1609         "fffffffffffffffffffffffffff80000",
1610         "088c4b53f5ec0ff814c19adae7f6246c",
1611
1612         "00000000000000000000000000000000",
1613         "fffffffffffffffffffffffffffc0000",
1614         "4010a5e401fdf0a0354ddbcc0d012b17",
1615
1616         "00000000000000000000000000000000",
1617         "fffffffffffffffffffffffffffe0000",
1618         "a87a385736c0a6189bd6589bd8445a93",
1619
1620         "00000000000000000000000000000000",
1621         "ffffffffffffffffffffffffffff0000",
1622         "545f2b83d9616dccf60fa9830e9cd287",
1623
1624         "00000000000000000000000000000000",
1625         "ffffffffffffffffffffffffffff8000",
1626         "4b706f7f92406352394037a6d4f4688d",
1627
1628         "00000000000000000000000000000000",
1629         "ffffffffffffffffffffffffffffc000",
1630         "b7972b3941c44b90afa7b264bfba7387",
1631
1632         "00000000000000000000000000000000",
1633         "ffffffffffffffffffffffffffffe000",
1634         "6f45732cf10881546f0fd23896d2bb60",
1635
1636         "00000000000000000000000000000000",
1637         "fffffffffffffffffffffffffffff000",
1638         "2e3579ca15af27f64b3c955a5bfc30ba",
1639
1640         "00000000000000000000000000000000",
1641         "fffffffffffffffffffffffffffff800",
1642         "34a2c5a91ae2aec99b7d1b5fa6780447",
1643
1644         "00000000000000000000000000000000",
1645         "fffffffffffffffffffffffffffffc00",
1646         "a4d6616bd04f87335b0e53351227a9ee",
1647
1648         "00000000000000000000000000000000",
1649         "fffffffffffffffffffffffffffffe00",
1650         "7f692b03945867d16179a8cefc83ea3f",
1651
1652         "00000000000000000000000000000000",
1653         "ffffffffffffffffffffffffffffff00",
1654         "3bd141ee84a0e6414a26e7a4f281f8a2",
1655
1656         "00000000000000000000000000000000",
1657         "ffffffffffffffffffffffffffffff80",
1658         "d1788f572d98b2b16ec5d5f3922b99bc",
1659
1660         "00000000000000000000000000000000",
1661         "ffffffffffffffffffffffffffffffc0",
1662         "0833ff6f61d98a57b288e8c3586b85a6",
1663
1664         "00000000000000000000000000000000",
1665         "ffffffffffffffffffffffffffffffe0",
1666         "8568261797de176bf0b43becc6285afb",
1667
1668         "00000000000000000000000000000000",
1669         "fffffffffffffffffffffffffffffff0",
1670         "f9b0fda0c4a898f5b9e6f661c4ce4d07",
1671
1672         "00000000000000000000000000000000",
1673         "fffffffffffffffffffffffffffffff8",
1674         "8ade895913685c67c5269f8aae42983e",
1675
1676         "00000000000000000000000000000000",
1677         "fffffffffffffffffffffffffffffffc",
1678         "39bde67d5c8ed8a8b1c37eb8fa9f5ac0",
1679
1680         "00000000000000000000000000000000",
1681         "fffffffffffffffffffffffffffffffe",
1682         "5c005e72c1418c44f569f2ea33ba54f3",
1683
1684         "00000000000000000000000000000000",
1685         "ffffffffffffffffffffffffffffffff",
1686         "3f5b8cc9ea855a0afa7347d23e8d664e",
1687
1688         /*
1689          * From NIST validation suite (ECBVarTxt192.rsp).
1690          */
1691         "000000000000000000000000000000000000000000000000",
1692         "80000000000000000000000000000000",
1693         "6cd02513e8d4dc986b4afe087a60bd0c",
1694
1695         "000000000000000000000000000000000000000000000000",
1696         "c0000000000000000000000000000000",
1697         "2ce1f8b7e30627c1c4519eada44bc436",
1698
1699         "000000000000000000000000000000000000000000000000",
1700         "e0000000000000000000000000000000",
1701         "9946b5f87af446f5796c1fee63a2da24",
1702
1703         "000000000000000000000000000000000000000000000000",
1704         "f0000000000000000000000000000000",
1705         "2a560364ce529efc21788779568d5555",
1706
1707         "000000000000000000000000000000000000000000000000",
1708         "f8000000000000000000000000000000",
1709         "35c1471837af446153bce55d5ba72a0a",
1710
1711         "000000000000000000000000000000000000000000000000",
1712         "fc000000000000000000000000000000",
1713         "ce60bc52386234f158f84341e534cd9e",
1714
1715         "000000000000000000000000000000000000000000000000",
1716         "fe000000000000000000000000000000",
1717         "8c7c27ff32bcf8dc2dc57c90c2903961",
1718
1719         "000000000000000000000000000000000000000000000000",
1720         "ff000000000000000000000000000000",
1721         "32bb6a7ec84499e166f936003d55a5bb",
1722
1723         "000000000000000000000000000000000000000000000000",
1724         "ff800000000000000000000000000000",
1725         "a5c772e5c62631ef660ee1d5877f6d1b",
1726
1727         "000000000000000000000000000000000000000000000000",
1728         "ffc00000000000000000000000000000",
1729         "030d7e5b64f380a7e4ea5387b5cd7f49",
1730
1731         "000000000000000000000000000000000000000000000000",
1732         "ffe00000000000000000000000000000",
1733         "0dc9a2610037009b698f11bb7e86c83e",
1734
1735         "000000000000000000000000000000000000000000000000",
1736         "fff00000000000000000000000000000",
1737         "0046612c766d1840c226364f1fa7ed72",
1738
1739         "000000000000000000000000000000000000000000000000",
1740         "fff80000000000000000000000000000",
1741         "4880c7e08f27befe78590743c05e698b",
1742
1743         "000000000000000000000000000000000000000000000000",
1744         "fffc0000000000000000000000000000",
1745         "2520ce829a26577f0f4822c4ecc87401",
1746
1747         "000000000000000000000000000000000000000000000000",
1748         "fffe0000000000000000000000000000",
1749         "8765e8acc169758319cb46dc7bcf3dca",
1750
1751         "000000000000000000000000000000000000000000000000",
1752         "ffff0000000000000000000000000000",
1753         "e98f4ba4f073df4baa116d011dc24a28",
1754
1755         "000000000000000000000000000000000000000000000000",
1756         "ffff8000000000000000000000000000",
1757         "f378f68c5dbf59e211b3a659a7317d94",
1758
1759         "000000000000000000000000000000000000000000000000",
1760         "ffffc000000000000000000000000000",
1761         "283d3b069d8eb9fb432d74b96ca762b4",
1762
1763         "000000000000000000000000000000000000000000000000",
1764         "ffffe000000000000000000000000000",
1765         "a7e1842e8a87861c221a500883245c51",
1766
1767         "000000000000000000000000000000000000000000000000",
1768         "fffff000000000000000000000000000",
1769         "77aa270471881be070fb52c7067ce732",
1770
1771         "000000000000000000000000000000000000000000000000",
1772         "fffff800000000000000000000000000",
1773         "01b0f476d484f43f1aeb6efa9361a8ac",
1774
1775         "000000000000000000000000000000000000000000000000",
1776         "fffffc00000000000000000000000000",
1777         "1c3a94f1c052c55c2d8359aff2163b4f",
1778
1779         "000000000000000000000000000000000000000000000000",
1780         "fffffe00000000000000000000000000",
1781         "e8a067b604d5373d8b0f2e05a03b341b",
1782
1783         "000000000000000000000000000000000000000000000000",
1784         "ffffff00000000000000000000000000",
1785         "a7876ec87f5a09bfea42c77da30fd50e",
1786
1787         "000000000000000000000000000000000000000000000000",
1788         "ffffff80000000000000000000000000",
1789         "0cf3e9d3a42be5b854ca65b13f35f48d",
1790
1791         "000000000000000000000000000000000000000000000000",
1792         "ffffffc0000000000000000000000000",
1793         "6c62f6bbcab7c3e821c9290f08892dda",
1794
1795         "000000000000000000000000000000000000000000000000",
1796         "ffffffe0000000000000000000000000",
1797         "7f5e05bd2068738196fee79ace7e3aec",
1798
1799         "000000000000000000000000000000000000000000000000",
1800         "fffffff0000000000000000000000000",
1801         "440e0d733255cda92fb46e842fe58054",
1802
1803         "000000000000000000000000000000000000000000000000",
1804         "fffffff8000000000000000000000000",
1805         "aa5d5b1c4ea1b7a22e5583ac2e9ed8a7",
1806
1807         "000000000000000000000000000000000000000000000000",
1808         "fffffffc000000000000000000000000",
1809         "77e537e89e8491e8662aae3bc809421d",
1810
1811         "000000000000000000000000000000000000000000000000",
1812         "fffffffe000000000000000000000000",
1813         "997dd3e9f1598bfa73f75973f7e93b76",
1814
1815         "000000000000000000000000000000000000000000000000",
1816         "ffffffff000000000000000000000000",
1817         "1b38d4f7452afefcb7fc721244e4b72e",
1818
1819         "000000000000000000000000000000000000000000000000",
1820         "ffffffff800000000000000000000000",
1821         "0be2b18252e774dda30cdda02c6906e3",
1822
1823         "000000000000000000000000000000000000000000000000",
1824         "ffffffffc00000000000000000000000",
1825         "d2695e59c20361d82652d7d58b6f11b2",
1826
1827         "000000000000000000000000000000000000000000000000",
1828         "ffffffffe00000000000000000000000",
1829         "902d88d13eae52089abd6143cfe394e9",
1830
1831         "000000000000000000000000000000000000000000000000",
1832         "fffffffff00000000000000000000000",
1833         "d49bceb3b823fedd602c305345734bd2",
1834
1835         "000000000000000000000000000000000000000000000000",
1836         "fffffffff80000000000000000000000",
1837         "707b1dbb0ffa40ef7d95def421233fae",
1838
1839         "000000000000000000000000000000000000000000000000",
1840         "fffffffffc0000000000000000000000",
1841         "7ca0c1d93356d9eb8aa952084d75f913",
1842
1843         "000000000000000000000000000000000000000000000000",
1844         "fffffffffe0000000000000000000000",
1845         "f2cbf9cb186e270dd7bdb0c28febc57d",
1846
1847         "000000000000000000000000000000000000000000000000",
1848         "ffffffffff0000000000000000000000",
1849         "c94337c37c4e790ab45780bd9c3674a0",
1850
1851         "000000000000000000000000000000000000000000000000",
1852         "ffffffffff8000000000000000000000",
1853         "8e3558c135252fb9c9f367ed609467a1",
1854
1855         "000000000000000000000000000000000000000000000000",
1856         "ffffffffffc000000000000000000000",
1857         "1b72eeaee4899b443914e5b3a57fba92",
1858
1859         "000000000000000000000000000000000000000000000000",
1860         "ffffffffffe000000000000000000000",
1861         "011865f91bc56868d051e52c9efd59b7",
1862
1863         "000000000000000000000000000000000000000000000000",
1864         "fffffffffff000000000000000000000",
1865         "e4771318ad7a63dd680f6e583b7747ea",
1866
1867         "000000000000000000000000000000000000000000000000",
1868         "fffffffffff800000000000000000000",
1869         "61e3d194088dc8d97e9e6db37457eac5",
1870
1871         "000000000000000000000000000000000000000000000000",
1872         "fffffffffffc00000000000000000000",
1873         "36ff1ec9ccfbc349e5d356d063693ad6",
1874
1875         "000000000000000000000000000000000000000000000000",
1876         "fffffffffffe00000000000000000000",
1877         "3cc9e9a9be8cc3f6fb2ea24088e9bb19",
1878
1879         "000000000000000000000000000000000000000000000000",
1880         "ffffffffffff00000000000000000000",
1881         "1ee5ab003dc8722e74905d9a8fe3d350",
1882
1883         "000000000000000000000000000000000000000000000000",
1884         "ffffffffffff80000000000000000000",
1885         "245339319584b0a412412869d6c2eada",
1886
1887         "000000000000000000000000000000000000000000000000",
1888         "ffffffffffffc0000000000000000000",
1889         "7bd496918115d14ed5380852716c8814",
1890
1891         "000000000000000000000000000000000000000000000000",
1892         "ffffffffffffe0000000000000000000",
1893         "273ab2f2b4a366a57d582a339313c8b1",
1894
1895         "000000000000000000000000000000000000000000000000",
1896         "fffffffffffff0000000000000000000",
1897         "113365a9ffbe3b0ca61e98507554168b",
1898
1899         "000000000000000000000000000000000000000000000000",
1900         "fffffffffffff8000000000000000000",
1901         "afa99c997ac478a0dea4119c9e45f8b1",
1902
1903         "000000000000000000000000000000000000000000000000",
1904         "fffffffffffffc000000000000000000",
1905         "9216309a7842430b83ffb98638011512",
1906
1907         "000000000000000000000000000000000000000000000000",
1908         "fffffffffffffe000000000000000000",
1909         "62abc792288258492a7cb45145f4b759",
1910
1911         "000000000000000000000000000000000000000000000000",
1912         "ffffffffffffff000000000000000000",
1913         "534923c169d504d7519c15d30e756c50",
1914
1915         "000000000000000000000000000000000000000000000000",
1916         "ffffffffffffff800000000000000000",
1917         "fa75e05bcdc7e00c273fa33f6ee441d2",
1918
1919         "000000000000000000000000000000000000000000000000",
1920         "ffffffffffffffc00000000000000000",
1921         "7d350fa6057080f1086a56b17ec240db",
1922
1923         "000000000000000000000000000000000000000000000000",
1924         "ffffffffffffffe00000000000000000",
1925         "f34e4a6324ea4a5c39a661c8fe5ada8f",
1926
1927         "000000000000000000000000000000000000000000000000",
1928         "fffffffffffffff00000000000000000",
1929         "0882a16f44088d42447a29ac090ec17e",
1930
1931         "000000000000000000000000000000000000000000000000",
1932         "fffffffffffffff80000000000000000",
1933         "3a3c15bfc11a9537c130687004e136ee",
1934
1935         "000000000000000000000000000000000000000000000000",
1936         "fffffffffffffffc0000000000000000",
1937         "22c0a7678dc6d8cf5c8a6d5a9960767c",
1938
1939         "000000000000000000000000000000000000000000000000",
1940         "fffffffffffffffe0000000000000000",
1941         "b46b09809d68b9a456432a79bdc2e38c",
1942
1943         "000000000000000000000000000000000000000000000000",
1944         "ffffffffffffffff0000000000000000",
1945         "93baaffb35fbe739c17c6ac22eecf18f",
1946
1947         "000000000000000000000000000000000000000000000000",
1948         "ffffffffffffffff8000000000000000",
1949         "c8aa80a7850675bc007c46df06b49868",
1950
1951         "000000000000000000000000000000000000000000000000",
1952         "ffffffffffffffffc000000000000000",
1953         "12c6f3877af421a918a84b775858021d",
1954
1955         "000000000000000000000000000000000000000000000000",
1956         "ffffffffffffffffe000000000000000",
1957         "33f123282c5d633924f7d5ba3f3cab11",
1958
1959         "000000000000000000000000000000000000000000000000",
1960         "fffffffffffffffff000000000000000",
1961         "a8f161002733e93ca4527d22c1a0c5bb",
1962
1963         "000000000000000000000000000000000000000000000000",
1964         "fffffffffffffffff800000000000000",
1965         "b72f70ebf3e3fda23f508eec76b42c02",
1966
1967         "000000000000000000000000000000000000000000000000",
1968         "fffffffffffffffffc00000000000000",
1969         "6a9d965e6274143f25afdcfc88ffd77c",
1970
1971         "000000000000000000000000000000000000000000000000",
1972         "fffffffffffffffffe00000000000000",
1973         "a0c74fd0b9361764ce91c5200b095357",
1974
1975         "000000000000000000000000000000000000000000000000",
1976         "ffffffffffffffffff00000000000000",
1977         "091d1fdc2bd2c346cd5046a8c6209146",
1978
1979         "000000000000000000000000000000000000000000000000",
1980         "ffffffffffffffffff80000000000000",
1981         "e2a37580116cfb71856254496ab0aca8",
1982
1983         "000000000000000000000000000000000000000000000000",
1984         "ffffffffffffffffffc0000000000000",
1985         "e0b3a00785917c7efc9adba322813571",
1986
1987         "000000000000000000000000000000000000000000000000",
1988         "ffffffffffffffffffe0000000000000",
1989         "733d41f4727b5ef0df4af4cf3cffa0cb",
1990
1991         "000000000000000000000000000000000000000000000000",
1992         "fffffffffffffffffff0000000000000",
1993         "a99ebb030260826f981ad3e64490aa4f",
1994
1995         "000000000000000000000000000000000000000000000000",
1996         "fffffffffffffffffff8000000000000",
1997         "73f34c7d3eae5e80082c1647524308ee",
1998
1999         "000000000000000000000000000000000000000000000000",
2000         "fffffffffffffffffffc000000000000",
2001         "40ebd5ad082345b7a2097ccd3464da02",
2002
2003         "000000000000000000000000000000000000000000000000",
2004         "fffffffffffffffffffe000000000000",
2005         "7cc4ae9a424b2cec90c97153c2457ec5",
2006
2007         "000000000000000000000000000000000000000000000000",
2008         "ffffffffffffffffffff000000000000",
2009         "54d632d03aba0bd0f91877ebdd4d09cb",
2010
2011         "000000000000000000000000000000000000000000000000",
2012         "ffffffffffffffffffff800000000000",
2013         "d3427be7e4d27cd54f5fe37b03cf0897",
2014
2015         "000000000000000000000000000000000000000000000000",
2016         "ffffffffffffffffffffc00000000000",
2017         "b2099795e88cc158fd75ea133d7e7fbe",
2018
2019         "000000000000000000000000000000000000000000000000",
2020         "ffffffffffffffffffffe00000000000",
2021         "a6cae46fb6fadfe7a2c302a34242817b",
2022
2023         "000000000000000000000000000000000000000000000000",
2024         "fffffffffffffffffffff00000000000",
2025         "026a7024d6a902e0b3ffccbaa910cc3f",
2026
2027         "000000000000000000000000000000000000000000000000",
2028         "fffffffffffffffffffff80000000000",
2029         "156f07767a85a4312321f63968338a01",
2030
2031         "000000000000000000000000000000000000000000000000",
2032         "fffffffffffffffffffffc0000000000",
2033         "15eec9ebf42b9ca76897d2cd6c5a12e2",
2034
2035         "000000000000000000000000000000000000000000000000",
2036         "fffffffffffffffffffffe0000000000",
2037         "db0d3a6fdcc13f915e2b302ceeb70fd8",
2038
2039         "000000000000000000000000000000000000000000000000",
2040         "ffffffffffffffffffffff0000000000",
2041         "71dbf37e87a2e34d15b20e8f10e48924",
2042
2043         "000000000000000000000000000000000000000000000000",
2044         "ffffffffffffffffffffff8000000000",
2045         "c745c451e96ff3c045e4367c833e3b54",
2046
2047         "000000000000000000000000000000000000000000000000",
2048         "ffffffffffffffffffffffc000000000",
2049         "340da09c2dd11c3b679d08ccd27dd595",
2050
2051         "000000000000000000000000000000000000000000000000",
2052         "ffffffffffffffffffffffe000000000",
2053         "8279f7c0c2a03ee660c6d392db025d18",
2054
2055         "000000000000000000000000000000000000000000000000",
2056         "fffffffffffffffffffffff000000000",
2057         "a4b2c7d8eba531ff47c5041a55fbd1ec",
2058
2059         "000000000000000000000000000000000000000000000000",
2060         "fffffffffffffffffffffff800000000",
2061         "74569a2ca5a7bd5131ce8dc7cbfbf72f",
2062
2063         "000000000000000000000000000000000000000000000000",
2064         "fffffffffffffffffffffffc00000000",
2065         "3713da0c0219b63454035613b5a403dd",
2066
2067         "000000000000000000000000000000000000000000000000",
2068         "fffffffffffffffffffffffe00000000",
2069         "8827551ddcc9df23fa72a3de4e9f0b07",
2070
2071         "000000000000000000000000000000000000000000000000",
2072         "ffffffffffffffffffffffff00000000",
2073         "2e3febfd625bfcd0a2c06eb460da1732",
2074
2075         "000000000000000000000000000000000000000000000000",
2076         "ffffffffffffffffffffffff80000000",
2077         "ee82e6ba488156f76496311da6941deb",
2078
2079         "000000000000000000000000000000000000000000000000",
2080         "ffffffffffffffffffffffffc0000000",
2081         "4770446f01d1f391256e85a1b30d89d3",
2082
2083         "000000000000000000000000000000000000000000000000",
2084         "ffffffffffffffffffffffffe0000000",
2085         "af04b68f104f21ef2afb4767cf74143c",
2086
2087         "000000000000000000000000000000000000000000000000",
2088         "fffffffffffffffffffffffff0000000",
2089         "cf3579a9ba38c8e43653173e14f3a4c6",
2090
2091         "000000000000000000000000000000000000000000000000",
2092         "fffffffffffffffffffffffff8000000",
2093         "b3bba904f4953e09b54800af2f62e7d4",
2094
2095         "000000000000000000000000000000000000000000000000",
2096         "fffffffffffffffffffffffffc000000",
2097         "fc4249656e14b29eb9c44829b4c59a46",
2098
2099         "000000000000000000000000000000000000000000000000",
2100         "fffffffffffffffffffffffffe000000",
2101         "9b31568febe81cfc2e65af1c86d1a308",
2102
2103         "000000000000000000000000000000000000000000000000",
2104         "ffffffffffffffffffffffffff000000",
2105         "9ca09c25f273a766db98a480ce8dfedc",
2106
2107         "000000000000000000000000000000000000000000000000",
2108         "ffffffffffffffffffffffffff800000",
2109         "b909925786f34c3c92d971883c9fbedf",
2110
2111         "000000000000000000000000000000000000000000000000",
2112         "ffffffffffffffffffffffffffc00000",
2113         "82647f1332fe570a9d4d92b2ee771d3b",
2114
2115         "000000000000000000000000000000000000000000000000",
2116         "ffffffffffffffffffffffffffe00000",
2117         "3604a7e80832b3a99954bca6f5b9f501",
2118
2119         "000000000000000000000000000000000000000000000000",
2120         "fffffffffffffffffffffffffff00000",
2121         "884607b128c5de3ab39a529a1ef51bef",
2122
2123         "000000000000000000000000000000000000000000000000",
2124         "fffffffffffffffffffffffffff80000",
2125         "670cfa093d1dbdb2317041404102435e",
2126
2127         "000000000000000000000000000000000000000000000000",
2128         "fffffffffffffffffffffffffffc0000",
2129         "7a867195f3ce8769cbd336502fbb5130",
2130
2131         "000000000000000000000000000000000000000000000000",
2132         "fffffffffffffffffffffffffffe0000",
2133         "52efcf64c72b2f7ca5b3c836b1078c15",
2134
2135         "000000000000000000000000000000000000000000000000",
2136         "ffffffffffffffffffffffffffff0000",
2137         "4019250f6eefb2ac5ccbcae044e75c7e",
2138
2139         "000000000000000000000000000000000000000000000000",
2140         "ffffffffffffffffffffffffffff8000",
2141         "022c4f6f5a017d292785627667ddef24",
2142
2143         "000000000000000000000000000000000000000000000000",
2144         "ffffffffffffffffffffffffffffc000",
2145         "e9c21078a2eb7e03250f71000fa9e3ed",
2146
2147         "000000000000000000000000000000000000000000000000",
2148         "ffffffffffffffffffffffffffffe000",
2149         "a13eaeeb9cd391da4e2b09490b3e7fad",
2150
2151         "000000000000000000000000000000000000000000000000",
2152         "fffffffffffffffffffffffffffff000",
2153         "c958a171dca1d4ed53e1af1d380803a9",
2154
2155         "000000000000000000000000000000000000000000000000",
2156         "fffffffffffffffffffffffffffff800",
2157         "21442e07a110667f2583eaeeee44dc8c",
2158
2159         "000000000000000000000000000000000000000000000000",
2160         "fffffffffffffffffffffffffffffc00",
2161         "59bbb353cf1dd867a6e33737af655e99",
2162
2163         "000000000000000000000000000000000000000000000000",
2164         "fffffffffffffffffffffffffffffe00",
2165         "43cd3b25375d0ce41087ff9fe2829639",
2166
2167         "000000000000000000000000000000000000000000000000",
2168         "ffffffffffffffffffffffffffffff00",
2169         "6b98b17e80d1118e3516bd768b285a84",
2170
2171         "000000000000000000000000000000000000000000000000",
2172         "ffffffffffffffffffffffffffffff80",
2173         "ae47ed3676ca0c08deea02d95b81db58",
2174
2175         "000000000000000000000000000000000000000000000000",
2176         "ffffffffffffffffffffffffffffffc0",
2177         "34ec40dc20413795ed53628ea748720b",
2178
2179         "000000000000000000000000000000000000000000000000",
2180         "ffffffffffffffffffffffffffffffe0",
2181         "4dc68163f8e9835473253542c8a65d46",
2182
2183         "000000000000000000000000000000000000000000000000",
2184         "fffffffffffffffffffffffffffffff0",
2185         "2aabb999f43693175af65c6c612c46fb",
2186
2187         "000000000000000000000000000000000000000000000000",
2188         "fffffffffffffffffffffffffffffff8",
2189         "e01f94499dac3547515c5b1d756f0f58",
2190
2191         "000000000000000000000000000000000000000000000000",
2192         "fffffffffffffffffffffffffffffffc",
2193         "9d12435a46480ce00ea349f71799df9a",
2194
2195         "000000000000000000000000000000000000000000000000",
2196         "fffffffffffffffffffffffffffffffe",
2197         "cef41d16d266bdfe46938ad7884cc0cf",
2198
2199         "000000000000000000000000000000000000000000000000",
2200         "ffffffffffffffffffffffffffffffff",
2201         "b13db4da1f718bc6904797c82bcf2d32",
2202
2203         /*
2204          * From NIST validation suite (ECBVarTxt256.rsp).
2205          */
2206         "0000000000000000000000000000000000000000000000000000000000000000",
2207         "80000000000000000000000000000000",
2208         "ddc6bf790c15760d8d9aeb6f9a75fd4e",
2209
2210         "0000000000000000000000000000000000000000000000000000000000000000",
2211         "c0000000000000000000000000000000",
2212         "0a6bdc6d4c1e6280301fd8e97ddbe601",
2213
2214         "0000000000000000000000000000000000000000000000000000000000000000",
2215         "e0000000000000000000000000000000",
2216         "9b80eefb7ebe2d2b16247aa0efc72f5d",
2217
2218         "0000000000000000000000000000000000000000000000000000000000000000",
2219         "f0000000000000000000000000000000",
2220         "7f2c5ece07a98d8bee13c51177395ff7",
2221
2222         "0000000000000000000000000000000000000000000000000000000000000000",
2223         "f8000000000000000000000000000000",
2224         "7818d800dcf6f4be1e0e94f403d1e4c2",
2225
2226         "0000000000000000000000000000000000000000000000000000000000000000",
2227         "fc000000000000000000000000000000",
2228         "e74cd1c92f0919c35a0324123d6177d3",
2229
2230         "0000000000000000000000000000000000000000000000000000000000000000",
2231         "fe000000000000000000000000000000",
2232         "8092a4dcf2da7e77e93bdd371dfed82e",
2233
2234         "0000000000000000000000000000000000000000000000000000000000000000",
2235         "ff000000000000000000000000000000",
2236         "49af6b372135acef10132e548f217b17",
2237
2238         "0000000000000000000000000000000000000000000000000000000000000000",
2239         "ff800000000000000000000000000000",
2240         "8bcd40f94ebb63b9f7909676e667f1e7",
2241
2242         "0000000000000000000000000000000000000000000000000000000000000000",
2243         "ffc00000000000000000000000000000",
2244         "fe1cffb83f45dcfb38b29be438dbd3ab",
2245
2246         "0000000000000000000000000000000000000000000000000000000000000000",
2247         "ffe00000000000000000000000000000",
2248         "0dc58a8d886623705aec15cb1e70dc0e",
2249
2250         "0000000000000000000000000000000000000000000000000000000000000000",
2251         "fff00000000000000000000000000000",
2252         "c218faa16056bd0774c3e8d79c35a5e4",
2253
2254         "0000000000000000000000000000000000000000000000000000000000000000",
2255         "fff80000000000000000000000000000",
2256         "047bba83f7aa841731504e012208fc9e",
2257
2258         "0000000000000000000000000000000000000000000000000000000000000000",
2259         "fffc0000000000000000000000000000",
2260         "dc8f0e4915fd81ba70a331310882f6da",
2261
2262         "0000000000000000000000000000000000000000000000000000000000000000",
2263         "fffe0000000000000000000000000000",
2264         "1569859ea6b7206c30bf4fd0cbfac33c",
2265
2266         "0000000000000000000000000000000000000000000000000000000000000000",
2267         "ffff0000000000000000000000000000",
2268         "300ade92f88f48fa2df730ec16ef44cd",
2269
2270         "0000000000000000000000000000000000000000000000000000000000000000",
2271         "ffff8000000000000000000000000000",
2272         "1fe6cc3c05965dc08eb0590c95ac71d0",
2273
2274         "0000000000000000000000000000000000000000000000000000000000000000",
2275         "ffffc000000000000000000000000000",
2276         "59e858eaaa97fec38111275b6cf5abc0",
2277
2278         "0000000000000000000000000000000000000000000000000000000000000000",
2279         "ffffe000000000000000000000000000",
2280         "2239455e7afe3b0616100288cc5a723b",
2281
2282         "0000000000000000000000000000000000000000000000000000000000000000",
2283         "fffff000000000000000000000000000",
2284         "3ee500c5c8d63479717163e55c5c4522",
2285
2286         "0000000000000000000000000000000000000000000000000000000000000000",
2287         "fffff800000000000000000000000000",
2288         "d5e38bf15f16d90e3e214041d774daa8",
2289
2290         "0000000000000000000000000000000000000000000000000000000000000000",
2291         "fffffc00000000000000000000000000",
2292         "b1f4066e6f4f187dfe5f2ad1b17819d0",
2293
2294         "0000000000000000000000000000000000000000000000000000000000000000",
2295         "fffffe00000000000000000000000000",
2296         "6ef4cc4de49b11065d7af2909854794a",
2297
2298         "0000000000000000000000000000000000000000000000000000000000000000",
2299         "ffffff00000000000000000000000000",
2300         "ac86bc606b6640c309e782f232bf367f",
2301
2302         "0000000000000000000000000000000000000000000000000000000000000000",
2303         "ffffff80000000000000000000000000",
2304         "36aff0ef7bf3280772cf4cac80a0d2b2",
2305
2306         "0000000000000000000000000000000000000000000000000000000000000000",
2307         "ffffffc0000000000000000000000000",
2308         "1f8eedea0f62a1406d58cfc3ecea72cf",
2309
2310         "0000000000000000000000000000000000000000000000000000000000000000",
2311         "ffffffe0000000000000000000000000",
2312         "abf4154a3375a1d3e6b1d454438f95a6",
2313
2314         "0000000000000000000000000000000000000000000000000000000000000000",
2315         "fffffff0000000000000000000000000",
2316         "96f96e9d607f6615fc192061ee648b07",
2317
2318         "0000000000000000000000000000000000000000000000000000000000000000",
2319         "fffffff8000000000000000000000000",
2320         "cf37cdaaa0d2d536c71857634c792064",
2321
2322         "0000000000000000000000000000000000000000000000000000000000000000",
2323         "fffffffc000000000000000000000000",
2324         "fbd6640c80245c2b805373f130703127",
2325
2326         "0000000000000000000000000000000000000000000000000000000000000000",
2327         "fffffffe000000000000000000000000",
2328         "8d6a8afe55a6e481badae0d146f436db",
2329
2330         "0000000000000000000000000000000000000000000000000000000000000000",
2331         "ffffffff000000000000000000000000",
2332         "6a4981f2915e3e68af6c22385dd06756",
2333
2334         "0000000000000000000000000000000000000000000000000000000000000000",
2335         "ffffffff800000000000000000000000",
2336         "42a1136e5f8d8d21d3101998642d573b",
2337
2338         "0000000000000000000000000000000000000000000000000000000000000000",
2339         "ffffffffc00000000000000000000000",
2340         "9b471596dc69ae1586cee6158b0b0181",
2341
2342         "0000000000000000000000000000000000000000000000000000000000000000",
2343         "ffffffffe00000000000000000000000",
2344         "753665c4af1eff33aa8b628bf8741cfd",
2345
2346         "0000000000000000000000000000000000000000000000000000000000000000",
2347         "fffffffff00000000000000000000000",
2348         "9a682acf40be01f5b2a4193c9a82404d",
2349
2350         "0000000000000000000000000000000000000000000000000000000000000000",
2351         "fffffffff80000000000000000000000",
2352         "54fafe26e4287f17d1935f87eb9ade01",
2353
2354         "0000000000000000000000000000000000000000000000000000000000000000",
2355         "fffffffffc0000000000000000000000",
2356         "49d541b2e74cfe73e6a8e8225f7bd449",
2357
2358         "0000000000000000000000000000000000000000000000000000000000000000",
2359         "fffffffffe0000000000000000000000",
2360         "11a45530f624ff6f76a1b3826626ff7b",
2361
2362         "0000000000000000000000000000000000000000000000000000000000000000",
2363         "ffffffffff0000000000000000000000",
2364         "f96b0c4a8bc6c86130289f60b43b8fba",
2365
2366         "0000000000000000000000000000000000000000000000000000000000000000",
2367         "ffffffffff8000000000000000000000",
2368         "48c7d0e80834ebdc35b6735f76b46c8b",
2369
2370         "0000000000000000000000000000000000000000000000000000000000000000",
2371         "ffffffffffc000000000000000000000",
2372         "2463531ab54d66955e73edc4cb8eaa45",
2373
2374         "0000000000000000000000000000000000000000000000000000000000000000",
2375         "ffffffffffe000000000000000000000",
2376         "ac9bd8e2530469134b9d5b065d4f565b",
2377
2378         "0000000000000000000000000000000000000000000000000000000000000000",
2379         "fffffffffff000000000000000000000",
2380         "3f5f9106d0e52f973d4890e6f37e8a00",
2381
2382         "0000000000000000000000000000000000000000000000000000000000000000",
2383         "fffffffffff800000000000000000000",
2384         "20ebc86f1304d272e2e207e59db639f0",
2385
2386         "0000000000000000000000000000000000000000000000000000000000000000",
2387         "fffffffffffc00000000000000000000",
2388         "e67ae6426bf9526c972cff072b52252c",
2389
2390         "0000000000000000000000000000000000000000000000000000000000000000",
2391         "fffffffffffe00000000000000000000",
2392         "1a518dddaf9efa0d002cc58d107edfc8",
2393
2394         "0000000000000000000000000000000000000000000000000000000000000000",
2395         "ffffffffffff00000000000000000000",
2396         "ead731af4d3a2fe3b34bed047942a49f",
2397
2398         "0000000000000000000000000000000000000000000000000000000000000000",
2399         "ffffffffffff80000000000000000000",
2400         "b1d4efe40242f83e93b6c8d7efb5eae9",
2401
2402         "0000000000000000000000000000000000000000000000000000000000000000",
2403         "ffffffffffffc0000000000000000000",
2404         "cd2b1fec11fd906c5c7630099443610a",
2405
2406         "0000000000000000000000000000000000000000000000000000000000000000",
2407         "ffffffffffffe0000000000000000000",
2408         "a1853fe47fe29289d153161d06387d21",
2409
2410         "0000000000000000000000000000000000000000000000000000000000000000",
2411         "fffffffffffff0000000000000000000",
2412         "4632154179a555c17ea604d0889fab14",
2413
2414         "0000000000000000000000000000000000000000000000000000000000000000",
2415         "fffffffffffff8000000000000000000",
2416         "dd27cac6401a022e8f38f9f93e774417",
2417
2418         "0000000000000000000000000000000000000000000000000000000000000000",
2419         "fffffffffffffc000000000000000000",
2420         "c090313eb98674f35f3123385fb95d4d",
2421
2422         "0000000000000000000000000000000000000000000000000000000000000000",
2423         "fffffffffffffe000000000000000000",
2424         "cc3526262b92f02edce548f716b9f45c",
2425
2426         "0000000000000000000000000000000000000000000000000000000000000000",
2427         "ffffffffffffff000000000000000000",
2428         "c0838d1a2b16a7c7f0dfcc433c399c33",
2429
2430         "0000000000000000000000000000000000000000000000000000000000000000",
2431         "ffffffffffffff800000000000000000",
2432         "0d9ac756eb297695eed4d382eb126d26",
2433
2434         "0000000000000000000000000000000000000000000000000000000000000000",
2435         "ffffffffffffffc00000000000000000",
2436         "56ede9dda3f6f141bff1757fa689c3e1",
2437
2438         "0000000000000000000000000000000000000000000000000000000000000000",
2439         "ffffffffffffffe00000000000000000",
2440         "768f520efe0f23e61d3ec8ad9ce91774",
2441
2442         "0000000000000000000000000000000000000000000000000000000000000000",
2443         "fffffffffffffff00000000000000000",
2444         "b1144ddfa75755213390e7c596660490",
2445
2446         "0000000000000000000000000000000000000000000000000000000000000000",
2447         "fffffffffffffff80000000000000000",
2448         "1d7c0c4040b355b9d107a99325e3b050",
2449
2450         "0000000000000000000000000000000000000000000000000000000000000000",
2451         "fffffffffffffffc0000000000000000",
2452         "d8e2bb1ae8ee3dcf5bf7d6c38da82a1a",
2453
2454         "0000000000000000000000000000000000000000000000000000000000000000",
2455         "fffffffffffffffe0000000000000000",
2456         "faf82d178af25a9886a47e7f789b98d7",
2457
2458         "0000000000000000000000000000000000000000000000000000000000000000",
2459         "ffffffffffffffff0000000000000000",
2460         "9b58dbfd77fe5aca9cfc190cd1b82d19",
2461
2462         "0000000000000000000000000000000000000000000000000000000000000000",
2463         "ffffffffffffffff8000000000000000",
2464         "77f392089042e478ac16c0c86a0b5db5",
2465
2466         "0000000000000000000000000000000000000000000000000000000000000000",
2467         "ffffffffffffffffc000000000000000",
2468         "19f08e3420ee69b477ca1420281c4782",
2469
2470         "0000000000000000000000000000000000000000000000000000000000000000",
2471         "ffffffffffffffffe000000000000000",
2472         "a1b19beee4e117139f74b3c53fdcb875",
2473
2474         "0000000000000000000000000000000000000000000000000000000000000000",
2475         "fffffffffffffffff000000000000000",
2476         "a37a5869b218a9f3a0868d19aea0ad6a",
2477
2478         "0000000000000000000000000000000000000000000000000000000000000000",
2479         "fffffffffffffffff800000000000000",
2480         "bc3594e865bcd0261b13202731f33580",
2481
2482         "0000000000000000000000000000000000000000000000000000000000000000",
2483         "fffffffffffffffffc00000000000000",
2484         "811441ce1d309eee7185e8c752c07557",
2485
2486         "0000000000000000000000000000000000000000000000000000000000000000",
2487         "fffffffffffffffffe00000000000000",
2488         "959971ce4134190563518e700b9874d1",
2489
2490         "0000000000000000000000000000000000000000000000000000000000000000",
2491         "ffffffffffffffffff00000000000000",
2492         "76b5614a042707c98e2132e2e805fe63",
2493
2494         "0000000000000000000000000000000000000000000000000000000000000000",
2495         "ffffffffffffffffff80000000000000",
2496         "7d9fa6a57530d0f036fec31c230b0cc6",
2497
2498         "0000000000000000000000000000000000000000000000000000000000000000",
2499         "ffffffffffffffffffc0000000000000",
2500         "964153a83bf6989a4ba80daa91c3e081",
2501
2502         "0000000000000000000000000000000000000000000000000000000000000000",
2503         "ffffffffffffffffffe0000000000000",
2504         "a013014d4ce8054cf2591d06f6f2f176",
2505
2506         "0000000000000000000000000000000000000000000000000000000000000000",
2507         "fffffffffffffffffff0000000000000",
2508         "d1c5f6399bf382502e385eee1474a869",
2509
2510         "0000000000000000000000000000000000000000000000000000000000000000",
2511         "fffffffffffffffffff8000000000000",
2512         "0007e20b8298ec354f0f5fe7470f36bd",
2513
2514         "0000000000000000000000000000000000000000000000000000000000000000",
2515         "fffffffffffffffffffc000000000000",
2516         "b95ba05b332da61ef63a2b31fcad9879",
2517
2518         "0000000000000000000000000000000000000000000000000000000000000000",
2519         "fffffffffffffffffffe000000000000",
2520         "4620a49bd967491561669ab25dce45f4",
2521
2522         "0000000000000000000000000000000000000000000000000000000000000000",
2523         "ffffffffffffffffffff000000000000",
2524         "12e71214ae8e04f0bb63d7425c6f14d5",
2525
2526         "0000000000000000000000000000000000000000000000000000000000000000",
2527         "ffffffffffffffffffff800000000000",
2528         "4cc42fc1407b008fe350907c092e80ac",
2529
2530         "0000000000000000000000000000000000000000000000000000000000000000",
2531         "ffffffffffffffffffffc00000000000",
2532         "08b244ce7cbc8ee97fbba808cb146fda",
2533
2534         "0000000000000000000000000000000000000000000000000000000000000000",
2535         "ffffffffffffffffffffe00000000000",
2536         "39b333e8694f21546ad1edd9d87ed95b",
2537
2538         "0000000000000000000000000000000000000000000000000000000000000000",
2539         "fffffffffffffffffffff00000000000",
2540         "3b271f8ab2e6e4a20ba8090f43ba78f3",
2541
2542         "0000000000000000000000000000000000000000000000000000000000000000",
2543         "fffffffffffffffffffff80000000000",
2544         "9ad983f3bf651cd0393f0a73cccdea50",
2545
2546         "0000000000000000000000000000000000000000000000000000000000000000",
2547         "fffffffffffffffffffffc0000000000",
2548         "8f476cbff75c1f725ce18e4bbcd19b32",
2549
2550         "0000000000000000000000000000000000000000000000000000000000000000",
2551         "fffffffffffffffffffffe0000000000",
2552         "905b6267f1d6ab5320835a133f096f2a",
2553
2554         "0000000000000000000000000000000000000000000000000000000000000000",
2555         "ffffffffffffffffffffff0000000000",
2556         "145b60d6d0193c23f4221848a892d61a",
2557
2558         "0000000000000000000000000000000000000000000000000000000000000000",
2559         "ffffffffffffffffffffff8000000000",
2560         "55cfb3fb6d75cad0445bbc8dafa25b0f",
2561
2562         "0000000000000000000000000000000000000000000000000000000000000000",
2563         "ffffffffffffffffffffffc000000000",
2564         "7b8e7098e357ef71237d46d8b075b0f5",
2565
2566         "0000000000000000000000000000000000000000000000000000000000000000",
2567         "ffffffffffffffffffffffe000000000",
2568         "2bf27229901eb40f2df9d8398d1505ae",
2569
2570         "0000000000000000000000000000000000000000000000000000000000000000",
2571         "fffffffffffffffffffffff000000000",
2572         "83a63402a77f9ad5c1e931a931ecd706",
2573
2574         "0000000000000000000000000000000000000000000000000000000000000000",
2575         "fffffffffffffffffffffff800000000",
2576         "6f8ba6521152d31f2bada1843e26b973",
2577
2578         "0000000000000000000000000000000000000000000000000000000000000000",
2579         "fffffffffffffffffffffffc00000000",
2580         "e5c3b8e30fd2d8e6239b17b44bd23bbd",
2581
2582         "0000000000000000000000000000000000000000000000000000000000000000",
2583         "fffffffffffffffffffffffe00000000",
2584         "1ac1f7102c59933e8b2ddc3f14e94baa",
2585
2586         "0000000000000000000000000000000000000000000000000000000000000000",
2587         "ffffffffffffffffffffffff00000000",
2588         "21d9ba49f276b45f11af8fc71a088e3d",
2589
2590         "0000000000000000000000000000000000000000000000000000000000000000",
2591         "ffffffffffffffffffffffff80000000",
2592         "649f1cddc3792b4638635a392bc9bade",
2593
2594         "0000000000000000000000000000000000000000000000000000000000000000",
2595         "ffffffffffffffffffffffffc0000000",
2596         "e2775e4b59c1bc2e31a2078c11b5a08c",
2597
2598         "0000000000000000000000000000000000000000000000000000000000000000",
2599         "ffffffffffffffffffffffffe0000000",
2600         "2be1fae5048a25582a679ca10905eb80",
2601
2602         "0000000000000000000000000000000000000000000000000000000000000000",
2603         "fffffffffffffffffffffffff0000000",
2604         "da86f292c6f41ea34fb2068df75ecc29",
2605
2606         "0000000000000000000000000000000000000000000000000000000000000000",
2607         "fffffffffffffffffffffffff8000000",
2608         "220df19f85d69b1b562fa69a3c5beca5",
2609
2610         "0000000000000000000000000000000000000000000000000000000000000000",
2611         "fffffffffffffffffffffffffc000000",
2612         "1f11d5d0355e0b556ccdb6c7f5083b4d",
2613
2614         "0000000000000000000000000000000000000000000000000000000000000000",
2615         "fffffffffffffffffffffffffe000000",
2616         "62526b78be79cb384633c91f83b4151b",
2617
2618         "0000000000000000000000000000000000000000000000000000000000000000",
2619         "ffffffffffffffffffffffffff000000",
2620         "90ddbcb950843592dd47bbef00fdc876",
2621
2622         "0000000000000000000000000000000000000000000000000000000000000000",
2623         "ffffffffffffffffffffffffff800000",
2624         "2fd0e41c5b8402277354a7391d2618e2",
2625
2626         "0000000000000000000000000000000000000000000000000000000000000000",
2627         "ffffffffffffffffffffffffffc00000",
2628         "3cdf13e72dee4c581bafec70b85f9660",
2629
2630         "0000000000000000000000000000000000000000000000000000000000000000",
2631         "ffffffffffffffffffffffffffe00000",
2632         "afa2ffc137577092e2b654fa199d2c43",
2633
2634         "0000000000000000000000000000000000000000000000000000000000000000",
2635         "fffffffffffffffffffffffffff00000",
2636         "8d683ee63e60d208e343ce48dbc44cac",
2637
2638         "0000000000000000000000000000000000000000000000000000000000000000",
2639         "fffffffffffffffffffffffffff80000",
2640         "705a4ef8ba2133729c20185c3d3a4763",
2641
2642         "0000000000000000000000000000000000000000000000000000000000000000",
2643         "fffffffffffffffffffffffffffc0000",
2644         "0861a861c3db4e94194211b77ed761b9",
2645
2646         "0000000000000000000000000000000000000000000000000000000000000000",
2647         "fffffffffffffffffffffffffffe0000",
2648         "4b00c27e8b26da7eab9d3a88dec8b031",
2649
2650         "0000000000000000000000000000000000000000000000000000000000000000",
2651         "ffffffffffffffffffffffffffff0000",
2652         "5f397bf03084820cc8810d52e5b666e9",
2653
2654         "0000000000000000000000000000000000000000000000000000000000000000",
2655         "ffffffffffffffffffffffffffff8000",
2656         "63fafabb72c07bfbd3ddc9b1203104b8",
2657
2658         "0000000000000000000000000000000000000000000000000000000000000000",
2659         "ffffffffffffffffffffffffffffc000",
2660         "683e2140585b18452dd4ffbb93c95df9",
2661
2662         "0000000000000000000000000000000000000000000000000000000000000000",
2663         "ffffffffffffffffffffffffffffe000",
2664         "286894e48e537f8763b56707d7d155c8",
2665
2666         "0000000000000000000000000000000000000000000000000000000000000000",
2667         "fffffffffffffffffffffffffffff000",
2668         "a423deabc173dcf7e2c4c53e77d37cd1",
2669
2670         "0000000000000000000000000000000000000000000000000000000000000000",
2671         "fffffffffffffffffffffffffffff800",
2672         "eb8168313e1cfdfdb5e986d5429cf172",
2673
2674         "0000000000000000000000000000000000000000000000000000000000000000",
2675         "fffffffffffffffffffffffffffffc00",
2676         "27127daafc9accd2fb334ec3eba52323",
2677
2678         "0000000000000000000000000000000000000000000000000000000000000000",
2679         "fffffffffffffffffffffffffffffe00",
2680         "ee0715b96f72e3f7a22a5064fc592f4c",
2681
2682         "0000000000000000000000000000000000000000000000000000000000000000",
2683         "ffffffffffffffffffffffffffffff00",
2684         "29ee526770f2a11dcfa989d1ce88830f",
2685
2686         "0000000000000000000000000000000000000000000000000000000000000000",
2687         "ffffffffffffffffffffffffffffff80",
2688         "0493370e054b09871130fe49af730a5a",
2689
2690         "0000000000000000000000000000000000000000000000000000000000000000",
2691         "ffffffffffffffffffffffffffffffc0",
2692         "9b7b940f6c509f9e44a4ee140448ee46",
2693
2694         "0000000000000000000000000000000000000000000000000000000000000000",
2695         "ffffffffffffffffffffffffffffffe0",
2696         "2915be4a1ecfdcbe3e023811a12bb6c7",
2697
2698         "0000000000000000000000000000000000000000000000000000000000000000",
2699         "fffffffffffffffffffffffffffffff0",
2700         "7240e524bc51d8c4d440b1be55d1062c",
2701
2702         "0000000000000000000000000000000000000000000000000000000000000000",
2703         "fffffffffffffffffffffffffffffff8",
2704         "da63039d38cb4612b2dc36ba26684b93",
2705
2706         "0000000000000000000000000000000000000000000000000000000000000000",
2707         "fffffffffffffffffffffffffffffffc",
2708         "0f59cb5a4b522e2ac56c1a64f558ad9a",
2709
2710         "0000000000000000000000000000000000000000000000000000000000000000",
2711         "fffffffffffffffffffffffffffffffe",
2712         "7bfe9d876c6d63c1d035da8fe21c409d",
2713
2714         "0000000000000000000000000000000000000000000000000000000000000000",
2715         "ffffffffffffffffffffffffffffffff",
2716         "acdace8078a32b1a182bfa4987ca1347",
2717
2718         /*
2719          * Table end marker.
2720          */
2721         NULL
2722 };
2723
2724 /*
2725  * AES known-answer tests for CBC. Order: key, IV, plaintext, ciphertext.
2726  */
2727 static const char *const KAT_AES_CBC[] = {
2728         /*
2729          * From NIST validation suite "Multiblock Message Test"
2730          * (cbcmmt128.rsp).
2731          */
2732         "1f8e4973953f3fb0bd6b16662e9a3c17",
2733         "2fe2b333ceda8f98f4a99b40d2cd34a8",
2734         "45cf12964fc824ab76616ae2f4bf0822",
2735         "0f61c4d44c5147c03c195ad7e2cc12b2",
2736
2737         "0700d603a1c514e46b6191ba430a3a0c",
2738         "aad1583cd91365e3bb2f0c3430d065bb",
2739         "068b25c7bfb1f8bdd4cfc908f69dffc5ddc726a197f0e5f720f730393279be91",
2740         "c4dc61d9725967a3020104a9738f23868527ce839aab1752fd8bdb95a82c4d00",
2741
2742         "3348aa51e9a45c2dbe33ccc47f96e8de",
2743         "19153c673160df2b1d38c28060e59b96",
2744         "9b7cee827a26575afdbb7c7a329f887238052e3601a7917456ba61251c214763d5e1847a6ad5d54127a399ab07ee3599",
2745         "d5aed6c9622ec451a15db12819952b6752501cf05cdbf8cda34a457726ded97818e1f127a28d72db5652749f0c6afee5",
2746
2747         "b7f3c9576e12dd0db63e8f8fac2b9a39",
2748         "c80f095d8bb1a060699f7c19974a1aa0",
2749         "9ac19954ce1319b354d3220460f71c1e373f1cd336240881160cfde46ebfed2e791e8d5a1a136ebd1dc469dec00c4187722b841cdabcb22c1be8a14657da200e",
2750         "19b9609772c63f338608bf6eb52ca10be65097f89c1e0905c42401fd47791ae2c5440b2d473116ca78bd9ff2fb6015cfd316524eae7dcb95ae738ebeae84a467",
2751
2752         "b6f9afbfe5a1562bba1368fc72ac9d9c",
2753         "3f9d5ebe250ee7ce384b0d00ee849322",
2754         "db397ec22718dbffb9c9d13de0efcd4611bf792be4fce0dc5f25d4f577ed8cdbd4eb9208d593dda3d4653954ab64f05676caa3ce9bfa795b08b67ceebc923fdc89a8c431188e9e482d8553982cf304d1",
2755         "10ea27b19e16b93af169c4a88e06e35c99d8b420980b058e34b4b8f132b13766f72728202b089f428fecdb41c79f8aa0d0ef68f5786481cca29e2126f69bc14160f1ae2187878ba5c49cf3961e1b7ee9",
2756
2757         "bbe7b7ba07124ff1ae7c3416fe8b465e",
2758         "7f65b5ee3630bed6b84202d97fb97a1e",
2759         "2aad0c2c4306568bad7447460fd3dac054346d26feddbc9abd9110914011b4794be2a9a00a519a51a5b5124014f4ed2735480db21b434e99a911bb0b60fe0253763725b628d5739a5117b7ee3aefafc5b4c1bf446467e7bf5f78f31ff7caf187",
2760         "3b8611bfc4973c5cd8e982b073b33184cd26110159172e44988eb5ff5661a1e16fad67258fcbfee55469267a12dc374893b4e3533d36f5634c3095583596f135aa8cd1138dc898bc5651ee35a92ebf89ab6aeb5366653bc60a70e0074fc11efe",
2761
2762         "89a553730433f7e6d67d16d373bd5360",
2763         "f724558db3433a523f4e51a5bea70497",
2764         "807bc4ea684eedcfdcca30180680b0f1ae2814f35f36d053c5aea6595a386c1442770f4d7297d8b91825ee7237241da8925dd594ccf676aecd46ca2068e8d37a3a0ec8a7d5185a201e663b5ff36ae197110188a23503763b8218826d23ced74b31e9f6e2d7fbfa6cb43420c7807a8625",
2765         "406af1429a478c3d07e555c5287a60500d37fc39b68e5bbb9bafd6ddb223828561d6171a308d5b1a4551e8a5e7d572918d25c968d3871848d2f16635caa9847f38590b1df58ab5efb985f2c66cfaf86f61b3f9c0afad6c963c49cee9b8bc81a2ddb06c967f325515a4849eec37ce721a",
2766
2767         "c491ca31f91708458e29a925ec558d78",
2768         "9ef934946e5cd0ae97bd58532cb49381",
2769         "cb6a787e0dec56f9a165957f81af336ca6b40785d9e94093c6190e5152649f882e874d79ac5e167bd2a74ce5ae088d2ee854f6539e0a94796b1e1bd4c9fcdbc79acbef4d01eeb89776d18af71ae2a4fc47dd66df6c4dbe1d1850e466549a47b636bcc7c2b3a62495b56bb67b6d455f1eebd9bfefecbca6c7f335cfce9b45cb9d",
2770         "7b2931f5855f717145e00f152a9f4794359b1ffcb3e55f594e33098b51c23a6c74a06c1d94fded7fd2ae42c7db7acaef5844cb33aeddc6852585ed0020a6699d2cb53809cefd169148ce42292afab063443978306c582c18b9ce0da3d084ce4d3c482cfd8fcf1a85084e89fb88b40a084d5e972466d07666126fb761f84078f2",
2771
2772         "f6e87d71b0104d6eb06a68dc6a71f498",
2773         "1c245f26195b76ebebc2edcac412a2f8",
2774         "f82bef3c73a6f7f80db285726d691db6bf55eec25a859d3ba0e0445f26b9bb3b16a3161ed1866e4dd8f2e5f8ecb4e46d74a7a78c20cdfc7bcc9e479ba7a0caba9438238ad0c01651d5d98de37f03ddce6e6b4bd4ab03cf9e8ed818aedfa1cf963b932067b97d776dce1087196e7e913f7448e38244509f0caf36bd8217e15336d35c149fd4e41707893fdb84014f8729",
2775         "b09512f3eff9ed0d85890983a73dadbb7c3678d52581be64a8a8fc586f490f2521297a478a0598040ebd0f5509fafb0969f9d9e600eaef33b1b93eed99687b167f89a5065aac439ce46f3b8d22d30865e64e45ef8cd30b6984353a844a11c8cd60dba0e8866b3ee30d24b3fa8a643b328353e06010fa8273c8fd54ef0a2b6930e5520aae5cd5902f9b86a33592ca4365",
2776
2777         "2c14413751c31e2730570ba3361c786b",
2778         "1dbbeb2f19abb448af849796244a19d7",
2779         "40d930f9a05334d9816fe204999c3f82a03f6a0457a8c475c94553d1d116693adc618049f0a769a2eed6a6cb14c0143ec5cccdbc8dec4ce560cfd206225709326d4de7948e54d603d01b12d7fed752fb23f1aa4494fbb00130e9ded4e77e37c079042d828040c325b1a5efd15fc842e44014ca4374bf38f3c3fc3ee327733b0c8aee1abcd055772f18dc04603f7b2c1ea69ff662361f2be0a171bbdcea1e5d3f",
2780         "6be8a12800455a320538853e0cba31bd2d80ea0c85164a4c5c261ae485417d93effe2ebc0d0a0b51d6ea18633d210cf63c0c4ddbc27607f2e81ed9113191ef86d56f3b99be6c415a4150299fb846ce7160b40b63baf1179d19275a2e83698376d28b92548c68e06e6d994e2c1501ed297014e702cdefee2f656447706009614d801de1caaf73f8b7fa56cf1ba94b631933bbe577624380850f117435a0355b2b",
2781
2782         /*
2783          * From NIST validation suite "Multiblock Message Test"
2784          * (cbcmmt192.rsp).
2785          */
2786         "ba75f4d1d9d7cf7f551445d56cc1a8ab2a078e15e049dc2c",
2787         "531ce78176401666aa30db94ec4a30eb",
2788         "c51fc276774dad94bcdc1d2891ec8668",
2789         "70dd95a14ee975e239df36ff4aee1d5d",
2790
2791         "eab3b19c581aa873e1981c83ab8d83bbf8025111fb2e6b21",
2792         "f3d6667e8d4d791e60f7505ba383eb05",
2793         "9d4e4cccd1682321856df069e3f1c6fa391a083a9fb02d59db74c14081b3acc4",
2794         "51d44779f90d40a80048276c035cb49ca2a47bcb9b9cf7270b9144793787d53f",
2795
2796         "16c93bb398f1fc0cf6d68fc7a5673cdf431fa147852b4a2d",
2797         "eaaeca2e07ddedf562f94df63f0a650f",
2798         "c5ce958613bf741718c17444484ebaf1050ddcacb59b9590178cbe69d7ad7919608cb03af13bbe04f3506b718a301ea0",
2799         "ed6a50e0c6921d52d6647f75d67b4fd56ace1fedb8b5a6a997b4d131640547d22c5d884a75e6752b5846b5b33a5181f4",
2800
2801         "067bb17b4df785697eaccf961f98e212cb75e6797ce935cb",
2802         "8b59c9209c529ca8391c9fc0ce033c38",
2803         "db3785a889b4bd387754da222f0e4c2d2bfe0d79e05bc910fba941beea30f1239eacf0068f4619ec01c368e986fca6b7c58e490579d29611bd10087986eff54f",
2804         "d5f5589760bf9c762228fde236de1fa2dd2dad448db3fa9be0c4196efd46a35c84dd1ac77d9db58c95918cb317a6430a08d2fb6a8e8b0f1c9b72c7a344dc349f",
2805
2806         "0fd39de83e0be77a79c8a4a612e3dd9c8aae2ce35e7a2bf8",
2807         "7e1d629b84f93b079be51f9a5f5cb23c",
2808         "38fbda37e28fa86d9d83a4345e419dea95d28c7818ff25925db6ac3aedaf0a86154e20a4dfcc5b1b4192895393e5eb5846c88bdbd41ecf7af3104f410eaee470f5d9017ed460475f626953035a13db1f",
2809         "edadae2f9a45ff3473e02d904c94d94a30a4d92da4deb6bcb4b0774472694571842039f21c496ef93fd658842c735f8a81fcd0aa578442ab893b18f606aed1bab11f81452dd45e9b56adf2eccf4ea095",
2810
2811         "e3fecc75f0075a09b383dfd389a3d33cc9b854b3b254c0f4",
2812         "36eab883afef936cc38f63284619cd19",
2813         "931b2f5f3a5820d53a6beaaa6431083a3488f4eb03b0f5b57ef838e1579623103bd6e6800377538b2e51ef708f3c4956432e8a8ee6a34e190642b26ad8bdae6c2af9a6c7996f3b6004d2671e41f1c9f40ee03d1c4a52b0a0654a331f15f34dce",
2814         "75395974bd32b3665654a6c8e396b88ae34b123575872a7ab687d8e76b46df911a8a590cd01d2f5c330be3a6626e9dd3aa5e10ed14e8ff829811b6fed50f3f533ca4385a1cbca78f5c4744e50f2f8359165c2485d1324e76c3eae76a0ccac629",
2815
2816         "f9c27565eb07947c8cb51b79248430f7b1066c3d2fdc3d13",
2817         "2bd67cc89ab7948d644a49672843cbd9",
2818         "6abcc270173cf114d44847e911a050db57ba7a2e2c161c6f37ccb6aaa4677bddcaf50cad0b5f8758fcf7c0ebc650ceb5cd52cafb8f8dd3edcece55d9f1f08b9fa8f54365cf56e28b9596a7e1dd1d3418e4444a7724add4cf79d527b183ec88de4be4eeff29c80a97e54f85351cb189ee",
2819         "ca282924a61187feb40520979106e5cc861957f23828dcb7285e0eaac8a0ca2a6b60503d63d6039f4693dba32fa1f73ae2e709ca94911f28a5edd1f30eaddd54680c43acc9c74cd90d8bb648b4e544275f47e514daa20697f66c738eb30337f017fca1a26da4d1a0cc0a0e98e2463070",
2820
2821         "fb09cf9e00dbf883689d079c920077c0073c31890b55bab5",
2822         "e3c89bd097c3abddf64f4881db6dbfe2",
2823         "c1a37683fb289467dd1b2c89efba16bbd2ee24cf18d19d44596ded2682c79a2f711c7a32bf6a24badd32a4ee637c73b7a41da6258635650f91fb9ffa45bdfc3cb122136241b3deced8996aa51ea8d3e81c9d70e006a44bc0571ed48623a0d622a93fa9da290baaedf5d9e876c94620945ff8ecc83f27379ed55cf490c5790f27",
2824         "8158e21420f25b59d6ae943fa1cbf21f02e979f419dab0126a721b7eef55bee9ad97f5ccff7d239057bbc19a8c378142f7672f1d5e7e17d7bebcb0070e8355cace6660171a53b61816ae824a6ef69ce470b6ffd3b5bb4b438874d91d27854d3b6f25860d3868958de3307d62b1339bdddb8a318c0ce0f33c17caf0e9f6040820",
2825
2826         "bca6fa3c67fd294e958f66fe8bd64f45f428f5bc8e9733a7",
2827         "92a47f2833f1450d1da41717bdc6e83c",
2828         "5becbc31d8bead6d36ae014a5863d14a431e6b55d29ea6baaa417271716db3a33b2e506b452086dfe690834ac2de30bc41254ec5401ec47d064237c7792fdcd7914d8af20eb114756642d519021a8c75a92f6bc53d326ae9a5b7e1b10a9756574692934d9939fc399e0c203f7edf8e7e6482eadd31a0400770e897b48c6bca2b404593045080e93377358c42a0f4dede",
2829         "926db248cc1ba20f0c57631a7c8aef094f791937b905949e3460240e8bfa6fa483115a1b310b6e4369caebc5262888377b1ddaa5800ea496a2bdff0f9a1031e7129c9a20e35621e7f0b8baca0d87030f2ae7ca8593c8599677a06fd4b26009ead08fecac24caa9cf2cad3b470c8227415a7b1e0f2eab3fad96d70a209c8bb26c627677e2531b9435ca6e3c444d195b5f",
2830
2831         "162ad50ee64a0702aa551f571dedc16b2c1b6a1e4d4b5eee",
2832         "24408038161a2ccae07b029bb66355c1",
2833         "be8abf00901363987a82cc77d0ec91697ba3857f9e4f84bd79406c138d02698f003276d0449120bef4578d78fecabe8e070e11710b3f0a2744bd52434ec70015884c181ebdfd51c604a71c52e4c0e110bc408cd462b248a80b8a8ac06bb952ac1d7faed144807f1a731b7febcaf7835762defe92eccfc7a9944e1c702cffe6bc86733ed321423121085ac02df8962bcbc1937092eebf0e90a8b20e3dd8c244ae",
2834         "c82cf2c476dea8cb6a6e607a40d2f0391be82ea9ec84a537a6820f9afb997b76397d005424faa6a74dc4e8c7aa4a8900690f894b6d1dca80675393d2243adac762f159301e357e98b724762310cd5a7bafe1c2a030dba46fd93a9fdb89cc132ca9c17dc72031ec6822ee5a9d99dbca66c784c01b0885cbb62e29d97801927ec415a5d215158d325f9ee689437ad1b7684ad33c0d92739451ac87f39ff8c31b84",
2835
2836         /*
2837          * From NIST validation suite "Multiblock Message Test"
2838          * (cbcmmt256.rsp).
2839          */
2840         "6ed76d2d97c69fd1339589523931f2a6cff554b15f738f21ec72dd97a7330907",
2841         "851e8764776e6796aab722dbb644ace8",
2842         "6282b8c05c5c1530b97d4816ca434762",
2843         "6acc04142e100a65f51b97adf5172c41",
2844
2845         "dce26c6b4cfb286510da4eecd2cffe6cdf430f33db9b5f77b460679bd49d13ae",
2846         "fdeaa134c8d7379d457175fd1a57d3fc",
2847         "50e9eee1ac528009e8cbcd356975881f957254b13f91d7c6662d10312052eb00",
2848         "2fa0df722a9fd3b64cb18fb2b3db55ff2267422757289413f8f657507412a64c",
2849
2850         "fe8901fecd3ccd2ec5fdc7c7a0b50519c245b42d611a5ef9e90268d59f3edf33",
2851         "bd416cb3b9892228d8f1df575692e4d0",
2852         "8d3aa196ec3d7c9b5bb122e7fe77fb1295a6da75abe5d3a510194d3a8a4157d5c89d40619716619859da3ec9b247ced9",
2853         "608e82c7ab04007adb22e389a44797fed7de090c8c03ca8a2c5acd9e84df37fbc58ce8edb293e98f02b640d6d1d72464",
2854
2855         "0493ff637108af6a5b8e90ac1fdf035a3d4bafd1afb573be7ade9e8682e663e5",
2856         "c0cd2bebccbb6c49920bd5482ac756e8",
2857         "8b37f9148df4bb25956be6310c73c8dc58ea9714ff49b643107b34c9bff096a94fedd6823526abc27a8e0b16616eee254ab4567dd68e8ccd4c38ac563b13639c",
2858         "05d5c77729421b08b737e41119fa4438d1f570cc772a4d6c3df7ffeda0384ef84288ce37fc4c4c7d1125a499b051364c389fd639bdda647daa3bdadab2eb5594",
2859
2860         "9adc8fbd506e032af7fa20cf5343719de6d1288c158c63d6878aaf64ce26ca85",
2861         "11958dc6ab81e1c7f01631e9944e620f",
2862         "c7917f84f747cd8c4b4fedc2219bdbc5f4d07588389d8248854cf2c2f89667a2d7bcf53e73d32684535f42318e24cd45793950b3825e5d5c5c8fcd3e5dda4ce9246d18337ef3052d8b21c5561c8b660e",
2863         "9c99e68236bb2e929db1089c7750f1b356d39ab9d0c40c3e2f05108ae9d0c30b04832ccdbdc08ebfa426b7f5efde986ed05784ce368193bb3699bc691065ac62e258b9aa4cc557e2b45b49ce05511e65",
2864
2865         "73b8faf00b3302ac99855cf6f9e9e48518690a5906a4869d4dcf48d282faae2a",
2866         "b3cb97a80a539912b8c21f450d3b9395",
2867         "3adea6e06e42c4f041021491f2775ef6378cb08824165edc4f6448e232175b60d0345b9f9c78df6596ec9d22b7b9e76e8f3c76b32d5d67273f1d83fe7a6fc3dd3c49139170fa5701b3beac61b490f0a9e13f844640c4500f9ad3087adfb0ae10",
2868         "ac3d6dbafe2e0f740632fd9e820bf6044cd5b1551cbb9cc03c0b25c39ccb7f33b83aacfca40a3265f2bbff879153448acacb88fcfb3bb7b10fe463a68c0109f028382e3e557b1adf02ed648ab6bb895df0205d26ebbfa9a5fd8cebd8e4bee3dc",
2869
2870         "9ddf3745896504ff360a51a3eb49c01b79fccebc71c3abcb94a949408b05b2c9",
2871         "e79026639d4aa230b5ccffb0b29d79bc",
2872         "cf52e5c3954c51b94c9e38acb8c9a7c76aebdaa9943eae0a1ce155a2efdb4d46985d935511471452d9ee64d2461cb2991d59fc0060697f9a671672163230f367fed1422316e52d29eceacb8768f56d9b80f6d278093c9a8acd3cfd7edd8ebd5c293859f64d2f8486ae1bd593c65bc014",
2873         "34df561bd2cfebbcb7af3b4b8d21ca5258312e7e2e4e538e35ad2490b6112f0d7f148f6aa8d522a7f3c61d785bd667db0e1dc4606c318ea4f26af4fe7d11d4dcff0456511b4aed1a0d91ba4a1fd6cd9029187bc5881a5a07fe02049d39368e83139b12825bae2c7be81e6f12c61bb5c5",
2874
2875         "458b67bf212d20f3a57fce392065582dcefbf381aa22949f8338ab9052260e1d",
2876         "4c12effc5963d40459602675153e9649",
2877         "256fd73ce35ae3ea9c25dd2a9454493e96d8633fe633b56176dce8785ce5dbbb84dbf2c8a2eeb1e96b51899605e4f13bbc11b93bf6f39b3469be14858b5b720d4a522d36feed7a329c9b1e852c9280c47db8039c17c4921571a07d1864128330e09c308ddea1694e95c84500f1a61e614197e86a30ecc28df64ccb3ccf5437aa",
2878         "90b7b9630a2378f53f501ab7beff039155008071bc8438e789932cfd3eb1299195465e6633849463fdb44375278e2fdb1310821e6492cf80ff15cb772509fb426f3aeee27bd4938882fd2ae6b5bd9d91fa4a43b17bb439ebbe59c042310163a82a5fe5388796eee35a181a1271f00be29b852d8fa759bad01ff4678f010594cd",
2879
2880         "d2412db0845d84e5732b8bbd642957473b81fb99ca8bff70e7920d16c1dbec89",
2881         "51c619fcf0b23f0c7925f400a6cacb6d",
2882         "026006c4a71a180c9929824d9d095b8faaa86fc4fa25ecac61d85ff6de92dfa8702688c02a282c1b8af4449707f22d75e91991015db22374c95f8f195d5bb0afeb03040ff8965e0e1339dba5653e174f8aa5a1b39fe3ac839ce307a4e44b4f8f1b0063f738ec18acdbff2ebfe07383e734558723e741f0a1836dafdf9de82210a9248bc113b3c1bc8b4e252ca01bd803",
2883         "0254b23463bcabec5a395eb74c8fb0eb137a07bc6f5e9f61ec0b057de305714f8fa294221c91a159c315939b81e300ee902192ec5f15254428d8772f79324ec43298ca21c00b370273ee5e5ed90e43efa1e05a5d171209fe34f9f29237dba2a6726650fd3b1321747d1208863c6c3c6b3e2d879ab5f25782f08ba8f2abbe63e0bedb4a227e81afb36bb6645508356d34",
2884
2885         "48be597e632c16772324c8d3fa1d9c5a9ecd010f14ec5d110d3bfec376c5532b",
2886         "d6d581b8cf04ebd3b6eaa1b53f047ee1",
2887         "0c63d413d3864570e70bb6618bf8a4b9585586688c32bba0a5ecc1362fada74ada32c52acfd1aa7444ba567b4e7daaecf7cc1cb29182af164ae5232b002868695635599807a9a7f07a1f137e97b1e1c9dabc89b6a5e4afa9db5855edaa575056a8f4f8242216242bb0c256310d9d329826ac353d715fa39f80cec144d6424558f9f70b98c920096e0f2c855d594885a00625880e9dfb734163cecef72cf030b8",
2888         "fc5873e50de8faf4c6b84ba707b0854e9db9ab2e9f7d707fbba338c6843a18fc6facebaf663d26296fb329b4d26f18494c79e09e779647f9bafa87489630d79f4301610c2300c19dbf3148b7cac8c4f4944102754f332e92b6f7c5e75bc6179eb877a078d4719009021744c14f13fd2a55a2b9c44d18000685a845a4f632c7c56a77306efa66a24d05d088dcd7c13fe24fc447275965db9e4d37fbc9304448cd",
2889
2890         /*
2891          * End-of-table marker.
2892          */
2893         NULL
2894 };
2895
2896 /*
2897  * AES known-answer tests for CTR. Order: key, IV, plaintext, ciphertext.
2898  */
2899 static const char *const KAT_AES_CTR[] = {
2900         /*
2901          * From RFC 3686.
2902          */
2903         "ae6852f8121067cc4bf7a5765577f39e",
2904         "000000300000000000000000",
2905         "53696e676c6520626c6f636b206d7367",
2906         "e4095d4fb7a7b3792d6175a3261311b8",
2907
2908         "7e24067817fae0d743d6ce1f32539163",
2909         "006cb6dbc0543b59da48d90b",
2910         "000102030405060708090a0b0c0d0e0f101112131415161718191a1b1c1d1e1f",
2911         "5104a106168a72d9790d41ee8edad388eb2e1efc46da57c8fce630df9141be28",
2912
2913         "7691be035e5020a8ac6e618529f9a0dc",
2914         "00e0017b27777f3f4a1786f0",
2915         "000102030405060708090a0b0c0d0e0f101112131415161718191a1b1c1d1e1f20212223",
2916         "c1cf48a89f2ffdd9cf4652e9efdb72d74540a42bde6d7836d59a5ceaaef3105325b2072f",
2917
2918         "16af5b145fc9f579c175f93e3bfb0eed863d06ccfdb78515",
2919         "0000004836733c147d6d93cb",
2920         "53696e676c6520626c6f636b206d7367",
2921         "4b55384fe259c9c84e7935a003cbe928",
2922
2923         "7c5cb2401b3dc33c19e7340819e0f69c678c3db8e6f6a91a",
2924         "0096b03b020c6eadc2cb500d",
2925         "000102030405060708090a0b0c0d0e0f101112131415161718191a1b1c1d1e1f",
2926         "453243fc609b23327edfaafa7131cd9f8490701c5ad4a79cfc1fe0ff42f4fb00",
2927
2928         "02bf391ee8ecb159b959617b0965279bf59b60a786d3e0fe",
2929         "0007bdfd5cbd60278dcc0912",
2930         "000102030405060708090a0b0c0d0e0f101112131415161718191a1b1c1d1e1f20212223",
2931         "96893fc55e5c722f540b7dd1ddf7e758d288bc95c69165884536c811662f2188abee0935",
2932
2933         "776beff2851db06f4c8a0542c8696f6c6a81af1eec96b4d37fc1d689e6c1c104",
2934         "00000060db5672c97aa8f0b2",
2935         "53696e676c6520626c6f636b206d7367",
2936         "145ad01dbf824ec7560863dc71e3e0c0",
2937
2938         "f6d66d6bd52d59bb0796365879eff886c66dd51a5b6a99744b50590c87a23884",
2939         "00faac24c1585ef15a43d875",
2940         "000102030405060708090a0b0c0d0e0f101112131415161718191a1b1c1d1e1f",
2941         "f05e231b3894612c49ee000b804eb2a9b8306b508f839d6a5530831d9344af1c",
2942
2943         "ff7a617ce69148e4f1726e2f43581de2aa62d9f805532edff1eed687fb54153d",
2944         "001cc5b751a51d70a1c11148",
2945         "000102030405060708090a0b0c0d0e0f101112131415161718191a1b1c1d1e1f20212223",
2946         "eb6c52821d0bbbf7ce7594462aca4faab407df866569fd07f48cc0b583d6071f1ec0e6b8",
2947
2948         /*
2949          * End-of-table marker.
2950          */
2951         NULL
2952 };
2953
2954 static void
2955 monte_carlo_AES_encrypt(const br_block_cbcenc_class *ve,
2956         char *skey, char *splain, char *scipher)
2957 {
2958         unsigned char key[32];
2959         unsigned char buf[16];
2960         unsigned char pbuf[16];
2961         unsigned char cipher[16];
2962         size_t key_len;
2963         int i, j, k;
2964         br_aes_gen_cbcenc_keys v_ec;
2965         const br_block_cbcenc_class **ec;
2966
2967         ec = &v_ec.vtable;
2968         key_len = hextobin(key, skey);
2969         hextobin(buf, splain);
2970         hextobin(cipher, scipher);
2971         for (i = 0; i < 100; i ++) {
2972                 ve->init(ec, key, key_len);
2973                 for (j = 0; j < 1000; j ++) {
2974                         unsigned char iv[16];
2975
2976                         memcpy(pbuf, buf, sizeof buf);
2977                         memset(iv, 0, sizeof iv);
2978                         ve->run(ec, iv, buf, sizeof buf);
2979                 }
2980                 switch (key_len) {
2981                 case 16:
2982                         for (k = 0; k < 16; k ++) {
2983                                 key[k] ^= buf[k];
2984                         }
2985                         break;
2986                 case 24:
2987                         for (k = 0; k < 8; k ++) {
2988                                 key[k] ^= pbuf[8 + k];
2989                         }
2990                         for (k = 0; k < 16; k ++) {
2991                                 key[8 + k] ^= buf[k];
2992                         }
2993                         break;
2994                 default:
2995                         for (k = 0; k < 16; k ++) {
2996                                 key[k] ^= pbuf[k];
2997                                 key[16 + k] ^= buf[k];
2998                         }
2999                         break;
3000                 }
3001                 printf(".");
3002                 fflush(stdout);
3003         }
3004         printf(" ");
3005         fflush(stdout);
3006         check_equals("MC AES encrypt", buf, cipher, sizeof buf);
3007 }
3008
3009 static void
3010 monte_carlo_AES_decrypt(const br_block_cbcdec_class *vd,
3011         char *skey, char *scipher, char *splain)
3012 {
3013         unsigned char key[32];
3014         unsigned char buf[16];
3015         unsigned char pbuf[16];
3016         unsigned char plain[16];
3017         size_t key_len;
3018         int i, j, k;
3019         br_aes_gen_cbcdec_keys v_dc;
3020         const br_block_cbcdec_class **dc;
3021
3022         dc = &v_dc.vtable;
3023         key_len = hextobin(key, skey);
3024         hextobin(buf, scipher);
3025         hextobin(plain, splain);
3026         for (i = 0; i < 100; i ++) {
3027                 vd->init(dc, key, key_len);
3028                 for (j = 0; j < 1000; j ++) {
3029                         unsigned char iv[16];
3030
3031                         memcpy(pbuf, buf, sizeof buf);
3032                         memset(iv, 0, sizeof iv);
3033                         vd->run(dc, iv, buf, sizeof buf);
3034                 }
3035                 switch (key_len) {
3036                 case 16:
3037                         for (k = 0; k < 16; k ++) {
3038                                 key[k] ^= buf[k];
3039                         }
3040                         break;
3041                 case 24:
3042                         for (k = 0; k < 8; k ++) {
3043                                 key[k] ^= pbuf[8 + k];
3044                         }
3045                         for (k = 0; k < 16; k ++) {
3046                                 key[8 + k] ^= buf[k];
3047                         }
3048                         break;
3049                 default:
3050                         for (k = 0; k < 16; k ++) {
3051                                 key[k] ^= pbuf[k];
3052                                 key[16 + k] ^= buf[k];
3053                         }
3054                         break;
3055                 }
3056                 printf(".");
3057                 fflush(stdout);
3058         }
3059         printf(" ");
3060         fflush(stdout);
3061         check_equals("MC AES decrypt", buf, plain, sizeof buf);
3062 }
3063
3064 static void
3065 test_AES_generic(char *name,
3066         const br_block_cbcenc_class *ve,
3067         const br_block_cbcdec_class *vd,
3068         const br_block_ctr_class *vc,
3069         int with_MC, int with_CBC)
3070 {
3071         size_t u;
3072
3073         printf("Test %s: ", name);
3074         fflush(stdout);
3075
3076         if (ve->block_size != 16 || vd->block_size != 16
3077                 || ve->log_block_size != 4 || vd->log_block_size != 4)
3078         {
3079                 fprintf(stderr, "%s failed: wrong block size\n", name);
3080                 exit(EXIT_FAILURE);
3081         }
3082
3083         for (u = 0; KAT_AES[u]; u += 3) {
3084                 unsigned char key[32];
3085                 unsigned char plain[16];
3086                 unsigned char cipher[16];
3087                 unsigned char buf[16];
3088                 unsigned char iv[16];
3089                 size_t key_len;
3090                 br_aes_gen_cbcenc_keys v_ec;
3091                 br_aes_gen_cbcdec_keys v_dc;
3092                 const br_block_cbcenc_class **ec;
3093                 const br_block_cbcdec_class **dc;
3094
3095                 ec = &v_ec.vtable;
3096                 dc = &v_dc.vtable;
3097                 key_len = hextobin(key, KAT_AES[u]);
3098                 hextobin(plain, KAT_AES[u + 1]);
3099                 hextobin(cipher, KAT_AES[u + 2]);
3100                 ve->init(ec, key, key_len);
3101                 memcpy(buf, plain, sizeof plain);
3102                 memset(iv, 0, sizeof iv);
3103                 ve->run(ec, iv, buf, sizeof buf);
3104                 check_equals("KAT AES encrypt", buf, cipher, sizeof cipher);
3105                 vd->init(dc, key, key_len);
3106                 memset(iv, 0, sizeof iv);
3107                 vd->run(dc, iv, buf, sizeof buf);
3108                 check_equals("KAT AES decrypt", buf, plain, sizeof plain);
3109         }
3110
3111         if (with_CBC) {
3112                 for (u = 0; KAT_AES_CBC[u]; u += 4) {
3113                         unsigned char key[32];
3114                         unsigned char ivref[16];
3115                         unsigned char plain[200];
3116                         unsigned char cipher[200];
3117                         unsigned char buf[200];
3118                         unsigned char iv[16];
3119                         size_t key_len, data_len, v;
3120                         br_aes_gen_cbcenc_keys v_ec;
3121                         br_aes_gen_cbcdec_keys v_dc;
3122                         const br_block_cbcenc_class **ec;
3123                         const br_block_cbcdec_class **dc;
3124
3125                         ec = &v_ec.vtable;
3126                         dc = &v_dc.vtable;
3127                         key_len = hextobin(key, KAT_AES_CBC[u]);
3128                         hextobin(ivref, KAT_AES_CBC[u + 1]);
3129                         data_len = hextobin(plain, KAT_AES_CBC[u + 2]);
3130                         hextobin(cipher, KAT_AES_CBC[u + 3]);
3131                         ve->init(ec, key, key_len);
3132
3133                         memcpy(buf, plain, data_len);
3134                         memcpy(iv, ivref, 16);
3135                         ve->run(ec, iv, buf, data_len);
3136                         check_equals("KAT CBC AES encrypt",
3137                                 buf, cipher, data_len);
3138                         vd->init(dc, key, key_len);
3139                         memcpy(iv, ivref, 16);
3140                         vd->run(dc, iv, buf, data_len);
3141                         check_equals("KAT CBC AES decrypt",
3142                                 buf, plain, data_len);
3143
3144                         memcpy(buf, plain, data_len);
3145                         memcpy(iv, ivref, 16);
3146                         for (v = 0; v < data_len; v += 16) {
3147                                 ve->run(ec, iv, buf + v, 16);
3148                         }
3149                         check_equals("KAT CBC AES encrypt (2)",
3150                                 buf, cipher, data_len);
3151                         memcpy(iv, ivref, 16);
3152                         for (v = 0; v < data_len; v += 16) {
3153                                 vd->run(dc, iv, buf + v, 16);
3154                         }
3155                         check_equals("KAT CBC AES decrypt (2)",
3156                                 buf, plain, data_len);
3157                 }
3158
3159                 /*
3160                  * We want to check proper IV management for CBC:
3161                  * encryption and decryption must properly copy the _last_
3162                  * encrypted block as new IV, for all sizes.
3163                  */
3164                 for (u = 1; u <= 35; u ++) {
3165                         br_hmac_drbg_context rng;
3166                         unsigned char x;
3167                         size_t key_len, data_len;
3168                         size_t v;
3169
3170                         br_hmac_drbg_init(&rng, &br_sha256_vtable,
3171                                 "seed for AES/CBC", 16);
3172                         x = u;
3173                         br_hmac_drbg_update(&rng, &x, 1);
3174                         data_len = u << 4;
3175                         for (key_len = 16; key_len <= 32; key_len += 16) {
3176                                 unsigned char key[32];
3177                                 unsigned char iv[16], iv1[16], iv2[16];
3178                                 unsigned char plain[35 * 16];
3179                                 unsigned char tmp1[sizeof plain];
3180                                 unsigned char tmp2[sizeof plain];
3181                                 br_aes_gen_cbcenc_keys v_ec;
3182                                 br_aes_gen_cbcdec_keys v_dc;
3183                                 const br_block_cbcenc_class **ec;
3184                                 const br_block_cbcdec_class **dc;
3185
3186                                 br_hmac_drbg_generate(&rng, key, key_len);
3187                                 br_hmac_drbg_generate(&rng, iv, sizeof iv);
3188                                 br_hmac_drbg_generate(&rng, plain, data_len);
3189
3190                                 ec = &v_ec.vtable;
3191                                 ve->init(ec, key, key_len);
3192                                 memcpy(iv1, iv, sizeof iv);
3193                                 memcpy(tmp1, plain, data_len);
3194                                 ve->run(ec, iv1, tmp1, data_len);
3195                                 check_equals("IV CBC AES (1)",
3196                                         tmp1 + data_len - 16, iv1, 16);
3197                                 memcpy(iv2, iv, sizeof iv);
3198                                 memcpy(tmp2, plain, data_len);
3199                                 for (v = 0; v < data_len; v += 16) {
3200                                         ve->run(ec, iv2, tmp2 + v, 16);
3201                                 }
3202                                 check_equals("IV CBC AES (2)",
3203                                         tmp2 + data_len - 16, iv2, 16);
3204                                 check_equals("IV CBC AES (3)",
3205                                         tmp1, tmp2, data_len);
3206
3207                                 dc = &v_dc.vtable;
3208                                 vd->init(dc, key, key_len);
3209                                 memcpy(iv1, iv, sizeof iv);
3210                                 vd->run(dc, iv1, tmp1, data_len);
3211                                 check_equals("IV CBC AES (4)", iv1, iv2, 16);
3212                                 check_equals("IV CBC AES (5)",
3213                                         tmp1, plain, data_len);
3214                                 memcpy(iv2, iv, sizeof iv);
3215                                 for (v = 0; v < data_len; v += 16) {
3216                                         vd->run(dc, iv2, tmp2 + v, 16);
3217                                 }
3218                                 check_equals("IV CBC AES (6)", iv1, iv2, 16);
3219                                 check_equals("IV CBC AES (7)",
3220                                         tmp2, plain, data_len);
3221                         }
3222                 }
3223         }
3224
3225         if (vc != NULL) {
3226                 if (vc->block_size != 16 || vc->log_block_size != 4) {
3227                         fprintf(stderr, "%s failed: wrong block size\n", name);
3228                         exit(EXIT_FAILURE);
3229                 }
3230                 for (u = 0; KAT_AES_CTR[u]; u += 4) {
3231                         unsigned char key[32];
3232                         unsigned char iv[12];
3233                         unsigned char plain[200];
3234                         unsigned char cipher[200];
3235                         unsigned char buf[200];
3236                         size_t key_len, data_len, v;
3237                         uint32_t c;
3238                         br_aes_gen_ctr_keys v_xc;
3239                         const br_block_ctr_class **xc;
3240
3241                         xc = &v_xc.vtable;
3242                         key_len = hextobin(key, KAT_AES_CTR[u]);
3243                         hextobin(iv, KAT_AES_CTR[u + 1]);
3244                         data_len = hextobin(plain, KAT_AES_CTR[u + 2]);
3245                         hextobin(cipher, KAT_AES_CTR[u + 3]);
3246                         vc->init(xc, key, key_len);
3247                         memcpy(buf, plain, data_len);
3248                         vc->run(xc, iv, 1, buf, data_len);
3249                         check_equals("KAT CTR AES (1)", buf, cipher, data_len);
3250                         vc->run(xc, iv, 1, buf, data_len);
3251                         check_equals("KAT CTR AES (2)", buf, plain, data_len);
3252
3253                         memcpy(buf, plain, data_len);
3254                         c = 1;
3255                         for (v = 0; v < data_len; v += 32) {
3256                                 size_t clen;
3257
3258                                 clen = data_len - v;
3259                                 if (clen > 32) {
3260                                         clen = 32;
3261                                 }
3262                                 c = vc->run(xc, iv, c, buf + v, clen);
3263                         }
3264                         check_equals("KAT CTR AES (3)", buf, cipher, data_len);
3265
3266                         memcpy(buf, plain, data_len);
3267                         c = 1;
3268                         for (v = 0; v < data_len; v += 16) {
3269                                 size_t clen;
3270
3271                                 clen = data_len - v;
3272                                 if (clen > 16) {
3273                                         clen = 16;
3274                                 }
3275                                 c = vc->run(xc, iv, c, buf + v, clen);
3276                         }
3277                         check_equals("KAT CTR AES (4)", buf, cipher, data_len);
3278                 }
3279         }
3280
3281         if (with_MC) {
3282                 monte_carlo_AES_encrypt(
3283                         ve,
3284                         "139a35422f1d61de3c91787fe0507afd",
3285                         "b9145a768b7dc489a096b546f43b231f",
3286                         "fb2649694783b551eacd9d5db6126d47");
3287                 monte_carlo_AES_decrypt(
3288                         vd,
3289                         "0c60e7bf20ada9baa9e1ddf0d1540726",
3290                         "b08a29b11a500ea3aca42c36675b9785",
3291                         "d1d2bfdc58ffcad2341b095bce55221e");
3292
3293                 monte_carlo_AES_encrypt(
3294                         ve,
3295                         "b9a63e09e1dfc42e93a90d9bad739e5967aef672eedd5da9",
3296                         "85a1f7a58167b389cddc8a9ff175ee26",
3297                         "5d1196da8f184975e240949a25104554");
3298                 monte_carlo_AES_decrypt(
3299                         vd,
3300                         "4b97585701c03fbebdfa8555024f589f1482c58a00fdd9fd",
3301                         "d0bd0e02ded155e4516be83f42d347a4",
3302                         "b63ef1b79507a62eba3dafcec54a6328");
3303
3304                 monte_carlo_AES_encrypt(
3305                         ve,
3306                         "f9e8389f5b80712e3886cc1fa2d28a3b8c9cd88a2d4a54c6aa86ce0fef944be0",
3307                         "b379777f9050e2a818f2940cbbd9aba4",
3308                         "c5d2cb3d5b7ff0e23e308967ee074825");
3309                 monte_carlo_AES_decrypt(
3310                         vd,
3311                         "2b09ba39b834062b9e93f48373b8dd018dedf1e5ba1b8af831ebbacbc92a2643",
3312                         "89649bd0115f30bd878567610223a59d",
3313                         "e3d3868f578caf34e36445bf14cefc68");
3314         }
3315
3316         printf("done.\n");
3317         fflush(stdout);
3318 }
3319
3320 static void
3321 test_AES_big(void)
3322 {
3323         test_AES_generic("AES_big",
3324                 &br_aes_big_cbcenc_vtable,
3325                 &br_aes_big_cbcdec_vtable,
3326                 &br_aes_big_ctr_vtable,
3327                 1, 1);
3328 }
3329
3330 static void
3331 test_AES_small(void)
3332 {
3333         test_AES_generic("AES_small",
3334                 &br_aes_small_cbcenc_vtable,
3335                 &br_aes_small_cbcdec_vtable,
3336                 &br_aes_small_ctr_vtable,
3337                 1, 1);
3338 }
3339
3340 static void
3341 test_AES_ct(void)
3342 {
3343         test_AES_generic("AES_ct",
3344                 &br_aes_ct_cbcenc_vtable,
3345                 &br_aes_ct_cbcdec_vtable,
3346                 &br_aes_ct_ctr_vtable,
3347                 1, 1);
3348 }
3349
3350 static void
3351 test_AES_ct64(void)
3352 {
3353         test_AES_generic("AES_ct64",
3354                 &br_aes_ct64_cbcenc_vtable,
3355                 &br_aes_ct64_cbcdec_vtable,
3356                 &br_aes_ct64_ctr_vtable,
3357                 1, 1);
3358 }
3359
3360 static void
3361 test_AES_x86ni(void)
3362 {
3363         const br_block_cbcenc_class *x_cbcenc;
3364         const br_block_cbcdec_class *x_cbcdec;
3365         const br_block_ctr_class *x_ctr;
3366         int hcbcenc, hcbcdec, hctr;
3367
3368         x_cbcenc = br_aes_x86ni_cbcenc_get_vtable();
3369         x_cbcdec = br_aes_x86ni_cbcdec_get_vtable();
3370         x_ctr = br_aes_x86ni_ctr_get_vtable();
3371         hcbcenc = (x_cbcenc != NULL);
3372         hcbcdec = (x_cbcdec != NULL);
3373         hctr = (x_ctr != NULL);
3374         if (hcbcenc != hctr || hcbcdec != hctr) {
3375                 fprintf(stderr, "AES_x86ni availability mismatch (%d/%d/%d)\n",
3376                         hcbcenc, hcbcdec, hctr);
3377                 exit(EXIT_FAILURE);
3378         }
3379         if (hctr) {
3380                 test_AES_generic("AES_x86ni",
3381                         x_cbcenc, x_cbcdec, x_ctr, 1, 1);
3382         } else {
3383                 printf("Test AES_x86ni: UNAVAILABLE\n");
3384         }
3385 }
3386
3387 static void
3388 test_AES_pwr8(void)
3389 {
3390         const br_block_cbcenc_class *x_cbcenc;
3391         const br_block_cbcdec_class *x_cbcdec;
3392         const br_block_ctr_class *x_ctr;
3393         int hcbcenc, hcbcdec, hctr;
3394
3395         x_cbcenc = br_aes_pwr8_cbcenc_get_vtable();
3396         x_cbcdec = br_aes_pwr8_cbcdec_get_vtable();
3397         x_ctr = br_aes_pwr8_ctr_get_vtable();
3398         hcbcenc = (x_cbcenc != NULL);
3399         hcbcdec = (x_cbcdec != NULL);
3400         hctr = (x_ctr != NULL);
3401         if (hcbcenc != hctr || hcbcdec != hctr) {
3402                 fprintf(stderr, "AES_pwr8 availability mismatch (%d/%d/%d)\n",
3403                         hcbcenc, hcbcdec, hctr);
3404                 exit(EXIT_FAILURE);
3405         }
3406         if (hctr) {
3407                 test_AES_generic("AES_pwr8",
3408                         x_cbcenc, x_cbcdec, x_ctr, 1, 1);
3409         } else {
3410                 printf("Test AES_pwr8: UNAVAILABLE\n");
3411         }
3412 }
3413
3414 /*
3415  * Custom CTR + CBC-MAC AES implementation. Can also do CTR-only, and
3416  * CBC-MAC-only. The 'aes_big' implementation (CTR) is used. This is
3417  * meant for comparisons.
3418  *
3419  * If 'ctr' is NULL then no encryption/decryption is done; otherwise,
3420  * CTR encryption/decryption is performed (full-block counter) and the
3421  * 'ctr' array is updated with the new counter value.
3422  *
3423  * If 'cbcmac' is NULL then no CBC-MAC is done; otherwise, CBC-MAC is
3424  * applied on the encrypted data, with 'cbcmac' as IV and destination
3425  * buffer for the output. If 'ctr' is not NULL and 'encrypt' is non-zero,
3426  * then CBC-MAC is computed over the result of CTR processing; otherwise,
3427  * CBC-MAC is computed over the input data itself.
3428  */
3429 static void
3430 do_aes_ctrcbc(const void *key, size_t key_len, int encrypt,
3431         void *ctr, void *cbcmac, unsigned char *data, size_t len)
3432 {
3433         br_aes_big_ctr_keys bc;
3434         int i;
3435
3436         br_aes_big_ctr_init(&bc, key, key_len);
3437         for (i = 0; i < 2; i ++) {
3438                 /*
3439                  * CBC-MAC is computed on the encrypted data, so in
3440                  * first pass if decrypting, second pass if encrypting.
3441                  */
3442                 if (cbcmac != NULL
3443                         && ((encrypt && i == 1) || (!encrypt && i == 0)))
3444                 {
3445                         unsigned char zz[16];
3446                         size_t u;
3447
3448                         memcpy(zz, cbcmac, sizeof zz);
3449                         for (u = 0; u < len; u += 16) {
3450                                 unsigned char tmp[16];
3451                                 size_t v;
3452
3453                                 for (v = 0; v < 16; v ++) {
3454                                         tmp[v] = zz[v] ^ data[u + v];
3455                                 }
3456                                 memset(zz, 0, sizeof zz);
3457                                 br_aes_big_ctr_run(&bc,
3458                                         tmp, br_dec32be(tmp + 12), zz, 16);
3459                         }
3460                         memcpy(cbcmac, zz, sizeof zz);
3461                 }
3462
3463                 /*
3464                  * CTR encryption/decryption is done only in the first pass.
3465                  * We process data block per block, because the CTR-only
3466                  * class uses a 32-bit counter, while the CTR+CBC-MAC
3467                  * class uses a 128-bit counter.
3468                  */
3469                 if (ctr != NULL && i == 0) {
3470                         unsigned char zz[16];
3471                         size_t u;
3472
3473                         memcpy(zz, ctr, sizeof zz);
3474                         for (u = 0; u < len; u += 16) {
3475                                 int i;
3476
3477                                 br_aes_big_ctr_run(&bc,
3478                                         zz, br_dec32be(zz + 12), data + u, 16);
3479                                 for (i = 15; i >= 0; i --) {
3480                                         zz[i] = (zz[i] + 1) & 0xFF;
3481                                         if (zz[i] != 0) {
3482                                                 break;
3483                                         }
3484                                 }
3485                         }
3486                         memcpy(ctr, zz, sizeof zz);
3487                 }
3488         }
3489 }
3490
3491 static void
3492 test_AES_CTRCBC_inner(const char *name, const br_block_ctrcbc_class *vt)
3493 {
3494         br_hmac_drbg_context rng;
3495         size_t key_len;
3496
3497         printf("Test AES CTR/CBC-MAC %s: ", name);
3498         fflush(stdout);
3499
3500         br_hmac_drbg_init(&rng, &br_sha256_vtable, name, strlen(name));
3501         for (key_len = 16; key_len <= 32; key_len += 8) {
3502                 br_aes_gen_ctrcbc_keys bc;
3503                 unsigned char key[32];
3504                 size_t data_len;
3505
3506                 br_hmac_drbg_generate(&rng, key, key_len);
3507                 vt->init(&bc.vtable, key, key_len);
3508                 for (data_len = 0; data_len <= 512; data_len += 16) {
3509                         unsigned char plain[512];
3510                         unsigned char data1[sizeof plain];
3511                         unsigned char data2[sizeof plain];
3512                         unsigned char ctr[16], cbcmac[16];
3513                         unsigned char ctr1[16], cbcmac1[16];
3514                         unsigned char ctr2[16], cbcmac2[16];
3515                         int i;
3516
3517                         br_hmac_drbg_generate(&rng, plain, data_len);
3518
3519                         for (i = 0; i <= 16; i ++) {
3520                                 if (i == 0) {
3521                                         br_hmac_drbg_generate(&rng, ctr, 16);
3522                                 } else {
3523                                         memset(ctr, 0, i - 1);
3524                                         memset(ctr + i - 1, 0xFF, 17 - i);
3525                                 }
3526                                 br_hmac_drbg_generate(&rng, cbcmac, 16);
3527
3528                                 memcpy(data1, plain, data_len);
3529                                 memcpy(ctr1, ctr, 16);
3530                                 vt->ctr(&bc.vtable, ctr1, data1, data_len);
3531                                 memcpy(data2, plain, data_len);
3532                                 memcpy(ctr2, ctr, 16);
3533                                 do_aes_ctrcbc(key, key_len, 1,
3534                                         ctr2, NULL, data2, data_len);
3535                                 check_equals("CTR-only data",
3536                                         data1, data2, data_len);
3537                                 check_equals("CTR-only counter",
3538                                         ctr1, ctr2, 16);
3539
3540                                 memcpy(data1, plain, data_len);
3541                                 memcpy(cbcmac1, cbcmac, 16);
3542                                 vt->mac(&bc.vtable, cbcmac1, data1, data_len);
3543                                 memcpy(data2, plain, data_len);
3544                                 memcpy(cbcmac2, cbcmac, 16);
3545                                 do_aes_ctrcbc(key, key_len, 1,
3546                                         NULL, cbcmac2, data2, data_len);
3547                                 check_equals("CBC-MAC-only",
3548                                         cbcmac1, cbcmac2, 16);
3549
3550                                 memcpy(data1, plain, data_len);
3551                                 memcpy(ctr1, ctr, 16);
3552                                 memcpy(cbcmac1, cbcmac, 16);
3553                                 vt->encrypt(&bc.vtable,
3554                                         ctr1, cbcmac1, data1, data_len);
3555                                 memcpy(data2, plain, data_len);
3556                                 memcpy(ctr2, ctr, 16);
3557                                 memcpy(cbcmac2, cbcmac, 16);
3558                                 do_aes_ctrcbc(key, key_len, 1,
3559                                         ctr2, cbcmac2, data2, data_len);
3560                                 check_equals("encrypt: combined data",
3561                                         data1, data2, data_len);
3562                                 check_equals("encrypt: combined counter",
3563                                         ctr1, ctr2, 16);
3564                                 check_equals("encrypt: combined CBC-MAC",
3565                                         cbcmac1, cbcmac2, 16);
3566
3567                                 memcpy(ctr1, ctr, 16);
3568                                 memcpy(cbcmac1, cbcmac, 16);
3569                                 vt->decrypt(&bc.vtable,
3570                                         ctr1, cbcmac1, data1, data_len);
3571                                 memcpy(ctr2, ctr, 16);
3572                                 memcpy(cbcmac2, cbcmac, 16);
3573                                 do_aes_ctrcbc(key, key_len, 0,
3574                                         ctr2, cbcmac2, data2, data_len);
3575                                 check_equals("decrypt: combined data",
3576                                         data1, data2, data_len);
3577                                 check_equals("decrypt: combined counter",
3578                                         ctr1, ctr2, 16);
3579                                 check_equals("decrypt: combined CBC-MAC",
3580                                         cbcmac1, cbcmac2, 16);
3581                         }
3582
3583                         printf(".");
3584                         fflush(stdout);
3585                 }
3586
3587                 printf(" ");
3588                 fflush(stdout);
3589         }
3590
3591         printf("done.\n");
3592         fflush(stdout);
3593 }
3594
3595 static void
3596 test_AES_CTRCBC_big(void)
3597 {
3598         test_AES_CTRCBC_inner("big", &br_aes_big_ctrcbc_vtable);
3599 }
3600
3601 static void
3602 test_AES_CTRCBC_small(void)
3603 {
3604         test_AES_CTRCBC_inner("small", &br_aes_small_ctrcbc_vtable);
3605 }
3606
3607 static void
3608 test_AES_CTRCBC_ct(void)
3609 {
3610         test_AES_CTRCBC_inner("ct", &br_aes_ct_ctrcbc_vtable);
3611 }
3612
3613 static void
3614 test_AES_CTRCBC_ct64(void)
3615 {
3616         test_AES_CTRCBC_inner("ct64", &br_aes_ct64_ctrcbc_vtable);
3617 }
3618
3619 static void
3620 test_AES_CTRCBC_x86ni(void)
3621 {
3622         const br_block_ctrcbc_class *vt;
3623
3624         vt = br_aes_x86ni_ctrcbc_get_vtable();
3625         if (vt != NULL) {
3626                 test_AES_CTRCBC_inner("x86ni", vt);
3627         } else {
3628                 printf("Test AES CTR/CBC-MAC x86ni: UNAVAILABLE\n");
3629         }
3630 }
3631
3632 /*
3633  * DES known-answer tests. Order: plaintext, key, ciphertext.
3634  * (mostly from NIST SP 800-20).
3635  */
3636 static const char *const KAT_DES[] = {
3637         "10316E028C8F3B4A", "0000000000000000", "82DCBAFBDEAB6602",
3638         "8000000000000000", "0000000000000000", "95A8D72813DAA94D",
3639         "4000000000000000", "0000000000000000", "0EEC1487DD8C26D5",
3640         "2000000000000000", "0000000000000000", "7AD16FFB79C45926",
3641         "1000000000000000", "0000000000000000", "D3746294CA6A6CF3",
3642         "0800000000000000", "0000000000000000", "809F5F873C1FD761",
3643         "0400000000000000", "0000000000000000", "C02FAFFEC989D1FC",
3644         "0200000000000000", "0000000000000000", "4615AA1D33E72F10",
3645         "0100000000000000", "0000000000000000", "8CA64DE9C1B123A7",
3646         "0080000000000000", "0000000000000000", "2055123350C00858",
3647         "0040000000000000", "0000000000000000", "DF3B99D6577397C8",
3648         "0020000000000000", "0000000000000000", "31FE17369B5288C9",
3649         "0010000000000000", "0000000000000000", "DFDD3CC64DAE1642",
3650         "0008000000000000", "0000000000000000", "178C83CE2B399D94",
3651         "0004000000000000", "0000000000000000", "50F636324A9B7F80",
3652         "0002000000000000", "0000000000000000", "A8468EE3BC18F06D",
3653         "0001000000000000", "0000000000000000", "8CA64DE9C1B123A7",
3654         "0000800000000000", "0000000000000000", "A2DC9E92FD3CDE92",
3655         "0000400000000000", "0000000000000000", "CAC09F797D031287",
3656         "0000200000000000", "0000000000000000", "90BA680B22AEB525",
3657         "0000100000000000", "0000000000000000", "CE7A24F350E280B6",
3658         "0000080000000000", "0000000000000000", "882BFF0AA01A0B87",
3659         "0000040000000000", "0000000000000000", "25610288924511C2",
3660         "0000020000000000", "0000000000000000", "C71516C29C75D170",
3661         "0000010000000000", "0000000000000000", "8CA64DE9C1B123A7",
3662         "0000008000000000", "0000000000000000", "5199C29A52C9F059",
3663         "0000004000000000", "0000000000000000", "C22F0A294A71F29F",
3664         "0000002000000000", "0000000000000000", "EE371483714C02EA",
3665         "0000001000000000", "0000000000000000", "A81FBD448F9E522F",
3666         "0000000800000000", "0000000000000000", "4F644C92E192DFED",
3667         "0000000400000000", "0000000000000000", "1AFA9A66A6DF92AE",
3668         "0000000200000000", "0000000000000000", "B3C1CC715CB879D8",
3669         "0000000100000000", "0000000000000000", "8CA64DE9C1B123A7",
3670         "0000000080000000", "0000000000000000", "19D032E64AB0BD8B",
3671         "0000000040000000", "0000000000000000", "3CFAA7A7DC8720DC",
3672         "0000000020000000", "0000000000000000", "B7265F7F447AC6F3",
3673         "0000000010000000", "0000000000000000", "9DB73B3C0D163F54",
3674         "0000000008000000", "0000000000000000", "8181B65BABF4A975",
3675         "0000000004000000", "0000000000000000", "93C9B64042EAA240",
3676         "0000000002000000", "0000000000000000", "5570530829705592",
3677         "0000000001000000", "0000000000000000", "8CA64DE9C1B123A7",
3678         "0000000000800000", "0000000000000000", "8638809E878787A0",
3679         "0000000000400000", "0000000000000000", "41B9A79AF79AC208",
3680         "0000000000200000", "0000000000000000", "7A9BE42F2009A892",
3681         "0000000000100000", "0000000000000000", "29038D56BA6D2745",
3682         "0000000000080000", "0000000000000000", "5495C6ABF1E5DF51",
3683         "0000000000040000", "0000000000000000", "AE13DBD561488933",
3684         "0000000000020000", "0000000000000000", "024D1FFA8904E389",
3685         "0000000000010000", "0000000000000000", "8CA64DE9C1B123A7",
3686         "0000000000008000", "0000000000000000", "D1399712F99BF02E",
3687         "0000000000004000", "0000000000000000", "14C1D7C1CFFEC79E",
3688         "0000000000002000", "0000000000000000", "1DE5279DAE3BED6F",
3689         "0000000000001000", "0000000000000000", "E941A33F85501303",
3690         "0000000000000800", "0000000000000000", "DA99DBBC9A03F379",
3691         "0000000000000400", "0000000000000000", "B7FC92F91D8E92E9",
3692         "0000000000000200", "0000000000000000", "AE8E5CAA3CA04E85",
3693         "0000000000000100", "0000000000000000", "8CA64DE9C1B123A7",
3694         "0000000000000080", "0000000000000000", "9CC62DF43B6EED74",
3695         "0000000000000040", "0000000000000000", "D863DBB5C59A91A0",
3696         "0000000000000020", "0000000000000000", "A1AB2190545B91D7",
3697         "0000000000000010", "0000000000000000", "0875041E64C570F7",
3698         "0000000000000008", "0000000000000000", "5A594528BEBEF1CC",
3699         "0000000000000004", "0000000000000000", "FCDB3291DE21F0C0",
3700         "0000000000000002", "0000000000000000", "869EFD7F9F265A09",
3701         "0000000000000001", "0000000000000000", "8CA64DE9C1B123A7",
3702         "0000000000000000", "8000000000000000", "95F8A5E5DD31D900",
3703         "0000000000000000", "4000000000000000", "DD7F121CA5015619",
3704         "0000000000000000", "2000000000000000", "2E8653104F3834EA",
3705         "0000000000000000", "1000000000000000", "4BD388FF6CD81D4F",
3706         "0000000000000000", "0800000000000000", "20B9E767B2FB1456",
3707         "0000000000000000", "0400000000000000", "55579380D77138EF",
3708         "0000000000000000", "0200000000000000", "6CC5DEFAAF04512F",
3709         "0000000000000000", "0100000000000000", "0D9F279BA5D87260",
3710         "0000000000000000", "0080000000000000", "D9031B0271BD5A0A",
3711         "0000000000000000", "0040000000000000", "424250B37C3DD951",
3712         "0000000000000000", "0020000000000000", "B8061B7ECD9A21E5",
3713         "0000000000000000", "0010000000000000", "F15D0F286B65BD28",
3714         "0000000000000000", "0008000000000000", "ADD0CC8D6E5DEBA1",
3715         "0000000000000000", "0004000000000000", "E6D5F82752AD63D1",
3716         "0000000000000000", "0002000000000000", "ECBFE3BD3F591A5E",
3717         "0000000000000000", "0001000000000000", "F356834379D165CD",
3718         "0000000000000000", "0000800000000000", "2B9F982F20037FA9",
3719         "0000000000000000", "0000400000000000", "889DE068A16F0BE6",
3720         "0000000000000000", "0000200000000000", "E19E275D846A1298",
3721         "0000000000000000", "0000100000000000", "329A8ED523D71AEC",
3722         "0000000000000000", "0000080000000000", "E7FCE22557D23C97",
3723         "0000000000000000", "0000040000000000", "12A9F5817FF2D65D",
3724         "0000000000000000", "0000020000000000", "A484C3AD38DC9C19",
3725         "0000000000000000", "0000010000000000", "FBE00A8A1EF8AD72",
3726         "0000000000000000", "0000008000000000", "750D079407521363",
3727         "0000000000000000", "0000004000000000", "64FEED9C724C2FAF",
3728         "0000000000000000", "0000002000000000", "F02B263B328E2B60",
3729         "0000000000000000", "0000001000000000", "9D64555A9A10B852",
3730         "0000000000000000", "0000000800000000", "D106FF0BED5255D7",
3731         "0000000000000000", "0000000400000000", "E1652C6B138C64A5",
3732         "0000000000000000", "0000000200000000", "E428581186EC8F46",
3733         "0000000000000000", "0000000100000000", "AEB5F5EDE22D1A36",
3734         "0000000000000000", "0000000080000000", "E943D7568AEC0C5C",
3735         "0000000000000000", "0000000040000000", "DF98C8276F54B04B",
3736         "0000000000000000", "0000000020000000", "B160E4680F6C696F",
3737         "0000000000000000", "0000000010000000", "FA0752B07D9C4AB8",
3738         "0000000000000000", "0000000008000000", "CA3A2B036DBC8502",
3739         "0000000000000000", "0000000004000000", "5E0905517BB59BCF",
3740         "0000000000000000", "0000000002000000", "814EEB3B91D90726",
3741         "0000000000000000", "0000000001000000", "4D49DB1532919C9F",
3742         "0000000000000000", "0000000000800000", "25EB5FC3F8CF0621",
3743         "0000000000000000", "0000000000400000", "AB6A20C0620D1C6F",
3744         "0000000000000000", "0000000000200000", "79E90DBC98F92CCA",
3745         "0000000000000000", "0000000000100000", "866ECEDD8072BB0E",
3746         "0000000000000000", "0000000000080000", "8B54536F2F3E64A8",
3747         "0000000000000000", "0000000000040000", "EA51D3975595B86B",
3748         "0000000000000000", "0000000000020000", "CAFFC6AC4542DE31",
3749         "0000000000000000", "0000000000010000", "8DD45A2DDF90796C",
3750         "0000000000000000", "0000000000008000", "1029D55E880EC2D0",
3751         "0000000000000000", "0000000000004000", "5D86CB23639DBEA9",
3752         "0000000000000000", "0000000000002000", "1D1CA853AE7C0C5F",
3753         "0000000000000000", "0000000000001000", "CE332329248F3228",
3754         "0000000000000000", "0000000000000800", "8405D1ABE24FB942",
3755         "0000000000000000", "0000000000000400", "E643D78090CA4207",
3756         "0000000000000000", "0000000000000200", "48221B9937748A23",
3757         "0000000000000000", "0000000000000100", "DD7C0BBD61FAFD54",
3758         "0000000000000000", "0000000000000080", "2FBC291A570DB5C4",
3759         "0000000000000000", "0000000000000040", "E07C30D7E4E26E12",
3760         "0000000000000000", "0000000000000020", "0953E2258E8E90A1",
3761         "0000000000000000", "0000000000000010", "5B711BC4CEEBF2EE",
3762         "0000000000000000", "0000000000000008", "CC083F1E6D9E85F6",
3763         "0000000000000000", "0000000000000004", "D2FD8867D50D2DFE",
3764         "0000000000000000", "0000000000000002", "06E7EA22CE92708F",
3765         "0000000000000000", "0000000000000001", "166B40B44ABA4BD6",
3766         "0000000000000000", "0000000000000000", "8CA64DE9C1B123A7",
3767         "0101010101010101", "0101010101010101", "994D4DC157B96C52",
3768         "0202020202020202", "0202020202020202", "E127C2B61D98E6E2",
3769         "0303030303030303", "0303030303030303", "984C91D78A269CE3",
3770         "0404040404040404", "0404040404040404", "1F4570BB77550683",
3771         "0505050505050505", "0505050505050505", "3990ABF98D672B16",
3772         "0606060606060606", "0606060606060606", "3F5150BBA081D585",
3773         "0707070707070707", "0707070707070707", "C65242248C9CF6F2",
3774         "0808080808080808", "0808080808080808", "10772D40FAD24257",
3775         "0909090909090909", "0909090909090909", "F0139440647A6E7B",
3776         "0A0A0A0A0A0A0A0A", "0A0A0A0A0A0A0A0A", "0A288603044D740C",
3777         "0B0B0B0B0B0B0B0B", "0B0B0B0B0B0B0B0B", "6359916942F7438F",
3778         "0C0C0C0C0C0C0C0C", "0C0C0C0C0C0C0C0C", "934316AE443CF08B",
3779         "0D0D0D0D0D0D0D0D", "0D0D0D0D0D0D0D0D", "E3F56D7F1130A2B7",
3780         "0E0E0E0E0E0E0E0E", "0E0E0E0E0E0E0E0E", "A2E4705087C6B6B4",
3781         "0F0F0F0F0F0F0F0F", "0F0F0F0F0F0F0F0F", "D5D76E09A447E8C3",
3782         "1010101010101010", "1010101010101010", "DD7515F2BFC17F85",
3783         "1111111111111111", "1111111111111111", "F40379AB9E0EC533",
3784         "1212121212121212", "1212121212121212", "96CD27784D1563E5",
3785         "1313131313131313", "1313131313131313", "2911CF5E94D33FE1",
3786         "1414141414141414", "1414141414141414", "377B7F7CA3E5BBB3",
3787         "1515151515151515", "1515151515151515", "701AA63832905A92",
3788         "1616161616161616", "1616161616161616", "2006E716C4252D6D",
3789         "1717171717171717", "1717171717171717", "452C1197422469F8",
3790         "1818181818181818", "1818181818181818", "C33FD1EB49CB64DA",
3791         "1919191919191919", "1919191919191919", "7572278F364EB50D",
3792         "1A1A1A1A1A1A1A1A", "1A1A1A1A1A1A1A1A", "69E51488403EF4C3",
3793         "1B1B1B1B1B1B1B1B", "1B1B1B1B1B1B1B1B", "FF847E0ADF192825",
3794         "1C1C1C1C1C1C1C1C", "1C1C1C1C1C1C1C1C", "521B7FB3B41BB791",
3795         "1D1D1D1D1D1D1D1D", "1D1D1D1D1D1D1D1D", "26059A6A0F3F6B35",
3796         "1E1E1E1E1E1E1E1E", "1E1E1E1E1E1E1E1E", "F24A8D2231C77538",
3797         "1F1F1F1F1F1F1F1F", "1F1F1F1F1F1F1F1F", "4FD96EC0D3304EF6",
3798         "2020202020202020", "2020202020202020", "18A9D580A900B699",
3799         "2121212121212121", "2121212121212121", "88586E1D755B9B5A",
3800         "2222222222222222", "2222222222222222", "0F8ADFFB11DC2784",
3801         "2323232323232323", "2323232323232323", "2F30446C8312404A",
3802         "2424242424242424", "2424242424242424", "0BA03D9E6C196511",
3803         "2525252525252525", "2525252525252525", "3E55E997611E4B7D",
3804         "2626262626262626", "2626262626262626", "B2522FB5F158F0DF",
3805         "2727272727272727", "2727272727272727", "2109425935406AB8",
3806         "2828282828282828", "2828282828282828", "11A16028F310FF16",
3807         "2929292929292929", "2929292929292929", "73F0C45F379FE67F",
3808         "2A2A2A2A2A2A2A2A", "2A2A2A2A2A2A2A2A", "DCAD4338F7523816",
3809         "2B2B2B2B2B2B2B2B", "2B2B2B2B2B2B2B2B", "B81634C1CEAB298C",
3810         "2C2C2C2C2C2C2C2C", "2C2C2C2C2C2C2C2C", "DD2CCB29B6C4C349",
3811         "2D2D2D2D2D2D2D2D", "2D2D2D2D2D2D2D2D", "7D07A77A2ABD50A7",
3812         "2E2E2E2E2E2E2E2E", "2E2E2E2E2E2E2E2E", "30C1B0C1FD91D371",
3813         "2F2F2F2F2F2F2F2F", "2F2F2F2F2F2F2F2F", "C4427B31AC61973B",
3814         "3030303030303030", "3030303030303030", "F47BB46273B15EB5",
3815         "3131313131313131", "3131313131313131", "655EA628CF62585F",
3816         "3232323232323232", "3232323232323232", "AC978C247863388F",
3817         "3333333333333333", "3333333333333333", "0432ED386F2DE328",
3818         "3434343434343434", "3434343434343434", "D254014CB986B3C2",
3819         "3535353535353535", "3535353535353535", "B256E34BEDB49801",
3820         "3636363636363636", "3636363636363636", "37F8759EB77E7BFC",
3821         "3737373737373737", "3737373737373737", "5013CA4F62C9CEA0",
3822         "3838383838383838", "3838383838383838", "8940F7B3EACA5939",
3823         "3939393939393939", "3939393939393939", "E22B19A55086774B",
3824         "3A3A3A3A3A3A3A3A", "3A3A3A3A3A3A3A3A", "B04A2AAC925ABB0B",
3825         "3B3B3B3B3B3B3B3B", "3B3B3B3B3B3B3B3B", "8D250D58361597FC",
3826         "3C3C3C3C3C3C3C3C", "3C3C3C3C3C3C3C3C", "51F0114FB6A6CD37",
3827         "3D3D3D3D3D3D3D3D", "3D3D3D3D3D3D3D3D", "9D0BB4DB830ECB73",
3828         "3E3E3E3E3E3E3E3E", "3E3E3E3E3E3E3E3E", "E96089D6368F3E1A",
3829         "3F3F3F3F3F3F3F3F", "3F3F3F3F3F3F3F3F", "5C4CA877A4E1E92D",
3830         "4040404040404040", "4040404040404040", "6D55DDBC8DEA95FF",
3831         "4141414141414141", "4141414141414141", "19DF84AC95551003",
3832         "4242424242424242", "4242424242424242", "724E7332696D08A7",
3833         "4343434343434343", "4343434343434343", "B91810B8CDC58FE2",
3834         "4444444444444444", "4444444444444444", "06E23526EDCCD0C4",
3835         "4545454545454545", "4545454545454545", "EF52491D5468D441",
3836         "4646464646464646", "4646464646464646", "48019C59E39B90C5",
3837         "4747474747474747", "4747474747474747", "0544083FB902D8C0",
3838         "4848484848484848", "4848484848484848", "63B15CADA668CE12",
3839         "4949494949494949", "4949494949494949", "EACC0C1264171071",
3840         "4A4A4A4A4A4A4A4A", "4A4A4A4A4A4A4A4A", "9D2B8C0AC605F274",
3841         "4B4B4B4B4B4B4B4B", "4B4B4B4B4B4B4B4B", "C90F2F4C98A8FB2A",
3842         "4C4C4C4C4C4C4C4C", "4C4C4C4C4C4C4C4C", "03481B4828FD1D04",
3843         "4D4D4D4D4D4D4D4D", "4D4D4D4D4D4D4D4D", "C78FC45A1DCEA2E2",
3844         "4E4E4E4E4E4E4E4E", "4E4E4E4E4E4E4E4E", "DB96D88C3460D801",
3845         "4F4F4F4F4F4F4F4F", "4F4F4F4F4F4F4F4F", "6C69E720F5105518",
3846         "5050505050505050", "5050505050505050", "0D262E418BC893F3",
3847         "5151515151515151", "5151515151515151", "6AD84FD7848A0A5C",
3848         "5252525252525252", "5252525252525252", "C365CB35B34B6114",
3849         "5353535353535353", "5353535353535353", "1155392E877F42A9",
3850         "5454545454545454", "5454545454545454", "531BE5F9405DA715",
3851         "5555555555555555", "5555555555555555", "3BCDD41E6165A5E8",
3852         "5656565656565656", "5656565656565656", "2B1FF5610A19270C",
3853         "5757575757575757", "5757575757575757", "D90772CF3F047CFD",
3854         "5858585858585858", "5858585858585858", "1BEA27FFB72457B7",
3855         "5959595959595959", "5959595959595959", "85C3E0C429F34C27",
3856         "5A5A5A5A5A5A5A5A", "5A5A5A5A5A5A5A5A", "F9038021E37C7618",
3857         "5B5B5B5B5B5B5B5B", "5B5B5B5B5B5B5B5B", "35BC6FF838DBA32F",
3858         "5C5C5C5C5C5C5C5C", "5C5C5C5C5C5C5C5C", "4927ACC8CE45ECE7",
3859         "5D5D5D5D5D5D5D5D", "5D5D5D5D5D5D5D5D", "E812EE6E3572985C",
3860         "5E5E5E5E5E5E5E5E", "5E5E5E5E5E5E5E5E", "9BB93A89627BF65F",
3861         "5F5F5F5F5F5F5F5F", "5F5F5F5F5F5F5F5F", "EF12476884CB74CA",
3862         "6060606060606060", "6060606060606060", "1BF17E00C09E7CBF",
3863         "6161616161616161", "6161616161616161", "29932350C098DB5D",
3864         "6262626262626262", "6262626262626262", "B476E6499842AC54",
3865         "6363636363636363", "6363636363636363", "5C662C29C1E96056",
3866         "6464646464646464", "6464646464646464", "3AF1703D76442789",
3867         "6565656565656565", "6565656565656565", "86405D9B425A8C8C",
3868         "6666666666666666", "6666666666666666", "EBBF4810619C2C55",
3869         "6767676767676767", "6767676767676767", "F8D1CD7367B21B5D",
3870         "6868686868686868", "6868686868686868", "9EE703142BF8D7E2",
3871         "6969696969696969", "6969696969696969", "5FDFFFC3AAAB0CB3",
3872         "6A6A6A6A6A6A6A6A", "6A6A6A6A6A6A6A6A", "26C940AB13574231",
3873         "6B6B6B6B6B6B6B6B", "6B6B6B6B6B6B6B6B", "1E2DC77E36A84693",
3874         "6C6C6C6C6C6C6C6C", "6C6C6C6C6C6C6C6C", "0F4FF4D9BC7E2244",
3875         "6D6D6D6D6D6D6D6D", "6D6D6D6D6D6D6D6D", "A4C9A0D04D3280CD",
3876         "6E6E6E6E6E6E6E6E", "6E6E6E6E6E6E6E6E", "9FAF2C96FE84919D",
3877         "6F6F6F6F6F6F6F6F", "6F6F6F6F6F6F6F6F", "115DBC965E6096C8",
3878         "7070707070707070", "7070707070707070", "AF531E9520994017",
3879         "7171717171717171", "7171717171717171", "B971ADE70E5C89EE",
3880         "7272727272727272", "7272727272727272", "415D81C86AF9C376",
3881         "7373737373737373", "7373737373737373", "8DFB864FDB3C6811",
3882         "7474747474747474", "7474747474747474", "10B1C170E3398F91",
3883         "7575757575757575", "7575757575757575", "CFEF7A1C0218DB1E",
3884         "7676767676767676", "7676767676767676", "DBAC30A2A40B1B9C",
3885         "7777777777777777", "7777777777777777", "89D3BF37052162E9",
3886         "7878787878787878", "7878787878787878", "80D9230BDAEB67DC",
3887         "7979797979797979", "7979797979797979", "3440911019AD68D7",
3888         "7A7A7A7A7A7A7A7A", "7A7A7A7A7A7A7A7A", "9626FE57596E199E",
3889         "7B7B7B7B7B7B7B7B", "7B7B7B7B7B7B7B7B", "DEA0B796624BB5BA",
3890         "7C7C7C7C7C7C7C7C", "7C7C7C7C7C7C7C7C", "E9E40542BDDB3E9D",
3891         "7D7D7D7D7D7D7D7D", "7D7D7D7D7D7D7D7D", "8AD99914B354B911",
3892         "7E7E7E7E7E7E7E7E", "7E7E7E7E7E7E7E7E", "6F85B98DD12CB13B",
3893         "7F7F7F7F7F7F7F7F", "7F7F7F7F7F7F7F7F", "10130DA3C3A23924",
3894         "8080808080808080", "8080808080808080", "EFECF25C3C5DC6DB",
3895         "8181818181818181", "8181818181818181", "907A46722ED34EC4",
3896         "8282828282828282", "8282828282828282", "752666EB4CAB46EE",
3897         "8383838383838383", "8383838383838383", "161BFABD4224C162",
3898         "8484848484848484", "8484848484848484", "215F48699DB44A45",
3899         "8585858585858585", "8585858585858585", "69D901A8A691E661",
3900         "8686868686868686", "8686868686868686", "CBBF6EEFE6529728",
3901         "8787878787878787", "8787878787878787", "7F26DCF425149823",
3902         "8888888888888888", "8888888888888888", "762C40C8FADE9D16",
3903         "8989898989898989", "8989898989898989", "2453CF5D5BF4E463",
3904         "8A8A8A8A8A8A8A8A", "8A8A8A8A8A8A8A8A", "301085E3FDE724E1",
3905         "8B8B8B8B8B8B8B8B", "8B8B8B8B8B8B8B8B", "EF4E3E8F1CC6706E",
3906         "8C8C8C8C8C8C8C8C", "8C8C8C8C8C8C8C8C", "720479B024C397EE",
3907         "8D8D8D8D8D8D8D8D", "8D8D8D8D8D8D8D8D", "BEA27E3795063C89",
3908         "8E8E8E8E8E8E8E8E", "8E8E8E8E8E8E8E8E", "468E5218F1A37611",
3909         "8F8F8F8F8F8F8F8F", "8F8F8F8F8F8F8F8F", "50ACE16ADF66BFE8",
3910         "9090909090909090", "9090909090909090", "EEA24369A19F6937",
3911         "9191919191919191", "9191919191919191", "6050D369017B6E62",
3912         "9292929292929292", "9292929292929292", "5B365F2FB2CD7F32",
3913         "9393939393939393", "9393939393939393", "F0B00B264381DDBB",
3914         "9494949494949494", "9494949494949494", "E1D23881C957B96C",
3915         "9595959595959595", "9595959595959595", "D936BF54ECA8BDCE",
3916         "9696969696969696", "9696969696969696", "A020003C5554F34C",
3917         "9797979797979797", "9797979797979797", "6118FCEBD407281D",
3918         "9898989898989898", "9898989898989898", "072E328C984DE4A2",
3919         "9999999999999999", "9999999999999999", "1440B7EF9E63D3AA",
3920         "9A9A9A9A9A9A9A9A", "9A9A9A9A9A9A9A9A", "79BFA264BDA57373",
3921         "9B9B9B9B9B9B9B9B", "9B9B9B9B9B9B9B9B", "C50E8FC289BBD876",
3922         "9C9C9C9C9C9C9C9C", "9C9C9C9C9C9C9C9C", "A399D3D63E169FA9",
3923         "9D9D9D9D9D9D9D9D", "9D9D9D9D9D9D9D9D", "4B8919B667BD53AB",
3924         "9E9E9E9E9E9E9E9E", "9E9E9E9E9E9E9E9E", "D66CDCAF3F6724A2",
3925         "9F9F9F9F9F9F9F9F", "9F9F9F9F9F9F9F9F", "E40E81FF3F618340",
3926         "A0A0A0A0A0A0A0A0", "A0A0A0A0A0A0A0A0", "10EDB8977B348B35",
3927         "A1A1A1A1A1A1A1A1", "A1A1A1A1A1A1A1A1", "6446C5769D8409A0",
3928         "A2A2A2A2A2A2A2A2", "A2A2A2A2A2A2A2A2", "17ED1191CA8D67A3",
3929         "A3A3A3A3A3A3A3A3", "A3A3A3A3A3A3A3A3", "B6D8533731BA1318",
3930         "A4A4A4A4A4A4A4A4", "A4A4A4A4A4A4A4A4", "CA439007C7245CD0",
3931         "A5A5A5A5A5A5A5A5", "A5A5A5A5A5A5A5A5", "06FC7FDE1C8389E7",
3932         "A6A6A6A6A6A6A6A6", "A6A6A6A6A6A6A6A6", "7A3C1F3BD60CB3D8",
3933         "A7A7A7A7A7A7A7A7", "A7A7A7A7A7A7A7A7", "E415D80048DBA848",
3934         "A8A8A8A8A8A8A8A8", "A8A8A8A8A8A8A8A8", "26F88D30C0FB8302",
3935         "A9A9A9A9A9A9A9A9", "A9A9A9A9A9A9A9A9", "D4E00A9EF5E6D8F3",
3936         "AAAAAAAAAAAAAAAA", "AAAAAAAAAAAAAAAA", "C4322BE19E9A5A17",
3937         "ABABABABABABABAB", "ABABABABABABABAB", "ACE41A06BFA258EA",
3938         "ACACACACACACACAC", "ACACACACACACACAC", "EEAAC6D17880BD56",
3939         "ADADADADADADADAD", "ADADADADADADADAD", "3C9A34CA4CB49EEB",
3940         "AEAEAEAEAEAEAEAE", "AEAEAEAEAEAEAEAE", "9527B0287B75F5A3",
3941         "AFAFAFAFAFAFAFAF", "AFAFAFAFAFAFAFAF", "F2D9D1BE74376C0C",
3942         "B0B0B0B0B0B0B0B0", "B0B0B0B0B0B0B0B0", "939618DF0AEFAAE7",
3943         "B1B1B1B1B1B1B1B1", "B1B1B1B1B1B1B1B1", "24692773CB9F27FE",
3944         "B2B2B2B2B2B2B2B2", "B2B2B2B2B2B2B2B2", "38703BA5E2315D1D",
3945         "B3B3B3B3B3B3B3B3", "B3B3B3B3B3B3B3B3", "FCB7E4B7D702E2FB",
3946         "B4B4B4B4B4B4B4B4", "B4B4B4B4B4B4B4B4", "36F0D0B3675704D5",
3947         "B5B5B5B5B5B5B5B5", "B5B5B5B5B5B5B5B5", "62D473F539FA0D8B",
3948         "B6B6B6B6B6B6B6B6", "B6B6B6B6B6B6B6B6", "1533F3ED9BE8EF8E",
3949         "B7B7B7B7B7B7B7B7", "B7B7B7B7B7B7B7B7", "9C4EA352599731ED",
3950         "B8B8B8B8B8B8B8B8", "B8B8B8B8B8B8B8B8", "FABBF7C046FD273F",
3951         "B9B9B9B9B9B9B9B9", "B9B9B9B9B9B9B9B9", "B7FE63A61C646F3A",
3952         "BABABABABABABABA", "BABABABABABABABA", "10ADB6E2AB972BBE",
3953         "BBBBBBBBBBBBBBBB", "BBBBBBBBBBBBBBBB", "F91DCAD912332F3B",
3954         "BCBCBCBCBCBCBCBC", "BCBCBCBCBCBCBCBC", "46E7EF47323A701D",
3955         "BDBDBDBDBDBDBDBD", "BDBDBDBDBDBDBDBD", "8DB18CCD9692F758",
3956         "BEBEBEBEBEBEBEBE", "BEBEBEBEBEBEBEBE", "E6207B536AAAEFFC",
3957         "BFBFBFBFBFBFBFBF", "BFBFBFBFBFBFBFBF", "92AA224372156A00",
3958         "C0C0C0C0C0C0C0C0", "C0C0C0C0C0C0C0C0", "A3B357885B1E16D2",
3959         "C1C1C1C1C1C1C1C1", "C1C1C1C1C1C1C1C1", "169F7629C970C1E5",
3960         "C2C2C2C2C2C2C2C2", "C2C2C2C2C2C2C2C2", "62F44B247CF1348C",
3961         "C3C3C3C3C3C3C3C3", "C3C3C3C3C3C3C3C3", "AE0FEEB0495932C8",
3962         "C4C4C4C4C4C4C4C4", "C4C4C4C4C4C4C4C4", "72DAF2A7C9EA6803",
3963         "C5C5C5C5C5C5C5C5", "C5C5C5C5C5C5C5C5", "4FB5D5536DA544F4",
3964         "C6C6C6C6C6C6C6C6", "C6C6C6C6C6C6C6C6", "1DD4E65AAF7988B4",
3965         "C7C7C7C7C7C7C7C7", "C7C7C7C7C7C7C7C7", "76BF084C1535A6C6",
3966         "C8C8C8C8C8C8C8C8", "C8C8C8C8C8C8C8C8", "AFEC35B09D36315F",
3967         "C9C9C9C9C9C9C9C9", "C9C9C9C9C9C9C9C9", "C8078A6148818403",
3968         "CACACACACACACACA", "CACACACACACACACA", "4DA91CB4124B67FE",
3969         "CBCBCBCBCBCBCBCB", "CBCBCBCBCBCBCBCB", "2DABFEB346794C3D",
3970         "CCCCCCCCCCCCCCCC", "CCCCCCCCCCCCCCCC", "FBCD12C790D21CD7",
3971         "CDCDCDCDCDCDCDCD", "CDCDCDCDCDCDCDCD", "536873DB879CC770",
3972         "CECECECECECECECE", "CECECECECECECECE", "9AA159D7309DA7A0",
3973         "CFCFCFCFCFCFCFCF", "CFCFCFCFCFCFCFCF", "0B844B9D8C4EA14A",
3974         "D0D0D0D0D0D0D0D0", "D0D0D0D0D0D0D0D0", "3BBD84CE539E68C4",
3975         "D1D1D1D1D1D1D1D1", "D1D1D1D1D1D1D1D1", "CF3E4F3E026E2C8E",
3976         "D2D2D2D2D2D2D2D2", "D2D2D2D2D2D2D2D2", "82F85885D542AF58",
3977         "D3D3D3D3D3D3D3D3", "D3D3D3D3D3D3D3D3", "22D334D6493B3CB6",
3978         "D4D4D4D4D4D4D4D4", "D4D4D4D4D4D4D4D4", "47E9CB3E3154D673",
3979         "D5D5D5D5D5D5D5D5", "D5D5D5D5D5D5D5D5", "2352BCC708ADC7E9",
3980         "D6D6D6D6D6D6D6D6", "D6D6D6D6D6D6D6D6", "8C0F3BA0C8601980",
3981         "D7D7D7D7D7D7D7D7", "D7D7D7D7D7D7D7D7", "EE5E9FD70CEF00E9",
3982         "D8D8D8D8D8D8D8D8", "D8D8D8D8D8D8D8D8", "DEF6BDA6CABF9547",
3983         "D9D9D9D9D9D9D9D9", "D9D9D9D9D9D9D9D9", "4DADD04A0EA70F20",
3984         "DADADADADADADADA", "DADADADADADADADA", "C1AA16689EE1B482",
3985         "DBDBDBDBDBDBDBDB", "DBDBDBDBDBDBDBDB", "F45FC26193E69AEE",
3986         "DCDCDCDCDCDCDCDC", "DCDCDCDCDCDCDCDC", "D0CFBB937CEDBFB5",
3987         "DDDDDDDDDDDDDDDD", "DDDDDDDDDDDDDDDD", "F0752004EE23D87B",
3988         "DEDEDEDEDEDEDEDE", "DEDEDEDEDEDEDEDE", "77A791E28AA464A5",
3989         "DFDFDFDFDFDFDFDF", "DFDFDFDFDFDFDFDF", "E7562A7F56FF4966",
3990         "E0E0E0E0E0E0E0E0", "E0E0E0E0E0E0E0E0", "B026913F2CCFB109",
3991         "E1E1E1E1E1E1E1E1", "E1E1E1E1E1E1E1E1", "0DB572DDCE388AC7",
3992         "E2E2E2E2E2E2E2E2", "E2E2E2E2E2E2E2E2", "D9FA6595F0C094CA",
3993         "E3E3E3E3E3E3E3E3", "E3E3E3E3E3E3E3E3", "ADE4804C4BE4486E",
3994         "E4E4E4E4E4E4E4E4", "E4E4E4E4E4E4E4E4", "007B81F520E6D7DA",
3995         "E5E5E5E5E5E5E5E5", "E5E5E5E5E5E5E5E5", "961AEB77BFC10B3C",
3996         "E6E6E6E6E6E6E6E6", "E6E6E6E6E6E6E6E6", "8A8DD870C9B14AF2",
3997         "E7E7E7E7E7E7E7E7", "E7E7E7E7E7E7E7E7", "3CC02E14B6349B25",
3998         "E8E8E8E8E8E8E8E8", "E8E8E8E8E8E8E8E8", "BAD3EE68BDDB9607",
3999         "E9E9E9E9E9E9E9E9", "E9E9E9E9E9E9E9E9", "DFF918E93BDAD292",
4000         "EAEAEAEAEAEAEAEA", "EAEAEAEAEAEAEAEA", "8FE559C7CD6FA56D",
4001         "EBEBEBEBEBEBEBEB", "EBEBEBEBEBEBEBEB", "C88480835C1A444C",
4002         "ECECECECECECECEC", "ECECECECECECECEC", "D6EE30A16B2CC01E",
4003         "EDEDEDEDEDEDEDED", "EDEDEDEDEDEDEDED", "6932D887B2EA9C1A",
4004         "EEEEEEEEEEEEEEEE", "EEEEEEEEEEEEEEEE", "0BFC865461F13ACC",
4005         "EFEFEFEFEFEFEFEF", "EFEFEFEFEFEFEFEF", "228AEA0D403E807A",
4006         "F0F0F0F0F0F0F0F0", "F0F0F0F0F0F0F0F0", "2A2891F65BB8173C",
4007         "F1F1F1F1F1F1F1F1", "F1F1F1F1F1F1F1F1", "5D1B8FAF7839494B",
4008         "F2F2F2F2F2F2F2F2", "F2F2F2F2F2F2F2F2", "1C0A9280EECF5D48",
4009         "F3F3F3F3F3F3F3F3", "F3F3F3F3F3F3F3F3", "6CBCE951BBC30F74",
4010         "F4F4F4F4F4F4F4F4", "F4F4F4F4F4F4F4F4", "9CA66E96BD08BC70",
4011         "F5F5F5F5F5F5F5F5", "F5F5F5F5F5F5F5F5", "F5D779FCFBB28BF3",
4012         "F6F6F6F6F6F6F6F6", "F6F6F6F6F6F6F6F6", "0FEC6BBF9B859184",
4013         "F7F7F7F7F7F7F7F7", "F7F7F7F7F7F7F7F7", "EF88D2BF052DBDA8",
4014         "F8F8F8F8F8F8F8F8", "F8F8F8F8F8F8F8F8", "39ADBDDB7363090D",
4015         "F9F9F9F9F9F9F9F9", "F9F9F9F9F9F9F9F9", "C0AEAF445F7E2A7A",
4016         "FAFAFAFAFAFAFAFA", "FAFAFAFAFAFAFAFA", "C66F54067298D4E9",
4017         "FBFBFBFBFBFBFBFB", "FBFBFBFBFBFBFBFB", "E0BA8F4488AAF97C",
4018         "FCFCFCFCFCFCFCFC", "FCFCFCFCFCFCFCFC", "67B36E2875D9631C",
4019         "FDFDFDFDFDFDFDFD", "FDFDFDFDFDFDFDFD", "1ED83D49E267191D",
4020         "FEFEFEFEFEFEFEFE", "FEFEFEFEFEFEFEFE", "66B2B23EA84693AD",
4021         "FFFFFFFFFFFFFFFF", "FFFFFFFFFFFFFFFF", "7359B2163E4EDC58",
4022         "0001020304050607", "0011223344556677", "3EF0A891CF8ED990",
4023         "2BD6459F82C5B300", "EA024714AD5C4D84", "126EFE8ED312190A",
4024
4025         NULL
4026 };
4027
4028 /*
4029  * Known-answer tests for DES/3DES in CBC mode. Order: key, IV,
4030  * plaintext, ciphertext.
4031  */
4032 static const char *const KAT_DES_CBC[] = {
4033         /*
4034          * From NIST validation suite (tdesmmt.zip).
4035          */
4036         "34a41a8c293176c1b30732ecfe38ae8a34a41a8c293176c1",
4037         "f55b4855228bd0b4",
4038         "7dd880d2a9ab411c",
4039         "c91892948b6cadb4",
4040
4041         "70a88fa1dfb9942fa77f40157ffef2ad70a88fa1dfb9942f",
4042         "ece08ce2fdc6ce80",
4043         "bc225304d5a3a5c9918fc5006cbc40cc",
4044         "27f67dc87af7ddb4b68f63fa7c2d454a",
4045
4046         "e091790be55be0bc0780153861a84adce091790be55be0bc",
4047         "fd7d430f86fbbffe",
4048         "03c7fffd7f36499c703dedc9df4de4a92dd4382e576d6ae9",
4049         "053aeba85dd3a23bfbe8440a432f9578f312be60fb9f0035",
4050
4051         "857feacd16157c58e5347a70e56e578a857feacd16157c58",
4052         "002dcb6d46ef0969",
4053         "1f13701c7f0d7385307507a18e89843ebd295bd5e239ef109347a6898c6d3fd5",
4054         "a0e4edde34f05bd8397ce279e49853e9387ba04be562f5fa19c3289c3f5a3391",
4055
4056         "a173545b265875ba852331fbb95b49a8a173545b265875ba",
4057         "ab385756391d364c",
4058         "d08894c565608d9ae51dda63b85b3b33b1703bb5e4f1abcbb8794e743da5d6f3bf630f2e9b6d5b54",
4059         "370b47acf89ac6bdbb13c9a7336787dc41e1ad8beead32281d0609fb54968404bdf2894892590658",
4060
4061         "26376bcb2f23df1083cd684fe00ed3c726376bcb2f23df10",
4062         "33acfb0f3d240ea6",
4063         "903a1911da1e6877f23c1985a9b61786ef438e0ce1240885035ad60fc916b18e5d71a1fb9c5d1eff61db75c0076f6efb",
4064         "7a4f7510f6ec0b93e2495d21a8355684d303a770ebda2e0e51ff33d72b20cb73e58e2e3de2ef6b2e12c504c0f181ba63",
4065
4066         "3e1f98135d027cec752f67765408a7913e1f98135d027cec",
4067         "11f5f2304b28f68b",
4068         "7c022f5af24f7925d323d4d0e20a2ce49272c5e764b22c806f4b6ddc406d864fe5bd1c3f45556d3eb30c8676c2f8b54a5a32423a0bd95a07",
4069         "2bb4b131fa4ae0b4f0378a2cdb68556af6eee837613016d7ea936f3931f25f8b3ae351d5e9d00be665676e2400408b5db9892d95421e7f1a",
4070
4071         "13b9d549cd136ec7bf9e9810ef2cdcbf13b9d549cd136ec7",
4072         "a82c1b1057badcc8",
4073         "1fff1563bc1645b55cb23ea34a0049dfc06607150614b621dedcb07f20433402a2d869c95ac4a070c7a3da838c928a385f899c5d21ecb58f4e5cbdad98d39b8c",
4074         "75f804d4a2c542a31703e23df26cc38861a0729090e6eae5672c1db8c0b09fba9b125bbca7d6c7d330b3859e6725c6d26de21c4e3af7f5ea94df3cde2349ce37",
4075
4076         "20320dfdad579bb57c6e4acd769dbadf20320dfdad579bb5",
4077         "879201b5857ccdea",
4078         "0431283cc8bb4dc7750a9d5c68578486932091632a12d0a79f2c54e3d122130881fff727050f317a40fcd1a8d13793458b99fc98254ba6a233e3d95b55cf5a3faff78809999ea4bf",
4079         "85d17840eb2af5fc727027336bfd71a2b31bd14a1d9eb64f8a08bfc4f56eaa9ca7654a5ae698287869cc27324813730de4f1384e0b8cfbc472ff5470e3c5e4bd8ceb23dc2d91988c",
4080
4081         "23abb073a2df34cb3d1fdce6b092582c23abb073a2df34cb",
4082         "7d7fbf19e8562d32",
4083         "31e718fd95e6d7ca4f94763191add2674ab07c909d88c486916c16d60a048a0cf8cdb631cebec791362cd0c202eb61e166b65c1f65d0047c8aec57d3d84b9e17032442dce148e1191b06a12c284cc41e",
4084         "c9a3f75ab6a7cd08a7fd53ca540aafe731d257ee1c379fadcc4cc1a06e7c12bddbeb7562c436d1da849ed072629e82a97b56d9becc25ff4f16f21c5f2a01911604f0b5c49df96cb641faee662ca8aa68",
4085
4086         "b5cb1504802326c73df186e3e352a20de643b0d63ee30e37",
4087         "43f791134c5647ba",
4088         "dcc153cef81d6f24",
4089         "92538bd8af18d3ba",
4090
4091         "a49d7564199e97cb529d2c9d97bf2f98d35edf57ba1f7358",
4092         "c2e999cb6249023c",
4093         "c689aee38a301bb316da75db36f110b5",
4094         "e9afaba5ec75ea1bbe65506655bb4ecb",
4095
4096         "1a5d4c0825072a15a8ad9dfdaeda8c048adffb85bc4fced0",
4097         "7fcfa736f7548b6f",
4098         "983c3edacd939406010e1bc6ff9e12320ac5008117fa8f84",
4099         "d84fa24f38cf451ca2c9adc960120bd8ff9871584fe31cee",
4100
4101         "d98aadc76d4a3716158c32866efbb9ce834af2297379a49d",
4102         "3c5220327c502b44",
4103         "6174079dda53ca723ebf00a66837f8d5ce648c08acaa5ee45ffe62210ef79d3e",
4104         "f5bd4d600bed77bec78409e3530ebda1d815506ed53103015b87e371ae000958",
4105
4106         "ef6d3e54266d978ffb0b8ce6689d803e2cd34cc802fd0252",
4107         "38bae5bce06d0ad9",
4108         "c4f228b537223cd01c0debb5d9d4e12ba71656618d119b2f8f0af29d23efa3a9e43c4c458a1b79a0",
4109         "9e3289fb18379f55aa4e45a7e0e6df160b33b75f8627ad0954f8fdcb78cee55a4664caeda1000fe5",
4110
4111         "625bc19b19df83abfb2f5bec9d4f2062017525a75bc26e70",
4112         "bd0cff364ff69a91",
4113         "8152d2ab876c3c8201403a5a406d3feaf27319dbea6ad01e24f4d18203704b86de70da6bbb6d638e5aba3ff576b79b28",
4114         "706fe7a973fac40e25b2b4499ce527078944c70e976d017b6af86a3a7a6b52943a72ba18a58000d2b61fdc3bfef2bc4a",
4115
4116         "b6383176046e6880a1023bf45768b5bf5119022fe054bfe5",
4117         "ec13ca541c43401e",
4118         "cd5a886e9af011346c4dba36a424f96a78a1ddf28aaa4188bf65451f4efaffc7179a6dd237c0ae35d9b672314e5cb032612597f7e462c6f3",
4119         "b030f976f46277ee211c4a324d5c87555d1084513a1223d3b84416b52bbc28f4b77f3a9d8d0d91dc37d3dbe8af8be98f74674b02f9a38527",
4120
4121         "3d8cf273d343b9aedccddacb91ad86206737adc86b4a49a7",
4122         "bb3a9a0c71c62ef0",
4123         "1fde3991c32ce220b5b6666a9234f2fd7bd24b921829fd9cdc6eb4218be9eac9faa9c2351777349128086b6d58776bc86ff2f76ee1b3b2850a318462b8983fa1",
4124         "422ce705a46bb52ad928dab6c863166d617c6fc24003633120d91918314bbf464cea7345c3c35f2042f2d6929735d74d7728f22fea618a0b9cf5b1281acb13fb",
4125
4126         "fbceb5cb646b925be0b92f7f6b493d5e5b16e9159732732a",
4127         "2e17b3c7025ae86b",
4128         "4c309bc8e1e464fdd2a2b8978645d668d455f7526bd8d7b6716a722f6a900b815c4a73cc30e788065c1dfca7bf5958a6cc5440a5ebe7f8691c20278cde95db764ff8ce8994ece89c",
4129         "c02129bdf4bbbd75e71605a00b12c80db6b4e05308e916615011f09147ed915dd1bc67f27f9e027e4e13df36b55464a31c11b4d1fe3d855d89df492e1a7201b995c1ba16a8dbabee",
4130
4131         "9b162a0df8ad9b61c88676e3d586434570b902f12a2046e0",
4132         "ebd6fefe029ad54b",
4133         "f4c1c918e77355c8156f0fd778da52bff121ae5f2f44eaf4d2754946d0e10d1f18ce3a0176e69c18b7d20b6e0d0bee5eb5edfe4bd60e4d92adcd86bce72e76f94ee5cbcaa8b01cfddcea2ade575e66ac",
4134         "1ff3c8709f403a8eff291aedf50c010df5c5ff64a8b205f1fce68564798897a390db16ee0d053856b75898009731da290fcc119dad987277aacef694872e880c4bb41471063fae05c89f25e4bd0cad6a",
4135
4136         NULL
4137 };
4138
4139 static void
4140 xor_buf(unsigned char *dst, const unsigned char *src, size_t len)
4141 {
4142         while (len -- > 0) {
4143                 *dst ++ ^= *src ++;
4144         }
4145 }
4146
4147 static void
4148 monte_carlo_DES_encrypt(const br_block_cbcenc_class *ve)
4149 {
4150         unsigned char k1[8], k2[8], k3[8];
4151         unsigned char buf[8];
4152         unsigned char cipher[8];
4153         int i, j;
4154         br_des_gen_cbcenc_keys v_ec;
4155         void *ec;
4156
4157         ec = &v_ec;
4158         hextobin(k1, "9ec2372c86379df4");
4159         hextobin(k2, "ad7ac4464f73805d");
4160         hextobin(k3, "20c4f87564527c91");
4161         hextobin(buf, "b624d6bd41783ab1");
4162         hextobin(cipher, "eafd97b190b167fe");
4163         for (i = 0; i < 400; i ++) {
4164                 unsigned char key[24];
4165
4166                 memcpy(key, k1, 8);
4167                 memcpy(key + 8, k2, 8);
4168                 memcpy(key + 16, k3, 8);
4169                 ve->init(ec, key, sizeof key);
4170                 for (j = 0; j < 10000; j ++) {
4171                         unsigned char iv[8];
4172
4173                         memset(iv, 0, sizeof iv);
4174                         ve->run(ec, iv, buf, sizeof buf);
4175                         switch (j) {
4176                         case 9997: xor_buf(k3, buf, 8); break;
4177                         case 9998: xor_buf(k2, buf, 8); break;
4178                         case 9999: xor_buf(k1, buf, 8); break;
4179                         }
4180                 }
4181                 printf(".");
4182                 fflush(stdout);
4183         }
4184         printf(" ");
4185         fflush(stdout);
4186         check_equals("MC DES encrypt", buf, cipher, sizeof buf);
4187 }
4188
4189 static void
4190 monte_carlo_DES_decrypt(const br_block_cbcdec_class *vd)
4191 {
4192         unsigned char k1[8], k2[8], k3[8];
4193         unsigned char buf[8];
4194         unsigned char plain[8];
4195         int i, j;
4196         br_des_gen_cbcdec_keys v_dc;
4197         void *dc;
4198
4199         dc = &v_dc;
4200         hextobin(k1, "79b63486e0ce37e0");
4201         hextobin(k2, "08e65231abae3710");
4202         hextobin(k3, "1f5eb69e925ef185");
4203         hextobin(buf, "2783aa729432fe96");
4204         hextobin(plain, "44937ca532cdbf98");
4205         for (i = 0; i < 400; i ++) {
4206                 unsigned char key[24];
4207
4208                 memcpy(key, k1, 8);
4209                 memcpy(key + 8, k2, 8);
4210                 memcpy(key + 16, k3, 8);
4211                 vd->init(dc, key, sizeof key);
4212                 for (j = 0; j < 10000; j ++) {
4213                         unsigned char iv[8];
4214
4215                         memset(iv, 0, sizeof iv);
4216                         vd->run(dc, iv, buf, sizeof buf);
4217                         switch (j) {
4218                         case 9997: xor_buf(k3, buf, 8); break;
4219                         case 9998: xor_buf(k2, buf, 8); break;
4220                         case 9999: xor_buf(k1, buf, 8); break;
4221                         }
4222                 }
4223                 printf(".");
4224                 fflush(stdout);
4225         }
4226         printf(" ");
4227         fflush(stdout);
4228         check_equals("MC DES decrypt", buf, plain, sizeof buf);
4229 }
4230
4231 static void
4232 test_DES_generic(char *name,
4233         const br_block_cbcenc_class *ve,
4234         const br_block_cbcdec_class *vd,
4235         int with_MC, int with_CBC)
4236 {
4237         size_t u;
4238
4239         printf("Test %s: ", name);
4240         fflush(stdout);
4241
4242         if (ve->block_size != 8 || vd->block_size != 8) {
4243                 fprintf(stderr, "%s failed: wrong block size\n", name);
4244                 exit(EXIT_FAILURE);
4245         }
4246
4247         for (u = 0; KAT_DES[u]; u += 3) {
4248                 unsigned char key[24];
4249                 unsigned char plain[8];
4250                 unsigned char cipher[8];
4251                 unsigned char buf[8];
4252                 unsigned char iv[8];
4253                 size_t key_len;
4254                 br_des_gen_cbcenc_keys v_ec;
4255                 br_des_gen_cbcdec_keys v_dc;
4256                 const br_block_cbcenc_class **ec;
4257                 const br_block_cbcdec_class **dc;
4258
4259                 ec = &v_ec.vtable;
4260                 dc = &v_dc.vtable;
4261                 key_len = hextobin(key, KAT_DES[u]);
4262                 hextobin(plain, KAT_DES[u + 1]);
4263                 hextobin(cipher, KAT_DES[u + 2]);
4264                 ve->init(ec, key, key_len);
4265                 memcpy(buf, plain, sizeof plain);
4266                 memset(iv, 0, sizeof iv);
4267                 ve->run(ec, iv, buf, sizeof buf);
4268                 check_equals("KAT DES encrypt", buf, cipher, sizeof cipher);
4269                 vd->init(dc, key, key_len);
4270                 memset(iv, 0, sizeof iv);
4271                 vd->run(dc, iv, buf, sizeof buf);
4272                 check_equals("KAT DES decrypt", buf, plain, sizeof plain);
4273
4274                 if (key_len == 8) {
4275                         memcpy(key + 8, key, 8);
4276                         memcpy(key + 16, key, 8);
4277                         ve->init(ec, key, 24);
4278                         memcpy(buf, plain, sizeof plain);
4279                         memset(iv, 0, sizeof iv);
4280                         ve->run(ec, iv, buf, sizeof buf);
4281                         check_equals("KAT DES->3 encrypt",
4282                                 buf, cipher, sizeof cipher);
4283                         vd->init(dc, key, 24);
4284                         memset(iv, 0, sizeof iv);
4285                         vd->run(dc, iv, buf, sizeof buf);
4286                         check_equals("KAT DES->3 decrypt",
4287                                 buf, plain, sizeof plain);
4288                 }
4289         }
4290
4291         if (with_CBC) {
4292                 for (u = 0; KAT_DES_CBC[u]; u += 4) {
4293                         unsigned char key[24];
4294                         unsigned char ivref[8];
4295                         unsigned char plain[200];
4296                         unsigned char cipher[200];
4297                         unsigned char buf[200];
4298                         unsigned char iv[8];
4299                         size_t key_len, data_len, v;
4300                         br_des_gen_cbcenc_keys v_ec;
4301                         br_des_gen_cbcdec_keys v_dc;
4302                         const br_block_cbcenc_class **ec;
4303                         const br_block_cbcdec_class **dc;
4304
4305                         ec = &v_ec.vtable;
4306                         dc = &v_dc.vtable;
4307                         key_len = hextobin(key, KAT_DES_CBC[u]);
4308                         hextobin(ivref, KAT_DES_CBC[u + 1]);
4309                         data_len = hextobin(plain, KAT_DES_CBC[u + 2]);
4310                         hextobin(cipher, KAT_DES_CBC[u + 3]);
4311                         ve->init(ec, key, key_len);
4312
4313                         memcpy(buf, plain, data_len);
4314                         memcpy(iv, ivref, 8);
4315                         ve->run(ec, iv, buf, data_len);
4316                         check_equals("KAT CBC DES encrypt",
4317                                 buf, cipher, data_len);
4318                         vd->init(dc, key, key_len);
4319                         memcpy(iv, ivref, 8);
4320                         vd->run(dc, iv, buf, data_len);
4321                         check_equals("KAT CBC DES decrypt",
4322                                 buf, plain, data_len);
4323
4324                         memcpy(buf, plain, data_len);
4325                         memcpy(iv, ivref, 8);
4326                         for (v = 0; v < data_len; v += 8) {
4327                                 ve->run(ec, iv, buf + v, 8);
4328                         }
4329                         check_equals("KAT CBC DES encrypt (2)",
4330                                 buf, cipher, data_len);
4331                         memcpy(iv, ivref, 8);
4332                         for (v = 0; v < data_len; v += 8) {
4333                                 vd->run(dc, iv, buf + v, 8);
4334                         }
4335                         check_equals("KAT CBC DES decrypt (2)",
4336                                 buf, plain, data_len);
4337                 }
4338         }
4339
4340         if (with_MC) {
4341                 monte_carlo_DES_encrypt(ve);
4342                 monte_carlo_DES_decrypt(vd);
4343         }
4344
4345         printf("done.\n");
4346         fflush(stdout);
4347 }
4348
4349 static void
4350 test_DES_tab(void)
4351 {
4352         test_DES_generic("DES_tab",
4353                 &br_des_tab_cbcenc_vtable,
4354                 &br_des_tab_cbcdec_vtable,
4355                 1, 1);
4356 }
4357
4358 static void
4359 test_DES_ct(void)
4360 {
4361         test_DES_generic("DES_ct",
4362                 &br_des_ct_cbcenc_vtable,
4363                 &br_des_ct_cbcdec_vtable,
4364                 1, 1);
4365 }
4366
4367 static const struct {
4368         const char *skey;
4369         const char *snonce;
4370         uint32_t counter;
4371         const char *splain;
4372         const char *scipher;
4373 } KAT_CHACHA20[] = {
4374         {
4375                 "0000000000000000000000000000000000000000000000000000000000000000",
4376                 "000000000000000000000000",
4377                 0,
4378                 "00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000",
4379                 "76b8e0ada0f13d90405d6ae55386bd28bdd219b8a08ded1aa836efcc8b770dc7da41597c5157488d7724e03fb8d84a376a43b8f41518a11cc387b669b2ee6586"
4380         },
4381         {
4382                 "0000000000000000000000000000000000000000000000000000000000000001",
4383                 "000000000000000000000002",
4384                 1,
4385                 "416e79207375626d697373696f6e20746f20746865204945544620696e74656e6465642062792074686520436f6e7472696275746f7220666f72207075626c69636174696f6e20617320616c6c206f722070617274206f6620616e204945544620496e7465726e65742d4472616674206f722052464320616e6420616e792073746174656d656e74206d6164652077697468696e2074686520636f6e74657874206f6620616e204945544620616374697669747920697320636f6e7369646572656420616e20224945544620436f6e747269627574696f6e222e20537563682073746174656d656e747320696e636c756465206f72616c2073746174656d656e747320696e20494554462073657373696f6e732c2061732077656c6c206173207772697474656e20616e6420656c656374726f6e696320636f6d6d756e69636174696f6e73206d61646520617420616e792074696d65206f7220706c6163652c207768696368206172652061646472657373656420746f",
4386                 "a3fbf07df3fa2fde4f376ca23e82737041605d9f4f4f57bd8cff2c1d4b7955ec2a97948bd3722915c8f3d337f7d370050e9e96d647b7c39f56e031ca5eb6250d4042e02785ececfa4b4bb5e8ead0440e20b6e8db09d881a7c6132f420e52795042bdfa7773d8a9051447b3291ce1411c680465552aa6c405b7764d5e87bea85ad00f8449ed8f72d0d662ab052691ca66424bc86d2df80ea41f43abf937d3259dc4b2d0dfb48a6c9139ddd7f76966e928e635553ba76c5c879d7b35d49eb2e62b0871cdac638939e25e8a1e0ef9d5280fa8ca328b351c3c765989cbcf3daa8b6ccc3aaf9f3979c92b3720fc88dc95ed84a1be059c6499b9fda236e7e818b04b0bc39c1e876b193bfe5569753f88128cc08aaa9b63d1a16f80ef2554d7189c411f5869ca52c5b83fa36ff216b9c1d30062bebcfd2dc5bce0911934fda79a86f6e698ced759c3ff9b6477338f3da4f9cd8514ea9982ccafb341b2384dd902f3d1ab7ac61dd29c6f21ba5b862f3730e37cfdc4fd806c22f221"
4387         },
4388         {
4389                 "1c9240a5eb55d38af333888604f6b5f0473917c1402b80099dca5cbc207075c0",
4390                 "000000000000000000000002",
4391                 42,
4392                 "2754776173206272696c6c69672c20616e642074686520736c6974687920746f7665730a446964206779726520616e642067696d626c6520696e2074686520776162653a0a416c6c206d696d737920776572652074686520626f726f676f7665732c0a416e6420746865206d6f6d65207261746873206f757467726162652e",
4393                 "62e6347f95ed87a45ffae7426f27a1df5fb69110044c0d73118effa95b01e5cf166d3df2d721caf9b21e5fb14c616871fd84c54f9d65b283196c7fe4f60553ebf39c6402c42234e32a356b3e764312a61a5532055716ead6962568f87d3f3f7704c6a8d1bcd1bf4d50d6154b6da731b187b58dfd728afa36757a797ac188d1"
4394         },
4395         { 0, 0, 0, 0, 0 }
4396 };
4397
4398 static void
4399 test_ChaCha20_generic(const char *name, br_chacha20_run cr)
4400 {
4401         size_t u;
4402
4403         printf("Test %s: ", name);
4404         fflush(stdout);
4405         if (cr == 0) {
4406                 printf("UNAVAILABLE\n");
4407                 return;
4408         }
4409
4410         for (u = 0; KAT_CHACHA20[u].skey; u ++) {
4411                 unsigned char key[32], nonce[12], plain[400], cipher[400];
4412                 uint32_t cc;
4413                 size_t v, len;
4414
4415                 hextobin(key, KAT_CHACHA20[u].skey);
4416                 hextobin(nonce, KAT_CHACHA20[u].snonce);
4417                 cc = KAT_CHACHA20[u].counter;
4418                 len = hextobin(plain, KAT_CHACHA20[u].splain);
4419                 hextobin(cipher, KAT_CHACHA20[u].scipher);
4420
4421                 for (v = 0; v < len; v ++) {
4422                         unsigned char tmp[400];
4423                         size_t w;
4424                         uint32_t cc2;
4425
4426                         memset(tmp, 0, sizeof tmp);
4427                         memcpy(tmp, plain, v);
4428                         if (cr(key, nonce, cc, tmp, v)
4429                                 != cc + (uint32_t)((v + 63) >> 6))
4430                         {
4431                                 fprintf(stderr, "ChaCha20: wrong counter\n");
4432                                 exit(EXIT_FAILURE);
4433                         }
4434                         if (memcmp(tmp, cipher, v) != 0) {
4435                                 fprintf(stderr, "ChaCha20 KAT fail (1)\n");
4436                                 exit(EXIT_FAILURE);
4437                         }
4438                         for (w = v; w < sizeof tmp; w ++) {
4439                                 if (tmp[w] != 0) {
4440                                         fprintf(stderr, "ChaCha20: overrun\n");
4441                                         exit(EXIT_FAILURE);
4442                                 }
4443                         }
4444                         for (w = 0, cc2 = cc; w < v; w += 64, cc2 ++) {
4445                                 size_t x;
4446
4447                                 x = v - w;
4448                                 if (x > 64) {
4449                                         x = 64;
4450                                 }
4451                                 if (cr(key, nonce, cc2, tmp + w, x)
4452                                         != (cc2 + 1))
4453                                 {
4454                                         fprintf(stderr, "ChaCha20:"
4455                                                 " wrong counter (2)\n");
4456                                         exit(EXIT_FAILURE);
4457                                 }
4458                         }
4459                         if (memcmp(tmp, plain, v) != 0) {
4460                                 fprintf(stderr, "ChaCha20 KAT fail (2)\n");
4461                                 exit(EXIT_FAILURE);
4462                         }
4463                 }
4464
4465                 printf(".");
4466                 fflush(stdout);
4467         }
4468
4469         printf(" done.\n");
4470         fflush(stdout);
4471 }
4472
4473 static void
4474 test_ChaCha20_ct(void)
4475 {
4476         test_ChaCha20_generic("ChaCha20_ct", &br_chacha20_ct_run);
4477 }
4478
4479 static void
4480 test_ChaCha20_sse2(void)
4481 {
4482         test_ChaCha20_generic("ChaCha20_sse2", br_chacha20_sse2_get());
4483 }
4484
4485 static const struct {
4486         const char *splain;
4487         const char *saad;
4488         const char *skey;
4489         const char *snonce;
4490         const char *scipher;
4491         const char *stag;
4492 } KAT_POLY1305[] = {
4493         {
4494                 "4c616469657320616e642047656e746c656d656e206f662074686520636c617373206f66202739393a204966204920636f756c64206f6666657220796f75206f6e6c79206f6e652074697020666f7220746865206675747572652c2073756e73637265656e20776f756c642062652069742e",
4495                 "50515253c0c1c2c3c4c5c6c7",
4496                 "808182838485868788898a8b8c8d8e8f909192939495969798999a9b9c9d9e9f",
4497                 "070000004041424344454647",
4498                 "d31a8d34648e60db7b86afbc53ef7ec2a4aded51296e08fea9e2b5a736ee62d63dbea45e8ca9671282fafb69da92728b1a71de0a9e060b2905d6a5b67ecd3b3692ddbd7f2d778b8c9803aee328091b58fab324e4fad675945585808b4831d7bc3ff4def08e4b7a9de576d26586cec64b6116",
4499                 "1ae10b594f09e26a7e902ecbd0600691"
4500         },
4501         { 0, 0, 0, 0, 0, 0 }
4502 };
4503
4504 static void
4505 test_Poly1305_inner(const char *name, br_poly1305_run ipoly,
4506         br_poly1305_run iref)
4507 {
4508         size_t u;
4509         br_hmac_drbg_context rng;
4510
4511         printf("Test %s: ", name);
4512         fflush(stdout);
4513
4514         for (u = 0; KAT_POLY1305[u].skey; u ++) {
4515                 unsigned char key[32], nonce[12], plain[400], cipher[400];
4516                 unsigned char aad[400], tag[16], data[400], tmp[16];
4517                 size_t len, aad_len;
4518
4519                 len = hextobin(plain, KAT_POLY1305[u].splain);
4520                 aad_len = hextobin(aad, KAT_POLY1305[u].saad);
4521                 hextobin(key, KAT_POLY1305[u].skey);
4522                 hextobin(nonce, KAT_POLY1305[u].snonce);
4523                 hextobin(cipher, KAT_POLY1305[u].scipher);
4524                 hextobin(tag, KAT_POLY1305[u].stag);
4525
4526                 memcpy(data, plain, len);
4527                 ipoly(key, nonce, data, len,
4528                         aad, aad_len, tmp, br_chacha20_ct_run, 1);
4529                 check_equals("ChaCha20+Poly1305 KAT (1)", data, cipher, len);
4530                 check_equals("ChaCha20+Poly1305 KAT (2)", tmp, tag, 16);
4531                 ipoly(key, nonce, data, len,
4532                         aad, aad_len, tmp, br_chacha20_ct_run, 0);
4533                 check_equals("ChaCha20+Poly1305 KAT (3)", data, plain, len);
4534                 check_equals("ChaCha20+Poly1305 KAT (4)", tmp, tag, 16);
4535
4536                 printf(".");
4537                 fflush(stdout);
4538         }
4539
4540         printf(" ");
4541         fflush(stdout);
4542
4543         /*
4544          * We compare the "ipoly" and "iref" implementations together on
4545          * a bunch of pseudo-random messages.
4546          */
4547         br_hmac_drbg_init(&rng, &br_sha256_vtable, "seed for Poly1305", 17);
4548         for (u = 0; u < 100; u ++) {
4549                 unsigned char plain[100], aad[100], tmp[100];
4550                 unsigned char key[32], iv[12], tag1[16], tag2[16];
4551
4552                 br_hmac_drbg_generate(&rng, key, sizeof key);
4553                 br_hmac_drbg_generate(&rng, iv, sizeof iv);
4554                 br_hmac_drbg_generate(&rng, plain, u);
4555                 br_hmac_drbg_generate(&rng, aad, u);
4556                 memcpy(tmp, plain, u);
4557                 memset(tmp + u, 0xFF, (sizeof tmp) - u);
4558                 ipoly(key, iv, tmp, u, aad, u, tag1,
4559                         &br_chacha20_ct_run, 1);
4560                 memset(tmp + u, 0x00, (sizeof tmp) - u);
4561                 iref(key, iv, tmp, u, aad, u, tag2,
4562                         &br_chacha20_ct_run, 0);
4563                 if (memcmp(tmp, plain, u) != 0) {
4564                         fprintf(stderr, "cross enc/dec failed\n");
4565                         exit(EXIT_FAILURE);
4566                 }
4567                 if (memcmp(tag1, tag2, sizeof tag1) != 0) {
4568                         fprintf(stderr, "cross MAC failed\n");
4569                         exit(EXIT_FAILURE);
4570                 }
4571                 printf(".");
4572                 fflush(stdout);
4573         }
4574
4575         printf(" done.\n");
4576         fflush(stdout);
4577 }
4578
4579 static void
4580 test_Poly1305_ctmul(void)
4581 {
4582         test_Poly1305_inner("Poly1305_ctmul", &br_poly1305_ctmul_run,
4583                 &br_poly1305_i15_run);
4584 }
4585
4586 static void
4587 test_Poly1305_ctmul32(void)
4588 {
4589         test_Poly1305_inner("Poly1305_ctmul32", &br_poly1305_ctmul32_run,
4590                 &br_poly1305_i15_run);
4591 }
4592
4593 static void
4594 test_Poly1305_i15(void)
4595 {
4596         test_Poly1305_inner("Poly1305_i15", &br_poly1305_i15_run,
4597                 &br_poly1305_ctmul_run);
4598 }
4599
4600 static void
4601 test_Poly1305_ctmulq(void)
4602 {
4603         br_poly1305_run bp;
4604
4605         bp = br_poly1305_ctmulq_get();
4606         if (bp == 0) {
4607                 printf("Test Poly1305_ctmulq: UNAVAILABLE\n");
4608         } else {
4609                 test_Poly1305_inner("Poly1305_ctmulq", bp,
4610                         &br_poly1305_ctmul_run);
4611         }
4612 }
4613
4614 /*
4615  * A 1024-bit RSA key, generated with OpenSSL.
4616  */
4617 static const unsigned char RSA_N[] = {
4618         0xBF, 0xB4, 0xA6, 0x2E, 0x87, 0x3F, 0x9C, 0x8D,
4619         0xA0, 0xC4, 0x2E, 0x7B, 0x59, 0x36, 0x0F, 0xB0,
4620         0xFF, 0xE1, 0x25, 0x49, 0xE5, 0xE6, 0x36, 0xB0,
4621         0x48, 0xC2, 0x08, 0x6B, 0x77, 0xA7, 0xC0, 0x51,
4622         0x66, 0x35, 0x06, 0xA9, 0x59, 0xDF, 0x17, 0x7F,
4623         0x15, 0xF6, 0xB4, 0xE5, 0x44, 0xEE, 0x72, 0x3C,
4624         0x53, 0x11, 0x52, 0xC9, 0xC9, 0x61, 0x4F, 0x92,
4625         0x33, 0x64, 0x70, 0x43, 0x07, 0xF1, 0x3F, 0x7F,
4626         0x15, 0xAC, 0xF0, 0xC1, 0x54, 0x7D, 0x55, 0xC0,
4627         0x29, 0xDC, 0x9E, 0xCC, 0xE4, 0x1D, 0x11, 0x72,
4628         0x45, 0xF4, 0xD2, 0x70, 0xFC, 0x34, 0xB2, 0x1F,
4629         0xF3, 0xAD, 0x6A, 0xF0, 0xE5, 0x56, 0x11, 0xF8,
4630         0x0C, 0x3A, 0x8B, 0x04, 0x46, 0x7C, 0x77, 0xD9,
4631         0x41, 0x1F, 0x40, 0xBE, 0x93, 0x80, 0x9D, 0x23,
4632         0x75, 0x80, 0x12, 0x26, 0x5A, 0x72, 0x1C, 0xDD,
4633         0x47, 0xB3, 0x2A, 0x33, 0xD8, 0x19, 0x61, 0xE3
4634 };
4635 static const unsigned char RSA_E[] = {
4636         0x01, 0x00, 0x01
4637 };
4638 /* unused
4639 static const unsigned char RSA_D[] = {
4640         0xAE, 0x56, 0x0B, 0x56, 0x7E, 0xDA, 0x83, 0x75,
4641         0x6C, 0xC1, 0x5C, 0x00, 0x02, 0x96, 0x1E, 0x58,
4642         0xF9, 0xA9, 0xF7, 0x2E, 0x27, 0xEB, 0x5E, 0xCA,
4643         0x9B, 0xB0, 0x10, 0xD6, 0x22, 0x7F, 0xA4, 0x6E,
4644         0xA2, 0x03, 0x10, 0xE6, 0xCB, 0x7B, 0x0D, 0x34,
4645         0x1E, 0x76, 0x37, 0xF5, 0xD3, 0xE5, 0x00, 0x70,
4646         0x09, 0x9E, 0xD4, 0x69, 0xFB, 0x40, 0x0A, 0x8B,
4647         0xCB, 0x3E, 0xC8, 0xB4, 0xBC, 0xB1, 0x50, 0xEA,
4648         0x9D, 0xD9, 0x89, 0x8A, 0x98, 0x40, 0x79, 0xD1,
4649         0x07, 0x66, 0xA7, 0x90, 0x63, 0x82, 0xB1, 0xE0,
4650         0x24, 0xD0, 0x89, 0x6A, 0xEC, 0xC5, 0xF3, 0x21,
4651         0x7D, 0xB8, 0xA5, 0x45, 0x3A, 0x3B, 0x34, 0x42,
4652         0xC2, 0x82, 0x3C, 0x8D, 0xFA, 0x5D, 0xA0, 0xA8,
4653         0x24, 0xC8, 0x40, 0x22, 0x19, 0xCB, 0xB5, 0x85,
4654         0x67, 0x69, 0x60, 0xE4, 0xD0, 0x7E, 0xA3, 0x3B,
4655         0xF7, 0x70, 0x50, 0xC9, 0x5C, 0x97, 0x29, 0x49
4656 };
4657 */
4658 static const unsigned char RSA_P[] = {
4659         0xF2, 0xE7, 0x6F, 0x66, 0x2E, 0xC4, 0x03, 0xD4,
4660         0x89, 0x24, 0xCC, 0xE1, 0xCD, 0x3F, 0x01, 0x82,
4661         0xC1, 0xFB, 0xAF, 0x44, 0xFA, 0xCC, 0x0E, 0xAA,
4662         0x9D, 0x74, 0xA9, 0x65, 0xEF, 0xED, 0x4C, 0x87,
4663         0xF0, 0xB3, 0xC6, 0xEA, 0x61, 0x85, 0xDE, 0x4E,
4664         0x66, 0xB2, 0x5A, 0x9F, 0x7A, 0x41, 0xC5, 0x66,
4665         0x57, 0xDF, 0x88, 0xF0, 0xB5, 0xF2, 0xC7, 0x7E,
4666         0xE6, 0x55, 0x21, 0x96, 0x83, 0xD8, 0xAB, 0x57
4667 };
4668 static const unsigned char RSA_Q[] = {
4669         0xCA, 0x0A, 0x92, 0xBF, 0x58, 0xB0, 0x2E, 0xF6,
4670         0x66, 0x50, 0xB1, 0x48, 0x29, 0x42, 0x86, 0x6C,
4671         0x98, 0x06, 0x7E, 0xB8, 0xB5, 0x4F, 0xFB, 0xC4,
4672         0xF3, 0xC3, 0x36, 0x91, 0x07, 0xB6, 0xDB, 0xE9,
4673         0x56, 0x3C, 0x51, 0x7D, 0xB5, 0xEC, 0x0A, 0xA9,
4674         0x7C, 0x66, 0xF9, 0xD8, 0x25, 0xDE, 0xD2, 0x94,
4675         0x5A, 0x58, 0xF1, 0x93, 0xE4, 0xF0, 0x5F, 0x27,
4676         0xBD, 0x83, 0xC7, 0xCA, 0x48, 0x6A, 0xB2, 0x55
4677 };
4678 static const unsigned char RSA_DP[] = {
4679         0xAF, 0x97, 0xBE, 0x60, 0x0F, 0xCE, 0x83, 0x36,
4680         0x51, 0x2D, 0xD9, 0x2E, 0x22, 0x41, 0x39, 0xC6,
4681         0x5C, 0x94, 0xA4, 0xCF, 0x28, 0xBD, 0xFA, 0x9C,
4682         0x3B, 0xD6, 0xE9, 0xDE, 0x56, 0xE3, 0x24, 0x3F,
4683         0xE1, 0x31, 0x14, 0xCA, 0xBA, 0x55, 0x1B, 0xAF,
4684         0x71, 0x6D, 0xDD, 0x35, 0x0C, 0x1C, 0x1F, 0xA7,
4685         0x2C, 0x3E, 0xDB, 0xAF, 0xA6, 0xD8, 0x2A, 0x7F,
4686         0x01, 0xE2, 0xE8, 0xB4, 0xF5, 0xFA, 0xDB, 0x61
4687 };
4688 static const unsigned char RSA_DQ[] = {
4689         0x29, 0xC0, 0x4B, 0x98, 0xFD, 0x13, 0xD3, 0x70,
4690         0x99, 0xAE, 0x1D, 0x24, 0x83, 0x5A, 0x3A, 0xFB,
4691         0x1F, 0xE3, 0x5F, 0xB6, 0x7D, 0xC9, 0x5C, 0x86,
4692         0xD3, 0xB4, 0xC8, 0x86, 0xE9, 0xE8, 0x30, 0xC3,
4693         0xA4, 0x4D, 0x6C, 0xAD, 0xA4, 0xB5, 0x75, 0x72,
4694         0x96, 0xC1, 0x94, 0xE9, 0xC4, 0xD1, 0xAA, 0x04,
4695         0x7C, 0x33, 0x1B, 0x20, 0xEB, 0xD3, 0x7C, 0x66,
4696         0x72, 0xF4, 0x53, 0x8A, 0x0A, 0xB2, 0xF9, 0xCD
4697 };
4698 static const unsigned char RSA_IQ[] = {
4699         0xE8, 0xEB, 0x04, 0x79, 0xA5, 0xC1, 0x79, 0xDE,
4700         0xD5, 0x49, 0xA1, 0x0B, 0x48, 0xB9, 0x0E, 0x55,
4701         0x74, 0x2C, 0x54, 0xEE, 0xA8, 0xB0, 0x01, 0xC2,
4702         0xD2, 0x3C, 0x3E, 0x47, 0x3A, 0x7C, 0xC8, 0x3D,
4703         0x2E, 0x33, 0x54, 0x4D, 0x40, 0x29, 0x41, 0x74,
4704         0xBA, 0xE1, 0x93, 0x09, 0xEC, 0xE0, 0x1B, 0x4D,
4705         0x1F, 0x2A, 0xCA, 0x4A, 0x0B, 0x5F, 0xE6, 0xBE,
4706         0x59, 0x0A, 0xC4, 0xC9, 0xD9, 0x82, 0xAC, 0xE1
4707 };
4708
4709 static const br_rsa_public_key RSA_PK = {
4710         (void *)RSA_N, sizeof RSA_N,
4711         (void *)RSA_E, sizeof RSA_E
4712 };
4713
4714 static const br_rsa_private_key RSA_SK = {
4715         1024,
4716         (void *)RSA_P, sizeof RSA_P,
4717         (void *)RSA_Q, sizeof RSA_Q,
4718         (void *)RSA_DP, sizeof RSA_DP,
4719         (void *)RSA_DQ, sizeof RSA_DQ,
4720         (void *)RSA_IQ, sizeof RSA_IQ
4721 };
4722
4723 static void
4724 test_RSA_core(const char *name, br_rsa_public fpub, br_rsa_private fpriv)
4725 {
4726         unsigned char t1[128], t2[128], t3[128];
4727
4728         printf("Test %s: ", name);
4729         fflush(stdout);
4730
4731         /*
4732          * A KAT test (computed with OpenSSL).
4733          */
4734         hextobin(t1, "45A3DC6A106BCD3BD0E48FB579643AA3FF801E5903E80AA9B43A695A8E7F454E93FA208B69995FF7A6D5617C2FEB8E546375A664977A48931842AAE796B5A0D64393DCA35F3490FC157F5BD83B9D58C2F7926E6AE648A2BD96CAB8FCCD3D35BB11424AD47D973FF6D69CA774841AEC45DFAE99CCF79893E7047FDE6CB00AA76D");
4735         hextobin(t2, "0001FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF003021300906052B0E03021A05000414A94A8FE5CCB19BA61C4C0873D391E987982FBBD3");
4736         memcpy(t3, t1, sizeof t1);
4737         if (!fpub(t3, sizeof t3, &RSA_PK)) {
4738                 fprintf(stderr, "RSA public operation failed\n");
4739                 exit(EXIT_FAILURE);
4740         }
4741         check_equals("KAT RSA pub", t2, t3, sizeof t2);
4742         if (!fpriv(t3, &RSA_SK)) {
4743                 fprintf(stderr, "RSA private operation failed\n");
4744                 exit(EXIT_FAILURE);
4745         }
4746         check_equals("KAT RSA priv", t1, t3, sizeof t1);
4747
4748         printf("done.\n");
4749         fflush(stdout);
4750 }
4751
4752 static const unsigned char SHA1_OID[] = {
4753         0x05, 0x2B, 0x0E, 0x03, 0x02, 0x1A
4754 };
4755
4756 static void
4757 test_RSA_sign(const char *name, br_rsa_private fpriv,
4758         br_rsa_pkcs1_sign fsign, br_rsa_pkcs1_vrfy fvrfy)
4759 {
4760         unsigned char t1[128], t2[128];
4761         unsigned char hv[20], tmp[20];
4762         br_sha1_context hc;
4763         size_t u;
4764
4765         printf("Test %s: ", name);
4766         fflush(stdout);
4767
4768         /*
4769          * Verify the KAT test (computed with OpenSSL).
4770          */
4771         hextobin(t1, "45A3DC6A106BCD3BD0E48FB579643AA3FF801E5903E80AA9B43A695A8E7F454E93FA208B69995FF7A6D5617C2FEB8E546375A664977A48931842AAE796B5A0D64393DCA35F3490FC157F5BD83B9D58C2F7926E6AE648A2BD96CAB8FCCD3D35BB11424AD47D973FF6D69CA774841AEC45DFAE99CCF79893E7047FDE6CB00AA76D");
4772         br_sha1_init(&hc);
4773         br_sha1_update(&hc, "test", 4);
4774         br_sha1_out(&hc, hv);
4775         if (!fvrfy(t1, sizeof t1, SHA1_OID, sizeof tmp, &RSA_PK, tmp)) {
4776                 fprintf(stderr, "Signature verification failed\n");
4777                 exit(EXIT_FAILURE);
4778         }
4779         check_equals("Extracted hash value", hv, tmp, sizeof tmp);
4780
4781         /*
4782          * Regenerate the signature. This should yield the same value as
4783          * the KAT test, since PKCS#1 v1.5 signatures are deterministic
4784          * (except the usual detail about hash function parameter
4785          * encoding, but OpenSSL uses the same convention as BearSSL).
4786          */
4787         if (!fsign(SHA1_OID, hv, 20, &RSA_SK, t2)) {
4788                 fprintf(stderr, "Signature generation failed\n");
4789                 exit(EXIT_FAILURE);
4790         }
4791         check_equals("Regenerated signature", t1, t2, sizeof t1);
4792
4793         /*
4794          * Use the raw private core to generate fake signatures, where
4795          * one byte of the padded hash value is altered. They should all be
4796          * rejected.
4797          */
4798         hextobin(t2, "0001FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF003021300906052B0E03021A05000414A94A8FE5CCB19BA61C4C0873D391E987982FBBD3");
4799         for (u = 0; u < (sizeof t2) - 20; u ++) {
4800                 memcpy(t1, t2, sizeof t2);
4801                 t1[u] ^= 0x01;
4802                 if (!fpriv(t1, &RSA_SK)) {
4803                         fprintf(stderr, "RSA private key operation failed\n");
4804                         exit(EXIT_FAILURE);
4805                 }
4806                 if (fvrfy(t1, sizeof t1, SHA1_OID, sizeof tmp, &RSA_PK, tmp)) {
4807                         fprintf(stderr,
4808                                 "Signature verification should have failed\n");
4809                         exit(EXIT_FAILURE);
4810                 }
4811                 printf(".");
4812                 fflush(stdout);
4813         }
4814
4815         printf(" done.\n");
4816         fflush(stdout);
4817 }
4818
4819 static void
4820 test_RSA_i15(void)
4821 {
4822         test_RSA_core("RSA i15 core", &br_rsa_i15_public, &br_rsa_i15_private);
4823         test_RSA_sign("RSA i15 sign", &br_rsa_i15_private,
4824                 &br_rsa_i15_pkcs1_sign, &br_rsa_i15_pkcs1_vrfy);
4825 }
4826
4827 static void
4828 test_RSA_i31(void)
4829 {
4830         test_RSA_core("RSA i31 core", &br_rsa_i31_public, &br_rsa_i31_private);
4831         test_RSA_sign("RSA i31 sign", &br_rsa_i31_private,
4832                 &br_rsa_i31_pkcs1_sign, &br_rsa_i31_pkcs1_vrfy);
4833 }
4834
4835 static void
4836 test_RSA_i32(void)
4837 {
4838         test_RSA_core("RSA i32 core", &br_rsa_i32_public, &br_rsa_i32_private);
4839         test_RSA_sign("RSA i32 sign", &br_rsa_i32_private,
4840                 &br_rsa_i32_pkcs1_sign, &br_rsa_i32_pkcs1_vrfy);
4841 }
4842
4843 static void
4844 test_RSA_i62(void)
4845 {
4846         br_rsa_public pub;
4847         br_rsa_private priv;
4848         br_rsa_pkcs1_sign sign;
4849         br_rsa_pkcs1_vrfy vrfy;
4850
4851         pub = br_rsa_i62_public_get();
4852         priv = br_rsa_i62_private_get();
4853         sign = br_rsa_i62_pkcs1_sign_get();
4854         vrfy = br_rsa_i62_pkcs1_vrfy_get();
4855         if (pub) {
4856                 if (!priv || !sign || !vrfy) {
4857                         fprintf(stderr, "Inconsistent i62 availability\n");
4858                         exit(EXIT_FAILURE);
4859                 }
4860                 test_RSA_core("RSA i62 core", pub, priv);
4861                 test_RSA_sign("RSA i62 sign", priv, sign, vrfy);
4862         } else {
4863                 if (priv || sign || vrfy) {
4864                         fprintf(stderr, "Inconsistent i62 availability\n");
4865                         exit(EXIT_FAILURE);
4866                 }
4867                 printf("Test RSA i62: UNAVAILABLE\n");
4868         }
4869 }
4870
4871 #if 0
4872 static void
4873 test_RSA_signatures(void)
4874 {
4875         uint32_t n[40], e[2], p[20], q[20], dp[20], dq[20], iq[20], x[40];
4876         unsigned char hv[20], sig[128];
4877         unsigned char ref[128], tmp[128];
4878         br_sha1_context hc;
4879
4880         printf("Test RSA signatures: ");
4881         fflush(stdout);
4882
4883         /*
4884          * Decode RSA key elements.
4885          */
4886         br_int_decode(n, sizeof n / sizeof n[0], RSA_N, sizeof RSA_N);
4887         br_int_decode(e, sizeof e / sizeof e[0], RSA_E, sizeof RSA_E);
4888         br_int_decode(p, sizeof p / sizeof p[0], RSA_P, sizeof RSA_P);
4889         br_int_decode(q, sizeof q / sizeof q[0], RSA_Q, sizeof RSA_Q);
4890         br_int_decode(dp, sizeof dp / sizeof dp[0], RSA_DP, sizeof RSA_DP);
4891         br_int_decode(dq, sizeof dq / sizeof dq[0], RSA_DQ, sizeof RSA_DQ);
4892         br_int_decode(iq, sizeof iq / sizeof iq[0], RSA_IQ, sizeof RSA_IQ);
4893
4894         /*
4895          * Decode reference signature (computed with OpenSSL).
4896          */
4897         hextobin(ref, "45A3DC6A106BCD3BD0E48FB579643AA3FF801E5903E80AA9B43A695A8E7F454E93FA208B69995FF7A6D5617C2FEB8E546375A664977A48931842AAE796B5A0D64393DCA35F3490FC157F5BD83B9D58C2F7926E6AE648A2BD96CAB8FCCD3D35BB11424AD47D973FF6D69CA774841AEC45DFAE99CCF79893E7047FDE6CB00AA76D");
4898
4899         /*
4900          * Recompute signature. Since PKCS#1 v1.5 signatures are
4901          * deterministic, we should get the same as the reference signature.
4902          */
4903         br_sha1_init(&hc);
4904         br_sha1_update(&hc, "test", 4);
4905         br_sha1_out(&hc, hv);
4906         if (!br_rsa_sign(sig, sizeof sig, p, q, dp, dq, iq, br_sha1_ID, hv)) {
4907                 fprintf(stderr, "RSA-1024/SHA-1 sig generate failed\n");
4908                 exit(EXIT_FAILURE);
4909         }
4910         check_equals("KAT RSA-sign 1", sig, ref, sizeof sig);
4911
4912         /*
4913          * Verify signature.
4914          */
4915         if (!br_rsa_verify(sig, sizeof sig, n, e, br_sha1_ID, hv)) {
4916                 fprintf(stderr, "RSA-1024/SHA-1 sig verify failed\n");
4917                 exit(EXIT_FAILURE);
4918         }
4919         hv[5] ^= 0x01;
4920         if (br_rsa_verify(sig, sizeof sig, n, e, br_sha1_ID, hv)) {
4921                 fprintf(stderr, "RSA-1024/SHA-1 sig verify should have failed\n");
4922                 exit(EXIT_FAILURE);
4923         }
4924         hv[5] ^= 0x01;
4925
4926         /*
4927          * Generate a signature with the alternate encoding (no NULL) and
4928          * verify it.
4929          */
4930         hextobin(tmp, "0001FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00301F300706052B0E03021A0414A94A8FE5CCB19BA61C4C0873D391E987982FBBD3");
4931         br_int_decode(x, sizeof x / sizeof x[0], tmp, sizeof tmp);
4932         x[0] = n[0];
4933         br_rsa_private_core(x, p, q, dp, dq, iq);
4934         br_int_encode(sig, sizeof sig, x);
4935         if (!br_rsa_verify(sig, sizeof sig, n, e, br_sha1_ID, hv)) {
4936                 fprintf(stderr, "RSA-1024/SHA-1 sig verify (alt) failed\n");
4937                 exit(EXIT_FAILURE);
4938         }
4939         hv[5] ^= 0x01;
4940         if (br_rsa_verify(sig, sizeof sig, n, e, br_sha1_ID, hv)) {
4941                 fprintf(stderr, "RSA-1024/SHA-1 sig verify (alt) should have failed\n");
4942                 exit(EXIT_FAILURE);
4943         }
4944         hv[5] ^= 0x01;
4945
4946         printf("done.\n");
4947         fflush(stdout);
4948 }
4949 #endif
4950
4951 /*
4952  * From: http://csrc.nist.gov/groups/ST/toolkit/BCM/documents/proposedmodes/gcm/gcm-revised-spec.pdf
4953  */
4954 static const char *const KAT_GHASH[] = {
4955
4956         "66e94bd4ef8a2c3b884cfa59ca342b2e",
4957         "",
4958         "",
4959         "00000000000000000000000000000000",
4960
4961         "66e94bd4ef8a2c3b884cfa59ca342b2e",
4962         "",
4963         "0388dace60b6a392f328c2b971b2fe78",
4964         "f38cbb1ad69223dcc3457ae5b6b0f885",
4965
4966         "b83b533708bf535d0aa6e52980d53b78",
4967         "",
4968         "42831ec2217774244b7221b784d0d49ce3aa212f2c02a4e035c17e2329aca12e21d514b25466931c7d8f6a5aac84aa051ba30b396a0aac973d58e091473f5985",
4969         "7f1b32b81b820d02614f8895ac1d4eac",
4970
4971         "b83b533708bf535d0aa6e52980d53b78",
4972         "feedfacedeadbeeffeedfacedeadbeefabaddad2",
4973         "42831ec2217774244b7221b784d0d49ce3aa212f2c02a4e035c17e2329aca12e21d514b25466931c7d8f6a5aac84aa051ba30b396a0aac973d58e091",
4974         "698e57f70e6ecc7fd9463b7260a9ae5f",
4975
4976         "b83b533708bf535d0aa6e52980d53b78",
4977         "feedfacedeadbeeffeedfacedeadbeefabaddad2",
4978         "61353b4c2806934a777ff51fa22a4755699b2a714fcdc6f83766e5f97b6c742373806900e49f24b22b097544d4896b424989b5e1ebac0f07c23f4598",
4979         "df586bb4c249b92cb6922877e444d37b",
4980
4981         "b83b533708bf535d0aa6e52980d53b78",
4982         "feedfacedeadbeeffeedfacedeadbeefabaddad2",
4983         "8ce24998625615b603a033aca13fb894be9112a5c3a211a8ba262a3cca7e2ca701e4a9a4fba43c90ccdcb281d48c7c6fd62875d2aca417034c34aee5",
4984         "1c5afe9760d3932f3c9a878aac3dc3de",
4985
4986         "aae06992acbf52a3e8f4a96ec9300bd7",
4987         "",
4988         "98e7247c07f0fe411c267e4384b0f600",
4989         "e2c63f0ac44ad0e02efa05ab6743d4ce",
4990
4991         "466923ec9ae682214f2c082badb39249",
4992         "",
4993         "3980ca0b3c00e841eb06fac4872a2757859e1ceaa6efd984628593b40ca1e19c7d773d00c144c525ac619d18c84a3f4718e2448b2fe324d9ccda2710acade256",
4994         "51110d40f6c8fff0eb1ae33445a889f0",
4995
4996         "466923ec9ae682214f2c082badb39249",
4997         "feedfacedeadbeeffeedfacedeadbeefabaddad2",
4998         "3980ca0b3c00e841eb06fac4872a2757859e1ceaa6efd984628593b40ca1e19c7d773d00c144c525ac619d18c84a3f4718e2448b2fe324d9ccda2710",
4999         "ed2ce3062e4a8ec06db8b4c490e8a268",
5000
5001         "466923ec9ae682214f2c082badb39249",
5002         "feedfacedeadbeeffeedfacedeadbeefabaddad2",
5003         "0f10f599ae14a154ed24b36e25324db8c566632ef2bbb34f8347280fc4507057fddc29df9a471f75c66541d4d4dad1c9e93a19a58e8b473fa0f062f7",
5004         "1e6a133806607858ee80eaf237064089",
5005
5006         "466923ec9ae682214f2c082badb39249",
5007         "feedfacedeadbeeffeedfacedeadbeefabaddad2",
5008         "d27e88681ce3243c4830165a8fdcf9ff1de9a1d8e6b447ef6ef7b79828666e4581e79012af34ddd9e2f037589b292db3e67c036745fa22e7e9b7373b",
5009         "82567fb0b4cc371801eadec005968e94",
5010
5011         "dc95c078a2408989ad48a21492842087",
5012         "",
5013         "cea7403d4d606b6e074ec5d3baf39d18",
5014         "83de425c5edc5d498f382c441041ca92",
5015
5016         "acbef20579b4b8ebce889bac8732dad7",
5017         "",
5018         "522dc1f099567d07f47f37a32a84427d643a8cdcbfe5c0c97598a2bd2555d1aa8cb08e48590dbb3da7b08b1056828838c5f61e6393ba7a0abcc9f662898015ad",
5019         "4db870d37cb75fcb46097c36230d1612",
5020
5021         "acbef20579b4b8ebce889bac8732dad7",
5022         "feedfacedeadbeeffeedfacedeadbeefabaddad2",
5023         "522dc1f099567d07f47f37a32a84427d643a8cdcbfe5c0c97598a2bd2555d1aa8cb08e48590dbb3da7b08b1056828838c5f61e6393ba7a0abcc9f662",
5024         "8bd0c4d8aacd391e67cca447e8c38f65",
5025
5026         "acbef20579b4b8ebce889bac8732dad7",
5027         "feedfacedeadbeeffeedfacedeadbeefabaddad2",
5028         "c3762df1ca787d32ae47c13bf19844cbaf1ae14d0b976afac52ff7d79bba9de0feb582d33934a4f0954cc2363bc73f7862ac430e64abe499f47c9b1f",
5029         "75a34288b8c68f811c52b2e9a2f97f63",
5030
5031         "acbef20579b4b8ebce889bac8732dad7",
5032         "feedfacedeadbeeffeedfacedeadbeefabaddad2",
5033         "5a8def2f0c9e53f1f75d7853659e2a20eeb2b22aafde6419a058ab4f6f746bf40fc0c3b780f244452da3ebf1c5d82cdea2418997200ef82e44ae7e3f",
5034         "d5ffcf6fc5ac4d69722187421a7f170b",
5035
5036         NULL,
5037 };
5038
5039 static void
5040 test_GHASH(const char *name, br_ghash gh)
5041 {
5042         size_t u;
5043
5044         printf("Test %s: ", name);
5045         fflush(stdout);
5046
5047         for (u = 0; KAT_GHASH[u]; u += 4) {
5048                 unsigned char h[16];
5049                 unsigned char a[100];
5050                 size_t a_len;
5051                 unsigned char c[100];
5052                 size_t c_len;
5053                 unsigned char p[16];
5054                 unsigned char y[16];
5055                 unsigned char ref[16];
5056
5057                 hextobin(h, KAT_GHASH[u]);
5058                 a_len = hextobin(a, KAT_GHASH[u + 1]);
5059                 c_len = hextobin(c, KAT_GHASH[u + 2]);
5060                 hextobin(ref, KAT_GHASH[u + 3]);
5061                 memset(y, 0, sizeof y);
5062                 gh(y, h, a, a_len);
5063                 gh(y, h, c, c_len);
5064                 memset(p, 0, sizeof p);
5065                 br_enc32be(p + 4, (uint32_t)a_len << 3);
5066                 br_enc32be(p + 12, (uint32_t)c_len << 3);
5067                 gh(y, h, p, sizeof p);
5068                 check_equals("KAT GHASH", y, ref, sizeof ref);
5069         }
5070
5071         for (u = 0; u <= 1024; u ++) {
5072                 unsigned char key[32], iv[12];
5073                 unsigned char buf[1024 + 32];
5074                 unsigned char y0[16], y1[16];
5075                 char tmp[100];
5076
5077                 memset(key, 0, sizeof key);
5078                 memset(iv, 0, sizeof iv);
5079                 br_enc32be(key, u);
5080                 memset(buf, 0, sizeof buf);
5081                 br_chacha20_ct_run(key, iv, 1, buf, sizeof buf);
5082
5083                 memcpy(y0, buf, 16);
5084                 br_ghash_ctmul32(y0, buf + 16, buf + 32, u);
5085                 memcpy(y1, buf, 16);
5086                 gh(y1, buf + 16, buf + 32, u);
5087                 sprintf(tmp, "XREF %s (len = %u)", name, (unsigned)u);
5088                 check_equals(tmp, y0, y1, 16);
5089
5090                 if ((u & 31) == 0) {
5091                         printf(".");
5092                         fflush(stdout);
5093                 }
5094         }
5095
5096         printf("done.\n");
5097         fflush(stdout);
5098 }
5099
5100 static void
5101 test_GHASH_ctmul(void)
5102 {
5103         test_GHASH("GHASH_ctmul", br_ghash_ctmul);
5104 }
5105
5106 static void
5107 test_GHASH_ctmul32(void)
5108 {
5109         test_GHASH("GHASH_ctmul32", br_ghash_ctmul32);
5110 }
5111
5112 static void
5113 test_GHASH_ctmul64(void)
5114 {
5115         test_GHASH("GHASH_ctmul64", br_ghash_ctmul64);
5116 }
5117
5118 static void
5119 test_GHASH_pclmul(void)
5120 {
5121         br_ghash gh;
5122
5123         gh = br_ghash_pclmul_get();
5124         if (gh == 0) {
5125                 printf("Test GHASH_pclmul: UNAVAILABLE\n");
5126         } else {
5127                 test_GHASH("GHASH_pclmul", gh);
5128         }
5129 }
5130
5131 static void
5132 test_GHASH_pwr8(void)
5133 {
5134         br_ghash gh;
5135
5136         gh = br_ghash_pwr8_get();
5137         if (gh == 0) {
5138                 printf("Test GHASH_pwr8: UNAVAILABLE\n");
5139         } else {
5140                 test_GHASH("GHASH_pwr8", gh);
5141         }
5142 }
5143
5144 /*
5145  * From: http://csrc.nist.gov/groups/ST/toolkit/BCM/documents/proposedmodes/gcm/gcm-revised-spec.pdf
5146  *
5147  * Order: key, plaintext, AAD, IV, ciphertext, tag
5148  */
5149 static const char *const KAT_GCM[] = {
5150         "00000000000000000000000000000000",
5151         "",
5152         "",
5153         "000000000000000000000000",
5154         "",
5155         "58e2fccefa7e3061367f1d57a4e7455a",
5156
5157         "00000000000000000000000000000000",
5158         "00000000000000000000000000000000",
5159         "",
5160         "000000000000000000000000",
5161         "0388dace60b6a392f328c2b971b2fe78",
5162         "ab6e47d42cec13bdf53a67b21257bddf",
5163
5164         "feffe9928665731c6d6a8f9467308308",
5165         "d9313225f88406e5a55909c5aff5269a86a7a9531534f7da2e4c303d8a318a721c3c0c95956809532fcf0e2449a6b525b16aedf5aa0de657ba637b391aafd255",
5166         "",
5167         "cafebabefacedbaddecaf888",
5168         "42831ec2217774244b7221b784d0d49ce3aa212f2c02a4e035c17e2329aca12e21d514b25466931c7d8f6a5aac84aa051ba30b396a0aac973d58e091473f5985",
5169         "4d5c2af327cd64a62cf35abd2ba6fab4",
5170
5171         "feffe9928665731c6d6a8f9467308308",
5172         "d9313225f88406e5a55909c5aff5269a86a7a9531534f7da2e4c303d8a318a721c3c0c95956809532fcf0e2449a6b525b16aedf5aa0de657ba637b39",
5173         "feedfacedeadbeeffeedfacedeadbeefabaddad2",
5174         "cafebabefacedbaddecaf888",
5175         "42831ec2217774244b7221b784d0d49ce3aa212f2c02a4e035c17e2329aca12e21d514b25466931c7d8f6a5aac84aa051ba30b396a0aac973d58e091",
5176         "5bc94fbc3221a5db94fae95ae7121a47",
5177
5178         "feffe9928665731c6d6a8f9467308308",
5179         "d9313225f88406e5a55909c5aff5269a86a7a9531534f7da2e4c303d8a318a721c3c0c95956809532fcf0e2449a6b525b16aedf5aa0de657ba637b39",
5180         "feedfacedeadbeeffeedfacedeadbeefabaddad2",
5181         "cafebabefacedbad",
5182         "61353b4c2806934a777ff51fa22a4755699b2a714fcdc6f83766e5f97b6c742373806900e49f24b22b097544d4896b424989b5e1ebac0f07c23f4598",
5183         "3612d2e79e3b0785561be14aaca2fccb",
5184
5185         "feffe9928665731c6d6a8f9467308308",
5186         "d9313225f88406e5a55909c5aff5269a86a7a9531534f7da2e4c303d8a318a721c3c0c95956809532fcf0e2449a6b525b16aedf5aa0de657ba637b39",
5187         "feedfacedeadbeeffeedfacedeadbeefabaddad2",
5188         "9313225df88406e555909c5aff5269aa6a7a9538534f7da1e4c303d2a318a728c3c0c95156809539fcf0e2429a6b525416aedbf5a0de6a57a637b39b",
5189         "8ce24998625615b603a033aca13fb894be9112a5c3a211a8ba262a3cca7e2ca701e4a9a4fba43c90ccdcb281d48c7c6fd62875d2aca417034c34aee5",
5190         "619cc5aefffe0bfa462af43c1699d050",
5191
5192         "000000000000000000000000000000000000000000000000",
5193         "",
5194         "",
5195         "000000000000000000000000",
5196         "",
5197         "cd33b28ac773f74ba00ed1f312572435",
5198
5199         "000000000000000000000000000000000000000000000000",
5200         "00000000000000000000000000000000",
5201         "",
5202         "000000000000000000000000",
5203         "98e7247c07f0fe411c267e4384b0f600",
5204         "2ff58d80033927ab8ef4d4587514f0fb",
5205
5206         "feffe9928665731c6d6a8f9467308308feffe9928665731c",
5207         "d9313225f88406e5a55909c5aff5269a86a7a9531534f7da2e4c303d8a318a721c3c0c95956809532fcf0e2449a6b525b16aedf5aa0de657ba637b391aafd255",
5208         "",
5209         "cafebabefacedbaddecaf888",
5210         "3980ca0b3c00e841eb06fac4872a2757859e1ceaa6efd984628593b40ca1e19c7d773d00c144c525ac619d18c84a3f4718e2448b2fe324d9ccda2710acade256",
5211         "9924a7c8587336bfb118024db8674a14",
5212
5213         "feffe9928665731c6d6a8f9467308308feffe9928665731c",
5214         "d9313225f88406e5a55909c5aff5269a86a7a9531534f7da2e4c303d8a318a721c3c0c95956809532fcf0e2449a6b525b16aedf5aa0de657ba637b39",
5215         "feedfacedeadbeeffeedfacedeadbeefabaddad2",
5216         "cafebabefacedbaddecaf888",
5217         "3980ca0b3c00e841eb06fac4872a2757859e1ceaa6efd984628593b40ca1e19c7d773d00c144c525ac619d18c84a3f4718e2448b2fe324d9ccda2710",
5218         "2519498e80f1478f37ba55bd6d27618c",
5219
5220         "feffe9928665731c6d6a8f9467308308feffe9928665731c",
5221         "d9313225f88406e5a55909c5aff5269a86a7a9531534f7da2e4c303d8a318a721c3c0c95956809532fcf0e2449a6b525b16aedf5aa0de657ba637b39",
5222         "feedfacedeadbeeffeedfacedeadbeefabaddad2",
5223         "cafebabefacedbad",
5224         "0f10f599ae14a154ed24b36e25324db8c566632ef2bbb34f8347280fc4507057fddc29df9a471f75c66541d4d4dad1c9e93a19a58e8b473fa0f062f7",
5225         "65dcc57fcf623a24094fcca40d3533f8",
5226
5227         "feffe9928665731c6d6a8f9467308308feffe9928665731c",
5228         "d9313225f88406e5a55909c5aff5269a86a7a9531534f7da2e4c303d8a318a721c3c0c95956809532fcf0e2449a6b525b16aedf5aa0de657ba637b39",
5229         "feedfacedeadbeeffeedfacedeadbeefabaddad2",
5230         "9313225df88406e555909c5aff5269aa6a7a9538534f7da1e4c303d2a318a728c3c0c95156809539fcf0e2429a6b525416aedbf5a0de6a57a637b39b",
5231         "d27e88681ce3243c4830165a8fdcf9ff1de9a1d8e6b447ef6ef7b79828666e4581e79012af34ddd9e2f037589b292db3e67c036745fa22e7e9b7373b",
5232         "dcf566ff291c25bbb8568fc3d376a6d9",
5233
5234         "0000000000000000000000000000000000000000000000000000000000000000",
5235         "",
5236         "",
5237         "000000000000000000000000",
5238         "",
5239         "530f8afbc74536b9a963b4f1c4cb738b",
5240
5241         "0000000000000000000000000000000000000000000000000000000000000000",
5242         "00000000000000000000000000000000",
5243         "",
5244         "000000000000000000000000",
5245         "cea7403d4d606b6e074ec5d3baf39d18",
5246         "d0d1c8a799996bf0265b98b5d48ab919",
5247
5248         "feffe9928665731c6d6a8f9467308308feffe9928665731c6d6a8f9467308308",
5249         "d9313225f88406e5a55909c5aff5269a86a7a9531534f7da2e4c303d8a318a721c3c0c95956809532fcf0e2449a6b525b16aedf5aa0de657ba637b391aafd255",
5250         "",
5251         "cafebabefacedbaddecaf888",
5252         "522dc1f099567d07f47f37a32a84427d643a8cdcbfe5c0c97598a2bd2555d1aa8cb08e48590dbb3da7b08b1056828838c5f61e6393ba7a0abcc9f662898015ad",
5253         "b094dac5d93471bdec1a502270e3cc6c",
5254
5255         "feffe9928665731c6d6a8f9467308308feffe9928665731c6d6a8f9467308308",
5256         "d9313225f88406e5a55909c5aff5269a86a7a9531534f7da2e4c303d8a318a721c3c0c95956809532fcf0e2449a6b525b16aedf5aa0de657ba637b39",
5257         "feedfacedeadbeeffeedfacedeadbeefabaddad2",
5258         "cafebabefacedbaddecaf888",
5259         "522dc1f099567d07f47f37a32a84427d643a8cdcbfe5c0c97598a2bd2555d1aa8cb08e48590dbb3da7b08b1056828838c5f61e6393ba7a0abcc9f662",
5260         "76fc6ece0f4e1768cddf8853bb2d551b",
5261
5262         "feffe9928665731c6d6a8f9467308308feffe9928665731c6d6a8f9467308308",
5263         "d9313225f88406e5a55909c5aff5269a86a7a9531534f7da2e4c303d8a318a721c3c0c95956809532fcf0e2449a6b525b16aedf5aa0de657ba637b39",
5264         "feedfacedeadbeeffeedfacedeadbeefabaddad2",
5265         "cafebabefacedbad",
5266         "c3762df1ca787d32ae47c13bf19844cbaf1ae14d0b976afac52ff7d79bba9de0feb582d33934a4f0954cc2363bc73f7862ac430e64abe499f47c9b1f",
5267         "3a337dbf46a792c45e454913fe2ea8f2",
5268
5269         "feffe9928665731c6d6a8f9467308308feffe9928665731c6d6a8f9467308308",
5270         "d9313225f88406e5a55909c5aff5269a86a7a9531534f7da2e4c303d8a318a721c3c0c95956809532fcf0e2449a6b525b16aedf5aa0de657ba637b39",
5271         "feedfacedeadbeeffeedfacedeadbeefabaddad2",
5272         "9313225df88406e555909c5aff5269aa6a7a9538534f7da1e4c303d2a318a728c3c0c95156809539fcf0e2429a6b525416aedbf5a0de6a57a637b39b",
5273         "5a8def2f0c9e53f1f75d7853659e2a20eeb2b22aafde6419a058ab4f6f746bf40fc0c3b780f244452da3ebf1c5d82cdea2418997200ef82e44ae7e3f",
5274         "a44a8266ee1c8eb0c8b5d4cf5ae9f19a",
5275
5276         NULL
5277 };
5278
5279 static void
5280 test_GCM(void)
5281 {
5282         size_t u;
5283
5284         printf("Test GCM: ");
5285         fflush(stdout);
5286
5287         for (u = 0; KAT_GCM[u]; u += 6) {
5288                 unsigned char key[32];
5289                 unsigned char plain[100];
5290                 unsigned char aad[100];
5291                 unsigned char iv[100];
5292                 unsigned char cipher[100];
5293                 unsigned char tag[100];
5294                 size_t key_len, plain_len, aad_len, iv_len;
5295                 br_aes_ct_ctr_keys bc;
5296                 br_gcm_context gc;
5297                 unsigned char tmp[100], out[16];
5298                 size_t v, tag_len;
5299
5300                 key_len = hextobin(key, KAT_GCM[u]);
5301                 plain_len = hextobin(plain, KAT_GCM[u + 1]);
5302                 aad_len = hextobin(aad, KAT_GCM[u + 2]);
5303                 iv_len = hextobin(iv, KAT_GCM[u + 3]);
5304                 hextobin(cipher, KAT_GCM[u + 4]);
5305                 hextobin(tag, KAT_GCM[u + 5]);
5306
5307                 br_aes_ct_ctr_init(&bc, key, key_len);
5308                 br_gcm_init(&gc, &bc.vtable, br_ghash_ctmul32);
5309
5310                 memset(tmp, 0x54, sizeof tmp);
5311
5312                 /*
5313                  * Basic operation.
5314                  */
5315                 memcpy(tmp, plain, plain_len);
5316                 br_gcm_reset(&gc, iv, iv_len);
5317                 br_gcm_aad_inject(&gc, aad, aad_len);
5318                 br_gcm_flip(&gc);
5319                 br_gcm_run(&gc, 1, tmp, plain_len);
5320                 br_gcm_get_tag(&gc, out);
5321                 check_equals("KAT GCM 1", tmp, cipher, plain_len);
5322                 check_equals("KAT GCM 2", out, tag, 16);
5323
5324                 br_gcm_reset(&gc, iv, iv_len);
5325                 br_gcm_aad_inject(&gc, aad, aad_len);
5326                 br_gcm_flip(&gc);
5327                 br_gcm_run(&gc, 0, tmp, plain_len);
5328                 check_equals("KAT GCM 3", tmp, plain, plain_len);
5329                 if (!br_gcm_check_tag(&gc, tag)) {
5330                         fprintf(stderr, "Tag not verified (1)\n");
5331                         exit(EXIT_FAILURE);
5332                 }
5333
5334                 for (v = plain_len; v < sizeof tmp; v ++) {
5335                         if (tmp[v] != 0x54) {
5336                                 fprintf(stderr, "overflow on data\n");
5337                                 exit(EXIT_FAILURE);
5338                         }
5339                 }
5340
5341                 /*
5342                  * Byte-by-byte injection.
5343                  */
5344                 br_gcm_reset(&gc, iv, iv_len);
5345                 for (v = 0; v < aad_len; v ++) {
5346                         br_gcm_aad_inject(&gc, aad + v, 1);
5347                 }
5348                 br_gcm_flip(&gc);
5349                 for (v = 0; v < plain_len; v ++) {
5350                         br_gcm_run(&gc, 1, tmp + v, 1);
5351                 }
5352                 check_equals("KAT GCM 4", tmp, cipher, plain_len);
5353                 if (!br_gcm_check_tag(&gc, tag)) {
5354                         fprintf(stderr, "Tag not verified (2)\n");
5355                         exit(EXIT_FAILURE);
5356                 }
5357
5358                 br_gcm_reset(&gc, iv, iv_len);
5359                 for (v = 0; v < aad_len; v ++) {
5360                         br_gcm_aad_inject(&gc, aad + v, 1);
5361                 }
5362                 br_gcm_flip(&gc);
5363                 for (v = 0; v < plain_len; v ++) {
5364                         br_gcm_run(&gc, 0, tmp + v, 1);
5365                 }
5366                 br_gcm_get_tag(&gc, out);
5367                 check_equals("KAT GCM 5", tmp, plain, plain_len);
5368                 check_equals("KAT GCM 6", out, tag, 16);
5369
5370                 /*
5371                  * Check that alterations are detected.
5372                  */
5373                 for (v = 0; v < aad_len; v ++) {
5374                         memcpy(tmp, cipher, plain_len);
5375                         br_gcm_reset(&gc, iv, iv_len);
5376                         aad[v] ^= 0x04;
5377                         br_gcm_aad_inject(&gc, aad, aad_len);
5378                         aad[v] ^= 0x04;
5379                         br_gcm_flip(&gc);
5380                         br_gcm_run(&gc, 0, tmp, plain_len);
5381                         check_equals("KAT GCM 7", tmp, plain, plain_len);
5382                         if (br_gcm_check_tag(&gc, tag)) {
5383                                 fprintf(stderr, "Tag should have changed\n");
5384                                 exit(EXIT_FAILURE);
5385                         }
5386                 }
5387
5388                 /*
5389                  * Tag truncation.
5390                  */
5391                 for (tag_len = 1; tag_len <= 16; tag_len ++) {
5392                         memset(out, 0x54, sizeof out);
5393                         memcpy(tmp, plain, plain_len);
5394                         br_gcm_reset(&gc, iv, iv_len);
5395                         br_gcm_aad_inject(&gc, aad, aad_len);
5396                         br_gcm_flip(&gc);
5397                         br_gcm_run(&gc, 1, tmp, plain_len);
5398                         br_gcm_get_tag_trunc(&gc, out, tag_len);
5399                         check_equals("KAT GCM 8", out, tag, tag_len);
5400                         for (v = tag_len; v < sizeof out; v ++) {
5401                                 if (out[v] != 0x54) {
5402                                         fprintf(stderr, "overflow on tag\n");
5403                                         exit(EXIT_FAILURE);
5404                                 }
5405                         }
5406
5407                         memcpy(tmp, plain, plain_len);
5408                         br_gcm_reset(&gc, iv, iv_len);
5409                         br_gcm_aad_inject(&gc, aad, aad_len);
5410                         br_gcm_flip(&gc);
5411                         br_gcm_run(&gc, 1, tmp, plain_len);
5412                         if (!br_gcm_check_tag_trunc(&gc, out, tag_len)) {
5413                                 fprintf(stderr, "Tag not verified (3)\n");
5414                                 exit(EXIT_FAILURE);
5415                         }
5416                 }
5417
5418                 printf(".");
5419                 fflush(stdout);
5420         }
5421
5422         printf(" done.\n");
5423         fflush(stdout);
5424 }
5425
5426 /*
5427  * From "The EAX Mode of Operation (A Two-Pass Authenticated Encryption
5428  * Scheme Optimized for Simplicity and Efficiency)" (Bellare, Rogaway,
5429  * Wagner), presented at FSE 2004. Full article is available at:
5430  *   http://web.cs.ucdavis.edu/~rogaway/papers/eax.html
5431  *
5432  * EAX specification concatenates the authentication tag at the end of
5433  * the ciphertext; in our API and the vectors below, the tag is separate.
5434  *
5435  * Order is: plaintext, key, nonce, header, ciphertext, tag.
5436  */
5437 static const char *const KAT_EAX[] = {
5438         "",
5439         "233952dee4d5ed5f9b9c6d6ff80ff478",
5440         "62ec67f9c3a4a407fcb2a8c49031a8b3",
5441         "6bfb914fd07eae6b",
5442         "",
5443         "e037830e8389f27b025a2d6527e79d01",
5444
5445         "f7fb",
5446         "91945d3f4dcbee0bf45ef52255f095a4",
5447         "becaf043b0a23d843194ba972c66debd",
5448         "fa3bfd4806eb53fa",
5449         "19dd",
5450         "5c4c9331049d0bdab0277408f67967e5",
5451
5452         "1a47cb4933",
5453         "01f74ad64077f2e704c0f60ada3dd523",
5454         "70c3db4f0d26368400a10ed05d2bff5e",
5455         "234a3463c1264ac6",
5456         "d851d5bae0",
5457         "3a59f238a23e39199dc9266626c40f80",
5458
5459         "481c9e39b1",
5460         "d07cf6cbb7f313bdde66b727afd3c5e8",
5461         "8408dfff3c1a2b1292dc199e46b7d617",
5462         "33cce2eabff5a79d",
5463         "632a9d131a",
5464         "d4c168a4225d8e1ff755939974a7bede",
5465
5466         "40d0c07da5e4",
5467         "35b6d0580005bbc12b0587124557d2c2",
5468         "fdb6b06676eedc5c61d74276e1f8e816",
5469         "aeb96eaebe2970e9",
5470         "071dfe16c675",
5471         "cb0677e536f73afe6a14b74ee49844dd",
5472
5473         "4de3b35c3fc039245bd1fb7d",
5474         "bd8e6e11475e60b268784c38c62feb22",
5475         "6eac5c93072d8e8513f750935e46da1b",
5476         "d4482d1ca78dce0f",
5477         "835bb4f15d743e350e728414",
5478         "abb8644fd6ccb86947c5e10590210a4f",
5479
5480         "8b0a79306c9ce7ed99dae4f87f8dd61636",
5481         "7c77d6e813bed5ac98baa417477a2e7d",
5482         "1a8c98dcd73d38393b2bf1569deefc19",
5483         "65d2017990d62528",
5484         "02083e3979da014812f59f11d52630da30",
5485         "137327d10649b0aa6e1c181db617d7f2",
5486
5487         "1bda122bce8a8dbaf1877d962b8592dd2d56",
5488         "5fff20cafab119ca2fc73549e20f5b0d",
5489         "dde59b97d722156d4d9aff2bc7559826",
5490         "54b9f04e6a09189a",
5491         "2ec47b2c4954a489afc7ba4897edcdae8cc3",
5492         "3b60450599bd02c96382902aef7f832a",
5493
5494         "6cf36720872b8513f6eab1a8a44438d5ef11",
5495         "a4a4782bcffd3ec5e7ef6d8c34a56123",
5496         "b781fcf2f75fa5a8de97a9ca48e522ec",
5497         "899a175897561d7e",
5498         "0de18fd0fdd91e7af19f1d8ee8733938b1e8",
5499         "e7f6d2231618102fdb7fe55ff1991700",
5500
5501         "ca40d7446e545ffaed3bd12a740a659ffbbb3ceab7",
5502         "8395fcf1e95bebd697bd010bc766aac3",
5503         "22e7add93cfc6393c57ec0b3c17d6b44",
5504         "126735fcc320d25a",
5505         "cb8920f87a6c75cff39627b56e3ed197c552d295a7",
5506         "cfc46afc253b4652b1af3795b124ab6e",
5507
5508         NULL
5509 };
5510
5511 static void
5512 test_EAX_inner(const char *name, const br_block_ctrcbc_class *vt)
5513 {
5514         size_t u;
5515
5516         printf("Test EAX %s: ", name);
5517         fflush(stdout);
5518
5519         for (u = 0; KAT_EAX[u]; u += 6) {
5520                 unsigned char plain[100];
5521                 unsigned char key[32];
5522                 unsigned char nonce[100];
5523                 unsigned char aad[100];
5524                 unsigned char cipher[100];
5525                 unsigned char tag[100];
5526                 size_t plain_len, key_len, nonce_len, aad_len;
5527                 br_aes_gen_ctrcbc_keys bc;
5528                 br_eax_context ec;
5529                 br_eax_state st;
5530                 unsigned char tmp[100], out[16];
5531                 size_t v, tag_len;
5532
5533                 plain_len = hextobin(plain, KAT_EAX[u]);
5534                 key_len = hextobin(key, KAT_EAX[u + 1]);
5535                 nonce_len = hextobin(nonce, KAT_EAX[u + 2]);
5536                 aad_len = hextobin(aad, KAT_EAX[u + 3]);
5537                 hextobin(cipher, KAT_EAX[u + 4]);
5538                 hextobin(tag, KAT_EAX[u + 5]);
5539
5540                 vt->init(&bc.vtable, key, key_len);
5541                 br_eax_init(&ec, &bc.vtable);
5542
5543                 memset(tmp, 0x54, sizeof tmp);
5544
5545                 /*
5546                  * Basic operation.
5547                  */
5548                 memcpy(tmp, plain, plain_len);
5549                 br_eax_reset(&ec, nonce, nonce_len);
5550                 br_eax_aad_inject(&ec, aad, aad_len);
5551                 br_eax_flip(&ec);
5552                 br_eax_run(&ec, 1, tmp, plain_len);
5553                 br_eax_get_tag(&ec, out);
5554                 check_equals("KAT EAX 1", tmp, cipher, plain_len);
5555                 check_equals("KAT EAX 2", out, tag, 16);
5556
5557                 br_eax_reset(&ec, nonce, nonce_len);
5558                 br_eax_aad_inject(&ec, aad, aad_len);
5559                 br_eax_flip(&ec);
5560                 br_eax_run(&ec, 0, tmp, plain_len);
5561                 check_equals("KAT EAX 3", tmp, plain, plain_len);
5562                 if (!br_eax_check_tag(&ec, tag)) {
5563                         fprintf(stderr, "Tag not verified (1)\n");
5564                         exit(EXIT_FAILURE);
5565                 }
5566
5567                 for (v = plain_len; v < sizeof tmp; v ++) {
5568                         if (tmp[v] != 0x54) {
5569                                 fprintf(stderr, "overflow on data\n");
5570                                 exit(EXIT_FAILURE);
5571                         }
5572                 }
5573
5574                 /*
5575                  * Byte-by-byte injection.
5576                  */
5577                 br_eax_reset(&ec, nonce, nonce_len);
5578                 for (v = 0; v < aad_len; v ++) {
5579                         br_eax_aad_inject(&ec, aad + v, 1);
5580                 }
5581                 br_eax_flip(&ec);
5582                 for (v = 0; v < plain_len; v ++) {
5583                         br_eax_run(&ec, 1, tmp + v, 1);
5584                 }
5585                 check_equals("KAT EAX 4", tmp, cipher, plain_len);
5586                 if (!br_eax_check_tag(&ec, tag)) {
5587                         fprintf(stderr, "Tag not verified (2)\n");
5588                         exit(EXIT_FAILURE);
5589                 }
5590
5591                 br_eax_reset(&ec, nonce, nonce_len);
5592                 for (v = 0; v < aad_len; v ++) {
5593                         br_eax_aad_inject(&ec, aad + v, 1);
5594                 }
5595                 br_eax_flip(&ec);
5596                 for (v = 0; v < plain_len; v ++) {
5597                         br_eax_run(&ec, 0, tmp + v, 1);
5598                 }
5599                 br_eax_get_tag(&ec, out);
5600                 check_equals("KAT EAX 5", tmp, plain, plain_len);
5601                 check_equals("KAT EAX 6", out, tag, 16);
5602
5603                 /*
5604                  * Check that alterations are detected.
5605                  */
5606                 for (v = 0; v < aad_len; v ++) {
5607                         memcpy(tmp, cipher, plain_len);
5608                         br_eax_reset(&ec, nonce, nonce_len);
5609                         aad[v] ^= 0x04;
5610                         br_eax_aad_inject(&ec, aad, aad_len);
5611                         aad[v] ^= 0x04;
5612                         br_eax_flip(&ec);
5613                         br_eax_run(&ec, 0, tmp, plain_len);
5614                         check_equals("KAT EAX 7", tmp, plain, plain_len);
5615                         if (br_eax_check_tag(&ec, tag)) {
5616                                 fprintf(stderr, "Tag should have changed\n");
5617                                 exit(EXIT_FAILURE);
5618                         }
5619                 }
5620
5621                 /*
5622                  * Tag truncation.
5623                  */
5624                 for (tag_len = 1; tag_len <= 16; tag_len ++) {
5625                         memset(out, 0x54, sizeof out);
5626                         memcpy(tmp, plain, plain_len);
5627                         br_eax_reset(&ec, nonce, nonce_len);
5628                         br_eax_aad_inject(&ec, aad, aad_len);
5629                         br_eax_flip(&ec);
5630                         br_eax_run(&ec, 1, tmp, plain_len);
5631                         br_eax_get_tag_trunc(&ec, out, tag_len);
5632                         check_equals("KAT EAX 8", out, tag, tag_len);
5633                         for (v = tag_len; v < sizeof out; v ++) {
5634                                 if (out[v] != 0x54) {
5635                                         fprintf(stderr, "overflow on tag\n");
5636                                         exit(EXIT_FAILURE);
5637                                 }
5638                         }
5639
5640                         memcpy(tmp, plain, plain_len);
5641                         br_eax_reset(&ec, nonce, nonce_len);
5642                         br_eax_aad_inject(&ec, aad, aad_len);
5643                         br_eax_flip(&ec);
5644                         br_eax_run(&ec, 1, tmp, plain_len);
5645                         if (!br_eax_check_tag_trunc(&ec, out, tag_len)) {
5646                                 fprintf(stderr, "Tag not verified (3)\n");
5647                                 exit(EXIT_FAILURE);
5648                         }
5649                 }
5650
5651                 printf(".");
5652                 fflush(stdout);
5653
5654                 /*
5655                  * For capture tests, we need the message to be non-empty.
5656                  */
5657                 if (plain_len == 0) {
5658                         continue;
5659                 }
5660
5661                 /*
5662                  * Captured state, pre-AAD. This requires the AAD and the
5663                  * message to be non-empty.
5664                  */
5665                 br_eax_capture(&ec, &st);
5666
5667                 if (aad_len > 0) {
5668                         br_eax_reset_pre_aad(&ec, &st, nonce, nonce_len);
5669                         br_eax_aad_inject(&ec, aad, aad_len);
5670                         br_eax_flip(&ec);
5671                         memcpy(tmp, plain, plain_len);
5672                         br_eax_run(&ec, 1, tmp, plain_len);
5673                         br_eax_get_tag(&ec, out);
5674                         check_equals("KAT EAX 9", tmp, cipher, plain_len);
5675                         check_equals("KAT EAX 10", out, tag, 16);
5676
5677                         br_eax_reset_pre_aad(&ec, &st, nonce, nonce_len);
5678                         br_eax_aad_inject(&ec, aad, aad_len);
5679                         br_eax_flip(&ec);
5680                         br_eax_run(&ec, 0, tmp, plain_len);
5681                         br_eax_get_tag(&ec, out);
5682                         check_equals("KAT EAX 11", tmp, plain, plain_len);
5683                         check_equals("KAT EAX 12", out, tag, 16);
5684                 }
5685
5686                 /*
5687                  * Captured state, post-AAD. This requires the message to
5688                  * be non-empty.
5689                  */
5690                 br_eax_reset(&ec, nonce, nonce_len);
5691                 br_eax_aad_inject(&ec, aad, aad_len);
5692                 br_eax_flip(&ec);
5693                 br_eax_get_aad_mac(&ec, &st);
5694
5695                 br_eax_reset_post_aad(&ec, &st, nonce, nonce_len);
5696                 memcpy(tmp, plain, plain_len);
5697                 br_eax_run(&ec, 1, tmp, plain_len);
5698                 br_eax_get_tag(&ec, out);
5699                 check_equals("KAT EAX 13", tmp, cipher, plain_len);
5700                 check_equals("KAT EAX 14", out, tag, 16);
5701
5702                 br_eax_reset_post_aad(&ec, &st, nonce, nonce_len);
5703                 br_eax_run(&ec, 0, tmp, plain_len);
5704                 br_eax_get_tag(&ec, out);
5705                 check_equals("KAT EAX 15", tmp, plain, plain_len);
5706                 check_equals("KAT EAX 16", out, tag, 16);
5707
5708                 printf(".");
5709                 fflush(stdout);
5710         }
5711
5712         printf(" done.\n");
5713         fflush(stdout);
5714 }
5715
5716 static void
5717 test_EAX(void)
5718 {
5719         const br_block_ctrcbc_class *x_ctrcbc;
5720
5721         test_EAX_inner("aes_big", &br_aes_big_ctrcbc_vtable);
5722         test_EAX_inner("aes_small", &br_aes_small_ctrcbc_vtable);
5723         test_EAX_inner("aes_ct", &br_aes_ct_ctrcbc_vtable);
5724         test_EAX_inner("aes_ct64", &br_aes_ct64_ctrcbc_vtable);
5725
5726         x_ctrcbc = br_aes_x86ni_ctrcbc_get_vtable();
5727         if (x_ctrcbc != NULL) {
5728                 test_EAX_inner("aes_x86ni", x_ctrcbc);
5729         } else {
5730                 printf("Test EAX aes_x86ni: UNAVAILABLE\n");
5731         }
5732 }
5733
5734 /*
5735  * From NIST SP 800-38C, appendix C.
5736  *
5737  * CCM specification concatenates the authentication tag at the end of
5738  * the ciphertext; in our API and the vectors below, the tag is separate.
5739  *
5740  * Order is: key, nonce, aad, plaintext, ciphertext, tag.
5741  */
5742 static const char *const KAT_CCM[] = {
5743         "404142434445464748494a4b4c4d4e4f",
5744         "10111213141516",
5745         "0001020304050607",
5746         "20212223",
5747         "7162015b",
5748         "4dac255d",
5749
5750         "404142434445464748494a4b4c4d4e4f",
5751         "1011121314151617",
5752         "000102030405060708090a0b0c0d0e0f",
5753         "202122232425262728292a2b2c2d2e2f",
5754         "d2a1f0e051ea5f62081a7792073d593d",
5755         "1fc64fbfaccd",
5756
5757         "404142434445464748494a4b4c4d4e4f",
5758         "101112131415161718191a1b",
5759         "000102030405060708090a0b0c0d0e0f10111213",
5760         "202122232425262728292a2b2c2d2e2f3031323334353637",
5761         "e3b201a9f5b71a7a9b1ceaeccd97e70b6176aad9a4428aa5",
5762         "484392fbc1b09951",
5763
5764         "404142434445464748494a4b4c4d4e4f",
5765         "101112131415161718191a1b1c",
5766         NULL,
5767         "202122232425262728292a2b2c2d2e2f303132333435363738393a3b3c3d3e3f",
5768         "69915dad1e84c6376a68c2967e4dab615ae0fd1faec44cc484828529463ccf72",
5769         "b4ac6bec93e8598e7f0dadbcea5b",
5770
5771         NULL
5772 };
5773
5774 static void
5775 test_CCM_inner(const char *name, const br_block_ctrcbc_class *vt)
5776 {
5777         size_t u;
5778
5779         printf("Test CCM %s: ", name);
5780         fflush(stdout);
5781
5782         for (u = 0; KAT_CCM[u]; u += 6) {
5783                 unsigned char plain[100];
5784                 unsigned char key[32];
5785                 unsigned char nonce[100];
5786                 unsigned char aad_buf[100], *aad;
5787                 unsigned char cipher[100];
5788                 unsigned char tag[100];
5789                 size_t plain_len, key_len, nonce_len, aad_len, tag_len;
5790                 br_aes_gen_ctrcbc_keys bc;
5791                 br_ccm_context ec;
5792                 unsigned char tmp[100], out[16];
5793                 size_t v;
5794
5795                 key_len = hextobin(key, KAT_CCM[u]);
5796                 nonce_len = hextobin(nonce, KAT_CCM[u + 1]);
5797                 if (KAT_CCM[u + 2] == NULL) {
5798                         aad_len = 65536;
5799                         aad = malloc(aad_len);
5800                         if (aad == NULL) {
5801                                 fprintf(stderr, "OOM error\n");
5802                                 exit(EXIT_FAILURE);
5803                         }
5804                         for (v = 0; v < 65536; v ++) {
5805                                 aad[v] = (unsigned char)v;
5806                         }
5807                 } else {
5808                         aad = aad_buf;
5809                         aad_len = hextobin(aad, KAT_CCM[u + 2]);
5810                 }
5811                 plain_len = hextobin(plain, KAT_CCM[u + 3]);
5812                 hextobin(cipher, KAT_CCM[u + 4]);
5813                 tag_len = hextobin(tag, KAT_CCM[u + 5]);
5814
5815                 vt->init(&bc.vtable, key, key_len);
5816                 br_ccm_init(&ec, &bc.vtable);
5817
5818                 memset(tmp, 0x54, sizeof tmp);
5819
5820                 /*
5821                  * Basic operation.
5822                  */
5823                 memcpy(tmp, plain, plain_len);
5824                 if (!br_ccm_reset(&ec, nonce, nonce_len,
5825                         aad_len, plain_len, tag_len))
5826                 {
5827                         fprintf(stderr, "CCM reset failed\n");
5828                         exit(EXIT_FAILURE);
5829                 }
5830                 br_ccm_aad_inject(&ec, aad, aad_len);
5831                 br_ccm_flip(&ec);
5832                 br_ccm_run(&ec, 1, tmp, plain_len);
5833                 if (br_ccm_get_tag(&ec, out) != tag_len) {
5834                         fprintf(stderr, "CCM returned wrong tag length\n");
5835                         exit(EXIT_FAILURE);
5836                 }
5837                 check_equals("KAT CCM 1", tmp, cipher, plain_len);
5838                 check_equals("KAT CCM 2", out, tag, tag_len);
5839
5840                 br_ccm_reset(&ec, nonce, nonce_len,
5841                         aad_len, plain_len, tag_len);
5842                 br_ccm_aad_inject(&ec, aad, aad_len);
5843                 br_ccm_flip(&ec);
5844                 br_ccm_run(&ec, 0, tmp, plain_len);
5845                 check_equals("KAT CCM 3", tmp, plain, plain_len);
5846                 if (!br_ccm_check_tag(&ec, tag)) {
5847                         fprintf(stderr, "Tag not verified (1)\n");
5848                         exit(EXIT_FAILURE);
5849                 }
5850
5851                 for (v = plain_len; v < sizeof tmp; v ++) {
5852                         if (tmp[v] != 0x54) {
5853                                 fprintf(stderr, "overflow on data\n");
5854                                 exit(EXIT_FAILURE);
5855                         }
5856                 }
5857
5858                 /*
5859                  * Byte-by-byte injection.
5860                  */
5861                 br_ccm_reset(&ec, nonce, nonce_len,
5862                         aad_len, plain_len, tag_len);
5863                 for (v = 0; v < aad_len; v ++) {
5864                         br_ccm_aad_inject(&ec, aad + v, 1);
5865                 }
5866                 br_ccm_flip(&ec);
5867                 for (v = 0; v < plain_len; v ++) {
5868                         br_ccm_run(&ec, 1, tmp + v, 1);
5869                 }
5870                 check_equals("KAT CCM 4", tmp, cipher, plain_len);
5871                 if (!br_ccm_check_tag(&ec, tag)) {
5872                         fprintf(stderr, "Tag not verified (2)\n");
5873                         exit(EXIT_FAILURE);
5874                 }
5875
5876                 br_ccm_reset(&ec, nonce, nonce_len,
5877                         aad_len, plain_len, tag_len);
5878                 for (v = 0; v < aad_len; v ++) {
5879                         br_ccm_aad_inject(&ec, aad + v, 1);
5880                 }
5881                 br_ccm_flip(&ec);
5882                 for (v = 0; v < plain_len; v ++) {
5883                         br_ccm_run(&ec, 0, tmp + v, 1);
5884                 }
5885                 br_ccm_get_tag(&ec, out);
5886                 check_equals("KAT CCM 5", tmp, plain, plain_len);
5887                 check_equals("KAT CCM 6", out, tag, tag_len);
5888
5889                 /*
5890                  * Check that alterations are detected.
5891                  */
5892                 for (v = 0; v < aad_len; v ++) {
5893                         memcpy(tmp, cipher, plain_len);
5894                         br_ccm_reset(&ec, nonce, nonce_len,
5895                                 aad_len, plain_len, tag_len);
5896                         aad[v] ^= 0x04;
5897                         br_ccm_aad_inject(&ec, aad, aad_len);
5898                         aad[v] ^= 0x04;
5899                         br_ccm_flip(&ec);
5900                         br_ccm_run(&ec, 0, tmp, plain_len);
5901                         check_equals("KAT CCM 7", tmp, plain, plain_len);
5902                         if (br_ccm_check_tag(&ec, tag)) {
5903                                 fprintf(stderr, "Tag should have changed\n");
5904                                 exit(EXIT_FAILURE);
5905                         }
5906
5907                         /*
5908                          * When the AAD is really big, we don't want to do
5909                          * the complete quadratic operation.
5910                          */
5911                         if (v >= 32) {
5912                                 break;
5913                         }
5914                 }
5915
5916                 if (aad != aad_buf) {
5917                         free(aad);
5918                 }
5919
5920                 printf(".");
5921                 fflush(stdout);
5922         }
5923
5924         printf(" done.\n");
5925         fflush(stdout);
5926 }
5927
5928 static void
5929 test_CCM(void)
5930 {
5931         const br_block_ctrcbc_class *x_ctrcbc;
5932
5933         test_CCM_inner("aes_big", &br_aes_big_ctrcbc_vtable);
5934         test_CCM_inner("aes_small", &br_aes_small_ctrcbc_vtable);
5935         test_CCM_inner("aes_ct", &br_aes_ct_ctrcbc_vtable);
5936         test_CCM_inner("aes_ct64", &br_aes_ct64_ctrcbc_vtable);
5937
5938         x_ctrcbc = br_aes_x86ni_ctrcbc_get_vtable();
5939         if (x_ctrcbc != NULL) {
5940                 test_CCM_inner("aes_x86ni", x_ctrcbc);
5941         } else {
5942                 printf("Test CCM aes_x86ni: UNAVAILABLE\n");
5943         }
5944 }
5945
5946 static void
5947 test_EC_inner(const char *sk, const char *sU,
5948         const br_ec_impl *impl, int curve)
5949 {
5950         unsigned char bk[70];
5951         unsigned char eG[150], eU[150];
5952         uint32_t n[22], n0i;
5953         size_t klen, ulen, nlen;
5954         const br_ec_curve_def *cd;
5955         br_hmac_drbg_context rng;
5956         int i;
5957
5958         klen = hextobin(bk, sk);
5959         ulen = hextobin(eU, sU);
5960         switch (curve) {
5961         case BR_EC_secp256r1:
5962                 cd = &br_secp256r1;
5963                 break;
5964         case BR_EC_secp384r1:
5965                 cd = &br_secp384r1;
5966                 break;
5967         case BR_EC_secp521r1:
5968                 cd = &br_secp521r1;
5969                 break;
5970         default:
5971                 fprintf(stderr, "Unknown curve: %d\n", curve);
5972                 exit(EXIT_FAILURE);
5973                 break;
5974         }
5975         if (ulen != cd->generator_len) {
5976                 fprintf(stderr, "KAT vector wrong (%lu / %lu)\n",
5977                         (unsigned long)ulen,
5978                         (unsigned long)cd->generator_len);
5979         }
5980         memcpy(eG, cd->generator, ulen);
5981         if (impl->mul(eG, ulen, bk, klen, curve) != 1) {
5982                 fprintf(stderr, "KAT multiplication failed\n");
5983                 exit(EXIT_FAILURE);
5984         }
5985         if (memcmp(eG, eU, ulen) != 0) {
5986                 fprintf(stderr, "KAT mul: mismatch\n");
5987                 exit(EXIT_FAILURE);
5988         }
5989
5990         /*
5991          * Test the two-point-mul function. We want to test the basic
5992          * functionality, and the following special cases:
5993          *   x = y
5994          *   x + y = curve order
5995          */
5996         nlen = cd->order_len;
5997         br_i31_decode(n, cd->order, nlen);
5998         n0i = br_i31_ninv31(n[1]);
5999         br_hmac_drbg_init(&rng, &br_sha256_vtable, "seed for EC", 11);
6000         for (i = 0; i < 10; i ++) {
6001                 unsigned char ba[80], bb[80], bx[80], by[80], bz[80];
6002                 uint32_t a[22], b[22], x[22], y[22], z[22], t1[22], t2[22];
6003                 uint32_t r;
6004                 unsigned char eA[160], eB[160], eC[160], eD[160];
6005
6006                 /*
6007                  * Generate random a and b, and compute A = a*G and B = b*G.
6008                  */
6009                 br_hmac_drbg_generate(&rng, ba, sizeof ba);
6010                 br_i31_decode_reduce(a, ba, sizeof ba, n);
6011                 br_i31_encode(ba, nlen, a);
6012                 br_hmac_drbg_generate(&rng, bb, sizeof bb);
6013                 br_i31_decode_reduce(b, bb, sizeof bb, n);
6014                 br_i31_encode(bb, nlen, b);
6015                 memcpy(eA, cd->generator, ulen);
6016                 impl->mul(eA, ulen, ba, nlen, cd->curve);
6017                 memcpy(eB, cd->generator, ulen);
6018                 impl->mul(eB, ulen, bb, nlen, cd->curve);
6019
6020                 /*
6021                  * Generate random x and y (modulo n).
6022                  */
6023                 br_hmac_drbg_generate(&rng, bx, sizeof bx);
6024                 br_i31_decode_reduce(x, bx, sizeof bx, n);
6025                 br_i31_encode(bx, nlen, x);
6026                 br_hmac_drbg_generate(&rng, by, sizeof by);
6027                 br_i31_decode_reduce(y, by, sizeof by, n);
6028                 br_i31_encode(by, nlen, y);
6029
6030                 /*
6031                  * Compute z = a*x + b*y (mod n).
6032                  */
6033                 memcpy(t1, x, sizeof x);
6034                 br_i31_to_monty(t1, n);
6035                 br_i31_montymul(z, a, t1, n, n0i);
6036                 memcpy(t1, y, sizeof y);
6037                 br_i31_to_monty(t1, n);
6038                 br_i31_montymul(t2, b, t1, n, n0i);
6039                 r = br_i31_add(z, t2, 1);
6040                 r |= br_i31_sub(z, n, 0) ^ 1;
6041                 br_i31_sub(z, n, r);
6042                 br_i31_encode(bz, nlen, z);
6043
6044                 /*
6045                  * Compute C = x*A + y*B with muladd(), and also
6046                  * D = z*G with mul(). The two points must match.
6047                  */
6048                 memcpy(eC, eA, ulen);
6049                 if (impl->muladd(eC, eB, ulen,
6050                         bx, nlen, by, nlen, cd->curve) != 1)
6051                 {
6052                         fprintf(stderr, "muladd() failed (1)\n");
6053                         exit(EXIT_FAILURE);
6054                 }
6055                 memcpy(eD, cd->generator, ulen);
6056                 if (impl->mul(eD, ulen, bz, nlen, cd->curve) != 1) {
6057                         fprintf(stderr, "mul() failed (1)\n");
6058                         exit(EXIT_FAILURE);
6059                 }
6060                 if (memcmp(eC, eD, nlen) != 0) {
6061                         fprintf(stderr, "mul() / muladd() mismatch\n");
6062                         exit(EXIT_FAILURE);
6063                 }
6064
6065                 /*
6066                  * Also recomputed D = z*G with mulgen(). This must
6067                  * again match.
6068                  */
6069                 memset(eD, 0, ulen);
6070                 if (impl->mulgen(eD, bz, nlen, cd->curve) != ulen) {
6071                         fprintf(stderr, "mulgen() failed: wrong length\n");
6072                         exit(EXIT_FAILURE);
6073                 }
6074                 if (memcmp(eC, eD, nlen) != 0) {
6075                         fprintf(stderr, "mulgen() / muladd() mismatch\n");
6076                         exit(EXIT_FAILURE);
6077                 }
6078
6079                 /*
6080                  * Check with x*A = y*B. We do so by setting b = x and y = a.
6081                  */
6082                 memcpy(b, x, sizeof x);
6083                 br_i31_encode(bb, nlen, b);
6084                 memcpy(eB, cd->generator, ulen);
6085                 impl->mul(eB, ulen, bb, nlen, cd->curve);
6086                 memcpy(y, a, sizeof a);
6087                 br_i31_encode(by, nlen, y);
6088
6089                 memcpy(t1, x, sizeof x);
6090                 br_i31_to_monty(t1, n);
6091                 br_i31_montymul(z, a, t1, n, n0i);
6092                 memcpy(t1, y, sizeof y);
6093                 br_i31_to_monty(t1, n);
6094                 br_i31_montymul(t2, b, t1, n, n0i);
6095                 r = br_i31_add(z, t2, 1);
6096                 r |= br_i31_sub(z, n, 0) ^ 1;
6097                 br_i31_sub(z, n, r);
6098                 br_i31_encode(bz, nlen, z);
6099
6100                 memcpy(eC, eA, ulen);
6101                 if (impl->muladd(eC, eB, ulen,
6102                         bx, nlen, by, nlen, cd->curve) != 1)
6103                 {
6104                         fprintf(stderr, "muladd() failed (2)\n");
6105                         exit(EXIT_FAILURE);
6106                 }
6107                 memcpy(eD, cd->generator, ulen);
6108                 if (impl->mul(eD, ulen, bz, nlen, cd->curve) != 1) {
6109                         fprintf(stderr, "mul() failed (2)\n");
6110                         exit(EXIT_FAILURE);
6111                 }
6112                 if (memcmp(eC, eD, nlen) != 0) {
6113                         fprintf(stderr,
6114                                 "mul() / muladd() mismatch (x*A=y*B)\n");
6115                         exit(EXIT_FAILURE);
6116                 }
6117
6118                 /*
6119                  * Check with x*A + y*B = 0. At that point, b = x, so we
6120                  * just need to set y = -a (mod n).
6121                  */
6122                 memcpy(y, n, sizeof n);
6123                 br_i31_sub(y, a, 1);
6124                 br_i31_encode(by, nlen, y);
6125                 memcpy(eC, eA, ulen);
6126                 if (impl->muladd(eC, eB, ulen,
6127                         bx, nlen, by, nlen, cd->curve) != 0)
6128                 {
6129                         fprintf(stderr, "muladd() should have failed\n");
6130                         exit(EXIT_FAILURE);
6131                 }
6132         }
6133
6134         printf(".");
6135         fflush(stdout);
6136 }
6137
6138 static void
6139 test_EC_P256_carry_inner(const br_ec_impl *impl, const char *sP, const char *sQ)
6140 {
6141         unsigned char P[65], Q[sizeof P], k[1];
6142         size_t plen, qlen;
6143
6144         plen = hextobin(P, sP);
6145         qlen = hextobin(Q, sQ);
6146         if (plen != sizeof P || qlen != sizeof P) {
6147                 fprintf(stderr, "KAT is incorrect\n");
6148                 exit(EXIT_FAILURE);
6149         }
6150         k[0] = 0x10;
6151         if (impl->mul(P, plen, k, 1, BR_EC_secp256r1) != 1) {
6152                 fprintf(stderr, "P-256 multiplication failed\n");
6153                 exit(EXIT_FAILURE);
6154         }
6155         check_equals("P256_carry", P, Q, plen);
6156         printf(".");
6157         fflush(stdout);
6158 }
6159
6160 static void
6161 test_EC_P256_carry(const br_ec_impl *impl)
6162 {
6163         test_EC_P256_carry_inner(impl,
6164                 "0435BAA24B2B6E1B3C88E22A383BD88CC4B9A3166E7BCF94FF6591663AE066B33B821EBA1B4FC8EA609A87EB9A9C9A1CCD5C9F42FA1365306F64D7CAA718B8C978",
6165                 "0447752A76CA890328D34E675C4971EC629132D1FC4863EDB61219B72C4E58DC5E9D51E7B293488CFD913C3CF20E438BB65C2BA66A7D09EABB45B55E804260C5EB");
6166         test_EC_P256_carry_inner(impl,
6167                 "04DCAE9D9CE211223602024A6933BD42F77B6BF4EAB9C8915F058C149419FADD2CC9FC0707B270A1B5362BA4D249AFC8AC3DA1EFCA8270176EEACA525B49EE19E6",
6168                 "048DAC7B0BE9B3206FCE8B24B6B4AEB122F2A67D13E536B390B6585CA193427E63F222388B5F51D744D6F5D47536D89EEEC89552BCB269E7828019C4410DFE980A");
6169 }
6170
6171 static void
6172 test_EC_KAT(const char *name, const br_ec_impl *impl, uint32_t curve_mask)
6173 {
6174
6175         printf("Test %s: ", name);
6176         fflush(stdout);
6177
6178         if (curve_mask & ((uint32_t)1 << BR_EC_secp256r1)) {
6179                 test_EC_inner(
6180                         "C9AFA9D845BA75166B5C215767B1D6934E50C3DB36E89B127B8A622B120F6721",
6181                         "0460FED4BA255A9D31C961EB74C6356D68C049B8923B61FA6CE669622E60F29FB67903FE1008B8BC99A41AE9E95628BC64F2F1B20C2D7E9F5177A3C294D4462299",
6182                         impl, BR_EC_secp256r1);
6183                 test_EC_P256_carry(impl);
6184         }
6185         if (curve_mask & ((uint32_t)1 << BR_EC_secp384r1)) {
6186                 test_EC_inner(
6187                         "6B9D3DAD2E1B8C1C05B19875B6659F4DE23C3B667BF297BA9AA47740787137D896D5724E4C70A825F872C9EA60D2EDF5",
6188                         "04EC3A4E415B4E19A4568618029F427FA5DA9A8BC4AE92E02E06AAE5286B300C64DEF8F0EA9055866064A254515480BC138015D9B72D7D57244EA8EF9AC0C621896708A59367F9DFB9F54CA84B3F1C9DB1288B231C3AE0D4FE7344FD2533264720",
6189                         impl, BR_EC_secp384r1);
6190         }
6191         if (curve_mask & ((uint32_t)1 << BR_EC_secp521r1)) {
6192                 test_EC_inner(
6193                         "00FAD06DAA62BA3B25D2FB40133DA757205DE67F5BB0018FEE8C86E1B68C7E75CAA896EB32F1F47C70855836A6D16FCC1466F6D8FBEC67DB89EC0C08B0E996B83538",
6194                         "0401894550D0785932E00EAA23B694F213F8C3121F86DC97A04E5A7167DB4E5BCD371123D46E45DB6B5D5370A7F20FB633155D38FFA16D2BD761DCAC474B9A2F5023A400493101C962CD4D2FDDF782285E64584139C2F91B47F87FF82354D6630F746A28A0DB25741B5B34A828008B22ACC23F924FAAFBD4D33F81EA66956DFEAA2BFDFCF5",
6195                         impl, BR_EC_secp521r1);
6196         }
6197
6198         printf(" done.\n");
6199         fflush(stdout);
6200 }
6201
6202 static void
6203 test_EC_prime_i15(void)
6204 {
6205         test_EC_KAT("EC_prime_i15", &br_ec_prime_i15,
6206                 (uint32_t)1 << BR_EC_secp256r1
6207                 | (uint32_t)1 << BR_EC_secp384r1
6208                 | (uint32_t)1 << BR_EC_secp521r1);
6209 }
6210
6211 static void
6212 test_EC_prime_i31(void)
6213 {
6214         test_EC_KAT("EC_prime_i31", &br_ec_prime_i31,
6215                 (uint32_t)1 << BR_EC_secp256r1
6216                 | (uint32_t)1 << BR_EC_secp384r1
6217                 | (uint32_t)1 << BR_EC_secp521r1);
6218 }
6219
6220 static void
6221 test_EC_p256_m15(void)
6222 {
6223         test_EC_KAT("EC_p256_m15", &br_ec_p256_m15,
6224                 (uint32_t)1 << BR_EC_secp256r1);
6225 }
6226
6227 static void
6228 test_EC_p256_m31(void)
6229 {
6230         test_EC_KAT("EC_p256_m31", &br_ec_p256_m31,
6231                 (uint32_t)1 << BR_EC_secp256r1);
6232 }
6233
6234 const struct {
6235         const char *scalar;
6236         const char *u_in;
6237         const char *u_out;
6238 } C25519_KAT[] = {
6239         { "A546E36BF0527C9D3B16154B82465EDD62144C0AC1FC5A18506A2244BA449AC4",
6240           "E6DB6867583030DB3594C1A424B15F7C726624EC26B3353B10A903A6D0AB1C4C",
6241           "C3DA55379DE9C6908E94EA4DF28D084F32ECCF03491C71F754B4075577A28552" },
6242         { "4B66E9D4D1B4673C5AD22691957D6AF5C11B6421E0EA01D42CA4169E7918BA0D",
6243           "E5210F12786811D3F4B7959D0538AE2C31DBE7106FC03C3EFC4CD549C715A493",
6244           "95CBDE9476E8907D7AADE45CB4B873F88B595A68799FA152E6F8F7647AAC7957" },
6245         { 0, 0, 0 }
6246 };
6247
6248 static void
6249 test_EC_c25519(const char *name, const br_ec_impl *iec)
6250 {
6251         unsigned char bu[32], bk[32], br[32];
6252         size_t v;
6253         int i;
6254
6255         printf("Test %s: ", name);
6256         fflush(stdout);
6257         for (v = 0; C25519_KAT[v].scalar; v ++) {
6258                 hextobin(bk, C25519_KAT[v].scalar);
6259                 hextobin(bu, C25519_KAT[v].u_in);
6260                 hextobin(br, C25519_KAT[v].u_out);
6261                 if (!iec->mul(bu, sizeof bu, bk, sizeof bk, BR_EC_curve25519)) {
6262                         fprintf(stderr, "Curve25519 multiplication failed\n");
6263                         exit(EXIT_FAILURE);
6264                 }
6265                 if (memcmp(bu, br, sizeof bu) != 0) {
6266                         fprintf(stderr, "Curve25519 failed KAT\n");
6267                         exit(EXIT_FAILURE);
6268                 }
6269                 printf(".");
6270                 fflush(stdout);
6271         }
6272         printf(" ");
6273         fflush(stdout);
6274
6275         memset(bu, 0, sizeof bu);
6276         bu[0] = 0x09;
6277         memcpy(bk, bu, sizeof bu);
6278         for (i = 1; i <= 1000; i ++) {
6279                 if (!iec->mul(bu, sizeof bu, bk, sizeof bk, BR_EC_curve25519)) {
6280                         fprintf(stderr, "Curve25519 multiplication failed"
6281                                 " (iter=%d)\n", i);
6282                         exit(EXIT_FAILURE);
6283                 }
6284                 for (v = 0; v < sizeof bu; v ++) {
6285                         unsigned t;
6286
6287                         t = bu[v];
6288                         bu[v] = bk[v];
6289                         bk[v] = t;
6290                 }
6291                 if (i == 1 || i == 1000) {
6292                         const char *sref;
6293
6294                         sref = (i == 1)
6295                                 ? "422C8E7A6227D7BCA1350B3E2BB7279F7897B87BB6854B783C60E80311AE3079"
6296                                 : "684CF59BA83309552800EF566F2F4D3C1C3887C49360E3875F2EB94D99532C51";
6297                         hextobin(br, sref);
6298                         if (memcmp(bk, br, sizeof bk) != 0) {
6299                                 fprintf(stderr,
6300                                         "Curve25519 failed KAT (iter=%d)\n", i);
6301                                 exit(EXIT_FAILURE);
6302                         }
6303                 }
6304                 if (i % 100 == 0) {
6305                         printf(".");
6306                         fflush(stdout);
6307                 }
6308         }
6309
6310         printf(" done.\n");
6311         fflush(stdout);
6312 }
6313
6314 static void
6315 test_EC_c25519_i15(void)
6316 {
6317         test_EC_c25519("EC_c25519_i15", &br_ec_c25519_i15);
6318 }
6319
6320 static void
6321 test_EC_c25519_i31(void)
6322 {
6323         test_EC_c25519("EC_c25519_i31", &br_ec_c25519_i31);
6324 }
6325
6326 static void
6327 test_EC_c25519_m15(void)
6328 {
6329         test_EC_c25519("EC_c25519_m15", &br_ec_c25519_m15);
6330 }
6331
6332 static void
6333 test_EC_c25519_m31(void)
6334 {
6335         test_EC_c25519("EC_c25519_m31", &br_ec_c25519_m31);
6336 }
6337
6338 static const unsigned char EC_P256_PUB_POINT[] = {
6339         0x04, 0x60, 0xFE, 0xD4, 0xBA, 0x25, 0x5A, 0x9D,
6340         0x31, 0xC9, 0x61, 0xEB, 0x74, 0xC6, 0x35, 0x6D,
6341         0x68, 0xC0, 0x49, 0xB8, 0x92, 0x3B, 0x61, 0xFA,
6342         0x6C, 0xE6, 0x69, 0x62, 0x2E, 0x60, 0xF2, 0x9F,
6343         0xB6, 0x79, 0x03, 0xFE, 0x10, 0x08, 0xB8, 0xBC,
6344         0x99, 0xA4, 0x1A, 0xE9, 0xE9, 0x56, 0x28, 0xBC,
6345         0x64, 0xF2, 0xF1, 0xB2, 0x0C, 0x2D, 0x7E, 0x9F,
6346         0x51, 0x77, 0xA3, 0xC2, 0x94, 0xD4, 0x46, 0x22,
6347         0x99
6348 };
6349
6350 static const unsigned char EC_P256_PRIV_X[] = {
6351         0xC9, 0xAF, 0xA9, 0xD8, 0x45, 0xBA, 0x75, 0x16,
6352         0x6B, 0x5C, 0x21, 0x57, 0x67, 0xB1, 0xD6, 0x93,
6353         0x4E, 0x50, 0xC3, 0xDB, 0x36, 0xE8, 0x9B, 0x12,
6354         0x7B, 0x8A, 0x62, 0x2B, 0x12, 0x0F, 0x67, 0x21
6355 };
6356
6357 static const br_ec_public_key EC_P256_PUB = {
6358         BR_EC_secp256r1,
6359         (unsigned char *)EC_P256_PUB_POINT, sizeof EC_P256_PUB_POINT
6360 };
6361
6362 static const br_ec_private_key EC_P256_PRIV = {
6363         BR_EC_secp256r1,
6364         (unsigned char *)EC_P256_PRIV_X, sizeof EC_P256_PRIV_X
6365 };
6366
6367 static const unsigned char EC_P384_PUB_POINT[] = {
6368         0x04, 0xEC, 0x3A, 0x4E, 0x41, 0x5B, 0x4E, 0x19,
6369         0xA4, 0x56, 0x86, 0x18, 0x02, 0x9F, 0x42, 0x7F,
6370         0xA5, 0xDA, 0x9A, 0x8B, 0xC4, 0xAE, 0x92, 0xE0,
6371         0x2E, 0x06, 0xAA, 0xE5, 0x28, 0x6B, 0x30, 0x0C,
6372         0x64, 0xDE, 0xF8, 0xF0, 0xEA, 0x90, 0x55, 0x86,
6373         0x60, 0x64, 0xA2, 0x54, 0x51, 0x54, 0x80, 0xBC,
6374         0x13, 0x80, 0x15, 0xD9, 0xB7, 0x2D, 0x7D, 0x57,
6375         0x24, 0x4E, 0xA8, 0xEF, 0x9A, 0xC0, 0xC6, 0x21,
6376         0x89, 0x67, 0x08, 0xA5, 0x93, 0x67, 0xF9, 0xDF,
6377         0xB9, 0xF5, 0x4C, 0xA8, 0x4B, 0x3F, 0x1C, 0x9D,
6378         0xB1, 0x28, 0x8B, 0x23, 0x1C, 0x3A, 0xE0, 0xD4,
6379         0xFE, 0x73, 0x44, 0xFD, 0x25, 0x33, 0x26, 0x47,
6380         0x20
6381 };
6382
6383 static const unsigned char EC_P384_PRIV_X[] = {
6384         0x6B, 0x9D, 0x3D, 0xAD, 0x2E, 0x1B, 0x8C, 0x1C,
6385         0x05, 0xB1, 0x98, 0x75, 0xB6, 0x65, 0x9F, 0x4D,
6386         0xE2, 0x3C, 0x3B, 0x66, 0x7B, 0xF2, 0x97, 0xBA,
6387         0x9A, 0xA4, 0x77, 0x40, 0x78, 0x71, 0x37, 0xD8,
6388         0x96, 0xD5, 0x72, 0x4E, 0x4C, 0x70, 0xA8, 0x25,
6389         0xF8, 0x72, 0xC9, 0xEA, 0x60, 0xD2, 0xED, 0xF5
6390 };
6391
6392 static const br_ec_public_key EC_P384_PUB = {
6393         BR_EC_secp384r1,
6394         (unsigned char *)EC_P384_PUB_POINT, sizeof EC_P384_PUB_POINT
6395 };
6396
6397 static const br_ec_private_key EC_P384_PRIV = {
6398         BR_EC_secp384r1,
6399         (unsigned char *)EC_P384_PRIV_X, sizeof EC_P384_PRIV_X
6400 };
6401
6402 static const unsigned char EC_P521_PUB_POINT[] = {
6403         0x04, 0x01, 0x89, 0x45, 0x50, 0xD0, 0x78, 0x59,
6404         0x32, 0xE0, 0x0E, 0xAA, 0x23, 0xB6, 0x94, 0xF2,
6405         0x13, 0xF8, 0xC3, 0x12, 0x1F, 0x86, 0xDC, 0x97,
6406         0xA0, 0x4E, 0x5A, 0x71, 0x67, 0xDB, 0x4E, 0x5B,
6407         0xCD, 0x37, 0x11, 0x23, 0xD4, 0x6E, 0x45, 0xDB,
6408         0x6B, 0x5D, 0x53, 0x70, 0xA7, 0xF2, 0x0F, 0xB6,
6409         0x33, 0x15, 0x5D, 0x38, 0xFF, 0xA1, 0x6D, 0x2B,
6410         0xD7, 0x61, 0xDC, 0xAC, 0x47, 0x4B, 0x9A, 0x2F,
6411         0x50, 0x23, 0xA4, 0x00, 0x49, 0x31, 0x01, 0xC9,
6412         0x62, 0xCD, 0x4D, 0x2F, 0xDD, 0xF7, 0x82, 0x28,
6413         0x5E, 0x64, 0x58, 0x41, 0x39, 0xC2, 0xF9, 0x1B,
6414         0x47, 0xF8, 0x7F, 0xF8, 0x23, 0x54, 0xD6, 0x63,
6415         0x0F, 0x74, 0x6A, 0x28, 0xA0, 0xDB, 0x25, 0x74,
6416         0x1B, 0x5B, 0x34, 0xA8, 0x28, 0x00, 0x8B, 0x22,
6417         0xAC, 0xC2, 0x3F, 0x92, 0x4F, 0xAA, 0xFB, 0xD4,
6418         0xD3, 0x3F, 0x81, 0xEA, 0x66, 0x95, 0x6D, 0xFE,
6419         0xAA, 0x2B, 0xFD, 0xFC, 0xF5
6420 };
6421
6422 static const unsigned char EC_P521_PRIV_X[] = {
6423         0x00, 0xFA, 0xD0, 0x6D, 0xAA, 0x62, 0xBA, 0x3B,
6424         0x25, 0xD2, 0xFB, 0x40, 0x13, 0x3D, 0xA7, 0x57,
6425         0x20, 0x5D, 0xE6, 0x7F, 0x5B, 0xB0, 0x01, 0x8F,
6426         0xEE, 0x8C, 0x86, 0xE1, 0xB6, 0x8C, 0x7E, 0x75,
6427         0xCA, 0xA8, 0x96, 0xEB, 0x32, 0xF1, 0xF4, 0x7C,
6428         0x70, 0x85, 0x58, 0x36, 0xA6, 0xD1, 0x6F, 0xCC,
6429         0x14, 0x66, 0xF6, 0xD8, 0xFB, 0xEC, 0x67, 0xDB,
6430         0x89, 0xEC, 0x0C, 0x08, 0xB0, 0xE9, 0x96, 0xB8,
6431         0x35, 0x38
6432 };
6433
6434 static const br_ec_public_key EC_P521_PUB = {
6435         BR_EC_secp521r1,
6436         (unsigned char *)EC_P521_PUB_POINT, sizeof EC_P521_PUB_POINT
6437 };
6438
6439 static const br_ec_private_key EC_P521_PRIV = {
6440         BR_EC_secp521r1,
6441         (unsigned char *)EC_P521_PRIV_X, sizeof EC_P521_PRIV_X
6442 };
6443
6444 typedef struct {
6445         const br_ec_public_key *pub;
6446         const br_ec_private_key *priv;
6447         const br_hash_class *hf;
6448         const char *msg;
6449         const char *sk;
6450         const char *sraw;
6451         const char *sasn1;
6452 } ecdsa_kat_vector;
6453
6454 const ecdsa_kat_vector ECDSA_KAT[] = {
6455
6456         /* Test vectors for P-256, from RFC 6979. */
6457         {
6458                 &EC_P256_PUB,
6459                 &EC_P256_PRIV,
6460                 &br_sha1_vtable, "sample",
6461                 "882905F1227FD620FBF2ABF21244F0BA83D0DC3A9103DBBEE43A1FB858109DB4",
6462                 "61340C88C3AAEBEB4F6D667F672CA9759A6CCAA9FA8811313039EE4A35471D326D7F147DAC089441BB2E2FE8F7A3FA264B9C475098FDCF6E00D7C996E1B8B7EB",
6463                 "3044022061340C88C3AAEBEB4F6D667F672CA9759A6CCAA9FA8811313039EE4A35471D3202206D7F147DAC089441BB2E2FE8F7A3FA264B9C475098FDCF6E00D7C996E1B8B7EB"
6464         },
6465         {
6466                 &EC_P256_PUB,
6467                 &EC_P256_PRIV,
6468                 &br_sha224_vtable, "sample",
6469                 "103F90EE9DC52E5E7FB5132B7033C63066D194321491862059967C715985D473",
6470                 "53B2FFF5D1752B2C689DF257C04C40A587FABABB3F6FC2702F1343AF7CA9AA3FB9AFB64FDC03DC1A131C7D2386D11E349F070AA432A4ACC918BEA988BF75C74C",
6471                 "3045022053B2FFF5D1752B2C689DF257C04C40A587FABABB3F6FC2702F1343AF7CA9AA3F022100B9AFB64FDC03DC1A131C7D2386D11E349F070AA432A4ACC918BEA988BF75C74C"
6472         },
6473         {
6474                 &EC_P256_PUB,
6475                 &EC_P256_PRIV,
6476                 &br_sha256_vtable, "sample",
6477                 "A6E3C57DD01ABE90086538398355DD4C3B17AA873382B0F24D6129493D8AAD60",
6478                 "EFD48B2AACB6A8FD1140DD9CD45E81D69D2C877B56AAF991C34D0EA84EAF3716F7CB1C942D657C41D436C7A1B6E29F65F3E900DBB9AFF4064DC4AB2F843ACDA8",
6479                 "3046022100EFD48B2AACB6A8FD1140DD9CD45E81D69D2C877B56AAF991C34D0EA84EAF3716022100F7CB1C942D657C41D436C7A1B6E29F65F3E900DBB9AFF4064DC4AB2F843ACDA8"
6480         },
6481         {
6482                 &EC_P256_PUB,
6483                 &EC_P256_PRIV,
6484                 &br_sha384_vtable, "sample",
6485                 "09F634B188CEFD98E7EC88B1AA9852D734D0BC272F7D2A47DECC6EBEB375AAD4",
6486                 "0EAFEA039B20E9B42309FB1D89E213057CBF973DC0CFC8F129EDDDC800EF77194861F0491E6998B9455193E34E7B0D284DDD7149A74B95B9261F13ABDE940954",
6487                 "304402200EAFEA039B20E9B42309FB1D89E213057CBF973DC0CFC8F129EDDDC800EF771902204861F0491E6998B9455193E34E7B0D284DDD7149A74B95B9261F13ABDE940954"
6488         },
6489         {
6490                 &EC_P256_PUB,
6491                 &EC_P256_PRIV,
6492                 &br_sha512_vtable, "sample",
6493                 "5FA81C63109BADB88C1F367B47DA606DA28CAD69AA22C4FE6AD7DF73A7173AA5",
6494                 "8496A60B5E9B47C825488827E0495B0E3FA109EC4568FD3F8D1097678EB97F002362AB1ADBE2B8ADF9CB9EDAB740EA6049C028114F2460F96554F61FAE3302FE",
6495                 "30450221008496A60B5E9B47C825488827E0495B0E3FA109EC4568FD3F8D1097678EB97F0002202362AB1ADBE2B8ADF9CB9EDAB740EA6049C028114F2460F96554F61FAE3302FE"
6496         },
6497         {
6498                 &EC_P256_PUB,
6499                 &EC_P256_PRIV,
6500                 &br_sha1_vtable, "test",
6501                 "8C9520267C55D6B980DF741E56B4ADEE114D84FBFA2E62137954164028632A2E",
6502                 "0CBCC86FD6ABD1D99E703E1EC50069EE5C0B4BA4B9AC60E409E8EC5910D81A8901B9D7B73DFAA60D5651EC4591A0136F87653E0FD780C3B1BC872FFDEAE479B1",
6503                 "304402200CBCC86FD6ABD1D99E703E1EC50069EE5C0B4BA4B9AC60E409E8EC5910D81A89022001B9D7B73DFAA60D5651EC4591A0136F87653E0FD780C3B1BC872FFDEAE479B1"
6504         },
6505         {
6506                 &EC_P256_PUB,
6507                 &EC_P256_PRIV,
6508                 &br_sha224_vtable, "test",
6509                 "669F4426F2688B8BE0DB3A6BD1989BDAEFFF84B649EEB84F3DD26080F667FAA7",
6510                 "C37EDB6F0AE79D47C3C27E962FA269BB4F441770357E114EE511F662EC34A692C820053A05791E521FCAAD6042D40AEA1D6B1A540138558F47D0719800E18F2D",
6511                 "3046022100C37EDB6F0AE79D47C3C27E962FA269BB4F441770357E114EE511F662EC34A692022100C820053A05791E521FCAAD6042D40AEA1D6B1A540138558F47D0719800E18F2D"
6512         },
6513         {
6514                 &EC_P256_PUB,
6515                 &EC_P256_PRIV,
6516                 &br_sha256_vtable, "test",
6517                 "D16B6AE827F17175E040871A1C7EC3500192C4C92677336EC2537ACAEE0008E0",
6518                 "F1ABB023518351CD71D881567B1EA663ED3EFCF6C5132B354F28D3B0B7D38367019F4113742A2B14BD25926B49C649155F267E60D3814B4C0CC84250E46F0083",
6519                 "3045022100F1ABB023518351CD71D881567B1EA663ED3EFCF6C5132B354F28D3B0B7D383670220019F4113742A2B14BD25926B49C649155F267E60D3814B4C0CC84250E46F0083"
6520         },
6521         {
6522                 &EC_P256_PUB,
6523                 &EC_P256_PRIV,
6524                 &br_sha384_vtable, "test",
6525                 "16AEFFA357260B04B1DD199693960740066C1A8F3E8EDD79070AA914D361B3B8",
6526                 "83910E8B48BB0C74244EBDF7F07A1C5413D61472BD941EF3920E623FBCCEBEB68DDBEC54CF8CD5874883841D712142A56A8D0F218F5003CB0296B6B509619F2C",
6527                 "304602210083910E8B48BB0C74244EBDF7F07A1C5413D61472BD941EF3920E623FBCCEBEB60221008DDBEC54CF8CD5874883841D712142A56A8D0F218F5003CB0296B6B509619F2C"
6528         },
6529         {
6530                 &EC_P256_PUB,
6531                 &EC_P256_PRIV,
6532                 &br_sha512_vtable, "test",
6533                 "6915D11632ACA3C40D5D51C08DAF9C555933819548784480E93499000D9F0B7F",
6534                 "461D93F31B6540894788FD206C07CFA0CC35F46FA3C91816FFF1040AD1581A0439AF9F15DE0DB8D97E72719C74820D304CE5226E32DEDAE67519E840D1194E55",
6535                 "30440220461D93F31B6540894788FD206C07CFA0CC35F46FA3C91816FFF1040AD1581A04022039AF9F15DE0DB8D97E72719C74820D304CE5226E32DEDAE67519E840D1194E55"
6536         },
6537
6538         /* Test vectors for P-384, from RFC 6979. */
6539         {
6540                 &EC_P384_PUB,
6541                 &EC_P384_PRIV,
6542                 &br_sha1_vtable, "sample",
6543                 "4471EF7518BB2C7C20F62EAE1C387AD0C5E8E470995DB4ACF694466E6AB096630F29E5938D25106C3C340045A2DB01A7",
6544                 "EC748D839243D6FBEF4FC5C4859A7DFFD7F3ABDDF72014540C16D73309834FA37B9BA002899F6FDA3A4A9386790D4EB2A3BCFA947BEEF4732BF247AC17F71676CB31A847B9FF0CBC9C9ED4C1A5B3FACF26F49CA031D4857570CCB5CA4424A443",
6545                 "3066023100EC748D839243D6FBEF4FC5C4859A7DFFD7F3ABDDF72014540C16D73309834FA37B9BA002899F6FDA3A4A9386790D4EB2023100A3BCFA947BEEF4732BF247AC17F71676CB31A847B9FF0CBC9C9ED4C1A5B3FACF26F49CA031D4857570CCB5CA4424A443"
6546         },
6547
6548         {
6549                 &EC_P384_PUB,
6550                 &EC_P384_PRIV,
6551                 &br_sha224_vtable, "sample",
6552                 "A4E4D2F0E729EB786B31FC20AD5D849E304450E0AE8E3E341134A5C1AFA03CAB8083EE4E3C45B06A5899EA56C51B5879",
6553                 "42356E76B55A6D9B4631C865445DBE54E056D3B3431766D0509244793C3F9366450F76EE3DE43F5A125333A6BE0601229DA0C81787064021E78DF658F2FBB0B042BF304665DB721F077A4298B095E4834C082C03D83028EFBF93A3C23940CA8D",
6554                 "3065023042356E76B55A6D9B4631C865445DBE54E056D3B3431766D0509244793C3F9366450F76EE3DE43F5A125333A6BE0601220231009DA0C81787064021E78DF658F2FBB0B042BF304665DB721F077A4298B095E4834C082C03D83028EFBF93A3C23940CA8D"
6555         },
6556         {
6557                 &EC_P384_PUB,
6558                 &EC_P384_PRIV,
6559                 &br_sha256_vtable, "sample",
6560                 "180AE9F9AEC5438A44BC159A1FCB277C7BE54FA20E7CF404B490650A8ACC414E375572342863C899F9F2EDF9747A9B60",
6561                 "21B13D1E013C7FA1392D03C5F99AF8B30C570C6F98D4EA8E354B63A21D3DAA33BDE1E888E63355D92FA2B3C36D8FB2CDF3AA443FB107745BF4BD77CB3891674632068A10CA67E3D45DB2266FA7D1FEEBEFDC63ECCD1AC42EC0CB8668A4FA0AB0",
6562                 "3065023021B13D1E013C7FA1392D03C5F99AF8B30C570C6F98D4EA8E354B63A21D3DAA33BDE1E888E63355D92FA2B3C36D8FB2CD023100F3AA443FB107745BF4BD77CB3891674632068A10CA67E3D45DB2266FA7D1FEEBEFDC63ECCD1AC42EC0CB8668A4FA0AB0"
6563         },
6564         {
6565                 &EC_P384_PUB,
6566                 &EC_P384_PRIV,
6567                 &br_sha384_vtable, "sample",
6568                 "94ED910D1A099DAD3254E9242AE85ABDE4BA15168EAF0CA87A555FD56D10FBCA2907E3E83BA95368623B8C4686915CF9",
6569                 "94EDBB92A5ECB8AAD4736E56C691916B3F88140666CE9FA73D64C4EA95AD133C81A648152E44ACF96E36DD1E80FABE4699EF4AEB15F178CEA1FE40DB2603138F130E740A19624526203B6351D0A3A94FA329C145786E679E7B82C71A38628AC8",
6570                 "306602310094EDBB92A5ECB8AAD4736E56C691916B3F88140666CE9FA73D64C4EA95AD133C81A648152E44ACF96E36DD1E80FABE4602310099EF4AEB15F178CEA1FE40DB2603138F130E740A19624526203B6351D0A3A94FA329C145786E679E7B82C71A38628AC8"
6571         },
6572         {
6573                 &EC_P384_PUB,
6574                 &EC_P384_PRIV,
6575                 &br_sha512_vtable, "sample",
6576                 "92FC3C7183A883E24216D1141F1A8976C5B0DD797DFA597E3D7B32198BD35331A4E966532593A52980D0E3AAA5E10EC3",
6577                 "ED0959D5880AB2D869AE7F6C2915C6D60F96507F9CB3E047C0046861DA4A799CFE30F35CC900056D7C99CD7882433709512C8CCEEE3890A84058CE1E22DBC2198F42323CE8ACA9135329F03C068E5112DC7CC3EF3446DEFCEB01A45C2667FDD5",
6578                 "3065023100ED0959D5880AB2D869AE7F6C2915C6D60F96507F9CB3E047C0046861DA4A799CFE30F35CC900056D7C99CD78824337090230512C8CCEEE3890A84058CE1E22DBC2198F42323CE8ACA9135329F03C068E5112DC7CC3EF3446DEFCEB01A45C2667FDD5"
6579         },
6580         {
6581                 &EC_P384_PUB,
6582                 &EC_P384_PRIV,
6583                 &br_sha1_vtable, "test",
6584                 "66CC2C8F4D303FC962E5FF6A27BD79F84EC812DDAE58CF5243B64A4AD8094D47EC3727F3A3C186C15054492E30698497",
6585                 "4BC35D3A50EF4E30576F58CD96CE6BF638025EE624004A1F7789A8B8E43D0678ACD9D29876DAF46638645F7F404B11C7D5A6326C494ED3FF614703878961C0FDE7B2C278F9A65FD8C4B7186201A2991695BA1C84541327E966FA7B50F7382282",
6586                 "306502304BC35D3A50EF4E30576F58CD96CE6BF638025EE624004A1F7789A8B8E43D0678ACD9D29876DAF46638645F7F404B11C7023100D5A6326C494ED3FF614703878961C0FDE7B2C278F9A65FD8C4B7186201A2991695BA1C84541327E966FA7B50F7382282"
6587         },
6588         {
6589                 &EC_P384_PUB,
6590                 &EC_P384_PRIV,
6591                 &br_sha224_vtable, "test",
6592                 "18FA39DB95AA5F561F30FA3591DC59C0FA3653A80DAFFA0B48D1A4C6DFCBFF6E3D33BE4DC5EB8886A8ECD093F2935726",
6593                 "E8C9D0B6EA72A0E7837FEA1D14A1A9557F29FAA45D3E7EE888FC5BF954B5E62464A9A817C47FF78B8C11066B24080E7207041D4A7A0379AC7232FF72E6F77B6DDB8F09B16CCE0EC3286B2BD43FA8C6141C53EA5ABEF0D8231077A04540A96B66",
6594                 "3065023100E8C9D0B6EA72A0E7837FEA1D14A1A9557F29FAA45D3E7EE888FC5BF954B5E62464A9A817C47FF78B8C11066B24080E72023007041D4A7A0379AC7232FF72E6F77B6DDB8F09B16CCE0EC3286B2BD43FA8C6141C53EA5ABEF0D8231077A04540A96B66"
6595         },
6596         {
6597                 &EC_P384_PUB,
6598                 &EC_P384_PRIV,
6599                 &br_sha256_vtable, "test",
6600                 "0CFAC37587532347DC3389FDC98286BBA8C73807285B184C83E62E26C401C0FAA48DD070BA79921A3457ABFF2D630AD7",
6601                 "6D6DEFAC9AB64DABAFE36C6BF510352A4CC27001263638E5B16D9BB51D451559F918EEDAF2293BE5B475CC8F0188636B2D46F3BECBCC523D5F1A1256BF0C9B024D879BA9E838144C8BA6BAEB4B53B47D51AB373F9845C0514EEFB14024787265",
6602                 "306402306D6DEFAC9AB64DABAFE36C6BF510352A4CC27001263638E5B16D9BB51D451559F918EEDAF2293BE5B475CC8F0188636B02302D46F3BECBCC523D5F1A1256BF0C9B024D879BA9E838144C8BA6BAEB4B53B47D51AB373F9845C0514EEFB14024787265"
6603         },
6604         {
6605                 &EC_P384_PUB,
6606                 &EC_P384_PRIV,
6607                 &br_sha384_vtable, "test",
6608                 "015EE46A5BF88773ED9123A5AB0807962D193719503C527B031B4C2D225092ADA71F4A459BC0DA98ADB95837DB8312EA",
6609                 "8203B63D3C853E8D77227FB377BCF7B7B772E97892A80F36AB775D509D7A5FEB0542A7F0812998DA8F1DD3CA3CF023DBDDD0760448D42D8A43AF45AF836FCE4DE8BE06B485E9B61B827C2F13173923E06A739F040649A667BF3B828246BAA5A5",
6610                 "30660231008203B63D3C853E8D77227FB377BCF7B7B772E97892A80F36AB775D509D7A5FEB0542A7F0812998DA8F1DD3CA3CF023DB023100DDD0760448D42D8A43AF45AF836FCE4DE8BE06B485E9B61B827C2F13173923E06A739F040649A667BF3B828246BAA5A5"
6611         },
6612         {
6613                 &EC_P384_PUB,
6614                 &EC_P384_PRIV,
6615                 &br_sha512_vtable, "test",
6616                 "3780C4F67CB15518B6ACAE34C9F83568D2E12E47DEAB6C50A4E4EE5319D1E8CE0E2CC8A136036DC4B9C00E6888F66B6C",
6617                 "A0D5D090C9980FAF3C2CE57B7AE951D31977DD11C775D314AF55F76C676447D06FB6495CD21B4B6E340FC236584FB277976984E59B4C77B0E8E4460DCA3D9F20E07B9BB1F63BEEFAF576F6B2E8B224634A2092CD3792E0159AD9CEE37659C736",
6618                 "3066023100A0D5D090C9980FAF3C2CE57B7AE951D31977DD11C775D314AF55F76C676447D06FB6495CD21B4B6E340FC236584FB277023100976984E59B4C77B0E8E4460DCA3D9F20E07B9BB1F63BEEFAF576F6B2E8B224634A2092CD3792E0159AD9CEE37659C736"
6619         },
6620
6621         /* Test vectors for P-521, from RFC 6979. */
6622         {
6623                 &EC_P521_PUB,
6624                 &EC_P521_PRIV,
6625                 &br_sha1_vtable, "sample",
6626                 "0089C071B419E1C2820962321787258469511958E80582E95D8378E0C2CCDB3CB42BEDE42F50E3FA3C71F5A76724281D31D9C89F0F91FC1BE4918DB1C03A5838D0F9",
6627                 "00343B6EC45728975EA5CBA6659BBB6062A5FF89EEA58BE3C80B619F322C87910FE092F7D45BB0F8EEE01ED3F20BABEC079D202AE677B243AB40B5431D497C55D75D00E7B0E675A9B24413D448B8CC119D2BF7B2D2DF032741C096634D6D65D0DBE3D5694625FB9E8104D3B842C1B0E2D0B98BEA19341E8676AEF66AE4EBA3D5475D5D16",
6628                 "3081870241343B6EC45728975EA5CBA6659BBB6062A5FF89EEA58BE3C80B619F322C87910FE092F7D45BB0F8EEE01ED3F20BABEC079D202AE677B243AB40B5431D497C55D75D024200E7B0E675A9B24413D448B8CC119D2BF7B2D2DF032741C096634D6D65D0DBE3D5694625FB9E8104D3B842C1B0E2D0B98BEA19341E8676AEF66AE4EBA3D5475D5D16"
6629         },
6630         {
6631                 &EC_P521_PUB,
6632                 &EC_P521_PRIV,
6633                 &br_sha224_vtable, "sample",
6634                 "0121415EC2CD7726330A61F7F3FA5DE14BE9436019C4DB8CB4041F3B54CF31BE0493EE3F427FB906393D895A19C9523F3A1D54BB8702BD4AA9C99DAB2597B92113F3",
6635                 "01776331CFCDF927D666E032E00CF776187BC9FDD8E69D0DABB4109FFE1B5E2A30715F4CC923A4A5E94D2503E9ACFED92857B7F31D7152E0F8C00C15FF3D87E2ED2E0050CB5265417FE2320BBB5A122B8E1A32BD699089851128E360E620A30C7E17BA41A666AF126CE100E5799B153B60528D5300D08489CA9178FB610A2006C254B41F",
6636                 "308187024201776331CFCDF927D666E032E00CF776187BC9FDD8E69D0DABB4109FFE1B5E2A30715F4CC923A4A5E94D2503E9ACFED92857B7F31D7152E0F8C00C15FF3D87E2ED2E024150CB5265417FE2320BBB5A122B8E1A32BD699089851128E360E620A30C7E17BA41A666AF126CE100E5799B153B60528D5300D08489CA9178FB610A2006C254B41F"
6637         },
6638         {
6639                 &EC_P521_PUB,
6640                 &EC_P521_PRIV,
6641                 &br_sha256_vtable, "sample",
6642                 "00EDF38AFCAAECAB4383358B34D67C9F2216C8382AAEA44A3DAD5FDC9C32575761793FEF24EB0FC276DFC4F6E3EC476752F043CF01415387470BCBD8678ED2C7E1A0",
6643                 "01511BB4D675114FE266FC4372B87682BAECC01D3CC62CF2303C92B3526012659D16876E25C7C1E57648F23B73564D67F61C6F14D527D54972810421E7D87589E1A7004A171143A83163D6DF460AAF61522695F207A58B95C0644D87E52AA1A347916E4F7A72930B1BC06DBE22CE3F58264AFD23704CBB63B29B931F7DE6C9D949A7ECFC",
6644                 "308187024201511BB4D675114FE266FC4372B87682BAECC01D3CC62CF2303C92B3526012659D16876E25C7C1E57648F23B73564D67F61C6F14D527D54972810421E7D87589E1A702414A171143A83163D6DF460AAF61522695F207A58B95C0644D87E52AA1A347916E4F7A72930B1BC06DBE22CE3F58264AFD23704CBB63B29B931F7DE6C9D949A7ECFC"
6645         },
6646         {
6647                 &EC_P521_PUB,
6648                 &EC_P521_PRIV,
6649                 &br_sha384_vtable, "sample",
6650                 "01546A108BC23A15D6F21872F7DED661FA8431DDBD922D0DCDB77CC878C8553FFAD064C95A920A750AC9137E527390D2D92F153E66196966EA554D9ADFCB109C4211",
6651                 "01EA842A0E17D2DE4F92C15315C63DDF72685C18195C2BB95E572B9C5136CA4B4B576AD712A52BE9730627D16054BA40CC0B8D3FF035B12AE75168397F5D50C6745101F21A3CEE066E1961025FB048BD5FE2B7924D0CD797BABE0A83B66F1E35EEAF5FDE143FA85DC394A7DEE766523393784484BDF3E00114A1C857CDE1AA203DB65D61",
6652                 "308188024201EA842A0E17D2DE4F92C15315C63DDF72685C18195C2BB95E572B9C5136CA4B4B576AD712A52BE9730627D16054BA40CC0B8D3FF035B12AE75168397F5D50C67451024201F21A3CEE066E1961025FB048BD5FE2B7924D0CD797BABE0A83B66F1E35EEAF5FDE143FA85DC394A7DEE766523393784484BDF3E00114A1C857CDE1AA203DB65D61"
6653         },
6654         {
6655                 &EC_P521_PUB,
6656                 &EC_P521_PRIV,
6657                 &br_sha512_vtable, "sample",
6658                 "01DAE2EA071F8110DC26882D4D5EAE0621A3256FC8847FB9022E2B7D28E6F10198B1574FDD03A9053C08A1854A168AA5A57470EC97DD5CE090124EF52A2F7ECBFFD3",
6659                 "00C328FAFCBD79DD77850370C46325D987CB525569FB63C5D3BC53950E6D4C5F174E25A1EE9017B5D450606ADD152B534931D7D4E8455CC91F9B15BF05EC36E377FA00617CCE7CF5064806C467F678D3B4080D6F1CC50AF26CA209417308281B68AF282623EAA63E5B5C0723D8B8C37FF0777B1A20F8CCB1DCCC43997F1EE0E44DA4A67A",
6660                 "308187024200C328FAFCBD79DD77850370C46325D987CB525569FB63C5D3BC53950E6D4C5F174E25A1EE9017B5D450606ADD152B534931D7D4E8455CC91F9B15BF05EC36E377FA0241617CCE7CF5064806C467F678D3B4080D6F1CC50AF26CA209417308281B68AF282623EAA63E5B5C0723D8B8C37FF0777B1A20F8CCB1DCCC43997F1EE0E44DA4A67A"
6661         },
6662         {
6663                 &EC_P521_PUB,
6664                 &EC_P521_PRIV,
6665                 &br_sha1_vtable, "test",
6666                 "00BB9F2BF4FE1038CCF4DABD7139A56F6FD8BB1386561BD3C6A4FC818B20DF5DDBA80795A947107A1AB9D12DAA615B1ADE4F7A9DC05E8E6311150F47F5C57CE8B222",
6667                 "013BAD9F29ABE20DE37EBEB823C252CA0F63361284015A3BF430A46AAA80B87B0693F0694BD88AFE4E661FC33B094CD3B7963BED5A727ED8BD6A3A202ABE009D036701E9BB81FF7944CA409AD138DBBEE228E1AFCC0C890FC78EC8604639CB0DBDC90F717A99EAD9D272855D00162EE9527567DD6A92CBD629805C0445282BBC916797FF",
6668                 "3081880242013BAD9F29ABE20DE37EBEB823C252CA0F63361284015A3BF430A46AAA80B87B0693F0694BD88AFE4E661FC33B094CD3B7963BED5A727ED8BD6A3A202ABE009D0367024201E9BB81FF7944CA409AD138DBBEE228E1AFCC0C890FC78EC8604639CB0DBDC90F717A99EAD9D272855D00162EE9527567DD6A92CBD629805C0445282BBC916797FF"
6669         },
6670         {
6671                 &EC_P521_PUB,
6672                 &EC_P521_PRIV,
6673                 &br_sha224_vtable, "test",
6674                 "0040D09FCF3C8A5F62CF4FB223CBBB2B9937F6B0577C27020A99602C25A01136987E452988781484EDBBCF1C47E554E7FC901BC3085E5206D9F619CFF07E73D6F706",
6675                 "01C7ED902E123E6815546065A2C4AF977B22AA8EADDB68B2C1110E7EA44D42086BFE4A34B67DDC0E17E96536E358219B23A706C6A6E16BA77B65E1C595D43CAE17FB0177336676304FCB343CE028B38E7B4FBA76C1C1B277DA18CAD2A8478B2A9A9F5BEC0F3BA04F35DB3E4263569EC6AADE8C92746E4C82F8299AE1B8F1739F8FD519A4",
6676                 "308188024201C7ED902E123E6815546065A2C4AF977B22AA8EADDB68B2C1110E7EA44D42086BFE4A34B67DDC0E17E96536E358219B23A706C6A6E16BA77B65E1C595D43CAE17FB02420177336676304FCB343CE028B38E7B4FBA76C1C1B277DA18CAD2A8478B2A9A9F5BEC0F3BA04F35DB3E4263569EC6AADE8C92746E4C82F8299AE1B8F1739F8FD519A4"
6677         },
6678         {
6679                 &EC_P521_PUB,
6680                 &EC_P521_PRIV,
6681                 &br_sha256_vtable, "test",
6682                 "001DE74955EFAABC4C4F17F8E84D881D1310B5392D7700275F82F145C61E843841AF09035BF7A6210F5A431A6A9E81C9323354A9E69135D44EBD2FCAA7731B909258",
6683                 "000E871C4A14F993C6C7369501900C4BC1E9C7B0B4BA44E04868B30B41D8071042EB28C4C250411D0CE08CD197E4188EA4876F279F90B3D8D74A3C76E6F1E4656AA800CD52DBAA33B063C3A6CD8058A1FB0A46A4754B034FCC644766CA14DA8CA5CA9FDE00E88C1AD60CCBA759025299079D7A427EC3CC5B619BFBC828E7769BCD694E86",
6684                 "30818702410E871C4A14F993C6C7369501900C4BC1E9C7B0B4BA44E04868B30B41D8071042EB28C4C250411D0CE08CD197E4188EA4876F279F90B3D8D74A3C76E6F1E4656AA8024200CD52DBAA33B063C3A6CD8058A1FB0A46A4754B034FCC644766CA14DA8CA5CA9FDE00E88C1AD60CCBA759025299079D7A427EC3CC5B619BFBC828E7769BCD694E86"
6685         },
6686         {
6687                 &EC_P521_PUB,
6688                 &EC_P521_PRIV,
6689                 &br_sha384_vtable, "test",
6690                 "01F1FC4A349A7DA9A9E116BFDD055DC08E78252FF8E23AC276AC88B1770AE0B5DCEB1ED14A4916B769A523CE1E90BA22846AF11DF8B300C38818F713DADD85DE0C88",
6691                 "014BEE21A18B6D8B3C93FAB08D43E739707953244FDBE924FA926D76669E7AC8C89DF62ED8975C2D8397A65A49DCC09F6B0AC62272741924D479354D74FF6075578C0133330865C067A0EAF72362A65E2D7BC4E461E8C8995C3B6226A21BD1AA78F0ED94FE536A0DCA35534F0CD1510C41525D163FE9D74D134881E35141ED5E8E95B979",
6692                 "3081880242014BEE21A18B6D8B3C93FAB08D43E739707953244FDBE924FA926D76669E7AC8C89DF62ED8975C2D8397A65A49DCC09F6B0AC62272741924D479354D74FF6075578C02420133330865C067A0EAF72362A65E2D7BC4E461E8C8995C3B6226A21BD1AA78F0ED94FE536A0DCA35534F0CD1510C41525D163FE9D74D134881E35141ED5E8E95B979"
6693         },
6694         {
6695                 &EC_P521_PUB,
6696                 &EC_P521_PRIV,
6697                 &br_sha512_vtable, "test",
6698                 "016200813020EC986863BEDFC1B121F605C1215645018AEA1A7B215A564DE9EB1B38A67AA1128B80CE391C4FB71187654AAA3431027BFC7F395766CA988C964DC56D",
6699                 "013E99020ABF5CEE7525D16B69B229652AB6BDF2AFFCAEF38773B4B7D08725F10CDB93482FDCC54EDCEE91ECA4166B2A7C6265EF0CE2BD7051B7CEF945BABD47EE6D01FBD0013C674AA79CB39849527916CE301C66EA7CE8B80682786AD60F98F7E78A19CA69EFF5C57400E3B3A0AD66CE0978214D13BAF4E9AC60752F7B155E2DE4DCE3",
6700                 "3081880242013E99020ABF5CEE7525D16B69B229652AB6BDF2AFFCAEF38773B4B7D08725F10CDB93482FDCC54EDCEE91ECA4166B2A7C6265EF0CE2BD7051B7CEF945BABD47EE6D024201FBD0013C674AA79CB39849527916CE301C66EA7CE8B80682786AD60F98F7E78A19CA69EFF5C57400E3B3A0AD66CE0978214D13BAF4E9AC60752F7B155E2DE4DCE3"
6701         },
6702
6703         /* Terminator for list of test vectors. */
6704         {
6705                 0, 0, 0, 0, 0, 0, 0
6706         }
6707 };
6708
6709 static void
6710 test_ECDSA_KAT(const br_ec_impl *iec,
6711         br_ecdsa_sign sign, br_ecdsa_vrfy vrfy, int asn1)
6712 {
6713         size_t u;
6714
6715         for (u = 0;; u ++) {
6716                 const ecdsa_kat_vector *kv;
6717                 unsigned char hash[64];
6718                 size_t hash_len;
6719                 unsigned char sig[150], sig2[150];
6720                 size_t sig_len, sig2_len;
6721                 br_hash_compat_context hc;
6722
6723                 kv = &ECDSA_KAT[u];
6724                 if (kv->pub == 0) {
6725                         break;
6726                 }
6727                 kv->hf->init(&hc.vtable);
6728                 kv->hf->update(&hc.vtable, kv->msg, strlen(kv->msg));
6729                 kv->hf->out(&hc.vtable, hash);
6730                 hash_len = (kv->hf->desc >> BR_HASHDESC_OUT_OFF)
6731                         & BR_HASHDESC_OUT_MASK;
6732                 if (asn1) {
6733                         sig_len = hextobin(sig, kv->sasn1);
6734                 } else {
6735                         sig_len = hextobin(sig, kv->sraw);
6736                 }
6737
6738                 if (vrfy(iec, hash, hash_len,
6739                         kv->pub, sig, sig_len) != 1)
6740                 {
6741                         fprintf(stderr, "ECDSA KAT verify failed (1)\n");
6742                         exit(EXIT_FAILURE);
6743                 }
6744                 hash[0] ^= 0x80;
6745                 if (vrfy(iec, hash, hash_len,
6746                         kv->pub, sig, sig_len) != 0)
6747                 {
6748                         fprintf(stderr, "ECDSA KAT verify shoud have failed\n");
6749                         exit(EXIT_FAILURE);
6750                 }
6751                 hash[0] ^= 0x80;
6752                 if (vrfy(iec, hash, hash_len,
6753                         kv->pub, sig, sig_len) != 1)
6754                 {
6755                         fprintf(stderr, "ECDSA KAT verify failed (2)\n");
6756                         exit(EXIT_FAILURE);
6757                 }
6758
6759                 sig2_len = sign(iec, kv->hf, hash, kv->priv, sig2);
6760                 if (sig2_len == 0) {
6761                         fprintf(stderr, "ECDSA KAT sign failed\n");
6762                         exit(EXIT_FAILURE);
6763                 }
6764                 if (sig2_len != sig_len || memcmp(sig, sig2, sig_len) != 0) {
6765                         fprintf(stderr, "ECDSA KAT wrong signature value\n");
6766                         exit(EXIT_FAILURE);
6767                 }
6768
6769                 printf(".");
6770                 fflush(stdout);
6771         }
6772 }
6773
6774 static void
6775 test_ECDSA_i31(void)
6776 {
6777         printf("Test ECDSA/i31: ");
6778         fflush(stdout);
6779         printf("[raw]");
6780         fflush(stdout);
6781         test_ECDSA_KAT(&br_ec_prime_i31,
6782                 &br_ecdsa_i31_sign_raw, &br_ecdsa_i31_vrfy_raw, 0);
6783         printf(" [asn1]");
6784         fflush(stdout);
6785         test_ECDSA_KAT(&br_ec_prime_i31,
6786                 &br_ecdsa_i31_sign_asn1, &br_ecdsa_i31_vrfy_asn1, 1);
6787         printf(" done.\n");
6788         fflush(stdout);
6789 }
6790
6791 static void
6792 test_ECDSA_i15(void)
6793 {
6794         printf("Test ECDSA/i15: ");
6795         fflush(stdout);
6796         printf("[raw]");
6797         fflush(stdout);
6798         test_ECDSA_KAT(&br_ec_prime_i15,
6799                 &br_ecdsa_i15_sign_raw, &br_ecdsa_i15_vrfy_raw, 0);
6800         printf(" [asn1]");
6801         fflush(stdout);
6802         test_ECDSA_KAT(&br_ec_prime_i31,
6803                 &br_ecdsa_i15_sign_asn1, &br_ecdsa_i15_vrfy_asn1, 1);
6804         printf(" done.\n");
6805         fflush(stdout);
6806 }
6807
6808 static void
6809 test_modpow_i31(void)
6810 {
6811         br_hmac_drbg_context hc;
6812         int k;
6813
6814         printf("Test ModPow/i31: ");
6815
6816         br_hmac_drbg_init(&hc, &br_sha256_vtable, "seed modpow", 11);
6817         for (k = 10; k <= 500; k ++) {
6818                 size_t blen;
6819                 unsigned char bm[128], bx[128], bx1[128], bx2[128];
6820                 unsigned char be[128];
6821                 unsigned mask;
6822                 uint32_t x1[35], m1[35];
6823                 uint16_t x2[70], m2[70];
6824                 uint32_t tmp1[1000];
6825                 uint16_t tmp2[2000];
6826
6827                 blen = (k + 7) >> 3;
6828                 br_hmac_drbg_generate(&hc, bm, blen);
6829                 br_hmac_drbg_generate(&hc, bx, blen);
6830                 br_hmac_drbg_generate(&hc, be, blen);
6831                 bm[blen - 1] |= 0x01;
6832                 mask = 0xFF >> ((int)(blen << 3) - k);
6833                 bm[0] &= mask;
6834                 bm[0] |= (mask - (mask >> 1));
6835                 bx[0] &= (mask >> 1);
6836
6837                 br_i31_decode(m1, bm, blen);
6838                 br_i31_decode_mod(x1, bx, blen, m1);
6839                 br_i31_modpow_opt(x1, be, blen, m1, br_i31_ninv31(m1[1]),
6840                         tmp1, (sizeof tmp1) / (sizeof tmp1[0]));
6841                 br_i31_encode(bx1, blen, x1);
6842
6843                 br_i15_decode(m2, bm, blen);
6844                 br_i15_decode_mod(x2, bx, blen, m2);
6845                 br_i15_modpow_opt(x2, be, blen, m2, br_i15_ninv15(m2[1]),
6846                         tmp2, (sizeof tmp2) / (sizeof tmp2[0]));
6847                 br_i15_encode(bx2, blen, x2);
6848
6849                 check_equals("ModPow i31/i15", bx1, bx2, blen);
6850
6851                 printf(".");
6852                 fflush(stdout);
6853         }
6854
6855         printf(" done.\n");
6856         fflush(stdout);
6857 }
6858
6859 static void
6860 test_modpow_i62(void)
6861 {
6862         br_hmac_drbg_context hc;
6863         int k;
6864
6865         printf("Test ModPow/i62: ");
6866
6867         br_hmac_drbg_init(&hc, &br_sha256_vtable, "seed modpow", 11);
6868         for (k = 10; k <= 500; k ++) {
6869                 size_t blen;
6870                 unsigned char bm[128], bx[128], bx1[128], bx2[128];
6871                 unsigned char be[128];
6872                 unsigned mask;
6873                 uint32_t x1[35], m1[35];
6874                 uint16_t x2[70], m2[70];
6875                 uint64_t tmp1[500];
6876                 uint16_t tmp2[2000];
6877
6878                 blen = (k + 7) >> 3;
6879                 br_hmac_drbg_generate(&hc, bm, blen);
6880                 br_hmac_drbg_generate(&hc, bx, blen);
6881                 br_hmac_drbg_generate(&hc, be, blen);
6882                 bm[blen - 1] |= 0x01;
6883                 mask = 0xFF >> ((int)(blen << 3) - k);
6884                 bm[0] &= mask;
6885                 bm[0] |= (mask - (mask >> 1));
6886                 bx[0] &= (mask >> 1);
6887
6888                 br_i31_decode(m1, bm, blen);
6889                 br_i31_decode_mod(x1, bx, blen, m1);
6890                 br_i62_modpow_opt(x1, be, blen, m1, br_i31_ninv31(m1[1]),
6891                         tmp1, (sizeof tmp1) / (sizeof tmp1[0]));
6892                 br_i31_encode(bx1, blen, x1);
6893
6894                 br_i15_decode(m2, bm, blen);
6895                 br_i15_decode_mod(x2, bx, blen, m2);
6896                 br_i15_modpow_opt(x2, be, blen, m2, br_i15_ninv15(m2[1]),
6897                         tmp2, (sizeof tmp2) / (sizeof tmp2[0]));
6898                 br_i15_encode(bx2, blen, x2);
6899
6900                 check_equals("ModPow i62/i15", bx1, bx2, blen);
6901
6902                 printf(".");
6903                 fflush(stdout);
6904         }
6905
6906         printf(" done.\n");
6907         fflush(stdout);
6908 }
6909
6910 static int
6911 eq_name(const char *s1, const char *s2)
6912 {
6913         for (;;) {
6914                 int c1, c2;
6915
6916                 for (;;) {
6917                         c1 = *s1 ++;
6918                         if (c1 >= 'A' && c1 <= 'Z') {
6919                                 c1 += 'a' - 'A';
6920                         } else {
6921                                 switch (c1) {
6922                                 case '-': case '_': case '.': case ' ':
6923                                         continue;
6924                                 }
6925                         }
6926                         break;
6927                 }
6928                 for (;;) {
6929                         c2 = *s2 ++;
6930                         if (c2 >= 'A' && c2 <= 'Z') {
6931                                 c2 += 'a' - 'A';
6932                         } else {
6933                                 switch (c2) {
6934                                 case '-': case '_': case '.': case ' ':
6935                                         continue;
6936                                 }
6937                         }
6938                         break;
6939                 }
6940                 if (c1 != c2) {
6941                         return 0;
6942                 }
6943                 if (c1 == 0) {
6944                         return 1;
6945                 }
6946         }
6947 }
6948
6949 #define STU(x)   { &test_ ## x, #x }
6950
6951 static const struct {
6952         void (*fn)(void);
6953         const char *name;
6954 } tfns[] = {
6955         STU(MD5),
6956         STU(SHA1),
6957         STU(SHA224),
6958         STU(SHA256),
6959         STU(SHA384),
6960         STU(SHA512),
6961         STU(MD5_SHA1),
6962         STU(multihash),
6963         STU(HMAC),
6964         STU(HMAC_DRBG),
6965         STU(PRF),
6966         STU(AES_big),
6967         STU(AES_small),
6968         STU(AES_ct),
6969         STU(AES_ct64),
6970         STU(AES_pwr8),
6971         STU(AES_x86ni),
6972         STU(AES_CTRCBC_big),
6973         STU(AES_CTRCBC_small),
6974         STU(AES_CTRCBC_ct),
6975         STU(AES_CTRCBC_ct64),
6976         STU(AES_CTRCBC_x86ni),
6977         STU(DES_tab),
6978         STU(DES_ct),
6979         STU(ChaCha20_ct),
6980         STU(ChaCha20_sse2),
6981         STU(Poly1305_ctmul),
6982         STU(Poly1305_ctmul32),
6983         STU(Poly1305_ctmulq),
6984         STU(Poly1305_i15),
6985         STU(RSA_i15),
6986         STU(RSA_i31),
6987         STU(RSA_i32),
6988         STU(RSA_i62),
6989         STU(GHASH_ctmul),
6990         STU(GHASH_ctmul32),
6991         STU(GHASH_ctmul64),
6992         STU(GHASH_pclmul),
6993         STU(GHASH_pwr8),
6994         STU(CCM),
6995         STU(EAX),
6996         STU(GCM),
6997         STU(EC_prime_i15),
6998         STU(EC_prime_i31),
6999         STU(EC_p256_m15),
7000         STU(EC_p256_m31),
7001         STU(EC_c25519_i15),
7002         STU(EC_c25519_i31),
7003         STU(EC_c25519_m15),
7004         STU(EC_c25519_m31),
7005         STU(ECDSA_i15),
7006         STU(ECDSA_i31),
7007         STU(modpow_i31),
7008         STU(modpow_i62),
7009         { 0, 0 }
7010 };
7011
7012 int
7013 main(int argc, char *argv[])
7014 {
7015         size_t u;
7016
7017         if (argc <= 1) {
7018                 printf("usage: testcrypto all | name...\n");
7019                 printf("individual test names:\n");
7020                 for (u = 0; tfns[u].name; u ++) {
7021                         printf("   %s\n", tfns[u].name);
7022                 }
7023         } else {
7024                 for (u = 0; tfns[u].name; u ++) {
7025                         int i;
7026
7027                         for (i = 1; i < argc; i ++) {
7028                                 if (eq_name(argv[i], tfns[u].name)
7029                                         || eq_name(argv[i], "all"))
7030                                 {
7031                                         tfns[u].fn();
7032                                         break;
7033                                 }
7034                         }
7035                 }
7036         }
7037         return 0;
7038 }