From ad8e719ef716284f7d428f5656335c6115c7ced1 Mon Sep 17 00:00:00 2001
From: Johan Danielsson <joda@pdc.kth.se>
Date: Mon, 28 Aug 2000 12:12:28 +0000
Subject: [PATCH] set KRBTKFILE

git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@9016 ec53bebd-3082-4978-b11e-865c3cabbd6b
---
 appl/su/su.c | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)

diff --git a/appl/su/su.c b/appl/su/su.c
index 08ebaad5a..3055fef94 100644
--- a/appl/su/su.c
+++ b/appl/su/su.c
@@ -207,8 +207,25 @@ krb5_start_session(void)
     asprintf(&cc_name, "%s:%s", krb5_cc_get_type(context, ccache2),
 	     krb5_cc_get_name(context, ccache2));
     setenv("KRB5CCNAME", cc_name, 1);
+
+    /* we want to export this even if we don't directly support KRB4 */
+    {
+#ifndef TKT_ROOT
+#define TKT_ROOT "/tmp/tkt"
+#endif
+	int fd;
+	char tkfile[256];
+	strlcpy(tkfile, TKT_ROOT, sizeof(tkfile));
+	strlcat(tkfile, "_XXXXXX", sizeof(tkfile));
+	fd = mkstemp(tkfile);
+	if(fd >= 0) {
+	    close(fd);
+	    setenv("KRBTKFILE", tkfile, 1);
+	}
+    }
             
 #ifdef KRB4
+    /* convert creds? */
     if(k_hasafs()) {
 	if (k_setpag() == 0)
 	    krb5_afslog(context, ccache2, NULL, NULL);