xref: /illumos-gate/usr/src/lib/libc/port/fp/ieee_globals.c (revision 69a119caa6570c7077699161b7c28b6ee9f8b0f4)
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 2008 Sun Microsystems, Inc.  All rights reserved.
24  * Use is subject to license terms.
25  */
26 
27 /*
28  * Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989 AT&T
29  * All Rights Reserved
30  *
31  * Portions of this source code were derived from Berkeley
32  * 4.3 BSD under license from the regents of the University of
33  * California.
34  */
35 
36 #pragma ident	"%Z%%M%	%I%	%E% SMI"
37 
38 /*
39  * contains definitions for variables for IEEE floating-point arithmetic
40  * modes; IEEE floating-point arithmetic exception handling;
41  */
42 
43 #include "lint.h"
44 #include <thread.h>
45 #include <synch.h>
46 #include <mtlib.h>
47 #include "tsd.h"
48 
49 int __inf_read, __inf_written, __nan_read, __nan_written;
50 
51 /*
52  * Per-thread instances (thread-specific data) of the above globals.
53  */
54 typedef struct {
55 	int	__inf_read;
56 	int	__inf_written;
57 	int	__nan_read;
58 	int	__nan_written;
59 } fpvars_t;
60 
61 #define	fpvars	((fpvars_t *)tsdalloc(_T_FP_GET, sizeof (fpvars_t), NULL))
62 
63 int *
64 _thrp_get_nan_written()
65 {
66 	return (thr_main() ? &__nan_written : &fpvars->__nan_written);
67 }
68 
69 int *
70 _thrp_get_nan_read()
71 {
72 	return (thr_main() ? &__nan_read : &fpvars->__nan_read);
73 }
74 
75 int *
76 _thrp_get_inf_written()
77 {
78 	return (thr_main() ? &__inf_written : &fpvars->__inf_written);
79 }
80 
81 int *
82 _thrp_get_inf_read()
83 {
84 	return (thr_main() ? &__inf_read : &fpvars->__inf_read);
85 }
86