[apple/libinfo.git] / rpc.subproj / xdr_sizeof.c

/*
 * Copyright (c) 1999 Apple Computer, Inc. All rights reserved.
 *
 * @APPLE_LICENSE_HEADER_START@
 * 
 * Portions Copyright (c) 1999 Apple Computer, Inc.  All Rights
 * Reserved.  This file contains Original Code and/or Modifications of
 * Original Code as defined in and that are subject to the Apple Public
 * Source License Version 1.1 (the "License").  You may not use this file
 * except in compliance with the License.  Please obtain a copy of the
 * License at http://www.apple.com/publicsource and read it before using
 * this file.
 * 
 * The Original Code and all software distributed under the License are
 * distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, EITHER
 * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
 * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE OR NON- INFRINGEMENT.  Please see the
 * License for the specific language governing rights and limitations
 * under the License.
 * 
 * @APPLE_LICENSE_HEADER_END@
 */

/*
 * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
 * unrestricted use provided that this legend is included on all tape
 * media and as a part of the software program in whole or part.  Users
 * may copy or modify Sun RPC without charge, but are not authorized
 * to license or distribute it to anyone else except as part of a product or
 * program developed by the user.
 * 
 * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
 * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
 * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
 * 
 * Sun RPC is provided with no support and without any obligation on the
 * part of Sun Microsystems, Inc. to assist in its use, correction,
 * modification or enhancement.
 * 
 * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
 * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
 * OR ANY PART THEREOF.
 * 
 * In no event will Sun Microsystems, Inc. be liable for any lost revenue
 * or profits or other special, indirect and consequential damages, even if
 * Sun has been advised of the possibility of such damages.
 * 
 * Sun Microsystems, Inc.
 * 2550 Garcia Avenue
 * Mountain View, California  94043
 */
/*
 * xdr_sizeof.c
 *
 * Copyright 1990 Sun Microsystems, Inc.
 *
 * General purpose routine to see how much space something will use
 * when serialized using XDR.
 */

#include <sys/cdefs.h>

#include <rpc/types.h>
#include <rpc/xdr.h>
#include <sys/types.h>
#include <stdlib.h>

/* ARGSUSED */
static bool_t
x_putlong(xdrs, longp)
	XDR *xdrs;
#ifdef __LP64__
	int *longp;
#else
	long *longp;
#endif
{
	xdrs->x_handy += BYTES_PER_XDR_UNIT;
	return (TRUE);
}

/* ARGSUSED */
static bool_t
x_putbytes(xdrs, bp, len)
	XDR *xdrs;
	char  *bp;
	u_int len;
{
	xdrs->x_handy += len;
	return (TRUE);
}

static u_int
x_getpostn(xdrs)
	XDR *xdrs;
{
	return (xdrs->x_handy);
}

/* ARGSUSED */
static bool_t
x_setpostn(xdrs, pos)
	XDR *xdrs;
	u_int pos;
{
	/* This is not allowed */
	return (FALSE);
}

static int32_t *
x_inline(xdrs, len)
	XDR *xdrs;
	u_int len;
{
	size_t llen;

	if (len == 0) {
		return (NULL);
	}
	if (xdrs->x_op != XDR_ENCODE) {
		return (NULL);
	}

	llen = len;
	
	if (llen < (size_t)xdrs->x_base) {
		/* x_private was already allocated */
		xdrs->x_handy += llen;
		return ((int32_t *) xdrs->x_private);
	} else {
		/* Free the earlier space and allocate new area */
		if (xdrs->x_private)
			free(xdrs->x_private);
		if ((xdrs->x_private = (caddr_t) malloc(len)) == NULL) {
			xdrs->x_base = 0;
			return (NULL);
		}
		xdrs->x_base = (caddr_t)llen;
		xdrs->x_handy += llen;
		return ((int32_t *) xdrs->x_private);
	}
}

static int
harmless()
{
	/* Always return FALSE/NULL, as the case may be */
	return (0);
}

static void
x_destroy(xdrs)
	XDR *xdrs;
{
	xdrs->x_handy = 0;
	xdrs->x_base = 0;
	if (xdrs->x_private) {
		free(xdrs->x_private);
		xdrs->x_private = NULL;
	}
	return;
}

