]> andersk Git - moira.git/blame_incremental - lib/mr_auth.c
added passwd.sh
[moira.git] / lib / mr_auth.c
... / ...
CommitLineData
1/*
2 * $Source$
3 * $Author$
4 * $Header$
5 *
6 * Copyright (C) 1987 by the Massachusetts Institute of Technology
7 * For copying and distribution information, please see the file
8 * <mit-copyright.h>.
9 *
10 * Handles the client side of the sending of authenticators to
11 * the sms server.
12 */
13
14#ifndef lint
15static char *rcsid_sms_auth_c = "$Header$";
16#endif lint
17
18#include <mit-copyright.h>
19#include "sms_private.h"
20#include <krb.h>
21#include <krb_et.h>
22
23/* Authenticate this client with the SMS server. prog is the name of the
24 * client program, and will be recorded in the database.
25 */
26
27int sms_auth(prog)
28char *prog;
29{
30 register int status;
31 sms_params params_st;
32 char *args[2];
33 int argl[2];
34 char realm[REALM_SZ];
35 char host[BUFSIZ];
36
37 register sms_params *params = &params_st;
38 sms_params *reply = NULL;
39 KTEXT_ST auth;
40
41 CHECK_CONNECTED;
42
43 /*
44 * Build a Kerberos authenticator.
45 * The "service" and "instance" should not be hardcoded here.
46 */
47
48 bzero(host, sizeof(host));
49 if (status = sms_host(host, sizeof(host) - 1))
50 return status;
51
52 strcpy(realm, krb_realmofhost(host));
53
54 status = krb_mk_req(&auth, "sms", "sms", realm, 0);
55 if (status != KSUCCESS) {
56 status += ERROR_TABLE_BASE_krb;
57 return status;
58 }
59 params->sms_version_no = sending_version_no;
60 params->sms_procno = SMS_AUTH;
61 params->sms_argc = 2;
62 params->sms_argv = args;
63 params->sms_argl = argl;
64 params->sms_argv[0] = (char *)auth.dat;
65 params->sms_argl[0] = auth.length;
66 params->sms_argv[1] = prog;
67 params->sms_argl[1] = strlen(prog) + 1;
68
69 if (sending_version_no == SMS_VERSION_1)
70 params->sms_argc = 1;
71
72 if ((status = sms_do_call(params, &reply)) == 0)
73 status = reply->sms_status;
74
75 sms_destroy_reply(reply);
76
77 return status;
78}
This page took 0.036745 seconds and 5 git commands to generate.