Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 1 | /* |
| 2 | * Cryptographic API. |
| 3 | * |
| 4 | * SHA1 Secure Hash Algorithm. |
| 5 | * |
| 6 | * Derived from cryptoapi implementation, adapted for in-place |
| 7 | * scatterlist interface. |
| 8 | * |
| 9 | * Copyright (c) Alan Smithee. |
| 10 | * Copyright (c) Andrew McDonald <andrew@mcdonald.org.uk> |
| 11 | * Copyright (c) Jean-Francois Dive <jef@linuxbe.org> |
| 12 | * |
| 13 | * This program is free software; you can redistribute it and/or modify it |
| 14 | * under the terms of the GNU General Public License as published by the Free |
| 15 | * Software Foundation; either version 2 of the License, or (at your option) |
| 16 | * any later version. |
| 17 | * |
| 18 | */ |
Adrian-Ken Rueegsegger | 54ccb36 | 2008-12-02 21:08:20 +0800 | [diff] [blame] | 19 | #include <crypto/internal/hash.h> |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 20 | #include <linux/init.h> |
| 21 | #include <linux/module.h> |
| 22 | #include <linux/mm.h> |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 23 | #include <linux/cryptohash.h> |
Herbert Xu | 06ace7a | 2005-10-30 21:25:15 +1100 | [diff] [blame] | 24 | #include <linux/types.h> |
Jan Glauber | 5265eeb | 2007-10-09 22:43:13 +0800 | [diff] [blame] | 25 | #include <crypto/sha.h> |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 26 | #include <asm/byteorder.h> |
| 27 | |
Adrian-Ken Rueegsegger | 54ccb36 | 2008-12-02 21:08:20 +0800 | [diff] [blame] | 28 | static int sha1_init(struct shash_desc *desc) |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 29 | { |
Herbert Xu | e2a7ce4 | 2009-07-09 21:27:13 +0800 | [diff] [blame] | 30 | struct sha1_state *sctx = shash_desc_ctx(desc); |
Adrian-Ken Rueegsegger | 54ccb36 | 2008-12-02 21:08:20 +0800 | [diff] [blame] | 31 | |
Herbert Xu | e2a7ce4 | 2009-07-09 21:27:13 +0800 | [diff] [blame] | 32 | *sctx = (struct sha1_state){ |
| 33 | .state = { SHA1_H0, SHA1_H1, SHA1_H2, SHA1_H3, SHA1_H4 }, |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 34 | }; |
| 35 | |
Adrian-Ken Rueegsegger | 54ccb36 | 2008-12-02 21:08:20 +0800 | [diff] [blame] | 36 | return 0; |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 37 | } |
| 38 | |
Adrian-Ken Rueegsegger | 54ccb36 | 2008-12-02 21:08:20 +0800 | [diff] [blame] | 39 | static int sha1_update(struct shash_desc *desc, const u8 *data, |
Herbert Xu | 6c2bb98 | 2006-05-16 22:09:29 +1000 | [diff] [blame] | 40 | unsigned int len) |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 41 | { |
Herbert Xu | e2a7ce4 | 2009-07-09 21:27:13 +0800 | [diff] [blame] | 42 | struct sha1_state *sctx = shash_desc_ctx(desc); |
Nicolas Pitre | 9d70a6c | 2005-11-13 10:59:54 +1100 | [diff] [blame] | 43 | unsigned int partial, done; |
Nicolas Pitre | cfa8d17 | 2005-11-13 10:47:20 +1100 | [diff] [blame] | 44 | const u8 *src; |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 45 | |
Nicolas Pitre | fa9b98f | 2005-11-13 11:17:33 +1100 | [diff] [blame] | 46 | partial = sctx->count & 0x3f; |
| 47 | sctx->count += len; |
Nicolas Pitre | 9d70a6c | 2005-11-13 10:59:54 +1100 | [diff] [blame] | 48 | done = 0; |
Nicolas Pitre | cfa8d17 | 2005-11-13 10:47:20 +1100 | [diff] [blame] | 49 | src = data; |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 50 | |
Nicolas Pitre | 9d70a6c | 2005-11-13 10:59:54 +1100 | [diff] [blame] | 51 | if ((partial + len) > 63) { |
Nicolas Pitre | cfa8d17 | 2005-11-13 10:47:20 +1100 | [diff] [blame] | 52 | u32 temp[SHA_WORKSPACE_WORDS]; |
| 53 | |
Nicolas Pitre | 9d70a6c | 2005-11-13 10:59:54 +1100 | [diff] [blame] | 54 | if (partial) { |
Herbert Xu | bcb0ad2 | 2005-12-21 19:01:58 +0800 | [diff] [blame] | 55 | done = -partial; |
| 56 | memcpy(sctx->buffer + partial, data, done + 64); |
Nicolas Pitre | cfa8d17 | 2005-11-13 10:47:20 +1100 | [diff] [blame] | 57 | src = sctx->buffer; |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 58 | } |
Nicolas Pitre | cfa8d17 | 2005-11-13 10:47:20 +1100 | [diff] [blame] | 59 | |
| 60 | do { |
| 61 | sha_transform(sctx->state, src, temp); |
Nicolas Pitre | 9d70a6c | 2005-11-13 10:59:54 +1100 | [diff] [blame] | 62 | done += 64; |
| 63 | src = data + done; |
| 64 | } while (done + 63 < len); |
Nicolas Pitre | cfa8d17 | 2005-11-13 10:47:20 +1100 | [diff] [blame] | 65 | |
| 66 | memset(temp, 0, sizeof(temp)); |
Nicolas Pitre | 9d70a6c | 2005-11-13 10:59:54 +1100 | [diff] [blame] | 67 | partial = 0; |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 68 | } |
Nicolas Pitre | 9d70a6c | 2005-11-13 10:59:54 +1100 | [diff] [blame] | 69 | memcpy(sctx->buffer + partial, src, len - done); |
Adrian-Ken Rueegsegger | 54ccb36 | 2008-12-02 21:08:20 +0800 | [diff] [blame] | 70 | |
| 71 | return 0; |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 72 | } |
| 73 | |
| 74 | |
| 75 | /* Add padding and return the message digest. */ |
Adrian-Ken Rueegsegger | 54ccb36 | 2008-12-02 21:08:20 +0800 | [diff] [blame] | 76 | static int sha1_final(struct shash_desc *desc, u8 *out) |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 77 | { |
Herbert Xu | e2a7ce4 | 2009-07-09 21:27:13 +0800 | [diff] [blame] | 78 | struct sha1_state *sctx = shash_desc_ctx(desc); |
Herbert Xu | 06ace7a | 2005-10-30 21:25:15 +1100 | [diff] [blame] | 79 | __be32 *dst = (__be32 *)out; |
| 80 | u32 i, index, padlen; |
| 81 | __be64 bits; |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 82 | static const u8 padding[64] = { 0x80, }; |
| 83 | |
Nicolas Pitre | fa9b98f | 2005-11-13 11:17:33 +1100 | [diff] [blame] | 84 | bits = cpu_to_be64(sctx->count << 3); |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 85 | |
| 86 | /* Pad out to 56 mod 64 */ |
Nicolas Pitre | fa9b98f | 2005-11-13 11:17:33 +1100 | [diff] [blame] | 87 | index = sctx->count & 0x3f; |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 88 | padlen = (index < 56) ? (56 - index) : ((64+56) - index); |
Adrian-Ken Rueegsegger | 54ccb36 | 2008-12-02 21:08:20 +0800 | [diff] [blame] | 89 | sha1_update(desc, padding, padlen); |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 90 | |
| 91 | /* Append length */ |
Adrian-Ken Rueegsegger | 54ccb36 | 2008-12-02 21:08:20 +0800 | [diff] [blame] | 92 | sha1_update(desc, (const u8 *)&bits, sizeof(bits)); |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 93 | |
| 94 | /* Store state in digest */ |
Herbert Xu | 06ace7a | 2005-10-30 21:25:15 +1100 | [diff] [blame] | 95 | for (i = 0; i < 5; i++) |
| 96 | dst[i] = cpu_to_be32(sctx->state[i]); |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 97 | |
| 98 | /* Wipe context */ |
| 99 | memset(sctx, 0, sizeof *sctx); |
Adrian-Ken Rueegsegger | 54ccb36 | 2008-12-02 21:08:20 +0800 | [diff] [blame] | 100 | |
| 101 | return 0; |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 102 | } |
| 103 | |
Herbert Xu | e2a7ce4 | 2009-07-09 21:27:13 +0800 | [diff] [blame] | 104 | static int sha1_export(struct shash_desc *desc, void *out) |
| 105 | { |
| 106 | struct sha1_state *sctx = shash_desc_ctx(desc); |
| 107 | |
| 108 | memcpy(out, sctx, sizeof(*sctx)); |
| 109 | return 0; |
| 110 | } |
| 111 | |
| 112 | static int sha1_import(struct shash_desc *desc, const void *in) |
| 113 | { |
| 114 | struct sha1_state *sctx = shash_desc_ctx(desc); |
| 115 | |
| 116 | memcpy(sctx, in, sizeof(*sctx)); |
| 117 | return 0; |
| 118 | } |
| 119 | |
Adrian-Ken Rueegsegger | 54ccb36 | 2008-12-02 21:08:20 +0800 | [diff] [blame] | 120 | static struct shash_alg alg = { |
| 121 | .digestsize = SHA1_DIGEST_SIZE, |
| 122 | .init = sha1_init, |
| 123 | .update = sha1_update, |
| 124 | .final = sha1_final, |
Herbert Xu | e2a7ce4 | 2009-07-09 21:27:13 +0800 | [diff] [blame] | 125 | .export = sha1_export, |
| 126 | .import = sha1_import, |
| 127 | .descsize = sizeof(struct sha1_state), |
| 128 | .statesize = sizeof(struct sha1_state), |
Adrian-Ken Rueegsegger | 54ccb36 | 2008-12-02 21:08:20 +0800 | [diff] [blame] | 129 | .base = { |
| 130 | .cra_name = "sha1", |
| 131 | .cra_driver_name= "sha1-generic", |
| 132 | .cra_flags = CRYPTO_ALG_TYPE_SHASH, |
| 133 | .cra_blocksize = SHA1_BLOCK_SIZE, |
| 134 | .cra_module = THIS_MODULE, |
| 135 | } |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 136 | }; |
| 137 | |
Kamalesh Babulal | 3af5b90 | 2008-04-05 21:00:57 +0800 | [diff] [blame] | 138 | static int __init sha1_generic_mod_init(void) |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 139 | { |
Adrian-Ken Rueegsegger | 54ccb36 | 2008-12-02 21:08:20 +0800 | [diff] [blame] | 140 | return crypto_register_shash(&alg); |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 141 | } |
| 142 | |
Kamalesh Babulal | 3af5b90 | 2008-04-05 21:00:57 +0800 | [diff] [blame] | 143 | static void __exit sha1_generic_mod_fini(void) |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 144 | { |
Adrian-Ken Rueegsegger | 54ccb36 | 2008-12-02 21:08:20 +0800 | [diff] [blame] | 145 | crypto_unregister_shash(&alg); |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 146 | } |
| 147 | |
Kamalesh Babulal | 3af5b90 | 2008-04-05 21:00:57 +0800 | [diff] [blame] | 148 | module_init(sha1_generic_mod_init); |
| 149 | module_exit(sha1_generic_mod_fini); |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 150 | |
| 151 | MODULE_LICENSE("GPL"); |
| 152 | MODULE_DESCRIPTION("SHA1 Secure Hash Algorithm"); |
Michal Ludvig | b3be9a6 | 2006-07-09 08:59:38 +1000 | [diff] [blame] | 153 | |
Sebastian Siewior | ad5d278 | 2007-10-08 11:45:10 +0800 | [diff] [blame] | 154 | MODULE_ALIAS("sha1"); |