xref: /kvm-unit-tests/s390x/uv-host.c (revision b9ff8da5b8057f98ad45d4b77c6bea4bd33e5edc) 
128ccfb1eSJanosch Frank /* SPDX-License-Identifier: GPL-2.0-only */
228ccfb1eSJanosch Frank /*
328ccfb1eSJanosch Frank  * Guest Ultravisor Call tests
428ccfb1eSJanosch Frank  *
528ccfb1eSJanosch Frank  * Copyright (c) 2021 IBM Corp
628ccfb1eSJanosch Frank  *
728ccfb1eSJanosch Frank  * Authors:
828ccfb1eSJanosch Frank  *  Janosch Frank <frankja@linux.ibm.com>
928ccfb1eSJanosch Frank  */
1028ccfb1eSJanosch Frank 
1128ccfb1eSJanosch Frank #include <libcflat.h>
125bf29e09SClaudio Imbrenda #include <hardware.h>
1328ccfb1eSJanosch Frank #include <alloc.h>
1428ccfb1eSJanosch Frank #include <vmalloc.h>
1528ccfb1eSJanosch Frank #include <sclp.h>
1628ccfb1eSJanosch Frank #include <smp.h>
1728ccfb1eSJanosch Frank #include <uv.h>
1828ccfb1eSJanosch Frank #include <asm/page.h>
1928ccfb1eSJanosch Frank #include <asm/sigp.h>
2028ccfb1eSJanosch Frank #include <asm/pgtable.h>
2128ccfb1eSJanosch Frank #include <asm/asm-offsets.h>
2228ccfb1eSJanosch Frank #include <asm/interrupt.h>
2328ccfb1eSJanosch Frank #include <asm/facility.h>
2428ccfb1eSJanosch Frank #include <asm/uv.h>
2528ccfb1eSJanosch Frank #include <asm-generic/barrier.h>
2628ccfb1eSJanosch Frank 
2728ccfb1eSJanosch Frank static struct uv_cb_qui uvcb_qui;
2828ccfb1eSJanosch Frank static struct uv_cb_init uvcb_init;
2928ccfb1eSJanosch Frank static struct uv_cb_cgc uvcb_cgc;
3028ccfb1eSJanosch Frank static struct uv_cb_csc uvcb_csc;
3128ccfb1eSJanosch Frank 
3228ccfb1eSJanosch Frank extern int diag308_load_reset(u64 code);
3328ccfb1eSJanosch Frank 
3428ccfb1eSJanosch Frank struct cmd_list{
3528ccfb1eSJanosch Frank 	const char *name;
3628ccfb1eSJanosch Frank 	uint16_t cmd;
3728ccfb1eSJanosch Frank 	uint16_t len;
3828ccfb1eSJanosch Frank 	int call_bit;
3928ccfb1eSJanosch Frank };
4028ccfb1eSJanosch Frank 
4128ccfb1eSJanosch Frank static void cpu_loop(void)
4228ccfb1eSJanosch Frank {
4328ccfb1eSJanosch Frank 	for (;;) {}
4428ccfb1eSJanosch Frank }
4528ccfb1eSJanosch Frank 
46*b9ff8da5SJanosch Frank /*
47*b9ff8da5SJanosch Frank  * Checks if a memory area is protected as secure memory.
48*b9ff8da5SJanosch Frank  * Will return true if all pages are protected, false otherwise.
49*b9ff8da5SJanosch Frank  */
50*b9ff8da5SJanosch Frank static bool access_check_3d(uint8_t *access_ptr, uint64_t len)
51*b9ff8da5SJanosch Frank {
52*b9ff8da5SJanosch Frank 	assert(!(len & ~PAGE_MASK));
53*b9ff8da5SJanosch Frank 	assert(!((uint64_t)access_ptr & ~PAGE_MASK));
54*b9ff8da5SJanosch Frank 
55*b9ff8da5SJanosch Frank 	while (len) {
56*b9ff8da5SJanosch Frank 		expect_pgm_int();
57*b9ff8da5SJanosch Frank 		READ_ONCE(*access_ptr);
58*b9ff8da5SJanosch Frank 		if (clear_pgm_int() != PGM_INT_CODE_SECURE_STOR_ACCESS)
59*b9ff8da5SJanosch Frank 			return false;
60*b9ff8da5SJanosch Frank 		expect_pgm_int();
61*b9ff8da5SJanosch Frank 		WRITE_ONCE(*access_ptr, 42);
62*b9ff8da5SJanosch Frank 		if (clear_pgm_int() != PGM_INT_CODE_SECURE_STOR_ACCESS)
63*b9ff8da5SJanosch Frank 			return false;
64*b9ff8da5SJanosch Frank 
65*b9ff8da5SJanosch Frank 		access_ptr += PAGE_SIZE;
66*b9ff8da5SJanosch Frank 		len -= PAGE_SIZE;
67*b9ff8da5SJanosch Frank 	}
68*b9ff8da5SJanosch Frank 
69*b9ff8da5SJanosch Frank 	return true;
70*b9ff8da5SJanosch Frank }
71*b9ff8da5SJanosch Frank 
7228ccfb1eSJanosch Frank static struct cmd_list cmds[] = {
7328ccfb1eSJanosch Frank 	{ "init", UVC_CMD_INIT_UV, sizeof(struct uv_cb_init), BIT_UVC_CMD_INIT_UV },
7428ccfb1eSJanosch Frank 	{ "create conf", UVC_CMD_CREATE_SEC_CONF, sizeof(struct uv_cb_cgc), BIT_UVC_CMD_CREATE_SEC_CONF },
7528ccfb1eSJanosch Frank 	{ "destroy conf", UVC_CMD_DESTROY_SEC_CONF, sizeof(struct uv_cb_nodata), BIT_UVC_CMD_DESTROY_SEC_CONF },
7628ccfb1eSJanosch Frank 	{ "create cpu", UVC_CMD_CREATE_SEC_CPU, sizeof(struct uv_cb_csc), BIT_UVC_CMD_CREATE_SEC_CPU },
7728ccfb1eSJanosch Frank 	{ "destroy cpu", UVC_CMD_DESTROY_SEC_CPU, sizeof(struct uv_cb_nodata), BIT_UVC_CMD_DESTROY_SEC_CPU },
7828ccfb1eSJanosch Frank 	{ "conv to", UVC_CMD_CONV_TO_SEC_STOR, sizeof(struct uv_cb_cts), BIT_UVC_CMD_CONV_TO_SEC_STOR },
7928ccfb1eSJanosch Frank 	{ "conv from", UVC_CMD_CONV_FROM_SEC_STOR, sizeof(struct uv_cb_cfs), BIT_UVC_CMD_CONV_FROM_SEC_STOR },
8028ccfb1eSJanosch Frank 	{ "set sec conf", UVC_CMD_SET_SEC_CONF_PARAMS, sizeof(struct uv_cb_ssc), BIT_UVC_CMD_SET_SEC_PARMS },
8128ccfb1eSJanosch Frank 	{ "unpack", UVC_CMD_UNPACK_IMG, sizeof(struct uv_cb_unp), BIT_UVC_CMD_UNPACK_IMG },
8228ccfb1eSJanosch Frank 	{ "verify", UVC_CMD_VERIFY_IMG, sizeof(struct uv_cb_nodata), BIT_UVC_CMD_VERIFY_IMG },
8328ccfb1eSJanosch Frank 	{ "cpu reset", UVC_CMD_CPU_RESET, sizeof(struct uv_cb_nodata), BIT_UVC_CMD_CPU_RESET },
8428ccfb1eSJanosch Frank 	{ "cpu initial reset", UVC_CMD_CPU_RESET_INITIAL, sizeof(struct uv_cb_nodata), BIT_UVC_CMD_CPU_RESET_INITIAL },
855630c446SJanosch Frank 	{ "conf clear reset", UVC_CMD_PREPARE_RESET, sizeof(struct uv_cb_nodata), BIT_UVC_CMD_PREPARE_RESET },
8628ccfb1eSJanosch Frank 	{ "cpu clear reset", UVC_CMD_CPU_RESET_CLEAR, sizeof(struct uv_cb_nodata), BIT_UVC_CMD_CPU_PERFORM_CLEAR_RESET },
8728ccfb1eSJanosch Frank 	{ "cpu set state", UVC_CMD_CPU_SET_STATE, sizeof(struct uv_cb_cpu_set_state), BIT_UVC_CMD_CPU_SET_STATE },
8828ccfb1eSJanosch Frank 	{ "pin shared", UVC_CMD_PIN_PAGE_SHARED, sizeof(struct uv_cb_cfs), BIT_UVC_CMD_PIN_PAGE_SHARED },
8928ccfb1eSJanosch Frank 	{ "unpin shared", UVC_CMD_UNPIN_PAGE_SHARED, sizeof(struct uv_cb_cts), BIT_UVC_CMD_UNPIN_PAGE_SHARED },
9028ccfb1eSJanosch Frank 	{ NULL, 0, 0 },
9128ccfb1eSJanosch Frank };
9228ccfb1eSJanosch Frank 
9328ccfb1eSJanosch Frank static void test_priv(void)
9428ccfb1eSJanosch Frank {
9528ccfb1eSJanosch Frank 	struct uv_cb_header uvcb = {};
9628ccfb1eSJanosch Frank 	uint16_t pgm;
9728ccfb1eSJanosch Frank 	int i;
9828ccfb1eSJanosch Frank 
9928ccfb1eSJanosch Frank 	report_prefix_push("privileged");
10028ccfb1eSJanosch Frank 	for (i = 0; cmds[i].name; i++) {
10128ccfb1eSJanosch Frank 		expect_pgm_int();
10228ccfb1eSJanosch Frank 		uvcb.cmd = cmds[i].cmd;
10328ccfb1eSJanosch Frank 		uvcb.len = cmds[i].len;
10428ccfb1eSJanosch Frank 		enter_pstate();
105bf0e1689SJanosch Frank 		uv_call_once(0, (uint64_t)&uvcb);
10628ccfb1eSJanosch Frank 		pgm = clear_pgm_int();
10728ccfb1eSJanosch Frank 		report(pgm == PGM_INT_CODE_PRIVILEGED_OPERATION, "%s", cmds[i].name);
10828ccfb1eSJanosch Frank 	}
10928ccfb1eSJanosch Frank 	report_prefix_pop();
11028ccfb1eSJanosch Frank }
11128ccfb1eSJanosch Frank 
11228ccfb1eSJanosch Frank static void test_config_destroy(void)
11328ccfb1eSJanosch Frank {
11428ccfb1eSJanosch Frank 	int rc;
11528ccfb1eSJanosch Frank 	struct uv_cb_nodata uvcb = {
11628ccfb1eSJanosch Frank 		.header.cmd = UVC_CMD_DESTROY_SEC_CONF,
11728ccfb1eSJanosch Frank 		.header.len = sizeof(uvcb),
11828ccfb1eSJanosch Frank 		.handle = uvcb_cgc.guest_handle,
11928ccfb1eSJanosch Frank 	};
12028ccfb1eSJanosch Frank 
12128ccfb1eSJanosch Frank 	report_prefix_push("dsc");
12228ccfb1eSJanosch Frank 	uvcb.header.len -= 8;
12328ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb);
12428ccfb1eSJanosch Frank 	report(rc == 1 && uvcb.header.rc == UVC_RC_INV_LEN,
12528ccfb1eSJanosch Frank 	       "hdr invalid length");
12628ccfb1eSJanosch Frank 	uvcb.header.len += 8;
12728ccfb1eSJanosch Frank 
12828ccfb1eSJanosch Frank 	uvcb.handle += 1;
12928ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb);
13028ccfb1eSJanosch Frank 	report(rc == 1 && uvcb.header.rc == UVC_RC_INV_GHANDLE, "invalid handle");
13128ccfb1eSJanosch Frank 	uvcb.handle -= 1;
13228ccfb1eSJanosch Frank 
13328ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb);
13428ccfb1eSJanosch Frank 	report(rc == 0 && uvcb.header.rc == UVC_RC_EXECUTED, "success");
13528ccfb1eSJanosch Frank 	report_prefix_pop();
13628ccfb1eSJanosch Frank }
13728ccfb1eSJanosch Frank 
13828ccfb1eSJanosch Frank static void test_cpu_destroy(void)
13928ccfb1eSJanosch Frank {
14028ccfb1eSJanosch Frank 	int rc;
14128ccfb1eSJanosch Frank 	struct uv_cb_nodata uvcb = {
14228ccfb1eSJanosch Frank 		.header.len = sizeof(uvcb),
14328ccfb1eSJanosch Frank 		.header.cmd = UVC_CMD_DESTROY_SEC_CPU,
14428ccfb1eSJanosch Frank 		.handle = uvcb_csc.cpu_handle,
14528ccfb1eSJanosch Frank 	};
14628ccfb1eSJanosch Frank 
14728ccfb1eSJanosch Frank 	report_prefix_push("dcpu");
14828ccfb1eSJanosch Frank 
14928ccfb1eSJanosch Frank 	uvcb.header.len -= 8;
15028ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb);
15128ccfb1eSJanosch Frank 	report(rc == 1 && uvcb.header.rc == UVC_RC_INV_LEN,
15228ccfb1eSJanosch Frank 	       "hdr invalid length");
15328ccfb1eSJanosch Frank 	uvcb.header.len += 8;
15428ccfb1eSJanosch Frank 
1555bf29e09SClaudio Imbrenda 	if (!machine_is_z15()) {
15628ccfb1eSJanosch Frank 		uvcb.handle += 1;
15728ccfb1eSJanosch Frank 		rc = uv_call(0, (uint64_t)&uvcb);
15828ccfb1eSJanosch Frank 		report(rc == 1 && uvcb.header.rc == UVC_RC_INV_CHANDLE, "invalid handle");
15928ccfb1eSJanosch Frank 		uvcb.handle -= 1;
160c73cc92dSJanosch Frank 	}
16128ccfb1eSJanosch Frank 
16228ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb);
16328ccfb1eSJanosch Frank 	report(rc == 0 && uvcb.header.rc == UVC_RC_EXECUTED, "success");
16428ccfb1eSJanosch Frank 
16528ccfb1eSJanosch Frank 	report_prefix_pop();
16628ccfb1eSJanosch Frank }
16728ccfb1eSJanosch Frank 
16828ccfb1eSJanosch Frank static void test_cpu_create(void)
16928ccfb1eSJanosch Frank {
17028ccfb1eSJanosch Frank 	int rc;
17128ccfb1eSJanosch Frank 	unsigned long tmp;
17228ccfb1eSJanosch Frank 
17328ccfb1eSJanosch Frank 	report_prefix_push("csc");
17428ccfb1eSJanosch Frank 	uvcb_csc.header.len = sizeof(uvcb_csc);
17528ccfb1eSJanosch Frank 	uvcb_csc.header.cmd = UVC_CMD_CREATE_SEC_CPU;
17628ccfb1eSJanosch Frank 	uvcb_csc.guest_handle = uvcb_cgc.guest_handle;
17728ccfb1eSJanosch Frank 	uvcb_csc.stor_origin = (unsigned long)memalign(PAGE_SIZE, uvcb_qui.cpu_stor_len);
17828ccfb1eSJanosch Frank 	uvcb_csc.state_origin = (unsigned long)memalign(PAGE_SIZE, PAGE_SIZE);
17928ccfb1eSJanosch Frank 
18028ccfb1eSJanosch Frank 	uvcb_csc.header.len -= 8;
18128ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_csc);
18228ccfb1eSJanosch Frank 	report(uvcb_csc.header.rc == UVC_RC_INV_LEN && rc == 1 &&
18328ccfb1eSJanosch Frank 	       !uvcb_csc.cpu_handle, "hdr invalid length");
18428ccfb1eSJanosch Frank 	uvcb_csc.header.len += 8;
18528ccfb1eSJanosch Frank 
18628ccfb1eSJanosch Frank 	uvcb_csc.guest_handle += 1;
18728ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_csc);
18828ccfb1eSJanosch Frank 	report(uvcb_csc.header.rc == UVC_RC_INV_GHANDLE && rc == 1,
18928ccfb1eSJanosch Frank 	       "invalid guest handle");
19028ccfb1eSJanosch Frank 	uvcb_csc.guest_handle -= 1;
19128ccfb1eSJanosch Frank 
19228ccfb1eSJanosch Frank 	uvcb_csc.num = uvcb_qui.max_guest_cpus + 1;
19328ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_csc);
19428ccfb1eSJanosch Frank 	report(uvcb_csc.header.rc == 0x103 && rc == 1,
19528ccfb1eSJanosch Frank 	       "invalid cpu #");
19628ccfb1eSJanosch Frank 	uvcb_csc.num = 0;
19728ccfb1eSJanosch Frank 
19828ccfb1eSJanosch Frank 	tmp = uvcb_csc.stor_origin;
19928ccfb1eSJanosch Frank 	uvcb_csc.stor_origin = get_max_ram_size() + PAGE_SIZE;
20028ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_csc);
20128ccfb1eSJanosch Frank 	report(uvcb_csc.header.rc == 0x105 && rc == 1,
20228ccfb1eSJanosch Frank 	       "cpu stor inaccessible");
20328ccfb1eSJanosch Frank 	uvcb_csc.stor_origin = tmp;
20428ccfb1eSJanosch Frank 
20528ccfb1eSJanosch Frank 	tmp = uvcb_csc.stor_origin;
20628ccfb1eSJanosch Frank 	uvcb_csc.stor_origin = 0;
20728ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_csc);
20828ccfb1eSJanosch Frank 	report(uvcb_csc.header.rc == 0x106 && rc == 1,
20928ccfb1eSJanosch Frank 	       "cpu stor in lowcore");
21028ccfb1eSJanosch Frank 	uvcb_csc.stor_origin = tmp;
21128ccfb1eSJanosch Frank 
21228ccfb1eSJanosch Frank 	tmp = uvcb_csc.state_origin;
21328ccfb1eSJanosch Frank 	uvcb_csc.state_origin = get_max_ram_size() + PAGE_SIZE;
21428ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_csc);
21528ccfb1eSJanosch Frank 	report(uvcb_csc.header.rc == 0x107 && rc == 1,
21628ccfb1eSJanosch Frank 	       "SIE SD inaccessible");
21728ccfb1eSJanosch Frank 	uvcb_csc.state_origin = tmp;
21828ccfb1eSJanosch Frank 
21928ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_csc);
22028ccfb1eSJanosch Frank 	report(rc == 0 && uvcb_csc.header.rc == UVC_RC_EXECUTED &&
22128ccfb1eSJanosch Frank 	       uvcb_csc.cpu_handle, "success");
22228ccfb1eSJanosch Frank 
223*b9ff8da5SJanosch Frank 	rc = access_check_3d((uint8_t *)uvcb_csc.stor_origin,
224*b9ff8da5SJanosch Frank 			     uvcb_qui.cpu_stor_len);
225*b9ff8da5SJanosch Frank 	report(rc, "Storage protection");
226*b9ff8da5SJanosch Frank 
22728ccfb1eSJanosch Frank 	tmp = uvcb_csc.stor_origin;
22828ccfb1eSJanosch Frank 	uvcb_csc.stor_origin = (unsigned long)memalign(PAGE_SIZE, uvcb_qui.cpu_stor_len);
22928ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_csc);
23028ccfb1eSJanosch Frank 	report(rc == 1 && uvcb_csc.header.rc == 0x104, "already defined");
23128ccfb1eSJanosch Frank 	uvcb_csc.stor_origin = tmp;
23228ccfb1eSJanosch Frank 	report_prefix_pop();
23328ccfb1eSJanosch Frank }
23428ccfb1eSJanosch Frank 
23528ccfb1eSJanosch Frank static void test_config_create(void)
23628ccfb1eSJanosch Frank {
23728ccfb1eSJanosch Frank 	int rc;
23828ccfb1eSJanosch Frank 	unsigned long vsize, tmp;
23928ccfb1eSJanosch Frank 	static struct uv_cb_cgc uvcb;
24028ccfb1eSJanosch Frank 
24128ccfb1eSJanosch Frank 	uvcb_cgc.header.cmd = UVC_CMD_CREATE_SEC_CONF;
24228ccfb1eSJanosch Frank 	uvcb_cgc.header.len = sizeof(uvcb_cgc);
24328ccfb1eSJanosch Frank 	report_prefix_push("cgc");
24428ccfb1eSJanosch Frank 
24528ccfb1eSJanosch Frank 	uvcb_cgc.guest_stor_origin = 0;
24628ccfb1eSJanosch Frank 	uvcb_cgc.guest_stor_len = 42 * (1UL << 20);
24728ccfb1eSJanosch Frank 	vsize = uvcb_qui.conf_base_virt_stor_len +
24828ccfb1eSJanosch Frank 		((uvcb_cgc.guest_stor_len / (1UL << 20)) * uvcb_qui.conf_virt_var_stor_len);
24928ccfb1eSJanosch Frank 
25028ccfb1eSJanosch Frank 	uvcb_cgc.conf_base_stor_origin = (uint64_t)memalign(PAGE_SIZE * 4, uvcb_qui.conf_base_phys_stor_len);
25128ccfb1eSJanosch Frank 	uvcb_cgc.conf_var_stor_origin = (uint64_t)memalign(PAGE_SIZE, vsize);
25228ccfb1eSJanosch Frank 	uvcb_cgc.guest_asce = (uint64_t)memalign(PAGE_SIZE, 4 * PAGE_SIZE) | ASCE_DT_SEGMENT | REGION_TABLE_LENGTH | ASCE_P;
25328ccfb1eSJanosch Frank 	uvcb_cgc.guest_sca = (uint64_t)memalign(PAGE_SIZE * 4, PAGE_SIZE * 4);
25428ccfb1eSJanosch Frank 
25528ccfb1eSJanosch Frank 	uvcb_cgc.header.len -= 8;
25628ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_cgc);
25728ccfb1eSJanosch Frank 	report(uvcb_cgc.header.rc == UVC_RC_INV_LEN && rc == 1 &&
25828ccfb1eSJanosch Frank 	       !uvcb_cgc.guest_handle, "hdr invalid length");
25928ccfb1eSJanosch Frank 	uvcb_cgc.header.len += 8;
26028ccfb1eSJanosch Frank 
26128ccfb1eSJanosch Frank 	uvcb_cgc.guest_stor_origin = uvcb_qui.max_guest_stor_addr + (1UL << 20) * 2 + 1;
26228ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_cgc);
26328ccfb1eSJanosch Frank 	report(uvcb_cgc.header.rc == 0x101 && rc == 1,
26428ccfb1eSJanosch Frank 	       "MSO > max guest addr");
26528ccfb1eSJanosch Frank 	uvcb_cgc.guest_stor_origin = 0;
26628ccfb1eSJanosch Frank 
26728ccfb1eSJanosch Frank 	uvcb_cgc.guest_stor_origin = uvcb_qui.max_guest_stor_addr - (1UL << 20);
26828ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_cgc);
26928ccfb1eSJanosch Frank 	report(uvcb_cgc.header.rc == 0x102 && rc == 1,
27028ccfb1eSJanosch Frank 	       "MSO + MSL > max guest addr");
27128ccfb1eSJanosch Frank 	uvcb_cgc.guest_stor_origin = 0;
27228ccfb1eSJanosch Frank 
27328ccfb1eSJanosch Frank 	uvcb_cgc.guest_asce &= ~ASCE_P;
27428ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_cgc);
27528ccfb1eSJanosch Frank 	report(uvcb_cgc.header.rc == 0x105 && rc == 1,
27628ccfb1eSJanosch Frank 	       "ASCE private bit missing");
27728ccfb1eSJanosch Frank 	uvcb_cgc.guest_asce |= ASCE_P;
27828ccfb1eSJanosch Frank 
27928ccfb1eSJanosch Frank 	uvcb_cgc.guest_asce |= 0x20;
28028ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_cgc);
28128ccfb1eSJanosch Frank 	report(uvcb_cgc.header.rc == 0x105 && rc == 1,
28228ccfb1eSJanosch Frank 	       "ASCE bit 58 set");
28328ccfb1eSJanosch Frank 	uvcb_cgc.guest_asce &= ~0x20;
28428ccfb1eSJanosch Frank 
28528ccfb1eSJanosch Frank 	tmp = uvcb_cgc.conf_base_stor_origin;
28628ccfb1eSJanosch Frank 	uvcb_cgc.conf_base_stor_origin = get_max_ram_size() + 8;
28728ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_cgc);
28828ccfb1eSJanosch Frank 	report(uvcb_cgc.header.rc == 0x108 && rc == 1,
28928ccfb1eSJanosch Frank 	       "base storage origin > available memory");
29028ccfb1eSJanosch Frank 	uvcb_cgc.conf_base_stor_origin = tmp;
29128ccfb1eSJanosch Frank 
29228ccfb1eSJanosch Frank 	tmp = uvcb_cgc.conf_base_stor_origin;
29328ccfb1eSJanosch Frank 	uvcb_cgc.conf_base_stor_origin = 0x1000;
29428ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_cgc);
29528ccfb1eSJanosch Frank 	report(uvcb_cgc.header.rc == 0x109 && rc == 1,
29628ccfb1eSJanosch Frank 	       "base storage origin contains lowcore");
29728ccfb1eSJanosch Frank 	uvcb_cgc.conf_base_stor_origin = tmp;
29828ccfb1eSJanosch Frank 
29928ccfb1eSJanosch Frank 	if (smp_query_num_cpus() == 1) {
30028ccfb1eSJanosch Frank 		sigp_retry(1, SIGP_SET_PREFIX,
30128ccfb1eSJanosch Frank 			   uvcb_cgc.conf_var_stor_origin + PAGE_SIZE, NULL);
30228ccfb1eSJanosch Frank 		rc = uv_call(0, (uint64_t)&uvcb_cgc);
30328ccfb1eSJanosch Frank 		report(uvcb_cgc.header.rc == 0x10e && rc == 1 &&
30428ccfb1eSJanosch Frank 		       !uvcb_cgc.guest_handle, "variable storage area contains lowcore");
30528ccfb1eSJanosch Frank 		sigp_retry(1, SIGP_SET_PREFIX, 0x0, NULL);
30628ccfb1eSJanosch Frank 	}
30728ccfb1eSJanosch Frank 
30828ccfb1eSJanosch Frank 	tmp = uvcb_cgc.guest_sca;
30928ccfb1eSJanosch Frank 	uvcb_cgc.guest_sca = 0;
31028ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_cgc);
31128ccfb1eSJanosch Frank 	report(uvcb_cgc.header.rc == 0x10c && rc == 1,
31228ccfb1eSJanosch Frank 	       "sca == 0");
31328ccfb1eSJanosch Frank 	uvcb_cgc.guest_sca = tmp;
31428ccfb1eSJanosch Frank 
31528ccfb1eSJanosch Frank 	tmp = uvcb_cgc.guest_sca;
31628ccfb1eSJanosch Frank 	uvcb_cgc.guest_sca = get_max_ram_size() + + PAGE_SIZE * 4;
31728ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_cgc);
31828ccfb1eSJanosch Frank 	report(uvcb_cgc.header.rc == 0x10d && rc == 1,
31928ccfb1eSJanosch Frank 	       "sca inaccessible");
32028ccfb1eSJanosch Frank 	uvcb_cgc.guest_sca = tmp;
32128ccfb1eSJanosch Frank 
32228ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_cgc);
32328ccfb1eSJanosch Frank 	report(rc == 0 && uvcb_cgc.header.rc == UVC_RC_EXECUTED, "successful");
32428ccfb1eSJanosch Frank 
325*b9ff8da5SJanosch Frank 	rc = access_check_3d((uint8_t *)uvcb_cgc.conf_base_stor_origin,
326*b9ff8da5SJanosch Frank 			     uvcb_qui.conf_base_phys_stor_len);
327*b9ff8da5SJanosch Frank 	report(rc, "Base storage protection");
328*b9ff8da5SJanosch Frank 
329*b9ff8da5SJanosch Frank 	rc = access_check_3d((uint8_t *)uvcb_cgc.conf_var_stor_origin, vsize);
330*b9ff8da5SJanosch Frank 	report(rc, "Variable storage protection");
331*b9ff8da5SJanosch Frank 
33228ccfb1eSJanosch Frank 	uvcb_cgc.header.rc = 0;
33328ccfb1eSJanosch Frank 	uvcb_cgc.header.rrc = 0;
33428ccfb1eSJanosch Frank 	tmp = uvcb_cgc.guest_handle;
33528ccfb1eSJanosch Frank 	uvcb_cgc.guest_handle = 0;
33628ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_cgc);
33728ccfb1eSJanosch Frank 	report(uvcb_cgc.header.rc >= 0x100 && rc == 1, "reuse uvcb");
33828ccfb1eSJanosch Frank 	uvcb_cgc.guest_handle = tmp;
33928ccfb1eSJanosch Frank 
34028ccfb1eSJanosch Frank 	/* Copy over most data from uvcb_cgc, so we have the ASCE that was used. */
34128ccfb1eSJanosch Frank 	memcpy(&uvcb, &uvcb_cgc, sizeof(uvcb));
34228ccfb1eSJanosch Frank 
34328ccfb1eSJanosch Frank 	/* Reset the header and handle */
34428ccfb1eSJanosch Frank 	uvcb.header.rc = 0;
34528ccfb1eSJanosch Frank 	uvcb.header.rrc = 0;
34628ccfb1eSJanosch Frank 	uvcb.guest_handle = 0;
34728ccfb1eSJanosch Frank 
34828ccfb1eSJanosch Frank 	/* Use new storage areas. */
34928ccfb1eSJanosch Frank 	uvcb.conf_base_stor_origin = (uint64_t)memalign(PAGE_SIZE * 4, uvcb_qui.conf_base_phys_stor_len);
35028ccfb1eSJanosch Frank 	uvcb.conf_var_stor_origin = (uint64_t)memalign(PAGE_SIZE, vsize);
35128ccfb1eSJanosch Frank 
35228ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb);
35328ccfb1eSJanosch Frank 	report(uvcb.header.rc >= 0x104 && rc == 1 && !uvcb.guest_handle,
35428ccfb1eSJanosch Frank 	       "reuse ASCE");
35528ccfb1eSJanosch Frank 	free((void *)uvcb.conf_base_stor_origin);
35628ccfb1eSJanosch Frank 	free((void *)uvcb.conf_var_stor_origin);
35728ccfb1eSJanosch Frank 
35828ccfb1eSJanosch Frank 	/* Missing: 106, 10a, a0b */
35928ccfb1eSJanosch Frank 	report_prefix_pop();
36028ccfb1eSJanosch Frank }
36128ccfb1eSJanosch Frank 
36228ccfb1eSJanosch Frank static void test_init(void)
36328ccfb1eSJanosch Frank {
36428ccfb1eSJanosch Frank 	int rc;
36528ccfb1eSJanosch Frank 	uint64_t mem;
36628ccfb1eSJanosch Frank 	struct psw psw;
36728ccfb1eSJanosch Frank 
36828ccfb1eSJanosch Frank 	/* Donated storage needs to be over 2GB */
36928ccfb1eSJanosch Frank 	mem = (uint64_t)memalign(1UL << 31, uvcb_qui.uv_base_stor_len);
37028ccfb1eSJanosch Frank 
37128ccfb1eSJanosch Frank 	uvcb_init.header.len = sizeof(uvcb_init);
37228ccfb1eSJanosch Frank 	uvcb_init.header.cmd = UVC_CMD_INIT_UV;
37328ccfb1eSJanosch Frank 	uvcb_init.stor_origin = mem;
37428ccfb1eSJanosch Frank 	uvcb_init.stor_len = uvcb_qui.uv_base_stor_len;
37528ccfb1eSJanosch Frank 
37628ccfb1eSJanosch Frank 	report_prefix_push("init");
37728ccfb1eSJanosch Frank 	uvcb_init.header.len -= 8;
37828ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_init);
37928ccfb1eSJanosch Frank 	report(rc == 1 && uvcb_init.header.rc == UVC_RC_INV_LEN,
38028ccfb1eSJanosch Frank 	       "hdr invalid length");
38128ccfb1eSJanosch Frank 	uvcb_init.header.len += 8;
38228ccfb1eSJanosch Frank 
38328ccfb1eSJanosch Frank 	uvcb_init.stor_len -= 8;
38428ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_init);
38528ccfb1eSJanosch Frank 	report(rc == 1 && uvcb_init.header.rc == 0x103,
38628ccfb1eSJanosch Frank 	       "storage invalid length");
38728ccfb1eSJanosch Frank 	uvcb_init.stor_len += 8;
38828ccfb1eSJanosch Frank 
38928ccfb1eSJanosch Frank 	uvcb_init.stor_origin =  get_max_ram_size() + 8;
39028ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_init);
39128ccfb1eSJanosch Frank 	report(rc == 1 && uvcb_init.header.rc == 0x104,
39228ccfb1eSJanosch Frank 	       "storage origin invalid");
39328ccfb1eSJanosch Frank 	uvcb_init.stor_origin = mem;
39428ccfb1eSJanosch Frank 
39528ccfb1eSJanosch Frank 	uvcb_init.stor_origin = get_max_ram_size() - 8;
39628ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_init);
39728ccfb1eSJanosch Frank 	report(rc == 1 && uvcb_init.header.rc == 0x105,
39828ccfb1eSJanosch Frank 	       "storage + length invalid");
39928ccfb1eSJanosch Frank 	uvcb_init.stor_origin = mem;
40028ccfb1eSJanosch Frank 
40128ccfb1eSJanosch Frank 	uvcb_init.stor_origin = 1UL << 30;
40228ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_init);
40328ccfb1eSJanosch Frank 	report(rc == 1 && uvcb_init.header.rc == 0x108,
40428ccfb1eSJanosch Frank 	       "storage below 2GB");
40528ccfb1eSJanosch Frank 	uvcb_init.stor_origin = mem;
40628ccfb1eSJanosch Frank 
40728ccfb1eSJanosch Frank 	psw.mask = extract_psw_mask();
40828ccfb1eSJanosch Frank 	psw.addr = (unsigned long)cpu_loop;
40928ccfb1eSJanosch Frank 	smp_cpu_setup(1, psw);
41028ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_init);
41128ccfb1eSJanosch Frank 	report(rc == 1 && uvcb_init.header.rc == 0x102,
41228ccfb1eSJanosch Frank 	       "too many running cpus");
41328ccfb1eSJanosch Frank 	smp_cpu_stop(1);
41428ccfb1eSJanosch Frank 
41528ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_init);
41628ccfb1eSJanosch Frank 	report(rc == 0 && uvcb_init.header.rc == UVC_RC_EXECUTED, "successful");
41728ccfb1eSJanosch Frank 
41828ccfb1eSJanosch Frank 	mem = (uint64_t)memalign(1UL << 31, uvcb_qui.uv_base_stor_len);
41928ccfb1eSJanosch Frank 	rc = uv_call(0, (uint64_t)&uvcb_init);
42028ccfb1eSJanosch Frank 	report(rc == 1 && uvcb_init.header.rc == 0x101, "double init");
42128ccfb1eSJanosch Frank 	free((void *)mem);
42228ccfb1eSJanosch Frank 
42328ccfb1eSJanosch Frank 	report_prefix_pop();
42428ccfb1eSJanosch Frank }
42528ccfb1eSJanosch Frank 
42628ccfb1eSJanosch Frank static void test_query(void)
42728ccfb1eSJanosch Frank {
428cde26b62SJanosch Frank 	int i = 0, cc;
42928ccfb1eSJanosch Frank 
43028ccfb1eSJanosch Frank 	uvcb_qui.header.cmd = UVC_CMD_QUI;
43128ccfb1eSJanosch Frank 	uvcb_qui.header.len = sizeof(uvcb_qui);
43228ccfb1eSJanosch Frank 
43328ccfb1eSJanosch Frank 	report_prefix_push("query");
43428ccfb1eSJanosch Frank 	uvcb_qui.header.len = 0xa0;
43528ccfb1eSJanosch Frank 	uv_call(0, (uint64_t)&uvcb_qui);
43628ccfb1eSJanosch Frank 	report(uvcb_qui.header.rc == UVC_RC_INV_LEN, "length");
43728ccfb1eSJanosch Frank 
43828ccfb1eSJanosch Frank 	uvcb_qui.header.len = 0xa8;
43928ccfb1eSJanosch Frank 	uv_call(0, (uint64_t)&uvcb_qui);
44028ccfb1eSJanosch Frank 	report(uvcb_qui.header.rc == 0x100, "insf length");
44128ccfb1eSJanosch Frank 
44228ccfb1eSJanosch Frank 	uvcb_qui.header.len = sizeof(uvcb_qui);
443cde26b62SJanosch Frank 	cc = uv_call(0, (uint64_t)&uvcb_qui);
444cde26b62SJanosch Frank 	report((!cc && uvcb_qui.header.rc == UVC_RC_EXECUTED) ||
445cde26b62SJanosch Frank 	       (cc == 1 && uvcb_qui.header.rc == 0x100),
446cde26b62SJanosch Frank 		"successful query");
44728ccfb1eSJanosch Frank 
44828ccfb1eSJanosch Frank 	for (i = 0; cmds[i].name; i++)
44928ccfb1eSJanosch Frank 		report(uv_query_test_call(cmds[i].call_bit), "%s", cmds[i].name);
45028ccfb1eSJanosch Frank 
45128ccfb1eSJanosch Frank 	report_prefix_pop();
45228ccfb1eSJanosch Frank }
45328ccfb1eSJanosch Frank 
45428ccfb1eSJanosch Frank static struct cmd_list invalid_cmds[] = {
45528ccfb1eSJanosch Frank 	{ "bogus", 0x4242, sizeof(struct uv_cb_header), -1},
45628ccfb1eSJanosch Frank 	{ "share", UVC_CMD_SET_SHARED_ACCESS, sizeof(struct uv_cb_share), BIT_UVC_CMD_SET_SHARED_ACCESS },
45728ccfb1eSJanosch Frank 	{ "unshare", UVC_CMD_REMOVE_SHARED_ACCESS, sizeof(struct uv_cb_share), BIT_UVC_CMD_REMOVE_SHARED_ACCESS },
4586a87e02cSSteffen Eiden 	{ "attest", UVC_CMD_ATTESTATION, sizeof(struct uv_cb_attest), BIT_UVC_CMD_ATTESTATION },
45928ccfb1eSJanosch Frank 	{ NULL, 0, 0 },
46028ccfb1eSJanosch Frank };
46128ccfb1eSJanosch Frank 
46228ccfb1eSJanosch Frank static void test_invalid(void)
46328ccfb1eSJanosch Frank {
46428ccfb1eSJanosch Frank 	struct uv_cb_header hdr = {};
46528ccfb1eSJanosch Frank 	int i, cc;
46628ccfb1eSJanosch Frank 
46728ccfb1eSJanosch Frank 	report_prefix_push("invalid");
46828ccfb1eSJanosch Frank 	for (i = 0; invalid_cmds[i].name; i++) {
46928ccfb1eSJanosch Frank 		hdr.cmd = invalid_cmds[i].cmd;
47028ccfb1eSJanosch Frank 		hdr.len = invalid_cmds[i].len;
47128ccfb1eSJanosch Frank 		cc = uv_call(0, (uint64_t)&hdr);
47228ccfb1eSJanosch Frank 		report(cc == 1 && hdr.rc == UVC_RC_INV_CMD &&
47328ccfb1eSJanosch Frank 		       (invalid_cmds[i].call_bit == -1 || !uv_query_test_call(invalid_cmds[i].call_bit)),
47428ccfb1eSJanosch Frank 		       "%s", invalid_cmds[i].name);
47528ccfb1eSJanosch Frank 	}
47628ccfb1eSJanosch Frank 	report_prefix_pop();
47728ccfb1eSJanosch Frank }
47828ccfb1eSJanosch Frank 
47928ccfb1eSJanosch Frank static void test_clear(void)
48028ccfb1eSJanosch Frank {
48128ccfb1eSJanosch Frank 	uint64_t *tmp = (void *)uvcb_init.stor_origin;
48228ccfb1eSJanosch Frank 
48328ccfb1eSJanosch Frank 	diag308_load_reset(1);
48428ccfb1eSJanosch Frank 	sclp_console_setup();
48528ccfb1eSJanosch Frank 	report(!*tmp, "memory cleared after reset 1");
48628ccfb1eSJanosch Frank }
48728ccfb1eSJanosch Frank 
48828ccfb1eSJanosch Frank static void setup_vmem(void)
48928ccfb1eSJanosch Frank {
490136d73e3SJanosch Frank 	uint64_t asce;
49128ccfb1eSJanosch Frank 
4920a5b31d2SSean Christopherson 	setup_mmu(get_max_ram_size(), NULL);
493136d73e3SJanosch Frank 	/*
494136d73e3SJanosch Frank 	 * setup_mmu() will enable DAT and set the primary address
495136d73e3SJanosch Frank 	 * space but we need to have a valid home space since UV calls
496136d73e3SJanosch Frank 	 * take home space virtual addresses.
497136d73e3SJanosch Frank 	 *
498136d73e3SJanosch Frank 	 * Hence we just copy the primary asce into the home space.
499136d73e3SJanosch Frank 	 */
50028ccfb1eSJanosch Frank 	asce = stctg(1);
50128ccfb1eSJanosch Frank 	lctlg(13, asce);
50228ccfb1eSJanosch Frank }
50328ccfb1eSJanosch Frank 
50428ccfb1eSJanosch Frank int main(void)
50528ccfb1eSJanosch Frank {
50628ccfb1eSJanosch Frank 	bool has_uvc = test_facility(158);
50728ccfb1eSJanosch Frank 
50828ccfb1eSJanosch Frank 	report_prefix_push("uvc");
50928ccfb1eSJanosch Frank 	if (!has_uvc) {
51028ccfb1eSJanosch Frank 		report_skip("Ultravisor call facility is not available");
51128ccfb1eSJanosch Frank 		goto done;
51228ccfb1eSJanosch Frank 	}
51328ccfb1eSJanosch Frank 
51428ccfb1eSJanosch Frank 	test_priv();
51528ccfb1eSJanosch Frank 	test_invalid();
51628ccfb1eSJanosch Frank 	test_query();
51728ccfb1eSJanosch Frank 	test_init();
51828ccfb1eSJanosch Frank 
51928ccfb1eSJanosch Frank 	setup_vmem();
52028ccfb1eSJanosch Frank 	test_config_create();
52128ccfb1eSJanosch Frank 	test_cpu_create();
52228ccfb1eSJanosch Frank 	test_cpu_destroy();
52328ccfb1eSJanosch Frank 	test_config_destroy();
52428ccfb1eSJanosch Frank 	test_clear();
52528ccfb1eSJanosch Frank 
52628ccfb1eSJanosch Frank done:
52728ccfb1eSJanosch Frank 	return report_summary();
52828ccfb1eSJanosch Frank }
529