sunrpc/xdr_intXX_t.c

   1 /* Copyright (c) 1998, 1999, 2000, 2004, 2005 Free Software Foundation, Inc.
   2    This file is part of the GNU C Library.
   3    Contributed by Thorsten Kukuk <kukuk@vt.uni-paderborn.de>, 1998.
   4
   5    The GNU C Library is free software; you can redistribute it and/or
   6    modify it under the terms of the GNU Lesser General Public
   7    License as published by the Free Software Foundation; either
   8    version 2.1 of the License, or (at your option) any later version.
   9
  10    The GNU C Library is distributed in the hope that it will be useful,
  11    but WITHOUT ANY WARRANTY; without even the implied warranty of
  12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13    Lesser General Public License for more details.
  14
  15    You should have received a copy of the GNU Lesser General Public
  16    License along with the GNU C Library; if not, see
  17    <http://www.gnu.org/licenses/>.  */
  18
  19 #include <rpc/types.h>
  20
  21 /* We play dirty tricks with aliases.  */
  22 #include <rpc/xdr.h>
  23
  24
  25 /* XDR 64bit integers */
  26 bool_t
  27 xdr_int64_t (XDR *xdrs, int64_t *ip)
  28 {
  29   int32_t t1, t2;
  30
  31   switch (xdrs->x_op)
  32     {
  33     case XDR_ENCODE:
  34       t1 = (int32_t) ((*ip) >> 32);
  35       t2 = (int32_t) (*ip);
  36       return (XDR_PUTINT32(xdrs, &t1) && XDR_PUTINT32(xdrs, &t2));
  37     case XDR_DECODE:
  38       if (!XDR_GETINT32(xdrs, &t1) || !XDR_GETINT32(xdrs, &t2))
  39         return FALSE;
  40       *ip = ((int64_t) t1) << 32;
  41       *ip |= (uint32_t) t2;     /* Avoid sign extension.  */
  42       return TRUE;
  43     case XDR_FREE:
  44       return TRUE;
  45     default:
  46       return FALSE;
  47     }
  48 }
  49 libc_hidden_nolink_sunrpc (xdr_int64_t, GLIBC_2_1_1)
  50
  51 bool_t
  52 xdr_quad_t (XDR *xdrs, quad_t *ip)
  53 {
  54   return xdr_int64_t (xdrs, (int64_t *) ip);
  55 }
  56 libc_hidden_nolink_sunrpc (xdr_quad_t, GLIBC_2_3_4)
  57
  58 /* XDR 64bit unsigned integers */
  59 bool_t
  60 xdr_uint64_t (XDR *xdrs, uint64_t *uip)
  61 {
  62   uint32_t t1;
  63   uint32_t t2;
  64
  65   switch (xdrs->x_op)
  66     {
  67     case XDR_ENCODE:
  68       t1 = (uint32_t) ((*uip) >> 32);
  69       t2 = (uint32_t) (*uip);
  70       return (XDR_PUTINT32 (xdrs, (int32_t *) &t1) &&
  71               XDR_PUTINT32(xdrs, (int32_t *) &t2));
  72     case XDR_DECODE:
  73       if (!XDR_GETINT32(xdrs, (int32_t *) &t1) ||
  74           !XDR_GETINT32(xdrs, (int32_t *) &t2))
  75         return FALSE;
  76       *uip = ((uint64_t) t1) << 32;
  77       *uip |= t2;
  78       return TRUE;
  79     case XDR_FREE:
  80       return TRUE;
  81     default:
  82       return FALSE;
  83     }
  84 }
  85 libc_hidden_nolink_sunrpc (xdr_uint64_t, GLIBC_2_1_1)
  86
  87 bool_t
  88 xdr_u_quad_t (XDR *xdrs, u_quad_t *ip)
  89 {
  90   return xdr_uint64_t (xdrs, (uint64_t *) ip);
  91 }
  92 libc_hidden_nolink_sunrpc (xdr_u_quad_t, GLIBC_2_3_4)
  93
  94 /* XDR 32bit integers */
  95 bool_t
  96 xdr_int32_t (XDR *xdrs, int32_t *lp)
  97 {
  98   switch (xdrs->x_op)
  99     {
 100     case XDR_ENCODE:
 101       return XDR_PUTINT32 (xdrs, lp);
 102     case XDR_DECODE:
 103       return XDR_GETINT32 (xdrs, lp);
 104     case XDR_FREE:
 105       return TRUE;
 106     default:
 107       return FALSE;
 108     }
 109 }
 110 libc_hidden_nolink_sunrpc (xdr_int32_t, GLIBC_2_1)
 111
 112 /* XDR 32bit unsigned integers */
 113 bool_t
 114 xdr_uint32_t (XDR *xdrs, uint32_t *ulp)
 115 {
 116   switch (xdrs->x_op)
 117     {
 118     case XDR_ENCODE:
 119       return XDR_PUTINT32 (xdrs, (int32_t *) ulp);
 120     case XDR_DECODE:
 121       return XDR_GETINT32 (xdrs, (int32_t *) ulp);
 122     case XDR_FREE:
 123       return TRUE;
 124     default:
 125       return FALSE;
 126     }
 127 }
 128 #ifdef EXPORT_RPC_SYMBOLS
 129 libc_hidden_def (xdr_uint32_t)
 130 #else
 131 libc_hidden_nolink_sunrpc (xdr_uint32_t, GLIBC_2_1)
 132 #endif
 133
 134 /* XDR 16bit integers */
 135 bool_t
 136 xdr_int16_t (XDR *xdrs, int16_t *ip)
 137 {
 138   int32_t t;
 139
 140   switch (xdrs->x_op)
 141     {
 142     case XDR_ENCODE:
 143       t = (int32_t) *ip;
 144       return XDR_PUTINT32 (xdrs, &t);
 145     case XDR_DECODE:
 146       if (!XDR_GETINT32 (xdrs, &t))
 147         return FALSE;
 148       *ip = (int16_t) t;
 149       return TRUE;
 150     case XDR_FREE:
 151       return TRUE;
 152     default:
 153       return FALSE;
 154     }
 155 }
 156 libc_hidden_nolink_sunrpc (xdr_int16_t, GLIBC_2_1)
 157
 158 /* XDR 16bit unsigned integers */
 159 bool_t
 160 xdr_uint16_t (XDR *xdrs, uint16_t *uip)
 161 {
 162   uint32_t ut;
 163
 164   switch (xdrs->x_op)
 165     {
 166     case XDR_ENCODE:
 167       ut = (uint32_t) *uip;
 168       return XDR_PUTINT32 (xdrs, (int32_t *) &ut);
 169     case XDR_DECODE:
 170       if (!XDR_GETINT32 (xdrs, (int32_t *) &ut))
 171         return FALSE;
 172       *uip = (uint16_t) ut;
 173       return TRUE;
 174     case XDR_FREE:
 175       return TRUE;
 176     default:
 177       return FALSE;
 178     }
 179 }
 180 libc_hidden_nolink_sunrpc (xdr_uint16_t, GLIBC_2_1)
 181
 182 /* XDR 8bit integers */
 183 bool_t
 184 xdr_int8_t (XDR *xdrs, int8_t *ip)
 185 {
 186   int32_t t;
 187
 188   switch (xdrs->x_op)
 189     {
 190     case XDR_ENCODE:
 191       t = (int32_t) *ip;
 192       return XDR_PUTINT32 (xdrs, &t);
 193     case XDR_DECODE:
 194       if (!XDR_GETINT32 (xdrs, &t))
 195         return FALSE;
 196       *ip = (int8_t) t;
 197       return TRUE;
 198     case XDR_FREE:
 199       return TRUE;
 200     default:
 201       return FALSE;
 202     }
 203 }
 204 libc_hidden_nolink_sunrpc (xdr_int8_t, GLIBC_2_1)
 205
 206 /* XDR 8bit unsigned integers */
 207 bool_t
 208 xdr_uint8_t (XDR *xdrs, uint8_t *uip)
 209 {
 210   uint32_t ut;
 211
 212   switch (xdrs->x_op)
 213     {
 214     case XDR_ENCODE:
 215       ut = (uint32_t) *uip;
 216       return XDR_PUTINT32 (xdrs, (int32_t *) &ut);
 217     case XDR_DECODE:
 218       if (!XDR_GETINT32 (xdrs, (int32_t *) &ut))
 219         return FALSE;
 220       *uip = (uint8_t) ut;
 221       return TRUE;
 222     case XDR_FREE:
 223       return TRUE;
 224     default:
 225       return FALSE;
 226     }
 227 }
 228 libc_hidden_nolink_sunrpc (xdr_uint8_t, GLIBC_2_1)