2 * Copyright (c) 1999 Apple Computer, Inc. All rights reserved.
4 * @APPLE_LICENSE_HEADER_START@
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
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
22 * @APPLE_LICENSE_HEADER_END@
25 * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
26 * unrestricted use provided that this legend is included on all tape
27 * media and as a part of the software program in whole or part. Users
28 * may copy or modify Sun RPC without charge, but are not authorized
29 * to license or distribute it to anyone else except as part of a product or
30 * program developed by the user.
32 * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
33 * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
34 * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
36 * Sun RPC is provided with no support and without any obligation on the
37 * part of Sun Microsystems, Inc. to assist in its use, correction,
38 * modification or enhancement.
40 * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
41 * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
42 * OR ANY PART THEREOF.
44 * In no event will Sun Microsystems, Inc. be liable for any lost revenue
45 * or profits or other special, indirect and consequential damages, even if
46 * Sun has been advised of the possibility of such damages.
48 * Sun Microsystems, Inc.
50 * Mountain View, California 94043
53 #if defined(LIBC_SCCS) && !defined(lint)
54 /*static char *sccsid = "from: @(#)xdr_mem.c 1.19 87/08/11 Copyr 1984 Sun Micro";*/
55 /*static char *sccsid = "from: @(#)xdr_mem.c 2.1 88/07/29 4.0 RPCSRC";*/
56 static char *rcsid
= "$Id: xdr_mem.c,v 1.5 2003/06/23 17:24:59 majka Exp $";
60 * xdr_mem.h, XDR implementation using memory buffers.
62 * Copyright (C) 1984, Sun Microsystems, Inc.
64 * If you have some data to be interpreted as external data representation
65 * or to be converted to external data representation in a memory buffer,
66 * then this is the package for you.
72 #include <rpc/types.h>
74 #include <netinet/in.h>
76 static bool_t
xdrmem_getlong();
77 static bool_t
xdrmem_putlong();
78 static bool_t
xdrmem_getbytes();
79 static bool_t
xdrmem_putbytes();
80 static u_int
xdrmem_getpos();
81 static bool_t
xdrmem_setpos();
82 static long * xdrmem_inline();
83 static void xdrmem_destroy();
85 static struct xdr_ops xdrmem_ops
= {
97 * The procedure xdrmem_create initializes a stream descriptor for a
101 xdrmem_create(xdrs
, addr
, size
, op
)
103 #if defined(__APPLE__)
113 xdrs
->x_ops
= &xdrmem_ops
;
114 xdrs
->x_private
= xdrs
->x_base
= addr
;
115 xdrs
->x_handy
= size
;
119 xdrmem_destroy(XDR
*xdrs
)
124 xdrmem_getlong(xdrs
, lp
)
128 if ((xdrs
->x_handy
-= sizeof(long)) < 0)
130 *lp
= (long)ntohl((u_long
)(*((long *)(xdrs
->x_private
))));
131 xdrs
->x_private
+= sizeof(long);
136 xdrmem_putlong(xdrs
, lp
)
140 if ((xdrs
->x_handy
-= sizeof(long)) < 0)
142 *(long *)xdrs
->x_private
= (long)htonl((u_long
)(*lp
));
143 xdrs
->x_private
+= sizeof(long);
148 xdrmem_getbytes(xdrs
, addr
, len
)
154 if ((xdrs
->x_handy
-= len
) < 0)
156 bcopy(xdrs
->x_private
, addr
, len
);
157 xdrs
->x_private
+= len
;
162 xdrmem_putbytes(xdrs
, addr
, len
)
168 if ((xdrs
->x_handy
-= len
) < 0)
170 bcopy(addr
, xdrs
->x_private
, len
);
171 xdrs
->x_private
+= len
;
179 return ((u_int
)xdrs
->x_private
- (u_int
)xdrs
->x_base
);
183 xdrmem_setpos(xdrs
, pos
)
187 register caddr_t newaddr
= xdrs
->x_base
+ pos
;
188 register caddr_t lastaddr
= xdrs
->x_private
+ xdrs
->x_handy
;
190 if ((long)newaddr
> (long)lastaddr
)
192 xdrs
->x_private
= newaddr
;
193 xdrs
->x_handy
= (int)lastaddr
- (int)newaddr
;
198 xdrmem_inline(xdrs
, len
)
204 if (xdrs
->x_handy
>= len
) {
205 xdrs
->x_handy
-= len
;
206 buf
= (long *) xdrs
->x_private
;
207 xdrs
->x_private
+= len
;