1 /**********************************************************************
3 * Copyright (c) 2005-2006 Cryptocom LTD *
4 * This file is distributed under the same license as OpenSSL *
6 * OpenSSL interface to GOST R 34.11-94 hash functions *
7 * Requires OpenSSL 0.9.9 for compilation *
8 **********************************************************************/
12 #include "e_gost_err.h"
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,
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);
22 static EVP_MD *_hidden_GostR3411_94_md = NULL;
24 EVP_MD *digest_gost(void)
26 if (_hidden_GostR3411_94_md == NULL) {
29 if ((md = EVP_MD_meth_new(NID_id_GostR3411_94, NID_undef)) == NULL
30 #if (OPENSSL_VERSION_NUMBER <= 0x10002100L)
31 || !EVP_MD_meth_set_flags(md, EVP_MD_FLAG_PKEY_METHOD_SIGNATURE)
33 || !EVP_MD_meth_set_result_size(md, 32)
34 || !EVP_MD_meth_set_input_blocksize(md, 32)
35 || !EVP_MD_meth_set_app_datasize(md,
37 ossl_gost_digest_ctx))
38 || !EVP_MD_meth_set_init(md, gost_digest_init)
39 || !EVP_MD_meth_set_update(md, gost_digest_update)
40 || !EVP_MD_meth_set_final(md, gost_digest_final)
41 || !EVP_MD_meth_set_copy(md, gost_digest_copy)
42 || !EVP_MD_meth_set_cleanup(md, gost_digest_cleanup)) {
46 _hidden_GostR3411_94_md = md;
48 return _hidden_GostR3411_94_md;
51 void digest_gost_destroy(void)
53 EVP_MD_meth_free(_hidden_GostR3411_94_md);
54 _hidden_GostR3411_94_md = NULL;
57 int gost_digest_init(EVP_MD_CTX *ctx)
59 struct ossl_gost_digest_ctx *c = EVP_MD_CTX_md_data(ctx);
60 memset(&(c->dctx), 0, sizeof(gost_hash_ctx));
61 gost_init(&(c->cctx), &GostR3411_94_CryptoProParamSet);
62 c->dctx.cipher_ctx = &(c->cctx);
66 int gost_digest_update(EVP_MD_CTX *ctx, const void *data, size_t count)
68 return hash_block((gost_hash_ctx *) EVP_MD_CTX_md_data(ctx), data, count);
71 int gost_digest_final(EVP_MD_CTX *ctx, unsigned char *md)
73 return finish_hash((gost_hash_ctx *) EVP_MD_CTX_md_data(ctx), md);
77 int gost_digest_copy(EVP_MD_CTX *to, const EVP_MD_CTX *from)
79 struct ossl_gost_digest_ctx *md_ctx = EVP_MD_CTX_md_data(to);
80 if (EVP_MD_CTX_md_data(to) && EVP_MD_CTX_md_data(from)) {
81 memcpy(EVP_MD_CTX_md_data(to), EVP_MD_CTX_md_data(from),
82 sizeof(struct ossl_gost_digest_ctx));
83 md_ctx->dctx.cipher_ctx = &(md_ctx->cctx);
88 int gost_digest_cleanup(EVP_MD_CTX *ctx)
90 if (EVP_MD_CTX_md_data(ctx))
91 memset(EVP_MD_CTX_md_data(ctx), 0,
92 sizeof(struct ossl_gost_digest_ctx));