1*0Sstevel@tonic-gate/*
2*0Sstevel@tonic-gate * CDDL HEADER START
3*0Sstevel@tonic-gate *
4*0Sstevel@tonic-gate * The contents of this file are subject to the terms of the
5*0Sstevel@tonic-gate * Common Development and Distribution License, Version 1.0 only
6*0Sstevel@tonic-gate * (the "License").  You may not use this file except in compliance
7*0Sstevel@tonic-gate * with the License.
8*0Sstevel@tonic-gate *
9*0Sstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10*0Sstevel@tonic-gate * or http://www.opensolaris.org/os/licensing.
11*0Sstevel@tonic-gate * See the License for the specific language governing permissions
12*0Sstevel@tonic-gate * and limitations under the License.
13*0Sstevel@tonic-gate *
14*0Sstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each
15*0Sstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16*0Sstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the
17*0Sstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying
18*0Sstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner]
19*0Sstevel@tonic-gate *
20*0Sstevel@tonic-gate * CDDL HEADER END
21*0Sstevel@tonic-gate */
22*0Sstevel@tonic-gate/*
23*0Sstevel@tonic-gate * Copyright 2004 Sun Microsystems, Inc.  All rights reserved.
24*0Sstevel@tonic-gate * Use is subject to license terms.
25*0Sstevel@tonic-gate */
26*0Sstevel@tonic-gate
27*0Sstevel@tonic-gate	.ident	"%Z%%M%	%I%	%E% SMI"
28*0Sstevel@tonic-gate
29*0Sstevel@tonic-gate	.file	"%M%"
30*0Sstevel@tonic-gate
31*0Sstevel@tonic-gate#include <SYS.h>
32*0Sstevel@tonic-gate
33*0Sstevel@tonic-gate	ENTRY(_getcw)
34*0Sstevel@tonic-gate	fstcw	(%rdi)
35*0Sstevel@tonic-gate	ret
36*0Sstevel@tonic-gate	SET_SIZE(_getcw)
37*0Sstevel@tonic-gate
38*0Sstevel@tonic-gate	ENTRY(_putcw)
39*0Sstevel@tonic-gate	subq	$8,%rsp
40*0Sstevel@tonic-gate	movq	%rdi,(%rsp)
41*0Sstevel@tonic-gate	fldcw	(%rsp)
42*0Sstevel@tonic-gate	addq	$8,%rsp
43*0Sstevel@tonic-gate	ret
44*0Sstevel@tonic-gate	SET_SIZE(_putcw)
45*0Sstevel@tonic-gate
46*0Sstevel@tonic-gate	ENTRY(_getsw)
47*0Sstevel@tonic-gate	fstsw	(%rdi)
48*0Sstevel@tonic-gate	ret
49*0Sstevel@tonic-gate	SET_SIZE(_getsw)
50*0Sstevel@tonic-gate
51*0Sstevel@tonic-gate	ENTRY(_putsw)
52*0Sstevel@tonic-gate	andq	$0x3f,%rdi
53*0Sstevel@tonic-gate	jnz	1f
54*0Sstevel@tonic-gate	fnclex
55*0Sstevel@tonic-gate	ret
56*0Sstevel@tonic-gate1:
57*0Sstevel@tonic-gate	subq	$32,%rsp
58*0Sstevel@tonic-gate	fnstsw	%ax
59*0Sstevel@tonic-gate	fnstenv	(%rsp)
60*0Sstevel@tonic-gate	andw	$0xffc0,%ax
61*0Sstevel@tonic-gate	orw	%ax,%di
62*0Sstevel@tonic-gate	movw	%di,4(%rsp)
63*0Sstevel@tonic-gate	fldenv	(%rsp)
64*0Sstevel@tonic-gate	addq	$32,%rsp
65*0Sstevel@tonic-gate	ret
66*0Sstevel@tonic-gate	SET_SIZE(_putsw)
67*0Sstevel@tonic-gate
68*0Sstevel@tonic-gate	ENTRY(_getmxcsr)
69*0Sstevel@tonic-gate	stmxcsr	(%rdi)
70*0Sstevel@tonic-gate	ret
71*0Sstevel@tonic-gate	SET_SIZE(_getmxcsr)
72*0Sstevel@tonic-gate
73*0Sstevel@tonic-gate	ENTRY(_putmxcsr)
74*0Sstevel@tonic-gate	subq	$8,%rsp
75*0Sstevel@tonic-gate	movq	%rdi,(%rsp)
76*0Sstevel@tonic-gate	ldmxcsr	(%rsp)
77*0Sstevel@tonic-gate	addq	$8,%rsp
78*0Sstevel@tonic-gate	ret
79*0Sstevel@tonic-gate	SET_SIZE(_putmxcsr)
80