1 /* head.S: Initial boot code for the Sparc64 port of Linux.
3 * Copyright (C) 1996, 1997, 2007 David S. Miller (davem@davemloft.net)
4 * Copyright (C) 1996 David Sitsky (David.Sitsky@anu.edu.au)
5 * Copyright (C) 1997, 1998 Jakub Jelinek (jj@sunsite.mff.cuni.cz)
6 * Copyright (C) 1997 Miguel de Icaza (miguel@nuclecu.unam.mx)
9 #include <linux/version.h>
10 #include <linux/errno.h>
11 #include <linux/threads.h>
12 #include <linux/init.h>
13 #include <asm/thread_info.h>
15 #include <asm/pstate.h>
16 #include <asm/ptrace.h>
17 #include <asm/spitfire.h>
19 #include <asm/pgtable.h>
20 #include <asm/errno.h>
21 #include <asm/signal.h>
22 #include <asm/processor.h>
27 #include <asm/ttable.h>
29 #include <asm/cpudata.h>
31 /* This section from from _start to sparc64_boot_end should fit into
32 * 0x0000000000404000 to 0x0000000000408000.
35 .globl start, _start, stext, _stext
42 flushw /* Flush register file. */
44 /* This stuff has to be in sync with SILO and other potential boot loaders
45 * Fields should be kept upward compatible and whenever any change is made,
46 * HdrS version should be incremented.
48 .global root_flags, ram_flags, root_dev
49 .global sparc_ramdisk_image, sparc_ramdisk_size
50 .global sparc_ramdisk_image64
53 .word LINUX_VERSION_CODE
57 * 0x0300 : Supports being located at other than 0x4000
58 * 0x0202 : Supports kernel params string
59 * 0x0201 : Supports reboot_command
61 .half 0x0301 /* HdrS version */
75 sparc_ramdisk_image64:
79 /* PROM cif handler code address is in %o4. */
83 /* We need to remap the kernel. Use position independant
84 * code to remap us to KERNBASE.
86 * SILO can invoke us with 32-bit address masking enabled,
87 * so make sure that's clear.
90 andn %g1, PSTATE_AM, %g1
91 wrpr %g1, 0x0, %pstate
94 .globl prom_finddev_name, prom_chosen_path, prom_root_node
95 .globl prom_getprop_name, prom_mmu_name, prom_peer_name
96 .globl prom_callmethod_name, prom_translate_name, prom_root_compatible
97 .globl prom_map_name, prom_unmap_name, prom_mmu_ihandle_cache
98 .globl prom_boot_mapped_pc, prom_boot_mapping_mode
99 .globl prom_boot_mapping_phys_high, prom_boot_mapping_phys_low
100 .globl prom_compatible_name, prom_cpu_path, prom_cpu_compatible
101 .globl is_sun4v, sun4v_chip_type
104 prom_compatible_name:
116 prom_callmethod_name:
127 .asciz "SUNW,UltraSPARC-T"
129 prom_root_compatible:
135 prom_mmu_ihandle_cache:
139 prom_boot_mapping_mode:
142 prom_boot_mapping_phys_high:
144 prom_boot_mapping_phys_low:
149 .word SUN4V_CHIP_INVALID
153 mov (1b - prom_peer_name), %l1
157 /* prom_root_node = prom_peer(0) */
158 stx %l1, [%sp + 2047 + 128 + 0x00] ! service, "peer"
160 stx %l3, [%sp + 2047 + 128 + 0x08] ! num_args, 1
161 stx %l3, [%sp + 2047 + 128 + 0x10] ! num_rets, 1
162 stx %l2, [%sp + 2047 + 128 + 0x18] ! arg1, 0
163 stx %g0, [%sp + 2047 + 128 + 0x20] ! ret1
165 add %sp, (2047 + 128), %o0 ! argument array
167 ldx [%sp + 2047 + 128 + 0x20], %l4 ! prom root node
168 mov (1b - prom_root_node), %l1
172 mov (1b - prom_getprop_name), %l1
173 mov (1b - prom_compatible_name), %l2
174 mov (1b - prom_root_compatible), %l5
179 /* prom_getproperty(prom_root_node, "compatible",
180 * &prom_root_compatible, 64)
182 stx %l1, [%sp + 2047 + 128 + 0x00] ! service, "getprop"
184 stx %l3, [%sp + 2047 + 128 + 0x08] ! num_args, 4
186 stx %l3, [%sp + 2047 + 128 + 0x10] ! num_rets, 1
187 stx %l4, [%sp + 2047 + 128 + 0x18] ! arg1, prom_root_node
188 stx %l2, [%sp + 2047 + 128 + 0x20] ! arg2, "compatible"
189 stx %l5, [%sp + 2047 + 128 + 0x28] ! arg3, &prom_root_compatible
191 stx %l3, [%sp + 2047 + 128 + 0x30] ! arg4, size
192 stx %g0, [%sp + 2047 + 128 + 0x38] ! ret1
194 add %sp, (2047 + 128), %o0 ! argument array
196 mov (1b - prom_finddev_name), %l1
197 mov (1b - prom_chosen_path), %l2
198 mov (1b - prom_boot_mapped_pc), %l3
203 sub %sp, (192 + 128), %sp
205 /* chosen_node = prom_finddevice("/chosen") */
206 stx %l1, [%sp + 2047 + 128 + 0x00] ! service, "finddevice"
208 stx %l3, [%sp + 2047 + 128 + 0x08] ! num_args, 1
209 stx %l3, [%sp + 2047 + 128 + 0x10] ! num_rets, 1
210 stx %l2, [%sp + 2047 + 128 + 0x18] ! arg1, "/chosen"
211 stx %g0, [%sp + 2047 + 128 + 0x20] ! ret1
213 add %sp, (2047 + 128), %o0 ! argument array
215 ldx [%sp + 2047 + 128 + 0x20], %l4 ! chosen device node
217 mov (1b - prom_getprop_name), %l1
218 mov (1b - prom_mmu_name), %l2
219 mov (1b - prom_mmu_ihandle_cache), %l5
224 /* prom_mmu_ihandle_cache = prom_getint(chosen_node, "mmu") */
225 stx %l1, [%sp + 2047 + 128 + 0x00] ! service, "getprop"
227 stx %l3, [%sp + 2047 + 128 + 0x08] ! num_args, 4
229 stx %l3, [%sp + 2047 + 128 + 0x10] ! num_rets, 1
230 stx %l4, [%sp + 2047 + 128 + 0x18] ! arg1, chosen_node
231 stx %l2, [%sp + 2047 + 128 + 0x20] ! arg2, "mmu"
232 stx %l5, [%sp + 2047 + 128 + 0x28] ! arg3, &prom_mmu_ihandle_cache
234 stx %l3, [%sp + 2047 + 128 + 0x30] ! arg4, sizeof(arg3)
235 stx %g0, [%sp + 2047 + 128 + 0x38] ! ret1
237 add %sp, (2047 + 128), %o0 ! argument array
239 mov (1b - prom_callmethod_name), %l1
240 mov (1b - prom_translate_name), %l2
243 lduw [%l5], %l5 ! prom_mmu_ihandle_cache
245 stx %l1, [%sp + 2047 + 128 + 0x00] ! service, "call-method"
247 stx %l3, [%sp + 2047 + 128 + 0x08] ! num_args, 3
249 stx %l3, [%sp + 2047 + 128 + 0x10] ! num_rets, 5
250 stx %l2, [%sp + 2047 + 128 + 0x18] ! arg1: "translate"
251 stx %l5, [%sp + 2047 + 128 + 0x20] ! arg2: prom_mmu_ihandle_cache
255 stx %l3, [%sp + 2047 + 128 + 0x28] ! arg3: vaddr, our PC
256 stx %g0, [%sp + 2047 + 128 + 0x30] ! res1
257 stx %g0, [%sp + 2047 + 128 + 0x38] ! res2
258 stx %g0, [%sp + 2047 + 128 + 0x40] ! res3
259 stx %g0, [%sp + 2047 + 128 + 0x48] ! res4
260 stx %g0, [%sp + 2047 + 128 + 0x50] ! res5
262 add %sp, (2047 + 128), %o0 ! argument array
264 ldx [%sp + 2047 + 128 + 0x40], %l1 ! translation mode
265 mov (1b - prom_boot_mapping_mode), %l4
268 mov (1b - prom_boot_mapping_phys_high), %l4
270 ldx [%sp + 2047 + 128 + 0x48], %l2 ! physaddr high
272 ldx [%sp + 2047 + 128 + 0x50], %l3 ! physaddr low
278 /* Leave service as-is, "call-method" */
280 stx %l3, [%sp + 2047 + 128 + 0x08] ! num_args, 7
282 stx %l3, [%sp + 2047 + 128 + 0x10] ! num_rets, 1
283 mov (1b - prom_map_name), %l3
285 stx %l3, [%sp + 2047 + 128 + 0x18] ! arg1: "map"
286 /* Leave arg2 as-is, prom_mmu_ihandle_cache */
288 stx %l3, [%sp + 2047 + 128 + 0x28] ! arg3: mode (-1 default)
289 sethi %hi(8 * 1024 * 1024), %l3
290 stx %l3, [%sp + 2047 + 128 + 0x30] ! arg4: size (8MB)
291 sethi %hi(KERNBASE), %l3
292 stx %l3, [%sp + 2047 + 128 + 0x38] ! arg5: vaddr (KERNBASE)
293 stx %g0, [%sp + 2047 + 128 + 0x40] ! arg6: empty
294 mov (1b - prom_boot_mapping_phys_low), %l3
297 stx %l3, [%sp + 2047 + 128 + 0x48] ! arg7: phys addr
299 add %sp, (2047 + 128), %o0 ! argument array
301 add %sp, (192 + 128), %sp
303 sethi %hi(prom_root_compatible), %g1
304 or %g1, %lo(prom_root_compatible), %g1
305 sethi %hi(prom_sun4v_name), %g7
306 or %g7, %lo(prom_sun4v_name), %g7
317 sethi %hi(is_sun4v), %g1
318 or %g1, %lo(is_sun4v), %g1
322 /* cpu_node = prom_finddevice("/cpu") */
323 mov (1b - prom_finddev_name), %l1
324 mov (1b - prom_cpu_path), %l2
327 sub %sp, (192 + 128), %sp
329 stx %l1, [%sp + 2047 + 128 + 0x00] ! service, "finddevice"
331 stx %l3, [%sp + 2047 + 128 + 0x08] ! num_args, 1
332 stx %l3, [%sp + 2047 + 128 + 0x10] ! num_rets, 1
333 stx %l2, [%sp + 2047 + 128 + 0x18] ! arg1, "/cpu"
334 stx %g0, [%sp + 2047 + 128 + 0x20] ! ret1
336 add %sp, (2047 + 128), %o0 ! argument array
338 ldx [%sp + 2047 + 128 + 0x20], %l4 ! cpu device node
340 mov (1b - prom_getprop_name), %l1
341 mov (1b - prom_compatible_name), %l2
342 mov (1b - prom_cpu_compatible), %l5
347 /* prom_getproperty(cpu_node, "compatible",
348 * &prom_cpu_compatible, 64)
350 stx %l1, [%sp + 2047 + 128 + 0x00] ! service, "getprop"
352 stx %l3, [%sp + 2047 + 128 + 0x08] ! num_args, 4
354 stx %l3, [%sp + 2047 + 128 + 0x10] ! num_rets, 1
355 stx %l4, [%sp + 2047 + 128 + 0x18] ! arg1, cpu_node
356 stx %l2, [%sp + 2047 + 128 + 0x20] ! arg2, "compatible"
357 stx %l5, [%sp + 2047 + 128 + 0x28] ! arg3, &prom_cpu_compatible
359 stx %l3, [%sp + 2047 + 128 + 0x30] ! arg4, size
360 stx %g0, [%sp + 2047 + 128 + 0x38] ! ret1
362 add %sp, (2047 + 128), %o0 ! argument array
364 add %sp, (192 + 128), %sp
366 sethi %hi(prom_cpu_compatible), %g1
367 or %g1, %lo(prom_cpu_compatible), %g1
368 sethi %hi(prom_niagara_prefix), %g7
369 or %g7, %lo(prom_niagara_prefix), %g7
380 sethi %hi(prom_cpu_compatible), %g1
381 or %g1, %lo(prom_cpu_compatible), %g1
385 mov SUN4V_CHIP_NIAGARA1, %g4
388 mov SUN4V_CHIP_NIAGARA2, %g4
390 mov SUN4V_CHIP_UNKNOWN, %g4
391 5: sethi %hi(sun4v_chip_type), %g2
392 or %g2, %lo(sun4v_chip_type), %g2
396 BRANCH_IF_SUN4V(g1, jump_to_sun4u_init)
397 BRANCH_IF_CHEETAH_BASE(g1,g7,cheetah_boot)
398 BRANCH_IF_CHEETAH_PLUS_OR_FOLLOWON(g1,g7,cheetah_plus_boot)
399 ba,pt %xcc, spitfire_boot
403 /* Preserve OBP chosen DCU and DCR register settings. */
404 ba,pt %xcc, cheetah_generic_boot
408 mov DCR_BPE | DCR_RPE | DCR_SI | DCR_IFPOE | DCR_MS, %g1
411 sethi %uhi(DCU_ME|DCU_RE|DCU_HPE|DCU_SPE|DCU_SL|DCU_WE), %g7
412 or %g7, %ulo(DCU_ME|DCU_RE|DCU_HPE|DCU_SPE|DCU_SL|DCU_WE), %g7
414 or %g7, DCU_DM | DCU_IM | DCU_DC | DCU_IC, %g7
415 stxa %g7, [%g0] ASI_DCU_CONTROL_REG
418 cheetah_generic_boot:
419 mov TSB_EXTENSION_P, %g3
420 stxa %g0, [%g3] ASI_DMMU
421 stxa %g0, [%g3] ASI_IMMU
424 mov TSB_EXTENSION_S, %g3
425 stxa %g0, [%g3] ASI_DMMU
428 mov TSB_EXTENSION_N, %g3
429 stxa %g0, [%g3] ASI_DMMU
430 stxa %g0, [%g3] ASI_IMMU
433 ba,a,pt %xcc, jump_to_sun4u_init
436 /* Typically PROM has already enabled both MMU's and both on-chip
437 * caches, but we do it here anyway just to be paranoid.
439 mov (LSU_CONTROL_IC|LSU_CONTROL_DC|LSU_CONTROL_IM|LSU_CONTROL_DM), %g1
440 stxa %g1, [%g0] ASI_LSU_CONTROL
445 * Make sure we are in privileged mode, have address masking,
446 * using the ordinary globals and have enabled floating
449 * Again, typically PROM has left %pil at 13 or similar, and
450 * (PSTATE_PRIV | PSTATE_PEF | PSTATE_IE) in %pstate.
452 wrpr %g0, (PSTATE_PRIV|PSTATE_PEF|PSTATE_IE), %pstate
459 .section .text.init.refok
461 BRANCH_IF_SUN4V(g1, sun4v_init)
464 mov PRIMARY_CONTEXT, %g7
465 stxa %g0, [%g7] ASI_DMMU
468 mov SECONDARY_CONTEXT, %g7
469 stxa %g0, [%g7] ASI_DMMU
472 ba,pt %xcc, sun4u_continue
477 mov PRIMARY_CONTEXT, %g7
478 stxa %g0, [%g7] ASI_MMU
481 mov SECONDARY_CONTEXT, %g7
482 stxa %g0, [%g7] ASI_MMU
484 ba,pt %xcc, niagara_tlb_fixup
488 BRANCH_IF_ANY_CHEETAH(g1, g7, cheetah_tlb_fixup)
490 ba,pt %xcc, spitfire_tlb_fixup
494 mov 3, %g2 /* Set TLB type to hypervisor. */
495 sethi %hi(tlb_type), %g1
496 stw %g2, [%g1 + %lo(tlb_type)]
498 /* Patch copy/clear ops. */
499 sethi %hi(sun4v_chip_type), %g1
500 lduw [%g1 + %lo(sun4v_chip_type)], %g1
501 cmp %g1, SUN4V_CHIP_NIAGARA1
502 be,pt %xcc, niagara_patch
503 cmp %g1, SUN4V_CHIP_NIAGARA2
504 be,pt %xcc, niagara_patch
507 call generic_patch_copyops
509 call generic_patch_bzero
511 call generic_patch_pageops
517 call niagara_patch_copyops
519 call niagara_patch_bzero
521 call niagara_patch_pageops
525 /* Patch TLB/cache ops. */
526 call hypervisor_patch_cachetlbops
529 ba,pt %xcc, tlb_fixup_done
533 mov 2, %g2 /* Set TLB type to cheetah+. */
534 BRANCH_IF_CHEETAH_PLUS_OR_FOLLOWON(g1,g7,1f)
536 mov 1, %g2 /* Set TLB type to cheetah. */
538 1: sethi %hi(tlb_type), %g1
539 stw %g2, [%g1 + %lo(tlb_type)]
541 /* Patch copy/page operations to cheetah optimized versions. */
542 call cheetah_patch_copyops
544 call cheetah_patch_copy_page
546 call cheetah_patch_cachetlbops
549 ba,pt %xcc, tlb_fixup_done
553 /* Set TLB type to spitfire. */
555 sethi %hi(tlb_type), %g1
556 stw %g2, [%g1 + %lo(tlb_type)]
559 sethi %hi(init_thread_union), %g6
560 or %g6, %lo(init_thread_union), %g6
561 ldx [%g6 + TI_TASK], %g4
566 sllx %g1, THREAD_SHIFT, %g1
567 sub %g1, (STACKFRAME_SZ + STACK_BIAS), %g1
571 /* Set per-cpu pointer initially to zero, this makes
572 * the boot-cpu use the in-kernel-image per-cpu areas
573 * before setup_per_cpu_area() is invoked.
581 sethi %hi(__bss_start), %o0
582 or %o0, %lo(__bss_start), %o0
584 or %o1, %lo(_end), %o1
588 #ifdef CONFIG_LOCKDEP
589 /* We have this call this super early, as even prom_init can grab
590 * spinlocks and thus call into the lockdep code.
596 mov %l6, %o1 ! OpenPROM stack
598 mov %l7, %o0 ! OpenPROM cif handler
600 /* Initialize current_thread_info()->cpu as early as possible.
601 * In order to do that accurately we have to patch up the get_cpuid()
602 * assembler sequences. And that, in turn, requires that we know
603 * if we are on a Starfire box or not. While we're here, patch up
604 * the sun4v sequences as well.
606 call check_if_starfire
614 call hard_smp_processor_id
619 call boot_cpu_id_too_large
627 sth %o0, [%g6 + TI_CPU]
636 /* This is meant to allow the sharing of this code between
637 * boot processor invocation (via setup_tba() below) and
638 * secondary processor startup (via trampoline.S). The
639 * former does use this code, the latter does not yet due
640 * to some complexities. That should be fixed up at some
643 * There used to be enormous complexity wrt. transferring
644 * over from the firwmare's trap table to the Linux kernel's.
645 * For example, there was a chicken & egg problem wrt. building
646 * the OBP page tables, yet needing to be on the Linux kernel
647 * trap table (to translate PAGE_OFFSET addresses) in order to
650 * We now handle OBP tlb misses differently, via linear lookups
651 * into the prom_trans[] array. So that specific problem no
652 * longer exists. Yet, unfortunately there are still some issues
653 * preventing trampoline.S from using this code... ho hum.
655 .globl setup_trap_table
659 /* Force interrupts to be disabled. */
661 andn %l0, PSTATE_IE, %o1
662 wrpr %o1, 0x0, %pstate
666 /* Make the firmware call to jump over to the Linux trap table. */
667 sethi %hi(is_sun4v), %o0
668 lduw [%o0 + %lo(is_sun4v)], %o0
672 TRAP_LOAD_TRAP_BLOCK(%g2, %g3)
673 add %g2, TRAP_PER_CPU_FAULT_INFO, %g2
674 stxa %g2, [%g0] ASI_SCRATCHPAD
676 /* Compute physical address:
678 * paddr = kern_base + (mmfsa_vaddr - KERNBASE)
680 sethi %hi(KERNBASE), %g3
682 sethi %hi(kern_base), %g3
683 ldx [%g3 + %lo(kern_base)], %g3
686 call prom_set_trap_table_sun4v
687 sethi %hi(sparc64_ttable_tl0), %o0
692 1: call prom_set_trap_table
693 sethi %hi(sparc64_ttable_tl0), %o0
695 /* Start using proper page size encodings in ctx register. */
696 2: sethi %hi(sparc64_kern_pri_context), %g3
697 ldx [%g3 + %lo(sparc64_kern_pri_context)], %g2
699 mov PRIMARY_CONTEXT, %g1
701 661: stxa %g2, [%g1] ASI_DMMU
702 .section .sun4v_1insn_patch, "ax"
704 stxa %g2, [%g1] ASI_MMU
709 /* Kill PROM timer */
710 sethi %hi(0x80000000), %o2
712 wr %o2, 0, %tick_cmpr
714 BRANCH_IF_SUN4V(o2, 1f)
715 BRANCH_IF_ANY_CHEETAH(o2, o3, 1f)
720 /* Disable STICK_INT interrupts. */
722 sethi %hi(0x80000000), %o2
727 wrpr %g0, %g0, %wstate
729 call init_irqwork_curcpu
732 /* Now we can restore interrupt state. */
743 /* The boot processor is the only cpu which invokes this
744 * routine, the other cpus set things up via trampoline.S.
745 * So save the OBP trap table address here.
748 sethi %hi(prom_tba), %o1
749 or %o1, %lo(prom_tba), %o1
752 call setup_trap_table
761 #include "winfixup.S"
763 #include "sun4v_tlb_miss.S"
764 #include "sun4v_ivec.S"
769 * The following skip makes sure the trap table in ttable.S is aligned
770 * on a 32K boundary as required by the v9 specs for TBA register.
772 * We align to a 32K boundary, then we have the 32K kernel TSB,
773 * the 64K kernel 4MB TSB, and then the 32K aligned trap table.
776 .skip 0x4000 + _start - 1b
784 .globl swapper_4m_tsb
790 /* Some care needs to be exercised if you try to move the
791 * location of the trap table relative to other things. For
792 * one thing there are br* instructions in some of the
793 * trap table entires which branch back to code in ktlb.S
794 * Those instructions can only handle a signed 16-bit
797 * There is a binutils bug (bugzilla #4558) which causes
798 * the relocation overflow checks for such instructions to
799 * not be done correctly. So bintuils will not notice the
800 * error and will instead write junk into the relocation and
801 * you'll have an unbootable kernel.
811 .globl prom_tba, tlb_type
813 tlb_type: .word 0 /* Must NOT end up in BSS */
814 .section ".fixup",#alloc,#execinstr
816 .globl __ret_efault, __retl_efault
819 restore %g0, -EFAULT, %o0