From de628b7a2f37d8044def74152b09652b576d1b90 Mon Sep 17 00:00:00 2001
From: Assar Westerlund <assar@sics.se>
Date: Sun, 16 Mar 1997 17:16:37 +0000
Subject: [PATCH] (krb5_cc_get_name): return default if `id' == NULL

git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@1437 ec53bebd-3082-4978-b11e-865c3cabbd6b
---
 lib/krb5/cache.c | 11 +++++++++--
 1 file changed, 9 insertions(+), 2 deletions(-)

diff --git a/lib/krb5/cache.c b/lib/krb5/cache.c
index 05ec8d38c..1fad75eba 100644
--- a/lib/krb5/cache.c
+++ b/lib/krb5/cache.c
@@ -73,7 +73,14 @@ char*
 krb5_cc_get_name(krb5_context context,
 		 krb5_ccache id)
 {
-    return ((krb5_fcache*)(id->data.data))->filename;
+    if (id)
+	return ((krb5_fcache*)(id->data.data))->filename;
+    else {
+	char *f = krb5_cc_default_name (context);
+	if (strncmp (f, "FILE:", 5))
+	    abort ();
+	return f + 5;
+    }
 }
 
 char*
@@ -303,7 +310,7 @@ krb5_cc_start_seq_get (krb5_context context,
     krb5_ret_int16 (sp, &tag);
     krb5_ret_principal (sp, &principal);
     krb5_storage_free(sp);
-    krb5_free_principal (principal);
+    krb5_free_principal (context, principal);
     return 0;
 }