support/rpc/svc_auth_unix.c

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