1 #include "qemu/osdep.h" 2 #include "qemu-common.h" 3 #include "cpu.h" 4 #include "hw/hw.h" 5 #include "hw/boards.h" 6 #include "qemu/error-report.h" 7 #include "sysemu/kvm.h" 8 #include "kvm_arm.h" 9 #include "internals.h" 10 #include "migration/cpu.h" 11 12 static bool vfp_needed(void *opaque) 13 { 14 ARMCPU *cpu = opaque; 15 CPUARMState *env = &cpu->env; 16 17 return arm_feature(env, ARM_FEATURE_VFP); 18 } 19 20 static int get_fpscr(QEMUFile *f, void *opaque, size_t size, 21 VMStateField *field) 22 { 23 ARMCPU *cpu = opaque; 24 CPUARMState *env = &cpu->env; 25 uint32_t val = qemu_get_be32(f); 26 27 vfp_set_fpscr(env, val); 28 return 0; 29 } 30 31 static int put_fpscr(QEMUFile *f, void *opaque, size_t size, 32 VMStateField *field, QJSON *vmdesc) 33 { 34 ARMCPU *cpu = opaque; 35 CPUARMState *env = &cpu->env; 36 37 qemu_put_be32(f, vfp_get_fpscr(env)); 38 return 0; 39 } 40 41 static const VMStateInfo vmstate_fpscr = { 42 .name = "fpscr", 43 .get = get_fpscr, 44 .put = put_fpscr, 45 }; 46 47 static const VMStateDescription vmstate_vfp = { 48 .name = "cpu/vfp", 49 .version_id = 3, 50 .minimum_version_id = 3, 51 .needed = vfp_needed, 52 .fields = (VMStateField[]) { 53 VMSTATE_FLOAT64_ARRAY(env.vfp.regs, ARMCPU, 64), 54 /* The xregs array is a little awkward because element 1 (FPSCR) 55 * requires a specific accessor, so we have to split it up in 56 * the vmstate: 57 */ 58 VMSTATE_UINT32(env.vfp.xregs[0], ARMCPU), 59 VMSTATE_UINT32_SUB_ARRAY(env.vfp.xregs, ARMCPU, 2, 14), 60 { 61 .name = "fpscr", 62 .version_id = 0, 63 .size = sizeof(uint32_t), 64 .info = &vmstate_fpscr, 65 .flags = VMS_SINGLE, 66 .offset = 0, 67 }, 68 VMSTATE_END_OF_LIST() 69 } 70 }; 71 72 static bool iwmmxt_needed(void *opaque) 73 { 74 ARMCPU *cpu = opaque; 75 CPUARMState *env = &cpu->env; 76 77 return arm_feature(env, ARM_FEATURE_IWMMXT); 78 } 79 80 static const VMStateDescription vmstate_iwmmxt = { 81 .name = "cpu/iwmmxt", 82 .version_id = 1, 83 .minimum_version_id = 1, 84 .needed = iwmmxt_needed, 85 .fields = (VMStateField[]) { 86 VMSTATE_UINT64_ARRAY(env.iwmmxt.regs, ARMCPU, 16), 87 VMSTATE_UINT32_ARRAY(env.iwmmxt.cregs, ARMCPU, 16), 88 VMSTATE_END_OF_LIST() 89 } 90 }; 91 92 static bool m_needed(void *opaque) 93 { 94 ARMCPU *cpu = opaque; 95 CPUARMState *env = &cpu->env; 96 97 return arm_feature(env, ARM_FEATURE_M); 98 } 99 100 static const VMStateDescription vmstate_m_faultmask_primask = { 101 .name = "cpu/m/faultmask-primask", 102 .version_id = 1, 103 .minimum_version_id = 1, 104 .fields = (VMStateField[]) { 105 VMSTATE_UINT32(env.v7m.faultmask[M_REG_NS], ARMCPU), 106 VMSTATE_UINT32(env.v7m.primask[M_REG_NS], ARMCPU), 107 VMSTATE_END_OF_LIST() 108 } 109 }; 110 111 static const VMStateDescription vmstate_m = { 112 .name = "cpu/m", 113 .version_id = 4, 114 .minimum_version_id = 4, 115 .needed = m_needed, 116 .fields = (VMStateField[]) { 117 VMSTATE_UINT32(env.v7m.vecbase, ARMCPU), 118 VMSTATE_UINT32(env.v7m.basepri[M_REG_NS], ARMCPU), 119 VMSTATE_UINT32(env.v7m.control, ARMCPU), 120 VMSTATE_UINT32(env.v7m.ccr, ARMCPU), 121 VMSTATE_UINT32(env.v7m.cfsr, ARMCPU), 122 VMSTATE_UINT32(env.v7m.hfsr, ARMCPU), 123 VMSTATE_UINT32(env.v7m.dfsr, ARMCPU), 124 VMSTATE_UINT32(env.v7m.mmfar, ARMCPU), 125 VMSTATE_UINT32(env.v7m.bfar, ARMCPU), 126 VMSTATE_UINT32(env.v7m.mpu_ctrl, ARMCPU), 127 VMSTATE_INT32(env.v7m.exception, ARMCPU), 128 VMSTATE_END_OF_LIST() 129 }, 130 .subsections = (const VMStateDescription*[]) { 131 &vmstate_m_faultmask_primask, 132 NULL 133 } 134 }; 135 136 static bool thumb2ee_needed(void *opaque) 137 { 138 ARMCPU *cpu = opaque; 139 CPUARMState *env = &cpu->env; 140 141 return arm_feature(env, ARM_FEATURE_THUMB2EE); 142 } 143 144 static const VMStateDescription vmstate_thumb2ee = { 145 .name = "cpu/thumb2ee", 146 .version_id = 1, 147 .minimum_version_id = 1, 148 .needed = thumb2ee_needed, 149 .fields = (VMStateField[]) { 150 VMSTATE_UINT32(env.teecr, ARMCPU), 151 VMSTATE_UINT32(env.teehbr, ARMCPU), 152 VMSTATE_END_OF_LIST() 153 } 154 }; 155 156 static bool pmsav7_needed(void *opaque) 157 { 158 ARMCPU *cpu = opaque; 159 CPUARMState *env = &cpu->env; 160 161 return arm_feature(env, ARM_FEATURE_PMSA) && 162 arm_feature(env, ARM_FEATURE_V7) && 163 !arm_feature(env, ARM_FEATURE_V8); 164 } 165 166 static bool pmsav7_rgnr_vmstate_validate(void *opaque, int version_id) 167 { 168 ARMCPU *cpu = opaque; 169 170 return cpu->env.pmsav7.rnr < cpu->pmsav7_dregion; 171 } 172 173 static const VMStateDescription vmstate_pmsav7 = { 174 .name = "cpu/pmsav7", 175 .version_id = 1, 176 .minimum_version_id = 1, 177 .needed = pmsav7_needed, 178 .fields = (VMStateField[]) { 179 VMSTATE_VARRAY_UINT32(env.pmsav7.drbar, ARMCPU, pmsav7_dregion, 0, 180 vmstate_info_uint32, uint32_t), 181 VMSTATE_VARRAY_UINT32(env.pmsav7.drsr, ARMCPU, pmsav7_dregion, 0, 182 vmstate_info_uint32, uint32_t), 183 VMSTATE_VARRAY_UINT32(env.pmsav7.dracr, ARMCPU, pmsav7_dregion, 0, 184 vmstate_info_uint32, uint32_t), 185 VMSTATE_VALIDATE("rgnr is valid", pmsav7_rgnr_vmstate_validate), 186 VMSTATE_END_OF_LIST() 187 } 188 }; 189 190 static bool pmsav7_rnr_needed(void *opaque) 191 { 192 ARMCPU *cpu = opaque; 193 CPUARMState *env = &cpu->env; 194 195 /* For R profile cores pmsav7.rnr is migrated via the cpreg 196 * "RGNR" definition in helper.h. For M profile we have to 197 * migrate it separately. 198 */ 199 return arm_feature(env, ARM_FEATURE_M); 200 } 201 202 static const VMStateDescription vmstate_pmsav7_rnr = { 203 .name = "cpu/pmsav7-rnr", 204 .version_id = 1, 205 .minimum_version_id = 1, 206 .needed = pmsav7_rnr_needed, 207 .fields = (VMStateField[]) { 208 VMSTATE_UINT32(env.pmsav7.rnr, ARMCPU), 209 VMSTATE_END_OF_LIST() 210 } 211 }; 212 213 static bool pmsav8_needed(void *opaque) 214 { 215 ARMCPU *cpu = opaque; 216 CPUARMState *env = &cpu->env; 217 218 return arm_feature(env, ARM_FEATURE_PMSA) && 219 arm_feature(env, ARM_FEATURE_V8); 220 } 221 222 static const VMStateDescription vmstate_pmsav8 = { 223 .name = "cpu/pmsav8", 224 .version_id = 1, 225 .minimum_version_id = 1, 226 .needed = pmsav8_needed, 227 .fields = (VMStateField[]) { 228 VMSTATE_VARRAY_UINT32(env.pmsav8.rbar, ARMCPU, pmsav7_dregion, 0, 229 vmstate_info_uint32, uint32_t), 230 VMSTATE_VARRAY_UINT32(env.pmsav8.rlar, ARMCPU, pmsav7_dregion, 0, 231 vmstate_info_uint32, uint32_t), 232 VMSTATE_UINT32(env.pmsav8.mair0, ARMCPU), 233 VMSTATE_UINT32(env.pmsav8.mair1, ARMCPU), 234 VMSTATE_END_OF_LIST() 235 } 236 }; 237 238 static bool m_security_needed(void *opaque) 239 { 240 ARMCPU *cpu = opaque; 241 CPUARMState *env = &cpu->env; 242 243 return arm_feature(env, ARM_FEATURE_M_SECURITY); 244 } 245 246 static const VMStateDescription vmstate_m_security = { 247 .name = "cpu/m-security", 248 .version_id = 1, 249 .minimum_version_id = 1, 250 .needed = m_security_needed, 251 .fields = (VMStateField[]) { 252 VMSTATE_UINT32(env.v7m.secure, ARMCPU), 253 VMSTATE_UINT32(env.v7m.basepri[M_REG_S], ARMCPU), 254 VMSTATE_UINT32(env.v7m.primask[M_REG_S], ARMCPU), 255 VMSTATE_UINT32(env.v7m.faultmask[M_REG_S], ARMCPU), 256 VMSTATE_END_OF_LIST() 257 } 258 }; 259 260 static int get_cpsr(QEMUFile *f, void *opaque, size_t size, 261 VMStateField *field) 262 { 263 ARMCPU *cpu = opaque; 264 CPUARMState *env = &cpu->env; 265 uint32_t val = qemu_get_be32(f); 266 267 if (arm_feature(env, ARM_FEATURE_M)) { 268 if (val & XPSR_EXCP) { 269 /* This is a CPSR format value from an older QEMU. (We can tell 270 * because values transferred in XPSR format always have zero 271 * for the EXCP field, and CPSR format will always have bit 4 272 * set in CPSR_M.) Rearrange it into XPSR format. The significant 273 * differences are that the T bit is not in the same place, the 274 * primask/faultmask info may be in the CPSR I and F bits, and 275 * we do not want the mode bits. 276 * We know that this cleanup happened before v8M, so there 277 * is no complication with banked primask/faultmask. 278 */ 279 uint32_t newval = val; 280 281 assert(!arm_feature(env, ARM_FEATURE_M_SECURITY)); 282 283 newval &= (CPSR_NZCV | CPSR_Q | CPSR_IT | CPSR_GE); 284 if (val & CPSR_T) { 285 newval |= XPSR_T; 286 } 287 /* If the I or F bits are set then this is a migration from 288 * an old QEMU which still stored the M profile FAULTMASK 289 * and PRIMASK in env->daif. For a new QEMU, the data is 290 * transferred using the vmstate_m_faultmask_primask subsection. 291 */ 292 if (val & CPSR_F) { 293 env->v7m.faultmask[M_REG_NS] = 1; 294 } 295 if (val & CPSR_I) { 296 env->v7m.primask[M_REG_NS] = 1; 297 } 298 val = newval; 299 } 300 /* Ignore the low bits, they are handled by vmstate_m. */ 301 xpsr_write(env, val, ~XPSR_EXCP); 302 return 0; 303 } 304 305 env->aarch64 = ((val & PSTATE_nRW) == 0); 306 307 if (is_a64(env)) { 308 pstate_write(env, val); 309 return 0; 310 } 311 312 cpsr_write(env, val, 0xffffffff, CPSRWriteRaw); 313 return 0; 314 } 315 316 static int put_cpsr(QEMUFile *f, void *opaque, size_t size, 317 VMStateField *field, QJSON *vmdesc) 318 { 319 ARMCPU *cpu = opaque; 320 CPUARMState *env = &cpu->env; 321 uint32_t val; 322 323 if (arm_feature(env, ARM_FEATURE_M)) { 324 /* The low 9 bits are v7m.exception, which is handled by vmstate_m. */ 325 val = xpsr_read(env) & ~XPSR_EXCP; 326 } else if (is_a64(env)) { 327 val = pstate_read(env); 328 } else { 329 val = cpsr_read(env); 330 } 331 332 qemu_put_be32(f, val); 333 return 0; 334 } 335 336 static const VMStateInfo vmstate_cpsr = { 337 .name = "cpsr", 338 .get = get_cpsr, 339 .put = put_cpsr, 340 }; 341 342 static int get_power(QEMUFile *f, void *opaque, size_t size, 343 VMStateField *field) 344 { 345 ARMCPU *cpu = opaque; 346 bool powered_off = qemu_get_byte(f); 347 cpu->power_state = powered_off ? PSCI_OFF : PSCI_ON; 348 return 0; 349 } 350 351 static int put_power(QEMUFile *f, void *opaque, size_t size, 352 VMStateField *field, QJSON *vmdesc) 353 { 354 ARMCPU *cpu = opaque; 355 356 /* Migration should never happen while we transition power states */ 357 358 if (cpu->power_state == PSCI_ON || 359 cpu->power_state == PSCI_OFF) { 360 bool powered_off = (cpu->power_state == PSCI_OFF) ? true : false; 361 qemu_put_byte(f, powered_off); 362 return 0; 363 } else { 364 return 1; 365 } 366 } 367 368 static const VMStateInfo vmstate_powered_off = { 369 .name = "powered_off", 370 .get = get_power, 371 .put = put_power, 372 }; 373 374 static void cpu_pre_save(void *opaque) 375 { 376 ARMCPU *cpu = opaque; 377 378 if (kvm_enabled()) { 379 if (!write_kvmstate_to_list(cpu)) { 380 /* This should never fail */ 381 abort(); 382 } 383 } else { 384 if (!write_cpustate_to_list(cpu)) { 385 /* This should never fail. */ 386 abort(); 387 } 388 } 389 390 cpu->cpreg_vmstate_array_len = cpu->cpreg_array_len; 391 memcpy(cpu->cpreg_vmstate_indexes, cpu->cpreg_indexes, 392 cpu->cpreg_array_len * sizeof(uint64_t)); 393 memcpy(cpu->cpreg_vmstate_values, cpu->cpreg_values, 394 cpu->cpreg_array_len * sizeof(uint64_t)); 395 } 396 397 static int cpu_post_load(void *opaque, int version_id) 398 { 399 ARMCPU *cpu = opaque; 400 int i, v; 401 402 /* Update the values list from the incoming migration data. 403 * Anything in the incoming data which we don't know about is 404 * a migration failure; anything we know about but the incoming 405 * data doesn't specify retains its current (reset) value. 406 * The indexes list remains untouched -- we only inspect the 407 * incoming migration index list so we can match the values array 408 * entries with the right slots in our own values array. 409 */ 410 411 for (i = 0, v = 0; i < cpu->cpreg_array_len 412 && v < cpu->cpreg_vmstate_array_len; i++) { 413 if (cpu->cpreg_vmstate_indexes[v] > cpu->cpreg_indexes[i]) { 414 /* register in our list but not incoming : skip it */ 415 continue; 416 } 417 if (cpu->cpreg_vmstate_indexes[v] < cpu->cpreg_indexes[i]) { 418 /* register in their list but not ours: fail migration */ 419 return -1; 420 } 421 /* matching register, copy the value over */ 422 cpu->cpreg_values[i] = cpu->cpreg_vmstate_values[v]; 423 v++; 424 } 425 426 if (kvm_enabled()) { 427 if (!write_list_to_kvmstate(cpu, KVM_PUT_FULL_STATE)) { 428 return -1; 429 } 430 /* Note that it's OK for the TCG side not to know about 431 * every register in the list; KVM is authoritative if 432 * we're using it. 433 */ 434 write_list_to_cpustate(cpu); 435 } else { 436 if (!write_list_to_cpustate(cpu)) { 437 return -1; 438 } 439 } 440 441 hw_breakpoint_update_all(cpu); 442 hw_watchpoint_update_all(cpu); 443 444 return 0; 445 } 446 447 const VMStateDescription vmstate_arm_cpu = { 448 .name = "cpu", 449 .version_id = 22, 450 .minimum_version_id = 22, 451 .pre_save = cpu_pre_save, 452 .post_load = cpu_post_load, 453 .fields = (VMStateField[]) { 454 VMSTATE_UINT32_ARRAY(env.regs, ARMCPU, 16), 455 VMSTATE_UINT64_ARRAY(env.xregs, ARMCPU, 32), 456 VMSTATE_UINT64(env.pc, ARMCPU), 457 { 458 .name = "cpsr", 459 .version_id = 0, 460 .size = sizeof(uint32_t), 461 .info = &vmstate_cpsr, 462 .flags = VMS_SINGLE, 463 .offset = 0, 464 }, 465 VMSTATE_UINT32(env.spsr, ARMCPU), 466 VMSTATE_UINT64_ARRAY(env.banked_spsr, ARMCPU, 8), 467 VMSTATE_UINT32_ARRAY(env.banked_r13, ARMCPU, 8), 468 VMSTATE_UINT32_ARRAY(env.banked_r14, ARMCPU, 8), 469 VMSTATE_UINT32_ARRAY(env.usr_regs, ARMCPU, 5), 470 VMSTATE_UINT32_ARRAY(env.fiq_regs, ARMCPU, 5), 471 VMSTATE_UINT64_ARRAY(env.elr_el, ARMCPU, 4), 472 VMSTATE_UINT64_ARRAY(env.sp_el, ARMCPU, 4), 473 /* The length-check must come before the arrays to avoid 474 * incoming data possibly overflowing the array. 475 */ 476 VMSTATE_INT32_POSITIVE_LE(cpreg_vmstate_array_len, ARMCPU), 477 VMSTATE_VARRAY_INT32(cpreg_vmstate_indexes, ARMCPU, 478 cpreg_vmstate_array_len, 479 0, vmstate_info_uint64, uint64_t), 480 VMSTATE_VARRAY_INT32(cpreg_vmstate_values, ARMCPU, 481 cpreg_vmstate_array_len, 482 0, vmstate_info_uint64, uint64_t), 483 VMSTATE_UINT64(env.exclusive_addr, ARMCPU), 484 VMSTATE_UINT64(env.exclusive_val, ARMCPU), 485 VMSTATE_UINT64(env.exclusive_high, ARMCPU), 486 VMSTATE_UINT64(env.features, ARMCPU), 487 VMSTATE_UINT32(env.exception.syndrome, ARMCPU), 488 VMSTATE_UINT32(env.exception.fsr, ARMCPU), 489 VMSTATE_UINT64(env.exception.vaddress, ARMCPU), 490 VMSTATE_TIMER_PTR(gt_timer[GTIMER_PHYS], ARMCPU), 491 VMSTATE_TIMER_PTR(gt_timer[GTIMER_VIRT], ARMCPU), 492 { 493 .name = "power_state", 494 .version_id = 0, 495 .size = sizeof(bool), 496 .info = &vmstate_powered_off, 497 .flags = VMS_SINGLE, 498 .offset = 0, 499 }, 500 VMSTATE_END_OF_LIST() 501 }, 502 .subsections = (const VMStateDescription*[]) { 503 &vmstate_vfp, 504 &vmstate_iwmmxt, 505 &vmstate_m, 506 &vmstate_thumb2ee, 507 /* pmsav7_rnr must come before pmsav7 so that we have the 508 * region number before we test it in the VMSTATE_VALIDATE 509 * in vmstate_pmsav7. 510 */ 511 &vmstate_pmsav7_rnr, 512 &vmstate_pmsav7, 513 &vmstate_pmsav8, 514 &vmstate_m_security, 515 NULL 516 } 517 }; 518