1 /* $OpenBSD: xform.c,v 1.16 2001/08/28 12:20:43 ben Exp $ */ 2 /*- 3 * The authors of this code are John Ioannidis (ji@tla.org), 4 * Angelos D. Keromytis (kermit@csd.uch.gr), 5 * Niels Provos (provos@physnet.uni-hamburg.de) and 6 * Damien Miller (djm@mindrot.org). 7 * 8 * This code was written by John Ioannidis for BSD/OS in Athens, Greece, 9 * in November 1995. 10 * 11 * Ported to OpenBSD and NetBSD, with additional transforms, in December 1996, 12 * by Angelos D. Keromytis. 13 * 14 * Additional transforms and features in 1997 and 1998 by Angelos D. Keromytis 15 * and Niels Provos. 16 * 17 * Additional features in 1999 by Angelos D. Keromytis. 18 * 19 * AES XTS implementation in 2008 by Damien Miller 20 * 21 * Copyright (C) 1995, 1996, 1997, 1998, 1999 by John Ioannidis, 22 * Angelos D. Keromytis and Niels Provos. 23 * 24 * Copyright (C) 2001, Angelos D. Keromytis. 25 * 26 * Copyright (C) 2008, Damien Miller 27 * Copyright (c) 2014 The FreeBSD Foundation 28 * All rights reserved. 29 * 30 * Portions of this software were developed by John-Mark Gurney 31 * under sponsorship of the FreeBSD Foundation and 32 * Rubicon Communications, LLC (Netgate). 33 * 34 * Permission to use, copy, and modify this software with or without fee 35 * is hereby granted, provided that this entire notice is included in 36 * all copies of any software which is or includes a copy or 37 * modification of this software. 38 * You may use this code under the GNU public license if you so wish. Please 39 * contribute changes back to the authors under this freer than GPL license 40 * so that we may further the use of strong encryption without limitations to 41 * all. 42 * 43 * THIS SOFTWARE IS BEING PROVIDED "AS IS", WITHOUT ANY EXPRESS OR 44 * IMPLIED WARRANTY. IN PARTICULAR, NONE OF THE AUTHORS MAKES ANY 45 * REPRESENTATION OR WARRANTY OF ANY KIND CONCERNING THE 46 * MERCHANTABILITY OF THIS SOFTWARE OR ITS FITNESS FOR ANY PARTICULAR 47 * PURPOSE. 48 */ 49 50 #include <sys/cdefs.h> 51 __FBSDID("$FreeBSD$"); 52 53 #include <sys/types.h> 54 #include <opencrypto/xform_enc.h> 55 56 static int aes_xts_setkey(void *, const uint8_t *, int); 57 static void aes_xts_encrypt(void *, const uint8_t *, uint8_t *); 58 static void aes_xts_decrypt(void *, const uint8_t *, uint8_t *); 59 static void aes_xts_reinit(void *, const uint8_t *, size_t); 60 61 /* Encryption instances */ 62 const struct enc_xform enc_xform_aes_xts = { 63 .type = CRYPTO_AES_XTS, 64 .name = "AES-XTS", 65 .ctxsize = sizeof(struct aes_xts_ctx), 66 .blocksize = AES_BLOCK_LEN, 67 .ivsize = AES_XTS_IV_LEN, 68 .minkey = AES_XTS_MIN_KEY, 69 .maxkey = AES_XTS_MAX_KEY, 70 .encrypt = aes_xts_encrypt, 71 .decrypt = aes_xts_decrypt, 72 .setkey = aes_xts_setkey, 73 .reinit = aes_xts_reinit 74 }; 75 76 /* 77 * Encryption wrapper routines. 78 */ 79 static void 80 aes_xts_reinit(void *key, const uint8_t *iv, size_t ivlen) 81 { 82 struct aes_xts_ctx *ctx = key; 83 uint64_t blocknum; 84 u_int i; 85 86 #ifndef _STANDALONE 87 KASSERT(ivlen == sizeof(blocknum), 88 ("%s: invalid IV length", __func__)); 89 #endif 90 91 /* 92 * Prepare tweak as E_k2(IV). IV is specified as LE representation 93 * of a 64-bit block number which we allow to be passed in directly. 94 */ 95 bcopy(iv, &blocknum, AES_XTS_IVSIZE); 96 for (i = 0; i < AES_XTS_IVSIZE; i++) { 97 ctx->tweak[i] = blocknum & 0xff; 98 blocknum >>= 8; 99 } 100 /* Last 64 bits of IV are always zero */ 101 bzero(ctx->tweak + AES_XTS_IVSIZE, AES_XTS_IVSIZE); 102 103 rijndael_encrypt(&ctx->key2, ctx->tweak, ctx->tweak); 104 } 105 106 static void 107 aes_xts_crypt(struct aes_xts_ctx *ctx, const uint8_t *in, uint8_t *out, 108 u_int do_encrypt) 109 { 110 uint8_t block[AES_XTS_BLOCKSIZE]; 111 u_int i, carry_in, carry_out; 112 113 for (i = 0; i < AES_XTS_BLOCKSIZE; i++) 114 block[i] = in[i] ^ ctx->tweak[i]; 115 116 if (do_encrypt) 117 rijndael_encrypt(&ctx->key1, block, out); 118 else 119 rijndael_decrypt(&ctx->key1, block, out); 120 121 for (i = 0; i < AES_XTS_BLOCKSIZE; i++) 122 out[i] ^= ctx->tweak[i]; 123 124 /* Exponentiate tweak */ 125 carry_in = 0; 126 for (i = 0; i < AES_XTS_BLOCKSIZE; i++) { 127 carry_out = ctx->tweak[i] & 0x80; 128 ctx->tweak[i] = (ctx->tweak[i] << 1) | (carry_in ? 1 : 0); 129 carry_in = carry_out; 130 } 131 if (carry_in) 132 ctx->tweak[0] ^= AES_XTS_ALPHA; 133 explicit_bzero(block, sizeof(block)); 134 } 135 136 static void 137 aes_xts_encrypt(void *key, const uint8_t *in, uint8_t *out) 138 { 139 aes_xts_crypt(key, in, out, 1); 140 } 141 142 static void 143 aes_xts_decrypt(void *key, const uint8_t *in, uint8_t *out) 144 { 145 aes_xts_crypt(key, in, out, 0); 146 } 147 148 static int 149 aes_xts_setkey(void *sched, const uint8_t *key, int len) 150 { 151 struct aes_xts_ctx *ctx; 152 153 if (len != 32 && len != 64) 154 return (EINVAL); 155 156 ctx = sched; 157 158 rijndael_set_key(&ctx->key1, key, len * 4); 159 rijndael_set_key(&ctx->key2, key + (len / 2), len * 4); 160 161 return (0); 162 } 163