xref: /titanic_52/usr/src/lib/libc/sparcv9/fp/fpsetsticky.s (revision 9a70fc3be3b1e966bf78825cdb8d509963a6f0a1)
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
227257d1b4Sraf/*
237257d1b4Sraf * Copyright 2008 Sun Microsystems, Inc.  All rights reserved.
247257d1b4Sraf * Use is subject to license terms.
257257d1b4Sraf */
267257d1b4Sraf
277c478bd9Sstevel@tonic-gate/*	Copyright (c) 1988 AT&T	*/
287c478bd9Sstevel@tonic-gate/*	All Rights Reserved	*/
297c478bd9Sstevel@tonic-gate
30*9a70fc3bSMark J. Nelson	.file	"fpsetsticky.s"
317c478bd9Sstevel@tonic-gate
327257d1b4Sraf#include "SYS.h"
337c478bd9Sstevel@tonic-gate
347c478bd9Sstevel@tonic-gate	ANSI_PRAGMA_WEAK(fpsetsticky,function)
357c478bd9Sstevel@tonic-gate
367c478bd9Sstevel@tonic-gate	ENTRY(fpsetsticky)
377c478bd9Sstevel@tonic-gate	add	%sp, -SA(MINFRAME), %sp	! get an additional word of storage
387c478bd9Sstevel@tonic-gate	set	0x000003e0, %o4		! mask of accrued exception bits
397c478bd9Sstevel@tonic-gate	sll	%o0, 5, %o1		! move input bits into position
407c478bd9Sstevel@tonic-gate	st	%fsr, [%sp+STACK_BIAS+ARGPUSH]	! get fsr value
417c478bd9Sstevel@tonic-gate	ld	[%sp+STACK_BIAS+ARGPUSH], %o0	! load into register
427c478bd9Sstevel@tonic-gate	and	%o1, %o4, %o1		! generate new fsr value
437c478bd9Sstevel@tonic-gate	andn	%o0, %o4, %o2
447c478bd9Sstevel@tonic-gate	or	%o1, %o2, %o1
457c478bd9Sstevel@tonic-gate	st	%o1, [%sp+STACK_BIAS+ARGPUSH]	! move new fsr value to memory
467c478bd9Sstevel@tonic-gate	ld	[%sp+STACK_BIAS+ARGPUSH], %fsr	! load fsr with new value
477c478bd9Sstevel@tonic-gate	and	%o0, %o4, %o0		! mask off bits of interest in old fsr
487c478bd9Sstevel@tonic-gate	srl	%o0, 5, %o0		! return old accrued exception value
497c478bd9Sstevel@tonic-gate	retl
507c478bd9Sstevel@tonic-gate	add	%sp, SA(MINFRAME), %sp	! reclaim stack space
517c478bd9Sstevel@tonic-gate
527c478bd9Sstevel@tonic-gate	SET_SIZE(fpsetsticky)
53