Adapt all engines that add new EVP_MDs
[openssl.git] / engines / ccgost / gost_md.c
1 /**********************************************************************
2  *                          md_gost.c                                 *
3  *             Copyright (c) 2005-2006 Cryptocom LTD                  *
4  *         This file is distributed under the same license as OpenSSL *
5  *                                                                    *
6  *       OpenSSL interface to GOST R 34.11-94 hash functions          *
7  *          Requires OpenSSL 0.9.9 for compilation                    *
8  **********************************************************************/
9 #include <string.h>
10 #include "gost_lcl.h"
11 #include "gosthash.h"
12 #include "e_gost_err.h"
13
14 /* implementation of GOST 34.11 hash function See gost_md.c*/
15 static int gost_digest_init(EVP_MD_CTX *ctx);
16 static int gost_digest_update(EVP_MD_CTX *ctx, const void *data,
17                               size_t count);
18 static int gost_digest_final(EVP_MD_CTX *ctx, unsigned char *md);
19 static int gost_digest_copy(EVP_MD_CTX *to, const EVP_MD_CTX *from);
20 static int gost_digest_cleanup(EVP_MD_CTX *ctx);
21
22 static EVP_MD *_hidden_GostR3411_94_md = NULL;
23 EVP_MD *digest_gost(void)
24 {
25
26     if (_hidden_GostR3411_94_md == NULL) {
27         EVP_MD *md;
28
29         if ((md = EVP_MD_meth_new(NID_id_GostR3411_94, NID_undef)) == NULL
30             || !EVP_MD_meth_set_result_size(md, 32)
31             || !EVP_MD_meth_set_input_blocksize(md, 32)
32             || !EVP_MD_meth_set_app_datasize(md,
33                                              sizeof(struct ossl_gost_digest_ctx))
34             || !EVP_MD_meth_set_init(md, gost_digest_init)
35             || !EVP_MD_meth_set_update(md, gost_digest_update)
36             || !EVP_MD_meth_set_final(md, gost_digest_final)
37             || !EVP_MD_meth_set_copy(md, gost_digest_copy)
38             || !EVP_MD_meth_set_cleanup(md, gost_digest_cleanup)) {
39             EVP_MD_meth_free(md);
40             md = NULL;
41         }
42         _hidden_GostR3411_94_md = md;
43     }
44     return _hidden_GostR3411_94_md;
45 }
46 void digest_gost_destroy(void)
47 {
48     EVP_MD_meth_free(_hidden_GostR3411_94_md);
49     _hidden_GostR3411_94_md = NULL;
50 }
51
52 int gost_digest_init(EVP_MD_CTX *ctx)
53 {
54     struct ossl_gost_digest_ctx *c = EVP_MD_CTX_md_data(ctx);
55     memset(&(c->dctx), 0, sizeof(gost_hash_ctx));
56     gost_init(&(c->cctx), &GostR3411_94_CryptoProParamSet);
57     c->dctx.cipher_ctx = &(c->cctx);
58     return 1;
59 }
60
61 int gost_digest_update(EVP_MD_CTX *ctx, const void *data, size_t count)
62 {
63     return hash_block((gost_hash_ctx *) EVP_MD_CTX_md_data(ctx), data, count);
64 }
65
66 int gost_digest_final(EVP_MD_CTX *ctx, unsigned char *md)
67 {
68     return finish_hash((gost_hash_ctx *) EVP_MD_CTX_md_data(ctx), md);
69
70 }
71
72 int gost_digest_copy(EVP_MD_CTX *to, const EVP_MD_CTX *from)
73 {
74     struct ossl_gost_digest_ctx *md_ctx = EVP_MD_CTX_md_data(to);
75     if (EVP_MD_CTX_md_data(to) && EVP_MD_CTX_md_data(from)) {
76         memcpy(EVP_MD_CTX_md_data(to), EVP_MD_CTX_md_data(from),
77                sizeof(struct ossl_gost_digest_ctx));
78         md_ctx->dctx.cipher_ctx = &(md_ctx->cctx);
79     }
80     return 1;
81 }
82
83 int gost_digest_cleanup(EVP_MD_CTX *ctx)
84 {
85     if (EVP_MD_CTX_md_data(ctx))
86         memset(EVP_MD_CTX_md_data(ctx), 0, sizeof(struct ossl_gost_digest_ctx));
87     return 1;
88 }