1/*
2 * xdr_array.c, Generic XDR routines implementation.
3 *
4 * Copyright (c) 2010, Oracle America, Inc.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions are
8 * met:
9 *
10 * * Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * * Redistributions in binary form must reproduce the above
13 * copyright notice, this list of conditions and the following
14 * disclaimer in the documentation and/or other materials
15 * provided with the distribution.
16 * * Neither the name of the "Oracle America, 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
21 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
22 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
23 * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
24 * COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT,
25 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
27 * GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
28 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
29 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
30 * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
31 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32 *
33 * These are the "non-trivial" xdr primitives used to serialize and
34 * de-serialize arrays. See xdr.h for more info on the interface to xdr.
35 */
36
37#include <stdio.h>
38#include <string.h>
39#include <rpc/types.h>
40#include <rpc/xdr.h>
41#include <libintl.h>
42#include <limits.h>
43#include <wchar.h>
44#include <shlib-compat.h>
45
46#define LASTUNSIGNED ((u_int)0-1)
47
48
49/*
50 * XDR an array of arbitrary elements
51 * *addrp is a pointer to the array, *sizep is the number of elements.
52 * If addrp is NULL (*sizep * elsize) bytes are allocated.
53 * elsize is the size (in bytes) of each element, and elproc is the
54 * xdr procedure to call to handle each element of the array.
55 */
56bool_t
57xdr_array (XDR *xdrs,
58 /* array pointer */
59 caddr_t *addrp,
60 /* number of elements */
61 u_int *sizep,
62 /* max numberof elements */
63 u_int maxsize,
64 /* size in bytes of each element */
65 u_int elsize,
66 /* xdr routine to handle each element */
67 xdrproc_t elproc)
68{
69 u_int i;
70 caddr_t target = *addrp;
71 u_int c; /* the actual element count */
72 bool_t stat = TRUE;
73
74 /* like strings, arrays are really counted arrays */
75 if (!xdr_u_int (xdrs, sizep))
76 {
77 return FALSE;
78 }
79 c = *sizep;
80 /*
81 * XXX: Let the overflow possibly happen with XDR_FREE because mem_free()
82 * doesn't actually use its second argument anyway.
83 */
84 if ((c > maxsize || c > UINT_MAX / elsize) && (xdrs->x_op != XDR_FREE))
85 {
86 return FALSE;
87 }
88
89 /*
90 * if we are deserializing, we may need to allocate an array.
91 * We also save time by checking for a null array if we are freeing.
92 */
93 if (target == NULL)
94 switch (xdrs->x_op)
95 {
96 case XDR_DECODE:
97 if (c == 0)
98 return TRUE;
99 *addrp = target = calloc (c, elsize);
100 if (target == NULL)
101 {
102 (void) __fxprintf (NULL, "%s: %s", __func__, _("out of memory\n"));
103 return FALSE;
104 }
105 break;
106
107 case XDR_FREE:
108 return TRUE;
109 default:
110 break;
111 }
112
113 /*
114 * now we xdr each element of array
115 */
116 for (i = 0; (i < c) && stat; i++)
117 {
118 stat = (*elproc) (xdrs, target, LASTUNSIGNED);
119 target += elsize;
120 }
121
122 /*
123 * the array may need freeing
124 */
125 if (xdrs->x_op == XDR_FREE)
126 {
127 mem_free (*addrp, c * elsize);
128 *addrp = NULL;
129 }
130 return stat;
131}
132#ifdef EXPORT_RPC_SYMBOLS
133libc_hidden_def (xdr_array)
134#else
135libc_hidden_nolink_sunrpc (xdr_array, GLIBC_2_0)
136#endif
137
138/*
139 * xdr_vector():
140 *
141 * XDR a fixed length array. Unlike variable-length arrays,
142 * the storage of fixed length arrays is static and unfreeable.
143 * > basep: base of the array
144 * > size: size of the array
145 * > elemsize: size of each element
146 * > xdr_elem: routine to XDR each element
147 */
148bool_t
149xdr_vector (XDR *xdrs, char *basep, u_int nelem, u_int elemsize,
150 xdrproc_t xdr_elem)
151{
152 u_int i;
153 char *elptr;
154
155 elptr = basep;
156 for (i = 0; i < nelem; i++)
157 {
158 if (!(*xdr_elem) (xdrs, elptr, LASTUNSIGNED))
159 {
160 return FALSE;
161 }
162 elptr += elemsize;
163 }
164 return TRUE;
165}
166libc_hidden_nolink_sunrpc (xdr_vector, GLIBC_2_0)
167