]> git.proxmox.com Git - qemu.git/blame - target-i386/machine.c
Merge commit 'linux-user/linux-user-for-upstream' into tmp-staging
[qemu.git] / target-i386 / machine.c
CommitLineData
8dd3dca3
AJ
1#include "hw/hw.h"
2#include "hw/boards.h"
3#include "hw/pc.h"
4#include "hw/isa.h"
6ad8702a 5#include "host-utils.h"
8dd3dca3
AJ
6
7#include "exec-all.h"
b0a46a33 8#include "kvm.h"
8dd3dca3 9
8dd3dca3
AJ
10static void cpu_put_seg(QEMUFile *f, SegmentCache *dt)
11{
12 qemu_put_be32(f, dt->selector);
13 qemu_put_betl(f, dt->base);
14 qemu_put_be32(f, dt->limit);
15 qemu_put_be32(f, dt->flags);
16}
17
18static void cpu_get_seg(QEMUFile *f, SegmentCache *dt)
19{
20 dt->selector = qemu_get_be32(f);
21 dt->base = qemu_get_betl(f);
22 dt->limit = qemu_get_be32(f);
23 dt->flags = qemu_get_be32(f);
24}
25
26void cpu_save(QEMUFile *f, void *opaque)
27{
28 CPUState *env = opaque;
29 uint16_t fptag, fpus, fpuc, fpregs_format;
30 uint32_t hflags;
7caa33f7 31 int32_t a20_mask;
059b8b1e
JK
32 int32_t pending_irq;
33 int i, bit;
8dd3dca3 34
b0a46a33
JK
35 cpu_synchronize_state(env, 0);
36
8dd3dca3
AJ
37 for(i = 0; i < CPU_NB_REGS; i++)
38 qemu_put_betls(f, &env->regs[i]);
39 qemu_put_betls(f, &env->eip);
40 qemu_put_betls(f, &env->eflags);
41 hflags = env->hflags; /* XXX: suppress most of the redundant hflags */
42 qemu_put_be32s(f, &hflags);
43
44 /* FPU */
45 fpuc = env->fpuc;
46 fpus = (env->fpus & ~0x3800) | (env->fpstt & 0x7) << 11;
47 fptag = 0;
48 for(i = 0; i < 8; i++) {
49 fptag |= ((!env->fptags[i]) << i);
50 }
51
52 qemu_put_be16s(f, &fpuc);
53 qemu_put_be16s(f, &fpus);
54 qemu_put_be16s(f, &fptag);
55
56#ifdef USE_X86LDOUBLE
57 fpregs_format = 0;
58#else
59 fpregs_format = 1;
60#endif
61 qemu_put_be16s(f, &fpregs_format);
62
63 for(i = 0; i < 8; i++) {
64#ifdef USE_X86LDOUBLE
65 {
66 uint64_t mant;
67 uint16_t exp;
68 /* we save the real CPU data (in case of MMX usage only 'mant'
69 contains the MMX register */
70 cpu_get_fp80(&mant, &exp, env->fpregs[i].d);
71 qemu_put_be64(f, mant);
72 qemu_put_be16(f, exp);
73 }
74#else
75 /* if we use doubles for float emulation, we save the doubles to
76 avoid losing information in case of MMX usage. It can give
77 problems if the image is restored on a CPU where long
78 doubles are used instead. */
79 qemu_put_be64(f, env->fpregs[i].mmx.MMX_Q(0));
80#endif
81 }
82
83 for(i = 0; i < 6; i++)
84 cpu_put_seg(f, &env->segs[i]);
85 cpu_put_seg(f, &env->ldt);
86 cpu_put_seg(f, &env->tr);
87 cpu_put_seg(f, &env->gdt);
88 cpu_put_seg(f, &env->idt);
89
f5049756 90 qemu_put_be32s(f, &env->sysenter_cs);
2436b61a
AZ
91 qemu_put_betls(f, &env->sysenter_esp);
92 qemu_put_betls(f, &env->sysenter_eip);
8dd3dca3
AJ
93
94 qemu_put_betls(f, &env->cr[0]);
95 qemu_put_betls(f, &env->cr[2]);
96 qemu_put_betls(f, &env->cr[3]);
97 qemu_put_betls(f, &env->cr[4]);
98
99 for(i = 0; i < 8; i++)
100 qemu_put_betls(f, &env->dr[i]);
101
102 /* MMU */
7caa33f7 103 a20_mask = (int32_t) env->a20_mask;
b6c4f71f 104 qemu_put_sbe32s(f, &a20_mask);
8dd3dca3
AJ
105
106 /* XMM */
107 qemu_put_be32s(f, &env->mxcsr);
108 for(i = 0; i < CPU_NB_REGS; i++) {
109 qemu_put_be64s(f, &env->xmm_regs[i].XMM_Q(0));
110 qemu_put_be64s(f, &env->xmm_regs[i].XMM_Q(1));
111 }
112
113#ifdef TARGET_X86_64
114 qemu_put_be64s(f, &env->efer);
115 qemu_put_be64s(f, &env->star);
116 qemu_put_be64s(f, &env->lstar);
117 qemu_put_be64s(f, &env->cstar);
118 qemu_put_be64s(f, &env->fmask);
119 qemu_put_be64s(f, &env->kernelgsbase);
120#endif
121 qemu_put_be32s(f, &env->smbase);
5cc1d1e6
FB
122
123 qemu_put_be64s(f, &env->pat);
124 qemu_put_be32s(f, &env->hflags2);
5cc1d1e6
FB
125
126 qemu_put_be64s(f, &env->vm_hsave);
127 qemu_put_be64s(f, &env->vm_vmcb);
128 qemu_put_be64s(f, &env->tsc_offset);
129 qemu_put_be64s(f, &env->intercept);
130 qemu_put_be16s(f, &env->intercept_cr_read);
131 qemu_put_be16s(f, &env->intercept_cr_write);
132 qemu_put_be16s(f, &env->intercept_dr_read);
133 qemu_put_be16s(f, &env->intercept_dr_write);
134 qemu_put_be32s(f, &env->intercept_exceptions);
135 qemu_put_8s(f, &env->v_tpr);
dd5e3b17
AL
136
137 /* MTRRs */
138 for(i = 0; i < 11; i++)
139 qemu_put_be64s(f, &env->mtrr_fixed[i]);
140 qemu_put_be64s(f, &env->mtrr_deftype);
141 for(i = 0; i < 8; i++) {
142 qemu_put_be64s(f, &env->mtrr_var[i].base);
143 qemu_put_be64s(f, &env->mtrr_var[i].mask);
144 }
f8d926e9 145
059b8b1e
JK
146 /* KVM-related states */
147
148 /* There can only be one pending IRQ set in the bitmap at a time, so try
149 to find it and save its number instead (-1 for none). */
150 pending_irq = -1;
151 for (i = 0; i < ARRAY_SIZE(env->interrupt_bitmap); i++) {
6ad8702a
JK
152 if (env->interrupt_bitmap[i]) {
153 bit = ctz64(env->interrupt_bitmap[i]);
154 pending_irq = i * 64 + bit;
059b8b1e
JK
155 break;
156 }
f8d926e9 157 }
059b8b1e 158 qemu_put_sbe32s(f, &pending_irq);
f8d926e9 159 qemu_put_be32s(f, &env->mp_state);
059b8b1e 160 qemu_put_be64s(f, &env->tsc);
8dd3dca3
AJ
161}
162
163#ifdef USE_X86LDOUBLE
164/* XXX: add that in a FPU generic layer */
165union x86_longdouble {
166 uint64_t mant;
167 uint16_t exp;
168};
169
170#define MANTD1(fp) (fp & ((1LL << 52) - 1))
171#define EXPBIAS1 1023
172#define EXPD1(fp) ((fp >> 52) & 0x7FF)
173#define SIGND1(fp) ((fp >> 32) & 0x80000000)
174
175static void fp64_to_fp80(union x86_longdouble *p, uint64_t temp)
176{
177 int e;
178 /* mantissa */
179 p->mant = (MANTD1(temp) << 11) | (1LL << 63);
180 /* exponent + sign */
181 e = EXPD1(temp) - EXPBIAS1 + 16383;
182 e |= SIGND1(temp) >> 16;
183 p->exp = e;
184}
185#endif
186
187int cpu_load(QEMUFile *f, void *opaque, int version_id)
188{
189 CPUState *env = opaque;
190 int i, guess_mmx;
191 uint32_t hflags;
192 uint16_t fpus, fpuc, fptag, fpregs_format;
7caa33f7 193 int32_t a20_mask;
059b8b1e 194 int32_t pending_irq;
8dd3dca3 195
f8d926e9 196 if (version_id < 3 || version_id > CPU_SAVE_VERSION)
8dd3dca3
AJ
197 return -EINVAL;
198 for(i = 0; i < CPU_NB_REGS; i++)
199 qemu_get_betls(f, &env->regs[i]);
200 qemu_get_betls(f, &env->eip);
201 qemu_get_betls(f, &env->eflags);
202 qemu_get_be32s(f, &hflags);
203
204 qemu_get_be16s(f, &fpuc);
205 qemu_get_be16s(f, &fpus);
206 qemu_get_be16s(f, &fptag);
207 qemu_get_be16s(f, &fpregs_format);
208
209 /* NOTE: we cannot always restore the FPU state if the image come
210 from a host with a different 'USE_X86LDOUBLE' define. We guess
211 if we are in an MMX state to restore correctly in that case. */
212 guess_mmx = ((fptag == 0xff) && (fpus & 0x3800) == 0);
213 for(i = 0; i < 8; i++) {
214 uint64_t mant;
215 uint16_t exp;
216
217 switch(fpregs_format) {
218 case 0:
219 mant = qemu_get_be64(f);
220 exp = qemu_get_be16(f);
221#ifdef USE_X86LDOUBLE
222 env->fpregs[i].d = cpu_set_fp80(mant, exp);
223#else
224 /* difficult case */
225 if (guess_mmx)
226 env->fpregs[i].mmx.MMX_Q(0) = mant;
227 else
228 env->fpregs[i].d = cpu_set_fp80(mant, exp);
229#endif
230 break;
231 case 1:
232 mant = qemu_get_be64(f);
233#ifdef USE_X86LDOUBLE
234 {
235 union x86_longdouble *p;
236 /* difficult case */
237 p = (void *)&env->fpregs[i];
238 if (guess_mmx) {
239 p->mant = mant;
240 p->exp = 0xffff;
241 } else {
242 fp64_to_fp80(p, mant);
243 }
244 }
245#else
246 env->fpregs[i].mmx.MMX_Q(0) = mant;
247#endif
248 break;
249 default:
250 return -EINVAL;
251 }
252 }
253
254 env->fpuc = fpuc;
255 /* XXX: restore FPU round state */
256 env->fpstt = (fpus >> 11) & 7;
257 env->fpus = fpus & ~0x3800;
258 fptag ^= 0xff;
259 for(i = 0; i < 8; i++) {
260 env->fptags[i] = (fptag >> i) & 1;
261 }
262
263 for(i = 0; i < 6; i++)
264 cpu_get_seg(f, &env->segs[i]);
265 cpu_get_seg(f, &env->ldt);
266 cpu_get_seg(f, &env->tr);
267 cpu_get_seg(f, &env->gdt);
268 cpu_get_seg(f, &env->idt);
269
270 qemu_get_be32s(f, &env->sysenter_cs);
2436b61a
AZ
271 if (version_id >= 7) {
272 qemu_get_betls(f, &env->sysenter_esp);
273 qemu_get_betls(f, &env->sysenter_eip);
274 } else {
e5ceb244
AL
275 env->sysenter_esp = qemu_get_be32(f);
276 env->sysenter_eip = qemu_get_be32(f);
2436b61a 277 }
8dd3dca3
AJ
278
279 qemu_get_betls(f, &env->cr[0]);
280 qemu_get_betls(f, &env->cr[2]);
281 qemu_get_betls(f, &env->cr[3]);
282 qemu_get_betls(f, &env->cr[4]);
283
284 for(i = 0; i < 8; i++)
285 qemu_get_betls(f, &env->dr[i]);
01df040b
AL
286 cpu_breakpoint_remove_all(env, BP_CPU);
287 cpu_watchpoint_remove_all(env, BP_CPU);
288 for (i = 0; i < 4; i++)
289 hw_breakpoint_insert(env, i);
8dd3dca3
AJ
290
291 /* MMU */
b6c4f71f 292 qemu_get_sbe32s(f, &a20_mask);
7caa33f7 293 env->a20_mask = a20_mask;
8dd3dca3
AJ
294
295 qemu_get_be32s(f, &env->mxcsr);
296 for(i = 0; i < CPU_NB_REGS; i++) {
297 qemu_get_be64s(f, &env->xmm_regs[i].XMM_Q(0));
298 qemu_get_be64s(f, &env->xmm_regs[i].XMM_Q(1));
299 }
300
301#ifdef TARGET_X86_64
302 qemu_get_be64s(f, &env->efer);
303 qemu_get_be64s(f, &env->star);
304 qemu_get_be64s(f, &env->lstar);
305 qemu_get_be64s(f, &env->cstar);
306 qemu_get_be64s(f, &env->fmask);
307 qemu_get_be64s(f, &env->kernelgsbase);
308#endif
5cc1d1e6 309 if (version_id >= 4) {
8dd3dca3 310 qemu_get_be32s(f, &env->smbase);
5cc1d1e6
FB
311 }
312 if (version_id >= 5) {
313 qemu_get_be64s(f, &env->pat);
314 qemu_get_be32s(f, &env->hflags2);
9656f324
PB
315 if (version_id < 6)
316 qemu_get_be32s(f, &env->halted);
5cc1d1e6
FB
317
318 qemu_get_be64s(f, &env->vm_hsave);
319 qemu_get_be64s(f, &env->vm_vmcb);
320 qemu_get_be64s(f, &env->tsc_offset);
321 qemu_get_be64s(f, &env->intercept);
322 qemu_get_be16s(f, &env->intercept_cr_read);
323 qemu_get_be16s(f, &env->intercept_cr_write);
324 qemu_get_be16s(f, &env->intercept_dr_read);
325 qemu_get_be16s(f, &env->intercept_dr_write);
326 qemu_get_be32s(f, &env->intercept_exceptions);
327 qemu_get_8s(f, &env->v_tpr);
328 }
dd5e3b17
AL
329
330 if (version_id >= 8) {
331 /* MTRRs */
332 for(i = 0; i < 11; i++)
333 qemu_get_be64s(f, &env->mtrr_fixed[i]);
334 qemu_get_be64s(f, &env->mtrr_deftype);
335 for(i = 0; i < 8; i++) {
336 qemu_get_be64s(f, &env->mtrr_var[i].base);
337 qemu_get_be64s(f, &env->mtrr_var[i].mask);
338 }
339 }
059b8b1e 340
f8d926e9 341 if (version_id >= 9) {
059b8b1e
JK
342 qemu_get_sbe32s(f, &pending_irq);
343 memset(&env->interrupt_bitmap, 0, sizeof(env->interrupt_bitmap));
344 if (pending_irq >= 0) {
345 env->interrupt_bitmap[pending_irq / 64] |=
346 (uint64_t)1 << (pending_irq % 64);
f8d926e9 347 }
f8d926e9 348 qemu_get_be32s(f, &env->mp_state);
059b8b1e 349 qemu_get_be64s(f, &env->tsc);
f8d926e9 350 }
dd5e3b17 351
5cc1d1e6
FB
352 /* XXX: ensure compatiblity for halted bit ? */
353 /* XXX: compute redundant hflags bits */
8dd3dca3
AJ
354 env->hflags = hflags;
355 tlb_flush(env, 1);
b0a46a33 356 cpu_synchronize_state(env, 1);
8dd3dca3
AJ
357 return 0;
358}