[linux-block.git] / arch / s390 / crypto / sha512_s390.c

/*
 * Cryptographic API.
 *
 * s390 implementation of the SHA512 and SHA38 Secure Hash Algorithm.
 *
 * Copyright IBM Corp. 2007
 * Author(s): Jan Glauber (jang@de.ibm.com)
 *
 * This program is free software; you can redistribute it and/or modify it
 * under the terms of the GNU General Public License as published by the Free
 * Software Foundation; either version 2 of the License, or (at your option)
 * any later version.
 *
 */
#include <crypto/internal/hash.h>
#include <linux/init.h>
#include <linux/module.h>

#include "sha.h"
#include "crypt_s390.h"

static int sha512_init(struct shash_desc *desc)
{
	struct s390_sha_ctx *ctx = shash_desc_ctx(desc);

	*(__u64 *)&ctx->state[0] = 0x6a09e667f3bcc908ULL;
	*(__u64 *)&ctx->state[2] = 0xbb67ae8584caa73bULL;
	*(__u64 *)&ctx->state[4] = 0x3c6ef372fe94f82bULL;
	*(__u64 *)&ctx->state[6] = 0xa54ff53a5f1d36f1ULL;
	*(__u64 *)&ctx->state[8] = 0x510e527fade682d1ULL;
	*(__u64 *)&ctx->state[10] = 0x9b05688c2b3e6c1fULL;
	*(__u64 *)&ctx->state[12] = 0x1f83d9abfb41bd6bULL;
	*(__u64 *)&ctx->state[14] = 0x5be0cd19137e2179ULL;
	ctx->count = 0;
	ctx->func = KIMD_SHA_512;

	return 0;
}

static struct shash_alg sha512_alg = {
	.digestsize	=	SHA512_DIGEST_SIZE,
	.init		=	sha512_init,
	.update		=	s390_sha_update,
	.final		=	s390_sha_final,
	.descsize	=	sizeof(struct s390_sha_ctx),
	.base		=	{
		.cra_name	=	"sha512",
		.cra_driver_name=	"sha512-s390",
		.cra_priority	=	CRYPT_S390_PRIORITY,
		.cra_flags	=	CRYPTO_ALG_TYPE_SHASH,
		.cra_blocksize	=	SHA512_BLOCK_SIZE,
		.cra_module	=	THIS_MODULE,
	}
};

MODULE_ALIAS("sha512");

static int sha384_init(struct shash_desc *desc)
{
	struct s390_sha_ctx *ctx = shash_desc_ctx(desc);

	*(__u64 *)&ctx->state[0] = 0xcbbb9d5dc1059ed8ULL;
	*(__u64 *)&ctx->state[2] = 0x629a292a367cd507ULL;
	*(__u64 *)&ctx->state[4] = 0x9159015a3070dd17ULL;
	*(__u64 *)&ctx->state[6] = 0x152fecd8f70e5939ULL;
	*(__u64 *)&ctx->state[8] = 0x67332667ffc00b31ULL;
	*(__u64 *)&ctx->state[10] = 0x8eb44a8768581511ULL;
	*(__u64 *)&ctx->state[12] = 0xdb0c2e0d64f98fa7ULL;
	*(__u64 *)&ctx->state[14] = 0x47b5481dbefa4fa4ULL;
	ctx->count = 0;
	ctx->func = KIMD_SHA_512;

	return 0;
}

static struct shash_alg sha384_alg = {
	.digestsize	=	SHA384_DIGEST_SIZE,
	.init		=	sha384_init,
	.update		=	s390_sha_update,
	.final		=	s390_sha_final,
	.descsize	=	sizeof(struct s390_sha_ctx),
	.base		=	{
		.cra_name	=	"sha384",
		.cra_driver_name=	"sha384-s390",
		.cra_priority	=	CRYPT_S390_PRIORITY,
		.cra_flags	=	CRYPTO_ALG_TYPE_SHASH,
		.cra_blocksize	=	SHA384_BLOCK_SIZE,
		.cra_ctxsize	=	sizeof(struct s390_sha_ctx),
		.cra_module	=	THIS_MODULE,
	}
};

MODULE_ALIAS("sha384");

static int __init init(void)
{
	int ret;

	if (!crypt_s390_func_available(KIMD_SHA_512))
		return -EOPNOTSUPP;
	if ((ret = crypto_register_shash(&sha512_alg)) < 0)
		goto out;
	if ((ret = crypto_register_shash(&sha384_alg)) < 0)
		crypto_unregister_shash(&sha512_alg);
out:
	return ret;
}

static void __exit fini(void)
{
	crypto_unregister_shash(&sha512_alg);
	crypto_unregister_shash(&sha384_alg);
}

module_init(init);
module_exit(fini);

MODULE_LICENSE("GPL");
MODULE_DESCRIPTION("SHA512 and SHA-384 Secure Hash Algorithm");
Commit	Line	Data
291dc7c0 JG	1	/*
	2	* Cryptographic API.
	3	*
4e2c6d7f	4	* s390 implementation of the SHA512 and SHA38 Secure Hash Algorithm.
291dc7c0 JG	5	*
	6	* Copyright IBM Corp. 2007
	7	* Author(s): Jan Glauber (jang@de.ibm.com)
	8	*
	9	* This program is free software; you can redistribute it and/or modify it
	10	* under the terms of the GNU General Public License as published by the Free
	11	* Software Foundation; either version 2 of the License, or (at your option)
	12	* any later version.
	13	*
	14	*/
