1 /* 2 * Cryptographic API. 3 * 4 * HMAC: Keyed-Hashing for Message Authentication (RFC2104). 5 * 6 * Copyright (c) 2002 James Morris <jmorris@intercode.com.au> 7 * Copyright (c) 2006 Herbert Xu <herbert@gondor.apana.org.au> 8 * 9 * The HMAC implementation is derived from USAGI. 10 * Copyright (c) 2002 Kazunori Miyazawa <miyazawa@linux-ipv6.org> / USAGI 11 * 12 * This program is free software; you can redistribute it and/or modify it 13 * under the terms of the GNU General Public License as published by the Free 14 * Software Foundation; either version 2 of the License, or (at your option) 15 * any later version. 16 * 17 */ 18 19 #include <crypto/hmac.h> 20 #include <crypto/internal/hash.h> 21 #include <crypto/scatterwalk.h> 22 #include <linux/err.h> 23 #include <linux/init.h> 24 #include <linux/kernel.h> 25 #include <linux/module.h> 26 #include <linux/scatterlist.h> 27 #include <linux/string.h> 28 29 struct hmac_ctx { 30 struct crypto_shash *hash; 31 }; 32 33 static inline void *align_ptr(void *p, unsigned int align) 34 { 35 return (void *)ALIGN((unsigned long)p, align); 36 } 37 38 static inline struct hmac_ctx *hmac_ctx(struct crypto_shash *tfm) 39 { 40 return align_ptr(crypto_shash_ctx_aligned(tfm) + 41 crypto_shash_statesize(tfm) * 2, 42 crypto_tfm_ctx_alignment()); 43 } 44 45 static int hmac_setkey(struct crypto_shash *parent, 46 const u8 *inkey, unsigned int keylen) 47 { 48 int bs = crypto_shash_blocksize(parent); 49 int ds = crypto_shash_digestsize(parent); 50 int ss = crypto_shash_statesize(parent); 51 char *ipad = crypto_shash_ctx_aligned(parent); 52 char *opad = ipad + ss; 53 struct hmac_ctx *ctx = align_ptr(opad + ss, 54 crypto_tfm_ctx_alignment()); 55 struct crypto_shash *hash = ctx->hash; 56 SHASH_DESC_ON_STACK(shash, hash); 57 unsigned int i; 58 59 shash->tfm = hash; 60 61 if (keylen > bs) { 62 int err; 63 64 err = crypto_shash_digest(shash, inkey, keylen, ipad); 65 if (err) 66 return err; 67 68 keylen = ds; 69 } else 70 memcpy(ipad, inkey, keylen); 71 72 memset(ipad + keylen, 0, bs - keylen); 73 memcpy(opad, ipad, bs); 74 75 for (i = 0; i < bs; i++) { 76 ipad[i] ^= HMAC_IPAD_VALUE; 77 opad[i] ^= HMAC_OPAD_VALUE; 78 } 79 80 return crypto_shash_init(shash) ?: 81 crypto_shash_update(shash, ipad, bs) ?: 82 crypto_shash_export(shash, ipad) ?: 83 crypto_shash_init(shash) ?: 84 crypto_shash_update(shash, opad, bs) ?: 85 crypto_shash_export(shash, opad); 86 } 87 88 static int hmac_export(struct shash_desc *pdesc, void *out) 89 { 90 struct shash_desc *desc = shash_desc_ctx(pdesc); 91 92 return crypto_shash_export(desc, out); 93 } 94 95 static int hmac_import(struct shash_desc *pdesc, const void *in) 96 { 97 struct shash_desc *desc = shash_desc_ctx(pdesc); 98 struct hmac_ctx *ctx = hmac_ctx(pdesc->tfm); 99 100 desc->tfm = ctx->hash; 101 102 return crypto_shash_import(desc, in); 103 } 104 105 static int hmac_init(struct shash_desc *pdesc) 106 { 107 return hmac_import(pdesc, crypto_shash_ctx_aligned(pdesc->tfm)); 108 } 109 110 static int hmac_update(struct shash_desc *pdesc, 111 const u8 *data, unsigned int nbytes) 112 { 113 struct shash_desc *desc = shash_desc_ctx(pdesc); 114 115 return crypto_shash_update(desc, data, nbytes); 116 } 117 118 static int hmac_final(struct shash_desc *pdesc, u8 *out) 119 { 120 struct crypto_shash *parent = pdesc->tfm; 121 int ds = crypto_shash_digestsize(parent); 122 int ss = crypto_shash_statesize(parent); 123 char *opad = crypto_shash_ctx_aligned(parent) + ss; 124 struct shash_desc *desc = shash_desc_ctx(pdesc); 125 126 return crypto_shash_final(desc, out) ?: 127 crypto_shash_import(desc, opad) ?: 128 crypto_shash_finup(desc, out, ds, out); 129 } 130 131 static int hmac_finup(struct shash_desc *pdesc, const u8 *data, 132 unsigned int nbytes, u8 *out) 133 { 134 135 struct crypto_shash *parent = pdesc->tfm; 136 int ds = crypto_shash_digestsize(parent); 137 int ss = crypto_shash_statesize(parent); 138 char *opad = crypto_shash_ctx_aligned(parent) + ss; 139 struct shash_desc *desc = shash_desc_ctx(pdesc); 140 141 return crypto_shash_finup(desc, data, nbytes, out) ?: 142 crypto_shash_import(desc, opad) ?: 143 crypto_shash_finup(desc, out, ds, out); 144 } 145 146 static int hmac_init_tfm(struct crypto_tfm *tfm) 147 { 148 struct crypto_shash *parent = __crypto_shash_cast(tfm); 149 struct crypto_shash *hash; 150 struct crypto_instance *inst = (void *)tfm->__crt_alg; 151 struct crypto_shash_spawn *spawn = crypto_instance_ctx(inst); 152 struct hmac_ctx *ctx = hmac_ctx(parent); 153 154 hash = crypto_spawn_shash(spawn); 155 if (IS_ERR(hash)) 156 return PTR_ERR(hash); 157 158 parent->descsize = sizeof(struct shash_desc) + 159 crypto_shash_descsize(hash); 160 161 ctx->hash = hash; 162 return 0; 163 } 164 165 static void hmac_exit_tfm(struct crypto_tfm *tfm) 166 { 167 struct hmac_ctx *ctx = hmac_ctx(__crypto_shash_cast(tfm)); 168 crypto_free_shash(ctx->hash); 169 } 170 171 static int hmac_create(struct crypto_template *tmpl, struct rtattr **tb) 172 { 173 struct shash_instance *inst; 174 struct crypto_alg *alg; 175 struct shash_alg *salg; 176 int err; 177 int ds; 178 int ss; 179 180 err = crypto_check_attr_type(tb, CRYPTO_ALG_TYPE_SHASH); 181 if (err) 182 return err; 183 184 salg = shash_attr_alg(tb[1], 0, 0); 185 if (IS_ERR(salg)) 186 return PTR_ERR(salg); 187 alg = &salg->base; 188 189 /* The underlying hash algorithm must be unkeyed */ 190 err = -EINVAL; 191 if (crypto_shash_alg_has_setkey(salg)) 192 goto out_put_alg; 193 194 ds = salg->digestsize; 195 ss = salg->statesize; 196 if (ds > alg->cra_blocksize || 197 ss < alg->cra_blocksize) 198 goto out_put_alg; 199 200 inst = shash_alloc_instance("hmac", alg); 201 err = PTR_ERR(inst); 202 if (IS_ERR(inst)) 203 goto out_put_alg; 204 205 err = crypto_init_shash_spawn(shash_instance_ctx(inst), salg, 206 shash_crypto_instance(inst)); 207 if (err) 208 goto out_free_inst; 209 210 inst->alg.base.cra_priority = alg->cra_priority; 211 inst->alg.base.cra_blocksize = alg->cra_blocksize; 212 inst->alg.base.cra_alignmask = alg->cra_alignmask; 213 214 ss = ALIGN(ss, alg->cra_alignmask + 1); 215 inst->alg.digestsize = ds; 216 inst->alg.statesize = ss; 217 218 inst->alg.base.cra_ctxsize = sizeof(struct hmac_ctx) + 219 ALIGN(ss * 2, crypto_tfm_ctx_alignment()); 220 221 inst->alg.base.cra_init = hmac_init_tfm; 222 inst->alg.base.cra_exit = hmac_exit_tfm; 223 224 inst->alg.init = hmac_init; 225 inst->alg.update = hmac_update; 226 inst->alg.final = hmac_final; 227 inst->alg.finup = hmac_finup; 228 inst->alg.export = hmac_export; 229 inst->alg.import = hmac_import; 230 inst->alg.setkey = hmac_setkey; 231 232 err = shash_register_instance(tmpl, inst); 233 if (err) { 234 out_free_inst: 235 shash_free_instance(shash_crypto_instance(inst)); 236 } 237 238 out_put_alg: 239 crypto_mod_put(alg); 240 return err; 241 } 242 243 static struct crypto_template hmac_tmpl = { 244 .name = "hmac", 245 .create = hmac_create, 246 .free = shash_free_instance, 247 .module = THIS_MODULE, 248 }; 249 250 static int __init hmac_module_init(void) 251 { 252 return crypto_register_template(&hmac_tmpl); 253 } 254 255 static void __exit hmac_module_exit(void) 256 { 257 crypto_unregister_template(&hmac_tmpl); 258 } 259 260 subsys_initcall(hmac_module_init); 261 module_exit(hmac_module_exit); 262 263 MODULE_LICENSE("GPL"); 264 MODULE_DESCRIPTION("HMAC hash algorithm"); 265 MODULE_ALIAS_CRYPTO("hmac"); 266