radare2/libr/anal/rtti.c
Francesco Tamagni d8b1e6952e Improve itanium RTTI parsing and vtable search ##anal
- add support for arm/arm64
- simplify the heuristics for carving the start of vtables in data const section to not rely on xrefs, instead look for mandatory vtable fields (only for itanium ABI)
- add support for classes recovery from itanium RTTI
- add class name demangling for itanium RTTI
- relax the requirements for detecting the typeinfo flavor, in absence of flags just assume the simplest kind so at least the class name is there
- expose more info from RTTI structures
- use PJ for printing json
2020-05-03 17:55:20 +02:00

100 lines
2.3 KiB
C

/* radare - LGPL - Copyright 2009-2018 - pancake, maijin, thestr4ng3r */
#include "r_anal.h"
R_API char *r_anal_rtti_demangle_class_name(RAnal *anal, const char *name) {
RVTableContext context;
r_anal_vtable_begin (anal, &context);
if (context.abi == R_ANAL_CPP_ABI_MSVC) {
return r_anal_rtti_msvc_demangle_class_name (&context, name);
}
return r_anal_rtti_itanium_demangle_class_name (&context, name);
}
R_API void r_anal_rtti_print_at_vtable(RAnal *anal, ut64 addr, int mode) {
bool use_json = mode == 'j';
if (use_json) {
r_cons_print ("[");
}
RVTableContext context;
r_anal_vtable_begin (anal, &context);
if (context.abi == R_ANAL_CPP_ABI_MSVC) {
r_anal_rtti_msvc_print_at_vtable (&context, addr, mode, false);
} else {
r_anal_rtti_itanium_print_at_vtable (&context, addr, mode);
}
if (use_json) {
r_cons_print ("]\n");
}
}
R_API void r_anal_rtti_print_all(RAnal *anal, int mode) {
RVTableContext context;
r_anal_vtable_begin (anal, &context);
bool use_json = mode == 'j';
if (use_json) {
r_cons_print ("[");
}
r_cons_break_push (NULL, NULL);
RList *vtables = r_anal_vtable_search (&context);
RListIter *vtableIter;
RVTableInfo *table;
if (vtables) {
bool comma = false;
bool success = false;
r_list_foreach (vtables, vtableIter, table) {
if (r_cons_is_breaked ()) {
break;
}
if (use_json && success) {
r_cons_print (",");
comma = true;
}
if (context.abi == R_ANAL_CPP_ABI_MSVC) {
success = r_anal_rtti_msvc_print_at_vtable (&context, table->saddr, mode, true);
} else {
success = r_anal_rtti_itanium_print_at_vtable (&context, table->saddr, mode);
}
if (success) {
comma = false;
if (!use_json) {
r_cons_print ("\n");
}
}
}
if (use_json && !success && comma) {
// drop last comma if necessary
r_cons_drop (1);
}
}
r_list_free (vtables);
if (use_json) {
r_cons_print ("]\n");
}
r_cons_break_pop ();
}
R_API void r_anal_rtti_recover_all(RAnal *anal) {
RVTableContext context;
r_anal_vtable_begin (anal, &context);
r_cons_break_push (NULL, NULL);
RList *vtables = r_anal_vtable_search (&context);
if (vtables) {
if (context.abi == R_ANAL_CPP_ABI_MSVC) {
r_anal_rtti_msvc_recover_all (&context, vtables);
} else {
r_anal_rtti_itanium_recover_all (&context, vtables);
}
}
r_list_free (vtables);
r_cons_break_pop ();
}