s390x/tcg: rearm the CKC timer during migration
[qemu.git] / target / s390x / machine.c
1 /*
2 * S390x machine definitions and functions
3 *
4 * Copyright IBM Corp. 2014
5 *
6 * Authors:
7 * Thomas Huth <thuth@linux.vnet.ibm.com>
8 * Christian Borntraeger <borntraeger@de.ibm.com>
9 * Jason J. Herne <jjherne@us.ibm.com>
10 *
11 * This work is free software; you can redistribute it and/or modify
12 * it under the terms of the GNU General Public License as published
13 * by the Free Software Foundation; either version 2 of the License,
14 * or (at your option) any later version.
15 */
16
17 #include "qemu/osdep.h"
18 #include "hw/hw.h"
19 #include "cpu.h"
20 #include "internal.h"
21 #include "kvm_s390x.h"
22 #include "tcg_s390x.h"
23 #include "sysemu/kvm.h"
24
25 static int cpu_post_load(void *opaque, int version_id)
26 {
27 S390CPU *cpu = opaque;
28
29 /*
30 * As the cpu state is pushed to kvm via kvm_set_mp_state rather
31 * than via cpu_synchronize_state, we need update kvm here.
32 */
33 if (kvm_enabled()) {
34 kvm_s390_set_cpu_state(cpu, cpu->env.cpu_state);
35 return kvm_s390_vcpu_interrupt_post_load(cpu);
36 }
37
38 if (tcg_enabled()) {
39 /* Rearm the CKC timer if necessary */
40 tcg_s390_tod_updated(CPU(cpu), RUN_ON_CPU_NULL);
41 }
42
43 return 0;
44 }
45
46 static int cpu_pre_save(void *opaque)
47 {
48 S390CPU *cpu = opaque;
49
50 if (kvm_enabled()) {
51 kvm_s390_vcpu_interrupt_pre_save(cpu);
52 }
53
54 return 0;
55 }
56
57 static inline bool fpu_needed(void *opaque)
58 {
59 /* This looks odd, but we might want to NOT transfer fprs in the future */
60 return true;
61 }
62
63 static const VMStateDescription vmstate_fpu = {
64 .name = "cpu/fpu",
65 .version_id = 1,
66 .minimum_version_id = 1,
67 .needed = fpu_needed,
68 .fields = (VMStateField[]) {
69 VMSTATE_UINT64(env.vregs[0][0].ll, S390CPU),
70 VMSTATE_UINT64(env.vregs[1][0].ll, S390CPU),
71 VMSTATE_UINT64(env.vregs[2][0].ll, S390CPU),
72 VMSTATE_UINT64(env.vregs[3][0].ll, S390CPU),
73 VMSTATE_UINT64(env.vregs[4][0].ll, S390CPU),
74 VMSTATE_UINT64(env.vregs[5][0].ll, S390CPU),
75 VMSTATE_UINT64(env.vregs[6][0].ll, S390CPU),
76 VMSTATE_UINT64(env.vregs[7][0].ll, S390CPU),
77 VMSTATE_UINT64(env.vregs[8][0].ll, S390CPU),
78 VMSTATE_UINT64(env.vregs[9][0].ll, S390CPU),
79 VMSTATE_UINT64(env.vregs[10][0].ll, S390CPU),
80 VMSTATE_UINT64(env.vregs[11][0].ll, S390CPU),
81 VMSTATE_UINT64(env.vregs[12][0].ll, S390CPU),
82 VMSTATE_UINT64(env.vregs[13][0].ll, S390CPU),
83 VMSTATE_UINT64(env.vregs[14][0].ll, S390CPU),
84 VMSTATE_UINT64(env.vregs[15][0].ll, S390CPU),
85 VMSTATE_UINT32(env.fpc, S390CPU),
86 VMSTATE_END_OF_LIST()
87 }
88 };
89
90 static bool vregs_needed(void *opaque)
91 {
92 return s390_has_feat(S390_FEAT_VECTOR);
93 }
94
95 static const VMStateDescription vmstate_vregs = {
96 .name = "cpu/vregs",
97 .version_id = 1,
98 .minimum_version_id = 1,
99 .needed = vregs_needed,
100 .fields = (VMStateField[]) {
101 /* vregs[0][0] -> vregs[15][0] and fregs are overlays */
102 VMSTATE_UINT64(env.vregs[16][0].ll, S390CPU),
103 VMSTATE_UINT64(env.vregs[17][0].ll, S390CPU),
104 VMSTATE_UINT64(env.vregs[18][0].ll, S390CPU),
105 VMSTATE_UINT64(env.vregs[19][0].ll, S390CPU),
106 VMSTATE_UINT64(env.vregs[20][0].ll, S390CPU),
107 VMSTATE_UINT64(env.vregs[21][0].ll, S390CPU),
108 VMSTATE_UINT64(env.vregs[22][0].ll, S390CPU),
109 VMSTATE_UINT64(env.vregs[23][0].ll, S390CPU),
110 VMSTATE_UINT64(env.vregs[24][0].ll, S390CPU),
111 VMSTATE_UINT64(env.vregs[25][0].ll, S390CPU),
112 VMSTATE_UINT64(env.vregs[26][0].ll, S390CPU),
113 VMSTATE_UINT64(env.vregs[27][0].ll, S390CPU),
114 VMSTATE_UINT64(env.vregs[28][0].ll, S390CPU),
115 VMSTATE_UINT64(env.vregs[29][0].ll, S390CPU),
116 VMSTATE_UINT64(env.vregs[30][0].ll, S390CPU),
117 VMSTATE_UINT64(env.vregs[31][0].ll, S390CPU),
118 VMSTATE_UINT64(env.vregs[0][1].ll, S390CPU),
119 VMSTATE_UINT64(env.vregs[1][1].ll, S390CPU),
120 VMSTATE_UINT64(env.vregs[2][1].ll, S390CPU),
121 VMSTATE_UINT64(env.vregs[3][1].ll, S390CPU),
122 VMSTATE_UINT64(env.vregs[4][1].ll, S390CPU),
123 VMSTATE_UINT64(env.vregs[5][1].ll, S390CPU),
124 VMSTATE_UINT64(env.vregs[6][1].ll, S390CPU),
125 VMSTATE_UINT64(env.vregs[7][1].ll, S390CPU),
126 VMSTATE_UINT64(env.vregs[8][1].ll, S390CPU),
127 VMSTATE_UINT64(env.vregs[9][1].ll, S390CPU),
128 VMSTATE_UINT64(env.vregs[10][1].ll, S390CPU),
129 VMSTATE_UINT64(env.vregs[11][1].ll, S390CPU),
130 VMSTATE_UINT64(env.vregs[12][1].ll, S390CPU),
131 VMSTATE_UINT64(env.vregs[13][1].ll, S390CPU),
132 VMSTATE_UINT64(env.vregs[14][1].ll, S390CPU),
133 VMSTATE_UINT64(env.vregs[15][1].ll, S390CPU),
134 VMSTATE_UINT64(env.vregs[16][1].ll, S390CPU),
135 VMSTATE_UINT64(env.vregs[17][1].ll, S390CPU),
136 VMSTATE_UINT64(env.vregs[18][1].ll, S390CPU),
137 VMSTATE_UINT64(env.vregs[19][1].ll, S390CPU),
138 VMSTATE_UINT64(env.vregs[20][1].ll, S390CPU),
139 VMSTATE_UINT64(env.vregs[21][1].ll, S390CPU),
140 VMSTATE_UINT64(env.vregs[22][1].ll, S390CPU),
141 VMSTATE_UINT64(env.vregs[23][1].ll, S390CPU),
142 VMSTATE_UINT64(env.vregs[24][1].ll, S390CPU),
143 VMSTATE_UINT64(env.vregs[25][1].ll, S390CPU),
144 VMSTATE_UINT64(env.vregs[26][1].ll, S390CPU),
145 VMSTATE_UINT64(env.vregs[27][1].ll, S390CPU),
146 VMSTATE_UINT64(env.vregs[28][1].ll, S390CPU),
147 VMSTATE_UINT64(env.vregs[29][1].ll, S390CPU),
148 VMSTATE_UINT64(env.vregs[30][1].ll, S390CPU),
149 VMSTATE_UINT64(env.vregs[31][1].ll, S390CPU),
150 VMSTATE_END_OF_LIST()
151 }
152 };
153
154 static bool riccb_needed(void *opaque)
155 {
156 return s390_has_feat(S390_FEAT_RUNTIME_INSTRUMENTATION);
157 }
158
159 const VMStateDescription vmstate_riccb = {
160 .name = "cpu/riccb",
161 .version_id = 1,
162 .minimum_version_id = 1,
163 .needed = riccb_needed,
164 .fields = (VMStateField[]) {
165 VMSTATE_UINT8_ARRAY(env.riccb, S390CPU, 64),
166 VMSTATE_END_OF_LIST()
167 }
168 };
169
170 static bool exval_needed(void *opaque)
171 {
172 S390CPU *cpu = opaque;
173 return cpu->env.ex_value != 0;
174 }
175
176 const VMStateDescription vmstate_exval = {
177 .name = "cpu/exval",
178 .version_id = 1,
179 .minimum_version_id = 1,
180 .needed = exval_needed,
181 .fields = (VMStateField[]) {
182 VMSTATE_UINT64(env.ex_value, S390CPU),
183 VMSTATE_END_OF_LIST()
184 }
185 };
186
187 static bool gscb_needed(void *opaque)
188 {
189 return s390_has_feat(S390_FEAT_GUARDED_STORAGE);
190 }
191
192 const VMStateDescription vmstate_gscb = {
193 .name = "cpu/gscb",
194 .version_id = 1,
195 .minimum_version_id = 1,
196 .needed = gscb_needed,
197 .fields = (VMStateField[]) {
198 VMSTATE_UINT64_ARRAY(env.gscb, S390CPU, 4),
199 VMSTATE_END_OF_LIST()
200 }
201 };
202
203 static bool bpbc_needed(void *opaque)
204 {
205 return s390_has_feat(S390_FEAT_BPB);
206 }
207
208 const VMStateDescription vmstate_bpbc = {
209 .name = "cpu/bpbc",
210 .version_id = 1,
211 .minimum_version_id = 1,
212 .needed = bpbc_needed,
213 .fields = (VMStateField[]) {
214 VMSTATE_BOOL(env.bpbc, S390CPU),
215 VMSTATE_END_OF_LIST()
216 }
217 };
218
219 const VMStateDescription vmstate_s390_cpu = {
220 .name = "cpu",
221 .post_load = cpu_post_load,
222 .pre_save = cpu_pre_save,
223 .version_id = 4,
224 .minimum_version_id = 3,
225 .fields = (VMStateField[]) {
226 VMSTATE_UINT64_ARRAY(env.regs, S390CPU, 16),
227 VMSTATE_UINT64(env.psw.mask, S390CPU),
228 VMSTATE_UINT64(env.psw.addr, S390CPU),
229 VMSTATE_UINT64(env.psa, S390CPU),
230 VMSTATE_UINT32(env.todpr, S390CPU),
231 VMSTATE_UINT64(env.pfault_token, S390CPU),
232 VMSTATE_UINT64(env.pfault_compare, S390CPU),
233 VMSTATE_UINT64(env.pfault_select, S390CPU),
234 VMSTATE_UINT64(env.cputm, S390CPU),
235 VMSTATE_UINT64(env.ckc, S390CPU),
236 VMSTATE_UINT64(env.gbea, S390CPU),
237 VMSTATE_UINT64(env.pp, S390CPU),
238 VMSTATE_UINT32_ARRAY(env.aregs, S390CPU, 16),
239 VMSTATE_UINT64_ARRAY(env.cregs, S390CPU, 16),
240 VMSTATE_UINT8(env.cpu_state, S390CPU),
241 VMSTATE_UINT8(env.sigp_order, S390CPU),
242 VMSTATE_UINT32_V(irqstate_saved_size, S390CPU, 4),
243 VMSTATE_VBUFFER_UINT32(irqstate, S390CPU, 4, NULL,
244 irqstate_saved_size),
245 VMSTATE_END_OF_LIST()
246 },
247 .subsections = (const VMStateDescription*[]) {
248 &vmstate_fpu,
249 &vmstate_vregs,
250 &vmstate_riccb,
251 &vmstate_exval,
252 &vmstate_gscb,
253 &vmstate_bpbc,
254 NULL
255 },
256 };