From c96165ed37fc70a28be29641c486470f3b62f276 Mon Sep 17 00:00:00 2001
From: Dmitry Belyavskiy <beldmit@gmail.com>
Date: Sun, 6 Sep 2015 21:52:23 +0300
Subject: [PATCH] MICALG is a EVP_MD callback

---
 gost_md2012.c | 49 +++++++++++++++++++++++++++++++++++++++++++++++--
 1 file changed, 47 insertions(+), 2 deletions(-)

diff --git a/gost_md2012.c b/gost_md2012.c
index 08f3724..e20e660 100644
--- a/gost_md2012.c
+++ b/gost_md2012.c
@@ -19,6 +19,11 @@ static int gost_digest_update(EVP_MD_CTX *ctx, const void *data,
 static int gost_digest_final(EVP_MD_CTX *ctx, unsigned char *md);
 static int gost_digest_copy(EVP_MD_CTX *to, const EVP_MD_CTX *from);
 static int gost_digest_cleanup(EVP_MD_CTX *ctx);
+static int gost_digest_ctrl_256(EVP_MD_CTX *ctx, int type, int arg, void *ptr);
+static int gost_digest_ctrl_512(EVP_MD_CTX *ctx, int type, int arg, void *ptr);
+
+const char micalg_256[] = "gostr3411-2012-256";
+const char micalg_512[] = "gostr3411-2012-512";
 
 EVP_MD digest_gost2012_512 = {
     NID_id_GostR3411_2012_512,
@@ -35,7 +40,7 @@ EVP_MD digest_gost2012_512 = {
     {NID_undef, NID_undef, 0, 0, 0},
     64,                         /* block size */
     sizeof(gost2012_hash_ctx),
-    NULL
+    gost_digest_ctrl_512,
 };
 
 EVP_MD digest_gost2012_256 = {
@@ -53,7 +58,7 @@ EVP_MD digest_gost2012_256 = {
     {NID_undef, NID_undef, 0, 0, 0},
     64,                         /* block size */
     sizeof(gost2012_hash_ctx),
-    NULL
+    gost_digest_ctrl_256
 };
 
 static int gost_digest_init512(EVP_MD_CTX *ctx)
@@ -95,3 +100,43 @@ static int gost_digest_cleanup(EVP_MD_CTX *ctx)
 
     return 1;
 }
+
+static int gost_digest_ctrl_256(EVP_MD_CTX *ctx, int type, int arg, void *ptr)
+  {
+  switch (type)
+    {
+    case EVP_MD_CTRL_MICALG:
+      {
+        *((char **)ptr) = OPENSSL_malloc(strlen(micalg_256)+1);
+        if (*((char **)ptr) != NULL)
+        {
+          strcpy(*((char **)ptr), micalg_256);
+          return 1;
+        }
+        return 0;
+      }
+    default:
+      return 0;
+    }
+  }
+
+static int gost_digest_ctrl_512(EVP_MD_CTX *ctx, int type, int arg, void *ptr)
+  {
+  switch (type)
+    {
+    case EVP_MD_CTRL_MICALG:
+      {
+        *((char **)ptr) = OPENSSL_malloc(strlen(micalg_512)+1);
+        if (*((char **)ptr) != NULL)
+        {
+          strcpy(*((char **)ptr), micalg_512);
+          return 1;
+        }
+        return 0;
+      }
+      return 1;
+    default:
+      return 0;
+    }
+  }
+
-- 
2.39.2