1046 lines · 27.9 KB · C
RawDownload
/* *  S390 version *    Copyright IBM Corp. 1999, 2012 *    Author(s): Hartmut Penner (hp@de.ibm.com), *               Martin Schwidefsky (schwidefsky@de.ibm.com) * *  Derived from "arch/i386/kernel/setup.c" *    Copyright (C) 1995, Linus Torvalds */ /* * This file handles the architecture-dependent parts of initialization */ #define KMSG_COMPONENT "setup"#define pr_fmt(fmt) KMSG_COMPONENT ": " fmt #include <linux/errno.h>#include <linux/export.h>#include <linux/sched.h>#include <linux/kernel.h>#include <linux/memblock.h>#include <linux/mm.h>#include <linux/stddef.h>#include <linux/unistd.h>#include <linux/ptrace.h>#include <linux/user.h>#include <linux/tty.h>#include <linux/ioport.h>#include <linux/delay.h>#include <linux/init.h>#include <linux/initrd.h>#include <linux/bootmem.h>#include <linux/root_dev.h>#include <linux/console.h>#include <linux/kernel_stat.h>#include <linux/device.h>#include <linux/notifier.h>#include <linux/pfn.h>#include <linux/ctype.h>#include <linux/reboot.h>#include <linux/topology.h>#include <linux/ftrace.h>#include <linux/kexec.h>#include <linux/crash_dump.h>#include <linux/memory.h>#include <linux/compat.h> #include <asm/ipl.h>#include <asm/uaccess.h>#include <asm/facility.h>#include <asm/smp.h>#include <asm/mmu_context.h>#include <asm/cpcmd.h>#include <asm/lowcore.h>#include <asm/irq.h>#include <asm/page.h>#include <asm/ptrace.h>#include <asm/sections.h>#include <asm/ebcdic.h>#include <asm/kvm_virtio.h>#include <asm/diag.h>#include <asm/os_info.h>#include <asm/sclp.h>#include "entry.h" /* * User copy operations. */struct uaccess_ops uaccess;EXPORT_SYMBOL(uaccess); /* * Machine setup.. */unsigned int console_mode = 0;EXPORT_SYMBOL(console_mode); unsigned int console_devno = -1;EXPORT_SYMBOL(console_devno); unsigned int console_irq = -1;EXPORT_SYMBOL(console_irq); unsigned long elf_hwcap = 0;char elf_platform[ELF_PLATFORM_SIZE]; struct mem_chunk __initdata memory_chunk[MEMORY_CHUNKS]; int __initdata memory_end_set;unsigned long __initdata memory_end; unsigned long VMALLOC_START;EXPORT_SYMBOL(VMALLOC_START); unsigned long VMALLOC_END;EXPORT_SYMBOL(VMALLOC_END); struct page *vmemmap;EXPORT_SYMBOL(vmemmap); #ifdef CONFIG_64BITunsigned long MODULES_VADDR;unsigned long MODULES_END;#endif /* An array with a pointer to the lowcore of every CPU. */struct _lowcore *lowcore_ptr[NR_CPUS];EXPORT_SYMBOL(lowcore_ptr); /* * This is set up by the setup-routine at boot-time * for S390 need to find out, what we have to setup * using address 0x10400 ... */ #include <asm/setup.h> /* * condev= and conmode= setup parameter. */ static int __init condev_setup(char *str){	int vdev; 	vdev = simple_strtoul(str, &str, 0);	if (vdev >= 0 && vdev < 65536) {		console_devno = vdev;		console_irq = -1;	}	return 1;} __setup("condev=", condev_setup); static void __init set_preferred_console(void){	if (MACHINE_IS_KVM) {		if (sclp_has_vt220())			add_preferred_console("ttyS", 1, NULL);		else if (sclp_has_linemode())			add_preferred_console("ttyS", 0, NULL);		else			add_preferred_console("hvc", 0, NULL);	} else if (CONSOLE_IS_3215 || CONSOLE_IS_SCLP)		add_preferred_console("ttyS", 0, NULL);	else if (CONSOLE_IS_3270)		add_preferred_console("tty3270", 0, NULL);} static int __init conmode_setup(char *str){#if defined(CONFIG_SCLP_CONSOLE) || defined(CONFIG_SCLP_VT220_CONSOLE)	if (strncmp(str, "hwc", 4) == 0 || strncmp(str, "sclp", 5) == 0)                SET_CONSOLE_SCLP;#endif#if defined(CONFIG_TN3215_CONSOLE)	if (strncmp(str, "3215", 5) == 0)		SET_CONSOLE_3215;#endif#if defined(CONFIG_TN3270_CONSOLE)	if (strncmp(str, "3270", 5) == 0)		SET_CONSOLE_3270;#endif	set_preferred_console();        return 1;} __setup("conmode=", conmode_setup); static void __init conmode_default(void){	char query_buffer[1024];	char *ptr;         if (MACHINE_IS_VM) {		cpcmd("QUERY CONSOLE", query_buffer, 1024, NULL);		console_devno = simple_strtoul(query_buffer + 5, NULL, 16);		ptr = strstr(query_buffer, "SUBCHANNEL =");		console_irq = simple_strtoul(ptr + 13, NULL, 16);		cpcmd("QUERY TERM", query_buffer, 1024, NULL);		ptr = strstr(query_buffer, "CONMODE");		/*		 * Set the conmode to 3215 so that the device recognition 		 * will set the cu_type of the console to 3215. If the		 * conmode is 3270 and we don't set it back then both		 * 3215 and the 3270 driver will try to access the console		 * device (3215 as console and 3270 as normal tty).		 */		cpcmd("TERM CONMODE 3215", NULL, 0, NULL);		if (ptr == NULL) {#if defined(CONFIG_SCLP_CONSOLE) || defined(CONFIG_SCLP_VT220_CONSOLE)			SET_CONSOLE_SCLP;#endif			return;		}		if (strncmp(ptr + 8, "3270", 4) == 0) {#if defined(CONFIG_TN3270_CONSOLE)			SET_CONSOLE_3270;#elif defined(CONFIG_TN3215_CONSOLE)			SET_CONSOLE_3215;#elif defined(CONFIG_SCLP_CONSOLE) || defined(CONFIG_SCLP_VT220_CONSOLE)			SET_CONSOLE_SCLP;#endif		} else if (strncmp(ptr + 8, "3215", 4) == 0) {#if defined(CONFIG_TN3215_CONSOLE)			SET_CONSOLE_3215;#elif defined(CONFIG_TN3270_CONSOLE)			SET_CONSOLE_3270;#elif defined(CONFIG_SCLP_CONSOLE) || defined(CONFIG_SCLP_VT220_CONSOLE)			SET_CONSOLE_SCLP;#endif		}	} else {#if defined(CONFIG_SCLP_CONSOLE) || defined(CONFIG_SCLP_VT220_CONSOLE)		SET_CONSOLE_SCLP;#endif	}} #ifdef CONFIG_ZFCPDUMPstatic void __init setup_zfcpdump(void){	if (ipl_info.type != IPL_TYPE_FCP_DUMP)		return;	if (OLDMEM_BASE)		return;	strcat(boot_command_line, " cio_ignore=all,!ipldev,!condev");	console_loglevel = 2;}#elsestatic inline void setup_zfcpdump(void) {}#endif /* CONFIG_ZFCPDUMP */  /* * Reboot, halt and power_off stubs. They just call _machine_restart, * _machine_halt or _machine_power_off.  */ void machine_restart(char *command){	if ((!in_interrupt() && !in_atomic()) || oops_in_progress)		/*		 * Only unblank the console if we are called in enabled		 * context or a bust_spinlocks cleared the way for us.		 */		console_unblank();	_machine_restart(command);} void machine_halt(void){	if (!in_interrupt() || oops_in_progress)		/*		 * Only unblank the console if we are called in enabled		 * context or a bust_spinlocks cleared the way for us.		 */		console_unblank();	_machine_halt();} void machine_power_off(void){	if (!in_interrupt() || oops_in_progress)		/*		 * Only unblank the console if we are called in enabled		 * context or a bust_spinlocks cleared the way for us.		 */		console_unblank();	_machine_power_off();} /* * Dummy power off function. */void (*pm_power_off)(void) = machine_power_off;EXPORT_SYMBOL_GPL(pm_power_off); static int __init early_parse_mem(char *p){	memory_end = memparse(p, &p);	memory_end_set = 1;	return 0;}early_param("mem", early_parse_mem); static int __init parse_vmalloc(char *arg){	if (!arg)		return -EINVAL;	VMALLOC_END = (memparse(arg, &arg) + PAGE_SIZE - 1) & PAGE_MASK;	return 0;}early_param("vmalloc", parse_vmalloc); static int __init early_parse_user_mode(char *p){	if (!p || strcmp(p, "primary") == 0)		return 0;	return 1;}early_param("user_mode", early_parse_user_mode); void *restart_stack __attribute__((__section__(".data"))); static void __init setup_lowcore(void){	struct _lowcore *lc; 	/*	 * Setup lowcore for boot cpu	 */	BUILD_BUG_ON(sizeof(struct _lowcore) != LC_PAGES * 4096);	lc = __alloc_bootmem_low(LC_PAGES * PAGE_SIZE, LC_PAGES * PAGE_SIZE, 0);	lc->restart_psw.mask = PSW_KERNEL_BITS;	lc->restart_psw.addr =		PSW_ADDR_AMODE | (unsigned long) restart_int_handler;	lc->external_new_psw.mask = PSW_KERNEL_BITS |		PSW_MASK_DAT | PSW_MASK_MCHECK;	lc->external_new_psw.addr =		PSW_ADDR_AMODE | (unsigned long) ext_int_handler;	lc->svc_new_psw.mask = PSW_KERNEL_BITS |		PSW_MASK_DAT | PSW_MASK_IO | PSW_MASK_EXT | PSW_MASK_MCHECK;	lc->svc_new_psw.addr = PSW_ADDR_AMODE | (unsigned long) system_call;	lc->program_new_psw.mask = PSW_KERNEL_BITS |		PSW_MASK_DAT | PSW_MASK_MCHECK;	lc->program_new_psw.addr =		PSW_ADDR_AMODE | (unsigned long) pgm_check_handler;	lc->mcck_new_psw.mask = PSW_KERNEL_BITS;	lc->mcck_new_psw.addr =		PSW_ADDR_AMODE | (unsigned long) mcck_int_handler;	lc->io_new_psw.mask = PSW_KERNEL_BITS |		PSW_MASK_DAT | PSW_MASK_MCHECK;	lc->io_new_psw.addr = PSW_ADDR_AMODE | (unsigned long) io_int_handler;	lc->clock_comparator = -1ULL;	lc->kernel_stack = ((unsigned long) &init_thread_union)		+ THREAD_SIZE - STACK_FRAME_OVERHEAD - sizeof(struct pt_regs);	lc->async_stack = (unsigned long)		__alloc_bootmem(ASYNC_SIZE, ASYNC_SIZE, 0)		+ ASYNC_SIZE - STACK_FRAME_OVERHEAD - sizeof(struct pt_regs);	lc->panic_stack = (unsigned long)		__alloc_bootmem(PAGE_SIZE, PAGE_SIZE, 0)		+ PAGE_SIZE - STACK_FRAME_OVERHEAD - sizeof(struct pt_regs);	lc->current_task = (unsigned long) init_thread_union.thread_info.task;	lc->thread_info = (unsigned long) &init_thread_union;	lc->machine_flags = S390_lowcore.machine_flags;	lc->stfl_fac_list = S390_lowcore.stfl_fac_list;	memcpy(lc->stfle_fac_list, S390_lowcore.stfle_fac_list,	       MAX_FACILITY_BIT/8);#ifndef CONFIG_64BIT	if (MACHINE_HAS_IEEE) {		lc->extended_save_area_addr = (__u32)			__alloc_bootmem_low(PAGE_SIZE, PAGE_SIZE, 0);		/* enable extended save area */		__ctl_set_bit(14, 29);	}#else	lc->vdso_per_cpu_data = (unsigned long) &lc->paste[0];#endif	lc->sync_enter_timer = S390_lowcore.sync_enter_timer;	lc->async_enter_timer = S390_lowcore.async_enter_timer;	lc->exit_timer = S390_lowcore.exit_timer;	lc->user_timer = S390_lowcore.user_timer;	lc->system_timer = S390_lowcore.system_timer;	lc->steal_timer = S390_lowcore.steal_timer;	lc->last_update_timer = S390_lowcore.last_update_timer;	lc->last_update_clock = S390_lowcore.last_update_clock;	lc->ftrace_func = S390_lowcore.ftrace_func; 	restart_stack = __alloc_bootmem(ASYNC_SIZE, ASYNC_SIZE, 0);	restart_stack += ASYNC_SIZE; 	/*	 * Set up PSW restart to call ipl.c:do_restart(). Copy the relevant	 * restart data to the absolute zero lowcore. This is necesary if	 * PSW restart is done on an offline CPU that has lowcore zero.	 */	lc->restart_stack = (unsigned long) restart_stack;	lc->restart_fn = (unsigned long) do_restart;	lc->restart_data = 0;	lc->restart_source = -1UL; 	/* Setup absolute zero lowcore */	mem_assign_absolute(S390_lowcore.restart_stack, lc->restart_stack);	mem_assign_absolute(S390_lowcore.restart_fn, lc->restart_fn);	mem_assign_absolute(S390_lowcore.restart_data, lc->restart_data);	mem_assign_absolute(S390_lowcore.restart_source, lc->restart_source);	mem_assign_absolute(S390_lowcore.restart_psw, lc->restart_psw); 	set_prefix((u32)(unsigned long) lc);	lowcore_ptr[0] = lc;} static struct resource code_resource = {	.name  = "Kernel code",	.flags = IORESOURCE_BUSY | IORESOURCE_MEM,}; static struct resource data_resource = {	.name = "Kernel data",	.flags = IORESOURCE_BUSY | IORESOURCE_MEM,}; static struct resource bss_resource = {	.name = "Kernel bss",	.flags = IORESOURCE_BUSY | IORESOURCE_MEM,}; static struct resource __initdata *standard_resources[] = {	&code_resource,	&data_resource,	&bss_resource,}; static void __init setup_resources(void){	struct resource *res, *std_res, *sub_res;	int i, j; 	code_resource.start = (unsigned long) &_text;	code_resource.end = (unsigned long) &_etext - 1;	data_resource.start = (unsigned long) &_etext;	data_resource.end = (unsigned long) &_edata - 1;	bss_resource.start = (unsigned long) &__bss_start;	bss_resource.end = (unsigned long) &__bss_stop - 1; 	for (i = 0; i < MEMORY_CHUNKS; i++) {		if (!memory_chunk[i].size)			continue;		res = alloc_bootmem_low(sizeof(*res));		res->flags = IORESOURCE_BUSY | IORESOURCE_MEM;		switch (memory_chunk[i].type) {		case CHUNK_READ_WRITE:			res->name = "System RAM";			break;		case CHUNK_READ_ONLY:			res->name = "System ROM";			res->flags |= IORESOURCE_READONLY;			break;		default:			res->name = "reserved";		}		res->start = memory_chunk[i].addr;		res->end = res->start + memory_chunk[i].size - 1;		request_resource(&iomem_resource, res); 		for (j = 0; j < ARRAY_SIZE(standard_resources); j++) {			std_res = standard_resources[j];			if (std_res->start < res->start ||			    std_res->start > res->end)				continue;			if (std_res->end > res->end) {				sub_res = alloc_bootmem_low(sizeof(*sub_res));				*sub_res = *std_res;				sub_res->end = res->end;				std_res->start = res->end + 1;				request_resource(res, sub_res);			} else {				request_resource(res, std_res);			}		}	}} static void __init setup_memory_end(void){	unsigned long vmax, vmalloc_size, tmp;	unsigned long real_memory_size = 0;	int i;  #ifdef CONFIG_ZFCPDUMP	if (ipl_info.type == IPL_TYPE_FCP_DUMP &&	    !OLDMEM_BASE && sclp_get_hsa_size()) {		memory_end = sclp_get_hsa_size();		memory_end_set = 1;	}#endif	memory_end &= PAGE_MASK; 	/*	 * Make sure all chunks are MAX_ORDER aligned so we don't need the	 * extra checks that HOLES_IN_ZONE would require.	 */	for (i = 0; i < MEMORY_CHUNKS; i++) {		unsigned long start, end;		struct mem_chunk *chunk;		unsigned long align; 		chunk = &memory_chunk[i];		if (!chunk->size)			continue;		align = 1UL << (MAX_ORDER + PAGE_SHIFT - 1);		start = (chunk->addr + align - 1) & ~(align - 1);		end = (chunk->addr + chunk->size) & ~(align - 1);		if (start >= end)			memset(chunk, 0, sizeof(*chunk));		else {			chunk->addr = start;

Lines 1–500 of 1046.