/*1* arch/s390/kernel/head64.S2*3* Copyright (C) IBM Corp. 1999,20104*5* Author(s): Hartmut Penner <[email protected]>6* Martin Schwidefsky <[email protected]>7* Rob van der Heij <[email protected]>8* Heiko Carstens <[email protected]>9*10*/1112#include <linux/init.h>13#include <asm/asm-offsets.h>14#include <asm/thread_info.h>15#include <asm/page.h>1617__HEAD18.globl startup_continue19startup_continue:20larl %r1,sched_clock_base_cc21mvc 0(8,%r1),__LC_LAST_UPDATE_CLOCK22larl %r13,.LPG1 # get base23lctlg %c0,%c15,.Lctl-.LPG1(%r13) # load control registers24lg %r12,.Lparmaddr-.LPG1(%r13) # pointer to parameter area25# move IPL device to lowcore26lghi %r0,__LC_PASTE27stg %r0,__LC_VDSO_PER_CPU28#29# Setup stack30#31larl %r15,init_thread_union32stg %r15,__LC_THREAD_INFO # cache thread info in lowcore33lg %r14,__TI_task(%r15) # cache current in lowcore34stg %r14,__LC_CURRENT35aghi %r15,1<<(PAGE_SHIFT+THREAD_ORDER) # init_task_union + THREAD_SIZE36stg %r15,__LC_KERNEL_STACK # set end of kernel stack37aghi %r15,-16038#39# Save ipl parameters, clear bss memory, initialize storage key for kernel pages,40# and create a kernel NSS if the SAVESYS= parm is defined41#42brasl %r14,startup_init43lpswe .Lentry-.LPG1(13) # jump to _stext in primary-space,44# virtual and never return ...45.align 1646.LPG1:47.Lentry:.quad 0x0000000180000000,_stext48.Lctl: .quad 0x04350002 # cr0: various things49.quad 0 # cr1: primary space segment table50.quad .Lduct # cr2: dispatchable unit control table51.quad 0 # cr3: instruction authorization52.quad 0 # cr4: instruction authorization53.quad .Lduct # cr5: primary-aste origin54.quad 0 # cr6: I/O interrupts55.quad 0 # cr7: secondary space segment table56.quad 0 # cr8: access registers translation57.quad 0 # cr9: tracing off58.quad 0 # cr10: tracing off59.quad 0 # cr11: tracing off60.quad 0 # cr12: tracing off61.quad 0 # cr13: home space segment table62.quad 0xc0000000 # cr14: machine check handling off63.quad 0 # cr15: linkage stack operations64.Lpcmsk:.quad 0x000000018000000065.L4malign:.quad 0xffffffffffc0000066.Lscan2g:.quad 0x80000000 + 0x20000 - 8 # 2GB + 128K - 867.Lnop: .long 0x0700070068.Lparmaddr:69.quad PARMAREA70.align 6471.Lduct: .long 0,0,0,0,.Lduald,0,0,072.long 0,0,0,0,0,0,0,073.align 12874.Lduald:.rept 875.long 0x80000000,0,0,0 # invalid access-list entries76.endr7778.globl _ehead79_ehead:8081#ifdef CONFIG_SHARED_KERNEL82.org 0x100000 - 0x11000 # head.o ends at 0x1100083#endif8485#86# startup-code, running in absolute addressing mode87#88.globl _stext89_stext: basr %r13,0 # get base90.LPG3:91# check control registers92stctg %c0,%c15,0(%r15)93oi 6(%r15),0x40 # enable sigp emergency signal94oi 4(%r15),0x10 # switch on low address proctection95lctlg %c0,%c15,0(%r15)9697lam 0,15,.Laregs-.LPG3(%r13) # load acrs needed by uaccess98brasl %r14,start_kernel # go to C code99#100# We returned from start_kernel ?!? PANIK101#102basr %r13,0103lpswe .Ldw-.(%r13) # load disabled wait psw104105.align 8106.Ldw: .quad 0x0002000180000000,0x0000000000000000107.Laregs:.long 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0108109110