#ifdef __LP64__
unsigned int
#else
unsigned long
#endif
xdr_sizeof(func, data)
	xdrproc_t func;
	void *data;
{
	XDR x;
	struct xdr_ops ops;
	bool_t stat;
	/* to stop ANSI-C compiler from complaining */
#ifdef __LP64__
	typedef  bool_t (* dummyfunc1)(XDR *, int *);
#else
	typedef  bool_t (* dummyfunc1)(XDR *, long *);
#endif
	typedef  bool_t (* dummyfunc2)(XDR *, caddr_t, u_int);

	ops.x_putlong = x_putlong;
	ops.x_putbytes = x_putbytes;
	ops.x_inline = x_inline;
	ops.x_getpostn = x_getpostn;
	ops.x_setpostn = x_setpostn;
	ops.x_destroy = x_destroy;

	/* the other harmless ones */
	ops.x_getlong =  (dummyfunc1) harmless;
	ops.x_getbytes = (dummyfunc2) harmless;

	x.x_op = XDR_ENCODE;
	x.x_ops = &ops;
	x.x_handy = 0;
	x.x_private = (caddr_t) NULL;
	x.x_base = (caddr_t) 0;

	stat = func(&x, data, 0);
	if (x.x_private)
		free(x.x_private);
	return (stat == TRUE ? (unsigned) x.x_handy: 0);
}
Commit	Line	Data
c29f2fcc A	1	/*
	2	* Copyright (c) 1999 Apple Computer, Inc. All rights reserved.
	3	*
	4	* @APPLE_LICENSE_HEADER_START@
	5	*
	6	* Portions Copyright (c) 1999 Apple Computer, Inc. All Rights
	7	* Reserved. This file contains Original Code and/or Modifications of
	8	* Original Code as defined in and that are subject to the Apple Public
	9	* Source License Version 1.1 (the "License"). You may not use this file
	10	* except in compliance with the License. Please obtain a copy of the
	11	* License at http://www.apple.com/publicsource and read it before using
	12	* this file.
	13	*
	14	* The Original Code and all software distributed under the License are
	15	* distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, EITHER
	16	* EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
	17	* INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
	18	* FITNESS FOR A PARTICULAR PURPOSE OR NON- INFRINGEMENT. Please see the
	19	* License for the specific language governing rights and limitations
	20	* under the License.
	21	*
	22	* @APPLE_LICENSE_HEADER_END@
	23	*/
	24
	25	/*
	26	* Sun RPC is a product of Sun Microsystems, Inc. and is provided for
	27	* unrestricted use provided that this legend is included on all tape
	28	* media and as a part of the software program in whole or part. Users
	29	* may copy or modify Sun RPC without charge, but are not authorized
	30	* to license or distribute it to anyone else except as part of a product or
	31	* program developed by the user.
	32	*
	33	* SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
	34	* WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
	35	* PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
	36	*
	37	* Sun RPC is provided with no support and without any obligation on the
	38	* part of Sun Microsystems, Inc. to assist in its use, correction,
	39	* modification or enhancement.
	40	*
	41	* SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
	42	* INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
	43	* OR ANY PART THEREOF.
	44	*
	45	* In no event will Sun Microsystems, Inc. be liable for any lost revenue
	46	* or profits or other special, indirect and consequential damages, even if
	47	* Sun has been advised of the possibility of such damages.
	48	*
	49	* Sun Microsystems, Inc.
	50	* 2550 Garcia Avenue
	51	* Mountain View, California 94043
	52	*/
	53	/*
	54	* xdr_sizeof.c
	55	*
	56	* Copyright 1990 Sun Microsystems, Inc.
	57	*
	58	* General purpose routine to see how much space something will use
	59	* when serialized using XDR.
	60	*/
	61
	62	#include <sys/cdefs.h>
	63
	64	#include <rpc/types.h>
65	#include <rpc/xdr.h>
66	#include <sys/types.h>
67	#include <stdlib.h>
68
69	/* ARGSUSED */
70	static bool_t
71	x_putlong(xdrs, longp)
72	XDR *xdrs;
b3dd680f A	73	#ifdef __LP64__
	74	int *longp;
	75	#else
