blob: f6de7826c9790a26fa96f6a4b6d6294924fdb696 [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -07001/*
2 * Cryptographic API.
3 *
Jan Glauberc1e26e12006-01-06 00:19:17 -08004 * s390 implementation of the SHA1 Secure Hash Algorithm.
Linus Torvalds1da177e2005-04-16 15:20:36 -07005 *
6 * Derived from cryptoapi implementation, adapted for in-place
7 * scatterlist interface. Originally based on the public domain
8 * implementation written by Steve Reid.
9 *
10 * s390 Version:
Jan Glauber86aa9fc2007-02-05 21:18:14 +010011 * Copyright IBM Corp. 2003,2007
12 * Author(s): Thomas Spatzier
13 * Jan Glauber (jan.glauber@de.ibm.com)
Linus Torvalds1da177e2005-04-16 15:20:36 -070014 *
Sebastian Siewiorad5d2782007-10-08 11:45:10 +080015 * Derived from "crypto/sha1_generic.c"
Linus Torvalds1da177e2005-04-16 15:20:36 -070016 * Copyright (c) Alan Smithee.
17 * Copyright (c) Andrew McDonald <andrew@mcdonald.org.uk>
18 * Copyright (c) Jean-Francois Dive <jef@linuxbe.org>
19 *
20 * This program is free software; you can redistribute it and/or modify it
21 * under the terms of the GNU General Public License as published by the Free
22 * Software Foundation; either version 2 of the License, or (at your option)
23 * any later version.
24 *
25 */
Herbert Xu563f3462009-01-18 20:33:33 +110026#include <crypto/internal/hash.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070027#include <linux/init.h>
28#include <linux/module.h>
Jan Glauber5265eeb2007-10-09 22:43:13 +080029#include <crypto/sha.h>
Jan Glauber131a3952007-04-27 16:01:54 +020030
Jan Glauberc1e26e12006-01-06 00:19:17 -080031#include "crypt_s390.h"
Jan Glauber604973f2008-03-06 19:50:20 +080032#include "sha.h"
Linus Torvalds1da177e2005-04-16 15:20:36 -070033
Herbert Xu563f3462009-01-18 20:33:33 +110034static int sha1_init(struct shash_desc *desc)
Linus Torvalds1da177e2005-04-16 15:20:36 -070035{
Herbert Xu563f3462009-01-18 20:33:33 +110036 struct s390_sha_ctx *sctx = shash_desc_ctx(desc);
Jan Glauber86aa9fc2007-02-05 21:18:14 +010037
Jan Glauber5265eeb2007-10-09 22:43:13 +080038 sctx->state[0] = SHA1_H0;
39 sctx->state[1] = SHA1_H1;
40 sctx->state[2] = SHA1_H2;
41 sctx->state[3] = SHA1_H3;
42 sctx->state[4] = SHA1_H4;
Jan Glauber131a3952007-04-27 16:01:54 +020043 sctx->count = 0;
Jan Glauber604973f2008-03-06 19:50:20 +080044 sctx->func = KIMD_SHA_1;
Herbert Xu563f3462009-01-18 20:33:33 +110045
46 return 0;
Linus Torvalds1da177e2005-04-16 15:20:36 -070047}
48
Herbert Xu406f1042009-07-10 13:18:26 +080049static int sha1_export(struct shash_desc *desc, void *out)
50{
51 struct s390_sha_ctx *sctx = shash_desc_ctx(desc);
52 struct sha1_state *octx = out;
53
54 octx->count = sctx->count;
55 memcpy(octx->state, sctx->state, sizeof(octx->state));
56 memcpy(octx->buffer, sctx->buf, sizeof(octx->buffer));
57 return 0;
58}
59
Jan Glauber81bd5f62009-09-05 16:27:35 +100060static int sha1_import(struct shash_desc *desc, const void *in)
Herbert Xu406f1042009-07-10 13:18:26 +080061{
Sachin Sant2a549c32009-07-16 19:58:42 +080062 struct s390_sha_ctx *sctx = shash_desc_ctx(desc);
Jan Glauber81bd5f62009-09-05 16:27:35 +100063 const struct sha1_state *ictx = in;
Herbert Xu406f1042009-07-10 13:18:26 +080064
65 sctx->count = ictx->count;
66 memcpy(sctx->state, ictx->state, sizeof(ictx->state));
67 memcpy(sctx->buf, ictx->buffer, sizeof(ictx->buffer));
68 sctx->func = KIMD_SHA_1;
69 return 0;
70}
71
Herbert Xu563f3462009-01-18 20:33:33 +110072static struct shash_alg alg = {
73 .digestsize = SHA1_DIGEST_SIZE,
74 .init = sha1_init,
75 .update = s390_sha_update,
76 .final = s390_sha_final,
Herbert Xu406f1042009-07-10 13:18:26 +080077 .export = sha1_export,
78 .import = sha1_import,
Herbert Xu563f3462009-01-18 20:33:33 +110079 .descsize = sizeof(struct s390_sha_ctx),
Herbert Xu406f1042009-07-10 13:18:26 +080080 .statesize = sizeof(struct sha1_state),
Herbert Xu563f3462009-01-18 20:33:33 +110081 .base = {
82 .cra_name = "sha1",
83 .cra_driver_name= "sha1-s390",
84 .cra_priority = CRYPT_S390_PRIORITY,
85 .cra_flags = CRYPTO_ALG_TYPE_SHASH,
86 .cra_blocksize = SHA1_BLOCK_SIZE,
87 .cra_module = THIS_MODULE,
88 }
Linus Torvalds1da177e2005-04-16 15:20:36 -070089};
90
Heiko Carstens9f7819c2008-04-17 07:46:17 +020091static int __init sha1_s390_init(void)
Linus Torvalds1da177e2005-04-16 15:20:36 -070092{
Jan Glauber86aa9fc2007-02-05 21:18:14 +010093 if (!crypt_s390_func_available(KIMD_SHA_1))
94 return -EOPNOTSUPP;
Herbert Xu563f3462009-01-18 20:33:33 +110095 return crypto_register_shash(&alg);
Linus Torvalds1da177e2005-04-16 15:20:36 -070096}
97
Heiko Carstens9f7819c2008-04-17 07:46:17 +020098static void __exit sha1_s390_fini(void)
Linus Torvalds1da177e2005-04-16 15:20:36 -070099{
Herbert Xu563f3462009-01-18 20:33:33 +1100100 crypto_unregister_shash(&alg);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700101}
102
Heiko Carstens9f7819c2008-04-17 07:46:17 +0200103module_init(sha1_s390_init);
104module_exit(sha1_s390_fini);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700105
106MODULE_ALIAS("sha1");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700107MODULE_LICENSE("GPL");
108MODULE_DESCRIPTION("SHA1 Secure Hash Algorithm");