floatingpoint.h revision 621
1235848Sissyl0/*- 2235848Sissyl0 * Copyright (c) 1993 Andrew Moore, Talke Studio 3235848Sissyl0 * All rights reserved. 4235848Sissyl0 * 5235848Sissyl0 * Redistribution and use in source and binary forms, with or without 6235848Sissyl0 * modification, are permitted provided that the following conditions 7235848Sissyl0 * are met: 8235848Sissyl0 * 1. Redistributions of source code must retain the above copyright 9235848Sissyl0 * notice, this list of conditions and the following disclaimer. 10235848Sissyl0 * 2. Redistributions in binary form must reproduce the above copyright 11235848Sissyl0 * notice, this list of conditions and the following disclaimer in the 12235848Sissyl0 * documentation and/or other materials provided with the distribution. 13235848Sissyl0 * 3. All advertising materials mentioning features or use of this software 14235848Sissyl0 * must display the following acknowledgement: 15235848Sissyl0 * This product includes software developed by the University of 16235848Sissyl0 * California, Berkeley and its contributors. 17235848Sissyl0 * 4. Neither the name of the University nor the names of its contributors 18235848Sissyl0 * may be used to endorse or promote products derived from this software 19235848Sissyl0 * without specific prior written permission. 20235848Sissyl0 * 21235848Sissyl0 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 22235848Sissyl0 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 23235848Sissyl0 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 24235848Sissyl0 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 25235848Sissyl0 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 26235848Sissyl0 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 27235848Sissyl0 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 28235848Sissyl0 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 29235848Sissyl0 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 30235848Sissyl0 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 31235848Sissyl0 * SUCH DAMAGE. 32235848Sissyl0 * 33235848Sissyl0 * from: @(#) floatingpoint.h 1.0 (Berkeley) 9/23/93 34235848Sissyl0 * $Id$ 35235848Sissyl0 */ 36235848Sissyl0 37235848Sissyl0/* 38235848Sissyl0 * IEEE floating point structure and function definitions 39235848Sissyl0 */ 40235848Sissyl0 41235848Sissyl0#ifndef _FLOATINGPOINT_H_ 42235848Sissyl0#define _FLOATINGPOINT_H_ 43235848Sissyl0 44235848Sissyl0#include <sys/cdefs.h> 45235848Sissyl0#include <sys/ieeefp.h> 46235848Sissyl0 47235848Sissyl0#ifdef __GNUC__ 48235848Sissyl0 49235848Sissyl0#define fnstcw(addr) __asm("fnstcw %0" : "=m" (*addr) : "0" (*addr)) 50235848Sissyl0#define fnstsw(addr) __asm("fnstsw %0" : "=m" (*addr) : "0" (*addr)) 51235848Sissyl0#define fnstenv(addr) __asm("fnstenv %0" : "=m" (*addr) : "0" (*addr)) 52235848Sissyl0#define fldenv(addr) __asm("fldenv %0" : : "m" (*addr)) 53235848Sissyl0 54235848Sissyl0#ifdef __i386__ 55235848Sissyl0 56235848Sissyl0/* 57235848Sissyl0 * return the contents of a FP register 58235848Sissyl0 */ 59235848Sissyl0static __inline__ int 60240518Seadler__fpgetreg(int _reg) 61235848Sissyl0{ 62235848Sissyl0 unsigned short _mem; 63235848Sissyl0 64235848Sissyl0 switch(_reg) { 65235848Sissyl0 default: 66235848Sissyl0 fnstcw(&_mem); 67235848Sissyl0 break; 68235848Sissyl0 case FP_STKY_REG: 69235848Sissyl0 fnstsw(&_mem); 70235848Sissyl0 break; 71 } 72 return _mem; 73} 74 75/* 76 * set a FP mode; return previous mode 77 */ 78static __inline__ int 79__fpsetreg(int _m, int _reg, int _fld, int _off) 80{ 81 unsigned _env[7]; 82 unsigned _p; 83 84 fnstenv(_env); 85 _p = (_env[_reg] & _fld) >> _off; 86 _env[_reg] = (_env[_reg] & ~_fld) | (_m << _off & _fld); 87 fldenv(_env); 88 return _p; 89} 90 91#endif /* __i386__ */ 92 93#endif /* __GNUC__ */ 94 95/* 96 * SysV/386 FP control interface 97 */ 98#define fpgetround() ((__fpgetreg(FP_RND_REG) & FP_RND_FLD) >> FP_RND_OFF) 99#define fpsetround(m) __fpsetreg((m), FP_RND_REG, FP_RND_FLD, FP_RND_OFF) 100#define fpgetprec() ((__fpgetreg(FP_PRC_REG) & FP_PRC_FLD) >> FP_PRC_OFF) 101#define fpsetprec(m) __fpsetreg((m), FP_PRC_REG, FP_PRC_FLD, FP_PRC_OFF) 102#define fpgetmask() ((~__fpgetreg(FP_MSKS_REG) & FP_MSKS_FLD) >> FP_MSKS_OFF) 103#define fpsetmask(m) __fpsetreg(~(m), FP_MSKS_REG, FP_MSKS_FLD, FP_MSKS_OFF) 104#define fpgetsticky() ((__fpgetreg(FP_STKY_REG) & FP_STKY_FLD) >> FP_STKY_OFF) 105#define fpresetsticky(m) __fpsetreg(0, FP_STKY_REG, (m), FP_STKY_OFF) 106#define fpsetsticky(m) fpresetsticky(m) 107 108#endif /* !_FLOATINGPOINT_H_ */ 109