| 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 |  | 
| Mathias Krause | 7c39017 | 2011-08-04 20:19:24 +0200 | [diff] [blame] | 39 | int crypto_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 |  | 
| Mandeep Singh Baines | 36ca239 | 2011-06-27 15:41:56 +0800 | [diff] [blame] | 46 | 	partial = sctx->count % SHA1_BLOCK_SIZE; | 
| Nicolas Pitre | fa9b98f | 2005-11-13 11:17:33 +1100 | [diff] [blame] | 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 |  | 
| Mandeep Singh Baines | 36ca239 | 2011-06-27 15:41:56 +0800 | [diff] [blame] | 51 | 	if ((partial + len) >= SHA1_BLOCK_SIZE) { | 
| 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; | 
| Mandeep Singh Baines | 36ca239 | 2011-06-27 15:41:56 +0800 | [diff] [blame] | 56 | 			memcpy(sctx->buffer + partial, data, | 
 | 57 | 			       done + SHA1_BLOCK_SIZE); | 
| Nicolas Pitre | cfa8d17 | 2005-11-13 10:47:20 +1100 | [diff] [blame] | 58 | 			src = sctx->buffer; | 
| Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 59 | 		} | 
| Nicolas Pitre | cfa8d17 | 2005-11-13 10:47:20 +1100 | [diff] [blame] | 60 |  | 
 | 61 | 		do { | 
 | 62 | 			sha_transform(sctx->state, src, temp); | 
| Mandeep Singh Baines | 36ca239 | 2011-06-27 15:41:56 +0800 | [diff] [blame] | 63 | 			done += SHA1_BLOCK_SIZE; | 
| Nicolas Pitre | 9d70a6c | 2005-11-13 10:59:54 +1100 | [diff] [blame] | 64 | 			src = data + done; | 
| Mandeep Singh Baines | 36ca239 | 2011-06-27 15:41:56 +0800 | [diff] [blame] | 65 | 		} while (done + SHA1_BLOCK_SIZE <= len); | 
| Nicolas Pitre | cfa8d17 | 2005-11-13 10:47:20 +1100 | [diff] [blame] | 66 |  | 
 | 67 | 		memset(temp, 0, sizeof(temp)); | 
| Nicolas Pitre | 9d70a6c | 2005-11-13 10:59:54 +1100 | [diff] [blame] | 68 | 		partial = 0; | 
| Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 69 | 	} | 
| Nicolas Pitre | 9d70a6c | 2005-11-13 10:59:54 +1100 | [diff] [blame] | 70 | 	memcpy(sctx->buffer + partial, src, len - done); | 
| Adrian-Ken Rueegsegger | 54ccb36 | 2008-12-02 21:08:20 +0800 | [diff] [blame] | 71 |  | 
 | 72 | 	return 0; | 
| Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 73 | } | 
| Mathias Krause | 7c39017 | 2011-08-04 20:19:24 +0200 | [diff] [blame] | 74 | EXPORT_SYMBOL(crypto_sha1_update); | 
| Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 75 |  | 
 | 76 |  | 
 | 77 | /* Add padding and return the message digest. */ | 
| Adrian-Ken Rueegsegger | 54ccb36 | 2008-12-02 21:08:20 +0800 | [diff] [blame] | 78 | static int sha1_final(struct shash_desc *desc, u8 *out) | 
| Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 79 | { | 
| Herbert Xu | e2a7ce4 | 2009-07-09 21:27:13 +0800 | [diff] [blame] | 80 | 	struct sha1_state *sctx = shash_desc_ctx(desc); | 
| Herbert Xu | 06ace7a | 2005-10-30 21:25:15 +1100 | [diff] [blame] | 81 | 	__be32 *dst = (__be32 *)out; | 
 | 82 | 	u32 i, index, padlen; | 
 | 83 | 	__be64 bits; | 
| Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 84 | 	static const u8 padding[64] = { 0x80, }; | 
 | 85 |  | 
| Nicolas Pitre | fa9b98f | 2005-11-13 11:17:33 +1100 | [diff] [blame] | 86 | 	bits = cpu_to_be64(sctx->count << 3); | 
| Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 87 |  | 
 | 88 | 	/* Pad out to 56 mod 64 */ | 
| Nicolas Pitre | fa9b98f | 2005-11-13 11:17:33 +1100 | [diff] [blame] | 89 | 	index = sctx->count & 0x3f; | 
| Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 90 | 	padlen = (index < 56) ? (56 - index) : ((64+56) - index); | 
| Mathias Krause | 7c39017 | 2011-08-04 20:19:24 +0200 | [diff] [blame] | 91 | 	crypto_sha1_update(desc, padding, padlen); | 
| Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 92 |  | 
 | 93 | 	/* Append length */ | 
| Mathias Krause | 7c39017 | 2011-08-04 20:19:24 +0200 | [diff] [blame] | 94 | 	crypto_sha1_update(desc, (const u8 *)&bits, sizeof(bits)); | 
| Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 95 |  | 
 | 96 | 	/* Store state in digest */ | 
| Herbert Xu | 06ace7a | 2005-10-30 21:25:15 +1100 | [diff] [blame] | 97 | 	for (i = 0; i < 5; i++) | 
 | 98 | 		dst[i] = cpu_to_be32(sctx->state[i]); | 
| Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 99 |  | 
 | 100 | 	/* Wipe context */ | 
 | 101 | 	memset(sctx, 0, sizeof *sctx); | 
| Adrian-Ken Rueegsegger | 54ccb36 | 2008-12-02 21:08:20 +0800 | [diff] [blame] | 102 |  | 
 | 103 | 	return 0; | 
| Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 104 | } | 
 | 105 |  | 
