Add a <fenv.h> implementation.
[dragonfly.git] / sys / cpu / amd64 / include / npx.h
1 /*-
2  * Copyright (c) 1990 The Regents of the University of California.
3  * Copyright (c) 2008 The DragonFly Project.
4  * All rights reserved.
5  *
6  * This code is derived from software contributed to Berkeley by
7  * William Jolitz.
8  *
9  * Redistribution and use in source and binary forms, with or without
10  * modification, are permitted provided that the following conditions
11  * are met:
12  * 1. Redistributions of source code must retain the above copyright
13  *    notice, this list of conditions and the following disclaimer.
14  * 2. Redistributions in binary form must reproduce the above copyright
15  *    notice, this list of conditions and the following disclaimer in the
16  *    documentation and/or other materials provided with the distribution.
17  * 3. All advertising materials mentioning features or use of this software
18  *    must display the following acknowledgement:
19  *      This product includes software developed by the University of
20  *      California, Berkeley and its contributors.
21  * 4. Neither the name of the University nor the names of its contributors
22  *    may be used to endorse or promote products derived from this software
23  *    without specific prior written permission.
24  *
25  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
26  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
27  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
28  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
29  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
30  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
31  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
32  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
33  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
34  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
35  * SUCH DAMAGE.
36  *
37  *      from: @(#)npx.h 5.3 (Berkeley) 1/18/91
38  * $FreeBSD: src/sys/i386/include/npx.h,v 1.18.2.1 2001/08/15 01:23:52 peter Exp $
39  * $DragonFly: src/sys/cpu/amd64/include/npx.h,v 1.3 2008/08/29 17:07:06 dillon Exp $
40  */
41
42 /*
43  * 287/387 NPX Coprocessor Data Structures and Constants
44  * W. Jolitz 1/90
45  */
46
47 #ifndef _CPU_NPX_H_
48 #define _CPU_NPX_H_
49
50 #ifndef _SYS_TYPES_H_
51 #include <sys/types.h>
52 #endif
53
54 /* Environment information of floating point unit */
55 struct  env87 {
56         long    en_cw;          /* control word (16bits) */
57         long    en_sw;          /* status word (16bits) */
58         long    en_tw;          /* tag word (16bits) */
59         long    en_fip;         /* floating point instruction pointer */
60         u_short en_fcs;         /* floating code segment selector */
61         u_short en_opcode;      /* opcode last executed (11 bits ) */
62         long    en_foo;         /* floating operand offset */
63         long    en_fos;         /* floating operand segment selector */
64 };
65
66 /* Contents of each floating point accumulator */
67 struct  fpacc87 {
68 #ifdef dontdef /* too unportable */
69         u_long  fp_mantlo;      /* mantissa low (31:0) */
70         u_long  fp_manthi;      /* mantissa high (63:32) */
71         int     fp_exp:15;      /* exponent */
72         int     fp_sgn:1;       /* mantissa sign */
73 #else
74         u_char  fp_bytes[10];
75 #endif
76 };
77
78 /* Floating point context */
79 struct  save87 {
80         struct  env87 sv_env;   /* floating point control/status */
81         struct  fpacc87 sv_ac[8];       /* accumulator contents, 0-7 */
82         u_long  sv_ex_sw;       /* status word for last exception */
83         /*
84          * Bogus padding for emulators.  Emulators should use their own
85          * struct and arrange to store into this struct (ending here)
86          * before it is inspected for ptracing or for core dumps.  Some
87          * emulators overwrite the whole struct.  We have no good way of
88          * knowing how much padding to leave.  Leave just enough for the
89          * GPL emulator's i387_union (176 bytes total).
90          */
91         u_char  sv_pad[64];     /* padding; used by emulators */
92 };
93
94 struct  envxmm {
95         u_int16_t       en_cw;          /* control word (16bits) */
96         u_int16_t       en_sw;          /* status word (16bits) */
97         u_int16_t       en_tw;          /* tag word (16bits) */
98         u_int16_t       en_opcode;      /* opcode last executed (11 bits ) */
99         u_int32_t       en_fip;         /* floating point instruction pointer */
100         u_int16_t       en_fcs;         /* floating code segment selector */
101         u_int16_t       en_pad0;        /* padding */
102         u_int32_t       en_foo;         /* floating operand offset */
103         u_int16_t       en_fos;         /* floating operand segment selector */
104         u_int16_t       en_pad1;        /* padding */
105         u_int32_t       en_mxcsr;       /* SSE sontorol/status register */
106         u_int32_t       en_pad2;        /* padding */
107 };
108
109 /* Contents of each SSE extended accumulator */
110 struct  xmmacc {
111         u_char  xmm_bytes[16];
112 };
113
114 /*
115  * savexmm is a 512-byte structure
116  */
117 struct  savexmm {
118         struct  envxmm  sv_env;                 /* 32 */
119         struct {
120                 struct fpacc87  fp_acc;         /* 10 */
121                 u_char          fp_pad[6];      /* 6  (padding) */
122         } sv_fp[8];
123         struct xmmacc   sv_xmm[8];              /* 128 */
124         u_long sv_ex_sw;        /* status word for last exception */
125         u_char sv_pad[220];
126 } __attribute__((aligned(16)));
127
128 union   savefpu {
129         struct  save87  sv_87;
130         struct  savexmm sv_xmm;
131 };
132
133 /*
134  * The hardware default control word for i387's and later coprocessors is
135  * 0x37F, giving:
136  *
137  *      round to nearest
138  *      64-bit precision
139  *      all exceptions masked.
140  *
141  * We modify the affine mode bit and precision bits in this to give:
142  *
143  *      affine mode for 287's (if they work at all) (1 in bitfield 1<<12)
144  *      53-bit precision (2 in bitfield 3<<8)
145  *
146  * 64-bit precision often gives bad results with high level languages
147  * because it makes the results of calculations depend on whether
148  * intermediate values are stored in memory or in FPU registers.
149  */
150 #define __INITIAL_NPXCW__       0x127F
151
152 #define __INITIAL_FPUCW__       0x037F  /* used by libm/arch/amd64/fenv.c */
153 #define __INITIAL_FPUCW_I386__  0x127F
154 #define __INITIAL_MXCSR__       0x1F80  /* used by libm/arch/amd64/fenv.c */
155 #define __INITIAL_MXCSR_MASK__  0xFFBF
156
157 #ifdef _KERNEL
158
159 struct proc;
160 struct trapframe;
161
162 void    npxexit (void);
163 void    npxinit (u_short control);
164 void    npxsave (union savefpu *addr);
165 int     npxdna(void);
166 #endif
167
168 #endif /* !_CPU_NPX_H_ */