openbsd-20021105
[openafs.git] / src / rx / xdr_float.c
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 #include <afsconfig.h>
30 #include <afs/param.h>
31
32 RCSID("$Header$");
33
34 #ifndef NeXT
35
36 /*
37  * xdr_float.c, Generic XDR routines impelmentation.
38  *
39  * Copyright (C) 1984, Sun Microsystems, Inc.
40  *
41  * These are the "floating point" xdr routines used to (de)serialize
42  * most common data items.  See xdr.h for more info on the interface to
43  * xdr.
44  */
45
46 #include "xdr.h"
47 #include <stdio.h>
48
49 /*
50  * NB: Not portable.
51  * Platforms other than Windows/NT should use the XDR routines
52  * in the system libraries.
53  */
54
55 bool_t xdr_float(register XDR *xdrs, register float *fp)
56 {
57 #ifdef AFS_NT40_ENV
58         return(FALSE);
59 #else
60         switch (xdrs->x_op) {
61
62         case XDR_ENCODE:
63                 return (XDR_PUTINT32(xdrs, (afs_int32 *)fp));
64
65         case XDR_DECODE:
66                 return (XDR_GETINT32(xdrs, (afs_int32 *)fp));
67
68         case XDR_FREE:
69                 return (TRUE);
70         }
71         return (FALSE);
72 #endif
73 }
74
75 bool_t xdr_double(register XDR *xdrs, double *dp)
76 {
77 #ifdef AFS_NT40_ENV
78         return(FALSE);
79 #else
80         afs_int32 *ip;
81         switch (xdrs->x_op) {
82
83         case XDR_ENCODE:
84                 ip = (afs_int32 *)(dp);
85                 return(XDR_PUTINT32(xdrs, *(ip+1)) && XDR_PUTINT32(xdrs, *ip));
86
87         case XDR_DECODE:
88                 ip = (afs_int32 *)(dp);
89                 return(XDR_GETINT32(xdrs, *(ip+1)) && XDR_GETINT32(xdrs, *ip));
90
91         case XDR_FREE:
92                 return (TRUE);
93         }
94         return (FALSE);
95 #endif
96 }
97
98 #endif /* NeXT */