1*b0735d80SMarcel Moolenaar /*	$NetBSD: softfloat.h,v 1.6 2002/05/12 13:12:46 bjh21 Exp $	*/
2*b0735d80SMarcel Moolenaar /* $FreeBSD$ */
3*b0735d80SMarcel Moolenaar 
4*b0735d80SMarcel Moolenaar /* This is a derivative work. */
5*b0735d80SMarcel Moolenaar 
6*b0735d80SMarcel Moolenaar /*
7*b0735d80SMarcel Moolenaar ===============================================================================
8*b0735d80SMarcel Moolenaar 
9*b0735d80SMarcel Moolenaar This C header file is part of the SoftFloat IEC/IEEE Floating-point
10*b0735d80SMarcel Moolenaar Arithmetic Package, Release 2a.
11*b0735d80SMarcel Moolenaar 
12*b0735d80SMarcel Moolenaar Written by John R. Hauser.  This work was made possible in part by the
13*b0735d80SMarcel Moolenaar International Computer Science Institute, located at Suite 600, 1947 Center
14*b0735d80SMarcel Moolenaar Street, Berkeley, California 94704.  Funding was partially provided by the
15*b0735d80SMarcel Moolenaar National Science Foundation under grant MIP-9311980.  The original version
16*b0735d80SMarcel Moolenaar of this code was written as part of a project to build a fixed-point vector
17*b0735d80SMarcel Moolenaar processor in collaboration with the University of California at Berkeley,
18*b0735d80SMarcel Moolenaar overseen by Profs. Nelson Morgan and John Wawrzynek.  More information
19*b0735d80SMarcel Moolenaar is available through the Web page `http://HTTP.CS.Berkeley.EDU/~jhauser/
20*b0735d80SMarcel Moolenaar arithmetic/SoftFloat.html'.
21*b0735d80SMarcel Moolenaar 
22*b0735d80SMarcel Moolenaar THIS SOFTWARE IS DISTRIBUTED AS IS, FOR FREE.  Although reasonable effort
23*b0735d80SMarcel Moolenaar has been made to avoid it, THIS SOFTWARE MAY CONTAIN FAULTS THAT WILL AT
24*b0735d80SMarcel Moolenaar TIMES RESULT IN INCORRECT BEHAVIOR.  USE OF THIS SOFTWARE IS RESTRICTED TO
25*b0735d80SMarcel Moolenaar PERSONS AND ORGANIZATIONS WHO CAN AND WILL TAKE FULL RESPONSIBILITY FOR ANY
26*b0735d80SMarcel Moolenaar AND ALL LOSSES, COSTS, OR OTHER PROBLEMS ARISING FROM ITS USE.
27*b0735d80SMarcel Moolenaar 
28*b0735d80SMarcel Moolenaar Derivative works are acceptable, even for commercial purposes, so long as
29*b0735d80SMarcel Moolenaar (1) they include prominent notice that the work is derivative, and (2) they
30*b0735d80SMarcel Moolenaar include prominent notice akin to these four paragraphs for those parts of
31*b0735d80SMarcel Moolenaar this code that are retained.
32*b0735d80SMarcel Moolenaar 
33*b0735d80SMarcel Moolenaar ===============================================================================
34*b0735d80SMarcel Moolenaar */
35*b0735d80SMarcel Moolenaar 
36*b0735d80SMarcel Moolenaar /*
37*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
38*b0735d80SMarcel Moolenaar The macro `FLOATX80' must be defined to enable the extended double-precision
39*b0735d80SMarcel Moolenaar floating-point format `floatx80'.  If this macro is not defined, the
40*b0735d80SMarcel Moolenaar `floatx80' type will not be defined, and none of the functions that either
41*b0735d80SMarcel Moolenaar input or output the `floatx80' type will be defined.  The same applies to
42*b0735d80SMarcel Moolenaar the `FLOAT128' macro and the quadruple-precision format `float128'.
43*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
44*b0735d80SMarcel Moolenaar */
45*b0735d80SMarcel Moolenaar /* #define FLOATX80 */
46*b0735d80SMarcel Moolenaar /* #define FLOAT128 */
47*b0735d80SMarcel Moolenaar 
48*b0735d80SMarcel Moolenaar #include <machine/ieeefp.h>
49*b0735d80SMarcel Moolenaar 
50*b0735d80SMarcel Moolenaar /*
51*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
52*b0735d80SMarcel Moolenaar Software IEC/IEEE floating-point types.
53*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
54*b0735d80SMarcel Moolenaar */
55*b0735d80SMarcel Moolenaar typedef unsigned int float32;
56*b0735d80SMarcel Moolenaar typedef unsigned long long float64;
57*b0735d80SMarcel Moolenaar #ifdef FLOATX80
58*b0735d80SMarcel Moolenaar typedef struct {
59*b0735d80SMarcel Moolenaar     unsigned short high;
60*b0735d80SMarcel Moolenaar     unsigned long long low;
61*b0735d80SMarcel Moolenaar } floatx80;
62*b0735d80SMarcel Moolenaar #endif
63*b0735d80SMarcel Moolenaar #ifdef FLOAT128
64*b0735d80SMarcel Moolenaar typedef struct {
65*b0735d80SMarcel Moolenaar     unsigned long long high, low;
66*b0735d80SMarcel Moolenaar } float128;
67*b0735d80SMarcel Moolenaar #endif
68*b0735d80SMarcel Moolenaar 
69*b0735d80SMarcel Moolenaar /*
70*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
71*b0735d80SMarcel Moolenaar Software IEC/IEEE floating-point underflow tininess-detection mode.
72*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
73*b0735d80SMarcel Moolenaar */
74*b0735d80SMarcel Moolenaar #ifndef SOFTFLOAT_FOR_GCC
75*b0735d80SMarcel Moolenaar extern int8 float_detect_tininess;
76*b0735d80SMarcel Moolenaar #endif
77*b0735d80SMarcel Moolenaar enum {
78*b0735d80SMarcel Moolenaar     float_tininess_after_rounding  = 0,
79*b0735d80SMarcel Moolenaar     float_tininess_before_rounding = 1
80*b0735d80SMarcel Moolenaar };
81*b0735d80SMarcel Moolenaar 
82*b0735d80SMarcel Moolenaar /*
83*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
84*b0735d80SMarcel Moolenaar Software IEC/IEEE floating-point rounding mode.
85*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
86*b0735d80SMarcel Moolenaar */
87*b0735d80SMarcel Moolenaar extern fp_rnd_t float_rounding_mode;
88*b0735d80SMarcel Moolenaar enum {
89*b0735d80SMarcel Moolenaar     float_round_nearest_even = FP_RN,
90*b0735d80SMarcel Moolenaar     float_round_to_zero      = FP_RZ,
91*b0735d80SMarcel Moolenaar     float_round_down         = FP_RM,
92*b0735d80SMarcel Moolenaar     float_round_up           = FP_RP
93*b0735d80SMarcel Moolenaar };
94*b0735d80SMarcel Moolenaar 
95*b0735d80SMarcel Moolenaar /*
96*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
97*b0735d80SMarcel Moolenaar Software IEC/IEEE floating-point exception flags.
98*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
99*b0735d80SMarcel Moolenaar */
100*b0735d80SMarcel Moolenaar typedef fp_except_t fp_except;
101*b0735d80SMarcel Moolenaar 
102*b0735d80SMarcel Moolenaar extern fp_except float_exception_flags;
103*b0735d80SMarcel Moolenaar extern fp_except float_exception_mask;
104*b0735d80SMarcel Moolenaar enum {
105*b0735d80SMarcel Moolenaar     float_flag_inexact   = FP_X_IMP,
106*b0735d80SMarcel Moolenaar     float_flag_underflow = FP_X_UFL,
107*b0735d80SMarcel Moolenaar     float_flag_overflow  = FP_X_OFL,
108*b0735d80SMarcel Moolenaar     float_flag_divbyzero = FP_X_DZ,
109*b0735d80SMarcel Moolenaar     float_flag_invalid   = FP_X_INV
110*b0735d80SMarcel Moolenaar };
111*b0735d80SMarcel Moolenaar 
112*b0735d80SMarcel Moolenaar /*
113*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
114*b0735d80SMarcel Moolenaar Routine to raise any or all of the software IEC/IEEE floating-point
115*b0735d80SMarcel Moolenaar exception flags.
116*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
117*b0735d80SMarcel Moolenaar */
118*b0735d80SMarcel Moolenaar void float_raise( fp_except );
119*b0735d80SMarcel Moolenaar 
120*b0735d80SMarcel Moolenaar /*
121*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
122*b0735d80SMarcel Moolenaar Software IEC/IEEE integer-to-floating-point conversion routines.
123*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
124*b0735d80SMarcel Moolenaar */
125*b0735d80SMarcel Moolenaar float32 int32_to_float32( int );
126*b0735d80SMarcel Moolenaar float64 int32_to_float64( int );
127*b0735d80SMarcel Moolenaar #ifdef FLOATX80
128*b0735d80SMarcel Moolenaar floatx80 int32_to_floatx80( int );
129*b0735d80SMarcel Moolenaar #endif
130*b0735d80SMarcel Moolenaar #ifdef FLOAT128
131*b0735d80SMarcel Moolenaar float128 int32_to_float128( int );
132*b0735d80SMarcel Moolenaar #endif
133*b0735d80SMarcel Moolenaar float32 int64_to_float32( long long );
134*b0735d80SMarcel Moolenaar float64 int64_to_float64( long long );
135*b0735d80SMarcel Moolenaar #ifdef FLOATX80
136*b0735d80SMarcel Moolenaar floatx80 int64_to_floatx80( long long );
137*b0735d80SMarcel Moolenaar #endif
138*b0735d80SMarcel Moolenaar #ifdef FLOAT128
139*b0735d80SMarcel Moolenaar float128 int64_to_float128( long long );
140*b0735d80SMarcel Moolenaar #endif
141*b0735d80SMarcel Moolenaar 
142*b0735d80SMarcel Moolenaar /*
143*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
144*b0735d80SMarcel Moolenaar Software IEC/IEEE single-precision conversion routines.
145*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
146*b0735d80SMarcel Moolenaar */
147*b0735d80SMarcel Moolenaar int float32_to_int32( float32 );
148*b0735d80SMarcel Moolenaar int float32_to_int32_round_to_zero( float32 );
149*b0735d80SMarcel Moolenaar unsigned int float32_to_uint32_round_to_zero( float32 );
150*b0735d80SMarcel Moolenaar long long float32_to_int64( float32 );
151*b0735d80SMarcel Moolenaar long long float32_to_int64_round_to_zero( float32 );
152*b0735d80SMarcel Moolenaar float64 float32_to_float64( float32 );
153*b0735d80SMarcel Moolenaar #ifdef FLOATX80
154*b0735d80SMarcel Moolenaar floatx80 float32_to_floatx80( float32 );
155*b0735d80SMarcel Moolenaar #endif
156*b0735d80SMarcel Moolenaar #ifdef FLOAT128
157*b0735d80SMarcel Moolenaar float128 float32_to_float128( float32 );
158*b0735d80SMarcel Moolenaar #endif
159*b0735d80SMarcel Moolenaar 
160*b0735d80SMarcel Moolenaar /*
161*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
162*b0735d80SMarcel Moolenaar Software IEC/IEEE single-precision operations.
163*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
164*b0735d80SMarcel Moolenaar */
165*b0735d80SMarcel Moolenaar float32 float32_round_to_int( float32 );
166*b0735d80SMarcel Moolenaar float32 float32_add( float32, float32 );
167*b0735d80SMarcel Moolenaar float32 float32_sub( float32, float32 );
168*b0735d80SMarcel Moolenaar float32 float32_mul( float32, float32 );
169*b0735d80SMarcel Moolenaar float32 float32_div( float32, float32 );
170*b0735d80SMarcel Moolenaar float32 float32_rem( float32, float32 );
171*b0735d80SMarcel Moolenaar float32 float32_sqrt( float32 );
172*b0735d80SMarcel Moolenaar int float32_eq( float32, float32 );
173*b0735d80SMarcel Moolenaar int float32_le( float32, float32 );
174*b0735d80SMarcel Moolenaar int float32_lt( float32, float32 );
175*b0735d80SMarcel Moolenaar int float32_eq_signaling( float32, float32 );
176*b0735d80SMarcel Moolenaar int float32_le_quiet( float32, float32 );
177*b0735d80SMarcel Moolenaar int float32_lt_quiet( float32, float32 );
178*b0735d80SMarcel Moolenaar #ifndef SOFTFLOAT_FOR_GCC
179*b0735d80SMarcel Moolenaar int float32_is_signaling_nan( float32 );
180*b0735d80SMarcel Moolenaar #endif
181*b0735d80SMarcel Moolenaar 
182*b0735d80SMarcel Moolenaar /*
183*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
184*b0735d80SMarcel Moolenaar Software IEC/IEEE double-precision conversion routines.
185*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
186*b0735d80SMarcel Moolenaar */
187*b0735d80SMarcel Moolenaar int float64_to_int32( float64 );
188*b0735d80SMarcel Moolenaar int float64_to_int32_round_to_zero( float64 );
189*b0735d80SMarcel Moolenaar unsigned int float64_to_uint32_round_to_zero( float64 );
190*b0735d80SMarcel Moolenaar long long float64_to_int64( float64 );
191*b0735d80SMarcel Moolenaar long long float64_to_int64_round_to_zero( float64 );
192*b0735d80SMarcel Moolenaar float32 float64_to_float32( float64 );
193*b0735d80SMarcel Moolenaar #ifdef FLOATX80
194*b0735d80SMarcel Moolenaar floatx80 float64_to_floatx80( float64 );
195*b0735d80SMarcel Moolenaar #endif
196*b0735d80SMarcel Moolenaar #ifdef FLOAT128
197*b0735d80SMarcel Moolenaar float128 float64_to_float128( float64 );
198*b0735d80SMarcel Moolenaar #endif
199*b0735d80SMarcel Moolenaar 
200*b0735d80SMarcel Moolenaar /*
201*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
202*b0735d80SMarcel Moolenaar Software IEC/IEEE double-precision operations.
203*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
204*b0735d80SMarcel Moolenaar */
205*b0735d80SMarcel Moolenaar float64 float64_round_to_int( float64 );
206*b0735d80SMarcel Moolenaar float64 float64_add( float64, float64 );
207*b0735d80SMarcel Moolenaar float64 float64_sub( float64, float64 );
208*b0735d80SMarcel Moolenaar float64 float64_mul( float64, float64 );
209*b0735d80SMarcel Moolenaar float64 float64_div( float64, float64 );
210*b0735d80SMarcel Moolenaar float64 float64_rem( float64, float64 );
211*b0735d80SMarcel Moolenaar float64 float64_sqrt( float64 );
212*b0735d80SMarcel Moolenaar int float64_eq( float64, float64 );
213*b0735d80SMarcel Moolenaar int float64_le( float64, float64 );
214*b0735d80SMarcel Moolenaar int float64_lt( float64, float64 );
215*b0735d80SMarcel Moolenaar int float64_eq_signaling( float64, float64 );
216*b0735d80SMarcel Moolenaar int float64_le_quiet( float64, float64 );
217*b0735d80SMarcel Moolenaar int float64_lt_quiet( float64, float64 );
218*b0735d80SMarcel Moolenaar #ifndef SOFTFLOAT_FOR_GCC
219*b0735d80SMarcel Moolenaar int float64_is_signaling_nan( float64 );
220*b0735d80SMarcel Moolenaar #endif
221*b0735d80SMarcel Moolenaar 
222*b0735d80SMarcel Moolenaar #ifdef FLOATX80
223*b0735d80SMarcel Moolenaar 
224*b0735d80SMarcel Moolenaar /*
225*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
226*b0735d80SMarcel Moolenaar Software IEC/IEEE extended double-precision conversion routines.
227*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
228*b0735d80SMarcel Moolenaar */
229*b0735d80SMarcel Moolenaar int floatx80_to_int32( floatx80 );
230*b0735d80SMarcel Moolenaar int floatx80_to_int32_round_to_zero( floatx80 );
231*b0735d80SMarcel Moolenaar long long floatx80_to_int64( floatx80 );
232*b0735d80SMarcel Moolenaar long long floatx80_to_int64_round_to_zero( floatx80 );
233*b0735d80SMarcel Moolenaar float32 floatx80_to_float32( floatx80 );
234*b0735d80SMarcel Moolenaar float64 floatx80_to_float64( floatx80 );
235*b0735d80SMarcel Moolenaar #ifdef FLOAT128
236*b0735d80SMarcel Moolenaar float128 floatx80_to_float128( floatx80 );
237*b0735d80SMarcel Moolenaar #endif
238*b0735d80SMarcel Moolenaar 
239*b0735d80SMarcel Moolenaar /*
240*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
241*b0735d80SMarcel Moolenaar Software IEC/IEEE extended double-precision rounding precision.  Valid
242*b0735d80SMarcel Moolenaar values are 32, 64, and 80.
243*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
244*b0735d80SMarcel Moolenaar */
245*b0735d80SMarcel Moolenaar extern int floatx80_rounding_precision;
246*b0735d80SMarcel Moolenaar 
247*b0735d80SMarcel Moolenaar /*
248*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
249*b0735d80SMarcel Moolenaar Software IEC/IEEE extended double-precision operations.
250*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
251*b0735d80SMarcel Moolenaar */
252*b0735d80SMarcel Moolenaar floatx80 floatx80_round_to_int( floatx80 );
253*b0735d80SMarcel Moolenaar floatx80 floatx80_add( floatx80, floatx80 );
254*b0735d80SMarcel Moolenaar floatx80 floatx80_sub( floatx80, floatx80 );
255*b0735d80SMarcel Moolenaar floatx80 floatx80_mul( floatx80, floatx80 );
256*b0735d80SMarcel Moolenaar floatx80 floatx80_div( floatx80, floatx80 );
257*b0735d80SMarcel Moolenaar floatx80 floatx80_rem( floatx80, floatx80 );
258*b0735d80SMarcel Moolenaar floatx80 floatx80_sqrt( floatx80 );
259*b0735d80SMarcel Moolenaar int floatx80_eq( floatx80, floatx80 );
260*b0735d80SMarcel Moolenaar int floatx80_le( floatx80, floatx80 );
261*b0735d80SMarcel Moolenaar int floatx80_lt( floatx80, floatx80 );
262*b0735d80SMarcel Moolenaar int floatx80_eq_signaling( floatx80, floatx80 );
263*b0735d80SMarcel Moolenaar int floatx80_le_quiet( floatx80, floatx80 );
264*b0735d80SMarcel Moolenaar int floatx80_lt_quiet( floatx80, floatx80 );
265*b0735d80SMarcel Moolenaar int floatx80_is_signaling_nan( floatx80 );
266*b0735d80SMarcel Moolenaar 
267*b0735d80SMarcel Moolenaar #endif
268*b0735d80SMarcel Moolenaar 
269*b0735d80SMarcel Moolenaar #ifdef FLOAT128
270*b0735d80SMarcel Moolenaar 
271*b0735d80SMarcel Moolenaar /*
272*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
273*b0735d80SMarcel Moolenaar Software IEC/IEEE quadruple-precision conversion routines.
274*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
275*b0735d80SMarcel Moolenaar */
276*b0735d80SMarcel Moolenaar int float128_to_int32( float128 );
277*b0735d80SMarcel Moolenaar int float128_to_int32_round_to_zero( float128 );
278*b0735d80SMarcel Moolenaar long long float128_to_int64( float128 );
279*b0735d80SMarcel Moolenaar long long float128_to_int64_round_to_zero( float128 );
280*b0735d80SMarcel Moolenaar float32 float128_to_float32( float128 );
281*b0735d80SMarcel Moolenaar float64 float128_to_float64( float128 );
282*b0735d80SMarcel Moolenaar #ifdef FLOATX80
283*b0735d80SMarcel Moolenaar floatx80 float128_to_floatx80( float128 );
284*b0735d80SMarcel Moolenaar #endif
285*b0735d80SMarcel Moolenaar 
286*b0735d80SMarcel Moolenaar /*
287*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
288*b0735d80SMarcel Moolenaar Software IEC/IEEE quadruple-precision operations.
289*b0735d80SMarcel Moolenaar -------------------------------------------------------------------------------
290*b0735d80SMarcel Moolenaar */
291*b0735d80SMarcel Moolenaar float128 float128_round_to_int( float128 );
292*b0735d80SMarcel Moolenaar float128 float128_add( float128, float128 );
293*b0735d80SMarcel Moolenaar float128 float128_sub( float128, float128 );
294*b0735d80SMarcel Moolenaar float128 float128_mul( float128, float128 );
295*b0735d80SMarcel Moolenaar float128 float128_div( float128, float128 );
296*b0735d80SMarcel Moolenaar float128 float128_rem( float128, float128 );
297*b0735d80SMarcel Moolenaar float128 float128_sqrt( float128 );
298*b0735d80SMarcel Moolenaar int float128_eq( float128, float128 );
299*b0735d80SMarcel Moolenaar int float128_le( float128, float128 );
300*b0735d80SMarcel Moolenaar int float128_lt( float128, float128 );
301*b0735d80SMarcel Moolenaar int float128_eq_signaling( float128, float128 );
302*b0735d80SMarcel Moolenaar int float128_le_quiet( float128, float128 );
303*b0735d80SMarcel Moolenaar int float128_lt_quiet( float128, float128 );
304*b0735d80SMarcel Moolenaar int float128_is_signaling_nan( float128 );
305*b0735d80SMarcel Moolenaar 
306*b0735d80SMarcel Moolenaar #endif
307*b0735d80SMarcel Moolenaar 
308