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