same

diff --git a/reg_svr/reg_svr.c b/reg_svr/reg_svr.c
index b67163066bea85ceee45a97769e1dfcc75c89d45..5c3bf230fe232447ffc76dce8bf88f51258f03e1 100644 (file)
--- a/reg_svr/reg_svr.c
+++ b/reg_svr/reg_svr.c
@@ -11,10 +11,13 @@
  *      admin_server, and is a server for the userreg program.
  * 
  *      $Log$
- *      Revision 1.11  1988-08-02 01:41:38  qjb
- *      Yet another almost finished version.  Ready for attack of kerberos problems
- *      and testing.
+ *      Revision 1.12  1988-08-02 16:44:58  qjb
+ *      same
  *
+ * Revision 1.11  88/08/02  01:41:38  qjb
+ * Yet another almost finished version.  Ready for attack of kerberos problems
+ * and testing.
+ * 
  * Revision 1.10  88/08/01  18:17:58  qjb
  * Almost finished version supporting new SMS protocol.
  * Kerberos problems.
@@ -92,6 +95,9 @@ static char *rcsid_reg_svr_c = "$Header$";
 #define UID_LEN 7              /* Allow room for a 16 bit number */
 
 #define DEBUG
+/* This MUST be correct!  There isn't a good way of getting this without
+   hardcoding that would not make testing impractical. */
+#define KRB_HOST "dodo"
 
 extern char *strdup();
 extern char *malloc();
@@ -255,6 +261,13 @@ main(argc,argv)
     }
 }
 
+/* This is necessary so that this server can know where to put its
+   tickets. */
+char *tkt_string()
+{
+    return("/tmp/tkt_ureg");
+}
+
 void format_pkt(packet, pktlenp, seqno, status, message)
   char *packet;
   int *pktlenp;
@@ -722,7 +735,7 @@ int ureg_get_tkt()
     if (status == SUCCESS)
        /* principal, instance, realm, service, service instance, life, file */
        if (status = get_svc_in_tkt("register", "sms", realm, "changepw", 
-                                   "kerberos", 1, KEYFILE))
+                                   KRB_HOST,   1, KEYFILE))
            status += krb_err_base;
 
     return status;