X-Git-Url: http://git.efficios.com/?a=blobdiff_plain;f=gdb%2Fcp-abi.c;h=fd967c3096b8df844180316b15f9680e430fe2e0;hb=5496abe1c5c31aa6648e8fdb15e4122025bcabfe;hp=b4b5c31449eddab0ca9e14d65efe694a3abcee6e;hpb=0dfdb8ba76b1b0dd140c9bd536fed5e8083a55e9;p=deliverable%2Fbinutils-gdb.git diff --git a/gdb/cp-abi.c b/gdb/cp-abi.c index b4b5c31449..fd967c3096 100644 --- a/gdb/cp-abi.c +++ b/gdb/cp-abi.c @@ -1,7 +1,6 @@ /* Generic code for supporting multiple C++ ABI's - Copyright (C) 2001, 2002, 2003, 2005, 2006, 2007 - Free Software Foundation, Inc. + Copyright (C) 2001-2020 Free Software Foundation, Inc. This file is part of GDB. @@ -24,9 +23,6 @@ #include "command.h" #include "gdbcmd.h" #include "ui-out.h" - -#include "gdb_string.h" - static struct cp_abi_ops *find_cp_abi (const char *short_name); static struct cp_abi_ops current_cp_abi = { "", NULL }; @@ -69,33 +65,68 @@ is_operator_name (const char *name) } int -baseclass_offset (struct type *type, int index, const bfd_byte *valaddr, - CORE_ADDR address) +baseclass_offset (struct type *type, int index, const gdb_byte *valaddr, + LONGEST embedded_offset, CORE_ADDR address, + const struct value *val) { - if (current_cp_abi.baseclass_offset == NULL) - error (_("ABI doesn't define required function baseclass_offset")); - return (*current_cp_abi.baseclass_offset) (type, index, valaddr, address); + int res = 0; + + gdb_assert (current_cp_abi.baseclass_offset != NULL); + + try + { + res = (*current_cp_abi.baseclass_offset) (type, index, valaddr, + embedded_offset, + address, val); + } + catch (const gdb_exception_error &ex) + { + if (ex.error != NOT_AVAILABLE_ERROR) + throw; + + throw_error (NOT_AVAILABLE_ERROR, + _("Cannot determine virtual baseclass offset " + "of incomplete object")); + } + + return res; } struct value * -value_virtual_fn_field (struct value **arg1p, struct fn_field *f, int j, +value_virtual_fn_field (struct value **arg1p, + struct fn_field *f, int j, struct type *type, int offset) { if ((current_cp_abi.virtual_fn_field) == NULL) return NULL; - return (*current_cp_abi.virtual_fn_field) (arg1p, f, j, type, offset); + return (*current_cp_abi.virtual_fn_field) (arg1p, f, j, + type, offset); } struct type * -value_rtti_type (struct value *v, int *full, int *top, int *using_enc) +value_rtti_type (struct value *v, int *full, + LONGEST *top, int *using_enc) { - if ((current_cp_abi.rtti_type) == NULL) + struct type *ret = NULL; + + if ((current_cp_abi.rtti_type) == NULL + || !HAVE_CPLUS_STRUCT (check_typedef (value_type (v)))) return NULL; - return (*current_cp_abi.rtti_type) (v, full, top, using_enc); + try + { + ret = (*current_cp_abi.rtti_type) (v, full, top, using_enc); + } + catch (const gdb_exception_error &e) + { + return NULL; + } + + return ret; } void -cplus_print_method_ptr (const gdb_byte *contents, struct type *type, +cplus_print_method_ptr (const gdb_byte *contents, + struct type *type, struct ui_file *stream) { if (current_cp_abi.print_method_ptr == NULL) @@ -104,23 +135,25 @@ cplus_print_method_ptr (const gdb_byte *contents, struct type *type, } int -cplus_method_ptr_size (void) +cplus_method_ptr_size (struct type *to_type) { if (current_cp_abi.method_ptr_size == NULL) error (_("GDB does not support pointers to methods on this target")); - return (*current_cp_abi.method_ptr_size) (); + return (*current_cp_abi.method_ptr_size) (to_type); } void -cplus_make_method_ptr (gdb_byte *contents, CORE_ADDR value, int is_virtual) +cplus_make_method_ptr (struct type *type, gdb_byte *contents, + CORE_ADDR value, int is_virtual) { if (current_cp_abi.make_method_ptr == NULL) error (_("GDB does not support pointers to methods on this target")); - (*current_cp_abi.make_method_ptr) (contents, value, is_virtual); + (*current_cp_abi.make_method_ptr) (type, contents, value, is_virtual); } CORE_ADDR -cplus_skip_trampoline (struct frame_info *frame, CORE_ADDR stop_pc) +cplus_skip_trampoline (struct frame_info *frame, + CORE_ADDR stop_pc) { if (current_cp_abi.skip_trampoline == NULL) return 0; @@ -128,18 +161,72 @@ cplus_skip_trampoline (struct frame_info *frame, CORE_ADDR stop_pc) } struct value * -cplus_method_ptr_to_value (struct value **this_p, struct value *method_ptr) +cplus_method_ptr_to_value (struct value **this_p, + struct value *method_ptr) { if (current_cp_abi.method_ptr_to_value == NULL) error (_("GDB does not support pointers to methods on this target")); return (*current_cp_abi.method_ptr_to_value) (this_p, method_ptr); } -int +/* See cp-abi.h. */ + +void +cplus_print_vtable (struct value *value) +{ + if (current_cp_abi.print_vtable == NULL) + error (_("GDB cannot print the vtable on this target")); + (*current_cp_abi.print_vtable) (value); +} + +/* See cp-abi.h. */ + +struct value * +cplus_typeid (struct value *value) +{ + if (current_cp_abi.get_typeid == NULL) + error (_("GDB cannot find the typeid on this target")); + return (*current_cp_abi.get_typeid) (value); +} + +/* See cp-abi.h. */ + +struct type * +cplus_typeid_type (struct gdbarch *gdbarch) +{ + if (current_cp_abi.get_typeid_type == NULL) + error (_("GDB cannot find the type for 'typeid' on this target")); + return (*current_cp_abi.get_typeid_type) (gdbarch); +} + +/* See cp-abi.h. */ + +struct type * +cplus_type_from_type_info (struct value *value) +{ + if (current_cp_abi.get_type_from_type_info == NULL) + error (_("GDB cannot find the type from a std::type_info on this target")); + return (*current_cp_abi.get_type_from_type_info) (value); +} + +/* See cp-abi.h. */ + +std::string +cplus_typename_from_type_info (struct value *value) +{ + if (current_cp_abi.get_typename_from_type_info == NULL) + error (_("GDB cannot find the type name " + "from a std::type_info on this target")); + return (*current_cp_abi.get_typename_from_type_info) (value); +} + +/* See cp-abi.h. */ + +struct language_pass_by_ref_info cp_pass_by_reference (struct type *type) { if ((current_cp_abi.pass_by_reference) == NULL) - return 0; + return default_pass_by_reference (type); return (*current_cp_abi.pass_by_reference) (type); } @@ -165,7 +252,8 @@ register_cp_abi (struct cp_abi_ops *abi) { if (num_cp_abis == CP_ABI_MAX) internal_error (__FILE__, __LINE__, - _("Too many C++ ABIs, please increase CP_ABI_MAX in cp-abi.c")); + _("Too many C++ ABIs, please increase " + "CP_ABI_MAX in cp-abi.c")); cp_abis[num_cp_abis++] = abi; @@ -226,36 +314,35 @@ find_cp_abi (const char *short_name) static void list_cp_abis (int from_tty) { - struct cleanup *cleanup_chain; + struct ui_out *uiout = current_uiout; int i; - ui_out_text (uiout, "The available C++ ABIs are:\n"); - cleanup_chain = make_cleanup_ui_out_tuple_begin_end (uiout, "cp-abi-list"); + uiout->text ("The available C++ ABIs are:\n"); + ui_out_emit_tuple tuple_emitter (uiout, "cp-abi-list"); for (i = 0; i < num_cp_abis; i++) { char pad[14]; int padcount; - ui_out_text (uiout, " "); - ui_out_field_string (uiout, "cp-abi", cp_abis[i]->shortname); + uiout->text (" "); + uiout->field_string ("cp-abi", cp_abis[i]->shortname); padcount = 16 - 2 - strlen (cp_abis[i]->shortname); pad[padcount] = 0; while (padcount > 0) pad[--padcount] = ' '; - ui_out_text (uiout, pad); + uiout->text (pad); - ui_out_field_string (uiout, "doc", cp_abis[i]->doc); - ui_out_text (uiout, "\n"); + uiout->field_string ("doc", cp_abis[i]->doc); + uiout->text ("\n"); } - do_cleanups (cleanup_chain); } /* Set the current C++ ABI, or display the list of options if no argument is given. */ static void -set_cp_abi_cmd (char *args, int from_tty) +set_cp_abi_cmd (const char *args, int from_tty) { if (args == NULL) { @@ -267,32 +354,58 @@ set_cp_abi_cmd (char *args, int from_tty) error (_("Could not find \"%s\" in ABI list"), args); } -/* Show the currently selected C++ ABI. */ +/* A completion function for "set cp-abi". */ static void -show_cp_abi_cmd (char *args, int from_tty) +cp_abi_completer (struct cmd_list_element *ignore, + completion_tracker &tracker, + const char *text, const char *word) { - ui_out_text (uiout, "The currently selected C++ ABI is \""); + static const char **cp_abi_names; + + if (cp_abi_names == NULL) + { + int i; - ui_out_field_string (uiout, "cp-abi", current_cp_abi.shortname); - ui_out_text (uiout, "\" ("); - ui_out_field_string (uiout, "longname", current_cp_abi.longname); - ui_out_text (uiout, ").\n"); + cp_abi_names = XNEWVEC (const char *, num_cp_abis + 1); + for (i = 0; i < num_cp_abis; ++i) + cp_abi_names[i] = cp_abis[i]->shortname; + cp_abi_names[i] = NULL; + } + + complete_on_enum (tracker, cp_abi_names, text, word); } -extern initialize_file_ftype _initialize_cp_abi; /* -Wmissing-prototypes */ +/* Show the currently selected C++ ABI. */ + +static void +show_cp_abi_cmd (const char *args, int from_tty) +{ + struct ui_out *uiout = current_uiout; + + uiout->text ("The currently selected C++ ABI is \""); + + uiout->field_string ("cp-abi", current_cp_abi.shortname); + uiout->text ("\" ("); + uiout->field_string ("longname", current_cp_abi.longname); + uiout->text (").\n"); +} void _initialize_cp_abi (void) { + struct cmd_list_element *c; + register_cp_abi (&auto_cp_abi); switch_to_cp_abi ("auto"); - add_cmd ("cp-abi", class_obscure, set_cp_abi_cmd, _("\ + c = add_cmd ("cp-abi", class_obscure, set_cp_abi_cmd, _("\ Set the ABI used for inspecting C++ objects.\n\ \"set cp-abi\" with no arguments will list the available ABIs."), - &setlist); + &setlist); + set_cmd_completer (c, cp_abi_completer); add_cmd ("cp-abi", class_obscure, show_cp_abi_cmd, - _("Show the ABI used for inspecting C++ objects."), &showlist); + _("Show the ABI used for inspecting C++ objects."), + &showlist); }