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 struct sclp_ipl_info sclp_ipl_info
;
52 static unsigned int sclp_mtid_max
;
54 struct sclp_info sclp
;
58 static int __init
sclp_cmd_sync_early(sclp_cmdw_t cmd
, void *sccb
)
63 rc
= sclp_service_call(cmd
, sccb
);
66 __load_psw_mask(PSW_DEFAULT_KEY
| PSW_MASK_BASE
| PSW_MASK_EA
|
67 PSW_MASK_BA
| PSW_MASK_EXT
| PSW_MASK_WAIT
);
70 /* Contents of the sccb might have changed. */
72 __ctl_clear_bit(0, 9);
76 static int __init
sclp_read_info_early(struct read_info_sccb
*sccb
)
79 sclp_cmdw_t commands
[] = {SCLP_CMDW_READ_SCP_INFO_FORCED
,
80 SCLP_CMDW_READ_SCP_INFO
};
82 for (i
= 0; i
< ARRAY_SIZE(commands
); i
++) {
84 memset(sccb
, 0, sizeof(*sccb
));
85 sccb
->header
.length
= sizeof(*sccb
);
86 sccb
->header
.function_code
= 0x80;
87 sccb
->header
.control_mask
[2] = 0x80;
88 rc
= sclp_cmd_sync_early(commands
[i
], sccb
);
89 } while (rc
== -EBUSY
);
93 if (sccb
->header
.response_code
== 0x10)
95 if (sccb
->header
.response_code
!= 0x1f0)
101 static void __init
sclp_facilities_detect(struct read_info_sccb
*sccb
)
103 struct sclp_cpu_entry
*cpue
;
104 u16 boot_cpu_address
, cpu
;
106 if (sclp_read_info_early(sccb
))
109 sclp_facilities
= sccb
->facilities
;
110 sclp
.has_sprp
= !!(sccb
->fac84
& 0x02);
111 sclp
.has_cpu_type
= !!(sccb
->fac84
& 0x01);
112 if (sccb
->fac85
& 0x02)
113 S390_lowcore
.machine_flags
|= MACHINE_FLAG_ESOP
;
114 sclp
.rnmax
= sccb
->rnmax
? sccb
->rnmax
: sccb
->rnmax2
;
115 sclp
.rzm
= sccb
->rnsize
? sccb
->rnsize
: sccb
->rnsize2
;
117 sclp
.ibc
= sccb
->ibc
;
123 sclp
.max_cpu
= sccb
->ncpurl
;
125 sclp
.max_cpu
= sccb
->hcpua
+ 1;
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
)
133 sclp
.has_siif
= cpue
->siif
;
134 sclp
.has_sigpif
= cpue
->sigpif
;
138 /* Save IPL information */
139 sclp_ipl_info
.is_valid
= 1;
140 if (sccb
->flags
& 0x2)
141 sclp_ipl_info
.has_dump
= 1;
142 memcpy(&sclp_ipl_info
.loadparm
, &sccb
->loadparm
, LOADPARM_LEN
);
144 sclp
.mtid
= (sccb
->fac42
& 0x80) ? (sccb
->fac42
& 31) : 0;
145 sclp
.mtid_cp
= (sccb
->fac42
& 0x80) ? (sccb
->fac43
& 31) : 0;
146 sclp_mtid_max
= max(sclp
.mtid
, sclp
.mtid_cp
);
147 sclp
.mtid_prev
= (sccb
->fac42
& 0x80) ? (sccb
->fac66
& 31) : 0;
150 unsigned int sclp_get_mtid(u8 cpu_type
)
152 return cpu_type
? sclp
.mtid
: sclp
.mtid_cp
;
155 unsigned int sclp_get_mtid_max(void)
157 return sclp_mtid_max
;
161 * This function will be called after sclp_facilities_detect(), which gets
162 * called from early.c code. The sclp_facilities_detect() function retrieves
163 * and saves the IPL information.
165 void __init
sclp_get_ipl_info(struct sclp_ipl_info
*info
)
167 *info
= sclp_ipl_info
;
170 static int __init
sclp_cmd_early(sclp_cmdw_t cmd
, void *sccb
)
175 rc
= sclp_cmd_sync_early(cmd
, sccb
);
176 } while (rc
== -EBUSY
);
180 if (((struct sccb_header
*) sccb
)->response_code
!= 0x0020)
185 static void __init
sccb_init_eq_size(struct sdias_sccb
*sccb
)
187 memset(sccb
, 0, sizeof(*sccb
));
189 sccb
->hdr
.length
= sizeof(*sccb
);
190 sccb
->evbuf
.hdr
.length
= sizeof(struct sdias_evbuf
);
191 sccb
->evbuf
.hdr
.type
= EVTYP_SDIAS
;
192 sccb
->evbuf
.event_qual
= SDIAS_EQ_SIZE
;
193 sccb
->evbuf
.data_id
= SDIAS_DI_FCP_DUMP
;
194 sccb
->evbuf
.event_id
= 4712;
198 static int __init
sclp_set_event_mask(struct init_sccb
*sccb
,
199 unsigned long receive_mask
,
200 unsigned long send_mask
)
202 memset(sccb
, 0, sizeof(*sccb
));
203 sccb
->header
.length
= sizeof(*sccb
);
204 sccb
->mask_length
= sizeof(sccb_mask_t
);
205 sccb
->receive_mask
= receive_mask
;
206 sccb
->send_mask
= send_mask
;
207 return sclp_cmd_early(SCLP_CMDW_WRITE_EVENT_MASK
, sccb
);
210 static long __init
sclp_hsa_size_init(struct sdias_sccb
*sccb
)
212 sccb_init_eq_size(sccb
);
213 if (sclp_cmd_early(SCLP_CMDW_WRITE_EVENT_DATA
, sccb
))
215 if (sccb
->evbuf
.blk_cnt
== 0)
217 return (sccb
->evbuf
.blk_cnt
- 1) * PAGE_SIZE
;
220 static long __init
sclp_hsa_copy_wait(struct sccb_header
*sccb
)
222 memset(sccb
, 0, PAGE_SIZE
);
223 sccb
->length
= PAGE_SIZE
;
224 if (sclp_cmd_early(SCLP_CMDW_READ_EVENT_DATA
, sccb
))
226 if (((struct sdias_sccb
*) sccb
)->evbuf
.blk_cnt
== 0)
228 return (((struct sdias_sccb
*) sccb
)->evbuf
.blk_cnt
- 1) * PAGE_SIZE
;
231 static void __init
sclp_hsa_size_detect(void *sccb
)
235 /* First try synchronous interface (LPAR) */
236 if (sclp_set_event_mask(sccb
, 0, 0x40000010))
238 size
= sclp_hsa_size_init(sccb
);
243 /* Then try asynchronous interface (z/VM) */
244 if (sclp_set_event_mask(sccb
, 0x00000010, 0x40000010))
246 size
= sclp_hsa_size_init(sccb
);
249 size
= sclp_hsa_copy_wait(sccb
);
253 sclp
.hsa_size
= size
;
256 static unsigned int __init
sclp_con_check_linemode(struct init_sccb
*sccb
)
258 if (!(sccb
->sclp_send_mask
& EVTYP_OPCMD_MASK
))
260 if (!(sccb
->sclp_receive_mask
& (EVTYP_MSG_MASK
| EVTYP_PMSGCMD_MASK
)))
265 static void __init
sclp_console_detect(struct init_sccb
*sccb
)
267 if (sccb
->header
.response_code
!= 0x20)
270 if (sccb
->sclp_send_mask
& EVTYP_VT220MSG_MASK
)
273 if (sclp_con_check_linemode(sccb
))
274 sclp
.has_linemode
= 1;
277 void __init
sclp_early_detect(void)
279 void *sccb
= &sccb_early
;
281 sclp_facilities_detect(sccb
);
282 sclp_hsa_size_detect(sccb
);
284 /* Turn off SCLP event notifications. Also save remote masks in the
285 * sccb. These are sufficient to detect sclp console capabilities.
287 sclp_set_event_mask(sccb
, 0, 0);
288 sclp_console_detect(sccb
);