xref: /openbmc/linux/arch/powerpc/kernel/head_8xx.S (revision f2219745)
1/* SPDX-License-Identifier: GPL-2.0-or-later */
2/*
3 *  PowerPC version
4 *    Copyright (C) 1995-1996 Gary Thomas (gdt@linuxppc.org)
5 *  Rewritten by Cort Dougan (cort@cs.nmt.edu) for PReP
6 *    Copyright (C) 1996 Cort Dougan <cort@cs.nmt.edu>
7 *  Low-level exception handlers and MMU support
8 *  rewritten by Paul Mackerras.
9 *    Copyright (C) 1996 Paul Mackerras.
10 *  MPC8xx modifications by Dan Malek
11 *    Copyright (C) 1997 Dan Malek (dmalek@jlc.net).
12 *
13 *  This file contains low-level support and setup for PowerPC 8xx
14 *  embedded processors, including trap and interrupt dispatch.
15 */
16
17#include <linux/init.h>
18#include <linux/magic.h>
19#include <linux/pgtable.h>
20#include <linux/sizes.h>
21#include <asm/processor.h>
22#include <asm/page.h>
23#include <asm/mmu.h>
24#include <asm/cache.h>
25#include <asm/cputable.h>
26#include <asm/thread_info.h>
27#include <asm/ppc_asm.h>
28#include <asm/asm-offsets.h>
29#include <asm/ptrace.h>
30#include <asm/export.h>
31#include <asm/code-patching-asm.h>
32
33#include "head_32.h"
34
35.macro compare_to_kernel_boundary scratch, addr
36#if CONFIG_TASK_SIZE <= 0x80000000 && CONFIG_PAGE_OFFSET >= 0x80000000
37/* By simply checking Address >= 0x80000000, we know if its a kernel address */
38	not.	\scratch, \addr
39#else
40	rlwinm	\scratch, \addr, 16, 0xfff8
41	cmpli	cr0, \scratch, PAGE_OFFSET@h
42#endif
43.endm
44
45/*
46 * Value for the bits that have fixed value in RPN entries.
47 * Also used for tagging DAR for DTLBerror.
48 */
49#define RPN_PATTERN	0x00f0
50
51#define PAGE_SHIFT_512K		19
52#define PAGE_SHIFT_8M		23
53
54	__HEAD
55_ENTRY(_stext);
56_ENTRY(_start);
57
58/* MPC8xx
59 * This port was done on an MBX board with an 860.  Right now I only
60 * support an ELF compressed (zImage) boot from EPPC-Bug because the
61 * code there loads up some registers before calling us:
62 *   r3: ptr to board info data
63 *   r4: initrd_start or if no initrd then 0
64 *   r5: initrd_end - unused if r4 is 0
65 *   r6: Start of command line string
66 *   r7: End of command line string
67 *
68 * I decided to use conditional compilation instead of checking PVR and
69 * adding more processor specific branches around code I don't need.
70 * Since this is an embedded processor, I also appreciate any memory
71 * savings I can get.
72 *
73 * The MPC8xx does not have any BATs, but it supports large page sizes.
74 * We first initialize the MMU to support 8M byte pages, then load one
75 * entry into each of the instruction and data TLBs to map the first
76 * 8M 1:1.  I also mapped an additional I/O space 1:1 so we can get to
77 * the "internal" processor registers before MMU_init is called.
78 *
79 *	-- Dan
80 */
81	.globl	__start
82__start:
83	mr	r31,r3			/* save device tree ptr */
84
85	/* We have to turn on the MMU right away so we get cache modes
86	 * set correctly.
87	 */
88	bl	initial_mmu
89
90/* We now have the lower 8 Meg mapped into TLB entries, and the caches
91 * ready to work.
92 */
93
94turn_on_mmu:
95	mfmsr	r0
96	ori	r0,r0,MSR_DR|MSR_IR
97	mtspr	SPRN_SRR1,r0
98	lis	r0,start_here@h
99	ori	r0,r0,start_here@l
100	mtspr	SPRN_SRR0,r0
101	rfi				/* enables MMU */
102
103
104#ifdef CONFIG_PERF_EVENTS
105	.align	4
106
107	.globl	itlb_miss_counter
108itlb_miss_counter:
109	.space	4
110
111	.globl	dtlb_miss_counter
112dtlb_miss_counter:
113	.space	4
114
115	.globl	instruction_counter
116instruction_counter:
117	.space	4
118#endif
119
120/* System reset */
121	EXCEPTION(0x100, Reset, system_reset_exception, EXC_XFER_STD)
122
123/* Machine check */
124	. = 0x200
125MachineCheck:
126	EXCEPTION_PROLOG handle_dar_dsisr=1
127	save_dar_dsisr_on_stack r4, r5, r11
128	li	r6, RPN_PATTERN
129	mtspr	SPRN_DAR, r6	/* Tag DAR, to be used in DTLB Error */
130	addi r3,r1,STACK_FRAME_OVERHEAD
131	EXC_XFER_STD(0x200, machine_check_exception)
132
133/* External interrupt */
134	EXCEPTION(0x500, HardwareInterrupt, do_IRQ, EXC_XFER_LITE)
135
136/* Alignment exception */
137	. = 0x600
138Alignment:
139	EXCEPTION_PROLOG handle_dar_dsisr=1
140	save_dar_dsisr_on_stack r4, r5, r11
141	li	r6, RPN_PATTERN
142	mtspr	SPRN_DAR, r6	/* Tag DAR, to be used in DTLB Error */
143	addi	r3,r1,STACK_FRAME_OVERHEAD
144	b	.Lalignment_exception_ool
145
146/* Program check exception */
147	EXCEPTION(0x700, ProgramCheck, program_check_exception, EXC_XFER_STD)
148
149/* Decrementer */
150	EXCEPTION(0x900, Decrementer, timer_interrupt, EXC_XFER_LITE)
151
152	/* With VMAP_STACK there's not enough room for this at 0x600 */
153	. = 0xa00
154.Lalignment_exception_ool:
155	EXC_XFER_STD(0x600, alignment_exception)
156
157/* System call */
158	. = 0xc00
159SystemCall:
160	SYSCALL_ENTRY	0xc00
161
162/* Single step - not used on 601 */
163	EXCEPTION(0xd00, SingleStep, single_step_exception, EXC_XFER_STD)
164
165/* On the MPC8xx, this is a software emulation interrupt.  It occurs
166 * for all unimplemented and illegal instructions.
167 */
168	EXCEPTION(0x1000, SoftEmu, emulation_assist_interrupt, EXC_XFER_STD)
169
170	. = 0x1100
171/*
172 * For the MPC8xx, this is a software tablewalk to load the instruction
173 * TLB.  The task switch loads the M_TWB register with the pointer to the first
174 * level table.
175 * If we discover there is no second level table (value is zero) or if there
176 * is an invalid pte, we load that into the TLB, which causes another fault
177 * into the TLB Error interrupt where we can handle such problems.
178 * We have to use the MD_xxx registers for the tablewalk because the
179 * equivalent MI_xxx registers only perform the attribute functions.
180 */
181
182#ifdef CONFIG_8xx_CPU15
183#define INVALIDATE_ADJACENT_PAGES_CPU15(addr, tmp)	\
184	addi	tmp, addr, PAGE_SIZE;	\
185	tlbie	tmp;			\
186	addi	tmp, addr, -PAGE_SIZE;	\
187	tlbie	tmp
188#else
189#define INVALIDATE_ADJACENT_PAGES_CPU15(addr, tmp)
190#endif
191
192InstructionTLBMiss:
193	mtspr	SPRN_SPRG_SCRATCH2, r10
194	mtspr	SPRN_M_TW, r11
195
196	/* If we are faulting a kernel address, we have to use the
197	 * kernel page tables.
198	 */
199	mfspr	r10, SPRN_SRR0	/* Get effective address of fault */
200	INVALIDATE_ADJACENT_PAGES_CPU15(r10, r11)
201	mtspr	SPRN_MD_EPN, r10
202#ifdef CONFIG_MODULES
203	mfcr	r11
204	compare_to_kernel_boundary r10, r10
205#endif
206	mfspr	r10, SPRN_M_TWB	/* Get level 1 table */
207#ifdef CONFIG_MODULES
208	blt+	3f
209	rlwinm	r10, r10, 0, 20, 31
210	oris	r10, r10, (swapper_pg_dir - PAGE_OFFSET)@ha
2113:
212	mtcr	r11
213#endif
214	lwz	r11, (swapper_pg_dir-PAGE_OFFSET)@l(r10)	/* Get level 1 entry */
215	mtspr	SPRN_MD_TWC, r11
216	mfspr	r10, SPRN_MD_TWC
217	lwz	r10, 0(r10)	/* Get the pte */
218	rlwimi	r11, r10, 0, _PAGE_GUARDED | _PAGE_ACCESSED
219	rlwimi	r11, r10, 32 - 9, _PMD_PAGE_512K
220	mtspr	SPRN_MI_TWC, r11
221	/* The Linux PTE won't go exactly into the MMU TLB.
222	 * Software indicator bits 20 and 23 must be clear.
223	 * Software indicator bits 22, 24, 25, 26, and 27 must be
224	 * set.  All other Linux PTE bits control the behavior
225	 * of the MMU.
226	 */
227	rlwinm	r10, r10, 0, ~0x0f00	/* Clear bits 20-23 */
228	rlwimi	r10, r10, 4, 0x0400	/* Copy _PAGE_EXEC into bit 21 */
229	ori	r10, r10, RPN_PATTERN | 0x200 /* Set 22 and 24-27 */
230	mtspr	SPRN_MI_RPN, r10	/* Update TLB entry */
231
232	/* Restore registers */
2330:	mfspr	r10, SPRN_SPRG_SCRATCH2
234	mfspr	r11, SPRN_M_TW
235	rfi
236	patch_site	0b, patch__itlbmiss_exit_1
237
238#ifdef CONFIG_PERF_EVENTS
239	patch_site	0f, patch__itlbmiss_perf
2400:	lwz	r10, (itlb_miss_counter - PAGE_OFFSET)@l(0)
241	addi	r10, r10, 1
242	stw	r10, (itlb_miss_counter - PAGE_OFFSET)@l(0)
243	mfspr	r10, SPRN_SPRG_SCRATCH2
244	mfspr	r11, SPRN_M_TW
245	rfi
246#endif
247
248	. = 0x1200
249DataStoreTLBMiss:
250	mtspr	SPRN_SPRG_SCRATCH2, r10
251	mtspr	SPRN_M_TW, r11
252	mfcr	r11
253
254	/* If we are faulting a kernel address, we have to use the
255	 * kernel page tables.
256	 */
257	mfspr	r10, SPRN_MD_EPN
258	compare_to_kernel_boundary r10, r10
259	mfspr	r10, SPRN_M_TWB	/* Get level 1 table */
260	blt+	3f
261	rlwinm	r10, r10, 0, 20, 31
262	oris	r10, r10, (swapper_pg_dir - PAGE_OFFSET)@ha
2633:
264	mtcr	r11
265	lwz	r11, (swapper_pg_dir-PAGE_OFFSET)@l(r10)	/* Get level 1 entry */
266
267	mtspr	SPRN_MD_TWC, r11
268	mfspr	r10, SPRN_MD_TWC
269	lwz	r10, 0(r10)	/* Get the pte */
270
271	/* Insert Guarded and Accessed flags into the TWC from the Linux PTE.
272	 * It is bit 27 of both the Linux PTE and the TWC (at least
273	 * I got that right :-).  It will be better when we can put
274	 * this into the Linux pgd/pmd and load it in the operation
275	 * above.
276	 */
277	rlwimi	r11, r10, 0, _PAGE_GUARDED | _PAGE_ACCESSED
278	rlwimi	r11, r10, 32 - 9, _PMD_PAGE_512K
279	mtspr	SPRN_MD_TWC, r11
280
281	/* The Linux PTE won't go exactly into the MMU TLB.
282	 * Software indicator bits 24, 25, 26, and 27 must be
283	 * set.  All other Linux PTE bits control the behavior
284	 * of the MMU.
285	 */
286	li	r11, RPN_PATTERN
287	rlwimi	r10, r11, 0, 24, 27	/* Set 24-27 */
288	mtspr	SPRN_MD_RPN, r10	/* Update TLB entry */
289	mtspr	SPRN_DAR, r11		/* Tag DAR */
290
291	/* Restore registers */
292
2930:	mfspr	r10, SPRN_SPRG_SCRATCH2
294	mfspr	r11, SPRN_M_TW
295	rfi
296	patch_site	0b, patch__dtlbmiss_exit_1
297
298#ifdef CONFIG_PERF_EVENTS
299	patch_site	0f, patch__dtlbmiss_perf
3000:	lwz	r10, (dtlb_miss_counter - PAGE_OFFSET)@l(0)
301	addi	r10, r10, 1
302	stw	r10, (dtlb_miss_counter - PAGE_OFFSET)@l(0)
303	mfspr	r10, SPRN_SPRG_SCRATCH2
304	mfspr	r11, SPRN_M_TW
305	rfi
306#endif
307
308/* This is an instruction TLB error on the MPC8xx.  This could be due
309 * to many reasons, such as executing guarded memory or illegal instruction
310 * addresses.  There is nothing to do but handle a big time error fault.
311 */
312	. = 0x1300
313InstructionTLBError:
314	EXCEPTION_PROLOG
315	andis.	r5,r9,DSISR_SRR1_MATCH_32S@h /* Filter relevant SRR1 bits */
316	andis.	r10,r9,SRR1_ISI_NOPT@h
317	beq+	.Litlbie
318	tlbie	r12
319	/* 0x400 is InstructionAccess exception, needed by bad_page_fault() */
320.Litlbie:
321	stw	r12, _DAR(r11)
322	stw	r5, _DSISR(r11)
323	EXC_XFER_LITE(0x400, handle_page_fault)
324
325/* This is the data TLB error on the MPC8xx.  This could be due to
326 * many reasons, including a dirty update to a pte.  We bail out to
327 * a higher level function that can handle it.
328 */
329	. = 0x1400
330DataTLBError:
331	EXCEPTION_PROLOG_0 handle_dar_dsisr=1
332	mfspr	r11, SPRN_DAR
333	cmpwi	cr1, r11, RPN_PATTERN
334	beq-	cr1, FixupDAR	/* must be a buggy dcbX, icbi insn. */
335DARFixed:/* Return from dcbx instruction bug workaround */
336#ifdef CONFIG_VMAP_STACK
337	li	r11, RPN_PATTERN
338	mtspr	SPRN_DAR, r11	/* Tag DAR, to be used in DTLB Error */
339#endif
340	EXCEPTION_PROLOG_1
341	EXCEPTION_PROLOG_2 handle_dar_dsisr=1
342	get_and_save_dar_dsisr_on_stack r4, r5, r11
343	andis.	r10,r5,DSISR_NOHPTE@h
344	beq+	.Ldtlbie
345	tlbie	r4
346.Ldtlbie:
347#ifndef CONFIG_VMAP_STACK
348	li	r10,RPN_PATTERN
349	mtspr	SPRN_DAR,r10	/* Tag DAR, to be used in DTLB Error */
350#endif
351	/* 0x300 is DataAccess exception, needed by bad_page_fault() */
352	EXC_XFER_LITE(0x300, handle_page_fault)
353
354stack_overflow:
355	vmap_stack_overflow_exception
356
357/* On the MPC8xx, these next four traps are used for development
358 * support of breakpoints and such.  Someday I will get around to
359 * using them.
360 */
361do_databreakpoint:
362	EXCEPTION_PROLOG_1
363	EXCEPTION_PROLOG_2 handle_dar_dsisr=1
364	addi	r3,r1,STACK_FRAME_OVERHEAD
365	mfspr	r4,SPRN_BAR
366	stw	r4,_DAR(r11)
367#ifndef CONFIG_VMAP_STACK
368	mfspr	r5,SPRN_DSISR
369	stw	r5,_DSISR(r11)
370#endif
371	EXC_XFER_STD(0x1c00, do_break)
372
373	. = 0x1c00
374DataBreakpoint:
375	EXCEPTION_PROLOG_0 handle_dar_dsisr=1
376	mfspr	r11, SPRN_SRR0
377	cmplwi	cr1, r11, (.Ldtlbie - PAGE_OFFSET)@l
378	cmplwi	cr7, r11, (.Litlbie - PAGE_OFFSET)@l
379	cror	4*cr1+eq, 4*cr1+eq, 4*cr7+eq
380	bne	cr1, do_databreakpoint
381	mtcr	r10
382	mfspr	r10, SPRN_SPRG_SCRATCH0
383	mfspr	r11, SPRN_SPRG_SCRATCH1
384	rfi
385
386#ifdef CONFIG_PERF_EVENTS
387	. = 0x1d00
388InstructionBreakpoint:
389	mtspr	SPRN_SPRG_SCRATCH0, r10
390	lwz	r10, (instruction_counter - PAGE_OFFSET)@l(0)
391	addi	r10, r10, -1
392	stw	r10, (instruction_counter - PAGE_OFFSET)@l(0)
393	lis	r10, 0xffff
394	ori	r10, r10, 0x01
395	mtspr	SPRN_COUNTA, r10
396	mfspr	r10, SPRN_SPRG_SCRATCH0
397	rfi
398#else
399	EXCEPTION(0x1d00, Trap_1d, unknown_exception, EXC_XFER_STD)
400#endif
401	EXCEPTION(0x1e00, Trap_1e, unknown_exception, EXC_XFER_STD)
402	EXCEPTION(0x1f00, Trap_1f, unknown_exception, EXC_XFER_STD)
403
404	. = 0x2000
405
406/* This is the procedure to calculate the data EA for buggy dcbx,dcbi instructions
407 * by decoding the registers used by the dcbx instruction and adding them.
408 * DAR is set to the calculated address.
409 */
410FixupDAR:/* Entry point for dcbx workaround. */
411	mtspr	SPRN_M_TW, r10
412	/* fetch instruction from memory. */
413	mfspr	r10, SPRN_SRR0
414	mtspr	SPRN_MD_EPN, r10
415	rlwinm	r11, r10, 16, 0xfff8
416	cmpli	cr1, r11, PAGE_OFFSET@h
417	mfspr	r11, SPRN_M_TWB	/* Get level 1 table */
418	blt+	cr1, 3f
419
420	/* create physical page address from effective address */
421	tophys(r11, r10)
422	mfspr	r11, SPRN_M_TWB	/* Get level 1 table */
423	rlwinm	r11, r11, 0, 20, 31
424	oris	r11, r11, (swapper_pg_dir - PAGE_OFFSET)@ha
4253:
426	lwz	r11, (swapper_pg_dir-PAGE_OFFSET)@l(r11)	/* Get the level 1 entry */
427	mtspr	SPRN_MD_TWC, r11
428	mtcrf	0x01, r11
429	mfspr	r11, SPRN_MD_TWC
430	lwz	r11, 0(r11)	/* Get the pte */
431	bt	28,200f		/* bit 28 = Large page (8M) */
432	/* concat physical page address(r11) and page offset(r10) */
433	rlwimi	r11, r10, 0, 32 - PAGE_SHIFT, 31
434201:	lwz	r11,0(r11)
435/* Check if it really is a dcbx instruction. */
436/* dcbt and dcbtst does not generate DTLB Misses/Errors,
437 * no need to include them here */
438	xoris	r10, r11, 0x7c00	/* check if major OP code is 31 */
439	rlwinm	r10, r10, 0, 21, 5
440	cmpwi	cr1, r10, 2028	/* Is dcbz? */
441	beq+	cr1, 142f
442	cmpwi	cr1, r10, 940	/* Is dcbi? */
443	beq+	cr1, 142f
444	cmpwi	cr1, r10, 108	/* Is dcbst? */
445	beq+	cr1, 144f		/* Fix up store bit! */
446	cmpwi	cr1, r10, 172	/* Is dcbf? */
447	beq+	cr1, 142f
448	cmpwi	cr1, r10, 1964	/* Is icbi? */
449	beq+	cr1, 142f
450141:	mfspr	r10,SPRN_M_TW
451	b	DARFixed	/* Nope, go back to normal TLB processing */
452
453200:
454	/* concat physical page address(r11) and page offset(r10) */
455	rlwimi	r11, r10, 0, 32 - PAGE_SHIFT_8M, 31
456	b	201b
457
458144:	mfspr	r10, SPRN_DSISR
459	rlwinm	r10, r10,0,7,5	/* Clear store bit for buggy dcbst insn */
460	mtspr	SPRN_DSISR, r10
461142:	/* continue, it was a dcbx, dcbi instruction. */
462	mfctr	r10
463	mtdar	r10			/* save ctr reg in DAR */
464	rlwinm	r10, r11, 24, 24, 28	/* offset into jump table for reg RB */
465	addi	r10, r10, 150f@l	/* add start of table */
466	mtctr	r10			/* load ctr with jump address */
467	xor	r10, r10, r10		/* sum starts at zero */
468	bctr				/* jump into table */
469150:
470	add	r10, r10, r0	;b	151f
471	add	r10, r10, r1	;b	151f
472	add	r10, r10, r2	;b	151f
473	add	r10, r10, r3	;b	151f
474	add	r10, r10, r4	;b	151f
475	add	r10, r10, r5	;b	151f
476	add	r10, r10, r6	;b	151f
477	add	r10, r10, r7	;b	151f
478	add	r10, r10, r8	;b	151f
479	add	r10, r10, r9	;b	151f
480	mtctr	r11	;b	154f	/* r10 needs special handling */
481	mtctr	r11	;b	153f	/* r11 needs special handling */
482	add	r10, r10, r12	;b	151f
483	add	r10, r10, r13	;b	151f
484	add	r10, r10, r14	;b	151f
485	add	r10, r10, r15	;b	151f
486	add	r10, r10, r16	;b	151f
487	add	r10, r10, r17	;b	151f
488	add	r10, r10, r18	;b	151f
489	add	r10, r10, r19	;b	151f
490	add	r10, r10, r20	;b	151f
491	add	r10, r10, r21	;b	151f
492	add	r10, r10, r22	;b	151f
493	add	r10, r10, r23	;b	151f
494	add	r10, r10, r24	;b	151f
495	add	r10, r10, r25	;b	151f
496	add	r10, r10, r26	;b	151f
497	add	r10, r10, r27	;b	151f
498	add	r10, r10, r28	;b	151f
499	add	r10, r10, r29	;b	151f
500	add	r10, r10, r30	;b	151f
501	add	r10, r10, r31
502151:
503	rlwinm	r11,r11,19,24,28	/* offset into jump table for reg RA */
504	cmpwi	cr1, r11, 0
505	beq	cr1, 152f		/* if reg RA is zero, don't add it */
506	addi	r11, r11, 150b@l	/* add start of table */
507	mtctr	r11			/* load ctr with jump address */
508	rlwinm	r11,r11,0,16,10		/* make sure we don't execute this more than once */
509	bctr				/* jump into table */
510152:
511	mfdar	r11
512	mtctr	r11			/* restore ctr reg from DAR */
513#ifdef CONFIG_VMAP_STACK
514	mfspr	r11, SPRN_SPRG_THREAD
515	stw	r10, DAR(r11)
516	mfspr	r10, SPRN_DSISR
517	stw	r10, DSISR(r11)
518#else
519	mtdar	r10			/* save fault EA to DAR */
520#endif
521	mfspr	r10,SPRN_M_TW
522	b	DARFixed		/* Go back to normal TLB handling */
523
524	/* special handling for r10,r11 since these are modified already */
525153:	mfspr	r11, SPRN_SPRG_SCRATCH1	/* load r11 from SPRN_SPRG_SCRATCH1 */
526	add	r10, r10, r11	/* add it */
527	mfctr	r11		/* restore r11 */
528	b	151b
529154:	mfspr	r11, SPRN_SPRG_SCRATCH0	/* load r10 from SPRN_SPRG_SCRATCH0 */
530	add	r10, r10, r11	/* add it */
531	mfctr	r11		/* restore r11 */
532	b	151b
533
534/*
535 * This is where the main kernel code starts.
536 */
537start_here:
538	/* ptr to current */
539	lis	r2,init_task@h
540	ori	r2,r2,init_task@l
541
542	/* ptr to phys current thread */
543	tophys(r4,r2)
544	addi	r4,r4,THREAD	/* init task's THREAD */
545	mtspr	SPRN_SPRG_THREAD,r4
546
547	/* stack */
548	lis	r1,init_thread_union@ha
549	addi	r1,r1,init_thread_union@l
550	lis	r0, STACK_END_MAGIC@h
551	ori	r0, r0, STACK_END_MAGIC@l
552	stw	r0, 0(r1)
553	li	r0,0
554	stwu	r0,THREAD_SIZE-STACK_FRAME_OVERHEAD(r1)
555
556	lis	r6, swapper_pg_dir@ha
557	tophys(r6,r6)
558	mtspr	SPRN_M_TWB, r6
559
560	bl	early_init	/* We have to do this with MMU on */
561
562/*
563 * Decide what sort of machine this is and initialize the MMU.
564 */
565#ifdef CONFIG_KASAN
566	bl	kasan_early_init
567#endif
568	li	r3,0
569	mr	r4,r31
570	bl	machine_init
571	bl	MMU_init
572
573/*
574 * Go back to running unmapped so we can load up new values
575 * and change to using our exception vectors.
576 * On the 8xx, all we have to do is invalidate the TLB to clear
577 * the old 8M byte TLB mappings and load the page table base register.
578 */
579	/* The right way to do this would be to track it down through
580	 * init's THREAD like the context switch code does, but this is
581	 * easier......until someone changes init's static structures.
582	 */
583	lis	r4,2f@h
584	ori	r4,r4,2f@l
585	tophys(r4,r4)
586	li	r3,MSR_KERNEL & ~(MSR_IR|MSR_DR)
587	mtspr	SPRN_SRR0,r4
588	mtspr	SPRN_SRR1,r3
589	rfi
590/* Load up the kernel context */
5912:
592#ifdef CONFIG_PIN_TLB_IMMR
593	lis	r0, MD_TWAM@h
594	oris	r0, r0, 0x1f00
595	mtspr	SPRN_MD_CTR, r0
596	LOAD_REG_IMMEDIATE(r0, VIRT_IMMR_BASE | MD_EVALID)
597	tlbie	r0
598	mtspr	SPRN_MD_EPN, r0
599	LOAD_REG_IMMEDIATE(r0, MD_SVALID | MD_PS512K | MD_GUARDED)
600	mtspr	SPRN_MD_TWC, r0
601	mfspr   r0, SPRN_IMMR
602	rlwinm	r0, r0, 0, 0xfff80000
603	ori	r0, r0, 0xf0 | _PAGE_DIRTY | _PAGE_SPS | _PAGE_SH | \
604			_PAGE_NO_CACHE | _PAGE_PRESENT
605	mtspr	SPRN_MD_RPN, r0
606	lis	r0, (MD_TWAM | MD_RSV4I)@h
607	mtspr	SPRN_MD_CTR, r0
608#endif
609#if !defined(CONFIG_PIN_TLB_DATA) && !defined(CONFIG_PIN_TLB_IMMR)
610	lis	r0, MD_TWAM@h
611	mtspr	SPRN_MD_CTR, r0
612#endif
613	tlbia			/* Clear all TLB entries */
614	sync			/* wait for tlbia/tlbie to finish */
615
616	/* set up the PTE pointers for the Abatron bdiGDB.
617	*/
618	lis	r5, abatron_pteptrs@h
619	ori	r5, r5, abatron_pteptrs@l
620	stw	r5, 0xf0(0)	/* Must match your Abatron config file */
621	tophys(r5,r5)
622	lis	r6, swapper_pg_dir@h
623	ori	r6, r6, swapper_pg_dir@l
624	stw	r6, 0(r5)
625
626/* Now turn on the MMU for real! */
627	li	r4,MSR_KERNEL
628	lis	r3,start_kernel@h
629	ori	r3,r3,start_kernel@l
630	mtspr	SPRN_SRR0,r3
631	mtspr	SPRN_SRR1,r4
632	rfi			/* enable MMU and jump to start_kernel */
633
634/* Set up the initial MMU state so we can do the first level of
635 * kernel initialization.  This maps the first 8 MBytes of memory 1:1
636 * virtual to physical.  Also, set the cache mode since that is defined
637 * by TLB entries and perform any additional mapping (like of the IMMR).
638 * If configured to pin some TLBs, we pin the first 8 Mbytes of kernel,
639 * 24 Mbytes of data, and the 512k IMMR space.  Anything not covered by
640 * these mappings is mapped by page tables.
641 */
642initial_mmu:
643	li	r8, 0
644	mtspr	SPRN_MI_CTR, r8		/* remove PINNED ITLB entries */
645	lis	r10, MD_TWAM@h
646	mtspr	SPRN_MD_CTR, r10	/* remove PINNED DTLB entries */
647
648	tlbia			/* Invalidate all TLB entries */
649
650	lis	r8, MI_APG_INIT@h	/* Set protection modes */
651	ori	r8, r8, MI_APG_INIT@l
652	mtspr	SPRN_MI_AP, r8
653	lis	r8, MD_APG_INIT@h
654	ori	r8, r8, MD_APG_INIT@l
655	mtspr	SPRN_MD_AP, r8
656
657	/* Map the lower RAM (up to 32 Mbytes) into the ITLB and DTLB */
658	lis	r8, MI_RSV4I@h
659	ori	r8, r8, 0x1c00
660	oris	r12, r10, MD_RSV4I@h
661	ori	r12, r12, 0x1c00
662	li	r9, 4				/* up to 4 pages of 8M */
663	mtctr	r9
664	lis	r9, KERNELBASE@h		/* Create vaddr for TLB */
665	li	r10, MI_PS8MEG | _PMD_ACCESSED | MI_SVALID
666	li	r11, MI_BOOTINIT		/* Create RPN for address 0 */
6671:
668	mtspr	SPRN_MI_CTR, r8	/* Set instruction MMU control */
669	addi	r8, r8, 0x100
670	ori	r0, r9, MI_EVALID		/* Mark it valid */
671	mtspr	SPRN_MI_EPN, r0
672	mtspr	SPRN_MI_TWC, r10
673	mtspr	SPRN_MI_RPN, r11		/* Store TLB entry */
674	mtspr	SPRN_MD_CTR, r12
675	addi	r12, r12, 0x100
676	mtspr	SPRN_MD_EPN, r0
677	mtspr	SPRN_MD_TWC, r10
678	mtspr	SPRN_MD_RPN, r11
679	addis	r9, r9, 0x80
680	addis	r11, r11, 0x80
681
682	bdnz	1b
683
684	/* Since the cache is enabled according to the information we
685	 * just loaded into the TLB, invalidate and enable the caches here.
686	 * We should probably check/set other modes....later.
687	 */
688	lis	r8, IDC_INVALL@h
689	mtspr	SPRN_IC_CST, r8
690	mtspr	SPRN_DC_CST, r8
691	lis	r8, IDC_ENABLE@h
692	mtspr	SPRN_IC_CST, r8
693	mtspr	SPRN_DC_CST, r8
694	/* Disable debug mode entry on breakpoints */
695	mfspr	r8, SPRN_DER
696#ifdef CONFIG_PERF_EVENTS
697	rlwinm	r8, r8, 0, ~0xc
698#else
699	rlwinm	r8, r8, 0, ~0x8
700#endif
701	mtspr	SPRN_DER, r8
702	blr
703
704_GLOBAL(mmu_pin_tlb)
705	lis	r9, (1f - PAGE_OFFSET)@h
706	ori	r9, r9, (1f - PAGE_OFFSET)@l
707	mfmsr	r10
708	mflr	r11
709	li	r12, MSR_KERNEL & ~(MSR_IR | MSR_DR | MSR_RI)
710	rlwinm	r0, r10, 0, ~MSR_RI
711	rlwinm	r0, r0, 0, ~MSR_EE
712	mtmsr	r0
713	isync
714	.align	4
715	mtspr	SPRN_SRR0, r9
716	mtspr	SPRN_SRR1, r12
717	rfi
7181:
719	li	r5, 0
720	lis	r6, MD_TWAM@h
721	mtspr	SPRN_MI_CTR, r5
722	mtspr	SPRN_MD_CTR, r6
723	tlbia
724
725	LOAD_REG_IMMEDIATE(r5, 28 << 8)
726	LOAD_REG_IMMEDIATE(r6, PAGE_OFFSET)
727	LOAD_REG_IMMEDIATE(r7, MI_SVALID | MI_PS8MEG | _PMD_ACCESSED)
728	LOAD_REG_IMMEDIATE(r8, 0xf0 | _PAGE_RO | _PAGE_SPS | _PAGE_SH | _PAGE_PRESENT)
729	LOAD_REG_ADDR(r9, _sinittext)
730	li	r0, 4
731	mtctr	r0
732
7332:	ori	r0, r6, MI_EVALID
734	mtspr	SPRN_MI_CTR, r5
735	mtspr	SPRN_MI_EPN, r0
736	mtspr	SPRN_MI_TWC, r7
737	mtspr	SPRN_MI_RPN, r8
738	addi	r5, r5, 0x100
739	addis	r6, r6, SZ_8M@h
740	addis	r8, r8, SZ_8M@h
741	cmplw	r6, r9
742	bdnzt	lt, 2b
743	lis	r0, MI_RSV4I@h
744	mtspr	SPRN_MI_CTR, r0
745
746	LOAD_REG_IMMEDIATE(r5, 28 << 8 | MD_TWAM)
747#ifdef CONFIG_PIN_TLB_DATA
748	LOAD_REG_IMMEDIATE(r6, PAGE_OFFSET)
749	LOAD_REG_IMMEDIATE(r7, MI_SVALID | MI_PS8MEG | _PMD_ACCESSED)
750#ifdef CONFIG_PIN_TLB_IMMR
751	li	r0, 3
752#else
753	li	r0, 4
754#endif
755	mtctr	r0
756	cmpwi	r4, 0
757	beq	4f
758	LOAD_REG_IMMEDIATE(r8, 0xf0 | _PAGE_RO | _PAGE_SPS | _PAGE_SH | _PAGE_PRESENT)
759	LOAD_REG_ADDR(r9, _sinittext)
760
7612:	ori	r0, r6, MD_EVALID
762	mtspr	SPRN_MD_CTR, r5
763	mtspr	SPRN_MD_EPN, r0
764	mtspr	SPRN_MD_TWC, r7
765	mtspr	SPRN_MD_RPN, r8
766	addi	r5, r5, 0x100
767	addis	r6, r6, SZ_8M@h
768	addis	r8, r8, SZ_8M@h
769	cmplw	r6, r9
770	bdnzt	lt, 2b
771
7724:	LOAD_REG_IMMEDIATE(r8, 0xf0 | _PAGE_SPS | _PAGE_SH | _PAGE_PRESENT)
7732:	ori	r0, r6, MD_EVALID
774	mtspr	SPRN_MD_CTR, r5
775	mtspr	SPRN_MD_EPN, r0
776	mtspr	SPRN_MD_TWC, r7
777	mtspr	SPRN_MD_RPN, r8
778	addi	r5, r5, 0x100
779	addis	r6, r6, SZ_8M@h
780	addis	r8, r8, SZ_8M@h
781	cmplw	r6, r3
782	bdnzt	lt, 2b
783#endif
784#ifdef CONFIG_PIN_TLB_IMMR
785	LOAD_REG_IMMEDIATE(r0, VIRT_IMMR_BASE | MD_EVALID)
786	LOAD_REG_IMMEDIATE(r7, MD_SVALID | MD_PS512K | MD_GUARDED | _PMD_ACCESSED)
787	mfspr   r8, SPRN_IMMR
788	rlwinm	r8, r8, 0, 0xfff80000
789	ori	r8, r8, 0xf0 | _PAGE_DIRTY | _PAGE_SPS | _PAGE_SH | \
790			_PAGE_NO_CACHE | _PAGE_PRESENT
791	mtspr	SPRN_MD_CTR, r5
792	mtspr	SPRN_MD_EPN, r0
793	mtspr	SPRN_MD_TWC, r7
794	mtspr	SPRN_MD_RPN, r8
795#endif
796#if defined(CONFIG_PIN_TLB_IMMR) || defined(CONFIG_PIN_TLB_DATA)
797	lis	r0, (MD_RSV4I | MD_TWAM)@h
798	mtspr	SPRN_MI_CTR, r0
799#endif
800	mtspr	SPRN_SRR1, r10
801	mtspr	SPRN_SRR0, r11
802	rfi
803
804/*
805 * We put a few things here that have to be page-aligned.
806 * This stuff goes at the beginning of the data segment,
807 * which is page-aligned.
808 */
809	.data
810	.globl	sdata
811sdata:
812	.globl	empty_zero_page
813	.align	PAGE_SHIFT
814empty_zero_page:
815	.space	PAGE_SIZE
816EXPORT_SYMBOL(empty_zero_page)
817
818	.globl	swapper_pg_dir
819swapper_pg_dir:
820	.space	PGD_TABLE_SIZE
821
822/* Room for two PTE table poiners, usually the kernel and current user
823 * pointer to their respective root page table (pgdir).
824 */
825	.globl	abatron_pteptrs
826abatron_pteptrs:
827	.space	8
828