1 /* SPDX-License-Identifier: GPL-2.0 */ 2 /* 3 * definition for kvm on s390 4 * 5 * Copyright IBM Corp. 2008, 2020 6 * 7 * Author(s): Carsten Otte <cotte@de.ibm.com> 8 * Christian Borntraeger <borntraeger@de.ibm.com> 9 * Christian Ehrhardt <ehrhardt@de.ibm.com> 10 */ 11 12 #ifndef ARCH_S390_KVM_S390_H 13 #define ARCH_S390_KVM_S390_H 14 15 #include <linux/hrtimer.h> 16 #include <linux/kvm.h> 17 #include <linux/kvm_host.h> 18 #include <linux/lockdep.h> 19 #include <asm/facility.h> 20 #include <asm/processor.h> 21 #include <asm/sclp.h> 22 23 /* Transactional Memory Execution related macros */ 24 #define IS_TE_ENABLED(vcpu) ((vcpu->arch.sie_block->ecb & ECB_TE)) 25 #define TDB_FORMAT1 1 26 #define IS_ITDB_VALID(vcpu) ((*(char *)vcpu->arch.sie_block->itdba == TDB_FORMAT1)) 27 28 extern debug_info_t *kvm_s390_dbf; 29 extern debug_info_t *kvm_s390_dbf_uv; 30 31 #define KVM_UV_EVENT(d_kvm, d_loglevel, d_string, d_args...)\ 32 do { \ 33 debug_sprintf_event((d_kvm)->arch.dbf, d_loglevel, d_string "\n", \ 34 d_args); \ 35 debug_sprintf_event(kvm_s390_dbf_uv, d_loglevel, \ 36 "%d: " d_string "\n", (d_kvm)->userspace_pid, \ 37 d_args); \ 38 } while (0) 39 40 #define KVM_EVENT(d_loglevel, d_string, d_args...)\ 41 do { \ 42 debug_sprintf_event(kvm_s390_dbf, d_loglevel, d_string "\n", \ 43 d_args); \ 44 } while (0) 45 46 #define VM_EVENT(d_kvm, d_loglevel, d_string, d_args...)\ 47 do { \ 48 debug_sprintf_event(d_kvm->arch.dbf, d_loglevel, d_string "\n", \ 49 d_args); \ 50 } while (0) 51 52 #define VCPU_EVENT(d_vcpu, d_loglevel, d_string, d_args...)\ 53 do { \ 54 debug_sprintf_event(d_vcpu->kvm->arch.dbf, d_loglevel, \ 55 "%02d[%016lx-%016lx]: " d_string "\n", d_vcpu->vcpu_id, \ 56 d_vcpu->arch.sie_block->gpsw.mask, d_vcpu->arch.sie_block->gpsw.addr,\ 57 d_args); \ 58 } while (0) 59 60 static inline void kvm_s390_set_cpuflags(struct kvm_vcpu *vcpu, u32 flags) 61 { 62 atomic_or(flags, &vcpu->arch.sie_block->cpuflags); 63 } 64 65 static inline void kvm_s390_clear_cpuflags(struct kvm_vcpu *vcpu, u32 flags) 66 { 67 atomic_andnot(flags, &vcpu->arch.sie_block->cpuflags); 68 } 69 70 static inline bool kvm_s390_test_cpuflags(struct kvm_vcpu *vcpu, u32 flags) 71 { 72 return (atomic_read(&vcpu->arch.sie_block->cpuflags) & flags) == flags; 73 } 74 75 static inline int is_vcpu_stopped(struct kvm_vcpu *vcpu) 76 { 77 return kvm_s390_test_cpuflags(vcpu, CPUSTAT_STOPPED); 78 } 79 80 static inline int is_vcpu_idle(struct kvm_vcpu *vcpu) 81 { 82 return test_bit(vcpu->vcpu_idx, vcpu->kvm->arch.idle_mask); 83 } 84 85 static inline int kvm_is_ucontrol(struct kvm *kvm) 86 { 87 #ifdef CONFIG_KVM_S390_UCONTROL 88 if (kvm->arch.gmap) 89 return 0; 90 return 1; 91 #else 92 return 0; 93 #endif 94 } 95 96 #define GUEST_PREFIX_SHIFT 13 97 static inline u32 kvm_s390_get_prefix(struct kvm_vcpu *vcpu) 98 { 99 return vcpu->arch.sie_block->prefix << GUEST_PREFIX_SHIFT; 100 } 101 102 static inline void kvm_s390_set_prefix(struct kvm_vcpu *vcpu, u32 prefix) 103 { 104 VCPU_EVENT(vcpu, 3, "set prefix of cpu %03u to 0x%x", vcpu->vcpu_id, 105 prefix); 106 vcpu->arch.sie_block->prefix = prefix >> GUEST_PREFIX_SHIFT; 107 kvm_make_request(KVM_REQ_TLB_FLUSH, vcpu); 108 kvm_make_request(KVM_REQ_MMU_RELOAD, vcpu); 109 } 110 111 static inline u64 kvm_s390_get_base_disp_s(struct kvm_vcpu *vcpu, u8 *ar) 112 { 113 u32 base2 = vcpu->arch.sie_block->ipb >> 28; 114 u32 disp2 = ((vcpu->arch.sie_block->ipb & 0x0fff0000) >> 16); 115 116 if (ar) 117 *ar = base2; 118 119 return (base2 ? vcpu->run->s.regs.gprs[base2] : 0) + disp2; 120 } 121 122 static inline void kvm_s390_get_base_disp_sse(struct kvm_vcpu *vcpu, 123 u64 *address1, u64 *address2, 124 u8 *ar_b1, u8 *ar_b2) 125 { 126 u32 base1 = (vcpu->arch.sie_block->ipb & 0xf0000000) >> 28; 127 u32 disp1 = (vcpu->arch.sie_block->ipb & 0x0fff0000) >> 16; 128 u32 base2 = (vcpu->arch.sie_block->ipb & 0xf000) >> 12; 129 u32 disp2 = vcpu->arch.sie_block->ipb & 0x0fff; 130 131 *address1 = (base1 ? vcpu->run->s.regs.gprs[base1] : 0) + disp1; 132 *address2 = (base2 ? vcpu->run->s.regs.gprs[base2] : 0) + disp2; 133 134 if (ar_b1) 135 *ar_b1 = base1; 136 if (ar_b2) 137 *ar_b2 = base2; 138 } 139 140 static inline void kvm_s390_get_regs_rre(struct kvm_vcpu *vcpu, int *r1, int *r2) 141 { 142 if (r1) 143 *r1 = (vcpu->arch.sie_block->ipb & 0x00f00000) >> 20; 144 if (r2) 145 *r2 = (vcpu->arch.sie_block->ipb & 0x000f0000) >> 16; 146 } 147 148 static inline u64 kvm_s390_get_base_disp_rsy(struct kvm_vcpu *vcpu, u8 *ar) 149 { 150 u32 base2 = vcpu->arch.sie_block->ipb >> 28; 151 u32 disp2 = ((vcpu->arch.sie_block->ipb & 0x0fff0000) >> 16) + 152 ((vcpu->arch.sie_block->ipb & 0xff00) << 4); 153 /* The displacement is a 20bit _SIGNED_ value */ 154 if (disp2 & 0x80000) 155 disp2+=0xfff00000; 156 157 if (ar) 158 *ar = base2; 159 160 return (base2 ? vcpu->run->s.regs.gprs[base2] : 0) + (long)(int)disp2; 161 } 162 163 static inline u64 kvm_s390_get_base_disp_rs(struct kvm_vcpu *vcpu, u8 *ar) 164 { 165 u32 base2 = vcpu->arch.sie_block->ipb >> 28; 166 u32 disp2 = ((vcpu->arch.sie_block->ipb & 0x0fff0000) >> 16); 167 168 if (ar) 169 *ar = base2; 170 171 return (base2 ? vcpu->run->s.regs.gprs[base2] : 0) + disp2; 172 } 173 174 /* Set the condition code in the guest program status word */ 175 static inline void kvm_s390_set_psw_cc(struct kvm_vcpu *vcpu, unsigned long cc) 176 { 177 vcpu->arch.sie_block->gpsw.mask &= ~(3UL << 44); 178 vcpu->arch.sie_block->gpsw.mask |= cc << 44; 179 } 180 181 /* test availability of facility in a kvm instance */ 182 static inline int test_kvm_facility(struct kvm *kvm, unsigned long nr) 183 { 184 return __test_facility(nr, kvm->arch.model.fac_mask) && 185 __test_facility(nr, kvm->arch.model.fac_list); 186 } 187 188 static inline int set_kvm_facility(u64 *fac_list, unsigned long nr) 189 { 190 unsigned char *ptr; 191 192 if (nr >= MAX_FACILITY_BIT) 193 return -EINVAL; 194 ptr = (unsigned char *) fac_list + (nr >> 3); 195 *ptr |= (0x80UL >> (nr & 7)); 196 return 0; 197 } 198 199 static inline int test_kvm_cpu_feat(struct kvm *kvm, unsigned long nr) 200 { 201 WARN_ON_ONCE(nr >= KVM_S390_VM_CPU_FEAT_NR_BITS); 202 return test_bit_inv(nr, kvm->arch.cpu_feat); 203 } 204 205 /* are cpu states controlled by user space */ 206 static inline int kvm_s390_user_cpu_state_ctrl(struct kvm *kvm) 207 { 208 return kvm->arch.user_cpu_state_ctrl != 0; 209 } 210 211 static inline void kvm_s390_set_user_cpu_state_ctrl(struct kvm *kvm) 212 { 213 if (kvm->arch.user_cpu_state_ctrl) 214 return; 215 216 VM_EVENT(kvm, 3, "%s", "ENABLE: Userspace CPU state control"); 217 kvm->arch.user_cpu_state_ctrl = 1; 218 } 219 220 /* get the end gfn of the last (highest gfn) memslot */ 221 static inline unsigned long kvm_s390_get_gfn_end(struct kvm_memslots *slots) 222 { 223 struct rb_node *node; 224 struct kvm_memory_slot *ms; 225 226 if (WARN_ON(kvm_memslots_empty(slots))) 227 return 0; 228 229 node = rb_last(&slots->gfn_tree); 230 ms = container_of(node, struct kvm_memory_slot, gfn_node[slots->node_idx]); 231 return ms->base_gfn + ms->npages; 232 } 233 234 /* implemented in pv.c */ 235 int kvm_s390_pv_destroy_cpu(struct kvm_vcpu *vcpu, u16 *rc, u16 *rrc); 236 int kvm_s390_pv_create_cpu(struct kvm_vcpu *vcpu, u16 *rc, u16 *rrc); 237 int kvm_s390_pv_deinit_vm(struct kvm *kvm, u16 *rc, u16 *rrc); 238 int kvm_s390_pv_init_vm(struct kvm *kvm, u16 *rc, u16 *rrc); 239 int kvm_s390_pv_set_sec_parms(struct kvm *kvm, void *hdr, u64 length, u16 *rc, 240 u16 *rrc); 241 int kvm_s390_pv_unpack(struct kvm *kvm, unsigned long addr, unsigned long size, 242 unsigned long tweak, u16 *rc, u16 *rrc); 243 int kvm_s390_pv_set_cpu_state(struct kvm_vcpu *vcpu, u8 state); 244 245 static inline u64 kvm_s390_pv_get_handle(struct kvm *kvm) 246 { 247 return kvm->arch.pv.handle; 248 } 249 250 static inline u64 kvm_s390_pv_cpu_get_handle(struct kvm_vcpu *vcpu) 251 { 252 return vcpu->arch.pv.handle; 253 } 254 255 static inline bool kvm_s390_pv_is_protected(struct kvm *kvm) 256 { 257 lockdep_assert_held(&kvm->lock); 258 return !!kvm_s390_pv_get_handle(kvm); 259 } 260 261 static inline bool kvm_s390_pv_cpu_is_protected(struct kvm_vcpu *vcpu) 262 { 263 lockdep_assert_held(&vcpu->mutex); 264 return !!kvm_s390_pv_cpu_get_handle(vcpu); 265 } 266 267 /* implemented in interrupt.c */ 268 int kvm_s390_handle_wait(struct kvm_vcpu *vcpu); 269 void kvm_s390_vcpu_wakeup(struct kvm_vcpu *vcpu); 270 enum hrtimer_restart kvm_s390_idle_wakeup(struct hrtimer *timer); 271 int __must_check kvm_s390_deliver_pending_interrupts(struct kvm_vcpu *vcpu); 272 void kvm_s390_clear_local_irqs(struct kvm_vcpu *vcpu); 273 void kvm_s390_clear_float_irqs(struct kvm *kvm); 274 int __must_check kvm_s390_inject_vm(struct kvm *kvm, 275 struct kvm_s390_interrupt *s390int); 276 int __must_check kvm_s390_inject_vcpu(struct kvm_vcpu *vcpu, 277 struct kvm_s390_irq *irq); 278 static inline int kvm_s390_inject_prog_irq(struct kvm_vcpu *vcpu, 279 struct kvm_s390_pgm_info *pgm_info) 280 { 281 struct kvm_s390_irq irq = { 282 .type = KVM_S390_PROGRAM_INT, 283 .u.pgm = *pgm_info, 284 }; 285 286 return kvm_s390_inject_vcpu(vcpu, &irq); 287 } 288 static inline int kvm_s390_inject_program_int(struct kvm_vcpu *vcpu, u16 code) 289 { 290 struct kvm_s390_irq irq = { 291 .type = KVM_S390_PROGRAM_INT, 292 .u.pgm.code = code, 293 }; 294 295 return kvm_s390_inject_vcpu(vcpu, &irq); 296 } 297 struct kvm_s390_interrupt_info *kvm_s390_get_io_int(struct kvm *kvm, 298 u64 isc_mask, u32 schid); 299 int kvm_s390_reinject_io_int(struct kvm *kvm, 300 struct kvm_s390_interrupt_info *inti); 301 int kvm_s390_mask_adapter(struct kvm *kvm, unsigned int id, bool masked); 302 303 /* implemented in intercept.c */ 304 u8 kvm_s390_get_ilen(struct kvm_vcpu *vcpu); 305 int kvm_handle_sie_intercept(struct kvm_vcpu *vcpu); 306 static inline void kvm_s390_rewind_psw(struct kvm_vcpu *vcpu, int ilen) 307 { 308 struct kvm_s390_sie_block *sie_block = vcpu->arch.sie_block; 309 310 sie_block->gpsw.addr = __rewind_psw(sie_block->gpsw, ilen); 311 } 312 static inline void kvm_s390_forward_psw(struct kvm_vcpu *vcpu, int ilen) 313 { 314 kvm_s390_rewind_psw(vcpu, -ilen); 315 } 316 static inline void kvm_s390_retry_instr(struct kvm_vcpu *vcpu) 317 { 318 /* don't inject PER events if we re-execute the instruction */ 319 vcpu->arch.sie_block->icptstatus &= ~0x02; 320 kvm_s390_rewind_psw(vcpu, kvm_s390_get_ilen(vcpu)); 321 } 322 323 int handle_sthyi(struct kvm_vcpu *vcpu); 324 325 /* implemented in priv.c */ 326 int is_valid_psw(psw_t *psw); 327 int kvm_s390_handle_aa(struct kvm_vcpu *vcpu); 328 int kvm_s390_handle_b2(struct kvm_vcpu *vcpu); 329 int kvm_s390_handle_e3(struct kvm_vcpu *vcpu); 330 int kvm_s390_handle_e5(struct kvm_vcpu *vcpu); 331 int kvm_s390_handle_01(struct kvm_vcpu *vcpu); 332 int kvm_s390_handle_b9(struct kvm_vcpu *vcpu); 333 int kvm_s390_handle_lpsw(struct kvm_vcpu *vcpu); 334 int kvm_s390_handle_stctl(struct kvm_vcpu *vcpu); 335 int kvm_s390_handle_lctl(struct kvm_vcpu *vcpu); 336 int kvm_s390_handle_eb(struct kvm_vcpu *vcpu); 337 int kvm_s390_skey_check_enable(struct kvm_vcpu *vcpu); 338 339 /* implemented in vsie.c */ 340 int kvm_s390_handle_vsie(struct kvm_vcpu *vcpu); 341 void kvm_s390_vsie_kick(struct kvm_vcpu *vcpu); 342 void kvm_s390_vsie_gmap_notifier(struct gmap *gmap, unsigned long start, 343 unsigned long end); 344 void kvm_s390_vsie_init(struct kvm *kvm); 345 void kvm_s390_vsie_destroy(struct kvm *kvm); 346 347 /* implemented in sigp.c */ 348 int kvm_s390_handle_sigp(struct kvm_vcpu *vcpu); 349 int kvm_s390_handle_sigp_pei(struct kvm_vcpu *vcpu); 350 351 /* implemented in kvm-s390.c */ 352 void kvm_s390_set_tod_clock(struct kvm *kvm, 353 const struct kvm_s390_vm_tod_clock *gtod); 354 long kvm_arch_fault_in_page(struct kvm_vcpu *vcpu, gpa_t gpa, int writable); 355 int kvm_s390_store_status_unloaded(struct kvm_vcpu *vcpu, unsigned long addr); 356 int kvm_s390_vcpu_store_status(struct kvm_vcpu *vcpu, unsigned long addr); 357 int kvm_s390_vcpu_start(struct kvm_vcpu *vcpu); 358 int kvm_s390_vcpu_stop(struct kvm_vcpu *vcpu); 359 void kvm_s390_vcpu_block(struct kvm_vcpu *vcpu); 360 void kvm_s390_vcpu_unblock(struct kvm_vcpu *vcpu); 361 bool kvm_s390_vcpu_sie_inhibited(struct kvm_vcpu *vcpu); 362 void exit_sie(struct kvm_vcpu *vcpu); 363 void kvm_s390_sync_request(int req, struct kvm_vcpu *vcpu); 364 int kvm_s390_vcpu_setup_cmma(struct kvm_vcpu *vcpu); 365 void kvm_s390_vcpu_unsetup_cmma(struct kvm_vcpu *vcpu); 366 void kvm_s390_set_cpu_timer(struct kvm_vcpu *vcpu, __u64 cputm); 367 __u64 kvm_s390_get_cpu_timer(struct kvm_vcpu *vcpu); 368 369 /* implemented in diag.c */ 370 int kvm_s390_handle_diag(struct kvm_vcpu *vcpu); 371 372 static inline void kvm_s390_vcpu_block_all(struct kvm *kvm) 373 { 374 unsigned long i; 375 struct kvm_vcpu *vcpu; 376 377 WARN_ON(!mutex_is_locked(&kvm->lock)); 378 kvm_for_each_vcpu(i, vcpu, kvm) 379 kvm_s390_vcpu_block(vcpu); 380 } 381 382 static inline void kvm_s390_vcpu_unblock_all(struct kvm *kvm) 383 { 384 unsigned long i; 385 struct kvm_vcpu *vcpu; 386 387 kvm_for_each_vcpu(i, vcpu, kvm) 388 kvm_s390_vcpu_unblock(vcpu); 389 } 390 391 static inline u64 kvm_s390_get_tod_clock_fast(struct kvm *kvm) 392 { 393 u64 rc; 394 395 preempt_disable(); 396 rc = get_tod_clock_fast() + kvm->arch.epoch; 397 preempt_enable(); 398 return rc; 399 } 400 401 /** 402 * kvm_s390_inject_prog_cond - conditionally inject a program check 403 * @vcpu: virtual cpu 404 * @rc: original return/error code 405 * 406 * This function is supposed to be used after regular guest access functions 407 * failed, to conditionally inject a program check to a vcpu. The typical 408 * pattern would look like 409 * 410 * rc = write_guest(vcpu, addr, data, len); 411 * if (rc) 412 * return kvm_s390_inject_prog_cond(vcpu, rc); 413 * 414 * A negative return code from guest access functions implies an internal error 415 * like e.g. out of memory. In these cases no program check should be injected 416 * to the guest. 417 * A positive value implies that an exception happened while accessing a guest's 418 * memory. In this case all data belonging to the corresponding program check 419 * has been stored in vcpu->arch.pgm and can be injected with 420 * kvm_s390_inject_prog_irq(). 421 * 422 * Returns: - the original @rc value if @rc was negative (internal error) 423 * - zero if @rc was already zero 424 * - zero or error code from injecting if @rc was positive 425 * (program check injected to @vcpu) 426 */ 427 static inline int kvm_s390_inject_prog_cond(struct kvm_vcpu *vcpu, int rc) 428 { 429 if (rc <= 0) 430 return rc; 431 return kvm_s390_inject_prog_irq(vcpu, &vcpu->arch.pgm); 432 } 433 434 int s390int_to_s390irq(struct kvm_s390_interrupt *s390int, 435 struct kvm_s390_irq *s390irq); 436 437 /* implemented in interrupt.c */ 438 int kvm_s390_vcpu_has_irq(struct kvm_vcpu *vcpu, int exclude_stop); 439 int psw_extint_disabled(struct kvm_vcpu *vcpu); 440 void kvm_s390_destroy_adapters(struct kvm *kvm); 441 int kvm_s390_ext_call_pending(struct kvm_vcpu *vcpu); 442 extern struct kvm_device_ops kvm_flic_ops; 443 int kvm_s390_is_stop_irq_pending(struct kvm_vcpu *vcpu); 444 int kvm_s390_is_restart_irq_pending(struct kvm_vcpu *vcpu); 445 void kvm_s390_clear_stop_irq(struct kvm_vcpu *vcpu); 446 int kvm_s390_set_irq_state(struct kvm_vcpu *vcpu, 447 void __user *buf, int len); 448 int kvm_s390_get_irq_state(struct kvm_vcpu *vcpu, 449 __u8 __user *buf, int len); 450 void kvm_s390_gisa_init(struct kvm *kvm); 451 void kvm_s390_gisa_clear(struct kvm *kvm); 452 void kvm_s390_gisa_destroy(struct kvm *kvm); 453 int kvm_s390_gib_init(u8 nisc); 454 void kvm_s390_gib_destroy(void); 455 456 /* implemented in guestdbg.c */ 457 void kvm_s390_backup_guest_per_regs(struct kvm_vcpu *vcpu); 458 void kvm_s390_restore_guest_per_regs(struct kvm_vcpu *vcpu); 459 void kvm_s390_patch_guest_per_regs(struct kvm_vcpu *vcpu); 460 int kvm_s390_import_bp_data(struct kvm_vcpu *vcpu, 461 struct kvm_guest_debug *dbg); 462 void kvm_s390_clear_bp_data(struct kvm_vcpu *vcpu); 463 void kvm_s390_prepare_debug_exit(struct kvm_vcpu *vcpu); 464 int kvm_s390_handle_per_ifetch_icpt(struct kvm_vcpu *vcpu); 465 int kvm_s390_handle_per_event(struct kvm_vcpu *vcpu); 466 467 /* support for Basic/Extended SCA handling */ 468 static inline union ipte_control *kvm_s390_get_ipte_control(struct kvm *kvm) 469 { 470 struct bsca_block *sca = kvm->arch.sca; /* SCA version doesn't matter */ 471 472 return &sca->ipte_control; 473 } 474 static inline int kvm_s390_use_sca_entries(void) 475 { 476 /* 477 * Without SIGP interpretation, only SRS interpretation (if available) 478 * might use the entries. By not setting the entries and keeping them 479 * invalid, hardware will not access them but intercept. 480 */ 481 return sclp.has_sigpif; 482 } 483 void kvm_s390_reinject_machine_check(struct kvm_vcpu *vcpu, 484 struct mcck_volatile_info *mcck_info); 485 486 /** 487 * kvm_s390_vcpu_crypto_reset_all 488 * 489 * Reset the crypto attributes for each vcpu. This can be done while the vcpus 490 * are running as each vcpu will be removed from SIE before resetting the crypt 491 * attributes and restored to SIE afterward. 492 * 493 * Note: The kvm->lock must be held while calling this function 494 * 495 * @kvm: the KVM guest 496 */ 497 void kvm_s390_vcpu_crypto_reset_all(struct kvm *kvm); 498 499 /** 500 * diag9c_forwarding_hz 501 * 502 * Set the maximum number of diag9c forwarding per second 503 */ 504 extern unsigned int diag9c_forwarding_hz; 505 506 #endif 507