From 1e18ef7d8f7f4885722d2364a0cca978fc7f8290 Mon Sep 17 00:00:00 2001
From: clunis <clunis@0d961d1b-a432-0410-8fea-cc29f225fe07>
Date: Sat, 22 Feb 2003 04:33:29 +0000
Subject: [PATCH] fixed problem with multiple afs service tickets being
 fetched.

git-svn-id: https://modwaklog.svn.sourceforge.net/svnroot/modwaklog/trunk/modwaklog@9 0d961d1b-a432-0410-8fea-cc29f225fe07
---
 mod_waklog.c | 31 ++++++++++++++++++-------------
 1 file changed, 18 insertions(+), 13 deletions(-)

diff --git a/mod_waklog.c b/mod_waklog.c
index cf56456..3338e8d 100644
--- a/mod_waklog.c
+++ b/mod_waklog.c
@@ -115,7 +115,7 @@ pioctl_cleanup( void *data )
 		"mod_waklog: unlog pioctl failed" );
     }
 
-    ap_log_error( APLOG_MARK, APLOG_ERR, r->server,
+    ap_log_error( APLOG_MARK, APLOG_DEBUG, r->server,
 	    "mod_waklog: unlog pioctl succeeded" );
     return;
 }
@@ -147,19 +147,24 @@ waklog_get_tokens( request_rec *r )
         return( DECLINED );
     }
 
-    if (( rc = get_ad_tkt( "afs", "", urealm, 255 )) != KSUCCESS ) {
-	ap_log_error( APLOG_MARK, APLOG_NOERRNO|APLOG_INFO, r->server,
-		"mod_waklog: get_ad_tkt: %s", krb_err_txt[ rc ] );
-
-	/* user doesn't have tickets: use server's srvtab */
-
-	return OK;
-    }
-
     if (( rc = krb_get_cred( "afs", "", urealm, &cr )) != KSUCCESS ) {
 	ap_log_error( APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, r->server,
 		"mod_waklog: krb_get_cred: %s", krb_err_txt[ rc ] );
-	return OK;
+
+	if (( rc = get_ad_tkt( "afs", "", urealm, 255 )) != KSUCCESS ) {
+	    ap_log_error( APLOG_MARK, APLOG_NOERRNO|APLOG_DEBUG, r->server,
+		    "mod_waklog: get_ad_tkt: %s", krb_err_txt[ rc ] );
+
+	    /* user doesn't have tickets: use server's srvtab */
+
+	    return OK;
+	}
+
+	if (( rc = krb_get_cred( "afs", "", urealm, &cr )) != KSUCCESS ) {
+	    ap_log_error( APLOG_MARK, APLOG_NOERRNO|APLOG_ERR, r->server,
+		    "mod_waklog: krb_get_cred: %s", krb_err_txt[ rc ] );
+	    return OK;
+	}
     }
 
     ap_log_error( APLOG_MARK, APLOG_NOERRNO|APLOG_DEBUG, r->server,
@@ -209,8 +214,8 @@ waklog_get_tokens( request_rec *r )
     /* we'll need to unlog when this connection is done. */
     ap_register_cleanup( r->pool, (void *)r, pioctl_cleanup, ap_null_cleanup );
 
-ap_log_error( APLOG_MARK, APLOG_INFO|APLOG_NOERRNO, r->server,
-	"mod_waklog: done with token stuff" );
+    ap_log_error( APLOG_MARK, APLOG_DEBUG|APLOG_NOERRNO, r->server,
+	    "mod_waklog: finished with get_token" );
 
     return OK;
 }
-- 
2.20.1