1 /*
2 * CDDL HEADER START
3 *
4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License (the "License").
6 * You may not use this file except in compliance with the License.
7 *
8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9 * or http://www.opensolaris.org/os/licensing.
10 * See the License for the specific language governing permissions
11 * and limitations under the License.
12 *
13 * When distributing Covered Code, include this CDDL HEADER in each
14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15 * If applicable, add the following below this CDDL HEADER, with the
16 * fields enclosed by brackets "[]" replaced with your own identifying
17 * information: Portions Copyright [yyyy] [name of copyright owner]
18 *
19 * CDDL HEADER END
20 */
21
22 /*
23 * Copyright 2011 Nexenta Systems, Inc. All rights reserved.
24 */
25 /*
26 * Copyright 2006 Sun Microsystems, Inc. All rights reserved.
27 * Use is subject to license terms.
28 */
29
30 #pragma weak __fex_merge_flags = fex_merge_flags
31
32 #pragma weak __feholdexcept = feholdexcept
33 #pragma weak __feupdateenv = feupdateenv
34 #pragma weak __fegetenv = fegetenv
35 #pragma weak __fesetenv = fesetenv
36
37 #pragma weak feupdateenv96 = feupdateenv
38 #pragma weak fegetenv96 = fegetenv
39 #pragma weak fesetenv96 = fesetenv
40
41 #include <fenv.h>
42 #include <ucontext.h>
43 #include <thread.h>
44 #include "fex_handler.h"
45 #include "fenv_inlines.h"
46
47 const fenv_t __fenv_dfl_env = {
48 {
49 { FEX_NONSTOP, (void(*)())0 },
50 { FEX_NONSTOP, (void(*)())0 },
51 { FEX_NONSTOP, (void(*)())0 },
52 { FEX_NONSTOP, (void(*)())0 },
53 { FEX_NONSTOP, (void(*)())0 },
54 { FEX_NONSTOP, (void(*)())0 },
55 { FEX_NONSTOP, (void(*)())0 },
56 { FEX_NONSTOP, (void(*)())0 },
57 { FEX_NONSTOP, (void(*)())0 },
58 { FEX_NONSTOP, (void(*)())0 },
59 { FEX_NONSTOP, (void(*)())0 },
60 { FEX_NONSTOP, (void(*)())0 },
61 },
62 #ifdef __x86
63 0x13000000
64 #else
65 0
66 #endif
67 };
68
feholdexcept(fenv_t * p)69 int feholdexcept(fenv_t *p)
70 {
71 (void) fegetenv(p);
72 (void) feclearexcept(FE_ALL_EXCEPT);
73 return !fex_set_handling(FEX_ALL, FEX_NONSTOP, NULL);
74 }
75
feholdexcept96(fenv_t * p)76 int feholdexcept96(fenv_t *p)
77 {
78 (void) fegetenv(p);
79 (void) feclearexcept(FE_ALL_EXCEPT);
80 return fex_set_handling(FEX_ALL, FEX_NONSTOP, NULL);
81 }
82
feupdateenv(const fenv_t * p)83 int feupdateenv(const fenv_t *p)
84 {
85 unsigned long fsr;
86
87 __fenv_getfsr(&fsr);
88 (void) fesetenv(p);
89 (void) feraiseexcept((int)__fenv_get_ex(fsr));
90 return 0;
91 }
92
fegetenv(fenv_t * p)93 int fegetenv(fenv_t *p)
94 {
95 fex_getexcepthandler(&p->__handlers, FEX_ALL);
96 __fenv_getfsr(&p->__fsr);
97 return 0;
98 }
99
fesetenv(const fenv_t * p)100 int fesetenv(const fenv_t *p)
101 {
102 __fenv_setfsr(&p->__fsr);
103 fex_setexcepthandler(&p->__handlers, FEX_ALL);
104 return 0;
105 }
106
fex_merge_flags(const fenv_t * p)107 void fex_merge_flags(const fenv_t *p)
108 {
109 unsigned long fsr;
110
111 __fenv_getfsr(&fsr);
112 __fenv_set_ex(fsr, __fenv_get_ex(fsr) | __fenv_get_ex(p->__fsr));
113 __fenv_setfsr(&fsr);
114 if (fex_get_log())
115 __fex_update_te();
116 }
117