xref: /freebsd/sys/opencrypto/xform_cml.c (revision 22cf89c938886d14f5796fc49f9f020c23ea8eaf)
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 #include <sys/types.h>
52 #include <crypto/camellia/camellia.h>
53 #include <opencrypto/xform_enc.h>
54 
55 struct camellia_cbc_ctx {
56 	camellia_ctx state;
57 	char iv[CAMELLIA_BLOCK_LEN];
58 };
59 
60 static	int cml_setkey(void *, const uint8_t *, int);
61 static	void cml_encrypt(void *, const uint8_t *, uint8_t *);
62 static	void cml_decrypt(void *, const uint8_t *, uint8_t *);
63 static	void cml_encrypt_multi(void *, const uint8_t *, uint8_t *, size_t);
64 static	void cml_decrypt_multi(void *, const uint8_t *, uint8_t *, size_t);
65 static	void cml_reinit(void *, const uint8_t *, size_t);
66 
67 /* Encryption instances */
68 const struct enc_xform enc_xform_camellia = {
69 	.type = CRYPTO_CAMELLIA_CBC,
70 	.name = "Camellia-CBC",
71 	.ctxsize = sizeof(struct camellia_cbc_ctx),
72 	.blocksize = CAMELLIA_BLOCK_LEN,
73 	.ivsize = CAMELLIA_BLOCK_LEN,
74 	.minkey = CAMELLIA_MIN_KEY,
75 	.maxkey = CAMELLIA_MAX_KEY,
76 	.setkey = cml_setkey,
77 	.reinit = cml_reinit,
78 	.encrypt = cml_encrypt,
79 	.decrypt = cml_decrypt,
80 	.encrypt_multi = cml_encrypt_multi,
81 	.decrypt_multi = cml_decrypt_multi,
82 };
83 
84 /*
85  * Encryption wrapper routines.
86  */
87 static void
88 cml_encrypt(void *vctx, const uint8_t *in, uint8_t *out)
89 {
90 	struct camellia_cbc_ctx *ctx = vctx;
91 
92 	for (u_int i = 0; i < CAMELLIA_BLOCK_LEN; i++)
93 		out[i] = in[i] ^ ctx->iv[i];
94 	camellia_encrypt(&ctx->state, out, out);
95 	memcpy(ctx->iv, out, CAMELLIA_BLOCK_LEN);
96 }
97 
98 static void
99 cml_decrypt(void *vctx, const uint8_t *in, uint8_t *out)
100 {
101 	struct camellia_cbc_ctx *ctx = vctx;
102 	char block[CAMELLIA_BLOCK_LEN];
103 
104 	memcpy(block, in, CAMELLIA_BLOCK_LEN);
105 	camellia_decrypt(&ctx->state, in, out);
106 	for (u_int i = 0; i < CAMELLIA_BLOCK_LEN; i++)
107 		out[i] ^= ctx->iv[i];
108 	memcpy(ctx->iv, block, CAMELLIA_BLOCK_LEN);
109 	explicit_bzero(block, sizeof(block));
110 }
111 
112 static void
113 cml_encrypt_multi(void *vctx, const uint8_t *in, uint8_t *out, size_t len)
114 {
115 	struct camellia_cbc_ctx *ctx = vctx;
116 
117 	KASSERT(len % CAMELLIA_BLOCK_LEN == 0, ("%s: invalid length",
118 	    __func__));
119 	while (len > 0) {
120 		for (u_int i = 0; i < CAMELLIA_BLOCK_LEN; i++)
121 			out[i] = in[i] ^ ctx->iv[i];
122 		camellia_encrypt(&ctx->state, out, out);
123 		memcpy(ctx->iv, out, CAMELLIA_BLOCK_LEN);
124 		out += CAMELLIA_BLOCK_LEN;
125 		in += CAMELLIA_BLOCK_LEN;
126 		len -= CAMELLIA_BLOCK_LEN;
127 	}
128 }
129 
130 static void
131 cml_decrypt_multi(void *vctx, const uint8_t *in, uint8_t *out, size_t len)
132 {
133 	struct camellia_cbc_ctx *ctx = vctx;
134 	char block[CAMELLIA_BLOCK_LEN];
135 
136 	KASSERT(len % CAMELLIA_BLOCK_LEN == 0, ("%s: invalid length",
137 	    __func__));
138 	while (len > 0) {
139 		memcpy(block, in, CAMELLIA_BLOCK_LEN);
140 		camellia_decrypt(&ctx->state, in, out);
141 		for (u_int i = 0; i < CAMELLIA_BLOCK_LEN; i++)
142 			out[i] ^= ctx->iv[i];
143 		memcpy(ctx->iv, block, CAMELLIA_BLOCK_LEN);
144 		out += CAMELLIA_BLOCK_LEN;
145 		in += CAMELLIA_BLOCK_LEN;
146 		len -= CAMELLIA_BLOCK_LEN;
147 	}
148 	explicit_bzero(block, sizeof(block));
149 }
150 
151 static int
152 cml_setkey(void *vctx, const uint8_t *key, int len)
153 {
154 	struct camellia_cbc_ctx *ctx = vctx;
155 
156 	if (len != 16 && len != 24 && len != 32)
157 		return (EINVAL);
158 
159 	camellia_set_key(&ctx->state, key, len * 8);
160 	return (0);
161 }
162 
163 static void
164 cml_reinit(void *vctx, const uint8_t *iv, size_t iv_len)
165 {
166 	struct camellia_cbc_ctx *ctx = vctx;
167 
168 	KASSERT(iv_len == sizeof(ctx->iv), ("%s: bad IV length", __func__));
169 	memcpy(ctx->iv, iv, sizeof(ctx->iv));
170 }
171