959 lines · 25.4 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/sched/task.h>#include <linux/cpu.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/random.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/dma-contiguous.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/kexec.h>#include <linux/crash_dump.h>#include <linux/memory.h>#include <linux/compat.h> #include <asm/ipl.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 <asm/sysinfo.h>#include <asm/numa.h>#include "entry.h" /* * 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 __read_mostly = 0;char elf_platform[ELF_PLATFORM_SIZE]; unsigned long int_hwcap = 0; int __initdata memory_end_set;unsigned long __initdata memory_end;unsigned long __initdata max_physmem_end; unsigned long VMALLOC_START;EXPORT_SYMBOL(VMALLOC_START); unsigned long VMALLOC_END;EXPORT_SYMBOL(VMALLOC_END); struct page *vmemmap;EXPORT_SYMBOL(vmemmap); unsigned long MODULES_VADDR;unsigned long MODULES_END; /* 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 (CONSOLE_IS_3215 || CONSOLE_IS_SCLP)		add_preferred_console("ttyS", 0, NULL);	else if (CONSOLE_IS_3270)		add_preferred_console("tty3270", 0, NULL);	else if (CONSOLE_IS_VT220)		add_preferred_console("ttyS", 1, NULL);	else if (CONSOLE_IS_HVC)		add_preferred_console("hvc", 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 (MACHINE_IS_KVM) {		if (sclp.has_vt220 && IS_ENABLED(CONFIG_SCLP_VT220_CONSOLE))			SET_CONSOLE_VT220;		else if (sclp.has_linemode && IS_ENABLED(CONFIG_SCLP_CONSOLE))			SET_CONSOLE_SCLP;		else			SET_CONSOLE_HVC;	} else {#if defined(CONFIG_SCLP_CONSOLE) || defined(CONFIG_SCLP_VT220_CONSOLE)		SET_CONSOLE_SCLP;#endif	}} #ifdef CONFIG_CRASH_DUMPstatic 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_CRASH_DUMP */  /* * 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 &= PAGE_MASK;	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); void *restart_stack __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 = memblock_virt_alloc_low(sizeof(*lc), sizeof(*lc));	lc->restart_psw.mask = PSW_KERNEL_BITS;	lc->restart_psw.addr = (unsigned long) restart_int_handler;	lc->external_new_psw.mask = PSW_KERNEL_BITS |		PSW_MASK_DAT | PSW_MASK_MCHECK;	lc->external_new_psw.addr = (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 = (unsigned long) system_call;	lc->program_new_psw.mask = PSW_KERNEL_BITS |		PSW_MASK_DAT | PSW_MASK_MCHECK;	lc->program_new_psw.addr = (unsigned long) pgm_check_handler;	lc->mcck_new_psw.mask = PSW_KERNEL_BITS;	lc->mcck_new_psw.addr = (unsigned long) mcck_int_handler;	lc->io_new_psw.mask = PSW_KERNEL_BITS |		PSW_MASK_DAT | PSW_MASK_MCHECK;	lc->io_new_psw.addr = (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)		memblock_virt_alloc(ASYNC_SIZE, ASYNC_SIZE)		+ ASYNC_SIZE - STACK_FRAME_OVERHEAD - sizeof(struct pt_regs);	lc->panic_stack = (unsigned long)		memblock_virt_alloc(PAGE_SIZE, PAGE_SIZE)		+ PAGE_SIZE - STACK_FRAME_OVERHEAD - sizeof(struct pt_regs);	lc->current_task = (unsigned long)&init_task;	lc->lpp = LPP_MAGIC;	lc->machine_flags = S390_lowcore.machine_flags;	lc->preempt_count = S390_lowcore.preempt_count;	lc->stfl_fac_list = S390_lowcore.stfl_fac_list;	memcpy(lc->stfle_fac_list, S390_lowcore.stfle_fac_list,	       MAX_FACILITY_BIT/8);	if (MACHINE_HAS_VX || MACHINE_HAS_GS) {		unsigned long bits, size; 		bits = MACHINE_HAS_GS ? 11 : 10;		size = 1UL << bits;		lc->mcesad = (__u64) memblock_virt_alloc(size, size);		if (MACHINE_HAS_GS)			lc->mcesad |= bits;	}	lc->vdso_per_cpu_data = (unsigned long) &lc->paste[0];	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; 	restart_stack = memblock_virt_alloc(ASYNC_SIZE, ASYNC_SIZE);	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 necessary 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); #ifdef CONFIG_SMP	lc->spinlock_lockval = arch_spin_lockval(0);#endif 	set_prefix((u32)(unsigned long) lc);	lowcore_ptr[0] = lc;} static struct resource code_resource = {	.name  = "Kernel code",	.flags = IORESOURCE_BUSY | IORESOURCE_SYSTEM_RAM,}; static struct resource data_resource = {	.name = "Kernel data",	.flags = IORESOURCE_BUSY | IORESOURCE_SYSTEM_RAM,}; static struct resource bss_resource = {	.name = "Kernel bss",	.flags = IORESOURCE_BUSY | IORESOURCE_SYSTEM_RAM,}; 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;	struct memblock_region *reg;	int 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_each_memblock(memory, reg) {		res = memblock_virt_alloc(sizeof(*res), 8);		res->flags = IORESOURCE_BUSY | IORESOURCE_SYSTEM_RAM; 		res->name = "System RAM";		res->start = reg->base;		res->end = reg->base + reg->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 = memblock_virt_alloc(sizeof(*sub_res), 8);				*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);			}		}	}#ifdef CONFIG_CRASH_DUMP	/*	 * Re-add removed crash kernel memory as reserved memory. This makes	 * sure it will be mapped with the identity mapping and struct pages	 * will be created, so it can be resized later on.	 * However add it later since the crash kernel resource should not be	 * part of the System RAM resource.	 */	if (crashk_res.end) {		memblock_add_node(crashk_res.start, resource_size(&crashk_res), 0);		memblock_reserve(crashk_res.start, resource_size(&crashk_res));		insert_resource(&iomem_resource, &crashk_res);	}#endif} static void __init setup_memory_end(void){	unsigned long vmax, vmalloc_size, tmp; 	/* Choose kernel address space layout: 2, 3, or 4 levels. */	vmalloc_size = VMALLOC_END ?: (128UL << 30) - MODULES_LEN;	tmp = (memory_end ?: max_physmem_end) / PAGE_SIZE;	tmp = tmp * (sizeof(struct page) + PAGE_SIZE);	if (tmp + vmalloc_size + MODULES_LEN <= (1UL << 42))		vmax = 1UL << 42;	/* 3-level kernel page table */	else		vmax = 1UL << 53;	/* 4-level kernel page table */	/* module area is at the end of the kernel address space. */	MODULES_END = vmax;	MODULES_VADDR = MODULES_END - MODULES_LEN;	VMALLOC_END = MODULES_VADDR;	VMALLOC_START = vmax - vmalloc_size; 	/* Split remaining virtual space between 1:1 mapping & vmemmap array */	tmp = VMALLOC_START / (PAGE_SIZE + sizeof(struct page));	/* vmemmap contains a multiple of PAGES_PER_SECTION struct pages */	tmp = SECTION_ALIGN_UP(tmp);	tmp = VMALLOC_START - tmp * sizeof(struct page);	tmp &= ~((vmax >> 11) - 1);	/* align to page table level */	tmp = min(tmp, 1UL << MAX_PHYSMEM_BITS);	vmemmap = (struct page *) tmp; 	/* Take care that memory_end is set and <= vmemmap */	memory_end = min(memory_end ?: max_physmem_end, tmp);	max_pfn = max_low_pfn = PFN_DOWN(memory_end);	memblock_remove(memory_end, ULONG_MAX); 	pr_notice("The maximum memory size is %luMB\n", memory_end >> 20);} #ifdef CONFIG_CRASH_DUMP 

Lines 1–500 of 959.