find realm at runtime; don't use hard-coded one

diff --git a/reg_svr/reg_svr.c b/reg_svr/reg_svr.c
index a353404e347e245c58fd317037208ec0c1748e10..b8d2e676d5357ca7c7e5068d9ea7fb67d6246bb9 100644 (file)
--- a/reg_svr/reg_svr.c
+++ b/reg_svr/reg_svr.c
@@ -11,9 +11,12 @@
  *     admin_server, and is a server for the userreg program.
  * 
  *     $Log$
- *     Revision 1.7  1988-02-08 15:08:15  mar
- *     Moved header file locations
+ *     Revision 1.8  1988-07-20 15:39:25  mar
+ *     find realm at runtime; don't use hard-coded one
  *
+ * Revision 1.7  88/02/08  15:08:15  mar
+ * Moved header file locations
+ * 
  * Revision 1.6  87/09/21  15:19:11  wesommer
  * Allow numbers, _, and . as legal characters in the username.
  * 
@@ -44,6 +47,7 @@ static char *rcsid_reg_svr_c = "$Header$";
 #include <sys/socket.h>
 #include <netinet/in.h>
 #include <netdb.h>
+#include <krb.h>
 #include <des.h>
 #include <errno.h>
 #include <ctype.h>
@@ -54,7 +58,7 @@ static char *rcsid_reg_svr_c = "$Header$";
 #include "admin_err.h"
 #include <strings.h>
 
-extern void abort();
+extern int abort();
 extern char *strdup();
 extern char *malloc();
 extern int krb_err_base;
@@ -299,6 +303,7 @@ reserve_user(message)
     int i;
     char *login;
     char uid_buf[20];
+    char realm[REALM_SZ];
     
     com_err("reg_svr", 0, " reserve_user %s %s\n",
            message->first, message->last);
@@ -342,7 +347,11 @@ reserve_user(message)
     
     /* Send request to kerberos admin_server for login name */
     /* get keys */
-    status = get_svc_in_tkt("register", "sms", "ATHENA.MIT.EDU",
+    if ((status = get_krbrlm(realm, 1)) != KSUCCESS) {
+       status += krb_err_base;
+       goto punt;
+    }
+    status = get_svc_in_tkt("register", "sms", realm,
                            "changepw", "kerberos",
                            1, "/etc/srvtab");
     if (status) {
@@ -423,6 +432,7 @@ set_password(message)
     char *argv[3];
     int status;
     char uid_buf[10];
+    char realm[REALM_SZ];
     
     com_err("reg_svr", 0, " set_password %s %s\n",
            message->first, message->last);
@@ -450,7 +460,10 @@ set_password(message)
     }
 
     /* get keys */
-    status = get_svc_in_tkt("register", "sms", "ATHENA.MIT.EDU",
+    if ((status = get_krbrlm(realm, 1)) != KSUCCESS) {
+       goto punt;
+    }
+    status = get_svc_in_tkt("register", "sms", realm,
                            "changepw", "kerberos",
                            1, "/etc/srvtab");
     if (status) {