xref: /openbmc/linux/arch/sparc/kernel/tsb.S (revision f7d84fa7)
1/* tsb.S: Sparc64 TSB table handling.
2 *
3 * Copyright (C) 2006 David S. Miller <davem@davemloft.net>
4 */
5
6
7#include <asm/tsb.h>
8#include <asm/hypervisor.h>
9#include <asm/page.h>
10#include <asm/cpudata.h>
11#include <asm/mmu.h>
12
13	.text
14	.align	32
15
16	/* Invoked from TLB miss handler, we are in the
17	 * MMU global registers and they are setup like
18	 * this:
19	 *
20	 * %g1: TSB entry pointer
21	 * %g2:	available temporary
22	 * %g3:	FAULT_CODE_{D,I}TLB
23	 * %g4:	available temporary
24	 * %g5:	available temporary
25	 * %g6: TAG TARGET
26	 * %g7:	available temporary, will be loaded by us with
27	 *      the physical address base of the linux page
28	 *      tables for the current address space
29	 */
30tsb_miss_dtlb:
31	mov		TLB_TAG_ACCESS, %g4
32	ldxa		[%g4] ASI_DMMU, %g4
33	srlx		%g4, PAGE_SHIFT, %g4
34	ba,pt		%xcc, tsb_miss_page_table_walk
35	 sllx		%g4, PAGE_SHIFT, %g4
36
37tsb_miss_itlb:
38	mov		TLB_TAG_ACCESS, %g4
39	ldxa		[%g4] ASI_IMMU, %g4
40	srlx		%g4, PAGE_SHIFT, %g4
41	ba,pt		%xcc, tsb_miss_page_table_walk
42	 sllx		%g4, PAGE_SHIFT, %g4
43
44	/* At this point we have:
45	 * %g1 --	PAGE_SIZE TSB entry address
46	 * %g3 --	FAULT_CODE_{D,I}TLB
47	 * %g4 --	missing virtual address
48	 * %g6 --	TAG TARGET (vaddr >> 22)
49	 */
50tsb_miss_page_table_walk:
51	TRAP_LOAD_TRAP_BLOCK(%g7, %g5)
52
53	/* Before committing to a full page table walk,
54	 * check the huge page TSB.
55	 */
56#if defined(CONFIG_HUGETLB_PAGE) || defined(CONFIG_TRANSPARENT_HUGEPAGE)
57
58661:	ldx		[%g7 + TRAP_PER_CPU_TSB_HUGE], %g5
59	nop
60	.section	.sun4v_2insn_patch, "ax"
61	.word		661b
62	mov		SCRATCHPAD_UTSBREG2, %g5
63	ldxa		[%g5] ASI_SCRATCHPAD, %g5
64	.previous
65
66	cmp		%g5, -1
67	be,pt		%xcc, 80f
68	 nop
69
70	/* We need an aligned pair of registers containing 2 values
71	 * which can be easily rematerialized.  %g6 and %g7 foot the
72	 * bill just nicely.  We'll save %g6 away into %g2 for the
73	 * huge page TSB TAG comparison.
74	 *
75	 * Perform a huge page TSB lookup.
76	 */
77	mov		%g6, %g2
78	and		%g5, 0x7, %g6
79	mov		512, %g7
80	andn		%g5, 0x7, %g5
81	sllx		%g7, %g6, %g7
82	srlx		%g4, REAL_HPAGE_SHIFT, %g6
83	sub		%g7, 1, %g7
84	and		%g6, %g7, %g6
85	sllx		%g6, 4, %g6
86	add		%g5, %g6, %g5
87
88	TSB_LOAD_QUAD(%g5, %g6)
89	cmp		%g6, %g2
90	be,a,pt		%xcc, tsb_tlb_reload
91	 mov		%g7, %g5
92
93	/* No match, remember the huge page TSB entry address,
94	 * and restore %g6 and %g7.
95	 */
96	TRAP_LOAD_TRAP_BLOCK(%g7, %g6)
97	srlx		%g4, 22, %g6
9880:	stx		%g5, [%g7 + TRAP_PER_CPU_TSB_HUGE_TEMP]
99
100#endif
101
102	ldx		[%g7 + TRAP_PER_CPU_PGD_PADDR], %g7
103
104	/* At this point we have:
105	 * %g1 --	TSB entry address
106	 * %g3 --	FAULT_CODE_{D,I}TLB
107	 * %g4 --	missing virtual address
108	 * %g6 --	TAG TARGET (vaddr >> 22)
109	 * %g7 --	page table physical address
110	 *
111	 * We know that both the base PAGE_SIZE TSB and the HPAGE_SIZE
112	 * TSB both lack a matching entry.
113	 */
114tsb_miss_page_table_walk_sun4v_fastpath:
115	USER_PGTABLE_WALK_TL1(%g4, %g7, %g5, %g2, tsb_do_fault)
116
117	/* Valid PTE is now in %g5.  */
118
119#if defined(CONFIG_HUGETLB_PAGE) || defined(CONFIG_TRANSPARENT_HUGEPAGE)
120	sethi		%uhi(_PAGE_PMD_HUGE), %g7
121	sllx		%g7, 32, %g7
122
123	andcc		%g5, %g7, %g0
124	be,pt		%xcc, 60f
125	 nop
126
127	/* It is a huge page, use huge page TSB entry address we
128	 * calculated above.  If the huge page TSB has not been
129	 * allocated, setup a trap stack and call hugetlb_setup()
130	 * to do so, then return from the trap to replay the TLB
131	 * miss.
132	 *
133	 * This is necessary to handle the case of transparent huge
134	 * pages where we don't really have a non-atomic context
135	 * in which to allocate the hugepage TSB hash table.  When
136	 * the 'mm' faults in the hugepage for the first time, we
137	 * thus handle it here.  This also makes sure that we can
138	 * allocate the TSB hash table on the correct NUMA node.
139	 */
140	TRAP_LOAD_TRAP_BLOCK(%g7, %g2)
141	ldx		[%g7 + TRAP_PER_CPU_TSB_HUGE_TEMP], %g1
142	cmp		%g1, -1
143	bne,pt		%xcc, 60f
144	 nop
145
146661:	rdpr		%pstate, %g5
147	wrpr		%g5, PSTATE_AG | PSTATE_MG, %pstate
148	.section	.sun4v_2insn_patch, "ax"
149	.word		661b
150	SET_GL(1)
151	nop
152	.previous
153
154	rdpr	%tl, %g7
155	cmp	%g7, 1
156	bne,pn	%xcc, winfix_trampoline
157	 mov	%g3, %g4
158	ba,pt	%xcc, etrap
159	 rd	%pc, %g7
160	call	hugetlb_setup
161	 add	%sp, PTREGS_OFF, %o0
162	ba,pt	%xcc, rtrap
163	 nop
164
16560:
166#endif
167
168	/* At this point we have:
169	 * %g1 --	TSB entry address
170	 * %g3 --	FAULT_CODE_{D,I}TLB
171	 * %g5 --	valid PTE
172	 * %g6 --	TAG TARGET (vaddr >> 22)
173	 */
174tsb_reload:
175	TSB_LOCK_TAG(%g1, %g2, %g7)
176	TSB_WRITE(%g1, %g5, %g6)
177
178	/* Finally, load TLB and return from trap.  */
179tsb_tlb_reload:
180	cmp		%g3, FAULT_CODE_DTLB
181	bne,pn		%xcc, tsb_itlb_load
182	 nop
183
184tsb_dtlb_load:
185
186661:	stxa		%g5, [%g0] ASI_DTLB_DATA_IN
187	retry
188	.section	.sun4v_2insn_patch, "ax"
189	.word		661b
190	nop
191	nop
192	.previous
193
194	/* For sun4v the ASI_DTLB_DATA_IN store and the retry
195	 * instruction get nop'd out and we get here to branch
196	 * to the sun4v tlb load code.  The registers are setup
197	 * as follows:
198	 *
199	 * %g4: vaddr
200	 * %g5: PTE
201	 * %g6:	TAG
202	 *
203	 * The sun4v TLB load wants the PTE in %g3 so we fix that
204	 * up here.
205	 */
206	ba,pt		%xcc, sun4v_dtlb_load
207	 mov		%g5, %g3
208
209tsb_itlb_load:
210	/* Executable bit must be set.  */
211661:	sethi		%hi(_PAGE_EXEC_4U), %g4
212	andcc		%g5, %g4, %g0
213	.section	.sun4v_2insn_patch, "ax"
214	.word		661b
215	andcc		%g5, _PAGE_EXEC_4V, %g0
216	nop
217	.previous
218
219	be,pn		%xcc, tsb_do_fault
220	 nop
221
222661:	stxa		%g5, [%g0] ASI_ITLB_DATA_IN
223	retry
224	.section	.sun4v_2insn_patch, "ax"
225	.word		661b
226	nop
227	nop
228	.previous
229
230	/* For sun4v the ASI_ITLB_DATA_IN store and the retry
231	 * instruction get nop'd out and we get here to branch
232	 * to the sun4v tlb load code.  The registers are setup
233	 * as follows:
234	 *
235	 * %g4: vaddr
236	 * %g5: PTE
237	 * %g6:	TAG
238	 *
239	 * The sun4v TLB load wants the PTE in %g3 so we fix that
240	 * up here.
241	 */
242	ba,pt		%xcc, sun4v_itlb_load
243	 mov		%g5, %g3
244
245	/* No valid entry in the page tables, do full fault
246	 * processing.
247	 */
248
249	.globl		tsb_do_fault
250tsb_do_fault:
251	cmp		%g3, FAULT_CODE_DTLB
252
253661:	rdpr		%pstate, %g5
254	wrpr		%g5, PSTATE_AG | PSTATE_MG, %pstate
255	.section	.sun4v_2insn_patch, "ax"
256	.word		661b
257	SET_GL(1)
258	ldxa		[%g0] ASI_SCRATCHPAD, %g4
259	.previous
260
261	bne,pn		%xcc, tsb_do_itlb_fault
262	 nop
263
264tsb_do_dtlb_fault:
265	rdpr	%tl, %g3
266	cmp	%g3, 1
267
268661:	mov	TLB_TAG_ACCESS, %g4
269	ldxa	[%g4] ASI_DMMU, %g5
270	.section .sun4v_2insn_patch, "ax"
271	.word	661b
272	ldx	[%g4 + HV_FAULT_D_ADDR_OFFSET], %g5
273	nop
274	.previous
275
276	/* Clear context ID bits.  */
277	srlx		%g5, PAGE_SHIFT, %g5
278	sllx		%g5, PAGE_SHIFT, %g5
279
280	be,pt	%xcc, sparc64_realfault_common
281	 mov	FAULT_CODE_DTLB, %g4
282	ba,pt	%xcc, winfix_trampoline
283	 nop
284
285tsb_do_itlb_fault:
286	rdpr	%tpc, %g5
287	ba,pt	%xcc, sparc64_realfault_common
288	 mov	FAULT_CODE_ITLB, %g4
289
290	.globl	sparc64_realfault_common
291sparc64_realfault_common:
292	/* fault code in %g4, fault address in %g5, etrap will
293	 * preserve these two values in %l4 and %l5 respectively
294	 */
295	ba,pt	%xcc, etrap			! Save trap state
2961:	 rd	%pc, %g7			! ...
297	stb	%l4, [%g6 + TI_FAULT_CODE]	! Save fault code
298	stx	%l5, [%g6 + TI_FAULT_ADDR]	! Save fault address
299	call	do_sparc64_fault		! Call fault handler
300	 add	%sp, PTREGS_OFF, %o0		! Compute pt_regs arg
301	ba,pt	%xcc, rtrap			! Restore cpu state
302	 nop					! Delay slot (fill me)
303
304winfix_trampoline:
305	rdpr	%tpc, %g3			! Prepare winfixup TNPC
306	or	%g3, 0x7c, %g3			! Compute branch offset
307	wrpr	%g3, %tnpc			! Write it into TNPC
308	done					! Trap return
309
310	/* Insert an entry into the TSB.
311	 *
312	 * %o0: TSB entry pointer (virt or phys address)
313	 * %o1: tag
314	 * %o2:	pte
315	 */
316	.align	32
317	.globl	__tsb_insert
318__tsb_insert:
319	rdpr	%pstate, %o5
320	wrpr	%o5, PSTATE_IE, %pstate
321	TSB_LOCK_TAG(%o0, %g2, %g3)
322	TSB_WRITE(%o0, %o2, %o1)
323	wrpr	%o5, %pstate
324	retl
325	 nop
326	.size	__tsb_insert, .-__tsb_insert
327
328	/* Flush the given TSB entry if it has the matching
329	 * tag.
330	 *
331	 * %o0: TSB entry pointer (virt or phys address)
332	 * %o1:	tag
333	 */
334	.align	32
335	.globl	tsb_flush
336	.type	tsb_flush,#function
337tsb_flush:
338	sethi	%hi(TSB_TAG_LOCK_HIGH), %g2
3391:	TSB_LOAD_TAG(%o0, %g1)
340	srlx	%g1, 32, %o3
341	andcc	%o3, %g2, %g0
342	bne,pn	%icc, 1b
343	 nop
344	cmp	%g1, %o1
345	mov	1, %o3
346	bne,pt	%xcc, 2f
347	 sllx	%o3, TSB_TAG_INVALID_BIT, %o3
348	TSB_CAS_TAG(%o0, %g1, %o3)
349	cmp	%g1, %o3
350	bne,pn	%xcc, 1b
351	 nop
3522:	retl
353	 nop
354	.size	tsb_flush, .-tsb_flush
355
356	/* Reload MMU related context switch state at
357	 * schedule() time.
358	 *
359	 * %o0: page table physical address
360	 * %o1:	TSB base config pointer
361	 * %o2:	TSB huge config pointer, or NULL if none
362	 * %o3:	Hypervisor TSB descriptor physical address
363	 *
364	 * We have to run this whole thing with interrupts
365	 * disabled so that the current cpu doesn't change
366	 * due to preemption.
367	 */
368	.align	32
369	.globl	__tsb_context_switch
370	.type	__tsb_context_switch,#function
371__tsb_context_switch:
372	rdpr	%pstate, %g1
373	wrpr	%g1, PSTATE_IE, %pstate
374
375	TRAP_LOAD_TRAP_BLOCK(%g2, %g3)
376
377	stx	%o0, [%g2 + TRAP_PER_CPU_PGD_PADDR]
378
379	ldx	[%o1 + TSB_CONFIG_REG_VAL], %o0
380	brz,pt	%o2, 1f
381	 mov	-1, %g3
382
383	ldx	[%o2 + TSB_CONFIG_REG_VAL], %g3
384
3851:	stx	%g3, [%g2 + TRAP_PER_CPU_TSB_HUGE]
386
387	sethi	%hi(tlb_type), %g2
388	lduw	[%g2 + %lo(tlb_type)], %g2
389	cmp	%g2, 3
390	bne,pt	%icc, 50f
391	 nop
392
393	/* Hypervisor TSB switch. */
394	mov	SCRATCHPAD_UTSBREG1, %o5
395	stxa	%o0, [%o5] ASI_SCRATCHPAD
396	mov	SCRATCHPAD_UTSBREG2, %o5
397	stxa	%g3, [%o5] ASI_SCRATCHPAD
398
399	mov	2, %o0
400	cmp	%g3, -1
401	move	%xcc, 1, %o0
402
403	mov	HV_FAST_MMU_TSB_CTXNON0, %o5
404	mov	%o3, %o1
405	ta	HV_FAST_TRAP
406
407	/* Finish up.  */
408	ba,pt	%xcc, 9f
409	 nop
410
411	/* SUN4U TSB switch.  */
41250:	mov	TSB_REG, %o5
413	stxa	%o0, [%o5] ASI_DMMU
414	membar	#Sync
415	stxa	%o0, [%o5] ASI_IMMU
416	membar	#Sync
417
4182:	ldx	[%o1 + TSB_CONFIG_MAP_VADDR], %o4
419	brz	%o4, 9f
420	 ldx	[%o1 + TSB_CONFIG_MAP_PTE], %o5
421
422	sethi	%hi(sparc64_highest_unlocked_tlb_ent), %g2
423	mov	TLB_TAG_ACCESS, %g3
424	lduw	[%g2 + %lo(sparc64_highest_unlocked_tlb_ent)], %g2
425	stxa	%o4, [%g3] ASI_DMMU
426	membar	#Sync
427	sllx	%g2, 3, %g2
428	stxa	%o5, [%g2] ASI_DTLB_DATA_ACCESS
429	membar	#Sync
430
431	brz,pt	%o2, 9f
432	 nop
433
434	ldx	[%o2 + TSB_CONFIG_MAP_VADDR], %o4
435	ldx	[%o2 + TSB_CONFIG_MAP_PTE], %o5
436	mov	TLB_TAG_ACCESS, %g3
437	stxa	%o4, [%g3] ASI_DMMU
438	membar	#Sync
439	sub	%g2, (1 << 3), %g2
440	stxa	%o5, [%g2] ASI_DTLB_DATA_ACCESS
441	membar	#Sync
442
4439:
444	wrpr	%g1, %pstate
445
446	retl
447	 nop
448	.size	__tsb_context_switch, .-__tsb_context_switch
449
450#define TSB_PASS_BITS	((1 << TSB_TAG_LOCK_BIT) | \
451			 (1 << TSB_TAG_INVALID_BIT))
452
453	.align	32
454	.globl	copy_tsb
455	.type	copy_tsb,#function
456copy_tsb:		/* %o0=old_tsb_base, %o1=old_tsb_size
457			 * %o2=new_tsb_base, %o3=new_tsb_size
458			 * %o4=page_size_shift
459			 */
460	sethi		%uhi(TSB_PASS_BITS), %g7
461	srlx		%o3, 4, %o3
462	add		%o0, %o1, %o1	/* end of old tsb */
463	sllx		%g7, 32, %g7
464	sub		%o3, 1, %o3	/* %o3 == new tsb hash mask */
465
466	mov		%o4, %g1	/* page_size_shift */
467
468661:	prefetcha	[%o0] ASI_N, #one_read
469	.section	.tsb_phys_patch, "ax"
470	.word		661b
471	prefetcha	[%o0] ASI_PHYS_USE_EC, #one_read
472	.previous
473
47490:	andcc		%o0, (64 - 1), %g0
475	bne		1f
476	 add		%o0, 64, %o5
477
478661:	prefetcha	[%o5] ASI_N, #one_read
479	.section	.tsb_phys_patch, "ax"
480	.word		661b
481	prefetcha	[%o5] ASI_PHYS_USE_EC, #one_read
482	.previous
483
4841:	TSB_LOAD_QUAD(%o0, %g2)		/* %g2/%g3 == TSB entry */
485	andcc		%g2, %g7, %g0	/* LOCK or INVALID set? */
486	bne,pn		%xcc, 80f	/* Skip it */
487	 sllx		%g2, 22, %o4	/* TAG --> VADDR */
488
489	/* This can definitely be computed faster... */
490	srlx		%o0, 4, %o5	/* Build index */
491	and		%o5, 511, %o5	/* Mask index */
492	sllx		%o5, %g1, %o5	/* Put into vaddr position */
493	or		%o4, %o5, %o4	/* Full VADDR. */
494	srlx		%o4, %g1, %o4	/* Shift down to create index */
495	and		%o4, %o3, %o4	/* Mask with new_tsb_nents-1 */
496	sllx		%o4, 4, %o4	/* Shift back up into tsb ent offset */
497	TSB_STORE(%o2 + %o4, %g2)	/* Store TAG */
498	add		%o4, 0x8, %o4	/* Advance to TTE */
499	TSB_STORE(%o2 + %o4, %g3)	/* Store TTE */
500
50180:	add		%o0, 16, %o0
502	cmp		%o0, %o1
503	bne,pt		%xcc, 90b
504	 nop
505
506	retl
507	 nop
508	.size		copy_tsb, .-copy_tsb
509
510	/* Set the invalid bit in all TSB entries.  */
511	.align		32
512	.globl		tsb_init
513	.type		tsb_init,#function
514tsb_init:		/* %o0 = TSB vaddr, %o1 = size in bytes */
515	prefetch	[%o0 + 0x000], #n_writes
516	mov		1, %g1
517	prefetch	[%o0 + 0x040], #n_writes
518	sllx		%g1, TSB_TAG_INVALID_BIT, %g1
519	prefetch	[%o0 + 0x080], #n_writes
5201:	prefetch	[%o0 + 0x0c0], #n_writes
521	stx		%g1, [%o0 + 0x00]
522	stx		%g1, [%o0 + 0x10]
523	stx		%g1, [%o0 + 0x20]
524	stx		%g1, [%o0 + 0x30]
525	prefetch	[%o0 + 0x100], #n_writes
526	stx		%g1, [%o0 + 0x40]
527	stx		%g1, [%o0 + 0x50]
528	stx		%g1, [%o0 + 0x60]
529	stx		%g1, [%o0 + 0x70]
530	prefetch	[%o0 + 0x140], #n_writes
531	stx		%g1, [%o0 + 0x80]
532	stx		%g1, [%o0 + 0x90]
533	stx		%g1, [%o0 + 0xa0]
534	stx		%g1, [%o0 + 0xb0]
535	prefetch	[%o0 + 0x180], #n_writes
536	stx		%g1, [%o0 + 0xc0]
537	stx		%g1, [%o0 + 0xd0]
538	stx		%g1, [%o0 + 0xe0]
539	stx		%g1, [%o0 + 0xf0]
540	subcc		%o1, 0x100, %o1
541	bne,pt		%xcc, 1b
542	 add		%o0, 0x100, %o0
543	retl
544	 nop
545	nop
546	nop
547	.size		tsb_init, .-tsb_init
548
549	.globl		NGtsb_init
550	.type		NGtsb_init,#function
551NGtsb_init:
552	rd		%asi, %g2
553	mov		1, %g1
554	wr		%g0, ASI_BLK_INIT_QUAD_LDD_P, %asi
555	sllx		%g1, TSB_TAG_INVALID_BIT, %g1
5561:	stxa		%g1, [%o0 + 0x00] %asi
557	stxa		%g1, [%o0 + 0x10] %asi
558	stxa		%g1, [%o0 + 0x20] %asi
559	stxa		%g1, [%o0 + 0x30] %asi
560	stxa		%g1, [%o0 + 0x40] %asi
561	stxa		%g1, [%o0 + 0x50] %asi
562	stxa		%g1, [%o0 + 0x60] %asi
563	stxa		%g1, [%o0 + 0x70] %asi
564	stxa		%g1, [%o0 + 0x80] %asi
565	stxa		%g1, [%o0 + 0x90] %asi
566	stxa		%g1, [%o0 + 0xa0] %asi
567	stxa		%g1, [%o0 + 0xb0] %asi
568	stxa		%g1, [%o0 + 0xc0] %asi
569	stxa		%g1, [%o0 + 0xd0] %asi
570	stxa		%g1, [%o0 + 0xe0] %asi
571	stxa		%g1, [%o0 + 0xf0] %asi
572	subcc		%o1, 0x100, %o1
573	bne,pt		%xcc, 1b
574	 add		%o0, 0x100, %o0
575	membar		#Sync
576	retl
577	 wr		%g2, 0x0, %asi
578	.size		NGtsb_init, .-NGtsb_init
579