uae_cpu/fpu/exceptions.h

/*
 *  fpu/exceptions.h - system-dependant FPU exceptions management
 *
 *  Basilisk II (C) 1997-1999 Christian Bauer
 *
 *  MC68881/68040 fpu emulation
 *  
 *  Original UAE FPU, copyright 1996 Herman ten Brugge
 *  Rewrite for x86, copyright 1999-2000 Lauri Pesonen
 *  New framework, copyright 2000 Gwenole Beauchesne
 *  Adapted for JIT compilation (c) Bernd Meyer, 2000
 *  
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 */

#ifndef FPU_EXCEPTIONS_H
#define FPU_EXCEPTIONS_H

/* NOTE: this file shall be included only from fpu/fpu_*.cpp */
#undef  PUBLIC
#define PUBLIC  extern

#undef  PRIVATE
#define PRIVATE static

#undef  FFPU
#define FFPU    /**/

#undef  FPU
#define FPU             fpu.

/* Defaults to generic exceptions */
#define FPU_USE_GENERIC_EXCEPTIONS
#define FPU_USE_GENERIC_ACCRUED_EXCEPTIONS

/* -------------------------------------------------------------------------- */
/* --- Selection of floating-point exceptions handling mode               --- */
/* -------------------------------------------------------------------------- */

/* Optimized i386 fpu core must use native exceptions */
#if defined(FPU_X86) && defined(USE_X87_ASSEMBLY)
# undef FPU_USE_GENERIC_EXCEPTIONS
# define FPU_USE_X86_EXCEPTIONS
#endif

/* Optimized i386 fpu core must use native accrued exceptions */
#if defined(FPU_X86) && defined(USE_X87_ASSEMBLY)
# undef FPU_USE_GENERIC_ACCRUED_EXCEPTIONS
# define FPU_USE_X86_ACCRUED_EXCEPTIONS
#endif

/* -------------------------------------------------------------------------- */
/* --- Native X86 Exceptions                                              --- */
/* -------------------------------------------------------------------------- */

#ifdef FPU_USE_X86_EXCEPTIONS

/* Extend the SW_* codes */
#define SW_FAKE_BSUN SW_SF

/* Shorthand */
#define SW_EXCEPTION_MASK (SW_ES|SW_SF|SW_PE|SW_UE|SW_OE|SW_ZE|SW_DE|SW_IE)
// #define SW_EXCEPTION_MASK (SW_SF|SW_PE|SW_UE|SW_OE|SW_ZE|SW_DE|SW_IE)

/* Lookup tables */
PRIVATE uae_u32 exception_host2mac[ 0x80 ];
PRIVATE uae_u32 exception_mac2host[ 0x100 ];

/* Initialize native exception management */
PUBLIC void FFPU fpu_init_native_exceptions(void);

/* Return m68k floating-point exception status */
PRIVATE inline uae_u32 FFPU get_exception_status(void)
        { return exception_host2mac[FPU fpsr.exception_status & (SW_FAKE_BSUN|SW_PE|SW_UE|SW_OE|SW_ZE|SW_DE|SW_IE)]; }

/* Set new exception status. Assumes mask against FPSR_EXCEPTION to be already performed */
PRIVATE inline void FFPU set_exception_status(uae_u32 new_status)
        { FPU fpsr.exception_status = exception_mac2host[new_status >> 8]; }

#endif /* FPU_USE_X86_EXCEPTIONS */

#ifdef FPU_USE_X86_ACCRUED_EXCEPTIONS

/* Lookup tables */
PRIVATE uae_u32 accrued_exception_host2mac[ 0x40 ];
PRIVATE uae_u32 accrued_exception_mac2host[ 0x20 ];

/* Initialize native accrued exception management */
PUBLIC void FFPU fpu_init_native_accrued_exceptions(void);

/* Return m68k accrued exception byte */
PRIVATE inline uae_u32 FFPU get_accrued_exception(void)
        { return accrued_exception_host2mac[FPU fpsr.accrued_exception & (SW_PE|SW_UE|SW_OE|SW_ZE|SW_DE|SW_IE)]; }

/* Set new accrued exception byte */
PRIVATE inline void FFPU set_accrued_exception(uae_u32 new_status)
        { FPU fpsr.accrued_exception = accrued_exception_mac2host[(new_status & 0xF8) >> 3]; }

#endif /* FPU_USE_X86_ACCRUED_EXCEPTIONS */

/* -------------------------------------------------------------------------- */
/* --- Default Exceptions Handling                                        --- */
/* -------------------------------------------------------------------------- */

