1/* Copyright 2009, UCAR/Unidata and OPeNDAP, Inc.
2   See the COPYRIGHT file for more information.
3*/
4
5/*
6 * Copyright (c) 2009, Sun Microsystems, Inc.
7 * All rights reserved.
8 *
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions are met:
11 * - Redistributions of source code must retain the above copyright notice,
12 *   this list of conditions and the following disclaimer.
13 * - Redistributions in binary form must reproduce the above copyright notice,
14 *   this list of conditions and the following disclaimer in the documentation
15 *   and/or other materials provided with the distribution.
16 * - Neither the name of Sun Microsystems, Inc. nor the names of its
17 *   contributors may be used to endorse or promote products derived
18 *   from this software without specific prior written permission.
19 *
20 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
21 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
24 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
25 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
26 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
27 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
28 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
29 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
30 * POSSIBILITY OF SUCH DAMAGE.
31 *
32 *      from: @(#)xdr.h 1.19 87/04/22 SMI
33 *      from: @(#)xdr.h        2.2 88/07/29 4.0 RPCSRC
34 *      $FreeBSD: src/include/rpc/xdr.h,v 1.23 2003/03/07 13:19:40 nectar Exp $
35 *      $NetBSD: xdr.h,v 1.19 2000/07/17 05:00:45 matt Exp $
36 */
37
38/* Define our own implementation of the needed
39   elements of XDR. Assumes read-only
40*/
41
42#ifndef XXDR_H
43#define XXDR_H
44
45/*
46 * This is the number of bytes per unit of external data.
47 */
48#define XDRUNIT        (4)
49
50#if 1
51/* faster version when XDRUNIT is a power of two */
52# define RNDUP(x)  ((off_t)(((x) + XDRUNIT - 1) & ~(XDRUNIT - 1)))
53#else /* old version */
54#define RNDUP(x)  ((off_t)((((x) + XDRUNIT - 1) / XDRUNIT) \
55    * XDRUNIT))
56#endif
57
58/* signature: void swapinline16(unsigned short* sp) */
59#define swapinline16(ip) \
60{ \
61    char dst[2]; \
62    char* src = (char*)(sp); \
63    dst[0] = src[1]; \
64    dst[1] = src[0]; \
65    *(sp) = *((unsigned short*)dst); \
66}
67
68/* signature: void swapinline32(unsigned int* ip) */
69#define swapinline32(ip) \
70{ \
71    char dst[4]; \
72    char* src = (char*)(ip); \
73    dst[0] = src[3]; \
74    dst[1] = src[2]; \
75    dst[2] = src[1]; \
76    dst[3] = src[0]; \
77    *(ip) = *((unsigned int*)dst); \
78}
79
80/* signature: void swapinline64(unsigned long long* ip) */
81#define swapinline64(ip) \
82{ \
83    char dst[8]; \
84    char* src = (char*)(ip); \
85    dst[0] = src[7]; \
86    dst[1] = src[6]; \
87    dst[2] = src[5]; \
88    dst[3] = src[4]; \
89    dst[4] = src[3]; \
90    dst[5] = src[2]; \
91    dst[6] = src[1]; \
92    dst[7] = src[0]; \
93    *ip = *((unsigned long long*)dst); \
94}
95
96
97#ifdef OCIGNORE
98/* Warning dst and src should not be the same memory (assert &iswap != &i) */
99#define xxdrntoh(dst,src) if(xxdr_network_order){dst=src;}else{swapinline32(dst,src);}
100#define xxdrntohll(dst,src) if(xxdr_network_order){dst=src;}else{swapinline64(dst,src);}
101#define xxdrhton(dst,srcxxdrntoh(dst,src)
102#define xxdrhtonll(dst,srcxxdrntohll(dst,src)
103#endif
104
105/* Double needs special handling */
106extern void xxdrntohdouble(char*,double*);
107
108/*
109 * The XDR handle.
110 * Contains operation which is being applied to the stream,
111 * an operations vector for the particular implementation (e.g. see xdr_mem.c),
112 * and two private fields for the use of the particular implementation.
113 */
114typedef struct XXDR XXDR; /* forward */
115
116/* Assume |off_t| == |void*| */
117struct XXDR {
118  char* data;
119  off_t pos; /* relative to data; may be a cache of underlying stream pos */
120  int valid;         /* 1=>underlying stream pos == pos */
121  off_t base; /* beginning of data in case bod != 0*/
122  off_t length; /* total size of available data (relative to base)*/
123  /* Define minimum needed case specific operators */
124  int (*getbytes)(XXDR*,char*,off_t);
125  int (*setpos)(XXDR*,off_t);
126  off_t (*getpos)(XXDR*);
127  off_t (*getavail)(XXDR*);
128  void (*free)(XXDR*); /* xdr kind specific free function */
129};
130
131/* Track network order */
132extern int xxdr_network_order; /* does this machine match network order? */
133
134/* Read-only operations */
135
136/* Get exactly count bytes from underlying
137   stream; unlike opaque, this will
138   not round up to the XDRUNIT boundary
139*/
140extern int xxdr_getbytes(XXDR*,char*,off_t);
141
142/* get a single unsigned char from underlying stream*/
143extern int xxdr_uchar(XXDR* , unsigned char*);
144
145/* get a single unsigned short from underlying stream*/
146extern int xxdr_ushort(XXDR* , unsigned short*);
147
148/* get an int from underlying stream*/
149extern int xxdr_uint(XXDR* , unsigned int*);
150
151/* get an int from underlying stream*/
152extern int xxdr_ulonglong(XXDR* , unsigned long long*);
153
154/* get a float from underlying stream*/
155extern int xxdr_float(XXDR* , float*);
156
157/* get a double from underlying stream*/
158extern int xxdr_double(XXDR* , double*);
159
160/* get some bytes from underlying stream;
161   Warning: will read upto the next XDRUNIT boundary
162*/
163extern int xxdr_opaque(XXDR*, char*, off_t);
164
165/* get counted string from underlying stream*/
166extern int xxdr_string(XXDR*, char**, off_t*);
167
168/* returns bytes off from beginning*/
169extern off_t xxdr_getpos(XXDR*);
170
171/* reposition the stream*/
172extern int xxdr_setpos(XXDR*, off_t);
173
174/* get remaining data available starting at current position */
175extern off_t xxdr_getavail(XXDR*);
176
177/* free up XXDR  structure */
178void xxdr_free(XXDR*);
179
180/* File and memory creators */
181extern XXDRxxdr_filecreate(FILEfileoff_t bod);
182extern XXDRxxdr_memcreate(char* memoff_t memsizeoff_t bod);
183
184/* Misc */
185extern int xxdr_skip(XXDRxdrsoff_t len); /* WARNING: will skip exactly len bytes;
186                                                any rounding must be done by caller */
187
188extern int xxdr_skip_strings(XXDRxdrsoff_t n);
189
190extern unsigned int xxdr_roundup(off_t n); /* procedural version of RNDUP macro */
191
192extern void xxdr_init();
193
194/* Define some inlines */
195#define xxdr_length(xdrs) ((xdrs)->length)
196
197#endif /*XXDR_H*/
198


HyperKWIC - Version 7.20DA executed at 11:37 on 27 Oct 2017 | Polyhedron Solutions - INTERNAL USE | COMMERCIAL (Any O/S) SN 4AKIed