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/tty.h>
28 #include <linux/ioport.h>
29 #include <linux/delay.h>
30 #include <linux/init.h>
31 #include <linux/initrd.h>
32 #include <linux/bootmem.h>
33 #include <linux/root_dev.h>
34 #include <linux/console.h>
35 #include <linux/seq_file.h>
36 #include <linux/kernel_stat.h>
37 #include <linux/device.h>
38 #include <linux/notifier.h>
39 #include <linux/pfn.h>
40 #include <linux/ctype.h>
41 #include <linux/reboot.h>
42 #include <linux/topology.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
;
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 * condev= and conmode= setup parameter.
132 static int __init
condev_setup(char *str
)
136 vdev
= simple_strtoul(str
, &str
, 0);
137 if (vdev
>= 0 && vdev
< 65536) {
138 console_devno
= vdev
;
144 __setup("condev=", condev_setup
);
146 static int __init
conmode_setup(char *str
)
148 #if defined(CONFIG_SCLP_CONSOLE) || defined(CONFIG_SCLP_VT220_CONSOLE)
149 if (strncmp(str
, "hwc", 4) == 0 || strncmp(str
, "sclp", 5) == 0)
152 #if defined(CONFIG_TN3215_CONSOLE)
153 if (strncmp(str
, "3215", 5) == 0)
156 #if defined(CONFIG_TN3270_CONSOLE)
157 if (strncmp(str
, "3270", 5) == 0)
163 __setup("conmode=", conmode_setup
);
165 static void __init
conmode_default(void)
167 char query_buffer
[1024];
171 cpcmd("QUERY CONSOLE", query_buffer
, 1024, NULL
);
172 console_devno
= simple_strtoul(query_buffer
+ 5, NULL
, 16);
173 ptr
= strstr(query_buffer
, "SUBCHANNEL =");
174 console_irq
= simple_strtoul(ptr
+ 13, NULL
, 16);
175 cpcmd("QUERY TERM", query_buffer
, 1024, NULL
);
176 ptr
= strstr(query_buffer
, "CONMODE");
178 * Set the conmode to 3215 so that the device recognition
179 * will set the cu_type of the console to 3215. If the
180 * conmode is 3270 and we don't set it back then both
181 * 3215 and the 3270 driver will try to access the console
182 * device (3215 as console and 3270 as normal tty).
184 cpcmd("TERM CONMODE 3215", NULL
, 0, NULL
);
186 #if defined(CONFIG_SCLP_CONSOLE) || defined(CONFIG_SCLP_VT220_CONSOLE)
191 if (strncmp(ptr
+ 8, "3270", 4) == 0) {
192 #if defined(CONFIG_TN3270_CONSOLE)
194 #elif defined(CONFIG_TN3215_CONSOLE)
196 #elif defined(CONFIG_SCLP_CONSOLE) || defined(CONFIG_SCLP_VT220_CONSOLE)
199 } else if (strncmp(ptr
+ 8, "3215", 4) == 0) {
200 #if defined(CONFIG_TN3215_CONSOLE)
202 #elif defined(CONFIG_TN3270_CONSOLE)
204 #elif defined(CONFIG_SCLP_CONSOLE) || defined(CONFIG_SCLP_VT220_CONSOLE)
208 } else if (MACHINE_IS_P390
) {
209 #if defined(CONFIG_TN3215_CONSOLE)
211 #elif defined(CONFIG_TN3270_CONSOLE)
215 #if defined(CONFIG_SCLP_CONSOLE) || defined(CONFIG_SCLP_VT220_CONSOLE)
221 #if defined(CONFIG_ZFCPDUMP) || defined(CONFIG_ZFCPDUMP_MODULE)
222 static void __init
setup_zfcpdump(unsigned int console_devno
)
226 if (ipl_info
.type
!= IPL_TYPE_FCP_DUMP
)
228 if (console_devno
!= -1)
229 sprintf(str
, " cio_ignore=all,!0.0.%04x,!0.0.%04x",
230 ipl_info
.data
.fcp
.dev_id
.devno
, console_devno
);
232 sprintf(str
, " cio_ignore=all,!0.0.%04x",
233 ipl_info
.data
.fcp
.dev_id
.devno
);
234 strcat(boot_command_line
, str
);
235 console_loglevel
= 2;
238 static inline void setup_zfcpdump(unsigned int console_devno
) {}
239 #endif /* CONFIG_ZFCPDUMP */
242 * Reboot, halt and power_off stubs. They just call _machine_restart,
243 * _machine_halt or _machine_power_off.
246 void machine_restart(char *command
)
248 if ((!in_interrupt() && !in_atomic()) || oops_in_progress
)
250 * Only unblank the console if we are called in enabled
251 * context or a bust_spinlocks cleared the way for us.
254 _machine_restart(command
);
257 void machine_halt(void)
259 if (!in_interrupt() || oops_in_progress
)
261 * Only unblank the console if we are called in enabled
262 * context or a bust_spinlocks cleared the way for us.
268 void machine_power_off(void)
270 if (!in_interrupt() || oops_in_progress
)
272 * Only unblank the console if we are called in enabled
273 * context or a bust_spinlocks cleared the way for us.
276 _machine_power_off();
280 * Dummy power off function.
282 void (*pm_power_off
)(void) = machine_power_off
;
284 static int __init
early_parse_mem(char *p
)
286 memory_end
= memparse(p
, &p
);
289 early_param("mem", early_parse_mem
);
291 #ifdef CONFIG_S390_SWITCH_AMODE
293 unsigned int switch_amode
= 1;
295 unsigned int switch_amode
= 0;
297 EXPORT_SYMBOL_GPL(switch_amode
);
299 static void set_amode_and_uaccess(unsigned long user_amode
,
300 unsigned long user32_amode
)
302 psw_user_bits
= PSW_BASE_BITS
| PSW_MASK_DAT
| user_amode
|
303 PSW_MASK_IO
| PSW_MASK_EXT
| PSW_MASK_MCHECK
|
304 PSW_MASK_PSTATE
| PSW_DEFAULT_KEY
;
306 psw_user32_bits
= PSW_BASE32_BITS
| PSW_MASK_DAT
| user_amode
|
307 PSW_MASK_IO
| PSW_MASK_EXT
| PSW_MASK_MCHECK
|
308 PSW_MASK_PSTATE
| PSW_DEFAULT_KEY
;
309 psw32_user_bits
= PSW32_BASE_BITS
| PSW32_MASK_DAT
| user32_amode
|
310 PSW32_MASK_IO
| PSW32_MASK_EXT
| PSW32_MASK_MCHECK
|
313 psw_kernel_bits
= PSW_BASE_BITS
| PSW_MASK_DAT
| PSW_ASC_HOME
|
314 PSW_MASK_MCHECK
| PSW_DEFAULT_KEY
;
316 if (MACHINE_HAS_MVCOS
) {
317 printk("mvcos available.\n");
318 memcpy(&uaccess
, &uaccess_mvcos_switch
, sizeof(uaccess
));
320 printk("mvcos not available.\n");
321 memcpy(&uaccess
, &uaccess_pt
, sizeof(uaccess
));
326 * Switch kernel/user addressing modes?
328 static int __init
early_parse_switch_amode(char *p
)
333 early_param("switch_amode", early_parse_switch_amode
);
335 #else /* CONFIG_S390_SWITCH_AMODE */
336 static inline void set_amode_and_uaccess(unsigned long user_amode
,
337 unsigned long user32_amode
)
340 #endif /* CONFIG_S390_SWITCH_AMODE */
342 #ifdef CONFIG_S390_EXEC_PROTECT
343 unsigned int s390_noexec
= 0;
344 EXPORT_SYMBOL_GPL(s390_noexec
);
347 * Enable execute protection?
349 static int __init
early_parse_noexec(char *p
)
351 if (!strncmp(p
, "off", 3))
357 early_param("noexec", early_parse_noexec
);
358 #endif /* CONFIG_S390_EXEC_PROTECT */
360 static void setup_addressing_mode(void)
363 printk("S390 execute protection active, ");
364 set_amode_and_uaccess(PSW_ASC_SECONDARY
, PSW32_ASC_SECONDARY
);
365 } else if (switch_amode
) {
366 printk("S390 address spaces switched, ");
367 set_amode_and_uaccess(PSW_ASC_PRIMARY
, PSW32_ASC_PRIMARY
);
369 #ifdef CONFIG_TRACE_IRQFLAGS
370 sysc_restore_trace_psw
.mask
= psw_kernel_bits
& ~PSW_MASK_MCHECK
;
371 io_restore_trace_psw
.mask
= psw_kernel_bits
& ~PSW_MASK_MCHECK
;
382 * Setup lowcore for boot cpu
384 lc_pages
= sizeof(void *) == 8 ? 2 : 1;
385 lc
= (struct _lowcore
*)
386 __alloc_bootmem(lc_pages
* PAGE_SIZE
, lc_pages
* PAGE_SIZE
, 0);
387 memset(lc
, 0, lc_pages
* PAGE_SIZE
);
388 lc
->restart_psw
.mask
= PSW_BASE_BITS
| PSW_DEFAULT_KEY
;
389 lc
->restart_psw
.addr
=
390 PSW_ADDR_AMODE
| (unsigned long) restart_int_handler
;
392 lc
->restart_psw
.mask
|= PSW_ASC_HOME
;
393 lc
->external_new_psw
.mask
= psw_kernel_bits
;
394 lc
->external_new_psw
.addr
=
395 PSW_ADDR_AMODE
| (unsigned long) ext_int_handler
;
396 lc
->svc_new_psw
.mask
= psw_kernel_bits
| PSW_MASK_IO
| PSW_MASK_EXT
;
397 lc
->svc_new_psw
.addr
= PSW_ADDR_AMODE
| (unsigned long) system_call
;
398 lc
->program_new_psw
.mask
= psw_kernel_bits
;
399 lc
->program_new_psw
.addr
=
400 PSW_ADDR_AMODE
| (unsigned long)pgm_check_handler
;
401 lc
->mcck_new_psw
.mask
=
402 psw_kernel_bits
& ~PSW_MASK_MCHECK
& ~PSW_MASK_DAT
;
403 lc
->mcck_new_psw
.addr
=
404 PSW_ADDR_AMODE
| (unsigned long) mcck_int_handler
;
405 lc
->io_new_psw
.mask
= psw_kernel_bits
;
406 lc
->io_new_psw
.addr
= PSW_ADDR_AMODE
| (unsigned long) io_int_handler
;
407 lc
->ipl_device
= S390_lowcore
.ipl_device
;
408 lc
->clock_comparator
= -1ULL;
409 lc
->kernel_stack
= ((unsigned long) &init_thread_union
) + THREAD_SIZE
;
410 lc
->async_stack
= (unsigned long)
411 __alloc_bootmem(ASYNC_SIZE
, ASYNC_SIZE
, 0) + ASYNC_SIZE
;
412 lc
->panic_stack
= (unsigned long)
413 __alloc_bootmem(PAGE_SIZE
, PAGE_SIZE
, 0) + PAGE_SIZE
;
414 lc
->current_task
= (unsigned long) init_thread_union
.thread_info
.task
;
415 lc
->thread_info
= (unsigned long) &init_thread_union
;
417 if (MACHINE_HAS_IEEE
) {
418 lc
->extended_save_area_addr
= (__u32
)
419 __alloc_bootmem(PAGE_SIZE
, PAGE_SIZE
, 0);
420 /* enable extended save area */
421 __ctl_set_bit(14, 29);
424 set_prefix((u32
)(unsigned long) lc
);
428 setup_resources(void)
430 struct resource
*res
, *sub_res
;
433 code_resource
.start
= (unsigned long) &_text
;
434 code_resource
.end
= (unsigned long) &_etext
- 1;
435 data_resource
.start
= (unsigned long) &_etext
;
436 data_resource
.end
= (unsigned long) &_edata
- 1;
438 for (i
= 0; i
< MEMORY_CHUNKS
; i
++) {
439 if (!memory_chunk
[i
].size
)
441 res
= alloc_bootmem_low(sizeof(struct resource
));
442 res
->flags
= IORESOURCE_BUSY
| IORESOURCE_MEM
;
443 switch (memory_chunk
[i
].type
) {
444 case CHUNK_READ_WRITE
:
445 res
->name
= "System RAM";
447 case CHUNK_READ_ONLY
:
448 res
->name
= "System ROM";
449 res
->flags
|= IORESOURCE_READONLY
;
452 res
->name
= "reserved";
454 res
->start
= memory_chunk
[i
].addr
;
455 res
->end
= memory_chunk
[i
].addr
+ memory_chunk
[i
].size
- 1;
456 request_resource(&iomem_resource
, res
);
458 if (code_resource
.start
>= res
->start
&&
459 code_resource
.start
<= res
->end
&&
460 code_resource
.end
> res
->end
) {
461 sub_res
= alloc_bootmem_low(sizeof(struct resource
));
462 memcpy(sub_res
, &code_resource
,
463 sizeof(struct resource
));
464 sub_res
->end
= res
->end
;
465 code_resource
.start
= res
->end
+ 1;
466 request_resource(res
, sub_res
);
469 if (code_resource
.start
>= res
->start
&&
470 code_resource
.start
<= res
->end
&&
471 code_resource
.end
<= res
->end
)
472 request_resource(res
, &code_resource
);
474 if (data_resource
.start
>= res
->start
&&
475 data_resource
.start
<= res
->end
&&
476 data_resource
.end
> res
->end
) {
477 sub_res
= alloc_bootmem_low(sizeof(struct resource
));
478 memcpy(sub_res
, &data_resource
,
479 sizeof(struct resource
));
480 sub_res
->end
= res
->end
;
481 data_resource
.start
= res
->end
+ 1;
482 request_resource(res
, sub_res
);
485 if (data_resource
.start
>= res
->start
&&
486 data_resource
.start
<= res
->end
&&
487 data_resource
.end
<= res
->end
)
488 request_resource(res
, &data_resource
);
492 unsigned long real_memory_size
;
493 EXPORT_SYMBOL_GPL(real_memory_size
);
495 static void __init
setup_memory_end(void)
497 unsigned long memory_size
;
498 unsigned long max_mem
;
501 #if defined(CONFIG_ZFCPDUMP) || defined(CONFIG_ZFCPDUMP_MODULE)
502 if (ipl_info
.type
== IPL_TYPE_FCP_DUMP
)
503 memory_end
= ZFCPDUMP_HSA_SIZE
;
506 memory_end
&= PAGE_MASK
;
508 max_mem
= memory_end
? min(VMEM_MAX_PHYS
, memory_end
) : VMEM_MAX_PHYS
;
509 memory_end
= min(max_mem
, memory_end
);
512 * Make sure all chunks are MAX_ORDER aligned so we don't need the
513 * extra checks that HOLES_IN_ZONE would require.
515 for (i
= 0; i
< MEMORY_CHUNKS
; i
++) {
516 unsigned long start
, end
;
517 struct mem_chunk
*chunk
;
520 chunk
= &memory_chunk
[i
];
521 align
= 1UL << (MAX_ORDER
+ PAGE_SHIFT
- 1);
522 start
= (chunk
->addr
+ align
- 1) & ~(align
- 1);
523 end
= (chunk
->addr
+ chunk
->size
) & ~(align
- 1);
525 memset(chunk
, 0, sizeof(*chunk
));
528 chunk
->size
= end
- start
;
532 for (i
= 0; i
< MEMORY_CHUNKS
; i
++) {
533 struct mem_chunk
*chunk
= &memory_chunk
[i
];
535 real_memory_size
= max(real_memory_size
,
536 chunk
->addr
+ chunk
->size
);
537 if (chunk
->addr
>= max_mem
) {
538 memset(chunk
, 0, sizeof(*chunk
));
541 if (chunk
->addr
+ chunk
->size
> max_mem
)
542 chunk
->size
= max_mem
- chunk
->addr
;
543 memory_size
= max(memory_size
, chunk
->addr
+ chunk
->size
);
546 memory_end
= memory_size
;
552 unsigned long bootmap_size
;
553 unsigned long start_pfn
, end_pfn
;
557 * partially used pages are not usable - thus
558 * we are rounding upwards:
560 start_pfn
= PFN_UP(__pa(&_end
));
561 end_pfn
= max_pfn
= PFN_DOWN(memory_end
);
563 #ifdef CONFIG_BLK_DEV_INITRD
565 * Move the initrd in case the bitmap of the bootmem allocater
566 * would overwrite it.
569 if (INITRD_START
&& INITRD_SIZE
) {
570 unsigned long bmap_size
;
573 bmap_size
= bootmem_bootmap_pages(end_pfn
- start_pfn
+ 1);
574 bmap_size
= PFN_PHYS(bmap_size
);
576 if (PFN_PHYS(start_pfn
) + bmap_size
> INITRD_START
) {
577 start
= PFN_PHYS(start_pfn
) + bmap_size
+ PAGE_SIZE
;
579 if (start
+ INITRD_SIZE
> memory_end
) {
580 printk("initrd extends beyond end of memory "
581 "(0x%08lx > 0x%08lx)\n"
582 "disabling initrd\n",
583 start
+ INITRD_SIZE
, memory_end
);
584 INITRD_START
= INITRD_SIZE
= 0;
586 printk("Moving initrd (0x%08lx -> 0x%08lx, "
588 INITRD_START
, start
, INITRD_SIZE
);
589 memmove((void *) start
, (void *) INITRD_START
,
591 INITRD_START
= start
;
598 * Initialize the boot-time allocator
600 bootmap_size
= init_bootmem(start_pfn
, end_pfn
);
603 * Register RAM areas with the bootmem allocator.
606 for (i
= 0; i
< MEMORY_CHUNKS
&& memory_chunk
[i
].size
> 0; i
++) {
607 unsigned long start_chunk
, end_chunk
, pfn
;
609 if (memory_chunk
[i
].type
!= CHUNK_READ_WRITE
)
611 start_chunk
= PFN_DOWN(memory_chunk
[i
].addr
);
612 end_chunk
= start_chunk
+ PFN_DOWN(memory_chunk
[i
].size
) - 1;
613 end_chunk
= min(end_chunk
, end_pfn
);
614 if (start_chunk
>= end_chunk
)
616 add_active_range(0, start_chunk
, end_chunk
);
617 pfn
= max(start_chunk
, start_pfn
);
618 for (; pfn
<= end_chunk
; pfn
++)
619 page_set_storage_key(PFN_PHYS(pfn
), PAGE_DEFAULT_KEY
);
622 psw_set_key(PAGE_DEFAULT_KEY
);
624 free_bootmem_with_active_regions(0, max_pfn
);
627 * Reserve memory used for lowcore/command line/kernel image.
629 reserve_bootmem(0, (unsigned long)_ehead
, BOOTMEM_DEFAULT
);
630 reserve_bootmem((unsigned long)_stext
,
631 PFN_PHYS(start_pfn
) - (unsigned long)_stext
,
634 * Reserve the bootmem bitmap itself as well. We do this in two
635 * steps (first step was init_bootmem()) because this catches
636 * the (very unlikely) case of us accidentally initializing the
637 * bootmem allocator with an invalid RAM area.
639 reserve_bootmem(start_pfn
<< PAGE_SHIFT
, bootmap_size
,
642 #ifdef CONFIG_BLK_DEV_INITRD
643 if (INITRD_START
&& INITRD_SIZE
) {
644 if (INITRD_START
+ INITRD_SIZE
<= memory_end
) {
645 reserve_bootmem(INITRD_START
, INITRD_SIZE
,
647 initrd_start
= INITRD_START
;
648 initrd_end
= initrd_start
+ INITRD_SIZE
;
650 printk("initrd extends beyond end of memory "
651 "(0x%08lx > 0x%08lx)\ndisabling initrd\n",
652 initrd_start
+ INITRD_SIZE
, memory_end
);
653 initrd_start
= initrd_end
= 0;
659 static int __init
__stfle(unsigned long long *list
, int doublewords
)
661 typedef struct { unsigned long long _
[doublewords
]; } addrtype
;
662 register unsigned long __nr
asm("0") = doublewords
- 1;
664 asm volatile(".insn s,0xb2b00000,%0" /* stfle */
665 : "=m" (*(addrtype
*) list
), "+d" (__nr
) : : "cc");
669 int __init
stfle(unsigned long long *list
, int doublewords
)
671 if (!(stfl() & (1UL << 24)))
673 return __stfle(list
, doublewords
);
677 * Setup hardware capabilities.
679 static void __init
setup_hwcaps(void)
681 static const int stfl_bits
[6] = { 0, 2, 7, 17, 19, 21 };
682 struct cpuinfo_S390
*cpuinfo
= &S390_lowcore
.cpu_data
;
683 unsigned long long facility_list_extended
;
684 unsigned int facility_list
;
687 facility_list
= stfl();
689 * The store facility list bits numbers as found in the principles
690 * of operation are numbered with bit 1UL<<31 as number 0 to
691 * bit 1UL<<0 as number 31.
692 * Bit 0: instructions named N3, "backported" to esa-mode
693 * Bit 2: z/Architecture mode is active
694 * Bit 7: the store-facility-list-extended facility is installed
695 * Bit 17: the message-security assist is installed
696 * Bit 19: the long-displacement facility is installed
697 * Bit 21: the extended-immediate facility is installed
698 * These get translated to:
699 * HWCAP_S390_ESAN3 bit 0, HWCAP_S390_ZARCH bit 1,
700 * HWCAP_S390_STFLE bit 2, HWCAP_S390_MSA bit 3,
701 * HWCAP_S390_LDISP bit 4, and HWCAP_S390_EIMM bit 5.
703 for (i
= 0; i
< 6; i
++)
704 if (facility_list
& (1UL << (31 - stfl_bits
[i
])))
705 elf_hwcap
|= 1UL << i
;
708 * Check for additional facilities with store-facility-list-extended.
709 * stfle stores doublewords (8 byte) with bit 1ULL<<63 as bit 0
710 * and 1ULL<<0 as bit 63. Bits 0-31 contain the same information
711 * as stored by stfl, bits 32-xxx contain additional facilities.
712 * How many facility words are stored depends on the number of
713 * doublewords passed to the instruction. The additional facilites
715 * Bit 43: decimal floating point facility is installed
717 * HWCAP_S390_DFP bit 6.
719 if ((elf_hwcap
& (1UL << 2)) &&
720 __stfle(&facility_list_extended
, 1) > 0) {
721 if (facility_list_extended
& (1ULL << (64 - 43)))
722 elf_hwcap
|= 1UL << 6;
725 if (MACHINE_HAS_HPAGE
)
726 elf_hwcap
|= 1UL << 7;
728 switch (cpuinfo
->cpu_id
.machine
) {
730 #if !defined(CONFIG_64BIT)
731 default: /* Use "g5" as default for 31 bit kernels. */
733 strcpy(elf_platform
, "g5");
737 #if defined(CONFIG_64BIT)
738 default: /* Use "z900" as default for 64 bit kernels. */
740 strcpy(elf_platform
, "z900");
744 strcpy(elf_platform
, "z990");
747 strcpy(elf_platform
, "z9-109");
753 * Setup function called from init/main.c just after the banner
758 setup_arch(char **cmdline_p
)
761 * print what head.S has found out about the machine
764 printk((MACHINE_IS_VM
) ?
765 "We are running under VM (31 bit mode)\n" :
766 "We are running native (31 bit mode)\n");
767 printk((MACHINE_HAS_IEEE
) ?
768 "This machine has an IEEE fpu\n" :
769 "This machine has no IEEE fpu\n");
770 #else /* CONFIG_64BIT */
772 printk("We are running under VM (64 bit mode)\n");
773 else if (MACHINE_IS_KVM
) {
774 printk("We are running under KVM (64 bit mode)\n");
775 add_preferred_console("ttyS", 1, NULL
);
777 printk("We are running native (64 bit mode)\n");
778 #endif /* CONFIG_64BIT */
780 /* Have one command line that is parsed and saved in /proc/cmdline */
781 /* boot_command_line has been already set up in early.c */
782 *cmdline_p
= boot_command_line
;
784 ROOT_DEV
= Root_RAM0
;
786 init_mm
.start_code
= PAGE_OFFSET
;
787 init_mm
.end_code
= (unsigned long) &_etext
;
788 init_mm
.end_data
= (unsigned long) &_edata
;
789 init_mm
.brk
= (unsigned long) &_end
;
791 if (MACHINE_HAS_MVCOS
)
792 memcpy(&uaccess
, &uaccess_mvcos
, sizeof(uaccess
));
794 memcpy(&uaccess
, &uaccess_std
, sizeof(uaccess
));
800 setup_addressing_mode();
806 __cpu_logical_map
[0] = S390_lowcore
.cpu_data
.cpu_addr
;
807 s390_init_cpu_topology();
810 * Setup capabilities (ELF_HWCAP & ELF_PLATFORM).
815 * Create kernel page tables and switch to virtual addressing.
819 /* Setup default console */
822 /* Setup zfcpdump support */
823 setup_zfcpdump(console_devno
);
826 void __cpuinit
print_cpu_info(struct cpuinfo_S390
*cpuinfo
)
828 printk(KERN_INFO
"cpu %d "
832 "vers=%02X ident=%06X machine=%04X unused=%04X\n",
837 cpuinfo
->cpu_id
.version
,
838 cpuinfo
->cpu_id
.ident
,
839 cpuinfo
->cpu_id
.machine
,
840 cpuinfo
->cpu_id
.unused
);
844 * show_cpuinfo - Get information on one CPU for use by procfs.
847 static int show_cpuinfo(struct seq_file
*m
, void *v
)
849 static const char *hwcap_str
[8] = {
850 "esan3", "zarch", "stfle", "msa", "ldisp", "eimm", "dfp",
853 struct cpuinfo_S390
*cpuinfo
;
854 unsigned long n
= (unsigned long) v
- 1;
857 s390_adjust_jiffies();
860 seq_printf(m
, "vendor_id : IBM/S390\n"
861 "# processors : %i\n"
862 "bogomips per cpu: %lu.%02lu\n",
863 num_online_cpus(), loops_per_jiffy
/(500000/HZ
),
864 (loops_per_jiffy
/(5000/HZ
))%100);
865 seq_puts(m
, "features\t: ");
866 for (i
= 0; i
< 8; i
++)
867 if (hwcap_str
[i
] && (elf_hwcap
& (1UL << i
)))
868 seq_printf(m
, "%s ", hwcap_str
[i
]);
874 if (smp_processor_id() == n
)
875 cpuinfo
= &S390_lowcore
.cpu_data
;
877 cpuinfo
= &lowcore_ptr
[n
]->cpu_data
;
879 cpuinfo
= &S390_lowcore
.cpu_data
;
881 seq_printf(m
, "processor %li: "
883 "identification = %06X, "
885 n
, cpuinfo
->cpu_id
.version
,
886 cpuinfo
->cpu_id
.ident
,
887 cpuinfo
->cpu_id
.machine
);
893 static void *c_start(struct seq_file
*m
, loff_t
*pos
)
895 return *pos
< NR_CPUS
? (void *)((unsigned long) *pos
+ 1) : NULL
;
897 static void *c_next(struct seq_file
*m
, void *v
, loff_t
*pos
)
900 return c_start(m
, pos
);
902 static void c_stop(struct seq_file
*m
, void *v
)
905 const struct seq_operations cpuinfo_op
= {
909 .show
= show_cpuinfo
,