From d87d72c8bf60efceacbb48ddcfdfc9c29b6abee1 Mon Sep 17 00:00:00 2001
From: Assar Westerlund <assar@sics.se>
Date: Sun, 19 Jan 1997 05:20:04 +0000
Subject: [PATCH] Implement `krb5_auth_con_getkey' and `krb5_free_keyblock'

git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@1172 ec53bebd-3082-4978-b11e-865c3cabbd6b
---
 lib/krb5/auth_context.c | 15 ++++++++++++---
 1 file changed, 12 insertions(+), 3 deletions(-)

diff --git a/lib/krb5/auth_context.c b/lib/krb5/auth_context.c
index e59e64dcc..fbb43c099 100644
--- a/lib/krb5/auth_context.c
+++ b/lib/krb5/auth_context.c
@@ -79,14 +79,23 @@ krb5_auth_con_getkey(krb5_context context,
 		     krb5_auth_context auth_context,
 		     krb5_keyblock **keyblock)
 {
+  *keyblock = malloc(sizeof(**keyblock));
+  if (*keyblock == NULL)
+    return ENOMEM;
+  (*keyblock)->keytype = auth_context->key.keytype;
+  (*keyblock)->contents.length = 0;
+  return krb5_data_copy (&(*keyblock)->contents,
+			 auth_context->key.contents.data,
+			 auth_context->key.contents.length);
 }
 
 
-/* ??? */
 void
-krb5_free_keyblock(krb5_keyblock *keyblock)
+krb5_free_keyblock(krb5_context context,
+		   krb5_keyblock *keyblock)
 {
-  
+  krb5_data_free (&keyblock->contents);
+  free (keyblock);
 }
 
 krb5_error_code