1 /*
2 * QEMU float support - standalone helpers
3 *
4 * This is provided for files that don't need the access to the full
5 * set of softfloat functions. Typically this is cpu initialisation
6 * code which wants to set default rounding and exceptions modes.
7 *
8 * The code in this source file is derived from release 2a of the SoftFloat
9 * IEC/IEEE Floating-point Arithmetic Package. Those parts of the code (and
10 * some later contributions) are provided under that license, as detailed below.
11 * It has subsequently been modified by contributors to the QEMU Project,
12 * so some portions are provided under:
13 * the SoftFloat-2a license
14 * the BSD license
15 * GPL-v2-or-later
16 *
17 * Any future contributions to this file after December 1st 2014 will be
18 * taken to be licensed under the Softfloat-2a license unless specifically
19 * indicated otherwise.
20 */
21
22 /*
23 ===============================================================================
24 This C header file is part of the SoftFloat IEC/IEEE Floating-point
25 Arithmetic Package, Release 2a.
26
27 Written by John R. Hauser. This work was made possible in part by the
28 International Computer Science Institute, located at Suite 600, 1947 Center
29 Street, Berkeley, California 94704. Funding was partially provided by the
30 National Science Foundation under grant MIP-9311980. The original version
31 of this code was written as part of a project to build a fixed-point vector
32 processor in collaboration with the University of California at Berkeley,
33 overseen by Profs. Nelson Morgan and John Wawrzynek. More information
34 is available through the Web page `http://HTTP.CS.Berkeley.EDU/~jhauser/
35 arithmetic/SoftFloat.html'.
36
37 THIS SOFTWARE IS DISTRIBUTED AS IS, FOR FREE. Although reasonable effort
38 has been made to avoid it, THIS SOFTWARE MAY CONTAIN FAULTS THAT WILL AT
39 TIMES RESULT IN INCORRECT BEHAVIOR. USE OF THIS SOFTWARE IS RESTRICTED TO
40 PERSONS AND ORGANIZATIONS WHO CAN AND WILL TAKE FULL RESPONSIBILITY FOR ANY
41 AND ALL LOSSES, COSTS, OR OTHER PROBLEMS ARISING FROM ITS USE.
42
43 Derivative works are acceptable, even for commercial purposes, so long as
44 (1) they include prominent notice that the work is derivative, and (2) they
45 include prominent notice akin to these four paragraphs for those parts of
46 this code that are retained.
47
48 ===============================================================================
49 */
50
51 #ifndef SOFTFLOAT_HELPERS_H
52 #define SOFTFLOAT_HELPERS_H
53
54 #include "fpu/softfloat-types.h"
55
set_float_detect_tininess(bool val,float_status * status)56 static inline void set_float_detect_tininess(bool val, float_status *status)
57 {
58 status->tininess_before_rounding = val;
59 }
60
set_float_rounding_mode(FloatRoundMode val,float_status * status)61 static inline void set_float_rounding_mode(FloatRoundMode val,
62 float_status *status)
63 {
64 status->float_rounding_mode = val;
65 }
66
set_float_exception_flags(int val,float_status * status)67 static inline void set_float_exception_flags(int val, float_status *status)
68 {
69 status->float_exception_flags = val;
70 }
71
set_floatx80_rounding_precision(FloatX80RoundPrec val,float_status * status)72 static inline void set_floatx80_rounding_precision(FloatX80RoundPrec val,
73 float_status *status)
74 {
75 status->floatx80_rounding_precision = val;
76 }
77
set_floatx80_behaviour(FloatX80Behaviour b,float_status * status)78 static inline void set_floatx80_behaviour(FloatX80Behaviour b,
79 float_status *status)
80 {
81 status->floatx80_behaviour = b;
82 }
83
set_float_2nan_prop_rule(Float2NaNPropRule rule,float_status * status)84 static inline void set_float_2nan_prop_rule(Float2NaNPropRule rule,
85 float_status *status)
86 {
87 status->float_2nan_prop_rule = rule;
88 }
89
set_float_3nan_prop_rule(Float3NaNPropRule rule,float_status * status)90 static inline void set_float_3nan_prop_rule(Float3NaNPropRule rule,
91 float_status *status)
92 {
93 status->float_3nan_prop_rule = rule;
94 }
95
set_float_infzeronan_rule(FloatInfZeroNaNRule rule,float_status * status)96 static inline void set_float_infzeronan_rule(FloatInfZeroNaNRule rule,
97 float_status *status)
98 {
99 status->float_infzeronan_rule = rule;
100 }
101
set_float_default_nan_pattern(uint8_t dnan_pattern,float_status * status)102 static inline void set_float_default_nan_pattern(uint8_t dnan_pattern,
103 float_status *status)
104 {
105 status->default_nan_pattern = dnan_pattern;
106 }
107
set_flush_to_zero(bool val,float_status * status)108 static inline void set_flush_to_zero(bool val, float_status *status)
109 {
110 status->flush_to_zero = val;
111 }
112
set_flush_inputs_to_zero(bool val,float_status * status)113 static inline void set_flush_inputs_to_zero(bool val, float_status *status)
114 {
115 status->flush_inputs_to_zero = val;
116 }
117
set_float_ftz_detection(FloatFTZDetection d,float_status * status)118 static inline void set_float_ftz_detection(FloatFTZDetection d,
119 float_status *status)
120 {
121 status->ftz_detection = d;
122 }
123
set_default_nan_mode(bool val,float_status * status)124 static inline void set_default_nan_mode(bool val, float_status *status)
125 {
126 status->default_nan_mode = val;
127 }
128
set_snan_bit_is_one(bool val,float_status * status)129 static inline void set_snan_bit_is_one(bool val, float_status *status)
130 {
131 status->snan_bit_is_one = val;
132 }
133
set_no_signaling_nans(bool val,float_status * status)134 static inline void set_no_signaling_nans(bool val, float_status *status)
135 {
136 status->no_signaling_nans = val;
137 }
138
get_float_detect_tininess(const float_status * status)139 static inline bool get_float_detect_tininess(const float_status *status)
140 {
141 return status->tininess_before_rounding;
142 }
143
get_float_rounding_mode(const float_status * status)144 static inline FloatRoundMode get_float_rounding_mode(const float_status *status)
145 {
146 return status->float_rounding_mode;
147 }
148
get_float_exception_flags(const float_status * status)149 static inline int get_float_exception_flags(const float_status *status)
150 {
151 return status->float_exception_flags;
152 }
153
154 static inline FloatX80RoundPrec
get_floatx80_rounding_precision(const float_status * status)155 get_floatx80_rounding_precision(const float_status *status)
156 {
157 return status->floatx80_rounding_precision;
158 }
159
160 static inline FloatX80Behaviour
get_floatx80_behaviour(const float_status * status)161 get_floatx80_behaviour(const float_status *status)
162 {
163 return status->floatx80_behaviour;
164 }
165
166 static inline Float2NaNPropRule
get_float_2nan_prop_rule(const float_status * status)167 get_float_2nan_prop_rule(const float_status *status)
168 {
169 return status->float_2nan_prop_rule;
170 }
171
172 static inline Float3NaNPropRule
get_float_3nan_prop_rule(const float_status * status)173 get_float_3nan_prop_rule(const float_status *status)
174 {
175 return status->float_3nan_prop_rule;
176 }
177
178 static inline FloatInfZeroNaNRule
get_float_infzeronan_rule(const float_status * status)179 get_float_infzeronan_rule(const float_status *status)
180 {
181 return status->float_infzeronan_rule;
182 }
183
get_float_default_nan_pattern(const float_status * status)184 static inline uint8_t get_float_default_nan_pattern(const float_status *status)
185 {
186 return status->default_nan_pattern;
187 }
188
get_flush_to_zero(const float_status * status)189 static inline bool get_flush_to_zero(const float_status *status)
190 {
191 return status->flush_to_zero;
192 }
193
get_flush_inputs_to_zero(const float_status * status)194 static inline bool get_flush_inputs_to_zero(const float_status *status)
195 {
196 return status->flush_inputs_to_zero;
197 }
198
get_default_nan_mode(const float_status * status)199 static inline bool get_default_nan_mode(const float_status *status)
200 {
201 return status->default_nan_mode;
202 }
203
get_float_ftz_detection(const float_status * status)204 static inline FloatFTZDetection get_float_ftz_detection(const float_status *status)
205 {
206 return status->ftz_detection;
207 }
208
209 #endif /* SOFTFLOAT_HELPERS_H */
210