563f346d	15	#include <crypto/internal/hash.h>
291dc7c0 JG	16	#include <linux/init.h>
291dc7c0 JG	17	#include <linux/module.h>
291dc7c0 JG	18
	19	#include "sha.h"
	20	#include "crypt_s390.h"
	21
563f346d	22	static int sha512_init(struct shash_desc *desc)
291dc7c0	23	{
563f346d	24	struct s390_sha_ctx *ctx = shash_desc_ctx(desc);
291dc7c0 JG	25
	26	(__u64 )&ctx->state[0] = 0x6a09e667f3bcc908ULL;
	27	(__u64 )&ctx->state[2] = 0xbb67ae8584caa73bULL;
	28	(__u64 )&ctx->state[4] = 0x3c6ef372fe94f82bULL;
	29	(__u64 )&ctx->state[6] = 0xa54ff53a5f1d36f1ULL;
	30	(__u64 )&ctx->state[8] = 0x510e527fade682d1ULL;
	31	(__u64 )&ctx->state[10] = 0x9b05688c2b3e6c1fULL;
	32	(__u64 )&ctx->state[12] = 0x1f83d9abfb41bd6bULL;
	33	(__u64 )&ctx->state[14] = 0x5be0cd19137e2179ULL;
	34	ctx->count = 0;
	35	ctx->func = KIMD_SHA_512;
563f346d HX	36
563f346d HX	37	return 0;
291dc7c0 JG	38	}
291dc7c0 JG	39
563f346d HX	40	static struct shash_alg sha512_alg = {
	41	.digestsize = SHA512_DIGEST_SIZE,
	42	.init = sha512_init,
	43	.update = s390_sha_update,
	44	.final = s390_sha_final,
	45	.descsize = sizeof(struct s390_sha_ctx),
	46	.base = {
	47	.cra_name = "sha512",
	48	.cra_driver_name= "sha512-s390",
	49	.cra_priority = CRYPT_S390_PRIORITY,
	50	.cra_flags = CRYPTO_ALG_TYPE_SHASH,
	51	.cra_blocksize = SHA512_BLOCK_SIZE,
	52	.cra_module = THIS_MODULE,
	53	}
291dc7c0 JG	54	};
291dc7c0 JG	55
4e2c6d7f JG	56	MODULE_ALIAS("sha512");
4e2c6d7f JG	57
563f346d	58	static int sha384_init(struct shash_desc *desc)
4e2c6d7f	59	{
563f346d	60	struct s390_sha_ctx *ctx = shash_desc_ctx(desc);
4e2c6d7f JG	61
	62	(__u64 )&ctx->state[0] = 0xcbbb9d5dc1059ed8ULL;
	63	(__u64 )&ctx->state[2] = 0x629a292a367cd507ULL;
	64	(__u64 )&ctx->state[4] = 0x9159015a3070dd17ULL;
	65	(__u64 )&ctx->state[6] = 0x152fecd8f70e5939ULL;
	66	(__u64 )&ctx->state[8] = 0x67332667ffc00b31ULL;
	67	(__u64 )&ctx->state[10] = 0x8eb44a8768581511ULL;
	68	(__u64 )&ctx->state[12] = 0xdb0c2e0d64f98fa7ULL;
	69	(__u64 )&ctx->state[14] = 0x47b5481dbefa4fa4ULL;
	70	ctx->count = 0;
	71	ctx->func = KIMD_SHA_512;
563f346d HX	72
563f346d HX	73	return 0;
4e2c6d7f JG	74	}
4e2c6d7f JG	75
563f346d HX	76	static struct shash_alg sha384_alg = {
	77	.digestsize = SHA384_DIGEST_SIZE,
	78	.init = sha384_init,
	79	.update = s390_sha_update,
	80	.final = s390_sha_final,
	81	.descsize = sizeof(struct s390_sha_ctx),
	82	.base = {
	83	.cra_name = "sha384",
	84	.cra_driver_name= "sha384-s390",
	85	.cra_priority = CRYPT_S390_PRIORITY,
	86	.cra_flags = CRYPTO_ALG_TYPE_SHASH,
949abe57	87	.cra_blocksize = SHA384_BLOCK_SIZE,
563f346d HX	88	.cra_ctxsize = sizeof(struct s390_sha_ctx),
	89	.cra_module = THIS_MODULE,
	90	}
4e2c6d7f JG	91	};
	92
	93	MODULE_ALIAS("sha384");
	94
291dc7c0 JG	95	static int __init init(void)
291dc7c0 JG	96	{
4e2c6d7f JG	97	int ret;
4e2c6d7f JG	98
291dc7c0 JG	99	if (!crypt_s390_func_available(KIMD_SHA_512))
291dc7c0 JG	100	return -EOPNOTSUPP;
563f346d	101	if ((ret = crypto_register_shash(&sha512_alg)) < 0)
4e2c6d7f	102	goto out;
563f346d HX	103	if ((ret = crypto_register_shash(&sha384_alg)) < 0)
563f346d HX	104	crypto_unregister_shash(&sha512_alg);
4e2c6d7f JG	105	out:
4e2c6d7f JG	106	return ret;
291dc7c0 JG	107	}
	108
	109	static void __exit fini(void)
	110	{
563f346d HX	111	crypto_unregister_shash(&sha512_alg);
563f346d HX	112	crypto_unregister_shash(&sha384_alg);
291dc7c0 JG	113	}
	114
	115	module_init(init);
	116	module_exit(fini);
	117
291dc7c0	118	MODULE_LICENSE("GPL");
4e2c6d7f	119	MODULE_DESCRIPTION("SHA512 and SHA-384 Secure Hash Algorithm");