g_eli_crypto.c revision 173746
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 173746 2007-11-19 08:59:32Z jb $"); 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; 161173746Sjb#ifndef OPENSSL_NO_CAMELLIA 162172031Spjd case CRYPTO_CAMELLIA_CBC: 163172031Spjd switch (keysize) { 164172031Spjd case 128: 165172031Spjd type = EVP_camellia_128_cbc(); 166172031Spjd break; 167172031Spjd case 192: 168172031Spjd type = EVP_camellia_192_cbc(); 169172031Spjd break; 170172031Spjd case 256: 171172031Spjd type = EVP_camellia_256_cbc(); 172172031Spjd break; 173172031Spjd default: 174172031Spjd return (EINVAL); 175172031Spjd } 176172031Spjd break; 177173746Sjb#endif 178148456Spjd case CRYPTO_3DES_CBC: 179148456Spjd type = EVP_des_ede3_cbc(); 180148456Spjd break; 181148456Spjd default: 182148456Spjd return (EINVAL); 183148456Spjd } 184148456Spjd 185148456Spjd EVP_CIPHER_CTX_init(&ctx); 186148456Spjd 187148456Spjd EVP_CipherInit_ex(&ctx, type, NULL, NULL, NULL, enc); 188148456Spjd EVP_CIPHER_CTX_set_key_length(&ctx, keysize / 8); 189148456Spjd EVP_CIPHER_CTX_set_padding(&ctx, 0); 190148456Spjd bzero(iv, sizeof(iv)); 191148456Spjd EVP_CipherInit_ex(&ctx, NULL, NULL, key, iv, enc); 192148456Spjd 193148456Spjd if (EVP_CipherUpdate(&ctx, data, &outsize, data, datasize) == 0) { 194148456Spjd EVP_CIPHER_CTX_cleanup(&ctx); 195148456Spjd return (EINVAL); 196148456Spjd } 197148456Spjd assert(outsize == (int)datasize); 198148456Spjd 199148456Spjd if (EVP_CipherFinal_ex(&ctx, data + outsize, &outsize) == 0) { 200148456Spjd EVP_CIPHER_CTX_cleanup(&ctx); 201148456Spjd return (EINVAL); 202148456Spjd } 203148456Spjd assert(outsize == 0); 204148456Spjd 205148456Spjd EVP_CIPHER_CTX_cleanup(&ctx); 206148456Spjd return (0); 207148456Spjd} 208148456Spjd#endif /* !_KERNEL */ 209148456Spjd 210148456Spjdint 211148456Spjdg_eli_crypto_encrypt(u_int algo, u_char *data, size_t datasize, 212148456Spjd const u_char *key, size_t keysize) 213148456Spjd{ 214148456Spjd 215148456Spjd return (g_eli_crypto_cipher(algo, 1, data, datasize, key, keysize)); 216148456Spjd} 217148456Spjd 218148456Spjdint 219148456Spjdg_eli_crypto_decrypt(u_int algo, u_char *data, size_t datasize, 220148456Spjd const u_char *key, size_t keysize) 221148456Spjd{ 222148456Spjd 223148456Spjd return (g_eli_crypto_cipher(algo, 0, data, datasize, key, keysize)); 224148456Spjd} 225148456Spjd 226148456Spjdvoid 227148456Spjdg_eli_crypto_hmac_init(struct hmac_ctx *ctx, const uint8_t *hkey, 228148456Spjd size_t hkeylen) 229148456Spjd{ 230148456Spjd u_char k_ipad[128], key[128]; 231148456Spjd SHA512_CTX lctx; 232148456Spjd u_int i; 233148456Spjd 234148456Spjd bzero(key, sizeof(key)); 235148456Spjd if (hkeylen == 0) 236148456Spjd ; /* do nothing */ 237148456Spjd else if (hkeylen <= 128) 238148456Spjd bcopy(hkey, key, hkeylen); 239148456Spjd else { 240148456Spjd /* If key is longer than 128 bytes reset it to key = SHA512(key). */ 241148456Spjd SHA512_Init(&lctx); 242148456Spjd SHA512_Update(&lctx, hkey, hkeylen); 243148456Spjd SHA512_Final(key, &lctx); 244148456Spjd } 245148456Spjd 246148456Spjd /* XOR key with ipad and opad values. */ 247148456Spjd for (i = 0; i < sizeof(key); i++) { 248148456Spjd k_ipad[i] = key[i] ^ 0x36; 249148456Spjd ctx->k_opad[i] = key[i] ^ 0x5c; 250148456Spjd } 251148456Spjd bzero(key, sizeof(key)); 252148456Spjd /* Perform inner SHA512. */ 253148456Spjd SHA512_Init(&ctx->shactx); 254148456Spjd SHA512_Update(&ctx->shactx, k_ipad, sizeof(k_ipad)); 255148456Spjd} 256148456Spjd 257148456Spjdvoid 258148456Spjdg_eli_crypto_hmac_update(struct hmac_ctx *ctx, const uint8_t *data, 259148456Spjd size_t datasize) 260148456Spjd{ 261148456Spjd 262148456Spjd SHA512_Update(&ctx->shactx, data, datasize); 263148456Spjd} 264148456Spjd 265148456Spjdvoid 266148456Spjdg_eli_crypto_hmac_final(struct hmac_ctx *ctx, uint8_t *md, size_t mdsize) 267148456Spjd{ 268148456Spjd u_char digest[SHA512_MDLEN]; 269148456Spjd SHA512_CTX lctx; 270148456Spjd 271148456Spjd SHA512_Final(digest, &ctx->shactx); 272148456Spjd /* Perform outer SHA512. */ 273148456Spjd SHA512_Init(&lctx); 274148456Spjd SHA512_Update(&lctx, ctx->k_opad, sizeof(ctx->k_opad)); 275148456Spjd bzero(ctx, sizeof(*ctx)); 276148456Spjd SHA512_Update(&lctx, digest, sizeof(digest)); 277148456Spjd SHA512_Final(digest, &lctx); 278148456Spjd /* mdsize == 0 means "Give me the whole hash!" */ 279148456Spjd if (mdsize == 0) 280148456Spjd mdsize = SHA512_MDLEN; 281148456Spjd bcopy(digest, md, mdsize); 282148456Spjd} 283148456Spjd 284148456Spjdvoid 285148456Spjdg_eli_crypto_hmac(const uint8_t *hkey, size_t hkeysize, const uint8_t *data, 286148456Spjd size_t datasize, uint8_t *md, size_t mdsize) 287148456Spjd{ 288148456Spjd struct hmac_ctx ctx; 289148456Spjd 290148456Spjd g_eli_crypto_hmac_init(&ctx, hkey, hkeysize); 291148456Spjd g_eli_crypto_hmac_update(&ctx, data, datasize); 292148456Spjd g_eli_crypto_hmac_final(&ctx, md, mdsize); 293148456Spjd} 294