Home | History | Annotate | Download | only in mdb
      1     0   stevel /*
      2     0   stevel  * CDDL HEADER START
      3     0   stevel  *
      4     0   stevel  * The contents of this file are subject to the terms of the
      5  5084  johnlev  * Common Development and Distribution License (the "License").
      6  5084  johnlev  * You may not use this file except in compliance with the License.
      7     0   stevel  *
      8     0   stevel  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
      9     0   stevel  * or http://www.opensolaris.org/os/licensing.
     10     0   stevel  * See the License for the specific language governing permissions
     11     0   stevel  * and limitations under the License.
     12     0   stevel  *
     13     0   stevel  * When distributing Covered Code, include this CDDL HEADER in each
     14     0   stevel  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
     15     0   stevel  * If applicable, add the following below this CDDL HEADER, with the
     16     0   stevel  * fields enclosed by brackets "[]" replaced with your own identifying
     17     0   stevel  * information: Portions Copyright [yyyy] [name of copyright owner]
     18     0   stevel  *
     19     0   stevel  * CDDL HEADER END
     20     0   stevel  */
     21     0   stevel /*
     22  6473      edp  * Copyright 2008 Sun Microsystems, Inc.  All rights reserved.
     23     0   stevel  * Use is subject to license terms.
     24     0   stevel  */
     25     0   stevel 
     26     0   stevel #pragma ident	"%Z%%M%	%I%	%E% SMI"
     27     0   stevel 
     28     0   stevel /*
     29     0   stevel  * Libkvm Kernel Target SPARC v9 component
     30     0   stevel  *
     31     0   stevel  * This file provides the ISA-dependent portion of the libkvm kernel target.
     32     0   stevel  * For more details on the implementation refer to mdb_kvm.c.  The SPARC v9
     33     0   stevel  * ISA code is actually compiled into *both* the sparcv7 and sparcv9 MDB
     34     0   stevel  * binaries because we need to deal with the sparcv9 CPU registers when
     35     0   stevel  * debugging a 32-bit crash dump from a kernel running on a sparcv9 CPU.
     36     0   stevel  */
     37     0   stevel 
     38     0   stevel #ifndef __sparcv9cpu
     39     0   stevel #define	__sparcv9cpu
     40     0   stevel #endif
     41     0   stevel 
     42     0   stevel #include <sys/types.h>
     43     0   stevel #include <sys/machtypes.h>
     44     0   stevel #include <sys/regset.h>
     45     0   stevel #include <sys/frame.h>
     46     0   stevel #include <sys/stack.h>
     47     0   stevel #include <sys/sysmacros.h>
     48     0   stevel #include <sys/panic.h>
     49     0   stevel #include <strings.h>
     50     0   stevel 
     51     0   stevel #include <mdb/mdb_target_impl.h>
     52     0   stevel #include <mdb/mdb_disasm.h>
     53     0   stevel #include <mdb/mdb_modapi.h>
     54     0   stevel #include <mdb/mdb_conf.h>
     55     0   stevel #include <mdb/mdb_kreg_impl.h>
     56     0   stevel #include <mdb/mdb_v9util.h>
     57     0   stevel #include <mdb/mdb_kvm.h>
     58     0   stevel #include <mdb/mdb_err.h>
     59     0   stevel #include <mdb/mdb_debug.h>
     60     0   stevel #include <mdb/mdb.h>
     61     0   stevel 
     62     0   stevel #ifndef STACK_BIAS
     63     0   stevel #define	STACK_BIAS	0
     64     0   stevel #endif
     65     0   stevel 
     66     0   stevel static int
     67     0   stevel kt_getareg(mdb_tgt_t *t, mdb_tgt_tid_t tid,
     68     0   stevel     const char *rname, mdb_tgt_reg_t *rp)
     69     0   stevel {
     70     0   stevel 	const mdb_tgt_regdesc_t *rdp;
     71     0   stevel 	kt_data_t *kt = t->t_data;
     72     0   stevel 
     73     0   stevel 	if (tid != kt->k_tid)
     74     0   stevel 		return (set_errno(EMDB_NOREGS));
     75     0   stevel 
     76     0   stevel 	for (rdp = kt->k_rds; rdp->rd_name != NULL; rdp++) {
     77     0   stevel 		if (strcmp(rname, rdp->rd_name) == 0) {
     78     0   stevel 			*rp = kt->k_regs->kregs[rdp->rd_num];
     79     0   stevel 			return (0);
     80     0   stevel 		}
     81     0   stevel 	}
     82     0   stevel 
     83     0   stevel 	return (set_errno(EMDB_BADREG));
     84     0   stevel }
     85     0   stevel 
     86     0   stevel static int
     87     0   stevel kt_putareg(mdb_tgt_t *t, mdb_tgt_tid_t tid, const char *rname, mdb_tgt_reg_t r)
     88     0   stevel {
     89     0   stevel 	const mdb_tgt_regdesc_t *rdp;
     90     0   stevel 	kt_data_t *kt = t->t_data;
     91     0   stevel 
     92     0   stevel 	if (tid != kt->k_tid)
     93     0   stevel 		return (set_errno(EMDB_NOREGS));
     94     0   stevel 
     95     0   stevel 	for (rdp = kt->k_rds; rdp->rd_name != NULL; rdp++) {
     96     0   stevel 		if (strcmp(rname, rdp->rd_name) == 0) {
     97     0   stevel 			kt->k_regs->kregs[rdp->rd_num] = r;
     98     0   stevel 			return (0);
     99     0   stevel 		}
    100     0   stevel 	}
    101     0   stevel 
    102     0   stevel 	return (set_errno(EMDB_BADREG));
    103     0   stevel }
    104     0   stevel 
    105     0   stevel 	/*
    106     0   stevel 	 * - If we got a pc, invoke the call back function starting
    107     0   stevel 	 *   with gsp.
    108     0   stevel 	 * - If we got a saved pc (%i7), invoke the call back function
    109     0   stevel 	 *   starting with the first register window.
    110     0   stevel 	 * - If we got neither a pc nor a saved pc, invoke the call back
    111     0   stevel 	 *   function starting with the second register window.
    112     0   stevel 	 */
    113     0   stevel 
    114     0   stevel /*ARGSUSED*/
    115     0   stevel static int
    116     0   stevel kt_regs(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv)
    117     0   stevel {
    118  5084  johnlev 	mdb_v9printregs((const mdb_tgt_gregset_t *)addr);
    119     0   stevel 	return (DCMD_OK);
    120     0   stevel }
    121     0   stevel 
    122     0   stevel static int
    123     0   stevel kt_stack_common(uintptr_t addr, uint_t flags, int argc,
    124     0   stevel     const mdb_arg_t *argv, mdb_tgt_stack_f *func, kreg_t saved_pc)
    125     0   stevel {
    126     0   stevel 	kt_data_t *kt = mdb.m_target->t_data;
    127   436    dmick 	void *arg = (void *)(uintptr_t)mdb.m_nargs;
    128     0   stevel 	mdb_tgt_gregset_t gregs, *grp;
    129     0   stevel 
    130     0   stevel 	if (flags & DCMD_ADDRSPEC) {
    131     0   stevel 		bzero(&gregs, sizeof (gregs));
    132     0   stevel 		gregs.kregs[KREG_FP] = addr;
    133     0   stevel 		gregs.kregs[KREG_I7] = saved_pc;
    134     0   stevel 		grp = &gregs;
    135     0   stevel 	} else
    136     0   stevel 		grp = kt->k_regs;
    137     0   stevel 
    138     0   stevel 	if (argc != 0) {
    139     0   stevel 		if (argv->a_type == MDB_TYPE_CHAR || argc > 1)
    140     0   stevel 			return (DCMD_USAGE);
    141     0   stevel 
    142     0   stevel 		if (argv->a_type == MDB_TYPE_STRING)
    143   436    dmick 			arg = (void *)(uintptr_t)(uint_t)
    144   436    dmick 			    mdb_strtoull(argv->a_un.a_str);
    145     0   stevel 		else
    146   436    dmick 			arg = (void *)(uintptr_t)(uint_t)argv->a_un.a_val;
    147     0   stevel 	}
    148     0   stevel 
    149     0   stevel 	(void) mdb_kvm_v9stack_iter(mdb.m_target, grp, func, arg);
    150     0   stevel 	return (DCMD_OK);
    151     0   stevel }
    152     0   stevel 
    153     0   stevel static int
    154     0   stevel kt_stack(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv)
    155     0   stevel {
    156     0   stevel 	return (kt_stack_common(addr, flags, argc, argv, mdb_kvm_v9frame, 0));
    157     0   stevel }
    158     0   stevel 
    159     0   stevel static int
    160     0   stevel kt_stackv(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv)
    161     0   stevel {
    162     0   stevel 	return (kt_stack_common(addr, flags, argc, argv, mdb_kvm_v9framev, 0));
    163     0   stevel }
    164     0   stevel 
    165     0   stevel static int
    166     0   stevel kt_stackr(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv)
    167     0   stevel {
    168     0   stevel 	/*
    169     0   stevel 	 * Force printing of first register window by setting the
    170     0   stevel 	 * saved pc (%i7) to PC_FAKE.
    171     0   stevel 	 */
    172     0   stevel 	return (kt_stack_common(addr, flags, argc, argv, mdb_kvm_v9framer,
    173     0   stevel 	    PC_FAKE));
    174  5084  johnlev }
    175  5084  johnlev 
    176  5084  johnlev /*ARGSUSED*/
    177  5084  johnlev static int
    178  5084  johnlev kt_notsup(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv)
    179  5084  johnlev {
    180  5084  johnlev 	errno = EMDB_TGTNOTSUP;
    181  5084  johnlev 	return (DCMD_ERR);
    182     0   stevel }
    183     0   stevel 
    184     0   stevel const mdb_tgt_ops_t kt_sparcv9_ops = {
    185     0   stevel 	kt_setflags,				/* t_setflags */
    186     0   stevel 	kt_setcontext,				/* t_setcontext */
    187     0   stevel 	kt_activate,				/* t_activate */
    188     0   stevel 	kt_deactivate,				/* t_deactivate */
    189     0   stevel 	(void (*)()) mdb_tgt_nop,		/* t_periodic */
    190     0   stevel 	kt_destroy,				/* t_destroy */
    191     0   stevel 	kt_name,				/* t_name */
    192     0   stevel 	(const char *(*)()) mdb_conf_isa,	/* t_isa */
    193     0   stevel 	kt_platform,				/* t_platform */
    194     0   stevel 	kt_uname,				/* t_uname */
    195     0   stevel 	kt_dmodel,				/* t_dmodel */
    196     0   stevel 	kt_aread,				/* t_aread */
    197     0   stevel 	kt_awrite,				/* t_awrite */
    198     0   stevel 	kt_vread,				/* t_vread */
    199     0   stevel 	kt_vwrite,				/* t_vwrite */
    200     0   stevel 	kt_pread,				/* t_pread */
    201     0   stevel 	kt_pwrite,				/* t_pwrite */
    202     0   stevel 	kt_fread,				/* t_fread */
    203     0   stevel 	kt_fwrite,				/* t_fwrite */
    204     0   stevel 	(ssize_t (*)()) mdb_tgt_notsup,		/* t_ioread */
    205     0   stevel 	(ssize_t (*)()) mdb_tgt_notsup,		/* t_iowrite */
    206     0   stevel 	kt_vtop,				/* t_vtop */
    207     0   stevel 	kt_lookup_by_name,			/* t_lookup_by_name */
    208     0   stevel 	kt_lookup_by_addr,			/* t_lookup_by_addr */
    209     0   stevel 	kt_symbol_iter,				/* t_symbol_iter */
    210     0   stevel 	kt_mapping_iter,			/* t_mapping_iter */
    211     0   stevel 	kt_object_iter,				/* t_object_iter */
    212     0   stevel 	kt_addr_to_map,				/* t_addr_to_map */
    213     0   stevel 	kt_name_to_map,				/* t_name_to_map */
    214     0   stevel 	kt_addr_to_ctf,				/* t_addr_to_ctf */
    215     0   stevel 	kt_name_to_ctf,				/* t_name_to_ctf */
    216     0   stevel 	kt_status,				/* t_status */
    217     0   stevel 	(int (*)()) mdb_tgt_notsup,		/* t_run */
    218     0   stevel 	(int (*)()) mdb_tgt_notsup,		/* t_step */
    219     0   stevel 	(int (*)()) mdb_tgt_notsup,		/* t_step_out */
    220     0   stevel 	(int (*)()) mdb_tgt_notsup,		/* t_step_branch */
    221     0   stevel 	(int (*)()) mdb_tgt_notsup,		/* t_next */
    222     0   stevel 	(int (*)()) mdb_tgt_notsup,		/* t_cont */
    223     0   stevel 	(int (*)()) mdb_tgt_notsup,		/* t_signal */
    224     0   stevel 	(int (*)()) mdb_tgt_null,		/* t_add_vbrkpt */
    225     0   stevel 	(int (*)()) mdb_tgt_null,		/* t_add_sbrkpt */
    226     0   stevel 	(int (*)()) mdb_tgt_null,		/* t_add_pwapt */
    227     0   stevel 	(int (*)()) mdb_tgt_null,		/* t_add_iowapt */
    228     0   stevel 	(int (*)()) mdb_tgt_null,		/* t_add_vwapt */
    229     0   stevel 	(int (*)()) mdb_tgt_null,		/* t_add_sysenter */
    230     0   stevel 	(int (*)()) mdb_tgt_null,		/* t_add_sysexit */
    231     0   stevel 	(int (*)()) mdb_tgt_null,		/* t_add_signal */
    232     0   stevel 	(int (*)()) mdb_tgt_null,		/* t_add_fault */
    233     0   stevel 	kt_getareg,				/* t_getareg */
    234     0   stevel 	kt_putareg,				/* t_putareg */
    235     0   stevel 	mdb_kvm_v9stack_iter,			/* t_stack_iter */
    236  6473      edp 	(int (*)()) mdb_tgt_notsup		/* t_auxv */
    237     0   stevel };
    238     0   stevel 
    239     0   stevel void
    240     0   stevel kt_sparcv9_init(mdb_tgt_t *t)
    241     0   stevel {
    242     0   stevel 	kt_data_t *kt = t->t_data;
    243     0   stevel 
    244     0   stevel 	struct rwindow rwin;
    245     0   stevel 	panic_data_t pd;
    246     0   stevel 	label_t label;
    247     0   stevel 	kreg_t *kregs;
    248     0   stevel 
    249     0   stevel 	uint64_t tick;
    250     0   stevel 	uint32_t pil;
    251     0   stevel 
    252     0   stevel 	/*
    253     0   stevel 	 * Initialize the machine-dependent parts of the kernel target
    254     0   stevel 	 * structure.  Once this is complete and we fill in the ops
    255     0   stevel 	 * vector, the target is now fully constructed and we can use
    256     0   stevel 	 * the target API itself to perform the rest of our initialization.
    257     0   stevel 	 */
    258     0   stevel 	kt->k_rds = mdb_sparcv9_kregs;
    259     0   stevel 	kt->k_regs = mdb_zalloc(sizeof (mdb_tgt_gregset_t), UM_SLEEP);
    260     0   stevel 	kt->k_regsize = sizeof (mdb_tgt_gregset_t);
    261     0   stevel 	kt->k_dcmd_regs = kt_regs;
    262     0   stevel 	kt->k_dcmd_stack = kt_stack;
    263     0   stevel 	kt->k_dcmd_stackv = kt_stackv;
    264     0   stevel 	kt->k_dcmd_stackr = kt_stackr;
    265  5084  johnlev 	kt->k_dcmd_cpustack = kt_notsup;
    266  5084  johnlev 	kt->k_dcmd_cpuregs = kt_notsup;
    267     0   stevel 
    268     0   stevel 	t->t_ops = &kt_sparcv9_ops;
    269     0   stevel 	kregs = kt->k_regs->kregs;
    270     0   stevel 
    271     0   stevel 	(void) mdb_dis_select("v9plus");
    272     0   stevel 
    273     0   stevel 	/*
    274     0   stevel 	 * Don't attempt to load any thread or register information if
    275     0   stevel 	 * we're examining the live operating system.
    276     0   stevel 	 */
    277     0   stevel 	if (strcmp(kt->k_symfile, "/dev/ksyms") == 0)
    278     0   stevel 		return;
    279     0   stevel 
    280     0   stevel 	/*
    281     0   stevel 	 * If the panicbuf symbol is present and we can consume a panicbuf
    282     0   stevel 	 * header of the appropriate version from this address, then
    283     0   stevel 	 * we can initialize our current register set based on its contents:
    284     0   stevel 	 */
    285     0   stevel 	if (mdb_tgt_readsym(t, MDB_TGT_AS_VIRT, &pd, sizeof (pd),
    286     0   stevel 	    MDB_TGT_OBJ_EXEC, "panicbuf") == sizeof (pd) &&
    287     0   stevel 	    pd.pd_version == PANICBUFVERS) {
    288     0   stevel 
    289     0   stevel 		size_t pd_size = MIN(PANICBUFSIZE, pd.pd_msgoff);
    290     0   stevel 		panic_data_t *pdp = mdb_zalloc(pd_size, UM_SLEEP);
    291     0   stevel 		uint_t i, n;
    292     0   stevel 
    293     0   stevel 		(void) mdb_tgt_readsym(t, MDB_TGT_AS_VIRT, pdp, pd_size,
    294     0   stevel 		    MDB_TGT_OBJ_EXEC, "panicbuf");
    295     0   stevel 
    296     0   stevel 		n = (pd_size - (sizeof (panic_data_t) -
    297     0   stevel 		    sizeof (panic_nv_t))) / sizeof (panic_nv_t);
    298     0   stevel 
    299     0   stevel 		for (i = 0; i < n; i++) {
    300     0   stevel 			const char *name = pdp->pd_nvdata[i].pnv_name;
    301     0   stevel 			uint64_t value = pdp->pd_nvdata[i].pnv_value;
    302     0   stevel 
    303     0   stevel 			if (strcmp(name, "tstate") == 0) {
    304     0   stevel 				kregs[KREG_CCR] = KREG_TSTATE_CCR(value);
    305     0   stevel 				kregs[KREG_ASI] = KREG_TSTATE_ASI(value);
    306     0   stevel 				kregs[KREG_PSTATE] = KREG_TSTATE_PSTATE(value);
    307     0   stevel 				kregs[KREG_CWP] = KREG_TSTATE_CWP(value);
    308     0   stevel 			} else
    309     0   stevel 				(void) kt_putareg(t, kt->k_tid, name, value);
    310     0   stevel 		}
    311     0   stevel 
    312     0   stevel 		mdb_free(pdp, pd_size);
    313     0   stevel 	}
    314     0   stevel 
    315     0   stevel 	/*
    316     0   stevel 	 * Prior to the re-structuring of panicbuf, our only register data
    317     0   stevel 	 * was the panic_regs label_t, into which a setjmp() was performed.
    318     0   stevel 	 */
    319     0   stevel 	if (kregs[KREG_PC] == 0 && kregs[KREG_SP] == 0 &&
    320     0   stevel 	    mdb_tgt_readsym(t, MDB_TGT_AS_VIRT, &label, sizeof (label),
    321     0   stevel 	    MDB_TGT_OBJ_EXEC, "panic_regs") == sizeof (label)) {
    322     0   stevel 
    323     0   stevel 		kregs[KREG_PC] = label.val[0];
    324     0   stevel 		kregs[KREG_SP] = label.val[1];
    325     0   stevel 	}
    326     0   stevel 
    327     0   stevel 	/*
    328     0   stevel 	 * If we can read a saved register window from the stack at %sp,
    329     0   stevel 	 * we can also fill in the locals and inputs.
    330     0   stevel 	 */
    331     0   stevel 	if (kregs[KREG_SP] != 0 && mdb_tgt_vread(t, &rwin, sizeof (rwin),
    332     0   stevel 	    kregs[KREG_SP] + STACK_BIAS) == sizeof (rwin)) {
    333     0   stevel 
    334     0   stevel 		kregs[KREG_L0] = rwin.rw_local[0];
    335     0   stevel 		kregs[KREG_L1] = rwin.rw_local[1];
    336     0   stevel 		kregs[KREG_L2] = rwin.rw_local[2];
    337     0   stevel 		kregs[KREG_L3] = rwin.rw_local[3];
    338     0   stevel 		kregs[KREG_L4] = rwin.rw_local[4];
    339     0   stevel 		kregs[KREG_L5] = rwin.rw_local[5];
    340     0   stevel 		kregs[KREG_L6] = rwin.rw_local[6];
    341     0   stevel 		kregs[KREG_L7] = rwin.rw_local[7];
    342     0   stevel 
    343     0   stevel 		kregs[KREG_I0] = rwin.rw_in[0];
    344     0   stevel 		kregs[KREG_I1] = rwin.rw_in[1];
    345     0   stevel 		kregs[KREG_I2] = rwin.rw_in[2];
    346     0   stevel 		kregs[KREG_I3] = rwin.rw_in[3];
    347     0   stevel 		kregs[KREG_I4] = rwin.rw_in[4];
    348     0   stevel 		kregs[KREG_I5] = rwin.rw_in[5];
    349     0   stevel 		kregs[KREG_I6] = rwin.rw_in[6];
    350     0   stevel 		kregs[KREG_I7] = rwin.rw_in[7];
    351     0   stevel 
    352     0   stevel 	} else if (kregs[KREG_SP] != 0) {
    353     0   stevel 		warn("failed to read rwindow at %p -- current "
    354     0   stevel 		    "frame inputs will be unavailable\n",
    355   436    dmick 		    (void *)(uintptr_t)(kregs[KREG_SP] + STACK_BIAS));
    356     0   stevel 	}
    357     0   stevel 
    358     0   stevel 	/*
    359     0   stevel 	 * The panic_ipl variable records the IPL of the panic CPU,
    360     0   stevel 	 * which on sparcv9 is the %pil register's value.
    361     0   stevel 	 */
    362     0   stevel 	if (mdb_tgt_readsym(t, MDB_TGT_AS_VIRT, &pil, sizeof (pil),
    363     0   stevel 	    MDB_TGT_OBJ_EXEC, "panic_ipl") == sizeof (pil))
    364     0   stevel 		kregs[KREG_PIL] = pil;
    365     0   stevel 
    366     0   stevel 	/*
    367     0   stevel 	 * The panic_tick variable records %tick at the approximate
    368     0   stevel 	 * time of the panic in a DEBUG kernel.
    369     0   stevel 	 */
    370     0   stevel 	if (mdb_tgt_readsym(t, MDB_TGT_AS_VIRT, &tick, sizeof (tick),
    371     0   stevel 	    MDB_TGT_OBJ_EXEC, "panic_tick") == sizeof (tick))
    372     0   stevel 		kregs[KREG_TICK] = tick;
    373     0   stevel }
    374