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
|
#include "typeinfo.h"
#include <string.h>
#include <stdlib.h>
#include <stdio.h>
using std::type_info;
type_info::~type_info() {}
bool type_info::operator==(const type_info &other) const
{
return __type_name == other.__type_name;
}
bool type_info::operator!=(const type_info &other) const
{
return __type_name != other.__type_name;
}
bool type_info::before(const type_info &other) const
{
return __type_name < other.__type_name;
}
const char* type_info::name() const
{
return __type_name;
}
type_info::type_info (const type_info& rhs)
{
__type_name = rhs.__type_name;
}
type_info& type_info::operator= (const type_info& rhs)
{
return *new type_info(rhs);
}
ABI_NAMESPACE::__fundamental_type_info::~__fundamental_type_info() {}
ABI_NAMESPACE::__array_type_info::~__array_type_info() {}
ABI_NAMESPACE::__function_type_info::~__function_type_info() {}
ABI_NAMESPACE::__enum_type_info::~__enum_type_info() {}
ABI_NAMESPACE::__class_type_info::~__class_type_info() {}
ABI_NAMESPACE::__si_class_type_info::~__si_class_type_info() {}
ABI_NAMESPACE::__vmi_class_type_info::~__vmi_class_type_info() {}
ABI_NAMESPACE::__pbase_type_info::~__pbase_type_info() {}
ABI_NAMESPACE::__pointer_type_info::~__pointer_type_info() {}
ABI_NAMESPACE::__pointer_to_member_type_info::~__pointer_to_member_type_info() {}
// From libelftc
extern "C" char *cpp_demangle_gnu3(const char *);
extern "C" bool is_cpp_mangled_gnu3(const char *);
/**
* Demangles a C++ symbol or type name. The buffer, if non-NULL, must be
* allocated with malloc() and must be *n bytes or more long. This function
* may call realloc() on the value pointed to by buf, and will return the
* length of the string via *n.
*
* The value pointed to by status is set to one of the following:
*
* 0: success
* -1: memory allocation failure
* -2: invalid mangled name
* -3: invalid arguments
*/
extern "C" char* __cxa_demangle(const char* mangled_name,
char* buf,
size_t* n,
int* status)
{
// TODO: We should probably just be linking against libelf-tc, rather than
// copying their code. This requires them to do an actual release,
// however, and for our changes to be pushed upstream. We also need to
// call a different demangling function here depending on the ABI (e.g.
// ARM).
char *demangled = cpp_demangle_gnu3(mangled_name);
if (NULL != demangled)
{
size_t len = strlen(demangled);
buf = (char*)realloc(buf, len+1);
if (0 != buf)
{
memcpy(buf, demangled, len);
buf[len] = 0;
*n = len;
*status = 0;
}
else
{
*status = -1;
}
free(demangled);
}
else
{
*status = -2;
return NULL;
}
return buf;
}
|