* 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.4 1987-10-20 15:09:22 mar
+ * replace hardcoded ATHENA realm with call to get_krbrlm();
*
+ * Revision 1.3 87/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.
*
sms_params params_st;
char *args[1];
int argl[1];
-
+ char realm[REALM_SZ];
+
register sms_params *params = ¶ms_st;
sms_params *reply = NULL;
KTEXT_ST auth;
* The "service" and "instance" should not be hardcoded here.
*/
- status = mk_ap_req(&auth, "sms", "sms", "ATHENA.MIT.EDU", 0);
+ if ((status = get_krbrlm(realm, 1)) != KSUCCESS) {
+ return status;
+ }
+ status = mk_ap_req(&auth, "sms", "sms", realm, 0);
if (status != KSUCCESS) {
status += krb_err_base;
return status;