| Herbert Xu | e2a7ce4 | 2009-07-09 21:27:13 +0800 | [diff] [blame] | 106 | static int sha1_export(struct shash_desc *desc, void *out) | 
 | 107 | { | 
 | 108 | 	struct sha1_state *sctx = shash_desc_ctx(desc); | 
 | 109 |  | 
 | 110 | 	memcpy(out, sctx, sizeof(*sctx)); | 
 | 111 | 	return 0; | 
 | 112 | } | 
 | 113 |  | 
 | 114 | static int sha1_import(struct shash_desc *desc, const void *in) | 
 | 115 | { | 
 | 116 | 	struct sha1_state *sctx = shash_desc_ctx(desc); | 
 | 117 |  | 
 | 118 | 	memcpy(sctx, in, sizeof(*sctx)); | 
 | 119 | 	return 0; | 
 | 120 | } | 
 | 121 |  | 
| Adrian-Ken Rueegsegger | 54ccb36 | 2008-12-02 21:08:20 +0800 | [diff] [blame] | 122 | static struct shash_alg alg = { | 
 | 123 | 	.digestsize	=	SHA1_DIGEST_SIZE, | 
 | 124 | 	.init		=	sha1_init, | 
| Mathias Krause | 7c39017 | 2011-08-04 20:19:24 +0200 | [diff] [blame] | 125 | 	.update		=	crypto_sha1_update, | 
| Adrian-Ken Rueegsegger | 54ccb36 | 2008-12-02 21:08:20 +0800 | [diff] [blame] | 126 | 	.final		=	sha1_final, | 
| Herbert Xu | e2a7ce4 | 2009-07-09 21:27:13 +0800 | [diff] [blame] | 127 | 	.export		=	sha1_export, | 
 | 128 | 	.import		=	sha1_import, | 
 | 129 | 	.descsize	=	sizeof(struct sha1_state), | 
 | 130 | 	.statesize	=	sizeof(struct sha1_state), | 
| Adrian-Ken Rueegsegger | 54ccb36 | 2008-12-02 21:08:20 +0800 | [diff] [blame] | 131 | 	.base		=	{ | 
 | 132 | 		.cra_name	=	"sha1", | 
 | 133 | 		.cra_driver_name=	"sha1-generic", | 
 | 134 | 		.cra_flags	=	CRYPTO_ALG_TYPE_SHASH, | 
 | 135 | 		.cra_blocksize	=	SHA1_BLOCK_SIZE, | 
 | 136 | 		.cra_module	=	THIS_MODULE, | 
 | 137 | 	} | 
| Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 138 | }; | 
 | 139 |  | 
| Kamalesh Babulal | 3af5b90 | 2008-04-05 21:00:57 +0800 | [diff] [blame] | 140 | static int __init sha1_generic_mod_init(void) | 
| Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 141 | { | 
| Adrian-Ken Rueegsegger | 54ccb36 | 2008-12-02 21:08:20 +0800 | [diff] [blame] | 142 | 	return crypto_register_shash(&alg); | 
| Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 143 | } | 
 | 144 |  | 
| Kamalesh Babulal | 3af5b90 | 2008-04-05 21:00:57 +0800 | [diff] [blame] | 145 | static void __exit sha1_generic_mod_fini(void) | 
| Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 146 | { | 
| Adrian-Ken Rueegsegger | 54ccb36 | 2008-12-02 21:08:20 +0800 | [diff] [blame] | 147 | 	crypto_unregister_shash(&alg); | 
| Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 148 | } | 
 | 149 |  | 
| Kamalesh Babulal | 3af5b90 | 2008-04-05 21:00:57 +0800 | [diff] [blame] | 150 | module_init(sha1_generic_mod_init); | 
 | 151 | module_exit(sha1_generic_mod_fini); | 
| Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 152 |  | 
 | 153 | MODULE_LICENSE("GPL"); | 
 | 154 | MODULE_DESCRIPTION("SHA1 Secure Hash Algorithm"); | 
| Michal Ludvig | b3be9a6 | 2006-07-09 08:59:38 +1000 | [diff] [blame] | 155 |  | 
| Sebastian Siewior | ad5d278 | 2007-10-08 11:45:10 +0800 | [diff] [blame] | 156 | MODULE_ALIAS("sha1"); |