Loading...
1/*
2 * r2300.c: R2000 and R3000 specific mmu/cache code.
3 *
4 * Copyright (C) 1996 David S. Miller (davem@davemloft.net)
5 *
6 * with a lot of changes to make this thing work for R3000s
7 * Tx39XX R4k style caches added. HK
8 * Copyright (C) 1998, 1999, 2000 Harald Koerfgen
9 * Copyright (C) 1998 Gleb Raiko & Vladimir Roganov
10 * Copyright (C) 2002 Ralf Baechle
11 * Copyright (C) 2002 Maciej W. Rozycki
12 */
13#include <linux/init.h>
14#include <linux/kernel.h>
15#include <linux/sched.h>
16#include <linux/smp.h>
17#include <linux/mm.h>
18
19#include <asm/page.h>
20#include <asm/pgtable.h>
21#include <asm/mmu_context.h>
22#include <asm/system.h>
23#include <asm/isadep.h>
24#include <asm/io.h>
25#include <asm/bootinfo.h>
26#include <asm/cpu.h>
27
28#undef DEBUG_TLB
29
30extern void build_tlb_refill_handler(void);
31
32/* CP0 hazard avoidance. */
33#define BARRIER \
34 __asm__ __volatile__( \
35 ".set push\n\t" \
36 ".set noreorder\n\t" \
37 "nop\n\t" \
38 ".set pop\n\t")
39
40int r3k_have_wired_reg; /* should be in cpu_data? */
41
42/* TLB operations. */
43void local_flush_tlb_all(void)
44{
45 unsigned long flags;
46 unsigned long old_ctx;
47 int entry;
48
49#ifdef DEBUG_TLB
50 printk("[tlball]");
51#endif
52
53 local_irq_save(flags);
54 old_ctx = read_c0_entryhi() & ASID_MASK;
55 write_c0_entrylo0(0);
56 entry = r3k_have_wired_reg ? read_c0_wired() : 8;
57 for (; entry < current_cpu_data.tlbsize; entry++) {
58 write_c0_index(entry << 8);
59 write_c0_entryhi((entry | 0x80000) << 12);
60 BARRIER;
61 tlb_write_indexed();
62 }
63 write_c0_entryhi(old_ctx);
64 local_irq_restore(flags);
65}
66
67void local_flush_tlb_mm(struct mm_struct *mm)
68{
69 int cpu = smp_processor_id();
70
71 if (cpu_context(cpu, mm) != 0) {
72#ifdef DEBUG_TLB
73 printk("[tlbmm<%lu>]", (unsigned long)cpu_context(cpu, mm));
74#endif
75 drop_mmu_context(mm, cpu);
76 }
77}
78
79void local_flush_tlb_range(struct vm_area_struct *vma, unsigned long start,
80 unsigned long end)
81{
82 struct mm_struct *mm = vma->vm_mm;
83 int cpu = smp_processor_id();
84
85 if (cpu_context(cpu, mm) != 0) {
86 unsigned long size, flags;
87
88#ifdef DEBUG_TLB
89 printk("[tlbrange<%lu,0x%08lx,0x%08lx>]",
90 cpu_context(cpu, mm) & ASID_MASK, start, end);
91#endif
92 local_irq_save(flags);
93 size = (end - start + (PAGE_SIZE - 1)) >> PAGE_SHIFT;
94 if (size <= current_cpu_data.tlbsize) {
95 int oldpid = read_c0_entryhi() & ASID_MASK;
96 int newpid = cpu_context(cpu, mm) & ASID_MASK;
97
98 start &= PAGE_MASK;
99 end += PAGE_SIZE - 1;
100 end &= PAGE_MASK;
101 while (start < end) {
102 int idx;
103
104 write_c0_entryhi(start | newpid);
105 start += PAGE_SIZE; /* BARRIER */
106 tlb_probe();
107 idx = read_c0_index();
108 write_c0_entrylo0(0);
109 write_c0_entryhi(KSEG0);
110 if (idx < 0) /* BARRIER */
111 continue;
112 tlb_write_indexed();
113 }
114 write_c0_entryhi(oldpid);
115 } else {
116 drop_mmu_context(mm, cpu);
117 }
118 local_irq_restore(flags);
119 }
120}
121
122void local_flush_tlb_kernel_range(unsigned long start, unsigned long end)
123{
124 unsigned long size, flags;
125
126#ifdef DEBUG_TLB
127 printk("[tlbrange<%lu,0x%08lx,0x%08lx>]", start, end);
128#endif
129 local_irq_save(flags);
130 size = (end - start + (PAGE_SIZE - 1)) >> PAGE_SHIFT;
131 if (size <= current_cpu_data.tlbsize) {
132 int pid = read_c0_entryhi();
133
134 start &= PAGE_MASK;
135 end += PAGE_SIZE - 1;
136 end &= PAGE_MASK;
137
138 while (start < end) {
139 int idx;
140
141 write_c0_entryhi(start);
142 start += PAGE_SIZE; /* BARRIER */
143 tlb_probe();
144 idx = read_c0_index();
145 write_c0_entrylo0(0);
146 write_c0_entryhi(KSEG0);
147 if (idx < 0) /* BARRIER */
148 continue;
149 tlb_write_indexed();
150 }
151 write_c0_entryhi(pid);
152 } else {
153 local_flush_tlb_all();
154 }
155 local_irq_restore(flags);
156}
157
158void local_flush_tlb_page(struct vm_area_struct *vma, unsigned long page)
159{
160 int cpu = smp_processor_id();
161
162 if (!vma || cpu_context(cpu, vma->vm_mm) != 0) {
163 unsigned long flags;
164 int oldpid, newpid, idx;
165
166#ifdef DEBUG_TLB
167 printk("[tlbpage<%lu,0x%08lx>]", cpu_context(cpu, vma->vm_mm), page);
168#endif
169 newpid = cpu_context(cpu, vma->vm_mm) & ASID_MASK;
170 page &= PAGE_MASK;
171 local_irq_save(flags);
172 oldpid = read_c0_entryhi() & ASID_MASK;
173 write_c0_entryhi(page | newpid);
174 BARRIER;
175 tlb_probe();
176 idx = read_c0_index();
177 write_c0_entrylo0(0);
178 write_c0_entryhi(KSEG0);
179 if (idx < 0) /* BARRIER */
180 goto finish;
181 tlb_write_indexed();
182
183finish:
184 write_c0_entryhi(oldpid);
185 local_irq_restore(flags);
186 }
187}
188
189void __update_tlb(struct vm_area_struct *vma, unsigned long address, pte_t pte)
190{
191 unsigned long flags;
192 int idx, pid;
193
194 /*
195 * Handle debugger faulting in for debugee.
196 */
197 if (current->active_mm != vma->vm_mm)
198 return;
199
200 pid = read_c0_entryhi() & ASID_MASK;
201
202#ifdef DEBUG_TLB
203 if ((pid != (cpu_context(cpu, vma->vm_mm) & ASID_MASK)) || (cpu_context(cpu, vma->vm_mm) == 0)) {
204 printk("update_mmu_cache: Wheee, bogus tlbpid mmpid=%lu tlbpid=%d\n",
205 (cpu_context(cpu, vma->vm_mm)), pid);
206 }
207#endif
208
209 local_irq_save(flags);
210 address &= PAGE_MASK;
211 write_c0_entryhi(address | pid);
212 BARRIER;
213 tlb_probe();
214 idx = read_c0_index();
215 write_c0_entrylo0(pte_val(pte));
216 write_c0_entryhi(address | pid);
217 if (idx < 0) { /* BARRIER */
218 tlb_write_random();
219 } else {
220 tlb_write_indexed();
221 }
222 write_c0_entryhi(pid);
223 local_irq_restore(flags);
224}
225
226void __init add_wired_entry(unsigned long entrylo0, unsigned long entrylo1,
227 unsigned long entryhi, unsigned long pagemask)
228{
229 unsigned long flags;
230 unsigned long old_ctx;
231 static unsigned long wired = 0;
232
233 if (r3k_have_wired_reg) { /* TX39XX */
234 unsigned long old_pagemask;
235 unsigned long w;
236
237#ifdef DEBUG_TLB
238 printk("[tlbwired<entry lo0 %8x, hi %8x\n, pagemask %8x>]\n",
239 entrylo0, entryhi, pagemask);
240#endif
241
242 local_irq_save(flags);
243 /* Save old context and create impossible VPN2 value */
244 old_ctx = read_c0_entryhi() & ASID_MASK;
245 old_pagemask = read_c0_pagemask();
246 w = read_c0_wired();
247 write_c0_wired(w + 1);
248 write_c0_index(w << 8);
249 write_c0_pagemask(pagemask);
250 write_c0_entryhi(entryhi);
251 write_c0_entrylo0(entrylo0);
252 BARRIER;
253 tlb_write_indexed();
254
255 write_c0_entryhi(old_ctx);
256 write_c0_pagemask(old_pagemask);
257 local_flush_tlb_all();
258 local_irq_restore(flags);
259
260 } else if (wired < 8) {
261#ifdef DEBUG_TLB
262 printk("[tlbwired<entry lo0 %8x, hi %8x\n>]\n",
263 entrylo0, entryhi);
264#endif
265
266 local_irq_save(flags);
267 old_ctx = read_c0_entryhi() & ASID_MASK;
268 write_c0_entrylo0(entrylo0);
269 write_c0_entryhi(entryhi);
270 write_c0_index(wired);
271 wired++; /* BARRIER */
272 tlb_write_indexed();
273 write_c0_entryhi(old_ctx);
274 local_flush_tlb_all();
275 local_irq_restore(flags);
276 }
277}
278
279void __cpuinit tlb_init(void)
280{
281 local_flush_tlb_all();
282
283 build_tlb_refill_handler();
284}
1/*
2 * r2300.c: R2000 and R3000 specific mmu/cache code.
3 *
4 * Copyright (C) 1996 David S. Miller (davem@davemloft.net)
5 *
6 * with a lot of changes to make this thing work for R3000s
7 * Tx39XX R4k style caches added. HK
8 * Copyright (C) 1998, 1999, 2000 Harald Koerfgen
9 * Copyright (C) 1998 Gleb Raiko & Vladimir Roganov
10 * Copyright (C) 2002 Ralf Baechle
11 * Copyright (C) 2002 Maciej W. Rozycki
12 */
13#include <linux/kernel.h>
14#include <linux/sched.h>
15#include <linux/smp.h>
16#include <linux/mm.h>
17
18#include <asm/page.h>
19#include <asm/pgtable.h>
20#include <asm/mmu_context.h>
21#include <asm/tlbmisc.h>
22#include <asm/isadep.h>
23#include <asm/io.h>
24#include <asm/bootinfo.h>
25#include <asm/cpu.h>
26
27#undef DEBUG_TLB
28
29extern void build_tlb_refill_handler(void);
30
31/* CP0 hazard avoidance. */
32#define BARRIER \
33 __asm__ __volatile__( \
34 ".set push\n\t" \
35 ".set noreorder\n\t" \
36 "nop\n\t" \
37 ".set pop\n\t")
38
39int r3k_have_wired_reg; /* Should be in cpu_data? */
40
41/* TLB operations. */
42static void local_flush_tlb_from(int entry)
43{
44 unsigned long old_ctx;
45
46 old_ctx = read_c0_entryhi() & ASID_MASK;
47 write_c0_entrylo0(0);
48 while (entry < current_cpu_data.tlbsize) {
49 write_c0_index(entry << 8);
50 write_c0_entryhi((entry | 0x80000) << 12);
51 entry++; /* BARRIER */
52 tlb_write_indexed();
53 }
54 write_c0_entryhi(old_ctx);
55}
56
57void local_flush_tlb_all(void)
58{
59 unsigned long flags;
60
61#ifdef DEBUG_TLB
62 printk("[tlball]");
63#endif
64 local_irq_save(flags);
65 local_flush_tlb_from(r3k_have_wired_reg ? read_c0_wired() : 8);
66 local_irq_restore(flags);
67}
68
69void local_flush_tlb_mm(struct mm_struct *mm)
70{
71 int cpu = smp_processor_id();
72
73 if (cpu_context(cpu, mm) != 0) {
74#ifdef DEBUG_TLB
75 printk("[tlbmm<%lu>]", (unsigned long)cpu_context(cpu, mm));
76#endif
77 drop_mmu_context(mm, cpu);
78 }
79}
80
81void local_flush_tlb_range(struct vm_area_struct *vma, unsigned long start,
82 unsigned long end)
83{
84 struct mm_struct *mm = vma->vm_mm;
85 int cpu = smp_processor_id();
86
87 if (cpu_context(cpu, mm) != 0) {
88 unsigned long size, flags;
89
90#ifdef DEBUG_TLB
91 printk("[tlbrange<%lu,0x%08lx,0x%08lx>]",
92 cpu_context(cpu, mm) & ASID_MASK, start, end);
93#endif
94 local_irq_save(flags);
95 size = (end - start + (PAGE_SIZE - 1)) >> PAGE_SHIFT;
96 if (size <= current_cpu_data.tlbsize) {
97 int oldpid = read_c0_entryhi() & ASID_MASK;
98 int newpid = cpu_context(cpu, mm) & ASID_MASK;
99
100 start &= PAGE_MASK;
101 end += PAGE_SIZE - 1;
102 end &= PAGE_MASK;
103 while (start < end) {
104 int idx;
105
106 write_c0_entryhi(start | newpid);
107 start += PAGE_SIZE; /* BARRIER */
108 tlb_probe();
109 idx = read_c0_index();
110 write_c0_entrylo0(0);
111 write_c0_entryhi(KSEG0);
112 if (idx < 0) /* BARRIER */
113 continue;
114 tlb_write_indexed();
115 }
116 write_c0_entryhi(oldpid);
117 } else {
118 drop_mmu_context(mm, cpu);
119 }
120 local_irq_restore(flags);
121 }
122}
123
124void local_flush_tlb_kernel_range(unsigned long start, unsigned long end)
125{
126 unsigned long size, flags;
127
128#ifdef DEBUG_TLB
129 printk("[tlbrange<%lu,0x%08lx,0x%08lx>]", start, end);
130#endif
131 local_irq_save(flags);
132 size = (end - start + (PAGE_SIZE - 1)) >> PAGE_SHIFT;
133 if (size <= current_cpu_data.tlbsize) {
134 int pid = read_c0_entryhi();
135
136 start &= PAGE_MASK;
137 end += PAGE_SIZE - 1;
138 end &= PAGE_MASK;
139
140 while (start < end) {
141 int idx;
142
143 write_c0_entryhi(start);
144 start += PAGE_SIZE; /* BARRIER */
145 tlb_probe();
146 idx = read_c0_index();
147 write_c0_entrylo0(0);
148 write_c0_entryhi(KSEG0);
149 if (idx < 0) /* BARRIER */
150 continue;
151 tlb_write_indexed();
152 }
153 write_c0_entryhi(pid);
154 } else {
155 local_flush_tlb_all();
156 }
157 local_irq_restore(flags);
158}
159
160void local_flush_tlb_page(struct vm_area_struct *vma, unsigned long page)
161{
162 int cpu = smp_processor_id();
163
164 if (cpu_context(cpu, vma->vm_mm) != 0) {
165 unsigned long flags;
166 int oldpid, newpid, idx;
167
168#ifdef DEBUG_TLB
169 printk("[tlbpage<%lu,0x%08lx>]", cpu_context(cpu, vma->vm_mm), page);
170#endif
171 newpid = cpu_context(cpu, vma->vm_mm) & ASID_MASK;
172 page &= PAGE_MASK;
173 local_irq_save(flags);
174 oldpid = read_c0_entryhi() & ASID_MASK;
175 write_c0_entryhi(page | newpid);
176 BARRIER;
177 tlb_probe();
178 idx = read_c0_index();
179 write_c0_entrylo0(0);
180 write_c0_entryhi(KSEG0);
181 if (idx < 0) /* BARRIER */
182 goto finish;
183 tlb_write_indexed();
184
185finish:
186 write_c0_entryhi(oldpid);
187 local_irq_restore(flags);
188 }
189}
190
191void __update_tlb(struct vm_area_struct *vma, unsigned long address, pte_t pte)
192{
193 unsigned long flags;
194 int idx, pid;
195
196 /*
197 * Handle debugger faulting in for debugee.
198 */
199 if (current->active_mm != vma->vm_mm)
200 return;
201
202 pid = read_c0_entryhi() & ASID_MASK;
203
204#ifdef DEBUG_TLB
205 if ((pid != (cpu_context(cpu, vma->vm_mm) & ASID_MASK)) || (cpu_context(cpu, vma->vm_mm) == 0)) {
206 printk("update_mmu_cache: Wheee, bogus tlbpid mmpid=%lu tlbpid=%d\n",
207 (cpu_context(cpu, vma->vm_mm)), pid);
208 }
209#endif
210
211 local_irq_save(flags);
212 address &= PAGE_MASK;
213 write_c0_entryhi(address | pid);
214 BARRIER;
215 tlb_probe();
216 idx = read_c0_index();
217 write_c0_entrylo0(pte_val(pte));
218 write_c0_entryhi(address | pid);
219 if (idx < 0) { /* BARRIER */
220 tlb_write_random();
221 } else {
222 tlb_write_indexed();
223 }
224 write_c0_entryhi(pid);
225 local_irq_restore(flags);
226}
227
228void add_wired_entry(unsigned long entrylo0, unsigned long entrylo1,
229 unsigned long entryhi, unsigned long pagemask)
230{
231 unsigned long flags;
232 unsigned long old_ctx;
233 static unsigned long wired = 0;
234
235 if (r3k_have_wired_reg) { /* TX39XX */
236 unsigned long old_pagemask;
237 unsigned long w;
238
239#ifdef DEBUG_TLB
240 printk("[tlbwired<entry lo0 %8x, hi %8x\n, pagemask %8x>]\n",
241 entrylo0, entryhi, pagemask);
242#endif
243
244 local_irq_save(flags);
245 /* Save old context and create impossible VPN2 value */
246 old_ctx = read_c0_entryhi() & ASID_MASK;
247 old_pagemask = read_c0_pagemask();
248 w = read_c0_wired();
249 write_c0_wired(w + 1);
250 write_c0_index(w << 8);
251 write_c0_pagemask(pagemask);
252 write_c0_entryhi(entryhi);
253 write_c0_entrylo0(entrylo0);
254 BARRIER;
255 tlb_write_indexed();
256
257 write_c0_entryhi(old_ctx);
258 write_c0_pagemask(old_pagemask);
259 local_flush_tlb_all();
260 local_irq_restore(flags);
261
262 } else if (wired < 8) {
263#ifdef DEBUG_TLB
264 printk("[tlbwired<entry lo0 %8x, hi %8x\n>]\n",
265 entrylo0, entryhi);
266#endif
267
268 local_irq_save(flags);
269 old_ctx = read_c0_entryhi() & ASID_MASK;
270 write_c0_entrylo0(entrylo0);
271 write_c0_entryhi(entryhi);
272 write_c0_index(wired);
273 wired++; /* BARRIER */
274 tlb_write_indexed();
275 write_c0_entryhi(old_ctx);
276 local_flush_tlb_all();
277 local_irq_restore(flags);
278 }
279}
280
281void tlb_init(void)
282{
283 switch (current_cpu_type()) {
284 case CPU_TX3922:
285 case CPU_TX3927:
286 r3k_have_wired_reg = 1;
287 write_c0_wired(0); /* Set to 8 on reset... */
288 break;
289 }
290 local_flush_tlb_from(0);
291 build_tlb_refill_handler();
292}