Gitiles
Code Review Sign In
review.evervolv.com / android_kernel_htc_msm8960 / 27a3bbaf4b1e23a3afbae4d9f72b51a36859f74a / . / arch / s390 / kernel / head.S
blob: 8f8c802f1bcfd86a07660a1b2e7dbd1d3cf80a06 [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]1/*
2 * arch/s390/kernel/head.S
3 *
Heiko Carstensb1b70302006-06-29 14:58:17 +0200[diff] [blame]4 * Copyright (C) IBM Corp. 1999,2006
Heiko Carstens0ad775d2005-11-07 00:59:12 -0800[diff] [blame]5 *
6 * Author(s): Hartmut Penner <hp@de.ibm.com>
7 * Martin Schwidefsky <schwidefsky@de.ibm.com>
8 * Rob van der Heij <rvdhei@iae.nl>
9 * Heiko Carstens <heiko.carstens@de.ibm.com>
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]10 *
11 * There are 5 different IPL methods
12 * 1) load the image directly into ram at address 0 and do an PSW restart
13 * 2) linload will load the image from address 0x10000 to memory 0x10000
14 * and start the code thru LPSW 0x0008000080010000 (VM only, deprecated)
15 * 3) generate the tape ipl header, store the generated image on a tape
16 * and ipl from it
17 * In case of SL tape you need to IPL 5 times to get past VOL1 etc
18 * 4) generate the vm reader ipl header, move the generated image to the
19 * VM reader (use option NOH!) and do a ipl from reader (VM only)
20 * 5) direct call of start by the SALIPL loader
21 * We use the cpuid to distinguish between VM and native ipl
22 * params for kernel are pushed to 0x10400 (see setup.h)
Heiko Carstens0ad775d2005-11-07 00:59:12 -0800[diff] [blame]23 *
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]24 */
25
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]26#include <asm/setup.h>
27#include <asm/lowcore.h>
Sam Ravnborg0013a852005-09-09 20:57:26 +0200[diff] [blame]28#include <asm/asm-offsets.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]29#include <asm/thread_info.h>
30#include <asm/page.h>
31
Martin Schwidefsky347a8dc2006-01-06 00:19:28 -0800[diff] [blame]32#ifdef CONFIG_64BIT
Heiko Carstens0ad775d2005-11-07 00:59:12 -0800[diff] [blame]33#define ARCH_OFFSET 4
34#else
35#define ARCH_OFFSET 0
36#endif
37
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]38#ifndef CONFIG_IPL
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]39 .org 0
40 .long 0x00080000,0x80000000+startup # Just a restart PSW
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]41#else
42#ifdef CONFIG_IPL_TAPE
43#define IPL_BS 1024
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]44 .org 0
45 .long 0x00080000,0x80000000+iplstart # The first 24 bytes are loaded
46 .long 0x27000000,0x60000001 # by ipl to addresses 0-23.
47 .long 0x02000000,0x20000000+IPL_BS # (a PSW and two CCWs).
48 .long 0x00000000,0x00000000 # external old psw
49 .long 0x00000000,0x00000000 # svc old psw
50 .long 0x00000000,0x00000000 # program check old psw
51 .long 0x00000000,0x00000000 # machine check old psw
52 .long 0x00000000,0x00000000 # io old psw
53 .long 0x00000000,0x00000000
54 .long 0x00000000,0x00000000
55 .long 0x00000000,0x00000000
56 .long 0x000a0000,0x00000058 # external new psw
57 .long 0x000a0000,0x00000060 # svc new psw
58 .long 0x000a0000,0x00000068 # program check new psw
59 .long 0x000a0000,0x00000070 # machine check new psw
60 .long 0x00080000,0x80000000+.Lioint # io new psw
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]61
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]62 .org 0x100
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]63#
64# subroutine for loading from tape
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]65# Paramters:
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]66# R1 = device number
67# R2 = load address
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]68.Lloader:
69 st %r14,.Lldret
70 la %r3,.Lorbread # r3 = address of orb
71 la %r5,.Lirb # r5 = address of irb
72 st %r2,.Lccwread+4 # initialize CCW data addresses
73 lctl %c6,%c6,.Lcr6
74 slr %r2,%r2
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]75.Lldlp:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]76 la %r6,3 # 3 retries
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]77.Lssch:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]78 ssch 0(%r3) # load chunk of IPL_BS bytes
79 bnz .Llderr
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]80.Lw4end:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]81 bas %r14,.Lwait4io
82 tm 8(%r5),0x82 # do we have a problem ?
83 bnz .Lrecov
84 slr %r7,%r7
85 icm %r7,3,10(%r5) # get residual count
86 lcr %r7,%r7
87 la %r7,IPL_BS(%r7) # IPL_BS-residual=#bytes read
88 ar %r2,%r7 # add to total size
89 tm 8(%r5),0x01 # found a tape mark ?
90 bnz .Ldone
91 l %r0,.Lccwread+4 # update CCW data addresses
92 ar %r0,%r7
93 st %r0,.Lccwread+4
94 b .Lldlp
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]95.Ldone:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]96 l %r14,.Lldret
97 br %r14 # r2 contains the total size
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]98.Lrecov:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]99 bas %r14,.Lsense # do the sensing
100 bct %r6,.Lssch # dec. retry count & branch
101 b .Llderr
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]102#
103# Sense subroutine
104#
105.Lsense:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]106 st %r14,.Lsnsret
107 la %r7,.Lorbsense
108 ssch 0(%r7) # start sense command
109 bnz .Llderr
110 bas %r14,.Lwait4io
111 l %r14,.Lsnsret
112 tm 8(%r5),0x82 # do we have a problem ?
113 bnz .Llderr
114 br %r14
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]115#
116# Wait for interrupt subroutine
117#
118.Lwait4io:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]119 lpsw .Lwaitpsw
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]120.Lioint:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]121 c %r1,0xb8 # compare subchannel number
122 bne .Lwait4io
123 tsch 0(%r5)
124 slr %r0,%r0
125 tm 8(%r5),0x82 # do we have a problem ?
126 bnz .Lwtexit
127 tm 8(%r5),0x04 # got device end ?
128 bz .Lwait4io
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]129.Lwtexit:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]130 br %r14
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]131.Llderr:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]132 lpsw .Lcrash
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]133
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]134 .align 8
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]135.Lorbread:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]136 .long 0x00000000,0x0080ff00,.Lccwread
137 .align 8
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]138.Lorbsense:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]139 .long 0x00000000,0x0080ff00,.Lccwsense
140 .align 8
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]141.Lccwread:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]142 .long 0x02200000+IPL_BS,0x00000000
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]143.Lccwsense:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]144 .long 0x04200001,0x00000000
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]145.Lwaitpsw:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]146 .long 0x020a0000,0x80000000+.Lioint
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]147
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]148.Lirb: .long 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
149.Lcr6: .long 0xff000000
150 .align 8
151.Lcrash:.long 0x000a0000,0x00000000
152.Lldret:.long 0
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]153.Lsnsret: .long 0
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]154#endif /* CONFIG_IPL_TAPE */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]155
156#ifdef CONFIG_IPL_VM
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]157#define IPL_BS 0x730
158 .org 0
159 .long 0x00080000,0x80000000+iplstart # The first 24 bytes are loaded
160 .long 0x02000018,0x60000050 # by ipl to addresses 0-23.
161 .long 0x02000068,0x60000050 # (a PSW and two CCWs).
162 .fill 80-24,1,0x40 # bytes 24-79 are discarded !!
163 .long 0x020000f0,0x60000050 # The next 160 byte are loaded
164 .long 0x02000140,0x60000050 # to addresses 0x18-0xb7
165 .long 0x02000190,0x60000050 # They form the continuation
166 .long 0x020001e0,0x60000050 # of the CCW program started
167 .long 0x02000230,0x60000050 # by ipl and load the range
168 .long 0x02000280,0x60000050 # 0x0f0-0x730 from the image
169 .long 0x020002d0,0x60000050 # to the range 0x0f0-0x730
170 .long 0x02000320,0x60000050 # in memory. At the end of
171 .long 0x02000370,0x60000050 # the channel program the PSW
172 .long 0x020003c0,0x60000050 # at location 0 is loaded.
173 .long 0x02000410,0x60000050 # Initial processing starts
174 .long 0x02000460,0x60000050 # at 0xf0 = iplstart.
175 .long 0x020004b0,0x60000050
176 .long 0x02000500,0x60000050
177 .long 0x02000550,0x60000050
178 .long 0x020005a0,0x60000050
179 .long 0x020005f0,0x60000050
180 .long 0x02000640,0x60000050
181 .long 0x02000690,0x60000050
182 .long 0x020006e0,0x20000050
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]183
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]184 .org 0xf0
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]185#
186# subroutine for loading cards from the reader
187#
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]188.Lloader:
189 la %r3,.Lorb # r2 = address of orb into r2
190 la %r5,.Lirb # r4 = address of irb
191 la %r6,.Lccws
192 la %r7,20
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]193.Linit:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]194 st %r2,4(%r6) # initialize CCW data addresses
195 la %r2,0x50(%r2)
196 la %r6,8(%r6)
197 bct 7,.Linit
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]198
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]199 lctl %c6,%c6,.Lcr6 # set IO subclass mask
200 slr %r2,%r2
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]201.Lldlp:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]202 ssch 0(%r3) # load chunk of 1600 bytes
203 bnz .Llderr
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]204.Lwait4irq:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]205 mvc 0x78(8),.Lnewpsw # set up IO interrupt psw
206 lpsw .Lwaitpsw
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]207.Lioint:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]208 c %r1,0xb8 # compare subchannel number
209 bne .Lwait4irq
210 tsch 0(%r5)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]211
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]212 slr %r0,%r0
213 ic %r0,8(%r5) # get device status
214 chi %r0,8 # channel end ?
215 be .Lcont
216 chi %r0,12 # channel end + device end ?
217 be .Lcont
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]218
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]219 l %r0,4(%r5)
220 s %r0,8(%r3) # r0/8 = number of ccws executed
221 mhi %r0,10 # *10 = number of bytes in ccws
222 lh %r3,10(%r5) # get residual count
223 sr %r0,%r3 # #ccws*80-residual=#bytes read
224 ar %r2,%r0
225
226 br %r14 # r2 contains the total size
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]227
228.Lcont:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]229 ahi %r2,0x640 # add 0x640 to total size
230 la %r6,.Lccws
231 la %r7,20
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]232.Lincr:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]233 l %r0,4(%r6) # update CCW data addresses
234 ahi %r0,0x640
235 st %r0,4(%r6)
236 ahi %r6,8
237 bct 7,.Lincr
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]238
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]239 b .Lldlp
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]240.Llderr:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]241 lpsw .Lcrash
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]242
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]243 .align 8
244.Lorb: .long 0x00000000,0x0080ff00,.Lccws
245.Lirb: .long 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
246.Lcr6: .long 0xff000000
247.Lloadp:.long 0,0
248 .align 8
249.Lcrash:.long 0x000a0000,0x00000000
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]250.Lnewpsw:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]251 .long 0x00080000,0x80000000+.Lioint
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]252.Lwaitpsw:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]253 .long 0x020a0000,0x80000000+.Lioint
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]254
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]255 .align 8
256.Lccws: .rept 19
257 .long 0x02600050,0x00000000
258 .endr
259 .long 0x02200050,0x00000000
260#endif /* CONFIG_IPL_VM */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]261
262iplstart:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]263 lh %r1,0xb8 # test if subchannel number
264 bct %r1,.Lnoload # is valid
265 l %r1,0xb8 # load ipl subchannel number
266 la %r2,IPL_BS # load start address
267 bas %r14,.Lloader # load rest of ipl image
268 l %r12,.Lparm # pointer to parameter area
269 st %r1,IPL_DEVICE+ARCH_OFFSET-PARMAREA(%r12) # save ipl device number
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]270
271#
272# load parameter file from ipl device
273#
274.Lagain1:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]275 l %r2,.Linitrd # ramdisk loc. is temp
276 bas %r14,.Lloader # load parameter file
277 ltr %r2,%r2 # got anything ?
278 bz .Lnopf
279 chi %r2,895
280 bnh .Lnotrunc
281 la %r2,895
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]282.Lnotrunc:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]283 l %r4,.Linitrd
284 clc 0(3,%r4),.L_hdr # if it is HDRx
285 bz .Lagain1 # skip dataset header
286 clc 0(3,%r4),.L_eof # if it is EOFx
287 bz .Lagain1 # skip dateset trailer
288 la %r5,0(%r4,%r2)
289 lr %r3,%r2
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]290.Lidebc:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]291 tm 0(%r5),0x80 # high order bit set ?
292 bo .Ldocv # yes -> convert from EBCDIC
293 ahi %r5,-1
294 bct %r3,.Lidebc
295 b .Lnocv
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]296.Ldocv:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]297 l %r3,.Lcvtab
298 tr 0(256,%r4),0(%r3) # convert parameters to ascii
299 tr 256(256,%r4),0(%r3)
300 tr 512(256,%r4),0(%r3)
301 tr 768(122,%r4),0(%r3)
302.Lnocv: la %r3,COMMAND_LINE-PARMAREA(%r12) # load adr. of command line
303 mvc 0(256,%r3),0(%r4)
304 mvc 256(256,%r3),256(%r4)
305 mvc 512(256,%r3),512(%r4)
306 mvc 768(122,%r3),768(%r4)
307 slr %r0,%r0
308 b .Lcntlp
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]309.Ldelspc:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]310 ic %r0,0(%r2,%r3)
311 chi %r0,0x20 # is it a space ?
312 be .Lcntlp
313 ahi %r2,1
314 b .Leolp
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]315.Lcntlp:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]316 brct %r2,.Ldelspc
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]317.Leolp:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]318 slr %r0,%r0
319 stc %r0,0(%r2,%r3) # terminate buffer
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]320.Lnopf:
321
322#
323# load ramdisk from ipl device
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]324#
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]325.Lagain2:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]326 l %r2,.Linitrd # addr of ramdisk
327 st %r2,INITRD_START+ARCH_OFFSET-PARMAREA(%r12)
328 bas %r14,.Lloader # load ramdisk
329 st %r2,INITRD_SIZE+ARCH_OFFSET-PARMAREA(%r12) # store size of rd
330 ltr %r2,%r2
331 bnz .Lrdcont
332 st %r2,INITRD_START+ARCH_OFFSET-PARMAREA(%r12) # no ramdisk found
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]333.Lrdcont:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]334 l %r2,.Linitrd
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]335
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]336 clc 0(3,%r2),.L_hdr # skip HDRx and EOFx
337 bz .Lagain2
338 clc 0(3,%r2),.L_eof
339 bz .Lagain2
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]340
341#ifdef CONFIG_IPL_VM
342#
343# reset files in VM reader
344#
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]345 stidp __LC_CPUID # store cpuid
346 tm __LC_CPUID,0xff # running VM ?
347 bno .Lnoreset
348 la %r2,.Lreset
349 lhi %r3,26
350 diag %r2,%r3,8
351 la %r5,.Lirb
352 stsch 0(%r5) # check if irq is pending
353 tm 30(%r5),0x0f # by verifying if any of the
354 bnz .Lwaitforirq # activity or status control
355 tm 31(%r5),0xff # bits is set in the schib
356 bz .Lnoreset
Heiko Carstens350e3ad2005-07-29 14:03:36 -0700[diff] [blame]357.Lwaitforirq:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]358 mvc 0x78(8),.Lrdrnewpsw # set up IO interrupt psw
Heiko Carstens2b071882005-06-21 17:16:31 -0700[diff] [blame]359.Lwaitrdrirq:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]360 lpsw .Lrdrwaitpsw
Heiko Carstens2b071882005-06-21 17:16:31 -0700[diff] [blame]361.Lrdrint:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]362 c %r1,0xb8 # compare subchannel number
363 bne .Lwaitrdrirq
364 la %r5,.Lirb
365 tsch 0(%r5)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]366.Lnoreset:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]367 b .Lnoload
Heiko Carstens2b071882005-06-21 17:16:31 -0700[diff] [blame]368
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]369 .align 8
Heiko Carstens2b071882005-06-21 17:16:31 -0700[diff] [blame]370.Lrdrnewpsw:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]371 .long 0x00080000,0x80000000+.Lrdrint
Heiko Carstens2b071882005-06-21 17:16:31 -0700[diff] [blame]372.Lrdrwaitpsw:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]373 .long 0x020a0000,0x80000000+.Lrdrint
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]374#endif
Heiko Carstens2b071882005-06-21 17:16:31 -0700[diff] [blame]375
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]376#
377# everything loaded, go for it
378#
379.Lnoload:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]380 l %r1,.Lstartup
381 br %r1
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]382
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]383.Linitrd:.long _end + 0x400000 # default address of initrd
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]384.Lparm: .long PARMAREA
385.Lstartup: .long startup
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]386.Lcvtab:.long _ebcasc # ebcdic to ascii table
387.Lreset:.byte 0xc3,0xc8,0xc1,0xd5,0xc7,0xc5,0x40,0xd9,0xc4,0xd9,0x40
388 .byte 0xc1,0xd3,0xd3,0x40,0xd2,0xc5,0xc5,0xd7,0x40,0xd5,0xd6
389 .byte 0xc8,0xd6,0xd3,0xc4 # "change rdr all keep nohold"
390.L_eof: .long 0xc5d6c600 /* C'EOF' */
391.L_hdr: .long 0xc8c4d900 /* C'HDR' */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]392
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]393#endif /* CONFIG_IPL */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]394
395#
396# SALIPL loader support. Based on a patch by Rob van der Heij.
397# This entry point is called directly from the SALIPL loader and
398# doesn't need a builtin ipl record.
399#
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]400 .org 0x800
401 .globl start
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]402start:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]403 stm %r0,%r15,0x07b0 # store registers
404 basr %r12,%r0
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]405.base:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]406 l %r11,.parm
407 l %r8,.cmd # pointer to command buffer
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]408
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]409 ltr %r9,%r9 # do we have SALIPL parameters?
410 bp .sk8x8
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]411
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]412 mvc 0(64,%r8),0x00b0 # copy saved registers
413 xc 64(240-64,%r8),0(%r8) # remainder of buffer
414 tr 0(64,%r8),.lowcase
415 b .gotr
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]416.sk8x8:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]417 mvc 0(240,%r8),0(%r9) # copy iplparms into buffer
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]418.gotr:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]419 l %r10,.tbl # EBCDIC to ASCII table
420 tr 0(240,%r8),0(%r10)
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]421 slr %r0,%r0
422 st %r0,INITRD_SIZE+ARCH_OFFSET-PARMAREA(%r11)
423 st %r0,INITRD_START+ARCH_OFFSET-PARMAREA(%r11)
424 j startup # continue with startup
425.tbl: .long _ebcasc # translate table
426.cmd: .long COMMAND_LINE # address of command line buffer
427.parm: .long PARMAREA
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]428.lowcase:
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]429 .byte 0x00,0x01,0x02,0x03,0x04,0x05,0x06,0x07
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]430 .byte 0x08,0x09,0x0a,0x0b,0x0c,0x0d,0x0e,0x0f
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]431 .byte 0x10,0x11,0x12,0x13,0x14,0x15,0x16,0x17
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]432 .byte 0x18,0x19,0x1a,0x1b,0x1c,0x1d,0x1e,0x1f
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]433 .byte 0x20,0x21,0x22,0x23,0x24,0x25,0x26,0x27
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]434 .byte 0x28,0x29,0x2a,0x2b,0x2c,0x2d,0x2e,0x2f
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]435 .byte 0x30,0x31,0x32,0x33,0x34,0x35,0x36,0x37
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]436 .byte 0x38,0x39,0x3a,0x3b,0x3c,0x3d,0x3e,0x3f
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]437 .byte 0x40,0x41,0x42,0x43,0x44,0x45,0x46,0x47
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]438 .byte 0x48,0x49,0x4a,0x4b,0x4c,0x4d,0x4e,0x4f
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]439 .byte 0x50,0x51,0x52,0x53,0x54,0x55,0x56,0x57
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]440 .byte 0x58,0x59,0x5a,0x5b,0x5c,0x5d,0x5e,0x5f
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]441 .byte 0x60,0x61,0x62,0x63,0x64,0x65,0x66,0x67
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]442 .byte 0x68,0x69,0x6a,0x6b,0x6c,0x6d,0x6e,0x6f
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]443 .byte 0x70,0x71,0x72,0x73,0x74,0x75,0x76,0x77
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]444 .byte 0x78,0x79,0x7a,0x7b,0x7c,0x7d,0x7e,0x7f
445
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]446 .byte 0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]447 .byte 0x88,0x89,0x8a,0x8b,0x8c,0x8d,0x8e,0x8f
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]448 .byte 0x90,0x91,0x92,0x93,0x94,0x95,0x96,0x97
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]449 .byte 0x98,0x99,0x9a,0x9b,0x9c,0x9d,0x9e,0x9f
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]450 .byte 0xa0,0xa1,0xa2,0xa3,0xa4,0xa5,0xa6,0xa7
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]451 .byte 0xa8,0xa9,0xaa,0xab,0xac,0xad,0xae,0xaf
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]452 .byte 0xb0,0xb1,0xb2,0xb3,0xb4,0xb5,0xb6,0xb7
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]453 .byte 0xb8,0xb9,0xba,0xbb,0xbc,0xbd,0xbe,0xbf
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]454 .byte 0xc0,0x81,0x82,0x83,0x84,0x85,0x86,0x87 # .abcdefg
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]455 .byte 0x88,0x89,0xca,0xcb,0xcc,0xcd,0xce,0xcf # hi
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]456 .byte 0xd0,0x91,0x92,0x93,0x94,0x95,0x96,0x97 # .jklmnop
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]457 .byte 0x98,0x99,0xda,0xdb,0xdc,0xdd,0xde,0xdf # qr
458 .byte 0xe0,0xe1,0xa2,0xa3,0xa4,0xa5,0xa6,0xa7 # ..stuvwx
459 .byte 0xa8,0xa9,0xea,0xeb,0xec,0xed,0xee,0xef # yz
Heiko Carstens25d83cb2006-09-28 16:56:37 +0200[diff] [blame]460 .byte 0xf0,0xf1,0xf2,0xf3,0xf4,0xf5,0xf6,0xf7
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]461 .byte 0xf8,0xf9,0xfa,0xfb,0xfc,0xfd,0xfe,0xff
462
Martin Schwidefsky347a8dc2006-01-06 00:19:28 -0800[diff] [blame]463#ifdef CONFIG_64BIT
Heiko Carstens0ad775d2005-11-07 00:59:12 -0800[diff] [blame]464#include "head64.S"
465#else
466#include "head31.S"
Linus Torvalds1da177e2005-04-16 15:20:36 -0700[diff] [blame]467#endif