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 v7 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. 33 0 stevel */ 34 0 stevel 35 0 stevel #include <sys/types.h> 36 0 stevel #include <sys/machtypes.h> 37 0 stevel #include <sys/regset.h> 38 0 stevel #include <sys/frame.h> 39 0 stevel #include <sys/stack.h> 40 0 stevel #include <sys/sysmacros.h> 41 0 stevel #include <sys/panic.h> 42 0 stevel #include <strings.h> 43 0 stevel 44 0 stevel #include <mdb/mdb_target_impl.h> 45 0 stevel #include <mdb/mdb_disasm.h> 46 0 stevel #include <mdb/mdb_modapi.h> 47 0 stevel #include <mdb/mdb_conf.h> 48 0 stevel #include <mdb/mdb_kreg.h> 49 0 stevel #include <mdb/mdb_kvm.h> 50 0 stevel #include <mdb/mdb_err.h> 51 0 stevel #include <mdb/mdb_debug.h> 52 0 stevel #include <mdb/mdb.h> 53 0 stevel 54 0 stevel /* 55 0 stevel * The mdb_tgt_gregset type is opaque to callers of the target interface 56 0 stevel * and to our own target common code. We now can define it explicitly. 57 0 stevel */ 58 0 stevel struct mdb_tgt_gregset { 59 0 stevel kreg_t kregs[KREG_NGREG]; 60 0 stevel }; 61 0 stevel 62 0 stevel /* 63 0 stevel * We also define an array of register names and their corresponding 64 0 stevel * array indices. This is used by the getareg and putareg entry points, 65 0 stevel * and also by our register variable discipline. 66 0 stevel */ 67 0 stevel static const mdb_tgt_regdesc_t kt_sparcv7_regs[] = { 68 0 stevel { "g0", KREG_G0, MDB_TGT_R_EXPORT }, 69 0 stevel { "g1", KREG_G1, MDB_TGT_R_EXPORT }, 70 0 stevel { "g2", KREG_G2, MDB_TGT_R_EXPORT }, 71 0 stevel { "g3", KREG_G3, MDB_TGT_R_EXPORT }, 72 0 stevel { "g4", KREG_G4, MDB_TGT_R_EXPORT }, 73 0 stevel { "g5", KREG_G5, MDB_TGT_R_EXPORT }, 74 0 stevel { "g6", KREG_G6, MDB_TGT_R_EXPORT }, 75 0 stevel { "g7", KREG_G7, MDB_TGT_R_EXPORT }, 76 0 stevel { "o0", KREG_O0, MDB_TGT_R_EXPORT }, 77 0 stevel { "o1", KREG_O1, MDB_TGT_R_EXPORT }, 78 0 stevel { "o2", KREG_O2, MDB_TGT_R_EXPORT }, 79 0 stevel { "o3", KREG_O3, MDB_TGT_R_EXPORT }, 80 0 stevel { "o4", KREG_O4, MDB_TGT_R_EXPORT }, 81 0 stevel { "o5", KREG_O5, MDB_TGT_R_EXPORT }, 82 0 stevel { "o6", KREG_O6, MDB_TGT_R_EXPORT }, 83 0 stevel { "o7", KREG_O7, MDB_TGT_R_EXPORT }, 84 0 stevel { "l0", KREG_L0, MDB_TGT_R_EXPORT }, 85 0 stevel { "l1", KREG_L1, MDB_TGT_R_EXPORT }, 86 0 stevel { "l2", KREG_L2, MDB_TGT_R_EXPORT }, 87 0 stevel { "l3", KREG_L3, MDB_TGT_R_EXPORT }, 88 0 stevel { "l4", KREG_L4, MDB_TGT_R_EXPORT }, 89 0 stevel { "l5", KREG_L5, MDB_TGT_R_EXPORT }, 90 0 stevel { "l6", KREG_L6, MDB_TGT_R_EXPORT }, 91 0 stevel { "l7", KREG_L7, MDB_TGT_R_EXPORT }, 92 0 stevel { "i0", KREG_I0, MDB_TGT_R_EXPORT }, 93 0 stevel { "i1", KREG_I1, MDB_TGT_R_EXPORT }, 94 0 stevel { "i2", KREG_I2, MDB_TGT_R_EXPORT }, 95 0 stevel { "i3", KREG_I3, MDB_TGT_R_EXPORT }, 96 0 stevel { "i4", KREG_I4, MDB_TGT_R_EXPORT }, 97 0 stevel { "i5", KREG_I5, MDB_TGT_R_EXPORT }, 98 0 stevel { "i6", KREG_I6, MDB_TGT_R_EXPORT }, 99 0 stevel { "i7", KREG_I7, MDB_TGT_R_EXPORT }, 100 0 stevel { "psr", KREG_PSR, MDB_TGT_R_EXPORT }, 101 0 stevel { "pc", KREG_PC, MDB_TGT_R_EXPORT }, 102 0 stevel { "npc", KREG_NPC, MDB_TGT_R_EXPORT }, 103 0 stevel { "y", KREG_Y, 0 }, 104 0 stevel { "wim", KREG_WIM, MDB_TGT_R_EXPORT | MDB_TGT_R_PRIV }, 105 0 stevel { "tbr", KREG_TBR, MDB_TGT_R_EXPORT | MDB_TGT_R_PRIV }, 106 0 stevel { "sp", KREG_SP, MDB_TGT_R_EXPORT | MDB_TGT_R_ALIAS }, 107 0 stevel { "fp", KREG_FP, MDB_TGT_R_EXPORT | MDB_TGT_R_ALIAS }, 108 0 stevel { NULL, 0, 0 } 109 0 stevel }; 110 0 stevel 111 0 stevel static int 112 0 stevel kt_getareg(mdb_tgt_t *t, mdb_tgt_tid_t tid, 113 0 stevel const char *rname, mdb_tgt_reg_t *rp) 114 0 stevel { 115 0 stevel const mdb_tgt_regdesc_t *rdp; 116 0 stevel kt_data_t *kt = t->t_data; 117 0 stevel 118 0 stevel if (tid != kt->k_tid) 119 0 stevel return (set_errno(EMDB_NOREGS)); 120 0 stevel 121 0 stevel for (rdp = kt->k_rds; rdp->rd_name != NULL; rdp++) { 122 0 stevel if (strcmp(rname, rdp->rd_name) == 0) { 123 0 stevel *rp = kt->k_regs->kregs[rdp->rd_num]; 124 0 stevel return (0); 125 0 stevel } 126 0 stevel } 127 0 stevel 128 0 stevel return (set_errno(EMDB_BADREG)); 129 0 stevel } 130 0 stevel 131 0 stevel static int 132 0 stevel kt_putareg(mdb_tgt_t *t, mdb_tgt_tid_t tid, const char *rname, mdb_tgt_reg_t r) 133 0 stevel { 134 0 stevel const mdb_tgt_regdesc_t *rdp; 135 0 stevel kt_data_t *kt = t->t_data; 136 0 stevel 137 0 stevel if (tid != kt->k_tid) 138 0 stevel return (set_errno(EMDB_NOREGS)); 139 0 stevel 140 0 stevel for (rdp = kt->k_rds; rdp->rd_name != NULL; rdp++) { 141 0 stevel if (strcmp(rname, rdp->rd_name) == 0) { 142 0 stevel kt->k_regs->kregs[rdp->rd_num] = r; 143 0 stevel return (0); 144 0 stevel } 145 0 stevel } 146 0 stevel 147 0 stevel return (set_errno(EMDB_BADREG)); 148 0 stevel } 149 0 stevel 150 0 stevel static int 151 0 stevel kt_stack_iter(mdb_tgt_t *t, const mdb_tgt_gregset_t *gsp, 152 0 stevel mdb_tgt_stack_f *func, void *arg) 153 0 stevel { 154 0 stevel mdb_tgt_gregset_t gregs; 155 0 stevel kreg_t *kregs = &gregs.kregs[0]; 156 0 stevel int got_pc = (gsp->kregs[KREG_PC] != 0); 157 0 stevel 158 0 stevel struct rwindow rwin; 159 0 stevel uintptr_t sp; 160 0 stevel long argv[6]; 161 0 stevel int i; 162 0 stevel 163 0 stevel bcopy(gsp, &gregs, sizeof (gregs)); 164 0 stevel 165 0 stevel for (;;) { 166 0 stevel for (i = 0; i < 6; i++) 167 0 stevel argv[i] = kregs[KREG_I0 + i]; 168 0 stevel 169 0 stevel if (got_pc && func(arg, kregs[KREG_PC], 6, argv, &gregs) != 0) 170 0 stevel break; 171 0 stevel 172 0 stevel kregs[KREG_PC] = kregs[KREG_I7]; 173 0 stevel kregs[KREG_NPC] = kregs[KREG_PC] + 4; 174 0 stevel 175 0 stevel bcopy(&kregs[KREG_I0], &kregs[KREG_O0], 8 * sizeof (kreg_t)); 176 0 stevel got_pc |= (kregs[KREG_PC] != 0); 177 0 stevel 178 0 stevel if ((sp = kregs[KREG_FP]) == 0) 179 0 stevel break; /* Stop if we're at the end of the stack */ 180 0 stevel 181 0 stevel if (sp & (STACK_ALIGN - 1)) 182 0 stevel return (set_errno(EMDB_STKALIGN)); 183 0 stevel 184 0 stevel if (mdb_tgt_vread(t, &rwin, sizeof (rwin), sp) != sizeof (rwin)) 185 0 stevel return (-1); /* Failed to read frame */ 186 0 stevel 187 0 stevel for (i = 0; i < 8; i++) 188 0 stevel kregs[KREG_L0 + i] = (uintptr_t)rwin.rw_local[i]; 189 0 stevel for (i = 0; i < 8; i++) 190 0 stevel kregs[KREG_I0 + i] = (uintptr_t)rwin.rw_in[i]; 191 0 stevel } 192 0 stevel 193 0 stevel return (0); 194 0 stevel } 195 0 stevel 196 0 stevel /*ARGSUSED*/ 197 0 stevel static int 198 0 stevel kt_regs(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) 199 0 stevel { 200 5084 johnlev mdb_tgt_gregset_t *k_regs = (mdb_tgt_gregset_t *)addr; 201 5084 johnlev const kreg_t *kregs = &k_regs->kregs[0]; 202 0 stevel 203 0 stevel if (argc != 0 || (flags & DCMD_ADDRSPEC)) 204 0 stevel return (DCMD_USAGE); 205 0 stevel 206 0 stevel #define GETREG2(x) ((uintptr_t)kregs[(x)]), ((uintptr_t)kregs[(x)]) 207 0 stevel 208 0 stevel mdb_printf("%%g0 = 0x%0?p %15A %%l0 = 0x%0?p %A\n", 209 0 stevel GETREG2(KREG_G0), GETREG2(KREG_L0)); 210 0 stevel 211 0 stevel mdb_printf("%%g1 = 0x%0?p %15A %%l1 = 0x%0?p %A\n", 212 0 stevel GETREG2(KREG_G1), GETREG2(KREG_L1)); 213 0 stevel 214 0 stevel mdb_printf("%%g2 = 0x%0?p %15A %%l2 = 0x%0?p %A\n", 215 0 stevel GETREG2(KREG_G2), GETREG2(KREG_L2)); 216 0 stevel 217 0 stevel mdb_printf("%%g3 = 0x%0?p %15A %%l3 = 0x%0?p %A\n", 218 0 stevel GETREG2(KREG_G3), GETREG2(KREG_L3)); 219 0 stevel 220 0 stevel mdb_printf("%%g4 = 0x%0?p %15A %%l4 = 0x%0?p %A\n", 221 0 stevel GETREG2(KREG_G4), GETREG2(KREG_L4)); 222 0 stevel 223 0 stevel mdb_printf("%%g5 = 0x%0?p %15A %%l5 = 0x%0?p %A\n", 224 0 stevel GETREG2(KREG_G5), GETREG2(KREG_L5)); 225 0 stevel 226 0 stevel mdb_printf("%%g6 = 0x%0?p %15A %%l6 = 0x%0?p %A\n", 227 0 stevel GETREG2(KREG_G6), GETREG2(KREG_L6)); 228 0 stevel 229 0 stevel mdb_printf("%%g7 = 0x%0?p %15A %%l7 = 0x%0?p %A\n\n", 230 0 stevel GETREG2(KREG_G7), GETREG2(KREG_L7)); 231 0 stevel 232 0 stevel mdb_printf("%%o0 = 0x%0?p %15A %%i0 = 0x%0?p %A\n", 233 0 stevel GETREG2(KREG_O0), GETREG2(KREG_I0)); 234 0 stevel 235 0 stevel mdb_printf("%%o1 = 0x%0?p %15A %%i1 = 0x%0?p %A\n", 236 0 stevel GETREG2(KREG_O1), GETREG2(KREG_I1)); 237 0 stevel 238 0 stevel mdb_printf("%%o2 = 0x%0?p %15A %%i2 = 0x%0?p %A\n", 239 0 stevel GETREG2(KREG_O2), GETREG2(KREG_I2)); 240 0 stevel 241 0 stevel mdb_printf("%%o3 = 0x%0?p %15A %%i3 = 0x%0?p %A\n", 242 0 stevel GETREG2(KREG_O3), GETREG2(KREG_I3)); 243 0 stevel 244 0 stevel mdb_printf("%%o4 = 0x%0?p %15A %%i4 = 0x%0?p %A\n", 245 0 stevel GETREG2(KREG_O4), GETREG2(KREG_I4)); 246 0 stevel 247 0 stevel mdb_printf("%%o5 = 0x%0?p %15A %%i5 = 0x%0?p %A\n", 248 0 stevel GETREG2(KREG_O5), GETREG2(KREG_I5)); 249 0 stevel 250 0 stevel mdb_printf("%%o6 = 0x%0?p %15A %%i6 = 0x%0?p %A\n", 251 0 stevel GETREG2(KREG_O6), GETREG2(KREG_I6)); 252 0 stevel 253 0 stevel mdb_printf("%%o7 = 0x%0?p %15A %%i7 = 0x%0?p %A\n\n", 254 0 stevel GETREG2(KREG_O7), GETREG2(KREG_I7)); 255 0 stevel 256 0 stevel mdb_printf(" %%psr = 0x%08x impl=0x%x ver=0x%x icc=%c%c%c%c\n" 257 0 stevel " ec=%u ef=%u pil=%u s=%u ps=%u et=%u cwp=0x%x\n", 258 0 stevel kregs[KREG_PSR], 259 0 stevel (kregs[KREG_PSR] & KREG_PSR_IMPL_MASK) >> KREG_PSR_IMPL_SHIFT, 260 0 stevel (kregs[KREG_PSR] & KREG_PSR_VER_MASK) >> KREG_PSR_VER_SHIFT, 261 0 stevel (kregs[KREG_PSR] & KREG_PSR_ICC_N_MASK) ? 'N' : 'n', 262 0 stevel (kregs[KREG_PSR] & KREG_PSR_ICC_Z_MASK) ? 'Z' : 'z', 263 0 stevel (kregs[KREG_PSR] & KREG_PSR_ICC_V_MASK) ? 'V' : 'v', 264 0 stevel (kregs[KREG_PSR] & KREG_PSR_ICC_C_MASK) ? 'C' : 'c', 265 0 stevel kregs[KREG_PSR] & KREG_PSR_EC_MASK, 266 0 stevel kregs[KREG_PSR] & KREG_PSR_EF_MASK, 267 0 stevel (kregs[KREG_PSR] & KREG_PSR_PIL_MASK) >> KREG_PSR_PIL_SHIFT, 268 0 stevel kregs[KREG_PSR] & KREG_PSR_S_MASK, 269 0 stevel kregs[KREG_PSR] & KREG_PSR_PS_MASK, 270 0 stevel kregs[KREG_PSR] & KREG_PSR_ET_MASK, 271 0 stevel (kregs[KREG_PSR] & KREG_PSR_CWP_MASK) >> KREG_PSR_CWP_SHIFT); 272 0 stevel 273 0 stevel mdb_printf(" %%y = 0x%0?p\n", kregs[KREG_Y]); 274 0 stevel 275 0 stevel mdb_printf(" %%pc = 0x%0?p %A\n", GETREG2(KREG_PC)); 276 0 stevel mdb_printf(" %%npc = 0x%0?p %A\n", GETREG2(KREG_NPC)); 277 0 stevel 278 0 stevel mdb_printf(" %%sp = 0x%0?p\n", kregs[KREG_SP]); 279 0 stevel mdb_printf(" %%fp = 0x%0?p\n\n", kregs[KREG_FP]); 280 0 stevel 281 0 stevel mdb_printf(" %%wim = 0x%08lx\n", kregs[KREG_WIM]); 282 0 stevel mdb_printf(" %%tbr = 0x%08lx\n", kregs[KREG_TBR]); 283 0 stevel 284 0 stevel return (DCMD_OK); 285 0 stevel } 286 0 stevel 287 0 stevel /*ARGSUSED*/ 288 0 stevel static int 289 0 stevel kt_frame(void *arglim, uintptr_t pc, uint_t argc, const long *argv, 290 0 stevel const mdb_tgt_gregset_t *gregs) 291 0 stevel { 292 0 stevel argc = MIN(argc, (uint_t)arglim); 293 0 stevel mdb_printf("%a(", pc); 294 0 stevel 295 0 stevel if (argc != 0) { 296 0 stevel mdb_printf("%lr", *argv++); 297 0 stevel for (argc--; argc != 0; argc--) 298 0 stevel mdb_printf(", %lr", *argv++); 299 0 stevel } 300 0 stevel 301 0 stevel mdb_printf(")\n"); 302 0 stevel return (0); 303 0 stevel } 304 0 stevel 305 0 stevel static int 306 0 stevel kt_framev(void *arglim, uintptr_t pc, uint_t argc, const long *argv, 307 0 stevel const mdb_tgt_gregset_t *gregs) 308 0 stevel { 309 0 stevel argc = MIN(argc, (uint_t)arglim); 310 0 stevel mdb_printf("%0?lr %a(", gregs->kregs[KREG_SP], pc); 311 0 stevel 312 0 stevel if (argc != 0) { 313 0 stevel mdb_printf("%lr", *argv++); 314 0 stevel for (argc--; argc != 0; argc--) 315 0 stevel mdb_printf(", %lr", *argv++); 316 0 stevel } 317 0 stevel 318 0 stevel mdb_printf(")\n"); 319 0 stevel return (0); 320 0 stevel } 321 0 stevel 322 0 stevel static int 323 0 stevel kt_stack_common(uintptr_t addr, uint_t flags, int argc, 324 0 stevel const mdb_arg_t *argv, mdb_tgt_stack_f *func) 325 0 stevel { 326 0 stevel kt_data_t *kt = mdb.m_target->t_data; 327 0 stevel void *arg = (void *)mdb.m_nargs; 328 0 stevel mdb_tgt_gregset_t gregs, *grp; 329 0 stevel 330 0 stevel if (flags & DCMD_ADDRSPEC) { 331 0 stevel bzero(&gregs, sizeof (gregs)); 332 0 stevel gregs.kregs[KREG_FP] = addr; 333 0 stevel grp = &gregs; 334 0 stevel } else 335 0 stevel grp = kt->k_regs; 336 0 stevel 337 0 stevel if (argc != 0) { 338 0 stevel if (argv->a_type == MDB_TYPE_CHAR || argc > 1) 339 0 stevel return (DCMD_USAGE); 340 0 stevel 341 0 stevel if (argv->a_type == MDB_TYPE_STRING) 342 0 stevel arg = (void *)(uint_t)mdb_strtoull(argv->a_un.a_str); 343 0 stevel else 344 0 stevel arg = (void *)(uint_t)argv->a_un.a_val; 345 0 stevel } 346 0 stevel 347 0 stevel (void) kt_stack_iter(mdb.m_target, grp, func, arg); 348 0 stevel return (DCMD_OK); 349 0 stevel } 350 0 stevel 351 0 stevel static int 352 0 stevel kt_stack(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) 353 0 stevel { 354 0 stevel return (kt_stack_common(addr, flags, argc, argv, kt_frame)); 355 0 stevel } 356 0 stevel 357 0 stevel static int 358 0 stevel kt_stackv(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) 359 0 stevel { 360 0 stevel return (kt_stack_common(addr, flags, argc, argv, kt_framev)); 361 0 stevel } 362 0 stevel 363 5084 johnlev /*ARGSUSED*/ 364 5084 johnlev static int 365 5084 johnlev kt_notsup(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) 366 5084 johnlev { 367 5084 johnlev errno = EMDB_TGTNOTSUP; 368 5084 johnlev return (DCMD_ERR); 369 5084 johnlev } 370 5084 johnlev 371 0 stevel const mdb_tgt_ops_t kt_sparcv7_ops = { 372 0 stevel kt_setflags, /* t_setflags */ 373 0 stevel kt_setcontext, /* t_setcontext */ 374 0 stevel kt_activate, /* t_activate */ 375 0 stevel kt_deactivate, /* t_deactivate */ 376 0 stevel (void (*)()) mdb_tgt_nop, /* t_periodic */ 377 0 stevel kt_destroy, /* t_destroy */ 378 0 stevel kt_name, /* t_name */ 379 0 stevel (const char *(*)()) mdb_conf_isa, /* t_isa */ 380 0 stevel kt_platform, /* t_platform */ 381 0 stevel kt_uname, /* t_uname */ 382 0 stevel kt_dmodel, /* t_dmodel */ 383 0 stevel kt_aread, /* t_aread */ 384 0 stevel kt_awrite, /* t_awrite */ 385 0 stevel kt_vread, /* t_vread */ 386 0 stevel kt_vwrite, /* t_vwrite */ 387 0 stevel kt_pread, /* t_pread */ 388 0 stevel kt_pwrite, /* t_pwrite */ 389 0 stevel kt_fread, /* t_fread */ 390 0 stevel kt_fwrite, /* t_fwrite */ 391 0 stevel (ssize_t (*)()) mdb_tgt_notsup, /* t_ioread */ 392 0 stevel (ssize_t (*)()) mdb_tgt_notsup, /* t_iowrite */ 393 0 stevel kt_vtop, /* t_vtop */ 394 0 stevel kt_lookup_by_name, /* t_lookup_by_name */ 395 0 stevel kt_lookup_by_addr, /* t_lookup_by_addr */ 396 0 stevel kt_symbol_iter, /* t_symbol_iter */ 397 0 stevel kt_mapping_iter, /* t_mapping_iter */ 398 0 stevel kt_object_iter, /* t_object_iter */ 399 0 stevel kt_addr_to_map, /* t_addr_to_map */ 400 0 stevel kt_name_to_map, /* t_name_to_map */ 401 0 stevel kt_addr_to_ctf, /* t_addr_to_ctf */ 402 0 stevel kt_name_to_ctf, /* t_name_to_ctf */ 403 0 stevel kt_status, /* t_status */ 404 0 stevel (int (*)()) mdb_tgt_notsup, /* t_run */ 405 0 stevel (int (*)()) mdb_tgt_notsup, /* t_step */ 406 0 stevel (int (*)()) mdb_tgt_notsup, /* t_step_out */ 407 0 stevel (int (*)()) mdb_tgt_notsup, /* t_step_branch */ 408 0 stevel (int (*)()) mdb_tgt_notsup, /* t_next */ 409 0 stevel (int (*)()) mdb_tgt_notsup, /* t_cont */ 410 0 stevel (int (*)()) mdb_tgt_notsup, /* t_signal */ 411 0 stevel (int (*)()) mdb_tgt_null, /* t_add_vbrkpt */ 412 0 stevel (int (*)()) mdb_tgt_null, /* t_add_sbrkpt */ 413 0 stevel (int (*)()) mdb_tgt_null, /* t_add_pwapt */ 414 0 stevel (int (*)()) mdb_tgt_null, /* t_add_vwapt */ 415 0 stevel (int (*)()) mdb_tgt_null, /* t_add_iowapt */ 416 0 stevel (int (*)()) mdb_tgt_null, /* t_add_sysenter */ 417 0 stevel (int (*)()) mdb_tgt_null, /* t_add_sysexit */ 418 0 stevel (int (*)()) mdb_tgt_null, /* t_add_signal */ 419 0 stevel (int (*)()) mdb_tgt_null, /* t_add_fault */ 420 0 stevel kt_getareg, /* t_getareg */ 421 0 stevel kt_putareg, /* t_putareg */ 422 0 stevel kt_stack_iter, /* t_stack_iter */ 423 6473 edp (int (*)()) mdb_tgt_notsup /* t_auxv */ 424 0 stevel }; 425 0 stevel 426 0 stevel void 427 0 stevel kt_sparcv7_init(mdb_tgt_t *t) 428 0 stevel { 429 0 stevel kt_data_t *kt = t->t_data; 430 0 stevel 431 0 stevel struct rwindow rwin; 432 0 stevel panic_data_t pd; 433 0 stevel label_t label; 434 0 stevel kreg_t *kregs; 435 0 stevel 436 0 stevel /* 437 0 stevel * Initialize the machine-dependent parts of the kernel target 438 0 stevel * structure. Once this is complete and we fill in the ops 439 0 stevel * vector, the target is now fully constructed and we can use 440 0 stevel * the target API itself to perform the rest of our initialization. 441 0 stevel */ 442 0 stevel kt->k_rds = kt_sparcv7_regs; 443 0 stevel kt->k_regs = mdb_zalloc(sizeof (mdb_tgt_gregset_t), UM_SLEEP); 444 0 stevel kt->k_regsize = sizeof (mdb_tgt_gregset_t); 445 0 stevel kt->k_dcmd_regs = kt_regs; 446 0 stevel kt->k_dcmd_stack = kt_stack; 447 0 stevel kt->k_dcmd_stackv = kt_stackv; 448 0 stevel kt->k_dcmd_stackr = kt_stackv; 449 5084 johnlev kt->k_dcmd_cpustack = kt_notsup; 450 5084 johnlev kt->k_dcmd_cpuregs = kt_notsup; 451 0 stevel 452 0 stevel t->t_ops = &kt_sparcv7_ops; 453 0 stevel kregs = kt->k_regs->kregs; 454 0 stevel 455 0 stevel (void) mdb_dis_select("v8"); 456 0 stevel 457 0 stevel /* 458 0 stevel * Don't attempt to load any thread or register information if 459 0 stevel * we're examining the live operating system. 460 0 stevel */ 461 0 stevel if (strcmp(kt->k_symfile, "/dev/ksyms") == 0) 462 0 stevel return; 463 0 stevel 464 0 stevel /* 465 0 stevel * If the panicbuf symbol is present and we can consume a panicbuf 466 0 stevel * header of the appropriate version from this address, then 467 0 stevel * we can initialize our current register set based on its contents: 468 0 stevel */ 469 0 stevel if (mdb_tgt_readsym(t, MDB_TGT_AS_VIRT, &pd, sizeof (pd), 470 0 stevel MDB_TGT_OBJ_EXEC, "panicbuf") == sizeof (pd) && 471 0 stevel pd.pd_version == PANICBUFVERS) { 472 0 stevel 473 0 stevel size_t pd_size = MIN(PANICBUFSIZE, pd.pd_msgoff); 474 0 stevel panic_data_t *pdp = mdb_zalloc(pd_size, UM_SLEEP); 475 0 stevel uint_t i, n; 476 0 stevel 477 0 stevel (void) mdb_tgt_readsym(t, MDB_TGT_AS_VIRT, pdp, pd_size, 478 0 stevel MDB_TGT_OBJ_EXEC, "panicbuf"); 479 0 stevel 480 0 stevel n = (pd_size - (sizeof (panic_data_t) - 481 0 stevel sizeof (panic_nv_t))) / sizeof (panic_nv_t); 482 0 stevel 483 0 stevel for (i = 0; i < n; i++) { 484 0 stevel (void) kt_putareg(t, kt->k_tid, 485 0 stevel pdp->pd_nvdata[i].pnv_name, 486 0 stevel pdp->pd_nvdata[i].pnv_value); 487 0 stevel } 488 0 stevel 489 0 stevel mdb_free(pdp, pd_size); 490 0 stevel } 491 0 stevel 492 0 stevel /* 493 0 stevel * Prior to the re-structuring of panicbuf, our only register data 494 0 stevel * was the panic_regs label_t, into which a setjmp() was performed. 495 0 stevel */ 496 0 stevel if (kregs[KREG_PC] == 0 && kregs[KREG_SP] == 0 && 497 0 stevel mdb_tgt_readsym(t, MDB_TGT_AS_VIRT, &label, sizeof (label), 498 0 stevel MDB_TGT_OBJ_EXEC, "panic_regs") == sizeof (label)) { 499 0 stevel 500 0 stevel kregs[KREG_PC] = label.val[0]; 501 0 stevel kregs[KREG_SP] = label.val[1]; 502 0 stevel } 503 0 stevel 504 0 stevel /* 505 0 stevel * If we can read a saved register window from the stack at %sp, 506 0 stevel * we can also fill in the locals and inputs. 507 0 stevel */ 508 0 stevel if (kregs[KREG_SP] != 0 && mdb_tgt_vread(t, &rwin, sizeof (rwin), 509 0 stevel kregs[KREG_SP]) == sizeof (rwin)) { 510 0 stevel 511 0 stevel kregs[KREG_L0] = rwin.rw_local[0]; 512 0 stevel kregs[KREG_L1] = rwin.rw_local[1]; 513 0 stevel kregs[KREG_L2] = rwin.rw_local[2]; 514 0 stevel kregs[KREG_L3] = rwin.rw_local[3]; 515 0 stevel kregs[KREG_L4] = rwin.rw_local[4]; 516 0 stevel kregs[KREG_L5] = rwin.rw_local[5]; 517 0 stevel kregs[KREG_L6] = rwin.rw_local[6]; 518 0 stevel kregs[KREG_L7] = rwin.rw_local[7]; 519 0 stevel 520 0 stevel kregs[KREG_I0] = rwin.rw_in[0]; 521 0 stevel kregs[KREG_I1] = rwin.rw_in[1]; 522 0 stevel kregs[KREG_I2] = rwin.rw_in[2]; 523 0 stevel kregs[KREG_I3] = rwin.rw_in[3]; 524 0 stevel kregs[KREG_I4] = rwin.rw_in[4]; 525 0 stevel kregs[KREG_I5] = rwin.rw_in[5]; 526 0 stevel kregs[KREG_I6] = rwin.rw_in[6]; 527 0 stevel kregs[KREG_I7] = rwin.rw_in[7]; 528 0 stevel 529 0 stevel } else if (kregs[KREG_SP] != 0) { 530 0 stevel warn("failed to read rwindow at %p -- current " 531 0 stevel "frame inputs will be unavailable\n", 532 0 stevel (void *)kregs[KREG_SP]); 533 0 stevel } 534 0 stevel } 535
Indexes created Thu Nov 26 13:14:29 UTC 2009
Terms of Use |
Privacy |
Trademarks |
Copyright Policy |
Site Guidelines |
Help
Your use of this web site or any of its content or software indicates your agreement to be bound by these Terms of Use.
Copyright © 1995-2008 Sun Microsystems, Inc.