xref: /kvm-unit-tests/lib/s390x/asm/facility.h (revision 7c4e732d2cb5d377161cecf2f41b612629f042c9)
16c9f99dfSJanosch Frank /* SPDX-License-Identifier: GPL-2.0-only */
228f482bdSDavid Hildenbrand /*
328f482bdSDavid Hildenbrand  * Copyright (c) 2017 Red Hat Inc
428f482bdSDavid Hildenbrand  *
528f482bdSDavid Hildenbrand  * Authors:
628f482bdSDavid Hildenbrand  *  David Hildenbrand <david@redhat.com>
728f482bdSDavid Hildenbrand  */
8eb5a1bbaSCornelia Huck #ifndef _ASMS390X_FACILITY_H_
9eb5a1bbaSCornelia Huck #define _ASMS390X_FACILITY_H_
1028f482bdSDavid Hildenbrand 
1128f482bdSDavid Hildenbrand #include <libcflat.h>
1228f482bdSDavid Hildenbrand #include <asm/facility.h>
1328f482bdSDavid Hildenbrand #include <asm/arch_def.h>
142989246eSJanosch Frank #include <bitops.h>
15*7c4e732dSJanis Schoetterl-Glausch #include <sclp.h>
1628f482bdSDavid Hildenbrand 
176abbd4f0SDavid Hildenbrand #define NB_STFL_DOUBLEWORDS 32
186abbd4f0SDavid Hildenbrand extern uint64_t stfl_doublewords[];
1928f482bdSDavid Hildenbrand 
2028f482bdSDavid Hildenbrand static inline bool test_facility(int nr)
2128f482bdSDavid Hildenbrand {
222989246eSJanosch Frank 	return test_bit_inv(nr, stfl_doublewords);
2328f482bdSDavid Hildenbrand }
2428f482bdSDavid Hildenbrand 
2528f482bdSDavid Hildenbrand static inline void stfl(void)
2628f482bdSDavid Hildenbrand {
2716c1768eSClaudio Imbrenda 	asm volatile("	stfl	0(0)\n" : : : "memory");
2828f482bdSDavid Hildenbrand }
2928f482bdSDavid Hildenbrand 
306abbd4f0SDavid Hildenbrand static inline void stfle(uint64_t *fac, unsigned int nb_doublewords)
3128f482bdSDavid Hildenbrand {
326abbd4f0SDavid Hildenbrand 	register unsigned long r0 asm("0") = nb_doublewords - 1;
3328f482bdSDavid Hildenbrand 
3428f482bdSDavid Hildenbrand 	asm volatile("	.insn	s,0xb2b00000,0(%1)\n"
3528f482bdSDavid Hildenbrand 		     : "+d" (r0) : "a" (fac) : "memory", "cc");
3628f482bdSDavid Hildenbrand }
3728f482bdSDavid Hildenbrand 
3828f482bdSDavid Hildenbrand static inline void setup_facilities(void)
3928f482bdSDavid Hildenbrand {
4028f482bdSDavid Hildenbrand 	stfl();
41cd719531SJanis Schoetterl-Glausch 	memcpy(stfl_doublewords, &lowcore.stfl, sizeof(lowcore.stfl));
4228f482bdSDavid Hildenbrand 	if (test_facility(7))
436abbd4f0SDavid Hildenbrand 		stfle(stfl_doublewords, NB_STFL_DOUBLEWORDS);
4428f482bdSDavid Hildenbrand }
4528f482bdSDavid Hildenbrand 
46*7c4e732dSJanis Schoetterl-Glausch enum supp_on_prot_facility {
47*7c4e732dSJanis Schoetterl-Glausch 	SOP_NONE,
48*7c4e732dSJanis Schoetterl-Glausch 	SOP_BASIC,
49*7c4e732dSJanis Schoetterl-Glausch 	SOP_ENHANCED_1,
50*7c4e732dSJanis Schoetterl-Glausch 	SOP_ENHANCED_2,
51*7c4e732dSJanis Schoetterl-Glausch };
52*7c4e732dSJanis Schoetterl-Glausch 
53*7c4e732dSJanis Schoetterl-Glausch static inline enum supp_on_prot_facility get_supp_on_prot_facility(void)
54*7c4e732dSJanis Schoetterl-Glausch {
55*7c4e732dSJanis Schoetterl-Glausch 	if (sclp_facilities.has_esop) {
56*7c4e732dSJanis Schoetterl-Glausch 		if (test_facility(131)) /* side-effect-access facility */
57*7c4e732dSJanis Schoetterl-Glausch 			return SOP_ENHANCED_2;
58*7c4e732dSJanis Schoetterl-Glausch 		else
59*7c4e732dSJanis Schoetterl-Glausch 			return SOP_ENHANCED_1;
60*7c4e732dSJanis Schoetterl-Glausch 	}
61*7c4e732dSJanis Schoetterl-Glausch 	if (sclp_facilities.has_sop)
62*7c4e732dSJanis Schoetterl-Glausch 		return SOP_BASIC;
63*7c4e732dSJanis Schoetterl-Glausch 	return SOP_NONE;
64*7c4e732dSJanis Schoetterl-Glausch }
65*7c4e732dSJanis Schoetterl-Glausch 
6628f482bdSDavid Hildenbrand #endif
67