1*5a172a1eSDan McDonald /* 2*5a172a1eSDan McDonald * CDDL HEADER START 3*5a172a1eSDan McDonald * 4*5a172a1eSDan McDonald * The contents of this file are subject to the terms of the 5*5a172a1eSDan McDonald * Common Development and Distribution License (the "License"). 6*5a172a1eSDan McDonald * You may not use this file except in compliance with the License. 7*5a172a1eSDan McDonald * 8*5a172a1eSDan McDonald * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 9*5a172a1eSDan McDonald * or http://www.opensolaris.org/os/licensing. 10*5a172a1eSDan McDonald * See the License for the specific language governing permissions 11*5a172a1eSDan McDonald * and limitations under the License. 12*5a172a1eSDan McDonald * 13*5a172a1eSDan McDonald * When distributing Covered Code, include this CDDL HEADER in each 14*5a172a1eSDan McDonald * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 15*5a172a1eSDan McDonald * If applicable, add the following below this CDDL HEADER, with the 16*5a172a1eSDan McDonald * fields enclosed by brackets "[]" replaced with your own identifying 17*5a172a1eSDan McDonald * information: Portions Copyright [yyyy] [name of copyright owner] 18*5a172a1eSDan McDonald * 19*5a172a1eSDan McDonald * CDDL HEADER END 20*5a172a1eSDan McDonald */ 21*5a172a1eSDan McDonald 22*5a172a1eSDan McDonald /* 23*5a172a1eSDan McDonald * Copyright 2008 Sun Microsystems, Inc. All rights reserved. 24*5a172a1eSDan McDonald * Use is subject to license terms. 25*5a172a1eSDan McDonald */ 26*5a172a1eSDan McDonald 27*5a172a1eSDan McDonald #include "lint.h" 28*5a172a1eSDan McDonald #include "base_conversion.h" 29*5a172a1eSDan McDonald #include <sys/isa_defs.h> 30*5a172a1eSDan McDonald 31*5a172a1eSDan McDonald #define CSR_DEFAULT 0x1f80 32*5a172a1eSDan McDonald 33*5a172a1eSDan McDonald /* 34*5a172a1eSDan McDonald * Returns IEEE mode/status and 35*5a172a1eSDan McDonald * sets up standard environment for base conversion. 36*5a172a1eSDan McDonald */ 37*5a172a1eSDan McDonald void __get_ieee_flags(__ieee_flags_type * b)38*5a172a1eSDan McDonald__get_ieee_flags(__ieee_flags_type *b) { 39*5a172a1eSDan McDonald extern void _getmxcsr(), _putmxcsr(); 40*5a172a1eSDan McDonald 41*5a172a1eSDan McDonald _getmxcsr(&b->status); 42*5a172a1eSDan McDonald 43*5a172a1eSDan McDonald /* round-to-nearest, all exceptions masked, gradual underflow */ 44*5a172a1eSDan McDonald _putmxcsr(CSR_DEFAULT); 45*5a172a1eSDan McDonald } 46*5a172a1eSDan McDonald 47*5a172a1eSDan McDonald /* 48*5a172a1eSDan McDonald * Restores previous IEEE mode/status 49*5a172a1eSDan McDonald */ 50*5a172a1eSDan McDonald void __set_ieee_flags(__ieee_flags_type * b)51*5a172a1eSDan McDonald__set_ieee_flags(__ieee_flags_type *b) { 52*5a172a1eSDan McDonald extern void _putmxcsr(); 53*5a172a1eSDan McDonald 54*5a172a1eSDan McDonald _putmxcsr(b->status); 55*5a172a1eSDan McDonald } 56