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 /* implemented in pv.c */ 221 int kvm_s390_pv_destroy_cpu(struct kvm_vcpu *vcpu, u16 *rc, u16 *rrc); 222 int kvm_s390_pv_create_cpu(struct kvm_vcpu *vcpu, u16 *rc, u16 *rrc); 223 int kvm_s390_pv_deinit_vm(struct kvm *kvm, u16 *rc, u16 *rrc); 224 int kvm_s390_pv_init_vm(struct kvm *kvm, u16 *rc, u16 *rrc); 225 int kvm_s390_pv_set_sec_parms(struct kvm *kvm, void *hdr, u64 length, u16 *rc, 226 u16 *rrc); 227 int kvm_s390_pv_unpack(struct kvm *kvm, unsigned long addr, unsigned long size, 228 unsigned long tweak, u16 *rc, u16 *rrc); 229 int kvm_s390_pv_set_cpu_state(struct kvm_vcpu *vcpu, u8 state); 230 231 static inline u64 kvm_s390_pv_get_handle(struct kvm *kvm) 232 { 233 return kvm->arch.pv.handle; 234 } 235 236 static inline u64 kvm_s390_pv_cpu_get_handle(struct kvm_vcpu *vcpu) 237 { 238 return vcpu->arch.pv.handle; 239 } 240 241 static inline bool kvm_s390_pv_is_protected(struct kvm *kvm) 242 { 243 lockdep_assert_held(&kvm->lock); 244 return !!kvm_s390_pv_get_handle(kvm); 245 } 246 247 static inline bool kvm_s390_pv_cpu_is_protected(struct kvm_vcpu *vcpu) 248 { 249 lockdep_assert_held(&vcpu->mutex); 250 return !!kvm_s390_pv_cpu_get_handle(vcpu); 251 } 252 253 /* implemented in interrupt.c */ 254 int kvm_s390_handle_wait(struct kvm_vcpu *vcpu); 255 void kvm_s390_vcpu_wakeup(struct kvm_vcpu *vcpu); 256 enum hrtimer_restart kvm_s390_idle_wakeup(struct hrtimer *timer); 257 int __must_check kvm_s390_deliver_pending_interrupts(struct kvm_vcpu *vcpu); 258 void kvm_s390_clear_local_irqs(struct kvm_vcpu *vcpu); 259 void kvm_s390_clear_float_irqs(struct kvm *kvm); 260 int __must_check kvm_s390_inject_vm(struct kvm *kvm, 261 struct kvm_s390_interrupt *s390int); 262 int __must_check kvm_s390_inject_vcpu(struct kvm_vcpu *vcpu, 263 struct kvm_s390_irq *irq); 264 static inline int kvm_s390_inject_prog_irq(struct kvm_vcpu *vcpu, 265 struct kvm_s390_pgm_info *pgm_info) 266 { 267 struct kvm_s390_irq irq = { 268 .type = KVM_S390_PROGRAM_INT, 269 .u.pgm = *pgm_info, 270 }; 271 272 return kvm_s390_inject_vcpu(vcpu, &irq); 273 } 274 static inline int kvm_s390_inject_program_int(struct kvm_vcpu *vcpu, u16 code) 275 { 276 struct kvm_s390_irq irq = { 277 .type = KVM_S390_PROGRAM_INT, 278 .u.pgm.code = code, 279 }; 280 281 return kvm_s390_inject_vcpu(vcpu, &irq); 282 } 283 struct kvm_s390_interrupt_info *kvm_s390_get_io_int(struct kvm *kvm, 284 u64 isc_mask, u32 schid); 285 int kvm_s390_reinject_io_int(struct kvm *kvm, 286 struct kvm_s390_interrupt_info *inti); 287 int kvm_s390_mask_adapter(struct kvm *kvm, unsigned int id, bool masked); 288 289 /* implemented in intercept.c */ 290 u8 kvm_s390_get_ilen(struct kvm_vcpu *vcpu); 291 int kvm_handle_sie_intercept(struct kvm_vcpu *vcpu); 292 static inline void kvm_s390_rewind_psw(struct kvm_vcpu *vcpu, int ilen) 293 { 294 struct kvm_s390_sie_block *sie_block = vcpu->arch.sie_block; 295 296 sie_block->gpsw.addr = __rewind_psw(sie_block->gpsw, ilen); 297 } 298 static inline void kvm_s390_forward_psw(struct kvm_vcpu *vcpu, int ilen) 299 { 300 kvm_s390_rewind_psw(vcpu, -ilen); 301 } 302 static inline void kvm_s390_retry_instr(struct kvm_vcpu *vcpu) 303 { 304 /* don't inject PER events if we re-execute the instruction */ 305 vcpu->arch.sie_block->icptstatus &= ~0x02; 306 kvm_s390_rewind_psw(vcpu, kvm_s390_get_ilen(vcpu)); 307 } 308 309 int handle_sthyi(struct kvm_vcpu *vcpu); 310 311 /* implemented in priv.c */ 312 int is_valid_psw(psw_t *psw); 313 int kvm_s390_handle_aa(struct kvm_vcpu *vcpu); 314 int kvm_s390_handle_b2(struct kvm_vcpu *vcpu); 315 int kvm_s390_handle_e3(struct kvm_vcpu *vcpu); 316 int kvm_s390_handle_e5(struct kvm_vcpu *vcpu); 317 int kvm_s390_handle_01(struct kvm_vcpu *vcpu); 318 int kvm_s390_handle_b9(struct kvm_vcpu *vcpu); 319 int kvm_s390_handle_lpsw(struct kvm_vcpu *vcpu); 320 int kvm_s390_handle_stctl(struct kvm_vcpu *vcpu); 321 int kvm_s390_handle_lctl(struct kvm_vcpu *vcpu); 322 int kvm_s390_handle_eb(struct kvm_vcpu *vcpu); 323 int kvm_s390_skey_check_enable(struct kvm_vcpu *vcpu); 324 325 /* implemented in vsie.c */ 326 int kvm_s390_handle_vsie(struct kvm_vcpu *vcpu); 327 void kvm_s390_vsie_kick(struct kvm_vcpu *vcpu); 328 void kvm_s390_vsie_gmap_notifier(struct gmap *gmap, unsigned long start, 329 unsigned long end); 330 void kvm_s390_vsie_init(struct kvm *kvm); 331 void kvm_s390_vsie_destroy(struct kvm *kvm); 332 333 /* implemented in sigp.c */ 334 int kvm_s390_handle_sigp(struct kvm_vcpu *vcpu); 335 int kvm_s390_handle_sigp_pei(struct kvm_vcpu *vcpu); 336 337 /* implemented in kvm-s390.c */ 338 void kvm_s390_set_tod_clock(struct kvm *kvm, 339 const struct kvm_s390_vm_tod_clock *gtod); 340 long kvm_arch_fault_in_page(struct kvm_vcpu *vcpu, gpa_t gpa, int writable); 341 int kvm_s390_store_status_unloaded(struct kvm_vcpu *vcpu, unsigned long addr); 342 int kvm_s390_vcpu_store_status(struct kvm_vcpu *vcpu, unsigned long addr); 343 int kvm_s390_vcpu_start(struct kvm_vcpu *vcpu); 344 int kvm_s390_vcpu_stop(struct kvm_vcpu *vcpu); 345 void kvm_s390_vcpu_block(struct kvm_vcpu *vcpu); 346 void kvm_s390_vcpu_unblock(struct kvm_vcpu *vcpu); 347 bool kvm_s390_vcpu_sie_inhibited(struct kvm_vcpu *vcpu); 348 void exit_sie(struct kvm_vcpu *vcpu); 349 void kvm_s390_sync_request(int req, struct kvm_vcpu *vcpu); 350 int kvm_s390_vcpu_setup_cmma(struct kvm_vcpu *vcpu); 351 void kvm_s390_vcpu_unsetup_cmma(struct kvm_vcpu *vcpu); 352 void kvm_s390_set_cpu_timer(struct kvm_vcpu *vcpu, __u64 cputm); 353 __u64 kvm_s390_get_cpu_timer(struct kvm_vcpu *vcpu); 354 355 /* implemented in diag.c */ 356 int kvm_s390_handle_diag(struct kvm_vcpu *vcpu); 357 358 static inline void kvm_s390_vcpu_block_all(struct kvm *kvm) 359 { 360 int i; 361 struct kvm_vcpu *vcpu; 362 363 WARN_ON(!mutex_is_locked(&kvm->lock)); 364 kvm_for_each_vcpu(i, vcpu, kvm) 365 kvm_s390_vcpu_block(vcpu); 366 } 367 368 static inline void kvm_s390_vcpu_unblock_all(struct kvm *kvm) 369 { 370 int i; 371 struct kvm_vcpu *vcpu; 372 373 kvm_for_each_vcpu(i, vcpu, kvm) 374 kvm_s390_vcpu_unblock(vcpu); 375 } 376 377 static inline u64 kvm_s390_get_tod_clock_fast(struct kvm *kvm) 378 { 379 u64 rc; 380 381 preempt_disable(); 382 rc = get_tod_clock_fast() + kvm->arch.epoch; 383 preempt_enable(); 384 return rc; 385 } 386 387 /** 388 * kvm_s390_inject_prog_cond - conditionally inject a program check 389 * @vcpu: virtual cpu 390 * @rc: original return/error code 391 * 392 * This function is supposed to be used after regular guest access functions 393 * failed, to conditionally inject a program check to a vcpu. The typical 394 * pattern would look like 395 * 396 * rc = write_guest(vcpu, addr, data, len); 397 * if (rc) 398 * return kvm_s390_inject_prog_cond(vcpu, rc); 399 * 400 * A negative return code from guest access functions implies an internal error 401 * like e.g. out of memory. In these cases no program check should be injected 402 * to the guest. 403 * A positive value implies that an exception happened while accessing a guest's 404 * memory. In this case all data belonging to the corresponding program check 405 * has been stored in vcpu->arch.pgm and can be injected with 406 * kvm_s390_inject_prog_irq(). 407 * 408 * Returns: - the original @rc value if @rc was negative (internal error) 409 * - zero if @rc was already zero 410 * - zero or error code from injecting if @rc was positive 411 * (program check injected to @vcpu) 412 */ 413 static inline int kvm_s390_inject_prog_cond(struct kvm_vcpu *vcpu, int rc) 414 { 415 if (rc <= 0) 416 return rc; 417 return kvm_s390_inject_prog_irq(vcpu, &vcpu->arch.pgm); 418 } 419 420 int s390int_to_s390irq(struct kvm_s390_interrupt *s390int, 421 struct kvm_s390_irq *s390irq); 422 423 /* implemented in interrupt.c */ 424 int kvm_s390_vcpu_has_irq(struct kvm_vcpu *vcpu, int exclude_stop); 425 int psw_extint_disabled(struct kvm_vcpu *vcpu); 426 void kvm_s390_destroy_adapters(struct kvm *kvm); 427 int kvm_s390_ext_call_pending(struct kvm_vcpu *vcpu); 428 extern struct kvm_device_ops kvm_flic_ops; 429 int kvm_s390_is_stop_irq_pending(struct kvm_vcpu *vcpu); 430 void kvm_s390_clear_stop_irq(struct kvm_vcpu *vcpu); 431 int kvm_s390_set_irq_state(struct kvm_vcpu *vcpu, 432 void __user *buf, int len); 433 int kvm_s390_get_irq_state(struct kvm_vcpu *vcpu, 434 __u8 __user *buf, int len); 435 void kvm_s390_gisa_init(struct kvm *kvm); 436 void kvm_s390_gisa_clear(struct kvm *kvm); 437 void kvm_s390_gisa_destroy(struct kvm *kvm); 438 int kvm_s390_gib_init(u8 nisc); 439 void kvm_s390_gib_destroy(void); 440 441 /* implemented in guestdbg.c */ 442 void kvm_s390_backup_guest_per_regs(struct kvm_vcpu *vcpu); 443 void kvm_s390_restore_guest_per_regs(struct kvm_vcpu *vcpu); 444 void kvm_s390_patch_guest_per_regs(struct kvm_vcpu *vcpu); 445 int kvm_s390_import_bp_data(struct kvm_vcpu *vcpu, 446 struct kvm_guest_debug *dbg); 447 void kvm_s390_clear_bp_data(struct kvm_vcpu *vcpu); 448 void kvm_s390_prepare_debug_exit(struct kvm_vcpu *vcpu); 449 int kvm_s390_handle_per_ifetch_icpt(struct kvm_vcpu *vcpu); 450 int kvm_s390_handle_per_event(struct kvm_vcpu *vcpu); 451 452 /* support for Basic/Extended SCA handling */ 453 static inline union ipte_control *kvm_s390_get_ipte_control(struct kvm *kvm) 454 { 455 struct bsca_block *sca = kvm->arch.sca; /* SCA version doesn't matter */ 456 457 return &sca->ipte_control; 458 } 459 static inline int kvm_s390_use_sca_entries(void) 460 { 461 /* 462 * Without SIGP interpretation, only SRS interpretation (if available) 463 * might use the entries. By not setting the entries and keeping them 464 * invalid, hardware will not access them but intercept. 465 */ 466 return sclp.has_sigpif; 467 } 468 void kvm_s390_reinject_machine_check(struct kvm_vcpu *vcpu, 469 struct mcck_volatile_info *mcck_info); 470 471 /** 472 * kvm_s390_vcpu_crypto_reset_all 473 * 474 * Reset the crypto attributes for each vcpu. This can be done while the vcpus 475 * are running as each vcpu will be removed from SIE before resetting the crypt 476 * attributes and restored to SIE afterward. 477 * 478 * Note: The kvm->lock must be held while calling this function 479 * 480 * @kvm: the KVM guest 481 */ 482 void kvm_s390_vcpu_crypto_reset_all(struct kvm *kvm); 483 484 /** 485 * diag9c_forwarding_hz 486 * 487 * Set the maximum number of diag9c forwarding per second 488 */ 489 extern unsigned int diag9c_forwarding_hz; 490 491 #endif 492