g_eli_crypto.c revision 167755
1148456Spjd/*- 2148456Spjd * Copyright (c) 2005 Pawel Jakub Dawidek <pjd@FreeBSD.org> 3148456Spjd * All rights reserved. 4148456Spjd * 5148456Spjd * Redistribution and use in source and binary forms, with or without 6148456Spjd * modification, are permitted provided that the following conditions 7148456Spjd * are met: 8148456Spjd * 1. Redistributions of source code must retain the above copyright 9148456Spjd * notice, this list of conditions and the following disclaimer. 10148456Spjd * 2. Redistributions in binary form must reproduce the above copyright 11148456Spjd * notice, this list of conditions and the following disclaimer in the 12148456Spjd * documentation and/or other materials provided with the distribution. 13155174Spjd * 14148456Spjd * THIS SOFTWARE IS PROVIDED BY THE AUTHORS AND CONTRIBUTORS ``AS IS'' AND 15148456Spjd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 16148456Spjd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 17148456Spjd * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHORS OR CONTRIBUTORS BE LIABLE 18148456Spjd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 19148456Spjd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 20148456Spjd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 21148456Spjd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 22148456Spjd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 23148456Spjd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 24148456Spjd * SUCH DAMAGE. 25148456Spjd */ 26148456Spjd 27148456Spjd#include <sys/cdefs.h> 28148456Spjd__FBSDID("$FreeBSD: head/sys/geom/eli/g_eli_crypto.c 167755 2007-03-21 03:42:51Z sam $"); 29148456Spjd 30148456Spjd#include <sys/param.h> 31148456Spjd#ifdef _KERNEL 32148456Spjd#include <sys/systm.h> 33148456Spjd#include <sys/kernel.h> 34148456Spjd#include <sys/malloc.h> 35148456Spjd#include <sys/uio.h> 36148456Spjd#else 37148456Spjd#include <stdint.h> 38148456Spjd#include <string.h> 39148456Spjd#include <strings.h> 40148456Spjd#include <errno.h> 41148456Spjd#include <assert.h> 42148456Spjd#include <openssl/evp.h> 43148456Spjd#define _OpenSSL_ 44148456Spjd#endif 45148456Spjd#include <geom/eli/g_eli.h> 46148456Spjd 47148456Spjd#ifdef _KERNEL 48148456SpjdMALLOC_DECLARE(M_ELI); 49148456Spjd 50148456Spjdstatic int 51148456Spjdg_eli_crypto_done(struct cryptop *crp) 52148456Spjd{ 53148456Spjd 54148456Spjd crp->crp_opaque = (void *)crp; 55148456Spjd wakeup(crp); 56148456Spjd return (0); 57148456Spjd} 58148456Spjd 59148456Spjdstatic int 60148456Spjdg_eli_crypto_cipher(u_int algo, int enc, u_char *data, size_t datasize, 61148456Spjd const u_char *key, size_t keysize) 62148456Spjd{ 63148456Spjd struct cryptoini cri; 64148456Spjd struct cryptop *crp; 65148456Spjd struct cryptodesc *crd; 66148456Spjd struct uio *uio; 67148456Spjd struct iovec *iov; 68148456Spjd uint64_t sid; 69148456Spjd u_char *p; 70148456Spjd int error; 71148456Spjd 72148456Spjd bzero(&cri, sizeof(cri)); 73148456Spjd cri.cri_alg = algo; 74148456Spjd cri.cri_key = __DECONST(void *, key); 75148456Spjd cri.cri_klen = keysize; 76167755Ssam error = crypto_newsession(&sid, &cri, CRYPTOCAP_F_SOFTWARE); 77148456Spjd if (error != 0) 78148456Spjd return (error); 79148456Spjd p = malloc(sizeof(*crp) + sizeof(*crd) + sizeof(*uio) + sizeof(*iov), 80148456Spjd M_ELI, M_NOWAIT | M_ZERO); 81148456Spjd if (p == NULL) { 82148456Spjd crypto_freesession(sid); 83148456Spjd return (ENOMEM); 84148456Spjd } 85148456Spjd crp = (struct cryptop *)p; p += sizeof(*crp); 86148456Spjd crd = (struct cryptodesc *)p; p += sizeof(*crd); 87148456Spjd uio = (struct uio *)p; p += sizeof(*uio); 88148456Spjd iov = (struct iovec *)p; p += sizeof(*iov); 89148456Spjd 90148456Spjd iov->iov_len = datasize; 91148456Spjd iov->iov_base = data; 92148456Spjd 93148456Spjd uio->uio_iov = iov; 94148456Spjd uio->uio_iovcnt = 1; 95148456Spjd uio->uio_segflg = UIO_SYSSPACE; 96148456Spjd uio->uio_resid = datasize; 97148456Spjd 98148456Spjd crd->crd_skip = 0; 99148456Spjd crd->crd_len = datasize; 100157900Spjd crd->crd_flags = CRD_F_IV_EXPLICIT | CRD_F_IV_PRESENT; 101148456Spjd if (enc) 102148456Spjd crd->crd_flags |= CRD_F_ENCRYPT; 103148456Spjd crd->crd_alg = algo; 104148456Spjd crd->crd_key = __DECONST(void *, key); 105148456Spjd crd->crd_klen = keysize; 106148456Spjd bzero(crd->crd_iv, sizeof(crd->crd_iv)); 107148456Spjd crd->crd_next = NULL; 108148456Spjd 109148456Spjd crp->crp_sid = sid; 110148456Spjd crp->crp_ilen = datasize; 111148456Spjd crp->crp_olen = datasize; 112148456Spjd crp->crp_opaque = NULL; 113148456Spjd crp->crp_callback = g_eli_crypto_done; 114148456Spjd crp->crp_buf = (void *)uio; 115148456Spjd crp->crp_flags = CRYPTO_F_IOV | CRYPTO_F_CBIFSYNC | CRYPTO_F_REL; 116148456Spjd crp->crp_desc = crd; 117148456Spjd 118148456Spjd error = crypto_dispatch(crp); 119148456Spjd if (error == 0) { 120148456Spjd while (crp->crp_opaque == NULL) 121148456Spjd tsleep(crp, PRIBIO, "geli", hz / 5); 122148456Spjd error = crp->crp_etype; 123148456Spjd } 124148456Spjd 125148456Spjd free(crp, M_ELI); 126148456Spjd crypto_freesession(sid); 127148456Spjd return (error); 128148456Spjd} 129148456Spjd#else /* !_KERNEL */ 130148456Spjdstatic int 131148456Spjdg_eli_crypto_cipher(u_int algo, int enc, u_char *data, size_t datasize, 132148456Spjd const u_char *key, size_t keysize) 133148456Spjd{ 134148456Spjd EVP_CIPHER_CTX ctx; 135148456Spjd const EVP_CIPHER *type; 136148456Spjd u_char iv[keysize]; 137148456Spjd int outsize; 138148456Spjd 139148456Spjd switch (algo) { 140148456Spjd case CRYPTO_NULL_CBC: 141148456Spjd type = EVP_enc_null(); 142148456Spjd break; 143148456Spjd case CRYPTO_AES_CBC: 144148456Spjd switch (keysize) { 145148456Spjd case 128: 146148456Spjd type = EVP_aes_128_cbc(); 147148456Spjd break; 148148456Spjd case 192: 149148456Spjd type = EVP_aes_192_cbc(); 150148456Spjd break; 151148456Spjd case 256: 152148456Spjd type = EVP_aes_256_cbc(); 153148456Spjd break; 154148456Spjd default: 155148456Spjd return (EINVAL); 156148456Spjd } 157148456Spjd break; 158148456Spjd case CRYPTO_BLF_CBC: 159148456Spjd type = EVP_bf_cbc(); 160148456Spjd break; 161148456Spjd case CRYPTO_3DES_CBC: 162148456Spjd type = EVP_des_ede3_cbc(); 163148456Spjd break; 164148456Spjd default: 165148456Spjd return (EINVAL); 166148456Spjd } 167148456Spjd 168148456Spjd EVP_CIPHER_CTX_init(&ctx); 169148456Spjd 170148456Spjd EVP_CipherInit_ex(&ctx, type, NULL, NULL, NULL, enc); 171148456Spjd EVP_CIPHER_CTX_set_key_length(&ctx, keysize / 8); 172148456Spjd EVP_CIPHER_CTX_set_padding(&ctx, 0); 173148456Spjd bzero(iv, sizeof(iv)); 174148456Spjd EVP_CipherInit_ex(&ctx, NULL, NULL, key, iv, enc); 175148456Spjd 176148456Spjd if (EVP_CipherUpdate(&ctx, data, &outsize, data, datasize) == 0) { 177148456Spjd EVP_CIPHER_CTX_cleanup(&ctx); 178148456Spjd return (EINVAL); 179148456Spjd } 180148456Spjd assert(outsize == (int)datasize); 181148456Spjd 182148456Spjd if (EVP_CipherFinal_ex(&ctx, data + outsize, &outsize) == 0) { 183148456Spjd EVP_CIPHER_CTX_cleanup(&ctx); 184148456Spjd return (EINVAL); 185148456Spjd } 186148456Spjd assert(outsize == 0); 187148456Spjd 188148456Spjd EVP_CIPHER_CTX_cleanup(&ctx); 189148456Spjd return (0); 190148456Spjd} 191148456Spjd#endif /* !_KERNEL */ 192148456Spjd 193148456Spjdint 194148456Spjdg_eli_crypto_encrypt(u_int algo, u_char *data, size_t datasize, 195148456Spjd const u_char *key, size_t keysize) 196148456Spjd{ 197148456Spjd 198148456Spjd return (g_eli_crypto_cipher(algo, 1, data, datasize, key, keysize)); 199148456Spjd} 200148456Spjd 201148456Spjdint 202148456Spjdg_eli_crypto_decrypt(u_int algo, u_char *data, size_t datasize, 203148456Spjd const u_char *key, size_t keysize) 204148456Spjd{ 205148456Spjd 206148456Spjd return (g_eli_crypto_cipher(algo, 0, data, datasize, key, keysize)); 207148456Spjd} 208148456Spjd 209148456Spjdvoid 210148456Spjdg_eli_crypto_hmac_init(struct hmac_ctx *ctx, const uint8_t *hkey, 211148456Spjd size_t hkeylen) 212148456Spjd{ 213148456Spjd u_char k_ipad[128], key[128]; 214148456Spjd SHA512_CTX lctx; 215148456Spjd u_int i; 216148456Spjd 217148456Spjd bzero(key, sizeof(key)); 218148456Spjd if (hkeylen == 0) 219148456Spjd ; /* do nothing */ 220148456Spjd else if (hkeylen <= 128) 221148456Spjd bcopy(hkey, key, hkeylen); 222148456Spjd else { 223148456Spjd /* If key is longer than 128 bytes reset it to key = SHA512(key). */ 224148456Spjd SHA512_Init(&lctx); 225148456Spjd SHA512_Update(&lctx, hkey, hkeylen); 226148456Spjd SHA512_Final(key, &lctx); 227148456Spjd } 228148456Spjd 229148456Spjd /* XOR key with ipad and opad values. */ 230148456Spjd for (i = 0; i < sizeof(key); i++) { 231148456Spjd k_ipad[i] = key[i] ^ 0x36; 232148456Spjd ctx->k_opad[i] = key[i] ^ 0x5c; 233148456Spjd } 234148456Spjd bzero(key, sizeof(key)); 235148456Spjd /* Perform inner SHA512. */ 236148456Spjd SHA512_Init(&ctx->shactx); 237148456Spjd SHA512_Update(&ctx->shactx, k_ipad, sizeof(k_ipad)); 238148456Spjd} 239148456Spjd 240148456Spjdvoid 241148456Spjdg_eli_crypto_hmac_update(struct hmac_ctx *ctx, const uint8_t *data, 242148456Spjd size_t datasize) 243148456Spjd{ 244148456Spjd 245148456Spjd SHA512_Update(&ctx->shactx, data, datasize); 246148456Spjd} 247148456Spjd 248148456Spjdvoid 249148456Spjdg_eli_crypto_hmac_final(struct hmac_ctx *ctx, uint8_t *md, size_t mdsize) 250148456Spjd{ 251148456Spjd u_char digest[SHA512_MDLEN]; 252148456Spjd SHA512_CTX lctx; 253148456Spjd 254148456Spjd SHA512_Final(digest, &ctx->shactx); 255148456Spjd /* Perform outer SHA512. */ 256148456Spjd SHA512_Init(&lctx); 257148456Spjd SHA512_Update(&lctx, ctx->k_opad, sizeof(ctx->k_opad)); 258148456Spjd bzero(ctx, sizeof(*ctx)); 259148456Spjd SHA512_Update(&lctx, digest, sizeof(digest)); 260148456Spjd SHA512_Final(digest, &lctx); 261148456Spjd /* mdsize == 0 means "Give me the whole hash!" */ 262148456Spjd if (mdsize == 0) 263148456Spjd mdsize = SHA512_MDLEN; 264148456Spjd bcopy(digest, md, mdsize); 265148456Spjd} 266148456Spjd 267148456Spjdvoid 268148456Spjdg_eli_crypto_hmac(const uint8_t *hkey, size_t hkeysize, const uint8_t *data, 269148456Spjd size_t datasize, uint8_t *md, size_t mdsize) 270148456Spjd{ 271148456Spjd struct hmac_ctx ctx; 272148456Spjd 273148456Spjd g_eli_crypto_hmac_init(&ctx, hkey, hkeysize); 274148456Spjd g_eli_crypto_hmac_update(&ctx, data, datasize); 275148456Spjd g_eli_crypto_hmac_final(&ctx, md, mdsize); 276148456Spjd} 277