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