(nis_getnames): Add trailing dot to NIS_PATH components which lack them.
[kopensolaris-gnu/glibc.git] / nis / yp_xdr.c
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.
8  *
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.
12  *
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.
16  *
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.
20  *
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.
24  *
25  * Sun Microsystems, Inc.
26  * 2550 Garcia Avenue
27  * Mountain View, California  94043
28  */
29
30 #include <rpcsvc/yp.h>
31 #include <rpcsvc/ypclnt.h>
32
33 bool_t
34 xdr_ypstat (XDR *xdrs, ypstat *objp)
35 {
36   return xdr_enum (xdrs, (enum_t *) objp);
37 }
38 libnsl_hidden_def (xdr_ypstat)
39
40 bool_t
41 xdr_ypxfrstat (XDR *xdrs, ypxfrstat *objp)
42 {
43   return xdr_enum (xdrs, (enum_t *) objp);
44 }
45 libnsl_hidden_def (xdr_ypxfrstat)
46
47 bool_t
48 xdr_domainname (XDR *xdrs, domainname *objp)
49 {
50   return xdr_string (xdrs, objp, ~0);
51 }
52 libnsl_hidden_def (xdr_domainname)
53
54 bool_t
55 xdr_mapname (XDR *xdrs, mapname *objp)
56 {
57   return xdr_string (xdrs, objp, ~0);
58 }
59 libnsl_hidden_def (xdr_mapname)
60
61 bool_t
62 xdr_peername (XDR *xdrs, peername *objp)
63 {
64   return xdr_string (xdrs, objp, ~0);
65 }
66 libnsl_hidden_def (xdr_peername)
67
68 bool_t
69 xdr_keydat (XDR *xdrs, keydat *objp)
70 {
71   return xdr_bytes (xdrs, (char **) &objp->keydat_val,
72                     (u_int *) &objp->keydat_len, ~0);
73 }
74 libnsl_hidden_def (xdr_keydat)
75
76 bool_t
77 xdr_valdat (XDR *xdrs, valdat *objp)
78 {
79   return xdr_bytes (xdrs, (char **) &objp->valdat_val,
80                     (u_int *) &objp->valdat_len, ~0);
81 }
82 libnsl_hidden_def (xdr_valdat)
83
84 bool_t
85 xdr_ypmap_parms (XDR *xdrs, ypmap_parms *objp)
86 {
87   if (!xdr_domainname (xdrs, &objp->domain))
88     return FALSE;
89   if (!xdr_mapname (xdrs, &objp->map))
90     return FALSE;
91   if (!xdr_u_int (xdrs, &objp->ordernum))
92     return FALSE;
93   return xdr_peername (xdrs, &objp->peer);
94 }
95 libnsl_hidden_def (xdr_ypmap_parms)
96
97 bool_t
98 xdr_ypreq_key (XDR *xdrs, ypreq_key *objp)
99 {
100   if (!xdr_domainname (xdrs, &objp->domain))
101     return FALSE;
102   if (!xdr_mapname (xdrs, &objp->map))
103     return FALSE;
104   return xdr_keydat (xdrs, &objp->key);
105 }
106 libnsl_hidden_def (xdr_ypreq_key)
107
108 bool_t
109 xdr_ypreq_nokey (XDR *xdrs, ypreq_nokey *objp)
110 {
111   if (!xdr_domainname (xdrs, &objp->domain))
112     return FALSE;
113   return xdr_mapname (xdrs, &objp->map);
114 }
115 libnsl_hidden_def (xdr_ypreq_nokey)
116
117 bool_t
118 xdr_ypreq_xfr (XDR *xdrs, ypreq_xfr *objp)
119 {
120   if (!xdr_ypmap_parms (xdrs, &objp->map_parms))
121     return FALSE;
122   if (!xdr_u_int (xdrs, &objp->transid))
123     return FALSE;
124   if (!xdr_u_int (xdrs, &objp->prog))
125     return FALSE;
126   return xdr_u_int (xdrs, &objp->port);
127 }
128
129 bool_t
130 xdr_ypresp_val (XDR *xdrs, ypresp_val *objp)
131 {
132   if (!xdr_ypstat (xdrs, &objp->stat))
133     return FALSE;
134   return xdr_valdat (xdrs, &objp->val);
135 }
136 libnsl_hidden_def (xdr_ypresp_val)
137
138 bool_t
139 xdr_ypresp_key_val (XDR *xdrs, ypresp_key_val *objp)
140 {
141   if (!xdr_ypstat (xdrs, &objp->stat))
142     return FALSE;
143   if (!xdr_valdat (xdrs, &objp->val))
144     return FALSE;
145   return xdr_keydat (xdrs, &objp->key);
146 }
147 libnsl_hidden_def (xdr_ypresp_key_val)
148
149 bool_t
150 xdr_ypresp_master (XDR *xdrs, ypresp_master *objp)
151 {
152   if (!xdr_ypstat (xdrs, &objp->stat))
153     return FALSE;
154   return xdr_peername (xdrs, &objp->peer);
155 }
156 libnsl_hidden_def (xdr_ypresp_master)
157
158 bool_t
159 xdr_ypresp_order (XDR *xdrs, ypresp_order *objp)
160 {
161   if (!xdr_ypstat (xdrs, &objp->stat))
162     return FALSE;
163   return xdr_u_int (xdrs, &objp->ordernum);
164 }
165 libnsl_hidden_def (xdr_ypresp_order)
166
167 bool_t
168 xdr_ypresp_all (XDR *xdrs, ypresp_all *objp)
169 {
170   if (!xdr_bool (xdrs, &objp->more))
171     return FALSE;
172   switch (objp->more)
173     {
174     case TRUE:
175       return xdr_ypresp_key_val (xdrs, &objp->ypresp_all_u.val);
176     case FALSE:
177       break;
178     default:
179       return FALSE;
180     }
181   return TRUE;
182 }
183 libnsl_hidden_def (xdr_ypresp_all)
184
185 bool_t
186 xdr_ypresp_xfr (XDR *xdrs, ypresp_xfr *objp)
187 {
188   if (!xdr_u_int (xdrs, &objp->transid))
189     return FALSE;
190   return xdr_ypxfrstat (xdrs, &objp->xfrstat);
191 }
192
193 bool_t
194 xdr_ypmaplist (XDR *xdrs, ypmaplist *objp)
195 {
196   if (!xdr_mapname (xdrs, &objp->map))
197     return FALSE;
198   return xdr_pointer (xdrs, (char **) &objp->next, sizeof (ypmaplist),
199                       (xdrproc_t) xdr_ypmaplist);
200 }
201 libnsl_hidden_def (xdr_ypmaplist)
202
203 bool_t
204 xdr_ypresp_maplist (XDR *xdrs, ypresp_maplist *objp)
205 {
206   if (!xdr_ypstat (xdrs, &objp->stat))
207     return FALSE;
208   return xdr_pointer (xdrs, (char **) &objp->maps, sizeof (ypmaplist),
209                       (xdrproc_t) xdr_ypmaplist);
210 }
211 libnsl_hidden_def (xdr_ypresp_maplist)
212
213 bool_t
214 xdr_yppush_status (XDR *xdrs, yppush_status *objp)
215 {
216   return xdr_enum (xdrs, (enum_t *) objp);
217 }
218 libnsl_hidden_def (xdr_yppush_status)
219
220 bool_t
221 xdr_yppushresp_xfr (XDR *xdrs, yppushresp_xfr *objp)
222 {
223   if (!xdr_u_int (xdrs, &objp->transid))
224     return FALSE;
225   return xdr_yppush_status (xdrs, &objp->status);
226 }
227
228 bool_t
229 xdr_ypbind_resptype (XDR *xdrs, ypbind_resptype *objp)
230 {
231   return xdr_enum (xdrs, (enum_t *) objp);
232 }
233 libnsl_hidden_def (xdr_ypbind_resptype)
234
235 bool_t
236 xdr_ypbind_binding (XDR *xdrs, ypbind_binding *objp)
237 {
238   if (!xdr_opaque (xdrs, objp->ypbind_binding_addr, 4))
239     return FALSE;
240   return xdr_opaque (xdrs, objp->ypbind_binding_port, 2);
241 }
242 libnsl_hidden_def (xdr_ypbind_binding)
243
244 bool_t
245 xdr_ypbind_resp (XDR *xdrs, ypbind_resp *objp)
246 {
247   if (!xdr_ypbind_resptype (xdrs, &objp->ypbind_status))
248     return FALSE;
249   switch (objp->ypbind_status)
250     {
251     case YPBIND_FAIL_VAL:
252       return xdr_u_int (xdrs, &objp->ypbind_resp_u.ypbind_error);
253     case YPBIND_SUCC_VAL:
254       return xdr_ypbind_binding (xdrs, &objp->ypbind_resp_u.ypbind_bindinfo);
255     }
256   return FALSE;
257 }
258 libnsl_hidden_def (xdr_ypbind_resp)
259
260 bool_t
261 xdr_ypbind_setdom (XDR *xdrs, ypbind_setdom *objp)
262 {
263   if (!xdr_domainname (xdrs, &objp->ypsetdom_domain))
264     return FALSE;
265   if (!xdr_ypbind_binding (xdrs, &objp->ypsetdom_binding))
266     return FALSE;
267   return xdr_u_int (xdrs, &objp->ypsetdom_vers);
268 }
269
270 bool_t
271 xdr_ypall(XDR *xdrs, struct ypall_callback *incallback)
272 {
273     struct ypresp_key_val out;
274     char key[YPMAXRECORD], val[YPMAXRECORD];
275
276     /*
277      * Set up key/val struct to be used during the transaction.
278      */
279     memset(&out, 0, sizeof out);
280     out.key.keydat_val = key;
281     out.key.keydat_len = sizeof(key);
282     out.val.valdat_val = val;
283     out.val.valdat_len = sizeof(val);
284
285     for (;;) {
286         bool_t more, status;
287
288         /* Values pending? */
289         if (!xdr_bool(xdrs, &more))
290             return FALSE;           /* can't tell! */
291         if (!more)
292             return TRUE;            /* no more */
293
294         /* Transfer key/value pair. */
295         status = xdr_ypresp_key_val(xdrs, &out);
296
297         /*
298          * If we succeeded, call the callback function.
299          * The callback will return TRUE when it wants
300          * no more values.  If we fail, indicate the
301          * error.
302          */
303         if (status) {
304             if ((*incallback->foreach)(out.stat,
305                                        (char *)out.key.keydat_val, out.key.keydat_len,
306                                        (char *)out.val.valdat_val, out.val.valdat_len,
307                                        incallback->data))
308                 return TRUE;
309         } else
310             return FALSE;
311     }
312 }