2 * arch/s390/kernel/setup.c
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)
9 * Derived from "arch/i386/kernel/setup.c"
10 * Copyright (C) 1995, Linus Torvalds
14 * This file handles the architecture-dependent parts of initialization
17 #include <linux/errno.h>
18 #include <linux/module.h>
19 #include <linux/sched.h>
20 #include <linux/kernel.h>
22 #include <linux/stddef.h>
23 #include <linux/unistd.h>
24 #include <linux/ptrace.h>
25 #include <linux/slab.h>
26 #include <linux/user.h>
27 #include <linux/a.out.h>
28 #include <linux/tty.h>
29 #include <linux/ioport.h>
30 #include <linux/delay.h>
31 #include <linux/init.h>
32 #include <linux/initrd.h>
33 #include <linux/bootmem.h>
34 #include <linux/root_dev.h>
35 #include <linux/console.h>
36 #include <linux/seq_file.h>
37 #include <linux/kernel_stat.h>
38 #include <linux/device.h>
39 #include <linux/notifier.h>
40 #include <linux/pfn.h>
41 #include <linux/ctype.h>
42 #include <linux/reboot.h>
45 #include <asm/uaccess.h>
46 #include <asm/system.h>
48 #include <asm/mmu_context.h>
49 #include <asm/cpcmd.h>
50 #include <asm/lowcore.h>
53 #include <asm/ptrace.h>
54 #include <asm/sections.h>
55 #include <asm/ebcdic.h>
56 #include <asm/compat.h>
58 long psw_kernel_bits
= (PSW_BASE_BITS
| PSW_MASK_DAT
| PSW_ASC_PRIMARY
|
59 PSW_MASK_MCHECK
| PSW_DEFAULT_KEY
);
60 long psw_user_bits
= (PSW_BASE_BITS
| PSW_MASK_DAT
| PSW_ASC_HOME
|
61 PSW_MASK_IO
| PSW_MASK_EXT
| PSW_MASK_MCHECK
|
62 PSW_MASK_PSTATE
| PSW_DEFAULT_KEY
);
65 * User copy operations.
67 struct uaccess_ops uaccess
;
68 EXPORT_SYMBOL(uaccess
);
73 unsigned int console_mode
= 0;
74 unsigned int console_devno
= -1;
75 unsigned int console_irq
= -1;
76 unsigned long machine_flags
= 0;
77 unsigned long elf_hwcap
= 0;
78 char elf_platform
[ELF_PLATFORM_SIZE
];
80 struct mem_chunk __initdata memory_chunk
[MEMORY_CHUNKS
];
81 volatile int __cpu_logical_map
[NR_CPUS
]; /* logical cpu to cpu address */
82 static unsigned long __initdata memory_end
;
85 * This is set up by the setup-routine at boot-time
86 * for S390 need to find out, what we have to setup
87 * using address 0x10400 ...
90 #include <asm/setup.h>
92 static struct resource code_resource
= {
93 .name
= "Kernel code",
94 .flags
= IORESOURCE_BUSY
| IORESOURCE_MEM
,
97 static struct resource data_resource
= {
98 .name
= "Kernel data",
99 .flags
= IORESOURCE_BUSY
| IORESOURCE_MEM
,
103 * cpu_init() initializes state that is per-CPU.
105 void __cpuinit
cpu_init(void)
107 int addr
= hard_smp_processor_id();
110 * Store processor id in lowcore (used e.g. in timer_interrupt)
112 get_cpu_id(&S390_lowcore
.cpu_data
.cpu_id
);
113 S390_lowcore
.cpu_data
.cpu_addr
= addr
;
116 * Force FPU initialization:
118 clear_thread_flag(TIF_USEDFPU
);
121 atomic_inc(&init_mm
.mm_count
);
122 current
->active_mm
= &init_mm
;
125 enter_lazy_tlb(&init_mm
, current
);
129 * VM halt and poweroff setup routines
131 char vmhalt_cmd
[128] = "";
132 char vmpoff_cmd
[128] = "";
133 static char vmpanic_cmd
[128] = "";
135 static void strncpy_skip_quote(char *dst
, char *src
, int n
)
140 for (sx
= 0; src
[sx
] != 0; sx
++) {
141 if (src
[sx
] == '"') continue;
147 static int __init
vmhalt_setup(char *str
)
149 strncpy_skip_quote(vmhalt_cmd
, str
, 127);
154 __setup("vmhalt=", vmhalt_setup
);
156 static int __init
vmpoff_setup(char *str
)
158 strncpy_skip_quote(vmpoff_cmd
, str
, 127);
163 __setup("vmpoff=", vmpoff_setup
);
165 static int vmpanic_notify(struct notifier_block
*self
, unsigned long event
,
168 if (MACHINE_IS_VM
&& strlen(vmpanic_cmd
) > 0)
169 cpcmd(vmpanic_cmd
, NULL
, 0, NULL
);
174 #define PANIC_PRI_VMPANIC 0
176 static struct notifier_block vmpanic_nb
= {
177 .notifier_call
= vmpanic_notify
,
178 .priority
= PANIC_PRI_VMPANIC
181 static int __init
vmpanic_setup(char *str
)
183 static int register_done __initdata
= 0;
185 strncpy_skip_quote(vmpanic_cmd
, str
, 127);
186 vmpanic_cmd
[127] = 0;
187 if (!register_done
) {
189 atomic_notifier_chain_register(&panic_notifier_list
,
195 __setup("vmpanic=", vmpanic_setup
);
198 * condev= and conmode= setup parameter.
201 static int __init
condev_setup(char *str
)
205 vdev
= simple_strtoul(str
, &str
, 0);
206 if (vdev
>= 0 && vdev
< 65536) {
207 console_devno
= vdev
;
213 __setup("condev=", condev_setup
);
215 static int __init
conmode_setup(char *str
)
217 #if defined(CONFIG_SCLP_CONSOLE)
218 if (strncmp(str
, "hwc", 4) == 0 || strncmp(str
, "sclp", 5) == 0)
221 #if defined(CONFIG_TN3215_CONSOLE)
222 if (strncmp(str
, "3215", 5) == 0)
225 #if defined(CONFIG_TN3270_CONSOLE)
226 if (strncmp(str
, "3270", 5) == 0)
232 __setup("conmode=", conmode_setup
);
234 static void __init
conmode_default(void)
236 char query_buffer
[1024];
240 cpcmd("QUERY CONSOLE", query_buffer
, 1024, NULL
);
241 console_devno
= simple_strtoul(query_buffer
+ 5, NULL
, 16);
242 ptr
= strstr(query_buffer
, "SUBCHANNEL =");
243 console_irq
= simple_strtoul(ptr
+ 13, NULL
, 16);
244 cpcmd("QUERY TERM", query_buffer
, 1024, NULL
);
245 ptr
= strstr(query_buffer
, "CONMODE");
247 * Set the conmode to 3215 so that the device recognition
248 * will set the cu_type of the console to 3215. If the
249 * conmode is 3270 and we don't set it back then both
250 * 3215 and the 3270 driver will try to access the console
251 * device (3215 as console and 3270 as normal tty).
253 cpcmd("TERM CONMODE 3215", NULL
, 0, NULL
);
255 #if defined(CONFIG_SCLP_CONSOLE)
260 if (strncmp(ptr
+ 8, "3270", 4) == 0) {
261 #if defined(CONFIG_TN3270_CONSOLE)
263 #elif defined(CONFIG_TN3215_CONSOLE)
265 #elif defined(CONFIG_SCLP_CONSOLE)
268 } else if (strncmp(ptr
+ 8, "3215", 4) == 0) {
269 #if defined(CONFIG_TN3215_CONSOLE)
271 #elif defined(CONFIG_TN3270_CONSOLE)
273 #elif defined(CONFIG_SCLP_CONSOLE)
277 } else if (MACHINE_IS_P390
) {
278 #if defined(CONFIG_TN3215_CONSOLE)
280 #elif defined(CONFIG_TN3270_CONSOLE)
284 #if defined(CONFIG_SCLP_CONSOLE)
290 #if defined(CONFIG_ZFCPDUMP) || defined(CONFIG_ZFCPDUMP_MODULE)
291 static void __init
setup_zfcpdump(unsigned int console_devno
)
295 if (ipl_info
.type
!= IPL_TYPE_FCP_DUMP
)
297 if (console_devno
!= -1)
298 sprintf(str
, "cio_ignore=all,!0.0.%04x,!0.0.%04x",
299 ipl_info
.data
.fcp
.dev_id
.devno
, console_devno
);
301 sprintf(str
, "cio_ignore=all,!0.0.%04x",
302 ipl_info
.data
.fcp
.dev_id
.devno
);
303 strcat(COMMAND_LINE
, " ");
304 strcat(COMMAND_LINE
, str
);
305 console_loglevel
= 2;
308 static inline void setup_zfcpdump(unsigned int console_devno
) {}
309 #endif /* CONFIG_ZFCPDUMP */
312 void (*_machine_restart
)(char *command
) = machine_restart_smp
;
313 void (*_machine_halt
)(void) = machine_halt_smp
;
314 void (*_machine_power_off
)(void) = machine_power_off_smp
;
317 * Reboot, halt and power_off routines for non SMP.
319 static void do_machine_restart_nonsmp(char * __unused
)
324 static void do_machine_halt_nonsmp(void)
326 if (MACHINE_IS_VM
&& strlen(vmhalt_cmd
) > 0)
327 __cpcmd(vmhalt_cmd
, NULL
, 0, NULL
);
328 signal_processor(smp_processor_id(), sigp_stop_and_store_status
);
331 static void do_machine_power_off_nonsmp(void)
333 if (MACHINE_IS_VM
&& strlen(vmpoff_cmd
) > 0)
334 __cpcmd(vmpoff_cmd
, NULL
, 0, NULL
);
335 signal_processor(smp_processor_id(), sigp_stop_and_store_status
);
338 void (*_machine_restart
)(char *command
) = do_machine_restart_nonsmp
;
339 void (*_machine_halt
)(void) = do_machine_halt_nonsmp
;
340 void (*_machine_power_off
)(void) = do_machine_power_off_nonsmp
;
344 * Reboot, halt and power_off stubs. They just call _machine_restart,
345 * _machine_halt or _machine_power_off.
348 void machine_restart(char *command
)
350 if ((!in_interrupt() && !in_atomic()) || oops_in_progress
)
352 * Only unblank the console if we are called in enabled
353 * context or a bust_spinlocks cleared the way for us.
356 _machine_restart(command
);
359 void machine_halt(void)
361 if (!in_interrupt() || oops_in_progress
)
363 * Only unblank the console if we are called in enabled
364 * context or a bust_spinlocks cleared the way for us.
370 void machine_power_off(void)
372 if (!in_interrupt() || oops_in_progress
)
374 * Only unblank the console if we are called in enabled
375 * context or a bust_spinlocks cleared the way for us.
378 _machine_power_off();
382 * Dummy power off function.
384 void (*pm_power_off
)(void) = machine_power_off
;
386 static int __init
early_parse_mem(char *p
)
388 memory_end
= memparse(p
, &p
);
391 early_param("mem", early_parse_mem
);
394 * "ipldelay=XXX[sm]" sets ipl delay in seconds or minutes
396 static int __init
early_parse_ipldelay(char *p
)
398 unsigned long delay
= 0;
400 delay
= simple_strtoul(p
, &p
, 0);
409 delay
*= 60 * 1000000;
412 /* now wait for the requested amount of time */
417 early_param("ipldelay", early_parse_ipldelay
);
419 #ifdef CONFIG_S390_SWITCH_AMODE
420 unsigned int switch_amode
= 0;
421 EXPORT_SYMBOL_GPL(switch_amode
);
423 static void set_amode_and_uaccess(unsigned long user_amode
,
424 unsigned long user32_amode
)
426 psw_user_bits
= PSW_BASE_BITS
| PSW_MASK_DAT
| user_amode
|
427 PSW_MASK_IO
| PSW_MASK_EXT
| PSW_MASK_MCHECK
|
428 PSW_MASK_PSTATE
| PSW_DEFAULT_KEY
;
430 psw_user32_bits
= PSW_BASE32_BITS
| PSW_MASK_DAT
| user_amode
|
431 PSW_MASK_IO
| PSW_MASK_EXT
| PSW_MASK_MCHECK
|
432 PSW_MASK_PSTATE
| PSW_DEFAULT_KEY
;
433 psw32_user_bits
= PSW32_BASE_BITS
| PSW32_MASK_DAT
| user32_amode
|
434 PSW32_MASK_IO
| PSW32_MASK_EXT
| PSW32_MASK_MCHECK
|
437 psw_kernel_bits
= PSW_BASE_BITS
| PSW_MASK_DAT
| PSW_ASC_HOME
|
438 PSW_MASK_MCHECK
| PSW_DEFAULT_KEY
;
440 if (MACHINE_HAS_MVCOS
) {
441 printk("mvcos available.\n");
442 memcpy(&uaccess
, &uaccess_mvcos_switch
, sizeof(uaccess
));
444 printk("mvcos not available.\n");
445 memcpy(&uaccess
, &uaccess_pt
, sizeof(uaccess
));
450 * Switch kernel/user addressing modes?
452 static int __init
early_parse_switch_amode(char *p
)
457 early_param("switch_amode", early_parse_switch_amode
);
459 #else /* CONFIG_S390_SWITCH_AMODE */
460 static inline void set_amode_and_uaccess(unsigned long user_amode
,
461 unsigned long user32_amode
)
464 #endif /* CONFIG_S390_SWITCH_AMODE */
466 #ifdef CONFIG_S390_EXEC_PROTECT
467 unsigned int s390_noexec
= 0;
468 EXPORT_SYMBOL_GPL(s390_noexec
);
471 * Enable execute protection?
473 static int __init
early_parse_noexec(char *p
)
475 if (!strncmp(p
, "off", 3))
481 early_param("noexec", early_parse_noexec
);
482 #endif /* CONFIG_S390_EXEC_PROTECT */
484 static void setup_addressing_mode(void)
487 printk("S390 execute protection active, ");
488 set_amode_and_uaccess(PSW_ASC_SECONDARY
, PSW32_ASC_SECONDARY
);
489 } else if (switch_amode
) {
490 printk("S390 address spaces switched, ");
491 set_amode_and_uaccess(PSW_ASC_PRIMARY
, PSW32_ASC_PRIMARY
);
493 #ifdef CONFIG_TRACE_IRQFLAGS
494 sysc_restore_trace_psw
.mask
= psw_kernel_bits
& ~PSW_MASK_MCHECK
;
495 io_restore_trace_psw
.mask
= psw_kernel_bits
& ~PSW_MASK_MCHECK
;
506 * Setup lowcore for boot cpu
508 lc_pages
= sizeof(void *) == 8 ? 2 : 1;
509 lc
= (struct _lowcore
*)
510 __alloc_bootmem(lc_pages
* PAGE_SIZE
, lc_pages
* PAGE_SIZE
, 0);
511 memset(lc
, 0, lc_pages
* PAGE_SIZE
);
512 lc
->restart_psw
.mask
= PSW_BASE_BITS
| PSW_DEFAULT_KEY
;
513 lc
->restart_psw
.addr
=
514 PSW_ADDR_AMODE
| (unsigned long) restart_int_handler
;
516 lc
->restart_psw
.mask
|= PSW_ASC_HOME
;
517 lc
->external_new_psw
.mask
= psw_kernel_bits
;
518 lc
->external_new_psw
.addr
=
519 PSW_ADDR_AMODE
| (unsigned long) ext_int_handler
;
520 lc
->svc_new_psw
.mask
= psw_kernel_bits
| PSW_MASK_IO
| PSW_MASK_EXT
;
521 lc
->svc_new_psw
.addr
= PSW_ADDR_AMODE
| (unsigned long) system_call
;
522 lc
->program_new_psw
.mask
= psw_kernel_bits
;
523 lc
->program_new_psw
.addr
=
524 PSW_ADDR_AMODE
| (unsigned long)pgm_check_handler
;
525 lc
->mcck_new_psw
.mask
=
526 psw_kernel_bits
& ~PSW_MASK_MCHECK
& ~PSW_MASK_DAT
;
527 lc
->mcck_new_psw
.addr
=
528 PSW_ADDR_AMODE
| (unsigned long) mcck_int_handler
;
529 lc
->io_new_psw
.mask
= psw_kernel_bits
;
530 lc
->io_new_psw
.addr
= PSW_ADDR_AMODE
| (unsigned long) io_int_handler
;
531 lc
->ipl_device
= S390_lowcore
.ipl_device
;
532 lc
->jiffy_timer
= -1LL;
533 lc
->kernel_stack
= ((unsigned long) &init_thread_union
) + THREAD_SIZE
;
534 lc
->async_stack
= (unsigned long)
535 __alloc_bootmem(ASYNC_SIZE
, ASYNC_SIZE
, 0) + ASYNC_SIZE
;
536 lc
->panic_stack
= (unsigned long)
537 __alloc_bootmem(PAGE_SIZE
, PAGE_SIZE
, 0) + PAGE_SIZE
;
538 lc
->current_task
= (unsigned long) init_thread_union
.thread_info
.task
;
539 lc
->thread_info
= (unsigned long) &init_thread_union
;
541 if (MACHINE_HAS_IEEE
) {
542 lc
->extended_save_area_addr
= (__u32
)
543 __alloc_bootmem(PAGE_SIZE
, PAGE_SIZE
, 0);
544 /* enable extended save area */
545 __ctl_set_bit(14, 29);
548 set_prefix((u32
)(unsigned long) lc
);
552 setup_resources(void)
554 struct resource
*res
, *sub_res
;
557 code_resource
.start
= (unsigned long) &_text
;
558 code_resource
.end
= (unsigned long) &_etext
- 1;
559 data_resource
.start
= (unsigned long) &_etext
;
560 data_resource
.end
= (unsigned long) &_edata
- 1;
562 for (i
= 0; i
< MEMORY_CHUNKS
; i
++) {
563 if (!memory_chunk
[i
].size
)
565 res
= alloc_bootmem_low(sizeof(struct resource
));
566 res
->flags
= IORESOURCE_BUSY
| IORESOURCE_MEM
;
567 switch (memory_chunk
[i
].type
) {
568 case CHUNK_READ_WRITE
:
569 res
->name
= "System RAM";
571 case CHUNK_READ_ONLY
:
572 res
->name
= "System ROM";
573 res
->flags
|= IORESOURCE_READONLY
;
576 res
->name
= "reserved";
578 res
->start
= memory_chunk
[i
].addr
;
579 res
->end
= memory_chunk
[i
].addr
+ memory_chunk
[i
].size
- 1;
580 request_resource(&iomem_resource
, res
);
582 if (code_resource
.start
>= res
->start
&&
583 code_resource
.start
<= res
->end
&&
584 code_resource
.end
> res
->end
) {
585 sub_res
= alloc_bootmem_low(sizeof(struct resource
));
586 memcpy(sub_res
, &code_resource
,
587 sizeof(struct resource
));
588 sub_res
->end
= res
->end
;
589 code_resource
.start
= res
->end
+ 1;
590 request_resource(res
, sub_res
);
593 if (code_resource
.start
>= res
->start
&&
594 code_resource
.start
<= res
->end
&&
595 code_resource
.end
<= res
->end
)
596 request_resource(res
, &code_resource
);
598 if (data_resource
.start
>= res
->start
&&
599 data_resource
.start
<= res
->end
&&
600 data_resource
.end
> res
->end
) {
601 sub_res
= alloc_bootmem_low(sizeof(struct resource
));
602 memcpy(sub_res
, &data_resource
,
603 sizeof(struct resource
));
604 sub_res
->end
= res
->end
;
605 data_resource
.start
= res
->end
+ 1;
606 request_resource(res
, sub_res
);
609 if (data_resource
.start
>= res
->start
&&
610 data_resource
.start
<= res
->end
&&
611 data_resource
.end
<= res
->end
)
612 request_resource(res
, &data_resource
);
616 unsigned long real_memory_size
;
617 EXPORT_SYMBOL_GPL(real_memory_size
);
619 static void __init
setup_memory_end(void)
621 unsigned long memory_size
;
622 unsigned long max_mem
;
625 #if defined(CONFIG_ZFCPDUMP) || defined(CONFIG_ZFCPDUMP_MODULE)
626 if (ipl_info
.type
== IPL_TYPE_FCP_DUMP
)
627 memory_end
= ZFCPDUMP_HSA_SIZE
;
630 memory_end
&= PAGE_MASK
;
632 max_mem
= memory_end
? min(VMALLOC_START
, memory_end
) : VMALLOC_START
;
633 memory_end
= min(max_mem
, memory_end
);
636 * Make sure all chunks are MAX_ORDER aligned so we don't need the
637 * extra checks that HOLES_IN_ZONE would require.
639 for (i
= 0; i
< MEMORY_CHUNKS
; i
++) {
640 unsigned long start
, end
;
641 struct mem_chunk
*chunk
;
644 chunk
= &memory_chunk
[i
];
645 align
= 1UL << (MAX_ORDER
+ PAGE_SHIFT
- 1);
646 start
= (chunk
->addr
+ align
- 1) & ~(align
- 1);
647 end
= (chunk
->addr
+ chunk
->size
) & ~(align
- 1);
649 memset(chunk
, 0, sizeof(*chunk
));
652 chunk
->size
= end
- start
;
656 for (i
= 0; i
< MEMORY_CHUNKS
; i
++) {
657 struct mem_chunk
*chunk
= &memory_chunk
[i
];
659 real_memory_size
= max(real_memory_size
,
660 chunk
->addr
+ chunk
->size
);
661 if (chunk
->addr
>= max_mem
) {
662 memset(chunk
, 0, sizeof(*chunk
));
665 if (chunk
->addr
+ chunk
->size
> max_mem
)
666 chunk
->size
= max_mem
- chunk
->addr
;
667 memory_size
= max(memory_size
, chunk
->addr
+ chunk
->size
);
670 memory_end
= memory_size
;
676 unsigned long bootmap_size
;
677 unsigned long start_pfn
, end_pfn
;
681 * partially used pages are not usable - thus
682 * we are rounding upwards:
684 start_pfn
= PFN_UP(__pa(&_end
));
685 end_pfn
= max_pfn
= PFN_DOWN(memory_end
);
687 #ifdef CONFIG_BLK_DEV_INITRD
689 * Move the initrd in case the bitmap of the bootmem allocater
690 * would overwrite it.
693 if (INITRD_START
&& INITRD_SIZE
) {
694 unsigned long bmap_size
;
697 bmap_size
= bootmem_bootmap_pages(end_pfn
- start_pfn
+ 1);
698 bmap_size
= PFN_PHYS(bmap_size
);
700 if (PFN_PHYS(start_pfn
) + bmap_size
> INITRD_START
) {
701 start
= PFN_PHYS(start_pfn
) + bmap_size
+ PAGE_SIZE
;
703 if (start
+ INITRD_SIZE
> memory_end
) {
704 printk("initrd extends beyond end of memory "
705 "(0x%08lx > 0x%08lx)\n"
706 "disabling initrd\n",
707 start
+ INITRD_SIZE
, memory_end
);
708 INITRD_START
= INITRD_SIZE
= 0;
710 printk("Moving initrd (0x%08lx -> 0x%08lx, "
712 INITRD_START
, start
, INITRD_SIZE
);
713 memmove((void *) start
, (void *) INITRD_START
,
715 INITRD_START
= start
;
722 * Initialize the boot-time allocator
724 bootmap_size
= init_bootmem(start_pfn
, end_pfn
);
727 * Register RAM areas with the bootmem allocator.
730 for (i
= 0; i
< MEMORY_CHUNKS
&& memory_chunk
[i
].size
> 0; i
++) {
731 unsigned long start_chunk
, end_chunk
, pfn
;
733 if (memory_chunk
[i
].type
!= CHUNK_READ_WRITE
)
735 start_chunk
= PFN_DOWN(memory_chunk
[i
].addr
);
736 end_chunk
= start_chunk
+ PFN_DOWN(memory_chunk
[i
].size
) - 1;
737 end_chunk
= min(end_chunk
, end_pfn
);
738 if (start_chunk
>= end_chunk
)
740 add_active_range(0, start_chunk
, end_chunk
);
741 pfn
= max(start_chunk
, start_pfn
);
742 for (; pfn
<= end_chunk
; pfn
++)
743 page_set_storage_key(PFN_PHYS(pfn
), PAGE_DEFAULT_KEY
);
746 psw_set_key(PAGE_DEFAULT_KEY
);
748 free_bootmem_with_active_regions(0, max_pfn
);
751 * Reserve memory used for lowcore/command line/kernel image.
753 reserve_bootmem(0, (unsigned long)_ehead
);
754 reserve_bootmem((unsigned long)_stext
,
755 PFN_PHYS(start_pfn
) - (unsigned long)_stext
);
757 * Reserve the bootmem bitmap itself as well. We do this in two
758 * steps (first step was init_bootmem()) because this catches
759 * the (very unlikely) case of us accidentally initializing the
760 * bootmem allocator with an invalid RAM area.
762 reserve_bootmem(start_pfn
<< PAGE_SHIFT
, bootmap_size
);
764 #ifdef CONFIG_BLK_DEV_INITRD
765 if (INITRD_START
&& INITRD_SIZE
) {
766 if (INITRD_START
+ INITRD_SIZE
<= memory_end
) {
767 reserve_bootmem(INITRD_START
, INITRD_SIZE
);
768 initrd_start
= INITRD_START
;
769 initrd_end
= initrd_start
+ INITRD_SIZE
;
771 printk("initrd extends beyond end of memory "
772 "(0x%08lx > 0x%08lx)\ndisabling initrd\n",
773 initrd_start
+ INITRD_SIZE
, memory_end
);
774 initrd_start
= initrd_end
= 0;
780 static __init
unsigned int stfl(void)
783 " .insn s,0xb2b10000,0(0)\n" /* stfl */
786 return S390_lowcore
.stfl_fac_list
;
789 static __init
int stfle(unsigned long long *list
, int doublewords
)
791 typedef struct { unsigned long long _
[doublewords
]; } addrtype
;
792 register unsigned long __nr
asm("0") = doublewords
- 1;
794 asm volatile(".insn s,0xb2b00000,%0" /* stfle */
795 : "=m" (*(addrtype
*) list
), "+d" (__nr
) : : "cc");
800 * Setup hardware capabilities.
802 static void __init
setup_hwcaps(void)
804 static const int stfl_bits
[6] = { 0, 2, 7, 17, 19, 21 };
805 struct cpuinfo_S390
*cpuinfo
= &S390_lowcore
.cpu_data
;
806 unsigned long long facility_list_extended
;
807 unsigned int facility_list
;
810 facility_list
= stfl();
812 * The store facility list bits numbers as found in the principles
813 * of operation are numbered with bit 1UL<<31 as number 0 to
814 * bit 1UL<<0 as number 31.
815 * Bit 0: instructions named N3, "backported" to esa-mode
816 * Bit 2: z/Architecture mode is active
817 * Bit 7: the store-facility-list-extended facility is installed
818 * Bit 17: the message-security assist is installed
819 * Bit 19: the long-displacement facility is installed
820 * Bit 21: the extended-immediate facility is installed
821 * These get translated to:
822 * HWCAP_S390_ESAN3 bit 0, HWCAP_S390_ZARCH bit 1,
823 * HWCAP_S390_STFLE bit 2, HWCAP_S390_MSA bit 3,
824 * HWCAP_S390_LDISP bit 4, and HWCAP_S390_EIMM bit 5.
826 for (i
= 0; i
< 6; i
++)
827 if (facility_list
& (1UL << (31 - stfl_bits
[i
])))
828 elf_hwcap
|= 1UL << i
;
831 * Check for additional facilities with store-facility-list-extended.
832 * stfle stores doublewords (8 byte) with bit 1ULL<<63 as bit 0
833 * and 1ULL<<0 as bit 63. Bits 0-31 contain the same information
834 * as stored by stfl, bits 32-xxx contain additional facilities.
835 * How many facility words are stored depends on the number of
836 * doublewords passed to the instruction. The additional facilites
838 * Bit 43: decimal floating point facility is installed
840 * HWCAP_S390_DFP bit 6.
842 if ((elf_hwcap
& (1UL << 2)) &&
843 stfle(&facility_list_extended
, 1) > 0) {
844 if (facility_list_extended
& (1ULL << (64 - 43)))
845 elf_hwcap
|= 1UL << 6;
848 switch (cpuinfo
->cpu_id
.machine
) {
850 #if !defined(CONFIG_64BIT)
851 default: /* Use "g5" as default for 31 bit kernels. */
853 strcpy(elf_platform
, "g5");
857 #if defined(CONFIG_64BIT)
858 default: /* Use "z900" as default for 64 bit kernels. */
860 strcpy(elf_platform
, "z900");
864 strcpy(elf_platform
, "z990");
867 strcpy(elf_platform
, "z9-109");
873 * Setup function called from init/main.c just after the banner
878 setup_arch(char **cmdline_p
)
881 * print what head.S has found out about the machine
884 printk((MACHINE_IS_VM
) ?
885 "We are running under VM (31 bit mode)\n" :
886 "We are running native (31 bit mode)\n");
887 printk((MACHINE_HAS_IEEE
) ?
888 "This machine has an IEEE fpu\n" :
889 "This machine has no IEEE fpu\n");
890 #else /* CONFIG_64BIT */
891 printk((MACHINE_IS_VM
) ?
892 "We are running under VM (64 bit mode)\n" :
893 "We are running native (64 bit mode)\n");
894 #endif /* CONFIG_64BIT */
896 /* Save unparsed command line copy for /proc/cmdline */
897 strlcpy(boot_command_line
, COMMAND_LINE
, COMMAND_LINE_SIZE
);
899 *cmdline_p
= COMMAND_LINE
;
900 *(*cmdline_p
+ COMMAND_LINE_SIZE
- 1) = '\0';
902 ROOT_DEV
= Root_RAM0
;
904 init_mm
.start_code
= PAGE_OFFSET
;
905 init_mm
.end_code
= (unsigned long) &_etext
;
906 init_mm
.end_data
= (unsigned long) &_edata
;
907 init_mm
.brk
= (unsigned long) &_end
;
909 if (MACHINE_HAS_MVCOS
)
910 memcpy(&uaccess
, &uaccess_mvcos
, sizeof(uaccess
));
912 memcpy(&uaccess
, &uaccess_std
, sizeof(uaccess
));
918 setup_addressing_mode();
924 __cpu_logical_map
[0] = S390_lowcore
.cpu_data
.cpu_addr
;
927 * Setup capabilities (ELF_HWCAP & ELF_PLATFORM).
932 * Create kernel page tables and switch to virtual addressing.
936 /* Setup default console */
939 /* Setup zfcpdump support */
940 setup_zfcpdump(console_devno
);
943 void __cpuinit
print_cpu_info(struct cpuinfo_S390
*cpuinfo
)
945 printk(KERN_INFO
"cpu %d "
949 "vers=%02X ident=%06X machine=%04X unused=%04X\n",
954 cpuinfo
->cpu_id
.version
,
955 cpuinfo
->cpu_id
.ident
,
956 cpuinfo
->cpu_id
.machine
,
957 cpuinfo
->cpu_id
.unused
);
961 * show_cpuinfo - Get information on one CPU for use by procfs.
964 static int show_cpuinfo(struct seq_file
*m
, void *v
)
966 static const char *hwcap_str
[7] = {
967 "esan3", "zarch", "stfle", "msa", "ldisp", "eimm", "dfp"
969 struct cpuinfo_S390
*cpuinfo
;
970 unsigned long n
= (unsigned long) v
- 1;
973 s390_adjust_jiffies();
976 seq_printf(m
, "vendor_id : IBM/S390\n"
977 "# processors : %i\n"
978 "bogomips per cpu: %lu.%02lu\n",
979 num_online_cpus(), loops_per_jiffy
/(500000/HZ
),
980 (loops_per_jiffy
/(5000/HZ
))%100);
981 seq_puts(m
, "features\t: ");
982 for (i
= 0; i
< 7; i
++)
983 if (hwcap_str
[i
] && (elf_hwcap
& (1UL << i
)))
984 seq_printf(m
, "%s ", hwcap_str
[i
]);
990 if (smp_processor_id() == n
)
991 cpuinfo
= &S390_lowcore
.cpu_data
;
993 cpuinfo
= &lowcore_ptr
[n
]->cpu_data
;
995 cpuinfo
= &S390_lowcore
.cpu_data
;
997 seq_printf(m
, "processor %li: "
999 "identification = %06X, "
1001 n
, cpuinfo
->cpu_id
.version
,
1002 cpuinfo
->cpu_id
.ident
,
1003 cpuinfo
->cpu_id
.machine
);
1009 static void *c_start(struct seq_file
*m
, loff_t
*pos
)
1011 return *pos
< NR_CPUS
? (void *)((unsigned long) *pos
+ 1) : NULL
;
1013 static void *c_next(struct seq_file
*m
, void *v
, loff_t
*pos
)
1016 return c_start(m
, pos
);
1018 static void c_stop(struct seq_file
*m
, void *v
)
1021 struct seq_operations cpuinfo_op
= {
1025 .show
= show_cpuinfo
,