diff options
| author | Zoran Zaric <zoran.zaric@amd.com> | 2020-09-15 11:55:55 +0100 |
|---|---|---|
| committer | Zoran Zaric <zoran.zaric@amd.com> | 2021-08-05 16:40:06 +0100 |
| commit | 0a2b69d04bbb0b5d69ae93da998b65d44fc7612b (patch) | |
| tree | 81fd0e8c389cd655910f03359045913db396bafd /gdb/dwarf2/expr.c | |
| parent | 3c7c57cdc06412d9c81dcc2d89ff2ab4e4704708 (diff) | |
| download | gdb-0a2b69d04bbb0b5d69ae93da998b65d44fc7612b.zip gdb-0a2b69d04bbb0b5d69ae93da998b65d44fc7612b.tar.gz gdb-0a2b69d04bbb0b5d69ae93da998b65d44fc7612b.tar.bz2 | |
Move push_dwarf_reg_entry_value to expr.c
Following the idea of merging the evaluators, the
push_dwarf_reg_entry_value method can be moved from
dwarf_expr_executor and dwarf_evaluate_loc_desc classes
to their base class dwarf_expr_context.
gdb/ChangeLog:
* dwarf2/expr.c
(dwarf_expr_context::push_dwarf_reg_entry_value): Move from
dwarf_evaluate_loc_desc.
* dwarf2/frame.c
(dwarf_expr_executor::push_dwarf_reg_entry_value): Remove
method.
* dwarf2/loc.c (dwarf_expr_reg_to_entry_parameter): Expose
function.
(dwarf_evaluate_loc_desc::push_dwarf_reg_entry_value): Move to
dwarf_expr_context.
* dwarf2/loc.h (dwarf_expr_reg_to_entry_parameter): Expose
function.
Diffstat (limited to 'gdb/dwarf2/expr.c')
| -rw-r--r-- | gdb/dwarf2/expr.c | 50 |
1 files changed, 50 insertions, 0 deletions
diff --git a/gdb/dwarf2/expr.c b/gdb/dwarf2/expr.c index dac693d..a90ebf4 100644 --- a/gdb/dwarf2/expr.c +++ b/gdb/dwarf2/expr.c @@ -258,6 +258,56 @@ dwarf_expr_context::read_mem (gdb_byte *buf, CORE_ADDR addr, read_memory (addr, buf, length); } +/* See expr.h. */ + +void +dwarf_expr_context::push_dwarf_reg_entry_value (call_site_parameter_kind kind, + call_site_parameter_u kind_u, + int deref_size) +{ + ensure_have_per_cu (this->per_cu, "DW_OP_entry_value"); + ensure_have_frame (this->frame, "DW_OP_entry_value"); + + dwarf2_per_cu_data *caller_per_cu; + dwarf2_per_objfile *caller_per_objfile; + frame_info *caller_frame = get_prev_frame (this->frame); + call_site_parameter *parameter + = dwarf_expr_reg_to_entry_parameter (this->frame, kind, kind_u, + &caller_per_cu, + &caller_per_objfile); + const gdb_byte *data_src + = deref_size == -1 ? parameter->value : parameter->data_value; + size_t size + = deref_size == -1 ? parameter->value_size : parameter->data_value_size; + + /* DEREF_SIZE size is not verified here. */ + if (data_src == nullptr) + throw_error (NO_ENTRY_VALUE_ERROR, + _("Cannot resolve DW_AT_call_data_value")); + + /* We are about to evaluate an expression in the context of the caller + of the current frame. This evaluation context may be different from + the current (callee's) context), so temporarily set the caller's context. + + It is possible for the caller to be from a different objfile from the + callee if the call is made through a function pointer. */ + scoped_restore save_frame = make_scoped_restore (&this->frame, + caller_frame); + scoped_restore save_per_cu = make_scoped_restore (&this->per_cu, + caller_per_cu); + scoped_restore save_obj_addr = make_scoped_restore (&this->obj_address, + (CORE_ADDR) 0); + scoped_restore save_per_objfile = make_scoped_restore (&this->per_objfile, + caller_per_objfile); + + scoped_restore save_arch = make_scoped_restore (&this->gdbarch); + this->gdbarch = this->per_objfile->objfile->arch (); + scoped_restore save_addr_size = make_scoped_restore (&this->addr_size); + this->addr_size = this->per_cu->addr_size (); + + this->eval (data_src, size); +} + /* Require that TYPE be an integral type; throw an exception if not. */ static void |