blob: 4cb563c3a09da85eb6887fc9c7a50e531a61bb28 [file] [log] [blame]
/* SPDX-License-Identifier: GPL-2.0-only */
/*
* Storage key removal facility tests
*
* Copyright (c) 2019 IBM Corp
*
* Authors:
* Janosch Frank <frankja@linux.ibm.com>
*/
#include <libcflat.h>
#include <bitops.h>
#include <asm/asm-offsets.h>
#include <asm-generic/barrier.h>
#include <asm/interrupt.h>
#include <asm/page.h>
#include <asm/facility.h>
#include <asm/mem.h>
#include <asm/sigp.h>
#include <smp.h>
static uint8_t pagebuf[PAGE_SIZE * 2] __attribute__((aligned(PAGE_SIZE * 2)));
static int testflag = 0;
static void test_facilities(void)
{
report_prefix_push("facilities");
report(!test_facility(10), "!10");
report(!test_facility(14), "!14");
report(!test_facility(66), "!66");
report(!test_facility(145), "!145");
report(!test_facility(140), "!149");
report_prefix_pop();
}
static void test_skey(void)
{
report_prefix_push("sske");
expect_pgm_int();
set_storage_key(pagebuf, 0x30, 0);
check_pgm_int_code(PGM_INT_CODE_SPECIAL_OPERATION);
expect_pgm_int();
report_prefix_pop();
report_prefix_push("iske");
get_storage_key(pagebuf);
check_pgm_int_code(PGM_INT_CODE_SPECIAL_OPERATION);
report_prefix_pop();
}
static void test_pfmf(void)
{
union pfmf_r1 r1;
report_prefix_push("pfmf");
r1.val = 0;
r1.reg.sk = 1;
r1.reg.fsc = PFMF_FSC_4K;
r1.reg.key = 0x30;
expect_pgm_int();
pfmf(r1.val, pagebuf);
check_pgm_int_code(PGM_INT_CODE_SPECIAL_OPERATION);
report_prefix_pop();
}
static void test_psw_key(void)
{
report_prefix_push("psw key");
expect_pgm_int();
psw_mask_set_bits(PSW_MASK_KEY);
check_pgm_int_code(PGM_INT_CODE_SPECIAL_OPERATION);
report_prefix_pop();
}
static void test_mvcos(void)
{
uint64_t r3 = 64;
uint8_t *src = pagebuf;
uint8_t *dst = pagebuf + PAGE_SIZE;
/* K bit set, as well as keys */
register unsigned long oac asm("0") = 0xf002f002;
report_prefix_push("mvcos");
expect_pgm_int();
asm volatile("mvcos %[dst],%[src],%[len]"
: [dst] "+Q" (*(dst))
: [src] "Q" (*(src)), [len] "d" (r3), "d" (oac)
: "cc", "memory");
check_pgm_int_code(PGM_INT_CODE_SPECIAL_OPERATION);
report_prefix_pop();
}
static void test_spka(void)
{
report_prefix_push("spka");
expect_pgm_int();
asm volatile("spka 0xf0(0)\n");
check_pgm_int_code(PGM_INT_CODE_SPECIAL_OPERATION);
report_prefix_pop();
}
static void test_tprot(void)
{
report_prefix_push("tprot");
expect_pgm_int();
tprot((unsigned long)pagebuf, 0xf);
check_pgm_int_code(PGM_INT_CODE_SPECIAL_OPERATION);
report_prefix_pop();
}
static void wait_for_flag(void)
{
while (!testflag)
mb();
}
static void set_flag(int val)
{
mb();
testflag = val;
mb();
}
static void ecall_cleanup(struct stack_frame_int *stack)
{
lowcore.ext_new_psw.mask = PSW_MASK_64;
lowcore.sw_int_crs[0] = BIT_ULL(CTL0_AFP);
/*
* PGM old contains the ext new PSW, we need to clean it up,
* so we don't get a special operation exception on the lpswe
* of pgm old.
*/
lowcore.pgm_old_psw.mask = PSW_MASK_64;
check_pgm_int_code(PGM_INT_CODE_SPECIFICATION);
set_flag(1);
}
/* Set a key into the external new psw mask and open external call masks */
static void ecall_setup(void)
{
register_pgm_cleanup_func(ecall_cleanup);
expect_pgm_int();
/* Put a skey into the ext new psw */
lowcore.ext_new_psw.mask = PSW_MASK_KEY | PSW_MASK_64;
/* Open up ext masks */
ctl_set_bit(0, CTL0_EXTERNAL_CALL);
psw_mask_set_bits(PSW_MASK_EXT);
/* Tell cpu 0 that we're ready */
set_flag(1);
}
static void test_exception_ext_new(void)
{
struct psw psw = {
.mask = extract_psw_mask(),
.addr = (unsigned long)ecall_setup
};
report_prefix_push("exception external new");
if (smp_query_num_cpus() < 2) {
report_skip("Need second cpu for exception external new test.");
report_prefix_pop();
return;
}
smp_cpu_setup(1, psw);
wait_for_flag();
set_flag(0);
smp_sigp(1, SIGP_EXTERNAL_CALL, 0, NULL);
wait_for_flag();
smp_cpu_stop(1);
report_prefix_pop();
}
int main(void)
{
report_prefix_push("skrf");
if (!test_facility(169)) {
report_skip("storage key removal facility not available\n");
goto done;
}
test_facilities();
test_skey();
test_pfmf();
test_psw_key();
test_mvcos();
test_spka();
test_tprot();
test_exception_ext_new();
done:
report_prefix_pop();
return report_summary();
}