1 /* SPDX-License-Identifier: GPL-2.0 */ 1 /* SPDX-License-Identifier: GPL-2.0 */
2 /* 2 /*
3 * head.S: The initial boot code for the Sparc 3 * head.S: The initial boot code for the Sparc port of Linux.
4 * 4 *
5 * Copyright (C) 1995 David S. Miller (davem@c 5 * Copyright (C) 1995 David S. Miller (davem@caip.rutgers.edu)
6 * Copyright (C) 1995,1999 Pete Zaitcev (zai 6 * Copyright (C) 1995,1999 Pete Zaitcev (zaitcev@yahoo.com)
7 * Copyright (C) 1996 Miguel de Icaza (miguel@ 7 * Copyright (C) 1996 Miguel de Icaza (miguel@nuclecu.unam.mx)
8 * Copyright (C) 1997 Jakub Jelinek (jj@suns 8 * Copyright (C) 1997 Jakub Jelinek (jj@sunsite.mff.cuni.cz)
9 * Copyright (C) 1997 Michael A. Griffith (gri 9 * Copyright (C) 1997 Michael A. Griffith (grif@acm.org)
10 * 10 *
11 * CompactPCI platform by Eric Brower, 1999. 11 * CompactPCI platform by Eric Brower, 1999.
12 */ 12 */
13 13
14 #include <linux/export.h> 14 #include <linux/export.h>
15 #include <linux/version.h> 15 #include <linux/version.h>
16 #include <linux/init.h> 16 #include <linux/init.h>
17 17
18 #include <asm/head.h> 18 #include <asm/head.h>
19 #include <asm/asi.h> 19 #include <asm/asi.h>
20 #include <asm/contregs.h> 20 #include <asm/contregs.h>
21 #include <asm/ptrace.h> 21 #include <asm/ptrace.h>
22 #include <asm/psr.h> 22 #include <asm/psr.h>
23 #include <asm/page.h> 23 #include <asm/page.h>
24 #include <asm/kdebug.h> 24 #include <asm/kdebug.h>
25 #include <asm/winmacro.h> 25 #include <asm/winmacro.h>
26 #include <asm/thread_info.h> /* TI_UWINMASK 26 #include <asm/thread_info.h> /* TI_UWINMASK */
27 #include <asm/errno.h> 27 #include <asm/errno.h>
28 #include <asm/pgtable.h> /* PGDIR_SHIFT 28 #include <asm/pgtable.h> /* PGDIR_SHIFT */
29 29
30 .data 30 .data
31 /* The following are used with the prom_vector 31 /* The following are used with the prom_vector node-ops to figure out
32 * the cpu-type 32 * the cpu-type
33 */ 33 */
34 .align 4 34 .align 4
35 .globl cputypval 35 .globl cputypval
36 cputypval: 36 cputypval:
37 .asciz "sun4m" 37 .asciz "sun4m"
38 .ascii " " 38 .ascii " "
39 39
40 /* Tested on SS-5, SS-10 */ 40 /* Tested on SS-5, SS-10 */
41 .align 4 41 .align 4
42 cputypvar: 42 cputypvar:
43 .asciz "compatible" 43 .asciz "compatible"
44 44
45 .align 4 45 .align 4
46 46
47 notsup: 47 notsup:
48 .asciz "Sparc-Linux sun4/sun4c or MMU 48 .asciz "Sparc-Linux sun4/sun4c or MMU-less not supported\n\n"
49 .align 4 49 .align 4
50 50
51 sun4e_notsup: 51 sun4e_notsup:
52 .asciz "Sparc-Linux sun4e support doe 52 .asciz "Sparc-Linux sun4e support does not exist\n\n"
53 .align 4 53 .align 4
54 54
55 /* The trap-table - located in the __HEAD sect 55 /* The trap-table - located in the __HEAD section */
56 #include "ttable_32.S" 56 #include "ttable_32.S"
57 57
58 .align PAGE_SIZE 58 .align PAGE_SIZE
59 59
60 /* This was the only reasonable way I could th 60 /* This was the only reasonable way I could think of to properly align
61 * these page-table data structures. 61 * these page-table data structures.
62 */ 62 */
63 .globl empty_zero_page 63 .globl empty_zero_page
64 empty_zero_page: .skip PAGE_SIZE 64 empty_zero_page: .skip PAGE_SIZE
65 EXPORT_SYMBOL(empty_zero_page) 65 EXPORT_SYMBOL(empty_zero_page)
66 66
67 .global root_flags 67 .global root_flags
68 .global ram_flags 68 .global ram_flags
69 .global root_dev 69 .global root_dev
70 .global sparc_ramdisk_image 70 .global sparc_ramdisk_image
71 .global sparc_ramdisk_size 71 .global sparc_ramdisk_size
72 72
73 /* This stuff has to be in sync with SILO and 73 /* This stuff has to be in sync with SILO and other potential boot loaders
74 * Fields should be kept upward compatible and 74 * Fields should be kept upward compatible and whenever any change is made,
75 * HdrS version should be incremented. 75 * HdrS version should be incremented.
76 */ 76 */
77 .ascii "HdrS" 77 .ascii "HdrS"
78 .word LINUX_VERSION_CODE 78 .word LINUX_VERSION_CODE
79 .half 0x0203 /* HdrS versio 79 .half 0x0203 /* HdrS version */
80 root_flags: 80 root_flags:
81 .half 1 81 .half 1
82 root_dev: 82 root_dev:
83 .half 0 83 .half 0
84 ram_flags: 84 ram_flags:
85 .half 0 85 .half 0
86 sparc_ramdisk_image: 86 sparc_ramdisk_image:
87 .word 0 87 .word 0
88 sparc_ramdisk_size: 88 sparc_ramdisk_size:
89 .word 0 89 .word 0
90 .word reboot_command 90 .word reboot_command
91 .word 0, 0, 0 91 .word 0, 0, 0
92 .word _end 92 .word _end
93 93
94 /* Cool, here we go. Pick up the romvec pointe 94 /* Cool, here we go. Pick up the romvec pointer in %o0 and stash it in
95 * %g7 and at prom_vector_p. And also quickly 95 * %g7 and at prom_vector_p. And also quickly check whether we are on
96 * a v0, v2, or v3 prom. 96 * a v0, v2, or v3 prom.
97 */ 97 */
98 gokernel: 98 gokernel:
99 /* Ok, it's nice to know, as e 99 /* Ok, it's nice to know, as early as possible, if we
100 * are already mapped where we 100 * are already mapped where we expect to be in virtual
101 * memory. The Solaris /boot 101 * memory. The Solaris /boot elf format bootloader
102 * will peek into our elf head 102 * will peek into our elf header and load us where
103 * we want to be, otherwise we 103 * we want to be, otherwise we have to re-map.
104 * 104 *
105 * Some boot loaders don't pla 105 * Some boot loaders don't place the jmp'rs address
106 * in %o7, so we do a pc-relat 106 * in %o7, so we do a pc-relative call to a local
107 * label, then see what %o7 ha 107 * label, then see what %o7 has.
108 */ 108 */
109 109
110 mov %o7, %g4 110 mov %o7, %g4 ! Save %o7
111 111
112 /* Jump to it, and pray... */ 112 /* Jump to it, and pray... */
113 current_pc: 113 current_pc:
114 call 1f 114 call 1f
115 nop 115 nop
116 116
117 1: 117 1:
118 mov %o7, %g3 118 mov %o7, %g3
119 119
120 tst %o0 120 tst %o0
121 bne 2f 121 bne 2f
122 mov %g4, %o7 122 mov %g4, %o7 /* Previous %o7. */
123 sethi %hi(no_sun4u_here), %l 123 sethi %hi(no_sun4u_here), %l1
124 jmpl %l1 + %lo(no_sun4u_her 124 jmpl %l1 + %lo(no_sun4u_here), %g0
125 nop 125 nop
126 2: 126 2:
127 mov %o0, %l0 127 mov %o0, %l0 ! stash away romvec
128 mov %o0, %g7 128 mov %o0, %g7 ! put it here too
129 mov %o1, %l1 129 mov %o1, %l1 ! stash away debug_vec too
130 130
131 /* Ok, let's check out our run 131 /* Ok, let's check out our run time program counter. */
132 set current_pc, %g5 132 set current_pc, %g5
133 cmp %g3, %g5 133 cmp %g3, %g5
134 be already_mapped 134 be already_mapped
135 nop 135 nop
136 136
137 /* %l6 will hold the offset we 137 /* %l6 will hold the offset we have to subtract
138 * from absolute symbols in or 138 * from absolute symbols in order to access areas
139 * in our own image. If alrea 139 * in our own image. If already mapped this is
140 * just plain zero, else it is 140 * just plain zero, else it is KERNBASE.
141 */ 141 */
142 set KERNBASE, %l6 142 set KERNBASE, %l6
143 b copy_prom_lvl14 143 b copy_prom_lvl14
144 nop 144 nop
145 145
146 already_mapped: 146 already_mapped:
147 mov 0, %l6 147 mov 0, %l6
148 148
149 /* Copy over the Prom's level 149 /* Copy over the Prom's level 14 clock handler. */
150 copy_prom_lvl14: 150 copy_prom_lvl14:
151 #if 1 151 #if 1
152 /* DJHR 152 /* DJHR
153 * preserve our linked/calcula 153 * preserve our linked/calculated instructions
154 */ 154 */
155 set lvl14_save, %g1 155 set lvl14_save, %g1
156 set t_irq14, %g3 156 set t_irq14, %g3
157 sub %g1, %l6, %g1 157 sub %g1, %l6, %g1 ! translate to physical
158 sub %g3, %l6, %g3 158 sub %g3, %l6, %g3 ! translate to physical
159 ldd [%g3], %g4 159 ldd [%g3], %g4
160 std %g4, [%g1] 160 std %g4, [%g1]
161 ldd [%g3+8], %g4 161 ldd [%g3+8], %g4
162 std %g4, [%g1+8] 162 std %g4, [%g1+8]
163 #endif 163 #endif
164 rd %tbr, %g1 164 rd %tbr, %g1
165 andn %g1, 0xfff, %g1 165 andn %g1, 0xfff, %g1 ! proms trap table base
166 or %g0, (0x1e<<4), %g2 166 or %g0, (0x1e<<4), %g2 ! offset to lvl14 intr
167 or %g1, %g2, %g2 167 or %g1, %g2, %g2
168 set t_irq14, %g3 168 set t_irq14, %g3
169 sub %g3, %l6, %g3 169 sub %g3, %l6, %g3
170 ldd [%g2], %g4 170 ldd [%g2], %g4
171 std %g4, [%g3] 171 std %g4, [%g3]
172 ldd [%g2 + 0x8], %g4 172 ldd [%g2 + 0x8], %g4
173 std %g4, [%g3 + 0x8] 173 std %g4, [%g3 + 0x8] ! Copy proms handler
174 174
175 /* DON'T TOUCH %l0 thru %l5 in these remapping 175 /* DON'T TOUCH %l0 thru %l5 in these remapping routines,
176 * we need their values afterwards! 176 * we need their values afterwards!
177 */ 177 */
178 178
179 /* Now check whether we are al 179 /* Now check whether we are already mapped, if we
180 * are we can skip all this ga 180 * are we can skip all this garbage coming up.
181 */ 181 */
182 copy_prom_done: 182 copy_prom_done:
183 cmp %l6, 0 183 cmp %l6, 0
184 be go_to_highmem 184 be go_to_highmem ! this will be a nop then
185 nop 185 nop
186 186
187 /* Validate that we are in fac 187 /* Validate that we are in fact running on an
188 * SRMMU based cpu. 188 * SRMMU based cpu.
189 */ 189 */
190 set 0x4000, %g6 190 set 0x4000, %g6
191 cmp %g7, %g6 191 cmp %g7, %g6
192 bne not_a_sun4 192 bne not_a_sun4
193 nop 193 nop
194 194
195 halt_notsup: 195 halt_notsup:
196 ld [%g7 + 0x68], %o1 196 ld [%g7 + 0x68], %o1
197 set notsup, %o0 197 set notsup, %o0
198 sub %o0, %l6, %o0 198 sub %o0, %l6, %o0
199 call %o1 199 call %o1
200 nop 200 nop
201 sethi %hi(halt_me), %o0 201 sethi %hi(halt_me), %o0
202 jmpl %o0 + %lo(halt_me), %g 202 jmpl %o0 + %lo(halt_me), %g0
203 nop 203 nop
204 204
205 not_a_sun4: 205 not_a_sun4:
206 /* It looks like this is a mac 206 /* It looks like this is a machine we support.
207 * Now find out what MMU we ar 207 * Now find out what MMU we are dealing with
208 * LEON - identified by the ps 208 * LEON - identified by the psr.impl field
209 * Viking - identified by the 209 * Viking - identified by the psr.impl field
210 * In all other cases a sun4m 210 * In all other cases a sun4m srmmu.
211 * We check that the MMU is en 211 * We check that the MMU is enabled in all cases.
212 */ 212 */
213 213
214 /* Check if this is a LEON CPU 214 /* Check if this is a LEON CPU */
215 rd %psr, %g3 215 rd %psr, %g3
216 srl %g3, PSR_IMPL_SHIFT, % 216 srl %g3, PSR_IMPL_SHIFT, %g3
217 and %g3, PSR_IMPL_SHIFTED_ 217 and %g3, PSR_IMPL_SHIFTED_MASK, %g3
218 cmp %g3, PSR_IMPL_LEON 218 cmp %g3, PSR_IMPL_LEON
219 be leon_remap 219 be leon_remap /* It is a LEON - jump */
220 nop 220 nop
221 221
222 /* Sanity-check, is MMU enable 222 /* Sanity-check, is MMU enabled */
223 lda [%g0] ASI_M_MMUREGS, % 223 lda [%g0] ASI_M_MMUREGS, %g1
224 andcc %g1, 1, %g0 224 andcc %g1, 1, %g0
225 be halt_notsup 225 be halt_notsup
226 nop 226 nop
227 227
228 /* Check for a viking (TI) mod 228 /* Check for a viking (TI) module. */
229 cmp %g3, PSR_IMPL_TI 229 cmp %g3, PSR_IMPL_TI
230 bne srmmu_not_viking 230 bne srmmu_not_viking
231 nop 231 nop
232 232
233 /* Figure out what kind of vik 233 /* Figure out what kind of viking we are on.
234 * We need to know if we have 234 * We need to know if we have to play with the
235 * AC bit and disable traps or 235 * AC bit and disable traps or not.
236 */ 236 */
237 237
238 /* I've only seen MicroSparc's 238 /* I've only seen MicroSparc's on SparcClassics with this
239 * bit set. 239 * bit set.
240 */ 240 */
241 set 0x800, %g2 241 set 0x800, %g2
242 lda [%g0] ASI_M_MMUREGS, % 242 lda [%g0] ASI_M_MMUREGS, %g3 ! peek in the control reg
243 and %g2, %g3, %g3 243 and %g2, %g3, %g3
244 subcc %g3, 0x0, %g0 244 subcc %g3, 0x0, %g0
245 bnz srmmu_not_viking 245 bnz srmmu_not_viking ! is in mbus mode
246 nop 246 nop
247 247
248 rd %psr, %g3 248 rd %psr, %g3 ! DO NOT TOUCH %g3
249 andn %g3, PSR_ET, %g2 249 andn %g3, PSR_ET, %g2
250 wr %g2, 0x0, %psr 250 wr %g2, 0x0, %psr
251 WRITE_PAUSE 251 WRITE_PAUSE
252 252
253 /* Get context table pointer, 253 /* Get context table pointer, then convert to
254 * a physical address, which i 254 * a physical address, which is 36 bits.
255 */ 255 */
256 set AC_M_CTPR, %g4 256 set AC_M_CTPR, %g4
257 lda [%g4] ASI_M_MMUREGS, % 257 lda [%g4] ASI_M_MMUREGS, %g4
258 sll %g4, 0x4, %g4 258 sll %g4, 0x4, %g4 ! We use this below
259 259 ! DO NOT TOUCH %g4
260 260
261 /* Set the AC bit in the Vikin 261 /* Set the AC bit in the Viking's MMU control reg. */
262 lda [%g0] ASI_M_MMUREGS, % 262 lda [%g0] ASI_M_MMUREGS, %g5 ! DO NOT TOUCH %g5
263 set 0x8000, %g6 263 set 0x8000, %g6 ! AC bit mask
264 or %g5, %g6, %g6 264 or %g5, %g6, %g6 ! Or it in...
265 sta %g6, [%g0] ASI_M_MMURE 265 sta %g6, [%g0] ASI_M_MMUREGS ! Close your eyes...
266 266
267 /* Grrr, why does it seem like 267 /* Grrr, why does it seem like every other load/store
268 * on the sun4m is in some ASI 268 * on the sun4m is in some ASI space...
269 * Fine with me, let's get the 269 * Fine with me, let's get the pointer to the level 1
270 * page table directory and fe 270 * page table directory and fetch its entry.
271 */ 271 */
272 lda [%g4] ASI_M_BYPASS, %o 272 lda [%g4] ASI_M_BYPASS, %o1 ! This is a level 1 ptr
273 srl %o1, 0x4, %o1 273 srl %o1, 0x4, %o1 ! Clear low 4 bits
274 sll %o1, 0x8, %o1 274 sll %o1, 0x8, %o1 ! Make physical
275 275
276 /* Ok, pull in the PTD. */ 276 /* Ok, pull in the PTD. */
277 lda [%o1] ASI_M_BYPASS, %o 277 lda [%o1] ASI_M_BYPASS, %o2 ! This is the 0x0 16MB pgd
278 278
279 /* Calculate to KERNBASE entry 279 /* Calculate to KERNBASE entry. */
280 add %o1, KERNBASE >> (PGDI 280 add %o1, KERNBASE >> (PGDIR_SHIFT - 2), %o3
281 281
282 /* Poke the entry into the cal 282 /* Poke the entry into the calculated address. */
283 sta %o2, [%o3] ASI_M_BYPAS 283 sta %o2, [%o3] ASI_M_BYPASS
284 284
285 /* I don't get it Sun, if you 285 /* I don't get it Sun, if you engineered all these
286 * boot loaders and the PROM ( 286 * boot loaders and the PROM (thank you for the debugging
287 * features btw) why did you n 287 * features btw) why did you not have them load kernel
288 * images up in high address s 288 * images up in high address space, since this is necessary
289 * for ABI compliance anyways? 289 * for ABI compliance anyways? Does this low-mapping provide
290 * enhanced interoperability? 290 * enhanced interoperability?
291 * 291 *
292 * "The PROM is the computer." 292 * "The PROM is the computer."
293 */ 293 */
294 294
295 /* Ok, restore the MMU control 295 /* Ok, restore the MMU control register we saved in %g5 */
296 sta %g5, [%g0] ASI_M_MMURE 296 sta %g5, [%g0] ASI_M_MMUREGS ! POW... ouch
297 297
298 /* Turn traps back on. We sav 298 /* Turn traps back on. We saved it in %g3 earlier. */
299 wr %g3, 0x0, %psr 299 wr %g3, 0x0, %psr ! tick tock, tick tock
300 300
301 /* Now we burn precious CPU cy 301 /* Now we burn precious CPU cycles due to bad engineering. */
302 WRITE_PAUSE 302 WRITE_PAUSE
303 303
304 /* Wow, all that just to move 304 /* Wow, all that just to move a 32-bit value from one
305 * place to another... Jump t 305 * place to another... Jump to high memory.
306 */ 306 */
307 b go_to_highmem 307 b go_to_highmem
308 nop 308 nop
309 309
310 srmmu_not_viking: 310 srmmu_not_viking:
311 /* This works on viking's in M 311 /* This works on viking's in Mbus mode and all
312 * other MBUS modules. It is 312 * other MBUS modules. It is virtually the same as
313 * the above madness sans turn 313 * the above madness sans turning traps off and flipping
314 * the AC bit. 314 * the AC bit.
315 */ 315 */
316 set AC_M_CTPR, %g1 316 set AC_M_CTPR, %g1
317 lda [%g1] ASI_M_MMUREGS, % 317 lda [%g1] ASI_M_MMUREGS, %g1 ! get ctx table ptr
318 sll %g1, 0x4, %g1 318 sll %g1, 0x4, %g1 ! make physical addr
319 lda [%g1] ASI_M_BYPASS, %g 319 lda [%g1] ASI_M_BYPASS, %g1 ! ptr to level 1 pg_table
320 srl %g1, 0x4, %g1 320 srl %g1, 0x4, %g1
321 sll %g1, 0x8, %g1 321 sll %g1, 0x8, %g1 ! make phys addr for l1 tbl
322 322
323 lda [%g1] ASI_M_BYPASS, %g 323 lda [%g1] ASI_M_BYPASS, %g2 ! get level1 entry for 0x0
324 add %g1, KERNBASE >> (PGDI 324 add %g1, KERNBASE >> (PGDIR_SHIFT - 2), %g3
325 sta %g2, [%g3] ASI_M_BYPAS 325 sta %g2, [%g3] ASI_M_BYPASS ! place at KERNBASE entry
326 b go_to_highmem 326 b go_to_highmem
327 nop 327 nop ! wheee....
328 328
329 329
330 leon_remap: 330 leon_remap:
331 /* Sanity-check, is MMU enable 331 /* Sanity-check, is MMU enabled */
332 lda [%g0] ASI_LEON_MMUREGS 332 lda [%g0] ASI_LEON_MMUREGS, %g1
333 andcc %g1, 1, %g0 333 andcc %g1, 1, %g0
334 be halt_notsup 334 be halt_notsup
335 nop 335 nop
336 336
337 /* Same code as in the srmmu_n 337 /* Same code as in the srmmu_not_viking case,
338 * with the LEON ASI for mmure 338 * with the LEON ASI for mmuregs
339 */ 339 */
340 set AC_M_CTPR, %g1 340 set AC_M_CTPR, %g1
341 lda [%g1] ASI_LEON_MMUREGS 341 lda [%g1] ASI_LEON_MMUREGS, %g1 ! get ctx table ptr
342 sll %g1, 0x4, %g1 342 sll %g1, 0x4, %g1 ! make physical addr
343 lda [%g1] ASI_M_BYPASS, %g 343 lda [%g1] ASI_M_BYPASS, %g1 ! ptr to level 1 pg_table
344 srl %g1, 0x4, %g1 344 srl %g1, 0x4, %g1
345 sll %g1, 0x8, %g1 345 sll %g1, 0x8, %g1 ! make phys addr for l1 tbl
346 346
347 lda [%g1] ASI_M_BYPASS, %g 347 lda [%g1] ASI_M_BYPASS, %g2 ! get level1 entry for 0x0
348 add %g1, KERNBASE >> (PGDI 348 add %g1, KERNBASE >> (PGDIR_SHIFT - 2), %g3
349 sta %g2, [%g3] ASI_M_BYPAS 349 sta %g2, [%g3] ASI_M_BYPASS ! place at KERNBASE entry
350 b go_to_highmem 350 b go_to_highmem
351 nop 351 nop ! wheee....
352 352
353 /* Now do a non-relative jump so that PC is in 353 /* Now do a non-relative jump so that PC is in high-memory */
354 go_to_highmem: 354 go_to_highmem:
355 set execute_in_high_mem, % 355 set execute_in_high_mem, %g1
356 jmpl %g1, %g0 356 jmpl %g1, %g0
357 nop 357 nop
358 358
359 /* The code above should be at beginning and w 359 /* The code above should be at beginning and we have to take care about
360 * short jumps, as branching to .init.text sec 360 * short jumps, as branching to .init.text section from .text is usually
361 * impossible */ 361 * impossible */
362 __INIT 362 __INIT
363 /* Acquire boot time privileged register value 363 /* Acquire boot time privileged register values, this will help debugging.
364 * I figure out and store nwindows and nwindow 364 * I figure out and store nwindows and nwindowsm1 later on.
365 */ 365 */
366 execute_in_high_mem: 366 execute_in_high_mem:
367 mov %l0, %o0 367 mov %l0, %o0 ! put back romvec
368 mov %l1, %o1 368 mov %l1, %o1 ! and debug_vec
369 369
370 sethi %hi(prom_vector_p), %g 370 sethi %hi(prom_vector_p), %g1
371 st %o0, [%g1 + %lo(prom_v 371 st %o0, [%g1 + %lo(prom_vector_p)]
372 372
373 sethi %hi(linux_dbvec), %g1 373 sethi %hi(linux_dbvec), %g1
374 st %o1, [%g1 + %lo(linux_ 374 st %o1, [%g1 + %lo(linux_dbvec)]
375 375
376 /* Get the machine type via th 376 /* Get the machine type via the romvec
377 * getprops node operation 377 * getprops node operation
378 */ 378 */
379 add %g7, 0x1c, %l1 379 add %g7, 0x1c, %l1
380 ld [%l1], %l0 380 ld [%l1], %l0
381 ld [%l0], %l0 381 ld [%l0], %l0
382 call %l0 382 call %l0
383 or %g0, %g0, %o0 383 or %g0, %g0, %o0 ! next_node(0) = first_node
384 or %o0, %g0, %g6 384 or %o0, %g0, %g6
385 385
386 sethi %hi(cputypvar), %o1 386 sethi %hi(cputypvar), %o1 ! First node has cpu-arch
387 or %o1, %lo(cputypvar), % 387 or %o1, %lo(cputypvar), %o1
388 sethi %hi(cputypval), %o2 388 sethi %hi(cputypval), %o2 ! information, the string
389 or %o2, %lo(cputypval), % 389 or %o2, %lo(cputypval), %o2
390 ld [%l1], %l0 390 ld [%l1], %l0 ! 'compatible' tells
391 ld [%l0 + 0xc], %l0 391 ld [%l0 + 0xc], %l0 ! that we want 'sun4x' where
392 call %l0 392 call %l0 ! x is one of 'm', 'd' or 'e'.
393 nop 393 nop ! %o2 holds pointer
394 394 ! to a buf where above string
395 395 ! will get stored by the prom.
396 396
397 397
398 /* Check value of "compatible" 398 /* Check value of "compatible" property.
399 * "value" => "model" 399 * "value" => "model"
400 * leon => sparc_leon 400 * leon => sparc_leon
401 * sun4m => sun4m 401 * sun4m => sun4m
402 * sun4s => sun4m 402 * sun4s => sun4m
403 * sun4d => sun4d 403 * sun4d => sun4d
404 * sun4e => "no_sun4e_here" 404 * sun4e => "no_sun4e_here"
405 * '*' => "no_sun4u_here" 405 * '*' => "no_sun4u_here"
406 * Check single letters only 406 * Check single letters only
407 */ 407 */
408 408
409 set cputypval, %o2 409 set cputypval, %o2
410 /* If cputypval[0] == 'l' (low 410 /* If cputypval[0] == 'l' (lower case letter L) this is leon */
411 ldub [%o2], %l1 411 ldub [%o2], %l1
412 cmp %l1, 'l' 412 cmp %l1, 'l'
413 be leon_init 413 be leon_init
414 nop 414 nop
415 415
416 /* Check cputypval[4] to find 416 /* Check cputypval[4] to find the sun model */
417 ldub [%o2 + 0x4], %l1 417 ldub [%o2 + 0x4], %l1
418 418
419 cmp %l1, 'm' 419 cmp %l1, 'm'
420 be sun4m_init 420 be sun4m_init
421 cmp %l1, 's' 421 cmp %l1, 's'
422 be sun4m_init 422 be sun4m_init
423 cmp %l1, 'd' 423 cmp %l1, 'd'
424 be sun4d_init 424 be sun4d_init
425 cmp %l1, 'e' 425 cmp %l1, 'e'
426 be no_sun4e_here 426 be no_sun4e_here ! Could be a sun4e.
427 nop 427 nop
428 b no_sun4u_here 428 b no_sun4u_here ! AIEEE, a V9 sun4u... Get our BIG BROTHER kernel :))
429 nop 429 nop
430 430
431 leon_init: 431 leon_init:
432 /* LEON CPU - set boot_cpu_id 432 /* LEON CPU - set boot_cpu_id */
433 sethi %hi(boot_cpu_id), %g2 433 sethi %hi(boot_cpu_id), %g2 ! boot-cpu index
434 434
435 #ifdef CONFIG_SMP 435 #ifdef CONFIG_SMP
436 ldub [%g2 + %lo(boot_cpu_id 436 ldub [%g2 + %lo(boot_cpu_id)], %g1
437 cmp %g1, 0xff 437 cmp %g1, 0xff ! unset means first CPU
438 be 1f 438 be 1f
439 sethi %hi(leon_smp_cpu_start 439 sethi %hi(leon_smp_cpu_startup), %g1
440 jmpl %g1 + %lo(leon_smp_cpu 440 jmpl %g1 + %lo(leon_smp_cpu_startup), %g0
441 nop 441 nop
442 1: 442 1:
443 #endif 443 #endif
444 /* Get CPU-ID from most signif 444 /* Get CPU-ID from most significant 4-bit of ASR17 */
445 rd %asr17, %g1 445 rd %asr17, %g1
446 srl %g1, 28, %g1 446 srl %g1, 28, %g1
447 447
448 /* Update boot_cpu_id only on 448 /* Update boot_cpu_id only on boot cpu */
449 stub %g1, [%g2 + %lo(boot_c 449 stub %g1, [%g2 + %lo(boot_cpu_id)]
450 450
451 ba continue_boot 451 ba continue_boot
452 nop 452 nop
453 453
454 /* CPUID in bootbus can be found at PA 0xff014 454 /* CPUID in bootbus can be found at PA 0xff0140000 */
455 #define SUN4D_BOOTBUS_CPUID 0xf0140000 455 #define SUN4D_BOOTBUS_CPUID 0xf0140000
456 456
457 sun4d_init: 457 sun4d_init:
458 /* Need to patch call to handler_irq * 458 /* Need to patch call to handler_irq */
459 set patch_handler_irq, %g4 459 set patch_handler_irq, %g4
460 set sun4d_handler_irq, %g5 460 set sun4d_handler_irq, %g5
461 sethi %hi(0x40000000), %g3 461 sethi %hi(0x40000000), %g3 ! call
462 sub %g5, %g4, %g5 462 sub %g5, %g4, %g5
463 srl %g5, 2, %g5 463 srl %g5, 2, %g5
464 or %g5, %g3, %g5 464 or %g5, %g3, %g5
465 st %g5, [%g4] 465 st %g5, [%g4]
466 466
467 #ifdef CONFIG_SMP 467 #ifdef CONFIG_SMP
468 /* Get our CPU id out of bootbus */ 468 /* Get our CPU id out of bootbus */
469 set SUN4D_BOOTBUS_CPUID, %g3 469 set SUN4D_BOOTBUS_CPUID, %g3
470 lduba [%g3] ASI_M_CTL, %g3 470 lduba [%g3] ASI_M_CTL, %g3
471 and %g3, 0xf8, %g3 471 and %g3, 0xf8, %g3
472 srl %g3, 3, %g4 472 srl %g3, 3, %g4
473 sta %g4, [%g0] ASI_M_VIKING_TMP1 473 sta %g4, [%g0] ASI_M_VIKING_TMP1
474 sethi %hi(boot_cpu_id), %g5 474 sethi %hi(boot_cpu_id), %g5
475 stb %g4, [%g5 + %lo(boot_cpu_id)] 475 stb %g4, [%g5 + %lo(boot_cpu_id)]
476 #endif 476 #endif
477 477
478 /* Fall through to sun4m_init */ 478 /* Fall through to sun4m_init */
479 479
480 sun4m_init: 480 sun4m_init:
481 /* Ok, the PROM could have done funny things a 481 /* Ok, the PROM could have done funny things and apple cider could still
482 * be sitting in the fault status/address regi 482 * be sitting in the fault status/address registers. Read them all to
483 * clear them so we don't get magic faults lat 483 * clear them so we don't get magic faults later on.
484 */ 484 */
485 /* This sucks, apparently this makes Vikings c 485 /* This sucks, apparently this makes Vikings call prom panic, will fix later */
486 2: 486 2:
487 rd %psr, %o1 487 rd %psr, %o1
488 srl %o1, PSR_IMPL_SHIFT, % 488 srl %o1, PSR_IMPL_SHIFT, %o1 ! Get a type of the CPU
489 489
490 subcc %o1, PSR_IMPL_TI, %g0 490 subcc %o1, PSR_IMPL_TI, %g0 ! TI: Viking or MicroSPARC
491 be continue_boot 491 be continue_boot
492 nop 492 nop
493 493
494 set AC_M_SFSR, %o0 494 set AC_M_SFSR, %o0
495 lda [%o0] ASI_M_MMUREGS, % 495 lda [%o0] ASI_M_MMUREGS, %g0
496 set AC_M_SFAR, %o0 496 set AC_M_SFAR, %o0
497 lda [%o0] ASI_M_MMUREGS, % 497 lda [%o0] ASI_M_MMUREGS, %g0
498 498
499 /* Fujitsu MicroSPARC-II has n 499 /* Fujitsu MicroSPARC-II has no asynchronous flavors of FARs */
500 subcc %o1, 0, %g0 500 subcc %o1, 0, %g0
501 be continue_boot 501 be continue_boot
502 nop 502 nop
503 503
504 set AC_M_AFSR, %o0 504 set AC_M_AFSR, %o0
505 lda [%o0] ASI_M_MMUREGS, % 505 lda [%o0] ASI_M_MMUREGS, %g0
506 set AC_M_AFAR, %o0 506 set AC_M_AFAR, %o0
507 lda [%o0] ASI_M_MMUREGS, % 507 lda [%o0] ASI_M_MMUREGS, %g0
508 nop 508 nop
509 509
510 510
511 continue_boot: 511 continue_boot:
512 512
513 /* Aieee, now set PC and nPC, enable traps, gi 513 /* Aieee, now set PC and nPC, enable traps, give ourselves a stack and it's
514 * show-time! 514 * show-time!
515 */ 515 */
516 /* Turn on Supervisor, EnableF 516 /* Turn on Supervisor, EnableFloating, and all the PIL bits.
517 * Also puts us in register wi 517 * Also puts us in register window zero with traps off.
518 */ 518 */
519 set (PSR_PS | PSR_S | PSR_ 519 set (PSR_PS | PSR_S | PSR_PIL | PSR_EF), %g2
520 wr %g2, 0x0, %psr 520 wr %g2, 0x0, %psr
521 WRITE_PAUSE 521 WRITE_PAUSE
522 522
523 /* I want a kernel stack NOW! 523 /* I want a kernel stack NOW! */
524 set init_thread_union, %g1 524 set init_thread_union, %g1
525 set (THREAD_SIZE - STACKFR 525 set (THREAD_SIZE - STACKFRAME_SZ - TRACEREG_SZ), %g2
526 add %g1, %g2, %sp 526 add %g1, %g2, %sp
527 mov 0, %fp 527 mov 0, %fp /* And for good luck */
528 528
529 /* Zero out our BSS section. * 529 /* Zero out our BSS section. */
530 set __bss_start , %o0 530 set __bss_start , %o0 ! First address of BSS
531 set _end , %o1 531 set _end , %o1 ! Last address of BSS
532 add %o0, 0x1, %o0 532 add %o0, 0x1, %o0
533 1: 533 1:
534 stb %g0, [%o0] 534 stb %g0, [%o0]
535 subcc %o0, %o1, %g0 535 subcc %o0, %o1, %g0
536 bl 1b 536 bl 1b
537 add %o0, 0x1, %o0 537 add %o0, 0x1, %o0
538 538
539 /* If boot_cpu_id has not been 539 /* If boot_cpu_id has not been setup by machine specific
540 * init-code above we default 540 * init-code above we default it to zero.
541 */ 541 */
542 sethi %hi(boot_cpu_id), %g2 542 sethi %hi(boot_cpu_id), %g2
543 ldub [%g2 + %lo(boot_cpu_id 543 ldub [%g2 + %lo(boot_cpu_id)], %g3
544 cmp %g3, 0xff 544 cmp %g3, 0xff
545 bne 1f 545 bne 1f
546 nop 546 nop
547 mov %g0, %g3 547 mov %g0, %g3
548 stub %g3, [%g2 + %lo(boot_c 548 stub %g3, [%g2 + %lo(boot_cpu_id)]
549 549
550 1: sll %g3, 2, %g3 550 1: sll %g3, 2, %g3
551 551
552 /* Initialize the uwinmask val 552 /* Initialize the uwinmask value for init task just in case.
553 * But first make current_set[ 553 * But first make current_set[boot_cpu_id] point to something useful.
554 */ 554 */
555 set init_thread_union, %g6 555 set init_thread_union, %g6
556 set current_set, %g2 556 set current_set, %g2
557 #ifdef CONFIG_SMP 557 #ifdef CONFIG_SMP
558 st %g6, [%g2] 558 st %g6, [%g2]
559 add %g2, %g3, %g2 559 add %g2, %g3, %g2
560 #endif 560 #endif
561 st %g6, [%g2] 561 st %g6, [%g2]
562 562
563 st %g0, [%g6 + TI_UWINMAS 563 st %g0, [%g6 + TI_UWINMASK]
564 564
565 /* Compute NWINDOWS and stash it away. Now use 565 /* Compute NWINDOWS and stash it away. Now uses %wim trick explained
566 * in the V8 manual. Ok, this method seems to 566 * in the V8 manual. Ok, this method seems to work, Sparc is cool...
567 * No, it doesn't work, have to play the save/ 567 * No, it doesn't work, have to play the save/readCWP/restore trick.
568 */ 568 */
569 569
570 wr %g0, 0x0, %wim 570 wr %g0, 0x0, %wim ! so we do not get a trap
571 WRITE_PAUSE 571 WRITE_PAUSE
572 572
573 save 573 save
574 574
575 rd %psr, %g3 575 rd %psr, %g3
576 576
577 restore 577 restore
578 578
579 and %g3, 0x1f, %g3 579 and %g3, 0x1f, %g3
580 add %g3, 0x1, %g3 580 add %g3, 0x1, %g3
581 581
582 mov 2, %g1 582 mov 2, %g1
583 wr %g1, 0x0, %wim 583 wr %g1, 0x0, %wim ! make window 1 invalid
584 WRITE_PAUSE 584 WRITE_PAUSE
585 585
586 cmp %g3, 0x7 586 cmp %g3, 0x7
587 bne 2f 587 bne 2f
588 nop 588 nop
589 589
590 /* Adjust our window handling 590 /* Adjust our window handling routines to
591 * do things correctly on 7 wi 591 * do things correctly on 7 window Sparcs.
592 */ 592 */
593 593
594 #define PATCH_INSN(src, dest) \ 594 #define PATCH_INSN(src, dest) \
595 set src, %g5; \ 595 set src, %g5; \
596 set dest, %g2; \ 596 set dest, %g2; \
597 ld [%g5], %g4; \ 597 ld [%g5], %g4; \
598 st %g4, [%g2]; 598 st %g4, [%g2];
599 599
600 /* Patch for window spills... 600 /* Patch for window spills... */
601 PATCH_INSN(spnwin_patch1_7win, 601 PATCH_INSN(spnwin_patch1_7win, spnwin_patch1)
602 PATCH_INSN(spnwin_patch2_7win, 602 PATCH_INSN(spnwin_patch2_7win, spnwin_patch2)
603 PATCH_INSN(spnwin_patch3_7win, 603 PATCH_INSN(spnwin_patch3_7win, spnwin_patch3)
604 604
605 /* Patch for window fills... * 605 /* Patch for window fills... */
606 PATCH_INSN(fnwin_patch1_7win, 606 PATCH_INSN(fnwin_patch1_7win, fnwin_patch1)
607 PATCH_INSN(fnwin_patch2_7win, 607 PATCH_INSN(fnwin_patch2_7win, fnwin_patch2)
608 608
609 /* Patch for trap entry setup. 609 /* Patch for trap entry setup... */
610 PATCH_INSN(tsetup_7win_patch1, 610 PATCH_INSN(tsetup_7win_patch1, tsetup_patch1)
611 PATCH_INSN(tsetup_7win_patch2, 611 PATCH_INSN(tsetup_7win_patch2, tsetup_patch2)
612 PATCH_INSN(tsetup_7win_patch3, 612 PATCH_INSN(tsetup_7win_patch3, tsetup_patch3)
613 PATCH_INSN(tsetup_7win_patch4, 613 PATCH_INSN(tsetup_7win_patch4, tsetup_patch4)
614 PATCH_INSN(tsetup_7win_patch5, 614 PATCH_INSN(tsetup_7win_patch5, tsetup_patch5)
615 PATCH_INSN(tsetup_7win_patch6, 615 PATCH_INSN(tsetup_7win_patch6, tsetup_patch6)
616 616
617 /* Patch for returning from tr 617 /* Patch for returning from traps... */
618 PATCH_INSN(rtrap_7win_patch1, 618 PATCH_INSN(rtrap_7win_patch1, rtrap_patch1)
619 PATCH_INSN(rtrap_7win_patch2, 619 PATCH_INSN(rtrap_7win_patch2, rtrap_patch2)
620 PATCH_INSN(rtrap_7win_patch3, 620 PATCH_INSN(rtrap_7win_patch3, rtrap_patch3)
621 PATCH_INSN(rtrap_7win_patch4, 621 PATCH_INSN(rtrap_7win_patch4, rtrap_patch4)
622 PATCH_INSN(rtrap_7win_patch5, 622 PATCH_INSN(rtrap_7win_patch5, rtrap_patch5)
623 623
624 /* Patch for killing user wind 624 /* Patch for killing user windows from the register file. */
625 PATCH_INSN(kuw_patch1_7win, ku 625 PATCH_INSN(kuw_patch1_7win, kuw_patch1)
626 626
627 /* Now patch the kernel window 627 /* Now patch the kernel window flush sequences.
628 * This saves 2 traps on every 628 * This saves 2 traps on every switch and fork.
629 */ 629 */
630 set 0x01000000, %g4 630 set 0x01000000, %g4
631 set flush_patch_one, %g5 631 set flush_patch_one, %g5
632 st %g4, [%g5 + 0x18] 632 st %g4, [%g5 + 0x18]
633 st %g4, [%g5 + 0x1c] 633 st %g4, [%g5 + 0x1c]
634 set flush_patch_two, %g5 634 set flush_patch_two, %g5
635 st %g4, [%g5 + 0x18] 635 st %g4, [%g5 + 0x18]
636 st %g4, [%g5 + 0x1c] 636 st %g4, [%g5 + 0x1c]
637 set flush_patch_three, %g5 637 set flush_patch_three, %g5
638 st %g4, [%g5 + 0x18] 638 st %g4, [%g5 + 0x18]
639 st %g4, [%g5 + 0x1c] 639 st %g4, [%g5 + 0x1c]
640 set flush_patch_four, %g5 640 set flush_patch_four, %g5
641 st %g4, [%g5 + 0x18] 641 st %g4, [%g5 + 0x18]
642 st %g4, [%g5 + 0x1c] 642 st %g4, [%g5 + 0x1c]
643 set flush_patch_exception, 643 set flush_patch_exception, %g5
644 st %g4, [%g5 + 0x18] 644 st %g4, [%g5 + 0x18]
645 st %g4, [%g5 + 0x1c] 645 st %g4, [%g5 + 0x1c]
646 set flush_patch_switch, %g 646 set flush_patch_switch, %g5
647 st %g4, [%g5 + 0x18] 647 st %g4, [%g5 + 0x18]
648 st %g4, [%g5 + 0x1c] 648 st %g4, [%g5 + 0x1c]
649 649
650 2: 650 2:
651 sethi %hi(nwindows), %g4 651 sethi %hi(nwindows), %g4
652 st %g3, [%g4 + %lo(nwindo 652 st %g3, [%g4 + %lo(nwindows)] ! store final value
653 sub %g3, 0x1, %g3 653 sub %g3, 0x1, %g3
654 sethi %hi(nwindowsm1), %g4 654 sethi %hi(nwindowsm1), %g4
655 st %g3, [%g4 + %lo(nwindo 655 st %g3, [%g4 + %lo(nwindowsm1)]
656 656
657 /* Here we go, start using Lin 657 /* Here we go, start using Linux's trap table... */
658 set trapbase, %g3 658 set trapbase, %g3
659 wr %g3, 0x0, %tbr 659 wr %g3, 0x0, %tbr
660 WRITE_PAUSE 660 WRITE_PAUSE
661 661
662 /* Finally, turn on traps so t 662 /* Finally, turn on traps so that we can call c-code. */
663 rd %psr, %g3 663 rd %psr, %g3
664 wr %g3, 0x0, %psr 664 wr %g3, 0x0, %psr
665 WRITE_PAUSE 665 WRITE_PAUSE
666 666
667 wr %g3, PSR_ET, %psr 667 wr %g3, PSR_ET, %psr
668 WRITE_PAUSE 668 WRITE_PAUSE
669 669
670 /* Call sparc32_start_kernel(s 670 /* Call sparc32_start_kernel(struct linux_romvec *rp) */
671 sethi %hi(prom_vector_p), %g 671 sethi %hi(prom_vector_p), %g5
672 ld [%g5 + %lo(prom_vector 672 ld [%g5 + %lo(prom_vector_p)], %o0
673 call sparc32_start_kernel 673 call sparc32_start_kernel
674 nop 674 nop
675 675
676 /* We should not get here. */ 676 /* We should not get here. */
677 call halt_me 677 call halt_me
678 nop 678 nop
679 679
680 no_sun4e_here: 680 no_sun4e_here:
681 ld [%g7 + 0x68], %o1 681 ld [%g7 + 0x68], %o1
682 set sun4e_notsup, %o0 682 set sun4e_notsup, %o0
683 call %o1 683 call %o1
684 nop 684 nop
685 b halt_me 685 b halt_me
686 nop 686 nop
687 687
688 __INITDATA 688 __INITDATA
689 689
690 sun4u_1: 690 sun4u_1:
691 .asciz "finddevice" 691 .asciz "finddevice"
692 .align 4 692 .align 4
693 sun4u_2: 693 sun4u_2:
694 .asciz "/chosen" 694 .asciz "/chosen"
695 .align 4 695 .align 4
696 sun4u_3: 696 sun4u_3:
697 .asciz "getprop" 697 .asciz "getprop"
698 .align 4 698 .align 4
699 sun4u_4: 699 sun4u_4:
700 .asciz "stdout" 700 .asciz "stdout"
701 .align 4 701 .align 4
702 sun4u_5: 702 sun4u_5:
703 .asciz "write" 703 .asciz "write"
704 .align 4 704 .align 4
705 sun4u_6: 705 sun4u_6:
706 .asciz "\n\rOn sun4u you have 706 .asciz "\n\rOn sun4u you have to use sparc64 kernel\n\rand not a sparc32 version\n\r\n\r"
707 sun4u_6e: 707 sun4u_6e:
708 .align 4 708 .align 4
709 sun4u_7: 709 sun4u_7:
710 .asciz "exit" 710 .asciz "exit"
711 .align 8 711 .align 8
712 sun4u_a1: 712 sun4u_a1:
713 .word 0, sun4u_1, 0, 1, 0, 1 713 .word 0, sun4u_1, 0, 1, 0, 1, 0, sun4u_2, 0
714 sun4u_r1: 714 sun4u_r1:
715 .word 0 715 .word 0
716 sun4u_a2: 716 sun4u_a2:
717 .word 0, sun4u_3, 0, 4, 0, 1 717 .word 0, sun4u_3, 0, 4, 0, 1, 0
718 sun4u_i2: 718 sun4u_i2:
719 .word 0, 0, sun4u_4, 0, sun4 719 .word 0, 0, sun4u_4, 0, sun4u_1, 0, 8, 0
720 sun4u_r2: 720 sun4u_r2:
721 .word 0 721 .word 0
722 sun4u_a3: 722 sun4u_a3:
723 .word 0, sun4u_5, 0, 3, 0, 1 723 .word 0, sun4u_5, 0, 3, 0, 1, 0
724 sun4u_i3: 724 sun4u_i3:
725 .word 0, 0, sun4u_6, 0, sun4 725 .word 0, 0, sun4u_6, 0, sun4u_6e - sun4u_6 - 1, 0
726 sun4u_r3: 726 sun4u_r3:
727 .word 0 727 .word 0
728 sun4u_a4: 728 sun4u_a4:
729 .word 0, sun4u_7, 0, 0, 0, 0 729 .word 0, sun4u_7, 0, 0, 0, 0
730 sun4u_r4: 730 sun4u_r4:
731 731
732 __INIT 732 __INIT
733 no_sun4u_here: 733 no_sun4u_here:
734 set sun4u_a1, %o0 734 set sun4u_a1, %o0
735 set current_pc, %l2 735 set current_pc, %l2
736 cmp %l2, %g3 736 cmp %l2, %g3
737 be 1f 737 be 1f
738 mov %o4, %l0 738 mov %o4, %l0
739 sub %g3, %l2, %l6 739 sub %g3, %l2, %l6
740 add %o0, %l6, %o0 740 add %o0, %l6, %o0
741 mov %o0, %l4 741 mov %o0, %l4
742 mov sun4u_r4 - sun4u_a1, % 742 mov sun4u_r4 - sun4u_a1, %l3
743 ld [%l4], %l5 743 ld [%l4], %l5
744 2: 744 2:
745 add %l4, 4, %l4 745 add %l4, 4, %l4
746 cmp %l5, %l2 746 cmp %l5, %l2
747 add %l5, %l6, %l5 747 add %l5, %l6, %l5
748 bgeu,a 3f 748 bgeu,a 3f
749 st %l5, [%l4 - 4] 749 st %l5, [%l4 - 4]
750 3: 750 3:
751 subcc %l3, 4, %l3 751 subcc %l3, 4, %l3
752 bne 2b 752 bne 2b
753 ld [%l4], %l5 753 ld [%l4], %l5
754 1: 754 1:
755 call %l0 755 call %l0
756 mov %o0, %l1 756 mov %o0, %l1
757 757
758 ld [%l1 + (sun4u_r1 - sun 758 ld [%l1 + (sun4u_r1 - sun4u_a1)], %o1
759 add %l1, (sun4u_a2 - sun4u 759 add %l1, (sun4u_a2 - sun4u_a1), %o0
760 call %l0 760 call %l0
761 st %o1, [%o0 + (sun4u_i2 761 st %o1, [%o0 + (sun4u_i2 - sun4u_a2)]
762 762
763 ld [%l1 + (sun4u_1 - sun4 763 ld [%l1 + (sun4u_1 - sun4u_a1)], %o1
764 add %l1, (sun4u_a3 - sun4u 764 add %l1, (sun4u_a3 - sun4u_a1), %o0
765 call %l0 765 call %l0
766 st %o1, [%o0 + (sun4u_i3 766 st %o1, [%o0 + (sun4u_i3 - sun4u_a3)]
767 767
768 call %l0 768 call %l0
769 add %l1, (sun4u_a4 - sun4u 769 add %l1, (sun4u_a4 - sun4u_a1), %o0
770 770
771 /* Not reached */ 771 /* Not reached */
772 halt_me: 772 halt_me:
773 ld [%g7 + 0x74], %o0 773 ld [%g7 + 0x74], %o0
774 call %o0 774 call %o0 ! Get us out of here...
775 nop 775 nop ! Apparently Solaris is better.
776 776
777 /* Ok, now we continue in the .data/.text sect 777 /* Ok, now we continue in the .data/.text sections */
778 778
779 .data 779 .data
780 .align 4 780 .align 4
781 781
782 /* 782 /*
783 * Fill up the prom vector, note in particular 783 * Fill up the prom vector, note in particular the kind first element,
784 * no joke. I don't need all of them in here a 784 * no joke. I don't need all of them in here as the entire prom vector
785 * gets initialized in c-code so all routines 785 * gets initialized in c-code so all routines can use it.
786 */ 786 */
787 787
788 prom_vector_p: 788 prom_vector_p:
789 .word 0 789 .word 0
790 790
791 /* We calculate the following at boot time, wi 791 /* We calculate the following at boot time, window fills/spills and trap entry
792 * code uses these to keep track of the regist 792 * code uses these to keep track of the register windows.
793 */ 793 */
794 794
795 .align 4 795 .align 4
796 .globl nwindows 796 .globl nwindows
797 .globl nwindowsm1 797 .globl nwindowsm1
798 nwindows: 798 nwindows:
799 .word 8 799 .word 8
800 nwindowsm1: 800 nwindowsm1:
801 .word 7 801 .word 7
802 802
803 /* Boot time debugger vector value. We need t 803 /* Boot time debugger vector value. We need this later on. */
804 804
805 .align 4 805 .align 4
806 .globl linux_dbvec 806 .globl linux_dbvec
807 linux_dbvec: 807 linux_dbvec:
808 .word 0 808 .word 0
809 .word 0 809 .word 0
810 810
811 .align 8 811 .align 8
812 812
813 .globl lvl14_save 813 .globl lvl14_save
814 lvl14_save: 814 lvl14_save:
815 .word 0 815 .word 0
816 .word 0 816 .word 0
817 .word 0 817 .word 0
818 .word 0 818 .word 0
819 .word t_irq14 819 .word t_irq14
Linux® is a registered trademark of Linus Torvalds in the United States and other countries.
TOMOYO® is a registered trademark of NTT DATA CORPORATION.