13cab2bb3Spatrick //===----- lib/i386/fp_mode.c - Floaing-point mode utilities -----*- C -*-====//
23cab2bb3Spatrick //
33cab2bb3Spatrick // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
43cab2bb3Spatrick // See https://llvm.org/LICENSE.txt for license information.
53cab2bb3Spatrick // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
63cab2bb3Spatrick //
73cab2bb3Spatrick //===----------------------------------------------------------------------===//
83cab2bb3Spatrick 
93cab2bb3Spatrick #include "../fp_mode.h"
103cab2bb3Spatrick 
113cab2bb3Spatrick #define X87_TONEAREST  0x0000
123cab2bb3Spatrick #define X87_DOWNWARD   0x0400
133cab2bb3Spatrick #define X87_UPWARD     0x0800
143cab2bb3Spatrick #define X87_TOWARDZERO 0x0c00
153cab2bb3Spatrick #define X87_RMODE_MASK (X87_TONEAREST | X87_UPWARD | X87_DOWNWARD | X87_TOWARDZERO)
163cab2bb3Spatrick 
__fe_getround(void)17*810390e3Srobert CRT_FE_ROUND_MODE __fe_getround(void) {
183cab2bb3Spatrick   // Assume that the rounding mode state for the fpu agrees with the SSE unit.
193cab2bb3Spatrick   unsigned short cw;
203cab2bb3Spatrick   __asm__ __volatile__ ("fnstcw %0" : "=m" (cw));
213cab2bb3Spatrick 
223cab2bb3Spatrick   switch (cw & X87_RMODE_MASK) {
233cab2bb3Spatrick     case X87_TONEAREST:
24d89ec533Spatrick       return CRT_FE_TONEAREST;
253cab2bb3Spatrick     case X87_DOWNWARD:
26d89ec533Spatrick       return CRT_FE_DOWNWARD;
273cab2bb3Spatrick     case X87_UPWARD:
28d89ec533Spatrick       return CRT_FE_UPWARD;
293cab2bb3Spatrick     case X87_TOWARDZERO:
30d89ec533Spatrick       return CRT_FE_TOWARDZERO;
313cab2bb3Spatrick   }
32d89ec533Spatrick   return CRT_FE_TONEAREST;
333cab2bb3Spatrick }
343cab2bb3Spatrick 
__fe_raise_inexact(void)35*810390e3Srobert int __fe_raise_inexact(void) {
363cab2bb3Spatrick   float f = 1.0f, g = 3.0f;
373cab2bb3Spatrick   __asm__ __volatile__ ("fdivs %1" : "+t" (f) : "m" (g));
383cab2bb3Spatrick   return 0;
393cab2bb3Spatrick }
40