1 /* $OpenBSD: e_aes.c,v 1.35 2019/03/17 18:07:41 tb Exp $ */
2 /* ====================================================================
3 * Copyright (c) 2001-2011 The OpenSSL Project. All rights reserved.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in
14 * the documentation and/or other materials provided with the
17 * 3. All advertising materials mentioning features or use of this
18 * software must display the following acknowledgment:
19 * "This product includes software developed by the OpenSSL Project
20 * for use in the OpenSSL Toolkit. (http://www.openssl.org/)"
22 * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
23 * endorse or promote products derived from this software without
24 * prior written permission. For written permission, please contact
25 * openssl-core@openssl.org.
27 * 5. Products derived from this software may not be called "OpenSSL"
28 * nor may "OpenSSL" appear in their names without prior written
29 * permission of the OpenSSL Project.
31 * 6. Redistributions of any form whatsoever must retain the following
33 * "This product includes software developed by the OpenSSL Project
34 * for use in the OpenSSL Toolkit (http://www.openssl.org/)"
36 * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
37 * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
38 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
39 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR
40 * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
41 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
42 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
43 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
44 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
45 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
46 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
47 * OF THE POSSIBILITY OF SUCH DAMAGE.
48 * ====================================================================
56 #include <openssl/opensslconf.h>
58 #ifndef OPENSSL_NO_AES
59 #include <openssl/aes.h>
60 #include <openssl/err.h>
61 #include <openssl/evp.h>
64 #include "modes_lcl.h"
76 AES_KEY ks; /* AES key schedule to use */
77 int key_set; /* Set if key initialised */
78 int iv_set; /* Set if an iv is set */
80 unsigned char *iv; /* Temporary IV store */
81 int ivlen; /* IV length */
83 int iv_gen; /* It is OK to generate IVs */
84 int tls_aad_len; /* TLS AAD length */
89 AES_KEY ks1, ks2; /* AES key schedules to use */
91 void (*stream)(const unsigned char *in, unsigned char *out,
92 size_t length, const AES_KEY *key1, const AES_KEY *key2,
93 const unsigned char iv[16]);
97 AES_KEY ks; /* AES key schedule to use */
98 int key_set; /* Set if key initialised */
99 int iv_set; /* Set if an iv is set */
100 int tag_set; /* Set if tag is valid */
101 int len_set; /* Set if message length set */
102 int L, M; /* L and M parameters from RFC3610 */
107 #define MAXBITCHUNK ((size_t)1<<(sizeof(size_t)*8-4))
110 int vpaes_set_encrypt_key(const unsigned char *userKey, int bits,
112 int vpaes_set_decrypt_key(const unsigned char *userKey, int bits,
115 void vpaes_encrypt(const unsigned char *in, unsigned char *out,
117 void vpaes_decrypt(const unsigned char *in, unsigned char *out,
120 void vpaes_cbc_encrypt(const unsigned char *in, unsigned char *out,
121 size_t length, const AES_KEY *key, unsigned char *ivec, int enc);
124 void bsaes_cbc_encrypt(const unsigned char *in, unsigned char *out,
125 size_t length, const AES_KEY *key, unsigned char ivec[16], int enc);
126 void bsaes_ctr32_encrypt_blocks(const unsigned char *in, unsigned char *out,
127 size_t len, const AES_KEY *key, const unsigned char ivec[16]);
128 void bsaes_xts_encrypt(const unsigned char *inp, unsigned char *out,
129 size_t len, const AES_KEY *key1, const AES_KEY *key2,
130 const unsigned char iv[16]);
131 void bsaes_xts_decrypt(const unsigned char *inp, unsigned char *out,
132 size_t len, const AES_KEY *key1, const AES_KEY *key2,
133 const unsigned char iv[16]);
136 void AES_ctr32_encrypt(const unsigned char *in, unsigned char *out,
137 size_t blocks, const AES_KEY *key,
138 const unsigned char ivec[AES_BLOCK_SIZE]);
141 void AES_xts_encrypt(const char *inp, char *out, size_t len,
142 const AES_KEY *key1, const AES_KEY *key2, const unsigned char iv[16]);
143 void AES_xts_decrypt(const char *inp, char *out, size_t len,
144 const AES_KEY *key1, const AES_KEY *key2, const unsigned char iv[16]);
147 #if defined(AES_ASM) && ( \
148 ((defined(__i386) || defined(__i386__) || \
149 defined(_M_IX86)) && defined(OPENSSL_IA32_SSE2))|| \
150 defined(__x86_64) || defined(__x86_64__) || \
151 defined(_M_AMD64) || defined(_M_X64) || \
154 #include "x86_arch.h"
157 #define VPAES_CAPABLE (OPENSSL_cpu_caps() & CPUCAP_MASK_SSSE3)
160 #define BSAES_CAPABLE VPAES_CAPABLE
165 #define AESNI_CAPABLE (OPENSSL_cpu_caps() & CPUCAP_MASK_AESNI)
167 int aesni_set_encrypt_key(const unsigned char *userKey, int bits,
169 int aesni_set_decrypt_key(const unsigned char *userKey, int bits,
172 void aesni_encrypt(const unsigned char *in, unsigned char *out,
174 void aesni_decrypt(const unsigned char *in, unsigned char *out,
177 void aesni_ecb_encrypt(const unsigned char *in, unsigned char *out,
178 size_t length, const AES_KEY *key, int enc);
179 void aesni_cbc_encrypt(const unsigned char *in, unsigned char *out,
180 size_t length, const AES_KEY *key, unsigned char *ivec, int enc);
182 void aesni_ctr32_encrypt_blocks(const unsigned char *in, unsigned char *out,
183 size_t blocks, const void *key, const unsigned char *ivec);
185 void aesni_xts_encrypt(const unsigned char *in, unsigned char *out,
186 size_t length, const AES_KEY *key1, const AES_KEY *key2,
187 const unsigned char iv[16]);
189 void aesni_xts_decrypt(const unsigned char *in, unsigned char *out,
190 size_t length, const AES_KEY *key1, const AES_KEY *key2,
191 const unsigned char iv[16]);
193 void aesni_ccm64_encrypt_blocks (const unsigned char *in, unsigned char *out,
194 size_t blocks, const void *key, const unsigned char ivec[16],
195 unsigned char cmac[16]);
197 void aesni_ccm64_decrypt_blocks (const unsigned char *in, unsigned char *out,
198 size_t blocks, const void *key, const unsigned char ivec[16],
199 unsigned char cmac[16]);
202 aesni_init_key(EVP_CIPHER_CTX *ctx, const unsigned char *key,
203 const unsigned char *iv, int enc)
206 EVP_AES_KEY *dat = (EVP_AES_KEY *)ctx->cipher_data;
208 mode = ctx->cipher->flags & EVP_CIPH_MODE;
209 if ((mode == EVP_CIPH_ECB_MODE || mode == EVP_CIPH_CBC_MODE) &&
211 ret = aesni_set_decrypt_key(key, ctx->key_len * 8,
213 dat->block = (block128_f)aesni_decrypt;
214 dat->stream.cbc = mode == EVP_CIPH_CBC_MODE ?
215 (cbc128_f)aesni_cbc_encrypt : NULL;
217 ret = aesni_set_encrypt_key(key, ctx->key_len * 8,
219 dat->block = (block128_f)aesni_encrypt;
220 if (mode == EVP_CIPH_CBC_MODE)
221 dat->stream.cbc = (cbc128_f)aesni_cbc_encrypt;
222 else if (mode == EVP_CIPH_CTR_MODE)
223 dat->stream.ctr = (ctr128_f)aesni_ctr32_encrypt_blocks;
225 dat->stream.cbc = NULL;
229 EVPerror(EVP_R_AES_KEY_SETUP_FAILED);
237 aesni_cbc_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
238 const unsigned char *in, size_t len)
240 aesni_cbc_encrypt(in, out, len, ctx->cipher_data, ctx->iv,
247 aesni_ecb_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
248 const unsigned char *in, size_t len)
250 size_t bl = ctx->cipher->block_size;
255 aesni_ecb_encrypt(in, out, len, ctx->cipher_data, ctx->encrypt);
260 #define aesni_ofb_cipher aes_ofb_cipher
261 static int aesni_ofb_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
262 const unsigned char *in, size_t len);
264 #define aesni_cfb_cipher aes_cfb_cipher
265 static int aesni_cfb_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
266 const unsigned char *in, size_t len);
268 #define aesni_cfb8_cipher aes_cfb8_cipher
269 static int aesni_cfb8_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
270 const unsigned char *in, size_t len);
272 #define aesni_cfb1_cipher aes_cfb1_cipher
273 static int aesni_cfb1_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
274 const unsigned char *in, size_t len);
276 #define aesni_ctr_cipher aes_ctr_cipher
277 static int aesni_ctr_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
278 const unsigned char *in, size_t len);
281 aesni_gcm_init_key(EVP_CIPHER_CTX *ctx, const unsigned char *key,
282 const unsigned char *iv, int enc)
284 EVP_AES_GCM_CTX *gctx = ctx->cipher_data;
289 aesni_set_encrypt_key(key, ctx->key_len * 8, &gctx->ks);
290 CRYPTO_gcm128_init(&gctx->gcm, &gctx->ks,
291 (block128_f)aesni_encrypt);
292 gctx->ctr = (ctr128_f)aesni_ctr32_encrypt_blocks;
293 /* If we have an iv can set it directly, otherwise use
296 if (iv == NULL && gctx->iv_set)
299 CRYPTO_gcm128_setiv(&gctx->gcm, iv, gctx->ivlen);
304 /* If key set use IV, otherwise copy */
306 CRYPTO_gcm128_setiv(&gctx->gcm, iv, gctx->ivlen);
308 memcpy(gctx->iv, iv, gctx->ivlen);
315 #define aesni_gcm_cipher aes_gcm_cipher
316 static int aesni_gcm_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
317 const unsigned char *in, size_t len);
320 aesni_xts_init_key(EVP_CIPHER_CTX *ctx, const unsigned char *key,
321 const unsigned char *iv, int enc)
323 EVP_AES_XTS_CTX *xctx = ctx->cipher_data;
329 /* key_len is two AES keys */
331 aesni_set_encrypt_key(key, ctx->key_len * 4,
333 xctx->xts.block1 = (block128_f)aesni_encrypt;
334 xctx->stream = aesni_xts_encrypt;
336 aesni_set_decrypt_key(key, ctx->key_len * 4,
338 xctx->xts.block1 = (block128_f)aesni_decrypt;
339 xctx->stream = aesni_xts_decrypt;
342 aesni_set_encrypt_key(key + ctx->key_len / 2,
343 ctx->key_len * 4, &xctx->ks2);
344 xctx->xts.block2 = (block128_f)aesni_encrypt;
346 xctx->xts.key1 = &xctx->ks1;
350 xctx->xts.key2 = &xctx->ks2;
351 memcpy(ctx->iv, iv, 16);
357 #define aesni_xts_cipher aes_xts_cipher
358 static int aesni_xts_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
359 const unsigned char *in, size_t len);
362 aesni_ccm_init_key(EVP_CIPHER_CTX *ctx, const unsigned char *key,
363 const unsigned char *iv, int enc)
365 EVP_AES_CCM_CTX *cctx = ctx->cipher_data;
370 aesni_set_encrypt_key(key, ctx->key_len * 8, &cctx->ks);
371 CRYPTO_ccm128_init(&cctx->ccm, cctx->M, cctx->L,
372 &cctx->ks, (block128_f)aesni_encrypt);
373 cctx->str = enc ? (ccm128_f)aesni_ccm64_encrypt_blocks :
374 (ccm128_f)aesni_ccm64_decrypt_blocks;
378 memcpy(ctx->iv, iv, 15 - cctx->L);
384 #define aesni_ccm_cipher aes_ccm_cipher
385 static int aesni_ccm_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
386 const unsigned char *in, size_t len);
388 #define BLOCK_CIPHER_generic(n,keylen,blocksize,ivlen,nmode,mode,MODE,fl) \
389 static const EVP_CIPHER aesni_##keylen##_##mode = { \
390 .nid = n##_##keylen##_##nmode, \
391 .block_size = blocksize, \
392 .key_len = keylen / 8, \
394 .flags = fl | EVP_CIPH_##MODE##_MODE, \
395 .init = aesni_init_key, \
396 .do_cipher = aesni_##mode##_cipher, \
397 .ctx_size = sizeof(EVP_AES_KEY) \
399 static const EVP_CIPHER aes_##keylen##_##mode = { \
400 .nid = n##_##keylen##_##nmode, \
401 .block_size = blocksize, \
402 .key_len = keylen / 8, \
404 .flags = fl | EVP_CIPH_##MODE##_MODE, \
405 .init = aes_init_key, \
406 .do_cipher = aes_##mode##_cipher, \
407 .ctx_size = sizeof(EVP_AES_KEY) \
410 EVP_aes_##keylen##_##mode(void) \
412 return AESNI_CAPABLE ? \
413 &aesni_##keylen##_##mode : &aes_##keylen##_##mode; \
416 #define BLOCK_CIPHER_custom(n,keylen,blocksize,ivlen,mode,MODE,fl) \
417 static const EVP_CIPHER aesni_##keylen##_##mode = { \
418 .nid = n##_##keylen##_##mode, \
419 .block_size = blocksize, \
421 (EVP_CIPH_##MODE##_MODE == EVP_CIPH_XTS_MODE ? 2 : 1) * \
424 .flags = fl | EVP_CIPH_##MODE##_MODE, \
425 .init = aesni_##mode##_init_key, \
426 .do_cipher = aesni_##mode##_cipher, \
427 .cleanup = aes_##mode##_cleanup, \
428 .ctx_size = sizeof(EVP_AES_##MODE##_CTX), \
429 .ctrl = aes_##mode##_ctrl \
431 static const EVP_CIPHER aes_##keylen##_##mode = { \
432 .nid = n##_##keylen##_##mode, \
433 .block_size = blocksize, \
435 (EVP_CIPH_##MODE##_MODE == EVP_CIPH_XTS_MODE ? 2 : 1) * \
438 .flags = fl | EVP_CIPH_##MODE##_MODE, \
439 .init = aes_##mode##_init_key, \
440 .do_cipher = aes_##mode##_cipher, \
441 .cleanup = aes_##mode##_cleanup, \
442 .ctx_size = sizeof(EVP_AES_##MODE##_CTX), \
443 .ctrl = aes_##mode##_ctrl \
446 EVP_aes_##keylen##_##mode(void) \
448 return AESNI_CAPABLE ? \
449 &aesni_##keylen##_##mode : &aes_##keylen##_##mode; \
454 #define BLOCK_CIPHER_generic(n,keylen,blocksize,ivlen,nmode,mode,MODE,fl) \
455 static const EVP_CIPHER aes_##keylen##_##mode = { \
456 .nid = n##_##keylen##_##nmode, \
457 .block_size = blocksize, \
458 .key_len = keylen / 8, \
460 .flags = fl | EVP_CIPH_##MODE##_MODE, \
461 .init = aes_init_key, \
462 .do_cipher = aes_##mode##_cipher, \
463 .ctx_size = sizeof(EVP_AES_KEY) \
466 EVP_aes_##keylen##_##mode(void) \
468 return &aes_##keylen##_##mode; \
471 #define BLOCK_CIPHER_custom(n,keylen,blocksize,ivlen,mode,MODE,fl) \
472 static const EVP_CIPHER aes_##keylen##_##mode = { \
473 .nid = n##_##keylen##_##mode, \
474 .block_size = blocksize, \
476 (EVP_CIPH_##MODE##_MODE == EVP_CIPH_XTS_MODE ? 2 : 1) * \
479 .flags = fl | EVP_CIPH_##MODE##_MODE, \
480 .init = aes_##mode##_init_key, \
481 .do_cipher = aes_##mode##_cipher, \
482 .cleanup = aes_##mode##_cleanup, \
483 .ctx_size = sizeof(EVP_AES_##MODE##_CTX), \
484 .ctrl = aes_##mode##_ctrl \
487 EVP_aes_##keylen##_##mode(void) \
489 return &aes_##keylen##_##mode; \
494 #define BLOCK_CIPHER_generic_pack(nid,keylen,flags) \
495 BLOCK_CIPHER_generic(nid,keylen,16,16,cbc,cbc,CBC,flags|EVP_CIPH_FLAG_DEFAULT_ASN1) \
496 BLOCK_CIPHER_generic(nid,keylen,16,0,ecb,ecb,ECB,flags|EVP_CIPH_FLAG_DEFAULT_ASN1) \
497 BLOCK_CIPHER_generic(nid,keylen,1,16,ofb128,ofb,OFB,flags|EVP_CIPH_FLAG_DEFAULT_ASN1) \
498 BLOCK_CIPHER_generic(nid,keylen,1,16,cfb128,cfb,CFB,flags|EVP_CIPH_FLAG_DEFAULT_ASN1) \
499 BLOCK_CIPHER_generic(nid,keylen,1,16,cfb1,cfb1,CFB,flags) \
500 BLOCK_CIPHER_generic(nid,keylen,1,16,cfb8,cfb8,CFB,flags) \
501 BLOCK_CIPHER_generic(nid,keylen,1,16,ctr,ctr,CTR,flags)
504 aes_init_key(EVP_CIPHER_CTX *ctx, const unsigned char *key,
505 const unsigned char *iv, int enc)
508 EVP_AES_KEY *dat = (EVP_AES_KEY *)ctx->cipher_data;
510 mode = ctx->cipher->flags & EVP_CIPH_MODE;
511 if ((mode == EVP_CIPH_ECB_MODE || mode == EVP_CIPH_CBC_MODE) &&
514 if (BSAES_CAPABLE && mode == EVP_CIPH_CBC_MODE) {
515 ret = AES_set_decrypt_key(key, ctx->key_len * 8,
517 dat->block = (block128_f)AES_decrypt;
518 dat->stream.cbc = (cbc128_f)bsaes_cbc_encrypt;
523 ret = vpaes_set_decrypt_key(key, ctx->key_len * 8,
525 dat->block = (block128_f)vpaes_decrypt;
526 dat->stream.cbc = mode == EVP_CIPH_CBC_MODE ?
527 (cbc128_f)vpaes_cbc_encrypt : NULL;
531 ret = AES_set_decrypt_key(key, ctx->key_len * 8,
533 dat->block = (block128_f)AES_decrypt;
534 dat->stream.cbc = mode == EVP_CIPH_CBC_MODE ?
535 (cbc128_f)AES_cbc_encrypt : NULL;
538 if (BSAES_CAPABLE && mode == EVP_CIPH_CTR_MODE) {
539 ret = AES_set_encrypt_key(key, ctx->key_len * 8,
541 dat->block = (block128_f)AES_encrypt;
542 dat->stream.ctr = (ctr128_f)bsaes_ctr32_encrypt_blocks;
547 ret = vpaes_set_encrypt_key(key, ctx->key_len * 8,
549 dat->block = (block128_f)vpaes_encrypt;
550 dat->stream.cbc = mode == EVP_CIPH_CBC_MODE ?
551 (cbc128_f)vpaes_cbc_encrypt : NULL;
555 ret = AES_set_encrypt_key(key, ctx->key_len * 8,
557 dat->block = (block128_f)AES_encrypt;
558 dat->stream.cbc = mode == EVP_CIPH_CBC_MODE ?
559 (cbc128_f)AES_cbc_encrypt : NULL;
561 if (mode == EVP_CIPH_CTR_MODE)
562 dat->stream.ctr = (ctr128_f)AES_ctr32_encrypt;
567 EVPerror(EVP_R_AES_KEY_SETUP_FAILED);
575 aes_cbc_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
576 const unsigned char *in, size_t len)
578 EVP_AES_KEY *dat = (EVP_AES_KEY *)ctx->cipher_data;
581 (*dat->stream.cbc)(in, out, len, &dat->ks, ctx->iv,
583 else if (ctx->encrypt)
584 CRYPTO_cbc128_encrypt(in, out, len, &dat->ks, ctx->iv,
587 CRYPTO_cbc128_decrypt(in, out, len, &dat->ks, ctx->iv,
594 aes_ecb_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
595 const unsigned char *in, size_t len)
597 size_t bl = ctx->cipher->block_size;
599 EVP_AES_KEY *dat = (EVP_AES_KEY *)ctx->cipher_data;
604 for (i = 0, len -= bl; i <= len; i += bl)
605 (*dat->block)(in + i, out + i, &dat->ks);
611 aes_ofb_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
612 const unsigned char *in, size_t len)
614 EVP_AES_KEY *dat = (EVP_AES_KEY *)ctx->cipher_data;
616 CRYPTO_ofb128_encrypt(in, out, len, &dat->ks, ctx->iv, &ctx->num,
622 aes_cfb_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
623 const unsigned char *in, size_t len)
625 EVP_AES_KEY *dat = (EVP_AES_KEY *)ctx->cipher_data;
627 CRYPTO_cfb128_encrypt(in, out, len, &dat->ks, ctx->iv, &ctx->num,
628 ctx->encrypt, dat->block);
633 aes_cfb8_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
634 const unsigned char *in, size_t len)
636 EVP_AES_KEY *dat = (EVP_AES_KEY *)ctx->cipher_data;
638 CRYPTO_cfb128_8_encrypt(in, out, len, &dat->ks, ctx->iv, &ctx->num,
639 ctx->encrypt, dat->block);
644 aes_cfb1_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
645 const unsigned char *in, size_t len)
647 EVP_AES_KEY *dat = (EVP_AES_KEY *)ctx->cipher_data;
649 if (ctx->flags&EVP_CIPH_FLAG_LENGTH_BITS) {
650 CRYPTO_cfb128_1_encrypt(in, out, len, &dat->ks, ctx->iv,
651 &ctx->num, ctx->encrypt, dat->block);
655 while (len >= MAXBITCHUNK) {
656 CRYPTO_cfb128_1_encrypt(in, out, MAXBITCHUNK*8, &dat->ks,
657 ctx->iv, &ctx->num, ctx->encrypt, dat->block);
661 CRYPTO_cfb128_1_encrypt(in, out, len*8, &dat->ks,
662 ctx->iv, &ctx->num, ctx->encrypt, dat->block);
667 static int aes_ctr_cipher (EVP_CIPHER_CTX *ctx, unsigned char *out,
668 const unsigned char *in, size_t len)
670 unsigned int num = ctx->num;
671 EVP_AES_KEY *dat = (EVP_AES_KEY *)ctx->cipher_data;
674 CRYPTO_ctr128_encrypt_ctr32(in, out, len, &dat->ks,
675 ctx->iv, ctx->buf, &num, dat->stream.ctr);
677 CRYPTO_ctr128_encrypt(in, out, len, &dat->ks,
678 ctx->iv, ctx->buf, &num, dat->block);
679 ctx->num = (size_t)num;
683 BLOCK_CIPHER_generic_pack(NID_aes, 128, EVP_CIPH_FLAG_FIPS)
684 BLOCK_CIPHER_generic_pack(NID_aes, 192, EVP_CIPH_FLAG_FIPS)
685 BLOCK_CIPHER_generic_pack(NID_aes, 256, EVP_CIPH_FLAG_FIPS)
688 aes_gcm_cleanup(EVP_CIPHER_CTX *c)
690 EVP_AES_GCM_CTX *gctx = c->cipher_data;
692 if (gctx->iv != c->iv)
694 explicit_bzero(gctx, sizeof(*gctx));
698 /* increment counter (64-bit int) by 1 */
700 ctr64_inc(unsigned char *counter)
716 aes_gcm_ctrl(EVP_CIPHER_CTX *c, int type, int arg, void *ptr)
718 EVP_AES_GCM_CTX *gctx = c->cipher_data;
724 gctx->ivlen = c->cipher->iv_len;
728 gctx->tls_aad_len = -1;
731 case EVP_CTRL_GCM_SET_IVLEN:
734 /* Allocate memory for IV if needed */
735 if ((arg > EVP_MAX_IV_LENGTH) && (arg > gctx->ivlen)) {
736 if (gctx->iv != c->iv)
738 gctx->iv = malloc(arg);
745 case EVP_CTRL_GCM_SET_TAG:
746 if (arg <= 0 || arg > 16 || c->encrypt)
748 memcpy(c->buf, ptr, arg);
752 case EVP_CTRL_GCM_GET_TAG:
753 if (arg <= 0 || arg > 16 || !c->encrypt || gctx->taglen < 0)
755 memcpy(ptr, c->buf, arg);
758 case EVP_CTRL_GCM_SET_IV_FIXED:
759 /* Special case: -1 length restores whole IV */
761 memcpy(gctx->iv, ptr, gctx->ivlen);
765 /* Fixed field must be at least 4 bytes and invocation field
768 if ((arg < 4) || (gctx->ivlen - arg) < 8)
771 memcpy(gctx->iv, ptr, arg);
773 arc4random_buf(gctx->iv + arg, gctx->ivlen - arg);
777 case EVP_CTRL_GCM_IV_GEN:
778 if (gctx->iv_gen == 0 || gctx->key_set == 0)
780 CRYPTO_gcm128_setiv(&gctx->gcm, gctx->iv, gctx->ivlen);
781 if (arg <= 0 || arg > gctx->ivlen)
783 memcpy(ptr, gctx->iv + gctx->ivlen - arg, arg);
784 /* Invocation field will be at least 8 bytes in size and
785 * so no need to check wrap around or increment more than
788 ctr64_inc(gctx->iv + gctx->ivlen - 8);
792 case EVP_CTRL_GCM_SET_IV_INV:
793 if (gctx->iv_gen == 0 || gctx->key_set == 0 || c->encrypt)
795 memcpy(gctx->iv + gctx->ivlen - arg, ptr, arg);
796 CRYPTO_gcm128_setiv(&gctx->gcm, gctx->iv, gctx->ivlen);
800 case EVP_CTRL_AEAD_TLS1_AAD:
801 /* Save the AAD for later use */
804 memcpy(c->buf, ptr, arg);
805 gctx->tls_aad_len = arg;
807 unsigned int len = c->buf[arg - 2] << 8 |
810 /* Correct length for explicit IV */
811 if (len < EVP_GCM_TLS_EXPLICIT_IV_LEN)
813 len -= EVP_GCM_TLS_EXPLICIT_IV_LEN;
815 /* If decrypting correct for tag too */
817 if (len < EVP_GCM_TLS_TAG_LEN)
819 len -= EVP_GCM_TLS_TAG_LEN;
821 c->buf[arg - 2] = len >> 8;
822 c->buf[arg - 1] = len & 0xff;
824 /* Extra padding: tag appended to record */
825 return EVP_GCM_TLS_TAG_LEN;
829 EVP_CIPHER_CTX *out = ptr;
830 EVP_AES_GCM_CTX *gctx_out = out->cipher_data;
833 if (gctx->gcm.key != &gctx->ks)
835 gctx_out->gcm.key = &gctx_out->ks;
837 if (gctx->iv == c->iv)
838 gctx_out->iv = out->iv;
840 gctx_out->iv = malloc(gctx->ivlen);
843 memcpy(gctx_out->iv, gctx->iv, gctx->ivlen);
855 aes_gcm_set_key(AES_KEY *aes_key, GCM128_CONTEXT *gcm_ctx,
856 const unsigned char *key, size_t key_len)
860 AES_set_encrypt_key(key, key_len * 8, aes_key);
861 CRYPTO_gcm128_init(gcm_ctx, aes_key, (block128_f)AES_encrypt);
862 return (ctr128_f)bsaes_ctr32_encrypt_blocks;
867 vpaes_set_encrypt_key(key, key_len * 8, aes_key);
868 CRYPTO_gcm128_init(gcm_ctx, aes_key, (block128_f)vpaes_encrypt);
872 (void)0; /* terminate potentially open 'else' */
874 AES_set_encrypt_key(key, key_len * 8, aes_key);
875 CRYPTO_gcm128_init(gcm_ctx, aes_key, (block128_f)AES_encrypt);
877 return (ctr128_f)AES_ctr32_encrypt;
884 aes_gcm_init_key(EVP_CIPHER_CTX *ctx, const unsigned char *key,
885 const unsigned char *iv, int enc)
887 EVP_AES_GCM_CTX *gctx = ctx->cipher_data;
892 gctx->ctr = aes_gcm_set_key(&gctx->ks, &gctx->gcm,
895 /* If we have an iv can set it directly, otherwise use
898 if (iv == NULL && gctx->iv_set)
901 CRYPTO_gcm128_setiv(&gctx->gcm, iv, gctx->ivlen);
906 /* If key set use IV, otherwise copy */
908 CRYPTO_gcm128_setiv(&gctx->gcm, iv, gctx->ivlen);
910 memcpy(gctx->iv, iv, gctx->ivlen);
917 /* Handle TLS GCM packet format. This consists of the last portion of the IV
918 * followed by the payload and finally the tag. On encrypt generate IV,
919 * encrypt payload and write the tag. On verify retrieve IV, decrypt payload
924 aes_gcm_tls_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
925 const unsigned char *in, size_t len)
927 EVP_AES_GCM_CTX *gctx = ctx->cipher_data;
930 /* Encrypt/decrypt must be performed in place */
932 len < (EVP_GCM_TLS_EXPLICIT_IV_LEN + EVP_GCM_TLS_TAG_LEN))
935 /* Set IV from start of buffer or generate IV and write to start
938 if (EVP_CIPHER_CTX_ctrl(ctx, ctx->encrypt ?
939 EVP_CTRL_GCM_IV_GEN : EVP_CTRL_GCM_SET_IV_INV,
940 EVP_GCM_TLS_EXPLICIT_IV_LEN, out) <= 0)
944 if (CRYPTO_gcm128_aad(&gctx->gcm, ctx->buf, gctx->tls_aad_len))
947 /* Fix buffer and length to point to payload */
948 in += EVP_GCM_TLS_EXPLICIT_IV_LEN;
949 out += EVP_GCM_TLS_EXPLICIT_IV_LEN;
950 len -= EVP_GCM_TLS_EXPLICIT_IV_LEN + EVP_GCM_TLS_TAG_LEN;
952 /* Encrypt payload */
954 if (CRYPTO_gcm128_encrypt_ctr32(&gctx->gcm, in, out,
958 if (CRYPTO_gcm128_encrypt(&gctx->gcm, in, out, len))
963 /* Finally write tag */
964 CRYPTO_gcm128_tag(&gctx->gcm, out, EVP_GCM_TLS_TAG_LEN);
965 rv = len + EVP_GCM_TLS_EXPLICIT_IV_LEN + EVP_GCM_TLS_TAG_LEN;
969 if (CRYPTO_gcm128_decrypt_ctr32(&gctx->gcm, in, out,
973 if (CRYPTO_gcm128_decrypt(&gctx->gcm, in, out, len))
977 CRYPTO_gcm128_tag(&gctx->gcm, ctx->buf, EVP_GCM_TLS_TAG_LEN);
979 /* If tag mismatch wipe buffer */
980 if (memcmp(ctx->buf, in + len, EVP_GCM_TLS_TAG_LEN)) {
981 explicit_bzero(out, len);
989 gctx->tls_aad_len = -1;
994 aes_gcm_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
995 const unsigned char *in, size_t len)
997 EVP_AES_GCM_CTX *gctx = ctx->cipher_data;
999 /* If not set up, return error */
1003 if (gctx->tls_aad_len >= 0)
1004 return aes_gcm_tls_cipher(ctx, out, in, len);
1011 if (CRYPTO_gcm128_aad(&gctx->gcm, in, len))
1013 } else if (ctx->encrypt) {
1015 if (CRYPTO_gcm128_encrypt_ctr32(&gctx->gcm,
1016 in, out, len, gctx->ctr))
1019 if (CRYPTO_gcm128_encrypt(&gctx->gcm,
1025 if (CRYPTO_gcm128_decrypt_ctr32(&gctx->gcm,
1026 in, out, len, gctx->ctr))
1029 if (CRYPTO_gcm128_decrypt(&gctx->gcm,
1036 if (!ctx->encrypt) {
1037 if (gctx->taglen < 0)
1039 if (CRYPTO_gcm128_finish(&gctx->gcm, ctx->buf,
1045 CRYPTO_gcm128_tag(&gctx->gcm, ctx->buf, 16);
1048 /* Don't reuse the IV */
1055 #define CUSTOM_FLAGS \
1056 ( EVP_CIPH_FLAG_DEFAULT_ASN1 | EVP_CIPH_CUSTOM_IV | \
1057 EVP_CIPH_FLAG_CUSTOM_CIPHER | EVP_CIPH_ALWAYS_CALL_INIT | \
1058 EVP_CIPH_CTRL_INIT | EVP_CIPH_CUSTOM_COPY )
1060 BLOCK_CIPHER_custom(NID_aes, 128, 1, 12, gcm, GCM,
1061 EVP_CIPH_FLAG_FIPS|EVP_CIPH_FLAG_AEAD_CIPHER|CUSTOM_FLAGS)
1062 BLOCK_CIPHER_custom(NID_aes, 192, 1, 12, gcm, GCM,
1063 EVP_CIPH_FLAG_FIPS|EVP_CIPH_FLAG_AEAD_CIPHER|CUSTOM_FLAGS)
1064 BLOCK_CIPHER_custom(NID_aes, 256, 1, 12, gcm, GCM,
1065 EVP_CIPH_FLAG_FIPS|EVP_CIPH_FLAG_AEAD_CIPHER|CUSTOM_FLAGS)
1068 aes_xts_ctrl(EVP_CIPHER_CTX *c, int type, int arg, void *ptr)
1070 EVP_AES_XTS_CTX *xctx = c->cipher_data;
1075 * key1 and key2 are used as an indicator both key and IV
1078 xctx->xts.key1 = NULL;
1079 xctx->xts.key2 = NULL;
1084 EVP_CIPHER_CTX *out = ptr;
1085 EVP_AES_XTS_CTX *xctx_out = out->cipher_data;
1087 if (xctx->xts.key1) {
1088 if (xctx->xts.key1 != &xctx->ks1)
1090 xctx_out->xts.key1 = &xctx_out->ks1;
1092 if (xctx->xts.key2) {
1093 if (xctx->xts.key2 != &xctx->ks2)
1095 xctx_out->xts.key2 = &xctx_out->ks2;
1104 aes_xts_init_key(EVP_CIPHER_CTX *ctx, const unsigned char *key,
1105 const unsigned char *iv, int enc)
1107 EVP_AES_XTS_CTX *xctx = ctx->cipher_data;
1114 xctx->stream = enc ? AES_xts_encrypt : AES_xts_decrypt;
1116 xctx->stream = NULL;
1118 /* key_len is two AES keys */
1119 #ifdef BSAES_CAPABLE
1121 xctx->stream = enc ? bsaes_xts_encrypt :
1125 #ifdef VPAES_CAPABLE
1126 if (VPAES_CAPABLE) {
1128 vpaes_set_encrypt_key(key, ctx->key_len * 4,
1130 xctx->xts.block1 = (block128_f)vpaes_encrypt;
1132 vpaes_set_decrypt_key(key, ctx->key_len * 4,
1134 xctx->xts.block1 = (block128_f)vpaes_decrypt;
1137 vpaes_set_encrypt_key(key + ctx->key_len / 2,
1138 ctx->key_len * 4, &xctx->ks2);
1139 xctx->xts.block2 = (block128_f)vpaes_encrypt;
1141 xctx->xts.key1 = &xctx->ks1;
1145 (void)0; /* terminate potentially open 'else' */
1148 AES_set_encrypt_key(key, ctx->key_len * 4, &xctx->ks1);
1149 xctx->xts.block1 = (block128_f)AES_encrypt;
1151 AES_set_decrypt_key(key, ctx->key_len * 4, &xctx->ks1);
1152 xctx->xts.block1 = (block128_f)AES_decrypt;
1155 AES_set_encrypt_key(key + ctx->key_len / 2,
1156 ctx->key_len * 4, &xctx->ks2);
1157 xctx->xts.block2 = (block128_f)AES_encrypt;
1159 xctx->xts.key1 = &xctx->ks1;
1163 xctx->xts.key2 = &xctx->ks2;
1164 memcpy(ctx->iv, iv, 16);
1171 aes_xts_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
1172 const unsigned char *in, size_t len)
1174 EVP_AES_XTS_CTX *xctx = ctx->cipher_data;
1176 if (!xctx->xts.key1 || !xctx->xts.key2)
1178 if (!out || !in || len < AES_BLOCK_SIZE)
1182 (*xctx->stream)(in, out, len, xctx->xts.key1, xctx->xts.key2,
1184 else if (CRYPTO_xts128_encrypt(&xctx->xts, ctx->iv, in, out, len,
1190 #define aes_xts_cleanup NULL
1193 ( EVP_CIPH_FLAG_DEFAULT_ASN1 | EVP_CIPH_CUSTOM_IV | \
1194 EVP_CIPH_ALWAYS_CALL_INIT | EVP_CIPH_CTRL_INIT | EVP_CIPH_CUSTOM_COPY )
1196 BLOCK_CIPHER_custom(NID_aes, 128, 1, 16, xts, XTS, EVP_CIPH_FLAG_FIPS|XTS_FLAGS)
1197 BLOCK_CIPHER_custom(NID_aes, 256, 1, 16, xts, XTS, EVP_CIPH_FLAG_FIPS|XTS_FLAGS)
1200 aes_ccm_ctrl(EVP_CIPHER_CTX *c, int type, int arg, void *ptr)
1202 EVP_AES_CCM_CTX *cctx = c->cipher_data;
1214 case EVP_CTRL_CCM_SET_IVLEN:
1217 case EVP_CTRL_CCM_SET_L:
1218 if (arg < 2 || arg > 8)
1223 case EVP_CTRL_CCM_SET_TAG:
1224 if ((arg & 1) || arg < 4 || arg > 16)
1226 if ((c->encrypt && ptr) || (!c->encrypt && !ptr))
1230 memcpy(c->buf, ptr, arg);
1235 case EVP_CTRL_CCM_GET_TAG:
1236 if (!c->encrypt || !cctx->tag_set)
1238 if (!CRYPTO_ccm128_tag(&cctx->ccm, ptr, (size_t)arg))
1247 EVP_CIPHER_CTX *out = ptr;
1248 EVP_AES_CCM_CTX *cctx_out = out->cipher_data;
1250 if (cctx->ccm.key) {
1251 if (cctx->ccm.key != &cctx->ks)
1253 cctx_out->ccm.key = &cctx_out->ks;
1264 aes_ccm_init_key(EVP_CIPHER_CTX *ctx, const unsigned char *key,
1265 const unsigned char *iv, int enc)
1267 EVP_AES_CCM_CTX *cctx = ctx->cipher_data;
1272 #ifdef VPAES_CAPABLE
1273 if (VPAES_CAPABLE) {
1274 vpaes_set_encrypt_key(key, ctx->key_len*8, &cctx->ks);
1275 CRYPTO_ccm128_init(&cctx->ccm, cctx->M, cctx->L,
1276 &cctx->ks, (block128_f)vpaes_encrypt);
1282 AES_set_encrypt_key(key, ctx->key_len * 8, &cctx->ks);
1283 CRYPTO_ccm128_init(&cctx->ccm, cctx->M, cctx->L,
1284 &cctx->ks, (block128_f)AES_encrypt);
1289 memcpy(ctx->iv, iv, 15 - cctx->L);
1296 aes_ccm_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
1297 const unsigned char *in, size_t len)
1299 EVP_AES_CCM_CTX *cctx = ctx->cipher_data;
1300 CCM128_CONTEXT *ccm = &cctx->ccm;
1302 /* If not set up, return error */
1303 if (!cctx->iv_set && !cctx->key_set)
1305 if (!ctx->encrypt && !cctx->tag_set)
1310 if (CRYPTO_ccm128_setiv(ccm, ctx->iv, 15 - cctx->L,
1316 /* If have AAD need message length */
1317 if (!cctx->len_set && len)
1319 CRYPTO_ccm128_aad(ccm, in, len);
1322 /* EVP_*Final() doesn't return any data */
1325 /* If not set length yet do it */
1326 if (!cctx->len_set) {
1327 if (CRYPTO_ccm128_setiv(ccm, ctx->iv, 15 - cctx->L, len))
1332 if (cctx->str ? CRYPTO_ccm128_encrypt_ccm64(ccm, in, out, len,
1333 cctx->str) : CRYPTO_ccm128_encrypt(ccm, in, out, len))
1339 if (cctx->str ? !CRYPTO_ccm128_decrypt_ccm64(ccm, in, out, len,
1340 cctx->str) : !CRYPTO_ccm128_decrypt(ccm, in, out, len)) {
1341 unsigned char tag[16];
1342 if (CRYPTO_ccm128_tag(ccm, tag, cctx->M)) {
1343 if (!memcmp(tag, ctx->buf, cctx->M))
1348 explicit_bzero(out, len);
1357 #define aes_ccm_cleanup NULL
1359 BLOCK_CIPHER_custom(NID_aes, 128, 1, 12, ccm, CCM,
1360 EVP_CIPH_FLAG_FIPS|CUSTOM_FLAGS)
1361 BLOCK_CIPHER_custom(NID_aes, 192, 1, 12, ccm, CCM,
1362 EVP_CIPH_FLAG_FIPS|CUSTOM_FLAGS)
1363 BLOCK_CIPHER_custom(NID_aes, 256, 1, 12, ccm, CCM,
1364 EVP_CIPH_FLAG_FIPS|CUSTOM_FLAGS)
1366 #define EVP_AEAD_AES_GCM_TAG_LEN 16
1368 struct aead_aes_gcm_ctx {
1375 unsigned char tag_len;
1379 aead_aes_gcm_init(EVP_AEAD_CTX *ctx, const unsigned char *key, size_t key_len,
1382 struct aead_aes_gcm_ctx *gcm_ctx;
1383 const size_t key_bits = key_len * 8;
1385 /* EVP_AEAD_CTX_init should catch this. */
1386 if (key_bits != 128 && key_bits != 256) {
1387 EVPerror(EVP_R_BAD_KEY_LENGTH);
1391 if (tag_len == EVP_AEAD_DEFAULT_TAG_LENGTH)
1392 tag_len = EVP_AEAD_AES_GCM_TAG_LEN;
1394 if (tag_len > EVP_AEAD_AES_GCM_TAG_LEN) {
1395 EVPerror(EVP_R_TAG_TOO_LARGE);
1399 gcm_ctx = malloc(sizeof(struct aead_aes_gcm_ctx));
1400 if (gcm_ctx == NULL)
1403 #ifdef AESNI_CAPABLE
1404 if (AESNI_CAPABLE) {
1405 aesni_set_encrypt_key(key, key_bits, &gcm_ctx->ks.ks);
1406 CRYPTO_gcm128_init(&gcm_ctx->gcm, &gcm_ctx->ks.ks,
1407 (block128_f)aesni_encrypt);
1408 gcm_ctx->ctr = (ctr128_f) aesni_ctr32_encrypt_blocks;
1412 gcm_ctx->ctr = aes_gcm_set_key(&gcm_ctx->ks.ks, &gcm_ctx->gcm,
1415 gcm_ctx->tag_len = tag_len;
1416 ctx->aead_state = gcm_ctx;
1422 aead_aes_gcm_cleanup(EVP_AEAD_CTX *ctx)
1424 struct aead_aes_gcm_ctx *gcm_ctx = ctx->aead_state;
1426 freezero(gcm_ctx, sizeof(*gcm_ctx));
1430 aead_aes_gcm_seal(const EVP_AEAD_CTX *ctx, unsigned char *out, size_t *out_len,
1431 size_t max_out_len, const unsigned char *nonce, size_t nonce_len,
1432 const unsigned char *in, size_t in_len, const unsigned char *ad,
1435 const struct aead_aes_gcm_ctx *gcm_ctx = ctx->aead_state;
1439 if (max_out_len < in_len + gcm_ctx->tag_len) {
1440 EVPerror(EVP_R_BUFFER_TOO_SMALL);
1444 memcpy(&gcm, &gcm_ctx->gcm, sizeof(gcm));
1445 CRYPTO_gcm128_setiv(&gcm, nonce, nonce_len);
1447 if (ad_len > 0 && CRYPTO_gcm128_aad(&gcm, ad, ad_len))
1451 if (CRYPTO_gcm128_encrypt_ctr32(&gcm, in + bulk, out + bulk,
1452 in_len - bulk, gcm_ctx->ctr))
1455 if (CRYPTO_gcm128_encrypt(&gcm, in + bulk, out + bulk,
1460 CRYPTO_gcm128_tag(&gcm, out + in_len, gcm_ctx->tag_len);
1461 *out_len = in_len + gcm_ctx->tag_len;
1467 aead_aes_gcm_open(const EVP_AEAD_CTX *ctx, unsigned char *out, size_t *out_len,
1468 size_t max_out_len, const unsigned char *nonce, size_t nonce_len,
1469 const unsigned char *in, size_t in_len, const unsigned char *ad,
1472 const struct aead_aes_gcm_ctx *gcm_ctx = ctx->aead_state;
1473 unsigned char tag[EVP_AEAD_AES_GCM_TAG_LEN];
1475 size_t plaintext_len;
1478 if (in_len < gcm_ctx->tag_len) {
1479 EVPerror(EVP_R_BAD_DECRYPT);
1483 plaintext_len = in_len - gcm_ctx->tag_len;
1485 if (max_out_len < plaintext_len) {
1486 EVPerror(EVP_R_BUFFER_TOO_SMALL);
1490 memcpy(&gcm, &gcm_ctx->gcm, sizeof(gcm));
1491 CRYPTO_gcm128_setiv(&gcm, nonce, nonce_len);
1493 if (CRYPTO_gcm128_aad(&gcm, ad, ad_len))
1497 if (CRYPTO_gcm128_decrypt_ctr32(&gcm, in + bulk, out + bulk,
1498 in_len - bulk - gcm_ctx->tag_len, gcm_ctx->ctr))
1501 if (CRYPTO_gcm128_decrypt(&gcm, in + bulk, out + bulk,
1502 in_len - bulk - gcm_ctx->tag_len))
1506 CRYPTO_gcm128_tag(&gcm, tag, gcm_ctx->tag_len);
1507 if (timingsafe_memcmp(tag, in + plaintext_len, gcm_ctx->tag_len) != 0) {
1508 EVPerror(EVP_R_BAD_DECRYPT);
1512 *out_len = plaintext_len;
1517 static const EVP_AEAD aead_aes_128_gcm = {
1520 .overhead = EVP_AEAD_AES_GCM_TAG_LEN,
1521 .max_tag_len = EVP_AEAD_AES_GCM_TAG_LEN,
1523 .init = aead_aes_gcm_init,
1524 .cleanup = aead_aes_gcm_cleanup,
1525 .seal = aead_aes_gcm_seal,
1526 .open = aead_aes_gcm_open,
1529 static const EVP_AEAD aead_aes_256_gcm = {
1532 .overhead = EVP_AEAD_AES_GCM_TAG_LEN,
1533 .max_tag_len = EVP_AEAD_AES_GCM_TAG_LEN,
1535 .init = aead_aes_gcm_init,
1536 .cleanup = aead_aes_gcm_cleanup,
1537 .seal = aead_aes_gcm_seal,
1538 .open = aead_aes_gcm_open,
1542 EVP_aead_aes_128_gcm(void)
1544 return &aead_aes_128_gcm;
1548 EVP_aead_aes_256_gcm(void)
1550 return &aead_aes_256_gcm;
1562 aes_wrap_init_key(EVP_CIPHER_CTX *ctx, const unsigned char *key,
1563 const unsigned char *iv, int enc)
1565 EVP_AES_WRAP_CTX *wctx = (EVP_AES_WRAP_CTX *)ctx->cipher_data;
1567 if (iv == NULL && key == NULL)
1572 AES_set_encrypt_key(key, 8 * ctx->key_len,
1575 AES_set_decrypt_key(key, 8 * ctx->key_len,
1583 memcpy(ctx->iv, iv, EVP_CIPHER_CTX_iv_length(ctx));
1591 aes_wrap_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
1592 const unsigned char *in, size_t inlen)
1594 EVP_AES_WRAP_CTX *wctx = ctx->cipher_data;
1602 if (ctx->encrypt && inlen < 8)
1604 if (!ctx->encrypt && inlen < 16)
1606 if (inlen > INT_MAX)
1617 ret = AES_wrap_key(&wctx->ks.ks, wctx->iv, out, in,
1618 (unsigned int)inlen);
1620 ret = AES_unwrap_key(&wctx->ks.ks, wctx->iv, out, in,
1621 (unsigned int)inlen);
1623 return ret != 0 ? ret : -1;
1626 #define WRAP_FLAGS \
1627 ( EVP_CIPH_WRAP_MODE | EVP_CIPH_CUSTOM_IV | EVP_CIPH_FLAG_CUSTOM_CIPHER | \
1628 EVP_CIPH_ALWAYS_CALL_INIT | EVP_CIPH_FLAG_DEFAULT_ASN1 )
1630 static const EVP_CIPHER aes_128_wrap = {
1631 .nid = NID_id_aes128_wrap,
1635 .flags = WRAP_FLAGS,
1636 .init = aes_wrap_init_key,
1637 .do_cipher = aes_wrap_cipher,
1639 .ctx_size = sizeof(EVP_AES_WRAP_CTX),
1640 .set_asn1_parameters = NULL,
1641 .get_asn1_parameters = NULL,
1647 EVP_aes_128_wrap(void)
1649 return &aes_128_wrap;
1652 static const EVP_CIPHER aes_192_wrap = {
1653 .nid = NID_id_aes192_wrap,
1657 .flags = WRAP_FLAGS,
1658 .init = aes_wrap_init_key,
1659 .do_cipher = aes_wrap_cipher,
1661 .ctx_size = sizeof(EVP_AES_WRAP_CTX),
1662 .set_asn1_parameters = NULL,
1663 .get_asn1_parameters = NULL,
1669 EVP_aes_192_wrap(void)
1671 return &aes_192_wrap;
1674 static const EVP_CIPHER aes_256_wrap = {
1675 .nid = NID_id_aes256_wrap,
1679 .flags = WRAP_FLAGS,
1680 .init = aes_wrap_init_key,
1681 .do_cipher = aes_wrap_cipher,
1683 .ctx_size = sizeof(EVP_AES_WRAP_CTX),
1684 .set_asn1_parameters = NULL,
1685 .get_asn1_parameters = NULL,
1691 EVP_aes_256_wrap(void)
1693 return &aes_256_wrap;