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 }