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