* $Author$
* $Header$
*
- * Copyright (C) 1987 by the Massachusetts Institute of Technology
- *
- * $Log$
- * Revision 1.3 1987-06-16 17:47:20 wesommer
- * Clean up memory allocation, indenting.
- *
- * Revision 1.2 87/05/31 22:03:23 wesommer
- * It's working better.
- *
- * Revision 1.1 87/05/20 03:11:18 wesommer
- * Initial revision
- *
+ * Copyright (C) 1987, 1990 by the Massachusetts Institute of Technology
+ * For copying and distribution information, please see the file
+ * <mit-copyright.h>.
*
* Handles the client side of the sending of authenticators to
- * the sms server.
+ * the mr server.
*/
#ifndef lint
static char *rcsid_sms_auth_c = "$Header$";
#endif lint
-#include "sms_private.h"
+#include <mit-copyright.h>
+#include "mr_private.h"
+#include <ctype.h>
#include <krb.h>
+#include <krb_et.h>
+#include <strings.h>
-extern int krb_err_base;
+/* Authenticate this client with the MR server. prog is the name of the
+ * client program, and will be recorded in the database.
+ */
-int sms_auth()
+int mr_auth(prog)
+char *prog;
{
register int status;
- sms_params params_st;
- char *args[1];
- int argl[1];
-
- register sms_params *params = ¶ms_st;
- sms_params *reply = NULL;
+ mr_params params_st;
+ char *args[2];
+ int argl[2];
+ char realm[REALM_SZ], host[BUFSIZ], *p;
+
+ register mr_params *params = ¶ms_st;
+ mr_params *reply = NULL;
KTEXT_ST auth;
CHECK_CONNECTED;
- /*
- * Build a Kerberos authenticator.
- * The "service" and "instance" should not be hardcoded here.
- */
+ /* Build a Kerberos authenticator. */
- status = mk_ap_req(&auth, "sms", "sms", "ATHENA.MIT.EDU", 0);
+ bzero(host, sizeof(host));
+ if (status = mr_host(host, sizeof(host) - 1))
+ return status;
+
+ strcpy(realm, krb_realmofhost(host));
+ for (p = host; *p && *p != '.'; p++)
+ if (isupper(*p))
+ *p = tolower(*p);
+ *p = 0;
+
+ status = krb_mk_req(&auth, MOIRA_SNAME, host, realm, 0);
if (status != KSUCCESS) {
- status += krb_err_base;
+ status += ERROR_TABLE_BASE_krb;
return status;
- }
- params->sms_procno = SMS_AUTH;
- params->sms_argc = 1;
- params->sms_argv = args;
- params->sms_argl = argl;
- params->sms_argv[0] = (char *)auth.dat;
- params->sms_argl[0] = auth.length;
+ }
+ params->mr_version_no = sending_version_no;
+ params->mr_procno = MR_AUTH;
+ params->mr_argc = 2;
+ params->mr_argv = args;
+ params->mr_argl = argl;
+ params->mr_argv[0] = (char *)auth.dat;
+ params->mr_argl[0] = auth.length;
+ params->mr_argv[1] = prog;
+ params->mr_argl[1] = strlen(prog) + 1;
- if ((status = sms_do_call(params, &reply)) == 0)
- status = reply->sms_status;
+ if (sending_version_no == MR_VERSION_1)
+ params->mr_argc = 1;
+
+ if ((status = mr_do_call(params, &reply)) == 0)
+ status = reply->mr_status;
- sms_destroy_reply(reply);
+ mr_destroy_reply(reply);
return status;
}
-
-/*
- * Local Variables:
- * mode: c
- * c-indent-level: 4
- * c-continued-statement-offset: 4
- * c-brace-offset: -4
- * c-argdecl-indent: 4
- * c-label-offset: -4
- * End:
- */