xref: /dragonfly/lib/libc/xdr/xdr_float.c (revision c8860c9a)
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
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