4 * Copyright IBM Corp. 2013
7 #define KMSG_COMPONENT "sclp_early"
8 #define pr_fmt(fmt) KMSG_COMPONENT ": " fmt
10 #include <asm/ctl_reg.h>
13 #include "sclp_sdias.h"
16 #define SCLP_CMDW_READ_SCP_INFO 0x00020001
17 #define SCLP_CMDW_READ_SCP_INFO_FORCED 0x00120001
19 struct read_info_sccb
{
20 struct sccb_header header
; /* 0-7 */
23 u8 _pad_11
[16 - 11]; /* 11-15 */
24 u16 ncpurl
; /* 16-17 */
25 u16 cpuoff
; /* 18-19 */
26 u8 _pad_20
[24 - 20]; /* 20-23 */
27 u8 loadparm
[8]; /* 24-31 */
28 u8 _pad_32
[42 - 32]; /* 32-41 */
31 u8 _pad_44
[48 - 44]; /* 44-47 */
32 u64 facilities
; /* 48-55 */
33 u8 _pad_56
[66 - 56]; /* 56-65 */
35 u8 _pad_67
[76 - 67]; /* 67-83 */
37 u8 _pad80
[84 - 80]; /* 80-83 */
40 u8 _pad_86
[91 - 86]; /* 86-90 */
42 u8 _pad_92
[100 - 92]; /* 92-99 */
43 u32 rnsize2
; /* 100-103 */
44 u64 rnmax2
; /* 104-111 */
45 u8 _pad_112
[120 - 112]; /* 112-119 */
46 u16 hcpua
; /* 120-121 */
47 u8 _pad_122
[4096 - 122]; /* 122-4095 */
48 } __packed
__aligned(PAGE_SIZE
);
50 static char sccb_early
[PAGE_SIZE
] __aligned(PAGE_SIZE
) __initdata
;
51 static unsigned int sclp_con_has_vt220 __initdata
;
52 static unsigned int sclp_con_has_linemode __initdata
;
53 static unsigned long sclp_hsa_size
;
54 static unsigned int sclp_max_cpu
;
55 static struct sclp_ipl_info sclp_ipl_info
;
56 static unsigned char sclp_siif
;
58 static unsigned int sclp_mtid
;
59 static unsigned int sclp_mtid_cp
;
60 static unsigned int sclp_mtid_max
;
61 static unsigned int sclp_mtid_prev
;
65 unsigned long long sclp_rzm
;
66 unsigned long long sclp_rnmax
;
68 static int __init
sclp_cmd_sync_early(sclp_cmdw_t cmd
, void *sccb
)
73 rc
= sclp_service_call(cmd
, sccb
);
76 __load_psw_mask(PSW_DEFAULT_KEY
| PSW_MASK_BASE
| PSW_MASK_EA
|
77 PSW_MASK_BA
| PSW_MASK_EXT
| PSW_MASK_WAIT
);
80 /* Contents of the sccb might have changed. */
82 __ctl_clear_bit(0, 9);
86 static int __init
sclp_read_info_early(struct read_info_sccb
*sccb
)
89 sclp_cmdw_t commands
[] = {SCLP_CMDW_READ_SCP_INFO_FORCED
,
90 SCLP_CMDW_READ_SCP_INFO
};
92 for (i
= 0; i
< ARRAY_SIZE(commands
); i
++) {
94 memset(sccb
, 0, sizeof(*sccb
));
95 sccb
->header
.length
= sizeof(*sccb
);
96 sccb
->header
.function_code
= 0x80;
97 sccb
->header
.control_mask
[2] = 0x80;
98 rc
= sclp_cmd_sync_early(commands
[i
], sccb
);
99 } while (rc
== -EBUSY
);
103 if (sccb
->header
.response_code
== 0x10)
105 if (sccb
->header
.response_code
!= 0x1f0)
111 static void __init
sclp_facilities_detect(struct read_info_sccb
*sccb
)
113 struct sclp_cpu_entry
*cpue
;
114 u16 boot_cpu_address
, cpu
;
116 if (sclp_read_info_early(sccb
))
119 sclp_facilities
= sccb
->facilities
;
120 sclp_fac84
= sccb
->fac84
;
121 if (sccb
->fac85
& 0x02)
122 S390_lowcore
.machine_flags
|= MACHINE_FLAG_ESOP
;
123 sclp_rnmax
= sccb
->rnmax
? sccb
->rnmax
: sccb
->rnmax2
;
124 sclp_rzm
= sccb
->rnsize
? sccb
->rnsize
: sccb
->rnsize2
;
126 sclp_ibc
= sccb
->ibc
;
132 sclp_max_cpu
= sccb
->ncpurl
;
134 sclp_max_cpu
= sccb
->hcpua
+ 1;
137 boot_cpu_address
= stap();
138 cpue
= (void *)sccb
+ sccb
->cpuoff
;
139 for (cpu
= 0; cpu
< sccb
->ncpurl
; cpue
++, cpu
++) {
140 if (boot_cpu_address
!= cpue
->core_id
)
142 sclp_siif
= cpue
->siif
;
146 /* Save IPL information */
147 sclp_ipl_info
.is_valid
= 1;
148 if (sccb
->flags
& 0x2)
149 sclp_ipl_info
.has_dump
= 1;
150 memcpy(&sclp_ipl_info
.loadparm
, &sccb
->loadparm
, LOADPARM_LEN
);
152 sclp_mtid
= (sccb
->fac42
& 0x80) ? (sccb
->fac42
& 31) : 0;
153 sclp_mtid_cp
= (sccb
->fac42
& 0x80) ? (sccb
->fac43
& 31) : 0;
154 sclp_mtid_max
= max(sclp_mtid
, sclp_mtid_cp
);
155 sclp_mtid_prev
= (sccb
->fac42
& 0x80) ? (sccb
->fac66
& 31) : 0;
158 bool __init
sclp_has_linemode(void)
160 return !!sclp_con_has_linemode
;
163 bool __init
sclp_has_vt220(void)
165 return !!sclp_con_has_vt220
;
168 unsigned long long sclp_get_rnmax(void)
173 unsigned long long sclp_get_rzm(void)
178 unsigned int sclp_get_max_cpu(void)
183 int sclp_has_siif(void)
187 EXPORT_SYMBOL(sclp_has_siif
);
189 unsigned int sclp_get_ibc(void)
193 EXPORT_SYMBOL(sclp_get_ibc
);
195 unsigned int sclp_get_mtid(u8 cpu_type
)
197 return cpu_type
? sclp_mtid
: sclp_mtid_cp
;
200 unsigned int sclp_get_mtid_max(void)
202 return sclp_mtid_max
;
205 unsigned int sclp_get_mtid_prev(void)
207 return sclp_mtid_prev
;
211 * This function will be called after sclp_facilities_detect(), which gets
212 * called from early.c code. The sclp_facilities_detect() function retrieves
213 * and saves the IPL information.
215 void __init
sclp_get_ipl_info(struct sclp_ipl_info
*info
)
217 *info
= sclp_ipl_info
;
220 static int __init
sclp_cmd_early(sclp_cmdw_t cmd
, void *sccb
)
225 rc
= sclp_cmd_sync_early(cmd
, sccb
);
226 } while (rc
== -EBUSY
);
230 if (((struct sccb_header
*) sccb
)->response_code
!= 0x0020)
235 static void __init
sccb_init_eq_size(struct sdias_sccb
*sccb
)
237 memset(sccb
, 0, sizeof(*sccb
));
239 sccb
->hdr
.length
= sizeof(*sccb
);
240 sccb
->evbuf
.hdr
.length
= sizeof(struct sdias_evbuf
);
241 sccb
->evbuf
.hdr
.type
= EVTYP_SDIAS
;
242 sccb
->evbuf
.event_qual
= SDIAS_EQ_SIZE
;
243 sccb
->evbuf
.data_id
= SDIAS_DI_FCP_DUMP
;
244 sccb
->evbuf
.event_id
= 4712;
248 static int __init
sclp_set_event_mask(struct init_sccb
*sccb
,
249 unsigned long receive_mask
,
250 unsigned long send_mask
)
252 memset(sccb
, 0, sizeof(*sccb
));
253 sccb
->header
.length
= sizeof(*sccb
);
254 sccb
->mask_length
= sizeof(sccb_mask_t
);
255 sccb
->receive_mask
= receive_mask
;
256 sccb
->send_mask
= send_mask
;
257 return sclp_cmd_early(SCLP_CMDW_WRITE_EVENT_MASK
, sccb
);
260 static long __init
sclp_hsa_size_init(struct sdias_sccb
*sccb
)
262 sccb_init_eq_size(sccb
);
263 if (sclp_cmd_early(SCLP_CMDW_WRITE_EVENT_DATA
, sccb
))
265 if (sccb
->evbuf
.blk_cnt
== 0)
267 return (sccb
->evbuf
.blk_cnt
- 1) * PAGE_SIZE
;
270 static long __init
sclp_hsa_copy_wait(struct sccb_header
*sccb
)
272 memset(sccb
, 0, PAGE_SIZE
);
273 sccb
->length
= PAGE_SIZE
;
274 if (sclp_cmd_early(SCLP_CMDW_READ_EVENT_DATA
, sccb
))
276 if (((struct sdias_sccb
*) sccb
)->evbuf
.blk_cnt
== 0)
278 return (((struct sdias_sccb
*) sccb
)->evbuf
.blk_cnt
- 1) * PAGE_SIZE
;
281 unsigned long sclp_get_hsa_size(void)
283 return sclp_hsa_size
;
286 static void __init
sclp_hsa_size_detect(void *sccb
)
290 /* First try synchronous interface (LPAR) */
291 if (sclp_set_event_mask(sccb
, 0, 0x40000010))
293 size
= sclp_hsa_size_init(sccb
);
298 /* Then try asynchronous interface (z/VM) */
299 if (sclp_set_event_mask(sccb
, 0x00000010, 0x40000010))
301 size
= sclp_hsa_size_init(sccb
);
304 size
= sclp_hsa_copy_wait(sccb
);
308 sclp_hsa_size
= size
;
311 static unsigned int __init
sclp_con_check_linemode(struct init_sccb
*sccb
)
313 if (!(sccb
->sclp_send_mask
& EVTYP_OPCMD_MASK
))
315 if (!(sccb
->sclp_receive_mask
& (EVTYP_MSG_MASK
| EVTYP_PMSGCMD_MASK
)))
320 static void __init
sclp_console_detect(struct init_sccb
*sccb
)
322 if (sccb
->header
.response_code
!= 0x20)
325 if (sccb
->sclp_send_mask
& EVTYP_VT220MSG_MASK
)
326 sclp_con_has_vt220
= 1;
328 if (sclp_con_check_linemode(sccb
))
329 sclp_con_has_linemode
= 1;
332 void __init
sclp_early_detect(void)
334 void *sccb
= &sccb_early
;
336 sclp_facilities_detect(sccb
);
337 sclp_hsa_size_detect(sccb
);
339 /* Turn off SCLP event notifications. Also save remote masks in the
340 * sccb. These are sufficient to detect sclp console capabilities.
342 sclp_set_event_mask(sccb
, 0, 0);
343 sclp_console_detect(sccb
);