1 /* Definitions for frame address handler, for GDB, the GNU debugger.
3 Copyright (C) 2003-2019 Free Software Foundation, Inc.
5 This file is part of GDB.
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program. If not, see <http://www.gnu.org/licenses/>. */
22 /* Local non-gdb includes. */
23 #include "frame-base.h"
25 #include "gdb_obstack.h"
27 /* A default frame base implementations. If it wasn't for the old
28 DEPRECATED_FRAME_LOCALS_ADDRESS and DEPRECATED_FRAME_ARGS_ADDRESS,
29 these could be combined into a single function. All architectures
30 really need to override this. */
33 default_frame_base_address (struct frame_info
*this_frame
, void **this_cache
)
35 return get_frame_base (this_frame
); /* sigh! */
39 default_frame_locals_address (struct frame_info
*this_frame
, void **this_cache
)
41 return default_frame_base_address (this_frame
, this_cache
);
45 default_frame_args_address (struct frame_info
*this_frame
, void **this_cache
)
47 return default_frame_base_address (this_frame
, this_cache
);
50 const struct frame_base default_frame_base
= {
51 NULL
, /* No parent. */
52 default_frame_base_address
,
53 default_frame_locals_address
,
54 default_frame_args_address
57 static struct gdbarch_data
*frame_base_data
;
59 struct frame_base_table_entry
61 frame_base_sniffer_ftype
*sniffer
;
62 struct frame_base_table_entry
*next
;
65 struct frame_base_table
67 struct frame_base_table_entry
*head
;
68 struct frame_base_table_entry
**tail
;
69 const struct frame_base
*default_base
;
73 frame_base_init (struct obstack
*obstack
)
75 struct frame_base_table
*table
76 = OBSTACK_ZALLOC (obstack
, struct frame_base_table
);
78 table
->tail
= &table
->head
;
79 table
->default_base
= &default_frame_base
;
84 frame_base_append_sniffer (struct gdbarch
*gdbarch
,
85 frame_base_sniffer_ftype
*sniffer
)
87 struct frame_base_table
*table
88 = (struct frame_base_table
*) gdbarch_data (gdbarch
, frame_base_data
);
91 = GDBARCH_OBSTACK_ZALLOC (gdbarch
, struct frame_base_table_entry
);
92 (*table
->tail
)->sniffer
= sniffer
;
93 table
->tail
= &(*table
->tail
)->next
;
97 frame_base_set_default (struct gdbarch
*gdbarch
,
98 const struct frame_base
*default_base
)
100 struct frame_base_table
*table
101 = (struct frame_base_table
*) gdbarch_data (gdbarch
, frame_base_data
);
103 table
->default_base
= default_base
;
106 const struct frame_base
*
107 frame_base_find_by_frame (struct frame_info
*this_frame
)
109 struct gdbarch
*gdbarch
= get_frame_arch (this_frame
);
110 struct frame_base_table
*table
111 = (struct frame_base_table
*) gdbarch_data (gdbarch
, frame_base_data
);
112 struct frame_base_table_entry
*entry
;
114 for (entry
= table
->head
; entry
!= NULL
; entry
= entry
->next
)
116 const struct frame_base
*desc
= NULL
;
118 desc
= entry
->sniffer (this_frame
);
122 return table
->default_base
;
126 _initialize_frame_base (void)
128 frame_base_data
= gdbarch_data_register_pre_init (frame_base_init
);