1 /* Definitions for frame address handler, for GDB, the GNU debugger. 2 3 Copyright (C) 2003, 2004, 2007, 2008, 2009, 2010, 2011 4 Free Software Foundation, Inc. 5 6 This file is part of GDB. 7 8 This program is free software; you can redistribute it and/or modify 9 it under the terms of the GNU General Public License as published by 10 the Free Software Foundation; either version 3 of the License, or 11 (at your option) any later version. 12 13 This program is distributed in the hope that it will be useful, 14 but WITHOUT ANY WARRANTY; without even the implied warranty of 15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 16 GNU General Public License for more details. 17 18 You should have received a copy of the GNU General Public License 19 along with this program. If not, see <http://www.gnu.org/licenses/>. */ 20 21 #include "defs.h" 22 #include "frame-base.h" 23 #include "frame.h" 24 #include "gdb_obstack.h" 25 26 /* A default frame base implementations. If it wasn't for the old 27 DEPRECATED_FRAME_LOCALS_ADDRESS and DEPRECATED_FRAME_ARGS_ADDRESS, 28 these could be combined into a single function. All architectures 29 really need to override this. */ 30 31 static CORE_ADDR 32 default_frame_base_address (struct frame_info *this_frame, void **this_cache) 33 { 34 return get_frame_base (this_frame); /* sigh! */ 35 } 36 37 static CORE_ADDR 38 default_frame_locals_address (struct frame_info *this_frame, void **this_cache) 39 { 40 return default_frame_base_address (this_frame, this_cache); 41 } 42 43 static CORE_ADDR 44 default_frame_args_address (struct frame_info *this_frame, void **this_cache) 45 { 46 return default_frame_base_address (this_frame, this_cache); 47 } 48 49 const struct frame_base default_frame_base = { 50 NULL, /* No parent. */ 51 default_frame_base_address, 52 default_frame_locals_address, 53 default_frame_args_address 54 }; 55 56 static struct gdbarch_data *frame_base_data; 57 58 struct frame_base_table_entry 59 { 60 frame_base_sniffer_ftype *sniffer; 61 struct frame_base_table_entry *next; 62 }; 63 64 struct frame_base_table 65 { 66 struct frame_base_table_entry *head; 67 struct frame_base_table_entry **tail; 68 const struct frame_base *default_base; 69 }; 70 71 static void * 72 frame_base_init (struct obstack *obstack) 73 { 74 struct frame_base_table *table 75 = OBSTACK_ZALLOC (obstack, struct frame_base_table); 76 77 table->tail = &table->head; 78 table->default_base = &default_frame_base; 79 return table; 80 } 81 82 void 83 frame_base_append_sniffer (struct gdbarch *gdbarch, 84 frame_base_sniffer_ftype *sniffer) 85 { 86 struct frame_base_table *table = gdbarch_data (gdbarch, frame_base_data); 87 88 (*table->tail) 89 = GDBARCH_OBSTACK_ZALLOC (gdbarch, struct frame_base_table_entry); 90 (*table->tail)->sniffer = sniffer; 91 table->tail = &(*table->tail)->next; 92 } 93 94 void 95 frame_base_set_default (struct gdbarch *gdbarch, 96 const struct frame_base *default_base) 97 { 98 struct frame_base_table *table = gdbarch_data (gdbarch, frame_base_data); 99 100 table->default_base = default_base; 101 } 102 103 const struct frame_base * 104 frame_base_find_by_frame (struct frame_info *this_frame) 105 { 106 struct gdbarch *gdbarch = get_frame_arch (this_frame); 107 struct frame_base_table *table = gdbarch_data (gdbarch, frame_base_data); 108 struct frame_base_table_entry *entry; 109 110 for (entry = table->head; entry != NULL; entry = entry->next) 111 { 112 const struct frame_base *desc = NULL; 113 114 desc = entry->sniffer (this_frame); 115 if (desc != NULL) 116 return desc; 117 } 118 return table->default_base; 119 } 120 121 extern initialize_file_ftype _initialize_frame_base; /* -Wmissing-prototypes */ 122 123 void 124 _initialize_frame_base (void) 125 { 126 frame_base_data = gdbarch_data_register_pre_init (frame_base_init); 127 } 128