/* SPDX-License-Identifier: GPL-2.0-only */ /* * Tests mvpg SIE partial execution intercepts. * * Copyright 2021 IBM Corp. * * Authors: * Janosch Frank */ #include #include #include #include #include #include #include #include #include #include #include #include static struct vm vm; static uint8_t *src; static uint8_t *dst; static uint8_t *cmp; static void test_mvpg_pei(void) { uint64_t **pei_dst = (uint64_t **)((uintptr_t) vm.sblk + 0xc0); uint64_t **pei_src = (uint64_t **)((uintptr_t) vm.sblk + 0xc8); report_prefix_push("pei"); report_prefix_push("src"); memset(dst, 0, PAGE_SIZE); protect_page(src, PAGE_ENTRY_I); sie(&vm); report(vm.sblk->icptcode == ICPT_PARTEXEC, "Partial execution"); report((uintptr_t)**pei_src == (uintptr_t)src + PAGE_ENTRY_I, "PEI_SRC correct"); report((uintptr_t)**pei_dst == (uintptr_t)dst, "PEI_DST correct"); unprotect_page(src, PAGE_ENTRY_I); report(!memcmp(cmp, dst, PAGE_SIZE), "Destination intact"); /* * We need to execute the diag44 which is used as a blocker * behind the mvpg. It makes sure we fail the tests above if * the mvpg wouldn't have intercepted. */ sie(&vm); /* Make sure we intercepted for the diag44 and nothing else */ assert(vm.sblk->icptcode == ICPT_INST && vm.sblk->ipa == 0x8300 && vm.sblk->ipb == 0x440000); report_prefix_pop(); /* Clear PEI data for next check */ report_prefix_push("dst"); memset((uint64_t *)((uintptr_t) vm.sblk + 0xc0), 0, 16); memset(dst, 0, PAGE_SIZE); protect_page(dst, PAGE_ENTRY_I); sie(&vm); report(vm.sblk->icptcode == ICPT_PARTEXEC, "Partial execution"); report((uintptr_t)**pei_src == (uintptr_t)src, "PEI_SRC correct"); report((uintptr_t)**pei_dst == (uintptr_t)dst + PAGE_ENTRY_I, "PEI_DST correct"); /* Needed for the memcmp and general cleanup */ unprotect_page(dst, PAGE_ENTRY_I); report(!memcmp(cmp, dst, PAGE_SIZE), "Destination intact"); report_prefix_pop(); report_prefix_pop(); } static void test_mvpg(void) { memset(src, 0x42, PAGE_SIZE); memset(dst, 0x43, PAGE_SIZE); sie(&vm); report(!memcmp(src, dst, PAGE_SIZE) && *dst == 0x42, "Page moved"); } static void setup_guest(void) { extern const char SNIPPET_NAME_START(c, mvpg_snippet)[]; extern const char SNIPPET_NAME_END(c, mvpg_snippet)[]; setup_vm(); snippet_setup_guest(&vm, false); snippet_init(&vm, SNIPPET_NAME_START(c, mvpg_snippet), SNIPPET_LEN(c, mvpg_snippet), SNIPPET_OFF_C); /* Enable MVPG interpretation as we want to test KVM and not ourselves */ vm.sblk->eca = ECA_MVPGI; src = (uint8_t *) vm.sblk->mso + PAGE_SIZE * 6; dst = (uint8_t *) vm.sblk->mso + PAGE_SIZE * 5; cmp = alloc_page(); memset(cmp, 0, PAGE_SIZE); } int main(void) { report_prefix_push("mvpg-sie"); if (!sclp_facilities.has_sief2) { report_skip("SIEF2 facility unavailable"); goto done; } setup_guest(); test_mvpg(); test_mvpg_pei(); sie_guest_destroy(&vm); done: report_prefix_pop(); return report_summary(); }