2 * Copyright (C) 2004, 2007-2010, 2011-2012 Synopsys, Inc. (www.synopsys.com)
4 * This program is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License version 2 as
8 #include <linux/ptrace.h>
9 #include <linux/module.h>
12 #include <linux/kdev_t.h>
13 #include <linux/fs_struct.h>
14 #include <linux/proc_fs.h>
15 #include <linux/file.h>
16 #include <asm/arcregs.h>
19 * Common routine to print scratch regs (r0-r12) or callee regs (r13-r25)
20 * -Prints 3 regs per line and a CR.
21 * -To continue, callee regs right after scratch, special handling of CR
23 static noinline
void print_reg_file(long *reg_rev
, int start_num
)
27 int n
= 0, len
= sizeof(buf
);
29 for (i
= start_num
; i
< start_num
+ 13; i
++) {
30 n
+= scnprintf(buf
+ n
, len
- n
, "r%02u: 0x%08lx\t",
31 i
, (unsigned long)*reg_rev
);
33 if (((i
+ 1) % 3) == 0)
34 n
+= scnprintf(buf
+ n
, len
- n
, "\n");
36 /* because pt_regs has regs reversed: r12..r0, r25..r13 */
41 n
+= scnprintf(buf
+ n
, len
- n
, "\n\n");
43 /* To continue printing callee regs on same line as scratch regs */
50 static void show_callee_regs(struct callee_regs
*cregs
)
52 print_reg_file(&(cregs
->r13
), 13);
55 void print_task_path_n_nm(struct task_struct
*tsk
, char *buf
)
60 struct file
*exe_file
;
62 mm
= get_task_mm(tsk
);
66 exe_file
= get_mm_exe_file(mm
);
70 path
= exe_file
->f_path
;
71 path_get(&exe_file
->f_path
);
73 path_nm
= d_path(&path
, buf
, 255);
78 pr_info("Path: %s\n", path_nm
);
80 EXPORT_SYMBOL(print_task_path_n_nm
);
82 static void show_faulting_vma(unsigned long address
, char *buf
)
84 struct vm_area_struct
*vma
;
86 unsigned long ino
= 0;
90 /* can't use print_vma_addr() yet as it doesn't check for
94 vma
= find_vma(current
->active_mm
, address
);
96 /* check against the find_vma( ) behaviour which returns the next VMA
97 * if the container VMA is not found
99 if (vma
&& (vma
->vm_start
<= address
)) {
100 struct file
*file
= vma
->vm_file
;
102 struct path
*path
= &file
->f_path
;
103 nm
= d_path(path
, buf
, PAGE_SIZE
- 1);
104 inode
= vma
->vm_file
->f_path
.dentry
->d_inode
;
105 dev
= inode
->i_sb
->s_dev
;
108 pr_info(" @off 0x%lx in [%s]\n"
109 " VMA: 0x%08lx to 0x%08lx\n",
110 vma
->vm_start
< TASK_UNMAPPED_BASE
?
111 address
: address
- vma
->vm_start
,
112 nm
, vma
->vm_start
, vma
->vm_end
);
114 pr_info(" @No matching VMA found\n");
118 static void show_ecr_verbose(struct pt_regs
*regs
)
120 unsigned int vec
, cause_code
, cause_reg
;
121 unsigned long address
;
123 cause_reg
= current
->thread
.cause_code
;
124 pr_info("\n[ECR ]: 0x%08x => ", cause_reg
);
126 /* For Data fault, this is data address not instruction addr */
127 address
= current
->thread
.fault_address
;
129 vec
= cause_reg
>> 16;
130 cause_code
= (cause_reg
>> 8) & 0xFF;
132 /* For DTLB Miss or ProtV, display the memory involved too */
133 if (vec
== ECR_V_DTLB_MISS
) {
134 pr_cont("Invalid %s 0x%08lx by insn @ 0x%08lx\n",
135 (cause_code
== 0x01) ? "Read From" :
136 ((cause_code
== 0x02) ? "Write to" : "EX"),
138 } else if (vec
== ECR_V_ITLB_MISS
) {
139 pr_cont("Insn could not be fetched\n");
140 } else if (vec
== ECR_V_MACH_CHK
) {
141 pr_cont("%s\n", (cause_code
== 0x0) ?
142 "Double Fault" : "Other Fatal Err");
144 } else if (vec
== ECR_V_PROTV
) {
145 if (cause_code
== ECR_C_PROTV_INST_FETCH
)
146 pr_cont("Execute from Non-exec Page\n");
147 else if (cause_code
== ECR_C_PROTV_LOAD
)
148 pr_cont("Read from Non-readable Page\n");
149 else if (cause_code
== ECR_C_PROTV_STORE
)
150 pr_cont("Write to Non-writable Page\n");
151 else if (cause_code
== ECR_C_PROTV_XCHG
)
152 pr_cont("Data exchange protection violation\n");
153 else if (cause_code
== ECR_C_PROTV_MISALIG_DATA
)
154 pr_cont("Misaligned r/w from 0x%08lx\n", address
);
155 } else if (vec
== ECR_V_INSN_ERR
) {
156 pr_cont("Illegal Insn\n");
158 pr_cont("Check Programmer's Manual\n");
162 /************************************************************************
163 * API called by rest of kernel
164 ***********************************************************************/
166 void show_regs(struct pt_regs
*regs
)
168 struct task_struct
*tsk
= current
;
169 struct callee_regs
*cregs
;
172 buf
= (char *)__get_free_page(GFP_TEMPORARY
);
176 print_task_path_n_nm(tsk
, buf
);
177 show_regs_print_info(KERN_INFO
);
179 if (current
->thread
.cause_code
)
180 show_ecr_verbose(regs
);
182 pr_info("[EFA ]: 0x%08lx\n[BLINK ]: %pS\n[ERET ]: %pS\n",
183 current
->thread
.fault_address
,
184 (void *)regs
->blink
, (void *)regs
->ret
);
187 show_faulting_vma(regs
->ret
, buf
); /* faulting code, not data */
189 pr_info("[STAT32]: 0x%08lx", regs
->status32
);
191 #define STS_BIT(r, bit) r->status32 & STATUS_##bit##_MASK ? #bit : ""
192 if (!user_mode(regs
))
193 pr_cont(" : %2s %2s %2s %2s %2s\n",
194 STS_BIT(regs
, AE
), STS_BIT(regs
, A2
), STS_BIT(regs
, A1
),
195 STS_BIT(regs
, E2
), STS_BIT(regs
, E1
));
197 pr_info("BTA: 0x%08lx\t SP: 0x%08lx\t FP: 0x%08lx\n",
198 regs
->bta
, regs
->sp
, regs
->fp
);
199 pr_info("LPS: 0x%08lx\tLPE: 0x%08lx\tLPC: 0x%08lx\n",
200 regs
->lp_start
, regs
->lp_end
, regs
->lp_count
);
202 /* print regs->r0 thru regs->r12
203 * Sequential printing was generating horrible code
205 print_reg_file(&(regs
->r0
), 0);
207 /* If Callee regs were saved, display them too */
208 cregs
= (struct callee_regs
*)current
->thread
.callee_reg
;
210 show_callee_regs(cregs
);
212 free_page((unsigned long)buf
);
215 void show_kernel_fault_diag(const char *str
, struct pt_regs
*regs
,
216 unsigned long address
, unsigned long cause_reg
)
218 current
->thread
.fault_address
= address
;
219 current
->thread
.cause_code
= cause_reg
;
221 /* Caller and Callee regs */
224 /* Show stack trace if this Fatality happened in kernel mode */
225 if (!user_mode(regs
))
226 show_stacktrace(current
, regs
);
229 #ifdef CONFIG_DEBUG_FS
231 #include <linux/module.h>
232 #include <linux/fs.h>
233 #include <linux/mount.h>
234 #include <linux/pagemap.h>
235 #include <linux/init.h>
236 #include <linux/namei.h>
237 #include <linux/debugfs.h>
239 static struct dentry
*test_dentry
;
240 static struct dentry
*test_dir
;
241 static struct dentry
*test_u32_dentry
;
243 static u32 clr_on_read
= 1;
245 #ifdef CONFIG_ARC_DBG_TLB_MISS_COUNT
246 u32 numitlb
, numdtlb
, num_pte_not_present
;
248 static int fill_display_data(char *kbuf
)
251 num
+= sprintf(kbuf
+ num
, "I-TLB Miss %x\n", numitlb
);
252 num
+= sprintf(kbuf
+ num
, "D-TLB Miss %x\n", numdtlb
);
253 num
+= sprintf(kbuf
+ num
, "PTE not present %x\n", num_pte_not_present
);
256 numitlb
= numdtlb
= num_pte_not_present
= 0;
261 static int tlb_stats_open(struct inode
*inode
, struct file
*file
)
263 file
->private_data
= (void *)__get_free_page(GFP_KERNEL
);
267 /* called on user read(): display the couters */
268 static ssize_t
tlb_stats_output(struct file
*file
, /* file descriptor */
269 char __user
*user_buf
, /* user buffer */
270 size_t len
, /* length of buffer */
271 loff_t
*offset
) /* offset in the file */
274 char *kbuf
= (char *)file
->private_data
;
276 /* All of the data can he shoved in one iteration */
280 num
= fill_display_data(kbuf
);
282 /* simple_read_from_buffer() is helper for copy to user space
283 It copies up to @2 (num) bytes from kernel buffer @4 (kbuf) at offset
284 @3 (offset) into the user space address starting at @1 (user_buf).
285 @5 (len) is max size of user buffer
287 return simple_read_from_buffer(user_buf
, num
, offset
, kbuf
, len
);
290 /* called on user write : clears the counters */
291 static ssize_t
tlb_stats_clear(struct file
*file
, const char __user
*user_buf
,
292 size_t length
, loff_t
*offset
)
294 numitlb
= numdtlb
= num_pte_not_present
= 0;
298 static int tlb_stats_close(struct inode
*inode
, struct file
*file
)
300 free_page((unsigned long)(file
->private_data
));
304 static const struct file_operations tlb_stats_file_ops
= {
305 .read
= tlb_stats_output
,
306 .write
= tlb_stats_clear
,
307 .open
= tlb_stats_open
,
308 .release
= tlb_stats_close
312 static int __init
arc_debugfs_init(void)
314 test_dir
= debugfs_create_dir("arc", NULL
);
316 #ifdef CONFIG_ARC_DBG_TLB_MISS_COUNT
317 test_dentry
= debugfs_create_file("tlb_stats", 0444, test_dir
, NULL
,
318 &tlb_stats_file_ops
);
322 debugfs_create_u32("clr_on_read", 0444, test_dir
, &clr_on_read
);
327 module_init(arc_debugfs_init
);
329 static void __exit
arc_debugfs_exit(void)
331 debugfs_remove(test_u32_dentry
);
332 debugfs_remove(test_dentry
);
333 debugfs_remove(test_dir
);
335 module_exit(arc_debugfs_exit
);