xref: /linux/arch/sparc/kernel/head_64.S (revision be239684b18e1cdcafcf8c7face4a2f562c745ad)
1/* SPDX-License-Identifier: GPL-2.0 */
2/* head.S: Initial boot code for the Sparc64 port of Linux.
3 *
4 * Copyright (C) 1996, 1997, 2007 David S. Miller (davem@davemloft.net)
5 * Copyright (C) 1996 David Sitsky (David.Sitsky@anu.edu.au)
6 * Copyright (C) 1997, 1998 Jakub Jelinek (jj@sunsite.mff.cuni.cz)
7 * Copyright (C) 1997 Miguel de Icaza (miguel@nuclecu.unam.mx)
8 */
9
10#include <linux/version.h>
11#include <linux/errno.h>
12#include <linux/export.h>
13#include <linux/threads.h>
14#include <linux/init.h>
15#include <linux/linkage.h>
16#include <linux/pgtable.h>
17#include <asm/thread_info.h>
18#include <asm/asi.h>
19#include <asm/pstate.h>
20#include <asm/ptrace.h>
21#include <asm/spitfire.h>
22#include <asm/page.h>
23#include <asm/errno.h>
24#include <asm/signal.h>
25#include <asm/processor.h>
26#include <asm/lsu.h>
27#include <asm/dcr.h>
28#include <asm/dcu.h>
29#include <asm/head.h>
30#include <asm/ttable.h>
31#include <asm/mmu.h>
32#include <asm/cpudata.h>
33#include <asm/pil.h>
34#include <asm/estate.h>
35#include <asm/sfafsr.h>
36#include <asm/unistd.h>
37
38/* This section from from _start to sparc64_boot_end should fit into
39 * 0x0000000000404000 to 0x0000000000408000.
40 */
41	.text
42	.globl	start, _start, stext, _stext
43_start:
44start:
45_stext:
46stext:
47! 0x0000000000404000
48	b	sparc64_boot
49	 flushw					/* Flush register file.      */
50
51/* This stuff has to be in sync with SILO and other potential boot loaders
52 * Fields should be kept upward compatible and whenever any change is made,
53 * HdrS version should be incremented.
54 */
55        .global root_flags, ram_flags, root_dev
56        .global sparc_ramdisk_image, sparc_ramdisk_size
57	.global sparc_ramdisk_image64
58
59        .ascii  "HdrS"
60        .word   LINUX_VERSION_CODE
61
62	/* History:
63	 *
64	 * 0x0300 : Supports being located at other than 0x4000
65	 * 0x0202 : Supports kernel params string
66	 * 0x0201 : Supports reboot_command
67	 */
68	.half   0x0301          /* HdrS version */
69
70root_flags:
71        .half   1
72root_dev:
73        .half   0
74ram_flags:
75        .half   0
76sparc_ramdisk_image:
77        .word   0
78sparc_ramdisk_size:
79        .word   0
80        .xword  reboot_command
81	.xword	bootstr_info
82sparc_ramdisk_image64:
83	.xword	0
84	.word	_end
85
86	/* PROM cif handler code address is in %o4.  */
87sparc64_boot:
88	mov	%o4, %l7
89
90	/* We need to remap the kernel.  Use position independent
91	 * code to remap us to KERNBASE.
92	 *
93	 * SILO can invoke us with 32-bit address masking enabled,
94	 * so make sure that's clear.
95	 */
96	rdpr	%pstate, %g1
97	andn	%g1, PSTATE_AM, %g1
98	wrpr	%g1, 0x0, %pstate
99	ba,a,pt	%xcc, 1f
100	 nop
101
102	.globl	prom_finddev_name, prom_chosen_path, prom_root_node
103	.globl	prom_getprop_name, prom_mmu_name, prom_peer_name
104	.globl	prom_callmethod_name, prom_translate_name, prom_root_compatible
105	.globl	prom_map_name, prom_unmap_name, prom_mmu_ihandle_cache
106	.globl	prom_boot_mapped_pc, prom_boot_mapping_mode
107	.globl	prom_boot_mapping_phys_high, prom_boot_mapping_phys_low
108	.globl	prom_compatible_name, prom_cpu_path, prom_cpu_compatible
109	.globl	is_sun4v, sun4v_chip_type, prom_set_trap_table_name
110prom_peer_name:
111	.asciz	"peer"
112prom_compatible_name:
113	.asciz	"compatible"
114prom_finddev_name:
115	.asciz	"finddevice"
116prom_chosen_path:
117	.asciz	"/chosen"
118prom_cpu_path:
119	.asciz	"/cpu"
120prom_getprop_name:
121	.asciz	"getprop"
122prom_mmu_name:
123	.asciz	"mmu"
124prom_callmethod_name:
125	.asciz	"call-method"
126prom_translate_name:
127	.asciz	"translate"
128prom_map_name:
129	.asciz	"map"
130prom_unmap_name:
131	.asciz	"unmap"
132prom_set_trap_table_name:
133	.asciz	"SUNW,set-trap-table"
134prom_sun4v_name:
135	.asciz	"sun4v"
136prom_niagara_prefix:
137	.asciz	"SUNW,UltraSPARC-T"
138prom_sparc_prefix:
139	.asciz	"SPARC-"
140prom_sparc64x_prefix:
141	.asciz	"SPARC64-X"
142	.align	4
143prom_root_compatible:
144	.skip	64
145prom_cpu_compatible:
146	.skip	64
147prom_root_node:
148	.word	0
149EXPORT_SYMBOL(prom_root_node)
150prom_mmu_ihandle_cache:
151	.word	0
152prom_boot_mapped_pc:
153	.word	0
154prom_boot_mapping_mode:
155	.word	0
156	.align	8
157prom_boot_mapping_phys_high:
158	.xword	0
159prom_boot_mapping_phys_low:
160	.xword	0
161is_sun4v:
162	.word	0
163sun4v_chip_type:
164	.word	SUN4V_CHIP_INVALID
165EXPORT_SYMBOL(sun4v_chip_type)
1661:
167	rd	%pc, %l0
168
169	mov	(1b - prom_peer_name), %l1
170	sub	%l0, %l1, %l1
171	mov	0, %l2
172
173	/* prom_root_node = prom_peer(0) */
174	stx	%l1, [%sp + 2047 + 128 + 0x00]	! service, "peer"
175	mov	1, %l3
176	stx	%l3, [%sp + 2047 + 128 + 0x08]	! num_args, 1
177	stx	%l3, [%sp + 2047 + 128 + 0x10]	! num_rets, 1
178	stx	%l2, [%sp + 2047 + 128 + 0x18]	! arg1, 0
179	stx	%g0, [%sp + 2047 + 128 + 0x20]	! ret1
180	call	%l7
181	 add	%sp, (2047 + 128), %o0		! argument array
182
183	ldx	[%sp + 2047 + 128 + 0x20], %l4	! prom root node
184	mov	(1b - prom_root_node), %l1
185	sub	%l0, %l1, %l1
186	stw	%l4, [%l1]
187
188	mov	(1b - prom_getprop_name), %l1
189	mov	(1b - prom_compatible_name), %l2
190	mov	(1b - prom_root_compatible), %l5
191	sub	%l0, %l1, %l1
192	sub	%l0, %l2, %l2
193	sub	%l0, %l5, %l5
194
195	/* prom_getproperty(prom_root_node, "compatible",
196	 *                  &prom_root_compatible, 64)
197	 */
198	stx	%l1, [%sp + 2047 + 128 + 0x00]	! service, "getprop"
199	mov	4, %l3
200	stx	%l3, [%sp + 2047 + 128 + 0x08]	! num_args, 4
201	mov	1, %l3
202	stx	%l3, [%sp + 2047 + 128 + 0x10]	! num_rets, 1
203	stx	%l4, [%sp + 2047 + 128 + 0x18]	! arg1, prom_root_node
204	stx	%l2, [%sp + 2047 + 128 + 0x20]	! arg2, "compatible"
205	stx	%l5, [%sp + 2047 + 128 + 0x28]	! arg3, &prom_root_compatible
206	mov	64, %l3
207	stx	%l3, [%sp + 2047 + 128 + 0x30]	! arg4, size
208	stx	%g0, [%sp + 2047 + 128 + 0x38]	! ret1
209	call	%l7
210	 add	%sp, (2047 + 128), %o0		! argument array
211
212	mov	(1b - prom_finddev_name), %l1
213	mov	(1b - prom_chosen_path), %l2
214	mov	(1b - prom_boot_mapped_pc), %l3
215	sub	%l0, %l1, %l1
216	sub	%l0, %l2, %l2
217	sub	%l0, %l3, %l3
218	stw	%l0, [%l3]
219	sub	%sp, (192 + 128), %sp
220
221	/* chosen_node = prom_finddevice("/chosen") */
222	stx	%l1, [%sp + 2047 + 128 + 0x00]	! service, "finddevice"
223	mov	1, %l3
224	stx	%l3, [%sp + 2047 + 128 + 0x08]	! num_args, 1
225	stx	%l3, [%sp + 2047 + 128 + 0x10]	! num_rets, 1
226	stx	%l2, [%sp + 2047 + 128 + 0x18]	! arg1, "/chosen"
227	stx	%g0, [%sp + 2047 + 128 + 0x20]	! ret1
228	call	%l7
229	 add	%sp, (2047 + 128), %o0		! argument array
230
231	ldx	[%sp + 2047 + 128 + 0x20], %l4	! chosen device node
232
233	mov	(1b - prom_getprop_name), %l1
234	mov	(1b - prom_mmu_name), %l2
235	mov	(1b - prom_mmu_ihandle_cache), %l5
236	sub	%l0, %l1, %l1
237	sub	%l0, %l2, %l2
238	sub	%l0, %l5, %l5
239
240	/* prom_mmu_ihandle_cache = prom_getint(chosen_node, "mmu") */
241	stx	%l1, [%sp + 2047 + 128 + 0x00]	! service, "getprop"
242	mov	4, %l3
243	stx	%l3, [%sp + 2047 + 128 + 0x08]	! num_args, 4
244	mov	1, %l3
245	stx	%l3, [%sp + 2047 + 128 + 0x10]	! num_rets, 1
246	stx	%l4, [%sp + 2047 + 128 + 0x18]	! arg1, chosen_node
247	stx	%l2, [%sp + 2047 + 128 + 0x20]	! arg2, "mmu"
248	stx	%l5, [%sp + 2047 + 128 + 0x28]	! arg3, &prom_mmu_ihandle_cache
249	mov	4, %l3
250	stx	%l3, [%sp + 2047 + 128 + 0x30]	! arg4, sizeof(arg3)
251	stx	%g0, [%sp + 2047 + 128 + 0x38]	! ret1
252	call	%l7
253	 add	%sp, (2047 + 128), %o0		! argument array
254
255	mov	(1b - prom_callmethod_name), %l1
256	mov	(1b - prom_translate_name), %l2
257	sub	%l0, %l1, %l1
258	sub	%l0, %l2, %l2
259	lduw	[%l5], %l5			! prom_mmu_ihandle_cache
260
261	stx	%l1, [%sp + 2047 + 128 + 0x00]	! service, "call-method"
262	mov	3, %l3
263	stx	%l3, [%sp + 2047 + 128 + 0x08]	! num_args, 3
264	mov	5, %l3
265	stx	%l3, [%sp + 2047 + 128 + 0x10]	! num_rets, 5
266	stx	%l2, [%sp + 2047 + 128 + 0x18]	! arg1: "translate"
267	stx	%l5, [%sp + 2047 + 128 + 0x20]	! arg2: prom_mmu_ihandle_cache
268	/* PAGE align */
269	srlx	%l0, 13, %l3
270	sllx	%l3, 13, %l3
271	stx	%l3, [%sp + 2047 + 128 + 0x28]	! arg3: vaddr, our PC
272	stx	%g0, [%sp + 2047 + 128 + 0x30]	! res1
273	stx	%g0, [%sp + 2047 + 128 + 0x38]	! res2
274	stx	%g0, [%sp + 2047 + 128 + 0x40]	! res3
275	stx	%g0, [%sp + 2047 + 128 + 0x48]	! res4
276	stx	%g0, [%sp + 2047 + 128 + 0x50]	! res5
277	call	%l7
278	 add	%sp, (2047 + 128), %o0		! argument array
279
280	ldx	[%sp + 2047 + 128 + 0x40], %l1	! translation mode
281	mov	(1b - prom_boot_mapping_mode), %l4
282	sub	%l0, %l4, %l4
283	stw	%l1, [%l4]
284	mov	(1b - prom_boot_mapping_phys_high), %l4
285	sub	%l0, %l4, %l4
286	ldx	[%sp + 2047 + 128 + 0x48], %l2	! physaddr high
287	stx	%l2, [%l4 + 0x0]
288	ldx	[%sp + 2047 + 128 + 0x50], %l3	! physaddr low
289	/* 4MB align */
290	srlx	%l3, ILOG2_4MB, %l3
291	sllx	%l3, ILOG2_4MB, %l3
292	stx	%l3, [%l4 + 0x8]
293
294	/* Leave service as-is, "call-method" */
295	mov	7, %l3
296	stx	%l3, [%sp + 2047 + 128 + 0x08]	! num_args, 7
297	mov	1, %l3
298	stx	%l3, [%sp + 2047 + 128 + 0x10]	! num_rets, 1
299	mov	(1b - prom_map_name), %l3
300	sub	%l0, %l3, %l3
301	stx	%l3, [%sp + 2047 + 128 + 0x18]	! arg1: "map"
302	/* Leave arg2 as-is, prom_mmu_ihandle_cache */
303	mov	-1, %l3
304	stx	%l3, [%sp + 2047 + 128 + 0x28]	! arg3: mode (-1 default)
305	/* 4MB align the kernel image size. */
306	set	(_end - KERNBASE), %l3
307	set	((4 * 1024 * 1024) - 1), %l4
308	add	%l3, %l4, %l3
309	andn	%l3, %l4, %l3
310	stx	%l3, [%sp + 2047 + 128 + 0x30]	! arg4: roundup(ksize, 4MB)
311	sethi	%hi(KERNBASE), %l3
312	stx	%l3, [%sp + 2047 + 128 + 0x38]	! arg5: vaddr (KERNBASE)
313	stx	%g0, [%sp + 2047 + 128 + 0x40]	! arg6: empty
314	mov	(1b - prom_boot_mapping_phys_low), %l3
315	sub	%l0, %l3, %l3
316	ldx	[%l3], %l3
317	stx	%l3, [%sp + 2047 + 128 + 0x48]	! arg7: phys addr
318	call	%l7
319	 add	%sp, (2047 + 128), %o0		! argument array
320
321	add	%sp, (192 + 128), %sp
322
323	sethi	%hi(prom_root_compatible), %g1
324	or	%g1, %lo(prom_root_compatible), %g1
325	sethi	%hi(prom_sun4v_name), %g7
326	or	%g7, %lo(prom_sun4v_name), %g7
327	mov	5, %g3
32890:	ldub	[%g7], %g2
329	ldub	[%g1], %g4
330	cmp	%g2, %g4
331	bne,pn	%icc, 80f
332	 add	%g7, 1, %g7
333	subcc	%g3, 1, %g3
334	bne,pt	%xcc, 90b
335	 add	%g1, 1, %g1
336
337	sethi	%hi(is_sun4v), %g1
338	or	%g1, %lo(is_sun4v), %g1
339	mov	1, %g7
340	stw	%g7, [%g1]
341
342	/* cpu_node = prom_finddevice("/cpu") */
343	mov	(1b - prom_finddev_name), %l1
344	mov	(1b - prom_cpu_path), %l2
345	sub	%l0, %l1, %l1
346	sub	%l0, %l2, %l2
347	sub	%sp, (192 + 128), %sp
348
349	stx	%l1, [%sp + 2047 + 128 + 0x00]	! service, "finddevice"
350	mov	1, %l3
351	stx	%l3, [%sp + 2047 + 128 + 0x08]	! num_args, 1
352	stx	%l3, [%sp + 2047 + 128 + 0x10]	! num_rets, 1
353	stx	%l2, [%sp + 2047 + 128 + 0x18]	! arg1, "/cpu"
354	stx	%g0, [%sp + 2047 + 128 + 0x20]	! ret1
355	call	%l7
356	 add	%sp, (2047 + 128), %o0		! argument array
357
358	ldx	[%sp + 2047 + 128 + 0x20], %l4	! cpu device node
359
360	mov	(1b - prom_getprop_name), %l1
361	mov	(1b - prom_compatible_name), %l2
362	mov	(1b - prom_cpu_compatible), %l5
363	sub	%l0, %l1, %l1
364	sub	%l0, %l2, %l2
365	sub	%l0, %l5, %l5
366
367	/* prom_getproperty(cpu_node, "compatible",
368	 *                  &prom_cpu_compatible, 64)
369	 */
370	stx	%l1, [%sp + 2047 + 128 + 0x00]	! service, "getprop"
371	mov	4, %l3
372	stx	%l3, [%sp + 2047 + 128 + 0x08]	! num_args, 4
373	mov	1, %l3
374	stx	%l3, [%sp + 2047 + 128 + 0x10]	! num_rets, 1
375	stx	%l4, [%sp + 2047 + 128 + 0x18]	! arg1, cpu_node
376	stx	%l2, [%sp + 2047 + 128 + 0x20]	! arg2, "compatible"
377	stx	%l5, [%sp + 2047 + 128 + 0x28]	! arg3, &prom_cpu_compatible
378	mov	64, %l3
379	stx	%l3, [%sp + 2047 + 128 + 0x30]	! arg4, size
380	stx	%g0, [%sp + 2047 + 128 + 0x38]	! ret1
381	call	%l7
382	 add	%sp, (2047 + 128), %o0		! argument array
383
384	add	%sp, (192 + 128), %sp
385
386	sethi	%hi(prom_cpu_compatible), %g1
387	or	%g1, %lo(prom_cpu_compatible), %g1
388	sethi	%hi(prom_niagara_prefix), %g7
389	or	%g7, %lo(prom_niagara_prefix), %g7
390	mov	17, %g3
39190:	ldub	[%g7], %g2
392	ldub	[%g1], %g4
393	cmp	%g2, %g4
394	bne,pn	%icc, 89f
395	 add	%g7, 1, %g7
396	subcc	%g3, 1, %g3
397	bne,pt	%xcc, 90b
398	 add	%g1, 1, %g1
399	ba,pt	%xcc, 91f
400	 nop
401
40289:	sethi	%hi(prom_cpu_compatible), %g1
403	or	%g1, %lo(prom_cpu_compatible), %g1
404	sethi	%hi(prom_sparc_prefix), %g7
405	or	%g7, %lo(prom_sparc_prefix), %g7
406	mov	6, %g3
40790:	ldub	[%g7], %g2
408	ldub	[%g1], %g4
409	cmp	%g2, %g4
410	bne,pn	%icc, 4f
411	 add	%g7, 1, %g7
412	subcc	%g3, 1, %g3
413	bne,pt	%xcc, 90b
414	 add	%g1, 1, %g1
415
416	sethi	%hi(prom_cpu_compatible), %g1
417	or	%g1, %lo(prom_cpu_compatible), %g1
418	ldub	[%g1 + 6], %g2
419	cmp	%g2, 'T'
420	be,pt	%xcc, 70f
421	 cmp	%g2, 'M'
422	be,pt	%xcc, 70f
423	 cmp	%g2, 'S'
424	bne,pn	%xcc, 49f
425	 nop
426
42770:	ldub	[%g1 + 7], %g2
428	cmp	%g2, CPU_ID_NIAGARA3
429	be,pt	%xcc, 5f
430	 mov	SUN4V_CHIP_NIAGARA3, %g4
431	cmp	%g2, CPU_ID_NIAGARA4
432	be,pt	%xcc, 5f
433	 mov	SUN4V_CHIP_NIAGARA4, %g4
434	cmp	%g2, CPU_ID_NIAGARA5
435	be,pt	%xcc, 5f
436	 mov	SUN4V_CHIP_NIAGARA5, %g4
437	cmp	%g2, CPU_ID_M6
438	be,pt	%xcc, 5f
439	 mov	SUN4V_CHIP_SPARC_M6, %g4
440	cmp	%g2, CPU_ID_M7
441	be,pt	%xcc, 5f
442	 mov	SUN4V_CHIP_SPARC_M7, %g4
443	cmp	%g2, CPU_ID_M8
444	be,pt	%xcc, 5f
445	 mov	SUN4V_CHIP_SPARC_M8, %g4
446	cmp	%g2, CPU_ID_SONOMA1
447	be,pt	%xcc, 5f
448	 mov	SUN4V_CHIP_SPARC_SN, %g4
449	ba,pt	%xcc, 49f
450	 nop
451
45291:	sethi	%hi(prom_cpu_compatible), %g1
453	or	%g1, %lo(prom_cpu_compatible), %g1
454	ldub	[%g1 + 17], %g2
455	cmp	%g2, CPU_ID_NIAGARA1
456	be,pt	%xcc, 5f
457	 mov	SUN4V_CHIP_NIAGARA1, %g4
458	cmp	%g2, CPU_ID_NIAGARA2
459	be,pt	%xcc, 5f
460	 mov	SUN4V_CHIP_NIAGARA2, %g4
461
4624:
463	/* Athena */
464	sethi	%hi(prom_cpu_compatible), %g1
465	or	%g1, %lo(prom_cpu_compatible), %g1
466	sethi	%hi(prom_sparc64x_prefix), %g7
467	or	%g7, %lo(prom_sparc64x_prefix), %g7
468	mov	9, %g3
46941:	ldub	[%g7], %g2
470	ldub	[%g1], %g4
471	cmp	%g2, %g4
472	bne,pn	%icc, 49f
473	add	%g7, 1, %g7
474	subcc	%g3, 1, %g3
475	bne,pt	%xcc, 41b
476	add	%g1, 1, %g1
477	ba,pt	%xcc, 5f
478	 mov	SUN4V_CHIP_SPARC64X, %g4
479
48049:
481	mov	SUN4V_CHIP_UNKNOWN, %g4
4825:	sethi	%hi(sun4v_chip_type), %g2
483	or	%g2, %lo(sun4v_chip_type), %g2
484	stw	%g4, [%g2]
485
48680:
487	BRANCH_IF_SUN4V(g1, jump_to_sun4u_init)
488	BRANCH_IF_CHEETAH_BASE(g1,g7,cheetah_boot)
489	BRANCH_IF_CHEETAH_PLUS_OR_FOLLOWON(g1,g7,cheetah_plus_boot)
490	ba,pt	%xcc, spitfire_boot
491	 nop
492
493cheetah_plus_boot:
494	/* Preserve OBP chosen DCU and DCR register settings.  */
495	ba,pt	%xcc, cheetah_generic_boot
496	 nop
497
498cheetah_boot:
499	mov	DCR_BPE | DCR_RPE | DCR_SI | DCR_IFPOE | DCR_MS, %g1
500	wr	%g1, %asr18
501
502	sethi	%uhi(DCU_ME|DCU_RE|DCU_HPE|DCU_SPE|DCU_SL|DCU_WE), %g7
503	or	%g7, %ulo(DCU_ME|DCU_RE|DCU_HPE|DCU_SPE|DCU_SL|DCU_WE), %g7
504	sllx	%g7, 32, %g7
505	or	%g7, DCU_DM | DCU_IM | DCU_DC | DCU_IC, %g7
506	stxa	%g7, [%g0] ASI_DCU_CONTROL_REG
507	membar	#Sync
508
509cheetah_generic_boot:
510	mov	TSB_EXTENSION_P, %g3
511	stxa	%g0, [%g3] ASI_DMMU
512	stxa	%g0, [%g3] ASI_IMMU
513	membar	#Sync
514
515	mov	TSB_EXTENSION_S, %g3
516	stxa	%g0, [%g3] ASI_DMMU
517	membar	#Sync
518
519	mov	TSB_EXTENSION_N, %g3
520	stxa	%g0, [%g3] ASI_DMMU
521	stxa	%g0, [%g3] ASI_IMMU
522	membar	#Sync
523
524	ba,a,pt	%xcc, jump_to_sun4u_init
525
526spitfire_boot:
527	/* Typically PROM has already enabled both MMU's and both on-chip
528	 * caches, but we do it here anyway just to be paranoid.
529	 */
530	mov	(LSU_CONTROL_IC|LSU_CONTROL_DC|LSU_CONTROL_IM|LSU_CONTROL_DM), %g1
531	stxa	%g1, [%g0] ASI_LSU_CONTROL
532	membar	#Sync
533
534jump_to_sun4u_init:
535	/*
536	 * Make sure we are in privileged mode, have address masking,
537         * using the ordinary globals and have enabled floating
538         * point.
539	 *
540	 * Again, typically PROM has left %pil at 13 or similar, and
541	 * (PSTATE_PRIV | PSTATE_PEF | PSTATE_IE) in %pstate.
542         */
543	wrpr    %g0, (PSTATE_PRIV|PSTATE_PEF|PSTATE_IE), %pstate
544	wr	%g0, 0, %fprs
545
546	set	sun4u_init, %g2
547	jmpl    %g2 + %g0, %g0
548	 nop
549
550	__REF
551sun4u_init:
552	BRANCH_IF_SUN4V(g1, sun4v_init)
553
554	/* Set ctx 0 */
555	mov		PRIMARY_CONTEXT, %g7
556	stxa		%g0, [%g7] ASI_DMMU
557	membar		#Sync
558
559	mov		SECONDARY_CONTEXT, %g7
560	stxa		%g0, [%g7] ASI_DMMU
561	membar	#Sync
562
563	ba,a,pt		%xcc, sun4u_continue
564
565sun4v_init:
566	/* Set ctx 0 */
567	mov		PRIMARY_CONTEXT, %g7
568	stxa		%g0, [%g7] ASI_MMU
569	membar		#Sync
570
571	mov		SECONDARY_CONTEXT, %g7
572	stxa		%g0, [%g7] ASI_MMU
573	membar		#Sync
574	ba,a,pt		%xcc, niagara_tlb_fixup
575
576sun4u_continue:
577	BRANCH_IF_ANY_CHEETAH(g1, g7, cheetah_tlb_fixup)
578
579	ba,a,pt	%xcc, spitfire_tlb_fixup
580
581niagara_tlb_fixup:
582	mov	3, %g2		/* Set TLB type to hypervisor. */
583	sethi	%hi(tlb_type), %g1
584	stw	%g2, [%g1 + %lo(tlb_type)]
585
586	/* Patch copy/clear ops.  */
587	sethi	%hi(sun4v_chip_type), %g1
588	lduw	[%g1 + %lo(sun4v_chip_type)], %g1
589	cmp	%g1, SUN4V_CHIP_NIAGARA1
590	be,pt	%xcc, niagara_patch
591	 cmp	%g1, SUN4V_CHIP_NIAGARA2
592	be,pt	%xcc, niagara2_patch
593	 nop
594	cmp	%g1, SUN4V_CHIP_NIAGARA3
595	be,pt	%xcc, niagara2_patch
596	 nop
597	cmp	%g1, SUN4V_CHIP_NIAGARA4
598	be,pt	%xcc, niagara4_patch
599	 nop
600	cmp	%g1, SUN4V_CHIP_NIAGARA5
601	be,pt	%xcc, niagara4_patch
602	 nop
603	cmp	%g1, SUN4V_CHIP_SPARC_M6
604	be,pt	%xcc, niagara4_patch
605	 nop
606	cmp	%g1, SUN4V_CHIP_SPARC_M7
607	be,pt	%xcc, sparc_m7_patch
608	 nop
609	cmp	%g1, SUN4V_CHIP_SPARC_M8
610	be,pt	%xcc, sparc_m7_patch
611	 nop
612	cmp	%g1, SUN4V_CHIP_SPARC_SN
613	be,pt	%xcc, niagara4_patch
614	 nop
615
616	call	generic_patch_copyops
617	 nop
618	call	generic_patch_bzero
619	 nop
620	call	generic_patch_pageops
621	 nop
622
623	ba,a,pt	%xcc, 80f
624	 nop
625
626sparc_m7_patch:
627	call	m7_patch_copyops
628	 nop
629	call	m7_patch_bzero
630	 nop
631	call	m7_patch_pageops
632	 nop
633
634	ba,a,pt	%xcc, 80f
635	 nop
636
637niagara4_patch:
638	call	niagara4_patch_copyops
639	 nop
640	call	niagara4_patch_bzero
641	 nop
642	call	niagara4_patch_pageops
643	 nop
644	call	niagara4_patch_fls
645	 nop
646
647	ba,a,pt	%xcc, 80f
648	 nop
649
650niagara2_patch:
651	call	niagara2_patch_copyops
652	 nop
653	call	niagara_patch_bzero
654	 nop
655	call	niagara_patch_pageops
656	 nop
657
658	ba,a,pt	%xcc, 80f
659	 nop
660
661niagara_patch:
662	call	niagara_patch_copyops
663	 nop
664	call	niagara_patch_bzero
665	 nop
666	call	niagara_patch_pageops
667	 nop
668
66980:
670	/* Patch TLB/cache ops.  */
671	call	hypervisor_patch_cachetlbops
672	 nop
673
674	ba,a,pt	%xcc, tlb_fixup_done
675
676cheetah_tlb_fixup:
677	mov	2, %g2		/* Set TLB type to cheetah+. */
678	BRANCH_IF_CHEETAH_PLUS_OR_FOLLOWON(g1,g7,1f)
679
680	mov	1, %g2		/* Set TLB type to cheetah. */
681
6821:	sethi	%hi(tlb_type), %g1
683	stw	%g2, [%g1 + %lo(tlb_type)]
684
685	/* Patch copy/page operations to cheetah optimized versions. */
686	call	cheetah_patch_copyops
687	 nop
688	call	cheetah_patch_copy_page
689	 nop
690	call	cheetah_patch_cachetlbops
691	 nop
692
693	ba,a,pt	%xcc, tlb_fixup_done
694
695spitfire_tlb_fixup:
696	/* Set TLB type to spitfire. */
697	mov	0, %g2
698	sethi	%hi(tlb_type), %g1
699	stw	%g2, [%g1 + %lo(tlb_type)]
700
701tlb_fixup_done:
702	sethi	%hi(init_thread_union), %g6
703	or	%g6, %lo(init_thread_union), %g6
704	ldx	[%g6 + TI_TASK], %g4
705
706	wr	%g0, ASI_P, %asi
707	mov	1, %g1
708	sllx	%g1, THREAD_SHIFT, %g1
709	sub	%g1, (STACKFRAME_SZ + STACK_BIAS + TRACEREG_SZ), %g1
710	add	%g6, %g1, %sp
711
712	/* Set per-cpu pointer initially to zero, this makes
713	 * the boot-cpu use the in-kernel-image per-cpu areas
714	 * before setup_per_cpu_area() is invoked.
715	 */
716	clr	%g5
717
718	wrpr	%g0, 0, %wstate
719	wrpr	%g0, 0x0, %tl
720
721	/* Clear the bss */
722	sethi	%hi(__bss_start), %o0
723	or	%o0, %lo(__bss_start), %o0
724	sethi	%hi(_end), %o1
725	or	%o1, %lo(_end), %o1
726	call	__bzero
727	 sub	%o1, %o0, %o1
728
729	call	prom_init
730	 mov	%l7, %o0			! OpenPROM cif handler
731
732	/* To create a one-register-window buffer between the kernel's
733	 * initial stack and the last stack frame we use from the firmware,
734	 * do the rest of the boot from a C helper function.
735	 */
736	call	start_early_boot
737	 nop
738	/* Not reached... */
739
740	.previous
741
742	/* This is meant to allow the sharing of this code between
743	 * boot processor invocation (via setup_tba() below) and
744	 * secondary processor startup (via trampoline.S).  The
745	 * former does use this code, the latter does not yet due
746	 * to some complexities.  That should be fixed up at some
747	 * point.
748	 *
749	 * There used to be enormous complexity wrt. transferring
750	 * over from the firmware's trap table to the Linux kernel's.
751	 * For example, there was a chicken & egg problem wrt. building
752	 * the OBP page tables, yet needing to be on the Linux kernel
753	 * trap table (to translate PAGE_OFFSET addresses) in order to
754	 * do that.
755	 *
756	 * We now handle OBP tlb misses differently, via linear lookups
757	 * into the prom_trans[] array.  So that specific problem no
758	 * longer exists.  Yet, unfortunately there are still some issues
759	 * preventing trampoline.S from using this code... ho hum.
760	 */
761	.globl	setup_trap_table
762setup_trap_table:
763	save	%sp, -192, %sp
764
765	/* Force interrupts to be disabled. */
766	rdpr	%pstate, %l0
767	andn	%l0, PSTATE_IE, %o1
768	wrpr	%o1, 0x0, %pstate
769	rdpr	%pil, %l1
770	wrpr	%g0, PIL_NORMAL_MAX, %pil
771
772	/* Make the firmware call to jump over to the Linux trap table.  */
773	sethi	%hi(is_sun4v), %o0
774	lduw	[%o0 + %lo(is_sun4v)], %o0
775	brz,pt	%o0, 1f
776	 nop
777
778	TRAP_LOAD_TRAP_BLOCK(%g2, %g3)
779	add	%g2, TRAP_PER_CPU_FAULT_INFO, %g2
780	stxa	%g2, [%g0] ASI_SCRATCHPAD
781
782	/* Compute physical address:
783	 *
784	 * paddr = kern_base + (mmfsa_vaddr - KERNBASE)
785	 */
786	sethi	%hi(KERNBASE), %g3
787	sub	%g2, %g3, %g2
788	sethi	%hi(kern_base), %g3
789	ldx	[%g3 + %lo(kern_base)], %g3
790	add	%g2, %g3, %o1
791	sethi	%hi(sparc64_ttable_tl0), %o0
792
793	set	prom_set_trap_table_name, %g2
794	stx	%g2, [%sp + 2047 + 128 + 0x00]
795	mov	2, %g2
796	stx	%g2, [%sp + 2047 + 128 + 0x08]
797	mov	0, %g2
798	stx	%g2, [%sp + 2047 + 128 + 0x10]
799	stx	%o0, [%sp + 2047 + 128 + 0x18]
800	stx	%o1, [%sp + 2047 + 128 + 0x20]
801	sethi	%hi(p1275buf), %g2
802	or	%g2, %lo(p1275buf), %g2
803	ldx	[%g2 + 0x08], %o1
804	call	%o1
805	 add	%sp, (2047 + 128), %o0
806
807	ba,a,pt	%xcc, 2f
808
8091:	sethi	%hi(sparc64_ttable_tl0), %o0
810	set	prom_set_trap_table_name, %g2
811	stx	%g2, [%sp + 2047 + 128 + 0x00]
812	mov	1, %g2
813	stx	%g2, [%sp + 2047 + 128 + 0x08]
814	mov	0, %g2
815	stx	%g2, [%sp + 2047 + 128 + 0x10]
816	stx	%o0, [%sp + 2047 + 128 + 0x18]
817	sethi	%hi(p1275buf), %g2
818	or	%g2, %lo(p1275buf), %g2
819	ldx	[%g2 + 0x08], %o1
820	call	%o1
821	 add	%sp, (2047 + 128), %o0
822
823	/* Start using proper page size encodings in ctx register.  */
8242:	sethi	%hi(sparc64_kern_pri_context), %g3
825	ldx	[%g3 + %lo(sparc64_kern_pri_context)], %g2
826
827	mov		PRIMARY_CONTEXT, %g1
828
829661:	stxa		%g2, [%g1] ASI_DMMU
830	.section	.sun4v_1insn_patch, "ax"
831	.word		661b
832	stxa		%g2, [%g1] ASI_MMU
833	.previous
834
835	membar	#Sync
836
837	BRANCH_IF_SUN4V(o2, 1f)
838
839	/* Kill PROM timer */
840	sethi	%hi(0x80000000), %o2
841	sllx	%o2, 32, %o2
842	wr	%o2, 0, %tick_cmpr
843
844	BRANCH_IF_ANY_CHEETAH(o2, o3, 1f)
845
846	ba,a,pt	%xcc, 2f
847
848	/* Disable STICK_INT interrupts. */
8491:
850	sethi	%hi(0x80000000), %o2
851	sllx	%o2, 32, %o2
852	wr	%o2, %asr25
853
8542:
855	wrpr	%g0, %g0, %wstate
856
857	call	init_irqwork_curcpu
858	 nop
859
860	/* Now we can restore interrupt state. */
861	wrpr	%l0, 0, %pstate
862	wrpr	%l1, 0x0, %pil
863
864	ret
865	 restore
866
867	.globl	setup_tba
868setup_tba:
869	save	%sp, -192, %sp
870
871	/* The boot processor is the only cpu which invokes this
872	 * routine, the other cpus set things up via trampoline.S.
873	 * So save the OBP trap table address here.
874	 */
875	rdpr	%tba, %g7
876	sethi	%hi(prom_tba), %o1
877	or	%o1, %lo(prom_tba), %o1
878	stx	%g7, [%o1]
879
880	call	setup_trap_table
881	 nop
882
883	ret
884	 restore
885sparc64_boot_end:
886
887#include "etrap_64.S"
888#include "rtrap_64.S"
889#include "winfixup.S"
890#include "fpu_traps.S"
891#include "ivec.S"
892#include "getsetcc.S"
893#include "utrap.S"
894#include "spiterrs.S"
895#include "cherrs.S"
896#include "misctrap.S"
897#include "syscalls.S"
898#include "helpers.S"
899#include "sun4v_tlb_miss.S"
900#include "sun4v_mcd.S"
901#include "sun4v_ivec.S"
902#include "ktlb.S"
903#include "tsb.S"
904
905/*
906 * The following skip makes sure the trap table in ttable.S is aligned
907 * on a 32K boundary as required by the v9 specs for TBA register.
908 *
909 * We align to a 32K boundary, then we have the 32K kernel TSB,
910 * the 64K kernel 4MB TSB, and then the 32K aligned trap table.
911 */
9121:
913	.skip	0x4000 + _start - 1b
914
915! 0x0000000000408000
916
917	.globl	swapper_tsb
918swapper_tsb:
919	.skip	(32 * 1024)
920
921	.globl	swapper_4m_tsb
922swapper_4m_tsb:
923	.skip	(64 * 1024)
924
925! 0x0000000000420000
926
927	/* Some care needs to be exercised if you try to move the
928	 * location of the trap table relative to other things.  For
929	 * one thing there are br* instructions in some of the
930	 * trap table entires which branch back to code in ktlb.S
931	 * Those instructions can only handle a signed 16-bit
932	 * displacement.
933	 *
934	 * There is a binutils bug (bugzilla #4558) which causes
935	 * the relocation overflow checks for such instructions to
936	 * not be done correctly.  So bintuils will not notice the
937	 * error and will instead write junk into the relocation and
938	 * you'll have an unbootable kernel.
939	 */
940#include "ttable_64.S"
941
942! 0x0000000000428000
943
944#include "hvcalls.S"
945#include "systbls_64.S"
946
947	.data
948	.align	8
949	.globl	prom_tba, tlb_type
950prom_tba:	.xword	0
951tlb_type:	.word	0	/* Must NOT end up in BSS */
952EXPORT_SYMBOL(tlb_type)
953	.section	".fixup",#alloc,#execinstr
954
955ENTRY(__retl_efault)
956	retl
957	 mov	-EFAULT, %o0
958ENDPROC(__retl_efault)
959
960ENTRY(__retl_o1)
961	retl
962	 mov	%o1, %o0
963ENDPROC(__retl_o1)
964
965ENTRY(__retl_o1_asi)
966	wr      %o5, 0x0, %asi
967	retl
968	 mov    %o1, %o0
969ENDPROC(__retl_o1_asi)
970