FreeChainXenon/binutils-gdb
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

gdb/

Browse source 
* dwarf2-frame.c (no_get_frame_base, no_get_frame_cfa, no_get_frame_pc)
	(no_get_tls_address, no_dwarf_call, no_base_type): Move to the other
	file.
	(dwarf2_frame_ctx_funcs): Reference the renamed functions.
	* dwarf2expr.c (ctx_no_get_frame_base, ctx_no_get_frame_cfa)
	(ctx_no_get_frame_pc, ctx_no_get_tls_address, ctx_no_dwarf_call)
	(ctx_no_get_base_type): Move the functions here.
	* dwarf2expr.h (ctx_no_get_frame_base, ctx_no_get_frame_cfa)
	(ctx_no_get_frame_pc, ctx_no_get_tls_address, ctx_no_dwarf_call)
	(ctx_no_get_base_type): New declarations.
This commit is contained in:
Jan Kratochvil 2011-07-27 17:06:13 +00:00
parent 212b606321
commit 523f3620b8
4 changed files with 77 additions and 55 deletions
Download patch file Download diff file Expand all files Collapse all files

13
gdb/ChangeLog
View file

@ -1,3 +1,16 @@
2011-07-27 Jan Kratochvil <jan.kratochvil@redhat.com>
* dwarf2-frame.c (no_get_frame_base, no_get_frame_cfa, no_get_frame_pc)
(no_get_tls_address, no_dwarf_call, no_base_type): Move to the other
file.
(dwarf2_frame_ctx_funcs): Reference the renamed functions.
* dwarf2expr.c (ctx_no_get_frame_base, ctx_no_get_frame_cfa)
(ctx_no_get_frame_pc, ctx_no_get_tls_address, ctx_no_dwarf_call)
(ctx_no_get_base_type): Move the functions here.
* dwarf2expr.h (ctx_no_get_frame_base, ctx_no_get_frame_cfa)
(ctx_no_get_frame_pc, ctx_no_get_tls_address, ctx_no_dwarf_call)
(ctx_no_get_base_type): New declarations.
2011-07-27 Tom Tromey <tromey@redhat.com> 2011-07-27 Tom Tromey <tromey@redhat.com>
* xcoffread.c (dwarf2_xcoff_names): Add 'macro' and 'sentinel' * xcoffread.c (dwarf2_xcoff_names): Add 'macro' and 'sentinel'

61
gdb/dwarf2-frame.c
View file

@ -312,55 +312,6 @@ read_mem (void *baton, gdb_byte *buf, CORE_ADDR addr, size_t len)
read_memory (addr, buf, len); read_memory (addr, buf, len);
} }
static void
no_get_frame_base (void *baton, const gdb_byte **start, size_t *length)
{
internal_error (__FILE__, __LINE__,
_("Support for DW_OP_fbreg is unimplemented"));
}
/* Helper function for execute_stack_op. */
static CORE_ADDR
no_get_frame_cfa (void *baton)
{
internal_error (__FILE__, __LINE__,
_("Support for DW_OP_call_frame_cfa is unimplemented"));
}
/* Helper function for execute_stack_op. */
static CORE_ADDR
no_get_frame_pc (void *baton)
{
internal_error (__FILE__, __LINE__, _("\
Support for DW_OP_GNU_implicit_pointer is unimplemented"));
}
static CORE_ADDR
no_get_tls_address (void *baton, CORE_ADDR offset)
{
internal_error (__FILE__, __LINE__, _("\
Support for DW_OP_GNU_push_tls_address is unimplemented"));
}
/* Helper function for execute_stack_op. */
static void
no_dwarf_call (struct dwarf_expr_context *ctx, size_t die_offset)
{
internal_error (__FILE__, __LINE__,
_("Support for DW_OP_call* is invalid in CFI"));
}
/* Helper function for execute_stack_op. */
static struct type *
no_base_type (struct dwarf_expr_context *ctx, size_t die)
{
error (_("Support for typed DWARF is not supported in CFI"));
}
/* Execute the required actions for both the DW_CFA_restore and /* Execute the required actions for both the DW_CFA_restore and
DW_CFA_restore_extended instructions. */ DW_CFA_restore_extended instructions. */
static void static void
@ -397,12 +348,12 @@ static const struct dwarf_expr_context_funcs dwarf2_frame_ctx_funcs =
{ {
read_reg, read_reg,
read_mem, read_mem,
no_get_frame_base, ctx_no_get_frame_base,
no_get_frame_cfa, ctx_no_get_frame_cfa,
no_get_frame_pc, ctx_no_get_frame_pc,
no_get_tls_address, ctx_no_get_tls_address,
no_dwarf_call, ctx_no_dwarf_call,
no_base_type ctx_no_get_base_type
}; };
static CORE_ADDR static CORE_ADDR

48
gdb/dwarf2expr.c
View file

@ -1280,6 +1280,54 @@ abort_expression:
gdb_assert (ctx->recursion_depth >= 0); gdb_assert (ctx->recursion_depth >= 0);
} }
/* Stub dwarf_expr_context_funcs.get_frame_base implementation. */
void
ctx_no_get_frame_base (void *baton, const gdb_byte **start, size_t *length)
{
error (_("%s is invalid in this context"), "DW_OP_fbreg");
}
/* Stub dwarf_expr_context_funcs.get_frame_cfa implementation. */
CORE_ADDR
ctx_no_get_frame_cfa (void *baton)
{
error (_("%s is invalid in this context"), "DW_OP_call_frame_cfa");
}
/* Stub dwarf_expr_context_funcs.get_frame_pc implementation. */
CORE_ADDR
ctx_no_get_frame_pc (void *baton)
{
error (_("%s is invalid in this context"), "DW_OP_GNU_implicit_pointer");
}
/* Stub dwarf_expr_context_funcs.get_tls_address implementation. */
CORE_ADDR
ctx_no_get_tls_address (void *baton, CORE_ADDR offset)
{
error (_("%s is invalid in this context"), "DW_OP_GNU_push_tls_address");
}
/* Stub dwarf_expr_context_funcs.dwarf_call implementation. */
void
ctx_no_dwarf_call (struct dwarf_expr_context *ctx, size_t die_offset)
{
error (_("%s is invalid in this context"), "DW_OP_call*");
}
/* Stub dwarf_expr_context_funcs.get_base_type implementation. */
struct type *
ctx_no_get_base_type (struct dwarf_expr_context *ctx, size_t die)
{
error (_("Support for typed DWARF is not supported in this context"));
}
void void
_initialize_dwarf2expr (void) _initialize_dwarf2expr (void)
{ {

10
gdb/dwarf2expr.h
View file

@ -253,4 +253,14 @@ const char *dwarf_stack_op_name (unsigned int);
void dwarf_expr_require_composition (const gdb_byte *, const gdb_byte *, void dwarf_expr_require_composition (const gdb_byte *, const gdb_byte *,
const char *); const char *);
/* Stub dwarf_expr_context_funcs implementations. */
void ctx_no_get_frame_base (void *baton, const gdb_byte **start,
size_t *length);
CORE_ADDR ctx_no_get_frame_cfa (void *baton);
CORE_ADDR ctx_no_get_frame_pc (void *baton);
CORE_ADDR ctx_no_get_tls_address (void *baton, CORE_ADDR offset);
void ctx_no_dwarf_call (struct dwarf_expr_context *ctx, size_t die_offset);
struct type *ctx_no_get_base_type (struct dwarf_expr_context *ctx, size_t die);
#endif /* dwarf2expr.h */ #endif /* dwarf2expr.h */