c29f2fcc	76	long *longp;
b3dd680f	77	#endif
c29f2fcc A	78	{
	79	xdrs->x_handy += BYTES_PER_XDR_UNIT;
	80	return (TRUE);
	81	}
	82
	83	/* ARGSUSED */
	84	static bool_t
	85	x_putbytes(xdrs, bp, len)
	86	XDR *xdrs;
	87	char *bp;
	88	u_int len;
	89	{
	90	xdrs->x_handy += len;
	91	return (TRUE);
	92	}
	93
	94	static u_int
	95	x_getpostn(xdrs)
	96	XDR *xdrs;
	97	{
	98	return (xdrs->x_handy);
	99	}
	100
	101	/* ARGSUSED */
	102	static bool_t
	103	x_setpostn(xdrs, pos)
	104	XDR *xdrs;
	105	u_int pos;
	106	{
	107	/* This is not allowed */
	108	return (FALSE);
	109	}
	110
	111	static int32_t *
	112	x_inline(xdrs, len)
	113	XDR *xdrs;
	114	u_int len;
	115	{
b3dd680f	116	size_t llen;
c29f2fcc A	117
	118	if (len == 0) {
	119	return (NULL);
	120	}
	121	if (xdrs->x_op != XDR_ENCODE) {
	122	return (NULL);
	123	}
	124
	125	llen = len;
	126
b3dd680f	127	if (llen < (size_t)xdrs->x_base) {
c29f2fcc A	128	/* x_private was already allocated */
	129	xdrs->x_handy += llen;
	130	return ((int32_t *) xdrs->x_private);
	131	} else {
	132	/* Free the earlier space and allocate new area */
	133	if (xdrs->x_private)
	134	free(xdrs->x_private);
	135	if ((xdrs->x_private = (caddr_t) malloc(len)) == NULL) {
	136	xdrs->x_base = 0;
	137	return (NULL);
	138	}
	139	xdrs->x_base = (caddr_t)llen;
	140	xdrs->x_handy += llen;
	141	return ((int32_t *) xdrs->x_private);
	142	}
	143	}
	144
	145	static int
	146	harmless()
	147	{
	148	/* Always return FALSE/NULL, as the case may be */
	149	return (0);
	150	}
	151
	152	static void
	153	x_destroy(xdrs)
	154	XDR *xdrs;
	155	{
	156	xdrs->x_handy = 0;
	157	xdrs->x_base = 0;
	158	if (xdrs->x_private) {
	159	free(xdrs->x_private);
	160	xdrs->x_private = NULL;
	161	}
	162	return;
	163	}
	164
b3dd680f A	165	#ifdef __LP64__
	166	unsigned int
	167	#else
c29f2fcc	168	unsigned long
b3dd680f	169	#endif
c29f2fcc A	170	xdr_sizeof(func, data)
	171	xdrproc_t func;
	172	void *data;
	173	{
	174	XDR x;
	175	struct xdr_ops ops;
	176	bool_t stat;
	177	/* to stop ANSI-C compiler from complaining */
b3dd680f A	178	#ifdef __LP64__
	179	typedef bool_t (* dummyfunc1)(XDR , int );
	180	#else
c29f2fcc	181	typedef bool_t (* dummyfunc1)(XDR , long );
b3dd680f	182	#endif
c29f2fcc A	183	typedef bool_t (* dummyfunc2)(XDR *, caddr_t, u_int);
	184
	185	ops.x_putlong = x_putlong;
	186	ops.x_putbytes = x_putbytes;
	187	ops.x_inline = x_inline;
	188	ops.x_getpostn = x_getpostn;
	189	ops.x_setpostn = x_setpostn;
	190	ops.x_destroy = x_destroy;
	191
	192	/* the other harmless ones */
	193	ops.x_getlong = (dummyfunc1) harmless;
	194	ops.x_getbytes = (dummyfunc2) harmless;
	195
	196	x.x_op = XDR_ENCODE;
	197	x.x_ops = &ops;
	198	x.x_handy = 0;
	199	x.x_private = (caddr_t) NULL;
	200	x.x_base = (caddr_t) 0;
	201
0eb52ff2	202	stat = func(&x, data, 0);
c29f2fcc A	203	if (x.x_private)
	204	free(x.x_private);
	205	return (stat == TRUE ? (unsigned) x.x_handy: 0);
	206	}