Commit | Line | Data |
---|---|---|
1da177e4 LT |
1 | /* |
2 | * arch/s390/kernel/setup.c | |
3 | * | |
4 | * S390 version | |
5 | * Copyright (C) 1999,2000 IBM Deutschland Entwicklung GmbH, IBM Corporation | |
6 | * Author(s): Hartmut Penner (hp@de.ibm.com), | |
7 | * Martin Schwidefsky (schwidefsky@de.ibm.com) | |
8 | * | |
9 | * Derived from "arch/i386/kernel/setup.c" | |
10 | * Copyright (C) 1995, Linus Torvalds | |
11 | */ | |
12 | ||
13 | /* | |
14 | * This file handles the architecture-dependent parts of initialization | |
15 | */ | |
16 | ||
3b6ed4ab MS |
17 | #define KMSG_COMPONENT "setup" |
18 | #define pr_fmt(fmt) KMSG_COMPONENT ": " fmt | |
19 | ||
1da177e4 LT |
20 | #include <linux/errno.h> |
21 | #include <linux/module.h> | |
22 | #include <linux/sched.h> | |
23 | #include <linux/kernel.h> | |
24 | #include <linux/mm.h> | |
25 | #include <linux/stddef.h> | |
26 | #include <linux/unistd.h> | |
27 | #include <linux/ptrace.h> | |
28 | #include <linux/slab.h> | |
29 | #include <linux/user.h> | |
1da177e4 LT |
30 | #include <linux/tty.h> |
31 | #include <linux/ioport.h> | |
32 | #include <linux/delay.h> | |
1da177e4 LT |
33 | #include <linux/init.h> |
34 | #include <linux/initrd.h> | |
35 | #include <linux/bootmem.h> | |
36 | #include <linux/root_dev.h> | |
37 | #include <linux/console.h> | |
1da177e4 | 38 | #include <linux/kernel_stat.h> |
1e8e3383 | 39 | #include <linux/device.h> |
585c3047 | 40 | #include <linux/notifier.h> |
65912a84 | 41 | #include <linux/pfn.h> |
fe355b7f | 42 | #include <linux/ctype.h> |
2b67fc46 | 43 | #include <linux/reboot.h> |
dbd70fb4 | 44 | #include <linux/topology.h> |
dfd9f7ab | 45 | #include <linux/ftrace.h> |
1da177e4 | 46 | |
46b05d26 | 47 | #include <asm/ipl.h> |
1da177e4 LT |
48 | #include <asm/uaccess.h> |
49 | #include <asm/system.h> | |
50 | #include <asm/smp.h> | |
51 | #include <asm/mmu_context.h> | |
52 | #include <asm/cpcmd.h> | |
53 | #include <asm/lowcore.h> | |
54 | #include <asm/irq.h> | |
0b642ede PO |
55 | #include <asm/page.h> |
56 | #include <asm/ptrace.h> | |
cc13ad62 | 57 | #include <asm/sections.h> |
fe355b7f | 58 | #include <asm/ebcdic.h> |
c1821c2e | 59 | #include <asm/compat.h> |
faeba830 | 60 | #include <asm/kvm_virtio.h> |
c1821c2e GS |
61 | |
62 | long psw_kernel_bits = (PSW_BASE_BITS | PSW_MASK_DAT | PSW_ASC_PRIMARY | | |
63 | PSW_MASK_MCHECK | PSW_DEFAULT_KEY); | |
64 | long psw_user_bits = (PSW_BASE_BITS | PSW_MASK_DAT | PSW_ASC_HOME | | |
65 | PSW_MASK_IO | PSW_MASK_EXT | PSW_MASK_MCHECK | | |
66 | PSW_MASK_PSTATE | PSW_DEFAULT_KEY); | |
1da177e4 | 67 | |
d02765d1 GS |
68 | /* |
69 | * User copy operations. | |
70 | */ | |
71 | struct uaccess_ops uaccess; | |
d4ee453b | 72 | EXPORT_SYMBOL(uaccess); |
d02765d1 | 73 | |
1da177e4 LT |
74 | /* |
75 | * Machine setup.. | |
76 | */ | |
77 | unsigned int console_mode = 0; | |
1485c5c8 HC |
78 | EXPORT_SYMBOL(console_mode); |
79 | ||
1da177e4 | 80 | unsigned int console_devno = -1; |
1485c5c8 HC |
81 | EXPORT_SYMBOL(console_devno); |
82 | ||
1da177e4 | 83 | unsigned int console_irq = -1; |
1485c5c8 HC |
84 | EXPORT_SYMBOL(console_irq); |
85 | ||
cf8ba7a9 MS |
86 | unsigned long elf_hwcap = 0; |
87 | char elf_platform[ELF_PLATFORM_SIZE]; | |
36a2bd42 | 88 | |
23d17421 | 89 | struct mem_chunk __initdata memory_chunk[MEMORY_CHUNKS]; |
23d75d9c HC |
90 | |
91 | int __initdata memory_end_set; | |
92 | unsigned long __initdata memory_end; | |
1da177e4 | 93 | |
099b7651 FM |
94 | /* An array with a pointer to the lowcore of every CPU. */ |
95 | struct _lowcore *lowcore_ptr[NR_CPUS]; | |
96 | EXPORT_SYMBOL(lowcore_ptr); | |
97 | ||
1da177e4 LT |
98 | /* |
99 | * This is set up by the setup-routine at boot-time | |
100 | * for S390 need to find out, what we have to setup | |
101 | * using address 0x10400 ... | |
102 | */ | |
103 | ||
104 | #include <asm/setup.h> | |
105 | ||
1da177e4 LT |
106 | static struct resource code_resource = { |
107 | .name = "Kernel code", | |
108 | .flags = IORESOURCE_BUSY | IORESOURCE_MEM, | |
109 | }; | |
110 | ||
111 | static struct resource data_resource = { | |
112 | .name = "Kernel data", | |
113 | .flags = IORESOURCE_BUSY | IORESOURCE_MEM, | |
114 | }; | |
115 | ||
116 | /* | |
117 | * cpu_init() initializes state that is per-CPU. | |
118 | */ | |
ea1f4eec | 119 | void __cpuinit cpu_init(void) |
1da177e4 | 120 | { |
1da177e4 LT |
121 | /* |
122 | * Store processor id in lowcore (used e.g. in timer_interrupt) | |
123 | */ | |
7b468488 | 124 | get_cpu_id(&S390_lowcore.cpu_id); |
1da177e4 | 125 | |
1da177e4 LT |
126 | atomic_inc(&init_mm.mm_count); |
127 | current->active_mm = &init_mm; | |
6aa0d3a9 | 128 | BUG_ON(current->mm); |
1da177e4 LT |
129 | enter_lazy_tlb(&init_mm, current); |
130 | } | |
131 | ||
1da177e4 LT |
132 | /* |
133 | * condev= and conmode= setup parameter. | |
134 | */ | |
135 | ||
136 | static int __init condev_setup(char *str) | |
137 | { | |
138 | int vdev; | |
139 | ||
140 | vdev = simple_strtoul(str, &str, 0); | |
141 | if (vdev >= 0 && vdev < 65536) { | |
142 | console_devno = vdev; | |
143 | console_irq = -1; | |
144 | } | |
145 | return 1; | |
146 | } | |
147 | ||
148 | __setup("condev=", condev_setup); | |
149 | ||
637952ca HB |
150 | static void __init set_preferred_console(void) |
151 | { | |
c4de0c1a | 152 | if (MACHINE_IS_KVM) |
637952ca | 153 | add_preferred_console("hvc", 0, NULL); |
c4de0c1a | 154 | else if (CONSOLE_IS_3215 || CONSOLE_IS_SCLP) |
637952ca | 155 | add_preferred_console("ttyS", 0, NULL); |
c4de0c1a | 156 | else if (CONSOLE_IS_3270) |
637952ca HB |
157 | add_preferred_console("tty3270", 0, NULL); |
158 | } | |
159 | ||
1da177e4 LT |
160 | static int __init conmode_setup(char *str) |
161 | { | |
8c0933ee | 162 | #if defined(CONFIG_SCLP_CONSOLE) || defined(CONFIG_SCLP_VT220_CONSOLE) |
1da177e4 LT |
163 | if (strncmp(str, "hwc", 4) == 0 || strncmp(str, "sclp", 5) == 0) |
164 | SET_CONSOLE_SCLP; | |
165 | #endif | |
166 | #if defined(CONFIG_TN3215_CONSOLE) | |
167 | if (strncmp(str, "3215", 5) == 0) | |
168 | SET_CONSOLE_3215; | |
169 | #endif | |
170 | #if defined(CONFIG_TN3270_CONSOLE) | |
171 | if (strncmp(str, "3270", 5) == 0) | |
172 | SET_CONSOLE_3270; | |
173 | #endif | |
637952ca | 174 | set_preferred_console(); |
1da177e4 LT |
175 | return 1; |
176 | } | |
177 | ||
178 | __setup("conmode=", conmode_setup); | |
179 | ||
180 | static void __init conmode_default(void) | |
181 | { | |
182 | char query_buffer[1024]; | |
183 | char *ptr; | |
184 | ||
185 | if (MACHINE_IS_VM) { | |
740b5706 | 186 | cpcmd("QUERY CONSOLE", query_buffer, 1024, NULL); |
1da177e4 LT |
187 | console_devno = simple_strtoul(query_buffer + 5, NULL, 16); |
188 | ptr = strstr(query_buffer, "SUBCHANNEL ="); | |
189 | console_irq = simple_strtoul(ptr + 13, NULL, 16); | |
740b5706 | 190 | cpcmd("QUERY TERM", query_buffer, 1024, NULL); |
1da177e4 LT |
191 | ptr = strstr(query_buffer, "CONMODE"); |
192 | /* | |
193 | * Set the conmode to 3215 so that the device recognition | |
194 | * will set the cu_type of the console to 3215. If the | |
195 | * conmode is 3270 and we don't set it back then both | |
196 | * 3215 and the 3270 driver will try to access the console | |
197 | * device (3215 as console and 3270 as normal tty). | |
198 | */ | |
740b5706 | 199 | cpcmd("TERM CONMODE 3215", NULL, 0, NULL); |
1da177e4 | 200 | if (ptr == NULL) { |
8c0933ee | 201 | #if defined(CONFIG_SCLP_CONSOLE) || defined(CONFIG_SCLP_VT220_CONSOLE) |
1da177e4 LT |
202 | SET_CONSOLE_SCLP; |
203 | #endif | |
204 | return; | |
205 | } | |
206 | if (strncmp(ptr + 8, "3270", 4) == 0) { | |
207 | #if defined(CONFIG_TN3270_CONSOLE) | |
208 | SET_CONSOLE_3270; | |
209 | #elif defined(CONFIG_TN3215_CONSOLE) | |
210 | SET_CONSOLE_3215; | |
8c0933ee | 211 | #elif defined(CONFIG_SCLP_CONSOLE) || defined(CONFIG_SCLP_VT220_CONSOLE) |
1da177e4 LT |
212 | SET_CONSOLE_SCLP; |
213 | #endif | |
214 | } else if (strncmp(ptr + 8, "3215", 4) == 0) { | |
215 | #if defined(CONFIG_TN3215_CONSOLE) | |
216 | SET_CONSOLE_3215; | |
217 | #elif defined(CONFIG_TN3270_CONSOLE) | |
218 | SET_CONSOLE_3270; | |
8c0933ee | 219 | #elif defined(CONFIG_SCLP_CONSOLE) || defined(CONFIG_SCLP_VT220_CONSOLE) |
1da177e4 LT |
220 | SET_CONSOLE_SCLP; |
221 | #endif | |
222 | } | |
1da177e4 | 223 | } else { |
8c0933ee | 224 | #if defined(CONFIG_SCLP_CONSOLE) || defined(CONFIG_SCLP_VT220_CONSOLE) |
1da177e4 LT |
225 | SET_CONSOLE_SCLP; |
226 | #endif | |
227 | } | |
228 | } | |
229 | ||
59f2e69d | 230 | #ifdef CONFIG_ZFCPDUMP |
411ed322 MH |
231 | static void __init setup_zfcpdump(unsigned int console_devno) |
232 | { | |
a0443fbb | 233 | static char str[41]; |
411ed322 MH |
234 | |
235 | if (ipl_info.type != IPL_TYPE_FCP_DUMP) | |
236 | return; | |
237 | if (console_devno != -1) | |
a0443fbb | 238 | sprintf(str, " cio_ignore=all,!0.0.%04x,!0.0.%04x", |
411ed322 MH |
239 | ipl_info.data.fcp.dev_id.devno, console_devno); |
240 | else | |
a0443fbb | 241 | sprintf(str, " cio_ignore=all,!0.0.%04x", |
411ed322 | 242 | ipl_info.data.fcp.dev_id.devno); |
a0443fbb | 243 | strcat(boot_command_line, str); |
411ed322 MH |
244 | console_loglevel = 2; |
245 | } | |
246 | #else | |
247 | static inline void setup_zfcpdump(unsigned int console_devno) {} | |
248 | #endif /* CONFIG_ZFCPDUMP */ | |
249 | ||
1da177e4 LT |
250 | /* |
251 | * Reboot, halt and power_off stubs. They just call _machine_restart, | |
252 | * _machine_halt or _machine_power_off. | |
253 | */ | |
254 | ||
255 | void machine_restart(char *command) | |
256 | { | |
7aa8dac7 | 257 | if ((!in_interrupt() && !in_atomic()) || oops_in_progress) |
06fa46a2 MS |
258 | /* |
259 | * Only unblank the console if we are called in enabled | |
260 | * context or a bust_spinlocks cleared the way for us. | |
261 | */ | |
262 | console_unblank(); | |
1da177e4 LT |
263 | _machine_restart(command); |
264 | } | |
265 | ||
1da177e4 LT |
266 | void machine_halt(void) |
267 | { | |
06fa46a2 MS |
268 | if (!in_interrupt() || oops_in_progress) |
269 | /* | |
270 | * Only unblank the console if we are called in enabled | |
271 | * context or a bust_spinlocks cleared the way for us. | |
272 | */ | |
273 | console_unblank(); | |
1da177e4 LT |
274 | _machine_halt(); |
275 | } | |
276 | ||
1da177e4 LT |
277 | void machine_power_off(void) |
278 | { | |
06fa46a2 MS |
279 | if (!in_interrupt() || oops_in_progress) |
280 | /* | |
281 | * Only unblank the console if we are called in enabled | |
282 | * context or a bust_spinlocks cleared the way for us. | |
283 | */ | |
284 | console_unblank(); | |
1da177e4 LT |
285 | _machine_power_off(); |
286 | } | |
287 | ||
53df751c MS |
288 | /* |
289 | * Dummy power off function. | |
290 | */ | |
291 | void (*pm_power_off)(void) = machine_power_off; | |
292 | ||
59685296 HC |
293 | static int __init early_parse_mem(char *p) |
294 | { | |
295 | memory_end = memparse(p, &p); | |
23d75d9c | 296 | memory_end_set = 1; |
59685296 HC |
297 | return 0; |
298 | } | |
299 | early_param("mem", early_parse_mem); | |
300 | ||
b11b5334 MS |
301 | unsigned int user_mode = HOME_SPACE_MODE; |
302 | EXPORT_SYMBOL_GPL(user_mode); | |
c1821c2e | 303 | |
3b6ed4ab MS |
304 | static int set_amode_and_uaccess(unsigned long user_amode, |
305 | unsigned long user32_amode) | |
c1821c2e GS |
306 | { |
307 | psw_user_bits = PSW_BASE_BITS | PSW_MASK_DAT | user_amode | | |
308 | PSW_MASK_IO | PSW_MASK_EXT | PSW_MASK_MCHECK | | |
309 | PSW_MASK_PSTATE | PSW_DEFAULT_KEY; | |
310 | #ifdef CONFIG_COMPAT | |
311 | psw_user32_bits = PSW_BASE32_BITS | PSW_MASK_DAT | user_amode | | |
312 | PSW_MASK_IO | PSW_MASK_EXT | PSW_MASK_MCHECK | | |
313 | PSW_MASK_PSTATE | PSW_DEFAULT_KEY; | |
314 | psw32_user_bits = PSW32_BASE_BITS | PSW32_MASK_DAT | user32_amode | | |
315 | PSW32_MASK_IO | PSW32_MASK_EXT | PSW32_MASK_MCHECK | | |
316 | PSW32_MASK_PSTATE; | |
317 | #endif | |
318 | psw_kernel_bits = PSW_BASE_BITS | PSW_MASK_DAT | PSW_ASC_HOME | | |
319 | PSW_MASK_MCHECK | PSW_DEFAULT_KEY; | |
320 | ||
321 | if (MACHINE_HAS_MVCOS) { | |
c1821c2e | 322 | memcpy(&uaccess, &uaccess_mvcos_switch, sizeof(uaccess)); |
3b6ed4ab | 323 | return 1; |
c1821c2e | 324 | } else { |
c1821c2e | 325 | memcpy(&uaccess, &uaccess_pt, sizeof(uaccess)); |
3b6ed4ab | 326 | return 0; |
c1821c2e GS |
327 | } |
328 | } | |
329 | ||
330 | /* | |
331 | * Switch kernel/user addressing modes? | |
332 | */ | |
333 | static int __init early_parse_switch_amode(char *p) | |
334 | { | |
b11b5334 MS |
335 | if (user_mode != SECONDARY_SPACE_MODE) |
336 | user_mode = PRIMARY_SPACE_MODE; | |
c1821c2e GS |
337 | return 0; |
338 | } | |
339 | early_param("switch_amode", early_parse_switch_amode); | |
340 | ||
b11b5334 | 341 | static int __init early_parse_user_mode(char *p) |
c1821c2e | 342 | { |
b11b5334 MS |
343 | if (p && strcmp(p, "primary") == 0) |
344 | user_mode = PRIMARY_SPACE_MODE; | |
345 | #ifdef CONFIG_S390_EXEC_PROTECT | |
346 | else if (p && strcmp(p, "secondary") == 0) | |
347 | user_mode = SECONDARY_SPACE_MODE; | |
348 | #endif | |
349 | else if (!p || strcmp(p, "home") == 0) | |
350 | user_mode = HOME_SPACE_MODE; | |
351 | else | |
352 | return 1; | |
3b6ed4ab | 353 | return 0; |
c1821c2e | 354 | } |
b11b5334 | 355 | early_param("user_mode", early_parse_user_mode); |
c1821c2e GS |
356 | |
357 | #ifdef CONFIG_S390_EXEC_PROTECT | |
c1821c2e GS |
358 | /* |
359 | * Enable execute protection? | |
360 | */ | |
361 | static int __init early_parse_noexec(char *p) | |
362 | { | |
363 | if (!strncmp(p, "off", 3)) | |
364 | return 0; | |
b11b5334 | 365 | user_mode = SECONDARY_SPACE_MODE; |
c1821c2e GS |
366 | return 0; |
367 | } | |
368 | early_param("noexec", early_parse_noexec); | |
369 | #endif /* CONFIG_S390_EXEC_PROTECT */ | |
370 | ||
371 | static void setup_addressing_mode(void) | |
372 | { | |
b11b5334 | 373 | if (user_mode == SECONDARY_SPACE_MODE) { |
3b6ed4ab MS |
374 | if (set_amode_and_uaccess(PSW_ASC_SECONDARY, |
375 | PSW32_ASC_SECONDARY)) | |
376 | pr_info("Execute protection active, " | |
377 | "mvcos available\n"); | |
378 | else | |
379 | pr_info("Execute protection active, " | |
380 | "mvcos not available\n"); | |
b11b5334 | 381 | } else if (user_mode == PRIMARY_SPACE_MODE) { |
3b6ed4ab MS |
382 | if (set_amode_and_uaccess(PSW_ASC_PRIMARY, PSW32_ASC_PRIMARY)) |
383 | pr_info("Address spaces switched, " | |
384 | "mvcos available\n"); | |
385 | else | |
386 | pr_info("Address spaces switched, " | |
387 | "mvcos not available\n"); | |
c1821c2e | 388 | } |
411788ea HC |
389 | #ifdef CONFIG_TRACE_IRQFLAGS |
390 | sysc_restore_trace_psw.mask = psw_kernel_bits & ~PSW_MASK_MCHECK; | |
391 | io_restore_trace_psw.mask = psw_kernel_bits & ~PSW_MASK_MCHECK; | |
392 | #endif | |
c1821c2e GS |
393 | } |
394 | ||
c9e37353 HC |
395 | static void __init |
396 | setup_lowcore(void) | |
397 | { | |
398 | struct _lowcore *lc; | |
399 | int lc_pages; | |
400 | ||
401 | /* | |
402 | * Setup lowcore for boot cpu | |
403 | */ | |
404 | lc_pages = sizeof(void *) == 8 ? 2 : 1; | |
405 | lc = (struct _lowcore *) | |
406 | __alloc_bootmem(lc_pages * PAGE_SIZE, lc_pages * PAGE_SIZE, 0); | |
407 | memset(lc, 0, lc_pages * PAGE_SIZE); | |
0b642ede | 408 | lc->restart_psw.mask = PSW_BASE_BITS | PSW_DEFAULT_KEY; |
c9e37353 HC |
409 | lc->restart_psw.addr = |
410 | PSW_ADDR_AMODE | (unsigned long) restart_int_handler; | |
b11b5334 | 411 | if (user_mode != HOME_SPACE_MODE) |
c1821c2e GS |
412 | lc->restart_psw.mask |= PSW_ASC_HOME; |
413 | lc->external_new_psw.mask = psw_kernel_bits; | |
c9e37353 HC |
414 | lc->external_new_psw.addr = |
415 | PSW_ADDR_AMODE | (unsigned long) ext_int_handler; | |
c1821c2e | 416 | lc->svc_new_psw.mask = psw_kernel_bits | PSW_MASK_IO | PSW_MASK_EXT; |
c9e37353 | 417 | lc->svc_new_psw.addr = PSW_ADDR_AMODE | (unsigned long) system_call; |
c1821c2e | 418 | lc->program_new_psw.mask = psw_kernel_bits; |
c9e37353 HC |
419 | lc->program_new_psw.addr = |
420 | PSW_ADDR_AMODE | (unsigned long)pgm_check_handler; | |
77fa2245 | 421 | lc->mcck_new_psw.mask = |
c1821c2e | 422 | psw_kernel_bits & ~PSW_MASK_MCHECK & ~PSW_MASK_DAT; |
c9e37353 HC |
423 | lc->mcck_new_psw.addr = |
424 | PSW_ADDR_AMODE | (unsigned long) mcck_int_handler; | |
c1821c2e | 425 | lc->io_new_psw.mask = psw_kernel_bits; |
c9e37353 | 426 | lc->io_new_psw.addr = PSW_ADDR_AMODE | (unsigned long) io_int_handler; |
5a62b192 | 427 | lc->clock_comparator = -1ULL; |
c9e37353 HC |
428 | lc->kernel_stack = ((unsigned long) &init_thread_union) + THREAD_SIZE; |
429 | lc->async_stack = (unsigned long) | |
430 | __alloc_bootmem(ASYNC_SIZE, ASYNC_SIZE, 0) + ASYNC_SIZE; | |
c9e37353 HC |
431 | lc->panic_stack = (unsigned long) |
432 | __alloc_bootmem(PAGE_SIZE, PAGE_SIZE, 0) + PAGE_SIZE; | |
c9e37353 HC |
433 | lc->current_task = (unsigned long) init_thread_union.thread_info.task; |
434 | lc->thread_info = (unsigned long) &init_thread_union; | |
25097bf1 | 435 | lc->machine_flags = S390_lowcore.machine_flags; |
347a8dc3 | 436 | #ifndef CONFIG_64BIT |
77fa2245 HC |
437 | if (MACHINE_HAS_IEEE) { |
438 | lc->extended_save_area_addr = (__u32) | |
439 | __alloc_bootmem(PAGE_SIZE, PAGE_SIZE, 0); | |
440 | /* enable extended save area */ | |
c4972f33 | 441 | __ctl_set_bit(14, 29); |
77fa2245 | 442 | } |
c742b31c MS |
443 | #else |
444 | lc->vdso_per_cpu_data = (unsigned long) &lc->paste[0]; | |
77fa2245 | 445 | #endif |
ab96e798 MS |
446 | lc->sync_enter_timer = S390_lowcore.sync_enter_timer; |
447 | lc->async_enter_timer = S390_lowcore.async_enter_timer; | |
448 | lc->exit_timer = S390_lowcore.exit_timer; | |
449 | lc->user_timer = S390_lowcore.user_timer; | |
450 | lc->system_timer = S390_lowcore.system_timer; | |
451 | lc->steal_timer = S390_lowcore.steal_timer; | |
452 | lc->last_update_timer = S390_lowcore.last_update_timer; | |
453 | lc->last_update_clock = S390_lowcore.last_update_clock; | |
dfd9f7ab | 454 | lc->ftrace_func = S390_lowcore.ftrace_func; |
c9e37353 | 455 | set_prefix((u32)(unsigned long) lc); |
099b7651 | 456 | lowcore_ptr[0] = lc; |
c9e37353 HC |
457 | } |
458 | ||
459 | static void __init | |
460 | setup_resources(void) | |
461 | { | |
fe355b7f | 462 | struct resource *res, *sub_res; |
c9e37353 HC |
463 | int i; |
464 | ||
cc13ad62 HC |
465 | code_resource.start = (unsigned long) &_text; |
466 | code_resource.end = (unsigned long) &_etext - 1; | |
467 | data_resource.start = (unsigned long) &_etext; | |
468 | data_resource.end = (unsigned long) &_edata - 1; | |
469 | ||
9f4b0ba8 HC |
470 | for (i = 0; i < MEMORY_CHUNKS; i++) { |
471 | if (!memory_chunk[i].size) | |
472 | continue; | |
c9e37353 HC |
473 | res = alloc_bootmem_low(sizeof(struct resource)); |
474 | res->flags = IORESOURCE_BUSY | IORESOURCE_MEM; | |
475 | switch (memory_chunk[i].type) { | |
476 | case CHUNK_READ_WRITE: | |
477 | res->name = "System RAM"; | |
478 | break; | |
479 | case CHUNK_READ_ONLY: | |
480 | res->name = "System ROM"; | |
481 | res->flags |= IORESOURCE_READONLY; | |
482 | break; | |
483 | default: | |
484 | res->name = "reserved"; | |
485 | } | |
486 | res->start = memory_chunk[i].addr; | |
487 | res->end = memory_chunk[i].addr + memory_chunk[i].size - 1; | |
488 | request_resource(&iomem_resource, res); | |
fe355b7f HY |
489 | |
490 | if (code_resource.start >= res->start && | |
491 | code_resource.start <= res->end && | |
492 | code_resource.end > res->end) { | |
493 | sub_res = alloc_bootmem_low(sizeof(struct resource)); | |
494 | memcpy(sub_res, &code_resource, | |
495 | sizeof(struct resource)); | |
496 | sub_res->end = res->end; | |
497 | code_resource.start = res->end + 1; | |
498 | request_resource(res, sub_res); | |
499 | } | |
500 | ||
501 | if (code_resource.start >= res->start && | |
502 | code_resource.start <= res->end && | |
503 | code_resource.end <= res->end) | |
504 | request_resource(res, &code_resource); | |
505 | ||
506 | if (data_resource.start >= res->start && | |
507 | data_resource.start <= res->end && | |
508 | data_resource.end > res->end) { | |
509 | sub_res = alloc_bootmem_low(sizeof(struct resource)); | |
510 | memcpy(sub_res, &data_resource, | |
511 | sizeof(struct resource)); | |
512 | sub_res->end = res->end; | |
513 | data_resource.start = res->end + 1; | |
514 | request_resource(res, sub_res); | |
515 | } | |
516 | ||
517 | if (data_resource.start >= res->start && | |
518 | data_resource.start <= res->end && | |
519 | data_resource.end <= res->end) | |
520 | request_resource(res, &data_resource); | |
c9e37353 HC |
521 | } |
522 | } | |
523 | ||
411ed322 MH |
524 | unsigned long real_memory_size; |
525 | EXPORT_SYMBOL_GPL(real_memory_size); | |
526 | ||
8b62bc96 HC |
527 | static void __init setup_memory_end(void) |
528 | { | |
411ed322 | 529 | unsigned long memory_size; |
5fd9c6e2 | 530 | unsigned long max_mem; |
8b62bc96 HC |
531 | int i; |
532 | ||
59f2e69d | 533 | #ifdef CONFIG_ZFCPDUMP |
23d75d9c | 534 | if (ipl_info.type == IPL_TYPE_FCP_DUMP) { |
411ed322 | 535 | memory_end = ZFCPDUMP_HSA_SIZE; |
23d75d9c HC |
536 | memory_end_set = 1; |
537 | } | |
411ed322 MH |
538 | #endif |
539 | memory_size = 0; | |
8b62bc96 HC |
540 | memory_end &= PAGE_MASK; |
541 | ||
0189103c | 542 | max_mem = memory_end ? min(VMEM_MAX_PHYS, memory_end) : VMEM_MAX_PHYS; |
5fd9c6e2 | 543 | memory_end = min(max_mem, memory_end); |
8b62bc96 | 544 | |
9f4b0ba8 HC |
545 | /* |
546 | * Make sure all chunks are MAX_ORDER aligned so we don't need the | |
547 | * extra checks that HOLES_IN_ZONE would require. | |
548 | */ | |
549 | for (i = 0; i < MEMORY_CHUNKS; i++) { | |
550 | unsigned long start, end; | |
551 | struct mem_chunk *chunk; | |
552 | unsigned long align; | |
553 | ||
554 | chunk = &memory_chunk[i]; | |
555 | align = 1UL << (MAX_ORDER + PAGE_SHIFT - 1); | |
556 | start = (chunk->addr + align - 1) & ~(align - 1); | |
557 | end = (chunk->addr + chunk->size) & ~(align - 1); | |
558 | if (start >= end) | |
559 | memset(chunk, 0, sizeof(*chunk)); | |
560 | else { | |
561 | chunk->addr = start; | |
562 | chunk->size = end - start; | |
563 | } | |
564 | } | |
565 | ||
8b62bc96 HC |
566 | for (i = 0; i < MEMORY_CHUNKS; i++) { |
567 | struct mem_chunk *chunk = &memory_chunk[i]; | |
568 | ||
411ed322 MH |
569 | real_memory_size = max(real_memory_size, |
570 | chunk->addr + chunk->size); | |
8b62bc96 HC |
571 | if (chunk->addr >= max_mem) { |
572 | memset(chunk, 0, sizeof(*chunk)); | |
573 | continue; | |
574 | } | |
575 | if (chunk->addr + chunk->size > max_mem) | |
576 | chunk->size = max_mem - chunk->addr; | |
577 | memory_size = max(memory_size, chunk->addr + chunk->size); | |
578 | } | |
579 | if (!memory_end) | |
580 | memory_end = memory_size; | |
8b62bc96 HC |
581 | } |
582 | ||
c9e37353 HC |
583 | static void __init |
584 | setup_memory(void) | |
585 | { | |
586 | unsigned long bootmap_size; | |
fe355b7f | 587 | unsigned long start_pfn, end_pfn; |
c9e37353 | 588 | int i; |
1da177e4 LT |
589 | |
590 | /* | |
591 | * partially used pages are not usable - thus | |
592 | * we are rounding upwards: | |
593 | */ | |
65912a84 HC |
594 | start_pfn = PFN_UP(__pa(&_end)); |
595 | end_pfn = max_pfn = PFN_DOWN(memory_end); | |
1da177e4 | 596 | |
65912a84 HC |
597 | #ifdef CONFIG_BLK_DEV_INITRD |
598 | /* | |
599 | * Move the initrd in case the bitmap of the bootmem allocater | |
600 | * would overwrite it. | |
601 | */ | |
602 | ||
603 | if (INITRD_START && INITRD_SIZE) { | |
604 | unsigned long bmap_size; | |
605 | unsigned long start; | |
606 | ||
607 | bmap_size = bootmem_bootmap_pages(end_pfn - start_pfn + 1); | |
608 | bmap_size = PFN_PHYS(bmap_size); | |
609 | ||
610 | if (PFN_PHYS(start_pfn) + bmap_size > INITRD_START) { | |
611 | start = PFN_PHYS(start_pfn) + bmap_size + PAGE_SIZE; | |
612 | ||
613 | if (start + INITRD_SIZE > memory_end) { | |
3b6ed4ab MS |
614 | pr_err("initrd extends beyond end of " |
615 | "memory (0x%08lx > 0x%08lx) " | |
65912a84 HC |
616 | "disabling initrd\n", |
617 | start + INITRD_SIZE, memory_end); | |
618 | INITRD_START = INITRD_SIZE = 0; | |
619 | } else { | |
3b6ed4ab MS |
620 | pr_info("Moving initrd (0x%08lx -> " |
621 | "0x%08lx, size: %ld)\n", | |
622 | INITRD_START, start, INITRD_SIZE); | |
65912a84 HC |
623 | memmove((void *) start, (void *) INITRD_START, |
624 | INITRD_SIZE); | |
625 | INITRD_START = start; | |
626 | } | |
627 | } | |
628 | } | |
629 | #endif | |
630 | ||
1da177e4 | 631 | /* |
7676bef9 | 632 | * Initialize the boot-time allocator |
1da177e4 LT |
633 | */ |
634 | bootmap_size = init_bootmem(start_pfn, end_pfn); | |
635 | ||
636 | /* | |
637 | * Register RAM areas with the bootmem allocator. | |
638 | */ | |
c9e37353 | 639 | |
0b642ede | 640 | for (i = 0; i < MEMORY_CHUNKS && memory_chunk[i].size > 0; i++) { |
39b742f9 | 641 | unsigned long start_chunk, end_chunk, pfn; |
1da177e4 LT |
642 | |
643 | if (memory_chunk[i].type != CHUNK_READ_WRITE) | |
644 | continue; | |
39b742f9 | 645 | start_chunk = PFN_DOWN(memory_chunk[i].addr); |
fb2e7c5e | 646 | end_chunk = start_chunk + PFN_DOWN(memory_chunk[i].size); |
39b742f9 HC |
647 | end_chunk = min(end_chunk, end_pfn); |
648 | if (start_chunk >= end_chunk) | |
649 | continue; | |
650 | add_active_range(0, start_chunk, end_chunk); | |
651 | pfn = max(start_chunk, start_pfn); | |
fb2e7c5e | 652 | for (; pfn < end_chunk; pfn++) |
39b742f9 | 653 | page_set_storage_key(PFN_PHYS(pfn), PAGE_DEFAULT_KEY); |
1da177e4 LT |
654 | } |
655 | ||
0b642ede PO |
656 | psw_set_key(PAGE_DEFAULT_KEY); |
657 | ||
39b742f9 | 658 | free_bootmem_with_active_regions(0, max_pfn); |
c9e37353 | 659 | |
615b04b3 HC |
660 | /* |
661 | * Reserve memory used for lowcore/command line/kernel image. | |
662 | */ | |
72a7fe39 | 663 | reserve_bootmem(0, (unsigned long)_ehead, BOOTMEM_DEFAULT); |
615b04b3 | 664 | reserve_bootmem((unsigned long)_stext, |
72a7fe39 BW |
665 | PFN_PHYS(start_pfn) - (unsigned long)_stext, |
666 | BOOTMEM_DEFAULT); | |
c9e37353 HC |
667 | /* |
668 | * Reserve the bootmem bitmap itself as well. We do this in two | |
669 | * steps (first step was init_bootmem()) because this catches | |
670 | * the (very unlikely) case of us accidentally initializing the | |
671 | * bootmem allocator with an invalid RAM area. | |
672 | */ | |
72a7fe39 BW |
673 | reserve_bootmem(start_pfn << PAGE_SHIFT, bootmap_size, |
674 | BOOTMEM_DEFAULT); | |
1da177e4 LT |
675 | |
676 | #ifdef CONFIG_BLK_DEV_INITRD | |
65912a84 | 677 | if (INITRD_START && INITRD_SIZE) { |
1da177e4 | 678 | if (INITRD_START + INITRD_SIZE <= memory_end) { |
72a7fe39 BW |
679 | reserve_bootmem(INITRD_START, INITRD_SIZE, |
680 | BOOTMEM_DEFAULT); | |
1da177e4 LT |
681 | initrd_start = INITRD_START; |
682 | initrd_end = initrd_start + INITRD_SIZE; | |
683 | } else { | |
3b6ed4ab MS |
684 | pr_err("initrd extends beyond end of " |
685 | "memory (0x%08lx > 0x%08lx) " | |
686 | "disabling initrd\n", | |
c9e37353 HC |
687 | initrd_start + INITRD_SIZE, memory_end); |
688 | initrd_start = initrd_end = 0; | |
1da177e4 | 689 | } |
c9e37353 | 690 | } |
1da177e4 | 691 | #endif |
c9e37353 | 692 | } |
1da177e4 | 693 | |
cf8ba7a9 MS |
694 | /* |
695 | * Setup hardware capabilities. | |
696 | */ | |
697 | static void __init setup_hwcaps(void) | |
698 | { | |
699 | static const int stfl_bits[6] = { 0, 2, 7, 17, 19, 21 }; | |
cf8ba7a9 MS |
700 | unsigned long long facility_list_extended; |
701 | unsigned int facility_list; | |
702 | int i; | |
703 | ||
704 | facility_list = stfl(); | |
705 | /* | |
706 | * The store facility list bits numbers as found in the principles | |
707 | * of operation are numbered with bit 1UL<<31 as number 0 to | |
708 | * bit 1UL<<0 as number 31. | |
709 | * Bit 0: instructions named N3, "backported" to esa-mode | |
710 | * Bit 2: z/Architecture mode is active | |
711 | * Bit 7: the store-facility-list-extended facility is installed | |
712 | * Bit 17: the message-security assist is installed | |
713 | * Bit 19: the long-displacement facility is installed | |
714 | * Bit 21: the extended-immediate facility is installed | |
488253ce AK |
715 | * Bit 22: extended-translation facility 3 is installed |
716 | * Bit 30: extended-translation facility 3 enhancement facility | |
cf8ba7a9 MS |
717 | * These get translated to: |
718 | * HWCAP_S390_ESAN3 bit 0, HWCAP_S390_ZARCH bit 1, | |
719 | * HWCAP_S390_STFLE bit 2, HWCAP_S390_MSA bit 3, | |
488253ce AK |
720 | * HWCAP_S390_LDISP bit 4, HWCAP_S390_EIMM bit 5 and |
721 | * HWCAP_S390_ETF3EH bit 8 (22 && 30). | |
cf8ba7a9 MS |
722 | */ |
723 | for (i = 0; i < 6; i++) | |
724 | if (facility_list & (1UL << (31 - stfl_bits[i]))) | |
725 | elf_hwcap |= 1UL << i; | |
726 | ||
488253ce AK |
727 | if ((facility_list & (1UL << (31 - 22))) |
728 | && (facility_list & (1UL << (31 - 30)))) | |
ea2a4d3a | 729 | elf_hwcap |= HWCAP_S390_ETF3EH; |
488253ce | 730 | |
cf8ba7a9 MS |
731 | /* |
732 | * Check for additional facilities with store-facility-list-extended. | |
733 | * stfle stores doublewords (8 byte) with bit 1ULL<<63 as bit 0 | |
734 | * and 1ULL<<0 as bit 63. Bits 0-31 contain the same information | |
735 | * as stored by stfl, bits 32-xxx contain additional facilities. | |
736 | * How many facility words are stored depends on the number of | |
737 | * doublewords passed to the instruction. The additional facilites | |
738 | * are: | |
2ac3307f CE |
739 | * Bit 42: decimal floating point facility is installed |
740 | * Bit 44: perform floating point operation facility is installed | |
cf8ba7a9 | 741 | * translated to: |
488253ce | 742 | * HWCAP_S390_DFP bit 6 (42 && 44). |
cf8ba7a9 MS |
743 | */ |
744 | if ((elf_hwcap & (1UL << 2)) && | |
7b758389 | 745 | __stfle(&facility_list_extended, 1) > 0) { |
2ac3307f | 746 | if ((facility_list_extended & (1ULL << (63 - 42))) |
488253ce | 747 | && (facility_list_extended & (1ULL << (63 - 44)))) |
ea2a4d3a | 748 | elf_hwcap |= HWCAP_S390_DFP; |
cf8ba7a9 MS |
749 | } |
750 | ||
ea2a4d3a HC |
751 | /* |
752 | * Huge page support HWCAP_S390_HPAGE is bit 7. | |
753 | */ | |
53492b1d | 754 | if (MACHINE_HAS_HPAGE) |
ea2a4d3a HC |
755 | elf_hwcap |= HWCAP_S390_HPAGE; |
756 | ||
757 | /* | |
758 | * 64-bit register support for 31-bit processes | |
759 | * HWCAP_S390_HIGH_GPRS is bit 9. | |
760 | */ | |
761 | elf_hwcap |= HWCAP_S390_HIGH_GPRS; | |
53492b1d | 762 | |
7b468488 | 763 | switch (S390_lowcore.cpu_id.machine) { |
cf8ba7a9 MS |
764 | case 0x9672: |
765 | #if !defined(CONFIG_64BIT) | |
766 | default: /* Use "g5" as default for 31 bit kernels. */ | |
767 | #endif | |
768 | strcpy(elf_platform, "g5"); | |
769 | break; | |
770 | case 0x2064: | |
771 | case 0x2066: | |
772 | #if defined(CONFIG_64BIT) | |
773 | default: /* Use "z900" as default for 64 bit kernels. */ | |
774 | #endif | |
775 | strcpy(elf_platform, "z900"); | |
776 | break; | |
777 | case 0x2084: | |
778 | case 0x2086: | |
779 | strcpy(elf_platform, "z990"); | |
780 | break; | |
781 | case 0x2094: | |
9fee8db2 | 782 | case 0x2096: |
cf8ba7a9 MS |
783 | strcpy(elf_platform, "z9-109"); |
784 | break; | |
9fee8db2 MS |
785 | case 0x2097: |
786 | case 0x2098: | |
787 | strcpy(elf_platform, "z10"); | |
788 | break; | |
cf8ba7a9 MS |
789 | } |
790 | } | |
791 | ||
c9e37353 HC |
792 | /* |
793 | * Setup function called from init/main.c just after the banner | |
794 | * was printed. | |
795 | */ | |
1da177e4 | 796 | |
c9e37353 HC |
797 | void __init |
798 | setup_arch(char **cmdline_p) | |
799 | { | |
1da177e4 | 800 | /* |
c9e37353 | 801 | * print what head.S has found out about the machine |
1da177e4 | 802 | */ |
347a8dc3 | 803 | #ifndef CONFIG_64BIT |
3b6ed4ab MS |
804 | if (MACHINE_IS_VM) |
805 | pr_info("Linux is running as a z/VM " | |
806 | "guest operating system in 31-bit mode\n"); | |
807 | else | |
808 | pr_info("Linux is running natively in 31-bit mode\n"); | |
809 | if (MACHINE_HAS_IEEE) | |
810 | pr_info("The hardware system has IEEE compatible " | |
811 | "floating point units\n"); | |
812 | else | |
813 | pr_info("The hardware system has no IEEE compatible " | |
814 | "floating point units\n"); | |
347a8dc3 | 815 | #else /* CONFIG_64BIT */ |
fa587743 | 816 | if (MACHINE_IS_VM) |
3b6ed4ab MS |
817 | pr_info("Linux is running as a z/VM " |
818 | "guest operating system in 64-bit mode\n"); | |
637952ca | 819 | else if (MACHINE_IS_KVM) |
3b6ed4ab | 820 | pr_info("Linux is running under KVM in 64-bit mode\n"); |
637952ca | 821 | else |
3b6ed4ab | 822 | pr_info("Linux is running natively in 64-bit mode\n"); |
347a8dc3 | 823 | #endif /* CONFIG_64BIT */ |
c9e37353 | 824 | |
a0443fbb HB |
825 | /* Have one command line that is parsed and saved in /proc/cmdline */ |
826 | /* boot_command_line has been already set up in early.c */ | |
827 | *cmdline_p = boot_command_line; | |
59685296 | 828 | |
c9e37353 | 829 | ROOT_DEV = Root_RAM0; |
59685296 HC |
830 | |
831 | init_mm.start_code = PAGE_OFFSET; | |
832 | init_mm.end_code = (unsigned long) &_etext; | |
833 | init_mm.end_data = (unsigned long) &_edata; | |
834 | init_mm.brk = (unsigned long) &_end; | |
835 | ||
6c2a9e6d GS |
836 | if (MACHINE_HAS_MVCOS) |
837 | memcpy(&uaccess, &uaccess_mvcos, sizeof(uaccess)); | |
838 | else | |
839 | memcpy(&uaccess, &uaccess_std, sizeof(uaccess)); | |
840 | ||
59685296 HC |
841 | parse_early_param(); |
842 | ||
99ca4e58 | 843 | setup_ipl(); |
8b62bc96 | 844 | setup_memory_end(); |
c1821c2e | 845 | setup_addressing_mode(); |
c9e37353 HC |
846 | setup_memory(); |
847 | setup_resources(); | |
848 | setup_lowcore(); | |
849 | ||
1da177e4 | 850 | cpu_init(); |
dbd70fb4 | 851 | s390_init_cpu_topology(); |
1da177e4 | 852 | |
cf8ba7a9 MS |
853 | /* |
854 | * Setup capabilities (ELF_HWCAP & ELF_PLATFORM). | |
855 | */ | |
856 | setup_hwcaps(); | |
857 | ||
1da177e4 LT |
858 | /* |
859 | * Create kernel page tables and switch to virtual addressing. | |
860 | */ | |
861 | paging_init(); | |
862 | ||
863 | /* Setup default console */ | |
864 | conmode_default(); | |
637952ca | 865 | set_preferred_console(); |
411ed322 MH |
866 | |
867 | /* Setup zfcpdump support */ | |
868 | setup_zfcpdump(console_devno); | |
1da177e4 | 869 | } |