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)
209 #if defined(CONFIG_SCLP_CONSOLE) || defined(CONFIG_SCLP_VT220_CONSOLE)
215 #if defined(CONFIG_ZFCPDUMP) || defined(CONFIG_ZFCPDUMP_MODULE)
216 static void __init
setup_zfcpdump(unsigned int console_devno
)
220 if (ipl_info
.type
!= IPL_TYPE_FCP_DUMP
)
222 if (console_devno
!= -1)
223 sprintf(str
, " cio_ignore=all,!0.0.%04x,!0.0.%04x",
224 ipl_info
.data
.fcp
.dev_id
.devno
, console_devno
);
226 sprintf(str
, " cio_ignore=all,!0.0.%04x",
227 ipl_info
.data
.fcp
.dev_id
.devno
);
228 strcat(boot_command_line
, str
);
229 console_loglevel
= 2;
232 static inline void setup_zfcpdump(unsigned int console_devno
) {}
233 #endif /* CONFIG_ZFCPDUMP */
236 * Reboot, halt and power_off stubs. They just call _machine_restart,
237 * _machine_halt or _machine_power_off.
240 void machine_restart(char *command
)
242 if ((!in_interrupt() && !in_atomic()) || oops_in_progress
)
244 * Only unblank the console if we are called in enabled
245 * context or a bust_spinlocks cleared the way for us.
248 _machine_restart(command
);
251 void machine_halt(void)
253 if (!in_interrupt() || oops_in_progress
)
255 * Only unblank the console if we are called in enabled
256 * context or a bust_spinlocks cleared the way for us.
262 void machine_power_off(void)
264 if (!in_interrupt() || oops_in_progress
)
266 * Only unblank the console if we are called in enabled
267 * context or a bust_spinlocks cleared the way for us.
270 _machine_power_off();
274 * Dummy power off function.
276 void (*pm_power_off
)(void) = machine_power_off
;
278 static int __init
early_parse_mem(char *p
)
280 memory_end
= memparse(p
, &p
);
283 early_param("mem", early_parse_mem
);
285 #ifdef CONFIG_S390_SWITCH_AMODE
287 unsigned int switch_amode
= 1;
289 unsigned int switch_amode
= 0;
291 EXPORT_SYMBOL_GPL(switch_amode
);
293 static void set_amode_and_uaccess(unsigned long user_amode
,
294 unsigned long user32_amode
)
296 psw_user_bits
= PSW_BASE_BITS
| PSW_MASK_DAT
| user_amode
|
297 PSW_MASK_IO
| PSW_MASK_EXT
| PSW_MASK_MCHECK
|
298 PSW_MASK_PSTATE
| PSW_DEFAULT_KEY
;
300 psw_user32_bits
= PSW_BASE32_BITS
| PSW_MASK_DAT
| user_amode
|
301 PSW_MASK_IO
| PSW_MASK_EXT
| PSW_MASK_MCHECK
|
302 PSW_MASK_PSTATE
| PSW_DEFAULT_KEY
;
303 psw32_user_bits
= PSW32_BASE_BITS
| PSW32_MASK_DAT
| user32_amode
|
304 PSW32_MASK_IO
| PSW32_MASK_EXT
| PSW32_MASK_MCHECK
|
307 psw_kernel_bits
= PSW_BASE_BITS
| PSW_MASK_DAT
| PSW_ASC_HOME
|
308 PSW_MASK_MCHECK
| PSW_DEFAULT_KEY
;
310 if (MACHINE_HAS_MVCOS
) {
311 printk("mvcos available.\n");
312 memcpy(&uaccess
, &uaccess_mvcos_switch
, sizeof(uaccess
));
314 printk("mvcos not available.\n");
315 memcpy(&uaccess
, &uaccess_pt
, sizeof(uaccess
));
320 * Switch kernel/user addressing modes?
322 static int __init
early_parse_switch_amode(char *p
)
327 early_param("switch_amode", early_parse_switch_amode
);
329 #else /* CONFIG_S390_SWITCH_AMODE */
330 static inline void set_amode_and_uaccess(unsigned long user_amode
,
331 unsigned long user32_amode
)
334 #endif /* CONFIG_S390_SWITCH_AMODE */
336 #ifdef CONFIG_S390_EXEC_PROTECT
337 unsigned int s390_noexec
= 0;
338 EXPORT_SYMBOL_GPL(s390_noexec
);
341 * Enable execute protection?
343 static int __init
early_parse_noexec(char *p
)
345 if (!strncmp(p
, "off", 3))
351 early_param("noexec", early_parse_noexec
);
352 #endif /* CONFIG_S390_EXEC_PROTECT */
354 static void setup_addressing_mode(void)
357 printk("S390 execute protection active, ");
358 set_amode_and_uaccess(PSW_ASC_SECONDARY
, PSW32_ASC_SECONDARY
);
359 } else if (switch_amode
) {
360 printk("S390 address spaces switched, ");
361 set_amode_and_uaccess(PSW_ASC_PRIMARY
, PSW32_ASC_PRIMARY
);
363 #ifdef CONFIG_TRACE_IRQFLAGS
364 sysc_restore_trace_psw
.mask
= psw_kernel_bits
& ~PSW_MASK_MCHECK
;
365 io_restore_trace_psw
.mask
= psw_kernel_bits
& ~PSW_MASK_MCHECK
;
376 * Setup lowcore for boot cpu
378 lc_pages
= sizeof(void *) == 8 ? 2 : 1;
379 lc
= (struct _lowcore
*)
380 __alloc_bootmem(lc_pages
* PAGE_SIZE
, lc_pages
* PAGE_SIZE
, 0);
381 memset(lc
, 0, lc_pages
* PAGE_SIZE
);
382 lc
->restart_psw
.mask
= PSW_BASE_BITS
| PSW_DEFAULT_KEY
;
383 lc
->restart_psw
.addr
=
384 PSW_ADDR_AMODE
| (unsigned long) restart_int_handler
;
386 lc
->restart_psw
.mask
|= PSW_ASC_HOME
;
387 lc
->external_new_psw
.mask
= psw_kernel_bits
;
388 lc
->external_new_psw
.addr
=
389 PSW_ADDR_AMODE
| (unsigned long) ext_int_handler
;
390 lc
->svc_new_psw
.mask
= psw_kernel_bits
| PSW_MASK_IO
| PSW_MASK_EXT
;
391 lc
->svc_new_psw
.addr
= PSW_ADDR_AMODE
| (unsigned long) system_call
;
392 lc
->program_new_psw
.mask
= psw_kernel_bits
;
393 lc
->program_new_psw
.addr
=
394 PSW_ADDR_AMODE
| (unsigned long)pgm_check_handler
;
395 lc
->mcck_new_psw
.mask
=
396 psw_kernel_bits
& ~PSW_MASK_MCHECK
& ~PSW_MASK_DAT
;
397 lc
->mcck_new_psw
.addr
=
398 PSW_ADDR_AMODE
| (unsigned long) mcck_int_handler
;
399 lc
->io_new_psw
.mask
= psw_kernel_bits
;
400 lc
->io_new_psw
.addr
= PSW_ADDR_AMODE
| (unsigned long) io_int_handler
;
401 lc
->ipl_device
= S390_lowcore
.ipl_device
;
402 lc
->clock_comparator
= -1ULL;
403 lc
->kernel_stack
= ((unsigned long) &init_thread_union
) + THREAD_SIZE
;
404 lc
->async_stack
= (unsigned long)
405 __alloc_bootmem(ASYNC_SIZE
, ASYNC_SIZE
, 0) + ASYNC_SIZE
;
406 lc
->panic_stack
= (unsigned long)
407 __alloc_bootmem(PAGE_SIZE
, PAGE_SIZE
, 0) + PAGE_SIZE
;
408 lc
->current_task
= (unsigned long) init_thread_union
.thread_info
.task
;
409 lc
->thread_info
= (unsigned long) &init_thread_union
;
411 if (MACHINE_HAS_IEEE
) {
412 lc
->extended_save_area_addr
= (__u32
)
413 __alloc_bootmem(PAGE_SIZE
, PAGE_SIZE
, 0);
414 /* enable extended save area */
415 __ctl_set_bit(14, 29);
418 set_prefix((u32
)(unsigned long) lc
);
422 setup_resources(void)
424 struct resource
*res
, *sub_res
;
427 code_resource
.start
= (unsigned long) &_text
;
428 code_resource
.end
= (unsigned long) &_etext
- 1;
429 data_resource
.start
= (unsigned long) &_etext
;
430 data_resource
.end
= (unsigned long) &_edata
- 1;
432 for (i
= 0; i
< MEMORY_CHUNKS
; i
++) {
433 if (!memory_chunk
[i
].size
)
435 res
= alloc_bootmem_low(sizeof(struct resource
));
436 res
->flags
= IORESOURCE_BUSY
| IORESOURCE_MEM
;
437 switch (memory_chunk
[i
].type
) {
438 case CHUNK_READ_WRITE
:
439 res
->name
= "System RAM";
441 case CHUNK_READ_ONLY
:
442 res
->name
= "System ROM";
443 res
->flags
|= IORESOURCE_READONLY
;
446 res
->name
= "reserved";
448 res
->start
= memory_chunk
[i
].addr
;
449 res
->end
= memory_chunk
[i
].addr
+ memory_chunk
[i
].size
- 1;
450 request_resource(&iomem_resource
, res
);
452 if (code_resource
.start
>= res
->start
&&
453 code_resource
.start
<= res
->end
&&
454 code_resource
.end
> res
->end
) {
455 sub_res
= alloc_bootmem_low(sizeof(struct resource
));
456 memcpy(sub_res
, &code_resource
,
457 sizeof(struct resource
));
458 sub_res
->end
= res
->end
;
459 code_resource
.start
= res
->end
+ 1;
460 request_resource(res
, sub_res
);
463 if (code_resource
.start
>= res
->start
&&
464 code_resource
.start
<= res
->end
&&
465 code_resource
.end
<= res
->end
)
466 request_resource(res
, &code_resource
);
468 if (data_resource
.start
>= res
->start
&&
469 data_resource
.start
<= res
->end
&&
470 data_resource
.end
> res
->end
) {
471 sub_res
= alloc_bootmem_low(sizeof(struct resource
));
472 memcpy(sub_res
, &data_resource
,
473 sizeof(struct resource
));
474 sub_res
->end
= res
->end
;
475 data_resource
.start
= res
->end
+ 1;
476 request_resource(res
, sub_res
);
479 if (data_resource
.start
>= res
->start
&&
480 data_resource
.start
<= res
->end
&&
481 data_resource
.end
<= res
->end
)
482 request_resource(res
, &data_resource
);
486 unsigned long real_memory_size
;
487 EXPORT_SYMBOL_GPL(real_memory_size
);
489 static void __init
setup_memory_end(void)
491 unsigned long memory_size
;
492 unsigned long max_mem
;
495 #if defined(CONFIG_ZFCPDUMP) || defined(CONFIG_ZFCPDUMP_MODULE)
496 if (ipl_info
.type
== IPL_TYPE_FCP_DUMP
)
497 memory_end
= ZFCPDUMP_HSA_SIZE
;
500 memory_end
&= PAGE_MASK
;
502 max_mem
= memory_end
? min(VMEM_MAX_PHYS
, memory_end
) : VMEM_MAX_PHYS
;
503 memory_end
= min(max_mem
, memory_end
);
506 * Make sure all chunks are MAX_ORDER aligned so we don't need the
507 * extra checks that HOLES_IN_ZONE would require.
509 for (i
= 0; i
< MEMORY_CHUNKS
; i
++) {
510 unsigned long start
, end
;
511 struct mem_chunk
*chunk
;
514 chunk
= &memory_chunk
[i
];
515 align
= 1UL << (MAX_ORDER
+ PAGE_SHIFT
- 1);
516 start
= (chunk
->addr
+ align
- 1) & ~(align
- 1);
517 end
= (chunk
->addr
+ chunk
->size
) & ~(align
- 1);
519 memset(chunk
, 0, sizeof(*chunk
));
522 chunk
->size
= end
- start
;
526 for (i
= 0; i
< MEMORY_CHUNKS
; i
++) {
527 struct mem_chunk
*chunk
= &memory_chunk
[i
];
529 real_memory_size
= max(real_memory_size
,
530 chunk
->addr
+ chunk
->size
);
531 if (chunk
->addr
>= max_mem
) {
532 memset(chunk
, 0, sizeof(*chunk
));
535 if (chunk
->addr
+ chunk
->size
> max_mem
)
536 chunk
->size
= max_mem
- chunk
->addr
;
537 memory_size
= max(memory_size
, chunk
->addr
+ chunk
->size
);
540 memory_end
= memory_size
;
546 unsigned long bootmap_size
;
547 unsigned long start_pfn
, end_pfn
;
551 * partially used pages are not usable - thus
552 * we are rounding upwards:
554 start_pfn
= PFN_UP(__pa(&_end
));
555 end_pfn
= max_pfn
= PFN_DOWN(memory_end
);
557 #ifdef CONFIG_BLK_DEV_INITRD
559 * Move the initrd in case the bitmap of the bootmem allocater
560 * would overwrite it.
563 if (INITRD_START
&& INITRD_SIZE
) {
564 unsigned long bmap_size
;
567 bmap_size
= bootmem_bootmap_pages(end_pfn
- start_pfn
+ 1);
568 bmap_size
= PFN_PHYS(bmap_size
);
570 if (PFN_PHYS(start_pfn
) + bmap_size
> INITRD_START
) {
571 start
= PFN_PHYS(start_pfn
) + bmap_size
+ PAGE_SIZE
;
573 if (start
+ INITRD_SIZE
> memory_end
) {
574 printk("initrd extends beyond end of memory "
575 "(0x%08lx > 0x%08lx)\n"
576 "disabling initrd\n",
577 start
+ INITRD_SIZE
, memory_end
);
578 INITRD_START
= INITRD_SIZE
= 0;
580 printk("Moving initrd (0x%08lx -> 0x%08lx, "
582 INITRD_START
, start
, INITRD_SIZE
);
583 memmove((void *) start
, (void *) INITRD_START
,
585 INITRD_START
= start
;
592 * Initialize the boot-time allocator
594 bootmap_size
= init_bootmem(start_pfn
, end_pfn
);
597 * Register RAM areas with the bootmem allocator.
600 for (i
= 0; i
< MEMORY_CHUNKS
&& memory_chunk
[i
].size
> 0; i
++) {
601 unsigned long start_chunk
, end_chunk
, pfn
;
603 if (memory_chunk
[i
].type
!= CHUNK_READ_WRITE
)
605 start_chunk
= PFN_DOWN(memory_chunk
[i
].addr
);
606 end_chunk
= start_chunk
+ PFN_DOWN(memory_chunk
[i
].size
) - 1;
607 end_chunk
= min(end_chunk
, end_pfn
);
608 if (start_chunk
>= end_chunk
)
610 add_active_range(0, start_chunk
, end_chunk
);
611 pfn
= max(start_chunk
, start_pfn
);
612 for (; pfn
<= end_chunk
; pfn
++)
613 page_set_storage_key(PFN_PHYS(pfn
), PAGE_DEFAULT_KEY
);
616 psw_set_key(PAGE_DEFAULT_KEY
);
618 free_bootmem_with_active_regions(0, max_pfn
);
621 * Reserve memory used for lowcore/command line/kernel image.
623 reserve_bootmem(0, (unsigned long)_ehead
, BOOTMEM_DEFAULT
);
624 reserve_bootmem((unsigned long)_stext
,
625 PFN_PHYS(start_pfn
) - (unsigned long)_stext
,
628 * Reserve the bootmem bitmap itself as well. We do this in two
629 * steps (first step was init_bootmem()) because this catches
630 * the (very unlikely) case of us accidentally initializing the
631 * bootmem allocator with an invalid RAM area.
633 reserve_bootmem(start_pfn
<< PAGE_SHIFT
, bootmap_size
,
636 #ifdef CONFIG_BLK_DEV_INITRD
637 if (INITRD_START
&& INITRD_SIZE
) {
638 if (INITRD_START
+ INITRD_SIZE
<= memory_end
) {
639 reserve_bootmem(INITRD_START
, INITRD_SIZE
,
641 initrd_start
= INITRD_START
;
642 initrd_end
= initrd_start
+ INITRD_SIZE
;
644 printk("initrd extends beyond end of memory "
645 "(0x%08lx > 0x%08lx)\ndisabling initrd\n",
646 initrd_start
+ INITRD_SIZE
, memory_end
);
647 initrd_start
= initrd_end
= 0;
653 static int __init
__stfle(unsigned long long *list
, int doublewords
)
655 typedef struct { unsigned long long _
[doublewords
]; } addrtype
;
656 register unsigned long __nr
asm("0") = doublewords
- 1;
658 asm volatile(".insn s,0xb2b00000,%0" /* stfle */
659 : "=m" (*(addrtype
*) list
), "+d" (__nr
) : : "cc");
663 int __init
stfle(unsigned long long *list
, int doublewords
)
665 if (!(stfl() & (1UL << 24)))
667 return __stfle(list
, doublewords
);
671 * Setup hardware capabilities.
673 static void __init
setup_hwcaps(void)
675 static const int stfl_bits
[6] = { 0, 2, 7, 17, 19, 21 };
676 struct cpuinfo_S390
*cpuinfo
= &S390_lowcore
.cpu_data
;
677 unsigned long long facility_list_extended
;
678 unsigned int facility_list
;
681 facility_list
= stfl();
683 * The store facility list bits numbers as found in the principles
684 * of operation are numbered with bit 1UL<<31 as number 0 to
685 * bit 1UL<<0 as number 31.
686 * Bit 0: instructions named N3, "backported" to esa-mode
687 * Bit 2: z/Architecture mode is active
688 * Bit 7: the store-facility-list-extended facility is installed
689 * Bit 17: the message-security assist is installed
690 * Bit 19: the long-displacement facility is installed
691 * Bit 21: the extended-immediate facility is installed
692 * These get translated to:
693 * HWCAP_S390_ESAN3 bit 0, HWCAP_S390_ZARCH bit 1,
694 * HWCAP_S390_STFLE bit 2, HWCAP_S390_MSA bit 3,
695 * HWCAP_S390_LDISP bit 4, and HWCAP_S390_EIMM bit 5.
697 for (i
= 0; i
< 6; i
++)
698 if (facility_list
& (1UL << (31 - stfl_bits
[i
])))
699 elf_hwcap
|= 1UL << i
;
702 * Check for additional facilities with store-facility-list-extended.
703 * stfle stores doublewords (8 byte) with bit 1ULL<<63 as bit 0
704 * and 1ULL<<0 as bit 63. Bits 0-31 contain the same information
705 * as stored by stfl, bits 32-xxx contain additional facilities.
706 * How many facility words are stored depends on the number of
707 * doublewords passed to the instruction. The additional facilites
709 * Bit 43: decimal floating point facility is installed
711 * HWCAP_S390_DFP bit 6.
713 if ((elf_hwcap
& (1UL << 2)) &&
714 __stfle(&facility_list_extended
, 1) > 0) {
715 if (facility_list_extended
& (1ULL << (64 - 43)))
716 elf_hwcap
|= 1UL << 6;
719 if (MACHINE_HAS_HPAGE
)
720 elf_hwcap
|= 1UL << 7;
722 switch (cpuinfo
->cpu_id
.machine
) {
724 #if !defined(CONFIG_64BIT)
725 default: /* Use "g5" as default for 31 bit kernels. */
727 strcpy(elf_platform
, "g5");
731 #if defined(CONFIG_64BIT)
732 default: /* Use "z900" as default for 64 bit kernels. */
734 strcpy(elf_platform
, "z900");
738 strcpy(elf_platform
, "z990");
741 strcpy(elf_platform
, "z9-109");
747 * Setup function called from init/main.c just after the banner
752 setup_arch(char **cmdline_p
)
755 * print what head.S has found out about the machine
758 printk((MACHINE_IS_VM
) ?
759 "We are running under VM (31 bit mode)\n" :
760 "We are running native (31 bit mode)\n");
761 printk((MACHINE_HAS_IEEE
) ?
762 "This machine has an IEEE fpu\n" :
763 "This machine has no IEEE fpu\n");
764 #else /* CONFIG_64BIT */
766 printk("We are running under VM (64 bit mode)\n");
767 else if (MACHINE_IS_KVM
) {
768 printk("We are running under KVM (64 bit mode)\n");
769 add_preferred_console("ttyS", 1, NULL
);
771 printk("We are running native (64 bit mode)\n");
772 #endif /* CONFIG_64BIT */
774 /* Have one command line that is parsed and saved in /proc/cmdline */
775 /* boot_command_line has been already set up in early.c */
776 *cmdline_p
= boot_command_line
;
778 ROOT_DEV
= Root_RAM0
;
780 init_mm
.start_code
= PAGE_OFFSET
;
781 init_mm
.end_code
= (unsigned long) &_etext
;
782 init_mm
.end_data
= (unsigned long) &_edata
;
783 init_mm
.brk
= (unsigned long) &_end
;
785 if (MACHINE_HAS_MVCOS
)
786 memcpy(&uaccess
, &uaccess_mvcos
, sizeof(uaccess
));
788 memcpy(&uaccess
, &uaccess_std
, sizeof(uaccess
));
794 setup_addressing_mode();
800 __cpu_logical_map
[0] = S390_lowcore
.cpu_data
.cpu_addr
;
801 s390_init_cpu_topology();
804 * Setup capabilities (ELF_HWCAP & ELF_PLATFORM).
809 * Create kernel page tables and switch to virtual addressing.
813 /* Setup default console */
816 /* Setup zfcpdump support */
817 setup_zfcpdump(console_devno
);
820 void __cpuinit
print_cpu_info(struct cpuinfo_S390
*cpuinfo
)
822 printk(KERN_INFO
"cpu %d "
826 "vers=%02X ident=%06X machine=%04X unused=%04X\n",
831 cpuinfo
->cpu_id
.version
,
832 cpuinfo
->cpu_id
.ident
,
833 cpuinfo
->cpu_id
.machine
,
834 cpuinfo
->cpu_id
.unused
);
838 * show_cpuinfo - Get information on one CPU for use by procfs.
841 static int show_cpuinfo(struct seq_file
*m
, void *v
)
843 static const char *hwcap_str
[8] = {
844 "esan3", "zarch", "stfle", "msa", "ldisp", "eimm", "dfp",
847 struct cpuinfo_S390
*cpuinfo
;
848 unsigned long n
= (unsigned long) v
- 1;
851 s390_adjust_jiffies();
854 seq_printf(m
, "vendor_id : IBM/S390\n"
855 "# processors : %i\n"
856 "bogomips per cpu: %lu.%02lu\n",
857 num_online_cpus(), loops_per_jiffy
/(500000/HZ
),
858 (loops_per_jiffy
/(5000/HZ
))%100);
859 seq_puts(m
, "features\t: ");
860 for (i
= 0; i
< 8; i
++)
861 if (hwcap_str
[i
] && (elf_hwcap
& (1UL << i
)))
862 seq_printf(m
, "%s ", hwcap_str
[i
]);
868 if (smp_processor_id() == n
)
869 cpuinfo
= &S390_lowcore
.cpu_data
;
871 cpuinfo
= &lowcore_ptr
[n
]->cpu_data
;
873 cpuinfo
= &S390_lowcore
.cpu_data
;
875 seq_printf(m
, "processor %li: "
877 "identification = %06X, "
879 n
, cpuinfo
->cpu_id
.version
,
880 cpuinfo
->cpu_id
.ident
,
881 cpuinfo
->cpu_id
.machine
);
887 static void *c_start(struct seq_file
*m
, loff_t
*pos
)
889 return *pos
< NR_CPUS
? (void *)((unsigned long) *pos
+ 1) : NULL
;
891 static void *c_next(struct seq_file
*m
, void *v
, loff_t
*pos
)
894 return c_start(m
, pos
);
896 static void c_stop(struct seq_file
*m
, void *v
)
899 const struct seq_operations cpuinfo_op
= {
903 .show
= show_cpuinfo
,