2.3.90-2
[glibc/history.git] / sunrpc / xdr_sizeof.c
blobaaf25e96997d794bf445c0e5cfa1a0f5016cff4b
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.
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.
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.
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.
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.
25 * Sun Microsystems, Inc.
26 * 2550 Garcia Avenue
27 * Mountain View, California 94043
30 * xdr_sizeof.c
32 * Copyright 1990 Sun Microsystems, Inc.
34 * General purpose routine to see how much space something will use
35 * when serialized using XDR.
38 #include <rpc/types.h>
39 #include <rpc/xdr.h>
40 #include <sys/types.h>
41 #include <stdlib.h>
43 /* ARGSUSED */
44 static bool_t
45 x_putlong (XDR *xdrs, const long *longp)
47 xdrs->x_handy += BYTES_PER_XDR_UNIT;
48 return TRUE;
51 /* ARGSUSED */
52 static bool_t
53 x_putbytes (XDR *xdrs, const char *bp, u_int len)
55 xdrs->x_handy += len;
56 return TRUE;
59 static u_int
60 x_getpostn (const XDR *xdrs)
62 return xdrs->x_handy;
65 /* ARGSUSED */
66 static bool_t
67 x_setpostn (XDR *xdrs, u_int len)
69 /* This is not allowed */
70 return FALSE;
73 static int32_t *
74 x_inline (XDR *xdrs, u_int len)
76 if (len == 0)
77 return NULL;
78 if (xdrs->x_op != XDR_ENCODE)
79 return NULL;
80 if (len < (u_int) (long int) xdrs->x_base)
82 /* x_private was already allocated */
83 xdrs->x_handy += len;
84 return (int32_t *) xdrs->x_private;
86 else
88 /* Free the earlier space and allocate new area */
89 if (xdrs->x_private)
90 free (xdrs->x_private);
91 if ((xdrs->x_private = (caddr_t) malloc (len)) == NULL)
93 xdrs->x_base = 0;
94 return NULL;
96 xdrs->x_base = (void *) (long) len;
97 xdrs->x_handy += len;
98 return (int32_t *) xdrs->x_private;
102 static int
103 harmless (void)
105 /* Always return FALSE/NULL, as the case may be */
106 return 0;
109 static void
110 x_destroy (XDR *xdrs)
112 xdrs->x_handy = 0;
113 xdrs->x_base = 0;
114 if (xdrs->x_private)
116 free (xdrs->x_private);
117 xdrs->x_private = NULL;
119 return;
122 static bool_t
123 x_putint32 (XDR *xdrs, const int32_t *int32p)
125 xdrs->x_handy += BYTES_PER_XDR_UNIT;
126 return TRUE;
129 unsigned long
130 xdr_sizeof (xdrproc_t func, void *data)
132 XDR x;
133 struct xdr_ops ops;
134 bool_t stat;
135 /* to stop ANSI-C compiler from complaining */
136 typedef bool_t (*dummyfunc1) (XDR *, long *);
137 typedef bool_t (*dummyfunc2) (XDR *, caddr_t, u_int);
138 typedef bool_t (*dummyfunc3) (XDR *, int32_t *);
140 ops.x_putlong = x_putlong;
141 ops.x_putbytes = x_putbytes;
142 ops.x_inline = x_inline;
143 ops.x_getpostn = x_getpostn;
144 ops.x_setpostn = x_setpostn;
145 ops.x_destroy = x_destroy;
146 ops.x_putint32 = x_putint32;
148 /* the other harmless ones */
149 ops.x_getlong = (dummyfunc1) harmless;
150 ops.x_getbytes = (dummyfunc2) harmless;
151 ops.x_getint32 = (dummyfunc3) harmless;
153 x.x_op = XDR_ENCODE;
154 x.x_ops = &ops;
155 x.x_handy = 0;
156 x.x_private = (caddr_t) NULL;
157 x.x_base = (caddr_t) 0;
159 stat = func (&x, data);
160 if (x.x_private)
161 free (x.x_private);
162 return stat == TRUE ? x.x_handy : 0;