target/s390x/machine.c

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