| /* Copyright (c) 1998, 1999, 2000, 2004, 2005 Free Software Foundation, Inc. |
| This file is part of the GNU C Library. |
| Contributed by Thorsten Kukuk <kukuk@vt.uni-paderborn.de>, 1998. |
| |
| The GNU C Library is free software; you can redistribute it and/or |
| modify it under the terms of the GNU Lesser General Public |
| License as published by the Free Software Foundation; either |
| version 2.1 of the License, or (at your option) any later version. |
| |
| The GNU C Library is distributed in the hope that it will be useful, |
| but WITHOUT ANY WARRANTY; without even the implied warranty of |
| MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
| Lesser General Public License for more details. |
| |
| You should have received a copy of the GNU Lesser General Public |
| License along with the GNU C Library; if not, write to the Free |
| Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA |
| 02111-1307 USA. */ |
| |
| #include <rpc/types.h> |
| |
| /* We play dirty tricks with aliases. */ |
| #define xdr_quad_t Xdr_quad_t |
| #define xdr_u_quad_t Xdr_u_quad_t |
| #include <rpc/xdr.h> |
| #undef xdr_quad_t |
| #undef xdr_u_quad_t |
| |
| |
| /* XDR 64bit integers */ |
| bool_t |
| xdr_int64_t (XDR *xdrs, int64_t *ip) |
| { |
| int32_t t1, t2; |
| |
| switch (xdrs->x_op) |
| { |
| case XDR_ENCODE: |
| t1 = (int32_t) ((*ip) >> 32); |
| t2 = (int32_t) (*ip); |
| return (XDR_PUTINT32(xdrs, &t1) && XDR_PUTINT32(xdrs, &t2)); |
| case XDR_DECODE: |
| if (!XDR_GETINT32(xdrs, &t1) || !XDR_GETINT32(xdrs, &t2)) |
| return FALSE; |
| *ip = ((int64_t) t1) << 32; |
| *ip |= (uint32_t) t2; /* Avoid sign extension. */ |
| return TRUE; |
| case XDR_FREE: |
| return TRUE; |
| default: |
| return FALSE; |
| } |
| } |
| strong_alias (xdr_int64_t, xdr_quad_t) |
| |
| /* XDR 64bit unsigned integers */ |
| bool_t |
| xdr_uint64_t (XDR *xdrs, uint64_t *uip) |
| { |
| uint32_t t1; |
| uint32_t t2; |
| |
| switch (xdrs->x_op) |
| { |
| case XDR_ENCODE: |
| t1 = (uint32_t) ((*uip) >> 32); |
| t2 = (uint32_t) (*uip); |
| return (XDR_PUTINT32 (xdrs, (int32_t *) &t1) && |
| XDR_PUTINT32(xdrs, (int32_t *) &t2)); |
| case XDR_DECODE: |
| if (!XDR_GETINT32(xdrs, (int32_t *) &t1) || |
| !XDR_GETINT32(xdrs, (int32_t *) &t2)) |
| return FALSE; |
| *uip = ((uint64_t) t1) << 32; |
| *uip |= t2; |
| return TRUE; |
| case XDR_FREE: |
| return TRUE; |
| default: |
| return FALSE; |
| } |
| } |
| strong_alias (xdr_int64_t, xdr_u_quad_t) |
| |
| /* XDR 32bit integers */ |
| bool_t |
| xdr_int32_t (XDR *xdrs, int32_t *lp) |
| { |
| switch (xdrs->x_op) |
| { |
| case XDR_ENCODE: |
| return XDR_PUTINT32 (xdrs, lp); |
| case XDR_DECODE: |
| return XDR_GETINT32 (xdrs, lp); |
| case XDR_FREE: |
| return TRUE; |
| default: |
| return FALSE; |
| } |
| } |
| |
| /* XDR 32bit unsigned integers */ |
| bool_t |
| xdr_uint32_t (XDR *xdrs, uint32_t *ulp) |
| { |
| switch (xdrs->x_op) |
| { |
| case XDR_ENCODE: |
| return XDR_PUTINT32 (xdrs, (int32_t *) ulp); |
| case XDR_DECODE: |
| return XDR_GETINT32 (xdrs, (int32_t *) ulp); |
| case XDR_FREE: |
| return TRUE; |
| default: |
| return FALSE; |
| } |
| } |
| |
| /* XDR 16bit integers */ |
| bool_t |
| xdr_int16_t (XDR *xdrs, int16_t *ip) |
| { |
| int32_t t; |
| |
| switch (xdrs->x_op) |
| { |
| case XDR_ENCODE: |
| t = (int32_t) *ip; |
| return XDR_PUTINT32 (xdrs, &t); |
| case XDR_DECODE: |
| if (!XDR_GETINT32 (xdrs, &t)) |
| return FALSE; |
| *ip = (int16_t) t; |
| return TRUE; |
| case XDR_FREE: |
| return TRUE; |
| default: |
| return FALSE; |
| } |
| } |
| |
| /* XDR 16bit unsigned integers */ |
| bool_t |
| xdr_uint16_t (XDR *xdrs, uint16_t *uip) |
| { |
| uint32_t ut; |
| |
| switch (xdrs->x_op) |
| { |
| case XDR_ENCODE: |
| ut = (uint32_t) *uip; |
| return XDR_PUTINT32 (xdrs, (int32_t *) &ut); |
| case XDR_DECODE: |
| if (!XDR_GETINT32 (xdrs, (int32_t *) &ut)) |
| return FALSE; |
| *uip = (uint16_t) ut; |
| return TRUE; |
| case XDR_FREE: |
| return TRUE; |
| default: |
| return FALSE; |
| } |
| } |
| |
| /* XDR 8bit integers */ |
| bool_t |
| xdr_int8_t (XDR *xdrs, int8_t *ip) |
| { |
| int32_t t; |
| |
| switch (xdrs->x_op) |
| { |
| case XDR_ENCODE: |
| t = (int32_t) *ip; |
| return XDR_PUTINT32 (xdrs, &t); |
| case XDR_DECODE: |
| if (!XDR_GETINT32 (xdrs, &t)) |
| return FALSE; |
| *ip = (int8_t) t; |
| return TRUE; |
| case XDR_FREE: |
| return TRUE; |
| default: |
| return FALSE; |
| } |
| } |
| |
| /* XDR 8bit unsigned integers */ |
| bool_t |
| xdr_uint8_t (XDR *xdrs, uint8_t *uip) |
| { |
| uint32_t ut; |
| |
| switch (xdrs->x_op) |
| { |
| case XDR_ENCODE: |
| ut = (uint32_t) *uip; |
| return XDR_PUTINT32 (xdrs, (int32_t *) &ut); |
| case XDR_DECODE: |
| if (!XDR_GETINT32 (xdrs, (int32_t *) &ut)) |
| return FALSE; |
| *uip = (uint8_t) ut; |
| return TRUE; |
| case XDR_FREE: |
| return TRUE; |
| default: |
| return FALSE; |
| } |
| } |