xref: /kvm-unit-tests/lib/s390x/asm/facility.h (revision 6c9f99df2fa51f58bd6a8b6775810b7f249bd0d7)
1*6c9f99dfSJanosch 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  */
828f482bdSDavid Hildenbrand #ifndef _ASM_S390X_FACILITY_H_
928f482bdSDavid Hildenbrand #define _ASM_S390X_FACILITY_H_
1028f482bdSDavid Hildenbrand 
1128f482bdSDavid Hildenbrand #include <libcflat.h>
1228f482bdSDavid Hildenbrand #include <asm/facility.h>
1328f482bdSDavid Hildenbrand #include <asm/arch_def.h>
1428f482bdSDavid Hildenbrand 
156abbd4f0SDavid Hildenbrand #define NB_STFL_DOUBLEWORDS 32
166abbd4f0SDavid Hildenbrand extern uint64_t stfl_doublewords[];
1728f482bdSDavid Hildenbrand 
1828f482bdSDavid Hildenbrand static inline bool test_facility(int nr)
1928f482bdSDavid Hildenbrand {
206abbd4f0SDavid Hildenbrand 	return stfl_doublewords[nr / 64] & (0x8000000000000000UL >> (nr % 64));
2128f482bdSDavid Hildenbrand }
2228f482bdSDavid Hildenbrand 
2328f482bdSDavid Hildenbrand static inline void stfl(void)
2428f482bdSDavid Hildenbrand {
2516c1768eSClaudio Imbrenda 	asm volatile("	stfl	0(0)\n" : : : "memory");
2628f482bdSDavid Hildenbrand }
2728f482bdSDavid Hildenbrand 
286abbd4f0SDavid Hildenbrand static inline void stfle(uint64_t *fac, unsigned int nb_doublewords)
2928f482bdSDavid Hildenbrand {
306abbd4f0SDavid Hildenbrand 	register unsigned long r0 asm("0") = nb_doublewords - 1;
3128f482bdSDavid Hildenbrand 
3228f482bdSDavid Hildenbrand 	asm volatile("	.insn	s,0xb2b00000,0(%1)\n"
3328f482bdSDavid Hildenbrand 		     : "+d" (r0) : "a" (fac) : "memory", "cc");
3428f482bdSDavid Hildenbrand }
3528f482bdSDavid Hildenbrand 
3628f482bdSDavid Hildenbrand static inline void setup_facilities(void)
3728f482bdSDavid Hildenbrand {
3828f482bdSDavid Hildenbrand 	struct lowcore *lc = NULL;
3928f482bdSDavid Hildenbrand 
4028f482bdSDavid Hildenbrand 	stfl();
416abbd4f0SDavid Hildenbrand 	memcpy(stfl_doublewords, &lc->stfl, sizeof(lc->stfl));
4228f482bdSDavid Hildenbrand 	if (test_facility(7))
436abbd4f0SDavid Hildenbrand 		stfle(stfl_doublewords, NB_STFL_DOUBLEWORDS);
4428f482bdSDavid Hildenbrand }
4528f482bdSDavid Hildenbrand 
4628f482bdSDavid Hildenbrand #endif
47