0d53c4c49f
* dwarf2expr.c (dwarf2_read_address): Renamed from read_address; made non-static. (execute_stack_op): All callers updated. * dwarf2expr.h: Add prototype for dwarf2_read_address. * dwarf2loc.c (find_location_expression): New function. (dwarf_expr_frame_base): Call it. (dwarf2_evaluate_loc_desc): Handle 0-length location expressions. (dwarf2_tracepoint_var_ref): New function, broken out from locexpr_tracepoint_var_ref. (locexpr_tracepoint_var_ref): Call dwarf2_tracepoint_var_ref. Make static. (loclist_read_variable, loclist_read_needs_frame): New functions. (loclist_describe_location, loclist_tracepoint_var_ref): New functions. (dwarf2_loclist_funcs): New struct location_funcs. * dwarf2loc.h (struct dwarf2_loclist_baton): New type. (struct dwarf2_locexpr_baton): Add comments. (dwarf2_loclist_funcs): New extern. * dwarf2read.c (struct comp_unit_head): Remove DIE member, add base_address and base_known. (dwarf_loc_buffer): New variable. (struct dwarf2_pinfo): Add dwarf_loc_buffer and dwarf_loc_size. (DWARF_LOC_BUFFER, DWARF_LOC_SIZE): New macros. (dwarf2_has_info): Initialize dwarf_loc_offset. (dwarf2_build_psymtabs): Read in .debug_loc. (dwarf2_build_psymtabs_hard): Use DWARF_LOC_BUFFER and DWARF_LOC_SIZE. (psymtab_to_symtab_1): Likewise. Move base address calculation here, from... (dwarf2_get_pc_bounds): ... here. Use the base address from cu_header. (dwarf2_symbol_mark_computed): Handle location lists.
105 lines
4 KiB
C
105 lines
4 KiB
C
/* Dwarf2 Expression Evaluator
|
|
Copyright 2001, 2002, 2003 Free Software Foundation, Inc.
|
|
Contributed by Daniel Berlin (dan@dberlin.org)
|
|
This file is part of GDB.
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation; either version 2 of the License, or
|
|
(at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program; if not, write to the Free Software
|
|
Foundation, Inc., 59 Temple Place - Suite 330,
|
|
Boston, MA 02111-1307, USA. */
|
|
|
|
#if !defined (DWARF2EXPR_H)
|
|
#define DWARF2EXPR_H
|
|
|
|
/* The expression evaluator works with a dwarf_expr_context, describing
|
|
its current state and its callbacks. */
|
|
struct dwarf_expr_context
|
|
{
|
|
/* The stack of values, allocated with xmalloc. */
|
|
CORE_ADDR *stack;
|
|
|
|
/* The number of values currently pushed on the stack, and the
|
|
number of elements allocated to the stack. */
|
|
int stack_len, stack_allocated;
|
|
|
|
/* An opaque argument provided by the caller, which will be passed
|
|
to all of the callback functions. */
|
|
void *baton;
|
|
|
|
/* Return the value of register number REGNUM. LVALP will be set
|
|
to the kind of lval this register is (generally lval_register
|
|
for the current frame's registers or lval_memory for a register
|
|
saved to the stack). For lval_memory ADDRP will be set to the
|
|
saved location of the register. */
|
|
CORE_ADDR (*read_reg) (void *baton, int regnum, enum lval_type *lvalp,
|
|
CORE_ADDR *addrp);
|
|
|
|
/* Read LENGTH bytes at ADDR into BUF. */
|
|
void (*read_mem) (void *baton, char *buf, CORE_ADDR addr,
|
|
size_t length);
|
|
|
|
/* Return the location expression for the frame base attribute, in
|
|
START and LENGTH. The result must be live until the current
|
|
expression evaluation is complete. */
|
|
void (*get_frame_base) (void *baton, unsigned char **start,
|
|
size_t *length);
|
|
|
|
/* Return the thread-local storage address for
|
|
DW_OP_GNU_push_tls_address. */
|
|
CORE_ADDR (*get_tls_address) (void *baton, CORE_ADDR offset);
|
|
|
|
#if 0
|
|
/* Not yet implemented. */
|
|
|
|
/* Return the location expression for the dwarf expression
|
|
subroutine in the die at OFFSET in the current compilation unit.
|
|
The result must be live until the current expression evaluation
|
|
is complete. */
|
|
unsigned char *(*get_subr) (void *baton, off_t offset, size_t *length);
|
|
|
|
/* Return the `object address' for DW_OP_push_object_address. */
|
|
CORE_ADDR (*get_object_address) (void *baton);
|
|
#endif
|
|
|
|
/* The current depth of dwarf expression recursion, via DW_OP_call*,
|
|
DW_OP_fbreg, DW_OP_push_object_address, etc., and the maximum
|
|
depth we'll tolerate before raising an error. */
|
|
int recursion_depth, max_recursion_depth;
|
|
|
|
/* Non-zero if the result is in a register. The register number
|
|
will be in REGNUM, and the result will be the contents of the
|
|
register. */
|
|
int in_reg;
|
|
|
|
/* If the result is in a register, the register number. */
|
|
int regnum;
|
|
};
|
|
|
|
struct dwarf_expr_context *new_dwarf_expr_context ();
|
|
void free_dwarf_expr_context (struct dwarf_expr_context *ctx);
|
|
|
|
void dwarf_expr_push (struct dwarf_expr_context *ctx, CORE_ADDR value);
|
|
void dwarf_expr_pop (struct dwarf_expr_context *ctx);
|
|
void dwarf_expr_eval (struct dwarf_expr_context *ctx, unsigned char *addr,
|
|
size_t len);
|
|
CORE_ADDR dwarf_expr_fetch (struct dwarf_expr_context *ctx, int n);
|
|
|
|
|
|
unsigned char *read_uleb128 (unsigned char *buf, unsigned char *buf_end,
|
|
ULONGEST * r);
|
|
unsigned char *read_sleb128 (unsigned char *buf, unsigned char *buf_end,
|
|
LONGEST * r);
|
|
CORE_ADDR dwarf2_read_address (unsigned char *buf, unsigned char *buf_end,
|
|
int *bytes_read);
|
|
|
|
#endif
|