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
 107 bool_t
 108 xdr_ypreq_nokey (XDR *xdrs, ypreq_nokey *objp)
 109 {
 110   if (!xdr_domainname (xdrs, &objp->domain))
 111     return FALSE;
 112   return xdr_mapname (xdrs, &objp->map);
 113 }
 114
 115 bool_t
 116 xdr_ypreq_xfr (XDR *xdrs, ypreq_xfr *objp)
 117 {
 118   if (!xdr_ypmap_parms (xdrs, &objp->map_parms))
 119     return FALSE;
 120   if (!xdr_u_int (xdrs, &objp->transid))
 121     return FALSE;
 122   if (!xdr_u_int (xdrs, &objp->prog))
 123     return FALSE;
 124   return xdr_u_int (xdrs, &objp->port);
 125 }
 126
 127 bool_t
 128 xdr_ypresp_val (XDR *xdrs, ypresp_val *objp)
 129 {
 130   if (!xdr_ypstat (xdrs, &objp->stat))
 131     return FALSE;
 132   return xdr_valdat (xdrs, &objp->val);
 133 }
 134
 135 bool_t
 136 xdr_ypresp_key_val (XDR *xdrs, ypresp_key_val *objp)
 137 {
 138   if (!xdr_ypstat (xdrs, &objp->stat))
 139     return FALSE;
 140   if (!xdr_valdat (xdrs, &objp->val))
 141     return FALSE;
 142   return xdr_keydat (xdrs, &objp->key);
 143 }
 144 libnsl_hidden_def (xdr_ypresp_key_val)
 145
 146 bool_t
 147 xdr_ypresp_master (XDR *xdrs, ypresp_master *objp)
 148 {
 149   if (!xdr_ypstat (xdrs, &objp->stat))
 150     return FALSE;
 151   return xdr_peername (xdrs, &objp->peer);
 152 }
 153
 154 bool_t
 155 xdr_ypresp_order (XDR *xdrs, ypresp_order *objp)
 156 {
 157   if (!xdr_ypstat (xdrs, &objp->stat))
 158     return FALSE;
 159   return xdr_u_int (xdrs, &objp->ordernum);
 160 }
 161
 162 bool_t
 163 xdr_ypresp_all (XDR *xdrs, ypresp_all *objp)
 164 {
 165   if (!xdr_bool (xdrs, &objp->more))
 166     return FALSE;
 167   switch (objp->more)
 168     {
 169     case TRUE:
 170       return xdr_ypresp_key_val (xdrs, &objp->ypresp_all_u.val);
 171     case FALSE:
 172       break;
 173     default:
 174       return FALSE;
 175     }
 176   return TRUE;
 177 }
 178 libnsl_hidden_def (xdr_ypresp_all)
 179
 180 bool_t
 181 xdr_ypresp_xfr (XDR *xdrs, ypresp_xfr *objp)
 182 {
 183   if (!xdr_u_int (xdrs, &objp->transid))
 184     return FALSE;
 185   return xdr_ypxfrstat (xdrs, &objp->xfrstat);
 186 }
 187
 188 bool_t
 189 xdr_ypmaplist (XDR *xdrs, ypmaplist *objp)
 190 {
 191   if (!xdr_mapname (xdrs, &objp->map))
 192     return FALSE;
 193   return xdr_pointer (xdrs, (char **) &objp->next, sizeof (ypmaplist),
 194                       (xdrproc_t) xdr_ypmaplist);
 195 }
 196
 197 bool_t
 198 xdr_ypresp_maplist (XDR *xdrs, ypresp_maplist *objp)
 199 {
 200   if (!xdr_ypstat (xdrs, &objp->stat))
 201     return FALSE;
 202   return xdr_pointer (xdrs, (char **) &objp->maps, sizeof (ypmaplist),
 203                       (xdrproc_t) xdr_ypmaplist);
 204 }
 205
 206 bool_t
 207 xdr_yppush_status (XDR *xdrs, yppush_status *objp)
 208 {
 209   return xdr_enum (xdrs, (enum_t *) objp);
 210 }
 211 libnsl_hidden_def (xdr_yppush_status)
 212
 213 bool_t
 214 xdr_yppushresp_xfr (XDR *xdrs, yppushresp_xfr *objp)
 215 {
 216   if (!xdr_u_int (xdrs, &objp->transid))
 217     return FALSE;
 218   return xdr_yppush_status (xdrs, &objp->status);
 219 }
 220
 221 bool_t
 222 xdr_ypbind_resptype (XDR *xdrs, ypbind_resptype *objp)
 223 {
 224   return xdr_enum (xdrs, (enum_t *) objp);
 225 }
 226 libnsl_hidden_def (xdr_ypbind_resptype)
 227
 228 bool_t
 229 xdr_ypbind_binding (XDR *xdrs, ypbind_binding *objp)
 230 {
 231   if (!xdr_opaque (xdrs, objp->ypbind_binding_addr, 4))
 232     return FALSE;
 233   return xdr_opaque (xdrs, objp->ypbind_binding_port, 2);
 234 }
 235 libnsl_hidden_def (xdr_ypbind_binding)
 236
 237 bool_t
 238 xdr_ypbind_resp (XDR *xdrs, ypbind_resp *objp)
 239 {
 240   if (!xdr_ypbind_resptype (xdrs, &objp->ypbind_status))
 241     return FALSE;
 242   switch (objp->ypbind_status)
 243     {
 244     case YPBIND_FAIL_VAL:
 245       return xdr_u_int (xdrs, &objp->ypbind_resp_u.ypbind_error);
 246     case YPBIND_SUCC_VAL:
 247       return xdr_ypbind_binding (xdrs, &objp->ypbind_resp_u.ypbind_bindinfo);
 248     }
 249   return FALSE;
 250 }
 251
 252 bool_t
 253 xdr_ypbind_setdom (XDR *xdrs, ypbind_setdom *objp)
 254 {
 255   if (!xdr_domainname (xdrs, &objp->ypsetdom_domain))
 256     return FALSE;
 257   if (!xdr_ypbind_binding (xdrs, &objp->ypsetdom_binding))
 258     return FALSE;
 259   return xdr_u_int (xdrs, &objp->ypsetdom_vers);
 260 }
 261
 262 bool_t
 263 xdr_ypall(XDR *xdrs, struct ypall_callback *incallback)
 264 {
 265     struct ypresp_key_val out;
 266     char key[YPMAXRECORD], val[YPMAXRECORD];
 267
 268     /*
 269      * Set up key/val struct to be used during the transaction.
 270      */
 271     memset(&out, 0, sizeof out);
 272     out.key.keydat_val = key;
 273     out.key.keydat_len = sizeof(key);
 274     out.val.valdat_val = val;
 275     out.val.valdat_len = sizeof(val);
 276
 277     for (;;) {
 278         bool_t more, status;
 279
 280         /* Values pending? */
 281         if (!xdr_bool(xdrs, &more))
 282             return FALSE;           /* can't tell! */
 283         if (!more)
 284             return TRUE;            /* no more */
 285
 286         /* Transfer key/value pair. */
 287         status = xdr_ypresp_key_val(xdrs, &out);
 288
 289         /*
 290          * If we succeeded, call the callback function.
 291          * The callback will return TRUE when it wants
 292          * no more values.  If we fail, indicate the
 293          * error.
 294          */
 295         if (status) {
 296             if ((*incallback->foreach)(out.stat,
 297                                        (char *)out.key.keydat_val, out.key.keydat_len,
 298                                        (char *)out.val.valdat_val, out.val.valdat_len,
 299                                        incallback->data))
 300                 return TRUE;
 301         } else
 302             return FALSE;
 303     }
 304 }