/* * CDDL HEADER START * * The contents of this file are subject to the terms of the * Common Development and Distribution License (the "License"). * You may not use this file except in compliance with the License. * * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE * or http://www.opensolaris.org/os/licensing. * See the License for the specific language governing permissions * and limitations under the License. * * When distributing Covered Code, include this CDDL HEADER in each * file and include the License file at usr/src/OPENSOLARIS.LICENSE. * If applicable, add the following below this CDDL HEADER, with the * fields enclosed by brackets "[]" replaced with your own identifying * information: Portions Copyright [yyyy] [name of copyright owner] * * CDDL HEADER END */ /* * Copyright 2008 Sun Microsystems, Inc. All rights reserved. * Use is subject to license terms. */ #include #include <_rtld.h> #include #include #include #include /* * Data structure for walkers. */ typedef struct { uint_t w_flags; } W_desc; /* * Flags values for dcmds */ #define RTLD_FLG_VERBOSE 0x0001 /* verbose output */ static const mdb_bitmask_t rtflags_bits[] = { { MSG_ORIG(MSG_FLG_ISMAIN), FLG_RT_ISMAIN, FLG_RT_ISMAIN}, { MSG_ORIG(MSG_FLG_IMGALLOC), FLG_RT_IMGALLOC, FLG_RT_IMGALLOC}, { MSG_ORIG(MSG_FLG_RELOCED), FLG_RT_RELOCED, FLG_RT_RELOCED}, { MSG_ORIG(MSG_FLG_SETGROUP), FLG_RT_SETGROUP, FLG_RT_SETGROUP}, { MSG_ORIG(MSG_FLG_HWCAP), FLG_RT_HWCAP, FLG_RT_HWCAP}, { MSG_ORIG(MSG_FLG_OBJECT), FLG_RT_OBJECT, FLG_RT_OBJECT}, { MSG_ORIG(MSG_FLG_NODUMP), FLG_RT_NODUMP, FLG_RT_NODUMP}, { MSG_ORIG(MSG_FLG_DELETE), FLG_RT_DELETE, FLG_RT_DELETE}, { MSG_ORIG(MSG_FLG_ANALYZED), FLG_RT_ANALYZED, FLG_RT_ANALYZED}, { MSG_ORIG(MSG_FLG_INITDONE), FLG_RT_INITDONE, FLG_RT_INITDONE}, { MSG_ORIG(MSG_FLG_TRANS), FLG_RT_TRANS, FLG_RT_TRANS}, { MSG_ORIG(MSG_FLG_FIXED), FLG_RT_FIXED, FLG_RT_FIXED}, { MSG_ORIG(MSG_FLG_PRELOAD), FLG_RT_PRELOAD, FLG_RT_PRELOAD}, { MSG_ORIG(MSG_FLG_ALTER), FLG_RT_ALTER, FLG_RT_ALTER}, { MSG_ORIG(MSG_FLG_LOADFLTR), FLG_RT_LOADFLTR, FLG_RT_LOADFLTR}, { MSG_ORIG(MSG_FLG_AUDIT), FLG_RT_AUDIT, FLG_RT_AUDIT}, { MSG_ORIG(MSG_FLG_MODESET), FLG_RT_MODESET, FLG_RT_MODESET}, { MSG_ORIG(MSG_FLG_ANALZING), FLG_RT_ANALZING, FLG_RT_ANALZING}, { MSG_ORIG(MSG_FLG_INITFRST), FLG_RT_INITFRST, FLG_RT_INITFRST}, { MSG_ORIG(MSG_FLG_NOOPEN), FLG_RT_NOOPEN, FLG_RT_NOOPEN}, { MSG_ORIG(MSG_FLG_FINICLCT), FLG_RT_FINICLCT, FLG_RT_FINICLCT}, { MSG_ORIG(MSG_FLG_INITCALL), FLG_RT_INITCALL, FLG_RT_INITCALL}, { MSG_ORIG(MSG_FLG_OBJINTPO), FLG_RT_OBJINTPO, FLG_RT_OBJINTPO}, { MSG_ORIG(MSG_FLG_SYMINTPO), FLG_RT_SYMINTPO, FLG_RT_SYMINTPO}, { MSG_ORIG(MSG_FLG_MOVE), FLG_RT_MOVE, FLG_RT_MOVE}, { MSG_ORIG(MSG_FLG_TMPLIST), FLG_RT_TMPLIST, FLG_RT_TMPLIST}, { MSG_ORIG(MSG_FLG_REGSYMS), FLG_RT_REGSYMS, FLG_RT_REGSYMS}, { MSG_ORIG(MSG_FLG_INITCLCT), FLG_RT_INITCLCT, FLG_RT_INITCLCT}, { MSG_ORIG(MSG_FLG_HANDLE), FLG_RT_HANDLE, FLG_RT_HANDLE}, { MSG_ORIG(MSG_FLG_RELOCING), FLG_RT_RELOCING, FLG_RT_RELOCING}, { NULL, 0, 0} }; static const mdb_bitmask_t rtflags1_bits[] = { { MSG_ORIG(MSG_FL1_COPYTOOK), FL1_RT_COPYTOOK, FL1_RT_COPYTOOK}, { MSG_ORIG(MSG_FL1_RELATIVE), FL1_RT_RELATIVE, FL1_RT_RELATIVE }, { MSG_ORIG(MSG_FL1_CONFSET), FL1_RT_CONFSET, FL1_RT_CONFSET }, { MSG_ORIG(MSG_FL1_NODEFLIB), FL1_RT_NODEFLIB, FL1_RT_NODEFLIB }, { MSG_ORIG(MSG_FL1_ENDFILTE), FL1_RT_ENDFILTE, FL1_RT_ENDFILTE }, { MSG_ORIG(MSG_FL1_DISPREL), FL1_RT_DISPREL, FL1_RT_DISPREL }, { MSG_ORIG(MSG_FL1_TEXTREL), FL1_RT_TEXTREL, FL1_RT_TEXTREL }, { MSG_ORIG(MSG_FL1_INITWAIT), FL1_RT_INITWAIT, FL1_RT_INITWAIT }, { MSG_ORIG(MSG_FL1_LDDSTUB), FL1_RT_LDDSTUB, FL1_RT_LDDSTUB}, { MSG_ORIG(MSG_FL1_NOINIFIN), FL1_RT_NOINIFIN, FL1_RT_NOINIFIN }, { MSG_ORIG(MSG_FL1_USED), FL1_RT_USED, FL1_RT_USED }, { MSG_ORIG(MSG_FL1_SYMBOLIC), FL1_RT_SYMBOLIC, FL1_RT_SYMBOLIC }, { MSG_ORIG(MSG_FL1_OBJSFLTR), FL1_RT_OBJSFLTR, FL1_RT_OBJSFLTR }, { MSG_ORIG(MSG_FL1_OBJAFLTR), FL1_RT_OBJAFLTR, FL1_RT_OBJAFLTR }, { MSG_ORIG(MSG_FL1_SYMSFLTR), FL1_RT_SYMSFLTR, FL1_RT_SYMSFLTR }, { MSG_ORIG(MSG_FL1_SYMAFLTR), FL1_RT_SYMAFLTR, FL1_RT_SYMAFLTR }, { MSG_ORIG(MSG_FL1_TLSADD), FL1_RT_TLSADD, FL1_RT_TLSADD }, { MSG_ORIG(MSG_FL1_TLSSTAT), FL1_RT_TLSSTAT, FL1_RT_TLSSTAT }, { MSG_ORIG(MSG_FL1_DIRECT), FL1_RT_DIRECT, FL1_RT_DIRECT}, { MSG_ORIG(MSG_FL1_GLOBAUD), FL1_RT_GLOBAUD, FL1_RT_GLOBAUD}, { MSG_ORIG(MSG_LTFL_AUD_PREINIT), LML_TFLG_AUD_PREINIT, LML_TFLG_AUD_PREINIT }, { MSG_ORIG(MSG_LTFL_AUD_OBJSEARCH), LML_TFLG_AUD_OBJSEARCH, LML_TFLG_AUD_OBJSEARCH }, { MSG_ORIG(MSG_LTFL_AUD_OBJOPEN), LML_TFLG_AUD_OBJOPEN, LML_TFLG_AUD_OBJOPEN }, { MSG_ORIG(MSG_LTFL_AUD_OBJFILTER), LML_TFLG_AUD_OBJFILTER, LML_TFLG_AUD_OBJFILTER }, { MSG_ORIG(MSG_LTFL_AUD_OBJCLOSE), LML_TFLG_AUD_OBJCLOSE, LML_TFLG_AUD_OBJCLOSE }, { MSG_ORIG(MSG_LTFL_AUD_SYMBIND), LML_TFLG_AUD_SYMBIND, LML_TFLG_AUD_SYMBIND }, { MSG_ORIG(MSG_LTFL_AUD_PLTENTER), LML_TFLG_AUD_PLTENTER, LML_TFLG_AUD_PLTENTER }, { MSG_ORIG(MSG_LTFL_AUD_PLTEXIT), LML_TFLG_AUD_PLTEXIT, LML_TFLG_AUD_PLTEXIT }, { MSG_ORIG(MSG_LTFL_AUD_ACTIVITY), LML_TFLG_AUD_ACTIVITY, LML_TFLG_AUD_ACTIVITY }, { NULL, 0, 0} }; static const mdb_bitmask_t rtmode_bits[] = { { MSG_ORIG(MSG_MODE_LAZY), RTLD_LAZY, RTLD_LAZY }, { MSG_ORIG(MSG_MODE_NOW), RTLD_NOW, RTLD_NOW }, { MSG_ORIG(MSG_MODE_NOLOAD), RTLD_NOLOAD, RTLD_NOLOAD }, { MSG_ORIG(MSG_MODE_GLOBAL), RTLD_GLOBAL, RTLD_GLOBAL }, { MSG_ORIG(MSG_MODE_PARENT), RTLD_PARENT, RTLD_PARENT }, { MSG_ORIG(MSG_MODE_GROUP), RTLD_GROUP, RTLD_GROUP }, { MSG_ORIG(MSG_MODE_WORLD), RTLD_WORLD, RTLD_WORLD }, { MSG_ORIG(MSG_MODE_NODELETE), RTLD_NODELETE, RTLD_NODELETE }, { MSG_ORIG(MSG_MODE_FIRST), RTLD_FIRST, RTLD_FIRST }, { MSG_ORIG(MSG_MODE_CONFGEN), RTLD_CONFGEN, RTLD_CONFGEN }, { NULL, 0, 0} }; static const mdb_bitmask_t bndflags_bits[] = { { MSG_ORIG(MSG_BFL_NEEDED), BND_NEEDED, BND_NEEDED }, { MSG_ORIG(MSG_BFL_REFER), BND_REFER, BND_REFER }, { MSG_ORIG(MSG_BFL_FILTER), BND_FILTER, BND_FILTER }, { NULL, 0, 0} }; static const mdb_bitmask_t grhflags_bits[] = { { MSG_ORIG(MSG_GPH_ZERO), GPH_ZERO, GPH_ZERO }, { MSG_ORIG(MSG_GPH_LDSO), GPH_LDSO, GPH_LDSO }, { MSG_ORIG(MSG_GPH_FIRST), GPH_FIRST, GPH_FIRST }, { MSG_ORIG(MSG_GPH_FILTEE), GPH_FILTEE, GPH_FILTEE }, { MSG_ORIG(MSG_GPH_INITIAL), GPH_INITIAL, GPH_INITIAL }, { MSG_ORIG(MSG_GPH_NOPENDLAZY), GPH_NOPENDLAZY, GPH_NOPENDLAZY }, { NULL, 0, 0} }; static const mdb_bitmask_t grdflags_bits[] = { { MSG_ORIG(MSG_GPD_DLSYM), GPD_DLSYM, GPD_DLSYM }, { MSG_ORIG(MSG_GPD_RELOC), GPD_RELOC, GPD_RELOC }, { MSG_ORIG(MSG_GPD_ADDEPS), GPD_ADDEPS, GPD_ADDEPS }, { MSG_ORIG(MSG_GPD_PARENT), GPD_PARENT, GPD_PARENT }, { MSG_ORIG(MSG_GPD_FILTER), GPD_FILTER, GPD_FILTER }, { MSG_ORIG(MSG_GPD_PROMOTE), GPD_PROMOTE, GPD_PROMOTE }, { MSG_ORIG(MSG_GPD_REMOVE), GPD_REMOVE, GPD_REMOVE }, { NULL, 0, 0} }; static const mdb_bitmask_t lmc_bits[] = { { MSG_ORIG(MSG_LMC_ANALYZING), LMC_FLG_ANALYZING, LMC_FLG_ANALYZING}, { MSG_ORIG(MSG_LMC_RELOCATING), LMC_FLG_RELOCATING, LMC_FLG_RELOCATING}, { MSG_ORIG(MSG_LMC_REANALYZE), LMC_FLG_REANALYZE, LMC_FLG_REANALYZE}, { NULL, 0, 0} }; /* * Obtain a string - typically a link-map name. */ static char * String(uintptr_t addr, const char *name) { static char str[MAXPATHLEN]; if (addr) { if (mdb_readstr(str, MAXPATHLEN, addr) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), name, addr); return (0); } return (str); } return ((char *)MSG_ORIG(MSG_STR_EMPTY)); } /* * Obtain a link-map name. */ static char * Rtmap_Name(uintptr_t addr) { Rt_map rtmap; if (addr) { if (mdb_vread(&rtmap, sizeof (Rt_map), addr) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_RTMAP_STR), addr); return (0); } return (String((uintptr_t)NAME(&rtmap), MSG_ORIG(MSG_STR_NAME))); } return ((char *)MSG_ORIG(MSG_STR_EMPTY)); } void dcmd_Bind_help(void) { mdb_printf(MSG_ORIG(MSG_BND_HELP)); } static int /* ARGSUSED2 */ dcmd_Bind(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) { Bnd_desc bnd; char *str; /* * Insure we have a valid address. */ if ((flags & DCMD_ADDRSPEC) == 0) { mdb_warn(MSG_ORIG(MSG_ERR_NAS), MSG_ORIG(MSG_BND_STR)); return (DCMD_USAGE); } /* * Obtain the binding descriptor. */ if (mdb_vread(&bnd, sizeof (Bnd_desc), addr) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_BND_STR), addr); return (DCMD_ERR); } mdb_printf(MSG_ORIG(MSG_BND_TITLE), addr); /* * Establish the identity of the caller. */ if ((str = Rtmap_Name((uintptr_t)bnd.b_caller)) == 0) return (DCMD_ERR); mdb_printf(MSG_ORIG(MSG_BND_LINE1), bnd.b_caller, str); /* * Establish the identity of the dependency. */ if ((str = Rtmap_Name((uintptr_t)bnd.b_depend)) == 0) return (DCMD_ERR); mdb_printf(MSG_ORIG(MSG_BND_LINE2), bnd.b_depend, str); /* * Display any flags. */ mdb_printf(MSG_ORIG(MSG_BND_LINE3), bnd.b_flags, bnd.b_flags, bndflags_bits); return (DCMD_OK); } static void dcmd_Depends_help(void) { mdb_printf(MSG_ORIG(MSG_DEPENDS_HELP)); } static int Depends(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv, uint_t flg, const char *msg) { APlist apl; uintptr_t listcalc, listndx; Bnd_desc * bdp; /* * Obtain the APlist and determine its number of elements and those * that are in use. */ if (mdb_vread(&apl, sizeof (APlist), addr) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_STR_APLIST), addr); return (DCMD_ERR); } mdb_printf(msg, addr, (size_t)apl.apl_nitems, (size_t)apl.apl_arritems); if (((flg & RTLD_FLG_VERBOSE) == 0) || (apl.apl_nitems == 0)) return (DCMD_OK); /* * Under verbose mode print the name of each dependency. An APlist can * have a variable number of data items, so read each individual entry. */ listcalc = APLIST_OFF_DATA + (uintptr_t)addr; if (mdb_vread(&bdp, sizeof (Bnd_desc *), listcalc) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_BNDDESC_STR), listcalc); return (DCMD_ERR); } mdb_inc_indent(4); mdb_printf(MSG_ORIG(MSG_STR_DASHES)); if (dcmd_Bind((uintptr_t)bdp, flags, argc, argv) == DCMD_ERR) { mdb_dec_indent(4); return (DCMD_ERR); } for (listndx = 1; listndx < apl.apl_nitems; listndx++) { listcalc += sizeof (void *); if (mdb_vread(&bdp, sizeof (Bnd_desc *), listcalc) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_BNDDESC_STR), listcalc); return (DCMD_ERR); } mdb_printf(MSG_ORIG(MSG_STR_DASHES)); if (dcmd_Bind((uintptr_t)bdp, flags, argc, argv) == DCMD_ERR) { mdb_dec_indent(4); return (DCMD_ERR); } } mdb_dec_indent(4); return (DCMD_OK); } static int dcmd_Depends(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) { Rt_map rtmap; char *str; uint_t flg = 0; /* * Insure we have a valid address, and provide for a -v option. */ if ((flags & DCMD_ADDRSPEC) == 0) { mdb_warn(MSG_ORIG(MSG_ERR_NAS), MSG_ORIG(MSG_DEPENDS_STR)); return (DCMD_USAGE); } if (mdb_getopts(argc, argv, 'v', MDB_OPT_SETBITS, RTLD_FLG_VERBOSE, &flg, NULL) != argc) return (DCMD_USAGE); /* * Read the Rt_map contents. */ if (mdb_vread(&rtmap, sizeof (Rt_map), addr) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_RTMAP_STR), addr); return (DCMD_ERR); } if ((str = String((uintptr_t)NAME(&rtmap), MSG_ORIG(MSG_STR_NAME))) == 0) return (DCMD_ERR); mdb_printf(MSG_ORIG(MSG_DEPENDS_LINE1), str); mdb_printf(MSG_ORIG(MSG_STR_DASHES)); if (DEPENDS(&rtmap) == NULL) return (DCMD_OK); return (Depends((uintptr_t)DEPENDS(&rtmap), flags, argc, argv, flg, MSG_ORIG(MSG_DEPENDS_LINE2))); } static void dcmd_Callers_help(void) { mdb_printf(MSG_ORIG(MSG_CALLERS_HELP)); } static int dcmd_Callers(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) { Rt_map rtmap; char *str; uint_t flg = 0; /* * Insure we have a valid address, and provide for a -v option. */ if ((flags & DCMD_ADDRSPEC) == 0) { mdb_warn(MSG_ORIG(MSG_ERR_NAS), MSG_ORIG(MSG_DEPENDS_STR)); return (DCMD_USAGE); } if (mdb_getopts(argc, argv, 'v', MDB_OPT_SETBITS, RTLD_FLG_VERBOSE, &flg, NULL) != argc) return (DCMD_USAGE); /* * Read the Rt_map contents. */ if (mdb_vread(&rtmap, sizeof (Rt_map), addr) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_RTMAP_STR), addr); return (DCMD_ERR); } if ((str = String((uintptr_t)NAME(&rtmap), MSG_ORIG(MSG_STR_NAME))) == 0) return (DCMD_ERR); mdb_printf(MSG_ORIG(MSG_CALLERS_LINE1), str); mdb_printf(MSG_ORIG(MSG_STR_DASHES)); if (CALLERS(&rtmap) == NULL) return (DCMD_OK); return (Depends((uintptr_t)CALLERS(&rtmap), flags, argc, argv, flg, MSG_ORIG(MSG_CALLERS_LINE2))); } void dcmd_rtmap_help(void) { mdb_printf(MSG_ORIG(MSG_RTMAP_HELP)); } static int /* ARGSUSED2 */ dcmd_rtmap(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) { Rt_map rtmap; char *str; if ((flags & DCMD_ADDRSPEC) == 0) { mdb_warn(MSG_ORIG(MSG_ERR_NAS), MSG_ORIG(MSG_RTMAP_STR)); return (DCMD_USAGE); } if (mdb_vread(&rtmap, sizeof (Rt_map), addr) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_RTMAP_STR), addr); return (DCMD_ERR); } mdb_printf(MSG_ORIG(MSG_RTMAP_TITLE), addr); mdb_printf(MSG_ORIG(MSG_STR_DASHES)); /* * Determine the objects name. NAME() is the name by which the object * has been opened, typically from adding a search path to a file name. * PATHNAME() is the fully resolve name, which is displayed by the proc * tools and debuggers. If the two names differ, print the PATHNAME(). */ if ((str = String((uintptr_t)NAME(&rtmap), MSG_ORIG(MSG_STR_NAME))) == 0) return (DCMD_ERR); mdb_printf(MSG_ORIG(MSG_RTMAP_LINE1), str); if (NAME(&rtmap) != PATHNAME(&rtmap)) { if ((str = String((uintptr_t)PATHNAME(&rtmap), MSG_ORIG(MSG_STR_PATHNAME))) == 0) return (DCMD_ERR); mdb_printf(MSG_ORIG(MSG_RTMAP_LINE2), str); } mdb_printf(MSG_ORIG(MSG_RTMAP_LINE3), ADDR(&rtmap), DYN(&rtmap)); mdb_printf(MSG_ORIG(MSG_RTMAP_LINE4), NEXT(&rtmap), PREV(&rtmap)); mdb_printf(MSG_ORIG(MSG_RTMAP_LINE5), rtmap.rt_fct, TLSMODID(&rtmap)); mdb_printf(MSG_ORIG(MSG_RTMAP_LINE6), INIT(&rtmap), FINI(&rtmap)); mdb_printf(MSG_ORIG(MSG_RTMAP_LINE7), GROUPS(&rtmap), HANDLES(&rtmap)); mdb_printf(MSG_ORIG(MSG_RTMAP_LINE8), DEPENDS(&rtmap), CALLERS(&rtmap)); if ((str = String((uintptr_t)REFNAME(&rtmap), MSG_ORIG(MSG_STR_REFNAME))) == 0) return (DCMD_ERR); mdb_printf(MSG_ORIG(MSG_RTMAP_LINE9), DYNINFO(&rtmap), str); if ((str = String((uintptr_t)RPATH(&rtmap), MSG_ORIG(MSG_STR_RPATH))) == 0) return (DCMD_ERR); mdb_printf(MSG_ORIG(MSG_RTMAP_LINE10), RLIST(&rtmap), str); mdb_printf(MSG_ORIG(MSG_RTMAP_LINE11), LIST(&rtmap), LIST(&rtmap)); mdb_printf(MSG_ORIG(MSG_RTMAP_LINE12), FLAGS(&rtmap)); mdb_printf(MSG_ORIG(MSG_RTMAP_LINE20), FLAGS(&rtmap), rtflags_bits); mdb_printf(MSG_ORIG(MSG_RTMAP_LINE13), FLAGS1(&rtmap)); mdb_printf(MSG_ORIG(MSG_RTMAP_LINE20), FLAGS1(&rtmap), rtflags1_bits); mdb_printf(MSG_ORIG(MSG_RTMAP_LINE14), MODE(&rtmap)); mdb_printf(MSG_ORIG(MSG_RTMAP_LINE20), MODE(&rtmap), rtmode_bits); return (DCMD_OK); } static int rtmap_format(uintptr_t addr, const void * data, void * private) { const Rt_map *lmp = (const Rt_map *)data; W_desc *wdp = (W_desc *)private; char *str; if (wdp && (wdp->w_flags & RTLD_FLG_VERBOSE)) { mdb_printf(MSG_ORIG(MSG_STR_DASHES)); mdb_call_dcmd(MSG_ORIG(MSG_RTMAP_STR), addr, DCMD_ADDRSPEC, NULL, NULL); return (0); } if ((str = String((uintptr_t)NAME(lmp), MSG_ORIG(MSG_STR_NAME))) == 0) return (DCMD_ERR); mdb_printf(MSG_ORIG(MSG_FMT_RT), CNTL(lmp), addr, ADDR(lmp), str); return (0); } void dcmd_Rtmaps_help(void) { mdb_printf(MSG_ORIG(MSG_RTMAPS_HELP)); } static int dcmd_Rtmaps(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) { uint_t flg = 0; GElf_Sym gsym; List l; Listnode ln; uintptr_t naddr; const char *str; W_desc wdesc; /* * '-v' - Verbose output of rtmap */ if (mdb_getopts(argc, argv, 'v', MDB_OPT_SETBITS, RTLD_FLG_VERBOSE, &flg, NULL) != argc) return (DCMD_USAGE); /* * If an address was provided use it. */ if (flags & DCMD_ADDRSPEC) { if (((flags & DCMD_LOOPFIRST) || !(flags & DCMD_LOOP)) && !(flg & RTLD_FLG_VERBOSE)) { mdb_printf(MSG_ORIG(MSG_RTMAPS_TITLE0)); mdb_printf(MSG_ORIG(MSG_STR_DASHES)); } wdesc.w_flags = flg; if (mdb_pwalk(MSG_ORIG(MSG_RTMAPS_STR), rtmap_format, (void *)&wdesc, addr) == -1) return (DCMD_ERR); return (DCMD_OK); } /* * Otherwise traverse the dynlm_list and display each link-map. */ if (mdb_lookup_by_obj(MSG_ORIG(MSG_STR_LDSO1), MSG_ORIG(MSG_STR_DYNLMLIST), &gsym) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_SYMFAILED), MSG_ORIG(MSG_STR_LDSO1), MSG_ORIG(MSG_STR_DYNLMLIST)); return (DCMD_ERR); } if (mdb_vread((void *)&l, sizeof (l), (uintptr_t)gsym.st_value) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_LIST_STR), gsym.st_value); return (DCMD_ERR); } mdb_printf(MSG_ORIG(MSG_LMLIST_TITLE1), MSG_ORIG(MSG_STR_DYNLMLIST), gsym.st_value); mdb_printf(MSG_ORIG(MSG_STR_DASHES)); flags |= (DCMD_LOOP | DCMD_LOOPFIRST); for (naddr = (uintptr_t)l.head; naddr; naddr = (uintptr_t)ln.next) { Lm_list lml; if (mdb_vread(&ln, sizeof (ln), naddr) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_STR_LISTNODE), naddr); return (DCMD_ERR); } if (mdb_vread(&lml, sizeof (lml), (uintptr_t)ln.data) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_LMLIST_STR), ln.data); return (DCMD_ERR); } mdb_inc_indent(2); if (lml.lm_flags & LML_FLG_BASELM) str = MSG_ORIG(MSG_LMLIST_BASE); else if (lml.lm_flags & LML_FLG_RTLDLM) str = MSG_ORIG(MSG_LMLIST_LDSO); else str = MSG_ORIG(MSG_LMLIST_NEWLM); if ((flags & DCMD_LOOP) && ((flags & DCMD_LOOPFIRST) == 0)) mdb_printf(MSG_ORIG(MSG_STR_DASHES)); mdb_printf(MSG_ORIG(MSG_LMLIST_TITLE2), ln.data, str); mdb_printf(MSG_ORIG(MSG_STR_DASHES)); mdb_inc_indent(2); if (((flags & DCMD_LOOPFIRST) || !(flags & DCMD_LOOP)) && !(flg & RTLD_FLG_VERBOSE)) { mdb_printf(MSG_ORIG(MSG_RTMAPS_TITLE0)); mdb_printf(MSG_ORIG(MSG_STR_DASHES)); } wdesc.w_flags = flg; if (mdb_pwalk(MSG_ORIG(MSG_RTMAPS_STR), rtmap_format, (void *)&wdesc, (uintptr_t)lml.lm_head) == -1) { mdb_dec_indent(4); return (DCMD_ERR); } mdb_dec_indent(4); flags &= ~DCMD_LOOPFIRST; } return (DCMD_OK); } static int /* ARGSUSED2 */ format_listnode(uintptr_t addr, const void * data, void * private) { Listnode * lnp = (Listnode *)data; mdb_printf(MSG_ORIG(MSG_FMT_LN), addr, lnp->data, lnp->next); return (0); } void dcmd_List_help(void) { mdb_printf(MSG_ORIG(MSG_LIST_HELP)); } static int /* ARGSUSED2 */ dcmd_List(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) { if ((flags & DCMD_ADDRSPEC) == 0) return (DCMD_USAGE); if ((flags & DCMD_LOOPFIRST) || !(flags & DCMD_LOOP)) { mdb_printf(MSG_ORIG(MSG_LIST_TITLE)); mdb_printf(MSG_ORIG(MSG_STR_DASHES)); } if (mdb_pwalk(MSG_ORIG(MSG_LIST_STR), format_listnode, (void *)0, addr) == -1) return (DCMD_ERR); return (DCMD_OK); } void dcmd_Setenv_help(void) { mdb_printf(MSG_ORIG(MSG_SETENV_HELP)); } /* * As of s10, mdb provides its own setenv command. This command allows the * environment of the process being controlled to be changed at any time. * Prior to this, ld.so.1 provided it's own, more primitive implementation. * This allowed for changing mdb's environment only, which if it was changed * before the application ws executed, would be copied to the applications * environment. Thus, we could start mdb, set an LD_ variable within its * environment (which it's own ld.so.1 had already finished processing), and * have this setting be inherited by the application. */ static int /* ARGSUSED */ dcmd_Setenv(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) { char *str; if (mdb_call_dcmd(MSG_ORIG(MSG_STR_SETENV), addr, flags, argc, argv) == 0) return (DCMD_OK); if (((flags & DCMD_ADDRSPEC) != 0) || (argc == 0) || (argc > 1) || (argv->a_type != MDB_TYPE_STRING)) return (DCMD_USAGE); str = mdb_alloc((strlen(argv->a_un.a_str) + 1), UM_NOSLEEP); if (str == NULL) return (DCMD_ERR); (void) strcpy(str, argv->a_un.a_str); (void) putenv(str); return (DCMD_OK); } int walk_List_init(mdb_walk_state_t *wsp) { List lst; if (wsp->walk_addr == NULL) { mdb_warn(MSG_ORIG(MSG_ERR_NAS), MSG_ORIG(MSG_LIST_STR)); return (WALK_ERR); } if (mdb_vread(&lst, sizeof (List), wsp->walk_addr) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_LIST_STR), wsp->walk_addr); return (WALK_DONE); } wsp->walk_addr = (uintptr_t)lst.head; return (WALK_NEXT); } static int walk_List_step(mdb_walk_state_t *wsp) { Listnode lnp; int status; if (wsp->walk_addr == NULL) return (WALK_DONE); if (mdb_vread(&lnp, sizeof (Listnode), wsp->walk_addr) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_STR_LISTNODE), wsp->walk_addr); return (WALK_DONE); } status = wsp->walk_callback(wsp->walk_addr, &lnp, wsp->walk_cbdata); wsp->walk_addr = (uintptr_t)lnp.next; return (status); } /* * Walk Rt_map lists */ static int walk_rtmap_init(mdb_walk_state_t *wsp) { if (wsp->walk_addr == NULL) { mdb_warn(MSG_ORIG(MSG_ERR_NAS), MSG_ORIG(MSG_RTMAP_STR)); return (WALK_ERR); } return (WALK_NEXT); } static int walk_rtmap_step(mdb_walk_state_t *wsp) { int status; Rt_map lmp; if (wsp->walk_addr == NULL) return (WALK_DONE); if (mdb_vread(&lmp, sizeof (Rt_map), wsp->walk_addr) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_RTMAP_STR), wsp->walk_addr); return (WALK_DONE); } status = wsp->walk_callback(wsp->walk_addr, &lmp, wsp->walk_cbdata); wsp->walk_addr = (uintptr_t)(NEXT(&lmp)); return (status); } static const mdb_bitmask_t lml_flags_bit[] = { { MSG_ORIG(MSG_LFL_BASELM), LML_FLG_BASELM, LML_FLG_BASELM }, { MSG_ORIG(MSG_LFL_RTLDLM), LML_FLG_RTLDLM, LML_FLG_RTLDLM }, { MSG_ORIG(MSG_LFL_NOAUDIT), LML_FLG_NOAUDIT, LML_FLG_NOAUDIT }, { MSG_ORIG(MSG_LFL_PLTREL), LML_FLG_PLTREL, LML_FLG_PLTREL }, { MSG_ORIG(MSG_LFL_HOLDLOCK), LML_FLG_HOLDLOCK, LML_FLG_HOLDLOCK }, { MSG_ORIG(MSG_LFL_ENVIRON), LML_FLG_ENVIRON, LML_FLG_ENVIRON }, { MSG_ORIG(MSG_LFL_INTRPOSE), LML_FLG_INTRPOSE, LML_FLG_INTRPOSE }, { MSG_ORIG(MSG_LFL_LOCAUDIT), LML_FLG_LOCAUDIT, LML_FLG_LOCAUDIT }, { MSG_ORIG(MSG_LFL_LOADAVAIL), LML_FLG_LOADAVAIL, LML_FLG_LOADAVAIL }, { MSG_ORIG(MSG_LFL_IGNRELERR), LML_FLG_IGNRELERR, LML_FLG_IGNRELERR }, { MSG_ORIG(MSG_LFL_DBNOTIF), LML_FLG_DBNOTIF, LML_FLG_DBNOTIF }, { MSG_ORIG(MSG_LFL_STARTREL), LML_FLG_STARTREL, LML_FLG_STARTREL }, { MSG_ORIG(MSG_LFL_ATEXIT), LML_FLG_ATEXIT, LML_FLG_ATEXIT }, { MSG_ORIG(MSG_LFL_OBJADDED), LML_FLG_OBJADDED, LML_FLG_OBJADDED }, { MSG_ORIG(MSG_LFL_OBJDELETED), LML_FLG_OBJDELETED, LML_FLG_OBJDELETED }, { MSG_ORIG(MSG_LFL_OBJREEVAL), LML_FLG_OBJREEVAL, LML_FLG_OBJREEVAL }, { MSG_ORIG(MSG_LFL_NOPENDGLBLAZY), LML_FLG_NOPENDGLBLAZY, LML_FLG_NOPENDGLBLAZY }, { MSG_ORIG(MSG_LFL_TRC_LDDSTUB), LML_FLG_TRC_LDDSTUB, LML_FLG_TRC_LDDSTUB }, { MSG_ORIG(MSG_LFL_TRC_ENABLE), LML_FLG_TRC_ENABLE, LML_FLG_TRC_ENABLE }, { MSG_ORIG(MSG_LFL_TRC_WARN), LML_FLG_TRC_WARN, LML_FLG_TRC_WARN }, { MSG_ORIG(MSG_LFL_TRC_VERBOSE), LML_FLG_TRC_VERBOSE, LML_FLG_TRC_VERBOSE }, { MSG_ORIG(MSG_LFL_TRC_SEARCH), LML_FLG_TRC_SEARCH, LML_FLG_TRC_SEARCH }, { MSG_ORIG(MSG_LFL_TRC_UNREF), LML_FLG_TRC_UNREF, LML_FLG_TRC_UNREF }, { MSG_ORIG(MSG_LFL_TRC_UNUSED), LML_FLG_TRC_UNUSED, LML_FLG_TRC_UNUSED }, { MSG_ORIG(MSG_LFL_TRC_INIT), LML_FLG_TRC_INIT, LML_FLG_TRC_INIT }, { NULL, 0, 0} }; static const mdb_bitmask_t lml_tflags_bit[] = { { MSG_ORIG(MSG_LTFL_NOLAZYLD), LML_TFLG_NOLAZYLD, LML_TFLG_NOLAZYLD }, { MSG_ORIG(MSG_LTFL_NODIRECT), LML_TFLG_NODIRECT, LML_TFLG_NODIRECT }, { MSG_ORIG(MSG_LTFL_LOADFLTR), LML_TFLG_LOADFLTR, LML_TFLG_LOADFLTR }, { MSG_ORIG(MSG_LTFL_AUD_PREINIT), LML_TFLG_AUD_PREINIT, LML_TFLG_AUD_PREINIT }, { MSG_ORIG(MSG_LTFL_AUD_OBJSEARCH), LML_TFLG_AUD_OBJSEARCH, LML_TFLG_AUD_OBJSEARCH }, { MSG_ORIG(MSG_LTFL_AUD_OBJOPEN), LML_TFLG_AUD_OBJOPEN, LML_TFLG_AUD_OBJOPEN }, { MSG_ORIG(MSG_LTFL_AUD_OBJFILTER), LML_TFLG_AUD_OBJFILTER, LML_TFLG_AUD_OBJFILTER }, { MSG_ORIG(MSG_LTFL_AUD_OBJCLOSE), LML_TFLG_AUD_OBJCLOSE, LML_TFLG_AUD_OBJCLOSE }, { MSG_ORIG(MSG_LTFL_AUD_SYMBIND), LML_TFLG_AUD_SYMBIND, LML_TFLG_AUD_SYMBIND }, { MSG_ORIG(MSG_LTFL_AUD_PLTENTER), LML_TFLG_AUD_PLTENTER, LML_TFLG_AUD_PLTENTER }, { MSG_ORIG(MSG_LTFL_AUD_PLTEXIT), LML_TFLG_AUD_PLTEXIT, LML_TFLG_AUD_PLTEXIT }, { MSG_ORIG(MSG_LTFL_AUD_ACTIVITY), LML_TFLG_AUD_ACTIVITY, LML_TFLG_AUD_ACTIVITY }, { NULL, 0, 0} }; void dcmd_Lm_list_help(void) { mdb_printf(MSG_ORIG(MSG_LMLIST_HELP)); } static int /* ARGSUSED1 */ _dcmd_Lm_list(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) { Lm_list lml; const char *str; uint_t flg = 0; if (mdb_getopts(argc, argv, 'v', MDB_OPT_SETBITS, RTLD_FLG_VERBOSE, &flg, NULL) != argc) return (DCMD_USAGE); if (mdb_vread(&lml, sizeof (lml), addr) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_LMLIST_STR), addr); return (DCMD_ERR); } if (lml.lm_flags & LML_FLG_BASELM) str = MSG_ORIG(MSG_LMLIST_BASE); else if (lml.lm_flags & LML_FLG_RTLDLM) str = MSG_ORIG(MSG_LMLIST_LDSO); else str = MSG_ORIG(MSG_LMLIST_NEWLM); if ((flags & DCMD_LOOP) && ((flags & DCMD_LOOPFIRST) == 0)) mdb_printf(MSG_ORIG(MSG_STR_DASHES)); mdb_printf(MSG_ORIG(MSG_LMLIST_TITLE2), addr, str); mdb_printf(MSG_ORIG(MSG_STR_DASHES)); if (lml.lm_lists) { Alist al; Lm_cntl lmc; uintptr_t listcalc; addr = (uintptr_t)lml.lm_lists; if (mdb_vread(&al, sizeof (Alist), addr) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_STR_ALIST), addr); return (DCMD_ERR); } /* * Determine whether the Alist has been populated. Note, the * implementation first reserves an alist entry, and initializes * this element when the first link-map is processed. Thus, * there's a window when nitems is updated, but before the next * element has been initialized. */ if (al.al_nitems && (flg & RTLD_FLG_VERBOSE)) { listcalc = ALIST_OFF_DATA + (uintptr_t)addr; if (mdb_vread(&lmc, sizeof (Lm_cntl), listcalc) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_LMLIST_STR), listcalc); return (DCMD_ERR); } } mdb_printf(MSG_ORIG(MSG_LMLIST_LINE0), addr, (size_t)al.al_nitems, (size_t)al.al_arritems); mdb_inc_indent(2); mdb_printf(MSG_ORIG(MSG_STR_DASHES)); if (al.al_nitems && (flg & RTLD_FLG_VERBOSE)) { uintptr_t listndx; mdb_inc_indent(2); mdb_printf(MSG_ORIG(MSG_LMC_LINE1), listcalc); mdb_printf(MSG_ORIG(MSG_LMC_LINE2), lmc.lc_head, lmc.lc_tail); mdb_printf(MSG_ORIG(MSG_LMC_LINE3), lmc.lc_flags, lmc.lc_now); mdb_printf(MSG_ORIG(MSG_LMC_LINE4), lmc.lc_flags, lmc_bits); mdb_printf(MSG_ORIG(MSG_STR_DASHES)); mdb_printf(MSG_ORIG(MSG_RTMAPS_TITLE0)); mdb_printf(MSG_ORIG(MSG_STR_DASHES)); if (lmc.lc_head) { if (mdb_pwalk(MSG_ORIG(MSG_RTMAPS_STR), rtmap_format, (void *)0, (uintptr_t)lmc.lc_head) == -1) { mdb_dec_indent(4); return (DCMD_ERR); } } else mdb_printf(MSG_ORIG(MSG_FMT_RT), 0, 0, 0, MSG_ORIG(MSG_STR_EMPTY)); mdb_printf(MSG_ORIG(MSG_STR_DASHES)); for (listndx = 1; listndx < al.al_nitems; listndx++) { listcalc += al.al_size; if (mdb_vread(&lmc, sizeof (Lm_cntl), listcalc) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_LMLIST_STR), listcalc); mdb_dec_indent(4); return (DCMD_ERR); } mdb_printf(MSG_ORIG(MSG_STR_DASHES)); mdb_printf(MSG_ORIG(MSG_LMC_LINE1), listcalc); mdb_printf(MSG_ORIG(MSG_LMC_LINE2), lmc.lc_head, lmc.lc_tail); mdb_printf(MSG_ORIG(MSG_LMC_LINE3), lmc.lc_flags, lmc.lc_now); mdb_printf(MSG_ORIG(MSG_LMC_LINE4), lmc.lc_flags, lmc_bits); mdb_printf(MSG_ORIG(MSG_STR_DASHES)); mdb_printf(MSG_ORIG(MSG_RTMAPS_TITLE0)); mdb_printf(MSG_ORIG(MSG_STR_DASHES)); if (lmc.lc_head) { if (mdb_pwalk(MSG_ORIG(MSG_RTMAPS_STR), rtmap_format, (void *)0, (uintptr_t)lmc.lc_head) == -1) { mdb_dec_indent(4); return (DCMD_ERR); } } else mdb_printf(MSG_ORIG(MSG_FMT_RT), 0, 0, 0, MSG_ORIG(MSG_STR_EMPTY)); mdb_printf(MSG_ORIG(MSG_STR_DASHES)); } mdb_dec_indent(2); } mdb_dec_indent(2); } mdb_printf(MSG_ORIG(MSG_LMLIST_LINE1), lml.lm_head, lml.lm_tail); mdb_printf(MSG_ORIG(MSG_LMLIST_LINE2), lml.lm_alp, lml.lm_rti); mdb_printf(MSG_ORIG(MSG_LMLIST_LINE3), lml.lm_handle, lml.lm_obj, lml.lm_init, lml.lm_lazy); mdb_printf(MSG_ORIG(MSG_LMLIST_LINE4), lml.lm_flags); if (lml.lm_flags) mdb_printf(MSG_ORIG(MSG_LMLIST_LINE6), lml.lm_flags, lml_flags_bit); mdb_printf(MSG_ORIG(MSG_LMLIST_LINE5), lml.lm_tflags); if (lml.lm_tflags) mdb_printf(MSG_ORIG(MSG_LMLIST_LINE6), lml.lm_tflags, lml_tflags_bit); return (DCMD_OK); } static int /* ARGSUSED2 */ dcmd_Lm_list(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) { GElf_Sym gsym; List l; Listnode ln; uintptr_t naddr; /* * If an address was provided us it. */ if (flags & DCMD_ADDRSPEC) return (_dcmd_Lm_list(addr, flags, argc, argv)); /* * Otherwise traverse the dynlm_list and display each link-map list. */ if (mdb_lookup_by_obj(MSG_ORIG(MSG_STR_LDSO1), MSG_ORIG(MSG_STR_DYNLMLIST), &gsym) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_SYMFAILED), MSG_ORIG(MSG_STR_LDSO1), MSG_ORIG(MSG_STR_DYNLMLIST)); return (DCMD_ERR); } if (mdb_vread((void *)&l, sizeof (l), (uintptr_t)gsym.st_value) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_LIST_STR), gsym.st_value); return (DCMD_ERR); } mdb_printf(MSG_ORIG(MSG_LMLIST_TITLE1), MSG_ORIG(MSG_STR_DYNLMLIST), gsym.st_value); mdb_printf(MSG_ORIG(MSG_STR_DASHES)); flags |= (DCMD_LOOP | DCMD_LOOPFIRST); for (naddr = (uintptr_t)l.head; naddr; naddr = (uintptr_t)ln.next) { if (mdb_vread(&ln, sizeof (ln), naddr) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_STR_LISTNODE), naddr); return (DCMD_ERR); } mdb_inc_indent(2); if (_dcmd_Lm_list((uintptr_t)ln.data, flags, argc, argv) == DCMD_ERR) { mdb_dec_indent(2); return (DCMD_ERR); } mdb_dec_indent(2); flags &= ~DCMD_LOOPFIRST; } return (DCMD_OK); } void dcmd_GrpDesc_help(void) { mdb_printf(MSG_ORIG(MSG_GRPDESC_HELP)); } static int /* ARGSUSED2 */ dcmd_GrpDesc(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) { Grp_desc gd; char *str; /* * Insure we have a valid address. */ if ((flags & DCMD_ADDRSPEC) == 0) { mdb_warn(MSG_ORIG(MSG_ERR_NAS), MSG_ORIG(MSG_GRPDESC_STR)); return (DCMD_USAGE); } mdb_printf(MSG_ORIG(MSG_GRPDESC_LINE1), addr); if (mdb_vread(&gd, sizeof (Grp_desc), addr) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_GRPDESC_STR), addr); return (DCMD_ERR); } if ((str = Rtmap_Name((uintptr_t)gd.gd_depend)) == 0) return (DCMD_ERR); mdb_printf(MSG_ORIG(MSG_GRPDESC_LINE2), gd.gd_depend, str); mdb_printf(MSG_ORIG(MSG_GRPDESC_LINE3), gd.gd_flags, gd.gd_flags, grdflags_bits); return (DCMD_OK); } void dcmd_GrpHdl_help(void) { mdb_printf(MSG_ORIG(MSG_GRPHDL_HELP)); } static int /* ARGSUSED2 */ dcmd_GrpHdl(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) { Grp_hdl gh; Alist al; uintptr_t listcalc, listidx; char *str; uint_t flg = 0; /* * Insure we have a valid address, and provide for a -v option. */ if ((flags & DCMD_ADDRSPEC) == 0) { mdb_warn(MSG_ORIG(MSG_ERR_NAS), MSG_ORIG(MSG_GRPHDL_STR)); return (DCMD_USAGE); } if (mdb_getopts(argc, argv, 'v', MDB_OPT_SETBITS, RTLD_FLG_VERBOSE, &flg, NULL) != argc) return (DCMD_USAGE); mdb_printf(MSG_ORIG(MSG_GRPHDL_LINE1), addr); mdb_printf(MSG_ORIG(MSG_STR_DASHES)); if (mdb_vread(&gh, sizeof (Grp_hdl), addr) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_GRPHDL_STR), addr); return (DCMD_ERR); } /* * Determine the handles owner. Note that an orphaned handle may no * longer contain its originating owner. */ if (gh.gh_ownlmp) { if ((str = Rtmap_Name((uintptr_t)gh.gh_ownlmp)) == 0) return (DCMD_ERR); } else str = (char *)MSG_ORIG(MSG_STR_ORPHANED); mdb_printf(MSG_ORIG(MSG_GRPHDL_LINE2), str); mdb_printf(MSG_ORIG(MSG_GRPHDL_LINE3), gh.gh_flags, gh.gh_flags, grhflags_bits); if (gh.gh_depends == 0) { mdb_printf(MSG_ORIG(MSG_GRPHDL_LINE4), gh.gh_refcnt); return (DCMD_OK); } addr = (uintptr_t)gh.gh_depends; if (mdb_vread(&al, sizeof (Alist), addr) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_STR_ALIST), addr); return (DCMD_ERR); } mdb_printf(MSG_ORIG(MSG_GRPHDL_LINE5), gh.gh_refcnt, addr, (size_t)al.al_nitems, (size_t)al.al_arritems); if (((flg & RTLD_FLG_VERBOSE) == 0) || (al.al_nitems == 0)) return (DCMD_OK); mdb_inc_indent(4); mdb_printf(MSG_ORIG(MSG_STR_DASHES)); /* * Under verbose mode print the name of each dependency. An Alist can * have a variable number of data items, so read each individual entry. */ listcalc = ALIST_OFF_DATA + (uintptr_t)addr; if (dcmd_GrpDesc(listcalc, flags, argc, argv) == DCMD_ERR) { mdb_dec_indent(4); return (DCMD_ERR); } for (listidx = 1; listidx < al.al_nitems; listidx++) { listcalc += al.al_size; mdb_printf(MSG_ORIG(MSG_STR_DASHES)); if (dcmd_GrpDesc(listcalc, flags, argc, argv) == DCMD_ERR) { mdb_dec_indent(4); return (DCMD_ERR); } } mdb_dec_indent(4); return (DCMD_OK); } static void dcmd_Handles_help(void) { mdb_printf(MSG_ORIG(MSG_HANDLES_HELP)); } static int dcmd_Handles(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) { Rt_map rtmap; char *str; uint_t flg = 0; APlist apl; uintptr_t listcalc, listndx; Grp_hdl * ghp; /* * Insure we have a valid address, and provide for a -v option. */ if ((flags & DCMD_ADDRSPEC) == 0) { mdb_warn(MSG_ORIG(MSG_ERR_NAS), MSG_ORIG(MSG_HANDLES_STR)); return (DCMD_USAGE); } if (mdb_getopts(argc, argv, 'v', MDB_OPT_SETBITS, RTLD_FLG_VERBOSE, &flg, NULL) != argc) return (DCMD_USAGE); /* * Read the Rt_map contents. */ if (mdb_vread(&rtmap, sizeof (Rt_map), addr) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_RTMAP_STR), addr); return (DCMD_ERR); } if ((str = String((uintptr_t)NAME(&rtmap), MSG_ORIG(MSG_STR_NAME))) == 0) return (DCMD_ERR); mdb_printf(MSG_ORIG(MSG_HANDLES_LINE1), str); mdb_printf(MSG_ORIG(MSG_STR_DASHES)); if (HANDLES(&rtmap) == 0) return (DCMD_OK); addr = (uintptr_t)HANDLES(&rtmap); if (mdb_vread(&apl, sizeof (APlist), addr) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_STR_APLIST), addr); return (DCMD_ERR); } mdb_printf(MSG_ORIG(MSG_HANDLES_LINE2), addr, (size_t)apl.apl_nitems, (size_t)apl.apl_arritems); if (((flg & RTLD_FLG_VERBOSE) == 0) || (apl.apl_nitems == 0)) return (DCMD_OK); /* * Under verbose mode print the name of each dependency. An APlist can * have a variable number of data items, so read each individual entry. */ listcalc = addr + APLIST_OFF_DATA; if (mdb_vread(&ghp, sizeof (Grp_hdl *), listcalc) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_GRPHDL_STR), listcalc); return (DCMD_ERR); } mdb_inc_indent(4); mdb_printf(MSG_ORIG(MSG_STR_DASHES)); if (dcmd_GrpHdl((uintptr_t)ghp, flags, argc, argv) == DCMD_ERR) { mdb_dec_indent(4); return (DCMD_ERR); } listndx = 1; for (listndx = 1; listndx < apl.apl_nitems; listndx++) { listcalc += sizeof (void *); if (mdb_vread(&ghp, sizeof (Grp_hdl *), listcalc) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_GRPHDL_STR), listcalc); return (DCMD_ERR); } mdb_printf(MSG_ORIG(MSG_STR_DASHES)); if (dcmd_GrpHdl((uintptr_t)ghp, flags, argc, argv) == DCMD_ERR) { mdb_dec_indent(4); return (DCMD_ERR); } } mdb_dec_indent(4); return (DCMD_OK); } static void dcmd_Groups_help(void) { mdb_printf(MSG_ORIG(MSG_GROUPS_HELP)); } static int dcmd_Groups(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) { Rt_map rtmap; char *str; APlist apl; uint_t flg = 0; uintptr_t listcalc, listndx; Grp_hdl * ghp; /* * Insure we have a valid address, and provide for a -v option. */ if ((flags & DCMD_ADDRSPEC) == 0) { mdb_warn(MSG_ORIG(MSG_ERR_NAS), MSG_ORIG(MSG_GROUPS_STR)); return (DCMD_USAGE); } if (mdb_getopts(argc, argv, 'v', MDB_OPT_SETBITS, RTLD_FLG_VERBOSE, &flg, NULL) != argc) return (DCMD_USAGE); /* * Read the Rt_map contents. */ if (mdb_vread(&rtmap, sizeof (Rt_map), addr) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_RTMAP_STR), addr); return (DCMD_ERR); } if ((str = String((uintptr_t)NAME(&rtmap), MSG_ORIG(MSG_STR_NAME))) == 0) return (DCMD_ERR); mdb_printf(MSG_ORIG(MSG_GROUPS_LINE1), str); mdb_printf(MSG_ORIG(MSG_STR_DASHES)); if (GROUPS(&rtmap) == 0) return (DCMD_OK); addr = (uintptr_t)GROUPS(&rtmap); if (mdb_vread(&apl, sizeof (APlist), addr) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_STR_APLIST), addr); return (DCMD_ERR); } mdb_printf(MSG_ORIG(MSG_GROUPS_LINE2), addr, (size_t)apl.apl_nitems, (size_t)apl.apl_arritems); if (((flg & RTLD_FLG_VERBOSE) == 0) || (apl.apl_nitems == 0)) return (DCMD_OK); /* * Under verbose mode print the name of each dependency. An APlist can * have a variable number of data items, so read each individual entry. */ listcalc = addr + APLIST_OFF_DATA; if (mdb_vread(&ghp, sizeof (Grp_hdl *), listcalc) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_GRPHDL_STR), listcalc); return (DCMD_ERR); } mdb_inc_indent(4); mdb_printf(MSG_ORIG(MSG_STR_DASHES)); if (dcmd_GrpHdl((uintptr_t)ghp, flags, argc, argv) == DCMD_ERR) { mdb_dec_indent(4); return (DCMD_ERR); } for (listndx = 1; listndx < apl.apl_nitems; listndx++) { listcalc += sizeof (void *); if (mdb_vread(&ghp, sizeof (Grp_hdl *), listcalc) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_GRPHDL_STR), listcalc); return (DCMD_ERR); } mdb_printf(MSG_ORIG(MSG_STR_DASHES)); if (dcmd_GrpHdl((uintptr_t)ghp, flags, argc, argv) == DCMD_ERR) { mdb_dec_indent(4); return (DCMD_ERR); } } mdb_dec_indent(4); return (DCMD_OK); } static void dcmd_ElfDyn_help(void) { mdb_printf(MSG_ORIG(MSG_ELFDYN_HELP)); } static int /* ARGSUSED2 */ dcmd_ElfDyn(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) { Dyn dyn; const char *dynstr; Conv_inv_buf_t inv_buf; if ((flags & DCMD_ADDRSPEC) == 0) return (DCMD_USAGE); if (mdb_vread(&dyn, sizeof (dyn), addr) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_ELFDYN_STR), addr); return (DCMD_ERR); } mdb_printf(MSG_ORIG(MSG_ELFDYN_TITLE), addr); dynstr = conv_dyn_tag(dyn.d_tag, M_MACH, 0, &inv_buf); mdb_printf(MSG_ORIG(MSG_ELFDYN_LINE1), addr, dynstr, dyn.d_un.d_ptr); mdb_set_dot(addr + sizeof (Dyn)); return (DCMD_OK); } static void dcmd_ElfEhdr_help(void) { mdb_printf(MSG_ORIG(MSG_EHDR_HELP)); } static int /* ARGSUSED2 */ dcmd_ElfEhdr(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) { Ehdr ehdr; Byte *byte; const char *flgs; Conv_inv_buf_t inv_buf1, inv_buf2; Conv_ehdr_flags_buf_t ehdr_flags_buf; if ((flags & DCMD_ADDRSPEC) == 0) return (DCMD_USAGE); if (mdb_vread(&ehdr, sizeof (ehdr), addr) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_EHDR_STR), addr); return (DCMD_ERR); } mdb_printf(MSG_ORIG(MSG_EHDR_TITLE), addr); byte = &ehdr.e_ident[0]; mdb_printf(MSG_ORIG(MSG_EHDR_LINE1), byte[EI_MAG0], (byte[EI_MAG1] ? byte[EI_MAG1] : '0'), (byte[EI_MAG2] ? byte[EI_MAG2] : '0'), (byte[EI_MAG3] ? byte[EI_MAG3] : '0')); mdb_printf(MSG_ORIG(MSG_EHDR_LINE2), conv_ehdr_class(ehdr.e_ident[EI_CLASS], 0, &inv_buf1), conv_ehdr_data(ehdr.e_ident[EI_DATA], 0, &inv_buf2)); mdb_printf(MSG_ORIG(MSG_EHDR_LINE3), conv_ehdr_mach(ehdr.e_machine, 0, &inv_buf1), conv_ehdr_vers(ehdr.e_version, 0, &inv_buf2)); mdb_printf(MSG_ORIG(MSG_EHDR_LINE4), conv_ehdr_type(ehdr.e_type, 0, &inv_buf1)); /* * Line up the flags differently depending on whether we * received a numeric (e.g. "0x200") or text representation * (e.g. "[ EF_SPARC_SUN_US1 ]"). */ flgs = conv_ehdr_flags(ehdr.e_machine, ehdr.e_flags, 0, &ehdr_flags_buf); if (flgs[0] == '[') mdb_printf(MSG_ORIG(MSG_EHDR_LINE5), flgs); else mdb_printf(MSG_ORIG(MSG_EHDR_LINE6), flgs); mdb_printf(MSG_ORIG(MSG_EHDR_LINE7), ehdr.e_entry, ehdr.e_ehsize, ehdr.e_shstrndx); mdb_printf(MSG_ORIG(MSG_EHDR_LINE8), ehdr.e_shoff, ehdr.e_shentsize, ehdr.e_shnum); mdb_printf(MSG_ORIG(MSG_EHDR_LINE9), ehdr.e_phoff, ehdr.e_phentsize, ehdr.e_phnum); mdb_set_dot(addr + sizeof (Ehdr)); return (DCMD_OK); } static void dcmd_ElfPhdr_help(void) { mdb_printf(MSG_ORIG(MSG_EPHDR_HELP)); } static int /* ARGSUSED2 */ dcmd_ElfPhdr(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) { Phdr phdr; Conv_inv_buf_t inv_buf; Conv_phdr_flags_buf_t phdr_flags_buf; if ((flags & DCMD_ADDRSPEC) == 0) return (DCMD_USAGE); if (mdb_vread(&phdr, sizeof (phdr), addr) == -1) { mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_EPHDR_STR), addr); return (DCMD_ERR); } mdb_printf(MSG_ORIG(MSG_EPHDR_TITLE), addr); mdb_printf(MSG_ORIG(MSG_EPHDR_LINE1), phdr.p_vaddr, conv_phdr_flags(phdr.p_flags, 0, &phdr_flags_buf)); mdb_printf(MSG_ORIG(MSG_EPHDR_LINE2), phdr.p_paddr, conv_phdr_type(M_MACH, phdr.p_type, 0, &inv_buf)); mdb_printf(MSG_ORIG(MSG_EPHDR_LINE3), phdr.p_filesz, phdr.p_memsz); mdb_printf(MSG_ORIG(MSG_EPHDR_LINE4), phdr.p_offset, phdr.p_align); mdb_set_dot(addr + sizeof (Phdr)); return (DCMD_OK); } static const mdb_dcmd_t dcmds[] = { { MSG_ORIG(MSG_BND_STR), MSG_ORIG(MSG_USG_ADDREQ_V), MSG_ORIG(MSG_BND_DCD), dcmd_Bind, dcmd_Bind_help}, { MSG_ORIG(MSG_DEPENDS_STR), MSG_ORIG(MSG_USG_ADDREQ_V), MSG_ORIG(MSG_DEPENDS_DCD), dcmd_Depends, dcmd_Depends_help}, { MSG_ORIG(MSG_CALLERS_STR), MSG_ORIG(MSG_USG_ADDREQ_V), MSG_ORIG(MSG_CALLERS_DCD), dcmd_Callers, dcmd_Callers_help}, { MSG_ORIG(MSG_GRPHDL_STR), MSG_ORIG(MSG_USG_ADDREQ_V), MSG_ORIG(MSG_GRPHDL_DCD), dcmd_GrpHdl, dcmd_GrpHdl_help}, { MSG_ORIG(MSG_GRPDESC_STR), MSG_ORIG(MSG_USG_ADDREQ_V), MSG_ORIG(MSG_GRPDESC_DCD), dcmd_GrpDesc, dcmd_GrpDesc_help}, { MSG_ORIG(MSG_HANDLES_STR), MSG_ORIG(MSG_USG_ADDREQ_V), MSG_ORIG(MSG_HANDLES_DCD), dcmd_Handles, dcmd_Handles_help}, { MSG_ORIG(MSG_GROUPS_STR), MSG_ORIG(MSG_USG_ADDREQ_V), MSG_ORIG(MSG_GROUPS_DCD), dcmd_Groups, dcmd_Groups_help}, { MSG_ORIG(MSG_ELFDYN_STR), MSG_ORIG(MSG_USG_ADDREQ), MSG_ORIG(MSG_ELFDYN_DCD), dcmd_ElfDyn, dcmd_ElfDyn_help}, { MSG_ORIG(MSG_EHDR_STR), MSG_ORIG(MSG_USG_ADDREQ), MSG_ORIG(MSG_EHDR_DCD), dcmd_ElfEhdr, dcmd_ElfEhdr_help}, { MSG_ORIG(MSG_EPHDR_STR), MSG_ORIG(MSG_USG_ADDREQ), MSG_ORIG(MSG_EPHDR_DCD), dcmd_ElfPhdr, dcmd_ElfPhdr_help}, { MSG_ORIG(MSG_LIST_STR), MSG_ORIG(MSG_USG_ADDREQ), MSG_ORIG(MSG_LIST_DCD), dcmd_List, dcmd_List_help}, { MSG_ORIG(MSG_LMLIST_STR), MSG_ORIG(MSG_USG_ADDREQ_V), MSG_ORIG(MSG_LMLIST_DCD), dcmd_Lm_list, dcmd_Lm_list_help}, { MSG_ORIG(MSG_RTMAPS_STR), MSG_ORIG(MSG_USG_ADDOPT_V), MSG_ORIG(MSG_RTMAPS_DCD), dcmd_Rtmaps, dcmd_Rtmaps_help}, { MSG_ORIG(MSG_RTMAP_STR), MSG_ORIG(MSG_USG_ADDREQ), MSG_ORIG(MSG_RTMAP_DCD), dcmd_rtmap, dcmd_rtmap_help}, { MSG_ORIG(MSG_SETENV_STR), MSG_ORIG(MSG_USG_SETENV), MSG_ORIG(MSG_SETENV_DCD), dcmd_Setenv, dcmd_Setenv_help}, { NULL } }; static const mdb_walker_t walkers[] = { { MSG_ORIG(MSG_RTMAPS_STR), MSG_ORIG(MSG_WWD_RTMAP), walk_rtmap_init, walk_rtmap_step, NULL, NULL }, { MSG_ORIG(MSG_LIST_STR), MSG_ORIG(MSG_WWD_LIST), walk_List_init, walk_List_step, NULL, NULL }, { NULL } }; static const mdb_modinfo_t modinfo = { MDB_API_VERSION, dcmds, walkers }; const mdb_modinfo_t * _mdb_init(void) { return (&modinfo); }