diff options
author | Heiko Carstens <heiko.carstens@de.ibm.com> | 2006-09-28 10:56:37 -0400 |
---|---|---|
committer | Martin Schwidefsky <schwidefsky@de.ibm.com> | 2006-09-28 10:56:37 -0400 |
commit | 25d83cbfaa44e1b9170c0941c3ef52ca39f54ccc (patch) | |
tree | 30d9bbc0a1051b837313edfafc40ffa6c5fbfedc /arch/s390/kernel/head64.S | |
parent | 52149ba6b0ddf3e9d965257cc0513193650b3ea8 (diff) |
[S390] Whitespace cleanup.
Huge s390 assembly files whitespace cleanup.
Signed-off-by: Heiko Carstens <heiko.carstens@de.ibm.com>
Signed-off-by: Martin Schwidefsky <schwidefsky@de.ibm.com>
Diffstat (limited to 'arch/s390/kernel/head64.S')
-rw-r--r-- | arch/s390/kernel/head64.S | 432 |
1 files changed, 216 insertions, 216 deletions
diff --git a/arch/s390/kernel/head64.S b/arch/s390/kernel/head64.S index a8bdd96494c7..48998d50b00a 100644 --- a/arch/s390/kernel/head64.S +++ b/arch/s390/kernel/head64.S | |||
@@ -15,232 +15,232 @@ | |||
15 | # this is called either by the ipl loader or directly by PSW restart | 15 | # this is called either by the ipl loader or directly by PSW restart |
16 | # or linload or SALIPL | 16 | # or linload or SALIPL |
17 | # | 17 | # |
18 | .org 0x10000 | 18 | .org 0x10000 |
19 | startup:basr %r13,0 # get base | 19 | startup:basr %r13,0 # get base |
20 | .LPG0: l %r13,0f-.LPG0(%r13) | 20 | .LPG0: l %r13,0f-.LPG0(%r13) |
21 | b 0(%r13) | 21 | b 0(%r13) |
22 | 0: .long startup_continue | 22 | 0: .long startup_continue |
23 | 23 | ||
24 | # | 24 | # |
25 | # params at 10400 (setup.h) | 25 | # params at 10400 (setup.h) |
26 | # | 26 | # |
27 | .org PARMAREA | 27 | .org PARMAREA |
28 | .quad 0 # IPL_DEVICE | 28 | .quad 0 # IPL_DEVICE |
29 | .quad 0 # INITRD_START | 29 | .quad 0 # INITRD_START |
30 | .quad 0 # INITRD_SIZE | 30 | .quad 0 # INITRD_SIZE |
31 | 31 | ||
32 | .org COMMAND_LINE | 32 | .org COMMAND_LINE |
33 | .byte "root=/dev/ram0 ro" | 33 | .byte "root=/dev/ram0 ro" |
34 | .byte 0 | 34 | .byte 0 |
35 | 35 | ||
36 | .org 0x11000 | 36 | .org 0x11000 |
37 | 37 | ||
38 | startup_continue: | 38 | startup_continue: |
39 | basr %r13,0 # get base | 39 | basr %r13,0 # get base |
40 | .LPG1: sll %r13,1 # remove high order bit | 40 | .LPG1: sll %r13,1 # remove high order bit |
41 | srl %r13,1 | 41 | srl %r13,1 |
42 | lhi %r1,1 # mode 1 = esame | 42 | lhi %r1,1 # mode 1 = esame |
43 | mvi __LC_AR_MODE_ID,1 # set esame flag | 43 | mvi __LC_AR_MODE_ID,1 # set esame flag |
44 | slr %r0,%r0 # set cpuid to zero | 44 | slr %r0,%r0 # set cpuid to zero |
45 | sigp %r1,%r0,0x12 # switch to esame mode | 45 | sigp %r1,%r0,0x12 # switch to esame mode |
46 | sam64 # switch to 64 bit mode | 46 | sam64 # switch to 64 bit mode |
47 | lctlg %c0,%c15,.Lctl-.LPG1(%r13) # load control registers | 47 | lctlg %c0,%c15,.Lctl-.LPG1(%r13) # load control registers |
48 | lg %r12,.Lparmaddr-.LPG1(%r13)# pointer to parameter area | 48 | lg %r12,.Lparmaddr-.LPG1(%r13) # pointer to parameter area |
49 | # move IPL device to lowcore | 49 | # move IPL device to lowcore |
50 | mvc __LC_IPLDEV(4),IPL_DEVICE+4-PARMAREA(%r12) | 50 | mvc __LC_IPLDEV(4),IPL_DEVICE+4-PARMAREA(%r12) |
51 | # | 51 | # |
52 | # Setup stack | 52 | # Setup stack |
53 | # | 53 | # |
54 | larl %r15,init_thread_union | 54 | larl %r15,init_thread_union |
55 | lg %r14,__TI_task(%r15) # cache current in lowcore | 55 | lg %r14,__TI_task(%r15) # cache current in lowcore |
56 | stg %r14,__LC_CURRENT | 56 | stg %r14,__LC_CURRENT |
57 | aghi %r15,1<<(PAGE_SHIFT+THREAD_ORDER) # init_task_union + THREAD_SIZE | 57 | aghi %r15,1<<(PAGE_SHIFT+THREAD_ORDER) # init_task_union + THREAD_SIZE |
58 | stg %r15,__LC_KERNEL_STACK # set end of kernel stack | 58 | stg %r15,__LC_KERNEL_STACK # set end of kernel stack |
59 | aghi %r15,-160 | 59 | aghi %r15,-160 |
60 | xc __SF_BACKCHAIN(4,%r15),__SF_BACKCHAIN(%r15) # clear backchain | 60 | xc __SF_BACKCHAIN(4,%r15),__SF_BACKCHAIN(%r15) # clear backchain |
61 | 61 | ||
62 | brasl %r14,ipl_save_parameters | 62 | brasl %r14,ipl_save_parameters |
63 | # | 63 | # |
64 | # clear bss memory | 64 | # clear bss memory |
65 | # | 65 | # |
66 | larl %r2,__bss_start # start of bss segment | 66 | larl %r2,__bss_start # start of bss segment |
67 | larl %r3,_end # end of bss segment | 67 | larl %r3,_end # end of bss segment |
68 | sgr %r3,%r2 # length of bss | 68 | sgr %r3,%r2 # length of bss |
69 | sgr %r4,%r4 # | 69 | sgr %r4,%r4 # |
70 | sgr %r5,%r5 # set src,length and pad to zero | 70 | sgr %r5,%r5 # set src,length and pad to zero |
71 | mvcle %r2,%r4,0 # clear mem | 71 | mvcle %r2,%r4,0 # clear mem |
72 | jo .-4 # branch back, if not finish | 72 | jo .-4 # branch back, if not finish |
73 | 73 | ||
74 | l %r2,.Lrcp-.LPG1(%r13) # Read SCP forced command word | 74 | l %r2,.Lrcp-.LPG1(%r13) # Read SCP forced command word |
75 | .Lservicecall: | 75 | .Lservicecall: |
76 | stosm .Lpmask-.LPG1(%r13),0x01 # authorize ext interrupts | 76 | stosm .Lpmask-.LPG1(%r13),0x01 # authorize ext interrupts |
77 | 77 | ||
78 | stctg %r0,%r0,.Lcr-.LPG1(%r13) # get cr0 | 78 | stctg %r0,%r0,.Lcr-.LPG1(%r13) # get cr0 |
79 | la %r1,0x200 # set bit 22 | 79 | la %r1,0x200 # set bit 22 |
80 | og %r1,.Lcr-.LPG1(%r13) # or old cr0 with r1 | 80 | og %r1,.Lcr-.LPG1(%r13) # or old cr0 with r1 |
81 | stg %r1,.Lcr-.LPG1(%r13) | 81 | stg %r1,.Lcr-.LPG1(%r13) |
82 | lctlg %r0,%r0,.Lcr-.LPG1(%r13) # load modified cr0 | 82 | lctlg %r0,%r0,.Lcr-.LPG1(%r13) # load modified cr0 |
83 | 83 | ||
84 | mvc __LC_EXT_NEW_PSW(8),.Lpcmsk-.LPG1(%r13) # set postcall psw | 84 | mvc __LC_EXT_NEW_PSW(8),.Lpcmsk-.LPG1(%r13) # set postcall psw |
85 | larl %r1,.Lsclph | 85 | larl %r1,.Lsclph |
86 | stg %r1,__LC_EXT_NEW_PSW+8 # set handler | 86 | stg %r1,__LC_EXT_NEW_PSW+8 # set handler |
87 | 87 | ||
88 | larl %r4,.Lsccb # %r4 is our index for sccb stuff | 88 | larl %r4,.Lsccb # %r4 is our index for sccb stuff |
89 | lgr %r1,%r4 # our sccb | 89 | lgr %r1,%r4 # our sccb |
90 | .insn rre,0xb2200000,%r2,%r1 # service call | 90 | .insn rre,0xb2200000,%r2,%r1 # service call |
91 | ipm %r1 | 91 | ipm %r1 |
92 | srl %r1,28 # get cc code | 92 | srl %r1,28 # get cc code |
93 | xr %r3,%r3 | 93 | xr %r3,%r3 |
94 | chi %r1,3 | 94 | chi %r1,3 |
95 | be .Lfchunk-.LPG1(%r13) # leave | 95 | be .Lfchunk-.LPG1(%r13) # leave |
96 | chi %r1,2 | 96 | chi %r1,2 |
97 | be .Lservicecall-.LPG1(%r13) | 97 | be .Lservicecall-.LPG1(%r13) |
98 | lpswe .Lwaitsclp-.LPG1(%r13) | 98 | lpswe .Lwaitsclp-.LPG1(%r13) |
99 | .Lsclph: | 99 | .Lsclph: |
100 | lh %r1,.Lsccbr-.Lsccb(%r4) | 100 | lh %r1,.Lsccbr-.Lsccb(%r4) |
101 | chi %r1,0x10 # 0x0010 is the sucess code | 101 | chi %r1,0x10 # 0x0010 is the sucess code |
102 | je .Lprocsccb # let's process the sccb | 102 | je .Lprocsccb # let's process the sccb |
103 | chi %r1,0x1f0 | 103 | chi %r1,0x1f0 |
104 | bne .Lfchunk-.LPG1(%r13) # unhandled error code | 104 | bne .Lfchunk-.LPG1(%r13) # unhandled error code |
105 | c %r2,.Lrcp-.LPG1(%r13) # Did we try Read SCP forced | 105 | c %r2,.Lrcp-.LPG1(%r13) # Did we try Read SCP forced |
106 | bne .Lfchunk-.LPG1(%r13) # if no, give up | 106 | bne .Lfchunk-.LPG1(%r13) # if no, give up |
107 | l %r2,.Lrcp2-.LPG1(%r13) # try with Read SCP | 107 | l %r2,.Lrcp2-.LPG1(%r13) # try with Read SCP |
108 | b .Lservicecall-.LPG1(%r13) | 108 | b .Lservicecall-.LPG1(%r13) |
109 | .Lprocsccb: | 109 | .Lprocsccb: |
110 | lghi %r1,0 | 110 | lghi %r1,0 |
111 | icm %r1,3,.Lscpincr1-.Lsccb(%r4) # use this one if != 0 | 111 | icm %r1,3,.Lscpincr1-.Lsccb(%r4) # use this one if != 0 |
112 | jnz .Lscnd | 112 | jnz .Lscnd |
113 | lg %r1,.Lscpincr2-.Lsccb(%r4) # otherwise use this one | 113 | lg %r1,.Lscpincr2-.Lsccb(%r4) # otherwise use this one |
114 | .Lscnd: | 114 | .Lscnd: |
115 | xr %r3,%r3 # same logic | 115 | xr %r3,%r3 # same logic |
116 | ic %r3,.Lscpa1-.Lsccb(%r4) | 116 | ic %r3,.Lscpa1-.Lsccb(%r4) |
117 | chi %r3,0x00 | 117 | chi %r3,0x00 |
118 | jne .Lcompmem | 118 | jne .Lcompmem |
119 | l %r3,.Lscpa2-.Lsccb(%r4) | 119 | l %r3,.Lscpa2-.Lsccb(%r4) |
120 | .Lcompmem: | 120 | .Lcompmem: |
121 | mlgr %r2,%r1 # mem in MB on 128-bit | 121 | mlgr %r2,%r1 # mem in MB on 128-bit |
122 | l %r1,.Lonemb-.LPG1(%r13) | 122 | l %r1,.Lonemb-.LPG1(%r13) |
123 | mlgr %r2,%r1 # mem size in bytes in %r3 | 123 | mlgr %r2,%r1 # mem size in bytes in %r3 |
124 | b .Lfchunk-.LPG1(%r13) | 124 | b .Lfchunk-.LPG1(%r13) |
125 | 125 | ||
126 | .align 4 | 126 | .align 4 |
127 | .Lpmask: | 127 | .Lpmask: |
128 | .byte 0 | 128 | .byte 0 |
129 | .align 8 | 129 | .align 8 |
130 | .Lcr: | 130 | .Lcr: |
131 | .quad 0x00 # place holder for cr0 | 131 | .quad 0x00 # place holder for cr0 |
132 | .Lwaitsclp: | 132 | .Lwaitsclp: |
133 | .quad 0x0102000180000000,.Lsclph | 133 | .quad 0x0102000180000000,.Lsclph |
134 | .Lrcp: | 134 | .Lrcp: |
135 | .int 0x00120001 # Read SCP forced code | 135 | .int 0x00120001 # Read SCP forced code |
136 | .Lrcp2: | 136 | .Lrcp2: |
137 | .int 0x00020001 # Read SCP code | 137 | .int 0x00020001 # Read SCP code |
138 | .Lonemb: | 138 | .Lonemb: |
139 | .int 0x100000 | 139 | .int 0x100000 |
140 | 140 | ||
141 | .Lfchunk: | 141 | .Lfchunk: |
142 | # set program check new psw mask | 142 | # set program check new psw mask |
143 | mvc __LC_PGM_NEW_PSW(8),.Lpcmsk-.LPG1(%r13) | 143 | mvc __LC_PGM_NEW_PSW(8),.Lpcmsk-.LPG1(%r13) |
144 | 144 | ||
145 | # | 145 | # |
146 | # find memory chunks. | 146 | # find memory chunks. |
147 | # | 147 | # |
148 | lgr %r9,%r3 # end of mem | 148 | lgr %r9,%r3 # end of mem |
149 | larl %r1,.Lchkmem # set program check address | 149 | larl %r1,.Lchkmem # set program check address |
150 | stg %r1,__LC_PGM_NEW_PSW+8 | 150 | stg %r1,__LC_PGM_NEW_PSW+8 |
151 | la %r1,1 # test in increments of 128KB | 151 | la %r1,1 # test in increments of 128KB |
152 | sllg %r1,%r1,17 | 152 | sllg %r1,%r1,17 |
153 | larl %r3,memory_chunk | 153 | larl %r3,memory_chunk |
154 | slgr %r4,%r4 # set start of chunk to zero | 154 | slgr %r4,%r4 # set start of chunk to zero |
155 | slgr %r5,%r5 # set end of chunk to zero | 155 | slgr %r5,%r5 # set end of chunk to zero |
156 | slr %r6,%r6 # set access code to zero | 156 | slr %r6,%r6 # set access code to zero |
157 | la %r10,MEMORY_CHUNKS # number of chunks | 157 | la %r10,MEMORY_CHUNKS # number of chunks |
158 | .Lloop: | 158 | .Lloop: |
159 | tprot 0(%r5),0 # test protection of first byte | 159 | tprot 0(%r5),0 # test protection of first byte |
160 | ipm %r7 | 160 | ipm %r7 |
161 | srl %r7,28 | 161 | srl %r7,28 |
162 | clr %r6,%r7 # compare cc with last access code | 162 | clr %r6,%r7 # compare cc with last access code |
163 | je .Lsame | 163 | je .Lsame |
164 | j .Lchkmem | 164 | j .Lchkmem |
165 | .Lsame: | 165 | .Lsame: |
166 | algr %r5,%r1 # add 128KB to end of chunk | 166 | algr %r5,%r1 # add 128KB to end of chunk |
167 | # no need to check here, | 167 | # no need to check here, |
168 | brc 12,.Lloop # this is the same chunk | 168 | brc 12,.Lloop # this is the same chunk |
169 | .Lchkmem: # > 16EB or tprot got a program check | 169 | .Lchkmem: # > 16EB or tprot got a program check |
170 | clgr %r4,%r5 # chunk size > 0? | 170 | clgr %r4,%r5 # chunk size > 0? |
171 | je .Lchkloop | 171 | je .Lchkloop |
172 | stg %r4,0(%r3) # store start address of chunk | 172 | stg %r4,0(%r3) # store start address of chunk |
173 | lgr %r0,%r5 | 173 | lgr %r0,%r5 |
174 | slgr %r0,%r4 | 174 | slgr %r0,%r4 |
175 | stg %r0,8(%r3) # store size of chunk | 175 | stg %r0,8(%r3) # store size of chunk |
176 | st %r6,20(%r3) # store type of chunk | 176 | st %r6,20(%r3) # store type of chunk |
177 | la %r3,24(%r3) | 177 | la %r3,24(%r3) |
178 | larl %r8,memory_size | 178 | larl %r8,memory_size |
179 | stg %r5,0(%r8) # store memory size | 179 | stg %r5,0(%r8) # store memory size |
180 | ahi %r10,-1 # update chunk number | 180 | ahi %r10,-1 # update chunk number |
181 | .Lchkloop: | 181 | .Lchkloop: |
182 | lr %r6,%r7 # set access code to last cc | 182 | lr %r6,%r7 # set access code to last cc |
183 | # we got an exception or we're starting a new | 183 | # we got an exception or we're starting a new |
184 | # chunk , we must check if we should | 184 | # chunk , we must check if we should |
185 | # still try to find valid memory (if we detected | 185 | # still try to find valid memory (if we detected |
186 | # the amount of available storage), and if we | 186 | # the amount of available storage), and if we |
187 | # have chunks left | 187 | # have chunks left |
188 | lghi %r4,1 | 188 | lghi %r4,1 |
189 | sllg %r4,%r4,31 | 189 | sllg %r4,%r4,31 |
190 | clgr %r5,%r4 | 190 | clgr %r5,%r4 |
191 | je .Lhsaskip | 191 | je .Lhsaskip |
192 | xr %r0, %r0 | 192 | xr %r0, %r0 |
193 | clgr %r0, %r9 # did we detect memory? | 193 | clgr %r0, %r9 # did we detect memory? |
194 | je .Ldonemem # if not, leave | 194 | je .Ldonemem # if not, leave |
195 | chi %r10, 0 # do we have chunks left? | 195 | chi %r10, 0 # do we have chunks left? |
196 | je .Ldonemem | 196 | je .Ldonemem |
197 | .Lhsaskip: | 197 | .Lhsaskip: |
198 | algr %r5,%r1 # add 128KB to end of chunk | 198 | algr %r5,%r1 # add 128KB to end of chunk |
199 | lgr %r4,%r5 # potential new chunk | 199 | lgr %r4,%r5 # potential new chunk |
200 | clgr %r5,%r9 # should we go on? | 200 | clgr %r5,%r9 # should we go on? |
201 | jl .Lloop | 201 | jl .Lloop |
202 | .Ldonemem: | 202 | .Ldonemem: |
203 | 203 | ||
204 | larl %r12,machine_flags | 204 | larl %r12,machine_flags |
205 | # | 205 | # |
206 | # find out if we are running under VM | 206 | # find out if we are running under VM |
207 | # | 207 | # |
208 | stidp __LC_CPUID # store cpuid | 208 | stidp __LC_CPUID # store cpuid |
209 | tm __LC_CPUID,0xff # running under VM ? | 209 | tm __LC_CPUID,0xff # running under VM ? |
210 | bno 0f-.LPG1(%r13) | 210 | bno 0f-.LPG1(%r13) |
211 | oi 7(%r12),1 # set VM flag | 211 | oi 7(%r12),1 # set VM flag |
212 | 0: lh %r0,__LC_CPUID+4 # get cpu version | 212 | 0: lh %r0,__LC_CPUID+4 # get cpu version |
213 | chi %r0,0x7490 # running on a P/390 ? | 213 | chi %r0,0x7490 # running on a P/390 ? |
214 | bne 1f-.LPG1(%r13) | 214 | bne 1f-.LPG1(%r13) |
215 | oi 7(%r12),4 # set P/390 flag | 215 | oi 7(%r12),4 # set P/390 flag |
216 | 1: | 216 | 1: |
217 | 217 | ||
218 | # | 218 | # |
219 | # find out if we have the MVPG instruction | 219 | # find out if we have the MVPG instruction |
220 | # | 220 | # |
221 | la %r1,0f-.LPG1(%r13) # set program check address | 221 | la %r1,0f-.LPG1(%r13) # set program check address |
222 | stg %r1,__LC_PGM_NEW_PSW+8 | 222 | stg %r1,__LC_PGM_NEW_PSW+8 |
223 | sgr %r0,%r0 | 223 | sgr %r0,%r0 |
224 | lghi %r1,0 | 224 | lghi %r1,0 |
225 | lghi %r2,0 | 225 | lghi %r2,0 |
226 | mvpg %r1,%r2 # test MVPG instruction | 226 | mvpg %r1,%r2 # test MVPG instruction |
227 | oi 7(%r12),16 # set MVPG flag | 227 | oi 7(%r12),16 # set MVPG flag |
228 | 0: | 228 | 0: |
229 | 229 | ||
230 | # | 230 | # |
231 | # find out if the diag 0x44 works in 64 bit mode | 231 | # find out if the diag 0x44 works in 64 bit mode |
232 | # | 232 | # |
233 | la %r1,0f-.LPG1(%r13) # set program check address | 233 | la %r1,0f-.LPG1(%r13) # set program check address |
234 | stg %r1,__LC_PGM_NEW_PSW+8 | 234 | stg %r1,__LC_PGM_NEW_PSW+8 |
235 | diag 0,0,0x44 # test diag 0x44 | 235 | diag 0,0,0x44 # test diag 0x44 |
236 | oi 7(%r12),32 # set diag44 flag | 236 | oi 7(%r12),32 # set diag44 flag |
237 | 0: | 237 | 0: |
238 | 238 | ||
239 | # | 239 | # |
240 | # find out if we have the IDTE instruction | 240 | # find out if we have the IDTE instruction |
241 | # | 241 | # |
242 | la %r1,0f-.LPG1(%r13) # set program check address | 242 | la %r1,0f-.LPG1(%r13) # set program check address |
243 | stg %r1,__LC_PGM_NEW_PSW+8 | 243 | stg %r1,__LC_PGM_NEW_PSW+8 |
244 | .long 0xb2b10000 # store facility list | 244 | .long 0xb2b10000 # store facility list |
245 | tm 0xc8,0x08 # check bit for clearing-by-ASCE | 245 | tm 0xc8,0x08 # check bit for clearing-by-ASCE |
246 | bno 0f-.LPG1(%r13) | 246 | bno 0f-.LPG1(%r13) |
@@ -263,45 +263,45 @@ startup_continue: | |||
263 | oi 6(%r12),2 # set MVCOS flag | 263 | oi 6(%r12),2 # set MVCOS flag |
264 | 1: | 264 | 1: |
265 | 265 | ||
266 | lpswe .Lentry-.LPG1(13) # jump to _stext in primary-space, | 266 | lpswe .Lentry-.LPG1(13) # jump to _stext in primary-space, |
267 | # virtual and never return ... | 267 | # virtual and never return ... |
268 | .align 16 | 268 | .align 16 |
269 | .Lentry:.quad 0x0000000180000000,_stext | 269 | .Lentry:.quad 0x0000000180000000,_stext |
270 | .Lctl: .quad 0x04b50002 # cr0: various things | 270 | .Lctl: .quad 0x04b50002 # cr0: various things |
271 | .quad 0 # cr1: primary space segment table | 271 | .quad 0 # cr1: primary space segment table |
272 | .quad .Lduct # cr2: dispatchable unit control table | 272 | .quad .Lduct # cr2: dispatchable unit control table |
273 | .quad 0 # cr3: instruction authorization | 273 | .quad 0 # cr3: instruction authorization |
274 | .quad 0 # cr4: instruction authorization | 274 | .quad 0 # cr4: instruction authorization |
275 | .quad 0xffffffffffffffff # cr5: primary-aste origin | 275 | .quad 0xffffffffffffffff # cr5: primary-aste origin |
276 | .quad 0 # cr6: I/O interrupts | 276 | .quad 0 # cr6: I/O interrupts |
277 | .quad 0 # cr7: secondary space segment table | 277 | .quad 0 # cr7: secondary space segment table |
278 | .quad 0 # cr8: access registers translation | 278 | .quad 0 # cr8: access registers translation |
279 | .quad 0 # cr9: tracing off | 279 | .quad 0 # cr9: tracing off |
280 | .quad 0 # cr10: tracing off | 280 | .quad 0 # cr10: tracing off |
281 | .quad 0 # cr11: tracing off | 281 | .quad 0 # cr11: tracing off |
282 | .quad 0 # cr12: tracing off | 282 | .quad 0 # cr12: tracing off |
283 | .quad 0 # cr13: home space segment table | 283 | .quad 0 # cr13: home space segment table |
284 | .quad 0xc0000000 # cr14: machine check handling off | 284 | .quad 0xc0000000 # cr14: machine check handling off |
285 | .quad 0 # cr15: linkage stack operations | 285 | .quad 0 # cr15: linkage stack operations |
286 | .Lduct: .long 0,0,0,0,0,0,0,0 | 286 | .Lduct: .long 0,0,0,0,0,0,0,0 |
287 | .long 0,0,0,0,0,0,0,0 | 287 | .long 0,0,0,0,0,0,0,0 |
288 | .Lpcmsk:.quad 0x0000000180000000 | 288 | .Lpcmsk:.quad 0x0000000180000000 |
289 | .L4malign:.quad 0xffffffffffc00000 | 289 | .L4malign:.quad 0xffffffffffc00000 |
290 | .Lscan2g:.quad 0x80000000 + 0x20000 - 8 # 2GB + 128K - 8 | 290 | .Lscan2g:.quad 0x80000000 + 0x20000 - 8 # 2GB + 128K - 8 |
291 | .Lnop: .long 0x07000700 | 291 | .Lnop: .long 0x07000700 |
292 | .Lparmaddr: | 292 | .Lparmaddr: |
293 | .quad PARMAREA | 293 | .quad PARMAREA |
294 | 294 | ||
295 | .globl ipl_schib | 295 | .globl ipl_schib |
296 | ipl_schib: | 296 | ipl_schib: |
297 | .rept 13 | 297 | .rept 13 |
298 | .long 0 | 298 | .long 0 |
299 | .endr | 299 | .endr |
300 | 300 | ||
301 | .globl ipl_flags | 301 | .globl ipl_flags |
302 | ipl_flags: | 302 | ipl_flags: |
303 | .long 0 | 303 | .long 0 |
304 | .globl ipl_devno | 304 | .globl ipl_devno |
305 | ipl_devno: | 305 | ipl_devno: |
306 | .word 0 | 306 | .word 0 |
307 | 307 | ||
@@ -309,47 +309,47 @@ ipl_devno: | |||
309 | .globl s390_readinfo_sccb | 309 | .globl s390_readinfo_sccb |
310 | s390_readinfo_sccb: | 310 | s390_readinfo_sccb: |
311 | .Lsccb: | 311 | .Lsccb: |
312 | .hword 0x1000 # length, one page | 312 | .hword 0x1000 # length, one page |
313 | .byte 0x00,0x00,0x00 | 313 | .byte 0x00,0x00,0x00 |
314 | .byte 0x80 # variable response bit set | 314 | .byte 0x80 # variable response bit set |
315 | .Lsccbr: | 315 | .Lsccbr: |
316 | .hword 0x00 # response code | 316 | .hword 0x00 # response code |
317 | .Lscpincr1: | 317 | .Lscpincr1: |
318 | .hword 0x00 | 318 | .hword 0x00 |
319 | .Lscpa1: | 319 | .Lscpa1: |
320 | .byte 0x00 | 320 | .byte 0x00 |
321 | .fill 89,1,0 | 321 | .fill 89,1,0 |
322 | .Lscpa2: | 322 | .Lscpa2: |
323 | .int 0x00 | 323 | .int 0x00 |
324 | .Lscpincr2: | 324 | .Lscpincr2: |
325 | .quad 0x00 | 325 | .quad 0x00 |
326 | .fill 3984,1,0 | 326 | .fill 3984,1,0 |
327 | .org 0x13000 | 327 | .org 0x13000 |
328 | 328 | ||
329 | #ifdef CONFIG_SHARED_KERNEL | 329 | #ifdef CONFIG_SHARED_KERNEL |
330 | .org 0x100000 | 330 | .org 0x100000 |
331 | #endif | 331 | #endif |
332 | 332 | ||
333 | # | 333 | # |
334 | # startup-code, running in absolute addressing mode | 334 | # startup-code, running in absolute addressing mode |
335 | # | 335 | # |
336 | .globl _stext | 336 | .globl _stext |
337 | _stext: basr %r13,0 # get base | 337 | _stext: basr %r13,0 # get base |
338 | .LPG3: | 338 | .LPG3: |
339 | # check control registers | 339 | # check control registers |
340 | stctg %c0,%c15,0(%r15) | 340 | stctg %c0,%c15,0(%r15) |
341 | oi 6(%r15),0x40 # enable sigp emergency signal | 341 | oi 6(%r15),0x40 # enable sigp emergency signal |
342 | oi 4(%r15),0x10 # switch on low address proctection | 342 | oi 4(%r15),0x10 # switch on low address proctection |
343 | lctlg %c0,%c15,0(%r15) | 343 | lctlg %c0,%c15,0(%r15) |
344 | 344 | ||
345 | lam 0,15,.Laregs-.LPG3(%r13) # load access regs needed by uaccess | 345 | lam 0,15,.Laregs-.LPG3(%r13) # load acrs needed by uaccess |
346 | brasl %r14,start_kernel # go to C code | 346 | brasl %r14,start_kernel # go to C code |
347 | # | 347 | # |
348 | # We returned from start_kernel ?!? PANIK | 348 | # We returned from start_kernel ?!? PANIK |
349 | # | 349 | # |
350 | basr %r13,0 | 350 | basr %r13,0 |
351 | lpswe .Ldw-.(%r13) # load disabled wait psw | 351 | lpswe .Ldw-.(%r13) # load disabled wait psw |
352 | 352 | ||
353 | .align 8 | 353 | .align 8 |
354 | .Ldw: .quad 0x0002000180000000,0x0000000000000000 | 354 | .Ldw: .quad 0x0002000180000000,0x0000000000000000 |
355 | .Laregs: .long 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 | 355 | .Laregs:.long 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 |