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 * @(#)xdr_float.c 1.12 87/08/11 Copyr 1984 Sun Micro 30 * @(#)xdr_float.c 2.1 88/07/29 4.0 RPCSRC 31 * $NetBSD: xdr_float.c,v 1.23 2000/07/17 04:59:51 matt Exp $ 32 * $FreeBSD: src/lib/libc/xdr/xdr_float.c,v 1.14 2004/10/16 06:32:43 obrien Exp $ 33 */ 34 35 /* 36 * xdr_float.c, Generic XDR routines implementation. 37 * 38 * Copyright (C) 1984, Sun Microsystems, Inc. 39 * 40 * These are the "floating point" xdr routines used to (de)serialize 41 * most common data items. See xdr.h for more info on the interface to 42 * xdr. 43 */ 44 45 #include "namespace.h" 46 #include <sys/types.h> 47 #include <sys/param.h> 48 49 #include <machine/endian.h> 50 51 #include <stdio.h> 52 53 #include <rpc/types.h> 54 #include <rpc/xdr.h> 55 #include "un-namespace.h" 56 57 /* 58 * This routine works on machines with IEEE754 FP. 59 */ 60 61 bool_t 62 xdr_float(XDR *xdrs, float *fp) 63 { 64 switch (xdrs->x_op) { 65 66 case XDR_ENCODE: 67 return (XDR_PUTINT32(xdrs, (int32_t *)fp)); 68 69 case XDR_DECODE: 70 return (XDR_GETINT32(xdrs, (int32_t *)fp)); 71 72 case XDR_FREE: 73 return (TRUE); 74 } 75 /* NOTREACHED */ 76 return (FALSE); 77 } 78 79 bool_t 80 xdr_double(XDR *xdrs, double *dp) 81 { 82 int32_t *i32p; 83 bool_t rv; 84 85 switch (xdrs->x_op) { 86 87 case XDR_ENCODE: 88 i32p = (int32_t *)(void *)dp; 89 #if BYTE_ORDER == BIG_ENDIAN 90 rv = XDR_PUTINT32(xdrs, i32p); 91 if (!rv) 92 return (rv); 93 rv = XDR_PUTINT32(xdrs, i32p+1); 94 #else 95 rv = XDR_PUTINT32(xdrs, i32p+1); 96 if (!rv) 97 return (rv); 98 rv = XDR_PUTINT32(xdrs, i32p); 99 #endif 100 return (rv); 101 102 case XDR_DECODE: 103 i32p = (int32_t *)(void *)dp; 104 #if BYTE_ORDER == BIG_ENDIAN 105 rv = XDR_GETINT32(xdrs, i32p); 106 if (!rv) 107 return (rv); 108 rv = XDR_GETINT32(xdrs, i32p+1); 109 #else 110 rv = XDR_GETINT32(xdrs, i32p+1); 111 if (!rv) 112 return (rv); 113 rv = XDR_GETINT32(xdrs, i32p); 114 #endif 115 return (rv); 116 117 case XDR_FREE: 118 return (TRUE); 119 } 120 /* NOTREACHED */ 121 return (FALSE); 122 } 123