17c478bd9Sstevel@tonic-gate /* 27c478bd9Sstevel@tonic-gate * CDDL HEADER START 37c478bd9Sstevel@tonic-gate * 47c478bd9Sstevel@tonic-gate * The contents of this file are subject to the terms of the 5ae115bc7Smrj * Common Development and Distribution License (the "License"). 6ae115bc7Smrj * You may not use this file except in compliance with the License. 77c478bd9Sstevel@tonic-gate * 87c478bd9Sstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 97c478bd9Sstevel@tonic-gate * or http://www.opensolaris.org/os/licensing. 107c478bd9Sstevel@tonic-gate * See the License for the specific language governing permissions 117c478bd9Sstevel@tonic-gate * and limitations under the License. 127c478bd9Sstevel@tonic-gate * 137c478bd9Sstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each 147c478bd9Sstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 157c478bd9Sstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the 167c478bd9Sstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying 177c478bd9Sstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner] 187c478bd9Sstevel@tonic-gate * 197c478bd9Sstevel@tonic-gate * CDDL HEADER END 207c478bd9Sstevel@tonic-gate */ 217c478bd9Sstevel@tonic-gate /* 22ae115bc7Smrj * Copyright 2007 Sun Microsystems, Inc. All rights reserved. 237c478bd9Sstevel@tonic-gate * Use is subject to license terms. 247c478bd9Sstevel@tonic-gate */ 257c478bd9Sstevel@tonic-gate 267c478bd9Sstevel@tonic-gate #pragma ident "%Z%%M% %I% %E% SMI" 277c478bd9Sstevel@tonic-gate 287c478bd9Sstevel@tonic-gate /* 297c478bd9Sstevel@tonic-gate * Libkvm Kernel Target 307c478bd9Sstevel@tonic-gate * 317c478bd9Sstevel@tonic-gate * The libkvm kernel target provides access to both crash dumps and live 327c478bd9Sstevel@tonic-gate * kernels through /dev/ksyms and /dev/kmem, using the facilities provided by 337c478bd9Sstevel@tonic-gate * the libkvm.so library. The target-specific data structures are shared 347c478bd9Sstevel@tonic-gate * between this file (common code) and the ISA-dependent parts of the target, 357c478bd9Sstevel@tonic-gate * and so they are defined in the mdb_kvm.h header. The target processes an 367c478bd9Sstevel@tonic-gate * "executable" (/dev/ksyms or the unix.X file) which contains a primary 377c478bd9Sstevel@tonic-gate * .symtab and .dynsym, and then also iterates over the krtld module chain in 387c478bd9Sstevel@tonic-gate * the kernel in order to obtain a list of loaded modules and per-module symbol 397c478bd9Sstevel@tonic-gate * tables. To improve startup performance, the per-module symbol tables are 407c478bd9Sstevel@tonic-gate * instantiated on-the-fly whenever an address lookup falls within the text 417c478bd9Sstevel@tonic-gate * section of a given module. The target also relies on services from the 427c478bd9Sstevel@tonic-gate * mdb_ks (kernel support) module, which contains pieces of the implementation 437c478bd9Sstevel@tonic-gate * that must be compiled against the kernel implementation. 447c478bd9Sstevel@tonic-gate */ 457c478bd9Sstevel@tonic-gate 467c478bd9Sstevel@tonic-gate #include <sys/modctl.h> 477c478bd9Sstevel@tonic-gate #include <sys/kobj.h> 487c478bd9Sstevel@tonic-gate #include <sys/kobj_impl.h> 497c478bd9Sstevel@tonic-gate #include <sys/utsname.h> 507c478bd9Sstevel@tonic-gate #include <sys/panic.h> 517c478bd9Sstevel@tonic-gate #include <sys/dumphdr.h> 527c478bd9Sstevel@tonic-gate #include <sys/dumpadm.h> 537c478bd9Sstevel@tonic-gate 547c478bd9Sstevel@tonic-gate #include <dlfcn.h> 557c478bd9Sstevel@tonic-gate #include <libctf.h> 567c478bd9Sstevel@tonic-gate #include <string.h> 577c478bd9Sstevel@tonic-gate #include <fcntl.h> 587c478bd9Sstevel@tonic-gate #include <errno.h> 597c478bd9Sstevel@tonic-gate 607c478bd9Sstevel@tonic-gate #include <mdb/mdb_target_impl.h> 617c478bd9Sstevel@tonic-gate #include <mdb/mdb_err.h> 627c478bd9Sstevel@tonic-gate #include <mdb/mdb_debug.h> 637c478bd9Sstevel@tonic-gate #include <mdb/mdb_string.h> 647c478bd9Sstevel@tonic-gate #include <mdb/mdb_modapi.h> 657c478bd9Sstevel@tonic-gate #include <mdb/mdb_io_impl.h> 667c478bd9Sstevel@tonic-gate #include <mdb/mdb_ctf.h> 677c478bd9Sstevel@tonic-gate #include <mdb/mdb_kvm.h> 687c478bd9Sstevel@tonic-gate #include <mdb/mdb_module.h> 69*843e1988Sjohnlev #include <mdb/mdb_kb.h> 707c478bd9Sstevel@tonic-gate #include <mdb/mdb.h> 717c478bd9Sstevel@tonic-gate 727c478bd9Sstevel@tonic-gate #define KT_RELOC_BUF(buf, obase, nbase) \ 737c478bd9Sstevel@tonic-gate ((uintptr_t)(buf) - (uintptr_t)(obase) + (uintptr_t)(nbase)) 747c478bd9Sstevel@tonic-gate 757c478bd9Sstevel@tonic-gate #define KT_BAD_BUF(buf, base, size) \ 767c478bd9Sstevel@tonic-gate ((uintptr_t)(buf) < (uintptr_t)(base) || \ 777c478bd9Sstevel@tonic-gate ((uintptr_t)(buf) >= (uintptr_t)(base) + (uintptr_t)(size))) 787c478bd9Sstevel@tonic-gate 797c478bd9Sstevel@tonic-gate typedef struct kt_symarg { 807c478bd9Sstevel@tonic-gate mdb_tgt_sym_f *sym_cb; /* Caller's callback function */ 817c478bd9Sstevel@tonic-gate void *sym_data; /* Callback function argument */ 827c478bd9Sstevel@tonic-gate uint_t sym_type; /* Symbol type/binding filter */ 837c478bd9Sstevel@tonic-gate mdb_syminfo_t sym_info; /* Symbol id and table id */ 847c478bd9Sstevel@tonic-gate const char *sym_obj; /* Containing object */ 857c478bd9Sstevel@tonic-gate } kt_symarg_t; 867c478bd9Sstevel@tonic-gate 877c478bd9Sstevel@tonic-gate typedef struct kt_maparg { 887c478bd9Sstevel@tonic-gate mdb_tgt_t *map_target; /* Target used for mapping iter */ 897c478bd9Sstevel@tonic-gate mdb_tgt_map_f *map_cb; /* Caller's callback function */ 907c478bd9Sstevel@tonic-gate void *map_data; /* Callback function argument */ 917c478bd9Sstevel@tonic-gate } kt_maparg_t; 927c478bd9Sstevel@tonic-gate 937c478bd9Sstevel@tonic-gate static const char KT_MODULE[] = "mdb_ks"; 947c478bd9Sstevel@tonic-gate static const char KT_CTFPARENT[] = "genunix"; 957c478bd9Sstevel@tonic-gate 967c478bd9Sstevel@tonic-gate static void 977c478bd9Sstevel@tonic-gate kt_load_module(kt_data_t *kt, mdb_tgt_t *t, kt_module_t *km) 987c478bd9Sstevel@tonic-gate { 997c478bd9Sstevel@tonic-gate km->km_data = mdb_alloc(km->km_datasz, UM_SLEEP); 1007c478bd9Sstevel@tonic-gate 1017c478bd9Sstevel@tonic-gate (void) mdb_tgt_vread(t, km->km_data, km->km_datasz, km->km_symspace_va); 1027c478bd9Sstevel@tonic-gate 1037c478bd9Sstevel@tonic-gate km->km_symbuf = (void *) 1047c478bd9Sstevel@tonic-gate KT_RELOC_BUF(km->km_symtab_va, km->km_symspace_va, km->km_data); 1057c478bd9Sstevel@tonic-gate 1067c478bd9Sstevel@tonic-gate km->km_strtab = (char *) 1077c478bd9Sstevel@tonic-gate KT_RELOC_BUF(km->km_strtab_va, km->km_symspace_va, km->km_data); 1087c478bd9Sstevel@tonic-gate 1097c478bd9Sstevel@tonic-gate km->km_symtab = mdb_gelf_symtab_create_raw(&kt->k_file->gf_ehdr, 1107c478bd9Sstevel@tonic-gate &km->km_symtab_hdr, km->km_symbuf, 1117c478bd9Sstevel@tonic-gate &km->km_strtab_hdr, km->km_strtab, MDB_TGT_SYMTAB); 1127c478bd9Sstevel@tonic-gate } 1137c478bd9Sstevel@tonic-gate 1147c478bd9Sstevel@tonic-gate static void 1157c478bd9Sstevel@tonic-gate kt_load_modules(kt_data_t *kt, mdb_tgt_t *t) 1167c478bd9Sstevel@tonic-gate { 1177c478bd9Sstevel@tonic-gate char name[MAXNAMELEN]; 1187c478bd9Sstevel@tonic-gate uintptr_t addr, head; 1197c478bd9Sstevel@tonic-gate 1207c478bd9Sstevel@tonic-gate struct module kmod; 1217c478bd9Sstevel@tonic-gate struct modctl ctl; 1227c478bd9Sstevel@tonic-gate Shdr symhdr, strhdr; 1237c478bd9Sstevel@tonic-gate GElf_Sym sym; 1247c478bd9Sstevel@tonic-gate 1257c478bd9Sstevel@tonic-gate kt_module_t *km; 1267c478bd9Sstevel@tonic-gate 1277c478bd9Sstevel@tonic-gate if (mdb_tgt_lookup_by_name(t, MDB_TGT_OBJ_EXEC, 1287c478bd9Sstevel@tonic-gate "modules", &sym, NULL) == -1) { 1297c478bd9Sstevel@tonic-gate warn("failed to get 'modules' symbol"); 1307c478bd9Sstevel@tonic-gate return; 1317c478bd9Sstevel@tonic-gate } 1327c478bd9Sstevel@tonic-gate 1337c478bd9Sstevel@tonic-gate if (mdb_tgt_readsym(t, MDB_TGT_AS_VIRT, &ctl, sizeof (ctl), 1347c478bd9Sstevel@tonic-gate MDB_TGT_OBJ_EXEC, "modules") != sizeof (ctl)) { 1357c478bd9Sstevel@tonic-gate warn("failed to read 'modules' struct"); 1367c478bd9Sstevel@tonic-gate return; 1377c478bd9Sstevel@tonic-gate } 1387c478bd9Sstevel@tonic-gate 1397c478bd9Sstevel@tonic-gate addr = head = (uintptr_t)sym.st_value; 1407c478bd9Sstevel@tonic-gate 1417c478bd9Sstevel@tonic-gate do { 1427c478bd9Sstevel@tonic-gate if (addr == NULL) 1437c478bd9Sstevel@tonic-gate break; /* Avoid spurious NULL pointers in list */ 1447c478bd9Sstevel@tonic-gate 1457c478bd9Sstevel@tonic-gate if (mdb_tgt_vread(t, &ctl, sizeof (ctl), addr) == -1) { 1467c478bd9Sstevel@tonic-gate warn("failed to read modctl at %p", (void *)addr); 1477c478bd9Sstevel@tonic-gate return; 1487c478bd9Sstevel@tonic-gate } 1497c478bd9Sstevel@tonic-gate 1507c478bd9Sstevel@tonic-gate if (ctl.mod_mp == NULL) 1517c478bd9Sstevel@tonic-gate continue; /* No associated krtld structure */ 1527c478bd9Sstevel@tonic-gate 1537c478bd9Sstevel@tonic-gate if (mdb_tgt_readstr(t, MDB_TGT_AS_VIRT, name, MAXNAMELEN, 1547c478bd9Sstevel@tonic-gate (uintptr_t)ctl.mod_modname) <= 0) { 1557c478bd9Sstevel@tonic-gate warn("failed to read module name at %p", 1567c478bd9Sstevel@tonic-gate (void *)ctl.mod_modname); 1577c478bd9Sstevel@tonic-gate continue; 1587c478bd9Sstevel@tonic-gate } 1597c478bd9Sstevel@tonic-gate 1607c478bd9Sstevel@tonic-gate mdb_dprintf(MDB_DBG_KMOD, "reading mod %s (%p)\n", 1617c478bd9Sstevel@tonic-gate name, (void *)addr); 1627c478bd9Sstevel@tonic-gate 1637c478bd9Sstevel@tonic-gate if (mdb_nv_lookup(&kt->k_modules, name) != NULL) { 1647c478bd9Sstevel@tonic-gate warn("skipping duplicate module '%s', id=%d\n", 1657c478bd9Sstevel@tonic-gate name, ctl.mod_id); 1667c478bd9Sstevel@tonic-gate continue; 1677c478bd9Sstevel@tonic-gate } 1687c478bd9Sstevel@tonic-gate 1697c478bd9Sstevel@tonic-gate if (mdb_tgt_vread(t, &kmod, sizeof (kmod), 1707c478bd9Sstevel@tonic-gate (uintptr_t)ctl.mod_mp) == -1) { 1717c478bd9Sstevel@tonic-gate warn("failed to read module at %p\n", 1727c478bd9Sstevel@tonic-gate (void *)ctl.mod_mp); 1737c478bd9Sstevel@tonic-gate continue; 1747c478bd9Sstevel@tonic-gate } 1757c478bd9Sstevel@tonic-gate 1767c478bd9Sstevel@tonic-gate if (kmod.symspace == NULL || kmod.symhdr == NULL || 1777c478bd9Sstevel@tonic-gate kmod.strhdr == NULL) { 1787c478bd9Sstevel@tonic-gate /* 1797c478bd9Sstevel@tonic-gate * If no buffer for the symbols has been allocated, 1807c478bd9Sstevel@tonic-gate * or the shdrs for .symtab and .strtab are missing, 1817c478bd9Sstevel@tonic-gate * then we're out of luck. 1827c478bd9Sstevel@tonic-gate */ 1837c478bd9Sstevel@tonic-gate continue; 1847c478bd9Sstevel@tonic-gate } 1857c478bd9Sstevel@tonic-gate 1867c478bd9Sstevel@tonic-gate if (mdb_tgt_vread(t, &symhdr, sizeof (Shdr), 1877c478bd9Sstevel@tonic-gate (uintptr_t)kmod.symhdr) == -1) { 1887c478bd9Sstevel@tonic-gate warn("failed to read .symtab header for '%s', id=%d", 1897c478bd9Sstevel@tonic-gate name, ctl.mod_id); 1907c478bd9Sstevel@tonic-gate continue; 1917c478bd9Sstevel@tonic-gate } 1927c478bd9Sstevel@tonic-gate 1937c478bd9Sstevel@tonic-gate if (mdb_tgt_vread(t, &strhdr, sizeof (Shdr), 1947c478bd9Sstevel@tonic-gate (uintptr_t)kmod.strhdr) == -1) { 1957c478bd9Sstevel@tonic-gate warn("failed to read .strtab header for '%s', id=%d", 1967c478bd9Sstevel@tonic-gate name, ctl.mod_id); 1977c478bd9Sstevel@tonic-gate continue; 1987c478bd9Sstevel@tonic-gate } 1997c478bd9Sstevel@tonic-gate 2007c478bd9Sstevel@tonic-gate /* 2017c478bd9Sstevel@tonic-gate * Now get clever: f(*^ing krtld didn't used to bother updating 2027c478bd9Sstevel@tonic-gate * its own kmod.symsize value. We know that prior to this bug 2037c478bd9Sstevel@tonic-gate * being fixed, symspace was a contiguous buffer containing 2047c478bd9Sstevel@tonic-gate * .symtab, .strtab, and the symbol hash table in that order. 2057c478bd9Sstevel@tonic-gate * So if symsize is zero, recompute it as the size of .symtab 2067c478bd9Sstevel@tonic-gate * plus the size of .strtab. We don't need to load the hash 2077c478bd9Sstevel@tonic-gate * table anyway since we re-hash all the symbols internally. 2087c478bd9Sstevel@tonic-gate */ 2097c478bd9Sstevel@tonic-gate if (kmod.symsize == 0) 2107c478bd9Sstevel@tonic-gate kmod.symsize = symhdr.sh_size + strhdr.sh_size; 2117c478bd9Sstevel@tonic-gate 2127c478bd9Sstevel@tonic-gate /* 2137c478bd9Sstevel@tonic-gate * Similar logic can be used to make educated guesses 2147c478bd9Sstevel@tonic-gate * at the values of kmod.symtbl and kmod.strings. 2157c478bd9Sstevel@tonic-gate */ 2167c478bd9Sstevel@tonic-gate if (kmod.symtbl == NULL) 2177c478bd9Sstevel@tonic-gate kmod.symtbl = kmod.symspace; 2187c478bd9Sstevel@tonic-gate if (kmod.strings == NULL) 2197c478bd9Sstevel@tonic-gate kmod.strings = kmod.symspace + symhdr.sh_size; 2207c478bd9Sstevel@tonic-gate 2217c478bd9Sstevel@tonic-gate /* 2227c478bd9Sstevel@tonic-gate * Make sure things seem reasonable before we proceed 2237c478bd9Sstevel@tonic-gate * to actually read and decipher the symspace. 2247c478bd9Sstevel@tonic-gate */ 2257c478bd9Sstevel@tonic-gate if (KT_BAD_BUF(kmod.symtbl, kmod.symspace, kmod.symsize) || 2267c478bd9Sstevel@tonic-gate KT_BAD_BUF(kmod.strings, kmod.symspace, kmod.symsize)) { 2277c478bd9Sstevel@tonic-gate warn("skipping module '%s', id=%d (corrupt symspace)\n", 2287c478bd9Sstevel@tonic-gate name, ctl.mod_id); 2297c478bd9Sstevel@tonic-gate continue; 2307c478bd9Sstevel@tonic-gate } 2317c478bd9Sstevel@tonic-gate 2327c478bd9Sstevel@tonic-gate km = mdb_zalloc(sizeof (kt_module_t), UM_SLEEP); 2337c478bd9Sstevel@tonic-gate km->km_name = strdup(name); 2347c478bd9Sstevel@tonic-gate 2357c478bd9Sstevel@tonic-gate (void) mdb_nv_insert(&kt->k_modules, km->km_name, NULL, 2367c478bd9Sstevel@tonic-gate (uintptr_t)km, MDB_NV_EXTNAME); 2377c478bd9Sstevel@tonic-gate 2387c478bd9Sstevel@tonic-gate km->km_datasz = kmod.symsize; 2397c478bd9Sstevel@tonic-gate km->km_symspace_va = (uintptr_t)kmod.symspace; 2407c478bd9Sstevel@tonic-gate km->km_symtab_va = (uintptr_t)kmod.symtbl; 2417c478bd9Sstevel@tonic-gate km->km_strtab_va = (uintptr_t)kmod.strings; 2427c478bd9Sstevel@tonic-gate km->km_symtab_hdr = symhdr; 2437c478bd9Sstevel@tonic-gate km->km_strtab_hdr = strhdr; 2447c478bd9Sstevel@tonic-gate km->km_text_va = (uintptr_t)kmod.text; 2457c478bd9Sstevel@tonic-gate km->km_text_size = kmod.text_size; 2467c478bd9Sstevel@tonic-gate km->km_data_va = (uintptr_t)kmod.data; 2477c478bd9Sstevel@tonic-gate km->km_data_size = kmod.data_size; 2487c478bd9Sstevel@tonic-gate km->km_bss_va = (uintptr_t)kmod.bss; 2497c478bd9Sstevel@tonic-gate km->km_bss_size = kmod.bss_size; 2507c478bd9Sstevel@tonic-gate 2517c478bd9Sstevel@tonic-gate if (kt->k_ctfvalid) { 2527c478bd9Sstevel@tonic-gate km->km_ctf_va = (uintptr_t)kmod.ctfdata; 2537c478bd9Sstevel@tonic-gate km->km_ctf_size = kmod.ctfsize; 2547c478bd9Sstevel@tonic-gate } 2557c478bd9Sstevel@tonic-gate 2567c478bd9Sstevel@tonic-gate /* 2577c478bd9Sstevel@tonic-gate * Add the module to the end of the list of modules in load- 2587c478bd9Sstevel@tonic-gate * dependency order. This is needed to load the corresponding 2597c478bd9Sstevel@tonic-gate * debugger modules in the same order for layering purposes. 2607c478bd9Sstevel@tonic-gate */ 2617c478bd9Sstevel@tonic-gate mdb_list_append(&kt->k_modlist, km); 2627c478bd9Sstevel@tonic-gate 2637c478bd9Sstevel@tonic-gate if (t->t_flags & MDB_TGT_F_PRELOAD) { 2647c478bd9Sstevel@tonic-gate mdb_iob_printf(mdb.m_out, " %s", name); 2657c478bd9Sstevel@tonic-gate mdb_iob_flush(mdb.m_out); 2667c478bd9Sstevel@tonic-gate kt_load_module(kt, t, km); 2677c478bd9Sstevel@tonic-gate } 2687c478bd9Sstevel@tonic-gate 2697c478bd9Sstevel@tonic-gate } while ((addr = (uintptr_t)ctl.mod_next) != head); 2707c478bd9Sstevel@tonic-gate } 2717c478bd9Sstevel@tonic-gate 2727c478bd9Sstevel@tonic-gate int 2737c478bd9Sstevel@tonic-gate kt_setflags(mdb_tgt_t *t, int flags) 2747c478bd9Sstevel@tonic-gate { 2757c478bd9Sstevel@tonic-gate int iochg = ((flags ^ t->t_flags) & MDB_TGT_F_ALLOWIO) && 2767c478bd9Sstevel@tonic-gate !mdb_prop_postmortem; 2777c478bd9Sstevel@tonic-gate int rwchg = (flags ^ t->t_flags) & MDB_TGT_F_RDWR; 2787c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 2797c478bd9Sstevel@tonic-gate const char *kvmfile; 280*843e1988Sjohnlev void *cookie; 2817c478bd9Sstevel@tonic-gate int mode; 2827c478bd9Sstevel@tonic-gate 2837c478bd9Sstevel@tonic-gate if (!iochg && !rwchg) 2847c478bd9Sstevel@tonic-gate return (0); 2857c478bd9Sstevel@tonic-gate 286*843e1988Sjohnlev if (kt->k_xpv_domu) { 287*843e1988Sjohnlev warn("read-only target"); 288*843e1988Sjohnlev return (-1); 289*843e1988Sjohnlev } 290*843e1988Sjohnlev 2917c478bd9Sstevel@tonic-gate if (iochg) { 2927c478bd9Sstevel@tonic-gate kvmfile = (flags & MDB_TGT_F_ALLOWIO) ? "/dev/allkmem" : 2937c478bd9Sstevel@tonic-gate "/dev/kmem"; 2947c478bd9Sstevel@tonic-gate } else { 2957c478bd9Sstevel@tonic-gate kvmfile = kt->k_kvmfile; 2967c478bd9Sstevel@tonic-gate } 2977c478bd9Sstevel@tonic-gate 2987c478bd9Sstevel@tonic-gate mode = (flags & MDB_TGT_F_RDWR) ? O_RDWR : O_RDONLY; 2997c478bd9Sstevel@tonic-gate 300*843e1988Sjohnlev if ((cookie = kt->k_kb_ops->kb_open(kt->k_symfile, kvmfile, NULL, mode, 3017c478bd9Sstevel@tonic-gate mdb.m_pname)) == NULL) { 3027c478bd9Sstevel@tonic-gate /* We failed to re-open, so don't change t_flags */ 3037c478bd9Sstevel@tonic-gate warn("failed to re-open target"); 3047c478bd9Sstevel@tonic-gate return (-1); 3057c478bd9Sstevel@tonic-gate } 3067c478bd9Sstevel@tonic-gate 3077c478bd9Sstevel@tonic-gate /* 3087c478bd9Sstevel@tonic-gate * We successfully reopened the target, so update k_kvmfile. Also set 3097c478bd9Sstevel@tonic-gate * the RDWR and ALLOWIO bits in t_flags to match those in flags. 3107c478bd9Sstevel@tonic-gate */ 311*843e1988Sjohnlev (void) kt->k_kb_ops->kb_close(kt->k_cookie); 3127c478bd9Sstevel@tonic-gate kt->k_cookie = cookie; 3137c478bd9Sstevel@tonic-gate 3147c478bd9Sstevel@tonic-gate if (kvmfile != kt->k_kvmfile) { 3157c478bd9Sstevel@tonic-gate strfree(kt->k_kvmfile); 3167c478bd9Sstevel@tonic-gate kt->k_kvmfile = strdup(kvmfile); 3177c478bd9Sstevel@tonic-gate } 3187c478bd9Sstevel@tonic-gate 3197c478bd9Sstevel@tonic-gate t->t_flags = (t->t_flags & ~(MDB_TGT_F_RDWR | MDB_TGT_F_ALLOWIO)) | 3207c478bd9Sstevel@tonic-gate (flags & (MDB_TGT_F_RDWR | MDB_TGT_F_ALLOWIO)); 3217c478bd9Sstevel@tonic-gate 3227c478bd9Sstevel@tonic-gate return (0); 3237c478bd9Sstevel@tonic-gate } 3247c478bd9Sstevel@tonic-gate 3257c478bd9Sstevel@tonic-gate /* 3267c478bd9Sstevel@tonic-gate * Determine which PIDs (if any) have their pages saved in the dump. We 3277c478bd9Sstevel@tonic-gate * do this by looking for content flags in dump_flags in the header. These 3287c478bd9Sstevel@tonic-gate * flags, which won't be set in older dumps, tell us whether a single process 3297c478bd9Sstevel@tonic-gate * has had its pages included in the dump. If a single process has been 3307c478bd9Sstevel@tonic-gate * included, we need to get the PID for that process from the dump_pids 3317c478bd9Sstevel@tonic-gate * array in the dump. 3327c478bd9Sstevel@tonic-gate */ 3337c478bd9Sstevel@tonic-gate static int 3347c478bd9Sstevel@tonic-gate kt_find_dump_contents(kt_data_t *kt) 3357c478bd9Sstevel@tonic-gate { 3367c478bd9Sstevel@tonic-gate dumphdr_t *dh = kt->k_dumphdr; 3377c478bd9Sstevel@tonic-gate pid_t pid = -1; 3387c478bd9Sstevel@tonic-gate 3397c478bd9Sstevel@tonic-gate if (dh->dump_flags & DF_ALL) 3407c478bd9Sstevel@tonic-gate return (KT_DUMPCONTENT_ALL); 3417c478bd9Sstevel@tonic-gate 3427c478bd9Sstevel@tonic-gate if (dh->dump_flags & DF_CURPROC) { 3437c478bd9Sstevel@tonic-gate if ((pid = kt->k_dump_find_curproc()) == -1) 3447c478bd9Sstevel@tonic-gate return (KT_DUMPCONTENT_INVALID); 3457c478bd9Sstevel@tonic-gate else 3467c478bd9Sstevel@tonic-gate return (pid); 3477c478bd9Sstevel@tonic-gate } else { 3487c478bd9Sstevel@tonic-gate return (KT_DUMPCONTENT_KERNEL); 3497c478bd9Sstevel@tonic-gate } 3507c478bd9Sstevel@tonic-gate } 3517c478bd9Sstevel@tonic-gate 3527c478bd9Sstevel@tonic-gate static int 3537c478bd9Sstevel@tonic-gate kt_dump_contains_proc(mdb_tgt_t *t, void *context) 3547c478bd9Sstevel@tonic-gate { 3557c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 3567c478bd9Sstevel@tonic-gate pid_t (*f_pid)(uintptr_t); 3577c478bd9Sstevel@tonic-gate pid_t reqpid; 3587c478bd9Sstevel@tonic-gate 3597c478bd9Sstevel@tonic-gate switch (kt->k_dumpcontent) { 3607c478bd9Sstevel@tonic-gate case KT_DUMPCONTENT_KERNEL: 3617c478bd9Sstevel@tonic-gate return (0); 3627c478bd9Sstevel@tonic-gate case KT_DUMPCONTENT_ALL: 3637c478bd9Sstevel@tonic-gate return (1); 3647c478bd9Sstevel@tonic-gate case KT_DUMPCONTENT_INVALID: 3657c478bd9Sstevel@tonic-gate goto procnotfound; 3667c478bd9Sstevel@tonic-gate default: 3677c478bd9Sstevel@tonic-gate f_pid = (pid_t (*)()) dlsym(RTLD_NEXT, "mdb_kproc_pid"); 3687c478bd9Sstevel@tonic-gate if (f_pid == NULL) 3697c478bd9Sstevel@tonic-gate goto procnotfound; 3707c478bd9Sstevel@tonic-gate 3717c478bd9Sstevel@tonic-gate reqpid = f_pid((uintptr_t)context); 3727c478bd9Sstevel@tonic-gate if (reqpid == -1) 3737c478bd9Sstevel@tonic-gate goto procnotfound; 3747c478bd9Sstevel@tonic-gate 3757c478bd9Sstevel@tonic-gate return (kt->k_dumpcontent == reqpid); 3767c478bd9Sstevel@tonic-gate } 3777c478bd9Sstevel@tonic-gate 3787c478bd9Sstevel@tonic-gate procnotfound: 3797c478bd9Sstevel@tonic-gate warn("unable to determine whether dump contains proc %p\n", context); 3807c478bd9Sstevel@tonic-gate return (1); 3817c478bd9Sstevel@tonic-gate } 3827c478bd9Sstevel@tonic-gate 3837c478bd9Sstevel@tonic-gate int 3847c478bd9Sstevel@tonic-gate kt_setcontext(mdb_tgt_t *t, void *context) 3857c478bd9Sstevel@tonic-gate { 3867c478bd9Sstevel@tonic-gate if (context != NULL) { 3877c478bd9Sstevel@tonic-gate const char *argv[2]; 3887c478bd9Sstevel@tonic-gate int argc = 0; 3897c478bd9Sstevel@tonic-gate mdb_tgt_t *ct; 3907c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 3917c478bd9Sstevel@tonic-gate 3927c478bd9Sstevel@tonic-gate argv[argc++] = (const char *)context; 3937c478bd9Sstevel@tonic-gate argv[argc] = NULL; 3947c478bd9Sstevel@tonic-gate 3957c478bd9Sstevel@tonic-gate if (kt->k_dumphdr != NULL && 3967c478bd9Sstevel@tonic-gate !kt_dump_contains_proc(t, context)) { 3977c478bd9Sstevel@tonic-gate warn("dump does not contain pages for proc %p\n", 3987c478bd9Sstevel@tonic-gate context); 3997c478bd9Sstevel@tonic-gate return (-1); 4007c478bd9Sstevel@tonic-gate } 4017c478bd9Sstevel@tonic-gate 4027c478bd9Sstevel@tonic-gate if ((ct = mdb_tgt_create(mdb_kproc_tgt_create, 4037c478bd9Sstevel@tonic-gate t->t_flags, argc, argv)) == NULL) 4047c478bd9Sstevel@tonic-gate return (-1); 4057c478bd9Sstevel@tonic-gate 4067c478bd9Sstevel@tonic-gate mdb_printf("debugger context set to proc %p\n", context); 4077c478bd9Sstevel@tonic-gate mdb_tgt_activate(ct); 4087c478bd9Sstevel@tonic-gate } else 4097c478bd9Sstevel@tonic-gate mdb_printf("debugger context set to kernel\n"); 4107c478bd9Sstevel@tonic-gate 4117c478bd9Sstevel@tonic-gate return (0); 4127c478bd9Sstevel@tonic-gate } 4137c478bd9Sstevel@tonic-gate 4147c478bd9Sstevel@tonic-gate static int 4157c478bd9Sstevel@tonic-gate kt_stack(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) 4167c478bd9Sstevel@tonic-gate { 4177c478bd9Sstevel@tonic-gate kt_data_t *kt = mdb.m_target->t_data; 4187c478bd9Sstevel@tonic-gate return (kt->k_dcmd_stack(addr, flags, argc, argv)); 4197c478bd9Sstevel@tonic-gate } 4207c478bd9Sstevel@tonic-gate 4217c478bd9Sstevel@tonic-gate static int 4227c478bd9Sstevel@tonic-gate kt_stackv(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) 4237c478bd9Sstevel@tonic-gate { 4247c478bd9Sstevel@tonic-gate kt_data_t *kt = mdb.m_target->t_data; 4257c478bd9Sstevel@tonic-gate return (kt->k_dcmd_stackv(addr, flags, argc, argv)); 4267c478bd9Sstevel@tonic-gate } 4277c478bd9Sstevel@tonic-gate 4287c478bd9Sstevel@tonic-gate static int 4297c478bd9Sstevel@tonic-gate kt_stackr(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) 4307c478bd9Sstevel@tonic-gate { 4317c478bd9Sstevel@tonic-gate kt_data_t *kt = mdb.m_target->t_data; 4327c478bd9Sstevel@tonic-gate return (kt->k_dcmd_stackr(addr, flags, argc, argv)); 4337c478bd9Sstevel@tonic-gate } 4347c478bd9Sstevel@tonic-gate 4357c478bd9Sstevel@tonic-gate static int 4367c478bd9Sstevel@tonic-gate kt_regs(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) 4377c478bd9Sstevel@tonic-gate { 4387c478bd9Sstevel@tonic-gate kt_data_t *kt = mdb.m_target->t_data; 439*843e1988Sjohnlev 440*843e1988Sjohnlev if (argc != 0 || (flags & DCMD_ADDRSPEC)) 441*843e1988Sjohnlev return (DCMD_USAGE); 442*843e1988Sjohnlev 443*843e1988Sjohnlev addr = (uintptr_t)kt->k_regs; 444*843e1988Sjohnlev 4457c478bd9Sstevel@tonic-gate return (kt->k_dcmd_regs(addr, flags, argc, argv)); 4467c478bd9Sstevel@tonic-gate } 4477c478bd9Sstevel@tonic-gate 448*843e1988Sjohnlev #ifdef __x86 449*843e1988Sjohnlev static int 450*843e1988Sjohnlev kt_cpustack(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) 451*843e1988Sjohnlev { 452*843e1988Sjohnlev kt_data_t *kt = mdb.m_target->t_data; 453*843e1988Sjohnlev return (kt->k_dcmd_cpustack(addr, flags, argc, argv)); 454*843e1988Sjohnlev } 455*843e1988Sjohnlev 456*843e1988Sjohnlev static int 457*843e1988Sjohnlev kt_cpuregs(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) 458*843e1988Sjohnlev { 459*843e1988Sjohnlev kt_data_t *kt = mdb.m_target->t_data; 460*843e1988Sjohnlev return (kt->k_dcmd_cpuregs(addr, flags, argc, argv)); 461*843e1988Sjohnlev } 462*843e1988Sjohnlev #endif /* __x86 */ 463*843e1988Sjohnlev 4647c478bd9Sstevel@tonic-gate /*ARGSUSED*/ 4657c478bd9Sstevel@tonic-gate static int 4667c478bd9Sstevel@tonic-gate kt_status_dcmd(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) 4677c478bd9Sstevel@tonic-gate { 4687c478bd9Sstevel@tonic-gate kt_data_t *kt = mdb.m_target->t_data; 4697c478bd9Sstevel@tonic-gate struct utsname uts; 4707c478bd9Sstevel@tonic-gate 4717c478bd9Sstevel@tonic-gate bzero(&uts, sizeof (uts)); 4727c478bd9Sstevel@tonic-gate (void) strcpy(uts.nodename, "unknown machine"); 4737c478bd9Sstevel@tonic-gate (void) kt_uname(mdb.m_target, &uts); 4747c478bd9Sstevel@tonic-gate 4757c478bd9Sstevel@tonic-gate if (mdb_prop_postmortem) { 476*843e1988Sjohnlev mdb_printf("debugging %scrash dump %s (%d-bit) from %s\n", 477*843e1988Sjohnlev kt->k_xpv_domu ? "domain " : "", kt->k_kvmfile, 478*843e1988Sjohnlev (int)(sizeof (void *) * NBBY), uts.nodename); 4797c478bd9Sstevel@tonic-gate } else { 4807c478bd9Sstevel@tonic-gate mdb_printf("debugging live kernel (%d-bit) on %s\n", 4817c478bd9Sstevel@tonic-gate (int)(sizeof (void *) * NBBY), uts.nodename); 4827c478bd9Sstevel@tonic-gate } 4837c478bd9Sstevel@tonic-gate 4847c478bd9Sstevel@tonic-gate mdb_printf("operating system: %s %s (%s)\n", 4857c478bd9Sstevel@tonic-gate uts.release, uts.version, uts.machine); 4867c478bd9Sstevel@tonic-gate 4877c478bd9Sstevel@tonic-gate if (kt->k_dumphdr) { 4887c478bd9Sstevel@tonic-gate dumphdr_t *dh = kt->k_dumphdr; 4897c478bd9Sstevel@tonic-gate 4907c478bd9Sstevel@tonic-gate mdb_printf("panic message: %s\n", dh->dump_panicstring); 4917c478bd9Sstevel@tonic-gate 4927c478bd9Sstevel@tonic-gate kt->k_dump_print_content(dh, kt->k_dumpcontent); 4937c478bd9Sstevel@tonic-gate } 4947c478bd9Sstevel@tonic-gate 4957c478bd9Sstevel@tonic-gate return (DCMD_OK); 4967c478bd9Sstevel@tonic-gate } 4977c478bd9Sstevel@tonic-gate 4987c478bd9Sstevel@tonic-gate static const mdb_dcmd_t kt_dcmds[] = { 4997c478bd9Sstevel@tonic-gate { "$c", "?[cnt]", "print stack backtrace", kt_stack }, 5007c478bd9Sstevel@tonic-gate { "$C", "?[cnt]", "print stack backtrace", kt_stackv }, 5017c478bd9Sstevel@tonic-gate { "$r", NULL, "print general-purpose registers", kt_regs }, 5027c478bd9Sstevel@tonic-gate { "$?", NULL, "print status and registers", kt_regs }, 5037c478bd9Sstevel@tonic-gate { "regs", NULL, "print general-purpose registers", kt_regs }, 5047c478bd9Sstevel@tonic-gate { "stack", "?[cnt]", "print stack backtrace", kt_stack }, 5057c478bd9Sstevel@tonic-gate { "stackregs", "?", "print stack backtrace and registers", kt_stackr }, 506*843e1988Sjohnlev #ifdef __x86 507*843e1988Sjohnlev { "cpustack", "?[-v] [-c cpuid] [cnt]", "print stack backtrace for a " 508*843e1988Sjohnlev "specific CPU", kt_cpustack }, 509*843e1988Sjohnlev { "cpuregs", "?[-c cpuid]", "print general-purpose registers for a " 510*843e1988Sjohnlev "specific CPU", kt_cpuregs }, 511*843e1988Sjohnlev #endif 5127c478bd9Sstevel@tonic-gate { "status", NULL, "print summary of current target", kt_status_dcmd }, 5137c478bd9Sstevel@tonic-gate { NULL } 5147c478bd9Sstevel@tonic-gate }; 5157c478bd9Sstevel@tonic-gate 5167c478bd9Sstevel@tonic-gate static uintmax_t 5177c478bd9Sstevel@tonic-gate reg_disc_get(const mdb_var_t *v) 5187c478bd9Sstevel@tonic-gate { 5197c478bd9Sstevel@tonic-gate mdb_tgt_t *t = MDB_NV_COOKIE(v); 5207c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 5217c478bd9Sstevel@tonic-gate mdb_tgt_reg_t r = 0; 5227c478bd9Sstevel@tonic-gate 5237c478bd9Sstevel@tonic-gate (void) mdb_tgt_getareg(t, kt->k_tid, mdb_nv_get_name(v), &r); 5247c478bd9Sstevel@tonic-gate return (r); 5257c478bd9Sstevel@tonic-gate } 5267c478bd9Sstevel@tonic-gate 527ae115bc7Smrj static kt_module_t * 528ae115bc7Smrj kt_module_by_name(kt_data_t *kt, const char *name) 529ae115bc7Smrj { 530ae115bc7Smrj kt_module_t *km; 531ae115bc7Smrj 532ae115bc7Smrj for (km = mdb_list_next(&kt->k_modlist); km; km = mdb_list_next(km)) { 533ae115bc7Smrj if (strcmp(name, km->km_name) == 0) 534ae115bc7Smrj return (km); 535ae115bc7Smrj } 536ae115bc7Smrj 537ae115bc7Smrj return (NULL); 538ae115bc7Smrj } 539ae115bc7Smrj 5407c478bd9Sstevel@tonic-gate void 5417c478bd9Sstevel@tonic-gate kt_activate(mdb_tgt_t *t) 5427c478bd9Sstevel@tonic-gate { 5437c478bd9Sstevel@tonic-gate static const mdb_nv_disc_t reg_disc = { NULL, reg_disc_get }; 5447c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 5457c478bd9Sstevel@tonic-gate void *sym; 5467c478bd9Sstevel@tonic-gate 5477c478bd9Sstevel@tonic-gate int oflag; 5487c478bd9Sstevel@tonic-gate 549*843e1988Sjohnlev mdb_prop_postmortem = kt->k_xpv_domu || (kt->k_dumphdr != NULL); 5507c478bd9Sstevel@tonic-gate mdb_prop_kernel = TRUE; 5517c478bd9Sstevel@tonic-gate mdb_prop_datamodel = MDB_TGT_MODEL_NATIVE; 5527c478bd9Sstevel@tonic-gate 5537c478bd9Sstevel@tonic-gate if (kt->k_activated == FALSE) { 5547c478bd9Sstevel@tonic-gate struct utsname u1, u2; 5557c478bd9Sstevel@tonic-gate /* 5567c478bd9Sstevel@tonic-gate * If we're examining a crash dump, root is /, and uname(2) 5577c478bd9Sstevel@tonic-gate * does not match the utsname in the dump, issue a warning. 5587c478bd9Sstevel@tonic-gate * Note that we are assuming that the modules and macros in 5597c478bd9Sstevel@tonic-gate * /usr/lib are compiled against the kernel from uname -rv. 5607c478bd9Sstevel@tonic-gate */ 5617c478bd9Sstevel@tonic-gate if (mdb_prop_postmortem && strcmp(mdb.m_root, "/") == 0 && 5627c478bd9Sstevel@tonic-gate uname(&u1) >= 0 && kt_uname(t, &u2) >= 0 && 5637c478bd9Sstevel@tonic-gate (strcmp(u1.release, u2.release) || 5647c478bd9Sstevel@tonic-gate strcmp(u1.version, u2.version))) { 5657c478bd9Sstevel@tonic-gate mdb_warn("warning: dump is from %s %s %s; dcmds and " 5667c478bd9Sstevel@tonic-gate "macros may not match kernel implementation\n", 5677c478bd9Sstevel@tonic-gate u2.sysname, u2.release, u2.version); 5687c478bd9Sstevel@tonic-gate } 5697c478bd9Sstevel@tonic-gate 5707c478bd9Sstevel@tonic-gate if (mdb_module_load(KT_MODULE, MDB_MOD_GLOBAL) < 0) { 5717c478bd9Sstevel@tonic-gate warn("failed to load kernel support module -- " 5727c478bd9Sstevel@tonic-gate "some modules may not load\n"); 5737c478bd9Sstevel@tonic-gate } 5747c478bd9Sstevel@tonic-gate 575*843e1988Sjohnlev if (mdb_prop_postmortem && kt->k_dumphdr != NULL) { 5767c478bd9Sstevel@tonic-gate sym = dlsym(RTLD_NEXT, "mdb_dump_print_content"); 5777c478bd9Sstevel@tonic-gate if (sym != NULL) 5787c478bd9Sstevel@tonic-gate kt->k_dump_print_content = (void (*)())sym; 5797c478bd9Sstevel@tonic-gate 5807c478bd9Sstevel@tonic-gate sym = dlsym(RTLD_NEXT, "mdb_dump_find_curproc"); 5817c478bd9Sstevel@tonic-gate if (sym != NULL) 5827c478bd9Sstevel@tonic-gate kt->k_dump_find_curproc = (int (*)())sym; 5837c478bd9Sstevel@tonic-gate 5847c478bd9Sstevel@tonic-gate kt->k_dumpcontent = kt_find_dump_contents(kt); 5857c478bd9Sstevel@tonic-gate } 5867c478bd9Sstevel@tonic-gate 5877c478bd9Sstevel@tonic-gate if (t->t_flags & MDB_TGT_F_PRELOAD) { 5887c478bd9Sstevel@tonic-gate oflag = mdb_iob_getflags(mdb.m_out) & MDB_IOB_PGENABLE; 5897c478bd9Sstevel@tonic-gate 5907c478bd9Sstevel@tonic-gate mdb_iob_clrflags(mdb.m_out, oflag); 5917c478bd9Sstevel@tonic-gate mdb_iob_puts(mdb.m_out, "Preloading module symbols: ["); 5927c478bd9Sstevel@tonic-gate mdb_iob_flush(mdb.m_out); 5937c478bd9Sstevel@tonic-gate } 5947c478bd9Sstevel@tonic-gate 595ae115bc7Smrj if (!(t->t_flags & MDB_TGT_F_NOLOAD)) { 5967c478bd9Sstevel@tonic-gate kt_load_modules(kt, t); 5977c478bd9Sstevel@tonic-gate 598ae115bc7Smrj /* 599ae115bc7Smrj * Determine where the CTF data for krtld is. If krtld 600ae115bc7Smrj * is rolled into unix, force load the MDB krtld 601ae115bc7Smrj * module. 602ae115bc7Smrj */ 603ae115bc7Smrj kt->k_rtld_name = "krtld"; 604ae115bc7Smrj 605ae115bc7Smrj if (kt_module_by_name(kt, "krtld") == NULL) { 606ae115bc7Smrj (void) mdb_module_load("krtld", MDB_MOD_SILENT); 607ae115bc7Smrj kt->k_rtld_name = "unix"; 608ae115bc7Smrj } 609ae115bc7Smrj } 610ae115bc7Smrj 611ae115bc7Smrj 6127c478bd9Sstevel@tonic-gate if (t->t_flags & MDB_TGT_F_PRELOAD) { 6137c478bd9Sstevel@tonic-gate mdb_iob_puts(mdb.m_out, " ]\n"); 6147c478bd9Sstevel@tonic-gate mdb_iob_setflags(mdb.m_out, oflag); 6157c478bd9Sstevel@tonic-gate } 6167c478bd9Sstevel@tonic-gate 6177c478bd9Sstevel@tonic-gate kt->k_activated = TRUE; 6187c478bd9Sstevel@tonic-gate } 6197c478bd9Sstevel@tonic-gate 6207c478bd9Sstevel@tonic-gate (void) mdb_tgt_register_dcmds(t, &kt_dcmds[0], MDB_MOD_FORCE); 6217c478bd9Sstevel@tonic-gate 6227c478bd9Sstevel@tonic-gate /* Export some of our registers as named variables */ 6237c478bd9Sstevel@tonic-gate mdb_tgt_register_regvars(t, kt->k_rds, ®_disc, MDB_NV_RDONLY); 6247c478bd9Sstevel@tonic-gate 6257c478bd9Sstevel@tonic-gate mdb_tgt_elf_export(kt->k_file); 6267c478bd9Sstevel@tonic-gate } 6277c478bd9Sstevel@tonic-gate 6287c478bd9Sstevel@tonic-gate void 6297c478bd9Sstevel@tonic-gate kt_deactivate(mdb_tgt_t *t) 6307c478bd9Sstevel@tonic-gate { 6317c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 6327c478bd9Sstevel@tonic-gate 6337c478bd9Sstevel@tonic-gate const mdb_tgt_regdesc_t *rdp; 6347c478bd9Sstevel@tonic-gate const mdb_dcmd_t *dcp; 6357c478bd9Sstevel@tonic-gate 6367c478bd9Sstevel@tonic-gate for (rdp = kt->k_rds; rdp->rd_name != NULL; rdp++) { 6377c478bd9Sstevel@tonic-gate mdb_var_t *v; 6387c478bd9Sstevel@tonic-gate 6397c478bd9Sstevel@tonic-gate if (!(rdp->rd_flags & MDB_TGT_R_EXPORT)) 6407c478bd9Sstevel@tonic-gate continue; /* Didn't export register as a variable */ 6417c478bd9Sstevel@tonic-gate 6427c478bd9Sstevel@tonic-gate if ((v = mdb_nv_lookup(&mdb.m_nv, rdp->rd_name)) != NULL) { 6437c478bd9Sstevel@tonic-gate v->v_flags &= ~MDB_NV_PERSIST; 6447c478bd9Sstevel@tonic-gate mdb_nv_remove(&mdb.m_nv, v); 6457c478bd9Sstevel@tonic-gate } 6467c478bd9Sstevel@tonic-gate } 6477c478bd9Sstevel@tonic-gate 6487c478bd9Sstevel@tonic-gate for (dcp = &kt_dcmds[0]; dcp->dc_name != NULL; dcp++) { 6497c478bd9Sstevel@tonic-gate if (mdb_module_remove_dcmd(t->t_module, dcp->dc_name) == -1) 6507c478bd9Sstevel@tonic-gate warn("failed to remove dcmd %s", dcp->dc_name); 6517c478bd9Sstevel@tonic-gate } 6527c478bd9Sstevel@tonic-gate 6537c478bd9Sstevel@tonic-gate mdb_prop_postmortem = FALSE; 6547c478bd9Sstevel@tonic-gate mdb_prop_kernel = FALSE; 6557c478bd9Sstevel@tonic-gate mdb_prop_datamodel = MDB_TGT_MODEL_UNKNOWN; 6567c478bd9Sstevel@tonic-gate } 6577c478bd9Sstevel@tonic-gate 6587c478bd9Sstevel@tonic-gate /*ARGSUSED*/ 6597c478bd9Sstevel@tonic-gate const char * 6607c478bd9Sstevel@tonic-gate kt_name(mdb_tgt_t *t) 6617c478bd9Sstevel@tonic-gate { 6627c478bd9Sstevel@tonic-gate return ("kvm"); 6637c478bd9Sstevel@tonic-gate } 6647c478bd9Sstevel@tonic-gate 6657c478bd9Sstevel@tonic-gate const char * 6667c478bd9Sstevel@tonic-gate kt_platform(mdb_tgt_t *t) 6677c478bd9Sstevel@tonic-gate { 6687c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 6697c478bd9Sstevel@tonic-gate return (kt->k_platform); 6707c478bd9Sstevel@tonic-gate } 6717c478bd9Sstevel@tonic-gate 6727c478bd9Sstevel@tonic-gate int 6737c478bd9Sstevel@tonic-gate kt_uname(mdb_tgt_t *t, struct utsname *utsp) 6747c478bd9Sstevel@tonic-gate { 6757c478bd9Sstevel@tonic-gate return (mdb_tgt_readsym(t, MDB_TGT_AS_VIRT, utsp, 6767c478bd9Sstevel@tonic-gate sizeof (struct utsname), MDB_TGT_OBJ_EXEC, "utsname")); 6777c478bd9Sstevel@tonic-gate } 6787c478bd9Sstevel@tonic-gate 6797c478bd9Sstevel@tonic-gate /*ARGSUSED*/ 6807c478bd9Sstevel@tonic-gate int 6817c478bd9Sstevel@tonic-gate kt_dmodel(mdb_tgt_t *t) 6827c478bd9Sstevel@tonic-gate { 6837c478bd9Sstevel@tonic-gate return (MDB_TGT_MODEL_NATIVE); 6847c478bd9Sstevel@tonic-gate } 6857c478bd9Sstevel@tonic-gate 6867c478bd9Sstevel@tonic-gate ssize_t 6877c478bd9Sstevel@tonic-gate kt_aread(mdb_tgt_t *t, mdb_tgt_as_t as, void *buf, 6887c478bd9Sstevel@tonic-gate size_t nbytes, mdb_tgt_addr_t addr) 6897c478bd9Sstevel@tonic-gate { 6907c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 6917c478bd9Sstevel@tonic-gate ssize_t rval; 6927c478bd9Sstevel@tonic-gate 693*843e1988Sjohnlev if ((rval = kt->k_kb_ops->kb_aread(kt->k_cookie, addr, buf, 694*843e1988Sjohnlev nbytes, as)) == -1) 6957c478bd9Sstevel@tonic-gate return (set_errno(EMDB_NOMAP)); 6967c478bd9Sstevel@tonic-gate 6977c478bd9Sstevel@tonic-gate return (rval); 6987c478bd9Sstevel@tonic-gate } 6997c478bd9Sstevel@tonic-gate 7007c478bd9Sstevel@tonic-gate ssize_t 7017c478bd9Sstevel@tonic-gate kt_awrite(mdb_tgt_t *t, mdb_tgt_as_t as, const void *buf, 7027c478bd9Sstevel@tonic-gate size_t nbytes, mdb_tgt_addr_t addr) 7037c478bd9Sstevel@tonic-gate { 7047c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 7057c478bd9Sstevel@tonic-gate ssize_t rval; 7067c478bd9Sstevel@tonic-gate 707*843e1988Sjohnlev if ((rval = kt->k_kb_ops->kb_awrite(kt->k_cookie, addr, buf, 708*843e1988Sjohnlev nbytes, as)) == -1) 7097c478bd9Sstevel@tonic-gate return (set_errno(EMDB_NOMAP)); 7107c478bd9Sstevel@tonic-gate 7117c478bd9Sstevel@tonic-gate return (rval); 7127c478bd9Sstevel@tonic-gate } 7137c478bd9Sstevel@tonic-gate 7147c478bd9Sstevel@tonic-gate ssize_t 7157c478bd9Sstevel@tonic-gate kt_vread(mdb_tgt_t *t, void *buf, size_t nbytes, uintptr_t addr) 7167c478bd9Sstevel@tonic-gate { 7177c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 7187c478bd9Sstevel@tonic-gate ssize_t rval; 7197c478bd9Sstevel@tonic-gate 720*843e1988Sjohnlev if ((rval = kt->k_kb_ops->kb_kread(kt->k_cookie, addr, buf, 721*843e1988Sjohnlev nbytes)) == -1) 7227c478bd9Sstevel@tonic-gate return (set_errno(EMDB_NOMAP)); 7237c478bd9Sstevel@tonic-gate 7247c478bd9Sstevel@tonic-gate return (rval); 7257c478bd9Sstevel@tonic-gate } 7267c478bd9Sstevel@tonic-gate 7277c478bd9Sstevel@tonic-gate ssize_t 7287c478bd9Sstevel@tonic-gate kt_vwrite(mdb_tgt_t *t, const void *buf, size_t nbytes, uintptr_t addr) 7297c478bd9Sstevel@tonic-gate { 7307c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 7317c478bd9Sstevel@tonic-gate ssize_t rval; 7327c478bd9Sstevel@tonic-gate 733*843e1988Sjohnlev if ((rval = kt->k_kb_ops->kb_kwrite(kt->k_cookie, addr, buf, 734*843e1988Sjohnlev nbytes)) == -1) 7357c478bd9Sstevel@tonic-gate return (set_errno(EMDB_NOMAP)); 7367c478bd9Sstevel@tonic-gate 7377c478bd9Sstevel@tonic-gate return (rval); 7387c478bd9Sstevel@tonic-gate } 7397c478bd9Sstevel@tonic-gate 7407c478bd9Sstevel@tonic-gate ssize_t 7417c478bd9Sstevel@tonic-gate kt_fread(mdb_tgt_t *t, void *buf, size_t nbytes, uintptr_t addr) 7427c478bd9Sstevel@tonic-gate { 7437c478bd9Sstevel@tonic-gate return (kt_vread(t, buf, nbytes, addr)); 7447c478bd9Sstevel@tonic-gate } 7457c478bd9Sstevel@tonic-gate 7467c478bd9Sstevel@tonic-gate ssize_t 7477c478bd9Sstevel@tonic-gate kt_fwrite(mdb_tgt_t *t, const void *buf, size_t nbytes, uintptr_t addr) 7487c478bd9Sstevel@tonic-gate { 7497c478bd9Sstevel@tonic-gate return (kt_vwrite(t, buf, nbytes, addr)); 7507c478bd9Sstevel@tonic-gate } 7517c478bd9Sstevel@tonic-gate 7527c478bd9Sstevel@tonic-gate ssize_t 7537c478bd9Sstevel@tonic-gate kt_pread(mdb_tgt_t *t, void *buf, size_t nbytes, physaddr_t addr) 7547c478bd9Sstevel@tonic-gate { 7557c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 7567c478bd9Sstevel@tonic-gate ssize_t rval; 7577c478bd9Sstevel@tonic-gate 758*843e1988Sjohnlev if ((rval = kt->k_kb_ops->kb_pread(kt->k_cookie, addr, buf, 759*843e1988Sjohnlev nbytes)) == -1) 7607c478bd9Sstevel@tonic-gate return (set_errno(EMDB_NOMAP)); 7617c478bd9Sstevel@tonic-gate 7627c478bd9Sstevel@tonic-gate return (rval); 7637c478bd9Sstevel@tonic-gate } 7647c478bd9Sstevel@tonic-gate 7657c478bd9Sstevel@tonic-gate ssize_t 7667c478bd9Sstevel@tonic-gate kt_pwrite(mdb_tgt_t *t, const void *buf, size_t nbytes, physaddr_t addr) 7677c478bd9Sstevel@tonic-gate { 7687c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 7697c478bd9Sstevel@tonic-gate ssize_t rval; 7707c478bd9Sstevel@tonic-gate 771*843e1988Sjohnlev if ((rval = kt->k_kb_ops->kb_pwrite(kt->k_cookie, addr, buf, 772*843e1988Sjohnlev nbytes)) == -1) 7737c478bd9Sstevel@tonic-gate return (set_errno(EMDB_NOMAP)); 7747c478bd9Sstevel@tonic-gate 7757c478bd9Sstevel@tonic-gate return (rval); 7767c478bd9Sstevel@tonic-gate } 7777c478bd9Sstevel@tonic-gate 7787c478bd9Sstevel@tonic-gate int 7797c478bd9Sstevel@tonic-gate kt_vtop(mdb_tgt_t *t, mdb_tgt_as_t as, uintptr_t va, physaddr_t *pap) 7807c478bd9Sstevel@tonic-gate { 7817c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 7827c478bd9Sstevel@tonic-gate 7837c478bd9Sstevel@tonic-gate struct as *asp; 7847c478bd9Sstevel@tonic-gate physaddr_t pa; 7857c478bd9Sstevel@tonic-gate mdb_module_t *mod; 7867c478bd9Sstevel@tonic-gate mdb_var_t *v; 7877c478bd9Sstevel@tonic-gate int (*fptr)(uintptr_t, struct as *, physaddr_t *); 7887c478bd9Sstevel@tonic-gate 7897c478bd9Sstevel@tonic-gate switch ((uintptr_t)as) { 7907c478bd9Sstevel@tonic-gate case (uintptr_t)MDB_TGT_AS_PHYS: 7917c478bd9Sstevel@tonic-gate case (uintptr_t)MDB_TGT_AS_FILE: 7927c478bd9Sstevel@tonic-gate case (uintptr_t)MDB_TGT_AS_IO: 7937c478bd9Sstevel@tonic-gate return (set_errno(EINVAL)); 7947c478bd9Sstevel@tonic-gate case (uintptr_t)MDB_TGT_AS_VIRT: 7957c478bd9Sstevel@tonic-gate asp = kt->k_as; 7967c478bd9Sstevel@tonic-gate break; 7977c478bd9Sstevel@tonic-gate default: 7987c478bd9Sstevel@tonic-gate asp = (struct as *)as; 7997c478bd9Sstevel@tonic-gate } 8007c478bd9Sstevel@tonic-gate 801*843e1988Sjohnlev if ((pa = kt->k_kb_ops->kb_vtop(kt->k_cookie, asp, va)) != -1ULL) { 8027c478bd9Sstevel@tonic-gate *pap = pa; 8037c478bd9Sstevel@tonic-gate return (0); 8047c478bd9Sstevel@tonic-gate } 8057c478bd9Sstevel@tonic-gate 8067c478bd9Sstevel@tonic-gate if ((v = mdb_nv_lookup(&mdb.m_modules, "unix")) != NULL && 8077c478bd9Sstevel@tonic-gate (mod = mdb_nv_get_cookie(v)) != NULL) { 8087c478bd9Sstevel@tonic-gate 8097c478bd9Sstevel@tonic-gate fptr = (int (*)(uintptr_t, struct as *, physaddr_t *)) 810*843e1988Sjohnlev dlsym(mod->mod_hdl, "platform_vtop"); 8117c478bd9Sstevel@tonic-gate 8127c478bd9Sstevel@tonic-gate if ((fptr != NULL) && ((*fptr)(va, asp, pap) == 0)) 8137c478bd9Sstevel@tonic-gate return (0); 8147c478bd9Sstevel@tonic-gate } 8157c478bd9Sstevel@tonic-gate 8167c478bd9Sstevel@tonic-gate return (set_errno(EMDB_NOMAP)); 8177c478bd9Sstevel@tonic-gate } 8187c478bd9Sstevel@tonic-gate 8197c478bd9Sstevel@tonic-gate int 8207c478bd9Sstevel@tonic-gate kt_lookup_by_name(mdb_tgt_t *t, const char *obj, const char *name, 8217c478bd9Sstevel@tonic-gate GElf_Sym *symp, mdb_syminfo_t *sip) 8227c478bd9Sstevel@tonic-gate { 8237c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 8247c478bd9Sstevel@tonic-gate kt_module_t *km, kmod; 8257c478bd9Sstevel@tonic-gate mdb_var_t *v; 8267c478bd9Sstevel@tonic-gate int n; 8277c478bd9Sstevel@tonic-gate 8287c478bd9Sstevel@tonic-gate /* 8297c478bd9Sstevel@tonic-gate * To simplify the implementation, we create a fake module on the stack 8307c478bd9Sstevel@tonic-gate * which is "prepended" to k_modlist and whose symtab is kt->k_symtab. 8317c478bd9Sstevel@tonic-gate */ 8327c478bd9Sstevel@tonic-gate kmod.km_symtab = kt->k_symtab; 8337c478bd9Sstevel@tonic-gate kmod.km_list.ml_next = mdb_list_next(&kt->k_modlist); 8347c478bd9Sstevel@tonic-gate 8357c478bd9Sstevel@tonic-gate switch ((uintptr_t)obj) { 8367c478bd9Sstevel@tonic-gate case (uintptr_t)MDB_TGT_OBJ_EXEC: 8377c478bd9Sstevel@tonic-gate km = &kmod; 8387c478bd9Sstevel@tonic-gate n = 1; 8397c478bd9Sstevel@tonic-gate break; 8407c478bd9Sstevel@tonic-gate 8417c478bd9Sstevel@tonic-gate case (uintptr_t)MDB_TGT_OBJ_EVERY: 8427c478bd9Sstevel@tonic-gate km = &kmod; 8437c478bd9Sstevel@tonic-gate n = mdb_nv_size(&kt->k_modules) + 1; 8447c478bd9Sstevel@tonic-gate break; 8457c478bd9Sstevel@tonic-gate 8467c478bd9Sstevel@tonic-gate case (uintptr_t)MDB_TGT_OBJ_RTLD: 847ae115bc7Smrj obj = kt->k_rtld_name; 8487c478bd9Sstevel@tonic-gate /*FALLTHRU*/ 8497c478bd9Sstevel@tonic-gate 8507c478bd9Sstevel@tonic-gate default: 8517c478bd9Sstevel@tonic-gate if ((v = mdb_nv_lookup(&kt->k_modules, obj)) == NULL) 8527c478bd9Sstevel@tonic-gate return (set_errno(EMDB_NOOBJ)); 8537c478bd9Sstevel@tonic-gate 8547c478bd9Sstevel@tonic-gate km = mdb_nv_get_cookie(v); 8557c478bd9Sstevel@tonic-gate n = 1; 8567c478bd9Sstevel@tonic-gate 8577c478bd9Sstevel@tonic-gate if (km->km_symtab == NULL) 8587c478bd9Sstevel@tonic-gate kt_load_module(kt, t, km); 8597c478bd9Sstevel@tonic-gate } 8607c478bd9Sstevel@tonic-gate 8617c478bd9Sstevel@tonic-gate for (; n > 0; n--, km = mdb_list_next(km)) { 8627c478bd9Sstevel@tonic-gate if (mdb_gelf_symtab_lookup_by_name(km->km_symtab, name, 8637c478bd9Sstevel@tonic-gate symp, &sip->sym_id) == 0) { 8647c478bd9Sstevel@tonic-gate sip->sym_table = MDB_TGT_SYMTAB; 8657c478bd9Sstevel@tonic-gate return (0); 8667c478bd9Sstevel@tonic-gate } 8677c478bd9Sstevel@tonic-gate } 8687c478bd9Sstevel@tonic-gate 8697c478bd9Sstevel@tonic-gate return (set_errno(EMDB_NOSYM)); 8707c478bd9Sstevel@tonic-gate } 8717c478bd9Sstevel@tonic-gate 8727c478bd9Sstevel@tonic-gate int 8737c478bd9Sstevel@tonic-gate kt_lookup_by_addr(mdb_tgt_t *t, uintptr_t addr, uint_t flags, 8747c478bd9Sstevel@tonic-gate char *buf, size_t nbytes, GElf_Sym *symp, mdb_syminfo_t *sip) 8757c478bd9Sstevel@tonic-gate { 8767c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 8777c478bd9Sstevel@tonic-gate kt_module_t kmods[3], *kmods_begin = &kmods[0], *kmods_end; 8787c478bd9Sstevel@tonic-gate const char *name; 8797c478bd9Sstevel@tonic-gate 8807c478bd9Sstevel@tonic-gate kt_module_t *km = &kmods[0]; /* Point km at first fake module */ 8817c478bd9Sstevel@tonic-gate kt_module_t *sym_km = NULL; /* Module associated with best sym */ 8827c478bd9Sstevel@tonic-gate GElf_Sym sym; /* Best symbol found so far if !exact */ 8837c478bd9Sstevel@tonic-gate uint_t symid; /* ID of best symbol found so far */ 8847c478bd9Sstevel@tonic-gate 8857c478bd9Sstevel@tonic-gate /* 8867c478bd9Sstevel@tonic-gate * To simplify the implementation, we create fake modules on the stack 8877c478bd9Sstevel@tonic-gate * that are "prepended" to k_modlist and whose symtab is set to 8887c478bd9Sstevel@tonic-gate * each of three special symbol tables, in order of precedence. 8897c478bd9Sstevel@tonic-gate */ 8907c478bd9Sstevel@tonic-gate km->km_symtab = mdb.m_prsym; 8917c478bd9Sstevel@tonic-gate 8927c478bd9Sstevel@tonic-gate if (kt->k_symtab != NULL) { 8937c478bd9Sstevel@tonic-gate km->km_list.ml_next = (mdb_list_t *)(km + 1); 8947c478bd9Sstevel@tonic-gate km = mdb_list_next(km); 8957c478bd9Sstevel@tonic-gate km->km_symtab = kt->k_symtab; 8967c478bd9Sstevel@tonic-gate } 8977c478bd9Sstevel@tonic-gate 8987c478bd9Sstevel@tonic-gate if (kt->k_dynsym != NULL) { 8997c478bd9Sstevel@tonic-gate km->km_list.ml_next = (mdb_list_t *)(km + 1); 9007c478bd9Sstevel@tonic-gate km = mdb_list_next(km); 9017c478bd9Sstevel@tonic-gate km->km_symtab = kt->k_dynsym; 9027c478bd9Sstevel@tonic-gate } 9037c478bd9Sstevel@tonic-gate 9047c478bd9Sstevel@tonic-gate km->km_list.ml_next = mdb_list_next(&kt->k_modlist); 9057c478bd9Sstevel@tonic-gate kmods_end = km; 9067c478bd9Sstevel@tonic-gate 9077c478bd9Sstevel@tonic-gate /* 9087c478bd9Sstevel@tonic-gate * Now iterate over the list of fake and real modules. If the module 9097c478bd9Sstevel@tonic-gate * has no symbol table and the address is in the text section, 9107c478bd9Sstevel@tonic-gate * instantiate the module's symbol table. In exact mode, we can 9117c478bd9Sstevel@tonic-gate * jump to 'found' immediately if we match. Otherwise we continue 9127c478bd9Sstevel@tonic-gate * looking and improve our choice if we find a closer symbol. 9137c478bd9Sstevel@tonic-gate */ 9147c478bd9Sstevel@tonic-gate for (km = &kmods[0]; km != NULL; km = mdb_list_next(km)) { 9157c478bd9Sstevel@tonic-gate if (km->km_symtab == NULL && addr >= km->km_text_va && 9167c478bd9Sstevel@tonic-gate addr < km->km_text_va + km->km_text_size) 9177c478bd9Sstevel@tonic-gate kt_load_module(kt, t, km); 9187c478bd9Sstevel@tonic-gate 9197c478bd9Sstevel@tonic-gate if (mdb_gelf_symtab_lookup_by_addr(km->km_symtab, addr, 9207c478bd9Sstevel@tonic-gate flags, buf, nbytes, symp, &sip->sym_id) != 0 || 9217c478bd9Sstevel@tonic-gate symp->st_value == 0) 9227c478bd9Sstevel@tonic-gate continue; 9237c478bd9Sstevel@tonic-gate 9247c478bd9Sstevel@tonic-gate if (flags & MDB_TGT_SYM_EXACT) { 9257c478bd9Sstevel@tonic-gate sym_km = km; 9267c478bd9Sstevel@tonic-gate goto found; 9277c478bd9Sstevel@tonic-gate } 9287c478bd9Sstevel@tonic-gate 9297c478bd9Sstevel@tonic-gate if (sym_km == NULL || mdb_gelf_sym_closer(symp, &sym, addr)) { 9307c478bd9Sstevel@tonic-gate sym_km = km; 9317c478bd9Sstevel@tonic-gate sym = *symp; 9327c478bd9Sstevel@tonic-gate symid = sip->sym_id; 9337c478bd9Sstevel@tonic-gate } 9347c478bd9Sstevel@tonic-gate } 9357c478bd9Sstevel@tonic-gate 9367c478bd9Sstevel@tonic-gate if (sym_km == NULL) 9377c478bd9Sstevel@tonic-gate return (set_errno(EMDB_NOSYMADDR)); 9387c478bd9Sstevel@tonic-gate 9397c478bd9Sstevel@tonic-gate *symp = sym; /* Copy our best symbol into the caller's symbol */ 9407c478bd9Sstevel@tonic-gate sip->sym_id = symid; 9417c478bd9Sstevel@tonic-gate found: 9427c478bd9Sstevel@tonic-gate /* 9437c478bd9Sstevel@tonic-gate * Once we've found something, copy the final name into the caller's 9447c478bd9Sstevel@tonic-gate * buffer and prefix it with the load object name if appropriate. 9457c478bd9Sstevel@tonic-gate */ 946*843e1988Sjohnlev if (sym_km != NULL) { 947*843e1988Sjohnlev name = mdb_gelf_sym_name(sym_km->km_symtab, symp); 948*843e1988Sjohnlev 949*843e1988Sjohnlev if (sym_km < kmods_begin || sym_km > kmods_end) { 950*843e1988Sjohnlev (void) mdb_snprintf(buf, nbytes, "%s`%s", 951*843e1988Sjohnlev sym_km->km_name, name); 952*843e1988Sjohnlev } else if (nbytes > 0) { 953*843e1988Sjohnlev (void) strncpy(buf, name, nbytes); 954*843e1988Sjohnlev buf[nbytes - 1] = '\0'; 955*843e1988Sjohnlev } 9567c478bd9Sstevel@tonic-gate 957*843e1988Sjohnlev if (sym_km->km_symtab == mdb.m_prsym) 958*843e1988Sjohnlev sip->sym_table = MDB_TGT_PRVSYM; 959*843e1988Sjohnlev else 960*843e1988Sjohnlev sip->sym_table = MDB_TGT_SYMTAB; 961*843e1988Sjohnlev } else { 9627c478bd9Sstevel@tonic-gate sip->sym_table = MDB_TGT_SYMTAB; 963*843e1988Sjohnlev } 9647c478bd9Sstevel@tonic-gate 9657c478bd9Sstevel@tonic-gate return (0); 9667c478bd9Sstevel@tonic-gate } 9677c478bd9Sstevel@tonic-gate 9687c478bd9Sstevel@tonic-gate static int 9697c478bd9Sstevel@tonic-gate kt_symtab_func(void *data, const GElf_Sym *sym, const char *name, uint_t id) 9707c478bd9Sstevel@tonic-gate { 9717c478bd9Sstevel@tonic-gate kt_symarg_t *argp = data; 9727c478bd9Sstevel@tonic-gate 9737c478bd9Sstevel@tonic-gate if (mdb_tgt_sym_match(sym, argp->sym_type)) { 9747c478bd9Sstevel@tonic-gate argp->sym_info.sym_id = id; 9757c478bd9Sstevel@tonic-gate 9767c478bd9Sstevel@tonic-gate return (argp->sym_cb(argp->sym_data, sym, name, 9777c478bd9Sstevel@tonic-gate &argp->sym_info, argp->sym_obj)); 9787c478bd9Sstevel@tonic-gate } 9797c478bd9Sstevel@tonic-gate 9807c478bd9Sstevel@tonic-gate return (0); 9817c478bd9Sstevel@tonic-gate } 9827c478bd9Sstevel@tonic-gate 9837c478bd9Sstevel@tonic-gate static void 9847c478bd9Sstevel@tonic-gate kt_symtab_iter(mdb_gelf_symtab_t *gst, uint_t type, const char *obj, 9857c478bd9Sstevel@tonic-gate mdb_tgt_sym_f *cb, void *p) 9867c478bd9Sstevel@tonic-gate { 9877c478bd9Sstevel@tonic-gate kt_symarg_t arg; 9887c478bd9Sstevel@tonic-gate 9897c478bd9Sstevel@tonic-gate arg.sym_cb = cb; 9907c478bd9Sstevel@tonic-gate arg.sym_data = p; 9917c478bd9Sstevel@tonic-gate arg.sym_type = type; 9927c478bd9Sstevel@tonic-gate arg.sym_info.sym_table = gst->gst_tabid; 9937c478bd9Sstevel@tonic-gate arg.sym_obj = obj; 9947c478bd9Sstevel@tonic-gate 9957c478bd9Sstevel@tonic-gate mdb_gelf_symtab_iter(gst, kt_symtab_func, &arg); 9967c478bd9Sstevel@tonic-gate } 9977c478bd9Sstevel@tonic-gate 9987c478bd9Sstevel@tonic-gate int 9997c478bd9Sstevel@tonic-gate kt_symbol_iter(mdb_tgt_t *t, const char *obj, uint_t which, uint_t type, 10007c478bd9Sstevel@tonic-gate mdb_tgt_sym_f *cb, void *data) 10017c478bd9Sstevel@tonic-gate { 10027c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 10037c478bd9Sstevel@tonic-gate kt_module_t *km; 10047c478bd9Sstevel@tonic-gate 10057c478bd9Sstevel@tonic-gate mdb_gelf_symtab_t *symtab = NULL; 10067c478bd9Sstevel@tonic-gate mdb_var_t *v; 10077c478bd9Sstevel@tonic-gate 10087c478bd9Sstevel@tonic-gate switch ((uintptr_t)obj) { 10097c478bd9Sstevel@tonic-gate case (uintptr_t)MDB_TGT_OBJ_EXEC: 10107c478bd9Sstevel@tonic-gate if (which == MDB_TGT_SYMTAB) 10117c478bd9Sstevel@tonic-gate symtab = kt->k_symtab; 10127c478bd9Sstevel@tonic-gate else 10137c478bd9Sstevel@tonic-gate symtab = kt->k_dynsym; 10147c478bd9Sstevel@tonic-gate break; 10157c478bd9Sstevel@tonic-gate 10167c478bd9Sstevel@tonic-gate case (uintptr_t)MDB_TGT_OBJ_EVERY: 10177c478bd9Sstevel@tonic-gate if (which == MDB_TGT_DYNSYM) { 10187c478bd9Sstevel@tonic-gate symtab = kt->k_dynsym; 10197c478bd9Sstevel@tonic-gate obj = MDB_TGT_OBJ_EXEC; 10207c478bd9Sstevel@tonic-gate break; 10217c478bd9Sstevel@tonic-gate } 10227c478bd9Sstevel@tonic-gate 10237c478bd9Sstevel@tonic-gate mdb_nv_rewind(&kt->k_modules); 10247c478bd9Sstevel@tonic-gate while ((v = mdb_nv_advance(&kt->k_modules)) != NULL) { 10257c478bd9Sstevel@tonic-gate km = mdb_nv_get_cookie(v); 10267c478bd9Sstevel@tonic-gate 10277c478bd9Sstevel@tonic-gate if (km->km_symtab == NULL) 10287c478bd9Sstevel@tonic-gate kt_load_module(kt, t, km); 10297c478bd9Sstevel@tonic-gate 10307c478bd9Sstevel@tonic-gate if (km->km_symtab != NULL) 10317c478bd9Sstevel@tonic-gate kt_symtab_iter(km->km_symtab, type, 10327c478bd9Sstevel@tonic-gate km->km_name, cb, data); 10337c478bd9Sstevel@tonic-gate } 10347c478bd9Sstevel@tonic-gate break; 10357c478bd9Sstevel@tonic-gate 10367c478bd9Sstevel@tonic-gate case (uintptr_t)MDB_TGT_OBJ_RTLD: 1037ae115bc7Smrj obj = kt->k_rtld_name; 10387c478bd9Sstevel@tonic-gate /*FALLTHRU*/ 10397c478bd9Sstevel@tonic-gate 10407c478bd9Sstevel@tonic-gate default: 10417c478bd9Sstevel@tonic-gate v = mdb_nv_lookup(&kt->k_modules, obj); 10427c478bd9Sstevel@tonic-gate 10437c478bd9Sstevel@tonic-gate if (v == NULL) 10447c478bd9Sstevel@tonic-gate return (set_errno(EMDB_NOOBJ)); 10457c478bd9Sstevel@tonic-gate 10467c478bd9Sstevel@tonic-gate km = mdb_nv_get_cookie(v); 10477c478bd9Sstevel@tonic-gate 10487c478bd9Sstevel@tonic-gate if (km->km_symtab == NULL) 10497c478bd9Sstevel@tonic-gate kt_load_module(kt, t, km); 10507c478bd9Sstevel@tonic-gate 10517c478bd9Sstevel@tonic-gate symtab = km->km_symtab; 10527c478bd9Sstevel@tonic-gate } 10537c478bd9Sstevel@tonic-gate 10547c478bd9Sstevel@tonic-gate if (symtab) 10557c478bd9Sstevel@tonic-gate kt_symtab_iter(symtab, type, obj, cb, data); 10567c478bd9Sstevel@tonic-gate 10577c478bd9Sstevel@tonic-gate return (0); 10587c478bd9Sstevel@tonic-gate } 10597c478bd9Sstevel@tonic-gate 10607c478bd9Sstevel@tonic-gate static int 10617c478bd9Sstevel@tonic-gate kt_mapping_walk(uintptr_t addr, const void *data, kt_maparg_t *marg) 10627c478bd9Sstevel@tonic-gate { 10637c478bd9Sstevel@tonic-gate /* 10647c478bd9Sstevel@tonic-gate * This is a bit sketchy but avoids problematic compilation of this 10657c478bd9Sstevel@tonic-gate * target against the current VM implementation. Now that we have 10667c478bd9Sstevel@tonic-gate * vmem, we can make this less broken and more informative by changing 10677c478bd9Sstevel@tonic-gate * this code to invoke the vmem walker in the near future. 10687c478bd9Sstevel@tonic-gate */ 10697c478bd9Sstevel@tonic-gate const struct kt_seg { 10707c478bd9Sstevel@tonic-gate caddr_t s_base; 10717c478bd9Sstevel@tonic-gate size_t s_size; 10727c478bd9Sstevel@tonic-gate } *segp = (const struct kt_seg *)data; 10737c478bd9Sstevel@tonic-gate 10747c478bd9Sstevel@tonic-gate mdb_map_t map; 10757c478bd9Sstevel@tonic-gate GElf_Sym sym; 10767c478bd9Sstevel@tonic-gate mdb_syminfo_t info; 10777c478bd9Sstevel@tonic-gate 10787c478bd9Sstevel@tonic-gate map.map_base = (uintptr_t)segp->s_base; 10797c478bd9Sstevel@tonic-gate map.map_size = segp->s_size; 10807c478bd9Sstevel@tonic-gate map.map_flags = MDB_TGT_MAP_R | MDB_TGT_MAP_W | MDB_TGT_MAP_X; 10817c478bd9Sstevel@tonic-gate 10827c478bd9Sstevel@tonic-gate if (kt_lookup_by_addr(marg->map_target, addr, MDB_TGT_SYM_EXACT, 10837c478bd9Sstevel@tonic-gate map.map_name, MDB_TGT_MAPSZ, &sym, &info) == -1) { 10847c478bd9Sstevel@tonic-gate 10857c478bd9Sstevel@tonic-gate (void) mdb_iob_snprintf(map.map_name, MDB_TGT_MAPSZ, 10867c478bd9Sstevel@tonic-gate "%lr", addr); 10877c478bd9Sstevel@tonic-gate } 10887c478bd9Sstevel@tonic-gate 10897c478bd9Sstevel@tonic-gate return (marg->map_cb(marg->map_data, &map, map.map_name)); 10907c478bd9Sstevel@tonic-gate } 10917c478bd9Sstevel@tonic-gate 10927c478bd9Sstevel@tonic-gate int 10937c478bd9Sstevel@tonic-gate kt_mapping_iter(mdb_tgt_t *t, mdb_tgt_map_f *func, void *private) 10947c478bd9Sstevel@tonic-gate { 10957c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 10967c478bd9Sstevel@tonic-gate kt_maparg_t m; 10977c478bd9Sstevel@tonic-gate 10987c478bd9Sstevel@tonic-gate m.map_target = t; 10997c478bd9Sstevel@tonic-gate m.map_cb = func; 11007c478bd9Sstevel@tonic-gate m.map_data = private; 11017c478bd9Sstevel@tonic-gate 11027c478bd9Sstevel@tonic-gate return (mdb_pwalk("seg", (mdb_walk_cb_t)kt_mapping_walk, &m, 11037c478bd9Sstevel@tonic-gate (uintptr_t)kt->k_as)); 11047c478bd9Sstevel@tonic-gate } 11057c478bd9Sstevel@tonic-gate 11067c478bd9Sstevel@tonic-gate static const mdb_map_t * 11077c478bd9Sstevel@tonic-gate kt_module_to_map(kt_module_t *km, mdb_map_t *map) 11087c478bd9Sstevel@tonic-gate { 11097c478bd9Sstevel@tonic-gate (void) strncpy(map->map_name, km->km_name, MDB_TGT_MAPSZ); 11107c478bd9Sstevel@tonic-gate map->map_name[MDB_TGT_MAPSZ - 1] = '\0'; 11117c478bd9Sstevel@tonic-gate map->map_base = km->km_text_va; 11127c478bd9Sstevel@tonic-gate map->map_size = km->km_text_size; 11137c478bd9Sstevel@tonic-gate map->map_flags = MDB_TGT_MAP_R | MDB_TGT_MAP_W | MDB_TGT_MAP_X; 11147c478bd9Sstevel@tonic-gate 11157c478bd9Sstevel@tonic-gate return (map); 11167c478bd9Sstevel@tonic-gate } 11177c478bd9Sstevel@tonic-gate 11187c478bd9Sstevel@tonic-gate int 11197c478bd9Sstevel@tonic-gate kt_object_iter(mdb_tgt_t *t, mdb_tgt_map_f *func, void *private) 11207c478bd9Sstevel@tonic-gate { 11217c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 11227c478bd9Sstevel@tonic-gate kt_module_t *km; 11237c478bd9Sstevel@tonic-gate mdb_map_t m; 11247c478bd9Sstevel@tonic-gate 11257c478bd9Sstevel@tonic-gate for (km = mdb_list_next(&kt->k_modlist); km; km = mdb_list_next(km)) { 11267c478bd9Sstevel@tonic-gate if (func(private, kt_module_to_map(km, &m), km->km_name) == -1) 11277c478bd9Sstevel@tonic-gate break; 11287c478bd9Sstevel@tonic-gate } 11297c478bd9Sstevel@tonic-gate 11307c478bd9Sstevel@tonic-gate return (0); 11317c478bd9Sstevel@tonic-gate } 11327c478bd9Sstevel@tonic-gate 11337c478bd9Sstevel@tonic-gate const mdb_map_t * 11347c478bd9Sstevel@tonic-gate kt_addr_to_map(mdb_tgt_t *t, uintptr_t addr) 11357c478bd9Sstevel@tonic-gate { 11367c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 11377c478bd9Sstevel@tonic-gate kt_module_t *km; 11387c478bd9Sstevel@tonic-gate 11397c478bd9Sstevel@tonic-gate for (km = mdb_list_next(&kt->k_modlist); km; km = mdb_list_next(km)) { 11407c478bd9Sstevel@tonic-gate if (addr - km->km_text_va < km->km_text_size || 11417c478bd9Sstevel@tonic-gate addr - km->km_data_va < km->km_data_size || 11427c478bd9Sstevel@tonic-gate addr - km->km_bss_va < km->km_bss_size) 11437c478bd9Sstevel@tonic-gate return (kt_module_to_map(km, &kt->k_map)); 11447c478bd9Sstevel@tonic-gate } 11457c478bd9Sstevel@tonic-gate 11467c478bd9Sstevel@tonic-gate (void) set_errno(EMDB_NOMAP); 11477c478bd9Sstevel@tonic-gate return (NULL); 11487c478bd9Sstevel@tonic-gate } 11497c478bd9Sstevel@tonic-gate 11507c478bd9Sstevel@tonic-gate const mdb_map_t * 11517c478bd9Sstevel@tonic-gate kt_name_to_map(mdb_tgt_t *t, const char *name) 11527c478bd9Sstevel@tonic-gate { 11537c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 11547c478bd9Sstevel@tonic-gate kt_module_t *km; 11557c478bd9Sstevel@tonic-gate mdb_map_t m; 11567c478bd9Sstevel@tonic-gate 11577c478bd9Sstevel@tonic-gate /* 11587c478bd9Sstevel@tonic-gate * If name is MDB_TGT_OBJ_EXEC, return the first module on the list, 11597c478bd9Sstevel@tonic-gate * which will be unix since we keep k_modlist in load order. 11607c478bd9Sstevel@tonic-gate */ 11617c478bd9Sstevel@tonic-gate if (name == MDB_TGT_OBJ_EXEC) 11627c478bd9Sstevel@tonic-gate return (kt_module_to_map(mdb_list_next(&kt->k_modlist), &m)); 11637c478bd9Sstevel@tonic-gate 11647c478bd9Sstevel@tonic-gate if (name == MDB_TGT_OBJ_RTLD) 1165ae115bc7Smrj name = kt->k_rtld_name; 11667c478bd9Sstevel@tonic-gate 1167ae115bc7Smrj if ((km = kt_module_by_name(kt, name)) != NULL) 1168ae115bc7Smrj return (kt_module_to_map(km, &m)); 11697c478bd9Sstevel@tonic-gate 11707c478bd9Sstevel@tonic-gate (void) set_errno(EMDB_NOOBJ); 11717c478bd9Sstevel@tonic-gate return (NULL); 11727c478bd9Sstevel@tonic-gate } 11737c478bd9Sstevel@tonic-gate 11747c478bd9Sstevel@tonic-gate static ctf_file_t * 11757c478bd9Sstevel@tonic-gate kt_load_ctfdata(mdb_tgt_t *t, kt_module_t *km) 11767c478bd9Sstevel@tonic-gate { 11777c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 11787c478bd9Sstevel@tonic-gate int err; 11797c478bd9Sstevel@tonic-gate 11807c478bd9Sstevel@tonic-gate if (km->km_ctfp != NULL) 11817c478bd9Sstevel@tonic-gate return (km->km_ctfp); 11827c478bd9Sstevel@tonic-gate 11837c478bd9Sstevel@tonic-gate if (km->km_ctf_va == NULL) { 11847c478bd9Sstevel@tonic-gate (void) set_errno(EMDB_NOCTF); 11857c478bd9Sstevel@tonic-gate return (NULL); 11867c478bd9Sstevel@tonic-gate } 11877c478bd9Sstevel@tonic-gate 11887c478bd9Sstevel@tonic-gate if (km->km_symtab == NULL) 11897c478bd9Sstevel@tonic-gate kt_load_module(t->t_data, t, km); 11907c478bd9Sstevel@tonic-gate 11917c478bd9Sstevel@tonic-gate if ((km->km_ctf_buf = mdb_alloc(km->km_ctf_size, UM_NOSLEEP)) == NULL) { 11927c478bd9Sstevel@tonic-gate warn("failed to allocate memory to load %s debugging " 11937c478bd9Sstevel@tonic-gate "information", km->km_name); 11947c478bd9Sstevel@tonic-gate return (NULL); 11957c478bd9Sstevel@tonic-gate } 11967c478bd9Sstevel@tonic-gate 11977c478bd9Sstevel@tonic-gate if (mdb_tgt_vread(t, km->km_ctf_buf, km->km_ctf_size, 11987c478bd9Sstevel@tonic-gate km->km_ctf_va) != km->km_ctf_size) { 11997c478bd9Sstevel@tonic-gate warn("failed to read %lu bytes of debug data for %s at %p", 12007c478bd9Sstevel@tonic-gate (ulong_t)km->km_ctf_size, km->km_name, 12017c478bd9Sstevel@tonic-gate (void *)km->km_ctf_va); 12027c478bd9Sstevel@tonic-gate mdb_free(km->km_ctf_buf, km->km_ctf_size); 12037c478bd9Sstevel@tonic-gate km->km_ctf_buf = NULL; 12047c478bd9Sstevel@tonic-gate return (NULL); 12057c478bd9Sstevel@tonic-gate } 12067c478bd9Sstevel@tonic-gate 12077c478bd9Sstevel@tonic-gate if ((km->km_ctfp = mdb_ctf_bufopen((const void *)km->km_ctf_buf, 12087c478bd9Sstevel@tonic-gate km->km_ctf_size, km->km_symbuf, &km->km_symtab_hdr, 12097c478bd9Sstevel@tonic-gate km->km_strtab, &km->km_strtab_hdr, &err)) == NULL) { 12107c478bd9Sstevel@tonic-gate mdb_free(km->km_ctf_buf, km->km_ctf_size); 12117c478bd9Sstevel@tonic-gate km->km_ctf_buf = NULL; 12127c478bd9Sstevel@tonic-gate (void) set_errno(ctf_to_errno(err)); 12137c478bd9Sstevel@tonic-gate return (NULL); 12147c478bd9Sstevel@tonic-gate } 12157c478bd9Sstevel@tonic-gate 12167c478bd9Sstevel@tonic-gate mdb_dprintf(MDB_DBG_KMOD, "loaded %lu bytes of CTF data for %s\n", 12177c478bd9Sstevel@tonic-gate (ulong_t)km->km_ctf_size, km->km_name); 12187c478bd9Sstevel@tonic-gate 12197c478bd9Sstevel@tonic-gate if (ctf_parent_name(km->km_ctfp) != NULL) { 12207c478bd9Sstevel@tonic-gate mdb_var_t *v; 12217c478bd9Sstevel@tonic-gate 12227c478bd9Sstevel@tonic-gate if ((v = mdb_nv_lookup(&kt->k_modules, 12237c478bd9Sstevel@tonic-gate ctf_parent_name(km->km_ctfp))) == NULL) { 12247c478bd9Sstevel@tonic-gate warn("failed to load CTF data for %s - parent %s not " 12257c478bd9Sstevel@tonic-gate "loaded\n", km->km_name, 12267c478bd9Sstevel@tonic-gate ctf_parent_name(km->km_ctfp)); 12277c478bd9Sstevel@tonic-gate } 12287c478bd9Sstevel@tonic-gate 12297c478bd9Sstevel@tonic-gate if (v != NULL) { 12307c478bd9Sstevel@tonic-gate kt_module_t *pm = mdb_nv_get_cookie(v); 12317c478bd9Sstevel@tonic-gate 12327c478bd9Sstevel@tonic-gate if (pm->km_ctfp == NULL) 12337c478bd9Sstevel@tonic-gate (void) kt_load_ctfdata(t, pm); 12347c478bd9Sstevel@tonic-gate 12357c478bd9Sstevel@tonic-gate if (pm->km_ctfp != NULL && ctf_import(km->km_ctfp, 12367c478bd9Sstevel@tonic-gate pm->km_ctfp) == CTF_ERR) { 12377c478bd9Sstevel@tonic-gate warn("failed to import parent types into " 12387c478bd9Sstevel@tonic-gate "%s: %s\n", km->km_name, 12397c478bd9Sstevel@tonic-gate ctf_errmsg(ctf_errno(km->km_ctfp))); 12407c478bd9Sstevel@tonic-gate } 12417c478bd9Sstevel@tonic-gate } 12427c478bd9Sstevel@tonic-gate } 12437c478bd9Sstevel@tonic-gate 12447c478bd9Sstevel@tonic-gate return (km->km_ctfp); 12457c478bd9Sstevel@tonic-gate } 12467c478bd9Sstevel@tonic-gate 12477c478bd9Sstevel@tonic-gate ctf_file_t * 12487c478bd9Sstevel@tonic-gate kt_addr_to_ctf(mdb_tgt_t *t, uintptr_t addr) 12497c478bd9Sstevel@tonic-gate { 12507c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 12517c478bd9Sstevel@tonic-gate kt_module_t *km; 12527c478bd9Sstevel@tonic-gate 12537c478bd9Sstevel@tonic-gate for (km = mdb_list_next(&kt->k_modlist); km; km = mdb_list_next(km)) { 12547c478bd9Sstevel@tonic-gate if (addr - km->km_text_va < km->km_text_size || 12557c478bd9Sstevel@tonic-gate addr - km->km_data_va < km->km_data_size || 12567c478bd9Sstevel@tonic-gate addr - km->km_bss_va < km->km_bss_size) 12577c478bd9Sstevel@tonic-gate return (kt_load_ctfdata(t, km)); 12587c478bd9Sstevel@tonic-gate } 12597c478bd9Sstevel@tonic-gate 12607c478bd9Sstevel@tonic-gate (void) set_errno(EMDB_NOMAP); 12617c478bd9Sstevel@tonic-gate return (NULL); 12627c478bd9Sstevel@tonic-gate } 12637c478bd9Sstevel@tonic-gate 12647c478bd9Sstevel@tonic-gate ctf_file_t * 12657c478bd9Sstevel@tonic-gate kt_name_to_ctf(mdb_tgt_t *t, const char *name) 12667c478bd9Sstevel@tonic-gate { 12677c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 12687c478bd9Sstevel@tonic-gate kt_module_t *km; 12697c478bd9Sstevel@tonic-gate 12707c478bd9Sstevel@tonic-gate if (name == MDB_TGT_OBJ_EXEC) 1271ae115bc7Smrj name = KT_CTFPARENT; 12727c478bd9Sstevel@tonic-gate else if (name == MDB_TGT_OBJ_RTLD) 1273ae115bc7Smrj name = kt->k_rtld_name; 12747c478bd9Sstevel@tonic-gate 1275ae115bc7Smrj if ((km = kt_module_by_name(kt, name)) != NULL) 1276ae115bc7Smrj return (kt_load_ctfdata(t, km)); 12777c478bd9Sstevel@tonic-gate 12787c478bd9Sstevel@tonic-gate (void) set_errno(EMDB_NOOBJ); 12797c478bd9Sstevel@tonic-gate return (NULL); 12807c478bd9Sstevel@tonic-gate } 12817c478bd9Sstevel@tonic-gate 1282*843e1988Sjohnlev /*ARGSUSED*/ 12837c478bd9Sstevel@tonic-gate int 12847c478bd9Sstevel@tonic-gate kt_status(mdb_tgt_t *t, mdb_tgt_status_t *tsp) 12857c478bd9Sstevel@tonic-gate { 12867c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 12877c478bd9Sstevel@tonic-gate bzero(tsp, sizeof (mdb_tgt_status_t)); 1288*843e1988Sjohnlev tsp->st_state = (kt->k_xpv_domu || (kt->k_dumphdr != NULL)) ? 1289*843e1988Sjohnlev MDB_TGT_DEAD : MDB_TGT_RUNNING; 12907c478bd9Sstevel@tonic-gate return (0); 12917c478bd9Sstevel@tonic-gate } 12927c478bd9Sstevel@tonic-gate 12937c478bd9Sstevel@tonic-gate static ssize_t 12947c478bd9Sstevel@tonic-gate kt_xd_dumphdr(mdb_tgt_t *t, void *buf, size_t nbytes) 12957c478bd9Sstevel@tonic-gate { 12967c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 12977c478bd9Sstevel@tonic-gate 12987c478bd9Sstevel@tonic-gate if (buf == NULL && nbytes == 0) 12997c478bd9Sstevel@tonic-gate return (sizeof (dumphdr_t)); 13007c478bd9Sstevel@tonic-gate 13017c478bd9Sstevel@tonic-gate if (kt->k_dumphdr == NULL) 13027c478bd9Sstevel@tonic-gate return (set_errno(ENODATA)); 13037c478bd9Sstevel@tonic-gate 13047c478bd9Sstevel@tonic-gate nbytes = MIN(nbytes, sizeof (dumphdr_t)); 13057c478bd9Sstevel@tonic-gate bcopy(kt->k_dumphdr, buf, nbytes); 13067c478bd9Sstevel@tonic-gate 13077c478bd9Sstevel@tonic-gate return (nbytes); 13087c478bd9Sstevel@tonic-gate } 13097c478bd9Sstevel@tonic-gate 13107c478bd9Sstevel@tonic-gate void 13117c478bd9Sstevel@tonic-gate kt_destroy(mdb_tgt_t *t) 13127c478bd9Sstevel@tonic-gate { 13137c478bd9Sstevel@tonic-gate kt_data_t *kt = t->t_data; 13147c478bd9Sstevel@tonic-gate kt_module_t *km, *nkm; 13157c478bd9Sstevel@tonic-gate 13167c478bd9Sstevel@tonic-gate (void) mdb_module_unload(KT_MODULE, 0); 13177c478bd9Sstevel@tonic-gate 13187c478bd9Sstevel@tonic-gate if (kt->k_regs != NULL) 13197c478bd9Sstevel@tonic-gate mdb_free(kt->k_regs, kt->k_regsize); 13207c478bd9Sstevel@tonic-gate 13217c478bd9Sstevel@tonic-gate if (kt->k_symtab != NULL) 13227c478bd9Sstevel@tonic-gate mdb_gelf_symtab_destroy(kt->k_symtab); 13237c478bd9Sstevel@tonic-gate 13247c478bd9Sstevel@tonic-gate if (kt->k_dynsym != NULL) 13257c478bd9Sstevel@tonic-gate mdb_gelf_symtab_destroy(kt->k_dynsym); 13267c478bd9Sstevel@tonic-gate 13277c478bd9Sstevel@tonic-gate if (kt->k_dumphdr != NULL) 13287c478bd9Sstevel@tonic-gate mdb_free(kt->k_dumphdr, sizeof (dumphdr_t)); 13297c478bd9Sstevel@tonic-gate 13307c478bd9Sstevel@tonic-gate mdb_gelf_destroy(kt->k_file); 1331*843e1988Sjohnlev 1332*843e1988Sjohnlev (void) kt->k_kb_ops->kb_close(kt->k_cookie); 13337c478bd9Sstevel@tonic-gate 13347c478bd9Sstevel@tonic-gate for (km = mdb_list_next(&kt->k_modlist); km; km = nkm) { 13357c478bd9Sstevel@tonic-gate if (km->km_symtab) 13367c478bd9Sstevel@tonic-gate mdb_gelf_symtab_destroy(km->km_symtab); 13377c478bd9Sstevel@tonic-gate 13387c478bd9Sstevel@tonic-gate if (km->km_data) 13397c478bd9Sstevel@tonic-gate mdb_free(km->km_data, km->km_datasz); 13407c478bd9Sstevel@tonic-gate 13417c478bd9Sstevel@tonic-gate if (km->km_ctfp) 13427c478bd9Sstevel@tonic-gate ctf_close(km->km_ctfp); 13437c478bd9Sstevel@tonic-gate 13447c478bd9Sstevel@tonic-gate if (km->km_ctf_buf != NULL) 13457c478bd9Sstevel@tonic-gate mdb_free(km->km_ctf_buf, km->km_ctf_size); 13467c478bd9Sstevel@tonic-gate 13477c478bd9Sstevel@tonic-gate nkm = mdb_list_next(km); 13487c478bd9Sstevel@tonic-gate strfree(km->km_name); 13497c478bd9Sstevel@tonic-gate mdb_free(km, sizeof (kt_module_t)); 13507c478bd9Sstevel@tonic-gate } 13517c478bd9Sstevel@tonic-gate 13527c478bd9Sstevel@tonic-gate mdb_nv_destroy(&kt->k_modules); 13537c478bd9Sstevel@tonic-gate 13547c478bd9Sstevel@tonic-gate strfree(kt->k_kvmfile); 1355*843e1988Sjohnlev if (kt->k_symfile != NULL) 1356*843e1988Sjohnlev strfree(kt->k_symfile); 13577c478bd9Sstevel@tonic-gate 13587c478bd9Sstevel@tonic-gate mdb_free(kt, sizeof (kt_data_t)); 13597c478bd9Sstevel@tonic-gate } 13607c478bd9Sstevel@tonic-gate 13617c478bd9Sstevel@tonic-gate static int 13627c478bd9Sstevel@tonic-gate kt_data_stub(void) 13637c478bd9Sstevel@tonic-gate { 13647c478bd9Sstevel@tonic-gate return (-1); 13657c478bd9Sstevel@tonic-gate } 13667c478bd9Sstevel@tonic-gate 13677c478bd9Sstevel@tonic-gate int 13687c478bd9Sstevel@tonic-gate mdb_kvm_tgt_create(mdb_tgt_t *t, int argc, const char *argv[]) 13697c478bd9Sstevel@tonic-gate { 13707c478bd9Sstevel@tonic-gate kt_data_t *kt = mdb_zalloc(sizeof (kt_data_t), UM_SLEEP); 1371*843e1988Sjohnlev mdb_kb_ops_t *kvm_kb_ops = libkvm_kb_ops(); 13727c478bd9Sstevel@tonic-gate int oflag = (t->t_flags & MDB_TGT_F_RDWR) ? O_RDWR : O_RDONLY; 13737c478bd9Sstevel@tonic-gate struct utsname uts; 13747c478bd9Sstevel@tonic-gate GElf_Sym sym; 13757c478bd9Sstevel@tonic-gate pgcnt_t pmem; 13767c478bd9Sstevel@tonic-gate 1377*843e1988Sjohnlev 1378*843e1988Sjohnlev if (argc == 2) { 1379*843e1988Sjohnlev kt->k_symfile = strdup(argv[0]); 1380*843e1988Sjohnlev kt->k_kvmfile = strdup(argv[1]); 1381*843e1988Sjohnlev 1382*843e1988Sjohnlev kt->k_cookie = kvm_kb_ops->kb_open(kt->k_symfile, 1383*843e1988Sjohnlev kt->k_kvmfile, NULL, oflag, (char *)mdb.m_pname); 1384*843e1988Sjohnlev 1385*843e1988Sjohnlev if (kt->k_cookie == NULL) 1386*843e1988Sjohnlev goto err; 1387*843e1988Sjohnlev 1388*843e1988Sjohnlev kt->k_xpv_domu = 0; 1389*843e1988Sjohnlev kt->k_kb_ops = kvm_kb_ops; 1390*843e1988Sjohnlev } else { 1391*843e1988Sjohnlev #ifndef __x86 13927c478bd9Sstevel@tonic-gate return (set_errno(EINVAL)); 1393*843e1988Sjohnlev #else 1394*843e1988Sjohnlev mdb_kb_ops_t *(*getops)(void); 13957c478bd9Sstevel@tonic-gate 1396*843e1988Sjohnlev kt->k_symfile = NULL; 1397*843e1988Sjohnlev kt->k_kvmfile = strdup(argv[0]); 13987c478bd9Sstevel@tonic-gate 1399*843e1988Sjohnlev getops = (mdb_kb_ops_t *(*)())dlsym(RTLD_NEXT, "mdb_kb_ops"); 14007c478bd9Sstevel@tonic-gate 1401*843e1988Sjohnlev if (getops == NULL || (kt->k_kb_ops = getops()) == NULL) { 1402*843e1988Sjohnlev warn("failed to load KVM backend ops\n"); 1403*843e1988Sjohnlev goto err; 1404*843e1988Sjohnlev } 1405*843e1988Sjohnlev 1406*843e1988Sjohnlev kt->k_cookie = kt->k_kb_ops->kb_open(NULL, kt->k_kvmfile, NULL, 1407*843e1988Sjohnlev oflag, (char *)mdb.m_pname); 1408*843e1988Sjohnlev 1409*843e1988Sjohnlev if (kt->k_cookie == NULL) 1410*843e1988Sjohnlev goto err; 1411*843e1988Sjohnlev 1412*843e1988Sjohnlev kt->k_xpv_domu = 1; 1413*843e1988Sjohnlev #endif 14147c478bd9Sstevel@tonic-gate } 14157c478bd9Sstevel@tonic-gate 1416*843e1988Sjohnlev if ((kt->k_fio = kt->k_kb_ops->kb_sym_io(kt->k_cookie, 1417*843e1988Sjohnlev kt->k_symfile)) == NULL) 1418*843e1988Sjohnlev goto err; 1419*843e1988Sjohnlev 14207c478bd9Sstevel@tonic-gate if ((kt->k_file = mdb_gelf_create(kt->k_fio, 14217c478bd9Sstevel@tonic-gate ET_EXEC, GF_FILE)) == NULL) { 14227c478bd9Sstevel@tonic-gate mdb_io_destroy(kt->k_fio); 14237c478bd9Sstevel@tonic-gate goto err; 14247c478bd9Sstevel@tonic-gate } 14257c478bd9Sstevel@tonic-gate 14267c478bd9Sstevel@tonic-gate kt->k_symtab = 14277c478bd9Sstevel@tonic-gate mdb_gelf_symtab_create_file(kt->k_file, SHT_SYMTAB, MDB_TGT_SYMTAB); 14287c478bd9Sstevel@tonic-gate 14297c478bd9Sstevel@tonic-gate kt->k_dynsym = 14307c478bd9Sstevel@tonic-gate mdb_gelf_symtab_create_file(kt->k_file, SHT_DYNSYM, MDB_TGT_DYNSYM); 14317c478bd9Sstevel@tonic-gate 14327c478bd9Sstevel@tonic-gate if (mdb_gelf_symtab_lookup_by_name(kt->k_symtab, "kas", 14337c478bd9Sstevel@tonic-gate &sym, NULL) == -1) { 14347c478bd9Sstevel@tonic-gate warn("'kas' symbol is missing from kernel\n"); 14357c478bd9Sstevel@tonic-gate goto err; 14367c478bd9Sstevel@tonic-gate } 14377c478bd9Sstevel@tonic-gate 14387c478bd9Sstevel@tonic-gate kt->k_as = (struct as *)(uintptr_t)sym.st_value; 14397c478bd9Sstevel@tonic-gate 14407c478bd9Sstevel@tonic-gate if (mdb_gelf_symtab_lookup_by_name(kt->k_symtab, "platform", 14417c478bd9Sstevel@tonic-gate &sym, NULL) == -1) { 14427c478bd9Sstevel@tonic-gate warn("'platform' symbol is missing from kernel\n"); 14437c478bd9Sstevel@tonic-gate goto err; 14447c478bd9Sstevel@tonic-gate } 14457c478bd9Sstevel@tonic-gate 1446*843e1988Sjohnlev if (kt->k_kb_ops->kb_kread(kt->k_cookie, sym.st_value, 14477c478bd9Sstevel@tonic-gate kt->k_platform, MAXNAMELEN) <= 0) { 14487c478bd9Sstevel@tonic-gate warn("failed to read 'platform' string from kernel"); 14497c478bd9Sstevel@tonic-gate goto err; 14507c478bd9Sstevel@tonic-gate } 14517c478bd9Sstevel@tonic-gate 14527c478bd9Sstevel@tonic-gate if (mdb_gelf_symtab_lookup_by_name(kt->k_symtab, "utsname", 14537c478bd9Sstevel@tonic-gate &sym, NULL) == -1) { 14547c478bd9Sstevel@tonic-gate warn("'utsname' symbol is missing from kernel\n"); 14557c478bd9Sstevel@tonic-gate goto err; 14567c478bd9Sstevel@tonic-gate } 14577c478bd9Sstevel@tonic-gate 1458*843e1988Sjohnlev if (kt->k_kb_ops->kb_kread(kt->k_cookie, sym.st_value, &uts, 1459*843e1988Sjohnlev sizeof (uts)) <= 0) { 14607c478bd9Sstevel@tonic-gate warn("failed to read 'utsname' struct from kernel"); 14617c478bd9Sstevel@tonic-gate goto err; 14627c478bd9Sstevel@tonic-gate } 14637c478bd9Sstevel@tonic-gate 14647c478bd9Sstevel@tonic-gate kt->k_dump_print_content = (void (*)())kt_data_stub; 14657c478bd9Sstevel@tonic-gate kt->k_dump_find_curproc = kt_data_stub; 14667c478bd9Sstevel@tonic-gate 14677c478bd9Sstevel@tonic-gate /* 14687c478bd9Sstevel@tonic-gate * We set k_ctfvalid based on the presence of the CTF vmem arena 14697c478bd9Sstevel@tonic-gate * symbol. The CTF members were added to the end of struct module at 14707c478bd9Sstevel@tonic-gate * the same time, so this allows us to know whether we can use them. 14717c478bd9Sstevel@tonic-gate */ 14727c478bd9Sstevel@tonic-gate if (mdb_gelf_symtab_lookup_by_name(kt->k_symtab, "ctf_arena", &sym, 14737c478bd9Sstevel@tonic-gate NULL) == 0 && !(mdb.m_flags & MDB_FL_NOCTF)) 14747c478bd9Sstevel@tonic-gate kt->k_ctfvalid = 1; 14757c478bd9Sstevel@tonic-gate 14767c478bd9Sstevel@tonic-gate (void) mdb_nv_create(&kt->k_modules, UM_SLEEP); 14777c478bd9Sstevel@tonic-gate t->t_pshandle = kt->k_cookie; 14787c478bd9Sstevel@tonic-gate t->t_data = kt; 14797c478bd9Sstevel@tonic-gate 14807c478bd9Sstevel@tonic-gate #if defined(__sparc) 14817c478bd9Sstevel@tonic-gate #if defined(__sparcv9) 14827c478bd9Sstevel@tonic-gate kt_sparcv9_init(t); 14837c478bd9Sstevel@tonic-gate #else 14847c478bd9Sstevel@tonic-gate kt_sparcv7_init(t); 14857c478bd9Sstevel@tonic-gate #endif 14867c478bd9Sstevel@tonic-gate #elif defined(__amd64) 14877c478bd9Sstevel@tonic-gate kt_amd64_init(t); 14887c478bd9Sstevel@tonic-gate #elif defined(__i386) 14897c478bd9Sstevel@tonic-gate kt_ia32_init(t); 14907c478bd9Sstevel@tonic-gate #else 14917c478bd9Sstevel@tonic-gate #error "unknown ISA" 14927c478bd9Sstevel@tonic-gate #endif 14937c478bd9Sstevel@tonic-gate 14947c478bd9Sstevel@tonic-gate /* 14957c478bd9Sstevel@tonic-gate * We read our representative thread ID (address) from the kernel's 14967c478bd9Sstevel@tonic-gate * global panic_thread. It will remain 0 if this is a live kernel. 14977c478bd9Sstevel@tonic-gate */ 14987c478bd9Sstevel@tonic-gate (void) mdb_tgt_readsym(t, MDB_TGT_AS_VIRT, &kt->k_tid, sizeof (void *), 14997c478bd9Sstevel@tonic-gate MDB_TGT_OBJ_EXEC, "panic_thread"); 15007c478bd9Sstevel@tonic-gate 15017c478bd9Sstevel@tonic-gate if ((mdb.m_flags & MDB_FL_ADB) && mdb_tgt_readsym(t, MDB_TGT_AS_VIRT, 15027c478bd9Sstevel@tonic-gate &pmem, sizeof (pmem), MDB_TGT_OBJ_EXEC, "physmem") == sizeof (pmem)) 15037c478bd9Sstevel@tonic-gate mdb_printf("physmem %lx\n", (ulong_t)pmem); 15047c478bd9Sstevel@tonic-gate 15057c478bd9Sstevel@tonic-gate /* 1506*843e1988Sjohnlev * If this is not a live kernel or a hypervisor dump, read the dump 1507*843e1988Sjohnlev * header. We don't have to sanity-check the header, as the open would 1508*843e1988Sjohnlev * not have succeeded otherwise. 15097c478bd9Sstevel@tonic-gate */ 1510*843e1988Sjohnlev if (!kt->k_xpv_domu && strcmp(kt->k_symfile, "/dev/ksyms") != 0) { 15117c478bd9Sstevel@tonic-gate mdb_io_t *vmcore; 15127c478bd9Sstevel@tonic-gate 15137c478bd9Sstevel@tonic-gate kt->k_dumphdr = mdb_alloc(sizeof (dumphdr_t), UM_SLEEP); 15147c478bd9Sstevel@tonic-gate 15157c478bd9Sstevel@tonic-gate if ((vmcore = mdb_fdio_create_path(NULL, kt->k_kvmfile, 15167c478bd9Sstevel@tonic-gate O_RDONLY, 0)) == NULL) { 15177c478bd9Sstevel@tonic-gate mdb_warn("failed to open %s", kt->k_kvmfile); 15187c478bd9Sstevel@tonic-gate goto err; 15197c478bd9Sstevel@tonic-gate } 15207c478bd9Sstevel@tonic-gate 15217c478bd9Sstevel@tonic-gate if (IOP_READ(vmcore, kt->k_dumphdr, sizeof (dumphdr_t)) != 15227c478bd9Sstevel@tonic-gate sizeof (dumphdr_t)) { 15237c478bd9Sstevel@tonic-gate mdb_warn("failed to read dump header"); 15247c478bd9Sstevel@tonic-gate mdb_io_destroy(vmcore); 15257c478bd9Sstevel@tonic-gate goto err; 15267c478bd9Sstevel@tonic-gate } 15277c478bd9Sstevel@tonic-gate 15287c478bd9Sstevel@tonic-gate mdb_io_destroy(vmcore); 15297c478bd9Sstevel@tonic-gate 15307c478bd9Sstevel@tonic-gate (void) mdb_tgt_xdata_insert(t, "dumphdr", 15317c478bd9Sstevel@tonic-gate "dump header structure", kt_xd_dumphdr); 15327c478bd9Sstevel@tonic-gate } 15337c478bd9Sstevel@tonic-gate 15347c478bd9Sstevel@tonic-gate return (0); 15357c478bd9Sstevel@tonic-gate 15367c478bd9Sstevel@tonic-gate err: 15377c478bd9Sstevel@tonic-gate if (kt->k_dumphdr != NULL) 15387c478bd9Sstevel@tonic-gate mdb_free(kt->k_dumphdr, sizeof (dumphdr_t)); 15397c478bd9Sstevel@tonic-gate 15407c478bd9Sstevel@tonic-gate if (kt->k_symtab != NULL) 15417c478bd9Sstevel@tonic-gate mdb_gelf_symtab_destroy(kt->k_symtab); 15427c478bd9Sstevel@tonic-gate 15437c478bd9Sstevel@tonic-gate if (kt->k_dynsym != NULL) 15447c478bd9Sstevel@tonic-gate mdb_gelf_symtab_destroy(kt->k_dynsym); 15457c478bd9Sstevel@tonic-gate 15467c478bd9Sstevel@tonic-gate if (kt->k_file != NULL) 15477c478bd9Sstevel@tonic-gate mdb_gelf_destroy(kt->k_file); 15487c478bd9Sstevel@tonic-gate 15497c478bd9Sstevel@tonic-gate if (kt->k_cookie != NULL) 1550*843e1988Sjohnlev (void) kt->k_kb_ops->kb_close(kt->k_cookie); 15517c478bd9Sstevel@tonic-gate 15527c478bd9Sstevel@tonic-gate mdb_free(kt, sizeof (kt_data_t)); 15537c478bd9Sstevel@tonic-gate return (-1); 15547c478bd9Sstevel@tonic-gate } 1555