1 /* $OpenBSD: e_aes.c,v 1.42 2020/06/05 18:44:42 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 if (c->cipher->iv_len == 0) {
725 EVPerror(EVP_R_INVALID_IV_LENGTH);
728 gctx->ivlen = c->cipher->iv_len;
732 gctx->tls_aad_len = -1;
735 case EVP_CTRL_GCM_SET_IVLEN:
738 /* Allocate memory for IV if needed */
739 if ((arg > EVP_MAX_IV_LENGTH) && (arg > gctx->ivlen)) {
740 if (gctx->iv != c->iv)
742 gctx->iv = malloc(arg);
749 case EVP_CTRL_GCM_SET_TAG:
750 if (arg <= 0 || arg > 16 || c->encrypt)
752 memcpy(c->buf, ptr, arg);
756 case EVP_CTRL_GCM_GET_TAG:
757 if (arg <= 0 || arg > 16 || !c->encrypt || gctx->taglen < 0)
759 memcpy(ptr, c->buf, arg);
762 case EVP_CTRL_GCM_SET_IV_FIXED:
763 /* Special case: -1 length restores whole IV */
765 memcpy(gctx->iv, ptr, gctx->ivlen);
769 /* Fixed field must be at least 4 bytes and invocation field
772 if ((arg < 4) || (gctx->ivlen - arg) < 8)
775 memcpy(gctx->iv, ptr, arg);
777 arc4random_buf(gctx->iv + arg, gctx->ivlen - arg);
781 case EVP_CTRL_GCM_IV_GEN:
782 if (gctx->iv_gen == 0 || gctx->key_set == 0)
784 CRYPTO_gcm128_setiv(&gctx->gcm, gctx->iv, gctx->ivlen);
785 if (arg <= 0 || arg > gctx->ivlen)
787 memcpy(ptr, gctx->iv + gctx->ivlen - arg, arg);
788 /* Invocation field will be at least 8 bytes in size and
789 * so no need to check wrap around or increment more than
792 ctr64_inc(gctx->iv + gctx->ivlen - 8);
796 case EVP_CTRL_GCM_SET_IV_INV:
797 if (gctx->iv_gen == 0 || gctx->key_set == 0 || c->encrypt)
799 memcpy(gctx->iv + gctx->ivlen - arg, ptr, arg);
800 CRYPTO_gcm128_setiv(&gctx->gcm, gctx->iv, gctx->ivlen);
804 case EVP_CTRL_AEAD_TLS1_AAD:
805 /* Save the AAD for later use */
808 memcpy(c->buf, ptr, arg);
809 gctx->tls_aad_len = arg;
811 unsigned int len = c->buf[arg - 2] << 8 |
814 /* Correct length for explicit IV */
815 if (len < EVP_GCM_TLS_EXPLICIT_IV_LEN)
817 len -= EVP_GCM_TLS_EXPLICIT_IV_LEN;
819 /* If decrypting correct for tag too */
821 if (len < EVP_GCM_TLS_TAG_LEN)
823 len -= EVP_GCM_TLS_TAG_LEN;
825 c->buf[arg - 2] = len >> 8;
826 c->buf[arg - 1] = len & 0xff;
828 /* Extra padding: tag appended to record */
829 return EVP_GCM_TLS_TAG_LEN;
833 EVP_CIPHER_CTX *out = ptr;
834 EVP_AES_GCM_CTX *gctx_out = out->cipher_data;
837 if (gctx->gcm.key != &gctx->ks)
839 gctx_out->gcm.key = &gctx_out->ks;
842 if (gctx->iv == c->iv) {
843 gctx_out->iv = out->iv;
845 if ((gctx_out->iv = calloc(1, gctx->ivlen)) == NULL)
847 memcpy(gctx_out->iv, gctx->iv, gctx->ivlen);
859 aes_gcm_set_key(AES_KEY *aes_key, GCM128_CONTEXT *gcm_ctx,
860 const unsigned char *key, size_t key_len)
864 AES_set_encrypt_key(key, key_len * 8, aes_key);
865 CRYPTO_gcm128_init(gcm_ctx, aes_key, (block128_f)AES_encrypt);
866 return (ctr128_f)bsaes_ctr32_encrypt_blocks;
871 vpaes_set_encrypt_key(key, key_len * 8, aes_key);
872 CRYPTO_gcm128_init(gcm_ctx, aes_key, (block128_f)vpaes_encrypt);
876 (void)0; /* terminate potentially open 'else' */
878 AES_set_encrypt_key(key, key_len * 8, aes_key);
879 CRYPTO_gcm128_init(gcm_ctx, aes_key, (block128_f)AES_encrypt);
881 return (ctr128_f)AES_ctr32_encrypt;
888 aes_gcm_init_key(EVP_CIPHER_CTX *ctx, const unsigned char *key,
889 const unsigned char *iv, int enc)
891 EVP_AES_GCM_CTX *gctx = ctx->cipher_data;
896 gctx->ctr = aes_gcm_set_key(&gctx->ks, &gctx->gcm,
899 /* If we have an iv can set it directly, otherwise use
902 if (iv == NULL && gctx->iv_set)
905 CRYPTO_gcm128_setiv(&gctx->gcm, iv, gctx->ivlen);
910 /* If key set use IV, otherwise copy */
912 CRYPTO_gcm128_setiv(&gctx->gcm, iv, gctx->ivlen);
914 memcpy(gctx->iv, iv, gctx->ivlen);
921 /* Handle TLS GCM packet format. This consists of the last portion of the IV
922 * followed by the payload and finally the tag. On encrypt generate IV,
923 * encrypt payload and write the tag. On verify retrieve IV, decrypt payload
928 aes_gcm_tls_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
929 const unsigned char *in, size_t len)
931 EVP_AES_GCM_CTX *gctx = ctx->cipher_data;
934 /* Encrypt/decrypt must be performed in place */
936 len < (EVP_GCM_TLS_EXPLICIT_IV_LEN + EVP_GCM_TLS_TAG_LEN))
939 /* Set IV from start of buffer or generate IV and write to start
942 if (EVP_CIPHER_CTX_ctrl(ctx, ctx->encrypt ?
943 EVP_CTRL_GCM_IV_GEN : EVP_CTRL_GCM_SET_IV_INV,
944 EVP_GCM_TLS_EXPLICIT_IV_LEN, out) <= 0)
948 if (CRYPTO_gcm128_aad(&gctx->gcm, ctx->buf, gctx->tls_aad_len))
951 /* Fix buffer and length to point to payload */
952 in += EVP_GCM_TLS_EXPLICIT_IV_LEN;
953 out += EVP_GCM_TLS_EXPLICIT_IV_LEN;
954 len -= EVP_GCM_TLS_EXPLICIT_IV_LEN + EVP_GCM_TLS_TAG_LEN;
956 /* Encrypt payload */
958 if (CRYPTO_gcm128_encrypt_ctr32(&gctx->gcm, in, out,
962 if (CRYPTO_gcm128_encrypt(&gctx->gcm, in, out, len))
967 /* Finally write tag */
968 CRYPTO_gcm128_tag(&gctx->gcm, out, EVP_GCM_TLS_TAG_LEN);
969 rv = len + EVP_GCM_TLS_EXPLICIT_IV_LEN + EVP_GCM_TLS_TAG_LEN;
973 if (CRYPTO_gcm128_decrypt_ctr32(&gctx->gcm, in, out,
977 if (CRYPTO_gcm128_decrypt(&gctx->gcm, in, out, len))
981 CRYPTO_gcm128_tag(&gctx->gcm, ctx->buf, EVP_GCM_TLS_TAG_LEN);
983 /* If tag mismatch wipe buffer */
984 if (memcmp(ctx->buf, in + len, EVP_GCM_TLS_TAG_LEN)) {
985 explicit_bzero(out, len);
993 gctx->tls_aad_len = -1;
998 aes_gcm_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
999 const unsigned char *in, size_t len)
1001 EVP_AES_GCM_CTX *gctx = ctx->cipher_data;
1003 /* If not set up, return error */
1007 if (gctx->tls_aad_len >= 0)
1008 return aes_gcm_tls_cipher(ctx, out, in, len);
1015 if (CRYPTO_gcm128_aad(&gctx->gcm, in, len))
1017 } else if (ctx->encrypt) {
1019 if (CRYPTO_gcm128_encrypt_ctr32(&gctx->gcm,
1020 in, out, len, gctx->ctr))
1023 if (CRYPTO_gcm128_encrypt(&gctx->gcm,
1029 if (CRYPTO_gcm128_decrypt_ctr32(&gctx->gcm,
1030 in, out, len, gctx->ctr))
1033 if (CRYPTO_gcm128_decrypt(&gctx->gcm,
1040 if (!ctx->encrypt) {
1041 if (gctx->taglen < 0)
1043 if (CRYPTO_gcm128_finish(&gctx->gcm, ctx->buf,
1049 CRYPTO_gcm128_tag(&gctx->gcm, ctx->buf, 16);
1052 /* Don't reuse the IV */
1059 #define CUSTOM_FLAGS \
1060 ( EVP_CIPH_FLAG_DEFAULT_ASN1 | EVP_CIPH_CUSTOM_IV | \
1061 EVP_CIPH_FLAG_CUSTOM_CIPHER | EVP_CIPH_ALWAYS_CALL_INIT | \
1062 EVP_CIPH_CTRL_INIT | EVP_CIPH_CUSTOM_COPY )
1064 BLOCK_CIPHER_custom(NID_aes, 128, 1, 12, gcm, GCM,
1065 EVP_CIPH_FLAG_FIPS|EVP_CIPH_FLAG_AEAD_CIPHER|CUSTOM_FLAGS)
1066 BLOCK_CIPHER_custom(NID_aes, 192, 1, 12, gcm, GCM,
1067 EVP_CIPH_FLAG_FIPS|EVP_CIPH_FLAG_AEAD_CIPHER|CUSTOM_FLAGS)
1068 BLOCK_CIPHER_custom(NID_aes, 256, 1, 12, gcm, GCM,
1069 EVP_CIPH_FLAG_FIPS|EVP_CIPH_FLAG_AEAD_CIPHER|CUSTOM_FLAGS)
1072 aes_xts_ctrl(EVP_CIPHER_CTX *c, int type, int arg, void *ptr)
1074 EVP_AES_XTS_CTX *xctx = c->cipher_data;
1079 * key1 and key2 are used as an indicator both key and IV
1082 xctx->xts.key1 = NULL;
1083 xctx->xts.key2 = NULL;
1088 EVP_CIPHER_CTX *out = ptr;
1089 EVP_AES_XTS_CTX *xctx_out = out->cipher_data;
1091 if (xctx->xts.key1) {
1092 if (xctx->xts.key1 != &xctx->ks1)
1094 xctx_out->xts.key1 = &xctx_out->ks1;
1096 if (xctx->xts.key2) {
1097 if (xctx->xts.key2 != &xctx->ks2)
1099 xctx_out->xts.key2 = &xctx_out->ks2;
1108 aes_xts_init_key(EVP_CIPHER_CTX *ctx, const unsigned char *key,
1109 const unsigned char *iv, int enc)
1111 EVP_AES_XTS_CTX *xctx = ctx->cipher_data;
1118 xctx->stream = enc ? AES_xts_encrypt : AES_xts_decrypt;
1120 xctx->stream = NULL;
1122 /* key_len is two AES keys */
1123 #ifdef BSAES_CAPABLE
1125 xctx->stream = enc ? bsaes_xts_encrypt :
1129 #ifdef VPAES_CAPABLE
1130 if (VPAES_CAPABLE) {
1132 vpaes_set_encrypt_key(key, ctx->key_len * 4,
1134 xctx->xts.block1 = (block128_f)vpaes_encrypt;
1136 vpaes_set_decrypt_key(key, ctx->key_len * 4,
1138 xctx->xts.block1 = (block128_f)vpaes_decrypt;
1141 vpaes_set_encrypt_key(key + ctx->key_len / 2,
1142 ctx->key_len * 4, &xctx->ks2);
1143 xctx->xts.block2 = (block128_f)vpaes_encrypt;
1145 xctx->xts.key1 = &xctx->ks1;
1149 (void)0; /* terminate potentially open 'else' */
1152 AES_set_encrypt_key(key, ctx->key_len * 4, &xctx->ks1);
1153 xctx->xts.block1 = (block128_f)AES_encrypt;
1155 AES_set_decrypt_key(key, ctx->key_len * 4, &xctx->ks1);
1156 xctx->xts.block1 = (block128_f)AES_decrypt;
1159 AES_set_encrypt_key(key + ctx->key_len / 2,
1160 ctx->key_len * 4, &xctx->ks2);
1161 xctx->xts.block2 = (block128_f)AES_encrypt;
1163 xctx->xts.key1 = &xctx->ks1;
1167 xctx->xts.key2 = &xctx->ks2;
1168 memcpy(ctx->iv, iv, 16);
1175 aes_xts_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
1176 const unsigned char *in, size_t len)
1178 EVP_AES_XTS_CTX *xctx = ctx->cipher_data;
1180 if (!xctx->xts.key1 || !xctx->xts.key2)
1182 if (!out || !in || len < AES_BLOCK_SIZE)
1186 (*xctx->stream)(in, out, len, xctx->xts.key1, xctx->xts.key2,
1188 else if (CRYPTO_xts128_encrypt(&xctx->xts, ctx->iv, in, out, len,
1194 #define aes_xts_cleanup NULL
1197 ( EVP_CIPH_FLAG_DEFAULT_ASN1 | EVP_CIPH_CUSTOM_IV | \
1198 EVP_CIPH_ALWAYS_CALL_INIT | EVP_CIPH_CTRL_INIT | EVP_CIPH_CUSTOM_COPY )
1200 BLOCK_CIPHER_custom(NID_aes, 128, 1, 16, xts, XTS, EVP_CIPH_FLAG_FIPS|XTS_FLAGS)
1201 BLOCK_CIPHER_custom(NID_aes, 256, 1, 16, xts, XTS, EVP_CIPH_FLAG_FIPS|XTS_FLAGS)
1204 aes_ccm_ctrl(EVP_CIPHER_CTX *c, int type, int arg, void *ptr)
1206 EVP_AES_CCM_CTX *cctx = c->cipher_data;
1218 case EVP_CTRL_CCM_SET_IVLEN:
1221 case EVP_CTRL_CCM_SET_L:
1222 if (arg < 2 || arg > 8)
1227 case EVP_CTRL_CCM_SET_TAG:
1228 if ((arg & 1) || arg < 4 || arg > 16)
1230 if ((c->encrypt && ptr) || (!c->encrypt && !ptr))
1234 memcpy(c->buf, ptr, arg);
1239 case EVP_CTRL_CCM_GET_TAG:
1240 if (!c->encrypt || !cctx->tag_set)
1242 if (!CRYPTO_ccm128_tag(&cctx->ccm, ptr, (size_t)arg))
1251 EVP_CIPHER_CTX *out = ptr;
1252 EVP_AES_CCM_CTX *cctx_out = out->cipher_data;
1254 if (cctx->ccm.key) {
1255 if (cctx->ccm.key != &cctx->ks)
1257 cctx_out->ccm.key = &cctx_out->ks;
1268 aes_ccm_init_key(EVP_CIPHER_CTX *ctx, const unsigned char *key,
1269 const unsigned char *iv, int enc)
1271 EVP_AES_CCM_CTX *cctx = ctx->cipher_data;
1276 #ifdef VPAES_CAPABLE
1277 if (VPAES_CAPABLE) {
1278 vpaes_set_encrypt_key(key, ctx->key_len*8, &cctx->ks);
1279 CRYPTO_ccm128_init(&cctx->ccm, cctx->M, cctx->L,
1280 &cctx->ks, (block128_f)vpaes_encrypt);
1286 AES_set_encrypt_key(key, ctx->key_len * 8, &cctx->ks);
1287 CRYPTO_ccm128_init(&cctx->ccm, cctx->M, cctx->L,
1288 &cctx->ks, (block128_f)AES_encrypt);
1293 memcpy(ctx->iv, iv, 15 - cctx->L);
1300 aes_ccm_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
1301 const unsigned char *in, size_t len)
1303 EVP_AES_CCM_CTX *cctx = ctx->cipher_data;
1304 CCM128_CONTEXT *ccm = &cctx->ccm;
1306 /* If not set up, return error */
1307 if (!cctx->iv_set && !cctx->key_set)
1309 if (!ctx->encrypt && !cctx->tag_set)
1314 if (CRYPTO_ccm128_setiv(ccm, ctx->iv, 15 - cctx->L,
1320 /* If have AAD need message length */
1321 if (!cctx->len_set && len)
1323 CRYPTO_ccm128_aad(ccm, in, len);
1326 /* EVP_*Final() doesn't return any data */
1329 /* If not set length yet do it */
1330 if (!cctx->len_set) {
1331 if (CRYPTO_ccm128_setiv(ccm, ctx->iv, 15 - cctx->L, len))
1336 if (cctx->str ? CRYPTO_ccm128_encrypt_ccm64(ccm, in, out, len,
1337 cctx->str) : CRYPTO_ccm128_encrypt(ccm, in, out, len))
1343 if (cctx->str ? !CRYPTO_ccm128_decrypt_ccm64(ccm, in, out, len,
1344 cctx->str) : !CRYPTO_ccm128_decrypt(ccm, in, out, len)) {
1345 unsigned char tag[16];
1346 if (CRYPTO_ccm128_tag(ccm, tag, cctx->M)) {
1347 if (!memcmp(tag, ctx->buf, cctx->M))
1352 explicit_bzero(out, len);
1361 #define aes_ccm_cleanup NULL
1363 BLOCK_CIPHER_custom(NID_aes, 128, 1, 12, ccm, CCM,
1364 EVP_CIPH_FLAG_FIPS|CUSTOM_FLAGS)
1365 BLOCK_CIPHER_custom(NID_aes, 192, 1, 12, ccm, CCM,
1366 EVP_CIPH_FLAG_FIPS|CUSTOM_FLAGS)
1367 BLOCK_CIPHER_custom(NID_aes, 256, 1, 12, ccm, CCM,
1368 EVP_CIPH_FLAG_FIPS|CUSTOM_FLAGS)
1370 #define EVP_AEAD_AES_GCM_TAG_LEN 16
1372 struct aead_aes_gcm_ctx {
1379 unsigned char tag_len;
1383 aead_aes_gcm_init(EVP_AEAD_CTX *ctx, const unsigned char *key, size_t key_len,
1386 struct aead_aes_gcm_ctx *gcm_ctx;
1387 const size_t key_bits = key_len * 8;
1389 /* EVP_AEAD_CTX_init should catch this. */
1390 if (key_bits != 128 && key_bits != 256) {
1391 EVPerror(EVP_R_BAD_KEY_LENGTH);
1395 if (tag_len == EVP_AEAD_DEFAULT_TAG_LENGTH)
1396 tag_len = EVP_AEAD_AES_GCM_TAG_LEN;
1398 if (tag_len > EVP_AEAD_AES_GCM_TAG_LEN) {
1399 EVPerror(EVP_R_TAG_TOO_LARGE);
1403 if ((gcm_ctx = calloc(1, sizeof(struct aead_aes_gcm_ctx))) == NULL)
1406 #ifdef AESNI_CAPABLE
1407 if (AESNI_CAPABLE) {
1408 aesni_set_encrypt_key(key, key_bits, &gcm_ctx->ks.ks);
1409 CRYPTO_gcm128_init(&gcm_ctx->gcm, &gcm_ctx->ks.ks,
1410 (block128_f)aesni_encrypt);
1411 gcm_ctx->ctr = (ctr128_f) aesni_ctr32_encrypt_blocks;
1415 gcm_ctx->ctr = aes_gcm_set_key(&gcm_ctx->ks.ks, &gcm_ctx->gcm,
1418 gcm_ctx->tag_len = tag_len;
1419 ctx->aead_state = gcm_ctx;
1425 aead_aes_gcm_cleanup(EVP_AEAD_CTX *ctx)
1427 struct aead_aes_gcm_ctx *gcm_ctx = ctx->aead_state;
1429 freezero(gcm_ctx, sizeof(*gcm_ctx));
1433 aead_aes_gcm_seal(const EVP_AEAD_CTX *ctx, unsigned char *out, size_t *out_len,
1434 size_t max_out_len, const unsigned char *nonce, size_t nonce_len,
1435 const unsigned char *in, size_t in_len, const unsigned char *ad,
1438 const struct aead_aes_gcm_ctx *gcm_ctx = ctx->aead_state;
1442 if (max_out_len < in_len + gcm_ctx->tag_len) {
1443 EVPerror(EVP_R_BUFFER_TOO_SMALL);
1447 memcpy(&gcm, &gcm_ctx->gcm, sizeof(gcm));
1449 if (nonce_len == 0) {
1450 EVPerror(EVP_R_INVALID_IV_LENGTH);
1453 CRYPTO_gcm128_setiv(&gcm, nonce, nonce_len);
1455 if (ad_len > 0 && CRYPTO_gcm128_aad(&gcm, ad, ad_len))
1459 if (CRYPTO_gcm128_encrypt_ctr32(&gcm, in + bulk, out + bulk,
1460 in_len - bulk, gcm_ctx->ctr))
1463 if (CRYPTO_gcm128_encrypt(&gcm, in + bulk, out + bulk,
1468 CRYPTO_gcm128_tag(&gcm, out + in_len, gcm_ctx->tag_len);
1469 *out_len = in_len + gcm_ctx->tag_len;
1475 aead_aes_gcm_open(const EVP_AEAD_CTX *ctx, unsigned char *out, size_t *out_len,
1476 size_t max_out_len, const unsigned char *nonce, size_t nonce_len,
1477 const unsigned char *in, size_t in_len, const unsigned char *ad,
1480 const struct aead_aes_gcm_ctx *gcm_ctx = ctx->aead_state;
1481 unsigned char tag[EVP_AEAD_AES_GCM_TAG_LEN];
1483 size_t plaintext_len;
1486 if (in_len < gcm_ctx->tag_len) {
1487 EVPerror(EVP_R_BAD_DECRYPT);
1491 plaintext_len = in_len - gcm_ctx->tag_len;
1493 if (max_out_len < plaintext_len) {
1494 EVPerror(EVP_R_BUFFER_TOO_SMALL);
1498 memcpy(&gcm, &gcm_ctx->gcm, sizeof(gcm));
1500 if (nonce_len == 0) {
1501 EVPerror(EVP_R_INVALID_IV_LENGTH);
1504 CRYPTO_gcm128_setiv(&gcm, nonce, nonce_len);
1506 if (CRYPTO_gcm128_aad(&gcm, ad, ad_len))
1510 if (CRYPTO_gcm128_decrypt_ctr32(&gcm, in + bulk, out + bulk,
1511 in_len - bulk - gcm_ctx->tag_len, gcm_ctx->ctr))
1514 if (CRYPTO_gcm128_decrypt(&gcm, in + bulk, out + bulk,
1515 in_len - bulk - gcm_ctx->tag_len))
1519 CRYPTO_gcm128_tag(&gcm, tag, gcm_ctx->tag_len);
1520 if (timingsafe_memcmp(tag, in + plaintext_len, gcm_ctx->tag_len) != 0) {
1521 EVPerror(EVP_R_BAD_DECRYPT);
1525 *out_len = plaintext_len;
1530 static const EVP_AEAD aead_aes_128_gcm = {
1533 .overhead = EVP_AEAD_AES_GCM_TAG_LEN,
1534 .max_tag_len = EVP_AEAD_AES_GCM_TAG_LEN,
1536 .init = aead_aes_gcm_init,
1537 .cleanup = aead_aes_gcm_cleanup,
1538 .seal = aead_aes_gcm_seal,
1539 .open = aead_aes_gcm_open,
1542 static const EVP_AEAD aead_aes_256_gcm = {
1545 .overhead = EVP_AEAD_AES_GCM_TAG_LEN,
1546 .max_tag_len = EVP_AEAD_AES_GCM_TAG_LEN,
1548 .init = aead_aes_gcm_init,
1549 .cleanup = aead_aes_gcm_cleanup,
1550 .seal = aead_aes_gcm_seal,
1551 .open = aead_aes_gcm_open,
1555 EVP_aead_aes_128_gcm(void)
1557 return &aead_aes_128_gcm;
1561 EVP_aead_aes_256_gcm(void)
1563 return &aead_aes_256_gcm;
1575 aes_wrap_init_key(EVP_CIPHER_CTX *ctx, const unsigned char *key,
1576 const unsigned char *iv, int enc)
1578 EVP_AES_WRAP_CTX *wctx = (EVP_AES_WRAP_CTX *)ctx->cipher_data;
1580 if (iv == NULL && key == NULL)
1585 AES_set_encrypt_key(key, 8 * ctx->key_len,
1588 AES_set_decrypt_key(key, 8 * ctx->key_len,
1596 memcpy(ctx->iv, iv, EVP_CIPHER_CTX_iv_length(ctx));
1604 aes_wrap_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out,
1605 const unsigned char *in, size_t inlen)
1607 EVP_AES_WRAP_CTX *wctx = ctx->cipher_data;
1615 if (ctx->encrypt && inlen < 8)
1617 if (!ctx->encrypt && inlen < 16)
1619 if (inlen > INT_MAX)
1630 ret = AES_wrap_key(&wctx->ks.ks, wctx->iv, out, in,
1631 (unsigned int)inlen);
1633 ret = AES_unwrap_key(&wctx->ks.ks, wctx->iv, out, in,
1634 (unsigned int)inlen);
1636 return ret != 0 ? ret : -1;
1640 aes_wrap_ctrl(EVP_CIPHER_CTX *c, int type, int arg, void *ptr)
1642 EVP_AES_WRAP_CTX *wctx = c->cipher_data;
1647 EVP_CIPHER_CTX *out = ptr;
1648 EVP_AES_WRAP_CTX *wctx_out = out->cipher_data;
1650 if (wctx->iv != NULL) {
1651 if (c->iv != wctx->iv)
1654 wctx_out->iv = out->iv;
1664 #define WRAP_FLAGS \
1665 ( EVP_CIPH_WRAP_MODE | EVP_CIPH_CUSTOM_IV | EVP_CIPH_FLAG_CUSTOM_CIPHER | \
1666 EVP_CIPH_ALWAYS_CALL_INIT | EVP_CIPH_FLAG_DEFAULT_ASN1 | \
1667 EVP_CIPH_CUSTOM_COPY )
1669 static const EVP_CIPHER aes_128_wrap = {
1670 .nid = NID_id_aes128_wrap,
1674 .flags = WRAP_FLAGS,
1675 .init = aes_wrap_init_key,
1676 .do_cipher = aes_wrap_cipher,
1678 .ctx_size = sizeof(EVP_AES_WRAP_CTX),
1679 .set_asn1_parameters = NULL,
1680 .get_asn1_parameters = NULL,
1681 .ctrl = aes_wrap_ctrl,
1686 EVP_aes_128_wrap(void)
1688 return &aes_128_wrap;
1691 static const EVP_CIPHER aes_192_wrap = {
1692 .nid = NID_id_aes192_wrap,
1696 .flags = WRAP_FLAGS,
1697 .init = aes_wrap_init_key,
1698 .do_cipher = aes_wrap_cipher,
1700 .ctx_size = sizeof(EVP_AES_WRAP_CTX),
1701 .set_asn1_parameters = NULL,
1702 .get_asn1_parameters = NULL,
1703 .ctrl = aes_wrap_ctrl,
1708 EVP_aes_192_wrap(void)
1710 return &aes_192_wrap;
1713 static const EVP_CIPHER aes_256_wrap = {
1714 .nid = NID_id_aes256_wrap,
1718 .flags = WRAP_FLAGS,
1719 .init = aes_wrap_init_key,
1720 .do_cipher = aes_wrap_cipher,
1722 .ctx_size = sizeof(EVP_AES_WRAP_CTX),
1723 .set_asn1_parameters = NULL,
1724 .get_asn1_parameters = NULL,
1725 .ctrl = aes_wrap_ctrl,
1730 EVP_aes_256_wrap(void)
1732 return &aes_256_wrap;