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