From 61a30996acab311d4787fa6622c8e9729d79a306 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Love=20H=C3=B6rnquist=20=C3=85strand?= <lha@kth.se>
Date: Wed, 28 Jun 2006 14:38:24 +0000
Subject: [PATCH] (gss_krb5_import_cred): almost an implementation

git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@17720 ec53bebd-3082-4978-b11e-865c3cabbd6b
---
 lib/gssapi/mech/gss_krb5.c | 25 +++++++++++++++++++++++--
 1 file changed, 23 insertions(+), 2 deletions(-)

diff --git a/lib/gssapi/mech/gss_krb5.c b/lib/gssapi/mech/gss_krb5.c
index 6269ad242..7610da6b5 100644
--- a/lib/gssapi/mech/gss_krb5.c
+++ b/lib/gssapi/mech/gss_krb5.c
@@ -94,8 +94,29 @@ gss_krb5_import_cred(OM_uint32 *minor_status,
 		     krb5_keytab keytab,
 		     gss_cred_id_t *cred)
 {
-    *minor_status = EINVAL;
-    return GSS_S_FAILURE;
+    OM_uint32 major_status;
+    krb5_storage *sp;
+    krb5_data data;
+    gss_buffer_desc buffer;
+
+    sp = krb5_storage_emem();
+
+    krb5_store_string(sp, "");
+    krb5_store_string(sp, "");
+    krb5_store_string(sp, "");
+
+    krb5_storage_to_data(sp, &data);
+    krb5_storage_free(sp);
+
+    buffer.value = data.data;
+    buffer.length = data.length;
+    
+    major_status = gss_set_cred_option(minor_status,
+				       cred,
+				       GSS_KRB5_IMPORT_CRED_X,
+				       &buffer);
+    krb5_data_free(&data);
+    return major_status;
 }
 
 #if 0