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, MERCHANTABILITY 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
xdr_float(XDR * xdrs,float * fp)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
xdr_double(XDR * xdrs,double * dp)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