From: Simon Josefsson <simon@josefsson.org>
Date: Mon, 16 Aug 2004 20:21:02 +0000 (+0000)
Subject: Fix.
X-Git-Tag: gnutls_1_0_20~18
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=2a6b8d4f88e527cdae6fc2ed178589b623ee4659;p=thirdparty%2Fgnutls.git

Fix.
---

diff --git a/crypto/gc-nettle.c b/crypto/gc-nettle.c
index dc38c5f7ac..18669c1c6d 100644
--- a/crypto/gc-nettle.c
+++ b/crypto/gc-nettle.c
@@ -425,6 +425,7 @@ gc_hash_clone (gc_hash handle, gc_hash * outhandle)
     }
 
   memcpy (newhinf->context, oldhinf->context, newhinf->info->context_size);
+  memcpy (newhinf->digest, oldhinf->digest, MAX_DIGEST_SIZE);
 
   *outhandle = newhinf;
 
@@ -493,6 +494,11 @@ gc_hash_close (gc_hash handle)
 {
   hinfo *hinf = (hinfo*) handle;
 
+  if (hinf->mode == GC_HMAC)
+    {
+      free (hinf->inner);
+      free (hinf->outer);
+    }
   free (hinf->context);
   free (hinf);
 }