usr/src/lib/libc/port/fp/ieee_globals.c

   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 }