diff options
author | Atsushi Nemoto <anemo@mba.ocn.ne.jp> | 2007-06-01 11:21:30 -0400 |
---|---|---|
committer | Ralf Baechle <ralf@linux-mips.org> | 2007-07-10 12:32:56 -0400 |
commit | 4becef1d85a48ea4294c962c2cbacb6074f0dd58 (patch) | |
tree | beea6b8fa8a861035385e5800ef3b2ed2301f1f2 /arch/mips/lib | |
parent | f6e2373ad6148476464fc7bb2610c6450c18cd2a (diff) |
[MIPS] Unify dump_tlb
Unify lib-{32,64}/dump_tlb.c into lib/dump_tlb.c and move
lib-32/r3k_dump_tlb.c to lib directory.
Signed-off-by: Atsushi Nemoto <anemo@mba.ocn.ne.jp>
Signed-off-by: Ralf Baechle <ralf@linux-mips.org>
Diffstat (limited to 'arch/mips/lib')
-rw-r--r-- | arch/mips/lib/Makefile | 18 | ||||
-rw-r--r-- | arch/mips/lib/dump_tlb.c | 242 | ||||
-rw-r--r-- | arch/mips/lib/r3k_dump_tlb.c | 182 |
3 files changed, 442 insertions, 0 deletions
diff --git a/arch/mips/lib/Makefile b/arch/mips/lib/Makefile index 1c1aa9f92f6c..1a484e430b3c 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 \ | |||
8 | obj-y += iomap.o | 8 | obj-y += iomap.o |
9 | obj-$(CONFIG_PCI) += iomap-pci.o | 9 | obj-$(CONFIG_PCI) += iomap-pci.o |
10 | 10 | ||
11 | obj-$(CONFIG_CPU_MIPS32) += dump_tlb.o | ||
12 | obj-$(CONFIG_CPU_MIPS64) += dump_tlb.o | ||
13 | obj-$(CONFIG_CPU_NEVADA) += dump_tlb.o | ||
14 | obj-$(CONFIG_CPU_R10000) += dump_tlb.o | ||
15 | obj-$(CONFIG_CPU_R3000) += r3k_dump_tlb.o | ||
16 | obj-$(CONFIG_CPU_R4300) += dump_tlb.o | ||
17 | obj-$(CONFIG_CPU_R4X00) += dump_tlb.o | ||
18 | obj-$(CONFIG_CPU_R5000) += dump_tlb.o | ||
19 | obj-$(CONFIG_CPU_R5432) += dump_tlb.o | ||
20 | obj-$(CONFIG_CPU_R6000) += | ||
21 | obj-$(CONFIG_CPU_R8000) += | ||
22 | obj-$(CONFIG_CPU_RM7000) += dump_tlb.o | ||
23 | obj-$(CONFIG_CPU_RM9000) += dump_tlb.o | ||
24 | obj-$(CONFIG_CPU_SB1) += dump_tlb.o | ||
25 | obj-$(CONFIG_CPU_TX39XX) += r3k_dump_tlb.o | ||
26 | obj-$(CONFIG_CPU_TX49XX) += dump_tlb.o | ||
27 | obj-$(CONFIG_CPU_VR41XX) += dump_tlb.o | ||
28 | |||
11 | # libgcc-style stuff needed in the kernel | 29 | # libgcc-style stuff needed in the kernel |
12 | obj-y += ashldi3.o ashrdi3.o lshrdi3.o ucmpdi2.o | 30 | obj-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 000000000000..fbf4b72f4306 --- /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 | |||
19 | static 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 | |||
43 | void 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 | |||
102 | void dump_tlb_all(void) | ||
103 | { | ||
104 | dump_tlb(0, current_cpu_data.tlbsize - 1); | ||
105 | } | ||
106 | |||
107 | void 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 | |||
116 | void 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 | |||
141 | void dump_tlb_nonwired(void) | ||
142 | { | ||
143 | dump_tlb(read_c0_wired(), current_cpu_data.tlbsize - 1); | ||
144 | } | ||
145 | |||
146 | void 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 | |||
208 | void dump_list_current(void *address) | ||
209 | { | ||
210 | dump_list_process(current, address); | ||
211 | } | ||
212 | |||
213 | unsigned 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 | |||
232 | void 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 000000000000..4f2cb74f0766 --- /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 | |||
20 | extern int r3k_have_wired_reg; /* defined in tlb-r3k.c */ | ||
21 | |||
22 | void 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 | |||
64 | void dump_tlb_all(void) | ||
65 | { | ||
66 | dump_tlb(0, current_cpu_data.tlbsize - 1); | ||
67 | } | ||
68 | |||
69 | void 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 | |||
77 | void 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 | |||
99 | void 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 | |||
105 | void 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 | |||
148 | void dump_list_current(void *address) | ||
149 | { | ||
150 | dump_list_process(current, address); | ||
151 | } | ||
152 | |||
153 | unsigned 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 | |||
172 | void 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 | } | ||