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 (c) 1995, 2010, Oracle and/or its affiliates. All rights reserved.
24 */
25
26 #include <dlfcn.h>
27 #include <stdio.h>
28 #include "_debug.h"
29 #include "msg.h"
30 #include "libld.h"
31
32 void
Dbg_audit_lib(Rt_map * clmp,const char * lib,int type)33 Dbg_audit_lib(Rt_map *clmp, const char *lib, int type)
34 {
35 Lm_list *clml = LIST(clmp);
36 const char *str;
37
38 if (DBG_NOTCLASS(DBG_C_AUDITING))
39 return;
40
41 Dbg_util_nl(clml, DBG_NL_STD);
42 switch (type) {
43 case DBG_AUD_PRELOAD:
44 str = MSG_ORIG(MSG_AUD_PRELOAD);
45 break;
46 case DBG_AUD_GLOBAL:
47 str = MSG_ORIG(MSG_AUD_GLOBAL);
48 break;
49 case DBG_AUD_LOCAL:
50 /* FALLTHROUGH */
51 default:
52 str = MSG_ORIG(MSG_STR_EMPTY);
53 }
54
55 dbg_print(clml, MSG_INTL(MSG_AUD_LIB), lib, NAME(clmp), str);
56 }
57
58 void
Dbg_audit_interface(Lm_list * lml,const char * lib,const char * interface)59 Dbg_audit_interface(Lm_list *lml, const char *lib, const char *interface)
60 {
61 if (DBG_NOTCLASS(DBG_C_AUDITING))
62 return;
63
64 dbg_print(lml, MSG_INTL(MSG_AUD_INTERFACE), lib, interface);
65 }
66
67 void
Dbg_audit_version(Lm_list * lml,const char * lib,uint_t overs,uint_t nvers)68 Dbg_audit_version(Lm_list *lml, const char *lib, uint_t overs, uint_t nvers)
69 {
70 if (DBG_NOTCLASS(DBG_C_AUDITING))
71 return;
72
73 dbg_print(lml, MSG_INTL(MSG_AUD_VERSION), lib, overs, nvers);
74 }
75
76 void
Dbg_audit_activity(Lm_list * lml,const char * lib,const char * obj,uint_t flags)77 Dbg_audit_activity(Lm_list *lml, const char *lib, const char *obj, uint_t flags)
78 {
79 Conv_inv_buf_t inv_buf;
80
81 if (DBG_NOTCLASS(DBG_C_AUDITING))
82 return;
83
84 Dbg_util_nl(lml, DBG_NL_STD);
85 dbg_print(lml, MSG_INTL(MSG_AUD_ACTIVITY), lib, obj,
86 conv_la_activity(flags, CONV_FMT_ALT_DEFAULT, &inv_buf));
87 }
88
89 void
Dbg_audit_preinit(Lm_list * lml,const char * lib,const char * obj)90 Dbg_audit_preinit(Lm_list *lml, const char *lib, const char *obj)
91 {
92 if (DBG_NOTCLASS(DBG_C_AUDITING))
93 return;
94
95 Dbg_util_nl(lml, DBG_NL_STD);
96 dbg_print(lml, MSG_INTL(MSG_AUD_PREINIT), lib, obj);
97 }
98
99 void
Dbg_audit_objsearch(Lm_list * lml,int call,const char * lib,const char * oobj,uint_t flags,const char * nobj)100 Dbg_audit_objsearch(Lm_list *lml, int call, const char *lib,
101 const char *oobj, uint_t flags, const char *nobj)
102 {
103 Conv_la_search_buf_t la_search_buf;
104
105 if (DBG_NOTCLASS(DBG_C_AUDITING))
106 return;
107
108 if (call == DBG_AUD_CALL) {
109 Dbg_util_nl(lml, DBG_NL_STD);
110 dbg_print(lml, MSG_INTL(MSG_AUD_OBJSEARCH), lib, oobj,
111 conv_la_search(flags, &la_search_buf));
112 } else {
113 if (nobj)
114 dbg_print(lml, MSG_INTL(MSG_AUD_OBJSEARCH_R), lib,
115 oobj, nobj);
116 else
117 dbg_print(lml, MSG_INTL(MSG_AUD_OBJSEARCH_S), lib,
118 oobj);
119 }
120 }
121
122 void
Dbg_audit_objfilter(Lm_list * lml,int call,const char * lib,const char * filter,const char * filtee,const char * ref)123 Dbg_audit_objfilter(Lm_list *lml, int call, const char *lib,
124 const char *filter, const char *filtee, const char *ref)
125 {
126 if (DBG_NOTCLASS(DBG_C_AUDITING))
127 return;
128
129 if (call == DBG_AUD_CALL) {
130 Dbg_util_nl(lml, DBG_NL_STD);
131 dbg_print(lml, MSG_INTL(MSG_AUD_OBJFILTER), lib, filter,
132 filtee, ref);
133 } else
134 dbg_print(lml, MSG_INTL(MSG_AUD_OBJFILTER_R), lib, filter);
135 }
136
137 void
Dbg_audit_objopen(Lm_list * lml,int call,const char * lib,const char * obj,uint_t flags,Boolean ignore)138 Dbg_audit_objopen(Lm_list *lml, int call, const char *lib, const char *obj,
139 uint_t flags, Boolean ignore)
140 {
141 Conv_la_bind_buf_t la_bind_buf;
142
143 if (DBG_NOTCLASS(DBG_C_AUDITING))
144 return;
145
146 if (call == DBG_AUD_CALL) {
147 Dbg_util_nl(lml, DBG_NL_STD);
148 dbg_print(lml, MSG_INTL(MSG_AUD_OBJOPEN), lib, obj);
149 } else {
150 if (ignore)
151 dbg_print(lml, MSG_INTL(MSG_AUD_OBJOPEN_RI), lib, obj,
152 conv_la_bind(flags, &la_bind_buf));
153 else
154 dbg_print(lml, MSG_INTL(MSG_AUD_OBJOPEN_R), lib, obj,
155 conv_la_bind(flags, &la_bind_buf));
156 }
157 }
158
159 void
Dbg_audit_objclose(Lm_list * lml,const char * lib,const char * obj)160 Dbg_audit_objclose(Lm_list *lml, const char *lib, const char *obj)
161 {
162 if (DBG_NOTCLASS(DBG_C_AUDITING))
163 return;
164
165 Dbg_util_nl(lml, DBG_NL_STD);
166 dbg_print(lml, MSG_INTL(MSG_AUD_OBJCLOSE), lib, obj);
167 }
168
169 void
Dbg_audit_symbind(Lm_list * lml,int call,const char * lib,const char * name,Addr value,uint_t flags)170 Dbg_audit_symbind(Lm_list *lml, int call, const char *lib, const char *name,
171 Addr value, uint_t flags)
172 {
173 Conv_la_symbind_buf_t la_symbind_buf;
174
175 if (DBG_NOTCLASS(DBG_C_AUDITING))
176 return;
177
178 if (call == DBG_AUD_CALL) {
179 Dbg_util_nl(lml, DBG_NL_STD);
180 dbg_print(lml, MSG_INTL(MSG_AUD_SYMBIND), lib, name,
181 EC_XWORD(value), conv_la_symbind(flags, &la_symbind_buf));
182 } else {
183 dbg_print(lml, MSG_INTL(MSG_AUD_SYMBIND_R), lib, name,
184 EC_XWORD(value), conv_la_symbind(flags, &la_symbind_buf));
185 }
186 }
187
188 void
Dbg_audit_pltenter(Lm_list * lml,int call,const char * lib,const char * name,Addr value)189 Dbg_audit_pltenter(Lm_list *lml, int call, const char *lib, const char *name,
190 Addr value)
191 {
192 if (DBG_NOTCLASS(DBG_C_AUDITING))
193 return;
194
195 if (call == DBG_AUD_CALL) {
196 Dbg_util_nl(lml, DBG_NL_STD);
197 dbg_print(lml, MSG_INTL(MSG_AUD_PLTENTER), lib, name,
198 EC_XWORD(value));
199 } else {
200 dbg_print(lml, MSG_INTL(MSG_AUD_PLTENTER_R), lib, name,
201 EC_XWORD(value));
202 }
203 }
204
205 void
Dbg_audit_pltexit(Lm_list * lml,const char * lib,const char * name)206 Dbg_audit_pltexit(Lm_list *lml, const char *lib, const char *name)
207 {
208 if (DBG_NOTCLASS(DBG_C_AUDITING))
209 return;
210
211 dbg_print(lml, MSG_INTL(MSG_AUD_PLTEXIT), lib, name);
212 }
213
214 void
Dbg_audit_skip(Lm_list * lml,const char * name,const char * lmid)215 Dbg_audit_skip(Lm_list *lml, const char *name, const char *lmid)
216 {
217 if (DBG_NOTCLASS(DBG_C_AUDITING | DBG_C_FILES))
218 return;
219
220 dbg_print(lml, MSG_INTL(MSG_AUD_SKIP), name, lmid);
221 }
222
223 void
Dbg_audit_terminate(Lm_list * lml,const char * name)224 Dbg_audit_terminate(Lm_list *lml, const char *name)
225 {
226 if (DBG_NOTCLASS(DBG_C_FILES))
227 return;
228
229 dbg_print(lml, MSG_INTL(MSG_AUD_TERM), name);
230 }
231
232 void
Dbg_audit_ignore(Rt_map * lmp)233 Dbg_audit_ignore(Rt_map *lmp)
234 {
235 if (DBG_NOTCLASS(DBG_C_AUDITING | DBG_C_FILES))
236 return;
237
238 dbg_print(LIST(lmp), MSG_INTL(MSG_AUD_IGNORE), NAME(lmp));
239 }
240