From 8d5c67a9f8335b0376c8700db69c195775918a94 Mon Sep 17 00:00:00 2001
From: Simo Sorce <ssorce@redhat.com>
Date: Mon, 30 May 2011 15:35:14 -0400
Subject: [PATCH] ipa-kdb: add function to free principals

---
 daemons/ipa-kdb/ipa_kdb_principals.c | 17 ++++++++++++++++-
 1 file changed, 16 insertions(+), 1 deletion(-)

diff --git a/daemons/ipa-kdb/ipa_kdb_principals.c b/daemons/ipa-kdb/ipa_kdb_principals.c
index f42360da5..016fa6a30 100644
--- a/daemons/ipa-kdb/ipa_kdb_principals.c
+++ b/daemons/ipa-kdb/ipa_kdb_principals.c
@@ -837,7 +837,22 @@ done:
 
 void ipadb_free_principal(krb5_context kcontext, krb5_db_entry *entry)
 {
-    return;
+    krb5_tl_data *prev, *next;
+    int i;
+
+    if (entry) {
+        free(entry->e_data);
+        krb5_free_principal(kcontext, entry->princ);
+        prev = entry->tl_data;
+        while(prev) {
+            next = prev->tl_data_next;
+            free(prev->tl_data_contents);
+            free(prev);
+            prev = next;
+        }
+        ipa_krb5_free_key_data(entry->key_data, entry->n_key_data);
+        free(entry);
+    }
 }
 
 krb5_error_code ipadb_put_principal(krb5_context kcontext,