]> git.proxmox.com Git - mirror_qemu.git/blame - target/s390x/machine.c
target/arm: Correct VMOV_imm_dp handling of short vectors
[mirror_qemu.git] / target / s390x / machine.c
CommitLineData
ef1df130
TH
1/*
2 * S390x machine definitions and functions
3 *
27e84d4e 4 * Copyright IBM Corp. 2014, 2018
ef1df130
TH
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
9615495a 17#include "qemu/osdep.h"
ef1df130
TH
18#include "hw/hw.h"
19#include "cpu.h"
4e58b838 20#include "internal.h"
f16bbb9b 21#include "kvm_s390x.h"
7c12f710 22#include "tcg_s390x.h"
ef1df130 23#include "sysemu/kvm.h"
14a48c1d 24#include "sysemu/tcg.h"
ef1df130
TH
25
26static 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);
3cda44f7 36 return kvm_s390_vcpu_interrupt_post_load(cpu);
ef1df130
TH
37 }
38
7c12f710
DH
39 if (tcg_enabled()) {
40 /* Rearm the CKC timer if necessary */
41 tcg_s390_tod_updated(CPU(cpu), RUN_ON_CPU_NULL);
42 }
43
ef1df130
TH
44 return 0;
45}
303c681a 46
44b1ff31 47static int cpu_pre_save(void *opaque)
3cda44f7
JF
48{
49 S390CPU *cpu = opaque;
50
51 if (kvm_enabled()) {
52 kvm_s390_vcpu_interrupt_pre_save(cpu);
53 }
44b1ff31
DDAG
54
55 return 0;
3cda44f7 56}
ef1df130 57
5cd8cada
JQ
58static 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
52c6cfb7 64static const VMStateDescription vmstate_fpu = {
46c804de
DH
65 .name = "cpu/fpu",
66 .version_id = 1,
67 .minimum_version_id = 1,
5cd8cada 68 .needed = fpu_needed,
46c804de 69 .fields = (VMStateField[]) {
4f83d7d2
DH
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),
46c804de
DH
86 VMSTATE_UINT32(env.fpc, S390CPU),
87 VMSTATE_END_OF_LIST()
88 }
89};
90
b01501db
PB
91static bool vregs_needed(void *opaque)
92{
7c72ac49 93 return s390_has_feat(S390_FEAT_VECTOR);
b01501db
PB
94}
95
52c6cfb7 96static const VMStateDescription vmstate_vregs = {
b2ac0ff5
EF
97 .name = "cpu/vregs",
98 .version_id = 1,
99 .minimum_version_id = 1,
5cd8cada 100 .needed = vregs_needed,
b2ac0ff5
EF
101 .fields = (VMStateField[]) {
102 /* vregs[0][0] -> vregs[15][0] and fregs are overlays */
4f83d7d2
DH
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),
b2ac0ff5
EF
151 VMSTATE_END_OF_LIST()
152 }
153};
154
b01501db
PB
155static bool riccb_needed(void *opaque)
156{
7c72ac49 157 return s390_has_feat(S390_FEAT_RUNTIME_INSTRUMENTATION);
b01501db
PB
158}
159
9700230b
FZ
160const 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
303c681a
RH
171static bool exval_needed(void *opaque)
172{
173 S390CPU *cpu = opaque;
174 return cpu->env.ex_value != 0;
175}
176
177const 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
62deb62d
FZ
188static bool gscb_needed(void *opaque)
189{
0280b3eb 190 return s390_has_feat(S390_FEAT_GUARDED_STORAGE);
62deb62d
FZ
191}
192
193const 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
b073c875
CB
204static bool bpbc_needed(void *opaque)
205{
206 return s390_has_feat(S390_FEAT_BPB);
207}
208
209const 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
27e84d4e
CB
220static bool etoken_needed(void *opaque)
221{
222 return s390_has_feat(S390_FEAT_ETOKEN);
223}
224
225const 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
46c804de
DH
237const VMStateDescription vmstate_s390_cpu = {
238 .name = "cpu",
239 .post_load = cpu_post_load,
3cda44f7
JF
240 .pre_save = cpu_pre_save,
241 .version_id = 4,
46c804de
DH
242 .minimum_version_id = 3,
243 .fields = (VMStateField[]) {
ef1df130
TH
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),
ef1df130
TH
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),
18ff9494 259 VMSTATE_UINT8(env.sigp_order, S390CPU),
3cda44f7 260 VMSTATE_UINT32_V(irqstate_saved_size, S390CPU, 4),
59046ec2 261 VMSTATE_VBUFFER_UINT32(irqstate, S390CPU, 4, NULL,
3cda44f7 262 irqstate_saved_size),
ef1df130 263 VMSTATE_END_OF_LIST()
5cd8cada
JQ
264 },
265 .subsections = (const VMStateDescription*[]) {
266 &vmstate_fpu,
267 &vmstate_vregs,
9700230b 268 &vmstate_riccb,
303c681a 269 &vmstate_exval,
62deb62d 270 &vmstate_gscb,
b073c875 271 &vmstate_bpbc,
27e84d4e 272 &vmstate_etoken,
5cd8cada 273 NULL
46c804de 274 },
ef1df130 275};