1/*
2 * Copyright (c) 2007 The Hewlett-Packard Development Company
3 * Copyright (c) 2011 Advanced Micro Devices, Inc.
4 * All rights reserved.
5 *
6 * The license below extends only to copyright in the software and shall
7 * not be construed as granting a license to any other intellectual
8 * property including but not limited to intellectual property relating
9 * to a hardware implementation of the functionality of the software
10 * licensed hereunder. You may use the software subject to the license
11 * terms below provided that you ensure that this notice is replicated
12 * unmodified and in its entirety in all distributions of the software,
13 * modified or unmodified, in source code or in binary form.
14 *
15 * Redistribution and use in source and binary forms, with or without
16 * modification, are permitted provided that the following conditions are
17 * met: redistributions of source code must retain the above copyright
18 * notice, this list of conditions and the following disclaimer;
19 * redistributions in binary form must reproduce the above copyright
20 * notice, this list of conditions and the following disclaimer in the
21 * documentation and/or other materials provided with the distribution;
22 * neither the name of the copyright holders nor the names of its
23 * contributors may be used to endorse or promote products derived from
24 * this software without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
27 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
28 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
29 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
30 * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
31 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
32 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
33 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
34 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
35 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
36 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
37 *
38 * Authors: Gabe Black
39 */
40
41#include "arch/x86/interrupts.hh"
42#include "arch/x86/registers.hh"
43#include "arch/x86/tlb.hh"
44#include "arch/x86/utility.hh"
45#include "arch/x86/x86_traits.hh"
46#include "cpu/base.hh"
47#include "fputils/fp80.h"
48#include "sim/system.hh"
49
50namespace X86ISA {
51
52uint64_t
53getArgument(ThreadContext *tc, int &number, uint16_t size, bool fp)
54{
55 if (!FullSystem) {
56 panic("getArgument() only implemented for full system mode.\n");
57 } else if (fp) {
58 panic("getArgument(): Floating point arguments not implemented\n");
59 } else if (size != 8) {
60 panic("getArgument(): Can only handle 64-bit arguments.\n");
61 }
62
63 // The first 6 integer arguments are passed in registers, the rest
64 // are passed on the stack.
65 const int int_reg_map[] = {
66 INTREG_RDI, INTREG_RSI, INTREG_RDX,
67 INTREG_RCX, INTREG_R8, INTREG_R9
68 };
69 if (number < sizeof(int_reg_map) / sizeof(*int_reg_map)) {
70 return tc->readIntReg(int_reg_map[number]);
71 } else {
72 panic("getArgument(): Don't know how to handle stack arguments.\n");
73 }
74}
75
76void initCPU(ThreadContext *tc, int cpuId)
77{
78 // This function is essentially performing a reset. The actual INIT
79 // interrupt does a subset of this, so we'll piggyback on some of its
80 // functionality.
81 InitInterrupt init(0);
82 init.invoke(tc);
83
84 PCState pc = tc->pcState();
85 pc.upc(0);
86 pc.nupc(1);
87 tc->pcState(pc);
88
89 // These next two loops zero internal microcode and implicit registers.
90 // They aren't specified by the ISA but are used internally by M5's
91 // implementation.
92 for (int index = 0; index < NumMicroIntRegs; index++) {
93 tc->setIntReg(INTREG_MICRO(index), 0);
94 }
95
96 for (int index = 0; index < NumImplicitIntRegs; index++) {
97 tc->setIntReg(INTREG_IMPLICIT(index), 0);
98 }
99
100 // Set integer register EAX to 0 to indicate that the optional BIST
101 // passed. No BIST actually runs, but software may still check this
102 // register for errors.
103 tc->setIntReg(INTREG_RAX, 0);
104
105 tc->setMiscReg(MISCREG_CR0, 0x0000000060000010ULL);
106 tc->setMiscReg(MISCREG_CR8, 0);
107
108 // TODO initialize x87, 64 bit, and 128 bit media state
109
110 tc->setMiscReg(MISCREG_MTRRCAP, 0x0508);
111 for (int i = 0; i < 8; i++) {
112 tc->setMiscReg(MISCREG_MTRR_PHYS_BASE(i), 0);
113 tc->setMiscReg(MISCREG_MTRR_PHYS_MASK(i), 0);
114 }
115 tc->setMiscReg(MISCREG_MTRR_FIX_64K_00000, 0);
116 tc->setMiscReg(MISCREG_MTRR_FIX_16K_80000, 0);
117 tc->setMiscReg(MISCREG_MTRR_FIX_16K_A0000, 0);
118 tc->setMiscReg(MISCREG_MTRR_FIX_4K_C0000, 0);
119 tc->setMiscReg(MISCREG_MTRR_FIX_4K_C8000, 0);
120 tc->setMiscReg(MISCREG_MTRR_FIX_4K_D0000, 0);
121 tc->setMiscReg(MISCREG_MTRR_FIX_4K_D8000, 0);
122 tc->setMiscReg(MISCREG_MTRR_FIX_4K_E0000, 0);
123 tc->setMiscReg(MISCREG_MTRR_FIX_4K_E8000, 0);
124 tc->setMiscReg(MISCREG_MTRR_FIX_4K_F0000, 0);
125 tc->setMiscReg(MISCREG_MTRR_FIX_4K_F8000, 0);
126
127 tc->setMiscReg(MISCREG_DEF_TYPE, 0);
128
129 tc->setMiscReg(MISCREG_MCG_CAP, 0x104);
130 tc->setMiscReg(MISCREG_MCG_STATUS, 0);
131 tc->setMiscReg(MISCREG_MCG_CTL, 0);
132
133 for (int i = 0; i < 5; i++) {
134 tc->setMiscReg(MISCREG_MC_CTL(i), 0);
135 tc->setMiscReg(MISCREG_MC_STATUS(i), 0);
136 tc->setMiscReg(MISCREG_MC_ADDR(i), 0);
137 tc->setMiscReg(MISCREG_MC_MISC(i), 0);
138 }
139
140 tc->setMiscReg(MISCREG_TSC, 0);
141 tc->setMiscReg(MISCREG_TSC_AUX, 0);
142
143 for (int i = 0; i < 4; i++) {
144 tc->setMiscReg(MISCREG_PERF_EVT_SEL(i), 0);
145 tc->setMiscReg(MISCREG_PERF_EVT_CTR(i), 0);
146 }
147
148 tc->setMiscReg(MISCREG_STAR, 0);
149 tc->setMiscReg(MISCREG_LSTAR, 0);
150 tc->setMiscReg(MISCREG_CSTAR, 0);
151
152 tc->setMiscReg(MISCREG_SF_MASK, 0);
153
154 tc->setMiscReg(MISCREG_KERNEL_GS_BASE, 0);
155
156 tc->setMiscReg(MISCREG_SYSENTER_CS, 0);
157 tc->setMiscReg(MISCREG_SYSENTER_ESP, 0);
158 tc->setMiscReg(MISCREG_SYSENTER_EIP, 0);
159
160 tc->setMiscReg(MISCREG_PAT, 0x0007040600070406ULL);
161
162 tc->setMiscReg(MISCREG_SYSCFG, 0x20601);
163
164 tc->setMiscReg(MISCREG_IORR_BASE0, 0);
165 tc->setMiscReg(MISCREG_IORR_BASE1, 0);
166
167 tc->setMiscReg(MISCREG_IORR_MASK0, 0);
168 tc->setMiscReg(MISCREG_IORR_MASK1, 0);
169
170 tc->setMiscReg(MISCREG_TOP_MEM, 0x4000000);
171 tc->setMiscReg(MISCREG_TOP_MEM2, 0x0);
172
173 tc->setMiscReg(MISCREG_DEBUG_CTL_MSR, 0);
174 tc->setMiscReg(MISCREG_LAST_BRANCH_FROM_IP, 0);
175 tc->setMiscReg(MISCREG_LAST_BRANCH_TO_IP, 0);
176 tc->setMiscReg(MISCREG_LAST_EXCEPTION_FROM_IP, 0);
177 tc->setMiscReg(MISCREG_LAST_EXCEPTION_TO_IP, 0);
178
179 // Invalidate the caches (this should already be done for us)
180
181 LocalApicBase lApicBase = 0;
182 lApicBase.base = 0xFEE00000 >> 12;
183 lApicBase.enable = 1;
184 lApicBase.bsp = (cpuId == 0);
185 tc->setMiscReg(MISCREG_APIC_BASE, lApicBase);
186
187 Interrupts * interrupts = dynamic_cast<Interrupts *>(
188 tc->getCpuPtr()->getInterruptController());
189 assert(interrupts);
190
191 interrupts->setRegNoEffect(APIC_ID, cpuId << 24);
192
193 interrupts->setRegNoEffect(APIC_VERSION, (5 << 16) | 0x14);
194
195 // TODO Set the SMRAM base address (SMBASE) to 0x00030000
196
197 tc->setMiscReg(MISCREG_VM_CR, 0);
198 tc->setMiscReg(MISCREG_IGNNE, 0);
199 tc->setMiscReg(MISCREG_SMM_CTL, 0);
200 tc->setMiscReg(MISCREG_VM_HSAVE_PA, 0);
201}
202
203void startupCPU(ThreadContext *tc, int cpuId)
204{
205 if (cpuId == 0 || !FullSystem) {
206 tc->activate(Cycles(0));
207 } else {
208 // This is an application processor (AP). It should be initialized to
209 // look like only the BIOS POST has run on it and put then put it into
210 // a halted state.
211 tc->suspend(Cycles(0));
212 }
213}
214
215void
216copyMiscRegs(ThreadContext *src, ThreadContext *dest)
217{
218 // This function assumes no side effects other than TLB invalidation
219 // need to be considered while copying state. That will likely not be
220 // true in the future.
221 for (int i = 0; i < NUM_MISCREGS; ++i) {
222 if ( ( i != MISCREG_CR1 &&
223 !(i > MISCREG_CR4 && i < MISCREG_CR8) &&
224 !(i > MISCREG_CR8 && i <= MISCREG_CR15) ) == false) {
225 continue;
226 }
227 dest->setMiscRegNoEffect(i, src->readMiscRegNoEffect(i));
228 }
229
230 // The TSC has to be updated with side-effects if the CPUs in a
231 // CPU switch have different frequencies.
232 dest->setMiscReg(MISCREG_TSC, src->readMiscReg(MISCREG_TSC));
233
234 dest->getITBPtr()->flushAll();
235 dest->getDTBPtr()->flushAll();
236}
237
238void
239copyRegs(ThreadContext *src, ThreadContext *dest)
240{
241 //copy int regs
242 for (int i = 0; i < NumIntRegs; ++i)
243 dest->setIntReg(i, src->readIntReg(i));
244 //copy float regs
245 for (int i = 0; i < NumFloatRegs; ++i)
246 dest->setFloatRegBits(i, src->readFloatRegBits(i));
| 1/*
2 * Copyright (c) 2007 The Hewlett-Packard Development Company
3 * Copyright (c) 2011 Advanced Micro Devices, Inc.
4 * All rights reserved.
5 *
6 * The license below extends only to copyright in the software and shall
7 * not be construed as granting a license to any other intellectual
8 * property including but not limited to intellectual property relating
9 * to a hardware implementation of the functionality of the software
10 * licensed hereunder. You may use the software subject to the license
11 * terms below provided that you ensure that this notice is replicated
12 * unmodified and in its entirety in all distributions of the software,
13 * modified or unmodified, in source code or in binary form.
14 *
15 * Redistribution and use in source and binary forms, with or without
16 * modification, are permitted provided that the following conditions are
17 * met: redistributions of source code must retain the above copyright
18 * notice, this list of conditions and the following disclaimer;
19 * redistributions in binary form must reproduce the above copyright
20 * notice, this list of conditions and the following disclaimer in the
21 * documentation and/or other materials provided with the distribution;
22 * neither the name of the copyright holders nor the names of its
23 * contributors may be used to endorse or promote products derived from
24 * this software without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
27 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
28 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
29 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
30 * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
31 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
32 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
33 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
34 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
35 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
36 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
37 *
38 * Authors: Gabe Black
39 */
40
41#include "arch/x86/interrupts.hh"
42#include "arch/x86/registers.hh"
43#include "arch/x86/tlb.hh"
44#include "arch/x86/utility.hh"
45#include "arch/x86/x86_traits.hh"
46#include "cpu/base.hh"
47#include "fputils/fp80.h"
48#include "sim/system.hh"
49
50namespace X86ISA {
51
52uint64_t
53getArgument(ThreadContext *tc, int &number, uint16_t size, bool fp)
54{
55 if (!FullSystem) {
56 panic("getArgument() only implemented for full system mode.\n");
57 } else if (fp) {
58 panic("getArgument(): Floating point arguments not implemented\n");
59 } else if (size != 8) {
60 panic("getArgument(): Can only handle 64-bit arguments.\n");
61 }
62
63 // The first 6 integer arguments are passed in registers, the rest
64 // are passed on the stack.
65 const int int_reg_map[] = {
66 INTREG_RDI, INTREG_RSI, INTREG_RDX,
67 INTREG_RCX, INTREG_R8, INTREG_R9
68 };
69 if (number < sizeof(int_reg_map) / sizeof(*int_reg_map)) {
70 return tc->readIntReg(int_reg_map[number]);
71 } else {
72 panic("getArgument(): Don't know how to handle stack arguments.\n");
73 }
74}
75
76void initCPU(ThreadContext *tc, int cpuId)
77{
78 // This function is essentially performing a reset. The actual INIT
79 // interrupt does a subset of this, so we'll piggyback on some of its
80 // functionality.
81 InitInterrupt init(0);
82 init.invoke(tc);
83
84 PCState pc = tc->pcState();
85 pc.upc(0);
86 pc.nupc(1);
87 tc->pcState(pc);
88
89 // These next two loops zero internal microcode and implicit registers.
90 // They aren't specified by the ISA but are used internally by M5's
91 // implementation.
92 for (int index = 0; index < NumMicroIntRegs; index++) {
93 tc->setIntReg(INTREG_MICRO(index), 0);
94 }
95
96 for (int index = 0; index < NumImplicitIntRegs; index++) {
97 tc->setIntReg(INTREG_IMPLICIT(index), 0);
98 }
99
100 // Set integer register EAX to 0 to indicate that the optional BIST
101 // passed. No BIST actually runs, but software may still check this
102 // register for errors.
103 tc->setIntReg(INTREG_RAX, 0);
104
105 tc->setMiscReg(MISCREG_CR0, 0x0000000060000010ULL);
106 tc->setMiscReg(MISCREG_CR8, 0);
107
108 // TODO initialize x87, 64 bit, and 128 bit media state
109
110 tc->setMiscReg(MISCREG_MTRRCAP, 0x0508);
111 for (int i = 0; i < 8; i++) {
112 tc->setMiscReg(MISCREG_MTRR_PHYS_BASE(i), 0);
113 tc->setMiscReg(MISCREG_MTRR_PHYS_MASK(i), 0);
114 }
115 tc->setMiscReg(MISCREG_MTRR_FIX_64K_00000, 0);
116 tc->setMiscReg(MISCREG_MTRR_FIX_16K_80000, 0);
117 tc->setMiscReg(MISCREG_MTRR_FIX_16K_A0000, 0);
118 tc->setMiscReg(MISCREG_MTRR_FIX_4K_C0000, 0);
119 tc->setMiscReg(MISCREG_MTRR_FIX_4K_C8000, 0);
120 tc->setMiscReg(MISCREG_MTRR_FIX_4K_D0000, 0);
121 tc->setMiscReg(MISCREG_MTRR_FIX_4K_D8000, 0);
122 tc->setMiscReg(MISCREG_MTRR_FIX_4K_E0000, 0);
123 tc->setMiscReg(MISCREG_MTRR_FIX_4K_E8000, 0);
124 tc->setMiscReg(MISCREG_MTRR_FIX_4K_F0000, 0);
125 tc->setMiscReg(MISCREG_MTRR_FIX_4K_F8000, 0);
126
127 tc->setMiscReg(MISCREG_DEF_TYPE, 0);
128
129 tc->setMiscReg(MISCREG_MCG_CAP, 0x104);
130 tc->setMiscReg(MISCREG_MCG_STATUS, 0);
131 tc->setMiscReg(MISCREG_MCG_CTL, 0);
132
133 for (int i = 0; i < 5; i++) {
134 tc->setMiscReg(MISCREG_MC_CTL(i), 0);
135 tc->setMiscReg(MISCREG_MC_STATUS(i), 0);
136 tc->setMiscReg(MISCREG_MC_ADDR(i), 0);
137 tc->setMiscReg(MISCREG_MC_MISC(i), 0);
138 }
139
140 tc->setMiscReg(MISCREG_TSC, 0);
141 tc->setMiscReg(MISCREG_TSC_AUX, 0);
142
143 for (int i = 0; i < 4; i++) {
144 tc->setMiscReg(MISCREG_PERF_EVT_SEL(i), 0);
145 tc->setMiscReg(MISCREG_PERF_EVT_CTR(i), 0);
146 }
147
148 tc->setMiscReg(MISCREG_STAR, 0);
149 tc->setMiscReg(MISCREG_LSTAR, 0);
150 tc->setMiscReg(MISCREG_CSTAR, 0);
151
152 tc->setMiscReg(MISCREG_SF_MASK, 0);
153
154 tc->setMiscReg(MISCREG_KERNEL_GS_BASE, 0);
155
156 tc->setMiscReg(MISCREG_SYSENTER_CS, 0);
157 tc->setMiscReg(MISCREG_SYSENTER_ESP, 0);
158 tc->setMiscReg(MISCREG_SYSENTER_EIP, 0);
159
160 tc->setMiscReg(MISCREG_PAT, 0x0007040600070406ULL);
161
162 tc->setMiscReg(MISCREG_SYSCFG, 0x20601);
163
164 tc->setMiscReg(MISCREG_IORR_BASE0, 0);
165 tc->setMiscReg(MISCREG_IORR_BASE1, 0);
166
167 tc->setMiscReg(MISCREG_IORR_MASK0, 0);
168 tc->setMiscReg(MISCREG_IORR_MASK1, 0);
169
170 tc->setMiscReg(MISCREG_TOP_MEM, 0x4000000);
171 tc->setMiscReg(MISCREG_TOP_MEM2, 0x0);
172
173 tc->setMiscReg(MISCREG_DEBUG_CTL_MSR, 0);
174 tc->setMiscReg(MISCREG_LAST_BRANCH_FROM_IP, 0);
175 tc->setMiscReg(MISCREG_LAST_BRANCH_TO_IP, 0);
176 tc->setMiscReg(MISCREG_LAST_EXCEPTION_FROM_IP, 0);
177 tc->setMiscReg(MISCREG_LAST_EXCEPTION_TO_IP, 0);
178
179 // Invalidate the caches (this should already be done for us)
180
181 LocalApicBase lApicBase = 0;
182 lApicBase.base = 0xFEE00000 >> 12;
183 lApicBase.enable = 1;
184 lApicBase.bsp = (cpuId == 0);
185 tc->setMiscReg(MISCREG_APIC_BASE, lApicBase);
186
187 Interrupts * interrupts = dynamic_cast<Interrupts *>(
188 tc->getCpuPtr()->getInterruptController());
189 assert(interrupts);
190
191 interrupts->setRegNoEffect(APIC_ID, cpuId << 24);
192
193 interrupts->setRegNoEffect(APIC_VERSION, (5 << 16) | 0x14);
194
195 // TODO Set the SMRAM base address (SMBASE) to 0x00030000
196
197 tc->setMiscReg(MISCREG_VM_CR, 0);
198 tc->setMiscReg(MISCREG_IGNNE, 0);
199 tc->setMiscReg(MISCREG_SMM_CTL, 0);
200 tc->setMiscReg(MISCREG_VM_HSAVE_PA, 0);
201}
202
203void startupCPU(ThreadContext *tc, int cpuId)
204{
205 if (cpuId == 0 || !FullSystem) {
206 tc->activate(Cycles(0));
207 } else {
208 // This is an application processor (AP). It should be initialized to
209 // look like only the BIOS POST has run on it and put then put it into
210 // a halted state.
211 tc->suspend(Cycles(0));
212 }
213}
214
215void
216copyMiscRegs(ThreadContext *src, ThreadContext *dest)
217{
218 // This function assumes no side effects other than TLB invalidation
219 // need to be considered while copying state. That will likely not be
220 // true in the future.
221 for (int i = 0; i < NUM_MISCREGS; ++i) {
222 if ( ( i != MISCREG_CR1 &&
223 !(i > MISCREG_CR4 && i < MISCREG_CR8) &&
224 !(i > MISCREG_CR8 && i <= MISCREG_CR15) ) == false) {
225 continue;
226 }
227 dest->setMiscRegNoEffect(i, src->readMiscRegNoEffect(i));
228 }
229
230 // The TSC has to be updated with side-effects if the CPUs in a
231 // CPU switch have different frequencies.
232 dest->setMiscReg(MISCREG_TSC, src->readMiscReg(MISCREG_TSC));
233
234 dest->getITBPtr()->flushAll();
235 dest->getDTBPtr()->flushAll();
236}
237
238void
239copyRegs(ThreadContext *src, ThreadContext *dest)
240{
241 //copy int regs
242 for (int i = 0; i < NumIntRegs; ++i)
243 dest->setIntReg(i, src->readIntReg(i));
244 //copy float regs
245 for (int i = 0; i < NumFloatRegs; ++i)
246 dest->setFloatRegBits(i, src->readFloatRegBits(i));
|
247 copyMiscRegs(src, dest);
248 dest->pcState(src->pcState());
249}
250
251void
252skipFunction(ThreadContext *tc)
253{
254 panic("Not implemented for x86\n");
255}
256
257uint64_t
258getRFlags(ThreadContext *tc)
259{
260 const uint64_t ncc_flags(tc->readMiscRegNoEffect(MISCREG_RFLAGS));
261 const uint64_t cc_flags(tc->readIntReg(X86ISA::INTREG_PSEUDO(0)));
262 const uint64_t cfof_bits(tc->readIntReg(X86ISA::INTREG_PSEUDO(1)));
263 const uint64_t df_bit(tc->readIntReg(X86ISA::INTREG_PSEUDO(2)));
264 // ecf (PSEUDO(3)) & ezf (PSEUDO(4)) are only visible to
265 // microcode, so we can safely ignore them.
266
267 // Reconstruct the real rflags state, mask out internal flags, and
268 // make sure reserved bits have the expected values.
269 return ((ncc_flags | cc_flags | cfof_bits | df_bit) & 0x3F7FD5)
270 | 0x2;
271}
272
273void
274setRFlags(ThreadContext *tc, uint64_t val)
275{
276 tc->setIntReg(X86ISA::INTREG_PSEUDO(0), val & ccFlagMask);
277 tc->setIntReg(X86ISA::INTREG_PSEUDO(1), val & cfofMask);
278 tc->setIntReg(X86ISA::INTREG_PSEUDO(2), val & DFBit);
279
280 // Internal microcode registers (ECF & EZF)
281 tc->setIntReg(X86ISA::INTREG_PSEUDO(3), 0);
282 tc->setIntReg(X86ISA::INTREG_PSEUDO(4), 0);
283
284 // Update the RFLAGS misc reg with whatever didn't go into the
285 // magic registers.
286 tc->setMiscReg(MISCREG_RFLAGS, val & ~(ccFlagMask | cfofMask | DFBit));
287}
288
289uint8_t
290convX87TagsToXTags(uint16_t ftw)
291{
292 uint8_t ftwx(0);
293 for (int i = 0; i < 8; ++i) {
294 // Extract the tag for the current element on the FP stack
295 const unsigned tag((ftw >> (2 * i)) & 0x3);
296
297 /*
298 * Check the type of the current FP element. Valid values are:
299 * 0 == Valid
300 * 1 == Zero
301 * 2 == Special (Nan, unsupported, infinity, denormal)
302 * 3 == Empty
303 */
304 // The xsave version of the tag word only keeps track of
305 // whether the element is empty or not. Set the corresponding
306 // bit in the ftwx if it's not empty,
307 if (tag != 0x3)
308 ftwx |= 1 << i;
309 }
310
311 return ftwx;
312}
313
314uint16_t
315convX87XTagsToTags(uint8_t ftwx)
316{
317 uint16_t ftw(0);
318 for (int i = 0; i < 8; ++i) {
319 const unsigned xtag(((ftwx >> i) & 0x1));
320
321 // The xtag for an x87 stack position is 0 for empty stack positions.
322 if (!xtag) {
323 // Set the tag word to 3 (empty) for the current element.
324 ftw |= 0x3 << (2 * i);
325 } else {
326 // TODO: We currently assume that non-empty elements are
327 // valid (0x0), but we should ideally reconstruct the full
328 // state (valid/zero/special).
329 }
330 }
331
332 return ftw;
333}
334
335uint16_t
336genX87Tags(uint16_t ftw, uint8_t top, int8_t spm)
337{
338 const uint8_t new_top((top + spm + 8) % 8);
339
340 if (spm > 0) {
341 // Removing elements from the stack. Flag the elements as empty.
342 for (int i = top; i != new_top; i = (i + 1 + 8) % 8)
343 ftw |= 0x3 << (2 * i);
344 } else if (spm < 0) {
345 // Adding elements to the stack. Flag the new elements as
346 // valid. We should ideally decode them and "do the right
347 // thing".
348 for (int i = new_top; i != top; i = (i + 1 + 8) % 8)
349 ftw &= ~(0x3 << (2 * i));
350 }
351
352 return ftw;
353}
354
355double
356loadFloat80(const void *_mem)
357{
358 const fp80_t *fp80((const fp80_t *)_mem);
359
360 return fp80_cvtd(*fp80);
361}
362
363void
364storeFloat80(void *_mem, double value)
365{
366 fp80_t *fp80((fp80_t *)_mem);
367
368 *fp80 = fp80_cvfd(value);
369}
370
371} // namespace X86_ISA
| 249 copyMiscRegs(src, dest);
250 dest->pcState(src->pcState());
251}
252
253void
254skipFunction(ThreadContext *tc)
255{
256 panic("Not implemented for x86\n");
257}
258
259uint64_t
260getRFlags(ThreadContext *tc)
261{
262 const uint64_t ncc_flags(tc->readMiscRegNoEffect(MISCREG_RFLAGS));
263 const uint64_t cc_flags(tc->readIntReg(X86ISA::INTREG_PSEUDO(0)));
264 const uint64_t cfof_bits(tc->readIntReg(X86ISA::INTREG_PSEUDO(1)));
265 const uint64_t df_bit(tc->readIntReg(X86ISA::INTREG_PSEUDO(2)));
266 // ecf (PSEUDO(3)) & ezf (PSEUDO(4)) are only visible to
267 // microcode, so we can safely ignore them.
268
269 // Reconstruct the real rflags state, mask out internal flags, and
270 // make sure reserved bits have the expected values.
271 return ((ncc_flags | cc_flags | cfof_bits | df_bit) & 0x3F7FD5)
272 | 0x2;
273}
274
275void
276setRFlags(ThreadContext *tc, uint64_t val)
277{
278 tc->setIntReg(X86ISA::INTREG_PSEUDO(0), val & ccFlagMask);
279 tc->setIntReg(X86ISA::INTREG_PSEUDO(1), val & cfofMask);
280 tc->setIntReg(X86ISA::INTREG_PSEUDO(2), val & DFBit);
281
282 // Internal microcode registers (ECF & EZF)
283 tc->setIntReg(X86ISA::INTREG_PSEUDO(3), 0);
284 tc->setIntReg(X86ISA::INTREG_PSEUDO(4), 0);
285
286 // Update the RFLAGS misc reg with whatever didn't go into the
287 // magic registers.
288 tc->setMiscReg(MISCREG_RFLAGS, val & ~(ccFlagMask | cfofMask | DFBit));
289}
290
291uint8_t
292convX87TagsToXTags(uint16_t ftw)
293{
294 uint8_t ftwx(0);
295 for (int i = 0; i < 8; ++i) {
296 // Extract the tag for the current element on the FP stack
297 const unsigned tag((ftw >> (2 * i)) & 0x3);
298
299 /*
300 * Check the type of the current FP element. Valid values are:
301 * 0 == Valid
302 * 1 == Zero
303 * 2 == Special (Nan, unsupported, infinity, denormal)
304 * 3 == Empty
305 */
306 // The xsave version of the tag word only keeps track of
307 // whether the element is empty or not. Set the corresponding
308 // bit in the ftwx if it's not empty,
309 if (tag != 0x3)
310 ftwx |= 1 << i;
311 }
312
313 return ftwx;
314}
315
316uint16_t
317convX87XTagsToTags(uint8_t ftwx)
318{
319 uint16_t ftw(0);
320 for (int i = 0; i < 8; ++i) {
321 const unsigned xtag(((ftwx >> i) & 0x1));
322
323 // The xtag for an x87 stack position is 0 for empty stack positions.
324 if (!xtag) {
325 // Set the tag word to 3 (empty) for the current element.
326 ftw |= 0x3 << (2 * i);
327 } else {
328 // TODO: We currently assume that non-empty elements are
329 // valid (0x0), but we should ideally reconstruct the full
330 // state (valid/zero/special).
331 }
332 }
333
334 return ftw;
335}
336
337uint16_t
338genX87Tags(uint16_t ftw, uint8_t top, int8_t spm)
339{
340 const uint8_t new_top((top + spm + 8) % 8);
341
342 if (spm > 0) {
343 // Removing elements from the stack. Flag the elements as empty.
344 for (int i = top; i != new_top; i = (i + 1 + 8) % 8)
345 ftw |= 0x3 << (2 * i);
346 } else if (spm < 0) {
347 // Adding elements to the stack. Flag the new elements as
348 // valid. We should ideally decode them and "do the right
349 // thing".
350 for (int i = new_top; i != top; i = (i + 1 + 8) % 8)
351 ftw &= ~(0x3 << (2 * i));
352 }
353
354 return ftw;
355}
356
357double
358loadFloat80(const void *_mem)
359{
360 const fp80_t *fp80((const fp80_t *)_mem);
361
362 return fp80_cvtd(*fp80);
363}
364
365void
366storeFloat80(void *_mem, double value)
367{
368 fp80_t *fp80((fp80_t *)_mem);
369
370 *fp80 = fp80_cvfd(value);
371}
372
373} // namespace X86_ISA
|