#ifdef FPU_USE_GENERIC_EXCEPTIONS

/* Initialize native exception management */
static inline void FFPU fpu_init_native_exceptions(void)
        { }

/* Return m68k floating-point exception status */
PRIVATE inline uae_u32 FFPU get_exception_status(void)
        { return FPU fpsr.exception_status; }

/* Set new exception status. Assumes mask against FPSR_EXCEPTION to be already performed */
PRIVATE inline void FFPU set_exception_status(uae_u32 new_status)
        { FPU fpsr.exception_status = new_status; }

#endif /* FPU_USE_GENERIC_EXCEPTIONS */

#ifdef FPU_USE_GENERIC_ACCRUED_EXCEPTIONS

/* Initialize native accrued exception management */
PRIVATE inline void FFPU fpu_init_native_accrued_exceptions(void)
        { }

/* Return m68k accrued exception byte */
PRIVATE inline uae_u32 FFPU get_accrued_exception(void)
        { return FPU fpsr.accrued_exception; }

/* Set new accrued exception byte */
PRIVATE inline void FFPU set_accrued_exception(uae_u32 new_status)
        { FPU fpsr.accrued_exception = new_status; }

#endif /* FPU_USE_GENERIC_ACCRUED_EXCEPTIONS */

#endif /* FPU_EXCEPTIONS_H */
Revision:	1.3
Committed:	2002-11-16T15:28:25Z (22 years ago) by gbeauche
Content type:	text/plain
Branch:	MAIN
CVS Tags:	nigel-build-12, nigel-build-13
Changes since 1.2:	+2 -2 lines
Log Message:	Use old x87 FPU stack on x86-64 too because we now use long doubles there for better accuracy. Aka. prefer compatibility over speed.
#	User	Rev	Content
1	gbeauche	1.1	/*
2			* fpu/exceptions.h - system-dependant FPU exceptions management
3			*
4			* Basilisk II (C) 1997-1999 Christian Bauer
5			*
6			* MC68881/68040 fpu emulation
7			*
8			* Original UAE FPU, copyright 1996 Herman ten Brugge
9			* Rewrite for x86, copyright 1999-2000 Lauri Pesonen
10			* New framework, copyright 2000 Gwenole Beauchesne
11			* Adapted for JIT compilation (c) Bernd Meyer, 2000
12			*
13			* This program is free software; you can redistribute it and/or modify
14			* it under the terms of the GNU General Public License as published by
15			* the Free Software Foundation; either version 2 of the License, or
16			* (at your option) any later version.
17			*
18			* This program is distributed in the hope that it will be useful,
19			* but WITHOUT ANY WARRANTY; without even the implied warranty of
20			* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
21			* GNU General Public License for more details.
22			*
23			* You should have received a copy of the GNU General Public License
24			* along with this program; if not, write to the Free Software
25			* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
26			*/
27
28			#ifndef FPU_EXCEPTIONS_H
29			#define FPU_EXCEPTIONS_H
30
31			/* NOTE: this file shall be included only from fpu/fpu_.cpp /
32			#undef PUBLIC
33			#define PUBLIC extern
34
35			#undef PRIVATE
36			#define PRIVATE static
37
38			#undef FFPU
39			#define FFPU /**/
40
41			#undef FPU
42			#define FPU fpu.
43
44			/* Defaults to generic exceptions */
45			#define FPU_USE_GENERIC_EXCEPTIONS
46			#define FPU_USE_GENERIC_ACCRUED_EXCEPTIONS
47
48			/* -------------------------------------------------------------------------- */
49			/* --- Selection of floating-point exceptions handling mode --- */
50			/* -------------------------------------------------------------------------- */
51
52			/* Optimized i386 fpu core must use native exceptions */
53	gbeauche	1.3	#if defined(FPU_X86) && defined(USE_X87_ASSEMBLY)
54	gbeauche	1.1	# undef FPU_USE_GENERIC_EXCEPTIONS
55			# define FPU_USE_X86_EXCEPTIONS
56			#endif
57
58			/* Optimized i386 fpu core must use native accrued exceptions */
59	gbeauche	1.3	#if defined(FPU_X86) && defined(USE_X87_ASSEMBLY)
60	gbeauche	1.1	# undef FPU_USE_GENERIC_ACCRUED_EXCEPTIONS
61			# define FPU_USE_X86_ACCRUED_EXCEPTIONS
62			#endif
63
64			/* -------------------------------------------------------------------------- */
65			/* --- Native X86 Exceptions --- */
66			/* -------------------------------------------------------------------------- */
67
68			#ifdef FPU_USE_X86_EXCEPTIONS
69
70			/* Extend the SW_* codes */
71			#define SW_FAKE_BSUN SW_SF
72
73			/* Shorthand */
74			#define SW_EXCEPTION_MASK (SW_ES\|SW_SF\|SW_PE\|SW_UE\|SW_OE\|SW_ZE\|SW_DE\|SW_IE)
75			// #define SW_EXCEPTION_MASK (SW_SF\|SW_PE\|SW_UE\|SW_OE\|SW_ZE\|SW_DE\|SW_IE)
76
77			/* Lookup tables */
78			PRIVATE uae_u32 exception_host2mac[ 0x80 ];
79			PRIVATE uae_u32 exception_mac2host[ 0x100 ];
80
81			/* Initialize native exception management */
82			PUBLIC void FFPU fpu_init_native_exceptions(void);
83
84			/* Return m68k floating-point exception status */
85			PRIVATE inline uae_u32 FFPU get_exception_status(void)
86			{ return exception_host2mac[FPU fpsr.exception_status & (SW_FAKE_BSUN\|SW_PE\|SW_UE\|SW_OE\|SW_ZE\|SW_DE\|SW_IE)]; }
87
88			/* Set new exception status. Assumes mask against FPSR_EXCEPTION to be already performed */
89			PRIVATE inline void FFPU set_exception_status(uae_u32 new_status)
90			{ FPU fpsr.exception_status = exception_mac2host[new_status >> 8]; }
91
92			#endif /* FPU_USE_X86_EXCEPTIONS */
93
94			#ifdef FPU_USE_X86_ACCRUED_EXCEPTIONS
95
96			/* Lookup tables */
97			PRIVATE uae_u32 accrued_exception_host2mac[ 0x40 ];
98			PRIVATE uae_u32 accrued_exception_mac2host[ 0x20 ];
99
100			/* Initialize native accrued exception management */
101			PUBLIC void FFPU fpu_init_native_accrued_exceptions(void);
102
103			/* Return m68k accrued exception byte */
104			PRIVATE inline uae_u32 FFPU get_accrued_exception(void)
105			{ return accrued_exception_host2mac[FPU fpsr.accrued_exception & (SW_PE\|SW_UE\|SW_OE\|SW_ZE\|SW_DE\|SW_IE)]; }
106
107			/* Set new accrued exception byte */
108			PRIVATE inline void FFPU set_accrued_exception(uae_u32 new_status)
109			{ FPU fpsr.accrued_exception = accrued_exception_mac2host[(new_status & 0xF8) >> 3]; }
110
111			#endif /* FPU_USE_X86_ACCRUED_EXCEPTIONS */
112
113			/* -------------------------------------------------------------------------- */
114			/* --- Default Exceptions Handling --- */
115			/* -------------------------------------------------------------------------- */
116
117			#ifdef FPU_USE_GENERIC_EXCEPTIONS
118
119			/* Initialize native exception management */
120	gbeauche	1.2	static inline void FFPU fpu_init_native_exceptions(void)
121	gbeauche	1.1	{ }
122
123			/* Return m68k floating-point exception status */
124			PRIVATE inline uae_u32 FFPU get_exception_status(void)
125			{ return FPU fpsr.exception_status; }
126
127			/* Set new exception status. Assumes mask against FPSR_EXCEPTION to be already performed */
128			PRIVATE inline void FFPU set_exception_status(uae_u32 new_status)
129			{ FPU fpsr.exception_status = new_status; }
130
131			#endif /* FPU_USE_GENERIC_EXCEPTIONS */
132
133			#ifdef FPU_USE_GENERIC_ACCRUED_EXCEPTIONS
134
135			/* Initialize native accrued exception management */
136			PRIVATE inline void FFPU fpu_init_native_accrued_exceptions(void)
137			{ }
138
139			/* Return m68k accrued exception byte */
140			PRIVATE inline uae_u32 FFPU get_accrued_exception(void)
141			{ return FPU fpsr.accrued_exception; }
142
143			/* Set new accrued exception byte */
144			PRIVATE inline void FFPU set_accrued_exception(uae_u32 new_status)
145			{ FPU fpsr.accrued_exception = new_status; }
146
147			#endif /* FPU_USE_GENERIC_ACCRUED_EXCEPTIONS */
148
149			#endif /* FPU_EXCEPTIONS_H */