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