]>
Commit | Line | Data |
---|---|---|
ab14de6c | 1 | /* |
155af2f9 | 2 | * Copyright IBM Corp. 2007, 2009 |
ab14de6c HC |
3 | * Author(s): Hongjie Yang <hongjie@us.ibm.com>, |
4 | * Heiko Carstens <heiko.carstens@de.ibm.com> | |
5 | */ | |
6 | ||
11af97e1 HB |
7 | #define KMSG_COMPONENT "setup" |
8 | #define pr_fmt(fmt) KMSG_COMPONENT ": " fmt | |
9 | ||
92e6ecf3 | 10 | #include <linux/compiler.h> |
ab14de6c HC |
11 | #include <linux/init.h> |
12 | #include <linux/errno.h> | |
13 | #include <linux/string.h> | |
14 | #include <linux/ctype.h> | |
15 | #include <linux/lockdep.h> | |
16 | #include <linux/module.h> | |
17 | #include <linux/pfn.h> | |
18 | #include <linux/uaccess.h> | |
11af97e1 | 19 | #include <linux/kernel.h> |
1ec2772e | 20 | #include <asm/diag.h> |
a0443fbb | 21 | #include <asm/ebcdic.h> |
46b05d26 | 22 | #include <asm/ipl.h> |
ab14de6c HC |
23 | #include <asm/lowcore.h> |
24 | #include <asm/processor.h> | |
25 | #include <asm/sections.h> | |
26 | #include <asm/setup.h> | |
92e6ecf3 | 27 | #include <asm/sysinfo.h> |
ab14de6c HC |
28 | #include <asm/cpcmd.h> |
29 | #include <asm/sclp.h> | |
a0616cde | 30 | #include <asm/facility.h> |
a806170e | 31 | #include "entry.h" |
ab14de6c HC |
32 | |
33 | /* | |
34 | * Create a Kernel NSS if the SAVESYS= parameter is defined | |
35 | */ | |
a0443fbb | 36 | #define DEFSYS_CMD_SIZE 128 |
ab14de6c HC |
37 | #define SAVESYS_CMD_SIZE 32 |
38 | ||
ab14de6c HC |
39 | char kernel_nss_name[NSS_NAME_SIZE + 1]; |
40 | ||
a0443fbb HB |
41 | static void __init setup_boot_command_line(void); |
42 | ||
b6112ccb MS |
43 | /* |
44 | * Get the TOD clock running. | |
45 | */ | |
46 | static void __init reset_tod_clock(void) | |
47 | { | |
48 | u64 time; | |
49 | ||
1aae0560 | 50 | if (store_tod_clock(&time) == 0) |
b6112ccb MS |
51 | return; |
52 | /* TOD clock not running. Set the clock to Unix Epoch. */ | |
1aae0560 | 53 | if (set_tod_clock(TOD_UNIX_EPOCH) != 0 || store_tod_clock(&time) != 0) |
b6112ccb MS |
54 | disabled_wait(0); |
55 | ||
56 | sched_clock_base_cc = TOD_UNIX_EPOCH; | |
b89031e0 | 57 | S390_lowcore.last_update_clock = sched_clock_base_cc; |
b6112ccb | 58 | } |
a0443fbb | 59 | |
ab14de6c | 60 | #ifdef CONFIG_SHARED_KERNEL |
a0443fbb HB |
61 | int __init savesys_ipl_nss(char *cmd, const int cmdlen); |
62 | ||
63 | asm( | |
64 | " .section .init.text,\"ax\",@progbits\n" | |
65 | " .align 4\n" | |
66 | " .type savesys_ipl_nss, @function\n" | |
67 | "savesys_ipl_nss:\n" | |
a0443fbb HB |
68 | " stmg 6,15,48(15)\n" |
69 | " lgr 14,3\n" | |
70 | " sam31\n" | |
71 | " diag 2,14,0x8\n" | |
72 | " sam64\n" | |
73 | " lgr 2,14\n" | |
74 | " lmg 6,15,48(15)\n" | |
a0443fbb | 75 | " br 14\n" |
18764463 HC |
76 | " .size savesys_ipl_nss, .-savesys_ipl_nss\n" |
77 | " .previous\n"); | |
a0443fbb | 78 | |
684d2fd4 HB |
79 | static __initdata char upper_command_line[COMMAND_LINE_SIZE]; |
80 | ||
ab14de6c HC |
81 | static noinline __init void create_kernel_nss(void) |
82 | { | |
83 | unsigned int i, stext_pfn, eshared_pfn, end_pfn, min_size; | |
84 | #ifdef CONFIG_BLK_DEV_INITRD | |
85 | unsigned int sinitrd_pfn, einitrd_pfn; | |
86 | #endif | |
87 | int response; | |
69ac43b0 | 88 | int hlen; |
a0443fbb | 89 | size_t len; |
ab14de6c | 90 | char *savesys_ptr; |
ab14de6c HC |
91 | char defsys_cmd[DEFSYS_CMD_SIZE]; |
92 | char savesys_cmd[SAVESYS_CMD_SIZE]; | |
93 | ||
94 | /* Do nothing if we are not running under VM */ | |
95 | if (!MACHINE_IS_VM) | |
96 | return; | |
97 | ||
98 | /* Convert COMMAND_LINE to upper case */ | |
a0443fbb HB |
99 | for (i = 0; i < strlen(boot_command_line); i++) |
100 | upper_command_line[i] = toupper(boot_command_line[i]); | |
ab14de6c HC |
101 | |
102 | savesys_ptr = strstr(upper_command_line, "SAVESYS="); | |
103 | ||
104 | if (!savesys_ptr) | |
105 | return; | |
106 | ||
107 | savesys_ptr += 8; /* Point to the beginning of the NSS name */ | |
108 | for (i = 0; i < NSS_NAME_SIZE; i++) { | |
109 | if (savesys_ptr[i] == ' ' || savesys_ptr[i] == '\0') | |
110 | break; | |
111 | kernel_nss_name[i] = savesys_ptr[i]; | |
112 | } | |
113 | ||
114 | stext_pfn = PFN_DOWN(__pa(&_stext)); | |
115 | eshared_pfn = PFN_DOWN(__pa(&_eshared)); | |
116 | end_pfn = PFN_UP(__pa(&_end)); | |
117 | min_size = end_pfn << 2; | |
118 | ||
69ac43b0 CL |
119 | hlen = snprintf(defsys_cmd, DEFSYS_CMD_SIZE, |
120 | "DEFSYS %s 00000-%.5X EW %.5X-%.5X SR %.5X-%.5X", | |
121 | kernel_nss_name, stext_pfn - 1, stext_pfn, | |
122 | eshared_pfn - 1, eshared_pfn, end_pfn); | |
ab14de6c HC |
123 | |
124 | #ifdef CONFIG_BLK_DEV_INITRD | |
125 | if (INITRD_START && INITRD_SIZE) { | |
126 | sinitrd_pfn = PFN_DOWN(__pa(INITRD_START)); | |
127 | einitrd_pfn = PFN_UP(__pa(INITRD_START + INITRD_SIZE)); | |
128 | min_size = einitrd_pfn << 2; | |
69ac43b0 CL |
129 | hlen += snprintf(defsys_cmd + hlen, DEFSYS_CMD_SIZE - hlen, |
130 | " EW %.5X-%.5X", sinitrd_pfn, einitrd_pfn); | |
ab14de6c HC |
131 | } |
132 | #endif | |
133 | ||
69ac43b0 CL |
134 | snprintf(defsys_cmd + hlen, DEFSYS_CMD_SIZE - hlen, |
135 | " EW MINSIZE=%.7iK PARMREGS=0-13", min_size); | |
136 | defsys_cmd[DEFSYS_CMD_SIZE - 1] = '\0'; | |
894e491e HC |
137 | snprintf(savesys_cmd, SAVESYS_CMD_SIZE, "SAVESYS %s \n IPL %s", |
138 | kernel_nss_name, kernel_nss_name); | |
139 | savesys_cmd[SAVESYS_CMD_SIZE - 1] = '\0'; | |
ab14de6c HC |
140 | |
141 | __cpcmd(defsys_cmd, NULL, 0, &response); | |
142 | ||
583b33bc | 143 | if (response != 0) { |
11af97e1 HB |
144 | pr_err("Defining the Linux kernel NSS failed with rc=%d\n", |
145 | response); | |
583b33bc | 146 | kernel_nss_name[0] = '\0'; |
ab14de6c | 147 | return; |
583b33bc | 148 | } |
ab14de6c | 149 | |
a0443fbb HB |
150 | len = strlen(savesys_cmd); |
151 | ASCEBC(savesys_cmd, len); | |
152 | response = savesys_ipl_nss(savesys_cmd, len); | |
ab14de6c | 153 | |
a0443fbb HB |
154 | /* On success: response is equal to the command size, |
155 | * max SAVESYS_CMD_SIZE | |
156 | * On error: response contains the numeric portion of cp error message. | |
157 | * for SAVESYS it will be >= 263 | |
11af97e1 | 158 | * for missing privilege class, it will be 1 |
a0443fbb | 159 | */ |
11af97e1 HB |
160 | if (response > SAVESYS_CMD_SIZE || response == 1) { |
161 | pr_err("Saving the Linux kernel NSS failed with rc=%d\n", | |
162 | response); | |
583b33bc | 163 | kernel_nss_name[0] = '\0'; |
ab14de6c | 164 | return; |
583b33bc | 165 | } |
ab14de6c | 166 | |
b89031e0 | 167 | /* re-initialize cputime accounting. */ |
1aae0560 | 168 | sched_clock_base_cc = get_tod_clock(); |
b89031e0 MS |
169 | S390_lowcore.last_update_clock = sched_clock_base_cc; |
170 | S390_lowcore.last_update_timer = 0x7fffffffffffffffULL; | |
171 | S390_lowcore.user_timer = 0; | |
172 | S390_lowcore.system_timer = 0; | |
173 | asm volatile("SPT 0(%0)" : : "a" (&S390_lowcore.last_update_timer)); | |
174 | ||
a0443fbb HB |
175 | /* re-setup boot command line with new ipl vm parms */ |
176 | ipl_update_parameters(); | |
177 | setup_boot_command_line(); | |
178 | ||
ab14de6c HC |
179 | ipl_flags = IPL_NSS_VALID; |
180 | } | |
181 | ||
182 | #else /* CONFIG_SHARED_KERNEL */ | |
183 | ||
184 | static inline void create_kernel_nss(void) { } | |
185 | ||
186 | #endif /* CONFIG_SHARED_KERNEL */ | |
187 | ||
188 | /* | |
189 | * Clear bss memory | |
190 | */ | |
191 | static noinline __init void clear_bss_section(void) | |
192 | { | |
229d9c6d | 193 | memset(__bss_start, 0, __bss_stop - __bss_start); |
ab14de6c HC |
194 | } |
195 | ||
196 | /* | |
197 | * Initialize storage key for kernel pages | |
198 | */ | |
199 | static noinline __init void init_kernel_storage_key(void) | |
200 | { | |
127c1fef | 201 | #if PAGE_DEFAULT_KEY |
ab14de6c HC |
202 | unsigned long end_pfn, init_pfn; |
203 | ||
204 | end_pfn = PFN_UP(__pa(&_end)); | |
205 | ||
206 | for (init_pfn = 0 ; init_pfn < end_pfn; init_pfn++) | |
e2b8d7af MS |
207 | page_set_storage_key(init_pfn << PAGE_SHIFT, |
208 | PAGE_DEFAULT_KEY, 0); | |
127c1fef | 209 | #endif |
ab14de6c HC |
210 | } |
211 | ||
fade4dc4 | 212 | static __initdata char sysinfo_page[PAGE_SIZE] __aligned(PAGE_SIZE); |
92e6ecf3 | 213 | |
ab14de6c HC |
214 | static noinline __init void detect_machine_type(void) |
215 | { | |
fade4dc4 HC |
216 | struct sysinfo_3_2_2 *vmms = (struct sysinfo_3_2_2 *)&sysinfo_page; |
217 | ||
27d71602 | 218 | /* Check current-configuration-level */ |
caf757c6 | 219 | if (stsi(NULL, 0, 0, 0) <= 2) { |
27d71602 | 220 | S390_lowcore.machine_flags |= MACHINE_FLAG_LPAR; |
92e6ecf3 | 221 | return; |
27d71602 MS |
222 | } |
223 | /* Get virtual-machine cpu information. */ | |
caf757c6 | 224 | if (stsi(vmms, 3, 2, 2) || !vmms->count) |
92e6ecf3 | 225 | return; |
ab14de6c | 226 | |
92e6ecf3 | 227 | /* Running under KVM? If not we assume z/VM */ |
fade4dc4 | 228 | if (!memcmp(vmms->vm[0].cpi, "\xd2\xe5\xd4", 3)) |
d3135e0c | 229 | S390_lowcore.machine_flags |= MACHINE_FLAG_KVM; |
92e6ecf3 | 230 | else |
d3135e0c | 231 | S390_lowcore.machine_flags |= MACHINE_FLAG_VM; |
ab14de6c HC |
232 | } |
233 | ||
fade4dc4 HC |
234 | static __init void setup_topology(void) |
235 | { | |
fade4dc4 HC |
236 | int max_mnest; |
237 | ||
238 | if (!test_facility(11)) | |
239 | return; | |
240 | S390_lowcore.machine_flags |= MACHINE_FLAG_TOPOLOGY; | |
241 | for (max_mnest = 6; max_mnest > 1; max_mnest--) { | |
caf757c6 | 242 | if (stsi(&sysinfo_page, 15, 1, max_mnest) == 0) |
fade4dc4 HC |
243 | break; |
244 | } | |
245 | topology_max_mnest = max_mnest; | |
fade4dc4 HC |
246 | } |
247 | ||
a3415703 | 248 | static void early_pgm_check_handler(void) |
ab14de6c | 249 | { |
ab14de6c | 250 | const struct exception_table_entry *fixup; |
50be6345 | 251 | unsigned long cr0, cr0_new; |
eb608fb3 | 252 | unsigned long addr; |
ab14de6c HC |
253 | |
254 | addr = S390_lowcore.program_old_psw.addr; | |
9cb1ccec | 255 | fixup = search_exception_tables(addr); |
ab14de6c HC |
256 | if (!fixup) |
257 | disabled_wait(0); | |
50be6345 PH |
258 | /* Disable low address protection before storing into lowcore. */ |
259 | __ctl_store(cr0, 0, 0); | |
260 | cr0_new = cr0 & ~(1UL << 28); | |
261 | __ctl_load(cr0_new, 0, 0); | |
fecc868a | 262 | S390_lowcore.program_old_psw.addr = extable_fixup(fixup); |
50be6345 | 263 | __ctl_load(cr0, 0, 0); |
ab14de6c HC |
264 | } |
265 | ||
5f954c34 | 266 | static noinline __init void setup_lowcore_early(void) |
ab14de6c HC |
267 | { |
268 | psw_t psw; | |
269 | ||
b50511e4 | 270 | psw.mask = PSW_MASK_BASE | PSW_DEFAULT_KEY | PSW_MASK_EA | PSW_MASK_BA; |
fecc868a | 271 | psw.addr = (unsigned long) s390_base_ext_handler; |
ab14de6c | 272 | S390_lowcore.external_new_psw = psw; |
fecc868a | 273 | psw.addr = (unsigned long) s390_base_pgm_handler; |
ab14de6c HC |
274 | S390_lowcore.program_new_psw = psw; |
275 | s390_base_pgm_handler_fn = early_pgm_check_handler; | |
276 | } | |
277 | ||
14375bc4 MS |
278 | static noinline __init void setup_facility_list(void) |
279 | { | |
3ab121ab MH |
280 | stfle(S390_lowcore.stfle_fac_list, |
281 | ARRAY_SIZE(S390_lowcore.stfle_fac_list)); | |
14375bc4 MS |
282 | } |
283 | ||
2e5061e4 HC |
284 | static __init void detect_diag9c(void) |
285 | { | |
286 | unsigned int cpu_address; | |
287 | int rc; | |
288 | ||
289 | cpu_address = stap(); | |
1ec2772e | 290 | diag_stat_inc(DIAG_STAT_X09C); |
2e5061e4 HC |
291 | asm volatile( |
292 | " diag %2,0,0x9c\n" | |
293 | "0: la %0,0\n" | |
294 | "1:\n" | |
295 | EX_TABLE(0b,1b) | |
296 | : "=d" (rc) : "0" (-EOPNOTSUPP), "d" (cpu_address) : "cc"); | |
297 | if (!rc) | |
d3135e0c | 298 | S390_lowcore.machine_flags |= MACHINE_FLAG_DIAG9C; |
2e5061e4 HC |
299 | } |
300 | ||
301 | static __init void detect_diag44(void) | |
302 | { | |
2e5061e4 HC |
303 | int rc; |
304 | ||
1ec2772e | 305 | diag_stat_inc(DIAG_STAT_X044); |
2e5061e4 HC |
306 | asm volatile( |
307 | " diag 0,0,0x44\n" | |
308 | "0: la %0,0\n" | |
309 | "1:\n" | |
310 | EX_TABLE(0b,1b) | |
311 | : "=d" (rc) : "0" (-EOPNOTSUPP) : "cc"); | |
312 | if (!rc) | |
d3135e0c | 313 | S390_lowcore.machine_flags |= MACHINE_FLAG_DIAG44; |
2e5061e4 HC |
314 | } |
315 | ||
316 | static __init void detect_machine_facilities(void) | |
317 | { | |
3c7ef08b HC |
318 | if (test_facility(8)) { |
319 | S390_lowcore.machine_flags |= MACHINE_FLAG_EDAT1; | |
320 | __ctl_set_bit(0, 23); | |
321 | } | |
85e9d0e5 HC |
322 | if (test_facility(78)) |
323 | S390_lowcore.machine_flags |= MACHINE_FLAG_EDAT2; | |
14375bc4 | 324 | if (test_facility(3)) |
d3135e0c | 325 | S390_lowcore.machine_flags |= MACHINE_FLAG_IDTE; |
14375bc4 | 326 | if (test_facility(40)) |
23d18e8d | 327 | S390_lowcore.machine_flags |= MACHINE_FLAG_LPP; |
d35339a4 MS |
328 | if (test_facility(50) && test_facility(73)) |
329 | S390_lowcore.machine_flags |= MACHINE_FLAG_TE; | |
1b948d6c MS |
330 | if (test_facility(51)) |
331 | S390_lowcore.machine_flags |= MACHINE_FLAG_TLB_LC; | |
b5510d9b | 332 | if (test_facility(129)) { |
80703617 | 333 | S390_lowcore.machine_flags |= MACHINE_FLAG_VX; |
b5510d9b HB |
334 | __ctl_set_bit(0, 17); |
335 | } | |
336 | } | |
337 | ||
1a36a39e MS |
338 | static inline void save_vector_registers(void) |
339 | { | |
340 | #ifdef CONFIG_CRASH_DUMP | |
341 | if (test_facility(129)) | |
342 | save_vx_regs(boot_cpu_vector_save_area); | |
343 | #endif | |
344 | } | |
345 | ||
b5510d9b HB |
346 | static int __init disable_vector_extension(char *str) |
347 | { | |
348 | S390_lowcore.machine_flags &= ~MACHINE_FLAG_VX; | |
349 | __ctl_clear_bit(0, 17); | |
350 | return 1; | |
2e5061e4 | 351 | } |
b5510d9b | 352 | early_param("novx", disable_vector_extension); |
2e5061e4 | 353 | |
61b0b016 | 354 | static int __init cad_setup(char *str) |
2c72a44e | 355 | { |
61b0b016 MS |
356 | int val; |
357 | ||
358 | get_option(&str, &val); | |
359 | if (val && test_facility(128)) | |
360 | S390_lowcore.machine_flags |= MACHINE_FLAG_CAD; | |
2c72a44e MS |
361 | return 0; |
362 | } | |
61b0b016 | 363 | early_param("cad", cad_setup); |
2c72a44e MS |
364 | |
365 | static int __init cad_init(void) | |
366 | { | |
367 | if (MACHINE_HAS_CAD) | |
368 | /* Enable problem state CAD. */ | |
369 | __ctl_set_bit(2, 3); | |
370 | return 0; | |
371 | } | |
372 | early_initcall(cad_init); | |
373 | ||
761cdf6a HC |
374 | static __init void rescue_initrd(void) |
375 | { | |
376 | #ifdef CONFIG_BLK_DEV_INITRD | |
27e7318c | 377 | unsigned long min_initrd_addr = (unsigned long) _end + (4UL << 20); |
761cdf6a | 378 | /* |
27e7318c HC |
379 | * Just like in case of IPL from VM reader we make sure there is a |
380 | * gap of 4MB between end of kernel and start of initrd. | |
381 | * That way we can also be sure that saving an NSS will succeed, | |
382 | * which however only requires different segments. | |
761cdf6a HC |
383 | */ |
384 | if (!INITRD_START || !INITRD_SIZE) | |
385 | return; | |
27e7318c | 386 | if (INITRD_START >= min_initrd_addr) |
761cdf6a | 387 | return; |
27e7318c HC |
388 | memmove((void *) min_initrd_addr, (void *) INITRD_START, INITRD_SIZE); |
389 | INITRD_START = min_initrd_addr; | |
761cdf6a HC |
390 | #endif |
391 | } | |
392 | ||
a0443fbb | 393 | /* Set up boot command line */ |
684d2fd4 | 394 | static void __init append_to_cmdline(size_t (*ipl_data)(char *, size_t)) |
a0443fbb | 395 | { |
684d2fd4 HB |
396 | char *parm, *delim; |
397 | size_t rc, len; | |
398 | ||
399 | len = strlen(boot_command_line); | |
a0443fbb | 400 | |
684d2fd4 HB |
401 | delim = boot_command_line + len; /* '\0' character position */ |
402 | parm = boot_command_line + len + 1; /* append right after '\0' */ | |
403 | ||
404 | rc = ipl_data(parm, COMMAND_LINE_SIZE - len - 1); | |
405 | if (rc) { | |
406 | if (*parm == '=') | |
407 | memmove(boot_command_line, parm + 1, rc); | |
408 | else | |
409 | *delim = ' '; /* replace '\0' with space */ | |
410 | } | |
411 | } | |
412 | ||
1fb81057 | 413 | static inline int has_ebcdic_char(const char *str) |
684d2fd4 | 414 | { |
61fd330d MS |
415 | int i; |
416 | ||
1fb81057 MH |
417 | for (i = 0; str[i]; i++) |
418 | if (str[i] & 0x80) | |
419 | return 1; | |
420 | return 0; | |
421 | } | |
61fd330d | 422 | |
1fb81057 MH |
423 | static void __init setup_boot_command_line(void) |
424 | { | |
425 | COMMAND_LINE[ARCH_COMMAND_LINE_SIZE - 1] = 0; | |
426 | /* convert arch command line to ascii if necessary */ | |
427 | if (has_ebcdic_char(COMMAND_LINE)) | |
428 | EBCASC(COMMAND_LINE, ARCH_COMMAND_LINE_SIZE); | |
a0443fbb | 429 | /* copy arch command line */ |
61fd330d MS |
430 | strlcpy(boot_command_line, strstrip(COMMAND_LINE), |
431 | ARCH_COMMAND_LINE_SIZE); | |
a0443fbb HB |
432 | |
433 | /* append IPL PARM data to the boot command line */ | |
684d2fd4 HB |
434 | if (MACHINE_IS_VM) |
435 | append_to_cmdline(append_ipl_vmparm); | |
436 | ||
437 | append_to_cmdline(append_ipl_scpdata); | |
a0443fbb HB |
438 | } |
439 | ||
ab14de6c HC |
440 | /* |
441 | * Save ipl parameters, clear bss memory, initialize storage keys | |
442 | * and create a kernel NSS at startup if the SAVESYS= parm is defined | |
443 | */ | |
444 | void __init startup_init(void) | |
445 | { | |
b6112ccb | 446 | reset_tod_clock(); |
ab14de6c | 447 | ipl_save_parameters(); |
761cdf6a | 448 | rescue_initrd(); |
ab14de6c HC |
449 | clear_bss_section(); |
450 | init_kernel_storage_key(); | |
451 | lockdep_init(); | |
452 | lockdep_off(); | |
ab14de6c | 453 | setup_lowcore_early(); |
14375bc4 | 454 | setup_facility_list(); |
a0443fbb HB |
455 | detect_machine_type(); |
456 | ipl_update_parameters(); | |
457 | setup_boot_command_line(); | |
458 | create_kernel_nss(); | |
2e5061e4 HC |
459 | detect_diag9c(); |
460 | detect_diag44(); | |
461 | detect_machine_facilities(); | |
1a36a39e | 462 | save_vector_registers(); |
fade4dc4 | 463 | setup_topology(); |
7b50da53 | 464 | sclp_early_detect(); |
ab14de6c HC |
465 | lockdep_on(); |
466 | } |