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