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 <sys/types.h>
28 #include <string.h>
29 #include <debug.h>
30 #include <conv.h>
31 #include "_debug.h"
32 #include "msg.h"
33
34 void
Dbg_bind_plt_summary(Lm_list * lml,Half mach,Word pltcnt21d,Word pltcnt24d,Word pltcntu32,Word pltcntu44,Word pltcntfull,Word pltcntfar)35 Dbg_bind_plt_summary(Lm_list *lml, Half mach, Word pltcnt21d, Word pltcnt24d,
36 Word pltcntu32, Word pltcntu44, Word pltcntfull, Word pltcntfar)
37 {
38 Word plttotal = pltcnt21d + pltcnt24d + pltcntu32 +
39 pltcntu44 + pltcntfull + pltcntfar;
40
41 if (DBG_NOTCLASS(DBG_C_BINDINGS))
42 return;
43
44 switch (mach) {
45 case EM_SPARC:
46 dbg_print(lml, MSG_INTL(MSG_BND_PSUM_SPARC), EC_WORD(pltcnt21d),
47 EC_WORD(pltcnt24d), EC_WORD(pltcntfull), EC_WORD(plttotal));
48 break;
49 case EM_SPARCV9:
50 dbg_print(lml, MSG_INTL(MSG_BND_PSUM_SPARCV9),
51 EC_WORD(pltcnt21d), EC_WORD(pltcnt24d), EC_WORD(pltcntu32),
52 EC_WORD(pltcntu44), EC_WORD(pltcntfull), EC_WORD(pltcntfar),
53 EC_WORD(plttotal));
54 break;
55 default:
56 dbg_print(lml, MSG_INTL(MSG_BND_PSUM_DEFAULT),
57 EC_WORD(plttotal));
58 break;
59 };
60 }
61
62 static const char *pltbindtypes[PLT_T_NUM] = {
63 MSG_ORIG(MSG_STR_EMPTY), /* PLT_T_NONE */
64 MSG_ORIG(MSG_PLT_21D), /* PLT_T_21D */
65 MSG_ORIG(MSG_PLT_24D), /* PLT_T_24D */
66 MSG_ORIG(MSG_PLT_U32), /* PLT_T_U32 */
67 MSG_ORIG(MSG_PLT_U44), /* PLT_T_U44 */
68 MSG_ORIG(MSG_PLT_FULL), /* PLT_T_FULL */
69 MSG_ORIG(MSG_PLT_FAR) /* PLT_T_FAR */
70 };
71
72 #define BINFOSZ MSG_BINFO_START_SIZE + \
73 MSG_BINFO_DIRECT_SIZE + MSG_BINFO_SEP_SIZE + \
74 MSG_BINFO_INTERPOSE_SIZE + MSG_BINFO_SEP_SIZE + \
75 MSG_BINFO_COPYREF_SIZE + MSG_BINFO_SEP_SIZE + \
76 MSG_BINFO_FILTEE_SIZE + MSG_BINFO_SEP_SIZE + \
77 MSG_BINFO_PLTADDR_SIZE + \
78 CONV_INV_BUFSIZE + MSG_BINFO_END_SIZE
79
80
81 void
Dbg_bind_global(Rt_map * flmp,Addr fabs,Off foff,Xword pltndx,Pltbindtype pbtype,Rt_map * tlmp,Addr tabs,Off toff,const char * sym,uint_t binfo)82 Dbg_bind_global(Rt_map *flmp, Addr fabs, Off foff, Xword pltndx,
83 Pltbindtype pbtype, Rt_map *tlmp, Addr tabs, Off toff,
84 const char *sym, uint_t binfo)
85 {
86 /*
87 * MSG_ORIG(MSG_BINFO_DIRECT)
88 * MSG_ORIG(MSG_BINFO_INTERPOSE)
89 * MSG_ORIG(MSG_BINFO_COPYREF)
90 * MSG_ORIG(MSG_BINFO_FILTEE)
91 * MSG_ORIG(MSG_BINFO_PLTADDR)
92 */
93 static char binfostr[BINFOSZ];
94 static Val_desc vda[] = {
95 { DBG_BINFO_DIRECT, MSG_BINFO_DIRECT },
96 { DBG_BINFO_INTERPOSE, MSG_BINFO_INTERPOSE },
97 { DBG_BINFO_COPYREF, MSG_BINFO_COPYREF },
98 { DBG_BINFO_FILTEE, MSG_BINFO_FILTEE },
99 { DBG_BINFO_PLTADDR, MSG_BINFO_PLTADDR },
100 { 0, 0 }
101 };
102 static CONV_EXPN_FIELD_ARG conv_arg = { binfostr, sizeof (binfostr),
103 NULL, 0, 0, MSG_ORIG(MSG_BINFO_START),
104 MSG_ORIG(MSG_BINFO_SEP), MSG_ORIG(MSG_BINFO_END) };
105
106 const char *ffile = NAME(flmp);
107 const char *tfile = NAME(tlmp);
108 Lm_list *lml = LIST(flmp);
109
110 if (DBG_NOTCLASS(DBG_C_BINDINGS))
111 return;
112
113 if (DBG_NOTDETAIL()) {
114 dbg_print(lml, MSG_INTL(MSG_BND_BASIC), ffile, tfile,
115 Dbg_demangle_name(sym));
116 return;
117 }
118
119 /*
120 * Determine if this binding has any associated information, such as
121 * interposition, direct binding, copy-relocations, etc.
122 */
123 binfo &= ~DBG_BINFO_FOUND;
124 binfo &= DBG_BINFO_MSK;
125 if (binfo) {
126 conv_arg.oflags = conv_arg.rflags = binfo;
127 (void) conv_expn_field(&conv_arg, vda, 0);
128 } else {
129 binfostr[0] = '\0';
130 }
131
132 if (pltndx != (Xword)-1) {
133 const char *pltstring;
134
135 if (pbtype < PLT_T_NUM)
136 pltstring = pltbindtypes[pbtype];
137 else
138 pltstring = pltbindtypes[PLT_T_NONE];
139
140 /*
141 * Called from a plt offset.
142 */
143 dbg_print(lml, MSG_INTL(MSG_BND_PLT), ffile, EC_ADDR(fabs),
144 EC_OFF(foff), EC_XWORD(pltndx), pltstring, tfile,
145 EC_ADDR(tabs), EC_OFF(toff), Dbg_demangle_name(sym),
146 binfostr);
147
148 } else if ((fabs == 0) && (foff == 0)) {
149 /*
150 * Called from a dlsym(). We're not performing a relocation,
151 * but are handing the address of the symbol back to the user.
152 */
153 dbg_print(lml, MSG_INTL(MSG_BND_DLSYM), ffile, tfile,
154 EC_ADDR(tabs), EC_OFF(toff), Dbg_demangle_name(sym),
155 binfostr);
156 } else {
157 /*
158 * Standard relocation.
159 */
160 dbg_print(lml, MSG_INTL(MSG_BND_DEFAULT), ffile, EC_ADDR(fabs),
161 EC_OFF(foff), tfile, EC_ADDR(tabs), EC_OFF(toff),
162 Dbg_demangle_name(sym), binfostr);
163 }
164 }
165
166 void
Dbg_bind_reject(Rt_map * flmp,Rt_map * tlmp,const char * sym,int why)167 Dbg_bind_reject(Rt_map *flmp, Rt_map *tlmp, const char *sym, int why)
168 {
169 static Msg reason[DBG_BNDREJ_NUM + 1] = {
170 MSG_BNDREJ_DIRECT, /* MSG_INTL(MSG_BNDREJ_DIRECT) */
171 MSG_BNDREJ_GROUP, /* MSG_INTL(MSG_BNDREJ_GROUP) */
172 MSG_BNDREJ_SINGLE /* MSG_INTL(MSG_BNDREJ_SINGLE) */
173 };
174
175 if (DBG_NOTCLASS(DBG_C_BINDINGS))
176 return;
177
178 dbg_print(LIST(flmp), MSG_INTL(MSG_BND_REJECT), NAME(flmp), NAME(tlmp),
179 sym, MSG_INTL(reason[why]));
180 }
181
182 void
Dbg_bind_weak(Rt_map * flmp,Addr fabs,Addr frel,const char * sym)183 Dbg_bind_weak(Rt_map *flmp, Addr fabs, Addr frel, const char *sym)
184 {
185 Lm_list *lml = LIST(flmp);
186 const char *ffile = NAME(flmp);
187
188 if (DBG_NOTCLASS(DBG_C_BINDINGS))
189 return;
190
191 if (DBG_NOTDETAIL())
192 dbg_print(lml, MSG_INTL(MSG_BND_WEAK_1), ffile,
193 Dbg_demangle_name(sym));
194 else
195 dbg_print(lml, MSG_INTL(MSG_BND_WEAK_2), ffile, EC_ADDR(fabs),
196 EC_ADDR(frel), Dbg_demangle_name(sym));
197 }
198
199 #if defined(_ELF64)
200
201 void
Dbg_bind_pltpad_to(Rt_map * lmp,Addr pltpad,const char * dfile,const char * sname)202 Dbg_bind_pltpad_to(Rt_map *lmp, Addr pltpad, const char *dfile,
203 const char *sname)
204 {
205 if (DBG_NOTCLASS(DBG_C_RELOC))
206 return;
207 if (DBG_NOTDETAIL())
208 return;
209
210 dbg_print(LIST(lmp), MSG_INTL(MSG_BND_PLTPAD_TO), EC_ADDR(pltpad),
211 NAME(lmp), dfile, sname);
212 }
213
214 void
Dbg_bind_pltpad_from(Rt_map * lmp,Addr pltpad,const char * sname)215 Dbg_bind_pltpad_from(Rt_map *lmp, Addr pltpad, const char *sname)
216 {
217 if (DBG_NOTCLASS(DBG_C_RELOC))
218 return;
219 if (DBG_NOTDETAIL())
220 return;
221
222 dbg_print(LIST(lmp), MSG_INTL(MSG_BND_PLTPAD_FROM), EC_ADDR(pltpad),
223 NAME(lmp), sname);
224 }
225
226 #endif
227