xref: /illumos-gate/usr/src/lib/libc/amd64/fp/ieee.c (revision 5a172a1e)
17c478bd9Sstevel@tonic-gate /*
27c478bd9Sstevel@tonic-gate  * CDDL HEADER START
37c478bd9Sstevel@tonic-gate  *
47c478bd9Sstevel@tonic-gate  * The contents of this file are subject to the terms of the
57257d1b4Sraf  * Common Development and Distribution License (the "License").
67257d1b4Sraf  * You may not use this file except in compliance with the License.
77c478bd9Sstevel@tonic-gate  *
87c478bd9Sstevel@tonic-gate  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
97c478bd9Sstevel@tonic-gate  * or http://www.opensolaris.org/os/licensing.
107c478bd9Sstevel@tonic-gate  * See the License for the specific language governing permissions
117c478bd9Sstevel@tonic-gate  * and limitations under the License.
127c478bd9Sstevel@tonic-gate  *
137c478bd9Sstevel@tonic-gate  * When distributing Covered Code, include this CDDL HEADER in each
147c478bd9Sstevel@tonic-gate  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
157c478bd9Sstevel@tonic-gate  * If applicable, add the following below this CDDL HEADER, with the
167c478bd9Sstevel@tonic-gate  * fields enclosed by brackets "[]" replaced with your own identifying
177c478bd9Sstevel@tonic-gate  * information: Portions Copyright [yyyy] [name of copyright owner]
187c478bd9Sstevel@tonic-gate  *
197c478bd9Sstevel@tonic-gate  * CDDL HEADER END
207c478bd9Sstevel@tonic-gate  */
217257d1b4Sraf 
227c478bd9Sstevel@tonic-gate /*
237257d1b4Sraf  * Copyright 2008 Sun Microsystems, Inc.  All rights reserved.
247c478bd9Sstevel@tonic-gate  * Use is subject to license terms.
257c478bd9Sstevel@tonic-gate  */
267c478bd9Sstevel@tonic-gate 
277257d1b4Sraf #include "lint.h"
287c478bd9Sstevel@tonic-gate #include "base_conversion.h"
297c478bd9Sstevel@tonic-gate #include <sys/isa_defs.h>
307c478bd9Sstevel@tonic-gate 
317c478bd9Sstevel@tonic-gate #define	CSR_DEFAULT 0x1f80
327c478bd9Sstevel@tonic-gate 
337c478bd9Sstevel@tonic-gate /*
347c478bd9Sstevel@tonic-gate  * Returns IEEE mode/status and
357c478bd9Sstevel@tonic-gate  * sets up standard environment for base conversion.
367c478bd9Sstevel@tonic-gate  */
377c478bd9Sstevel@tonic-gate void
__get_ieee_flags(__ieee_flags_type * b)387c478bd9Sstevel@tonic-gate __get_ieee_flags(__ieee_flags_type *b) {
397c478bd9Sstevel@tonic-gate 	extern void _getmxcsr(), _putmxcsr();
407c478bd9Sstevel@tonic-gate 
417c478bd9Sstevel@tonic-gate 	_getmxcsr(&b->status);
427c478bd9Sstevel@tonic-gate 
437c478bd9Sstevel@tonic-gate 	/* round-to-nearest, all exceptions masked, gradual underflow */
447c478bd9Sstevel@tonic-gate 	_putmxcsr(CSR_DEFAULT);
457c478bd9Sstevel@tonic-gate }
467c478bd9Sstevel@tonic-gate 
477c478bd9Sstevel@tonic-gate /*
487c478bd9Sstevel@tonic-gate  * Restores previous IEEE mode/status
497c478bd9Sstevel@tonic-gate  */
507c478bd9Sstevel@tonic-gate void
__set_ieee_flags(__ieee_flags_type * b)517c478bd9Sstevel@tonic-gate __set_ieee_flags(__ieee_flags_type *b) {
527c478bd9Sstevel@tonic-gate 	extern void _putmxcsr();
537c478bd9Sstevel@tonic-gate 
547c478bd9Sstevel@tonic-gate 	_putmxcsr(b->status);
557c478bd9Sstevel@tonic-gate }
56