aboutsummaryrefslogtreecommitdiffstats
path: root/arch/mips/lib
diff options
context:
space:
mode:
Diffstat (limited to 'arch/mips/lib')
-rw-r--r--arch/mips/lib/Makefile18
-rw-r--r--arch/mips/lib/dump_tlb.c242
-rw-r--r--arch/mips/lib/r3k_dump_tlb.c182
3 files changed, 442 insertions, 0 deletions
diff --git a/arch/mips/lib/Makefile b/arch/mips/lib/Makefile
index 1c1aa9f92f6..1a484e430b3 100644
--- a/arch/mips/lib/Makefile
+++ b/arch/mips/lib/Makefile
@@ -8,5 +8,23 @@ lib-y += csum_partial.o memcpy.o memcpy-inatomic.o memset.o strlen_user.o \
8obj-y += iomap.o 8obj-y += iomap.o
9obj-$(CONFIG_PCI) += iomap-pci.o 9obj-$(CONFIG_PCI) += iomap-pci.o
10 10
11obj-$(CONFIG_CPU_MIPS32) += dump_tlb.o
12obj-$(CONFIG_CPU_MIPS64) += dump_tlb.o
13obj-$(CONFIG_CPU_NEVADA) += dump_tlb.o
14obj-$(CONFIG_CPU_R10000) += dump_tlb.o
15obj-$(CONFIG_CPU_R3000) += r3k_dump_tlb.o
16obj-$(CONFIG_CPU_R4300) += dump_tlb.o
17obj-$(CONFIG_CPU_R4X00) += dump_tlb.o
18obj-$(CONFIG_CPU_R5000) += dump_tlb.o
19obj-$(CONFIG_CPU_R5432) += dump_tlb.o
20obj-$(CONFIG_CPU_R6000) +=
21obj-$(CONFIG_CPU_R8000) +=
22obj-$(CONFIG_CPU_RM7000) += dump_tlb.o
23obj-$(CONFIG_CPU_RM9000) += dump_tlb.o
24obj-$(CONFIG_CPU_SB1) += dump_tlb.o
25obj-$(CONFIG_CPU_TX39XX) += r3k_dump_tlb.o
26obj-$(CONFIG_CPU_TX49XX) += dump_tlb.o
27obj-$(CONFIG_CPU_VR41XX) += dump_tlb.o
28
11# libgcc-style stuff needed in the kernel 29# libgcc-style stuff needed in the kernel
12obj-y += ashldi3.o ashrdi3.o lshrdi3.o ucmpdi2.o 30obj-y += ashldi3.o ashrdi3.o lshrdi3.o ucmpdi2.o
diff --git a/arch/mips/lib/dump_tlb.c b/arch/mips/lib/dump_tlb.c
new file mode 100644
index 00000000000..fbf4b72f430
--- /dev/null
+++ b/arch/mips/lib/dump_tlb.c
@@ -0,0 +1,242 @@
1/*
2 * Dump R4x00 TLB for debugging purposes.
3 *
4 * Copyright (C) 1994, 1995 by Waldorf Electronics, written by Ralf Baechle.
5 * Copyright (C) 1999 by Silicon Graphics, Inc.
6 */
7#include <linux/kernel.h>
8#include <linux/mm.h>
9#include <linux/sched.h>
10#include <linux/string.h>
11
12#include <asm/bootinfo.h>
13#include <asm/cachectl.h>
14#include <asm/cpu.h>
15#include <asm/mipsregs.h>
16#include <asm/page.h>
17#include <asm/pgtable.h>
18
19static inline const char *msk2str(unsigned int mask)
20{
21 switch (mask) {
22 case PM_4K: return "4kb";
23 case PM_16K: return "16kb";
24 case PM_64K: return "64kb";
25 case PM_256K: return "256kb";
26#ifndef CONFIG_CPU_VR41XX
27 case PM_1M: return "1Mb";
28 case PM_4M: return "4Mb";
29 case PM_16M: return "16Mb";
30 case PM_64M: return "64Mb";
31 case PM_256M: return "256Mb";
32#endif
33 }
34 return "";
35}
36
37#define BARRIER() \
38 __asm__ __volatile__( \
39 ".set\tnoreorder\n\t" \
40 "nop;nop;nop;nop;nop;nop;nop\n\t" \
41 ".set\treorder");
42
43void dump_tlb(int first, int last)
44{
45 unsigned long s_entryhi, entryhi, asid;
46 unsigned long long entrylo0, entrylo1;
47 unsigned int s_index, pagemask, c0, c1, i;
48
49 s_entryhi = read_c0_entryhi();
50 s_index = read_c0_index();
51 asid = s_entryhi & 0xff;
52
53 for (i = first; i <= last; i++) {
54 write_c0_index(i);
55 BARRIER();
56 tlb_read();
57 BARRIER();
58 pagemask = read_c0_pagemask();
59 entryhi = read_c0_entryhi();
60 entrylo0 = read_c0_entrylo0();
61 entrylo1 = read_c0_entrylo1();
62
63 /* Unused entries have a virtual address of CKSEG0. */
64 if ((entryhi & ~0x1ffffUL) != CKSEG0
65 && (entryhi & 0xff) == asid) {
66#ifdef CONFIG_32BIT
67 int width = 8;
68#else
69 int width = 11;
70#endif
71 /*
72 * Only print entries in use
73 */
74 printk("Index: %2d pgmask=%s ", i, msk2str(pagemask));
75
76 c0 = (entrylo0 >> 3) & 7;
77 c1 = (entrylo1 >> 3) & 7;
78
79 printk("va=%0*lx asid=%02lx\n",
80 width, (entryhi & ~0x1fffUL),
81 entryhi & 0xff);
82 printk("\t[pa=%0*llx c=%d d=%d v=%d g=%d] ",
83 width,
84 (entrylo0 << 6) & PAGE_MASK, c0,
85 (entrylo0 & 4) ? 1 : 0,
86 (entrylo0 & 2) ? 1 : 0,
87 (entrylo0 & 1) ? 1 : 0);
88 printk("[pa=%0*llx c=%d d=%d v=%d g=%d]\n",
89 width,
90 (entrylo1 << 6) & PAGE_MASK, c1,
91 (entrylo1 & 4) ? 1 : 0,
92 (entrylo1 & 2) ? 1 : 0,
93 (entrylo1 & 1) ? 1 : 0);
94 }
95 }
96 printk("\n");
97
98 write_c0_entryhi(s_entryhi);
99 write_c0_index(s_index);
100}
101
102void dump_tlb_all(void)
103{
104 dump_tlb(0, current_cpu_data.tlbsize - 1);
105}
106
107void dump_tlb_wired(void)
108{
109 int wired;
110
111 wired = read_c0_wired();
112 printk("Wired: %d", wired);
113 dump_tlb(0, read_c0_wired());
114}
115
116void dump_tlb_addr(unsigned long addr)
117{
118 unsigned int flags, oldpid;
119 int index;
120
121 local_irq_save(flags);
122 oldpid = read_c0_entryhi() & 0xff;
123 BARRIER();
124 write_c0_entryhi((addr & PAGE_MASK) | oldpid);
125 BARRIER();
126 tlb_probe();
127 BARRIER();
128 index = read_c0_index();
129 write_c0_entryhi(oldpid);
130 local_irq_restore(flags);
131
132 if (index < 0) {
133 printk("No entry for address 0x%08lx in TLB\n", addr);
134 return;
135 }
136
137 printk("Entry %d maps address 0x%08lx\n", index, addr);
138 dump_tlb(index, index);
139}
140
141void dump_tlb_nonwired(void)
142{
143 dump_tlb(read_c0_wired(), current_cpu_data.tlbsize - 1);
144}
145
146void dump_list_process(struct task_struct *t, void *address)
147{
148 pgd_t *page_dir, *pgd;
149 pud_t *pud;
150 pmd_t *pmd;
151 pte_t *pte, page;
152 unsigned long addr, val;
153 int width = sizeof(long) * 2;
154
155 addr = (unsigned long) address;
156
157 printk("Addr == %08lx\n", addr);
158#ifdef CONFIG_64BIT
159 printk("tasks->mm.pgd == %08lx\n", (unsigned long) t->mm->pgd);
160#endif
161
162#ifdef CONFIG_64BIT
163 page_dir = pgd_offset(t->mm, 0UL);
164 pgd = pgd_offset(t->mm, addr);
165#else
166 if (addr > KSEG0) {
167 page_dir = pgd_offset_k(0);
168 pgd = pgd_offset_k(addr);
169 } else if (t->mm) {
170 page_dir = pgd_offset(t->mm, 0);
171 pgd = pgd_offset(t->mm, addr);
172 } else {
173 printk("Current thread has no mm\n");
174 return;
175 }
176#endif
177 printk("page_dir == %0*lx\n", width, (unsigned long) page_dir);
178 printk("pgd == %0*lx\n", width, (unsigned long) pgd);
179
180 pud = pud_offset(pgd, addr);
181 printk("pud == %0*lx\n", width, (unsigned long) pud);
182
183 pmd = pmd_offset(pud, addr);
184 printk("pmd == %0*lx\n", width, (unsigned long) pmd);
185
186 pte = pte_offset(pmd, addr);
187 printk("pte == %0*lx\n", width, (unsigned long) pte);
188
189 page = *pte;
190#ifdef CONFIG_64BIT_PHYS_ADDR
191 printk("page == %08Lx\n", pte_val(page));
192#else
193 printk("page == %0*lx\n", width, pte_val(page));
194#endif
195
196 val = pte_val(page);
197 if (val & _PAGE_PRESENT) printk("present ");
198 if (val & _PAGE_READ) printk("read ");
199 if (val & _PAGE_WRITE) printk("write ");
200 if (val & _PAGE_ACCESSED) printk("accessed ");
201 if (val & _PAGE_MODIFIED) printk("modified ");
202 if (val & _PAGE_R4KBUG) printk("r4kbug ");
203 if (val & _PAGE_GLOBAL) printk("global ");
204 if (val & _PAGE_VALID) printk("valid ");
205 printk("\n");
206}
207
208void dump_list_current(void *address)
209{
210 dump_list_process(current, address);
211}
212
213unsigned long vtop(void *address)
214{
215 pgd_t *pgd;
216 pud_t *pud;
217 pmd_t *pmd;
218 pte_t *pte;
219 unsigned long addr, paddr;
220
221 addr = (unsigned long) address;
222 pgd = pgd_offset(current->mm, addr);
223 pud = pud_offset(pgd, addr);
224 pmd = pmd_offset(pud, addr);
225 pte = pte_offset(pmd, addr);
226 paddr = (CKSEG1 | (unsigned int) pte_val(*pte)) & PAGE_MASK;
227 paddr |= (addr & ~PAGE_MASK);
228
229 return paddr;
230}
231
232void dump16(unsigned long *p)
233{
234 int i;
235
236 for (i = 0; i < 8; i++) {
237 printk("*%08lx == %08lx, ", (unsigned long)p, *p);
238 p++;
239 printk("*%08lx == %08lx\n", (unsigned long)p, *p);
240 p++;
241 }
242}
diff --git a/arch/mips/lib/r3k_dump_tlb.c b/arch/mips/lib/r3k_dump_tlb.c
new file mode 100644
index 00000000000..4f2cb74f076
--- /dev/null
+++ b/arch/mips/lib/r3k_dump_tlb.c
@@ -0,0 +1,182 @@
1/*
2 * Dump R3000 TLB for debugging purposes.
3 *
4 * Copyright (C) 1994, 1995 by Waldorf Electronics, written by Ralf Baechle.
5 * Copyright (C) 1999 by Silicon Graphics, Inc.
6 * Copyright (C) 1999 by Harald Koerfgen
7 */
8#include <linux/kernel.h>
9#include <linux/mm.h>
10#include <linux/sched.h>
11#include <linux/string.h>
12
13#include <asm/bootinfo.h>
14#include <asm/cachectl.h>
15#include <asm/cpu.h>
16#include <asm/mipsregs.h>
17#include <asm/page.h>
18#include <asm/pgtable.h>
19
20extern int r3k_have_wired_reg; /* defined in tlb-r3k.c */
21
22void dump_tlb(int first, int last)
23{
24 int i;
25 unsigned int asid;
26 unsigned long entryhi, entrylo0;
27
28 asid = read_c0_entryhi() & 0xfc0;
29
30 for (i = first; i <= last; i++) {
31 write_c0_index(i<<8);
32 __asm__ __volatile__(
33 ".set\tnoreorder\n\t"
34 "tlbr\n\t"
35 "nop\n\t"
36 ".set\treorder");
37 entryhi = read_c0_entryhi();
38 entrylo0 = read_c0_entrylo0();
39
40 /* Unused entries have a virtual address of KSEG0. */
41 if ((entryhi & 0xffffe000) != 0x80000000
42 && (entryhi & 0xfc0) == asid) {
43 /*
44 * Only print entries in use
45 */
46 printk("Index: %2d ", i);
47
48 printk("va=%08lx asid=%08lx"
49 " [pa=%06lx n=%d d=%d v=%d g=%d]",
50 (entryhi & 0xffffe000),
51 entryhi & 0xfc0,
52 entrylo0 & PAGE_MASK,
53 (entrylo0 & (1 << 11)) ? 1 : 0,
54 (entrylo0 & (1 << 10)) ? 1 : 0,
55 (entrylo0 & (1 << 9)) ? 1 : 0,
56 (entrylo0 & (1 << 8)) ? 1 : 0);
57 }
58 }
59 printk("\n");
60
61 write_c0_entryhi(asid);
62}
63
64void dump_tlb_all(void)
65{
66 dump_tlb(0, current_cpu_data.tlbsize - 1);
67}
68
69void dump_tlb_wired(void)
70{
71 int wired = r3k_have_wired_reg ? read_c0_wired() : 8;
72
73 printk("Wired: %d", wired);
74 dump_tlb(0, wired - 1);
75}
76
77void dump_tlb_addr(unsigned long addr)
78{
79 unsigned long flags, oldpid;
80 int index;
81
82 local_irq_save(flags);
83 oldpid = read_c0_entryhi() & 0xff;
84 write_c0_entryhi((addr & PAGE_MASK) | oldpid);
85 tlb_probe();
86 index = read_c0_index();
87 write_c0_entryhi(oldpid);
88 local_irq_restore(flags);
89
90 if (index < 0) {
91 printk("No entry for address 0x%08lx in TLB\n", addr);
92 return;
93 }
94
95 printk("Entry %d maps address 0x%08lx\n", index, addr);
96 dump_tlb(index, index);
97}
98
99void dump_tlb_nonwired(void)
100{
101 int wired = r3k_have_wired_reg ? read_c0_wired() : 8;
102 dump_tlb(wired, current_cpu_data.tlbsize - 1);
103}
104
105void dump_list_process(struct task_struct *t, void *address)
106{
107 pgd_t *page_dir, *pgd;
108 pud_t *pud;
109 pmd_t *pmd;
110 pte_t *pte, page;
111 unsigned int addr;
112 unsigned long val;
113
114 addr = (unsigned int) address;
115
116 printk("Addr == %08x\n", addr);
117 printk("tasks->mm.pgd == %08x\n", (unsigned int) t->mm->pgd);
118
119 page_dir = pgd_offset(t->mm, 0);
120 printk("page_dir == %08x\n", (unsigned int) page_dir);
121
122 pgd = pgd_offset(t->mm, addr);
123 printk("pgd == %08x, ", (unsigned int) pgd);
124
125 pud = pud_offset(pgd, addr);
126 printk("pud == %08x, ", (unsigned int) pud);
127
128 pmd = pmd_offset(pud, addr);
129 printk("pmd == %08x, ", (unsigned int) pmd);
130
131 pte = pte_offset(pmd, addr);
132 printk("pte == %08x, ", (unsigned int) pte);
133
134 page = *pte;
135 printk("page == %08x\n", (unsigned int) pte_val(page));
136
137 val = pte_val(page);
138 if (val & _PAGE_PRESENT) printk("present ");
139 if (val & _PAGE_READ) printk("read ");
140 if (val & _PAGE_WRITE) printk("write ");
141 if (val & _PAGE_ACCESSED) printk("accessed ");
142 if (val & _PAGE_MODIFIED) printk("modified ");
143 if (val & _PAGE_GLOBAL) printk("global ");
144 if (val & _PAGE_VALID) printk("valid ");
145 printk("\n");
146}
147
148void dump_list_current(void *address)
149{
150 dump_list_process(current, address);
151}
152
153unsigned int vtop(void *address)
154{
155 pgd_t *pgd;
156 pud_t *pud;
157 pmd_t *pmd;
158 pte_t *pte;
159 unsigned int addr, paddr;
160
161 addr = (unsigned long) address;
162 pgd = pgd_offset(current->mm, addr);
163 pud = pud_offset(pgd, addr);
164 pmd = pmd_offset(pud, addr);
165 pte = pte_offset(pmd, addr);
166 paddr = (KSEG1 | (unsigned int) pte_val(*pte)) & PAGE_MASK;
167 paddr |= (addr & ~PAGE_MASK);
168
169 return paddr;
170}
171
172void dump16(unsigned long *p)
173{
174 int i;
175
176 for (i = 0; i < 8; i++) {
177 printk("*%08lx == %08lx, ", (unsigned long)p, *p);
178 p++;
179 printk("*%08lx == %08lx\n", (unsigned long)p, *p);
180 p++;
181 }
182}