From: Unknown <>
Date: Thu, 31 Aug 2006 01:33:16 +0000 (+0000)
Subject: add files for 2006-08-31T01:33:16Z
X-Git-Tag: imap-2007a1~262
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=07139661e65b721ec18ef8ee3501ecd17c04840b;p=uw-imap

add files for 2006-08-31T01:33:16Z
---

diff --git a/src/osdep/unix/ckp_afs.c b/src/osdep/unix/ckp_afs.c
new file mode 100644
index 0000000..2f3fa6b
--- /dev/null
+++ b/src/osdep/unix/ckp_afs.c
@@ -0,0 +1,71 @@
+/* ========================================================================
+ * Copyright 1988-2006 University of Washington
+ *
+ * Licensed under the Apache License, Version 2.0 (the "License");
+ * you may not use this file except in compliance with the License.
+ * You may obtain a copy of the License at
+ *
+ *     http://www.apache.org/licenses/LICENSE-2.0
+ *
+ * 
+ * ========================================================================
+ */
+
+/*
+ * Program:	AFS check password
+ *
+ * Author:	Mark Crispin
+ *		Networks and Distributed Computing
+ *		Computing & Communications
+ *		University of Washington
+ *		Administration Building, AG-44
+ *		Seattle, WA  98195
+ *		Internet: MRC@CAC.Washington.EDU
+ *
+ * Date:	1 August 1988
+ * Last Edited:	30 August 2006
+ */
+
+/* AFS cleanup
+ * Accepts: data
+ */
+
+void checkpw_cleanup (void *data)
+{
+  ktc_ForgetAllTokens ();
+}
+
+
+/* Check password
+ * Accepts: login passwd struct
+ *	    password string
+ *	    argument count
+ *	    argument vector
+ * Returns: passwd struct if password validated, NIL otherwise
+ */
+
+#undef INIT
+#define min AFS_MIN
+#define max AFS_MAX
+#include <afs/param.h>
+#include <afs/kautils.h>
+
+struct passwd *checkpw (struct passwd *pw,char *pass,int argc,char *argv[])
+{
+  char *reason;
+				/* faster validation for POP servers */
+  if (!strcmp ((char *) mail_parameters (NIL,GET_SERVICENAME,NIL),"pop")) {
+    struct ktc_encryptionKey key;
+    struct ktc_token token;
+				/* just check the password */
+    ka_StringToKey (pass,NIL,&key);
+    if (ka_GetAdminToken (pw->pw_name,"","",&key,600,&token,1)) return NIL;
+  }
+				/* check password and get AFS token */
+  else if (ka_UserAuthenticateGeneral
+	   (KA_USERAUTH_VERSION + KA_USERAUTH_DOSETPAG,pw->pw_name,NIL,NIL,
+	    pass,0,0,0,&reason)) return NIL;
+				/* arm hook to delete credentials */
+  mail_parameters (NIL,SET_LOGOUTHOOK,(void *) checkpw_cleanup);
+  return pw;
+}