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