xref: /openbmc/linux/arch/s390/tools/gen_facilities.c (revision 8ee90c5c)
1 /*
2  * Simple program to generate defines out of facility lists that use the bit
3  * numbering scheme from the Princples of Operations: most significant bit
4  * has bit number 0.
5  *
6  *    Copyright IBM Corp. 2015
7  *
8  */
9 
10 #include <strings.h>
11 #include <string.h>
12 #include <stdlib.h>
13 #include <stdio.h>
14 
15 struct facility_def {
16 	char *name;
17 	int *bits;
18 };
19 
20 static struct facility_def facility_defs[] = {
21 	{
22 		/*
23 		 * FACILITIES_ALS contains the list of facilities that are
24 		 * required to run a kernel that is compiled e.g. with
25 		 * -march=<machine>.
26 		 */
27 		.name = "FACILITIES_ALS",
28 		.bits = (int[]){
29 #ifdef CONFIG_HAVE_MARCH_Z900_FEATURES
30 			0,  /* N3 instructions */
31 			1,  /* z/Arch mode installed */
32 #endif
33 #ifdef CONFIG_HAVE_MARCH_Z990_FEATURES
34 			18, /* long displacement facility */
35 #endif
36 #ifdef CONFIG_HAVE_MARCH_Z9_109_FEATURES
37 			21, /* extended-immediate facility */
38 			25, /* store clock fast */
39 #endif
40 #ifdef CONFIG_HAVE_MARCH_Z10_FEATURES
41 			27, /* mvcos */
42 			32, /* compare and swap and store */
43 			33, /* compare and swap and store 2 */
44 			34, /* general instructions extension */
45 			35, /* execute extensions */
46 #endif
47 #ifdef CONFIG_HAVE_MARCH_Z196_FEATURES
48 			45, /* fast-BCR, etc. */
49 #endif
50 #ifdef CONFIG_HAVE_MARCH_ZEC12_FEATURES
51 			49, /* misc-instruction-extensions */
52 			52, /* interlocked facility 2 */
53 #endif
54 #ifdef CONFIG_HAVE_MARCH_Z13_FEATURES
55 			53, /* load-and-zero-rightmost-byte, etc. */
56 #endif
57 #ifdef CONFIG_HAVE_MARCH_Z14_FEATURES
58 			58, /* miscellaneous-instruction-extension 2 */
59 #endif
60 			-1 /* END */
61 		}
62 	},
63 	{
64 		.name = "FACILITIES_KVM",
65 		.bits = (int[]){
66 			0,  /* N3 instructions */
67 			1,  /* z/Arch mode installed */
68 			2,  /* z/Arch mode active */
69 			3,  /* DAT-enhancement */
70 			4,  /* idte segment table */
71 			5,  /* idte region table */
72 			6,  /* ASN-and-LX reuse */
73 			7,  /* stfle */
74 			8,  /* enhanced-DAT 1 */
75 			9,  /* sense-running-status */
76 			10, /* conditional sske */
77 			13, /* ipte-range */
78 			14, /* nonquiescing key-setting */
79 			73, /* transactional execution */
80 			75, /* access-exception-fetch/store indication */
81 			76, /* msa extension 3 */
82 			77, /* msa extension 4 */
83 			78, /* enhanced-DAT 2 */
84 			130, /* instruction-execution-protection */
85 			131, /* enhanced-SOP 2 and side-effect */
86 			139, /* multiple epoch facility */
87 			146, /* msa extension 8 */
88 			-1  /* END */
89 		}
90 	},
91 };
92 
93 static void print_facility_list(struct facility_def *def)
94 {
95 	unsigned int high, bit, dword, i;
96 	unsigned long long *array;
97 
98 	array = calloc(1, 8);
99 	if (!array)
100 		exit(EXIT_FAILURE);
101 	high = 0;
102 	for (i = 0; def->bits[i] != -1; i++) {
103 		bit = 63 - (def->bits[i] & 63);
104 		dword = def->bits[i] / 64;
105 		if (dword > high) {
106 			array = realloc(array, (dword + 1) * 8);
107 			if (!array)
108 				exit(EXIT_FAILURE);
109 			memset(array + high + 1, 0, (dword - high) * 8);
110 			high = dword;
111 		}
112 		array[dword] |= 1ULL << bit;
113 	}
114 	printf("#define %s ", def->name);
115 	for (i = 0; i <= high; i++)
116 		printf("_AC(0x%016llx,UL)%c", array[i], i < high ? ',' : '\n');
117 	free(array);
118 }
119 
120 static void print_facility_lists(void)
121 {
122 	unsigned int i;
123 
124 	for (i = 0; i < sizeof(facility_defs) / sizeof(facility_defs[0]); i++)
125 		print_facility_list(&facility_defs[i]);
126 }
127 
128 int main(int argc, char **argv)
129 {
130 	printf("#ifndef __ASM_S390_FACILITIES__\n");
131 	printf("#define __ASM_S390_FACILITIES__\n");
132 	printf("/*\n");
133 	printf(" * DO NOT MODIFY.\n");
134 	printf(" *\n");
135 	printf(" * This file was generated by %s\n", __FILE__);
136 	printf(" */\n\n");
137 	printf("#include <linux/const.h>\n\n");
138 	print_facility_lists();
139 	printf("\n#endif\n");
140 	return 0;
141 }
142