1 /* $OpenBSD: xdr_reference.c,v 1.8 2009/06/06 03:28:34 deraadt Exp $ */ 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 31 /* 32 * xdr_reference.c, Generic XDR routines implementation. 33 * 34 * Copyright (C) 1987, Sun Microsystems, Inc. 35 * 36 * These are the "non-trivial" xdr primitives used to serialize and de-serialize 37 * "pointers". See xdr.h for more info on the interface to xdr. 38 */ 39 40 #include <stdio.h> 41 #include <stdlib.h> 42 #include <string.h> 43 #include <rpc/types.h> 44 #include <rpc/xdr.h> 45 46 /* 47 * XDR an indirect pointer 48 * xdr_reference is for recursively translating a structure that is 49 * referenced by a pointer inside the structure that is currently being 50 * translated. pp references a pointer to storage. If *pp is null 51 * the necessary storage is allocated. 52 * size is the sizeof the referneced structure. 53 * proc is the routine to handle the referenced structure. 54 */ 55 bool_t 56 xdr_reference(XDR *xdrs, 57 caddr_t *pp, /* the pointer to work on */ 58 u_int size, /* size of the object pointed to */ 59 xdrproc_t proc) /* xdr routine to handle the object */ 60 { 61 caddr_t loc = *pp; 62 bool_t stat; 63 64 if (loc == NULL) 65 switch (xdrs->x_op) { 66 case XDR_FREE: 67 return (TRUE); 68 69 case XDR_DECODE: 70 *pp = loc = (caddr_t) calloc(size, 1); 71 if (loc == NULL) { 72 (void) fprintf(stderr, 73 "xdr_reference: out of memory\n"); 74 return (FALSE); 75 } 76 break; 77 } 78 79 stat = (*proc)(xdrs, loc); 80 81 if (xdrs->x_op == XDR_FREE) { 82 mem_free(loc, size); 83 *pp = NULL; 84 } 85 return (stat); 86 } 87 88 89 /* 90 * xdr_pointer(): 91 * 92 * XDR a pointer to a possibly recursive data structure. This 93 * differs with xdr_reference in that it can serialize/deserialiaze 94 * trees correctly. 95 * 96 * What's sent is actually a union: 97 * 98 * union object_pointer switch (boolean b) { 99 * case TRUE: object_data data; 100 * case FALSE: void nothing; 101 * } 102 * 103 * > objpp: Pointer to the pointer to the object. 104 * > obj_size: size of the object. 105 * > xdr_obj: routine to XDR an object. 106 * 107 */ 108 bool_t 109 xdr_pointer(XDR *xdrs, char **objpp, u_int obj_size, xdrproc_t xdr_obj) 110 { 111 112 bool_t more_data; 113 114 more_data = (*objpp != NULL); 115 if (! xdr_bool(xdrs,&more_data)) { 116 return (FALSE); 117 } 118 if (! more_data) { 119 *objpp = NULL; 120 return (TRUE); 121 } 122 return (xdr_reference(xdrs,objpp,obj_size,xdr_obj)); 123 } 124