From db481f8bedb981bbdb772a016e5d502e0b6d1a1e Mon Sep 17 00:00:00 2001
From: Johan Danielsson <joda@pdc.kth.se>
Date: Sun, 16 Nov 1997 10:53:25 +0000
Subject: [PATCH] Free keys.

git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@4029 ec53bebd-3082-4978-b11e-865c3cabbd6b
---
 kadmin/ank.c | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/kadmin/ank.c b/kadmin/ank.c
index 14aabb34c..58fbeae79 100644
--- a/kadmin/ank.c
+++ b/kadmin/ank.c
@@ -94,11 +94,16 @@ add_new_key(int argc, char **argv)
 	krb5_warn(context, ret, "kadm5_create_principal");
     if(rkey){
 	krb5_keyblock *new_keys;
-	int n_keys;
+	int n_keys, i;
 	ret = kadm5_randkey_principal(kadm_handle, princ_ent, 
 				      &new_keys, &n_keys);
-	if(ret)
+	if(ret){
 	    krb5_warn(context, ret, "kadm5_randkey_principal");
+	    n_keys = 0;
+	}
+	for(i = 0; i < n_keys; i++)
+	    krb5_free_keyblock_contents(context, &new_keys[i]);
+	free(new_keys);
 	kadm5_get_principal(kadm_handle, princ_ent, &princ, 
 			    KADM5_PRINCIPAL | KADM5_ATTRIBUTES);
 	princ.attributes &= (~KRB5_KDB_DISALLOW_ALL_TIX);