kim_ccache_iterator_next leaks principal

ticket: new

git-svn-id: svn://anonsvn.mit.edu/krb5/trunk@20905 dc483132-0cff-0310-8789-dd5450dbe970

diff --git a/src/kim/lib/kim_ccache.c b/src/kim/lib/kim_ccache.c
index 26e926d3b79dc21033672b2b3c00f3eb6187bc05..cf6a18315ed0feb9de5c56e9757818cef0d9553e 100644 (file)
--- a/src/kim/lib/kim_ccache.c
+++ b/src/kim/lib/kim_ccache.c
@@ -108,6 +108,9 @@ kim_error kim_ccache_iterator_next (kim_ccache_iterator  in_ccache_iterator,
             ccache = NULL;
             err = KIM_NO_ERROR;
         }
+        
+        if (principal) { krb5_free_principal (in_ccache_iterator->context, 
+                                              principal); }
     }
     
     if (!err) {