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