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 3446 mrj * Common Development and Distribution License (the "License"). 6 3446 mrj * 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 Intel 64-bit 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/reg.h> 37 0 stevel #include <sys/frame.h> 38 0 stevel #include <sys/stack.h> 39 0 stevel #include <sys/sysmacros.h> 40 0 stevel #include <sys/panic.h> 41 0 stevel #include <sys/privregs.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_impl.h> 49 0 stevel #include <mdb/mdb_amd64util.h> 50 5084 johnlev #include <mdb/kvm_isadep.h> 51 0 stevel #include <mdb/mdb_kvm.h> 52 0 stevel #include <mdb/mdb_err.h> 53 0 stevel #include <mdb/mdb_debug.h> 54 0 stevel #include <mdb/mdb.h> 55 0 stevel 56 0 stevel /*ARGSUSED*/ 57 0 stevel int 58 0 stevel kt_regs(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) 59 0 stevel { 60 5084 johnlev mdb_amd64_printregs((const mdb_tgt_gregset_t *)addr); 61 0 stevel return (DCMD_OK); 62 0 stevel } 63 0 stevel 64 0 stevel static int 65 0 stevel kt_stack_common(uintptr_t addr, uint_t flags, int argc, 66 0 stevel const mdb_arg_t *argv, mdb_tgt_stack_f *func) 67 0 stevel { 68 0 stevel kt_data_t *kt = mdb.m_target->t_data; 69 0 stevel void *arg = (void *)(uintptr_t)mdb.m_nargs; 70 0 stevel mdb_tgt_gregset_t gregs, *grp; 71 0 stevel 72 0 stevel if (flags & DCMD_ADDRSPEC) { 73 0 stevel bzero(&gregs, sizeof (gregs)); 74 0 stevel gregs.kregs[KREG_RBP] = addr; 75 0 stevel grp = &gregs; 76 0 stevel } else 77 0 stevel grp = kt->k_regs; 78 0 stevel 79 0 stevel if (argc != 0) { 80 0 stevel if (argv->a_type == MDB_TYPE_CHAR || argc > 1) 81 0 stevel return (DCMD_USAGE); 82 0 stevel 83 0 stevel if (argv->a_type == MDB_TYPE_STRING) 84 0 stevel arg = (void *)mdb_strtoull(argv->a_un.a_str); 85 0 stevel else 86 0 stevel arg = (void *)argv->a_un.a_val; 87 0 stevel } 88 0 stevel 89 0 stevel (void) mdb_amd64_kvm_stack_iter(mdb.m_target, grp, func, arg); 90 0 stevel return (DCMD_OK); 91 0 stevel } 92 0 stevel 93 5084 johnlev int 94 0 stevel kt_stack(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) 95 0 stevel { 96 0 stevel return (kt_stack_common(addr, flags, argc, argv, mdb_amd64_kvm_frame)); 97 0 stevel } 98 0 stevel 99 5084 johnlev int 100 0 stevel kt_stackv(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) 101 0 stevel { 102 0 stevel return (kt_stack_common(addr, flags, argc, argv, mdb_amd64_kvm_framev)); 103 0 stevel } 104 0 stevel 105 0 stevel const mdb_tgt_ops_t kt_amd64_ops = { 106 0 stevel kt_setflags, /* t_setflags */ 107 0 stevel kt_setcontext, /* t_setcontext */ 108 0 stevel kt_activate, /* t_activate */ 109 0 stevel kt_deactivate, /* t_deactivate */ 110 0 stevel (void (*)()) mdb_tgt_nop, /* t_periodic */ 111 0 stevel kt_destroy, /* t_destroy */ 112 0 stevel kt_name, /* t_name */ 113 0 stevel (const char *(*)()) mdb_conf_isa, /* t_isa */ 114 0 stevel kt_platform, /* t_platform */ 115 0 stevel kt_uname, /* t_uname */ 116 0 stevel kt_dmodel, /* t_dmodel */ 117 0 stevel kt_aread, /* t_aread */ 118 0 stevel kt_awrite, /* t_awrite */ 119 0 stevel kt_vread, /* t_vread */ 120 0 stevel kt_vwrite, /* t_vwrite */ 121 0 stevel kt_pread, /* t_pread */ 122 0 stevel kt_pwrite, /* t_pwrite */ 123 0 stevel kt_fread, /* t_fread */ 124 0 stevel kt_fwrite, /* t_fwrite */ 125 0 stevel (ssize_t (*)()) mdb_tgt_notsup, /* t_ioread */ 126 0 stevel (ssize_t (*)()) mdb_tgt_notsup, /* t_iowrite */ 127 0 stevel kt_vtop, /* t_vtop */ 128 0 stevel kt_lookup_by_name, /* t_lookup_by_name */ 129 0 stevel kt_lookup_by_addr, /* t_lookup_by_addr */ 130 0 stevel kt_symbol_iter, /* t_symbol_iter */ 131 0 stevel kt_mapping_iter, /* t_mapping_iter */ 132 0 stevel kt_object_iter, /* t_object_iter */ 133 0 stevel kt_addr_to_map, /* t_addr_to_map */ 134 0 stevel kt_name_to_map, /* t_name_to_map */ 135 0 stevel kt_addr_to_ctf, /* t_addr_to_ctf */ 136 0 stevel kt_name_to_ctf, /* t_name_to_ctf */ 137 0 stevel kt_status, /* t_status */ 138 0 stevel (int (*)()) mdb_tgt_notsup, /* t_run */ 139 0 stevel (int (*)()) mdb_tgt_notsup, /* t_step */ 140 0 stevel (int (*)()) mdb_tgt_notsup, /* t_step_out */ 141 0 stevel (int (*)()) mdb_tgt_notsup, /* t_step_branch */ 142 0 stevel (int (*)()) mdb_tgt_notsup, /* t_next */ 143 0 stevel (int (*)()) mdb_tgt_notsup, /* t_cont */ 144 0 stevel (int (*)()) mdb_tgt_notsup, /* t_signal */ 145 0 stevel (int (*)()) mdb_tgt_null, /* t_add_vbrkpt */ 146 0 stevel (int (*)()) mdb_tgt_null, /* t_add_sbrkpt */ 147 0 stevel (int (*)()) mdb_tgt_null, /* t_add_pwapt */ 148 0 stevel (int (*)()) mdb_tgt_null, /* t_add_vwapt */ 149 0 stevel (int (*)()) mdb_tgt_null, /* t_add_iowapt */ 150 0 stevel (int (*)()) mdb_tgt_null, /* t_add_sysenter */ 151 0 stevel (int (*)()) mdb_tgt_null, /* t_add_sysexit */ 152 0 stevel (int (*)()) mdb_tgt_null, /* t_add_signal */ 153 0 stevel (int (*)()) mdb_tgt_null, /* t_add_fault */ 154 0 stevel kt_getareg, /* t_getareg */ 155 0 stevel kt_putareg, /* t_putareg */ 156 0 stevel mdb_amd64_kvm_stack_iter, /* t_stack_iter */ 157 6473 edp (int (*)()) mdb_tgt_notsup /* t_auxv */ 158 0 stevel }; 159 0 stevel 160 0 stevel void 161 5084 johnlev kt_regs_to_kregs(struct regs *regs, mdb_tgt_gregset_t *gregs) 162 5084 johnlev { 163 5084 johnlev gregs->kregs[KREG_SAVFP] = regs->r_savfp; 164 5084 johnlev gregs->kregs[KREG_SAVPC] = regs->r_savpc; 165 5084 johnlev gregs->kregs[KREG_RDI] = regs->r_rdi; 166 5084 johnlev gregs->kregs[KREG_RSI] = regs->r_rsi; 167 5084 johnlev gregs->kregs[KREG_RDX] = regs->r_rdx; 168 5084 johnlev gregs->kregs[KREG_RCX] = regs->r_rcx; 169 5084 johnlev gregs->kregs[KREG_R8] = regs->r_r8; 170 5084 johnlev gregs->kregs[KREG_R9] = regs->r_r9; 171 5084 johnlev gregs->kregs[KREG_RAX] = regs->r_rax; 172 5084 johnlev gregs->kregs[KREG_RBX] = regs->r_rbx; 173 5084 johnlev gregs->kregs[KREG_RBP] = regs->r_rbp; 174 5084 johnlev gregs->kregs[KREG_R10] = regs->r_r10; 175 5084 johnlev gregs->kregs[KREG_R11] = regs->r_r11; 176 5084 johnlev gregs->kregs[KREG_R12] = regs->r_r12; 177 5084 johnlev gregs->kregs[KREG_R13] = regs->r_r13; 178 5084 johnlev gregs->kregs[KREG_R14] = regs->r_r14; 179 5084 johnlev gregs->kregs[KREG_R15] = regs->r_r15; 180 5084 johnlev gregs->kregs[KREG_DS] = regs->r_ds; 181 5084 johnlev gregs->kregs[KREG_ES] = regs->r_es; 182 5084 johnlev gregs->kregs[KREG_FS] = regs->r_fs; 183 5084 johnlev gregs->kregs[KREG_GS] = regs->r_gs; 184 5084 johnlev gregs->kregs[KREG_TRAPNO] = regs->r_trapno; 185 5084 johnlev gregs->kregs[KREG_ERR] = regs->r_err; 186 5084 johnlev gregs->kregs[KREG_RIP] = regs->r_rip; 187 5084 johnlev gregs->kregs[KREG_CS] = regs->r_cs; 188 5084 johnlev gregs->kregs[KREG_RFLAGS] = regs->r_rfl; 189 5084 johnlev gregs->kregs[KREG_RSP] = regs->r_rsp; 190 5084 johnlev gregs->kregs[KREG_SS] = regs->r_ss; 191 5084 johnlev } 192 5084 johnlev 193 5084 johnlev void 194 0 stevel kt_amd64_init(mdb_tgt_t *t) 195 0 stevel { 196 0 stevel kt_data_t *kt = t->t_data; 197 0 stevel panic_data_t pd; 198 0 stevel struct regs regs; 199 0 stevel uintptr_t addr; 200 0 stevel 201 0 stevel /* 202 0 stevel * Initialize the machine-dependent parts of the kernel target 203 0 stevel * structure. Once this is complete and we fill in the ops 204 0 stevel * vector, the target is now fully constructed and we can use 205 0 stevel * the target API itself to perform the rest of our initialization. 206 0 stevel */ 207 0 stevel kt->k_rds = mdb_amd64_kregs; 208 0 stevel kt->k_regs = mdb_zalloc(sizeof (mdb_tgt_gregset_t), UM_SLEEP); 209 0 stevel kt->k_regsize = sizeof (mdb_tgt_gregset_t); 210 0 stevel kt->k_dcmd_regs = kt_regs; 211 0 stevel kt->k_dcmd_stack = kt_stack; 212 0 stevel kt->k_dcmd_stackv = kt_stackv; 213 0 stevel kt->k_dcmd_stackr = kt_stackv; 214 5084 johnlev kt->k_dcmd_cpustack = kt_cpustack; 215 5084 johnlev kt->k_dcmd_cpuregs = kt_cpuregs; 216 0 stevel 217 0 stevel t->t_ops = &kt_amd64_ops; 218 0 stevel 219 0 stevel (void) mdb_dis_select("amd64"); 220 0 stevel 221 0 stevel /* 222 0 stevel * Lookup the symbols corresponding to subroutines in locore.s where 223 0 stevel * we expect a saved regs structure to be pushed on the stack. When 224 0 stevel * performing stack tracebacks we will attempt to detect interrupt 225 0 stevel * frames by comparing the %eip value to these symbols. 226 0 stevel */ 227 0 stevel (void) mdb_tgt_lookup_by_name(t, MDB_TGT_OBJ_EXEC, 228 0 stevel "cmnint", &kt->k_intr_sym, NULL); 229 0 stevel 230 0 stevel (void) mdb_tgt_lookup_by_name(t, MDB_TGT_OBJ_EXEC, 231 0 stevel "cmntrap", &kt->k_trap_sym, NULL); 232 0 stevel 233 0 stevel /* 234 0 stevel * Don't attempt to load any thread or register information if 235 0 stevel * we're examining the live operating system. 236 0 stevel */ 237 5084 johnlev if (kt->k_symfile != NULL && strcmp(kt->k_symfile, "/dev/ksyms") == 0) 238 0 stevel return; 239 0 stevel 240 0 stevel /* 241 0 stevel * If the panicbuf symbol is present and we can consume a panicbuf 242 0 stevel * header of the appropriate version from this address, then we can 243 0 stevel * initialize our current register set based on its contents. 244 0 stevel * Prior to the re-structuring of panicbuf, our only register data 245 0 stevel * was the panic_regs label_t, into which a setjmp() was performed, 246 0 stevel * or the panic_reg register pointer, which was only non-zero if 247 0 stevel * the system panicked as a result of a trap calling die(). 248 0 stevel */ 249 0 stevel if (mdb_tgt_readsym(t, MDB_TGT_AS_VIRT, &pd, sizeof (pd), 250 0 stevel MDB_TGT_OBJ_EXEC, "panicbuf") == sizeof (pd) && 251 0 stevel pd.pd_version == PANICBUFVERS) { 252 0 stevel 253 0 stevel size_t pd_size = MIN(PANICBUFSIZE, pd.pd_msgoff); 254 0 stevel panic_data_t *pdp = mdb_zalloc(pd_size, UM_SLEEP); 255 0 stevel uint_t i, n; 256 0 stevel 257 0 stevel (void) mdb_tgt_readsym(t, MDB_TGT_AS_VIRT, pdp, pd_size, 258 0 stevel MDB_TGT_OBJ_EXEC, "panicbuf"); 259 0 stevel 260 0 stevel n = (pd_size - (sizeof (panic_data_t) - 261 0 stevel sizeof (panic_nv_t))) / sizeof (panic_nv_t); 262 0 stevel 263 0 stevel for (i = 0; i < n; i++) { 264 0 stevel (void) kt_putareg(t, kt->k_tid, 265 0 stevel pdp->pd_nvdata[i].pnv_name, 266 0 stevel pdp->pd_nvdata[i].pnv_value); 267 0 stevel } 268 0 stevel 269 0 stevel mdb_free(pdp, pd_size); 270 0 stevel 271 5084 johnlev return; 272 5084 johnlev }; 273 5084 johnlev 274 5084 johnlev if (mdb_tgt_readsym(t, MDB_TGT_AS_VIRT, &addr, sizeof (addr), 275 0 stevel MDB_TGT_OBJ_EXEC, "panic_reg") == sizeof (addr) && addr != NULL && 276 0 stevel mdb_tgt_vread(t, ®s, sizeof (regs), addr) == sizeof (regs)) { 277 5084 johnlev kt_regs_to_kregs(®s, kt->k_regs); 278 5084 johnlev return; 279 5084 johnlev } 280 0 stevel 281 5084 johnlev /* 282 5084 johnlev * If we can't read any panic regs, then our final try is for any CPU 283 5084 johnlev * context that may have been stored (for example, in Xen core dumps). 284 5084 johnlev */ 285 5084 johnlev if (kt_kvmregs(t, 0, kt->k_regs) == 0) 286 5084 johnlev return; 287 0 stevel 288 5084 johnlev warn("failed to read panicbuf and panic_reg -- " 289 5084 johnlev "current register set will be unavailable\n"); 290 0 stevel } 291