xref: /onnv-gate/usr/src/uts/common/krtld/kobj_lm.c (revision 0:68f95e015346)
1*0Sstevel@tonic-gate /*
2*0Sstevel@tonic-gate  * CDDL HEADER START
3*0Sstevel@tonic-gate  *
4*0Sstevel@tonic-gate  * The contents of this file are subject to the terms of the
5*0Sstevel@tonic-gate  * Common Development and Distribution License, Version 1.0 only
6*0Sstevel@tonic-gate  * (the "License").  You may not use this file except in compliance
7*0Sstevel@tonic-gate  * with the License.
8*0Sstevel@tonic-gate  *
9*0Sstevel@tonic-gate  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10*0Sstevel@tonic-gate  * or http://www.opensolaris.org/os/licensing.
11*0Sstevel@tonic-gate  * See the License for the specific language governing permissions
12*0Sstevel@tonic-gate  * and limitations under the License.
13*0Sstevel@tonic-gate  *
14*0Sstevel@tonic-gate  * When distributing Covered Code, include this CDDL HEADER in each
15*0Sstevel@tonic-gate  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16*0Sstevel@tonic-gate  * If applicable, add the following below this CDDL HEADER, with the
17*0Sstevel@tonic-gate  * fields enclosed by brackets "[]" replaced with your own identifying
18*0Sstevel@tonic-gate  * information: Portions Copyright [yyyy] [name of copyright owner]
19*0Sstevel@tonic-gate  *
20*0Sstevel@tonic-gate  * CDDL HEADER END
21*0Sstevel@tonic-gate  */
22*0Sstevel@tonic-gate /*
23*0Sstevel@tonic-gate  * Copyright 2004 Sun Microsystems, Inc.  All rights reserved.
24*0Sstevel@tonic-gate  * Use is subject to license terms.
25*0Sstevel@tonic-gate  */
26*0Sstevel@tonic-gate 
27*0Sstevel@tonic-gate #pragma ident	"%Z%%M%	%I%	%E% SMI"
28*0Sstevel@tonic-gate 
29*0Sstevel@tonic-gate /*
30*0Sstevel@tonic-gate  * krtld link maps
31*0Sstevel@tonic-gate  */
32*0Sstevel@tonic-gate 
33*0Sstevel@tonic-gate #include <sys/kobj.h>
34*0Sstevel@tonic-gate #include <sys/kobj_impl.h>
35*0Sstevel@tonic-gate #include <sys/modctl.h>
36*0Sstevel@tonic-gate #include <sys/types.h>
37*0Sstevel@tonic-gate 
38*0Sstevel@tonic-gate #pragma weak primaries = kobj_linkmaps	/* backwards compatibility */
39*0Sstevel@tonic-gate struct modctl_list *kobj_linkmaps[] = {
40*0Sstevel@tonic-gate 	NULL,
41*0Sstevel@tonic-gate 	NULL,
42*0Sstevel@tonic-gate 	NULL
43*0Sstevel@tonic-gate };
44*0Sstevel@tonic-gate 
45*0Sstevel@tonic-gate #define	KOBJ_LM_NENT	(sizeof (kobj_linkmaps) / sizeof (struct modctl *) - 1)
46*0Sstevel@tonic-gate 
47*0Sstevel@tonic-gate struct modctl_list *
kobj_lm_lookup(int lmid)48*0Sstevel@tonic-gate kobj_lm_lookup(int lmid)
49*0Sstevel@tonic-gate {
50*0Sstevel@tonic-gate 	if (lmid < 0 || lmid >= KOBJ_LM_NENT)
51*0Sstevel@tonic-gate 		return (NULL);
52*0Sstevel@tonic-gate 
53*0Sstevel@tonic-gate 	return (kobj_linkmaps[lmid]);
54*0Sstevel@tonic-gate }
55*0Sstevel@tonic-gate 
56*0Sstevel@tonic-gate void
kobj_lm_append(int lmid,struct modctl * modp)57*0Sstevel@tonic-gate kobj_lm_append(int lmid, struct modctl *modp)
58*0Sstevel@tonic-gate {
59*0Sstevel@tonic-gate 	struct modctl_list **lpp, *lp;
60*0Sstevel@tonic-gate 
61*0Sstevel@tonic-gate 	if (lmid < 0 || lmid >= KOBJ_LM_NENT)
62*0Sstevel@tonic-gate 		return;
63*0Sstevel@tonic-gate 
64*0Sstevel@tonic-gate 	lpp = &kobj_linkmaps[lmid];
65*0Sstevel@tonic-gate 
66*0Sstevel@tonic-gate 	lp = kobj_zalloc(sizeof (struct modctl_list), KM_WAIT);
67*0Sstevel@tonic-gate 	lp->modl_modp = modp;
68*0Sstevel@tonic-gate 
69*0Sstevel@tonic-gate 	if (*lpp == NULL) {
70*0Sstevel@tonic-gate 		*lpp = lp;
71*0Sstevel@tonic-gate 	} else {
72*0Sstevel@tonic-gate 		struct modctl_list *last;
73*0Sstevel@tonic-gate 
74*0Sstevel@tonic-gate 		for (last = *lpp; last->modl_next != NULL;
75*0Sstevel@tonic-gate 		    last = last->modl_next)
76*0Sstevel@tonic-gate 			/* */;
77*0Sstevel@tonic-gate 
78*0Sstevel@tonic-gate 		last->modl_next = lp;
79*0Sstevel@tonic-gate 	}
80*0Sstevel@tonic-gate }
81*0Sstevel@tonic-gate 
82*0Sstevel@tonic-gate void
kobj_lm_dump(int lmid)83*0Sstevel@tonic-gate kobj_lm_dump(int lmid)
84*0Sstevel@tonic-gate {
85*0Sstevel@tonic-gate 	struct modctl_list *lp;
86*0Sstevel@tonic-gate 
87*0Sstevel@tonic-gate 	for (lp = kobj_lm_lookup(lmid); lp; lp = lp->modl_next) {
88*0Sstevel@tonic-gate 		struct module *mp = lp->modl_modp->mod_mp;
89*0Sstevel@tonic-gate 
90*0Sstevel@tonic-gate 		_kobj_printf(ops, "module %s: ", mp->filename);
91*0Sstevel@tonic-gate 		_kobj_printf(ops, "text at [0x%p, ", mp->text);
92*0Sstevel@tonic-gate 		_kobj_printf(ops, "0x%lx] ", (uintptr_t)mp->text +
93*0Sstevel@tonic-gate 		    mp->text_size - 1);
94*0Sstevel@tonic-gate 		_kobj_printf(ops, "data at 0x%p\n", mp->data);
95*0Sstevel@tonic-gate 	}
96*0Sstevel@tonic-gate }
97