xref: /openbmc/linux/drivers/s390/char/sclp_early.c (revision 65417d9f)
1 // SPDX-License-Identifier: GPL-2.0
2 /*
3  * SCLP early driver
4  *
5  * Copyright IBM Corp. 2013
6  */
7 
8 #define KMSG_COMPONENT "sclp_early"
9 #define pr_fmt(fmt) KMSG_COMPONENT ": " fmt
10 
11 #include <linux/errno.h>
12 #include <asm/ctl_reg.h>
13 #include <asm/sclp.h>
14 #include <asm/ipl.h>
15 #include "sclp_sdias.h"
16 #include "sclp.h"
17 
18 #define SCLP_CMDW_READ_SCP_INFO		0x00020001
19 #define SCLP_CMDW_READ_SCP_INFO_FORCED	0x00120001
20 
21 struct read_info_sccb {
22 	struct	sccb_header header;	/* 0-7 */
23 	u16	rnmax;			/* 8-9 */
24 	u8	rnsize;			/* 10 */
25 	u8	_pad_11[16 - 11];	/* 11-15 */
26 	u16	ncpurl;			/* 16-17 */
27 	u16	cpuoff;			/* 18-19 */
28 	u8	_pad_20[24 - 20];	/* 20-23 */
29 	u8	loadparm[8];		/* 24-31 */
30 	u8	_pad_32[42 - 32];	/* 32-41 */
31 	u8	fac42;			/* 42 */
32 	u8	fac43;			/* 43 */
33 	u8	_pad_44[48 - 44];	/* 44-47 */
34 	u64	facilities;		/* 48-55 */
35 	u8	_pad_56[66 - 56];	/* 56-65 */
36 	u8	fac66;			/* 66 */
37 	u8	_pad_67[76 - 67];	/* 67-83 */
38 	u32	ibc;			/* 76-79 */
39 	u8	_pad80[84 - 80];	/* 80-83 */
40 	u8	fac84;			/* 84 */
41 	u8	fac85;			/* 85 */
42 	u8	_pad_86[91 - 86];	/* 86-90 */
43 	u8	fac91;			/* 91 */
44 	u8	_pad_92[98 - 92];	/* 92-97 */
45 	u8	fac98;			/* 98 */
46 	u8	hamaxpow;		/* 99 */
47 	u32	rnsize2;		/* 100-103 */
48 	u64	rnmax2;			/* 104-111 */
49 	u8	_pad_112[116 - 112];	/* 112-115 */
50 	u8	fac116;			/* 116 */
51 	u8	fac117;			/* 117 */
52 	u8	_pad_118;		/* 118 */
53 	u8	fac119;			/* 119 */
54 	u16	hcpua;			/* 120-121 */
55 	u8	_pad_122[124 - 122];	/* 122-123 */
56 	u32	hmfai;			/* 124-127 */
57 	u8	_pad_128[4096 - 128];	/* 128-4095 */
58 } __packed __aligned(PAGE_SIZE);
59 
60 static struct sclp_ipl_info sclp_ipl_info;
61 
62 struct sclp_info sclp;
63 EXPORT_SYMBOL(sclp);
64 
65 static int __init sclp_early_read_info(struct read_info_sccb *sccb)
66 {
67 	int i;
68 	sclp_cmdw_t commands[] = {SCLP_CMDW_READ_SCP_INFO_FORCED,
69 				  SCLP_CMDW_READ_SCP_INFO};
70 
71 	for (i = 0; i < ARRAY_SIZE(commands); i++) {
72 		memset(sccb, 0, sizeof(*sccb));
73 		sccb->header.length = sizeof(*sccb);
74 		sccb->header.function_code = 0x80;
75 		sccb->header.control_mask[2] = 0x80;
76 		if (sclp_early_cmd(commands[i], sccb))
77 			break;
78 		if (sccb->header.response_code == 0x10)
79 			return 0;
80 		if (sccb->header.response_code != 0x1f0)
81 			break;
82 	}
83 	return -EIO;
84 }
85 
86 static void __init sclp_early_facilities_detect(struct read_info_sccb *sccb)
87 {
88 	struct sclp_core_entry *cpue;
89 	u16 boot_cpu_address, cpu;
90 
91 	if (sclp_early_read_info(sccb))
92 		return;
93 
94 	sclp.facilities = sccb->facilities;
95 	sclp.has_sprp = !!(sccb->fac84 & 0x02);
96 	sclp.has_core_type = !!(sccb->fac84 & 0x01);
97 	sclp.has_gsls = !!(sccb->fac85 & 0x80);
98 	sclp.has_64bscao = !!(sccb->fac116 & 0x80);
99 	sclp.has_cmma = !!(sccb->fac116 & 0x40);
100 	sclp.has_esca = !!(sccb->fac116 & 0x08);
101 	sclp.has_pfmfi = !!(sccb->fac117 & 0x40);
102 	sclp.has_ibs = !!(sccb->fac117 & 0x20);
103 	sclp.has_hvs = !!(sccb->fac119 & 0x80);
104 	sclp.has_kss = !!(sccb->fac98 & 0x01);
105 	if (sccb->fac85 & 0x02)
106 		S390_lowcore.machine_flags |= MACHINE_FLAG_ESOP;
107 	if (sccb->fac91 & 0x40)
108 		S390_lowcore.machine_flags |= MACHINE_FLAG_TLB_GUEST;
109 	sclp.rnmax = sccb->rnmax ? sccb->rnmax : sccb->rnmax2;
110 	sclp.rzm = sccb->rnsize ? sccb->rnsize : sccb->rnsize2;
111 	sclp.rzm <<= 20;
112 	sclp.ibc = sccb->ibc;
113 
114 	if (sccb->hamaxpow && sccb->hamaxpow < 64)
115 		sclp.hamax = (1UL << sccb->hamaxpow) - 1;
116 	else
117 		sclp.hamax = U64_MAX;
118 
119 	if (!sccb->hcpua) {
120 		if (MACHINE_IS_VM)
121 			sclp.max_cores = 64;
122 		else
123 			sclp.max_cores = sccb->ncpurl;
124 	} else {
125 		sclp.max_cores = sccb->hcpua + 1;
126 	}
127 
128 	boot_cpu_address = stap();
129 	cpue = (void *)sccb + sccb->cpuoff;
130 	for (cpu = 0; cpu < sccb->ncpurl; cpue++, cpu++) {
131 		if (boot_cpu_address != cpue->core_id)
132 			continue;
133 		sclp.has_siif = cpue->siif;
134 		sclp.has_sigpif = cpue->sigpif;
135 		sclp.has_sief2 = cpue->sief2;
136 		sclp.has_gpere = cpue->gpere;
137 		sclp.has_ib = cpue->ib;
138 		sclp.has_cei = cpue->cei;
139 		sclp.has_skey = cpue->skey;
140 		break;
141 	}
142 
143 	/* Save IPL information */
144 	sclp_ipl_info.is_valid = 1;
145 	if (sccb->fac91 & 0x2)
146 		sclp_ipl_info.has_dump = 1;
147 	memcpy(&sclp_ipl_info.loadparm, &sccb->loadparm, LOADPARM_LEN);
148 
149 	sclp.mtid = (sccb->fac42 & 0x80) ? (sccb->fac42 & 31) : 0;
150 	sclp.mtid_cp = (sccb->fac42 & 0x80) ? (sccb->fac43 & 31) : 0;
151 	sclp.mtid_prev = (sccb->fac42 & 0x80) ? (sccb->fac66 & 31) : 0;
152 
153 	sclp.hmfai = sccb->hmfai;
154 }
155 
156 /*
157  * This function will be called after sclp_early_facilities_detect(), which gets
158  * called from early.c code. The sclp_early_facilities_detect() function retrieves
159  * and saves the IPL information.
160  */
161 void __init sclp_early_get_ipl_info(struct sclp_ipl_info *info)
162 {
163 	*info = sclp_ipl_info;
164 }
165 
166 static struct sclp_core_info sclp_early_core_info __initdata;
167 static int sclp_early_core_info_valid __initdata;
168 
169 static void __init sclp_early_init_core_info(struct read_cpu_info_sccb *sccb)
170 {
171 	if (!SCLP_HAS_CPU_INFO)
172 		return;
173 	memset(sccb, 0, sizeof(*sccb));
174 	sccb->header.length = sizeof(*sccb);
175 	if (sclp_early_cmd(SCLP_CMDW_READ_CPU_INFO, sccb))
176 		return;
177 	if (sccb->header.response_code != 0x0010)
178 		return;
179 	sclp_fill_core_info(&sclp_early_core_info, sccb);
180 	sclp_early_core_info_valid = 1;
181 }
182 
183 int __init sclp_early_get_core_info(struct sclp_core_info *info)
184 {
185 	if (!sclp_early_core_info_valid)
186 		return -EIO;
187 	*info = sclp_early_core_info;
188 	return 0;
189 }
190 
191 static long __init sclp_early_hsa_size_init(struct sdias_sccb *sccb)
192 {
193 	memset(sccb, 0, sizeof(*sccb));
194 	sccb->hdr.length = sizeof(*sccb);
195 	sccb->evbuf.hdr.length = sizeof(struct sdias_evbuf);
196 	sccb->evbuf.hdr.type = EVTYP_SDIAS;
197 	sccb->evbuf.event_qual = SDIAS_EQ_SIZE;
198 	sccb->evbuf.data_id = SDIAS_DI_FCP_DUMP;
199 	sccb->evbuf.event_id = 4712;
200 	sccb->evbuf.dbs = 1;
201 	if (sclp_early_cmd(SCLP_CMDW_WRITE_EVENT_DATA, sccb))
202 		return -EIO;
203 	if (sccb->hdr.response_code != 0x20)
204 		return -EIO;
205 	if (sccb->evbuf.blk_cnt == 0)
206 		return 0;
207 	return (sccb->evbuf.blk_cnt - 1) * PAGE_SIZE;
208 }
209 
210 static long __init sclp_early_hsa_copy_wait(struct sdias_sccb *sccb)
211 {
212 	memset(sccb, 0, PAGE_SIZE);
213 	sccb->hdr.length = PAGE_SIZE;
214 	if (sclp_early_cmd(SCLP_CMDW_READ_EVENT_DATA, sccb))
215 		return -EIO;
216 	if ((sccb->hdr.response_code != 0x20) && (sccb->hdr.response_code != 0x220))
217 		return -EIO;
218 	if (sccb->evbuf.blk_cnt == 0)
219 		return 0;
220 	return (sccb->evbuf.blk_cnt - 1) * PAGE_SIZE;
221 }
222 
223 static void __init sclp_early_hsa_size_detect(void *sccb)
224 {
225 	unsigned long flags;
226 	long size = -EIO;
227 
228 	raw_local_irq_save(flags);
229 	if (sclp_early_set_event_mask(sccb, EVTYP_SDIAS_MASK, EVTYP_SDIAS_MASK))
230 		goto out;
231 	size = sclp_early_hsa_size_init(sccb);
232 	/* First check for synchronous response (LPAR) */
233 	if (size)
234 		goto out_mask;
235 	if (!(S390_lowcore.ext_params & 1))
236 		sclp_early_wait_irq();
237 	size = sclp_early_hsa_copy_wait(sccb);
238 out_mask:
239 	sclp_early_set_event_mask(sccb, 0, 0);
240 out:
241 	raw_local_irq_restore(flags);
242 	if (size > 0)
243 		sclp.hsa_size = size;
244 }
245 
246 static void __init sclp_early_console_detect(struct init_sccb *sccb)
247 {
248 	if (sccb->header.response_code != 0x20)
249 		return;
250 
251 	if (sccb->sclp_send_mask & EVTYP_VT220MSG_MASK)
252 		sclp.has_vt220 = 1;
253 
254 	if (sclp_early_con_check_linemode(sccb))
255 		sclp.has_linemode = 1;
256 }
257 
258 void __init sclp_early_detect(void)
259 {
260 	void *sccb = &sclp_early_sccb;
261 
262 	sclp_early_facilities_detect(sccb);
263 	sclp_early_init_core_info(sccb);
264 	sclp_early_hsa_size_detect(sccb);
265 
266 	/*
267 	 * Turn off SCLP event notifications.  Also save remote masks in the
268 	 * sccb.  These are sufficient to detect sclp console capabilities.
269 	 */
270 	sclp_early_set_event_mask(sccb, 0, 0);
271 	sclp_early_console_detect(sccb);
272 }
273