| Jan Glauber | 0a497c17 | 2006-01-06 00:19:18 -0800 | [diff] [blame] | 1 | /* | 
|  | 2 | * Cryptographic API. | 
|  | 3 | * | 
|  | 4 | * s390 implementation of the SHA256 Secure Hash Algorithm. | 
|  | 5 | * | 
|  | 6 | * s390 Version: | 
| Jan Glauber | 86aa9fc | 2007-02-05 21:18:14 +0100 | [diff] [blame] | 7 | *   Copyright IBM Corp. 2005,2007 | 
| Jan Glauber | 0a497c17 | 2006-01-06 00:19:18 -0800 | [diff] [blame] | 8 | *   Author(s): Jan Glauber (jang@de.ibm.com) | 
|  | 9 | * | 
| Sebastian Siewior | ad5d278 | 2007-10-08 11:45:10 +0800 | [diff] [blame] | 10 | * Derived from "crypto/sha256_generic.c" | 
| Jan Glauber | 0a497c17 | 2006-01-06 00:19:18 -0800 | [diff] [blame] | 11 | * and "arch/s390/crypto/sha1_s390.c" | 
|  | 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 | */ | 
| Herbert Xu | 563f346 | 2009-01-18 20:33:33 +1100 | [diff] [blame] | 19 | #include <crypto/internal/hash.h> | 
| Jan Glauber | 0a497c17 | 2006-01-06 00:19:18 -0800 | [diff] [blame] | 20 | #include <linux/init.h> | 
|  | 21 | #include <linux/module.h> | 
| Jan Glauber | 5265eeb | 2007-10-09 22:43:13 +0800 | [diff] [blame] | 22 | #include <crypto/sha.h> | 
| Jan Glauber | 0a497c17 | 2006-01-06 00:19:18 -0800 | [diff] [blame] | 23 |  | 
|  | 24 | #include "crypt_s390.h" | 
| Jan Glauber | 604973f | 2008-03-06 19:50:20 +0800 | [diff] [blame] | 25 | #include "sha.h" | 
| Jan Glauber | 0a497c17 | 2006-01-06 00:19:18 -0800 | [diff] [blame] | 26 |  | 
| Herbert Xu | 563f346 | 2009-01-18 20:33:33 +1100 | [diff] [blame] | 27 | static int sha256_init(struct shash_desc *desc) | 
| Jan Glauber | 0a497c17 | 2006-01-06 00:19:18 -0800 | [diff] [blame] | 28 | { | 
| Herbert Xu | 563f346 | 2009-01-18 20:33:33 +1100 | [diff] [blame] | 29 | struct s390_sha_ctx *sctx = shash_desc_ctx(desc); | 
| Jan Glauber | 0a497c17 | 2006-01-06 00:19:18 -0800 | [diff] [blame] | 30 |  | 
| Jan Glauber | 5265eeb | 2007-10-09 22:43:13 +0800 | [diff] [blame] | 31 | sctx->state[0] = SHA256_H0; | 
|  | 32 | sctx->state[1] = SHA256_H1; | 
|  | 33 | sctx->state[2] = SHA256_H2; | 
|  | 34 | sctx->state[3] = SHA256_H3; | 
|  | 35 | sctx->state[4] = SHA256_H4; | 
|  | 36 | sctx->state[5] = SHA256_H5; | 
|  | 37 | sctx->state[6] = SHA256_H6; | 
|  | 38 | sctx->state[7] = SHA256_H7; | 
| Jan Glauber | 0a497c17 | 2006-01-06 00:19:18 -0800 | [diff] [blame] | 39 | sctx->count = 0; | 
| Jan Glauber | 604973f | 2008-03-06 19:50:20 +0800 | [diff] [blame] | 40 | sctx->func = KIMD_SHA_256; | 
| Herbert Xu | 563f346 | 2009-01-18 20:33:33 +1100 | [diff] [blame] | 41 |  | 
|  | 42 | return 0; | 
| Jan Glauber | 0a497c17 | 2006-01-06 00:19:18 -0800 | [diff] [blame] | 43 | } | 
|  | 44 |  | 
| Herbert Xu | f63559b | 2009-07-10 13:20:32 +0800 | [diff] [blame] | 45 | static int sha256_export(struct shash_desc *desc, void *out) | 
|  | 46 | { | 
|  | 47 | struct s390_sha_ctx *sctx = shash_desc_ctx(desc); | 
|  | 48 | struct sha256_state *octx = out; | 
|  | 49 |  | 
|  | 50 | octx->count = sctx->count; | 
|  | 51 | memcpy(octx->state, sctx->state, sizeof(octx->state)); | 
|  | 52 | memcpy(octx->buf, sctx->buf, sizeof(octx->buf)); | 
|  | 53 | return 0; | 
|  | 54 | } | 
|  | 55 |  | 
| Jan Glauber | 81bd5f6 | 2009-09-05 16:27:35 +1000 | [diff] [blame] | 56 | static int sha256_import(struct shash_desc *desc, const void *in) | 
| Herbert Xu | f63559b | 2009-07-10 13:20:32 +0800 | [diff] [blame] | 57 | { | 
| Sachin Sant | 2a549c3 | 2009-07-16 19:58:42 +0800 | [diff] [blame] | 58 | struct s390_sha_ctx *sctx = shash_desc_ctx(desc); | 
| Jan Glauber | 81bd5f6 | 2009-09-05 16:27:35 +1000 | [diff] [blame] | 59 | const struct sha256_state *ictx = in; | 
| Herbert Xu | f63559b | 2009-07-10 13:20:32 +0800 | [diff] [blame] | 60 |  | 
|  | 61 | sctx->count = ictx->count; | 
|  | 62 | memcpy(sctx->state, ictx->state, sizeof(ictx->state)); | 
|  | 63 | memcpy(sctx->buf, ictx->buf, sizeof(ictx->buf)); | 
|  | 64 | sctx->func = KIMD_SHA_256; | 
|  | 65 | return 0; | 
|  | 66 | } | 
|  | 67 |  | 
| Herbert Xu | 563f346 | 2009-01-18 20:33:33 +1100 | [diff] [blame] | 68 | static struct shash_alg alg = { | 
|  | 69 | .digestsize	=	SHA256_DIGEST_SIZE, | 
|  | 70 | .init		=	sha256_init, | 
|  | 71 | .update		=	s390_sha_update, | 
|  | 72 | .final		=	s390_sha_final, | 
| Herbert Xu | f63559b | 2009-07-10 13:20:32 +0800 | [diff] [blame] | 73 | .export		=	sha256_export, | 
|  | 74 | .import		=	sha256_import, | 
| Herbert Xu | 563f346 | 2009-01-18 20:33:33 +1100 | [diff] [blame] | 75 | .descsize	=	sizeof(struct s390_sha_ctx), | 
| Herbert Xu | f63559b | 2009-07-10 13:20:32 +0800 | [diff] [blame] | 76 | .statesize	=	sizeof(struct sha256_state), | 
| Herbert Xu | 563f346 | 2009-01-18 20:33:33 +1100 | [diff] [blame] | 77 | .base		=	{ | 
|  | 78 | .cra_name	=	"sha256", | 
|  | 79 | .cra_driver_name=	"sha256-s390", | 
|  | 80 | .cra_priority	=	CRYPT_S390_PRIORITY, | 
|  | 81 | .cra_flags	=	CRYPTO_ALG_TYPE_SHASH, | 
|  | 82 | .cra_blocksize	=	SHA256_BLOCK_SIZE, | 
|  | 83 | .cra_module	=	THIS_MODULE, | 
|  | 84 | } | 
| Jan Glauber | 0a497c17 | 2006-01-06 00:19:18 -0800 | [diff] [blame] | 85 | }; | 
|  | 86 |  | 
| Heiko Carstens | 9f7819c | 2008-04-17 07:46:17 +0200 | [diff] [blame] | 87 | static int sha256_s390_init(void) | 
| Jan Glauber | 0a497c17 | 2006-01-06 00:19:18 -0800 | [diff] [blame] | 88 | { | 
| Jan Glauber | 1822bc9 | 2011-04-19 21:29:14 +0200 | [diff] [blame] | 89 | if (!crypt_s390_func_available(KIMD_SHA_256, CRYPT_S390_MSA)) | 
| Jan Glauber | 86aa9fc | 2007-02-05 21:18:14 +0100 | [diff] [blame] | 90 | return -EOPNOTSUPP; | 
| Jan Glauber | 0a497c17 | 2006-01-06 00:19:18 -0800 | [diff] [blame] | 91 |  | 
| Herbert Xu | 563f346 | 2009-01-18 20:33:33 +1100 | [diff] [blame] | 92 | return crypto_register_shash(&alg); | 
| Jan Glauber | 0a497c17 | 2006-01-06 00:19:18 -0800 | [diff] [blame] | 93 | } | 
|  | 94 |  | 
| Heiko Carstens | 9f7819c | 2008-04-17 07:46:17 +0200 | [diff] [blame] | 95 | static void __exit sha256_s390_fini(void) | 
| Jan Glauber | 0a497c17 | 2006-01-06 00:19:18 -0800 | [diff] [blame] | 96 | { | 
| Herbert Xu | 563f346 | 2009-01-18 20:33:33 +1100 | [diff] [blame] | 97 | crypto_unregister_shash(&alg); | 
| Jan Glauber | 0a497c17 | 2006-01-06 00:19:18 -0800 | [diff] [blame] | 98 | } | 
|  | 99 |  | 
| Heiko Carstens | 9f7819c | 2008-04-17 07:46:17 +0200 | [diff] [blame] | 100 | module_init(sha256_s390_init); | 
|  | 101 | module_exit(sha256_s390_fini); | 
| Jan Glauber | 0a497c17 | 2006-01-06 00:19:18 -0800 | [diff] [blame] | 102 |  | 
|  | 103 | MODULE_ALIAS("sha256"); | 
| Jan Glauber | 0a497c17 | 2006-01-06 00:19:18 -0800 | [diff] [blame] | 104 | MODULE_LICENSE("GPL"); | 
|  | 105 | MODULE_DESCRIPTION("SHA256 Secure Hash Algorithm"); |