Home | History | Annotate | Line # | Download | only in mips
db_trace.c revision 1.2
      1  1.2     perry /*	$NetBSD: db_trace.c,v 1.2 1998/01/05 07:03:02 perry Exp $	*/
      2  1.2     perry 
      3  1.1  jonathan /*
      4  1.1  jonathan  * Mach Operating System
      5  1.1  jonathan  * Copyright (c) 1993-1987 Carnegie Mellon University
      6  1.1  jonathan  * All Rights Reserved.
      7  1.1  jonathan  *
      8  1.1  jonathan  * Permission to use, copy, modify and distribute this software and its
      9  1.1  jonathan  * documentation is hereby granted, provided that both the copyright
     10  1.1  jonathan  * notice and this permission notice appear in all copies of the
     11  1.1  jonathan  * software, derivative works or modified versions, and any portions
     12  1.1  jonathan  * thereof, and that both notices appear in supporting documentation.
     13  1.1  jonathan  *
     14  1.1  jonathan  * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
     15  1.1  jonathan  * CONDITION.  CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR
     16  1.1  jonathan  * ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
     17  1.1  jonathan  *
     18  1.1  jonathan  * Carnegie Mellon requests users of this software to return to
     19  1.1  jonathan  *
     20  1.1  jonathan  *  Software Distribution Coordinator  or  Software.Distribution (at) CS.CMU.EDU
     21  1.1  jonathan  *  School of Computer Science
     22  1.1  jonathan  *  Carnegie Mellon University
     23  1.1  jonathan  *  Pittsburgh PA 15213-3890
     24  1.1  jonathan  *
     25  1.1  jonathan  * any improvements or extensions that they make and grant Carnegie Mellon
     26  1.1  jonathan  * the rights to redistribute these changes.
     27  1.1  jonathan  */
     28  1.1  jonathan 
     29  1.1  jonathan #include <sys/types.h>
     30  1.1  jonathan #include <vm/vm_param.h>		/* XXX boolean_t */
     31  1.1  jonathan 
     32  1.1  jonathan #include <machine/param.h>
     33  1.1  jonathan #include <mips/db_machdep.h>
     34  1.1  jonathan #include <ddb/db_interface.h>
     35  1.1  jonathan #include <ddb/db_output.h>
     36  1.1  jonathan #include <ddb/db_variables.h>
     37  1.1  jonathan #include <ddb/db_sym.h>
     38  1.1  jonathan 
     39  1.1  jonathan extern int __start __P((void));	/* lowest kernel code address */
     40  1.1  jonathan extern vm_offset_t db_maxoff;
     41  1.1  jonathan extern vm_offset_t getreg_val __P((db_expr_t regno));
     42  1.1  jonathan 
     43  1.1  jonathan #define REG_ARG(i)	(4+i)
     44  1.1  jonathan #define SAVES_RA(x)	isa_spill((x),31)
     45  1.1  jonathan 
     46  1.1  jonathan #define KERN_SAVE_REG_IDX(vp)	( \
     47  1.1  jonathan 	((vp)->valuep >= (int *)(&((struct mips_saved_state *)0)->s0) &&    \
     48  1.1  jonathan 	 (vp)->valuep <= (int *)(&((struct mips_saved_state *)0)->s7))?	    \
     49  1.1  jonathan 		vp->valuep - (int *)(&((struct mips_saved_state *)0)->s0):  \
     50  1.1  jonathan 	((vp)->valuep >= (int *)(&((struct mips_saved_state *)0)->sp) &&    \
     51  1.1  jonathan 	 (vp)->valuep <= (int *)(&((struct mips_saved_state *)0)->ra))?	    \
     52  1.1  jonathan 		((vp)->valuep-(int *)(&((struct mips_saved_state *)0)->sp)) + \
     53  1.1  jonathan 		 ((int *)(&((struct mips_kernel_state *)0)->sp) - (int *)0):  \
     54  1.1  jonathan 	 -1)
     55  1.1  jonathan 
     56  1.1  jonathan extern	db_sym_t localsym __P((db_sym_t sym, boolean_t isreg, int *lex_level));
     57  1.1  jonathan 
     58  1.1  jonathan /*
     59  1.1  jonathan  * Machine register set.
     60  1.1  jonathan  */
     61  1.1  jonathan struct mips_saved_state *db_cur_exc_frame = 0;
     62  1.1  jonathan 
     63  1.1  jonathan /*
     64  1.1  jonathan  *  forward declarations
     65  1.1  jonathan  */
     66  1.1  jonathan int print_exception_frame __P((register struct mips_saved_state *fp,
     67  1.1  jonathan 			       unsigned epc));
     68  1.1  jonathan 
     69  1.1  jonathan /*XXX*/
     70  1.1  jonathan extern void stacktrace_subr __P((int a0, int a1, int a2, int a3,
     71  1.1  jonathan 				 u_int pc, u_int sp, u_int fp, u_int ra,
     72  1.1  jonathan 				 void (*)(const char*, ...)));
     73  1.1  jonathan 
     74  1.1  jonathan /*
     75  1.1  jonathan  * Stack trace helper.
     76  1.1  jonathan  */
     77  1.1  jonathan void db_mips_stack_trace __P((int count, vm_offset_t stackp,
     78  1.1  jonathan     vm_offset_t the_pc, vm_offset_t the_ra, int flags, vm_offset_t kstackp));
     79  1.1  jonathan 
     80  1.1  jonathan 
     81  1.1  jonathan #define DB_SETF_REGS FCN_NULL
     82  1.1  jonathan #define DBREGS_REG()
     83  1.1  jonathan 
     84  1.1  jonathan struct db_variable db_regs[] = {
     85  1.1  jonathan 	{ "at",	(long *)&ddb_regs.f_regs[AST],  DB_SETF_REGS },
     86  1.1  jonathan 	{ "v0",	(long *)&ddb_regs.f_regs[V0],  DB_SETF_REGS },
     87  1.1  jonathan 	{ "v1",	(long *)&ddb_regs.f_regs[V1],  DB_SETF_REGS },
     88  1.1  jonathan 	{ "a0",	(long *)&ddb_regs.f_regs[A0],  DB_SETF_REGS },
     89  1.1  jonathan 	{ "a1",	(long *)&ddb_regs.f_regs[A1],  DB_SETF_REGS },
     90  1.1  jonathan 	{ "a2",	(long *)&ddb_regs.f_regs[A2],  DB_SETF_REGS },
     91  1.1  jonathan 	{ "a3",	(long *)&ddb_regs.f_regs[A3],  DB_SETF_REGS },
     92  1.1  jonathan 	{ "t0",	(long *)&ddb_regs.f_regs[T0],  DB_SETF_REGS },
     93  1.1  jonathan 	{ "t1",	(long *)&ddb_regs.f_regs[T1],  DB_SETF_REGS },
     94  1.1  jonathan 	{ "t2",	(long *)&ddb_regs.f_regs[T2],  DB_SETF_REGS },
     95  1.1  jonathan 	{ "t3",	(long *)&ddb_regs.f_regs[T3],  DB_SETF_REGS },
     96  1.1  jonathan 	{ "t4",	(long *)&ddb_regs.f_regs[T4],  DB_SETF_REGS },
     97  1.1  jonathan 	{ "t5",	(long *)&ddb_regs.f_regs[T5],  DB_SETF_REGS },
     98  1.1  jonathan 	{ "t6",	(long *)&ddb_regs.f_regs[T6],  DB_SETF_REGS },
     99  1.1  jonathan 	{ "t7",	(long *)&ddb_regs.f_regs[T7],  DB_SETF_REGS },
    100  1.1  jonathan 	{ "s0",	(long *)&ddb_regs.f_regs[S0],  DB_SETF_REGS },
    101  1.1  jonathan 	{ "s1",	(long *)&ddb_regs.f_regs[S1],  DB_SETF_REGS },
    102  1.1  jonathan 	{ "s2",	(long *)&ddb_regs.f_regs[S2],  DB_SETF_REGS },
    103  1.1  jonathan 	{ "s3",	(long *)&ddb_regs.f_regs[S3],  DB_SETF_REGS },
    104  1.1  jonathan 	{ "s4",	(long *)&ddb_regs.f_regs[S4],  DB_SETF_REGS },
    105  1.1  jonathan 	{ "s5",	(long *)&ddb_regs.f_regs[S5],  DB_SETF_REGS },
    106  1.1  jonathan 	{ "s6",	(long *)&ddb_regs.f_regs[S6],  DB_SETF_REGS },
    107  1.1  jonathan 	{ "s7",	(long *)&ddb_regs.f_regs[S7],  DB_SETF_REGS },
    108  1.1  jonathan 	{ "t8",	(long *)&ddb_regs.f_regs[T8],  DB_SETF_REGS },
    109  1.1  jonathan 	{ "t9",	(long *)&ddb_regs.f_regs[T9],  DB_SETF_REGS },
    110  1.1  jonathan 	{ "k0",	(long *)&ddb_regs.f_regs[K0],  DB_SETF_REGS },
    111  1.1  jonathan 	{ "k1",	(long *)&ddb_regs.f_regs[K1],  DB_SETF_REGS },
    112  1.1  jonathan 	{ "gp",	(long *)&ddb_regs.f_regs[GP],  DB_SETF_REGS },
    113  1.1  jonathan 	{ "sp",	(long *)&ddb_regs.f_regs[SP],  DB_SETF_REGS },
    114  1.1  jonathan 	{ "fp",	(long *)&ddb_regs.f_regs[S8],  DB_SETF_REGS },	/* frame ptr */
    115  1.1  jonathan 	{ "ra",	(long *)&ddb_regs.f_regs[RA],  DB_SETF_REGS },
    116  1.1  jonathan 	{ "sr",	(long *)&ddb_regs.f_regs[SR],  DB_SETF_REGS },
    117  1.1  jonathan 	{ "mdlo",(long *)&ddb_regs.f_regs[MULLO],  DB_SETF_REGS },
    118  1.1  jonathan 	{ "mdhi",(long *)&ddb_regs.f_regs[MULHI],  DB_SETF_REGS },
    119  1.1  jonathan 	{ "bad", (long *)&ddb_regs.f_regs[BADVADDR], DB_SETF_REGS },
    120  1.1  jonathan 	{ "cs",	(long *)&ddb_regs.f_regs[CAUSE],  DB_SETF_REGS },
    121  1.1  jonathan 	{ "pc",	(long *)&ddb_regs.f_regs[PC],  DB_SETF_REGS },
    122  1.1  jonathan };
    123  1.1  jonathan struct db_variable *db_eregs = db_regs + sizeof(db_regs)/sizeof(db_regs[0]);
    124  1.1  jonathan 
    125  1.1  jonathan 
    126  1.1  jonathan 
    127  1.1  jonathan void
    128  1.1  jonathan db_stack_trace_cmd(addr, have_addr, count, modif)
    129  1.1  jonathan 	db_expr_t	addr;
    130  1.1  jonathan 	boolean_t	have_addr;
    131  1.1  jonathan 	db_expr_t	count;
    132  1.1  jonathan 	char		*modif;
    133  1.1  jonathan {
    134  1.1  jonathan 	stacktrace_subr(ddb_regs.f_regs[A0], ddb_regs.f_regs[A1],
    135  1.1  jonathan 			ddb_regs.f_regs[A2], ddb_regs.f_regs[A3],
    136  1.1  jonathan 			ddb_regs.f_regs[PC],
    137  1.1  jonathan 			ddb_regs.f_regs[SP],
    138  1.1  jonathan 			ddb_regs.f_regs[S8],	/* non-virtual fame pointer */
    139  1.1  jonathan 			ddb_regs.f_regs[RA],
    140  1.1  jonathan 			db_printf);
    141  1.1  jonathan }
    142  1.1  jonathan 
    143  1.1  jonathan 
    144  1.1  jonathan void
    145  1.1  jonathan db_mips_stack_trace(count, stackp, the_pc, the_ra, flags, kstackp)
    146  1.1  jonathan 	int count;
    147  1.1  jonathan 	vm_offset_t stackp, the_pc, the_ra;
    148  1.1  jonathan 	int flags;
    149  1.1  jonathan 	vm_offset_t kstackp;
    150  1.1  jonathan {
    151  1.1  jonathan 	return;
    152  1.1  jonathan }
    153  1.1  jonathan 
    154