6 * Copyright (C) 1987 by the Massachusetts Institute of Technology
9 * Revision 1.4 1987-10-20 15:09:22 mar
10 * replace hardcoded ATHENA realm with call to get_krbrlm();
12 * Revision 1.3 87/06/16 17:47:20 wesommer
13 * Clean up memory allocation, indenting.
15 * Revision 1.2 87/05/31 22:03:23 wesommer
16 * It's working better.
18 * Revision 1.1 87/05/20 03:11:18 wesommer
22 * Handles the client side of the sending of authenticators to
27 static char *rcsid_sms_auth_c = "$Header$";
30 #include "sms_private.h"
33 extern int krb_err_base;
43 register sms_params *params = ¶ms_st;
44 sms_params *reply = NULL;
50 * Build a Kerberos authenticator.
51 * The "service" and "instance" should not be hardcoded here.
54 if ((status = get_krbrlm(realm, 1)) != KSUCCESS) {
57 status = mk_ap_req(&auth, "sms", "sms", realm, 0);
58 if (status != KSUCCESS) {
59 status += krb_err_base;
62 params->sms_procno = SMS_AUTH;
64 params->sms_argv = args;
65 params->sms_argl = argl;
66 params->sms_argv[0] = (char *)auth.dat;
67 params->sms_argl[0] = auth.length;
69 if ((status = sms_do_call(params, &reply)) == 0)
70 status = reply->sms_status;
72 sms_destroy_reply(reply);
81 * c-continued-statement-offset: 4