sunrpc/rpc_cmsg.c

   1 /* @(#)rpc_callmsg.c    2.1 88/07/29 4.0 RPCSRC */
   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[] = "@(#)rpc_callmsg.c 1.4 87/08/11 Copyr 1984 Sun Micro";
  32 #endif
  33
  34 /*
  35  * rpc_callmsg.c
  36  *
  37  * Copyright (C) 1984, Sun Microsystems, Inc.
  38  *
  39  */
  40
  41 #include <string.h>
  42 #include <sys/param.h>
  43 #include <rpc/rpc.h>
  44
  45 /*
  46  * XDR a call message
  47  */
  48 bool_t
  49 xdr_callmsg (XDR *xdrs, struct rpc_msg *cmsg)
  50 {
  51   int32_t *buf;
  52   struct opaque_auth *oa;
  53
  54   if (xdrs->x_op == XDR_ENCODE)
  55     {
  56       if (cmsg->rm_call.cb_cred.oa_length > MAX_AUTH_BYTES)
  57         {
  58           return (FALSE);
  59         }
  60       if (cmsg->rm_call.cb_verf.oa_length > MAX_AUTH_BYTES)
  61         {
  62           return (FALSE);
  63         }
  64       buf = XDR_INLINE (xdrs, 8 * BYTES_PER_XDR_UNIT
  65                         + RNDUP (cmsg->rm_call.cb_cred.oa_length)
  66                         + 2 * BYTES_PER_XDR_UNIT
  67                         + RNDUP (cmsg->rm_call.cb_verf.oa_length));
  68       if (buf != NULL)
  69         {
  70           IXDR_PUT_LONG (buf, cmsg->rm_xid);
  71           IXDR_PUT_ENUM (buf, cmsg->rm_direction);
  72           if (cmsg->rm_direction != CALL)
  73             return FALSE;
  74           IXDR_PUT_LONG (buf, cmsg->rm_call.cb_rpcvers);
  75           if (cmsg->rm_call.cb_rpcvers != RPC_MSG_VERSION)
  76             return FALSE;
  77           IXDR_PUT_LONG (buf, cmsg->rm_call.cb_prog);
  78           IXDR_PUT_LONG (buf, cmsg->rm_call.cb_vers);
  79           IXDR_PUT_LONG (buf, cmsg->rm_call.cb_proc);
  80           oa = &cmsg->rm_call.cb_cred;
  81           IXDR_PUT_ENUM (buf, oa->oa_flavor);
  82           IXDR_PUT_INT32 (buf, oa->oa_length);
  83           if (oa->oa_length)
  84             {
  85               bcopy (oa->oa_base, (caddr_t) buf, oa->oa_length);
  86               buf = (int32_t *) ((char *) buf + RNDUP (oa->oa_length));
  87             }
  88           oa = &cmsg->rm_call.cb_verf;
  89           IXDR_PUT_ENUM (buf, oa->oa_flavor);
  90           IXDR_PUT_INT32 (buf, oa->oa_length);
  91           if (oa->oa_length)
  92             {
  93               bcopy (oa->oa_base, (caddr_t) buf, oa->oa_length);
  94               /* no real need....
  95                  buf = (long *) ((char *) buf + RNDUP(oa->oa_length));
  96                */
  97             }
  98           return TRUE;
  99         }
 100     }
 101   if (xdrs->x_op == XDR_DECODE)
 102     {
 103       buf = XDR_INLINE (xdrs, 8 * BYTES_PER_XDR_UNIT);
 104       if (buf != NULL)
 105         {
 106           cmsg->rm_xid = IXDR_GET_LONG (buf);
 107           cmsg->rm_direction = IXDR_GET_ENUM (buf, enum msg_type);
 108           if (cmsg->rm_direction != CALL)
 109             {
 110               return FALSE;
 111             }
 112           cmsg->rm_call.cb_rpcvers = IXDR_GET_LONG (buf);
 113           if (cmsg->rm_call.cb_rpcvers != RPC_MSG_VERSION)
 114             {
 115               return FALSE;
 116             }
 117           cmsg->rm_call.cb_prog = IXDR_GET_LONG (buf);
 118           cmsg->rm_call.cb_vers = IXDR_GET_LONG (buf);
 119           cmsg->rm_call.cb_proc = IXDR_GET_LONG (buf);
 120           oa = &cmsg->rm_call.cb_cred;
 121           oa->oa_flavor = IXDR_GET_ENUM (buf, enum_t);
 122           oa->oa_length = IXDR_GET_INT32 (buf);
 123           if (oa->oa_length)
 124             {
 125               if (oa->oa_length > MAX_AUTH_BYTES)
 126                 return FALSE;
 127               if (oa->oa_base == NULL)
 128                 {
 129                   oa->oa_base = (caddr_t)
 130                     mem_alloc (oa->oa_length);
 131                 }
 132               buf = XDR_INLINE (xdrs, RNDUP (oa->oa_length));
 133               if (buf == NULL)
 134                 {
 135                   if (xdr_opaque (xdrs, oa->oa_base,
 136                                   oa->oa_length) == FALSE)
 137                     return FALSE;
 138                 }
 139               else
 140                 {
 141                   bcopy ((caddr_t) buf, oa->oa_base,
 142                          oa->oa_length);
 143                   /* no real need....
 144                      buf = (long *) ((char *) buf
 145                      + RNDUP(oa->oa_length));
 146                    */
 147                 }
 148             }
 149           oa = &cmsg->rm_call.cb_verf;
 150           buf = XDR_INLINE (xdrs, 2 * BYTES_PER_XDR_UNIT);
 151           if (buf == NULL)
 152             {
 153               if (xdr_enum (xdrs, &oa->oa_flavor) == FALSE ||
 154                   xdr_u_int (xdrs, &oa->oa_length) == FALSE)
 155                 {
 156                   return FALSE;
 157                 }
 158             }
 159           else
 160             {
 161               oa->oa_flavor = IXDR_GET_ENUM (buf, enum_t);
 162               oa->oa_length = IXDR_GET_INT32 (buf);
 163             }
 164           if (oa->oa_length)
 165             {
 166               if (oa->oa_length > MAX_AUTH_BYTES)
 167                 return FALSE;
 168               if (oa->oa_base == NULL)
 169                 {
 170                   oa->oa_base = (caddr_t)
 171                     mem_alloc (oa->oa_length);
 172                 }
 173               buf = XDR_INLINE (xdrs, RNDUP (oa->oa_length));
 174               if (buf == NULL)
 175                 {
 176                   if (xdr_opaque (xdrs, oa->oa_base,
 177                                   oa->oa_length) == FALSE)
 178                     return FALSE;
 179                 }
 180               else
 181                 {
 182                   bcopy ((caddr_t) buf, oa->oa_base,
 183                          oa->oa_length);
 184                   /* no real need...
 185                      buf = (long *) ((char *) buf
 186                      + RNDUP(oa->oa_length));
 187                    */
 188                 }
 189             }
 190           return TRUE;
 191         }
 192     }
 193   if (
 194        xdr_u_long (xdrs, &(cmsg->rm_xid)) &&
 195        xdr_enum (xdrs, (enum_t *) & (cmsg->rm_direction)) &&
 196        (cmsg->rm_direction == CALL) &&
 197        xdr_u_long (xdrs, &(cmsg->rm_call.cb_rpcvers)) &&
 198        (cmsg->rm_call.cb_rpcvers == RPC_MSG_VERSION) &&
 199        xdr_u_long (xdrs, &(cmsg->rm_call.cb_prog)) &&
 200        xdr_u_long (xdrs, &(cmsg->rm_call.cb_vers)) &&
 201        xdr_u_long (xdrs, &(cmsg->rm_call.cb_proc)) &&
 202        xdr_opaque_auth (xdrs, &(cmsg->rm_call.cb_cred)))
 203     return xdr_opaque_auth (xdrs, &(cmsg->rm_call.cb_verf));
 204   return FALSE;
 205 }