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