xref: /titanic_50/usr/src/cmd/sgs/rtld/mdbmod/common/rtld.c (revision 3b280fcbe30cbc624c426ebb783da707cdda9245)
1 /*
2  * CDDL HEADER START
3  *
4  * The contents of this file are subject to the terms of the
5  * Common Development and Distribution License (the "License").
6  * You may not use this file except in compliance with the License.
7  *
8  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9  * or http://www.opensolaris.org/os/licensing.
10  * See the License for the specific language governing permissions
11  * and limitations under the License.
12  *
13  * When distributing Covered Code, include this CDDL HEADER in each
14  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15  * If applicable, add the following below this CDDL HEADER, with the
16  * fields enclosed by brackets "[]" replaced with your own identifying
17  * information: Portions Copyright [yyyy] [name of copyright owner]
18  *
19  * CDDL HEADER END
20  */
21 
22 /*
23  * Copyright 2009 Sun Microsystems, Inc.  All rights reserved.
24  * Use is subject to license terms.
25  */
26 
27 #include <msg.h>
28 #include <_rtld.h>
29 #include <conv.h>
30 #include <sys/mdb_modapi.h>
31 #include <sys/param.h>
32 #include <stdlib.h>
33 
34 /*
35  * Data structure for walkers.
36  */
37 typedef struct {
38 	uint_t	w_flags;
39 } W_desc;
40 
41 /*
42  * Flags values for dcmds
43  */
44 
45 #define	RTLD_FLG_VERBOSE	0x0001		/* verbose output */
46 
47 static const mdb_bitmask_t rtflags_bits[] = {
48 	{ MSG_ORIG(MSG_FLG_ISMAIN), FLG_RT_ISMAIN, FLG_RT_ISMAIN},
49 	{ MSG_ORIG(MSG_FLG_IMGALLOC), FLG_RT_IMGALLOC, FLG_RT_IMGALLOC},
50 	{ MSG_ORIG(MSG_FLG_RELOCED), FLG_RT_RELOCED, FLG_RT_RELOCED},
51 	{ MSG_ORIG(MSG_FLG_SETGROUP), FLG_RT_SETGROUP, FLG_RT_SETGROUP},
52 	{ MSG_ORIG(MSG_FLG_HWCAP), FLG_RT_HWCAP, FLG_RT_HWCAP},
53 	{ MSG_ORIG(MSG_FLG_OBJECT), FLG_RT_OBJECT, FLG_RT_OBJECT},
54 	{ MSG_ORIG(MSG_FLG_NODUMP), FLG_RT_NODUMP, FLG_RT_NODUMP},
55 	{ MSG_ORIG(MSG_FLG_DELETE), FLG_RT_DELETE, FLG_RT_DELETE},
56 	{ MSG_ORIG(MSG_FLG_ANALYZED), FLG_RT_ANALYZED, FLG_RT_ANALYZED},
57 	{ MSG_ORIG(MSG_FLG_INITDONE), FLG_RT_INITDONE, FLG_RT_INITDONE},
58 	{ MSG_ORIG(MSG_FLG_TRANS), FLG_RT_TRANS, FLG_RT_TRANS},
59 	{ MSG_ORIG(MSG_FLG_FIXED), FLG_RT_FIXED, FLG_RT_FIXED},
60 	{ MSG_ORIG(MSG_FLG_PRELOAD), FLG_RT_PRELOAD, FLG_RT_PRELOAD},
61 	{ MSG_ORIG(MSG_FLG_ALTER), FLG_RT_ALTER, FLG_RT_ALTER},
62 	{ MSG_ORIG(MSG_FLG_LOADFLTR), FLG_RT_LOADFLTR, FLG_RT_LOADFLTR},
63 	{ MSG_ORIG(MSG_FLG_AUDIT), FLG_RT_AUDIT, FLG_RT_AUDIT},
64 	{ MSG_ORIG(MSG_FLG_MODESET), FLG_RT_MODESET, FLG_RT_MODESET},
65 	{ MSG_ORIG(MSG_FLG_ANALZING), FLG_RT_ANALZING, FLG_RT_ANALZING},
66 	{ MSG_ORIG(MSG_FLG_INITFRST), FLG_RT_INITFRST, FLG_RT_INITFRST},
67 	{ MSG_ORIG(MSG_FLG_NOOPEN), FLG_RT_NOOPEN, FLG_RT_NOOPEN},
68 	{ MSG_ORIG(MSG_FLG_FINICLCT), FLG_RT_FINICLCT, FLG_RT_FINICLCT},
69 	{ MSG_ORIG(MSG_FLG_INITCALL), FLG_RT_INITCALL, FLG_RT_INITCALL},
70 	{ MSG_ORIG(MSG_FLG_OBJINTPO), FLG_RT_OBJINTPO, FLG_RT_OBJINTPO},
71 	{ MSG_ORIG(MSG_FLG_SYMINTPO), FLG_RT_SYMINTPO, FLG_RT_SYMINTPO},
72 	{ MSG_ORIG(MSG_FLG_MOVE), FLG_RT_MOVE, FLG_RT_MOVE},
73 	{ MSG_ORIG(MSG_FLG_TMPLIST), FLG_RT_TMPLIST, FLG_RT_TMPLIST},
74 	{ MSG_ORIG(MSG_FLG_REGSYMS), FLG_RT_REGSYMS, FLG_RT_REGSYMS},
75 	{ MSG_ORIG(MSG_FLG_INITCLCT), FLG_RT_INITCLCT, FLG_RT_INITCLCT},
76 	{ MSG_ORIG(MSG_FLG_HANDLE), FLG_RT_HANDLE, FLG_RT_HANDLE},
77 	{ MSG_ORIG(MSG_FLG_RELOCING), FLG_RT_RELOCING, FLG_RT_RELOCING},
78 	{ NULL, 0, 0}
79 };
80 
81 static const mdb_bitmask_t rtflags1_bits[] = {
82 	{ MSG_ORIG(MSG_FL1_COPYTOOK), FL1_RT_COPYTOOK, FL1_RT_COPYTOOK},
83 	{ MSG_ORIG(MSG_FL1_CONFSET), FL1_RT_CONFSET, FL1_RT_CONFSET },
84 	{ MSG_ORIG(MSG_FL1_NODEFLIB), FL1_RT_NODEFLIB, FL1_RT_NODEFLIB },
85 	{ MSG_ORIG(MSG_FL1_ENDFILTE), FL1_RT_ENDFILTE, FL1_RT_ENDFILTE },
86 	{ MSG_ORIG(MSG_FL1_DISPREL), FL1_RT_DISPREL, FL1_RT_DISPREL },
87 	{ MSG_ORIG(MSG_FL1_DTFLAGS), FL1_RT_DTFLAGS, FL1_RT_DTFLAGS},
88 	{ MSG_ORIG(MSG_FL1_LDDSTUB), FL1_RT_LDDSTUB, FL1_RT_LDDSTUB},
89 	{ MSG_ORIG(MSG_FL1_NOINIFIN), FL1_RT_NOINIFIN, FL1_RT_NOINIFIN },
90 	{ MSG_ORIG(MSG_FL1_USED), FL1_RT_USED, FL1_RT_USED },
91 	{ MSG_ORIG(MSG_FL1_SYMBOLIC), FL1_RT_SYMBOLIC, FL1_RT_SYMBOLIC },
92 	{ MSG_ORIG(MSG_FL1_OBJSFLTR), FL1_RT_OBJSFLTR, FL1_RT_OBJSFLTR },
93 	{ MSG_ORIG(MSG_FL1_OBJAFLTR), FL1_RT_OBJAFLTR, FL1_RT_OBJAFLTR },
94 	{ MSG_ORIG(MSG_FL1_SYMSFLTR), FL1_RT_SYMSFLTR, FL1_RT_SYMSFLTR },
95 	{ MSG_ORIG(MSG_FL1_SYMAFLTR), FL1_RT_SYMAFLTR, FL1_RT_SYMAFLTR },
96 	{ MSG_ORIG(MSG_FL1_TLSADD), FL1_RT_TLSADD, FL1_RT_TLSADD },
97 	{ MSG_ORIG(MSG_FL1_TLSSTAT), FL1_RT_TLSSTAT, FL1_RT_TLSSTAT },
98 	{ MSG_ORIG(MSG_FL1_DIRECT), FL1_RT_DIRECT, FL1_RT_DIRECT},
99 	{ MSG_ORIG(MSG_FL1_GLOBAUD), FL1_RT_GLOBAUD, FL1_RT_GLOBAUD},
100 	{ NULL, 0, 0}
101 };
102 
103 static const mdb_bitmask_t rtaflags_bits[] = {
104 	{ MSG_ORIG(MSG_LTFL_AUD_PREINIT), LML_TFLG_AUD_PREINIT,
105 	    LML_TFLG_AUD_PREINIT },
106 	{ MSG_ORIG(MSG_LTFL_AUD_OBJSEARCH), LML_TFLG_AUD_OBJSEARCH,
107 	    LML_TFLG_AUD_OBJSEARCH },
108 	{ MSG_ORIG(MSG_LTFL_AUD_OBJOPEN), LML_TFLG_AUD_OBJOPEN,
109 	    LML_TFLG_AUD_OBJOPEN },
110 	{ MSG_ORIG(MSG_LTFL_AUD_OBJFILTER), LML_TFLG_AUD_OBJFILTER,
111 	    LML_TFLG_AUD_OBJFILTER },
112 	{ MSG_ORIG(MSG_LTFL_AUD_OBJCLOSE), LML_TFLG_AUD_OBJCLOSE,
113 	    LML_TFLG_AUD_OBJCLOSE },
114 	{ MSG_ORIG(MSG_LTFL_AUD_SYMBIND), LML_TFLG_AUD_SYMBIND,
115 	    LML_TFLG_AUD_SYMBIND },
116 	{ MSG_ORIG(MSG_LTFL_AUD_PLTENTER), LML_TFLG_AUD_PLTENTER,
117 	    LML_TFLG_AUD_PLTENTER },
118 	{ MSG_ORIG(MSG_LTFL_AUD_PLTEXIT), LML_TFLG_AUD_PLTEXIT,
119 	    LML_TFLG_AUD_PLTEXIT },
120 	{ MSG_ORIG(MSG_LTFL_AUD_ACTIVITY), LML_TFLG_AUD_ACTIVITY,
121 	    LML_TFLG_AUD_ACTIVITY },
122 	{ NULL, 0, 0}
123 };
124 
125 static const mdb_bitmask_t rtmode_bits[] = {
126 	{ MSG_ORIG(MSG_MODE_LAZY), RTLD_LAZY, RTLD_LAZY },
127 	{ MSG_ORIG(MSG_MODE_NOW), RTLD_NOW, RTLD_NOW },
128 	{ MSG_ORIG(MSG_MODE_NOLOAD), RTLD_NOLOAD, RTLD_NOLOAD },
129 	{ MSG_ORIG(MSG_MODE_GLOBAL), RTLD_GLOBAL, RTLD_GLOBAL },
130 	{ MSG_ORIG(MSG_MODE_PARENT), RTLD_PARENT, RTLD_PARENT },
131 	{ MSG_ORIG(MSG_MODE_GROUP), RTLD_GROUP, RTLD_GROUP },
132 	{ MSG_ORIG(MSG_MODE_WORLD), RTLD_WORLD, RTLD_WORLD },
133 	{ MSG_ORIG(MSG_MODE_NODELETE), RTLD_NODELETE, RTLD_NODELETE },
134 	{ MSG_ORIG(MSG_MODE_FIRST), RTLD_FIRST, RTLD_FIRST },
135 	{ MSG_ORIG(MSG_MODE_CONFGEN), RTLD_CONFGEN, RTLD_CONFGEN },
136 	{ NULL, 0, 0}
137 };
138 
139 static const mdb_bitmask_t bndflags_bits[] = {
140 	{ MSG_ORIG(MSG_BFL_NEEDED), BND_NEEDED, BND_NEEDED },
141 	{ MSG_ORIG(MSG_BFL_REFER), BND_REFER, BND_REFER },
142 	{ MSG_ORIG(MSG_BFL_FILTER), BND_FILTER, BND_FILTER },
143 	{ NULL, 0, 0}
144 };
145 
146 static const mdb_bitmask_t grhflags_bits[] = {
147 	{ MSG_ORIG(MSG_GPH_ZERO), GPH_ZERO, GPH_ZERO },
148 	{ MSG_ORIG(MSG_GPH_LDSO), GPH_LDSO, GPH_LDSO },
149 	{ MSG_ORIG(MSG_GPH_FIRST), GPH_FIRST, GPH_FIRST },
150 	{ MSG_ORIG(MSG_GPH_FILTEE), GPH_FILTEE, GPH_FILTEE },
151 	{ MSG_ORIG(MSG_GPH_INITIAL), GPH_INITIAL, GPH_INITIAL },
152 	{ MSG_ORIG(MSG_GPH_NOPENDLAZY), GPH_NOPENDLAZY, GPH_NOPENDLAZY },
153 	{ NULL, 0, 0}
154 };
155 
156 static const mdb_bitmask_t grdflags_bits[] = {
157 	{ MSG_ORIG(MSG_GPD_DLSYM), GPD_DLSYM, GPD_DLSYM },
158 	{ MSG_ORIG(MSG_GPD_RELOC), GPD_RELOC, GPD_RELOC },
159 	{ MSG_ORIG(MSG_GPD_ADDEPS), GPD_ADDEPS, GPD_ADDEPS },
160 	{ MSG_ORIG(MSG_GPD_PARENT), GPD_PARENT, GPD_PARENT },
161 	{ MSG_ORIG(MSG_GPD_FILTER), GPD_FILTER, GPD_FILTER },
162 	{ MSG_ORIG(MSG_GPD_PROMOTE), GPD_PROMOTE, GPD_PROMOTE },
163 	{ MSG_ORIG(MSG_GPD_REMOVE), GPD_REMOVE, GPD_REMOVE },
164 	{ NULL, 0, 0}
165 };
166 
167 static const mdb_bitmask_t lmc_bits[] = {
168 	{ MSG_ORIG(MSG_LMC_ANALYZING), LMC_FLG_ANALYZING, LMC_FLG_ANALYZING},
169 	{ MSG_ORIG(MSG_LMC_RELOCATING), LMC_FLG_RELOCATING, LMC_FLG_RELOCATING},
170 	{ MSG_ORIG(MSG_LMC_REANALYZE), LMC_FLG_REANALYZE, LMC_FLG_REANALYZE},
171 	{ NULL, 0, 0}
172 };
173 
174 /*
175  * Obtain a string - typically a link-map name.
176  */
177 static char *
178 String(uintptr_t addr, const char *name)
179 {
180 	static char	str[MAXPATHLEN];
181 
182 	if (addr) {
183 		if (mdb_readstr(str, MAXPATHLEN, addr) == -1) {
184 			mdb_warn(MSG_ORIG(MSG_ERR_READ), name, addr);
185 			return (0);
186 		}
187 		return (str);
188 	}
189 	return ((char *)MSG_ORIG(MSG_STR_EMPTY));
190 }
191 
192 /*
193  * Obtain a link-map name.
194  */
195 static char *
196 Rtmap_Name(uintptr_t addr)
197 {
198 	Rt_map	rtmap;
199 
200 	if (addr) {
201 		if (mdb_vread(&rtmap, sizeof (Rt_map), addr) == -1) {
202 			mdb_warn(MSG_ORIG(MSG_ERR_READ),
203 			    MSG_ORIG(MSG_RTMAP_STR), addr);
204 			return (0);
205 		}
206 		return (String((uintptr_t)NAME(&rtmap),
207 		    MSG_ORIG(MSG_STR_NAME)));
208 	}
209 	return ((char *)MSG_ORIG(MSG_STR_EMPTY));
210 }
211 
212 void
213 dcmd_Bind_help(void)
214 {
215 	mdb_printf(MSG_ORIG(MSG_BND_HELP));
216 }
217 
218 static int
219 /* ARGSUSED2 */
220 dcmd_Bind(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv)
221 {
222 	Bnd_desc	bnd;
223 	char		*str;
224 
225 	/*
226 	 * Insure we have a valid address.
227 	 */
228 	if ((flags & DCMD_ADDRSPEC) == 0) {
229 		mdb_warn(MSG_ORIG(MSG_ERR_NAS), MSG_ORIG(MSG_BND_STR));
230 		return (DCMD_USAGE);
231 	}
232 
233 	/*
234 	 * Obtain the binding descriptor.
235 	 */
236 	if (mdb_vread(&bnd, sizeof (Bnd_desc), addr) == -1) {
237 		mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_BND_STR), addr);
238 		return (DCMD_ERR);
239 	}
240 	mdb_printf(MSG_ORIG(MSG_BND_TITLE), addr);
241 
242 	/*
243 	 * Establish the identity of the caller.
244 	 */
245 	if ((str = Rtmap_Name((uintptr_t)bnd.b_caller)) == 0)
246 		return (DCMD_ERR);
247 	mdb_printf(MSG_ORIG(MSG_BND_LINE1), bnd.b_caller, str);
248 
249 	/*
250 	 * Establish the identity of the dependency.
251 	 */
252 	if ((str = Rtmap_Name((uintptr_t)bnd.b_depend)) == 0)
253 		return (DCMD_ERR);
254 	mdb_printf(MSG_ORIG(MSG_BND_LINE2), bnd.b_depend, str);
255 
256 	/*
257 	 * Display any flags.
258 	 */
259 	mdb_printf(MSG_ORIG(MSG_BND_LINE3), bnd.b_flags, bnd.b_flags,
260 	    bndflags_bits);
261 
262 	return (DCMD_OK);
263 }
264 
265 static void
266 dcmd_Depends_help(void)
267 {
268 	mdb_printf(MSG_ORIG(MSG_DEPENDS_HELP));
269 }
270 
271 static int
272 Depends(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv,
273     uint_t flg, const char *msg)
274 {
275 	APlist		apl;
276 	uintptr_t	datap, nitems;
277 	Bnd_desc	*bdp;
278 
279 	/*
280 	 * Obtain the APlist and determine its number of elements and those
281 	 * that are in use.
282 	 */
283 	if (mdb_vread(&apl, sizeof (APlist), addr) == -1) {
284 		mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_STR_APLIST),
285 		    addr);
286 		return (DCMD_ERR);
287 	}
288 
289 	mdb_printf(msg, addr, (size_t)apl.apl_nitems,
290 	    (size_t)apl.apl_arritems);
291 
292 	if (((flg & RTLD_FLG_VERBOSE) == 0) || (apl.apl_nitems == 0))
293 		return (DCMD_OK);
294 
295 	/*
296 	 * Under verbose mode print the name of each dependency.  An APlist can
297 	 * have a variable number of data items, so read each individual entry.
298 	 */
299 	datap = APLIST_OFF_DATA + (uintptr_t)addr;
300 	if (mdb_vread(&bdp, sizeof (Bnd_desc *), datap) == -1) {
301 		mdb_warn(MSG_ORIG(MSG_ERR_READ),
302 		    MSG_ORIG(MSG_BNDDESC_STR), datap);
303 		return (DCMD_ERR);
304 	}
305 
306 	mdb_inc_indent(4);
307 	mdb_printf(MSG_ORIG(MSG_STR_DASHES));
308 
309 	if (dcmd_Bind((uintptr_t)bdp, flags, argc, argv) == DCMD_ERR) {
310 		mdb_dec_indent(4);
311 		return (DCMD_ERR);
312 	}
313 
314 	for (nitems = 1; nitems < apl.apl_nitems; nitems++) {
315 		datap += sizeof (void *);
316 		if (mdb_vread(&bdp, sizeof (Bnd_desc *), datap) == -1) {
317 			mdb_warn(MSG_ORIG(MSG_ERR_READ),
318 			    MSG_ORIG(MSG_BNDDESC_STR), datap);
319 			return (DCMD_ERR);
320 		}
321 
322 		mdb_printf(MSG_ORIG(MSG_STR_DASHES));
323 		if (dcmd_Bind((uintptr_t)bdp, flags, argc, argv) == DCMD_ERR) {
324 			mdb_dec_indent(4);
325 			return (DCMD_ERR);
326 		}
327 	}
328 	mdb_dec_indent(4);
329 	return (DCMD_OK);
330 }
331 
332 static int
333 dcmd_Depends(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv)
334 {
335 	Rt_map		rtmap;
336 	char		*str;
337 	uint_t		flg = 0;
338 
339 	/*
340 	 * Insure we have a valid address, and provide for a -v option.
341 	 */
342 	if ((flags & DCMD_ADDRSPEC) == 0) {
343 		mdb_warn(MSG_ORIG(MSG_ERR_NAS), MSG_ORIG(MSG_DEPENDS_STR));
344 		return (DCMD_USAGE);
345 	}
346 	if (mdb_getopts(argc, argv, 'v', MDB_OPT_SETBITS, RTLD_FLG_VERBOSE,
347 	    &flg, NULL) != argc)
348 		return (DCMD_USAGE);
349 
350 	/*
351 	 * Read the Rt_map contents.
352 	 */
353 	if (mdb_vread(&rtmap, sizeof (Rt_map), addr) == -1) {
354 		mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_RTMAP_STR), addr);
355 		return (DCMD_ERR);
356 	}
357 	if ((str = String((uintptr_t)NAME(&rtmap),
358 	    MSG_ORIG(MSG_STR_NAME))) == 0)
359 		return (DCMD_ERR);
360 
361 	mdb_printf(MSG_ORIG(MSG_DEPENDS_LINE1), str);
362 	mdb_printf(MSG_ORIG(MSG_STR_DASHES));
363 
364 	if (DEPENDS(&rtmap) == NULL)
365 		return (DCMD_OK);
366 
367 	return (Depends((uintptr_t)DEPENDS(&rtmap), flags, argc, argv, flg,
368 	    MSG_ORIG(MSG_DEPENDS_LINE2)));
369 }
370 
371 static void
372 dcmd_Callers_help(void)
373 {
374 	mdb_printf(MSG_ORIG(MSG_CALLERS_HELP));
375 }
376 
377 static int
378 dcmd_Callers(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv)
379 {
380 	Rt_map		rtmap;
381 	char		*str;
382 	uint_t		flg = 0;
383 
384 	/*
385 	 * Insure we have a valid address, and provide for a -v option.
386 	 */
387 	if ((flags & DCMD_ADDRSPEC) == 0) {
388 		mdb_warn(MSG_ORIG(MSG_ERR_NAS), MSG_ORIG(MSG_DEPENDS_STR));
389 		return (DCMD_USAGE);
390 	}
391 	if (mdb_getopts(argc, argv, 'v', MDB_OPT_SETBITS, RTLD_FLG_VERBOSE,
392 	    &flg, NULL) != argc)
393 		return (DCMD_USAGE);
394 
395 	/*
396 	 * Read the Rt_map contents.
397 	 */
398 	if (mdb_vread(&rtmap, sizeof (Rt_map), addr) == -1) {
399 		mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_RTMAP_STR), addr);
400 		return (DCMD_ERR);
401 	}
402 	if ((str = String((uintptr_t)NAME(&rtmap),
403 	    MSG_ORIG(MSG_STR_NAME))) == 0)
404 		return (DCMD_ERR);
405 
406 	mdb_printf(MSG_ORIG(MSG_CALLERS_LINE1), str);
407 	mdb_printf(MSG_ORIG(MSG_STR_DASHES));
408 
409 	if (CALLERS(&rtmap) == NULL)
410 		return (DCMD_OK);
411 
412 	return (Depends((uintptr_t)CALLERS(&rtmap), flags, argc, argv, flg,
413 	    MSG_ORIG(MSG_CALLERS_LINE2)));
414 }
415 
416 void
417 dcmd_rtmap_help(void)
418 {
419 	mdb_printf(MSG_ORIG(MSG_RTMAP_HELP));
420 }
421 
422 static int
423 /* ARGSUSED2 */
424 dcmd_rtmap(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv)
425 {
426 	Rt_map		rtmap;
427 	char		*str;
428 
429 	if ((flags & DCMD_ADDRSPEC) == 0) {
430 		mdb_warn(MSG_ORIG(MSG_ERR_NAS), MSG_ORIG(MSG_RTMAP_STR));
431 		return (DCMD_USAGE);
432 	}
433 
434 	if (mdb_vread(&rtmap, sizeof (Rt_map), addr) == -1) {
435 		mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_RTMAP_STR), addr);
436 		return (DCMD_ERR);
437 	}
438 
439 	mdb_printf(MSG_ORIG(MSG_RTMAP_TITLE), addr);
440 	mdb_printf(MSG_ORIG(MSG_STR_DASHES));
441 
442 	/*
443 	 * Determine the objects name.  NAME() is the name by which the object
444 	 * has been opened, typically from adding a search path to a file name.
445 	 * PATHNAME() is the fully resolve name, which is displayed by the proc
446 	 * tools and debuggers.  If the two names differ, print the PATHNAME().
447 	 */
448 	if ((str = String((uintptr_t)NAME(&rtmap),
449 	    MSG_ORIG(MSG_STR_NAME))) == 0)
450 		return (DCMD_ERR);
451 	mdb_printf(MSG_ORIG(MSG_RTMAP_LINE1), str);
452 	if (NAME(&rtmap) != PATHNAME(&rtmap)) {
453 		if ((str = String((uintptr_t)PATHNAME(&rtmap),
454 		    MSG_ORIG(MSG_STR_PATHNAME))) == 0)
455 			return (DCMD_ERR);
456 		mdb_printf(MSG_ORIG(MSG_RTMAP_LINE2), str);
457 	}
458 
459 	mdb_printf(MSG_ORIG(MSG_RTMAP_LINE3), ADDR(&rtmap), DYN(&rtmap));
460 	mdb_printf(MSG_ORIG(MSG_RTMAP_LINE4), NEXT(&rtmap), PREV(&rtmap));
461 	mdb_printf(MSG_ORIG(MSG_RTMAP_LINE5), rtmap.rt_fct, TLSMODID(&rtmap));
462 	mdb_printf(MSG_ORIG(MSG_RTMAP_LINE6), INIT(&rtmap), FINI(&rtmap));
463 	mdb_printf(MSG_ORIG(MSG_RTMAP_LINE7), GROUPS(&rtmap), HANDLES(&rtmap));
464 	mdb_printf(MSG_ORIG(MSG_RTMAP_LINE8), DEPENDS(&rtmap), CALLERS(&rtmap));
465 
466 	if ((str = String((uintptr_t)REFNAME(&rtmap),
467 	    MSG_ORIG(MSG_STR_REFNAME))) == 0)
468 		return (DCMD_ERR);
469 	mdb_printf(MSG_ORIG(MSG_RTMAP_LINE9), DYNINFO(&rtmap), str);
470 
471 	if ((str = String((uintptr_t)RPATH(&rtmap),
472 	    MSG_ORIG(MSG_STR_RPATH))) == 0)
473 		return (DCMD_ERR);
474 	mdb_printf(MSG_ORIG(MSG_RTMAP_LINE10), RLIST(&rtmap), str);
475 
476 	mdb_printf(MSG_ORIG(MSG_RTMAP_LINE11), LIST(&rtmap), LIST(&rtmap));
477 	mdb_printf(MSG_ORIG(MSG_RTMAP_LINE12), FLAGS(&rtmap));
478 	mdb_printf(MSG_ORIG(MSG_RTMAP_LINE20), FLAGS(&rtmap), rtflags_bits);
479 	mdb_printf(MSG_ORIG(MSG_RTMAP_LINE13), FLAGS1(&rtmap));
480 	mdb_printf(MSG_ORIG(MSG_RTMAP_LINE20), FLAGS1(&rtmap), rtflags1_bits);
481 	if (AFLAGS(&rtmap)) {
482 		mdb_printf(MSG_ORIG(MSG_RTMAP_LINE14), AFLAGS(&rtmap));
483 		mdb_printf(MSG_ORIG(MSG_RTMAP_LINE20), AFLAGS(&rtmap),
484 		    rtaflags_bits);
485 	}
486 	mdb_printf(MSG_ORIG(MSG_RTMAP_LINE15), MODE(&rtmap));
487 	mdb_printf(MSG_ORIG(MSG_RTMAP_LINE20), MODE(&rtmap), rtmode_bits);
488 
489 	return (DCMD_OK);
490 }
491 
492 static int
493 rtmap_format(uintptr_t addr, const void *data, void *private)
494 {
495 	const Rt_map	*lmp = (const Rt_map *)data;
496 	W_desc		*wdp = (W_desc *)private;
497 	char		*str;
498 
499 	if (wdp && (wdp->w_flags & RTLD_FLG_VERBOSE)) {
500 		mdb_printf(MSG_ORIG(MSG_STR_DASHES));
501 		mdb_call_dcmd(MSG_ORIG(MSG_RTMAP_STR), addr, DCMD_ADDRSPEC,
502 		    NULL, NULL);
503 		return (0);
504 	}
505 
506 	if ((str = String((uintptr_t)NAME(lmp),
507 	    MSG_ORIG(MSG_STR_NAME))) == 0)
508 		return (DCMD_ERR);
509 
510 	mdb_printf(MSG_ORIG(MSG_FMT_RT), CNTL(lmp), addr, ADDR(lmp), str);
511 	return (0);
512 }
513 
514 void
515 dcmd_Rtmaps_help(void)
516 {
517 	mdb_printf(MSG_ORIG(MSG_RTMAPS_HELP));
518 }
519 
520 static int
521 dcmd_Rtmaps(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv)
522 {
523 	uint_t		flg = 0;
524 	GElf_Sym	gsym;
525 	APlist		*aplp, apl;
526 	uintptr_t	datap, nitems;
527 	const char	*str;
528 	W_desc		wdesc;
529 
530 	/*
531 	 * '-v' - Verbose output of rtmap
532 	 */
533 	if (mdb_getopts(argc, argv, 'v', MDB_OPT_SETBITS, RTLD_FLG_VERBOSE,
534 	    &flg, NULL) != argc)
535 		return (DCMD_USAGE);
536 
537 	/*
538 	 * If an address was provided use it.
539 	 */
540 	if (flags & DCMD_ADDRSPEC) {
541 		if (((flags & DCMD_LOOPFIRST) || !(flags & DCMD_LOOP)) &&
542 		    !(flg & RTLD_FLG_VERBOSE)) {
543 			mdb_printf(MSG_ORIG(MSG_RTMAPS_TITLE0));
544 			mdb_printf(MSG_ORIG(MSG_STR_DASHES));
545 		}
546 
547 		wdesc.w_flags = flg;
548 		if (mdb_pwalk(MSG_ORIG(MSG_RTMAPS_STR), rtmap_format,
549 		    (void *)&wdesc, addr) == -1)
550 			return (DCMD_ERR);
551 		return (DCMD_OK);
552 	}
553 
554 	/*
555 	 * Otherwise traverse the dynlm_list and display each link-map.
556 	 */
557 	if (mdb_lookup_by_obj(MSG_ORIG(MSG_STR_LDSO1),
558 	    MSG_ORIG(MSG_STR_DYNLMLIST), &gsym) == -1) {
559 		mdb_warn(MSG_ORIG(MSG_ERR_SYMFAILED), MSG_ORIG(MSG_STR_LDSO1),
560 		    MSG_ORIG(MSG_STR_DYNLMLIST));
561 		return (DCMD_ERR);
562 	}
563 	if (mdb_vread(&aplp, sizeof (APlist *),
564 	    (uintptr_t)gsym.st_value) == -1) {
565 		mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_STR_APLIST),
566 		    gsym.st_value);
567 		return (DCMD_ERR);
568 	}
569 
570 	if (aplp == NULL) {
571 		mdb_printf(MSG_ORIG(MSG_LMLIST_TITLE0),
572 		    MSG_ORIG(MSG_STR_DYNLMLIST));
573 		return (DCMD_OK);
574 	}
575 
576 	if (mdb_vread(&apl, sizeof (APlist), (uintptr_t)aplp) == -1) {
577 		mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_STR_APLIST),
578 		    aplp);
579 	}
580 	mdb_printf(MSG_ORIG(MSG_LMLIST_TITLE1), MSG_ORIG(MSG_STR_DYNLMLIST),
581 	    aplp, (size_t)apl.apl_nitems, (size_t)apl.apl_arritems);
582 	mdb_printf(MSG_ORIG(MSG_STR_DASHES));
583 
584 	flags |= (DCMD_LOOP | DCMD_LOOPFIRST);
585 	for (datap = (uintptr_t)aplp + APLIST_OFF_DATA, nitems = 0;
586 	    nitems < apl.apl_nitems; nitems++, datap += sizeof (void *)) {
587 		Lm_list	*lml, lm;
588 
589 		if (mdb_vread(&lml, sizeof (Lm_list *), datap) == -1) {
590 			mdb_warn(MSG_ORIG(MSG_ERR_READ),
591 			    MSG_ORIG(MSG_LMLIST_STR), datap);
592 			return (DCMD_ERR);
593 		}
594 		if (mdb_vread(&lm, sizeof (Lm_list), (uintptr_t)lml) == -1) {
595 			mdb_warn(MSG_ORIG(MSG_ERR_READ),
596 			    MSG_ORIG(MSG_LMLIST_STR), lml);
597 			return (DCMD_ERR);
598 		}
599 
600 		mdb_inc_indent(2);
601 		if (lm.lm_flags & LML_FLG_BASELM)
602 			str = MSG_ORIG(MSG_LMLIST_BASE);
603 		else if (lm.lm_flags & LML_FLG_RTLDLM)
604 			str = MSG_ORIG(MSG_LMLIST_LDSO);
605 		else
606 			str = MSG_ORIG(MSG_LMLIST_NEWLM);
607 
608 		if ((flags & DCMD_LOOP) && ((flags & DCMD_LOOPFIRST) == 0))
609 			mdb_printf(MSG_ORIG(MSG_STR_DASHES));
610 
611 		mdb_printf(MSG_ORIG(MSG_LMLIST_TITLE2), datap, str);
612 		mdb_printf(MSG_ORIG(MSG_STR_DASHES));
613 
614 		mdb_inc_indent(2);
615 
616 		if (((flags & DCMD_LOOPFIRST) || !(flags & DCMD_LOOP)) &&
617 		    !(flg & RTLD_FLG_VERBOSE)) {
618 			mdb_printf(MSG_ORIG(MSG_RTMAPS_TITLE0));
619 			mdb_printf(MSG_ORIG(MSG_STR_DASHES));
620 		}
621 
622 		wdesc.w_flags = flg;
623 		if (mdb_pwalk(MSG_ORIG(MSG_RTMAPS_STR), rtmap_format,
624 		    (void *)&wdesc, (uintptr_t)lm.lm_head) == -1) {
625 			mdb_dec_indent(4);
626 			return (DCMD_ERR);
627 		}
628 		mdb_dec_indent(4);
629 		flags &= ~DCMD_LOOPFIRST;
630 	}
631 	return (DCMD_OK);
632 }
633 
634 void
635 dcmd_Setenv_help(void)
636 {
637 	mdb_printf(MSG_ORIG(MSG_SETENV_HELP));
638 }
639 
640 /*
641  * As of s10, mdb provides its own setenv command.  This command allows the
642  * environment of the process being controlled to be changed at any time.
643  * Prior to this, ld.so.1 provided it's own, more primitive implementation.
644  * This allowed for changing mdb's environment only, which if it was changed
645  * before the application ws executed, would be copied to the applications
646  * environment.  Thus, we could start mdb, set an LD_ variable within its
647  * environment (which it's own ld.so.1 had already finished processing), and
648  * have this setting be inherited by the application.
649  */
650 static int
651 /* ARGSUSED */
652 dcmd_Setenv(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv)
653 {
654 	char	*str;
655 
656 	if (mdb_call_dcmd(MSG_ORIG(MSG_STR_SETENV), addr, flags, argc,
657 	    argv) == 0)
658 		return (DCMD_OK);
659 
660 	if (((flags & DCMD_ADDRSPEC) != 0) || (argc == 0) || (argc > 1) ||
661 	    (argv->a_type != MDB_TYPE_STRING))
662 		return (DCMD_USAGE);
663 
664 	str = mdb_alloc((strlen(argv->a_un.a_str) + 1), UM_NOSLEEP);
665 	if (str == NULL)
666 		return (DCMD_ERR);
667 
668 	(void) strcpy(str, argv->a_un.a_str);
669 	(void) putenv(str);
670 	return (DCMD_OK);
671 }
672 
673 /*
674  * Walk Rt_map lists
675  */
676 static int
677 walk_rtmap_init(mdb_walk_state_t *wsp)
678 {
679 	if (wsp->walk_addr == NULL) {
680 		mdb_warn(MSG_ORIG(MSG_ERR_NAS), MSG_ORIG(MSG_RTMAP_STR));
681 		return (WALK_ERR);
682 	}
683 	return (WALK_NEXT);
684 }
685 
686 static int
687 walk_rtmap_step(mdb_walk_state_t *wsp)
688 {
689 	int	status;
690 	Rt_map	lmp;
691 
692 	if (wsp->walk_addr == NULL)
693 		return (WALK_DONE);
694 	if (mdb_vread(&lmp, sizeof (Rt_map), wsp->walk_addr) == -1) {
695 		mdb_warn(MSG_ORIG(MSG_ERR_READ),
696 		    MSG_ORIG(MSG_RTMAP_STR), wsp->walk_addr);
697 		return (WALK_DONE);
698 	}
699 
700 	status = wsp->walk_callback(wsp->walk_addr, &lmp, wsp->walk_cbdata);
701 	wsp->walk_addr = (uintptr_t)(NEXT(&lmp));
702 	return (status);
703 }
704 
705 static const mdb_bitmask_t lml_flags_bit[] = {
706 	{ MSG_ORIG(MSG_LFL_BASELM), LML_FLG_BASELM, LML_FLG_BASELM },
707 	{ MSG_ORIG(MSG_LFL_RTLDLM), LML_FLG_RTLDLM, LML_FLG_RTLDLM },
708 	{ MSG_ORIG(MSG_LFL_NOAUDIT), LML_FLG_NOAUDIT, LML_FLG_NOAUDIT },
709 	{ MSG_ORIG(MSG_LFL_PLTREL), LML_FLG_PLTREL, LML_FLG_PLTREL },
710 	{ MSG_ORIG(MSG_LFL_HOLDLOCK), LML_FLG_HOLDLOCK, LML_FLG_HOLDLOCK },
711 	{ MSG_ORIG(MSG_LFL_ENVIRON), LML_FLG_ENVIRON, LML_FLG_ENVIRON },
712 	{ MSG_ORIG(MSG_LFL_INTRPOSE), LML_FLG_INTRPOSE, LML_FLG_INTRPOSE },
713 	{ MSG_ORIG(MSG_LFL_LOCAUDIT), LML_FLG_LOCAUDIT, LML_FLG_LOCAUDIT },
714 	{ MSG_ORIG(MSG_LFL_LOADAVAIL), LML_FLG_LOADAVAIL, LML_FLG_LOADAVAIL },
715 	{ MSG_ORIG(MSG_LFL_IGNRELERR), LML_FLG_IGNRELERR, LML_FLG_IGNRELERR },
716 	{ MSG_ORIG(MSG_LFL_DBNOTIF), LML_FLG_DBNOTIF, LML_FLG_DBNOTIF },
717 	{ MSG_ORIG(MSG_LFL_STARTREL), LML_FLG_STARTREL, LML_FLG_STARTREL },
718 	{ MSG_ORIG(MSG_LFL_ATEXIT), LML_FLG_ATEXIT, LML_FLG_ATEXIT },
719 	{ MSG_ORIG(MSG_LFL_OBJADDED), LML_FLG_OBJADDED, LML_FLG_OBJADDED },
720 	{ MSG_ORIG(MSG_LFL_OBJDELETED), LML_FLG_OBJDELETED,
721 	    LML_FLG_OBJDELETED },
722 	{ MSG_ORIG(MSG_LFL_OBJREEVAL), LML_FLG_OBJREEVAL, LML_FLG_OBJREEVAL },
723 	{ MSG_ORIG(MSG_LFL_NOPENDGLBLAZY), LML_FLG_NOPENDGLBLAZY,
724 	    LML_FLG_NOPENDGLBLAZY },
725 	{ MSG_ORIG(MSG_LFL_INTRPOSETSORT), LML_FLG_INTRPOSETSORT,
726 	    LML_FLG_INTRPOSETSORT },
727 	{ MSG_ORIG(MSG_LFL_AUDITNOTIFY), LML_FLG_AUDITNOTIFY,
728 	    LML_FLG_AUDITNOTIFY },
729 	{ MSG_ORIG(MSG_LFL_GROUPSEXIST), LML_FLG_GROUPSEXIST,
730 	    LML_FLG_GROUPSEXIST },
731 
732 	{ MSG_ORIG(MSG_LFL_TRC_LDDSTUB), LML_FLG_TRC_LDDSTUB,
733 	    LML_FLG_TRC_LDDSTUB },
734 	{ MSG_ORIG(MSG_LFL_TRC_ENABLE), LML_FLG_TRC_ENABLE,
735 	    LML_FLG_TRC_ENABLE },
736 	{ MSG_ORIG(MSG_LFL_TRC_WARN), LML_FLG_TRC_WARN, LML_FLG_TRC_WARN },
737 	{ MSG_ORIG(MSG_LFL_TRC_VERBOSE), LML_FLG_TRC_VERBOSE,
738 	    LML_FLG_TRC_VERBOSE },
739 	{ MSG_ORIG(MSG_LFL_TRC_SEARCH), LML_FLG_TRC_SEARCH,
740 	    LML_FLG_TRC_SEARCH },
741 	{ MSG_ORIG(MSG_LFL_TRC_UNREF), LML_FLG_TRC_UNREF, LML_FLG_TRC_UNREF },
742 	{ MSG_ORIG(MSG_LFL_TRC_UNUSED), LML_FLG_TRC_UNUSED,
743 	    LML_FLG_TRC_UNUSED },
744 	{ MSG_ORIG(MSG_LFL_TRC_INIT), LML_FLG_TRC_INIT, LML_FLG_TRC_INIT },
745 	{ MSG_ORIG(MSG_LFL_TRC_NOUNRESWEAK), LML_FLG_TRC_NOUNRESWEAK,
746 	    LML_FLG_TRC_NOUNRESWEAK },
747 	{ MSG_ORIG(MSG_LFL_TRC_NOPAREXT), LML_FLG_TRC_NOPAREXT,
748 	    LML_FLG_TRC_NOPAREXT },
749 	{ NULL, 0, 0}
750 };
751 
752 static const mdb_bitmask_t lml_tflags_bit[] = {
753 	{ MSG_ORIG(MSG_LTFL_NOLAZYLD), LML_TFLG_NOLAZYLD, LML_TFLG_NOLAZYLD },
754 	{ MSG_ORIG(MSG_LTFL_NODIRECT), LML_TFLG_NODIRECT, LML_TFLG_NODIRECT },
755 	{ MSG_ORIG(MSG_LTFL_LOADFLTR), LML_TFLG_LOADFLTR, LML_TFLG_LOADFLTR },
756 
757 	{ MSG_ORIG(MSG_LTFL_AUD_PREINIT), LML_TFLG_AUD_PREINIT,
758 	    LML_TFLG_AUD_PREINIT },
759 	{ MSG_ORIG(MSG_LTFL_AUD_OBJSEARCH), LML_TFLG_AUD_OBJSEARCH,
760 	    LML_TFLG_AUD_OBJSEARCH },
761 	{ MSG_ORIG(MSG_LTFL_AUD_OBJOPEN), LML_TFLG_AUD_OBJOPEN,
762 	    LML_TFLG_AUD_OBJOPEN },
763 	{ MSG_ORIG(MSG_LTFL_AUD_OBJFILTER), LML_TFLG_AUD_OBJFILTER,
764 	    LML_TFLG_AUD_OBJFILTER },
765 	{ MSG_ORIG(MSG_LTFL_AUD_OBJCLOSE), LML_TFLG_AUD_OBJCLOSE,
766 	    LML_TFLG_AUD_OBJCLOSE },
767 	{ MSG_ORIG(MSG_LTFL_AUD_SYMBIND), LML_TFLG_AUD_SYMBIND,
768 	    LML_TFLG_AUD_SYMBIND },
769 	{ MSG_ORIG(MSG_LTFL_AUD_PLTENTER), LML_TFLG_AUD_PLTENTER,
770 	    LML_TFLG_AUD_PLTENTER },
771 	{ MSG_ORIG(MSG_LTFL_AUD_PLTEXIT), LML_TFLG_AUD_PLTEXIT,
772 	    LML_TFLG_AUD_PLTEXIT },
773 	{ MSG_ORIG(MSG_LTFL_AUD_ACTIVITY), LML_TFLG_AUD_ACTIVITY,
774 	    LML_TFLG_AUD_ACTIVITY },
775 	{ NULL, 0, 0}
776 };
777 
778 void
779 dcmd_Lm_list_help(void)
780 {
781 	mdb_printf(MSG_ORIG(MSG_LMLIST_HELP));
782 }
783 
784 static int
785 /* ARGSUSED1 */
786 _dcmd_Lm_list(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv)
787 {
788 	Lm_list		lml;
789 	const char	*str;
790 	uint_t		flg = 0;
791 
792 	if (mdb_getopts(argc, argv, 'v', MDB_OPT_SETBITS, RTLD_FLG_VERBOSE,
793 	    &flg, NULL) != argc)
794 		return (DCMD_USAGE);
795 
796 	if (mdb_vread(&lml, sizeof (lml), addr) == -1) {
797 		mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_LMLIST_STR),
798 		    addr);
799 		return (DCMD_ERR);
800 	}
801 
802 	if (lml.lm_flags & LML_FLG_BASELM)
803 		str = MSG_ORIG(MSG_LMLIST_BASE);
804 	else if (lml.lm_flags & LML_FLG_RTLDLM)
805 		str = MSG_ORIG(MSG_LMLIST_LDSO);
806 	else
807 		str = MSG_ORIG(MSG_LMLIST_NEWLM);
808 
809 	if ((flags & DCMD_LOOP) && ((flags & DCMD_LOOPFIRST) == 0))
810 		mdb_printf(MSG_ORIG(MSG_STR_DASHES));
811 
812 	mdb_printf(MSG_ORIG(MSG_LMLIST_TITLE2), addr, str);
813 	mdb_printf(MSG_ORIG(MSG_STR_DASHES));
814 
815 	if (lml.lm_lists) {
816 		Alist		al;
817 		Lm_cntl		lmc;
818 		uintptr_t	datap;
819 
820 		addr = (uintptr_t)lml.lm_lists;
821 		if (mdb_vread(&al, sizeof (Alist), addr) == -1) {
822 			mdb_warn(MSG_ORIG(MSG_ERR_READ),
823 			    MSG_ORIG(MSG_STR_ALIST), addr);
824 			return (DCMD_ERR);
825 		}
826 
827 		/*
828 		 * Determine whether the Alist has been populated.  Note, the
829 		 * implementation first reserves an alist entry, and initializes
830 		 * this element when the first link-map is processed.  Thus,
831 		 * there's a window when nitems is updated, but before the next
832 		 * element has been initialized.
833 		 */
834 		if (al.al_nitems && (flg & RTLD_FLG_VERBOSE)) {
835 			datap = ALIST_OFF_DATA + (uintptr_t)addr;
836 
837 			if (mdb_vread(&lmc, sizeof (Lm_cntl),
838 			    datap) == -1) {
839 				mdb_warn(MSG_ORIG(MSG_ERR_READ),
840 				    MSG_ORIG(MSG_LMLIST_STR), datap);
841 				return (DCMD_ERR);
842 			}
843 		}
844 
845 		mdb_printf(MSG_ORIG(MSG_LMLIST_LINE0), addr,
846 		    (size_t)al.al_nitems, (size_t)al.al_arritems);
847 		mdb_inc_indent(2);
848 		mdb_printf(MSG_ORIG(MSG_STR_DASHES));
849 
850 		if (al.al_nitems && (flg & RTLD_FLG_VERBOSE)) {
851 			uintptr_t	nitems;
852 
853 			mdb_inc_indent(2);
854 			mdb_printf(MSG_ORIG(MSG_LMC_LINE1), datap);
855 			mdb_printf(MSG_ORIG(MSG_LMC_LINE2), lmc.lc_head,
856 			    lmc.lc_tail);
857 			mdb_printf(MSG_ORIG(MSG_LMC_LINE3), lmc.lc_flags,
858 			    lmc.lc_now);
859 			mdb_printf(MSG_ORIG(MSG_LMC_LINE4), lmc.lc_flags,
860 			    lmc_bits);
861 			mdb_printf(MSG_ORIG(MSG_STR_DASHES));
862 			mdb_printf(MSG_ORIG(MSG_RTMAPS_TITLE0));
863 			mdb_printf(MSG_ORIG(MSG_STR_DASHES));
864 
865 			if (lmc.lc_head) {
866 				if (mdb_pwalk(MSG_ORIG(MSG_RTMAPS_STR),
867 				    rtmap_format, (void *)0,
868 				    (uintptr_t)lmc.lc_head) == -1) {
869 					mdb_dec_indent(4);
870 					return (DCMD_ERR);
871 				}
872 			} else
873 				mdb_printf(MSG_ORIG(MSG_FMT_RT), 0, 0, 0,
874 				    MSG_ORIG(MSG_STR_EMPTY));
875 
876 			mdb_printf(MSG_ORIG(MSG_STR_DASHES));
877 
878 			for (nitems = 1; nitems < al.al_nitems; nitems++) {
879 				datap += al.al_size;
880 				if (mdb_vread(&lmc, sizeof (Lm_cntl),
881 				    datap) == -1) {
882 					mdb_warn(MSG_ORIG(MSG_ERR_READ),
883 					    MSG_ORIG(MSG_LMLIST_STR), datap);
884 					mdb_dec_indent(4);
885 					return (DCMD_ERR);
886 				}
887 
888 				mdb_printf(MSG_ORIG(MSG_STR_DASHES));
889 				mdb_printf(MSG_ORIG(MSG_LMC_LINE1), datap);
890 				mdb_printf(MSG_ORIG(MSG_LMC_LINE2),
891 				    lmc.lc_head, lmc.lc_tail);
892 				mdb_printf(MSG_ORIG(MSG_LMC_LINE3),
893 				    lmc.lc_flags, lmc.lc_now);
894 				mdb_printf(MSG_ORIG(MSG_LMC_LINE4),
895 				    lmc.lc_flags, lmc_bits);
896 				mdb_printf(MSG_ORIG(MSG_STR_DASHES));
897 				mdb_printf(MSG_ORIG(MSG_RTMAPS_TITLE0));
898 				mdb_printf(MSG_ORIG(MSG_STR_DASHES));
899 
900 				if (lmc.lc_head) {
901 					if (mdb_pwalk(MSG_ORIG(MSG_RTMAPS_STR),
902 					    rtmap_format, (void *)0,
903 					    (uintptr_t)lmc.lc_head) == -1) {
904 						mdb_dec_indent(4);
905 						return (DCMD_ERR);
906 					}
907 				} else
908 					mdb_printf(MSG_ORIG(MSG_FMT_RT), 0, 0,
909 					    0, MSG_ORIG(MSG_STR_EMPTY));
910 
911 				mdb_printf(MSG_ORIG(MSG_STR_DASHES));
912 			}
913 			mdb_dec_indent(2);
914 		}
915 		mdb_dec_indent(2);
916 	}
917 
918 	mdb_printf(MSG_ORIG(MSG_LMLIST_LINE1), lml.lm_head, lml.lm_tail);
919 	mdb_printf(MSG_ORIG(MSG_LMLIST_LINE2), lml.lm_alp, lml.lm_rti);
920 	mdb_printf(MSG_ORIG(MSG_LMLIST_LINE3), lml.lm_handle, lml.lm_obj,
921 	    lml.lm_init, lml.lm_lazy);
922 
923 	mdb_printf(MSG_ORIG(MSG_LMLIST_LINE4), lml.lm_flags);
924 	if (lml.lm_flags)
925 		mdb_printf(MSG_ORIG(MSG_LMLIST_LINE6), lml.lm_flags,
926 		    lml_flags_bit);
927 
928 	mdb_printf(MSG_ORIG(MSG_LMLIST_LINE5), lml.lm_tflags);
929 	if (lml.lm_tflags)
930 		mdb_printf(MSG_ORIG(MSG_LMLIST_LINE6), lml.lm_tflags,
931 		    lml_tflags_bit);
932 
933 	return (DCMD_OK);
934 }
935 
936 static int
937 /* ARGSUSED2 */
938 dcmd_Lm_list(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv)
939 {
940 	GElf_Sym	gsym;
941 	APlist		*aplp, apl;
942 	uintptr_t	datap, nitems;
943 
944 	/*
945 	 * If an address was provided us it.
946 	 */
947 	if (flags & DCMD_ADDRSPEC)
948 		return (_dcmd_Lm_list(addr, flags, argc, argv));
949 
950 	/*
951 	 * Otherwise traverse the dynlm_list and display each link-map list.
952 	 */
953 	if (mdb_lookup_by_obj(MSG_ORIG(MSG_STR_LDSO1),
954 	    MSG_ORIG(MSG_STR_DYNLMLIST), &gsym) == -1) {
955 		mdb_warn(MSG_ORIG(MSG_ERR_SYMFAILED), MSG_ORIG(MSG_STR_LDSO1),
956 		    MSG_ORIG(MSG_STR_DYNLMLIST));
957 		return (DCMD_ERR);
958 	}
959 	if (mdb_vread(&aplp, sizeof (APlist *),
960 	    (uintptr_t)gsym.st_value) == -1) {
961 		mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_STR_APLIST),
962 		    gsym.st_value);
963 		return (DCMD_ERR);
964 	}
965 	if (aplp == NULL) {
966 		mdb_printf(MSG_ORIG(MSG_LMLIST_TITLE0),
967 		    MSG_ORIG(MSG_STR_DYNLMLIST));
968 		return (DCMD_OK);
969 	}
970 
971 	if (mdb_vread(&apl, sizeof (APlist), (uintptr_t)aplp) == -1) {
972 		mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_STR_APLIST),
973 		    aplp);
974 		return (DCMD_ERR);
975 	}
976 
977 	mdb_printf(MSG_ORIG(MSG_LMLIST_TITLE1), MSG_ORIG(MSG_STR_DYNLMLIST),
978 	    aplp, (size_t)apl.apl_nitems, (size_t)apl.apl_arritems);
979 	mdb_printf(MSG_ORIG(MSG_STR_DASHES));
980 
981 	flags |= (DCMD_LOOP | DCMD_LOOPFIRST);
982 	for (datap = (uintptr_t)aplp + APLIST_OFF_DATA, nitems = 0;
983 	    nitems < apl.apl_nitems; nitems++, datap += sizeof (void *)) {
984 		Lm_list	*lml;
985 
986 		if (mdb_vread(&lml, sizeof (Lm_list *), datap) == -1) {
987 			mdb_warn(MSG_ORIG(MSG_ERR_READ),
988 			    MSG_ORIG(MSG_LMLIST_STR), datap);
989 			return (DCMD_ERR);
990 		}
991 
992 		mdb_inc_indent(2);
993 		if (_dcmd_Lm_list((uintptr_t)lml, flags, argc,
994 		    argv) == DCMD_ERR) {
995 			mdb_dec_indent(2);
996 			return (DCMD_ERR);
997 		}
998 		mdb_dec_indent(2);
999 		flags &= ~DCMD_LOOPFIRST;
1000 	}
1001 	return (DCMD_OK);
1002 }
1003 
1004 void
1005 dcmd_GrpDesc_help(void)
1006 {
1007 	mdb_printf(MSG_ORIG(MSG_GRPDESC_HELP));
1008 }
1009 
1010 static int
1011 /* ARGSUSED2 */
1012 dcmd_GrpDesc(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv)
1013 {
1014 	Grp_desc	gd;
1015 	char		*str;
1016 
1017 	/*
1018 	 * Insure we have a valid address.
1019 	 */
1020 	if ((flags & DCMD_ADDRSPEC) == 0) {
1021 		mdb_warn(MSG_ORIG(MSG_ERR_NAS), MSG_ORIG(MSG_GRPDESC_STR));
1022 		return (DCMD_USAGE);
1023 	}
1024 
1025 	mdb_printf(MSG_ORIG(MSG_GRPDESC_LINE1), addr);
1026 	if (mdb_vread(&gd, sizeof (Grp_desc), addr) == -1) {
1027 		mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_GRPDESC_STR),
1028 		    addr);
1029 		return (DCMD_ERR);
1030 	}
1031 
1032 	if ((str = Rtmap_Name((uintptr_t)gd.gd_depend)) == 0)
1033 		return (DCMD_ERR);
1034 
1035 	mdb_printf(MSG_ORIG(MSG_GRPDESC_LINE2), gd.gd_depend, str);
1036 	mdb_printf(MSG_ORIG(MSG_GRPDESC_LINE3), gd.gd_flags, gd.gd_flags,
1037 	    grdflags_bits);
1038 
1039 	return (DCMD_OK);
1040 }
1041 
1042 void
1043 dcmd_GrpHdl_help(void)
1044 {
1045 	mdb_printf(MSG_ORIG(MSG_GRPHDL_HELP));
1046 }
1047 
1048 static int
1049 /* ARGSUSED2 */
1050 dcmd_GrpHdl(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv)
1051 {
1052 	Grp_hdl		gh;
1053 	Alist		al;
1054 	uintptr_t	datap, listidx;
1055 	char		*str;
1056 	uint_t		flg = 0;
1057 
1058 	/*
1059 	 * Insure we have a valid address, and provide for a -v option.
1060 	 */
1061 	if ((flags & DCMD_ADDRSPEC) == 0) {
1062 		mdb_warn(MSG_ORIG(MSG_ERR_NAS), MSG_ORIG(MSG_GRPHDL_STR));
1063 		return (DCMD_USAGE);
1064 	}
1065 	if (mdb_getopts(argc, argv, 'v', MDB_OPT_SETBITS, RTLD_FLG_VERBOSE,
1066 	    &flg, NULL) != argc)
1067 		return (DCMD_USAGE);
1068 
1069 	mdb_printf(MSG_ORIG(MSG_GRPHDL_LINE1), addr);
1070 	mdb_printf(MSG_ORIG(MSG_STR_DASHES));
1071 
1072 	if (mdb_vread(&gh, sizeof (Grp_hdl), addr) == -1) {
1073 		mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_GRPHDL_STR),
1074 		    addr);
1075 		return (DCMD_ERR);
1076 	}
1077 
1078 	/*
1079 	 * Determine the handles owner.  Note that an orphaned handle may no
1080 	 * longer contain its originating owner.
1081 	 */
1082 	if (gh.gh_ownlmp) {
1083 		if ((str = Rtmap_Name((uintptr_t)gh.gh_ownlmp)) == 0)
1084 			return (DCMD_ERR);
1085 	} else
1086 		str = (char *)MSG_ORIG(MSG_STR_ORPHANED);
1087 
1088 	mdb_printf(MSG_ORIG(MSG_GRPHDL_LINE2), str);
1089 	mdb_printf(MSG_ORIG(MSG_GRPHDL_LINE3), gh.gh_flags, gh.gh_flags,
1090 	    grhflags_bits);
1091 
1092 	if (gh.gh_depends == 0) {
1093 		mdb_printf(MSG_ORIG(MSG_GRPHDL_LINE4), gh.gh_refcnt);
1094 		return (DCMD_OK);
1095 	}
1096 
1097 	addr = (uintptr_t)gh.gh_depends;
1098 	if (mdb_vread(&al, sizeof (Alist), addr) == -1) {
1099 		mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_STR_ALIST), addr);
1100 		return (DCMD_ERR);
1101 	}
1102 
1103 	mdb_printf(MSG_ORIG(MSG_GRPHDL_LINE5), gh.gh_refcnt, addr,
1104 	    (size_t)al.al_nitems, (size_t)al.al_arritems);
1105 
1106 	if (((flg & RTLD_FLG_VERBOSE) == 0) || (al.al_nitems == 0))
1107 		return (DCMD_OK);
1108 
1109 	mdb_inc_indent(4);
1110 	mdb_printf(MSG_ORIG(MSG_STR_DASHES));
1111 
1112 	/*
1113 	 * Under verbose mode print the name of each dependency.  An Alist can
1114 	 * have a variable number of data items, so read each individual entry.
1115 	 */
1116 	datap = ALIST_OFF_DATA + (uintptr_t)addr;
1117 	if (dcmd_GrpDesc(datap, flags, argc, argv) == DCMD_ERR) {
1118 		mdb_dec_indent(4);
1119 		return (DCMD_ERR);
1120 	}
1121 
1122 	for (listidx = 1; listidx < al.al_nitems; listidx++) {
1123 		datap += al.al_size;
1124 		mdb_printf(MSG_ORIG(MSG_STR_DASHES));
1125 		if (dcmd_GrpDesc(datap, flags, argc, argv) == DCMD_ERR) {
1126 			mdb_dec_indent(4);
1127 			return (DCMD_ERR);
1128 		}
1129 	}
1130 
1131 	mdb_dec_indent(4);
1132 	return (DCMD_OK);
1133 }
1134 
1135 static void
1136 dcmd_Handles_help(void)
1137 {
1138 	mdb_printf(MSG_ORIG(MSG_HANDLES_HELP));
1139 }
1140 
1141 static int
1142 dcmd_Handles(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv)
1143 {
1144 	Rt_map		rtmap;
1145 	char		*str;
1146 	uint_t		flg = 0;
1147 	APlist		apl;
1148 	uintptr_t	datap, nitems;
1149 	Grp_hdl		*ghp;
1150 
1151 	/*
1152 	 * Insure we have a valid address, and provide for a -v option.
1153 	 */
1154 	if ((flags & DCMD_ADDRSPEC) == 0) {
1155 		mdb_warn(MSG_ORIG(MSG_ERR_NAS), MSG_ORIG(MSG_HANDLES_STR));
1156 		return (DCMD_USAGE);
1157 	}
1158 	if (mdb_getopts(argc, argv, 'v', MDB_OPT_SETBITS, RTLD_FLG_VERBOSE,
1159 	    &flg, NULL) != argc)
1160 		return (DCMD_USAGE);
1161 
1162 	/*
1163 	 * Read the Rt_map contents.
1164 	 */
1165 	if (mdb_vread(&rtmap, sizeof (Rt_map), addr) == -1) {
1166 		mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_RTMAP_STR), addr);
1167 		return (DCMD_ERR);
1168 	}
1169 	if ((str = String((uintptr_t)NAME(&rtmap),
1170 	    MSG_ORIG(MSG_STR_NAME))) == 0)
1171 		return (DCMD_ERR);
1172 
1173 	mdb_printf(MSG_ORIG(MSG_HANDLES_LINE1), str);
1174 	mdb_printf(MSG_ORIG(MSG_STR_DASHES));
1175 
1176 	if (HANDLES(&rtmap) == 0)
1177 		return (DCMD_OK);
1178 
1179 	addr = (uintptr_t)HANDLES(&rtmap);
1180 	if (mdb_vread(&apl, sizeof (APlist), addr) == -1) {
1181 		mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_STR_APLIST),
1182 		    addr);
1183 		return (DCMD_ERR);
1184 	}
1185 
1186 	mdb_printf(MSG_ORIG(MSG_HANDLES_LINE2), addr, (size_t)apl.apl_nitems,
1187 	    (size_t)apl.apl_arritems);
1188 
1189 	if (((flg & RTLD_FLG_VERBOSE) == 0) || (apl.apl_nitems == 0))
1190 		return (DCMD_OK);
1191 
1192 	/*
1193 	 * Under verbose mode print the name of each dependency.  An APlist can
1194 	 * have a variable number of data items, so read each individual entry.
1195 	 */
1196 	datap = addr + APLIST_OFF_DATA;
1197 	if (mdb_vread(&ghp, sizeof (Grp_hdl *), datap) == -1) {
1198 		mdb_warn(MSG_ORIG(MSG_ERR_READ),
1199 		    MSG_ORIG(MSG_GRPHDL_STR), datap);
1200 		return (DCMD_ERR);
1201 	}
1202 
1203 	mdb_inc_indent(4);
1204 	mdb_printf(MSG_ORIG(MSG_STR_DASHES));
1205 
1206 	if (dcmd_GrpHdl((uintptr_t)ghp, flags, argc, argv) == DCMD_ERR) {
1207 		mdb_dec_indent(4);
1208 		return (DCMD_ERR);
1209 	}
1210 
1211 	nitems = 1;
1212 	for (nitems = 1; nitems < apl.apl_nitems; nitems++) {
1213 		datap += sizeof (void *);
1214 		if (mdb_vread(&ghp, sizeof (Grp_hdl *), datap) == -1) {
1215 			mdb_warn(MSG_ORIG(MSG_ERR_READ),
1216 			    MSG_ORIG(MSG_GRPHDL_STR), datap);
1217 			return (DCMD_ERR);
1218 		}
1219 
1220 		mdb_printf(MSG_ORIG(MSG_STR_DASHES));
1221 		if (dcmd_GrpHdl((uintptr_t)ghp, flags, argc,
1222 		    argv) == DCMD_ERR) {
1223 			mdb_dec_indent(4);
1224 			return (DCMD_ERR);
1225 		}
1226 	}
1227 	mdb_dec_indent(4);
1228 	return (DCMD_OK);
1229 }
1230 
1231 static void
1232 dcmd_Groups_help(void)
1233 {
1234 	mdb_printf(MSG_ORIG(MSG_GROUPS_HELP));
1235 }
1236 
1237 
1238 static int
1239 dcmd_Groups(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv)
1240 {
1241 	Rt_map		rtmap;
1242 	char		*str;
1243 	APlist		apl;
1244 	uint_t		flg = 0;
1245 	uintptr_t	datap, nitems;
1246 	Grp_hdl		*ghp;
1247 
1248 	/*
1249 	 * Insure we have a valid address, and provide for a -v option.
1250 	 */
1251 	if ((flags & DCMD_ADDRSPEC) == 0) {
1252 		mdb_warn(MSG_ORIG(MSG_ERR_NAS), MSG_ORIG(MSG_GROUPS_STR));
1253 		return (DCMD_USAGE);
1254 	}
1255 	if (mdb_getopts(argc, argv, 'v', MDB_OPT_SETBITS, RTLD_FLG_VERBOSE,
1256 	    &flg, NULL) != argc)
1257 		return (DCMD_USAGE);
1258 
1259 	/*
1260 	 * Read the Rt_map contents.
1261 	 */
1262 	if (mdb_vread(&rtmap, sizeof (Rt_map), addr) == -1) {
1263 		mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_RTMAP_STR), addr);
1264 		return (DCMD_ERR);
1265 	}
1266 	if ((str = String((uintptr_t)NAME(&rtmap),
1267 	    MSG_ORIG(MSG_STR_NAME))) == 0)
1268 		return (DCMD_ERR);
1269 
1270 	mdb_printf(MSG_ORIG(MSG_GROUPS_LINE1), str);
1271 	mdb_printf(MSG_ORIG(MSG_STR_DASHES));
1272 
1273 	if (GROUPS(&rtmap) == 0)
1274 		return (DCMD_OK);
1275 
1276 	addr = (uintptr_t)GROUPS(&rtmap);
1277 	if (mdb_vread(&apl, sizeof (APlist), addr) == -1) {
1278 		mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_STR_APLIST),
1279 		    addr);
1280 		return (DCMD_ERR);
1281 	}
1282 
1283 	mdb_printf(MSG_ORIG(MSG_GROUPS_LINE2), addr, (size_t)apl.apl_nitems,
1284 	    (size_t)apl.apl_arritems);
1285 
1286 	if (((flg & RTLD_FLG_VERBOSE) == 0) || (apl.apl_nitems == 0))
1287 		return (DCMD_OK);
1288 
1289 	/*
1290 	 * Under verbose mode print the name of each dependency.  An APlist can
1291 	 * have a variable number of data items, so read each individual entry.
1292 	 */
1293 	datap = addr + APLIST_OFF_DATA;
1294 	if (mdb_vread(&ghp, sizeof (Grp_hdl *), datap) == -1) {
1295 		mdb_warn(MSG_ORIG(MSG_ERR_READ),
1296 		    MSG_ORIG(MSG_GRPHDL_STR), datap);
1297 		return (DCMD_ERR);
1298 	}
1299 
1300 	mdb_inc_indent(4);
1301 	mdb_printf(MSG_ORIG(MSG_STR_DASHES));
1302 
1303 	if (dcmd_GrpHdl((uintptr_t)ghp, flags, argc, argv) == DCMD_ERR) {
1304 		mdb_dec_indent(4);
1305 		return (DCMD_ERR);
1306 	}
1307 
1308 	for (nitems = 1; nitems < apl.apl_nitems; nitems++) {
1309 		datap += sizeof (void *);
1310 		if (mdb_vread(&ghp, sizeof (Grp_hdl *), datap) == -1) {
1311 			mdb_warn(MSG_ORIG(MSG_ERR_READ),
1312 			    MSG_ORIG(MSG_GRPHDL_STR), datap);
1313 			return (DCMD_ERR);
1314 		}
1315 
1316 		mdb_printf(MSG_ORIG(MSG_STR_DASHES));
1317 		if (dcmd_GrpHdl((uintptr_t)ghp, flags, argc,
1318 		    argv) == DCMD_ERR) {
1319 			mdb_dec_indent(4);
1320 			return (DCMD_ERR);
1321 		}
1322 	}
1323 	mdb_dec_indent(4);
1324 	return (DCMD_OK);
1325 }
1326 static void
1327 dcmd_ElfDyn_help(void)
1328 {
1329 	mdb_printf(MSG_ORIG(MSG_ELFDYN_HELP));
1330 }
1331 
1332 static int
1333 /* ARGSUSED2 */
1334 dcmd_ElfDyn(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv)
1335 {
1336 	Dyn		dyn;
1337 	const char	*dynstr;
1338 	Conv_inv_buf_t	inv_buf;
1339 
1340 	if ((flags & DCMD_ADDRSPEC) == 0)
1341 		return (DCMD_USAGE);
1342 	if (mdb_vread(&dyn, sizeof (dyn), addr) == -1) {
1343 		mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_ELFDYN_STR),
1344 		    addr);
1345 		return (DCMD_ERR);
1346 	}
1347 
1348 	mdb_printf(MSG_ORIG(MSG_ELFDYN_TITLE), addr);
1349 	dynstr = conv_dyn_tag(dyn.d_tag, M_MACH, 0, &inv_buf);
1350 	mdb_printf(MSG_ORIG(MSG_ELFDYN_LINE1), addr, dynstr, dyn.d_un.d_ptr);
1351 
1352 	mdb_set_dot(addr + sizeof (Dyn));
1353 
1354 	return (DCMD_OK);
1355 }
1356 
1357 static void
1358 dcmd_ElfEhdr_help(void)
1359 {
1360 	mdb_printf(MSG_ORIG(MSG_EHDR_HELP));
1361 }
1362 
1363 static int
1364 /* ARGSUSED2 */
1365 dcmd_ElfEhdr(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv)
1366 {
1367 	Ehdr			ehdr;
1368 	Byte			*byte;
1369 	const char		*flgs;
1370 	Conv_inv_buf_t		inv_buf1, inv_buf2;
1371 	Conv_ehdr_flags_buf_t	ehdr_flags_buf;
1372 
1373 
1374 	if ((flags & DCMD_ADDRSPEC) == 0)
1375 		return (DCMD_USAGE);
1376 
1377 	if (mdb_vread(&ehdr, sizeof (ehdr), addr) == -1) {
1378 		mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_EHDR_STR),
1379 		    addr);
1380 		return (DCMD_ERR);
1381 	}
1382 
1383 	mdb_printf(MSG_ORIG(MSG_EHDR_TITLE), addr);
1384 	byte = &ehdr.e_ident[0];
1385 	mdb_printf(MSG_ORIG(MSG_EHDR_LINE1), byte[EI_MAG0],
1386 	    (byte[EI_MAG1] ? byte[EI_MAG1] : '0'),
1387 	    (byte[EI_MAG2] ? byte[EI_MAG2] : '0'),
1388 	    (byte[EI_MAG3] ? byte[EI_MAG3] : '0'));
1389 	mdb_printf(MSG_ORIG(MSG_EHDR_LINE2),
1390 	    conv_ehdr_class(ehdr.e_ident[EI_CLASS], 0, &inv_buf1),
1391 	    conv_ehdr_data(ehdr.e_ident[EI_DATA], 0, &inv_buf2));
1392 
1393 	mdb_printf(MSG_ORIG(MSG_EHDR_LINE3),
1394 	    conv_ehdr_mach(ehdr.e_machine, 0, &inv_buf1),
1395 	    conv_ehdr_vers(ehdr.e_version, 0, &inv_buf2));
1396 	mdb_printf(MSG_ORIG(MSG_EHDR_LINE4),
1397 	    conv_ehdr_type(ehdr.e_type, 0, &inv_buf1));
1398 
1399 	/*
1400 	 * Line up the flags differently depending on whether we
1401 	 * received a numeric (e.g. "0x200") or text representation
1402 	 * (e.g. "[ EF_SPARC_SUN_US1 ]").
1403 	 */
1404 	flgs = conv_ehdr_flags(ehdr.e_machine, ehdr.e_flags,
1405 	    0, &ehdr_flags_buf);
1406 	if (flgs[0] == '[')
1407 		mdb_printf(MSG_ORIG(MSG_EHDR_LINE5), flgs);
1408 	else
1409 		mdb_printf(MSG_ORIG(MSG_EHDR_LINE6), flgs);
1410 
1411 	mdb_printf(MSG_ORIG(MSG_EHDR_LINE7), ehdr.e_entry, ehdr.e_ehsize,
1412 	    ehdr.e_shstrndx);
1413 	mdb_printf(MSG_ORIG(MSG_EHDR_LINE8), ehdr.e_shoff, ehdr.e_shentsize,
1414 	    ehdr.e_shnum);
1415 	mdb_printf(MSG_ORIG(MSG_EHDR_LINE9), ehdr.e_phoff, ehdr.e_phentsize,
1416 	    ehdr.e_phnum);
1417 
1418 	mdb_set_dot(addr + sizeof (Ehdr));
1419 
1420 	return (DCMD_OK);
1421 }
1422 
1423 static void
1424 dcmd_ElfPhdr_help(void)
1425 {
1426 	mdb_printf(MSG_ORIG(MSG_EPHDR_HELP));
1427 }
1428 
1429 static int
1430 /* ARGSUSED2 */
1431 dcmd_ElfPhdr(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv)
1432 {
1433 	Phdr			phdr;
1434 	Conv_inv_buf_t		inv_buf;
1435 	Conv_phdr_flags_buf_t	phdr_flags_buf;
1436 
1437 	if ((flags & DCMD_ADDRSPEC) == 0)
1438 		return (DCMD_USAGE);
1439 
1440 	if (mdb_vread(&phdr, sizeof (phdr), addr) == -1) {
1441 		mdb_warn(MSG_ORIG(MSG_ERR_READ), MSG_ORIG(MSG_EPHDR_STR),
1442 		    addr);
1443 		return (DCMD_ERR);
1444 	}
1445 
1446 	mdb_printf(MSG_ORIG(MSG_EPHDR_TITLE), addr);
1447 	mdb_printf(MSG_ORIG(MSG_EPHDR_LINE1), phdr.p_vaddr,
1448 	    conv_phdr_flags(phdr.p_flags, 0, &phdr_flags_buf));
1449 	mdb_printf(MSG_ORIG(MSG_EPHDR_LINE2), phdr.p_paddr,
1450 	    conv_phdr_type(M_MACH, phdr.p_type, 0, &inv_buf));
1451 	mdb_printf(MSG_ORIG(MSG_EPHDR_LINE3), phdr.p_filesz, phdr.p_memsz);
1452 	mdb_printf(MSG_ORIG(MSG_EPHDR_LINE4), phdr.p_offset, phdr.p_align);
1453 
1454 	mdb_set_dot(addr + sizeof (Phdr));
1455 
1456 	return (DCMD_OK);
1457 }
1458 
1459 
1460 static const mdb_dcmd_t dcmds[] = {
1461 	{ MSG_ORIG(MSG_BND_STR), MSG_ORIG(MSG_USG_ADDREQ_V),
1462 		MSG_ORIG(MSG_BND_DCD),
1463 		dcmd_Bind, dcmd_Bind_help},
1464 	{ MSG_ORIG(MSG_DEPENDS_STR), MSG_ORIG(MSG_USG_ADDREQ_V),
1465 		MSG_ORIG(MSG_DEPENDS_DCD),
1466 		dcmd_Depends, dcmd_Depends_help},
1467 	{ MSG_ORIG(MSG_CALLERS_STR), MSG_ORIG(MSG_USG_ADDREQ_V),
1468 		MSG_ORIG(MSG_CALLERS_DCD),
1469 		dcmd_Callers, dcmd_Callers_help},
1470 	{ MSG_ORIG(MSG_GRPHDL_STR), MSG_ORIG(MSG_USG_ADDREQ_V),
1471 		MSG_ORIG(MSG_GRPHDL_DCD),
1472 		dcmd_GrpHdl, dcmd_GrpHdl_help},
1473 	{ MSG_ORIG(MSG_GRPDESC_STR), MSG_ORIG(MSG_USG_ADDREQ_V),
1474 		MSG_ORIG(MSG_GRPDESC_DCD),
1475 		dcmd_GrpDesc, dcmd_GrpDesc_help},
1476 	{ MSG_ORIG(MSG_HANDLES_STR), MSG_ORIG(MSG_USG_ADDREQ_V),
1477 		MSG_ORIG(MSG_HANDLES_DCD),
1478 		dcmd_Handles, dcmd_Handles_help},
1479 	{ MSG_ORIG(MSG_GROUPS_STR), MSG_ORIG(MSG_USG_ADDREQ_V),
1480 		MSG_ORIG(MSG_GROUPS_DCD),
1481 		dcmd_Groups, dcmd_Groups_help},
1482 	{ MSG_ORIG(MSG_ELFDYN_STR), MSG_ORIG(MSG_USG_ADDREQ),
1483 		MSG_ORIG(MSG_ELFDYN_DCD),
1484 		dcmd_ElfDyn, dcmd_ElfDyn_help},
1485 	{ MSG_ORIG(MSG_EHDR_STR), MSG_ORIG(MSG_USG_ADDREQ),
1486 		MSG_ORIG(MSG_EHDR_DCD),
1487 		dcmd_ElfEhdr, dcmd_ElfEhdr_help},
1488 	{ MSG_ORIG(MSG_EPHDR_STR), MSG_ORIG(MSG_USG_ADDREQ),
1489 		MSG_ORIG(MSG_EPHDR_DCD),
1490 		dcmd_ElfPhdr, dcmd_ElfPhdr_help},
1491 	{ MSG_ORIG(MSG_LMLIST_STR), MSG_ORIG(MSG_USG_ADDREQ_V),
1492 		MSG_ORIG(MSG_LMLIST_DCD),
1493 		dcmd_Lm_list, dcmd_Lm_list_help},
1494 	{ MSG_ORIG(MSG_RTMAPS_STR), MSG_ORIG(MSG_USG_ADDOPT_V),
1495 		MSG_ORIG(MSG_RTMAPS_DCD),
1496 		dcmd_Rtmaps, dcmd_Rtmaps_help},
1497 	{ MSG_ORIG(MSG_RTMAP_STR), MSG_ORIG(MSG_USG_ADDREQ),
1498 		MSG_ORIG(MSG_RTMAP_DCD),
1499 		dcmd_rtmap, dcmd_rtmap_help},
1500 	{ MSG_ORIG(MSG_SETENV_STR), MSG_ORIG(MSG_USG_SETENV),
1501 		MSG_ORIG(MSG_SETENV_DCD),
1502 		dcmd_Setenv, dcmd_Setenv_help},
1503 	{ NULL }
1504 };
1505 
1506 static const mdb_walker_t walkers[] = {
1507 	{ MSG_ORIG(MSG_RTMAPS_STR), MSG_ORIG(MSG_WWD_RTMAP),
1508 		walk_rtmap_init, walk_rtmap_step, NULL, NULL },
1509 	{ NULL }
1510 };
1511 
1512 static const mdb_modinfo_t modinfo = {
1513 	MDB_API_VERSION, dcmds, walkers
1514 };
1515 
1516 const	mdb_modinfo_t *
1517 _mdb_init(void)
1518 {
1519 	return (&modinfo);
1520 }
1521