1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
|
/*
* CDDL HEADER START
*
* The contents of this file are subject to the terms of the
* Common Development and Distribution License (the "License").
* You may not use this file except in compliance with the License.
*
* You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
* or http://www.opensolaris.org/os/licensing.
* See the License for the specific language governing permissions
* and limitations under the License.
*
* When distributing Covered Code, include this CDDL HEADER in each
* file and include the License file at usr/src/OPENSOLARIS.LICENSE.
* If applicable, add the following below this CDDL HEADER, with the
* fields enclosed by brackets "[]" replaced with your own identifying
* information: Portions Copyright [yyyy] [name of copyright owner]
*
* CDDL HEADER END
*/
/*
* Copyright 2006 Sun Microsystems, Inc. All rights reserved.
* Use is subject to license terms.
*/
#pragma ident "%Z%%M% %I% %E% SMI"
#include <dlfcn.h>
#include <stdarg.h>
#include <stdio.h>
#include <stdlib.h>
#include <demangle.h>
#include "dis_util.h"
int g_error; /* global process exit status, set when warn() is called */
/*
* Fatal error. Print out the error with a leading "dis: ", and then exit the
* program.
*/
void
die(const char *fmt, ...)
{
va_list ap;
(void) fprintf(stderr, "dis: fatal: ");
va_start(ap, fmt);
(void) vfprintf(stderr, fmt, ap);
va_end(ap);
(void) fprintf(stderr, "\n");
exit(1);
}
/*
* Non-fatal error. Print out the error with a leading "dis: ", set the global
* error flag, and return.
*/
void
warn(const char *fmt, ...)
{
va_list ap;
(void) fprintf(stderr, "dis: warning: ");
va_start(ap, fmt);
(void) vfprintf(stderr, fmt, ap);
va_end(ap);
(void) fprintf(stderr, "\n");
g_error = 1;
}
/*
* Convenience wrapper around malloc() to cleanly exit if any allocation fails.
*/
void *
safe_malloc(size_t size)
{
void *ret;
if ((ret = calloc(1, size)) == NULL)
die("Out of memory");
return (ret);
}
/*
* Generic interface to demangle C++ names. Calls cplus_demangle to do the
* necessary translation. If the translation fails, the argument is returned
* unchanged. The memory returned is only valid until the next call to
* demangle().
*
* We dlopen() libdemangle.so rather than linking directly against it in case it
* is not installed on the system.
*/
const char *
dis_demangle(const char *name)
{
static char *demangled_name;
static int (*demangle_func)() = NULL;
static int size = BUFSIZE;
static int first_flag = 0;
int ret;
/*
* If this is the first call, allocate storage
* for the buffer.
*/
if (first_flag == 0) {
void *demangle_hand;
demangle_hand = dlopen("libdemangle.so.1", RTLD_LAZY);
if (demangle_hand != NULL)
demangle_func = (int (*)(int))dlsym(
demangle_hand, "cplus_demangle");
demangled_name = safe_malloc(size);
first_flag = 1;
}
/*
* If libdemangle is not present, pass through unchanged.
*/
if (demangle_func == NULL)
return (name);
/*
* The function returns -1 when the buffer size is not sufficient.
*/
while ((ret = (*demangle_func)(name, demangled_name, size)) == -1) {
free(demangled_name);
size = size + BUFSIZE;
demangled_name = safe_malloc(size);
}
if (ret != 0)
return (name);
return (demangled_name);
}
|
