1 /*-
2 * Copyright (c) 2005-2010 Pawel Jakub Dawidek <pjd@FreeBSD.org>
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 *
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHORS AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHORS OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24 * SUCH DAMAGE.
25 */
26
27 #include <sys/cdefs.h>
28 __FBSDID("$FreeBSD: releng/8.3/sys/geom/eli/g_eli_crypto.c 214405 2010-10-26 23:06:53Z pjd $");
29
30 #include <sys/param.h>
31 #ifdef _KERNEL
32 #include <sys/systm.h>
33 #include <sys/kernel.h>
34 #include <sys/malloc.h>
35 #include <sys/uio.h>
36 #else
37 #include <stdint.h>
38 #include <string.h>
39 #include <strings.h>
40 #include <errno.h>
41 #include <assert.h>
42 #include <openssl/evp.h>
43 #define _OpenSSL_
44 #endif
45 #include <geom/eli/g_eli.h>
46
47 #ifdef _KERNEL
48 MALLOC_DECLARE(M_ELI);
49
50 static int
51 g_eli_crypto_done(struct cryptop *crp)
52 {
53
54 crp->crp_opaque = (void *)crp;
55 wakeup(crp);
56 return (0);
57 }
58
59 static int
60 g_eli_crypto_cipher(u_int algo, int enc, u_char *data, size_t datasize,
61 const u_char *key, size_t keysize)
62 {
63 struct cryptoini cri;
64 struct cryptop *crp;
65 struct cryptodesc *crd;
66 struct uio *uio;
67 struct iovec *iov;
68 uint64_t sid;
69 u_char *p;
70 int error;
71
72 KASSERT(algo != CRYPTO_AES_XTS,
73 ("%s: CRYPTO_AES_XTS unexpected here", __func__));
74
75 bzero(&cri, sizeof(cri));
76 cri.cri_alg = algo;
77 cri.cri_key = __DECONST(void *, key);
78 cri.cri_klen = keysize;
79 error = crypto_newsession(&sid, &cri, CRYPTOCAP_F_SOFTWARE);
80 if (error != 0)
81 return (error);
82 p = malloc(sizeof(*crp) + sizeof(*crd) + sizeof(*uio) + sizeof(*iov),
83 M_ELI, M_NOWAIT | M_ZERO);
84 if (p == NULL) {
85 crypto_freesession(sid);
86 return (ENOMEM);
87 }
88 crp = (struct cryptop *)p; p += sizeof(*crp);
89 crd = (struct cryptodesc *)p; p += sizeof(*crd);
90 uio = (struct uio *)p; p += sizeof(*uio);
91 iov = (struct iovec *)p; p += sizeof(*iov);
92
93 iov->iov_len = datasize;
94 iov->iov_base = data;
95
96 uio->uio_iov = iov;
97 uio->uio_iovcnt = 1;
98 uio->uio_segflg = UIO_SYSSPACE;
99 uio->uio_resid = datasize;
100
101 crd->crd_skip = 0;
102 crd->crd_len = datasize;
103 crd->crd_flags = CRD_F_IV_EXPLICIT | CRD_F_IV_PRESENT;
104 if (enc)
105 crd->crd_flags |= CRD_F_ENCRYPT;
106 crd->crd_alg = algo;
107 crd->crd_key = __DECONST(void *, key);
108 crd->crd_klen = keysize;
109 bzero(crd->crd_iv, sizeof(crd->crd_iv));
110 crd->crd_next = NULL;
111
112 crp->crp_sid = sid;
113 crp->crp_ilen = datasize;
114 crp->crp_olen = datasize;
115 crp->crp_opaque = NULL;
116 crp->crp_callback = g_eli_crypto_done;
117 crp->crp_buf = (void *)uio;
118 crp->crp_flags = CRYPTO_F_IOV | CRYPTO_F_CBIFSYNC | CRYPTO_F_REL;
119 crp->crp_desc = crd;
120
121 error = crypto_dispatch(crp);
122 if (error == 0) {
123 while (crp->crp_opaque == NULL)
124 tsleep(crp, PRIBIO, "geli", hz / 5);
125 error = crp->crp_etype;
126 }
127
128 free(crp, M_ELI);
129 crypto_freesession(sid);
130 return (error);
131 }
132 #else /* !_KERNEL */
133 static int
134 g_eli_crypto_cipher(u_int algo, int enc, u_char *data, size_t datasize,
135 const u_char *key, size_t keysize)
136 {
137 EVP_CIPHER_CTX ctx;
138 const EVP_CIPHER *type;
139 u_char iv[keysize];
140 int outsize;
141
142 assert(algo != CRYPTO_AES_XTS);
143
144 switch (algo) {
145 case CRYPTO_NULL_CBC:
146 type = EVP_enc_null();
147 break;
148 case CRYPTO_AES_CBC:
149 switch (keysize) {
150 case 128:
151 type = EVP_aes_128_cbc();
152 break;
153 case 192:
154 type = EVP_aes_192_cbc();
155 break;
156 case 256:
157 type = EVP_aes_256_cbc();
158 break;
159 default:
160 return (EINVAL);
161 }
162 break;
163 case CRYPTO_BLF_CBC:
164 type = EVP_bf_cbc();
165 break;
166 #ifndef OPENSSL_NO_CAMELLIA
167 case CRYPTO_CAMELLIA_CBC:
168 switch (keysize) {
169 case 128:
170 type = EVP_camellia_128_cbc();
171 break;
172 case 192:
173 type = EVP_camellia_192_cbc();
174 break;
175 case 256:
176 type = EVP_camellia_256_cbc();
177 break;
178 default:
179 return (EINVAL);
180 }
181 break;
182 #endif
183 case CRYPTO_3DES_CBC:
184 type = EVP_des_ede3_cbc();
185 break;
186 default:
187 return (EINVAL);
188 }
189
190 EVP_CIPHER_CTX_init(&ctx);
191
192 EVP_CipherInit_ex(&ctx, type, NULL, NULL, NULL, enc);
193 EVP_CIPHER_CTX_set_key_length(&ctx, keysize / 8);
194 EVP_CIPHER_CTX_set_padding(&ctx, 0);
195 bzero(iv, sizeof(iv));
196 EVP_CipherInit_ex(&ctx, NULL, NULL, key, iv, enc);
197
198 if (EVP_CipherUpdate(&ctx, data, &outsize, data, datasize) == 0) {
199 EVP_CIPHER_CTX_cleanup(&ctx);
200 return (EINVAL);
201 }
202 assert(outsize == (int)datasize);
203
204 if (EVP_CipherFinal_ex(&ctx, data + outsize, &outsize) == 0) {
205 EVP_CIPHER_CTX_cleanup(&ctx);
206 return (EINVAL);
207 }
208 assert(outsize == 0);
209
210 EVP_CIPHER_CTX_cleanup(&ctx);
211 return (0);
212 }
213 #endif /* !_KERNEL */
214
215 int
216 g_eli_crypto_encrypt(u_int algo, u_char *data, size_t datasize,
217 const u_char *key, size_t keysize)
218 {
219
220 /* We prefer AES-CBC for metadata protection. */
221 if (algo == CRYPTO_AES_XTS)
222 algo = CRYPTO_AES_CBC;
223
224 return (g_eli_crypto_cipher(algo, 1, data, datasize, key, keysize));
225 }
226
227 int
228 g_eli_crypto_decrypt(u_int algo, u_char *data, size_t datasize,
229 const u_char *key, size_t keysize)
230 {
231
232 /* We prefer AES-CBC for metadata protection. */
233 if (algo == CRYPTO_AES_XTS)
234 algo = CRYPTO_AES_CBC;
235
236 return (g_eli_crypto_cipher(algo, 0, data, datasize, key, keysize));
237 }
238
239 void
240 g_eli_crypto_hmac_init(struct hmac_ctx *ctx, const uint8_t *hkey,
241 size_t hkeylen)
242 {
243 u_char k_ipad[128], key[128];
244 SHA512_CTX lctx;
245 u_int i;
246
247 bzero(key, sizeof(key));
248 if (hkeylen == 0)
249 ; /* do nothing */
250 else if (hkeylen <= 128)
251 bcopy(hkey, key, hkeylen);
252 else {
253 /* If key is longer than 128 bytes reset it to key = SHA512(key). */
254 SHA512_Init(&lctx);
255 SHA512_Update(&lctx, hkey, hkeylen);
256 SHA512_Final(key, &lctx);
257 }
258
259 /* XOR key with ipad and opad values. */
260 for (i = 0; i < sizeof(key); i++) {
261 k_ipad[i] = key[i] ^ 0x36;
262 ctx->k_opad[i] = key[i] ^ 0x5c;
263 }
264 bzero(key, sizeof(key));
265 /* Perform inner SHA512. */
266 SHA512_Init(&ctx->shactx);
267 SHA512_Update(&ctx->shactx, k_ipad, sizeof(k_ipad));
268 }
269
270 void
271 g_eli_crypto_hmac_update(struct hmac_ctx *ctx, const uint8_t *data,
272 size_t datasize)
273 {
274
275 SHA512_Update(&ctx->shactx, data, datasize);
276 }
277
278 void
279 g_eli_crypto_hmac_final(struct hmac_ctx *ctx, uint8_t *md, size_t mdsize)
280 {
281 u_char digest[SHA512_MDLEN];
282 SHA512_CTX lctx;
283
284 SHA512_Final(digest, &ctx->shactx);
285 /* Perform outer SHA512. */
286 SHA512_Init(&lctx);
287 SHA512_Update(&lctx, ctx->k_opad, sizeof(ctx->k_opad));
288 bzero(ctx, sizeof(*ctx));
289 SHA512_Update(&lctx, digest, sizeof(digest));
290 SHA512_Final(digest, &lctx);
291 /* mdsize == 0 means "Give me the whole hash!" */
292 if (mdsize == 0)
293 mdsize = SHA512_MDLEN;
294 bcopy(digest, md, mdsize);
295 }
296
297 void
298 g_eli_crypto_hmac(const uint8_t *hkey, size_t hkeysize, const uint8_t *data,
299 size_t datasize, uint8_t *md, size_t mdsize)
300 {
301 struct hmac_ctx ctx;
302
303 g_eli_crypto_hmac_init(&ctx, hkey, hkeysize);
304 g_eli_crypto_hmac_update(&ctx, data, datasize);
305 g_eli_crypto_hmac_final(&ctx, md, mdsize);
306 }
Cache object: ef83bd3769116dc88b3ca551dbf9474a
|