1 /* @(#)svc_auth_unix.c 2.3 88/08/01 4.0 RPCSRC; from 1.28 88/02/08 SMI */
2 /*
3 * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
4 * unrestricted use provided that this legend is included on all tape
5 * media and as a part of the software program in whole or part. Users
6 * may copy or modify Sun RPC without charge, but are not authorized
7 * to license or distribute it to anyone else except as part of a product or
8 * program developed by the user.
9 *
10 * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
11 * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
12 * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
13 *
14 * Sun RPC is provided with no support and without any obligation on the
15 * part of Sun Microsystems, Inc. to assist in its use, correction,
16 * modification or enhancement.
17 *
18 * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
19 * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
20 * OR ANY PART THEREOF.
21 *
22 * In no event will Sun Microsystems, Inc. be liable for any lost revenue
23 * or profits or other special, indirect and consequential damages, even if
24 * Sun has been advised of the possibility of such damages.
25 *
26 * Sun Microsystems, Inc.
27 * 2550 Garcia Avenue
28 * Mountain View, California 94043
29 */
30 #if !defined(lint) && defined(SCCSIDS)
31 static char sccsid[] = "@(#)svc_auth_unix.c 1.28 88/02/08 Copyr 1984 Sun Micro";
32 #endif
33
34 /*
35 * svc_auth_unix.c
36 * Handles UNIX flavor authentication parameters on the service side of rpc.
37 * There are two svc auth implementations here: AUTH_UNIX and AUTH_SHORT.
38 * _svcauth_unix does full blown unix style uid,gid+gids auth,
39 * _svcauth_short uses a shorthand auth to index into a cache of longhand auths.
40 * Note: the shorthand has been gutted for efficiency.
41 *
42 * Copyright (C) 1984, Sun Microsystems, Inc.
43 */
44
45 #include <stdio.h>
46 #include <rpc/rpc.h>
47
48 /*
49 * Unix longhand authenticator
50 */
51 enum auth_stat
_svcauth_unix(rqst,msg)52 _svcauth_unix(rqst, msg)
53 register struct svc_req *rqst;
54 register struct rpc_msg *msg;
55 {
56 register enum auth_stat stat;
57 XDR xdrs;
58 register struct authunix_parms *aup;
59 register long *buf;
60 struct area {
61 struct authunix_parms area_aup;
62 char area_machname[MAX_MACHINE_NAME+1];
63 int area_gids[NGRPS];
64 } *area;
65 u_int auth_len;
66 int str_len, gid_len;
67 register int i;
68
69 area = (struct area *) rqst->rq_clntcred;
70 aup = &area->area_aup;
71 aup->aup_machname = area->area_machname;
72 aup->aup_gids = area->area_gids;
73 auth_len = (u_int)msg->rm_call.cb_cred.oa_length;
74 xdrmem_create(&xdrs, msg->rm_call.cb_cred.oa_base, auth_len,XDR_DECODE);
75 buf = XDR_INLINE(&xdrs, auth_len);
76 if (buf != NULL) {
77 aup->aup_time = IXDR_GET_LONG(buf);
78 str_len = IXDR_GET_U_LONG(buf);
79 if (str_len > MAX_MACHINE_NAME) {
80 stat = AUTH_BADCRED;
81 goto done;
82 }
83 bcopy((caddr_t)buf, aup->aup_machname, (u_int)str_len);
84 aup->aup_machname[str_len] = 0;
85 str_len = RNDUP(str_len);
86 buf += str_len / sizeof (long);
87 aup->aup_uid = IXDR_GET_LONG(buf);
88 aup->aup_gid = IXDR_GET_LONG(buf);
89 gid_len = IXDR_GET_U_LONG(buf);
90 if (gid_len > NGRPS) {
91 stat = AUTH_BADCRED;
92 goto done;
93 }
94 aup->aup_len = gid_len;
95 for (i = 0; i < gid_len; i++) {
96 aup->aup_gids[i] = IXDR_GET_LONG(buf);
97 }
98 /*
99 * five is the smallest unix credentials structure -
100 * timestamp, hostname len (0), uid, gid, and gids len (0).
101 */
102 if ((5 + gid_len) * BYTES_PER_XDR_UNIT + str_len > auth_len) {
103 (void) printf("bad auth_len gid %d str %d auth %d\n",
104 gid_len, str_len, auth_len);
105 stat = AUTH_BADCRED;
106 goto done;
107 }
108 } else if (! xdr_authunix_parms(&xdrs, aup)) {
109 xdrs.x_op = XDR_FREE;
110 (void)xdr_authunix_parms(&xdrs, aup);
111 stat = AUTH_BADCRED;
112 goto done;
113 }
114 rqst->rq_xprt->xp_verf.oa_flavor = AUTH_NULL;
115 rqst->rq_xprt->xp_verf.oa_length = 0;
116 stat = AUTH_OK;
117 done:
118 XDR_DESTROY(&xdrs);
119 return (stat);
120 }
121
122
123 /*
124 * Shorthand unix authenticator
125 * Looks up longhand in a cache.
126 */
127 /*ARGSUSED*/
128 enum auth_stat
_svcauth_short(rqst,msg)129 _svcauth_short(rqst, msg)
130 struct svc_req *rqst;
131 struct rpc_msg *msg;
132 {
133 return (AUTH_REJECTEDCRED);
134 }
135