src/rx/xdr_update.c

   1 /*
   2  * xdr_update.c: Additions to release 3.0 XDR routines required
   3  *      for rpcgen.  These routines are from release 3.2BETA and
   4  *      may be updated before final release.
   5  *
   6  * Copyright (C) 1986, Sun Microsystems, Inc.
   7  *
   8  */
   9 #include <afsconfig.h>
  10 #include <afs/param.h>
  11
  12 RCSID
  13     ("$Header$");
  14
  15 #ifndef NeXT
  16 #include "xdr.h"
  17
  18 #ifdef NULL                     /* Strict ANSI-C aborts if we redefine this */
  19 #undef NULL
  20 #endif
  21
  22 #define NULL 0
  23
  24 #define LASTUNSIGNED    ((u_int)0-1)
  25
  26 /*
  27  * xdr_pointer():
  28  *
  29  * XDR a pointer to a possibly recursive data structure. This
  30  * differs with xdr_reference in that it can serialize/deserialiaze
  31  * trees correctly.
  32  *
  33  *  What's sent is actually a union:
  34  *
  35  *  union object_pointer switch (boolean b) {
  36  *  case TRUE: object_data data;
  37  *  case FALSE: void nothing;
  38  *  }
  39  *
  40  * > objpp: Pointer to the pointer to the object.
  41  * > obj_size: size of the object.
  42  * > xdr_obj: routine to XDR an object.
  43  *
  44  */
  45 bool_t
  46 xdr_pointer(register XDR * xdrs, char **objpp, u_int obj_size,
  47             xdrproc_t xdr_obj)
  48 {
  49
  50     bool_t more_data;
  51
  52     more_data = (*objpp != NULL);
  53     if (!xdr_bool(xdrs, &more_data)) {
  54         return (FALSE);
  55     }
  56     if (!more_data) {
  57         *objpp = NULL;
  58         return (TRUE);
  59     }
  60     return (xdr_reference(xdrs, objpp, obj_size, xdr_obj));
  61 }
  62
  63 /*
  64  * xdr_vector():
  65  *
  66  * XDR a fixed length array. Unlike variable-length arrays,
  67  * the storage of fixed length arrays is static and unfreeable.
  68  * > basep: base of the array
  69  * > size: size of the array
  70  * > elemsize: size of each element
  71  * > xdr_elem: routine to XDR each element
  72  */
  73 bool_t
  74 xdr_vector(register XDR * xdrs, register char *basep, register u_int nelem,
  75            register u_int elemsize, register xdrproc_t xdr_elem)
  76 {
  77     register u_int i;
  78     register char *elptr;
  79
  80     elptr = basep;
  81     for (i = 0; i < nelem; i++) {
  82         if (!(*xdr_elem) (xdrs, elptr, LASTUNSIGNED)) {
  83             return (FALSE);
  84         }
  85         elptr += elemsize;
  86     }
  87     return (TRUE);
  88 }
  89 #endif /* NeXT */