Refactor disassembler selection
[deliverable/binutils-gdb.git] / gdb / gdbarch.c
CommitLineData
c4bfde41
JK
1/* *INDENT-OFF* */ /* THIS FILE IS GENERATED -*- buffer-read-only: t -*- */
2/* vi:set ro: */
59233f88 3
adf40b2e 4/* Dynamic architecture support for GDB, the GNU debugger.
79d45cd4 5
61baf725 6 Copyright (C) 1998-2017 Free Software Foundation, Inc.
c906108c 7
96baa820
JM
8 This file is part of GDB.
9
10 This program is free software; you can redistribute it and/or modify
11 it under the terms of the GNU General Public License as published by
a9762ec7 12 the Free Software Foundation; either version 3 of the License, or
96baa820 13 (at your option) any later version.
618f726f 14
96baa820
JM
15 This program is distributed in the hope that it will be useful,
16 but WITHOUT ANY WARRANTY; without even the implied warranty of
17 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 GNU General Public License for more details.
618f726f 19
96baa820 20 You should have received a copy of the GNU General Public License
a9762ec7 21 along with this program. If not, see <http://www.gnu.org/licenses/>. */
adf40b2e 22
104c1213
JM
23/* This file was created with the aid of ``gdbarch.sh''.
24
52204a0b 25 The Bourne shell script ``gdbarch.sh'' creates the files
104c1213
JM
26 ``new-gdbarch.c'' and ``new-gdbarch.h and then compares them
27 against the existing ``gdbarch.[hc]''. Any differences found
28 being reported.
29
30 If editing this file, please also run gdbarch.sh and merge any
52204a0b 31 changes into that script. Conversely, when making sweeping changes
104c1213 32 to this file, modifying gdbarch.sh and using its output may prove
0963b4bd 33 easier. */
c906108c 34
c906108c
SS
35
36#include "defs.h"
1ad03bde 37#include "arch-utils.h"
c906108c 38
0f71a2f6 39#include "gdbcmd.h"
faaf634c 40#include "inferior.h"
7a292a7a 41#include "symcat.h"
c906108c 42
f0d4cc9e 43#include "floatformat.h"
b59ff9d5 44#include "reggroups.h"
4be87837 45#include "osabi.h"
aebd7893 46#include "gdb_obstack.h"
383f836e 47#include "observer.h"
a3ecef73 48#include "regcache.h"
19630284 49#include "objfiles.h"
2faa3447 50#include "auxv.h"
95160752 51
104c1213
JM
52/* Static function declarations */
53
b3cc3077 54static void alloc_gdbarch_data (struct gdbarch *);
104c1213 55
0f71a2f6
JM
56/* Non-zero if we want to trace architecture code. */
57
58#ifndef GDBARCH_DEBUG
59#define GDBARCH_DEBUG 0
60#endif
ccce17b0 61unsigned int gdbarch_debug = GDBARCH_DEBUG;
920d2a44
AC
62static void
63show_gdbarch_debug (struct ui_file *file, int from_tty,
64 struct cmd_list_element *c, const char *value)
65{
66 fprintf_filtered (file, _("Architecture debugging is %s.\n"), value);
67}
0f71a2f6 68
456fcf94 69static const char *
8da61cc4 70pformat (const struct floatformat **format)
456fcf94
AC
71{
72 if (format == NULL)
73 return "(null)";
74 else
8da61cc4
DJ
75 /* Just print out one of them - this is only for diagnostics. */
76 return format[0]->name;
456fcf94
AC
77}
78
08105857
PA
79static const char *
80pstring (const char *string)
81{
82 if (string == NULL)
83 return "(null)";
84 return string;
85}
86
a121b7c1 87static const char *
f7bb4e3a
PB
88pstring_ptr (char **string)
89{
90 if (string == NULL || *string == NULL)
91 return "(null)";
92 return *string;
93}
94
05c0465e
SDJ
95/* Helper function to print a list of strings, represented as "const
96 char *const *". The list is printed comma-separated. */
97
a121b7c1 98static const char *
05c0465e
SDJ
99pstring_list (const char *const *list)
100{
101 static char ret[100];
102 const char *const *p;
103 size_t offset = 0;
104
105 if (list == NULL)
106 return "(null)";
107
108 ret[0] = '\0';
109 for (p = list; *p != NULL && offset < sizeof (ret); ++p)
110 {
111 size_t s = xsnprintf (ret + offset, sizeof (ret) - offset, "%s, ", *p);
112 offset += 2 + s;
113 }
114
115 if (offset > 0)
116 {
117 gdb_assert (offset - 2 < sizeof (ret));
118 ret[offset - 2] = '\0';
119 }
120
121 return ret;
122}
123
0f71a2f6 124
0963b4bd 125/* Maintain the struct gdbarch object. */
0f71a2f6
JM
126
127struct gdbarch
adf40b2e 128{
76860b5f
AC
129 /* Has this architecture been fully initialized? */
130 int initialized_p;
aebd7893
AC
131
132 /* An obstack bound to the lifetime of the architecture. */
133 struct obstack *obstack;
134
0963b4bd 135 /* basic architectural information. */
adf40b2e 136 const struct bfd_arch_info * bfd_arch_info;
94123b4f
YQ
137 enum bfd_endian byte_order;
138 enum bfd_endian byte_order_for_code;
4be87837 139 enum gdb_osabi osabi;
424163ea 140 const struct target_desc * target_desc;
0f71a2f6 141
0963b4bd 142 /* target specific vector. */
adf40b2e 143 struct gdbarch_tdep *tdep;
4b9b3959 144 gdbarch_dump_tdep_ftype *dump_tdep;
0f71a2f6 145
0963b4bd 146 /* per-architecture data-pointers. */
95160752 147 unsigned nr_data;
adf40b2e 148 void **data;
0f71a2f6 149
adf40b2e 150 /* Multi-arch values.
0f71a2f6 151
adf40b2e 152 When extending this structure you must:
0f71a2f6 153
adf40b2e 154 Add the field below.
0f71a2f6 155
adf40b2e
JM
156 Declare set/get functions and define the corresponding
157 macro in gdbarch.h.
0f71a2f6 158
adf40b2e
JM
159 gdbarch_alloc(): If zero/NULL is not a suitable default,
160 initialize the new field.
0f71a2f6 161
adf40b2e
JM
162 verify_gdbarch(): Confirm that the target updated the field
163 correctly.
0f71a2f6 164
7e73cedf 165 gdbarch_dump(): Add a fprintf_unfiltered call so that the new
adf40b2e 166 field is dumped out
0f71a2f6 167
adf40b2e
JM
168 get_gdbarch(): Implement the set/get functions (probably using
169 the macro's as shortcuts).
0f71a2f6
JM
170
171 */
172
32c9a795 173 int bits_big_endian;
adf40b2e
JM
174 int short_bit;
175 int int_bit;
176 int long_bit;
177 int long_long_bit;
205c306f 178 int long_long_align_bit;
f9e9243a
UW
179 int half_bit;
180 const struct floatformat ** half_format;
adf40b2e 181 int float_bit;
8da61cc4 182 const struct floatformat ** float_format;
adf40b2e 183 int double_bit;
8da61cc4 184 const struct floatformat ** double_format;
adf40b2e 185 int long_double_bit;
8da61cc4 186 const struct floatformat ** long_double_format;
53375380
PA
187 int wchar_bit;
188 int wchar_signed;
9b790ce7 189 gdbarch_floatformat_for_type_ftype *floatformat_for_type;
66b43ecb 190 int ptr_bit;
52204a0b 191 int addr_bit;
8da614df 192 int dwarf2_addr_size;
4e409299 193 int char_signed;
adf40b2e
JM
194 gdbarch_read_pc_ftype *read_pc;
195 gdbarch_write_pc_ftype *write_pc;
39d4ef09 196 gdbarch_virtual_frame_pointer_ftype *virtual_frame_pointer;
d8124050 197 gdbarch_pseudo_register_read_ftype *pseudo_register_read;
3543a589 198 gdbarch_pseudo_register_read_value_ftype *pseudo_register_read_value;
d8124050 199 gdbarch_pseudo_register_write_ftype *pseudo_register_write;
adf40b2e 200 int num_regs;
0aba1244 201 int num_pseudo_regs;
175ff332
HZ
202 gdbarch_ax_pseudo_register_collect_ftype *ax_pseudo_register_collect;
203 gdbarch_ax_pseudo_register_push_stack_ftype *ax_pseudo_register_push_stack;
012b3a21 204 gdbarch_handle_segmentation_fault_ftype *handle_segmentation_fault;
adf40b2e 205 int sp_regnum;
adf40b2e 206 int pc_regnum;
c2169756 207 int ps_regnum;
60054393 208 int fp0_regnum;
88c72b7d
AC
209 gdbarch_stab_reg_to_regnum_ftype *stab_reg_to_regnum;
210 gdbarch_ecoff_reg_to_regnum_ftype *ecoff_reg_to_regnum;
88c72b7d
AC
211 gdbarch_sdb_reg_to_regnum_ftype *sdb_reg_to_regnum;
212 gdbarch_dwarf2_reg_to_regnum_ftype *dwarf2_reg_to_regnum;
adf40b2e 213 gdbarch_register_name_ftype *register_name;
9c04cab7 214 gdbarch_register_type_ftype *register_type;
669fac23 215 gdbarch_dummy_id_ftype *dummy_id;
f3be58bc 216 int deprecated_fp_regnum;
b8de8283 217 gdbarch_push_dummy_call_ftype *push_dummy_call;
adf40b2e 218 int call_dummy_location;
7043d8dc 219 gdbarch_push_dummy_code_ftype *push_dummy_code;
7eb89530 220 gdbarch_code_of_frame_writable_ftype *code_of_frame_writable;
b8de8283
AC
221 gdbarch_print_registers_info_ftype *print_registers_info;
222 gdbarch_print_float_info_ftype *print_float_info;
223 gdbarch_print_vector_info_ftype *print_vector_info;
224 gdbarch_register_sim_regno_ftype *register_sim_regno;
b8de8283
AC
225 gdbarch_cannot_fetch_register_ftype *cannot_fetch_register;
226 gdbarch_cannot_store_register_ftype *cannot_store_register;
227 gdbarch_get_longjmp_target_ftype *get_longjmp_target;
adf40b2e 228 int believe_pcc_promotion;
13d01224
AC
229 gdbarch_convert_register_p_ftype *convert_register_p;
230 gdbarch_register_to_value_ftype *register_to_value;
231 gdbarch_value_to_register_ftype *value_to_register;
9acbedc0 232 gdbarch_value_from_register_ftype *value_from_register;
4478b372
JB
233 gdbarch_pointer_to_address_ftype *pointer_to_address;
234 gdbarch_address_to_pointer_ftype *address_to_pointer;
fc0c74b1 235 gdbarch_integer_to_address_ftype *integer_to_address;
92ad9cd9 236 gdbarch_return_value_ftype *return_value;
18648a37 237 gdbarch_return_in_first_hidden_param_p_ftype *return_in_first_hidden_param_p;
adf40b2e 238 gdbarch_skip_prologue_ftype *skip_prologue;
4309257c 239 gdbarch_skip_main_prologue_ftype *skip_main_prologue;
591a12a1 240 gdbarch_skip_entrypoint_ftype *skip_entrypoint;
adf40b2e
JM
241 gdbarch_inner_than_ftype *inner_than;
242 gdbarch_breakpoint_from_pc_ftype *breakpoint_from_pc;
cd6c3b4f
YQ
243 gdbarch_breakpoint_kind_from_pc_ftype *breakpoint_kind_from_pc;
244 gdbarch_sw_breakpoint_from_kind_ftype *sw_breakpoint_from_kind;
833b7ab5 245 gdbarch_breakpoint_kind_from_current_state_ftype *breakpoint_kind_from_current_state;
a1131521 246 gdbarch_adjust_breakpoint_address_ftype *adjust_breakpoint_address;
917317f4
JM
247 gdbarch_memory_insert_breakpoint_ftype *memory_insert_breakpoint;
248 gdbarch_memory_remove_breakpoint_ftype *memory_remove_breakpoint;
adf40b2e 249 CORE_ADDR decr_pc_after_break;
782263ab 250 CORE_ADDR deprecated_function_start_offset;
123dc839 251 gdbarch_remote_register_number_ftype *remote_register_number;
b2756930 252 gdbarch_fetch_tls_load_module_address_ftype *fetch_tls_load_module_address;
adf40b2e 253 CORE_ADDR frame_args_skip;
12cc2063 254 gdbarch_unwind_pc_ftype *unwind_pc;
a9e5fdc2 255 gdbarch_unwind_sp_ftype *unwind_sp;
adf40b2e 256 gdbarch_frame_num_args_ftype *frame_num_args;
dc604539 257 gdbarch_frame_align_ftype *frame_align;
192cb3d4 258 gdbarch_stabs_argument_has_addr_ftype *stabs_argument_has_addr;
8b148df9 259 int frame_red_zone_size;
f517ea4e 260 gdbarch_convert_from_func_ptr_addr_ftype *convert_from_func_ptr_addr;
875e1767 261 gdbarch_addr_bits_remove_ftype *addr_bits_remove;
64c4637f 262 gdbarch_software_single_step_ftype *software_single_step;
3352ef37 263 gdbarch_single_step_through_delay_ftype *single_step_through_delay;
2bf0cb65 264 gdbarch_print_insn_ftype *print_insn;
bdcd319a 265 gdbarch_skip_trampoline_code_ftype *skip_trampoline_code;
dea0c52f 266 gdbarch_skip_solib_resolver_ftype *skip_solib_resolver;
d50355b6 267 gdbarch_in_solib_return_trampoline_ftype *in_solib_return_trampoline;
c9cf6e20 268 gdbarch_stack_frame_destroyed_p_ftype *stack_frame_destroyed_p;
a2cf933a
EZ
269 gdbarch_elf_make_msymbol_special_ftype *elf_make_msymbol_special;
270 gdbarch_coff_make_msymbol_special_ftype *coff_make_msymbol_special;
3e29f34a
MR
271 gdbarch_make_symbol_special_ftype *make_symbol_special;
272 gdbarch_adjust_dwarf2_addr_ftype *adjust_dwarf2_addr;
273 gdbarch_adjust_dwarf2_line_ftype *adjust_dwarf2_line;
c4ed33b9 274 int cannot_step_breakpoint;
f74fa174 275 int have_nonsteppable_watchpoint;
8b2dbe47
KB
276 gdbarch_address_class_type_flags_ftype *address_class_type_flags;
277 gdbarch_address_class_type_flags_to_name_ftype *address_class_type_flags_to_name;
b41c5a85 278 gdbarch_execute_dwarf_cfa_vendor_op_ftype *execute_dwarf_cfa_vendor_op;
8b2dbe47 279 gdbarch_address_class_name_to_type_flags_ftype *address_class_name_to_type_flags;
b59ff9d5 280 gdbarch_register_reggroup_p_ftype *register_reggroup_p;
143985b7 281 gdbarch_fetch_pointer_argument_ftype *fetch_pointer_argument;
5aa82d05 282 gdbarch_iterate_over_regset_sections_ftype *iterate_over_regset_sections;
6432734d 283 gdbarch_make_corefile_notes_ftype *make_corefile_notes;
b3ac9c77 284 gdbarch_elfcore_write_linux_prpsinfo_ftype *elfcore_write_linux_prpsinfo;
35c2fab7 285 gdbarch_find_memory_regions_ftype *find_memory_regions;
de584861 286 gdbarch_core_xfer_shared_libraries_ftype *core_xfer_shared_libraries;
356a5233 287 gdbarch_core_xfer_shared_libraries_aix_ftype *core_xfer_shared_libraries_aix;
28439f5e 288 gdbarch_core_pid_to_str_ftype *core_pid_to_str;
4dfc5dbc 289 gdbarch_core_thread_name_ftype *core_thread_name;
a78c2d62 290 const char * gcore_bfd_target;
0d5de010
DJ
291 int vtable_function_descriptors;
292 int vbit_in_delta;
6d350bb5 293 gdbarch_skip_permanent_breakpoint_ftype *skip_permanent_breakpoint;
237fc4c9
PA
294 ULONGEST max_insn_length;
295 gdbarch_displaced_step_copy_insn_ftype *displaced_step_copy_insn;
99e40580 296 gdbarch_displaced_step_hw_singlestep_ftype *displaced_step_hw_singlestep;
237fc4c9
PA
297 gdbarch_displaced_step_fixup_ftype *displaced_step_fixup;
298 gdbarch_displaced_step_free_closure_ftype *displaced_step_free_closure;
299 gdbarch_displaced_step_location_ftype *displaced_step_location;
dde08ee1 300 gdbarch_relocate_instruction_ftype *relocate_instruction;
1c772458 301 gdbarch_overlay_update_ftype *overlay_update;
4eb0ad19 302 gdbarch_core_read_description_ftype *core_read_description;
149ad273 303 gdbarch_static_transform_name_ftype *static_transform_name;
203c3895 304 int sofun_address_maybe_missing;
0508c3ec 305 gdbarch_process_record_ftype *process_record;
3846b520 306 gdbarch_process_record_signal_ftype *process_record_signal;
22203bbf 307 gdbarch_gdb_signal_from_target_ftype *gdb_signal_from_target;
eb14d406 308 gdbarch_gdb_signal_to_target_ftype *gdb_signal_to_target;
4aa995e1 309 gdbarch_get_siginfo_type_ftype *get_siginfo_type;
60c5725c 310 gdbarch_record_special_symbol_ftype *record_special_symbol;
a96d9b2e 311 gdbarch_get_syscall_number_ftype *get_syscall_number;
458c8db8
SDJ
312 const char * xml_syscall_file;
313 struct syscalls_info * syscalls_info;
05c0465e
SDJ
314 const char *const * stap_integer_prefixes;
315 const char *const * stap_integer_suffixes;
316 const char *const * stap_register_prefixes;
317 const char *const * stap_register_suffixes;
318 const char *const * stap_register_indirection_prefixes;
319 const char *const * stap_register_indirection_suffixes;
55aa24fb
SDJ
320 const char * stap_gdb_register_prefix;
321 const char * stap_gdb_register_suffix;
322 gdbarch_stap_is_single_operand_ftype *stap_is_single_operand;
323 gdbarch_stap_parse_special_token_ftype *stap_parse_special_token;
8b367e17
JM
324 gdbarch_dtrace_parse_probe_argument_ftype *dtrace_parse_probe_argument;
325 gdbarch_dtrace_probe_is_enabled_ftype *dtrace_probe_is_enabled;
326 gdbarch_dtrace_enable_probe_ftype *dtrace_enable_probe;
327 gdbarch_dtrace_disable_probe_ftype *dtrace_disable_probe;
50c71eaf 328 int has_global_solist;
2567c7d9 329 int has_global_breakpoints;
6c95b8df 330 gdbarch_has_shared_address_space_ftype *has_shared_address_space;
7a697b8d 331 gdbarch_fast_tracepoint_valid_at_ftype *fast_tracepoint_valid_at;
5f034a78 332 gdbarch_guess_tracepoint_registers_ftype *guess_tracepoint_registers;
f870a310
TT
333 gdbarch_auto_charset_ftype *auto_charset;
334 gdbarch_auto_wide_charset_ftype *auto_wide_charset;
08105857 335 const char * solib_symbols_extension;
ab38a727 336 int has_dos_based_file_system;
6710bf39 337 gdbarch_gen_return_address_ftype *gen_return_address;
3030c96e 338 gdbarch_info_proc_ftype *info_proc;
451b7c33 339 gdbarch_core_info_proc_ftype *core_info_proc;
19630284 340 gdbarch_iterate_over_objfiles_in_search_order_ftype *iterate_over_objfiles_in_search_order;
7e35103a 341 struct ravenscar_arch_ops * ravenscar_ops;
c2170eef
MM
342 gdbarch_insn_is_call_ftype *insn_is_call;
343 gdbarch_insn_is_ret_ftype *insn_is_ret;
344 gdbarch_insn_is_jump_ftype *insn_is_jump;
27a48a92 345 gdbarch_auxv_parse_ftype *auxv_parse;
2faa3447 346 gdbarch_print_auxv_entry_ftype *print_auxv_entry;
3437254d 347 gdbarch_vsyscall_range_ftype *vsyscall_range;
f208eee0 348 gdbarch_infcall_mmap_ftype *infcall_mmap;
7f361056 349 gdbarch_infcall_munmap_ftype *infcall_munmap;
f208eee0 350 gdbarch_gcc_target_options_ftype *gcc_target_options;
ac04f72b 351 gdbarch_gnu_triplet_regexp_ftype *gnu_triplet_regexp;
3374165f 352 gdbarch_addressable_memory_unit_size_ftype *addressable_memory_unit_size;
65b48a81
PB
353 char ** disassembler_options;
354 const disasm_options_t * valid_disassembler_options;
adf40b2e 355};
0f71a2f6 356
66b43ecb 357/* Create a new ``struct gdbarch'' based on information provided by
0963b4bd 358 ``struct gdbarch_info''. */
0f71a2f6
JM
359
360struct gdbarch *
104c1213
JM
361gdbarch_alloc (const struct gdbarch_info *info,
362 struct gdbarch_tdep *tdep)
0f71a2f6 363{
be7811ad 364 struct gdbarch *gdbarch;
aebd7893
AC
365
366 /* Create an obstack for allocating all the per-architecture memory,
367 then use that to allocate the architecture vector. */
70ba0933 368 struct obstack *obstack = XNEW (struct obstack);
aebd7893 369 obstack_init (obstack);
8d749320 370 gdbarch = XOBNEW (obstack, struct gdbarch);
be7811ad
MD
371 memset (gdbarch, 0, sizeof (*gdbarch));
372 gdbarch->obstack = obstack;
0f71a2f6 373
be7811ad 374 alloc_gdbarch_data (gdbarch);
b3cc3077 375
be7811ad 376 gdbarch->tdep = tdep;
0f71a2f6 377
be7811ad
MD
378 gdbarch->bfd_arch_info = info->bfd_arch_info;
379 gdbarch->byte_order = info->byte_order;
9d4fde75 380 gdbarch->byte_order_for_code = info->byte_order_for_code;
be7811ad
MD
381 gdbarch->osabi = info->osabi;
382 gdbarch->target_desc = info->target_desc;
0f71a2f6 383
0963b4bd 384 /* Force the explicit initialization of these. */
32c9a795 385 gdbarch->bits_big_endian = (gdbarch->byte_order == BFD_ENDIAN_BIG);
be7811ad
MD
386 gdbarch->short_bit = 2*TARGET_CHAR_BIT;
387 gdbarch->int_bit = 4*TARGET_CHAR_BIT;
388 gdbarch->long_bit = 4*TARGET_CHAR_BIT;
389 gdbarch->long_long_bit = 2*gdbarch->long_bit;
205c306f 390 gdbarch->long_long_align_bit = 2*gdbarch->long_bit;
f9e9243a 391 gdbarch->half_bit = 2*TARGET_CHAR_BIT;
be7811ad
MD
392 gdbarch->float_bit = 4*TARGET_CHAR_BIT;
393 gdbarch->double_bit = 8*TARGET_CHAR_BIT;
394 gdbarch->long_double_bit = 8*TARGET_CHAR_BIT;
53375380
PA
395 gdbarch->wchar_bit = 4*TARGET_CHAR_BIT;
396 gdbarch->wchar_signed = -1;
9b790ce7 397 gdbarch->floatformat_for_type = default_floatformat_for_type;
be7811ad
MD
398 gdbarch->ptr_bit = gdbarch->int_bit;
399 gdbarch->char_signed = -1;
400 gdbarch->virtual_frame_pointer = legacy_virtual_frame_pointer;
401 gdbarch->num_regs = -1;
402 gdbarch->sp_regnum = -1;
403 gdbarch->pc_regnum = -1;
404 gdbarch->ps_regnum = -1;
405 gdbarch->fp0_regnum = -1;
406 gdbarch->stab_reg_to_regnum = no_op_reg_to_regnum;
407 gdbarch->ecoff_reg_to_regnum = no_op_reg_to_regnum;
be7811ad
MD
408 gdbarch->sdb_reg_to_regnum = no_op_reg_to_regnum;
409 gdbarch->dwarf2_reg_to_regnum = no_op_reg_to_regnum;
410 gdbarch->deprecated_fp_regnum = -1;
411 gdbarch->call_dummy_location = AT_ENTRY_POINT;
7eb89530 412 gdbarch->code_of_frame_writable = default_code_of_frame_writable;
be7811ad 413 gdbarch->print_registers_info = default_print_registers_info;
cc86d1cb 414 gdbarch->print_float_info = default_print_float_info;
be7811ad
MD
415 gdbarch->register_sim_regno = legacy_register_sim_regno;
416 gdbarch->cannot_fetch_register = cannot_register_not;
417 gdbarch->cannot_store_register = cannot_register_not;
418 gdbarch->convert_register_p = generic_convert_register_p;
419 gdbarch->value_from_register = default_value_from_register;
420 gdbarch->pointer_to_address = unsigned_pointer_to_address;
421 gdbarch->address_to_pointer = unsigned_address_to_pointer;
18648a37 422 gdbarch->return_in_first_hidden_param_p = default_return_in_first_hidden_param_p;
22f13eb8 423 gdbarch->breakpoint_from_pc = default_breakpoint_from_pc;
cd6c3b4f 424 gdbarch->sw_breakpoint_from_kind = NULL;
833b7ab5 425 gdbarch->breakpoint_kind_from_current_state = default_breakpoint_kind_from_current_state;
be7811ad
MD
426 gdbarch->memory_insert_breakpoint = default_memory_insert_breakpoint;
427 gdbarch->memory_remove_breakpoint = default_memory_remove_breakpoint;
428 gdbarch->remote_register_number = default_remote_register_number;
429 gdbarch->stabs_argument_has_addr = default_stabs_argument_has_addr;
430 gdbarch->convert_from_func_ptr_addr = convert_from_func_ptr_addr_identity;
431 gdbarch->addr_bits_remove = core_addr_identity;
be7811ad
MD
432 gdbarch->skip_trampoline_code = generic_skip_trampoline_code;
433 gdbarch->skip_solib_resolver = generic_skip_solib_resolver;
434 gdbarch->in_solib_return_trampoline = generic_in_solib_return_trampoline;
c9cf6e20 435 gdbarch->stack_frame_destroyed_p = generic_stack_frame_destroyed_p;
be7811ad 436 gdbarch->coff_make_msymbol_special = default_coff_make_msymbol_special;
3e29f34a
MR
437 gdbarch->make_symbol_special = default_make_symbol_special;
438 gdbarch->adjust_dwarf2_addr = default_adjust_dwarf2_addr;
439 gdbarch->adjust_dwarf2_line = default_adjust_dwarf2_line;
b41c5a85 440 gdbarch->execute_dwarf_cfa_vendor_op = default_execute_dwarf_cfa_vendor_op;
be7811ad 441 gdbarch->register_reggroup_p = default_register_reggroup_p;
ae9bb220 442 gdbarch->skip_permanent_breakpoint = default_skip_permanent_breakpoint;
99e40580 443 gdbarch->displaced_step_hw_singlestep = default_displaced_step_hw_singlestep;
237fc4c9
PA
444 gdbarch->displaced_step_fixup = NULL;
445 gdbarch->displaced_step_free_closure = NULL;
446 gdbarch->displaced_step_location = NULL;
dde08ee1 447 gdbarch->relocate_instruction = NULL;
6c95b8df 448 gdbarch->has_shared_address_space = default_has_shared_address_space;
7a697b8d 449 gdbarch->fast_tracepoint_valid_at = default_fast_tracepoint_valid_at;
5f034a78 450 gdbarch->guess_tracepoint_registers = default_guess_tracepoint_registers;
f870a310
TT
451 gdbarch->auto_charset = default_auto_charset;
452 gdbarch->auto_wide_charset = default_auto_wide_charset;
6710bf39 453 gdbarch->gen_return_address = default_gen_return_address;
19630284 454 gdbarch->iterate_over_objfiles_in_search_order = default_iterate_over_objfiles_in_search_order;
7e35103a 455 gdbarch->ravenscar_ops = NULL;
c2170eef
MM
456 gdbarch->insn_is_call = default_insn_is_call;
457 gdbarch->insn_is_ret = default_insn_is_ret;
458 gdbarch->insn_is_jump = default_insn_is_jump;
2faa3447 459 gdbarch->print_auxv_entry = default_print_auxv_entry;
3437254d 460 gdbarch->vsyscall_range = default_vsyscall_range;
f208eee0 461 gdbarch->infcall_mmap = default_infcall_mmap;
7f361056 462 gdbarch->infcall_munmap = default_infcall_munmap;
f208eee0 463 gdbarch->gcc_target_options = default_gcc_target_options;
ac04f72b 464 gdbarch->gnu_triplet_regexp = default_gnu_triplet_regexp;
3374165f 465 gdbarch->addressable_memory_unit_size = default_addressable_memory_unit_size;
0f71a2f6
JM
466 /* gdbarch_alloc() */
467
be7811ad 468 return gdbarch;
0f71a2f6
JM
469}
470
471
aebd7893
AC
472/* Allocate extra space using the per-architecture obstack. */
473
474void *
475gdbarch_obstack_zalloc (struct gdbarch *arch, long size)
476{
477 void *data = obstack_alloc (arch->obstack, size);
05c547f6 478
aebd7893
AC
479 memset (data, 0, size);
480 return data;
481}
482
6c214e7c
PP
483/* See gdbarch.h. */
484
485char *
486gdbarch_obstack_strdup (struct gdbarch *arch, const char *string)
487{
488 return obstack_strdup (arch->obstack, string);
489}
490
aebd7893 491
058f20d5
JB
492/* Free a gdbarch struct. This should never happen in normal
493 operation --- once you've created a gdbarch, you keep it around.
494 However, if an architecture's init function encounters an error
495 building the structure, it may need to clean up a partially
496 constructed gdbarch. */
4b9b3959 497
058f20d5
JB
498void
499gdbarch_free (struct gdbarch *arch)
500{
aebd7893 501 struct obstack *obstack;
05c547f6 502
95160752 503 gdb_assert (arch != NULL);
aebd7893
AC
504 gdb_assert (!arch->initialized_p);
505 obstack = arch->obstack;
506 obstack_free (obstack, 0); /* Includes the ARCH. */
507 xfree (obstack);
058f20d5
JB
508}
509
510
db446970
AC
511/* Ensure that all values in a GDBARCH are reasonable. */
512
0f71a2f6 513static void
be7811ad 514verify_gdbarch (struct gdbarch *gdbarch)
0f71a2f6 515{
d7e74731 516 string_file log;
05c547f6 517
0f71a2f6 518 /* fundamental */
be7811ad 519 if (gdbarch->byte_order == BFD_ENDIAN_UNKNOWN)
d7e74731 520 log.puts ("\n\tbyte-order");
be7811ad 521 if (gdbarch->bfd_arch_info == NULL)
d7e74731 522 log.puts ("\n\tbfd_arch_info");
0963b4bd 523 /* Check those that need to be defined for the given multi-arch level. */
32c9a795 524 /* Skip verify of bits_big_endian, invalid_p == 0 */
66b43ecb
AC
525 /* Skip verify of short_bit, invalid_p == 0 */
526 /* Skip verify of int_bit, invalid_p == 0 */
527 /* Skip verify of long_bit, invalid_p == 0 */
528 /* Skip verify of long_long_bit, invalid_p == 0 */
205c306f 529 /* Skip verify of long_long_align_bit, invalid_p == 0 */
f9e9243a
UW
530 /* Skip verify of half_bit, invalid_p == 0 */
531 if (gdbarch->half_format == 0)
532 gdbarch->half_format = floatformats_ieee_half;
66b43ecb 533 /* Skip verify of float_bit, invalid_p == 0 */
be7811ad
MD
534 if (gdbarch->float_format == 0)
535 gdbarch->float_format = floatformats_ieee_single;
66b43ecb 536 /* Skip verify of double_bit, invalid_p == 0 */
be7811ad
MD
537 if (gdbarch->double_format == 0)
538 gdbarch->double_format = floatformats_ieee_double;
66b43ecb 539 /* Skip verify of long_double_bit, invalid_p == 0 */
be7811ad
MD
540 if (gdbarch->long_double_format == 0)
541 gdbarch->long_double_format = floatformats_ieee_double;
53375380
PA
542 /* Skip verify of wchar_bit, invalid_p == 0 */
543 if (gdbarch->wchar_signed == -1)
544 gdbarch->wchar_signed = 1;
9b790ce7 545 /* Skip verify of floatformat_for_type, invalid_p == 0 */
66b43ecb 546 /* Skip verify of ptr_bit, invalid_p == 0 */
be7811ad
MD
547 if (gdbarch->addr_bit == 0)
548 gdbarch->addr_bit = gdbarch_ptr_bit (gdbarch);
8da614df
CV
549 if (gdbarch->dwarf2_addr_size == 0)
550 gdbarch->dwarf2_addr_size = gdbarch_ptr_bit (gdbarch) / TARGET_CHAR_BIT;
be7811ad
MD
551 if (gdbarch->char_signed == -1)
552 gdbarch->char_signed = 1;
0963b4bd
MS
553 /* Skip verify of read_pc, has predicate. */
554 /* Skip verify of write_pc, has predicate. */
39d4ef09 555 /* Skip verify of virtual_frame_pointer, invalid_p == 0 */
0963b4bd 556 /* Skip verify of pseudo_register_read, has predicate. */
3543a589 557 /* Skip verify of pseudo_register_read_value, has predicate. */
0963b4bd 558 /* Skip verify of pseudo_register_write, has predicate. */
be7811ad 559 if (gdbarch->num_regs == -1)
d7e74731 560 log.puts ("\n\tnum_regs");
0aba1244 561 /* Skip verify of num_pseudo_regs, invalid_p == 0 */
0963b4bd
MS
562 /* Skip verify of ax_pseudo_register_collect, has predicate. */
563 /* Skip verify of ax_pseudo_register_push_stack, has predicate. */
012b3a21 564 /* Skip verify of handle_segmentation_fault, has predicate. */
1200cd6e 565 /* Skip verify of sp_regnum, invalid_p == 0 */
1200cd6e 566 /* Skip verify of pc_regnum, invalid_p == 0 */
c2169756 567 /* Skip verify of ps_regnum, invalid_p == 0 */
60054393 568 /* Skip verify of fp0_regnum, invalid_p == 0 */
88c72b7d
AC
569 /* Skip verify of stab_reg_to_regnum, invalid_p == 0 */
570 /* Skip verify of ecoff_reg_to_regnum, invalid_p == 0 */
88c72b7d
AC
571 /* Skip verify of sdb_reg_to_regnum, invalid_p == 0 */
572 /* Skip verify of dwarf2_reg_to_regnum, invalid_p == 0 */
be7811ad 573 if (gdbarch->register_name == 0)
d7e74731 574 log.puts ("\n\tregister_name");
0963b4bd
MS
575 /* Skip verify of register_type, has predicate. */
576 /* Skip verify of dummy_id, has predicate. */
f3be58bc 577 /* Skip verify of deprecated_fp_regnum, invalid_p == 0 */
0963b4bd 578 /* Skip verify of push_dummy_call, has predicate. */
b8de8283 579 /* Skip verify of call_dummy_location, invalid_p == 0 */
0963b4bd 580 /* Skip verify of push_dummy_code, has predicate. */
7eb89530 581 /* Skip verify of code_of_frame_writable, invalid_p == 0 */
0ab7a791 582 /* Skip verify of print_registers_info, invalid_p == 0 */
cc86d1cb 583 /* Skip verify of print_float_info, invalid_p == 0 */
0963b4bd 584 /* Skip verify of print_vector_info, has predicate. */
7c7651b2 585 /* Skip verify of register_sim_regno, invalid_p == 0 */
01fb7433
AC
586 /* Skip verify of cannot_fetch_register, invalid_p == 0 */
587 /* Skip verify of cannot_store_register, invalid_p == 0 */
0963b4bd 588 /* Skip verify of get_longjmp_target, has predicate. */
13d01224 589 /* Skip verify of convert_register_p, invalid_p == 0 */
9acbedc0 590 /* Skip verify of value_from_register, invalid_p == 0 */
4478b372
JB
591 /* Skip verify of pointer_to_address, invalid_p == 0 */
592 /* Skip verify of address_to_pointer, invalid_p == 0 */
0963b4bd
MS
593 /* Skip verify of integer_to_address, has predicate. */
594 /* Skip verify of return_value, has predicate. */
18648a37 595 /* Skip verify of return_in_first_hidden_param_p, invalid_p == 0 */
be7811ad 596 if (gdbarch->skip_prologue == 0)
d7e74731 597 log.puts ("\n\tskip_prologue");
0963b4bd 598 /* Skip verify of skip_main_prologue, has predicate. */
591a12a1 599 /* Skip verify of skip_entrypoint, has predicate. */
be7811ad 600 if (gdbarch->inner_than == 0)
d7e74731 601 log.puts ("\n\tinner_than");
22f13eb8 602 /* Skip verify of breakpoint_from_pc, invalid_p == 0 */
cd6c3b4f 603 if (gdbarch->breakpoint_kind_from_pc == 0)
d7e74731 604 log.puts ("\n\tbreakpoint_kind_from_pc");
cd6c3b4f 605 /* Skip verify of sw_breakpoint_from_kind, invalid_p == 0 */
833b7ab5 606 /* Skip verify of breakpoint_kind_from_current_state, invalid_p == 0 */
0963b4bd 607 /* Skip verify of adjust_breakpoint_address, has predicate. */
c0e8c252
AC
608 /* Skip verify of memory_insert_breakpoint, invalid_p == 0 */
609 /* Skip verify of memory_remove_breakpoint, invalid_p == 0 */
71bd6bd4 610 /* Skip verify of decr_pc_after_break, invalid_p == 0 */
782263ab 611 /* Skip verify of deprecated_function_start_offset, invalid_p == 0 */
123dc839 612 /* Skip verify of remote_register_number, invalid_p == 0 */
0963b4bd 613 /* Skip verify of fetch_tls_load_module_address, has predicate. */
5867a2fb 614 /* Skip verify of frame_args_skip, invalid_p == 0 */
0963b4bd
MS
615 /* Skip verify of unwind_pc, has predicate. */
616 /* Skip verify of unwind_sp, has predicate. */
617 /* Skip verify of frame_num_args, has predicate. */
618 /* Skip verify of frame_align, has predicate. */
192cb3d4 619 /* Skip verify of stabs_argument_has_addr, invalid_p == 0 */
f517ea4e 620 /* Skip verify of convert_from_func_ptr_addr, invalid_p == 0 */
875e1767 621 /* Skip verify of addr_bits_remove, invalid_p == 0 */
0963b4bd
MS
622 /* Skip verify of software_single_step, has predicate. */
623 /* Skip verify of single_step_through_delay, has predicate. */
be7811ad 624 if (gdbarch->print_insn == 0)
d7e74731 625 log.puts ("\n\tprint_insn");
bdcd319a 626 /* Skip verify of skip_trampoline_code, invalid_p == 0 */
dea0c52f 627 /* Skip verify of skip_solib_resolver, invalid_p == 0 */
d50355b6 628 /* Skip verify of in_solib_return_trampoline, invalid_p == 0 */
c9cf6e20 629 /* Skip verify of stack_frame_destroyed_p, invalid_p == 0 */
3e29f34a 630 /* Skip verify of elf_make_msymbol_special, has predicate. */
a2cf933a 631 /* Skip verify of coff_make_msymbol_special, invalid_p == 0 */
3e29f34a
MR
632 /* Skip verify of make_symbol_special, invalid_p == 0 */
633 /* Skip verify of adjust_dwarf2_addr, invalid_p == 0 */
634 /* Skip verify of adjust_dwarf2_line, invalid_p == 0 */
c4ed33b9 635 /* Skip verify of cannot_step_breakpoint, invalid_p == 0 */
f74fa174 636 /* Skip verify of have_nonsteppable_watchpoint, invalid_p == 0 */
0963b4bd
MS
637 /* Skip verify of address_class_type_flags, has predicate. */
638 /* Skip verify of address_class_type_flags_to_name, has predicate. */
b41c5a85 639 /* Skip verify of execute_dwarf_cfa_vendor_op, invalid_p == 0 */
0963b4bd 640 /* Skip verify of address_class_name_to_type_flags, has predicate. */
7e20f3fb 641 /* Skip verify of register_reggroup_p, invalid_p == 0 */
0963b4bd 642 /* Skip verify of fetch_pointer_argument, has predicate. */
5aa82d05 643 /* Skip verify of iterate_over_regset_sections, has predicate. */
6432734d 644 /* Skip verify of make_corefile_notes, has predicate. */
b3ac9c77 645 /* Skip verify of elfcore_write_linux_prpsinfo, has predicate. */
35c2fab7 646 /* Skip verify of find_memory_regions, has predicate. */
0963b4bd 647 /* Skip verify of core_xfer_shared_libraries, has predicate. */
356a5233 648 /* Skip verify of core_xfer_shared_libraries_aix, has predicate. */
0963b4bd 649 /* Skip verify of core_pid_to_str, has predicate. */
4dfc5dbc 650 /* Skip verify of core_thread_name, has predicate. */
0963b4bd 651 /* Skip verify of gcore_bfd_target, has predicate. */
0d5de010
DJ
652 /* Skip verify of vtable_function_descriptors, invalid_p == 0 */
653 /* Skip verify of vbit_in_delta, invalid_p == 0 */
ae9bb220 654 /* Skip verify of skip_permanent_breakpoint, invalid_p == 0 */
0963b4bd
MS
655 /* Skip verify of max_insn_length, has predicate. */
656 /* Skip verify of displaced_step_copy_insn, has predicate. */
99e40580 657 /* Skip verify of displaced_step_hw_singlestep, invalid_p == 0 */
0963b4bd 658 /* Skip verify of displaced_step_fixup, has predicate. */
237fc4c9 659 if ((! gdbarch->displaced_step_free_closure) != (! gdbarch->displaced_step_copy_insn))
d7e74731 660 log.puts ("\n\tdisplaced_step_free_closure");
237fc4c9 661 if ((! gdbarch->displaced_step_location) != (! gdbarch->displaced_step_copy_insn))
d7e74731 662 log.puts ("\n\tdisplaced_step_location");
0963b4bd
MS
663 /* Skip verify of relocate_instruction, has predicate. */
664 /* Skip verify of overlay_update, has predicate. */
665 /* Skip verify of core_read_description, has predicate. */
666 /* Skip verify of static_transform_name, has predicate. */
203c3895 667 /* Skip verify of sofun_address_maybe_missing, invalid_p == 0 */
0963b4bd
MS
668 /* Skip verify of process_record, has predicate. */
669 /* Skip verify of process_record_signal, has predicate. */
1f8cf220 670 /* Skip verify of gdb_signal_from_target, has predicate. */
eb14d406 671 /* Skip verify of gdb_signal_to_target, has predicate. */
0963b4bd
MS
672 /* Skip verify of get_siginfo_type, has predicate. */
673 /* Skip verify of record_special_symbol, has predicate. */
674 /* Skip verify of get_syscall_number, has predicate. */
458c8db8
SDJ
675 /* Skip verify of xml_syscall_file, invalid_p == 0 */
676 /* Skip verify of syscalls_info, invalid_p == 0 */
05c0465e
SDJ
677 /* Skip verify of stap_integer_prefixes, invalid_p == 0 */
678 /* Skip verify of stap_integer_suffixes, invalid_p == 0 */
679 /* Skip verify of stap_register_prefixes, invalid_p == 0 */
680 /* Skip verify of stap_register_suffixes, invalid_p == 0 */
681 /* Skip verify of stap_register_indirection_prefixes, invalid_p == 0 */
682 /* Skip verify of stap_register_indirection_suffixes, invalid_p == 0 */
55aa24fb
SDJ
683 /* Skip verify of stap_gdb_register_prefix, invalid_p == 0 */
684 /* Skip verify of stap_gdb_register_suffix, invalid_p == 0 */
685 /* Skip verify of stap_is_single_operand, has predicate. */
686 /* Skip verify of stap_parse_special_token, has predicate. */
8b367e17
JM
687 /* Skip verify of dtrace_parse_probe_argument, has predicate. */
688 /* Skip verify of dtrace_probe_is_enabled, has predicate. */
689 /* Skip verify of dtrace_enable_probe, has predicate. */
690 /* Skip verify of dtrace_disable_probe, has predicate. */
50c71eaf 691 /* Skip verify of has_global_solist, invalid_p == 0 */
2567c7d9 692 /* Skip verify of has_global_breakpoints, invalid_p == 0 */
6c95b8df 693 /* Skip verify of has_shared_address_space, invalid_p == 0 */
7a697b8d 694 /* Skip verify of fast_tracepoint_valid_at, invalid_p == 0 */
5f034a78 695 /* Skip verify of guess_tracepoint_registers, invalid_p == 0 */
f870a310
TT
696 /* Skip verify of auto_charset, invalid_p == 0 */
697 /* Skip verify of auto_wide_charset, invalid_p == 0 */
ab38a727 698 /* Skip verify of has_dos_based_file_system, invalid_p == 0 */
6710bf39 699 /* Skip verify of gen_return_address, invalid_p == 0 */
3030c96e 700 /* Skip verify of info_proc, has predicate. */
451b7c33 701 /* Skip verify of core_info_proc, has predicate. */
19630284 702 /* Skip verify of iterate_over_objfiles_in_search_order, invalid_p == 0 */
7e35103a 703 /* Skip verify of ravenscar_ops, invalid_p == 0 */
c2170eef
MM
704 /* Skip verify of insn_is_call, invalid_p == 0 */
705 /* Skip verify of insn_is_ret, invalid_p == 0 */
706 /* Skip verify of insn_is_jump, invalid_p == 0 */
27a48a92 707 /* Skip verify of auxv_parse, has predicate. */
2faa3447 708 /* Skip verify of print_auxv_entry, invalid_p == 0 */
3437254d 709 /* Skip verify of vsyscall_range, invalid_p == 0 */
f208eee0 710 /* Skip verify of infcall_mmap, invalid_p == 0 */
7f361056 711 /* Skip verify of infcall_munmap, invalid_p == 0 */
f208eee0 712 /* Skip verify of gcc_target_options, invalid_p == 0 */
ac04f72b 713 /* Skip verify of gnu_triplet_regexp, invalid_p == 0 */
3374165f 714 /* Skip verify of addressable_memory_unit_size, invalid_p == 0 */
65b48a81
PB
715 /* Skip verify of disassembler_options, invalid_p == 0 */
716 /* Skip verify of valid_disassembler_options, invalid_p == 0 */
d7e74731 717 if (!log.empty ())
f16a1923 718 internal_error (__FILE__, __LINE__,
e2e0b3e5 719 _("verify_gdbarch: the following are invalid ...%s"),
d7e74731 720 log.c_str ());
0f71a2f6
JM
721}
722
723
0963b4bd 724/* Print out the details of the current architecture. */
0f71a2f6
JM
725
726void
be7811ad 727gdbarch_dump (struct gdbarch *gdbarch, struct ui_file *file)
0f71a2f6 728{
b78960be 729 const char *gdb_nm_file = "<not-defined>";
05c547f6 730
b78960be
AC
731#if defined (GDB_NM_FILE)
732 gdb_nm_file = GDB_NM_FILE;
733#endif
734 fprintf_unfiltered (file,
735 "gdbarch_dump: GDB_NM_FILE = %s\n",
736 gdb_nm_file);
48f7351b
AC
737 fprintf_unfiltered (file,
738 "gdbarch_dump: addr_bit = %s\n",
623d3eb1 739 plongest (gdbarch->addr_bit));
48f7351b 740 fprintf_unfiltered (file,
30737ed9
JB
741 "gdbarch_dump: addr_bits_remove = <%s>\n",
742 host_address_to_string (gdbarch->addr_bits_remove));
7996bcec
AC
743 fprintf_unfiltered (file,
744 "gdbarch_dump: gdbarch_address_class_name_to_type_flags_p() = %d\n",
be7811ad 745 gdbarch_address_class_name_to_type_flags_p (gdbarch));
7996bcec 746 fprintf_unfiltered (file,
30737ed9
JB
747 "gdbarch_dump: address_class_name_to_type_flags = <%s>\n",
748 host_address_to_string (gdbarch->address_class_name_to_type_flags));
48f7351b
AC
749 fprintf_unfiltered (file,
750 "gdbarch_dump: gdbarch_address_class_type_flags_p() = %d\n",
be7811ad 751 gdbarch_address_class_type_flags_p (gdbarch));
48f7351b 752 fprintf_unfiltered (file,
30737ed9
JB
753 "gdbarch_dump: address_class_type_flags = <%s>\n",
754 host_address_to_string (gdbarch->address_class_type_flags));
7996bcec
AC
755 fprintf_unfiltered (file,
756 "gdbarch_dump: gdbarch_address_class_type_flags_to_name_p() = %d\n",
be7811ad 757 gdbarch_address_class_type_flags_to_name_p (gdbarch));
7996bcec 758 fprintf_unfiltered (file,
30737ed9
JB
759 "gdbarch_dump: address_class_type_flags_to_name = <%s>\n",
760 host_address_to_string (gdbarch->address_class_type_flags_to_name));
48f7351b 761 fprintf_unfiltered (file,
30737ed9
JB
762 "gdbarch_dump: address_to_pointer = <%s>\n",
763 host_address_to_string (gdbarch->address_to_pointer));
3374165f
SM
764 fprintf_unfiltered (file,
765 "gdbarch_dump: addressable_memory_unit_size = <%s>\n",
766 host_address_to_string (gdbarch->addressable_memory_unit_size));
a1131521
KB
767 fprintf_unfiltered (file,
768 "gdbarch_dump: gdbarch_adjust_breakpoint_address_p() = %d\n",
be7811ad 769 gdbarch_adjust_breakpoint_address_p (gdbarch));
a1131521 770 fprintf_unfiltered (file,
30737ed9
JB
771 "gdbarch_dump: adjust_breakpoint_address = <%s>\n",
772 host_address_to_string (gdbarch->adjust_breakpoint_address));
3e29f34a
MR
773 fprintf_unfiltered (file,
774 "gdbarch_dump: adjust_dwarf2_addr = <%s>\n",
775 host_address_to_string (gdbarch->adjust_dwarf2_addr));
776 fprintf_unfiltered (file,
777 "gdbarch_dump: adjust_dwarf2_line = <%s>\n",
778 host_address_to_string (gdbarch->adjust_dwarf2_line));
f870a310
TT
779 fprintf_unfiltered (file,
780 "gdbarch_dump: auto_charset = <%s>\n",
781 host_address_to_string (gdbarch->auto_charset));
782 fprintf_unfiltered (file,
783 "gdbarch_dump: auto_wide_charset = <%s>\n",
784 host_address_to_string (gdbarch->auto_wide_charset));
27a48a92
MK
785 fprintf_unfiltered (file,
786 "gdbarch_dump: gdbarch_auxv_parse_p() = %d\n",
787 gdbarch_auxv_parse_p (gdbarch));
788 fprintf_unfiltered (file,
789 "gdbarch_dump: auxv_parse = <%s>\n",
790 host_address_to_string (gdbarch->auxv_parse));
175ff332
HZ
791 fprintf_unfiltered (file,
792 "gdbarch_dump: gdbarch_ax_pseudo_register_collect_p() = %d\n",
793 gdbarch_ax_pseudo_register_collect_p (gdbarch));
794 fprintf_unfiltered (file,
795 "gdbarch_dump: ax_pseudo_register_collect = <%s>\n",
796 host_address_to_string (gdbarch->ax_pseudo_register_collect));
797 fprintf_unfiltered (file,
798 "gdbarch_dump: gdbarch_ax_pseudo_register_push_stack_p() = %d\n",
799 gdbarch_ax_pseudo_register_push_stack_p (gdbarch));
800 fprintf_unfiltered (file,
801 "gdbarch_dump: ax_pseudo_register_push_stack = <%s>\n",
802 host_address_to_string (gdbarch->ax_pseudo_register_push_stack));
48f7351b
AC
803 fprintf_unfiltered (file,
804 "gdbarch_dump: believe_pcc_promotion = %s\n",
623d3eb1 805 plongest (gdbarch->believe_pcc_promotion));
283354d8 806 fprintf_unfiltered (file,
48f7351b 807 "gdbarch_dump: bfd_arch_info = %s\n",
be7811ad 808 gdbarch_bfd_arch_info (gdbarch)->printable_name);
32c9a795
MD
809 fprintf_unfiltered (file,
810 "gdbarch_dump: bits_big_endian = %s\n",
623d3eb1 811 plongest (gdbarch->bits_big_endian));
48f7351b 812 fprintf_unfiltered (file,
30737ed9
JB
813 "gdbarch_dump: breakpoint_from_pc = <%s>\n",
814 host_address_to_string (gdbarch->breakpoint_from_pc));
833b7ab5
YQ
815 fprintf_unfiltered (file,
816 "gdbarch_dump: breakpoint_kind_from_current_state = <%s>\n",
817 host_address_to_string (gdbarch->breakpoint_kind_from_current_state));
cd6c3b4f
YQ
818 fprintf_unfiltered (file,
819 "gdbarch_dump: breakpoint_kind_from_pc = <%s>\n",
820 host_address_to_string (gdbarch->breakpoint_kind_from_pc));
48f7351b
AC
821 fprintf_unfiltered (file,
822 "gdbarch_dump: byte_order = %s\n",
623d3eb1 823 plongest (gdbarch->byte_order));
9d4fde75
SS
824 fprintf_unfiltered (file,
825 "gdbarch_dump: byte_order_for_code = %s\n",
623d3eb1 826 plongest (gdbarch->byte_order_for_code));
48f7351b
AC
827 fprintf_unfiltered (file,
828 "gdbarch_dump: call_dummy_location = %s\n",
623d3eb1 829 plongest (gdbarch->call_dummy_location));
48f7351b 830 fprintf_unfiltered (file,
30737ed9
JB
831 "gdbarch_dump: cannot_fetch_register = <%s>\n",
832 host_address_to_string (gdbarch->cannot_fetch_register));
48f7351b
AC
833 fprintf_unfiltered (file,
834 "gdbarch_dump: cannot_step_breakpoint = %s\n",
623d3eb1 835 plongest (gdbarch->cannot_step_breakpoint));
48f7351b 836 fprintf_unfiltered (file,
30737ed9
JB
837 "gdbarch_dump: cannot_store_register = <%s>\n",
838 host_address_to_string (gdbarch->cannot_store_register));
48f7351b
AC
839 fprintf_unfiltered (file,
840 "gdbarch_dump: char_signed = %s\n",
623d3eb1 841 plongest (gdbarch->char_signed));
7eb89530
YQ
842 fprintf_unfiltered (file,
843 "gdbarch_dump: code_of_frame_writable = <%s>\n",
844 host_address_to_string (gdbarch->code_of_frame_writable));
7996bcec 845 fprintf_unfiltered (file,
30737ed9
JB
846 "gdbarch_dump: coff_make_msymbol_special = <%s>\n",
847 host_address_to_string (gdbarch->coff_make_msymbol_special));
a2428dbe 848 fprintf_unfiltered (file,
30737ed9
JB
849 "gdbarch_dump: convert_from_func_ptr_addr = <%s>\n",
850 host_address_to_string (gdbarch->convert_from_func_ptr_addr));
48f7351b 851 fprintf_unfiltered (file,
30737ed9
JB
852 "gdbarch_dump: convert_register_p = <%s>\n",
853 host_address_to_string (gdbarch->convert_register_p));
451b7c33
TT
854 fprintf_unfiltered (file,
855 "gdbarch_dump: gdbarch_core_info_proc_p() = %d\n",
856 gdbarch_core_info_proc_p (gdbarch));
857 fprintf_unfiltered (file,
858 "gdbarch_dump: core_info_proc = <%s>\n",
859 host_address_to_string (gdbarch->core_info_proc));
28439f5e
PA
860 fprintf_unfiltered (file,
861 "gdbarch_dump: gdbarch_core_pid_to_str_p() = %d\n",
862 gdbarch_core_pid_to_str_p (gdbarch));
863 fprintf_unfiltered (file,
864 "gdbarch_dump: core_pid_to_str = <%s>\n",
865 host_address_to_string (gdbarch->core_pid_to_str));
4eb0ad19
DJ
866 fprintf_unfiltered (file,
867 "gdbarch_dump: gdbarch_core_read_description_p() = %d\n",
be7811ad 868 gdbarch_core_read_description_p (gdbarch));
4eb0ad19 869 fprintf_unfiltered (file,
30737ed9
JB
870 "gdbarch_dump: core_read_description = <%s>\n",
871 host_address_to_string (gdbarch->core_read_description));
4dfc5dbc
JB
872 fprintf_unfiltered (file,
873 "gdbarch_dump: gdbarch_core_thread_name_p() = %d\n",
874 gdbarch_core_thread_name_p (gdbarch));
875 fprintf_unfiltered (file,
876 "gdbarch_dump: core_thread_name = <%s>\n",
877 host_address_to_string (gdbarch->core_thread_name));
de584861
PA
878 fprintf_unfiltered (file,
879 "gdbarch_dump: gdbarch_core_xfer_shared_libraries_p() = %d\n",
be7811ad 880 gdbarch_core_xfer_shared_libraries_p (gdbarch));
de584861 881 fprintf_unfiltered (file,
30737ed9
JB
882 "gdbarch_dump: core_xfer_shared_libraries = <%s>\n",
883 host_address_to_string (gdbarch->core_xfer_shared_libraries));
356a5233
JB
884 fprintf_unfiltered (file,
885 "gdbarch_dump: gdbarch_core_xfer_shared_libraries_aix_p() = %d\n",
886 gdbarch_core_xfer_shared_libraries_aix_p (gdbarch));
887 fprintf_unfiltered (file,
888 "gdbarch_dump: core_xfer_shared_libraries_aix = <%s>\n",
889 host_address_to_string (gdbarch->core_xfer_shared_libraries_aix));
48f7351b 890 fprintf_unfiltered (file,
0b1553bc
UW
891 "gdbarch_dump: decr_pc_after_break = %s\n",
892 core_addr_to_string_nz (gdbarch->decr_pc_after_break));
48f7351b
AC
893 fprintf_unfiltered (file,
894 "gdbarch_dump: deprecated_fp_regnum = %s\n",
623d3eb1 895 plongest (gdbarch->deprecated_fp_regnum));
48f7351b 896 fprintf_unfiltered (file,
0b1553bc
UW
897 "gdbarch_dump: deprecated_function_start_offset = %s\n",
898 core_addr_to_string_nz (gdbarch->deprecated_function_start_offset));
65b48a81
PB
899 fprintf_unfiltered (file,
900 "gdbarch_dump: disassembler_options = %s\n",
f7bb4e3a 901 pstring_ptr (gdbarch->disassembler_options));
237fc4c9
PA
902 fprintf_unfiltered (file,
903 "gdbarch_dump: gdbarch_displaced_step_copy_insn_p() = %d\n",
904 gdbarch_displaced_step_copy_insn_p (gdbarch));
905 fprintf_unfiltered (file,
30737ed9
JB
906 "gdbarch_dump: displaced_step_copy_insn = <%s>\n",
907 host_address_to_string (gdbarch->displaced_step_copy_insn));
237fc4c9
PA
908 fprintf_unfiltered (file,
909 "gdbarch_dump: gdbarch_displaced_step_fixup_p() = %d\n",
910 gdbarch_displaced_step_fixup_p (gdbarch));
911 fprintf_unfiltered (file,
30737ed9
JB
912 "gdbarch_dump: displaced_step_fixup = <%s>\n",
913 host_address_to_string (gdbarch->displaced_step_fixup));
237fc4c9 914 fprintf_unfiltered (file,
30737ed9
JB
915 "gdbarch_dump: displaced_step_free_closure = <%s>\n",
916 host_address_to_string (gdbarch->displaced_step_free_closure));
99e40580
UW
917 fprintf_unfiltered (file,
918 "gdbarch_dump: displaced_step_hw_singlestep = <%s>\n",
919 host_address_to_string (gdbarch->displaced_step_hw_singlestep));
237fc4c9 920 fprintf_unfiltered (file,
30737ed9
JB
921 "gdbarch_dump: displaced_step_location = <%s>\n",
922 host_address_to_string (gdbarch->displaced_step_location));
48f7351b
AC
923 fprintf_unfiltered (file,
924 "gdbarch_dump: double_bit = %s\n",
623d3eb1 925 plongest (gdbarch->double_bit));
a2428dbe 926 fprintf_unfiltered (file,
48f7351b 927 "gdbarch_dump: double_format = %s\n",
be7811ad 928 pformat (gdbarch->double_format));
8b367e17
JM
929 fprintf_unfiltered (file,
930 "gdbarch_dump: gdbarch_dtrace_disable_probe_p() = %d\n",
931 gdbarch_dtrace_disable_probe_p (gdbarch));
932 fprintf_unfiltered (file,
933 "gdbarch_dump: dtrace_disable_probe = <%s>\n",
934 host_address_to_string (gdbarch->dtrace_disable_probe));
935 fprintf_unfiltered (file,
936 "gdbarch_dump: gdbarch_dtrace_enable_probe_p() = %d\n",
937 gdbarch_dtrace_enable_probe_p (gdbarch));
938 fprintf_unfiltered (file,
939 "gdbarch_dump: dtrace_enable_probe = <%s>\n",
940 host_address_to_string (gdbarch->dtrace_enable_probe));
941 fprintf_unfiltered (file,
942 "gdbarch_dump: gdbarch_dtrace_parse_probe_argument_p() = %d\n",
943 gdbarch_dtrace_parse_probe_argument_p (gdbarch));
944 fprintf_unfiltered (file,
945 "gdbarch_dump: dtrace_parse_probe_argument = <%s>\n",
946 host_address_to_string (gdbarch->dtrace_parse_probe_argument));
947 fprintf_unfiltered (file,
948 "gdbarch_dump: gdbarch_dtrace_probe_is_enabled_p() = %d\n",
949 gdbarch_dtrace_probe_is_enabled_p (gdbarch));
950 fprintf_unfiltered (file,
951 "gdbarch_dump: dtrace_probe_is_enabled = <%s>\n",
952 host_address_to_string (gdbarch->dtrace_probe_is_enabled));
669fac23
DJ
953 fprintf_unfiltered (file,
954 "gdbarch_dump: gdbarch_dummy_id_p() = %d\n",
955 gdbarch_dummy_id_p (gdbarch));
956 fprintf_unfiltered (file,
30737ed9
JB
957 "gdbarch_dump: dummy_id = <%s>\n",
958 host_address_to_string (gdbarch->dummy_id));
8da614df
CV
959 fprintf_unfiltered (file,
960 "gdbarch_dump: dwarf2_addr_size = %s\n",
961 plongest (gdbarch->dwarf2_addr_size));
48f7351b 962 fprintf_unfiltered (file,
30737ed9
JB
963 "gdbarch_dump: dwarf2_reg_to_regnum = <%s>\n",
964 host_address_to_string (gdbarch->dwarf2_reg_to_regnum));
48f7351b 965 fprintf_unfiltered (file,
30737ed9
JB
966 "gdbarch_dump: ecoff_reg_to_regnum = <%s>\n",
967 host_address_to_string (gdbarch->ecoff_reg_to_regnum));
3e29f34a
MR
968 fprintf_unfiltered (file,
969 "gdbarch_dump: gdbarch_elf_make_msymbol_special_p() = %d\n",
970 gdbarch_elf_make_msymbol_special_p (gdbarch));
48f7351b 971 fprintf_unfiltered (file,
30737ed9
JB
972 "gdbarch_dump: elf_make_msymbol_special = <%s>\n",
973 host_address_to_string (gdbarch->elf_make_msymbol_special));
b3ac9c77
SDJ
974 fprintf_unfiltered (file,
975 "gdbarch_dump: gdbarch_elfcore_write_linux_prpsinfo_p() = %d\n",
976 gdbarch_elfcore_write_linux_prpsinfo_p (gdbarch));
977 fprintf_unfiltered (file,
978 "gdbarch_dump: elfcore_write_linux_prpsinfo = <%s>\n",
979 host_address_to_string (gdbarch->elfcore_write_linux_prpsinfo));
b41c5a85
JW
980 fprintf_unfiltered (file,
981 "gdbarch_dump: execute_dwarf_cfa_vendor_op = <%s>\n",
982 host_address_to_string (gdbarch->execute_dwarf_cfa_vendor_op));
7a697b8d
SS
983 fprintf_unfiltered (file,
984 "gdbarch_dump: fast_tracepoint_valid_at = <%s>\n",
985 host_address_to_string (gdbarch->fast_tracepoint_valid_at));
48f7351b
AC
986 fprintf_unfiltered (file,
987 "gdbarch_dump: gdbarch_fetch_pointer_argument_p() = %d\n",
be7811ad 988 gdbarch_fetch_pointer_argument_p (gdbarch));
48f7351b 989 fprintf_unfiltered (file,
30737ed9
JB
990 "gdbarch_dump: fetch_pointer_argument = <%s>\n",
991 host_address_to_string (gdbarch->fetch_pointer_argument));
b2756930
KB
992 fprintf_unfiltered (file,
993 "gdbarch_dump: gdbarch_fetch_tls_load_module_address_p() = %d\n",
be7811ad 994 gdbarch_fetch_tls_load_module_address_p (gdbarch));
b2756930 995 fprintf_unfiltered (file,
30737ed9
JB
996 "gdbarch_dump: fetch_tls_load_module_address = <%s>\n",
997 host_address_to_string (gdbarch->fetch_tls_load_module_address));
35c2fab7
UW
998 fprintf_unfiltered (file,
999 "gdbarch_dump: gdbarch_find_memory_regions_p() = %d\n",
1000 gdbarch_find_memory_regions_p (gdbarch));
1001 fprintf_unfiltered (file,
1002 "gdbarch_dump: find_memory_regions = <%s>\n",
1003 host_address_to_string (gdbarch->find_memory_regions));
48f7351b
AC
1004 fprintf_unfiltered (file,
1005 "gdbarch_dump: float_bit = %s\n",
623d3eb1 1006 plongest (gdbarch->float_bit));
a2428dbe 1007 fprintf_unfiltered (file,
48f7351b 1008 "gdbarch_dump: float_format = %s\n",
be7811ad 1009 pformat (gdbarch->float_format));
9b790ce7
UW
1010 fprintf_unfiltered (file,
1011 "gdbarch_dump: floatformat_for_type = <%s>\n",
1012 host_address_to_string (gdbarch->floatformat_for_type));
48f7351b
AC
1013 fprintf_unfiltered (file,
1014 "gdbarch_dump: fp0_regnum = %s\n",
623d3eb1 1015 plongest (gdbarch->fp0_regnum));
a2428dbe
AC
1016 fprintf_unfiltered (file,
1017 "gdbarch_dump: gdbarch_frame_align_p() = %d\n",
be7811ad 1018 gdbarch_frame_align_p (gdbarch));
a2428dbe 1019 fprintf_unfiltered (file,
30737ed9
JB
1020 "gdbarch_dump: frame_align = <%s>\n",
1021 host_address_to_string (gdbarch->frame_align));
48f7351b 1022 fprintf_unfiltered (file,
0b1553bc
UW
1023 "gdbarch_dump: frame_args_skip = %s\n",
1024 core_addr_to_string_nz (gdbarch->frame_args_skip));
48f7351b
AC
1025 fprintf_unfiltered (file,
1026 "gdbarch_dump: gdbarch_frame_num_args_p() = %d\n",
be7811ad 1027 gdbarch_frame_num_args_p (gdbarch));
48f7351b 1028 fprintf_unfiltered (file,
30737ed9
JB
1029 "gdbarch_dump: frame_num_args = <%s>\n",
1030 host_address_to_string (gdbarch->frame_num_args));
48f7351b
AC
1031 fprintf_unfiltered (file,
1032 "gdbarch_dump: frame_red_zone_size = %s\n",
623d3eb1 1033 plongest (gdbarch->frame_red_zone_size));
f208eee0
JK
1034 fprintf_unfiltered (file,
1035 "gdbarch_dump: gcc_target_options = <%s>\n",
1036 host_address_to_string (gdbarch->gcc_target_options));
a78c2d62
UW
1037 fprintf_unfiltered (file,
1038 "gdbarch_dump: gdbarch_gcore_bfd_target_p() = %d\n",
1039 gdbarch_gcore_bfd_target_p (gdbarch));
1040 fprintf_unfiltered (file,
1041 "gdbarch_dump: gcore_bfd_target = %s\n",
86ba1042 1042 pstring (gdbarch->gcore_bfd_target));
1f8cf220
PA
1043 fprintf_unfiltered (file,
1044 "gdbarch_dump: gdbarch_gdb_signal_from_target_p() = %d\n",
1045 gdbarch_gdb_signal_from_target_p (gdbarch));
2ea28649 1046 fprintf_unfiltered (file,
22203bbf
PA
1047 "gdbarch_dump: gdb_signal_from_target = <%s>\n",
1048 host_address_to_string (gdbarch->gdb_signal_from_target));
eb14d406
SDJ
1049 fprintf_unfiltered (file,
1050 "gdbarch_dump: gdbarch_gdb_signal_to_target_p() = %d\n",
1051 gdbarch_gdb_signal_to_target_p (gdbarch));
1052 fprintf_unfiltered (file,
1053 "gdbarch_dump: gdb_signal_to_target = <%s>\n",
1054 host_address_to_string (gdbarch->gdb_signal_to_target));
6710bf39
SS
1055 fprintf_unfiltered (file,
1056 "gdbarch_dump: gen_return_address = <%s>\n",
1057 host_address_to_string (gdbarch->gen_return_address));
48f7351b
AC
1058 fprintf_unfiltered (file,
1059 "gdbarch_dump: gdbarch_get_longjmp_target_p() = %d\n",
be7811ad 1060 gdbarch_get_longjmp_target_p (gdbarch));
48f7351b 1061 fprintf_unfiltered (file,
30737ed9
JB
1062 "gdbarch_dump: get_longjmp_target = <%s>\n",
1063 host_address_to_string (gdbarch->get_longjmp_target));
4aa995e1
PA
1064 fprintf_unfiltered (file,
1065 "gdbarch_dump: gdbarch_get_siginfo_type_p() = %d\n",
1066 gdbarch_get_siginfo_type_p (gdbarch));
1067 fprintf_unfiltered (file,
315aef0a
PA
1068 "gdbarch_dump: get_siginfo_type = <%s>\n",
1069 host_address_to_string (gdbarch->get_siginfo_type));
a96d9b2e
SDJ
1070 fprintf_unfiltered (file,
1071 "gdbarch_dump: gdbarch_get_syscall_number_p() = %d\n",
1072 gdbarch_get_syscall_number_p (gdbarch));
1073 fprintf_unfiltered (file,
1074 "gdbarch_dump: get_syscall_number = <%s>\n",
1075 host_address_to_string (gdbarch->get_syscall_number));
ac04f72b
TT
1076 fprintf_unfiltered (file,
1077 "gdbarch_dump: gnu_triplet_regexp = <%s>\n",
1078 host_address_to_string (gdbarch->gnu_triplet_regexp));
5f034a78
MK
1079 fprintf_unfiltered (file,
1080 "gdbarch_dump: guess_tracepoint_registers = <%s>\n",
1081 host_address_to_string (gdbarch->guess_tracepoint_registers));
f9e9243a
UW
1082 fprintf_unfiltered (file,
1083 "gdbarch_dump: half_bit = %s\n",
1084 plongest (gdbarch->half_bit));
1085 fprintf_unfiltered (file,
1086 "gdbarch_dump: half_format = %s\n",
1087 pformat (gdbarch->half_format));
012b3a21
WT
1088 fprintf_unfiltered (file,
1089 "gdbarch_dump: gdbarch_handle_segmentation_fault_p() = %d\n",
1090 gdbarch_handle_segmentation_fault_p (gdbarch));
1091 fprintf_unfiltered (file,
1092 "gdbarch_dump: handle_segmentation_fault = <%s>\n",
1093 host_address_to_string (gdbarch->handle_segmentation_fault));
ab38a727
PA
1094 fprintf_unfiltered (file,
1095 "gdbarch_dump: has_dos_based_file_system = %s\n",
1096 plongest (gdbarch->has_dos_based_file_system));
2567c7d9
PA
1097 fprintf_unfiltered (file,
1098 "gdbarch_dump: has_global_breakpoints = %s\n",
1099 plongest (gdbarch->has_global_breakpoints));
50c71eaf
PA
1100 fprintf_unfiltered (file,
1101 "gdbarch_dump: has_global_solist = %s\n",
1102 plongest (gdbarch->has_global_solist));
6c95b8df
PA
1103 fprintf_unfiltered (file,
1104 "gdbarch_dump: has_shared_address_space = <%s>\n",
1105 host_address_to_string (gdbarch->has_shared_address_space));
a2428dbe 1106 fprintf_unfiltered (file,
48f7351b 1107 "gdbarch_dump: have_nonsteppable_watchpoint = %s\n",
623d3eb1 1108 plongest (gdbarch->have_nonsteppable_watchpoint));
48f7351b 1109 fprintf_unfiltered (file,
30737ed9
JB
1110 "gdbarch_dump: in_solib_return_trampoline = <%s>\n",
1111 host_address_to_string (gdbarch->in_solib_return_trampoline));
f208eee0
JK
1112 fprintf_unfiltered (file,
1113 "gdbarch_dump: infcall_mmap = <%s>\n",
1114 host_address_to_string (gdbarch->infcall_mmap));
7f361056
JK
1115 fprintf_unfiltered (file,
1116 "gdbarch_dump: infcall_munmap = <%s>\n",
1117 host_address_to_string (gdbarch->infcall_munmap));
3030c96e
UW
1118 fprintf_unfiltered (file,
1119 "gdbarch_dump: gdbarch_info_proc_p() = %d\n",
1120 gdbarch_info_proc_p (gdbarch));
1121 fprintf_unfiltered (file,
1122 "gdbarch_dump: info_proc = <%s>\n",
1123 host_address_to_string (gdbarch->info_proc));
48f7351b 1124 fprintf_unfiltered (file,
30737ed9
JB
1125 "gdbarch_dump: inner_than = <%s>\n",
1126 host_address_to_string (gdbarch->inner_than));
c2170eef
MM
1127 fprintf_unfiltered (file,
1128 "gdbarch_dump: insn_is_call = <%s>\n",
1129 host_address_to_string (gdbarch->insn_is_call));
1130 fprintf_unfiltered (file,
1131 "gdbarch_dump: insn_is_jump = <%s>\n",
1132 host_address_to_string (gdbarch->insn_is_jump));
1133 fprintf_unfiltered (file,
1134 "gdbarch_dump: insn_is_ret = <%s>\n",
1135 host_address_to_string (gdbarch->insn_is_ret));
48f7351b
AC
1136 fprintf_unfiltered (file,
1137 "gdbarch_dump: int_bit = %s\n",
623d3eb1 1138 plongest (gdbarch->int_bit));
48f7351b
AC
1139 fprintf_unfiltered (file,
1140 "gdbarch_dump: gdbarch_integer_to_address_p() = %d\n",
be7811ad 1141 gdbarch_integer_to_address_p (gdbarch));
48f7351b 1142 fprintf_unfiltered (file,
30737ed9
JB
1143 "gdbarch_dump: integer_to_address = <%s>\n",
1144 host_address_to_string (gdbarch->integer_to_address));
19630284
JB
1145 fprintf_unfiltered (file,
1146 "gdbarch_dump: iterate_over_objfiles_in_search_order = <%s>\n",
1147 host_address_to_string (gdbarch->iterate_over_objfiles_in_search_order));
5aa82d05
AA
1148 fprintf_unfiltered (file,
1149 "gdbarch_dump: gdbarch_iterate_over_regset_sections_p() = %d\n",
1150 gdbarch_iterate_over_regset_sections_p (gdbarch));
1151 fprintf_unfiltered (file,
1152 "gdbarch_dump: iterate_over_regset_sections = <%s>\n",
1153 host_address_to_string (gdbarch->iterate_over_regset_sections));
48f7351b
AC
1154 fprintf_unfiltered (file,
1155 "gdbarch_dump: long_bit = %s\n",
623d3eb1 1156 plongest (gdbarch->long_bit));
48f7351b
AC
1157 fprintf_unfiltered (file,
1158 "gdbarch_dump: long_double_bit = %s\n",
623d3eb1 1159 plongest (gdbarch->long_double_bit));
a2428dbe 1160 fprintf_unfiltered (file,
48f7351b 1161 "gdbarch_dump: long_double_format = %s\n",
be7811ad 1162 pformat (gdbarch->long_double_format));
205c306f
DM
1163 fprintf_unfiltered (file,
1164 "gdbarch_dump: long_long_align_bit = %s\n",
1165 plongest (gdbarch->long_long_align_bit));
48f7351b
AC
1166 fprintf_unfiltered (file,
1167 "gdbarch_dump: long_long_bit = %s\n",
623d3eb1 1168 plongest (gdbarch->long_long_bit));
6432734d
UW
1169 fprintf_unfiltered (file,
1170 "gdbarch_dump: gdbarch_make_corefile_notes_p() = %d\n",
1171 gdbarch_make_corefile_notes_p (gdbarch));
1172 fprintf_unfiltered (file,
1173 "gdbarch_dump: make_corefile_notes = <%s>\n",
1174 host_address_to_string (gdbarch->make_corefile_notes));
3e29f34a
MR
1175 fprintf_unfiltered (file,
1176 "gdbarch_dump: make_symbol_special = <%s>\n",
1177 host_address_to_string (gdbarch->make_symbol_special));
237fc4c9
PA
1178 fprintf_unfiltered (file,
1179 "gdbarch_dump: gdbarch_max_insn_length_p() = %d\n",
1180 gdbarch_max_insn_length_p (gdbarch));
1181 fprintf_unfiltered (file,
1182 "gdbarch_dump: max_insn_length = %s\n",
623d3eb1 1183 plongest (gdbarch->max_insn_length));
48f7351b 1184 fprintf_unfiltered (file,
30737ed9
JB
1185 "gdbarch_dump: memory_insert_breakpoint = <%s>\n",
1186 host_address_to_string (gdbarch->memory_insert_breakpoint));
48f7351b 1187 fprintf_unfiltered (file,
30737ed9
JB
1188 "gdbarch_dump: memory_remove_breakpoint = <%s>\n",
1189 host_address_to_string (gdbarch->memory_remove_breakpoint));
48f7351b
AC
1190 fprintf_unfiltered (file,
1191 "gdbarch_dump: num_pseudo_regs = %s\n",
623d3eb1 1192 plongest (gdbarch->num_pseudo_regs));
48f7351b
AC
1193 fprintf_unfiltered (file,
1194 "gdbarch_dump: num_regs = %s\n",
623d3eb1 1195 plongest (gdbarch->num_regs));
48f7351b
AC
1196 fprintf_unfiltered (file,
1197 "gdbarch_dump: osabi = %s\n",
623d3eb1 1198 plongest (gdbarch->osabi));
1c772458
UW
1199 fprintf_unfiltered (file,
1200 "gdbarch_dump: gdbarch_overlay_update_p() = %d\n",
be7811ad 1201 gdbarch_overlay_update_p (gdbarch));
1c772458 1202 fprintf_unfiltered (file,
30737ed9
JB
1203 "gdbarch_dump: overlay_update = <%s>\n",
1204 host_address_to_string (gdbarch->overlay_update));
48f7351b
AC
1205 fprintf_unfiltered (file,
1206 "gdbarch_dump: pc_regnum = %s\n",
623d3eb1 1207 plongest (gdbarch->pc_regnum));
48f7351b 1208 fprintf_unfiltered (file,
30737ed9
JB
1209 "gdbarch_dump: pointer_to_address = <%s>\n",
1210 host_address_to_string (gdbarch->pointer_to_address));
2faa3447
JB
1211 fprintf_unfiltered (file,
1212 "gdbarch_dump: print_auxv_entry = <%s>\n",
1213 host_address_to_string (gdbarch->print_auxv_entry));
7996bcec 1214 fprintf_unfiltered (file,
30737ed9
JB
1215 "gdbarch_dump: print_float_info = <%s>\n",
1216 host_address_to_string (gdbarch->print_float_info));
7996bcec 1217 fprintf_unfiltered (file,
30737ed9
JB
1218 "gdbarch_dump: print_insn = <%s>\n",
1219 host_address_to_string (gdbarch->print_insn));
48f7351b 1220 fprintf_unfiltered (file,
30737ed9
JB
1221 "gdbarch_dump: print_registers_info = <%s>\n",
1222 host_address_to_string (gdbarch->print_registers_info));
7996bcec
AC
1223 fprintf_unfiltered (file,
1224 "gdbarch_dump: gdbarch_print_vector_info_p() = %d\n",
be7811ad 1225 gdbarch_print_vector_info_p (gdbarch));
7996bcec 1226 fprintf_unfiltered (file,
30737ed9
JB
1227 "gdbarch_dump: print_vector_info = <%s>\n",
1228 host_address_to_string (gdbarch->print_vector_info));
0508c3ec
HZ
1229 fprintf_unfiltered (file,
1230 "gdbarch_dump: gdbarch_process_record_p() = %d\n",
1231 gdbarch_process_record_p (gdbarch));
1232 fprintf_unfiltered (file,
1233 "gdbarch_dump: process_record = <%s>\n",
1234 host_address_to_string (gdbarch->process_record));
3846b520
HZ
1235 fprintf_unfiltered (file,
1236 "gdbarch_dump: gdbarch_process_record_signal_p() = %d\n",
1237 gdbarch_process_record_signal_p (gdbarch));
1238 fprintf_unfiltered (file,
1239 "gdbarch_dump: process_record_signal = <%s>\n",
1240 host_address_to_string (gdbarch->process_record_signal));
48f7351b
AC
1241 fprintf_unfiltered (file,
1242 "gdbarch_dump: ps_regnum = %s\n",
623d3eb1 1243 plongest (gdbarch->ps_regnum));
a2428dbe
AC
1244 fprintf_unfiltered (file,
1245 "gdbarch_dump: gdbarch_pseudo_register_read_p() = %d\n",
be7811ad 1246 gdbarch_pseudo_register_read_p (gdbarch));
a2428dbe 1247 fprintf_unfiltered (file,
30737ed9
JB
1248 "gdbarch_dump: pseudo_register_read = <%s>\n",
1249 host_address_to_string (gdbarch->pseudo_register_read));
3543a589
TT
1250 fprintf_unfiltered (file,
1251 "gdbarch_dump: gdbarch_pseudo_register_read_value_p() = %d\n",
1252 gdbarch_pseudo_register_read_value_p (gdbarch));
1253 fprintf_unfiltered (file,
1254 "gdbarch_dump: pseudo_register_read_value = <%s>\n",
1255 host_address_to_string (gdbarch->pseudo_register_read_value));
a2428dbe
AC
1256 fprintf_unfiltered (file,
1257 "gdbarch_dump: gdbarch_pseudo_register_write_p() = %d\n",
be7811ad 1258 gdbarch_pseudo_register_write_p (gdbarch));
a2428dbe 1259 fprintf_unfiltered (file,
30737ed9
JB
1260 "gdbarch_dump: pseudo_register_write = <%s>\n",
1261 host_address_to_string (gdbarch->pseudo_register_write));
48f7351b
AC
1262 fprintf_unfiltered (file,
1263 "gdbarch_dump: ptr_bit = %s\n",
623d3eb1 1264 plongest (gdbarch->ptr_bit));
7996bcec
AC
1265 fprintf_unfiltered (file,
1266 "gdbarch_dump: gdbarch_push_dummy_call_p() = %d\n",
be7811ad 1267 gdbarch_push_dummy_call_p (gdbarch));
7996bcec 1268 fprintf_unfiltered (file,
30737ed9
JB
1269 "gdbarch_dump: push_dummy_call = <%s>\n",
1270 host_address_to_string (gdbarch->push_dummy_call));
7996bcec
AC
1271 fprintf_unfiltered (file,
1272 "gdbarch_dump: gdbarch_push_dummy_code_p() = %d\n",
be7811ad 1273 gdbarch_push_dummy_code_p (gdbarch));
7996bcec 1274 fprintf_unfiltered (file,
30737ed9
JB
1275 "gdbarch_dump: push_dummy_code = <%s>\n",
1276 host_address_to_string (gdbarch->push_dummy_code));
7e35103a
JB
1277 fprintf_unfiltered (file,
1278 "gdbarch_dump: ravenscar_ops = %s\n",
1279 host_address_to_string (gdbarch->ravenscar_ops));
48f7351b
AC
1280 fprintf_unfiltered (file,
1281 "gdbarch_dump: gdbarch_read_pc_p() = %d\n",
be7811ad 1282 gdbarch_read_pc_p (gdbarch));
48f7351b 1283 fprintf_unfiltered (file,
30737ed9
JB
1284 "gdbarch_dump: read_pc = <%s>\n",
1285 host_address_to_string (gdbarch->read_pc));
60c5725c
DJ
1286 fprintf_unfiltered (file,
1287 "gdbarch_dump: gdbarch_record_special_symbol_p() = %d\n",
1288 gdbarch_record_special_symbol_p (gdbarch));
1289 fprintf_unfiltered (file,
30737ed9
JB
1290 "gdbarch_dump: record_special_symbol = <%s>\n",
1291 host_address_to_string (gdbarch->record_special_symbol));
a2428dbe 1292 fprintf_unfiltered (file,
30737ed9
JB
1293 "gdbarch_dump: register_name = <%s>\n",
1294 host_address_to_string (gdbarch->register_name));
48f7351b 1295 fprintf_unfiltered (file,
30737ed9
JB
1296 "gdbarch_dump: register_reggroup_p = <%s>\n",
1297 host_address_to_string (gdbarch->register_reggroup_p));
48f7351b 1298 fprintf_unfiltered (file,
30737ed9
JB
1299 "gdbarch_dump: register_sim_regno = <%s>\n",
1300 host_address_to_string (gdbarch->register_sim_regno));
48f7351b 1301 fprintf_unfiltered (file,
30737ed9
JB
1302 "gdbarch_dump: register_to_value = <%s>\n",
1303 host_address_to_string (gdbarch->register_to_value));
7996bcec
AC
1304 fprintf_unfiltered (file,
1305 "gdbarch_dump: gdbarch_register_type_p() = %d\n",
be7811ad 1306 gdbarch_register_type_p (gdbarch));
7996bcec 1307 fprintf_unfiltered (file,
30737ed9
JB
1308 "gdbarch_dump: register_type = <%s>\n",
1309 host_address_to_string (gdbarch->register_type));
dde08ee1
PA
1310 fprintf_unfiltered (file,
1311 "gdbarch_dump: gdbarch_relocate_instruction_p() = %d\n",
1312 gdbarch_relocate_instruction_p (gdbarch));
1313 fprintf_unfiltered (file,
1314 "gdbarch_dump: relocate_instruction = <%s>\n",
1315 host_address_to_string (gdbarch->relocate_instruction));
123dc839 1316 fprintf_unfiltered (file,
30737ed9
JB
1317 "gdbarch_dump: remote_register_number = <%s>\n",
1318 host_address_to_string (gdbarch->remote_register_number));
18648a37
YQ
1319 fprintf_unfiltered (file,
1320 "gdbarch_dump: return_in_first_hidden_param_p = <%s>\n",
1321 host_address_to_string (gdbarch->return_in_first_hidden_param_p));
a2428dbe
AC
1322 fprintf_unfiltered (file,
1323 "gdbarch_dump: gdbarch_return_value_p() = %d\n",
be7811ad 1324 gdbarch_return_value_p (gdbarch));
a2428dbe 1325 fprintf_unfiltered (file,
30737ed9
JB
1326 "gdbarch_dump: return_value = <%s>\n",
1327 host_address_to_string (gdbarch->return_value));
48f7351b 1328 fprintf_unfiltered (file,
30737ed9
JB
1329 "gdbarch_dump: sdb_reg_to_regnum = <%s>\n",
1330 host_address_to_string (gdbarch->sdb_reg_to_regnum));
48f7351b
AC
1331 fprintf_unfiltered (file,
1332 "gdbarch_dump: short_bit = %s\n",
623d3eb1 1333 plongest (gdbarch->short_bit));
3352ef37
AC
1334 fprintf_unfiltered (file,
1335 "gdbarch_dump: gdbarch_single_step_through_delay_p() = %d\n",
be7811ad 1336 gdbarch_single_step_through_delay_p (gdbarch));
3352ef37 1337 fprintf_unfiltered (file,
30737ed9
JB
1338 "gdbarch_dump: single_step_through_delay = <%s>\n",
1339 host_address_to_string (gdbarch->single_step_through_delay));
591a12a1
UW
1340 fprintf_unfiltered (file,
1341 "gdbarch_dump: gdbarch_skip_entrypoint_p() = %d\n",
1342 gdbarch_skip_entrypoint_p (gdbarch));
1343 fprintf_unfiltered (file,
1344 "gdbarch_dump: skip_entrypoint = <%s>\n",
1345 host_address_to_string (gdbarch->skip_entrypoint));
4309257c
PM
1346 fprintf_unfiltered (file,
1347 "gdbarch_dump: gdbarch_skip_main_prologue_p() = %d\n",
1348 gdbarch_skip_main_prologue_p (gdbarch));
1349 fprintf_unfiltered (file,
30737ed9
JB
1350 "gdbarch_dump: skip_main_prologue = <%s>\n",
1351 host_address_to_string (gdbarch->skip_main_prologue));
6d350bb5 1352 fprintf_unfiltered (file,
30737ed9
JB
1353 "gdbarch_dump: skip_permanent_breakpoint = <%s>\n",
1354 host_address_to_string (gdbarch->skip_permanent_breakpoint));
dea0c52f 1355 fprintf_unfiltered (file,
30737ed9
JB
1356 "gdbarch_dump: skip_prologue = <%s>\n",
1357 host_address_to_string (gdbarch->skip_prologue));
48f7351b 1358 fprintf_unfiltered (file,
30737ed9
JB
1359 "gdbarch_dump: skip_solib_resolver = <%s>\n",
1360 host_address_to_string (gdbarch->skip_solib_resolver));
48f7351b 1361 fprintf_unfiltered (file,
30737ed9
JB
1362 "gdbarch_dump: skip_trampoline_code = <%s>\n",
1363 host_address_to_string (gdbarch->skip_trampoline_code));
48f7351b
AC
1364 fprintf_unfiltered (file,
1365 "gdbarch_dump: gdbarch_software_single_step_p() = %d\n",
be7811ad 1366 gdbarch_software_single_step_p (gdbarch));
48f7351b 1367 fprintf_unfiltered (file,
30737ed9
JB
1368 "gdbarch_dump: software_single_step = <%s>\n",
1369 host_address_to_string (gdbarch->software_single_step));
203c3895
UW
1370 fprintf_unfiltered (file,
1371 "gdbarch_dump: sofun_address_maybe_missing = %s\n",
623d3eb1 1372 plongest (gdbarch->sofun_address_maybe_missing));
08105857
PA
1373 fprintf_unfiltered (file,
1374 "gdbarch_dump: solib_symbols_extension = %s\n",
1375 pstring (gdbarch->solib_symbols_extension));
48f7351b
AC
1376 fprintf_unfiltered (file,
1377 "gdbarch_dump: sp_regnum = %s\n",
623d3eb1 1378 plongest (gdbarch->sp_regnum));
a2428dbe 1379 fprintf_unfiltered (file,
30737ed9
JB
1380 "gdbarch_dump: stab_reg_to_regnum = <%s>\n",
1381 host_address_to_string (gdbarch->stab_reg_to_regnum));
48f7351b 1382 fprintf_unfiltered (file,
30737ed9
JB
1383 "gdbarch_dump: stabs_argument_has_addr = <%s>\n",
1384 host_address_to_string (gdbarch->stabs_argument_has_addr));
5b74bf7d
YQ
1385 fprintf_unfiltered (file,
1386 "gdbarch_dump: stack_frame_destroyed_p = <%s>\n",
1387 host_address_to_string (gdbarch->stack_frame_destroyed_p));
55aa24fb
SDJ
1388 fprintf_unfiltered (file,
1389 "gdbarch_dump: stap_gdb_register_prefix = %s\n",
08af7a40 1390 pstring (gdbarch->stap_gdb_register_prefix));
55aa24fb
SDJ
1391 fprintf_unfiltered (file,
1392 "gdbarch_dump: stap_gdb_register_suffix = %s\n",
08af7a40 1393 pstring (gdbarch->stap_gdb_register_suffix));
55aa24fb 1394 fprintf_unfiltered (file,
05c0465e
SDJ
1395 "gdbarch_dump: stap_integer_prefixes = %s\n",
1396 pstring_list (gdbarch->stap_integer_prefixes));
55aa24fb 1397 fprintf_unfiltered (file,
05c0465e
SDJ
1398 "gdbarch_dump: stap_integer_suffixes = %s\n",
1399 pstring_list (gdbarch->stap_integer_suffixes));
55aa24fb
SDJ
1400 fprintf_unfiltered (file,
1401 "gdbarch_dump: gdbarch_stap_is_single_operand_p() = %d\n",
1402 gdbarch_stap_is_single_operand_p (gdbarch));
1403 fprintf_unfiltered (file,
1404 "gdbarch_dump: stap_is_single_operand = <%s>\n",
1405 host_address_to_string (gdbarch->stap_is_single_operand));
1406 fprintf_unfiltered (file,
1407 "gdbarch_dump: gdbarch_stap_parse_special_token_p() = %d\n",
1408 gdbarch_stap_parse_special_token_p (gdbarch));
1409 fprintf_unfiltered (file,
1410 "gdbarch_dump: stap_parse_special_token = <%s>\n",
1411 host_address_to_string (gdbarch->stap_parse_special_token));
1412 fprintf_unfiltered (file,
05c0465e
SDJ
1413 "gdbarch_dump: stap_register_indirection_prefixes = %s\n",
1414 pstring_list (gdbarch->stap_register_indirection_prefixes));
55aa24fb 1415 fprintf_unfiltered (file,
05c0465e
SDJ
1416 "gdbarch_dump: stap_register_indirection_suffixes = %s\n",
1417 pstring_list (gdbarch->stap_register_indirection_suffixes));
55aa24fb 1418 fprintf_unfiltered (file,
05c0465e
SDJ
1419 "gdbarch_dump: stap_register_prefixes = %s\n",
1420 pstring_list (gdbarch->stap_register_prefixes));
55aa24fb 1421 fprintf_unfiltered (file,
05c0465e
SDJ
1422 "gdbarch_dump: stap_register_suffixes = %s\n",
1423 pstring_list (gdbarch->stap_register_suffixes));
149ad273
UW
1424 fprintf_unfiltered (file,
1425 "gdbarch_dump: gdbarch_static_transform_name_p() = %d\n",
be7811ad 1426 gdbarch_static_transform_name_p (gdbarch));
149ad273 1427 fprintf_unfiltered (file,
30737ed9
JB
1428 "gdbarch_dump: static_transform_name = <%s>\n",
1429 host_address_to_string (gdbarch->static_transform_name));
cd6c3b4f
YQ
1430 fprintf_unfiltered (file,
1431 "gdbarch_dump: sw_breakpoint_from_kind = <%s>\n",
1432 host_address_to_string (gdbarch->sw_breakpoint_from_kind));
458c8db8
SDJ
1433 fprintf_unfiltered (file,
1434 "gdbarch_dump: syscalls_info = %s\n",
1435 host_address_to_string (gdbarch->syscalls_info));
424163ea
DJ
1436 fprintf_unfiltered (file,
1437 "gdbarch_dump: target_desc = %s\n",
30737ed9 1438 host_address_to_string (gdbarch->target_desc));
08e45a40 1439 fprintf_unfiltered (file,
a2428dbe 1440 "gdbarch_dump: gdbarch_unwind_pc_p() = %d\n",
be7811ad 1441 gdbarch_unwind_pc_p (gdbarch));
7996bcec 1442 fprintf_unfiltered (file,
30737ed9
JB
1443 "gdbarch_dump: unwind_pc = <%s>\n",
1444 host_address_to_string (gdbarch->unwind_pc));
bd1ce8ba 1445 fprintf_unfiltered (file,
a2428dbe 1446 "gdbarch_dump: gdbarch_unwind_sp_p() = %d\n",
be7811ad 1447 gdbarch_unwind_sp_p (gdbarch));
bd1ce8ba 1448 fprintf_unfiltered (file,
30737ed9
JB
1449 "gdbarch_dump: unwind_sp = <%s>\n",
1450 host_address_to_string (gdbarch->unwind_sp));
65b48a81
PB
1451 fprintf_unfiltered (file,
1452 "gdbarch_dump: valid_disassembler_options = %s\n",
f7bb4e3a 1453 host_address_to_string (gdbarch->valid_disassembler_options));
9acbedc0 1454 fprintf_unfiltered (file,
30737ed9
JB
1455 "gdbarch_dump: value_from_register = <%s>\n",
1456 host_address_to_string (gdbarch->value_from_register));
48f7351b 1457 fprintf_unfiltered (file,
30737ed9
JB
1458 "gdbarch_dump: value_to_register = <%s>\n",
1459 host_address_to_string (gdbarch->value_to_register));
0d5de010
DJ
1460 fprintf_unfiltered (file,
1461 "gdbarch_dump: vbit_in_delta = %s\n",
623d3eb1 1462 plongest (gdbarch->vbit_in_delta));
48f7351b 1463 fprintf_unfiltered (file,
30737ed9
JB
1464 "gdbarch_dump: virtual_frame_pointer = <%s>\n",
1465 host_address_to_string (gdbarch->virtual_frame_pointer));
3437254d
PA
1466 fprintf_unfiltered (file,
1467 "gdbarch_dump: vsyscall_range = <%s>\n",
1468 host_address_to_string (gdbarch->vsyscall_range));
0d5de010
DJ
1469 fprintf_unfiltered (file,
1470 "gdbarch_dump: vtable_function_descriptors = %s\n",
623d3eb1 1471 plongest (gdbarch->vtable_function_descriptors));
53375380
PA
1472 fprintf_unfiltered (file,
1473 "gdbarch_dump: wchar_bit = %s\n",
1474 plongest (gdbarch->wchar_bit));
1475 fprintf_unfiltered (file,
1476 "gdbarch_dump: wchar_signed = %s\n",
1477 plongest (gdbarch->wchar_signed));
4b9b3959 1478 fprintf_unfiltered (file,
61a1198a 1479 "gdbarch_dump: gdbarch_write_pc_p() = %d\n",
be7811ad 1480 gdbarch_write_pc_p (gdbarch));
48f7351b 1481 fprintf_unfiltered (file,
30737ed9
JB
1482 "gdbarch_dump: write_pc = <%s>\n",
1483 host_address_to_string (gdbarch->write_pc));
458c8db8
SDJ
1484 fprintf_unfiltered (file,
1485 "gdbarch_dump: xml_syscall_file = %s\n",
1486 pstring (gdbarch->xml_syscall_file));
be7811ad
MD
1487 if (gdbarch->dump_tdep != NULL)
1488 gdbarch->dump_tdep (gdbarch, file);
0f71a2f6
JM
1489}
1490
1491struct gdbarch_tdep *
104c1213 1492gdbarch_tdep (struct gdbarch *gdbarch)
0f71a2f6
JM
1493{
1494 if (gdbarch_debug >= 2)
0f71a2f6
JM
1495 fprintf_unfiltered (gdb_stdlog, "gdbarch_tdep called\n");
1496 return gdbarch->tdep;
1497}
1498
1499
1500const struct bfd_arch_info *
104c1213 1501gdbarch_bfd_arch_info (struct gdbarch *gdbarch)
0f71a2f6 1502{
8de9bdc4 1503 gdb_assert (gdbarch != NULL);
0f71a2f6 1504 if (gdbarch_debug >= 2)
0f71a2f6
JM
1505 fprintf_unfiltered (gdb_stdlog, "gdbarch_bfd_arch_info called\n");
1506 return gdbarch->bfd_arch_info;
1507}
1508
94123b4f 1509enum bfd_endian
104c1213 1510gdbarch_byte_order (struct gdbarch *gdbarch)
0f71a2f6 1511{
8de9bdc4 1512 gdb_assert (gdbarch != NULL);
0f71a2f6 1513 if (gdbarch_debug >= 2)
0f71a2f6
JM
1514 fprintf_unfiltered (gdb_stdlog, "gdbarch_byte_order called\n");
1515 return gdbarch->byte_order;
1516}
1517
94123b4f 1518enum bfd_endian
9d4fde75
SS
1519gdbarch_byte_order_for_code (struct gdbarch *gdbarch)
1520{
1521 gdb_assert (gdbarch != NULL);
1522 if (gdbarch_debug >= 2)
1523 fprintf_unfiltered (gdb_stdlog, "gdbarch_byte_order_for_code called\n");
1524 return gdbarch->byte_order_for_code;
1525}
1526
4be87837
DJ
1527enum gdb_osabi
1528gdbarch_osabi (struct gdbarch *gdbarch)
1529{
1530 gdb_assert (gdbarch != NULL);
1531 if (gdbarch_debug >= 2)
1532 fprintf_unfiltered (gdb_stdlog, "gdbarch_osabi called\n");
1533 return gdbarch->osabi;
1534}
1535
424163ea
DJ
1536const struct target_desc *
1537gdbarch_target_desc (struct gdbarch *gdbarch)
1538{
1539 gdb_assert (gdbarch != NULL);
1540 if (gdbarch_debug >= 2)
1541 fprintf_unfiltered (gdb_stdlog, "gdbarch_target_desc called\n");
1542 return gdbarch->target_desc;
1543}
1544
32c9a795
MD
1545int
1546gdbarch_bits_big_endian (struct gdbarch *gdbarch)
1547{
1548 gdb_assert (gdbarch != NULL);
1549 /* Skip verify of bits_big_endian, invalid_p == 0 */
1550 if (gdbarch_debug >= 2)
1551 fprintf_unfiltered (gdb_stdlog, "gdbarch_bits_big_endian called\n");
1552 return gdbarch->bits_big_endian;
1553}
1554
1555void
1556set_gdbarch_bits_big_endian (struct gdbarch *gdbarch,
1557 int bits_big_endian)
1558{
1559 gdbarch->bits_big_endian = bits_big_endian;
1560}
1561
0f71a2f6 1562int
104c1213 1563gdbarch_short_bit (struct gdbarch *gdbarch)
0f71a2f6 1564{
8de9bdc4 1565 gdb_assert (gdbarch != NULL);
66b43ecb 1566 /* Skip verify of short_bit, invalid_p == 0 */
0f71a2f6 1567 if (gdbarch_debug >= 2)
0f71a2f6
JM
1568 fprintf_unfiltered (gdb_stdlog, "gdbarch_short_bit called\n");
1569 return gdbarch->short_bit;
1570}
1571
1572void
104c1213
JM
1573set_gdbarch_short_bit (struct gdbarch *gdbarch,
1574 int short_bit)
0f71a2f6
JM
1575{
1576 gdbarch->short_bit = short_bit;
1577}
1578
1579int
104c1213 1580gdbarch_int_bit (struct gdbarch *gdbarch)
0f71a2f6 1581{
8de9bdc4 1582 gdb_assert (gdbarch != NULL);
66b43ecb 1583 /* Skip verify of int_bit, invalid_p == 0 */
0f71a2f6 1584 if (gdbarch_debug >= 2)
0f71a2f6
JM
1585 fprintf_unfiltered (gdb_stdlog, "gdbarch_int_bit called\n");
1586 return gdbarch->int_bit;
1587}
1588
1589void
104c1213
JM
1590set_gdbarch_int_bit (struct gdbarch *gdbarch,
1591 int int_bit)
0f71a2f6
JM
1592{
1593 gdbarch->int_bit = int_bit;
1594}
1595
1596int
104c1213 1597gdbarch_long_bit (struct gdbarch *gdbarch)
0f71a2f6 1598{
8de9bdc4 1599 gdb_assert (gdbarch != NULL);
66b43ecb 1600 /* Skip verify of long_bit, invalid_p == 0 */
0f71a2f6 1601 if (gdbarch_debug >= 2)
0f71a2f6
JM
1602 fprintf_unfiltered (gdb_stdlog, "gdbarch_long_bit called\n");
1603 return gdbarch->long_bit;
1604}
1605
1606void
104c1213
JM
1607set_gdbarch_long_bit (struct gdbarch *gdbarch,
1608 int long_bit)
0f71a2f6
JM
1609{
1610 gdbarch->long_bit = long_bit;
1611}
1612
1613int
104c1213 1614gdbarch_long_long_bit (struct gdbarch *gdbarch)
0f71a2f6 1615{
8de9bdc4 1616 gdb_assert (gdbarch != NULL);
66b43ecb 1617 /* Skip verify of long_long_bit, invalid_p == 0 */
0f71a2f6 1618 if (gdbarch_debug >= 2)
0f71a2f6
JM
1619 fprintf_unfiltered (gdb_stdlog, "gdbarch_long_long_bit called\n");
1620 return gdbarch->long_long_bit;
1621}
1622
1623void
104c1213
JM
1624set_gdbarch_long_long_bit (struct gdbarch *gdbarch,
1625 int long_long_bit)
0f71a2f6
JM
1626{
1627 gdbarch->long_long_bit = long_long_bit;
1628}
1629
205c306f
DM
1630int
1631gdbarch_long_long_align_bit (struct gdbarch *gdbarch)
1632{
1633 gdb_assert (gdbarch != NULL);
1634 /* Skip verify of long_long_align_bit, invalid_p == 0 */
1635 if (gdbarch_debug >= 2)
1636 fprintf_unfiltered (gdb_stdlog, "gdbarch_long_long_align_bit called\n");
1637 return gdbarch->long_long_align_bit;
1638}
1639
1640void
1641set_gdbarch_long_long_align_bit (struct gdbarch *gdbarch,
1642 int long_long_align_bit)
1643{
1644 gdbarch->long_long_align_bit = long_long_align_bit;
1645}
1646
f9e9243a
UW
1647int
1648gdbarch_half_bit (struct gdbarch *gdbarch)
1649{
1650 gdb_assert (gdbarch != NULL);
1651 /* Skip verify of half_bit, invalid_p == 0 */
1652 if (gdbarch_debug >= 2)
1653 fprintf_unfiltered (gdb_stdlog, "gdbarch_half_bit called\n");
1654 return gdbarch->half_bit;
1655}
1656
1657void
1658set_gdbarch_half_bit (struct gdbarch *gdbarch,
1659 int half_bit)
1660{
1661 gdbarch->half_bit = half_bit;
1662}
1663
1664const struct floatformat **
1665gdbarch_half_format (struct gdbarch *gdbarch)
1666{
1667 gdb_assert (gdbarch != NULL);
1668 if (gdbarch_debug >= 2)
1669 fprintf_unfiltered (gdb_stdlog, "gdbarch_half_format called\n");
1670 return gdbarch->half_format;
1671}
1672
1673void
1674set_gdbarch_half_format (struct gdbarch *gdbarch,
1675 const struct floatformat ** half_format)
1676{
1677 gdbarch->half_format = half_format;
1678}
1679
0f71a2f6 1680int
104c1213 1681gdbarch_float_bit (struct gdbarch *gdbarch)
0f71a2f6 1682{
8de9bdc4 1683 gdb_assert (gdbarch != NULL);
66b43ecb 1684 /* Skip verify of float_bit, invalid_p == 0 */
0f71a2f6 1685 if (gdbarch_debug >= 2)
0f71a2f6
JM
1686 fprintf_unfiltered (gdb_stdlog, "gdbarch_float_bit called\n");
1687 return gdbarch->float_bit;
1688}
1689
1690void
104c1213
JM
1691set_gdbarch_float_bit (struct gdbarch *gdbarch,
1692 int float_bit)
0f71a2f6
JM
1693{
1694 gdbarch->float_bit = float_bit;
1695}
1696
8da61cc4 1697const struct floatformat **
456fcf94
AC
1698gdbarch_float_format (struct gdbarch *gdbarch)
1699{
1700 gdb_assert (gdbarch != NULL);
1701 if (gdbarch_debug >= 2)
1702 fprintf_unfiltered (gdb_stdlog, "gdbarch_float_format called\n");
1703 return gdbarch->float_format;
1704}
1705
1706void
1707set_gdbarch_float_format (struct gdbarch *gdbarch,
8da61cc4 1708 const struct floatformat ** float_format)
456fcf94
AC
1709{
1710 gdbarch->float_format = float_format;
1711}
1712
0f71a2f6 1713int
104c1213 1714gdbarch_double_bit (struct gdbarch *gdbarch)
0f71a2f6 1715{
8de9bdc4 1716 gdb_assert (gdbarch != NULL);
66b43ecb 1717 /* Skip verify of double_bit, invalid_p == 0 */
0f71a2f6 1718 if (gdbarch_debug >= 2)
0f71a2f6
JM
1719 fprintf_unfiltered (gdb_stdlog, "gdbarch_double_bit called\n");
1720 return gdbarch->double_bit;
1721}
1722
1723void
104c1213
JM
1724set_gdbarch_double_bit (struct gdbarch *gdbarch,
1725 int double_bit)
0f71a2f6
JM
1726{
1727 gdbarch->double_bit = double_bit;
1728}
1729
8da61cc4 1730const struct floatformat **
456fcf94
AC
1731gdbarch_double_format (struct gdbarch *gdbarch)
1732{
1733 gdb_assert (gdbarch != NULL);
1734 if (gdbarch_debug >= 2)
1735 fprintf_unfiltered (gdb_stdlog, "gdbarch_double_format called\n");
1736 return gdbarch->double_format;
1737}
1738
1739void
1740set_gdbarch_double_format (struct gdbarch *gdbarch,
8da61cc4 1741 const struct floatformat ** double_format)
456fcf94
AC
1742{
1743 gdbarch->double_format = double_format;
1744}
1745
0f71a2f6 1746int
104c1213 1747gdbarch_long_double_bit (struct gdbarch *gdbarch)
0f71a2f6 1748{
8de9bdc4 1749 gdb_assert (gdbarch != NULL);
66b43ecb 1750 /* Skip verify of long_double_bit, invalid_p == 0 */
0f71a2f6 1751 if (gdbarch_debug >= 2)
0f71a2f6
JM
1752 fprintf_unfiltered (gdb_stdlog, "gdbarch_long_double_bit called\n");
1753 return gdbarch->long_double_bit;
1754}
1755
1756void
104c1213
JM
1757set_gdbarch_long_double_bit (struct gdbarch *gdbarch,
1758 int long_double_bit)
0f71a2f6
JM
1759{
1760 gdbarch->long_double_bit = long_double_bit;
1761}
1762
8da61cc4 1763const struct floatformat **
456fcf94
AC
1764gdbarch_long_double_format (struct gdbarch *gdbarch)
1765{
1766 gdb_assert (gdbarch != NULL);
1767 if (gdbarch_debug >= 2)
1768 fprintf_unfiltered (gdb_stdlog, "gdbarch_long_double_format called\n");
1769 return gdbarch->long_double_format;
1770}
1771
1772void
1773set_gdbarch_long_double_format (struct gdbarch *gdbarch,
8da61cc4 1774 const struct floatformat ** long_double_format)
456fcf94
AC
1775{
1776 gdbarch->long_double_format = long_double_format;
1777}
1778
53375380
PA
1779int
1780gdbarch_wchar_bit (struct gdbarch *gdbarch)
1781{
1782 gdb_assert (gdbarch != NULL);
1783 /* Skip verify of wchar_bit, invalid_p == 0 */
1784 if (gdbarch_debug >= 2)
1785 fprintf_unfiltered (gdb_stdlog, "gdbarch_wchar_bit called\n");
1786 return gdbarch->wchar_bit;
1787}
1788
1789void
1790set_gdbarch_wchar_bit (struct gdbarch *gdbarch,
1791 int wchar_bit)
1792{
1793 gdbarch->wchar_bit = wchar_bit;
1794}
1795
1796int
1797gdbarch_wchar_signed (struct gdbarch *gdbarch)
1798{
1799 gdb_assert (gdbarch != NULL);
1800 /* Check variable changed from pre-default. */
1801 gdb_assert (gdbarch->wchar_signed != -1);
1802 if (gdbarch_debug >= 2)
1803 fprintf_unfiltered (gdb_stdlog, "gdbarch_wchar_signed called\n");
1804 return gdbarch->wchar_signed;
1805}
1806
1807void
1808set_gdbarch_wchar_signed (struct gdbarch *gdbarch,
1809 int wchar_signed)
1810{
1811 gdbarch->wchar_signed = wchar_signed;
1812}
1813
9b790ce7
UW
1814const struct floatformat **
1815gdbarch_floatformat_for_type (struct gdbarch *gdbarch, const char *name, int length)
1816{
1817 gdb_assert (gdbarch != NULL);
1818 gdb_assert (gdbarch->floatformat_for_type != NULL);
1819 if (gdbarch_debug >= 2)
1820 fprintf_unfiltered (gdb_stdlog, "gdbarch_floatformat_for_type called\n");
1821 return gdbarch->floatformat_for_type (gdbarch, name, length);
1822}
1823
1824void
1825set_gdbarch_floatformat_for_type (struct gdbarch *gdbarch,
1826 gdbarch_floatformat_for_type_ftype floatformat_for_type)
1827{
1828 gdbarch->floatformat_for_type = floatformat_for_type;
1829}
1830
66b43ecb
AC
1831int
1832gdbarch_ptr_bit (struct gdbarch *gdbarch)
1833{
8de9bdc4 1834 gdb_assert (gdbarch != NULL);
66b43ecb
AC
1835 /* Skip verify of ptr_bit, invalid_p == 0 */
1836 if (gdbarch_debug >= 2)
1837 fprintf_unfiltered (gdb_stdlog, "gdbarch_ptr_bit called\n");
1838 return gdbarch->ptr_bit;
1839}
1840
1841void
1842set_gdbarch_ptr_bit (struct gdbarch *gdbarch,
1843 int ptr_bit)
1844{
1845 gdbarch->ptr_bit = ptr_bit;
1846}
1847
52204a0b
DT
1848int
1849gdbarch_addr_bit (struct gdbarch *gdbarch)
1850{
8de9bdc4 1851 gdb_assert (gdbarch != NULL);
956ac328
AC
1852 /* Check variable changed from pre-default. */
1853 gdb_assert (gdbarch->addr_bit != 0);
52204a0b
DT
1854 if (gdbarch_debug >= 2)
1855 fprintf_unfiltered (gdb_stdlog, "gdbarch_addr_bit called\n");
1856 return gdbarch->addr_bit;
1857}
1858
1859void
1860set_gdbarch_addr_bit (struct gdbarch *gdbarch,
1861 int addr_bit)
1862{
1863 gdbarch->addr_bit = addr_bit;
1864}
1865
8da614df
CV
1866int
1867gdbarch_dwarf2_addr_size (struct gdbarch *gdbarch)
1868{
1869 gdb_assert (gdbarch != NULL);
1870 /* Check variable changed from pre-default. */
1871 gdb_assert (gdbarch->dwarf2_addr_size != 0);
1872 if (gdbarch_debug >= 2)
1873 fprintf_unfiltered (gdb_stdlog, "gdbarch_dwarf2_addr_size called\n");
1874 return gdbarch->dwarf2_addr_size;
1875}
1876
1877void
1878set_gdbarch_dwarf2_addr_size (struct gdbarch *gdbarch,
1879 int dwarf2_addr_size)
1880{
1881 gdbarch->dwarf2_addr_size = dwarf2_addr_size;
1882}
1883
4e409299
JB
1884int
1885gdbarch_char_signed (struct gdbarch *gdbarch)
1886{
8de9bdc4 1887 gdb_assert (gdbarch != NULL);
956ac328
AC
1888 /* Check variable changed from pre-default. */
1889 gdb_assert (gdbarch->char_signed != -1);
4e409299
JB
1890 if (gdbarch_debug >= 2)
1891 fprintf_unfiltered (gdb_stdlog, "gdbarch_char_signed called\n");
1892 return gdbarch->char_signed;
1893}
1894
1895void
1896set_gdbarch_char_signed (struct gdbarch *gdbarch,
1897 int char_signed)
1898{
1899 gdbarch->char_signed = char_signed;
1900}
1901
cde9ea48
AC
1902int
1903gdbarch_read_pc_p (struct gdbarch *gdbarch)
1904{
1905 gdb_assert (gdbarch != NULL);
956ac328 1906 return gdbarch->read_pc != NULL;
cde9ea48
AC
1907}
1908
0f71a2f6 1909CORE_ADDR
61a1198a 1910gdbarch_read_pc (struct gdbarch *gdbarch, struct regcache *regcache)
0f71a2f6 1911{
8de9bdc4 1912 gdb_assert (gdbarch != NULL);
956ac328 1913 gdb_assert (gdbarch->read_pc != NULL);
0f71a2f6 1914 if (gdbarch_debug >= 2)
0f71a2f6 1915 fprintf_unfiltered (gdb_stdlog, "gdbarch_read_pc called\n");
61a1198a 1916 return gdbarch->read_pc (regcache);
0f71a2f6
JM
1917}
1918
1919void
104c1213
JM
1920set_gdbarch_read_pc (struct gdbarch *gdbarch,
1921 gdbarch_read_pc_ftype read_pc)
0f71a2f6
JM
1922{
1923 gdbarch->read_pc = read_pc;
1924}
1925
61a1198a
UW
1926int
1927gdbarch_write_pc_p (struct gdbarch *gdbarch)
1928{
1929 gdb_assert (gdbarch != NULL);
1930 return gdbarch->write_pc != NULL;
1931}
1932
0f71a2f6 1933void
61a1198a 1934gdbarch_write_pc (struct gdbarch *gdbarch, struct regcache *regcache, CORE_ADDR val)
0f71a2f6 1935{
8de9bdc4 1936 gdb_assert (gdbarch != NULL);
956ac328 1937 gdb_assert (gdbarch->write_pc != NULL);
0f71a2f6 1938 if (gdbarch_debug >= 2)
0f71a2f6 1939 fprintf_unfiltered (gdb_stdlog, "gdbarch_write_pc called\n");
61a1198a 1940 gdbarch->write_pc (regcache, val);
0f71a2f6
JM
1941}
1942
1943void
104c1213
JM
1944set_gdbarch_write_pc (struct gdbarch *gdbarch,
1945 gdbarch_write_pc_ftype write_pc)
0f71a2f6
JM
1946{
1947 gdbarch->write_pc = write_pc;
1948}
1949
39d4ef09
AC
1950void
1951gdbarch_virtual_frame_pointer (struct gdbarch *gdbarch, CORE_ADDR pc, int *frame_regnum, LONGEST *frame_offset)
1952{
8de9bdc4 1953 gdb_assert (gdbarch != NULL);
956ac328 1954 gdb_assert (gdbarch->virtual_frame_pointer != NULL);
39d4ef09
AC
1955 if (gdbarch_debug >= 2)
1956 fprintf_unfiltered (gdb_stdlog, "gdbarch_virtual_frame_pointer called\n");
a54fba4c 1957 gdbarch->virtual_frame_pointer (gdbarch, pc, frame_regnum, frame_offset);
39d4ef09
AC
1958}
1959
1960void
1961set_gdbarch_virtual_frame_pointer (struct gdbarch *gdbarch,
1962 gdbarch_virtual_frame_pointer_ftype virtual_frame_pointer)
1963{
1964 gdbarch->virtual_frame_pointer = virtual_frame_pointer;
1965}
1966
61a0eb5b 1967int
d8124050 1968gdbarch_pseudo_register_read_p (struct gdbarch *gdbarch)
61a0eb5b 1969{
8de9bdc4 1970 gdb_assert (gdbarch != NULL);
956ac328 1971 return gdbarch->pseudo_register_read != NULL;
61a0eb5b
AC
1972}
1973
05d1431c 1974enum register_status
b60c417a 1975gdbarch_pseudo_register_read (struct gdbarch *gdbarch, struct regcache *regcache, int cookednum, gdb_byte *buf)
61a0eb5b 1976{
8de9bdc4 1977 gdb_assert (gdbarch != NULL);
956ac328 1978 gdb_assert (gdbarch->pseudo_register_read != NULL);
61a0eb5b 1979 if (gdbarch_debug >= 2)
d8124050 1980 fprintf_unfiltered (gdb_stdlog, "gdbarch_pseudo_register_read called\n");
05d1431c 1981 return gdbarch->pseudo_register_read (gdbarch, regcache, cookednum, buf);
61a0eb5b
AC
1982}
1983
1984void
d8124050
AC
1985set_gdbarch_pseudo_register_read (struct gdbarch *gdbarch,
1986 gdbarch_pseudo_register_read_ftype pseudo_register_read)
61a0eb5b 1987{
d8124050 1988 gdbarch->pseudo_register_read = pseudo_register_read;
61a0eb5b
AC
1989}
1990
3543a589
TT
1991int
1992gdbarch_pseudo_register_read_value_p (struct gdbarch *gdbarch)
1993{
1994 gdb_assert (gdbarch != NULL);
1995 return gdbarch->pseudo_register_read_value != NULL;
1996}
1997
1998struct value *
1999gdbarch_pseudo_register_read_value (struct gdbarch *gdbarch, struct regcache *regcache, int cookednum)
2000{
2001 gdb_assert (gdbarch != NULL);
2002 gdb_assert (gdbarch->pseudo_register_read_value != NULL);
2003 if (gdbarch_debug >= 2)
2004 fprintf_unfiltered (gdb_stdlog, "gdbarch_pseudo_register_read_value called\n");
2005 return gdbarch->pseudo_register_read_value (gdbarch, regcache, cookednum);
2006}
2007
2008void
2009set_gdbarch_pseudo_register_read_value (struct gdbarch *gdbarch,
2010 gdbarch_pseudo_register_read_value_ftype pseudo_register_read_value)
2011{
2012 gdbarch->pseudo_register_read_value = pseudo_register_read_value;
2013}
2014
61a0eb5b 2015int
d8124050 2016gdbarch_pseudo_register_write_p (struct gdbarch *gdbarch)
61a0eb5b 2017{
8de9bdc4 2018 gdb_assert (gdbarch != NULL);
956ac328 2019 return gdbarch->pseudo_register_write != NULL;
61a0eb5b
AC
2020}
2021
2022void
b60c417a 2023gdbarch_pseudo_register_write (struct gdbarch *gdbarch, struct regcache *regcache, int cookednum, const gdb_byte *buf)
61a0eb5b 2024{
8de9bdc4 2025 gdb_assert (gdbarch != NULL);
956ac328 2026 gdb_assert (gdbarch->pseudo_register_write != NULL);
61a0eb5b 2027 if (gdbarch_debug >= 2)
d8124050
AC
2028 fprintf_unfiltered (gdb_stdlog, "gdbarch_pseudo_register_write called\n");
2029 gdbarch->pseudo_register_write (gdbarch, regcache, cookednum, buf);
61a0eb5b
AC
2030}
2031
2032void
d8124050
AC
2033set_gdbarch_pseudo_register_write (struct gdbarch *gdbarch,
2034 gdbarch_pseudo_register_write_ftype pseudo_register_write)
61a0eb5b 2035{
d8124050 2036 gdbarch->pseudo_register_write = pseudo_register_write;
61a0eb5b
AC
2037}
2038
0f71a2f6 2039int
104c1213 2040gdbarch_num_regs (struct gdbarch *gdbarch)
0f71a2f6 2041{
8de9bdc4 2042 gdb_assert (gdbarch != NULL);
956ac328
AC
2043 /* Check variable changed from pre-default. */
2044 gdb_assert (gdbarch->num_regs != -1);
0f71a2f6 2045 if (gdbarch_debug >= 2)
0f71a2f6
JM
2046 fprintf_unfiltered (gdb_stdlog, "gdbarch_num_regs called\n");
2047 return gdbarch->num_regs;
2048}
2049
2050void
104c1213
JM
2051set_gdbarch_num_regs (struct gdbarch *gdbarch,
2052 int num_regs)
0f71a2f6
JM
2053{
2054 gdbarch->num_regs = num_regs;
2055}
2056
0aba1244
EZ
2057int
2058gdbarch_num_pseudo_regs (struct gdbarch *gdbarch)
2059{
8de9bdc4 2060 gdb_assert (gdbarch != NULL);
0aba1244
EZ
2061 /* Skip verify of num_pseudo_regs, invalid_p == 0 */
2062 if (gdbarch_debug >= 2)
2063 fprintf_unfiltered (gdb_stdlog, "gdbarch_num_pseudo_regs called\n");
2064 return gdbarch->num_pseudo_regs;
2065}
2066
2067void
2068set_gdbarch_num_pseudo_regs (struct gdbarch *gdbarch,
2069 int num_pseudo_regs)
2070{
2071 gdbarch->num_pseudo_regs = num_pseudo_regs;
2072}
2073
175ff332
HZ
2074int
2075gdbarch_ax_pseudo_register_collect_p (struct gdbarch *gdbarch)
2076{
2077 gdb_assert (gdbarch != NULL);
2078 return gdbarch->ax_pseudo_register_collect != NULL;
2079}
2080
2081int
2082gdbarch_ax_pseudo_register_collect (struct gdbarch *gdbarch, struct agent_expr *ax, int reg)
2083{
2084 gdb_assert (gdbarch != NULL);
2085 gdb_assert (gdbarch->ax_pseudo_register_collect != NULL);
2086 if (gdbarch_debug >= 2)
2087 fprintf_unfiltered (gdb_stdlog, "gdbarch_ax_pseudo_register_collect called\n");
2088 return gdbarch->ax_pseudo_register_collect (gdbarch, ax, reg);
2089}
2090
2091void
2092set_gdbarch_ax_pseudo_register_collect (struct gdbarch *gdbarch,
2093 gdbarch_ax_pseudo_register_collect_ftype ax_pseudo_register_collect)
2094{
2095 gdbarch->ax_pseudo_register_collect = ax_pseudo_register_collect;
2096}
2097
2098int
2099gdbarch_ax_pseudo_register_push_stack_p (struct gdbarch *gdbarch)
2100{
2101 gdb_assert (gdbarch != NULL);
2102 return gdbarch->ax_pseudo_register_push_stack != NULL;
2103}
2104
2105int
2106gdbarch_ax_pseudo_register_push_stack (struct gdbarch *gdbarch, struct agent_expr *ax, int reg)
2107{
2108 gdb_assert (gdbarch != NULL);
2109 gdb_assert (gdbarch->ax_pseudo_register_push_stack != NULL);
2110 if (gdbarch_debug >= 2)
2111 fprintf_unfiltered (gdb_stdlog, "gdbarch_ax_pseudo_register_push_stack called\n");
2112 return gdbarch->ax_pseudo_register_push_stack (gdbarch, ax, reg);
2113}
2114
2115void
2116set_gdbarch_ax_pseudo_register_push_stack (struct gdbarch *gdbarch,
2117 gdbarch_ax_pseudo_register_push_stack_ftype ax_pseudo_register_push_stack)
2118{
2119 gdbarch->ax_pseudo_register_push_stack = ax_pseudo_register_push_stack;
2120}
2121
012b3a21
WT
2122int
2123gdbarch_handle_segmentation_fault_p (struct gdbarch *gdbarch)
2124{
2125 gdb_assert (gdbarch != NULL);
2126 return gdbarch->handle_segmentation_fault != NULL;
2127}
2128
2129void
2130gdbarch_handle_segmentation_fault (struct gdbarch *gdbarch, struct ui_out *uiout)
2131{
2132 gdb_assert (gdbarch != NULL);
2133 gdb_assert (gdbarch->handle_segmentation_fault != NULL);
2134 if (gdbarch_debug >= 2)
2135 fprintf_unfiltered (gdb_stdlog, "gdbarch_handle_segmentation_fault called\n");
2136 gdbarch->handle_segmentation_fault (gdbarch, uiout);
2137}
2138
2139void
2140set_gdbarch_handle_segmentation_fault (struct gdbarch *gdbarch,
2141 gdbarch_handle_segmentation_fault_ftype handle_segmentation_fault)
2142{
2143 gdbarch->handle_segmentation_fault = handle_segmentation_fault;
2144}
2145
0f71a2f6 2146int
104c1213 2147gdbarch_sp_regnum (struct gdbarch *gdbarch)
0f71a2f6 2148{
8de9bdc4 2149 gdb_assert (gdbarch != NULL);
1200cd6e 2150 /* Skip verify of sp_regnum, invalid_p == 0 */
0f71a2f6 2151 if (gdbarch_debug >= 2)
0f71a2f6
JM
2152 fprintf_unfiltered (gdb_stdlog, "gdbarch_sp_regnum called\n");
2153 return gdbarch->sp_regnum;
2154}
2155
2156void
104c1213
JM
2157set_gdbarch_sp_regnum (struct gdbarch *gdbarch,
2158 int sp_regnum)
0f71a2f6
JM
2159{
2160 gdbarch->sp_regnum = sp_regnum;
2161}
2162
0f71a2f6 2163int
104c1213 2164gdbarch_pc_regnum (struct gdbarch *gdbarch)
0f71a2f6 2165{
8de9bdc4 2166 gdb_assert (gdbarch != NULL);
1200cd6e 2167 /* Skip verify of pc_regnum, invalid_p == 0 */
0f71a2f6 2168 if (gdbarch_debug >= 2)
0f71a2f6
JM
2169 fprintf_unfiltered (gdb_stdlog, "gdbarch_pc_regnum called\n");
2170 return gdbarch->pc_regnum;
2171}
2172
2173void
104c1213
JM
2174set_gdbarch_pc_regnum (struct gdbarch *gdbarch,
2175 int pc_regnum)
0f71a2f6
JM
2176{
2177 gdbarch->pc_regnum = pc_regnum;
2178}
2179
c2169756
AC
2180int
2181gdbarch_ps_regnum (struct gdbarch *gdbarch)
2182{
8de9bdc4 2183 gdb_assert (gdbarch != NULL);
c2169756
AC
2184 /* Skip verify of ps_regnum, invalid_p == 0 */
2185 if (gdbarch_debug >= 2)
2186 fprintf_unfiltered (gdb_stdlog, "gdbarch_ps_regnum called\n");
2187 return gdbarch->ps_regnum;
2188}
2189
2190void
2191set_gdbarch_ps_regnum (struct gdbarch *gdbarch,
2192 int ps_regnum)
2193{
2194 gdbarch->ps_regnum = ps_regnum;
2195}
2196
60054393
MS
2197int
2198gdbarch_fp0_regnum (struct gdbarch *gdbarch)
2199{
8de9bdc4 2200 gdb_assert (gdbarch != NULL);
60054393
MS
2201 /* Skip verify of fp0_regnum, invalid_p == 0 */
2202 if (gdbarch_debug >= 2)
2203 fprintf_unfiltered (gdb_stdlog, "gdbarch_fp0_regnum called\n");
2204 return gdbarch->fp0_regnum;
2205}
2206
2207void
2208set_gdbarch_fp0_regnum (struct gdbarch *gdbarch,
2209 int fp0_regnum)
2210{
2211 gdbarch->fp0_regnum = fp0_regnum;
2212}
2213
88c72b7d
AC
2214int
2215gdbarch_stab_reg_to_regnum (struct gdbarch *gdbarch, int stab_regnr)
2216{
8de9bdc4 2217 gdb_assert (gdbarch != NULL);
956ac328 2218 gdb_assert (gdbarch->stab_reg_to_regnum != NULL);
88c72b7d
AC
2219 if (gdbarch_debug >= 2)
2220 fprintf_unfiltered (gdb_stdlog, "gdbarch_stab_reg_to_regnum called\n");
d3f73121 2221 return gdbarch->stab_reg_to_regnum (gdbarch, stab_regnr);
88c72b7d
AC
2222}
2223
2224void
2225set_gdbarch_stab_reg_to_regnum (struct gdbarch *gdbarch,
2226 gdbarch_stab_reg_to_regnum_ftype stab_reg_to_regnum)
2227{
2228 gdbarch->stab_reg_to_regnum = stab_reg_to_regnum;
2229}
2230
2231int
2232gdbarch_ecoff_reg_to_regnum (struct gdbarch *gdbarch, int ecoff_regnr)
2233{
8de9bdc4 2234 gdb_assert (gdbarch != NULL);
956ac328 2235 gdb_assert (gdbarch->ecoff_reg_to_regnum != NULL);
88c72b7d
AC
2236 if (gdbarch_debug >= 2)
2237 fprintf_unfiltered (gdb_stdlog, "gdbarch_ecoff_reg_to_regnum called\n");
d3f73121 2238 return gdbarch->ecoff_reg_to_regnum (gdbarch, ecoff_regnr);
88c72b7d
AC
2239}
2240
2241void
2242set_gdbarch_ecoff_reg_to_regnum (struct gdbarch *gdbarch,
2243 gdbarch_ecoff_reg_to_regnum_ftype ecoff_reg_to_regnum)
2244{
2245 gdbarch->ecoff_reg_to_regnum = ecoff_reg_to_regnum;
2246}
2247
88c72b7d
AC
2248int
2249gdbarch_sdb_reg_to_regnum (struct gdbarch *gdbarch, int sdb_regnr)
2250{
8de9bdc4 2251 gdb_assert (gdbarch != NULL);
956ac328 2252 gdb_assert (gdbarch->sdb_reg_to_regnum != NULL);
88c72b7d
AC
2253 if (gdbarch_debug >= 2)
2254 fprintf_unfiltered (gdb_stdlog, "gdbarch_sdb_reg_to_regnum called\n");
d3f73121 2255 return gdbarch->sdb_reg_to_regnum (gdbarch, sdb_regnr);
88c72b7d
AC
2256}
2257
2258void
2259set_gdbarch_sdb_reg_to_regnum (struct gdbarch *gdbarch,
2260 gdbarch_sdb_reg_to_regnum_ftype sdb_reg_to_regnum)
2261{
2262 gdbarch->sdb_reg_to_regnum = sdb_reg_to_regnum;
2263}
2264
2265int
2266gdbarch_dwarf2_reg_to_regnum (struct gdbarch *gdbarch, int dwarf2_regnr)
2267{
8de9bdc4 2268 gdb_assert (gdbarch != NULL);
956ac328 2269 gdb_assert (gdbarch->dwarf2_reg_to_regnum != NULL);
88c72b7d
AC
2270 if (gdbarch_debug >= 2)
2271 fprintf_unfiltered (gdb_stdlog, "gdbarch_dwarf2_reg_to_regnum called\n");
d3f73121 2272 return gdbarch->dwarf2_reg_to_regnum (gdbarch, dwarf2_regnr);
88c72b7d
AC
2273}
2274
2275void
2276set_gdbarch_dwarf2_reg_to_regnum (struct gdbarch *gdbarch,
2277 gdbarch_dwarf2_reg_to_regnum_ftype dwarf2_reg_to_regnum)
2278{
2279 gdbarch->dwarf2_reg_to_regnum = dwarf2_reg_to_regnum;
2280}
2281
fa88f677 2282const char *
0f71a2f6
JM
2283gdbarch_register_name (struct gdbarch *gdbarch, int regnr)
2284{
8de9bdc4 2285 gdb_assert (gdbarch != NULL);
956ac328 2286 gdb_assert (gdbarch->register_name != NULL);
0f71a2f6 2287 if (gdbarch_debug >= 2)
0f71a2f6 2288 fprintf_unfiltered (gdb_stdlog, "gdbarch_register_name called\n");
d93859e2 2289 return gdbarch->register_name (gdbarch, regnr);
0f71a2f6
JM
2290}
2291
2292void
104c1213
JM
2293set_gdbarch_register_name (struct gdbarch *gdbarch,
2294 gdbarch_register_name_ftype register_name)
0f71a2f6
JM
2295{
2296 gdbarch->register_name = register_name;
2297}
2298
0f71a2f6 2299int
9c04cab7 2300gdbarch_register_type_p (struct gdbarch *gdbarch)
0f71a2f6 2301{
8de9bdc4 2302 gdb_assert (gdbarch != NULL);
956ac328 2303 return gdbarch->register_type != NULL;
9c04cab7
AC
2304}
2305
2306struct type *
2307gdbarch_register_type (struct gdbarch *gdbarch, int reg_nr)
2308{
2309 gdb_assert (gdbarch != NULL);
956ac328 2310 gdb_assert (gdbarch->register_type != NULL);
0f71a2f6 2311 if (gdbarch_debug >= 2)
9c04cab7
AC
2312 fprintf_unfiltered (gdb_stdlog, "gdbarch_register_type called\n");
2313 return gdbarch->register_type (gdbarch, reg_nr);
0f71a2f6
JM
2314}
2315
2316void
9c04cab7
AC
2317set_gdbarch_register_type (struct gdbarch *gdbarch,
2318 gdbarch_register_type_ftype register_type)
0f71a2f6 2319{
9c04cab7 2320 gdbarch->register_type = register_type;
0f71a2f6
JM
2321}
2322
f3be58bc 2323int
669fac23 2324gdbarch_dummy_id_p (struct gdbarch *gdbarch)
f3be58bc
AC
2325{
2326 gdb_assert (gdbarch != NULL);
669fac23 2327 return gdbarch->dummy_id != NULL;
f3be58bc
AC
2328}
2329
2330struct frame_id
669fac23 2331gdbarch_dummy_id (struct gdbarch *gdbarch, struct frame_info *this_frame)
f3be58bc
AC
2332{
2333 gdb_assert (gdbarch != NULL);
669fac23 2334 gdb_assert (gdbarch->dummy_id != NULL);
f3be58bc 2335 if (gdbarch_debug >= 2)
669fac23
DJ
2336 fprintf_unfiltered (gdb_stdlog, "gdbarch_dummy_id called\n");
2337 return gdbarch->dummy_id (gdbarch, this_frame);
f3be58bc
AC
2338}
2339
2340void
669fac23
DJ
2341set_gdbarch_dummy_id (struct gdbarch *gdbarch,
2342 gdbarch_dummy_id_ftype dummy_id)
f3be58bc 2343{
669fac23 2344 gdbarch->dummy_id = dummy_id;
f3be58bc
AC
2345}
2346
f3be58bc
AC
2347int
2348gdbarch_deprecated_fp_regnum (struct gdbarch *gdbarch)
2349{
2350 gdb_assert (gdbarch != NULL);
2351 /* Skip verify of deprecated_fp_regnum, invalid_p == 0 */
2352 if (gdbarch_debug >= 2)
2353 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_fp_regnum called\n");
2354 return gdbarch->deprecated_fp_regnum;
2355}
2356
2357void
2358set_gdbarch_deprecated_fp_regnum (struct gdbarch *gdbarch,
2359 int deprecated_fp_regnum)
2360{
2361 gdbarch->deprecated_fp_regnum = deprecated_fp_regnum;
2362}
2363
0ab7a791 2364int
b8de8283 2365gdbarch_push_dummy_call_p (struct gdbarch *gdbarch)
0ab7a791
AC
2366{
2367 gdb_assert (gdbarch != NULL);
956ac328 2368 return gdbarch->push_dummy_call != NULL;
0ab7a791
AC
2369}
2370
b8de8283 2371CORE_ADDR
7d9b040b 2372gdbarch_push_dummy_call (struct gdbarch *gdbarch, struct value *function, struct regcache *regcache, CORE_ADDR bp_addr, int nargs, struct value **args, CORE_ADDR sp, int struct_return, CORE_ADDR struct_addr)
666e11c5 2373{
8de9bdc4 2374 gdb_assert (gdbarch != NULL);
956ac328 2375 gdb_assert (gdbarch->push_dummy_call != NULL);
666e11c5 2376 if (gdbarch_debug >= 2)
b8de8283 2377 fprintf_unfiltered (gdb_stdlog, "gdbarch_push_dummy_call called\n");
7d9b040b 2378 return gdbarch->push_dummy_call (gdbarch, function, regcache, bp_addr, nargs, args, sp, struct_return, struct_addr);
666e11c5
EZ
2379}
2380
2381void
b8de8283
AC
2382set_gdbarch_push_dummy_call (struct gdbarch *gdbarch,
2383 gdbarch_push_dummy_call_ftype push_dummy_call)
666e11c5 2384{
b8de8283 2385 gdbarch->push_dummy_call = push_dummy_call;
666e11c5
EZ
2386}
2387
2649061d 2388int
b8de8283 2389gdbarch_call_dummy_location (struct gdbarch *gdbarch)
2649061d 2390{
8de9bdc4 2391 gdb_assert (gdbarch != NULL);
b8de8283
AC
2392 /* Skip verify of call_dummy_location, invalid_p == 0 */
2393 if (gdbarch_debug >= 2)
2394 fprintf_unfiltered (gdb_stdlog, "gdbarch_call_dummy_location called\n");
2395 return gdbarch->call_dummy_location;
2649061d
AC
2396}
2397
b8de8283
AC
2398void
2399set_gdbarch_call_dummy_location (struct gdbarch *gdbarch,
2400 int call_dummy_location)
2401{
2402 gdbarch->call_dummy_location = call_dummy_location;
2403}
2404
0f71a2f6 2405int
b8de8283 2406gdbarch_push_dummy_code_p (struct gdbarch *gdbarch)
0f71a2f6 2407{
8de9bdc4 2408 gdb_assert (gdbarch != NULL);
956ac328 2409 return gdbarch->push_dummy_code != NULL;
b8de8283
AC
2410}
2411
2412CORE_ADDR
82585c72 2413gdbarch_push_dummy_code (struct gdbarch *gdbarch, CORE_ADDR sp, CORE_ADDR funaddr, struct value **args, int nargs, struct type *value_type, CORE_ADDR *real_pc, CORE_ADDR *bp_addr, struct regcache *regcache)
b8de8283
AC
2414{
2415 gdb_assert (gdbarch != NULL);
956ac328 2416 gdb_assert (gdbarch->push_dummy_code != NULL);
0f71a2f6 2417 if (gdbarch_debug >= 2)
b8de8283 2418 fprintf_unfiltered (gdb_stdlog, "gdbarch_push_dummy_code called\n");
82585c72 2419 return gdbarch->push_dummy_code (gdbarch, sp, funaddr, args, nargs, value_type, real_pc, bp_addr, regcache);
0f71a2f6
JM
2420}
2421
2422void
b8de8283
AC
2423set_gdbarch_push_dummy_code (struct gdbarch *gdbarch,
2424 gdbarch_push_dummy_code_ftype push_dummy_code)
0f71a2f6 2425{
b8de8283 2426 gdbarch->push_dummy_code = push_dummy_code;
0f71a2f6
JM
2427}
2428
7eb89530
YQ
2429int
2430gdbarch_code_of_frame_writable (struct gdbarch *gdbarch, struct frame_info *frame)
2431{
2432 gdb_assert (gdbarch != NULL);
2433 gdb_assert (gdbarch->code_of_frame_writable != NULL);
2434 if (gdbarch_debug >= 2)
2435 fprintf_unfiltered (gdb_stdlog, "gdbarch_code_of_frame_writable called\n");
2436 return gdbarch->code_of_frame_writable (gdbarch, frame);
2437}
2438
2439void
2440set_gdbarch_code_of_frame_writable (struct gdbarch *gdbarch,
2441 gdbarch_code_of_frame_writable_ftype code_of_frame_writable)
2442{
2443 gdbarch->code_of_frame_writable = code_of_frame_writable;
2444}
2445
b8de8283
AC
2446void
2447gdbarch_print_registers_info (struct gdbarch *gdbarch, struct ui_file *file, struct frame_info *frame, int regnum, int all)
2448{
2449 gdb_assert (gdbarch != NULL);
956ac328 2450 gdb_assert (gdbarch->print_registers_info != NULL);
b8de8283
AC
2451 if (gdbarch_debug >= 2)
2452 fprintf_unfiltered (gdb_stdlog, "gdbarch_print_registers_info called\n");
2453 gdbarch->print_registers_info (gdbarch, file, frame, regnum, all);
2454}
2455
2456void
2457set_gdbarch_print_registers_info (struct gdbarch *gdbarch,
2458 gdbarch_print_registers_info_ftype print_registers_info)
2459{
2460 gdbarch->print_registers_info = print_registers_info;
0f71a2f6
JM
2461}
2462
b8de8283
AC
2463void
2464gdbarch_print_float_info (struct gdbarch *gdbarch, struct ui_file *file, struct frame_info *frame, const char *args)
0f71a2f6 2465{
8de9bdc4 2466 gdb_assert (gdbarch != NULL);
956ac328 2467 gdb_assert (gdbarch->print_float_info != NULL);
0f71a2f6 2468 if (gdbarch_debug >= 2)
b8de8283
AC
2469 fprintf_unfiltered (gdb_stdlog, "gdbarch_print_float_info called\n");
2470 gdbarch->print_float_info (gdbarch, file, frame, args);
0f71a2f6
JM
2471}
2472
2473void
b8de8283
AC
2474set_gdbarch_print_float_info (struct gdbarch *gdbarch,
2475 gdbarch_print_float_info_ftype print_float_info)
0f71a2f6 2476{
b8de8283
AC
2477 gdbarch->print_float_info = print_float_info;
2478}
2479
2480int
2481gdbarch_print_vector_info_p (struct gdbarch *gdbarch)
2482{
2483 gdb_assert (gdbarch != NULL);
956ac328 2484 return gdbarch->print_vector_info != NULL;
b8de8283
AC
2485}
2486
2487void
2488gdbarch_print_vector_info (struct gdbarch *gdbarch, struct ui_file *file, struct frame_info *frame, const char *args)
2489{
2490 gdb_assert (gdbarch != NULL);
956ac328 2491 gdb_assert (gdbarch->print_vector_info != NULL);
b8de8283
AC
2492 if (gdbarch_debug >= 2)
2493 fprintf_unfiltered (gdb_stdlog, "gdbarch_print_vector_info called\n");
2494 gdbarch->print_vector_info (gdbarch, file, frame, args);
0f71a2f6
JM
2495}
2496
b8de8283
AC
2497void
2498set_gdbarch_print_vector_info (struct gdbarch *gdbarch,
2499 gdbarch_print_vector_info_ftype print_vector_info)
ae45cd16 2500{
b8de8283 2501 gdbarch->print_vector_info = print_vector_info;
ae45cd16
AC
2502}
2503
2504int
b8de8283 2505gdbarch_register_sim_regno (struct gdbarch *gdbarch, int reg_nr)
0f71a2f6 2506{
8de9bdc4 2507 gdb_assert (gdbarch != NULL);
956ac328 2508 gdb_assert (gdbarch->register_sim_regno != NULL);
0f71a2f6 2509 if (gdbarch_debug >= 2)
b8de8283 2510 fprintf_unfiltered (gdb_stdlog, "gdbarch_register_sim_regno called\n");
e7faf938 2511 return gdbarch->register_sim_regno (gdbarch, reg_nr);
0f71a2f6
JM
2512}
2513
2514void
b8de8283
AC
2515set_gdbarch_register_sim_regno (struct gdbarch *gdbarch,
2516 gdbarch_register_sim_regno_ftype register_sim_regno)
0f71a2f6 2517{
b8de8283 2518 gdbarch->register_sim_regno = register_sim_regno;
0f71a2f6
JM
2519}
2520
0f71a2f6 2521int
b8de8283 2522gdbarch_cannot_fetch_register (struct gdbarch *gdbarch, int regnum)
0f71a2f6 2523{
8de9bdc4 2524 gdb_assert (gdbarch != NULL);
956ac328 2525 gdb_assert (gdbarch->cannot_fetch_register != NULL);
b8de8283
AC
2526 if (gdbarch_debug >= 2)
2527 fprintf_unfiltered (gdb_stdlog, "gdbarch_cannot_fetch_register called\n");
64a3914f 2528 return gdbarch->cannot_fetch_register (gdbarch, regnum);
b8de8283
AC
2529}
2530
2531void
2532set_gdbarch_cannot_fetch_register (struct gdbarch *gdbarch,
2533 gdbarch_cannot_fetch_register_ftype cannot_fetch_register)
2534{
2535 gdbarch->cannot_fetch_register = cannot_fetch_register;
0f71a2f6
JM
2536}
2537
2538int
b8de8283 2539gdbarch_cannot_store_register (struct gdbarch *gdbarch, int regnum)
0f71a2f6 2540{
8de9bdc4 2541 gdb_assert (gdbarch != NULL);
956ac328 2542 gdb_assert (gdbarch->cannot_store_register != NULL);
0f71a2f6 2543 if (gdbarch_debug >= 2)
b8de8283 2544 fprintf_unfiltered (gdb_stdlog, "gdbarch_cannot_store_register called\n");
64a3914f 2545 return gdbarch->cannot_store_register (gdbarch, regnum);
0f71a2f6
JM
2546}
2547
2548void
b8de8283
AC
2549set_gdbarch_cannot_store_register (struct gdbarch *gdbarch,
2550 gdbarch_cannot_store_register_ftype cannot_store_register)
0f71a2f6 2551{
b8de8283 2552 gdbarch->cannot_store_register = cannot_store_register;
0f71a2f6
JM
2553}
2554
e8ab51f7 2555int
b8de8283 2556gdbarch_get_longjmp_target_p (struct gdbarch *gdbarch)
e8ab51f7
AC
2557{
2558 gdb_assert (gdbarch != NULL);
956ac328 2559 return gdbarch->get_longjmp_target != NULL;
e8ab51f7
AC
2560}
2561
b8de8283 2562int
60ade65d 2563gdbarch_get_longjmp_target (struct gdbarch *gdbarch, struct frame_info *frame, CORE_ADDR *pc)
0f71a2f6 2564{
8de9bdc4 2565 gdb_assert (gdbarch != NULL);
956ac328 2566 gdb_assert (gdbarch->get_longjmp_target != NULL);
0f71a2f6 2567 if (gdbarch_debug >= 2)
b8de8283 2568 fprintf_unfiltered (gdb_stdlog, "gdbarch_get_longjmp_target called\n");
60ade65d 2569 return gdbarch->get_longjmp_target (frame, pc);
0f71a2f6
JM
2570}
2571
2572void
b8de8283
AC
2573set_gdbarch_get_longjmp_target (struct gdbarch *gdbarch,
2574 gdbarch_get_longjmp_target_ftype get_longjmp_target)
0f71a2f6 2575{
b8de8283 2576 gdbarch->get_longjmp_target = get_longjmp_target;
0f71a2f6
JM
2577}
2578
2579int
104c1213 2580gdbarch_believe_pcc_promotion (struct gdbarch *gdbarch)
0f71a2f6 2581{
8de9bdc4 2582 gdb_assert (gdbarch != NULL);
0f71a2f6 2583 if (gdbarch_debug >= 2)
0f71a2f6
JM
2584 fprintf_unfiltered (gdb_stdlog, "gdbarch_believe_pcc_promotion called\n");
2585 return gdbarch->believe_pcc_promotion;
2586}
2587
2588void
104c1213
JM
2589set_gdbarch_believe_pcc_promotion (struct gdbarch *gdbarch,
2590 int believe_pcc_promotion)
0f71a2f6
JM
2591{
2592 gdbarch->believe_pcc_promotion = believe_pcc_promotion;
2593}
2594
13d01224 2595int
ff2e87ac 2596gdbarch_convert_register_p (struct gdbarch *gdbarch, int regnum, struct type *type)
13d01224
AC
2597{
2598 gdb_assert (gdbarch != NULL);
956ac328 2599 gdb_assert (gdbarch->convert_register_p != NULL);
13d01224
AC
2600 if (gdbarch_debug >= 2)
2601 fprintf_unfiltered (gdb_stdlog, "gdbarch_convert_register_p called\n");
0abe36f5 2602 return gdbarch->convert_register_p (gdbarch, regnum, type);
13d01224
AC
2603}
2604
2605void
2606set_gdbarch_convert_register_p (struct gdbarch *gdbarch,
2607 gdbarch_convert_register_p_ftype convert_register_p)
2608{
2609 gdbarch->convert_register_p = convert_register_p;
2610}
2611
8dccd430
PA
2612int
2613gdbarch_register_to_value (struct gdbarch *gdbarch, struct frame_info *frame, int regnum, struct type *type, gdb_byte *buf, int *optimizedp, int *unavailablep)
13d01224
AC
2614{
2615 gdb_assert (gdbarch != NULL);
956ac328 2616 gdb_assert (gdbarch->register_to_value != NULL);
13d01224
AC
2617 if (gdbarch_debug >= 2)
2618 fprintf_unfiltered (gdb_stdlog, "gdbarch_register_to_value called\n");
8dccd430 2619 return gdbarch->register_to_value (frame, regnum, type, buf, optimizedp, unavailablep);
13d01224
AC
2620}
2621
2622void
2623set_gdbarch_register_to_value (struct gdbarch *gdbarch,
2624 gdbarch_register_to_value_ftype register_to_value)
2625{
2626 gdbarch->register_to_value = register_to_value;
2627}
2628
2629void
b60c417a 2630gdbarch_value_to_register (struct gdbarch *gdbarch, struct frame_info *frame, int regnum, struct type *type, const gdb_byte *buf)
13d01224
AC
2631{
2632 gdb_assert (gdbarch != NULL);
956ac328 2633 gdb_assert (gdbarch->value_to_register != NULL);
13d01224
AC
2634 if (gdbarch_debug >= 2)
2635 fprintf_unfiltered (gdb_stdlog, "gdbarch_value_to_register called\n");
ff2e87ac 2636 gdbarch->value_to_register (frame, regnum, type, buf);
13d01224
AC
2637}
2638
2639void
2640set_gdbarch_value_to_register (struct gdbarch *gdbarch,
2641 gdbarch_value_to_register_ftype value_to_register)
2642{
2643 gdbarch->value_to_register = value_to_register;
2644}
2645
9acbedc0 2646struct value *
2ed3c037 2647gdbarch_value_from_register (struct gdbarch *gdbarch, struct type *type, int regnum, struct frame_id frame_id)
9acbedc0
UW
2648{
2649 gdb_assert (gdbarch != NULL);
2650 gdb_assert (gdbarch->value_from_register != NULL);
2651 if (gdbarch_debug >= 2)
2652 fprintf_unfiltered (gdb_stdlog, "gdbarch_value_from_register called\n");
2ed3c037 2653 return gdbarch->value_from_register (gdbarch, type, regnum, frame_id);
9acbedc0
UW
2654}
2655
2656void
2657set_gdbarch_value_from_register (struct gdbarch *gdbarch,
2658 gdbarch_value_from_register_ftype value_from_register)
2659{
2660 gdbarch->value_from_register = value_from_register;
2661}
2662
4478b372 2663CORE_ADDR
b60c417a 2664gdbarch_pointer_to_address (struct gdbarch *gdbarch, struct type *type, const gdb_byte *buf)
4478b372 2665{
8de9bdc4 2666 gdb_assert (gdbarch != NULL);
956ac328 2667 gdb_assert (gdbarch->pointer_to_address != NULL);
4478b372
JB
2668 if (gdbarch_debug >= 2)
2669 fprintf_unfiltered (gdb_stdlog, "gdbarch_pointer_to_address called\n");
9898f801 2670 return gdbarch->pointer_to_address (gdbarch, type, buf);
4478b372
JB
2671}
2672
2673void
2674set_gdbarch_pointer_to_address (struct gdbarch *gdbarch,
2675 gdbarch_pointer_to_address_ftype pointer_to_address)
2676{
2677 gdbarch->pointer_to_address = pointer_to_address;
2678}
2679
2680void
b60c417a 2681gdbarch_address_to_pointer (struct gdbarch *gdbarch, struct type *type, gdb_byte *buf, CORE_ADDR addr)
4478b372 2682{
8de9bdc4 2683 gdb_assert (gdbarch != NULL);
956ac328 2684 gdb_assert (gdbarch->address_to_pointer != NULL);
4478b372
JB
2685 if (gdbarch_debug >= 2)
2686 fprintf_unfiltered (gdb_stdlog, "gdbarch_address_to_pointer called\n");
9898f801 2687 gdbarch->address_to_pointer (gdbarch, type, buf, addr);
4478b372
JB
2688}
2689
2690void
2691set_gdbarch_address_to_pointer (struct gdbarch *gdbarch,
2692 gdbarch_address_to_pointer_ftype address_to_pointer)
2693{
2694 gdbarch->address_to_pointer = address_to_pointer;
2695}
2696
fc0c74b1
AC
2697int
2698gdbarch_integer_to_address_p (struct gdbarch *gdbarch)
2699{
8de9bdc4 2700 gdb_assert (gdbarch != NULL);
956ac328 2701 return gdbarch->integer_to_address != NULL;
fc0c74b1
AC
2702}
2703
2704CORE_ADDR
fc1a4b47 2705gdbarch_integer_to_address (struct gdbarch *gdbarch, struct type *type, const gdb_byte *buf)
fc0c74b1 2706{
8de9bdc4 2707 gdb_assert (gdbarch != NULL);
956ac328 2708 gdb_assert (gdbarch->integer_to_address != NULL);
fc0c74b1
AC
2709 if (gdbarch_debug >= 2)
2710 fprintf_unfiltered (gdb_stdlog, "gdbarch_integer_to_address called\n");
79dd2d24 2711 return gdbarch->integer_to_address (gdbarch, type, buf);
fc0c74b1
AC
2712}
2713
2714void
2715set_gdbarch_integer_to_address (struct gdbarch *gdbarch,
2716 gdbarch_integer_to_address_ftype integer_to_address)
2717{
2718 gdbarch->integer_to_address = integer_to_address;
2719}
2720
92ad9cd9
AC
2721int
2722gdbarch_return_value_p (struct gdbarch *gdbarch)
2723{
2724 gdb_assert (gdbarch != NULL);
c1874924 2725 return gdbarch->return_value != NULL;
92ad9cd9
AC
2726}
2727
2728enum return_value_convention
6a3a010b 2729gdbarch_return_value (struct gdbarch *gdbarch, struct value *function, struct type *valtype, struct regcache *regcache, gdb_byte *readbuf, const gdb_byte *writebuf)
92ad9cd9
AC
2730{
2731 gdb_assert (gdbarch != NULL);
2732 gdb_assert (gdbarch->return_value != NULL);
2733 if (gdbarch_debug >= 2)
2734 fprintf_unfiltered (gdb_stdlog, "gdbarch_return_value called\n");
6a3a010b 2735 return gdbarch->return_value (gdbarch, function, valtype, regcache, readbuf, writebuf);
92ad9cd9
AC
2736}
2737
2738void
2739set_gdbarch_return_value (struct gdbarch *gdbarch,
2740 gdbarch_return_value_ftype return_value)
2741{
2742 gdbarch->return_value = return_value;
2743}
2744
18648a37
YQ
2745int
2746gdbarch_return_in_first_hidden_param_p (struct gdbarch *gdbarch, struct type *type)
2747{
2748 gdb_assert (gdbarch != NULL);
2749 gdb_assert (gdbarch->return_in_first_hidden_param_p != NULL);
2750 if (gdbarch_debug >= 2)
2751 fprintf_unfiltered (gdb_stdlog, "gdbarch_return_in_first_hidden_param_p called\n");
2752 return gdbarch->return_in_first_hidden_param_p (gdbarch, type);
2753}
2754
2755void
2756set_gdbarch_return_in_first_hidden_param_p (struct gdbarch *gdbarch,
2757 gdbarch_return_in_first_hidden_param_p_ftype return_in_first_hidden_param_p)
2758{
2759 gdbarch->return_in_first_hidden_param_p = return_in_first_hidden_param_p;
2760}
2761
0f71a2f6
JM
2762CORE_ADDR
2763gdbarch_skip_prologue (struct gdbarch *gdbarch, CORE_ADDR ip)
2764{
8de9bdc4 2765 gdb_assert (gdbarch != NULL);
956ac328 2766 gdb_assert (gdbarch->skip_prologue != NULL);
0f71a2f6 2767 if (gdbarch_debug >= 2)
0f71a2f6 2768 fprintf_unfiltered (gdb_stdlog, "gdbarch_skip_prologue called\n");
6093d2eb 2769 return gdbarch->skip_prologue (gdbarch, ip);
0f71a2f6
JM
2770}
2771
2772void
104c1213
JM
2773set_gdbarch_skip_prologue (struct gdbarch *gdbarch,
2774 gdbarch_skip_prologue_ftype skip_prologue)
0f71a2f6
JM
2775{
2776 gdbarch->skip_prologue = skip_prologue;
2777}
2778
4309257c
PM
2779int
2780gdbarch_skip_main_prologue_p (struct gdbarch *gdbarch)
2781{
2782 gdb_assert (gdbarch != NULL);
2783 return gdbarch->skip_main_prologue != NULL;
2784}
2785
2786CORE_ADDR
2787gdbarch_skip_main_prologue (struct gdbarch *gdbarch, CORE_ADDR ip)
2788{
2789 gdb_assert (gdbarch != NULL);
2790 gdb_assert (gdbarch->skip_main_prologue != NULL);
2791 if (gdbarch_debug >= 2)
2792 fprintf_unfiltered (gdb_stdlog, "gdbarch_skip_main_prologue called\n");
2793 return gdbarch->skip_main_prologue (gdbarch, ip);
2794}
2795
2796void
2797set_gdbarch_skip_main_prologue (struct gdbarch *gdbarch,
cfd8ab24 2798 gdbarch_skip_main_prologue_ftype skip_main_prologue)
4309257c
PM
2799{
2800 gdbarch->skip_main_prologue = skip_main_prologue;
2801}
2802
591a12a1
UW
2803int
2804gdbarch_skip_entrypoint_p (struct gdbarch *gdbarch)
2805{
2806 gdb_assert (gdbarch != NULL);
2807 return gdbarch->skip_entrypoint != NULL;
2808}
2809
2810CORE_ADDR
2811gdbarch_skip_entrypoint (struct gdbarch *gdbarch, CORE_ADDR ip)
2812{
2813 gdb_assert (gdbarch != NULL);
2814 gdb_assert (gdbarch->skip_entrypoint != NULL);
2815 if (gdbarch_debug >= 2)
2816 fprintf_unfiltered (gdb_stdlog, "gdbarch_skip_entrypoint called\n");
2817 return gdbarch->skip_entrypoint (gdbarch, ip);
2818}
2819
2820void
2821set_gdbarch_skip_entrypoint (struct gdbarch *gdbarch,
2822 gdbarch_skip_entrypoint_ftype skip_entrypoint)
2823{
2824 gdbarch->skip_entrypoint = skip_entrypoint;
2825}
2826
0f71a2f6
JM
2827int
2828gdbarch_inner_than (struct gdbarch *gdbarch, CORE_ADDR lhs, CORE_ADDR rhs)
2829{
8de9bdc4 2830 gdb_assert (gdbarch != NULL);
956ac328 2831 gdb_assert (gdbarch->inner_than != NULL);
0f71a2f6 2832 if (gdbarch_debug >= 2)
0f71a2f6
JM
2833 fprintf_unfiltered (gdb_stdlog, "gdbarch_inner_than called\n");
2834 return gdbarch->inner_than (lhs, rhs);
2835}
2836
2837void
104c1213
JM
2838set_gdbarch_inner_than (struct gdbarch *gdbarch,
2839 gdbarch_inner_than_ftype inner_than)
0f71a2f6
JM
2840{
2841 gdbarch->inner_than = inner_than;
2842}
2843
fc1a4b47 2844const gdb_byte *
adf40b2e 2845gdbarch_breakpoint_from_pc (struct gdbarch *gdbarch, CORE_ADDR *pcptr, int *lenptr)
0f71a2f6 2846{
8de9bdc4 2847 gdb_assert (gdbarch != NULL);
956ac328 2848 gdb_assert (gdbarch->breakpoint_from_pc != NULL);
0f71a2f6 2849 if (gdbarch_debug >= 2)
0f71a2f6 2850 fprintf_unfiltered (gdb_stdlog, "gdbarch_breakpoint_from_pc called\n");
67d57894 2851 return gdbarch->breakpoint_from_pc (gdbarch, pcptr, lenptr);
0f71a2f6
JM
2852}
2853
2854void
104c1213
JM
2855set_gdbarch_breakpoint_from_pc (struct gdbarch *gdbarch,
2856 gdbarch_breakpoint_from_pc_ftype breakpoint_from_pc)
0f71a2f6
JM
2857{
2858 gdbarch->breakpoint_from_pc = breakpoint_from_pc;
2859}
2860
cd6c3b4f
YQ
2861int
2862gdbarch_breakpoint_kind_from_pc (struct gdbarch *gdbarch, CORE_ADDR *pcptr)
2863{
2864 gdb_assert (gdbarch != NULL);
2865 gdb_assert (gdbarch->breakpoint_kind_from_pc != NULL);
2866 if (gdbarch_debug >= 2)
2867 fprintf_unfiltered (gdb_stdlog, "gdbarch_breakpoint_kind_from_pc called\n");
2868 return gdbarch->breakpoint_kind_from_pc (gdbarch, pcptr);
2869}
2870
2871void
2872set_gdbarch_breakpoint_kind_from_pc (struct gdbarch *gdbarch,
2873 gdbarch_breakpoint_kind_from_pc_ftype breakpoint_kind_from_pc)
2874{
2875 gdbarch->breakpoint_kind_from_pc = breakpoint_kind_from_pc;
2876}
2877
2878const gdb_byte *
2879gdbarch_sw_breakpoint_from_kind (struct gdbarch *gdbarch, int kind, int *size)
2880{
2881 gdb_assert (gdbarch != NULL);
2882 gdb_assert (gdbarch->sw_breakpoint_from_kind != NULL);
2883 if (gdbarch_debug >= 2)
2884 fprintf_unfiltered (gdb_stdlog, "gdbarch_sw_breakpoint_from_kind called\n");
2885 return gdbarch->sw_breakpoint_from_kind (gdbarch, kind, size);
2886}
2887
2888void
2889set_gdbarch_sw_breakpoint_from_kind (struct gdbarch *gdbarch,
2890 gdbarch_sw_breakpoint_from_kind_ftype sw_breakpoint_from_kind)
2891{
2892 gdbarch->sw_breakpoint_from_kind = sw_breakpoint_from_kind;
2893}
2894
833b7ab5
YQ
2895int
2896gdbarch_breakpoint_kind_from_current_state (struct gdbarch *gdbarch, struct regcache *regcache, CORE_ADDR *pcptr)
2897{
2898 gdb_assert (gdbarch != NULL);
2899 gdb_assert (gdbarch->breakpoint_kind_from_current_state != NULL);
2900 if (gdbarch_debug >= 2)
2901 fprintf_unfiltered (gdb_stdlog, "gdbarch_breakpoint_kind_from_current_state called\n");
2902 return gdbarch->breakpoint_kind_from_current_state (gdbarch, regcache, pcptr);
2903}
2904
2905void
2906set_gdbarch_breakpoint_kind_from_current_state (struct gdbarch *gdbarch,
2907 gdbarch_breakpoint_kind_from_current_state_ftype breakpoint_kind_from_current_state)
2908{
2909 gdbarch->breakpoint_kind_from_current_state = breakpoint_kind_from_current_state;
2910}
2911
a1131521
KB
2912int
2913gdbarch_adjust_breakpoint_address_p (struct gdbarch *gdbarch)
2914{
2915 gdb_assert (gdbarch != NULL);
2916 return gdbarch->adjust_breakpoint_address != NULL;
2917}
2918
2919CORE_ADDR
2920gdbarch_adjust_breakpoint_address (struct gdbarch *gdbarch, CORE_ADDR bpaddr)
2921{
2922 gdb_assert (gdbarch != NULL);
2923 gdb_assert (gdbarch->adjust_breakpoint_address != NULL);
2924 if (gdbarch_debug >= 2)
2925 fprintf_unfiltered (gdb_stdlog, "gdbarch_adjust_breakpoint_address called\n");
2926 return gdbarch->adjust_breakpoint_address (gdbarch, bpaddr);
2927}
2928
2929void
2930set_gdbarch_adjust_breakpoint_address (struct gdbarch *gdbarch,
2931 gdbarch_adjust_breakpoint_address_ftype adjust_breakpoint_address)
2932{
2933 gdbarch->adjust_breakpoint_address = adjust_breakpoint_address;
2934}
2935
917317f4 2936int
8181d85f 2937gdbarch_memory_insert_breakpoint (struct gdbarch *gdbarch, struct bp_target_info *bp_tgt)
917317f4 2938{
8de9bdc4 2939 gdb_assert (gdbarch != NULL);
956ac328 2940 gdb_assert (gdbarch->memory_insert_breakpoint != NULL);
917317f4 2941 if (gdbarch_debug >= 2)
917317f4 2942 fprintf_unfiltered (gdb_stdlog, "gdbarch_memory_insert_breakpoint called\n");
ae4b2284 2943 return gdbarch->memory_insert_breakpoint (gdbarch, bp_tgt);
917317f4
JM
2944}
2945
2946void
2947set_gdbarch_memory_insert_breakpoint (struct gdbarch *gdbarch,
2948 gdbarch_memory_insert_breakpoint_ftype memory_insert_breakpoint)
2949{
2950 gdbarch->memory_insert_breakpoint = memory_insert_breakpoint;
2951}
2952
2953int
8181d85f 2954gdbarch_memory_remove_breakpoint (struct gdbarch *gdbarch, struct bp_target_info *bp_tgt)
917317f4 2955{
8de9bdc4 2956 gdb_assert (gdbarch != NULL);
956ac328 2957 gdb_assert (gdbarch->memory_remove_breakpoint != NULL);
917317f4 2958 if (gdbarch_debug >= 2)
917317f4 2959 fprintf_unfiltered (gdb_stdlog, "gdbarch_memory_remove_breakpoint called\n");
ae4b2284 2960 return gdbarch->memory_remove_breakpoint (gdbarch, bp_tgt);
917317f4
JM
2961}
2962
2963void
2964set_gdbarch_memory_remove_breakpoint (struct gdbarch *gdbarch,
2965 gdbarch_memory_remove_breakpoint_ftype memory_remove_breakpoint)
2966{
2967 gdbarch->memory_remove_breakpoint = memory_remove_breakpoint;
2968}
2969
0f71a2f6 2970CORE_ADDR
104c1213 2971gdbarch_decr_pc_after_break (struct gdbarch *gdbarch)
0f71a2f6 2972{
8de9bdc4 2973 gdb_assert (gdbarch != NULL);
71bd6bd4 2974 /* Skip verify of decr_pc_after_break, invalid_p == 0 */
0f71a2f6 2975 if (gdbarch_debug >= 2)
0f71a2f6
JM
2976 fprintf_unfiltered (gdb_stdlog, "gdbarch_decr_pc_after_break called\n");
2977 return gdbarch->decr_pc_after_break;
2978}
2979
2980void
104c1213
JM
2981set_gdbarch_decr_pc_after_break (struct gdbarch *gdbarch,
2982 CORE_ADDR decr_pc_after_break)
0f71a2f6
JM
2983{
2984 gdbarch->decr_pc_after_break = decr_pc_after_break;
2985}
2986
2987CORE_ADDR
782263ab 2988gdbarch_deprecated_function_start_offset (struct gdbarch *gdbarch)
0f71a2f6 2989{
8de9bdc4 2990 gdb_assert (gdbarch != NULL);
782263ab 2991 /* Skip verify of deprecated_function_start_offset, invalid_p == 0 */
0f71a2f6 2992 if (gdbarch_debug >= 2)
782263ab
AC
2993 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_function_start_offset called\n");
2994 return gdbarch->deprecated_function_start_offset;
0f71a2f6
JM
2995}
2996
2997void
782263ab
AC
2998set_gdbarch_deprecated_function_start_offset (struct gdbarch *gdbarch,
2999 CORE_ADDR deprecated_function_start_offset)
0f71a2f6 3000{
782263ab 3001 gdbarch->deprecated_function_start_offset = deprecated_function_start_offset;
0f71a2f6
JM
3002}
3003
123dc839
DJ
3004int
3005gdbarch_remote_register_number (struct gdbarch *gdbarch, int regno)
3006{
3007 gdb_assert (gdbarch != NULL);
3008 gdb_assert (gdbarch->remote_register_number != NULL);
3009 if (gdbarch_debug >= 2)
3010 fprintf_unfiltered (gdb_stdlog, "gdbarch_remote_register_number called\n");
3011 return gdbarch->remote_register_number (gdbarch, regno);
3012}
3013
3014void
3015set_gdbarch_remote_register_number (struct gdbarch *gdbarch,
3016 gdbarch_remote_register_number_ftype remote_register_number)
3017{
3018 gdbarch->remote_register_number = remote_register_number;
3019}
3020
b2756930
KB
3021int
3022gdbarch_fetch_tls_load_module_address_p (struct gdbarch *gdbarch)
3023{
3024 gdb_assert (gdbarch != NULL);
3025 return gdbarch->fetch_tls_load_module_address != NULL;
3026}
3027
3028CORE_ADDR
3029gdbarch_fetch_tls_load_module_address (struct gdbarch *gdbarch, struct objfile *objfile)
3030{
3031 gdb_assert (gdbarch != NULL);
3032 gdb_assert (gdbarch->fetch_tls_load_module_address != NULL);
3033 if (gdbarch_debug >= 2)
3034 fprintf_unfiltered (gdb_stdlog, "gdbarch_fetch_tls_load_module_address called\n");
3035 return gdbarch->fetch_tls_load_module_address (objfile);
3036}
3037
3038void
3039set_gdbarch_fetch_tls_load_module_address (struct gdbarch *gdbarch,
3040 gdbarch_fetch_tls_load_module_address_ftype fetch_tls_load_module_address)
3041{
3042 gdbarch->fetch_tls_load_module_address = fetch_tls_load_module_address;
3043}
3044
0f71a2f6 3045CORE_ADDR
104c1213 3046gdbarch_frame_args_skip (struct gdbarch *gdbarch)
0f71a2f6 3047{
8de9bdc4 3048 gdb_assert (gdbarch != NULL);
5867a2fb 3049 /* Skip verify of frame_args_skip, invalid_p == 0 */
0f71a2f6 3050 if (gdbarch_debug >= 2)
0f71a2f6
JM
3051 fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_args_skip called\n");
3052 return gdbarch->frame_args_skip;
3053}
3054
3055void
104c1213
JM
3056set_gdbarch_frame_args_skip (struct gdbarch *gdbarch,
3057 CORE_ADDR frame_args_skip)
0f71a2f6
JM
3058{
3059 gdbarch->frame_args_skip = frame_args_skip;
3060}
3061
12cc2063
AC
3062int
3063gdbarch_unwind_pc_p (struct gdbarch *gdbarch)
3064{
3065 gdb_assert (gdbarch != NULL);
956ac328 3066 return gdbarch->unwind_pc != NULL;
12cc2063
AC
3067}
3068
3069CORE_ADDR
3070gdbarch_unwind_pc (struct gdbarch *gdbarch, struct frame_info *next_frame)
3071{
3072 gdb_assert (gdbarch != NULL);
956ac328 3073 gdb_assert (gdbarch->unwind_pc != NULL);
12cc2063
AC
3074 if (gdbarch_debug >= 2)
3075 fprintf_unfiltered (gdb_stdlog, "gdbarch_unwind_pc called\n");
3076 return gdbarch->unwind_pc (gdbarch, next_frame);
3077}
3078
3079void
3080set_gdbarch_unwind_pc (struct gdbarch *gdbarch,
3081 gdbarch_unwind_pc_ftype unwind_pc)
3082{
3083 gdbarch->unwind_pc = unwind_pc;
3084}
3085
a9e5fdc2
AC
3086int
3087gdbarch_unwind_sp_p (struct gdbarch *gdbarch)
3088{
3089 gdb_assert (gdbarch != NULL);
956ac328 3090 return gdbarch->unwind_sp != NULL;
a9e5fdc2
AC
3091}
3092
3093CORE_ADDR
3094gdbarch_unwind_sp (struct gdbarch *gdbarch, struct frame_info *next_frame)
3095{
3096 gdb_assert (gdbarch != NULL);
956ac328 3097 gdb_assert (gdbarch->unwind_sp != NULL);
a9e5fdc2
AC
3098 if (gdbarch_debug >= 2)
3099 fprintf_unfiltered (gdb_stdlog, "gdbarch_unwind_sp called\n");
3100 return gdbarch->unwind_sp (gdbarch, next_frame);
3101}
3102
3103void
3104set_gdbarch_unwind_sp (struct gdbarch *gdbarch,
3105 gdbarch_unwind_sp_ftype unwind_sp)
3106{
3107 gdbarch->unwind_sp = unwind_sp;
3108}
3109
983a287a
AC
3110int
3111gdbarch_frame_num_args_p (struct gdbarch *gdbarch)
3112{
3113 gdb_assert (gdbarch != NULL);
956ac328 3114 return gdbarch->frame_num_args != NULL;
983a287a
AC
3115}
3116
0f71a2f6
JM
3117int
3118gdbarch_frame_num_args (struct gdbarch *gdbarch, struct frame_info *frame)
3119{
8de9bdc4 3120 gdb_assert (gdbarch != NULL);
956ac328 3121 gdb_assert (gdbarch->frame_num_args != NULL);
0f71a2f6 3122 if (gdbarch_debug >= 2)
0f71a2f6
JM
3123 fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_num_args called\n");
3124 return gdbarch->frame_num_args (frame);
3125}
3126
3127void
104c1213
JM
3128set_gdbarch_frame_num_args (struct gdbarch *gdbarch,
3129 gdbarch_frame_num_args_ftype frame_num_args)
0f71a2f6
JM
3130{
3131 gdbarch->frame_num_args = frame_num_args;
3132}
3133
dc604539
AC
3134int
3135gdbarch_frame_align_p (struct gdbarch *gdbarch)
3136{
3137 gdb_assert (gdbarch != NULL);
956ac328 3138 return gdbarch->frame_align != NULL;
dc604539
AC
3139}
3140
3141CORE_ADDR
3142gdbarch_frame_align (struct gdbarch *gdbarch, CORE_ADDR address)
3143{
3144 gdb_assert (gdbarch != NULL);
956ac328 3145 gdb_assert (gdbarch->frame_align != NULL);
dc604539
AC
3146 if (gdbarch_debug >= 2)
3147 fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_align called\n");
3148 return gdbarch->frame_align (gdbarch, address);
3149}
3150
3151void
3152set_gdbarch_frame_align (struct gdbarch *gdbarch,
3153 gdbarch_frame_align_ftype frame_align)
3154{
3155 gdbarch->frame_align = frame_align;
3156}
3157
192cb3d4
MK
3158int
3159gdbarch_stabs_argument_has_addr (struct gdbarch *gdbarch, struct type *type)
3160{
3161 gdb_assert (gdbarch != NULL);
3162 gdb_assert (gdbarch->stabs_argument_has_addr != NULL);
3163 if (gdbarch_debug >= 2)
3164 fprintf_unfiltered (gdb_stdlog, "gdbarch_stabs_argument_has_addr called\n");
3165 return gdbarch->stabs_argument_has_addr (gdbarch, type);
3166}
3167
3168void
3169set_gdbarch_stabs_argument_has_addr (struct gdbarch *gdbarch,
3170 gdbarch_stabs_argument_has_addr_ftype stabs_argument_has_addr)
3171{
3172 gdbarch->stabs_argument_has_addr = stabs_argument_has_addr;
3173}
3174
8b148df9
AC
3175int
3176gdbarch_frame_red_zone_size (struct gdbarch *gdbarch)
3177{
3178 gdb_assert (gdbarch != NULL);
3179 if (gdbarch_debug >= 2)
3180 fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_red_zone_size called\n");
3181 return gdbarch->frame_red_zone_size;
3182}
3183
3184void
3185set_gdbarch_frame_red_zone_size (struct gdbarch *gdbarch,
3186 int frame_red_zone_size)
3187{
3188 gdbarch->frame_red_zone_size = frame_red_zone_size;
3189}
3190
f517ea4e 3191CORE_ADDR
e2d0e7eb 3192gdbarch_convert_from_func_ptr_addr (struct gdbarch *gdbarch, CORE_ADDR addr, struct target_ops *targ)
f517ea4e 3193{
8de9bdc4 3194 gdb_assert (gdbarch != NULL);
956ac328 3195 gdb_assert (gdbarch->convert_from_func_ptr_addr != NULL);
f517ea4e
PS
3196 if (gdbarch_debug >= 2)
3197 fprintf_unfiltered (gdb_stdlog, "gdbarch_convert_from_func_ptr_addr called\n");
e2d0e7eb 3198 return gdbarch->convert_from_func_ptr_addr (gdbarch, addr, targ);
f517ea4e
PS
3199}
3200
3201void
3202set_gdbarch_convert_from_func_ptr_addr (struct gdbarch *gdbarch,
3203 gdbarch_convert_from_func_ptr_addr_ftype convert_from_func_ptr_addr)
3204{
3205 gdbarch->convert_from_func_ptr_addr = convert_from_func_ptr_addr;
3206}
3207
875e1767
AC
3208CORE_ADDR
3209gdbarch_addr_bits_remove (struct gdbarch *gdbarch, CORE_ADDR addr)
3210{
8de9bdc4 3211 gdb_assert (gdbarch != NULL);
956ac328 3212 gdb_assert (gdbarch->addr_bits_remove != NULL);
875e1767
AC
3213 if (gdbarch_debug >= 2)
3214 fprintf_unfiltered (gdb_stdlog, "gdbarch_addr_bits_remove called\n");
24568a2c 3215 return gdbarch->addr_bits_remove (gdbarch, addr);
875e1767
AC
3216}
3217
3218void
3219set_gdbarch_addr_bits_remove (struct gdbarch *gdbarch,
3220 gdbarch_addr_bits_remove_ftype addr_bits_remove)
3221{
3222 gdbarch->addr_bits_remove = addr_bits_remove;
3223}
3224
64c4637f
AC
3225int
3226gdbarch_software_single_step_p (struct gdbarch *gdbarch)
3227{
8de9bdc4 3228 gdb_assert (gdbarch != NULL);
956ac328 3229 return gdbarch->software_single_step != NULL;
64c4637f
AC
3230}
3231
a0ff9e1a 3232std::vector<CORE_ADDR>
f5ea389a 3233gdbarch_software_single_step (struct gdbarch *gdbarch, struct regcache *regcache)
64c4637f 3234{
8de9bdc4 3235 gdb_assert (gdbarch != NULL);
956ac328 3236 gdb_assert (gdbarch->software_single_step != NULL);
64c4637f
AC
3237 if (gdbarch_debug >= 2)
3238 fprintf_unfiltered (gdb_stdlog, "gdbarch_software_single_step called\n");
f5ea389a 3239 return gdbarch->software_single_step (regcache);
64c4637f
AC
3240}
3241
3242void
3243set_gdbarch_software_single_step (struct gdbarch *gdbarch,
3244 gdbarch_software_single_step_ftype software_single_step)
3245{
3246 gdbarch->software_single_step = software_single_step;
3247}
3248
3352ef37
AC
3249int
3250gdbarch_single_step_through_delay_p (struct gdbarch *gdbarch)
3251{
3252 gdb_assert (gdbarch != NULL);
3253 return gdbarch->single_step_through_delay != NULL;
3254}
3255
3256int
3257gdbarch_single_step_through_delay (struct gdbarch *gdbarch, struct frame_info *frame)
3258{
3259 gdb_assert (gdbarch != NULL);
3260 gdb_assert (gdbarch->single_step_through_delay != NULL);
3261 if (gdbarch_debug >= 2)
3262 fprintf_unfiltered (gdb_stdlog, "gdbarch_single_step_through_delay called\n");
3263 return gdbarch->single_step_through_delay (gdbarch, frame);
3264}
3265
3266void
3267set_gdbarch_single_step_through_delay (struct gdbarch *gdbarch,
3268 gdbarch_single_step_through_delay_ftype single_step_through_delay)
3269{
3270 gdbarch->single_step_through_delay = single_step_through_delay;
3271}
3272
2bf0cb65 3273int
a89aa300 3274gdbarch_print_insn (struct gdbarch *gdbarch, bfd_vma vma, struct disassemble_info *info)
2bf0cb65 3275{
8de9bdc4 3276 gdb_assert (gdbarch != NULL);
956ac328 3277 gdb_assert (gdbarch->print_insn != NULL);
2bf0cb65
EZ
3278 if (gdbarch_debug >= 2)
3279 fprintf_unfiltered (gdb_stdlog, "gdbarch_print_insn called\n");
3280 return gdbarch->print_insn (vma, info);
3281}
3282
3283void
3284set_gdbarch_print_insn (struct gdbarch *gdbarch,
3285 gdbarch_print_insn_ftype print_insn)
3286{
3287 gdbarch->print_insn = print_insn;
3288}
3289
bdcd319a 3290CORE_ADDR
52f729a7 3291gdbarch_skip_trampoline_code (struct gdbarch *gdbarch, struct frame_info *frame, CORE_ADDR pc)
bdcd319a 3292{
8de9bdc4 3293 gdb_assert (gdbarch != NULL);
956ac328 3294 gdb_assert (gdbarch->skip_trampoline_code != NULL);
bdcd319a
CV
3295 if (gdbarch_debug >= 2)
3296 fprintf_unfiltered (gdb_stdlog, "gdbarch_skip_trampoline_code called\n");
52f729a7 3297 return gdbarch->skip_trampoline_code (frame, pc);
bdcd319a
CV
3298}
3299
3300void
3301set_gdbarch_skip_trampoline_code (struct gdbarch *gdbarch,
3302 gdbarch_skip_trampoline_code_ftype skip_trampoline_code)
3303{
3304 gdbarch->skip_trampoline_code = skip_trampoline_code;
3305}
3306
dea0c52f
MK
3307CORE_ADDR
3308gdbarch_skip_solib_resolver (struct gdbarch *gdbarch, CORE_ADDR pc)
3309{
3310 gdb_assert (gdbarch != NULL);
3311 gdb_assert (gdbarch->skip_solib_resolver != NULL);
3312 if (gdbarch_debug >= 2)
3313 fprintf_unfiltered (gdb_stdlog, "gdbarch_skip_solib_resolver called\n");
4c8c40e6 3314 return gdbarch->skip_solib_resolver (gdbarch, pc);
dea0c52f
MK
3315}
3316
3317void
3318set_gdbarch_skip_solib_resolver (struct gdbarch *gdbarch,
3319 gdbarch_skip_solib_resolver_ftype skip_solib_resolver)
3320{
3321 gdbarch->skip_solib_resolver = skip_solib_resolver;
3322}
3323
d50355b6 3324int
2c02bd72 3325gdbarch_in_solib_return_trampoline (struct gdbarch *gdbarch, CORE_ADDR pc, const char *name)
d50355b6
MS
3326{
3327 gdb_assert (gdbarch != NULL);
956ac328 3328 gdb_assert (gdbarch->in_solib_return_trampoline != NULL);
d50355b6
MS
3329 if (gdbarch_debug >= 2)
3330 fprintf_unfiltered (gdb_stdlog, "gdbarch_in_solib_return_trampoline called\n");
e17a4113 3331 return gdbarch->in_solib_return_trampoline (gdbarch, pc, name);
d50355b6
MS
3332}
3333
3334void
3335set_gdbarch_in_solib_return_trampoline (struct gdbarch *gdbarch,
3336 gdbarch_in_solib_return_trampoline_ftype in_solib_return_trampoline)
3337{
3338 gdbarch->in_solib_return_trampoline = in_solib_return_trampoline;
3339}
3340
c12260ac 3341int
c9cf6e20 3342gdbarch_stack_frame_destroyed_p (struct gdbarch *gdbarch, CORE_ADDR addr)
c12260ac 3343{
8de9bdc4 3344 gdb_assert (gdbarch != NULL);
c9cf6e20 3345 gdb_assert (gdbarch->stack_frame_destroyed_p != NULL);
c12260ac 3346 if (gdbarch_debug >= 2)
c9cf6e20
MG
3347 fprintf_unfiltered (gdb_stdlog, "gdbarch_stack_frame_destroyed_p called\n");
3348 return gdbarch->stack_frame_destroyed_p (gdbarch, addr);
c12260ac
CV
3349}
3350
3351void
c9cf6e20
MG
3352set_gdbarch_stack_frame_destroyed_p (struct gdbarch *gdbarch,
3353 gdbarch_stack_frame_destroyed_p_ftype stack_frame_destroyed_p)
c12260ac 3354{
c9cf6e20 3355 gdbarch->stack_frame_destroyed_p = stack_frame_destroyed_p;
c12260ac
CV
3356}
3357
3e29f34a
MR
3358int
3359gdbarch_elf_make_msymbol_special_p (struct gdbarch *gdbarch)
3360{
3361 gdb_assert (gdbarch != NULL);
3362 return gdbarch->elf_make_msymbol_special != NULL;
3363}
3364
a2cf933a
EZ
3365void
3366gdbarch_elf_make_msymbol_special (struct gdbarch *gdbarch, asymbol *sym, struct minimal_symbol *msym)
3367{
8de9bdc4 3368 gdb_assert (gdbarch != NULL);
956ac328 3369 gdb_assert (gdbarch->elf_make_msymbol_special != NULL);
a2cf933a
EZ
3370 if (gdbarch_debug >= 2)
3371 fprintf_unfiltered (gdb_stdlog, "gdbarch_elf_make_msymbol_special called\n");
3372 gdbarch->elf_make_msymbol_special (sym, msym);
3373}
3374
3375void
3376set_gdbarch_elf_make_msymbol_special (struct gdbarch *gdbarch,
3377 gdbarch_elf_make_msymbol_special_ftype elf_make_msymbol_special)
3378{
3379 gdbarch->elf_make_msymbol_special = elf_make_msymbol_special;
3380}
3381
3382void
3383gdbarch_coff_make_msymbol_special (struct gdbarch *gdbarch, int val, struct minimal_symbol *msym)
3384{
8de9bdc4 3385 gdb_assert (gdbarch != NULL);
956ac328 3386 gdb_assert (gdbarch->coff_make_msymbol_special != NULL);
a2cf933a
EZ
3387 if (gdbarch_debug >= 2)
3388 fprintf_unfiltered (gdb_stdlog, "gdbarch_coff_make_msymbol_special called\n");
3389 gdbarch->coff_make_msymbol_special (val, msym);
3390}
3391
3392void
3393set_gdbarch_coff_make_msymbol_special (struct gdbarch *gdbarch,
3394 gdbarch_coff_make_msymbol_special_ftype coff_make_msymbol_special)
3395{
3396 gdbarch->coff_make_msymbol_special = coff_make_msymbol_special;
3397}
3398
3e29f34a
MR
3399void
3400gdbarch_make_symbol_special (struct gdbarch *gdbarch, struct symbol *sym, struct objfile *objfile)
3401{
3402 gdb_assert (gdbarch != NULL);
3403 gdb_assert (gdbarch->make_symbol_special != NULL);
3404 if (gdbarch_debug >= 2)
3405 fprintf_unfiltered (gdb_stdlog, "gdbarch_make_symbol_special called\n");
3406 gdbarch->make_symbol_special (sym, objfile);
3407}
3408
3409void
3410set_gdbarch_make_symbol_special (struct gdbarch *gdbarch,
3411 gdbarch_make_symbol_special_ftype make_symbol_special)
3412{
3413 gdbarch->make_symbol_special = make_symbol_special;
3414}
3415
3416CORE_ADDR
3417gdbarch_adjust_dwarf2_addr (struct gdbarch *gdbarch, CORE_ADDR pc)
3418{
3419 gdb_assert (gdbarch != NULL);
3420 gdb_assert (gdbarch->adjust_dwarf2_addr != NULL);
3421 if (gdbarch_debug >= 2)
3422 fprintf_unfiltered (gdb_stdlog, "gdbarch_adjust_dwarf2_addr called\n");
3423 return gdbarch->adjust_dwarf2_addr (pc);
3424}
3425
3426void
3427set_gdbarch_adjust_dwarf2_addr (struct gdbarch *gdbarch,
3428 gdbarch_adjust_dwarf2_addr_ftype adjust_dwarf2_addr)
3429{
3430 gdbarch->adjust_dwarf2_addr = adjust_dwarf2_addr;
3431}
3432
3433CORE_ADDR
3434gdbarch_adjust_dwarf2_line (struct gdbarch *gdbarch, CORE_ADDR addr, int rel)
3435{
3436 gdb_assert (gdbarch != NULL);
3437 gdb_assert (gdbarch->adjust_dwarf2_line != NULL);
3438 if (gdbarch_debug >= 2)
3439 fprintf_unfiltered (gdb_stdlog, "gdbarch_adjust_dwarf2_line called\n");
3440 return gdbarch->adjust_dwarf2_line (addr, rel);
3441}
3442
3443void
3444set_gdbarch_adjust_dwarf2_line (struct gdbarch *gdbarch,
3445 gdbarch_adjust_dwarf2_line_ftype adjust_dwarf2_line)
3446{
3447 gdbarch->adjust_dwarf2_line = adjust_dwarf2_line;
3448}
3449
c4ed33b9
AC
3450int
3451gdbarch_cannot_step_breakpoint (struct gdbarch *gdbarch)
3452{
3453 gdb_assert (gdbarch != NULL);
3454 /* Skip verify of cannot_step_breakpoint, invalid_p == 0 */
3455 if (gdbarch_debug >= 2)
3456 fprintf_unfiltered (gdb_stdlog, "gdbarch_cannot_step_breakpoint called\n");
3457 return gdbarch->cannot_step_breakpoint;
3458}
3459
3460void
3461set_gdbarch_cannot_step_breakpoint (struct gdbarch *gdbarch,
3462 int cannot_step_breakpoint)
3463{
3464 gdbarch->cannot_step_breakpoint = cannot_step_breakpoint;
3465}
3466
f74fa174
MM
3467int
3468gdbarch_have_nonsteppable_watchpoint (struct gdbarch *gdbarch)
3469{
3470 gdb_assert (gdbarch != NULL);
3471 /* Skip verify of have_nonsteppable_watchpoint, invalid_p == 0 */
3472 if (gdbarch_debug >= 2)
3473 fprintf_unfiltered (gdb_stdlog, "gdbarch_have_nonsteppable_watchpoint called\n");
3474 return gdbarch->have_nonsteppable_watchpoint;
3475}
3476
3477void
3478set_gdbarch_have_nonsteppable_watchpoint (struct gdbarch *gdbarch,
967c0d83 3479 int have_nonsteppable_watchpoint)
f74fa174
MM
3480{
3481 gdbarch->have_nonsteppable_watchpoint = have_nonsteppable_watchpoint;
3482}
3483
8b2dbe47
KB
3484int
3485gdbarch_address_class_type_flags_p (struct gdbarch *gdbarch)
3486{
3487 gdb_assert (gdbarch != NULL);
956ac328 3488 return gdbarch->address_class_type_flags != NULL;
8b2dbe47
KB
3489}
3490
3491int
3492gdbarch_address_class_type_flags (struct gdbarch *gdbarch, int byte_size, int dwarf2_addr_class)
3493{
3494 gdb_assert (gdbarch != NULL);
956ac328 3495 gdb_assert (gdbarch->address_class_type_flags != NULL);
8b2dbe47
KB
3496 if (gdbarch_debug >= 2)
3497 fprintf_unfiltered (gdb_stdlog, "gdbarch_address_class_type_flags called\n");
3498 return gdbarch->address_class_type_flags (byte_size, dwarf2_addr_class);
3499}
3500
3501void
3502set_gdbarch_address_class_type_flags (struct gdbarch *gdbarch,
3503 gdbarch_address_class_type_flags_ftype address_class_type_flags)
3504{
3505 gdbarch->address_class_type_flags = address_class_type_flags;
3506}
3507
3508int
3509gdbarch_address_class_type_flags_to_name_p (struct gdbarch *gdbarch)
3510{
3511 gdb_assert (gdbarch != NULL);
956ac328 3512 return gdbarch->address_class_type_flags_to_name != NULL;
8b2dbe47
KB
3513}
3514
321432c0 3515const char *
8b2dbe47
KB
3516gdbarch_address_class_type_flags_to_name (struct gdbarch *gdbarch, int type_flags)
3517{
3518 gdb_assert (gdbarch != NULL);
956ac328 3519 gdb_assert (gdbarch->address_class_type_flags_to_name != NULL);
8b2dbe47
KB
3520 if (gdbarch_debug >= 2)
3521 fprintf_unfiltered (gdb_stdlog, "gdbarch_address_class_type_flags_to_name called\n");
5f11f355 3522 return gdbarch->address_class_type_flags_to_name (gdbarch, type_flags);
8b2dbe47
KB
3523}
3524
3525void
3526set_gdbarch_address_class_type_flags_to_name (struct gdbarch *gdbarch,
3527 gdbarch_address_class_type_flags_to_name_ftype address_class_type_flags_to_name)
3528{
3529 gdbarch->address_class_type_flags_to_name = address_class_type_flags_to_name;
3530}
3531
b41c5a85
JW
3532bool
3533gdbarch_execute_dwarf_cfa_vendor_op (struct gdbarch *gdbarch, gdb_byte op, struct dwarf2_frame_state *fs)
3534{
3535 gdb_assert (gdbarch != NULL);
3536 gdb_assert (gdbarch->execute_dwarf_cfa_vendor_op != NULL);
3537 if (gdbarch_debug >= 2)
3538 fprintf_unfiltered (gdb_stdlog, "gdbarch_execute_dwarf_cfa_vendor_op called\n");
3539 return gdbarch->execute_dwarf_cfa_vendor_op (gdbarch, op, fs);
3540}
3541
3542void
3543set_gdbarch_execute_dwarf_cfa_vendor_op (struct gdbarch *gdbarch,
3544 gdbarch_execute_dwarf_cfa_vendor_op_ftype execute_dwarf_cfa_vendor_op)
3545{
3546 gdbarch->execute_dwarf_cfa_vendor_op = execute_dwarf_cfa_vendor_op;
3547}
3548
8b2dbe47
KB
3549int
3550gdbarch_address_class_name_to_type_flags_p (struct gdbarch *gdbarch)
3551{
3552 gdb_assert (gdbarch != NULL);
956ac328 3553 return gdbarch->address_class_name_to_type_flags != NULL;
8b2dbe47
KB
3554}
3555
3556int
321432c0 3557gdbarch_address_class_name_to_type_flags (struct gdbarch *gdbarch, const char *name, int *type_flags_ptr)
8b2dbe47
KB
3558{
3559 gdb_assert (gdbarch != NULL);
956ac328 3560 gdb_assert (gdbarch->address_class_name_to_type_flags != NULL);
8b2dbe47
KB
3561 if (gdbarch_debug >= 2)
3562 fprintf_unfiltered (gdb_stdlog, "gdbarch_address_class_name_to_type_flags called\n");
5f11f355 3563 return gdbarch->address_class_name_to_type_flags (gdbarch, name, type_flags_ptr);
8b2dbe47
KB
3564}
3565
3566void
3567set_gdbarch_address_class_name_to_type_flags (struct gdbarch *gdbarch,
3568 gdbarch_address_class_name_to_type_flags_ftype address_class_name_to_type_flags)
3569{
3570 gdbarch->address_class_name_to_type_flags = address_class_name_to_type_flags;
3571}
3572
b59ff9d5
AC
3573int
3574gdbarch_register_reggroup_p (struct gdbarch *gdbarch, int regnum, struct reggroup *reggroup)
3575{
3576 gdb_assert (gdbarch != NULL);
956ac328 3577 gdb_assert (gdbarch->register_reggroup_p != NULL);
b59ff9d5
AC
3578 if (gdbarch_debug >= 2)
3579 fprintf_unfiltered (gdb_stdlog, "gdbarch_register_reggroup_p called\n");
3580 return gdbarch->register_reggroup_p (gdbarch, regnum, reggroup);
3581}
3582
3583void
3584set_gdbarch_register_reggroup_p (struct gdbarch *gdbarch,
3585 gdbarch_register_reggroup_p_ftype register_reggroup_p)
3586{
3587 gdbarch->register_reggroup_p = register_reggroup_p;
3588}
3589
143985b7
AF
3590int
3591gdbarch_fetch_pointer_argument_p (struct gdbarch *gdbarch)
3592{
3593 gdb_assert (gdbarch != NULL);
956ac328 3594 return gdbarch->fetch_pointer_argument != NULL;
143985b7
AF
3595}
3596
3597CORE_ADDR
3598gdbarch_fetch_pointer_argument (struct gdbarch *gdbarch, struct frame_info *frame, int argi, struct type *type)
3599{
3600 gdb_assert (gdbarch != NULL);
956ac328 3601 gdb_assert (gdbarch->fetch_pointer_argument != NULL);
143985b7
AF
3602 if (gdbarch_debug >= 2)
3603 fprintf_unfiltered (gdb_stdlog, "gdbarch_fetch_pointer_argument called\n");
3604 return gdbarch->fetch_pointer_argument (frame, argi, type);
3605}
3606
3607void
3608set_gdbarch_fetch_pointer_argument (struct gdbarch *gdbarch,
3609 gdbarch_fetch_pointer_argument_ftype fetch_pointer_argument)
3610{
3611 gdbarch->fetch_pointer_argument = fetch_pointer_argument;
3612}
3613
5aa82d05
AA
3614int
3615gdbarch_iterate_over_regset_sections_p (struct gdbarch *gdbarch)
3616{
3617 gdb_assert (gdbarch != NULL);
3618 return gdbarch->iterate_over_regset_sections != NULL;
3619}
3620
3621void
3622gdbarch_iterate_over_regset_sections (struct gdbarch *gdbarch, iterate_over_regset_sections_cb *cb, void *cb_data, const struct regcache *regcache)
17ea7499
CES
3623{
3624 gdb_assert (gdbarch != NULL);
5aa82d05 3625 gdb_assert (gdbarch->iterate_over_regset_sections != NULL);
17ea7499 3626 if (gdbarch_debug >= 2)
5aa82d05
AA
3627 fprintf_unfiltered (gdb_stdlog, "gdbarch_iterate_over_regset_sections called\n");
3628 gdbarch->iterate_over_regset_sections (gdbarch, cb, cb_data, regcache);
17ea7499
CES
3629}
3630
3631void
5aa82d05
AA
3632set_gdbarch_iterate_over_regset_sections (struct gdbarch *gdbarch,
3633 gdbarch_iterate_over_regset_sections_ftype iterate_over_regset_sections)
17ea7499 3634{
5aa82d05 3635 gdbarch->iterate_over_regset_sections = iterate_over_regset_sections;
17ea7499
CES
3636}
3637
6432734d
UW
3638int
3639gdbarch_make_corefile_notes_p (struct gdbarch *gdbarch)
3640{
3641 gdb_assert (gdbarch != NULL);
3642 return gdbarch->make_corefile_notes != NULL;
3643}
3644
3645char *
3646gdbarch_make_corefile_notes (struct gdbarch *gdbarch, bfd *obfd, int *note_size)
3647{
3648 gdb_assert (gdbarch != NULL);
3649 gdb_assert (gdbarch->make_corefile_notes != NULL);
3650 if (gdbarch_debug >= 2)
3651 fprintf_unfiltered (gdb_stdlog, "gdbarch_make_corefile_notes called\n");
3652 return gdbarch->make_corefile_notes (gdbarch, obfd, note_size);
3653}
3654
3655void
3656set_gdbarch_make_corefile_notes (struct gdbarch *gdbarch,
3657 gdbarch_make_corefile_notes_ftype make_corefile_notes)
3658{
3659 gdbarch->make_corefile_notes = make_corefile_notes;
3660}
3661
b3ac9c77
SDJ
3662int
3663gdbarch_elfcore_write_linux_prpsinfo_p (struct gdbarch *gdbarch)
3664{
3665 gdb_assert (gdbarch != NULL);
3666 return gdbarch->elfcore_write_linux_prpsinfo != NULL;
3667}
3668
3669char *
3670gdbarch_elfcore_write_linux_prpsinfo (struct gdbarch *gdbarch, bfd *obfd, char *note_data, int *note_size, const struct elf_internal_linux_prpsinfo *info)
3671{
3672 gdb_assert (gdbarch != NULL);
3673 gdb_assert (gdbarch->elfcore_write_linux_prpsinfo != NULL);
3674 if (gdbarch_debug >= 2)
3675 fprintf_unfiltered (gdb_stdlog, "gdbarch_elfcore_write_linux_prpsinfo called\n");
3676 return gdbarch->elfcore_write_linux_prpsinfo (obfd, note_data, note_size, info);
3677}
3678
3679void
3680set_gdbarch_elfcore_write_linux_prpsinfo (struct gdbarch *gdbarch,
3681 gdbarch_elfcore_write_linux_prpsinfo_ftype elfcore_write_linux_prpsinfo)
3682{
3683 gdbarch->elfcore_write_linux_prpsinfo = elfcore_write_linux_prpsinfo;
3684}
3685
35c2fab7
UW
3686int
3687gdbarch_find_memory_regions_p (struct gdbarch *gdbarch)
3688{
3689 gdb_assert (gdbarch != NULL);
3690 return gdbarch->find_memory_regions != NULL;
3691}
3692
3693int
3694gdbarch_find_memory_regions (struct gdbarch *gdbarch, find_memory_region_ftype func, void *data)
3695{
3696 gdb_assert (gdbarch != NULL);
3697 gdb_assert (gdbarch->find_memory_regions != NULL);
3698 if (gdbarch_debug >= 2)
3699 fprintf_unfiltered (gdb_stdlog, "gdbarch_find_memory_regions called\n");
3700 return gdbarch->find_memory_regions (gdbarch, func, data);
3701}
3702
3703void
3704set_gdbarch_find_memory_regions (struct gdbarch *gdbarch,
3705 gdbarch_find_memory_regions_ftype find_memory_regions)
3706{
3707 gdbarch->find_memory_regions = find_memory_regions;
3708}
3709
de584861
PA
3710int
3711gdbarch_core_xfer_shared_libraries_p (struct gdbarch *gdbarch)
3712{
3713 gdb_assert (gdbarch != NULL);
3714 return gdbarch->core_xfer_shared_libraries != NULL;
3715}
3716
c09f20e4 3717ULONGEST
7ec1862d 3718gdbarch_core_xfer_shared_libraries (struct gdbarch *gdbarch, gdb_byte *readbuf, ULONGEST offset, ULONGEST len)
de584861
PA
3719{
3720 gdb_assert (gdbarch != NULL);
3721 gdb_assert (gdbarch->core_xfer_shared_libraries != NULL);
3722 if (gdbarch_debug >= 2)
3723 fprintf_unfiltered (gdb_stdlog, "gdbarch_core_xfer_shared_libraries called\n");
3724 return gdbarch->core_xfer_shared_libraries (gdbarch, readbuf, offset, len);
3725}
3726
3727void
3728set_gdbarch_core_xfer_shared_libraries (struct gdbarch *gdbarch,
3729 gdbarch_core_xfer_shared_libraries_ftype core_xfer_shared_libraries)
3730{
3731 gdbarch->core_xfer_shared_libraries = core_xfer_shared_libraries;
3732}
3733
356a5233
JB
3734int
3735gdbarch_core_xfer_shared_libraries_aix_p (struct gdbarch *gdbarch)
3736{
3737 gdb_assert (gdbarch != NULL);
3738 return gdbarch->core_xfer_shared_libraries_aix != NULL;
3739}
3740
c09f20e4 3741ULONGEST
7ec1862d 3742gdbarch_core_xfer_shared_libraries_aix (struct gdbarch *gdbarch, gdb_byte *readbuf, ULONGEST offset, ULONGEST len)
356a5233
JB
3743{
3744 gdb_assert (gdbarch != NULL);
3745 gdb_assert (gdbarch->core_xfer_shared_libraries_aix != NULL);
3746 if (gdbarch_debug >= 2)
3747 fprintf_unfiltered (gdb_stdlog, "gdbarch_core_xfer_shared_libraries_aix called\n");
3748 return gdbarch->core_xfer_shared_libraries_aix (gdbarch, readbuf, offset, len);
3749}
3750
3751void
3752set_gdbarch_core_xfer_shared_libraries_aix (struct gdbarch *gdbarch,
3753 gdbarch_core_xfer_shared_libraries_aix_ftype core_xfer_shared_libraries_aix)
3754{
3755 gdbarch->core_xfer_shared_libraries_aix = core_xfer_shared_libraries_aix;
3756}
3757
28439f5e
PA
3758int
3759gdbarch_core_pid_to_str_p (struct gdbarch *gdbarch)
3760{
3761 gdb_assert (gdbarch != NULL);
3762 return gdbarch->core_pid_to_str != NULL;
3763}
3764
7a114964 3765const char *
28439f5e
PA
3766gdbarch_core_pid_to_str (struct gdbarch *gdbarch, ptid_t ptid)
3767{
3768 gdb_assert (gdbarch != NULL);
3769 gdb_assert (gdbarch->core_pid_to_str != NULL);
3770 if (gdbarch_debug >= 2)
3771 fprintf_unfiltered (gdb_stdlog, "gdbarch_core_pid_to_str called\n");
3772 return gdbarch->core_pid_to_str (gdbarch, ptid);
3773}
3774
3775void
3776set_gdbarch_core_pid_to_str (struct gdbarch *gdbarch,
3777 gdbarch_core_pid_to_str_ftype core_pid_to_str)
3778{
3779 gdbarch->core_pid_to_str = core_pid_to_str;
3780}
3781
4dfc5dbc
JB
3782int
3783gdbarch_core_thread_name_p (struct gdbarch *gdbarch)
3784{
3785 gdb_assert (gdbarch != NULL);
3786 return gdbarch->core_thread_name != NULL;
3787}
3788
3789const char *
3790gdbarch_core_thread_name (struct gdbarch *gdbarch, struct thread_info *thr)
3791{
3792 gdb_assert (gdbarch != NULL);
3793 gdb_assert (gdbarch->core_thread_name != NULL);
3794 if (gdbarch_debug >= 2)
3795 fprintf_unfiltered (gdb_stdlog, "gdbarch_core_thread_name called\n");
3796 return gdbarch->core_thread_name (gdbarch, thr);
3797}
3798
3799void
3800set_gdbarch_core_thread_name (struct gdbarch *gdbarch,
3801 gdbarch_core_thread_name_ftype core_thread_name)
3802{
3803 gdbarch->core_thread_name = core_thread_name;
3804}
3805
a78c2d62
UW
3806int
3807gdbarch_gcore_bfd_target_p (struct gdbarch *gdbarch)
3808{
3809 gdb_assert (gdbarch != NULL);
3810 return gdbarch->gcore_bfd_target != 0;
3811}
3812
3813const char *
3814gdbarch_gcore_bfd_target (struct gdbarch *gdbarch)
3815{
3816 gdb_assert (gdbarch != NULL);
3817 /* Check variable changed from pre-default. */
3818 gdb_assert (gdbarch->gcore_bfd_target != 0);
3819 if (gdbarch_debug >= 2)
3820 fprintf_unfiltered (gdb_stdlog, "gdbarch_gcore_bfd_target called\n");
3821 return gdbarch->gcore_bfd_target;
3822}
3823
3824void
3825set_gdbarch_gcore_bfd_target (struct gdbarch *gdbarch,
3826 const char * gcore_bfd_target)
3827{
3828 gdbarch->gcore_bfd_target = gcore_bfd_target;
3829}
3830
0d5de010
DJ
3831int
3832gdbarch_vtable_function_descriptors (struct gdbarch *gdbarch)
3833{
3834 gdb_assert (gdbarch != NULL);
3835 /* Skip verify of vtable_function_descriptors, invalid_p == 0 */
3836 if (gdbarch_debug >= 2)
3837 fprintf_unfiltered (gdb_stdlog, "gdbarch_vtable_function_descriptors called\n");
3838 return gdbarch->vtable_function_descriptors;
3839}
3840
3841void
3842set_gdbarch_vtable_function_descriptors (struct gdbarch *gdbarch,
3843 int vtable_function_descriptors)
3844{
3845 gdbarch->vtable_function_descriptors = vtable_function_descriptors;
3846}
3847
3848int
3849gdbarch_vbit_in_delta (struct gdbarch *gdbarch)
3850{
3851 gdb_assert (gdbarch != NULL);
3852 /* Skip verify of vbit_in_delta, invalid_p == 0 */
3853 if (gdbarch_debug >= 2)
3854 fprintf_unfiltered (gdb_stdlog, "gdbarch_vbit_in_delta called\n");
3855 return gdbarch->vbit_in_delta;
3856}
3857
3858void
3859set_gdbarch_vbit_in_delta (struct gdbarch *gdbarch,
3860 int vbit_in_delta)
3861{
3862 gdbarch->vbit_in_delta = vbit_in_delta;
3863}
3864
6d350bb5
UW
3865void
3866gdbarch_skip_permanent_breakpoint (struct gdbarch *gdbarch, struct regcache *regcache)
3867{
3868 gdb_assert (gdbarch != NULL);
3869 gdb_assert (gdbarch->skip_permanent_breakpoint != NULL);
3870 if (gdbarch_debug >= 2)
3871 fprintf_unfiltered (gdb_stdlog, "gdbarch_skip_permanent_breakpoint called\n");
3872 gdbarch->skip_permanent_breakpoint (regcache);
3873}
3874
3875void
3876set_gdbarch_skip_permanent_breakpoint (struct gdbarch *gdbarch,
3877 gdbarch_skip_permanent_breakpoint_ftype skip_permanent_breakpoint)
3878{
3879 gdbarch->skip_permanent_breakpoint = skip_permanent_breakpoint;
3880}
3881
237fc4c9
PA
3882int
3883gdbarch_max_insn_length_p (struct gdbarch *gdbarch)
3884{
3885 gdb_assert (gdbarch != NULL);
3886 return gdbarch->max_insn_length != 0;
3887}
3888
3889ULONGEST
3890gdbarch_max_insn_length (struct gdbarch *gdbarch)
3891{
3892 gdb_assert (gdbarch != NULL);
3893 /* Check variable changed from pre-default. */
3894 gdb_assert (gdbarch->max_insn_length != 0);
3895 if (gdbarch_debug >= 2)
3896 fprintf_unfiltered (gdb_stdlog, "gdbarch_max_insn_length called\n");
3897 return gdbarch->max_insn_length;
3898}
3899
3900void
3901set_gdbarch_max_insn_length (struct gdbarch *gdbarch,
3902 ULONGEST max_insn_length)
3903{
3904 gdbarch->max_insn_length = max_insn_length;
3905}
3906
3907int
3908gdbarch_displaced_step_copy_insn_p (struct gdbarch *gdbarch)
3909{
3910 gdb_assert (gdbarch != NULL);
3911 return gdbarch->displaced_step_copy_insn != NULL;
3912}
3913
3914struct displaced_step_closure *
3915gdbarch_displaced_step_copy_insn (struct gdbarch *gdbarch, CORE_ADDR from, CORE_ADDR to, struct regcache *regs)
3916{
3917 gdb_assert (gdbarch != NULL);
3918 gdb_assert (gdbarch->displaced_step_copy_insn != NULL);
3919 if (gdbarch_debug >= 2)
3920 fprintf_unfiltered (gdb_stdlog, "gdbarch_displaced_step_copy_insn called\n");
3921 return gdbarch->displaced_step_copy_insn (gdbarch, from, to, regs);
3922}
3923
3924void
3925set_gdbarch_displaced_step_copy_insn (struct gdbarch *gdbarch,
3926 gdbarch_displaced_step_copy_insn_ftype displaced_step_copy_insn)
3927{
3928 gdbarch->displaced_step_copy_insn = displaced_step_copy_insn;
3929}
3930
99e40580
UW
3931int
3932gdbarch_displaced_step_hw_singlestep (struct gdbarch *gdbarch, struct displaced_step_closure *closure)
3933{
3934 gdb_assert (gdbarch != NULL);
3935 gdb_assert (gdbarch->displaced_step_hw_singlestep != NULL);
3936 if (gdbarch_debug >= 2)
3937 fprintf_unfiltered (gdb_stdlog, "gdbarch_displaced_step_hw_singlestep called\n");
3938 return gdbarch->displaced_step_hw_singlestep (gdbarch, closure);
3939}
3940
3941void
3942set_gdbarch_displaced_step_hw_singlestep (struct gdbarch *gdbarch,
3943 gdbarch_displaced_step_hw_singlestep_ftype displaced_step_hw_singlestep)
3944{
3945 gdbarch->displaced_step_hw_singlestep = displaced_step_hw_singlestep;
3946}
3947
237fc4c9
PA
3948int
3949gdbarch_displaced_step_fixup_p (struct gdbarch *gdbarch)
3950{
3951 gdb_assert (gdbarch != NULL);
3952 return gdbarch->displaced_step_fixup != NULL;
3953}
3954
3955void
3956gdbarch_displaced_step_fixup (struct gdbarch *gdbarch, struct displaced_step_closure *closure, CORE_ADDR from, CORE_ADDR to, struct regcache *regs)
3957{
3958 gdb_assert (gdbarch != NULL);
3959 gdb_assert (gdbarch->displaced_step_fixup != NULL);
3960 /* Do not check predicate: gdbarch->displaced_step_fixup != NULL, allow call. */
3961 if (gdbarch_debug >= 2)
3962 fprintf_unfiltered (gdb_stdlog, "gdbarch_displaced_step_fixup called\n");
3963 gdbarch->displaced_step_fixup (gdbarch, closure, from, to, regs);
3964}
3965
3966void
3967set_gdbarch_displaced_step_fixup (struct gdbarch *gdbarch,
3968 gdbarch_displaced_step_fixup_ftype displaced_step_fixup)
3969{
3970 gdbarch->displaced_step_fixup = displaced_step_fixup;
3971}
3972
3973void
3974gdbarch_displaced_step_free_closure (struct gdbarch *gdbarch, struct displaced_step_closure *closure)
3975{
3976 gdb_assert (gdbarch != NULL);
3977 gdb_assert (gdbarch->displaced_step_free_closure != NULL);
3978 if (gdbarch_debug >= 2)
3979 fprintf_unfiltered (gdb_stdlog, "gdbarch_displaced_step_free_closure called\n");
3980 gdbarch->displaced_step_free_closure (gdbarch, closure);
3981}
3982
3983void
3984set_gdbarch_displaced_step_free_closure (struct gdbarch *gdbarch,
3985 gdbarch_displaced_step_free_closure_ftype displaced_step_free_closure)
3986{
3987 gdbarch->displaced_step_free_closure = displaced_step_free_closure;
3988}
3989
3990CORE_ADDR
3991gdbarch_displaced_step_location (struct gdbarch *gdbarch)
3992{
3993 gdb_assert (gdbarch != NULL);
3994 gdb_assert (gdbarch->displaced_step_location != NULL);
3995 if (gdbarch_debug >= 2)
3996 fprintf_unfiltered (gdb_stdlog, "gdbarch_displaced_step_location called\n");
3997 return gdbarch->displaced_step_location (gdbarch);
3998}
3999
4000void
4001set_gdbarch_displaced_step_location (struct gdbarch *gdbarch,
4002 gdbarch_displaced_step_location_ftype displaced_step_location)
4003{
4004 gdbarch->displaced_step_location = displaced_step_location;
4005}
4006
dde08ee1
PA
4007int
4008gdbarch_relocate_instruction_p (struct gdbarch *gdbarch)
4009{
4010 gdb_assert (gdbarch != NULL);
4011 return gdbarch->relocate_instruction != NULL;
4012}
4013
4014void
4015gdbarch_relocate_instruction (struct gdbarch *gdbarch, CORE_ADDR *to, CORE_ADDR from)
4016{
4017 gdb_assert (gdbarch != NULL);
4018 gdb_assert (gdbarch->relocate_instruction != NULL);
4019 /* Do not check predicate: gdbarch->relocate_instruction != NULL, allow call. */
4020 if (gdbarch_debug >= 2)
4021 fprintf_unfiltered (gdb_stdlog, "gdbarch_relocate_instruction called\n");
4022 gdbarch->relocate_instruction (gdbarch, to, from);
4023}
4024
4025void
4026set_gdbarch_relocate_instruction (struct gdbarch *gdbarch,
4027 gdbarch_relocate_instruction_ftype relocate_instruction)
4028{
4029 gdbarch->relocate_instruction = relocate_instruction;
4030}
4031
1c772458
UW
4032int
4033gdbarch_overlay_update_p (struct gdbarch *gdbarch)
4034{
4035 gdb_assert (gdbarch != NULL);
4036 return gdbarch->overlay_update != NULL;
4037}
4038
4039void
4040gdbarch_overlay_update (struct gdbarch *gdbarch, struct obj_section *osect)
4041{
4042 gdb_assert (gdbarch != NULL);
4043 gdb_assert (gdbarch->overlay_update != NULL);
4044 if (gdbarch_debug >= 2)
4045 fprintf_unfiltered (gdb_stdlog, "gdbarch_overlay_update called\n");
4046 gdbarch->overlay_update (osect);
4047}
4048
4049void
4050set_gdbarch_overlay_update (struct gdbarch *gdbarch,
4051 gdbarch_overlay_update_ftype overlay_update)
4052{
4053 gdbarch->overlay_update = overlay_update;
4054}
4055
4eb0ad19
DJ
4056int
4057gdbarch_core_read_description_p (struct gdbarch *gdbarch)
4058{
4059 gdb_assert (gdbarch != NULL);
4060 return gdbarch->core_read_description != NULL;
4061}
4062
4063const struct target_desc *
4064gdbarch_core_read_description (struct gdbarch *gdbarch, struct target_ops *target, bfd *abfd)
4065{
4066 gdb_assert (gdbarch != NULL);
4067 gdb_assert (gdbarch->core_read_description != NULL);
4068 if (gdbarch_debug >= 2)
4069 fprintf_unfiltered (gdb_stdlog, "gdbarch_core_read_description called\n");
4070 return gdbarch->core_read_description (gdbarch, target, abfd);
4071}
4072
4073void
4074set_gdbarch_core_read_description (struct gdbarch *gdbarch,
4075 gdbarch_core_read_description_ftype core_read_description)
4076{
4077 gdbarch->core_read_description = core_read_description;
4078}
4079
149ad273
UW
4080int
4081gdbarch_static_transform_name_p (struct gdbarch *gdbarch)
4082{
4083 gdb_assert (gdbarch != NULL);
4084 return gdbarch->static_transform_name != NULL;
4085}
4086
0d5cff50
DE
4087const char *
4088gdbarch_static_transform_name (struct gdbarch *gdbarch, const char *name)
149ad273
UW
4089{
4090 gdb_assert (gdbarch != NULL);
4091 gdb_assert (gdbarch->static_transform_name != NULL);
4092 if (gdbarch_debug >= 2)
4093 fprintf_unfiltered (gdb_stdlog, "gdbarch_static_transform_name called\n");
4094 return gdbarch->static_transform_name (name);
4095}
4096
4097void
4098set_gdbarch_static_transform_name (struct gdbarch *gdbarch,
4099 gdbarch_static_transform_name_ftype static_transform_name)
4100{
4101 gdbarch->static_transform_name = static_transform_name;
4102}
4103
203c3895
UW
4104int
4105gdbarch_sofun_address_maybe_missing (struct gdbarch *gdbarch)
4106{
4107 gdb_assert (gdbarch != NULL);
4108 /* Skip verify of sofun_address_maybe_missing, invalid_p == 0 */
4109 if (gdbarch_debug >= 2)
4110 fprintf_unfiltered (gdb_stdlog, "gdbarch_sofun_address_maybe_missing called\n");
4111 return gdbarch->sofun_address_maybe_missing;
4112}
4113
4114void
4115set_gdbarch_sofun_address_maybe_missing (struct gdbarch *gdbarch,
4116 int sofun_address_maybe_missing)
4117{
4118 gdbarch->sofun_address_maybe_missing = sofun_address_maybe_missing;
4119}
4120
0508c3ec
HZ
4121int
4122gdbarch_process_record_p (struct gdbarch *gdbarch)
4123{
4124 gdb_assert (gdbarch != NULL);
4125 return gdbarch->process_record != NULL;
4126}
4127
4128int
4129gdbarch_process_record (struct gdbarch *gdbarch, struct regcache *regcache, CORE_ADDR addr)
4130{
4131 gdb_assert (gdbarch != NULL);
4132 gdb_assert (gdbarch->process_record != NULL);
4133 if (gdbarch_debug >= 2)
4134 fprintf_unfiltered (gdb_stdlog, "gdbarch_process_record called\n");
4135 return gdbarch->process_record (gdbarch, regcache, addr);
4136}
4137
4138void
4139set_gdbarch_process_record (struct gdbarch *gdbarch,
4140 gdbarch_process_record_ftype process_record)
4141{
4142 gdbarch->process_record = process_record;
4143}
4144
3846b520
HZ
4145int
4146gdbarch_process_record_signal_p (struct gdbarch *gdbarch)
4147{
4148 gdb_assert (gdbarch != NULL);
4149 return gdbarch->process_record_signal != NULL;
4150}
4151
4152int
2ea28649 4153gdbarch_process_record_signal (struct gdbarch *gdbarch, struct regcache *regcache, enum gdb_signal signal)
3846b520
HZ
4154{
4155 gdb_assert (gdbarch != NULL);
4156 gdb_assert (gdbarch->process_record_signal != NULL);
4157 if (gdbarch_debug >= 2)
4158 fprintf_unfiltered (gdb_stdlog, "gdbarch_process_record_signal called\n");
4159 return gdbarch->process_record_signal (gdbarch, regcache, signal);
4160}
4161
4162void
4163set_gdbarch_process_record_signal (struct gdbarch *gdbarch,
4164 gdbarch_process_record_signal_ftype process_record_signal)
4165{
4166 gdbarch->process_record_signal = process_record_signal;
4167}
4168
1f8cf220
PA
4169int
4170gdbarch_gdb_signal_from_target_p (struct gdbarch *gdbarch)
4171{
4172 gdb_assert (gdbarch != NULL);
4173 return gdbarch->gdb_signal_from_target != NULL;
4174}
4175
2ea28649 4176enum gdb_signal
22203bbf 4177gdbarch_gdb_signal_from_target (struct gdbarch *gdbarch, int signo)
1cded358
AR
4178{
4179 gdb_assert (gdbarch != NULL);
22203bbf 4180 gdb_assert (gdbarch->gdb_signal_from_target != NULL);
1cded358 4181 if (gdbarch_debug >= 2)
22203bbf
PA
4182 fprintf_unfiltered (gdb_stdlog, "gdbarch_gdb_signal_from_target called\n");
4183 return gdbarch->gdb_signal_from_target (gdbarch, signo);
1cded358
AR
4184}
4185
4186void
22203bbf
PA
4187set_gdbarch_gdb_signal_from_target (struct gdbarch *gdbarch,
4188 gdbarch_gdb_signal_from_target_ftype gdb_signal_from_target)
1cded358 4189{
22203bbf 4190 gdbarch->gdb_signal_from_target = gdb_signal_from_target;
1cded358
AR
4191}
4192
eb14d406
SDJ
4193int
4194gdbarch_gdb_signal_to_target_p (struct gdbarch *gdbarch)
4195{
4196 gdb_assert (gdbarch != NULL);
4197 return gdbarch->gdb_signal_to_target != NULL;
4198}
4199
4200int
4201gdbarch_gdb_signal_to_target (struct gdbarch *gdbarch, enum gdb_signal signal)
4202{
4203 gdb_assert (gdbarch != NULL);
4204 gdb_assert (gdbarch->gdb_signal_to_target != NULL);
4205 if (gdbarch_debug >= 2)
4206 fprintf_unfiltered (gdb_stdlog, "gdbarch_gdb_signal_to_target called\n");
4207 return gdbarch->gdb_signal_to_target (gdbarch, signal);
4208}
4209
4210void
4211set_gdbarch_gdb_signal_to_target (struct gdbarch *gdbarch,
4212 gdbarch_gdb_signal_to_target_ftype gdb_signal_to_target)
4213{
4214 gdbarch->gdb_signal_to_target = gdb_signal_to_target;
4215}
4216
4aa995e1
PA
4217int
4218gdbarch_get_siginfo_type_p (struct gdbarch *gdbarch)
4219{
4220 gdb_assert (gdbarch != NULL);
4221 return gdbarch->get_siginfo_type != NULL;
4222}
4223
4224struct type *
4225gdbarch_get_siginfo_type (struct gdbarch *gdbarch)
4226{
4227 gdb_assert (gdbarch != NULL);
4228 gdb_assert (gdbarch->get_siginfo_type != NULL);
4229 if (gdbarch_debug >= 2)
4230 fprintf_unfiltered (gdb_stdlog, "gdbarch_get_siginfo_type called\n");
4231 return gdbarch->get_siginfo_type (gdbarch);
4232}
4233
4234void
4235set_gdbarch_get_siginfo_type (struct gdbarch *gdbarch,
4236 gdbarch_get_siginfo_type_ftype get_siginfo_type)
4237{
4238 gdbarch->get_siginfo_type = get_siginfo_type;
4239}
4240
60c5725c
DJ
4241int
4242gdbarch_record_special_symbol_p (struct gdbarch *gdbarch)
4243{
4244 gdb_assert (gdbarch != NULL);
4245 return gdbarch->record_special_symbol != NULL;
4246}
4247
4248void
4249gdbarch_record_special_symbol (struct gdbarch *gdbarch, struct objfile *objfile, asymbol *sym)
4250{
4251 gdb_assert (gdbarch != NULL);
4252 gdb_assert (gdbarch->record_special_symbol != NULL);
4253 if (gdbarch_debug >= 2)
4254 fprintf_unfiltered (gdb_stdlog, "gdbarch_record_special_symbol called\n");
4255 gdbarch->record_special_symbol (gdbarch, objfile, sym);
4256}
4257
4258void
4259set_gdbarch_record_special_symbol (struct gdbarch *gdbarch,
4260 gdbarch_record_special_symbol_ftype record_special_symbol)
4261{
4262 gdbarch->record_special_symbol = record_special_symbol;
4263}
4264
a96d9b2e
SDJ
4265int
4266gdbarch_get_syscall_number_p (struct gdbarch *gdbarch)
4267{
4268 gdb_assert (gdbarch != NULL);
4269 return gdbarch->get_syscall_number != NULL;
4270}
4271
4272LONGEST
4273gdbarch_get_syscall_number (struct gdbarch *gdbarch, ptid_t ptid)
4274{
4275 gdb_assert (gdbarch != NULL);
4276 gdb_assert (gdbarch->get_syscall_number != NULL);
4277 if (gdbarch_debug >= 2)
4278 fprintf_unfiltered (gdb_stdlog, "gdbarch_get_syscall_number called\n");
4279 return gdbarch->get_syscall_number (gdbarch, ptid);
4280}
4281
4282void
4283set_gdbarch_get_syscall_number (struct gdbarch *gdbarch,
4284 gdbarch_get_syscall_number_ftype get_syscall_number)
4285{
4286 gdbarch->get_syscall_number = get_syscall_number;
4287}
4288
458c8db8
SDJ
4289const char *
4290gdbarch_xml_syscall_file (struct gdbarch *gdbarch)
4291{
4292 gdb_assert (gdbarch != NULL);
4293 /* Skip verify of xml_syscall_file, invalid_p == 0 */
4294 if (gdbarch_debug >= 2)
4295 fprintf_unfiltered (gdb_stdlog, "gdbarch_xml_syscall_file called\n");
4296 return gdbarch->xml_syscall_file;
4297}
4298
4299void
4300set_gdbarch_xml_syscall_file (struct gdbarch *gdbarch,
4301 const char * xml_syscall_file)
4302{
4303 gdbarch->xml_syscall_file = xml_syscall_file;
4304}
4305
4306struct syscalls_info *
4307gdbarch_syscalls_info (struct gdbarch *gdbarch)
4308{
4309 gdb_assert (gdbarch != NULL);
4310 /* Skip verify of syscalls_info, invalid_p == 0 */
4311 if (gdbarch_debug >= 2)
4312 fprintf_unfiltered (gdb_stdlog, "gdbarch_syscalls_info called\n");
4313 return gdbarch->syscalls_info;
4314}
4315
4316void
4317set_gdbarch_syscalls_info (struct gdbarch *gdbarch,
4318 struct syscalls_info * syscalls_info)
4319{
4320 gdbarch->syscalls_info = syscalls_info;
4321}
4322
05c0465e
SDJ
4323const char *const *
4324gdbarch_stap_integer_prefixes (struct gdbarch *gdbarch)
55aa24fb
SDJ
4325{
4326 gdb_assert (gdbarch != NULL);
05c0465e 4327 /* Skip verify of stap_integer_prefixes, invalid_p == 0 */
55aa24fb 4328 if (gdbarch_debug >= 2)
05c0465e
SDJ
4329 fprintf_unfiltered (gdb_stdlog, "gdbarch_stap_integer_prefixes called\n");
4330 return gdbarch->stap_integer_prefixes;
55aa24fb
SDJ
4331}
4332
4333void
05c0465e
SDJ
4334set_gdbarch_stap_integer_prefixes (struct gdbarch *gdbarch,
4335 const char *const * stap_integer_prefixes)
55aa24fb 4336{
05c0465e 4337 gdbarch->stap_integer_prefixes = stap_integer_prefixes;
55aa24fb
SDJ
4338}
4339
05c0465e
SDJ
4340const char *const *
4341gdbarch_stap_integer_suffixes (struct gdbarch *gdbarch)
55aa24fb
SDJ
4342{
4343 gdb_assert (gdbarch != NULL);
05c0465e 4344 /* Skip verify of stap_integer_suffixes, invalid_p == 0 */
55aa24fb 4345 if (gdbarch_debug >= 2)
05c0465e
SDJ
4346 fprintf_unfiltered (gdb_stdlog, "gdbarch_stap_integer_suffixes called\n");
4347 return gdbarch->stap_integer_suffixes;
55aa24fb
SDJ
4348}
4349
4350void
05c0465e
SDJ
4351set_gdbarch_stap_integer_suffixes (struct gdbarch *gdbarch,
4352 const char *const * stap_integer_suffixes)
55aa24fb 4353{
05c0465e 4354 gdbarch->stap_integer_suffixes = stap_integer_suffixes;
55aa24fb
SDJ
4355}
4356
05c0465e
SDJ
4357const char *const *
4358gdbarch_stap_register_prefixes (struct gdbarch *gdbarch)
55aa24fb
SDJ
4359{
4360 gdb_assert (gdbarch != NULL);
05c0465e 4361 /* Skip verify of stap_register_prefixes, invalid_p == 0 */
55aa24fb 4362 if (gdbarch_debug >= 2)
05c0465e
SDJ
4363 fprintf_unfiltered (gdb_stdlog, "gdbarch_stap_register_prefixes called\n");
4364 return gdbarch->stap_register_prefixes;
55aa24fb
SDJ
4365}
4366
4367void
05c0465e
SDJ
4368set_gdbarch_stap_register_prefixes (struct gdbarch *gdbarch,
4369 const char *const * stap_register_prefixes)
55aa24fb 4370{
05c0465e 4371 gdbarch->stap_register_prefixes = stap_register_prefixes;
55aa24fb
SDJ
4372}
4373
05c0465e
SDJ
4374const char *const *
4375gdbarch_stap_register_suffixes (struct gdbarch *gdbarch)
55aa24fb
SDJ
4376{
4377 gdb_assert (gdbarch != NULL);
05c0465e 4378 /* Skip verify of stap_register_suffixes, invalid_p == 0 */
55aa24fb 4379 if (gdbarch_debug >= 2)
05c0465e
SDJ
4380 fprintf_unfiltered (gdb_stdlog, "gdbarch_stap_register_suffixes called\n");
4381 return gdbarch->stap_register_suffixes;
55aa24fb
SDJ
4382}
4383
4384void
05c0465e
SDJ
4385set_gdbarch_stap_register_suffixes (struct gdbarch *gdbarch,
4386 const char *const * stap_register_suffixes)
55aa24fb 4387{
05c0465e 4388 gdbarch->stap_register_suffixes = stap_register_suffixes;
55aa24fb
SDJ
4389}
4390
05c0465e
SDJ
4391const char *const *
4392gdbarch_stap_register_indirection_prefixes (struct gdbarch *gdbarch)
55aa24fb
SDJ
4393{
4394 gdb_assert (gdbarch != NULL);
05c0465e 4395 /* Skip verify of stap_register_indirection_prefixes, invalid_p == 0 */
55aa24fb 4396 if (gdbarch_debug >= 2)
05c0465e
SDJ
4397 fprintf_unfiltered (gdb_stdlog, "gdbarch_stap_register_indirection_prefixes called\n");
4398 return gdbarch->stap_register_indirection_prefixes;
55aa24fb
SDJ
4399}
4400
4401void
05c0465e
SDJ
4402set_gdbarch_stap_register_indirection_prefixes (struct gdbarch *gdbarch,
4403 const char *const * stap_register_indirection_prefixes)
55aa24fb 4404{
05c0465e 4405 gdbarch->stap_register_indirection_prefixes = stap_register_indirection_prefixes;
55aa24fb
SDJ
4406}
4407
05c0465e
SDJ
4408const char *const *
4409gdbarch_stap_register_indirection_suffixes (struct gdbarch *gdbarch)
55aa24fb
SDJ
4410{
4411 gdb_assert (gdbarch != NULL);
05c0465e 4412 /* Skip verify of stap_register_indirection_suffixes, invalid_p == 0 */
55aa24fb 4413 if (gdbarch_debug >= 2)
05c0465e
SDJ
4414 fprintf_unfiltered (gdb_stdlog, "gdbarch_stap_register_indirection_suffixes called\n");
4415 return gdbarch->stap_register_indirection_suffixes;
55aa24fb
SDJ
4416}
4417
4418void
05c0465e
SDJ
4419set_gdbarch_stap_register_indirection_suffixes (struct gdbarch *gdbarch,
4420 const char *const * stap_register_indirection_suffixes)
55aa24fb 4421{
05c0465e 4422 gdbarch->stap_register_indirection_suffixes = stap_register_indirection_suffixes;
55aa24fb
SDJ
4423}
4424
4425const char *
4426gdbarch_stap_gdb_register_prefix (struct gdbarch *gdbarch)
4427{
4428 gdb_assert (gdbarch != NULL);
4429 /* Skip verify of stap_gdb_register_prefix, invalid_p == 0 */
4430 if (gdbarch_debug >= 2)
4431 fprintf_unfiltered (gdb_stdlog, "gdbarch_stap_gdb_register_prefix called\n");
4432 return gdbarch->stap_gdb_register_prefix;
4433}
4434
4435void
4436set_gdbarch_stap_gdb_register_prefix (struct gdbarch *gdbarch,
4437 const char * stap_gdb_register_prefix)
4438{
4439 gdbarch->stap_gdb_register_prefix = stap_gdb_register_prefix;
4440}
4441
4442const char *
4443gdbarch_stap_gdb_register_suffix (struct gdbarch *gdbarch)
4444{
4445 gdb_assert (gdbarch != NULL);
4446 /* Skip verify of stap_gdb_register_suffix, invalid_p == 0 */
4447 if (gdbarch_debug >= 2)
4448 fprintf_unfiltered (gdb_stdlog, "gdbarch_stap_gdb_register_suffix called\n");
4449 return gdbarch->stap_gdb_register_suffix;
4450}
4451
4452void
4453set_gdbarch_stap_gdb_register_suffix (struct gdbarch *gdbarch,
4454 const char * stap_gdb_register_suffix)
4455{
4456 gdbarch->stap_gdb_register_suffix = stap_gdb_register_suffix;
4457}
4458
4459int
4460gdbarch_stap_is_single_operand_p (struct gdbarch *gdbarch)
4461{
4462 gdb_assert (gdbarch != NULL);
4463 return gdbarch->stap_is_single_operand != NULL;
4464}
4465
4466int
4467gdbarch_stap_is_single_operand (struct gdbarch *gdbarch, const char *s)
4468{
4469 gdb_assert (gdbarch != NULL);
4470 gdb_assert (gdbarch->stap_is_single_operand != NULL);
4471 if (gdbarch_debug >= 2)
4472 fprintf_unfiltered (gdb_stdlog, "gdbarch_stap_is_single_operand called\n");
4473 return gdbarch->stap_is_single_operand (gdbarch, s);
4474}
4475
4476void
4477set_gdbarch_stap_is_single_operand (struct gdbarch *gdbarch,
4478 gdbarch_stap_is_single_operand_ftype stap_is_single_operand)
4479{
4480 gdbarch->stap_is_single_operand = stap_is_single_operand;
4481}
4482
4483int
4484gdbarch_stap_parse_special_token_p (struct gdbarch *gdbarch)
4485{
4486 gdb_assert (gdbarch != NULL);
4487 return gdbarch->stap_parse_special_token != NULL;
4488}
4489
4490int
4491gdbarch_stap_parse_special_token (struct gdbarch *gdbarch, struct stap_parse_info *p)
4492{
4493 gdb_assert (gdbarch != NULL);
4494 gdb_assert (gdbarch->stap_parse_special_token != NULL);
4495 if (gdbarch_debug >= 2)
4496 fprintf_unfiltered (gdb_stdlog, "gdbarch_stap_parse_special_token called\n");
4497 return gdbarch->stap_parse_special_token (gdbarch, p);
4498}
4499
4500void
4501set_gdbarch_stap_parse_special_token (struct gdbarch *gdbarch,
4502 gdbarch_stap_parse_special_token_ftype stap_parse_special_token)
4503{
4504 gdbarch->stap_parse_special_token = stap_parse_special_token;
4505}
4506
8b367e17
JM
4507int
4508gdbarch_dtrace_parse_probe_argument_p (struct gdbarch *gdbarch)
4509{
4510 gdb_assert (gdbarch != NULL);
4511 return gdbarch->dtrace_parse_probe_argument != NULL;
4512}
4513
4514void
4515gdbarch_dtrace_parse_probe_argument (struct gdbarch *gdbarch, struct parser_state *pstate, int narg)
4516{
4517 gdb_assert (gdbarch != NULL);
4518 gdb_assert (gdbarch->dtrace_parse_probe_argument != NULL);
4519 if (gdbarch_debug >= 2)
4520 fprintf_unfiltered (gdb_stdlog, "gdbarch_dtrace_parse_probe_argument called\n");
4521 gdbarch->dtrace_parse_probe_argument (gdbarch, pstate, narg);
4522}
4523
4524void
4525set_gdbarch_dtrace_parse_probe_argument (struct gdbarch *gdbarch,
4526 gdbarch_dtrace_parse_probe_argument_ftype dtrace_parse_probe_argument)
4527{
4528 gdbarch->dtrace_parse_probe_argument = dtrace_parse_probe_argument;
4529}
4530
4531int
4532gdbarch_dtrace_probe_is_enabled_p (struct gdbarch *gdbarch)
4533{
4534 gdb_assert (gdbarch != NULL);
4535 return gdbarch->dtrace_probe_is_enabled != NULL;
4536}
4537
4538int
4539gdbarch_dtrace_probe_is_enabled (struct gdbarch *gdbarch, CORE_ADDR addr)
4540{
4541 gdb_assert (gdbarch != NULL);
4542 gdb_assert (gdbarch->dtrace_probe_is_enabled != NULL);
4543 if (gdbarch_debug >= 2)
4544 fprintf_unfiltered (gdb_stdlog, "gdbarch_dtrace_probe_is_enabled called\n");
4545 return gdbarch->dtrace_probe_is_enabled (gdbarch, addr);
4546}
4547
4548void
4549set_gdbarch_dtrace_probe_is_enabled (struct gdbarch *gdbarch,
4550 gdbarch_dtrace_probe_is_enabled_ftype dtrace_probe_is_enabled)
4551{
4552 gdbarch->dtrace_probe_is_enabled = dtrace_probe_is_enabled;
4553}
4554
4555int
4556gdbarch_dtrace_enable_probe_p (struct gdbarch *gdbarch)
4557{
4558 gdb_assert (gdbarch != NULL);
4559 return gdbarch->dtrace_enable_probe != NULL;
4560}
4561
4562void
4563gdbarch_dtrace_enable_probe (struct gdbarch *gdbarch, CORE_ADDR addr)
4564{
4565 gdb_assert (gdbarch != NULL);
4566 gdb_assert (gdbarch->dtrace_enable_probe != NULL);
4567 if (gdbarch_debug >= 2)
4568 fprintf_unfiltered (gdb_stdlog, "gdbarch_dtrace_enable_probe called\n");
4569 gdbarch->dtrace_enable_probe (gdbarch, addr);
4570}
4571
4572void
4573set_gdbarch_dtrace_enable_probe (struct gdbarch *gdbarch,
4574 gdbarch_dtrace_enable_probe_ftype dtrace_enable_probe)
4575{
4576 gdbarch->dtrace_enable_probe = dtrace_enable_probe;
4577}
4578
4579int
4580gdbarch_dtrace_disable_probe_p (struct gdbarch *gdbarch)
4581{
4582 gdb_assert (gdbarch != NULL);
4583 return gdbarch->dtrace_disable_probe != NULL;
4584}
4585
4586void
4587gdbarch_dtrace_disable_probe (struct gdbarch *gdbarch, CORE_ADDR addr)
4588{
4589 gdb_assert (gdbarch != NULL);
4590 gdb_assert (gdbarch->dtrace_disable_probe != NULL);
4591 if (gdbarch_debug >= 2)
4592 fprintf_unfiltered (gdb_stdlog, "gdbarch_dtrace_disable_probe called\n");
4593 gdbarch->dtrace_disable_probe (gdbarch, addr);
4594}
4595
4596void
4597set_gdbarch_dtrace_disable_probe (struct gdbarch *gdbarch,
4598 gdbarch_dtrace_disable_probe_ftype dtrace_disable_probe)
4599{
4600 gdbarch->dtrace_disable_probe = dtrace_disable_probe;
4601}
4602
50c71eaf
PA
4603int
4604gdbarch_has_global_solist (struct gdbarch *gdbarch)
4605{
4606 gdb_assert (gdbarch != NULL);
4607 /* Skip verify of has_global_solist, invalid_p == 0 */
4608 if (gdbarch_debug >= 2)
4609 fprintf_unfiltered (gdb_stdlog, "gdbarch_has_global_solist called\n");
4610 return gdbarch->has_global_solist;
4611}
4612
4613void
4614set_gdbarch_has_global_solist (struct gdbarch *gdbarch,
4615 int has_global_solist)
4616{
4617 gdbarch->has_global_solist = has_global_solist;
4618}
4619
2567c7d9
PA
4620int
4621gdbarch_has_global_breakpoints (struct gdbarch *gdbarch)
4622{
4623 gdb_assert (gdbarch != NULL);
4624 /* Skip verify of has_global_breakpoints, invalid_p == 0 */
4625 if (gdbarch_debug >= 2)
4626 fprintf_unfiltered (gdb_stdlog, "gdbarch_has_global_breakpoints called\n");
4627 return gdbarch->has_global_breakpoints;
4628}
4629
4630void
4631set_gdbarch_has_global_breakpoints (struct gdbarch *gdbarch,
4632 int has_global_breakpoints)
4633{
4634 gdbarch->has_global_breakpoints = has_global_breakpoints;
4635}
4636
6c95b8df
PA
4637int
4638gdbarch_has_shared_address_space (struct gdbarch *gdbarch)
4639{
4640 gdb_assert (gdbarch != NULL);
4641 gdb_assert (gdbarch->has_shared_address_space != NULL);
4642 if (gdbarch_debug >= 2)
4643 fprintf_unfiltered (gdb_stdlog, "gdbarch_has_shared_address_space called\n");
4644 return gdbarch->has_shared_address_space (gdbarch);
4645}
4646
4647void
4648set_gdbarch_has_shared_address_space (struct gdbarch *gdbarch,
4649 gdbarch_has_shared_address_space_ftype has_shared_address_space)
4650{
4651 gdbarch->has_shared_address_space = has_shared_address_space;
4652}
4653
7a697b8d 4654int
6b940e6a 4655gdbarch_fast_tracepoint_valid_at (struct gdbarch *gdbarch, CORE_ADDR addr, char **msg)
7a697b8d
SS
4656{
4657 gdb_assert (gdbarch != NULL);
4658 gdb_assert (gdbarch->fast_tracepoint_valid_at != NULL);
4659 if (gdbarch_debug >= 2)
4660 fprintf_unfiltered (gdb_stdlog, "gdbarch_fast_tracepoint_valid_at called\n");
6b940e6a 4661 return gdbarch->fast_tracepoint_valid_at (gdbarch, addr, msg);
7a697b8d
SS
4662}
4663
4664void
4665set_gdbarch_fast_tracepoint_valid_at (struct gdbarch *gdbarch,
4666 gdbarch_fast_tracepoint_valid_at_ftype fast_tracepoint_valid_at)
4667{
4668 gdbarch->fast_tracepoint_valid_at = fast_tracepoint_valid_at;
4669}
4670
5f034a78
MK
4671void
4672gdbarch_guess_tracepoint_registers (struct gdbarch *gdbarch, struct regcache *regcache, CORE_ADDR addr)
4673{
4674 gdb_assert (gdbarch != NULL);
4675 gdb_assert (gdbarch->guess_tracepoint_registers != NULL);
4676 if (gdbarch_debug >= 2)
4677 fprintf_unfiltered (gdb_stdlog, "gdbarch_guess_tracepoint_registers called\n");
4678 gdbarch->guess_tracepoint_registers (gdbarch, regcache, addr);
4679}
4680
4681void
4682set_gdbarch_guess_tracepoint_registers (struct gdbarch *gdbarch,
4683 gdbarch_guess_tracepoint_registers_ftype guess_tracepoint_registers)
4684{
4685 gdbarch->guess_tracepoint_registers = guess_tracepoint_registers;
4686}
4687
f870a310
TT
4688const char *
4689gdbarch_auto_charset (struct gdbarch *gdbarch)
4690{
4691 gdb_assert (gdbarch != NULL);
4692 gdb_assert (gdbarch->auto_charset != NULL);
4693 if (gdbarch_debug >= 2)
4694 fprintf_unfiltered (gdb_stdlog, "gdbarch_auto_charset called\n");
4695 return gdbarch->auto_charset ();
4696}
4697
4698void
4699set_gdbarch_auto_charset (struct gdbarch *gdbarch,
4700 gdbarch_auto_charset_ftype auto_charset)
4701{
4702 gdbarch->auto_charset = auto_charset;
4703}
4704
4705const char *
4706gdbarch_auto_wide_charset (struct gdbarch *gdbarch)
4707{
4708 gdb_assert (gdbarch != NULL);
4709 gdb_assert (gdbarch->auto_wide_charset != NULL);
4710 if (gdbarch_debug >= 2)
4711 fprintf_unfiltered (gdb_stdlog, "gdbarch_auto_wide_charset called\n");
4712 return gdbarch->auto_wide_charset ();
4713}
4714
4715void
4716set_gdbarch_auto_wide_charset (struct gdbarch *gdbarch,
4717 gdbarch_auto_wide_charset_ftype auto_wide_charset)
4718{
4719 gdbarch->auto_wide_charset = auto_wide_charset;
4720}
4721
08105857
PA
4722const char *
4723gdbarch_solib_symbols_extension (struct gdbarch *gdbarch)
4724{
4725 gdb_assert (gdbarch != NULL);
4726 if (gdbarch_debug >= 2)
4727 fprintf_unfiltered (gdb_stdlog, "gdbarch_solib_symbols_extension called\n");
4728 return gdbarch->solib_symbols_extension;
4729}
4730
4731void
4732set_gdbarch_solib_symbols_extension (struct gdbarch *gdbarch,
4733 const char * solib_symbols_extension)
4734{
4735 gdbarch->solib_symbols_extension = solib_symbols_extension;
4736}
4737
ab38a727
PA
4738int
4739gdbarch_has_dos_based_file_system (struct gdbarch *gdbarch)
4740{
4741 gdb_assert (gdbarch != NULL);
4742 /* Skip verify of has_dos_based_file_system, invalid_p == 0 */
4743 if (gdbarch_debug >= 2)
4744 fprintf_unfiltered (gdb_stdlog, "gdbarch_has_dos_based_file_system called\n");
4745 return gdbarch->has_dos_based_file_system;
4746}
4747
4748void
4749set_gdbarch_has_dos_based_file_system (struct gdbarch *gdbarch,
4750 int has_dos_based_file_system)
4751{
4752 gdbarch->has_dos_based_file_system = has_dos_based_file_system;
4753}
4754
6710bf39
SS
4755void
4756gdbarch_gen_return_address (struct gdbarch *gdbarch, struct agent_expr *ax, struct axs_value *value, CORE_ADDR scope)
4757{
4758 gdb_assert (gdbarch != NULL);
4759 gdb_assert (gdbarch->gen_return_address != NULL);
4760 if (gdbarch_debug >= 2)
4761 fprintf_unfiltered (gdb_stdlog, "gdbarch_gen_return_address called\n");
4762 gdbarch->gen_return_address (gdbarch, ax, value, scope);
4763}
4764
4765void
4766set_gdbarch_gen_return_address (struct gdbarch *gdbarch,
4767 gdbarch_gen_return_address_ftype gen_return_address)
4768{
4769 gdbarch->gen_return_address = gen_return_address;
4770}
4771
3030c96e
UW
4772int
4773gdbarch_info_proc_p (struct gdbarch *gdbarch)
4774{
4775 gdb_assert (gdbarch != NULL);
4776 return gdbarch->info_proc != NULL;
4777}
4778
4779void
7bc112c1 4780gdbarch_info_proc (struct gdbarch *gdbarch, const char *args, enum info_proc_what what)
3030c96e
UW
4781{
4782 gdb_assert (gdbarch != NULL);
4783 gdb_assert (gdbarch->info_proc != NULL);
4784 if (gdbarch_debug >= 2)
4785 fprintf_unfiltered (gdb_stdlog, "gdbarch_info_proc called\n");
4786 gdbarch->info_proc (gdbarch, args, what);
4787}
4788
4789void
4790set_gdbarch_info_proc (struct gdbarch *gdbarch,
4791 gdbarch_info_proc_ftype info_proc)
4792{
4793 gdbarch->info_proc = info_proc;
4794}
4795
451b7c33
TT
4796int
4797gdbarch_core_info_proc_p (struct gdbarch *gdbarch)
4798{
4799 gdb_assert (gdbarch != NULL);
4800 return gdbarch->core_info_proc != NULL;
4801}
4802
4803void
7bc112c1 4804gdbarch_core_info_proc (struct gdbarch *gdbarch, const char *args, enum info_proc_what what)
451b7c33
TT
4805{
4806 gdb_assert (gdbarch != NULL);
4807 gdb_assert (gdbarch->core_info_proc != NULL);
4808 if (gdbarch_debug >= 2)
4809 fprintf_unfiltered (gdb_stdlog, "gdbarch_core_info_proc called\n");
4810 gdbarch->core_info_proc (gdbarch, args, what);
4811}
4812
4813void
4814set_gdbarch_core_info_proc (struct gdbarch *gdbarch,
4815 gdbarch_core_info_proc_ftype core_info_proc)
4816{
4817 gdbarch->core_info_proc = core_info_proc;
4818}
4819
19630284
JB
4820void
4821gdbarch_iterate_over_objfiles_in_search_order (struct gdbarch *gdbarch, iterate_over_objfiles_in_search_order_cb_ftype *cb, void *cb_data, struct objfile *current_objfile)
4822{
4823 gdb_assert (gdbarch != NULL);
4824 gdb_assert (gdbarch->iterate_over_objfiles_in_search_order != NULL);
4825 if (gdbarch_debug >= 2)
4826 fprintf_unfiltered (gdb_stdlog, "gdbarch_iterate_over_objfiles_in_search_order called\n");
4827 gdbarch->iterate_over_objfiles_in_search_order (gdbarch, cb, cb_data, current_objfile);
4828}
4829
4830void
4831set_gdbarch_iterate_over_objfiles_in_search_order (struct gdbarch *gdbarch,
4832 gdbarch_iterate_over_objfiles_in_search_order_ftype iterate_over_objfiles_in_search_order)
4833{
4834 gdbarch->iterate_over_objfiles_in_search_order = iterate_over_objfiles_in_search_order;
4835}
4836
7e35103a
JB
4837struct ravenscar_arch_ops *
4838gdbarch_ravenscar_ops (struct gdbarch *gdbarch)
4839{
4840 gdb_assert (gdbarch != NULL);
4841 /* Skip verify of ravenscar_ops, invalid_p == 0 */
4842 if (gdbarch_debug >= 2)
4843 fprintf_unfiltered (gdb_stdlog, "gdbarch_ravenscar_ops called\n");
4844 return gdbarch->ravenscar_ops;
4845}
4846
4847void
4848set_gdbarch_ravenscar_ops (struct gdbarch *gdbarch,
4849 struct ravenscar_arch_ops * ravenscar_ops)
4850{
4851 gdbarch->ravenscar_ops = ravenscar_ops;
4852}
4853
c2170eef
MM
4854int
4855gdbarch_insn_is_call (struct gdbarch *gdbarch, CORE_ADDR addr)
4856{
4857 gdb_assert (gdbarch != NULL);
4858 gdb_assert (gdbarch->insn_is_call != NULL);
4859 if (gdbarch_debug >= 2)
4860 fprintf_unfiltered (gdb_stdlog, "gdbarch_insn_is_call called\n");
4861 return gdbarch->insn_is_call (gdbarch, addr);
4862}
4863
4864void
4865set_gdbarch_insn_is_call (struct gdbarch *gdbarch,
4866 gdbarch_insn_is_call_ftype insn_is_call)
4867{
4868 gdbarch->insn_is_call = insn_is_call;
4869}
4870
4871int
4872gdbarch_insn_is_ret (struct gdbarch *gdbarch, CORE_ADDR addr)
4873{
4874 gdb_assert (gdbarch != NULL);
4875 gdb_assert (gdbarch->insn_is_ret != NULL);
4876 if (gdbarch_debug >= 2)
4877 fprintf_unfiltered (gdb_stdlog, "gdbarch_insn_is_ret called\n");
4878 return gdbarch->insn_is_ret (gdbarch, addr);
4879}
4880
4881void
4882set_gdbarch_insn_is_ret (struct gdbarch *gdbarch,
4883 gdbarch_insn_is_ret_ftype insn_is_ret)
4884{
4885 gdbarch->insn_is_ret = insn_is_ret;
4886}
4887
4888int
4889gdbarch_insn_is_jump (struct gdbarch *gdbarch, CORE_ADDR addr)
4890{
4891 gdb_assert (gdbarch != NULL);
4892 gdb_assert (gdbarch->insn_is_jump != NULL);
4893 if (gdbarch_debug >= 2)
4894 fprintf_unfiltered (gdb_stdlog, "gdbarch_insn_is_jump called\n");
4895 return gdbarch->insn_is_jump (gdbarch, addr);
4896}
4897
4898void
4899set_gdbarch_insn_is_jump (struct gdbarch *gdbarch,
4900 gdbarch_insn_is_jump_ftype insn_is_jump)
4901{
4902 gdbarch->insn_is_jump = insn_is_jump;
4903}
4904
27a48a92
MK
4905int
4906gdbarch_auxv_parse_p (struct gdbarch *gdbarch)
4907{
4908 gdb_assert (gdbarch != NULL);
4909 return gdbarch->auxv_parse != NULL;
4910}
4911
4912int
4913gdbarch_auxv_parse (struct gdbarch *gdbarch, gdb_byte **readptr, gdb_byte *endptr, CORE_ADDR *typep, CORE_ADDR *valp)
4914{
4915 gdb_assert (gdbarch != NULL);
4916 gdb_assert (gdbarch->auxv_parse != NULL);
4917 if (gdbarch_debug >= 2)
4918 fprintf_unfiltered (gdb_stdlog, "gdbarch_auxv_parse called\n");
4919 return gdbarch->auxv_parse (gdbarch, readptr, endptr, typep, valp);
4920}
4921
4922void
4923set_gdbarch_auxv_parse (struct gdbarch *gdbarch,
4924 gdbarch_auxv_parse_ftype auxv_parse)
4925{
4926 gdbarch->auxv_parse = auxv_parse;
4927}
4928
2faa3447
JB
4929void
4930gdbarch_print_auxv_entry (struct gdbarch *gdbarch, struct ui_file *file, CORE_ADDR type, CORE_ADDR val)
4931{
4932 gdb_assert (gdbarch != NULL);
4933 gdb_assert (gdbarch->print_auxv_entry != NULL);
4934 if (gdbarch_debug >= 2)
4935 fprintf_unfiltered (gdb_stdlog, "gdbarch_print_auxv_entry called\n");
4936 gdbarch->print_auxv_entry (gdbarch, file, type, val);
4937}
4938
4939void
4940set_gdbarch_print_auxv_entry (struct gdbarch *gdbarch,
4941 gdbarch_print_auxv_entry_ftype print_auxv_entry)
4942{
4943 gdbarch->print_auxv_entry = print_auxv_entry;
4944}
4945
3437254d
PA
4946int
4947gdbarch_vsyscall_range (struct gdbarch *gdbarch, struct mem_range *range)
4948{
4949 gdb_assert (gdbarch != NULL);
4950 gdb_assert (gdbarch->vsyscall_range != NULL);
4951 if (gdbarch_debug >= 2)
4952 fprintf_unfiltered (gdb_stdlog, "gdbarch_vsyscall_range called\n");
4953 return gdbarch->vsyscall_range (gdbarch, range);
4954}
4955
4956void
4957set_gdbarch_vsyscall_range (struct gdbarch *gdbarch,
4958 gdbarch_vsyscall_range_ftype vsyscall_range)
4959{
4960 gdbarch->vsyscall_range = vsyscall_range;
4961}
4962
f208eee0
JK
4963CORE_ADDR
4964gdbarch_infcall_mmap (struct gdbarch *gdbarch, CORE_ADDR size, unsigned prot)
4965{
4966 gdb_assert (gdbarch != NULL);
4967 gdb_assert (gdbarch->infcall_mmap != NULL);
4968 if (gdbarch_debug >= 2)
4969 fprintf_unfiltered (gdb_stdlog, "gdbarch_infcall_mmap called\n");
4970 return gdbarch->infcall_mmap (size, prot);
4971}
4972
4973void
4974set_gdbarch_infcall_mmap (struct gdbarch *gdbarch,
4975 gdbarch_infcall_mmap_ftype infcall_mmap)
4976{
4977 gdbarch->infcall_mmap = infcall_mmap;
4978}
4979
7f361056
JK
4980void
4981gdbarch_infcall_munmap (struct gdbarch *gdbarch, CORE_ADDR addr, CORE_ADDR size)
4982{
4983 gdb_assert (gdbarch != NULL);
4984 gdb_assert (gdbarch->infcall_munmap != NULL);
4985 if (gdbarch_debug >= 2)
4986 fprintf_unfiltered (gdb_stdlog, "gdbarch_infcall_munmap called\n");
4987 gdbarch->infcall_munmap (addr, size);
4988}
4989
4990void
4991set_gdbarch_infcall_munmap (struct gdbarch *gdbarch,
4992 gdbarch_infcall_munmap_ftype infcall_munmap)
4993{
4994 gdbarch->infcall_munmap = infcall_munmap;
4995}
4996
f208eee0
JK
4997char *
4998gdbarch_gcc_target_options (struct gdbarch *gdbarch)
4999{
5000 gdb_assert (gdbarch != NULL);
5001 gdb_assert (gdbarch->gcc_target_options != NULL);
5002 if (gdbarch_debug >= 2)
5003 fprintf_unfiltered (gdb_stdlog, "gdbarch_gcc_target_options called\n");
5004 return gdbarch->gcc_target_options (gdbarch);
5005}
5006
5007void
5008set_gdbarch_gcc_target_options (struct gdbarch *gdbarch,
5009 gdbarch_gcc_target_options_ftype gcc_target_options)
5010{
5011 gdbarch->gcc_target_options = gcc_target_options;
5012}
5013
ac04f72b
TT
5014const char *
5015gdbarch_gnu_triplet_regexp (struct gdbarch *gdbarch)
5016{
5017 gdb_assert (gdbarch != NULL);
5018 gdb_assert (gdbarch->gnu_triplet_regexp != NULL);
5019 if (gdbarch_debug >= 2)
5020 fprintf_unfiltered (gdb_stdlog, "gdbarch_gnu_triplet_regexp called\n");
5021 return gdbarch->gnu_triplet_regexp (gdbarch);
5022}
5023
5024void
5025set_gdbarch_gnu_triplet_regexp (struct gdbarch *gdbarch,
5026 gdbarch_gnu_triplet_regexp_ftype gnu_triplet_regexp)
5027{
5028 gdbarch->gnu_triplet_regexp = gnu_triplet_regexp;
5029}
5030
3374165f
SM
5031int
5032gdbarch_addressable_memory_unit_size (struct gdbarch *gdbarch)
5033{
5034 gdb_assert (gdbarch != NULL);
5035 gdb_assert (gdbarch->addressable_memory_unit_size != NULL);
5036 if (gdbarch_debug >= 2)
5037 fprintf_unfiltered (gdb_stdlog, "gdbarch_addressable_memory_unit_size called\n");
5038 return gdbarch->addressable_memory_unit_size (gdbarch);
5039}
5040
5041void
5042set_gdbarch_addressable_memory_unit_size (struct gdbarch *gdbarch,
5043 gdbarch_addressable_memory_unit_size_ftype addressable_memory_unit_size)
5044{
5045 gdbarch->addressable_memory_unit_size = addressable_memory_unit_size;
5046}
5047
65b48a81
PB
5048char **
5049gdbarch_disassembler_options (struct gdbarch *gdbarch)
5050{
5051 gdb_assert (gdbarch != NULL);
5052 /* Skip verify of disassembler_options, invalid_p == 0 */
5053 if (gdbarch_debug >= 2)
5054 fprintf_unfiltered (gdb_stdlog, "gdbarch_disassembler_options called\n");
5055 return gdbarch->disassembler_options;
5056}
5057
5058void
5059set_gdbarch_disassembler_options (struct gdbarch *gdbarch,
5060 char ** disassembler_options)
5061{
5062 gdbarch->disassembler_options = disassembler_options;
5063}
5064
5065const disasm_options_t *
5066gdbarch_valid_disassembler_options (struct gdbarch *gdbarch)
5067{
5068 gdb_assert (gdbarch != NULL);
5069 /* Skip verify of valid_disassembler_options, invalid_p == 0 */
5070 if (gdbarch_debug >= 2)
5071 fprintf_unfiltered (gdb_stdlog, "gdbarch_valid_disassembler_options called\n");
5072 return gdbarch->valid_disassembler_options;
5073}
5074
5075void
5076set_gdbarch_valid_disassembler_options (struct gdbarch *gdbarch,
5077 const disasm_options_t * valid_disassembler_options)
5078{
5079 gdbarch->valid_disassembler_options = valid_disassembler_options;
5080}
5081
0f71a2f6 5082
be5a57e1 5083/* Keep a registry of per-architecture data-pointers required by GDB
0963b4bd 5084 modules. */
0f71a2f6
JM
5085
5086struct gdbarch_data
5087{
95160752 5088 unsigned index;
76860b5f 5089 int init_p;
030f20e1
AC
5090 gdbarch_data_pre_init_ftype *pre_init;
5091 gdbarch_data_post_init_ftype *post_init;
0f71a2f6
JM
5092};
5093
5094struct gdbarch_data_registration
adf40b2e 5095{
adf40b2e
JM
5096 struct gdbarch_data *data;
5097 struct gdbarch_data_registration *next;
5098};
0f71a2f6 5099
be5a57e1 5100struct gdbarch_data_registry
adf40b2e 5101{
95160752 5102 unsigned nr;
adf40b2e
JM
5103 struct gdbarch_data_registration *registrations;
5104};
0f71a2f6 5105
be5a57e1 5106struct gdbarch_data_registry gdbarch_data_registry =
0f71a2f6
JM
5107{
5108 0, NULL,
5109};
5110
030f20e1
AC
5111static struct gdbarch_data *
5112gdbarch_data_register (gdbarch_data_pre_init_ftype *pre_init,
5113 gdbarch_data_post_init_ftype *post_init)
0f71a2f6
JM
5114{
5115 struct gdbarch_data_registration **curr;
05c547f6
MS
5116
5117 /* Append the new registration. */
be5a57e1 5118 for (curr = &gdbarch_data_registry.registrations;
0f71a2f6
JM
5119 (*curr) != NULL;
5120 curr = &(*curr)->next);
70ba0933 5121 (*curr) = XNEW (struct gdbarch_data_registration);
0f71a2f6 5122 (*curr)->next = NULL;
70ba0933 5123 (*curr)->data = XNEW (struct gdbarch_data);
be5a57e1 5124 (*curr)->data->index = gdbarch_data_registry.nr++;
030f20e1
AC
5125 (*curr)->data->pre_init = pre_init;
5126 (*curr)->data->post_init = post_init;
76860b5f 5127 (*curr)->data->init_p = 1;
0f71a2f6
JM
5128 return (*curr)->data;
5129}
5130
030f20e1
AC
5131struct gdbarch_data *
5132gdbarch_data_register_pre_init (gdbarch_data_pre_init_ftype *pre_init)
5133{
5134 return gdbarch_data_register (pre_init, NULL);
5135}
5136
5137struct gdbarch_data *
5138gdbarch_data_register_post_init (gdbarch_data_post_init_ftype *post_init)
5139{
5140 return gdbarch_data_register (NULL, post_init);
5141}
0f71a2f6 5142
0963b4bd 5143/* Create/delete the gdbarch data vector. */
95160752
AC
5144
5145static void
b3cc3077 5146alloc_gdbarch_data (struct gdbarch *gdbarch)
95160752 5147{
b3cc3077
JB
5148 gdb_assert (gdbarch->data == NULL);
5149 gdbarch->nr_data = gdbarch_data_registry.nr;
aebd7893 5150 gdbarch->data = GDBARCH_OBSTACK_CALLOC (gdbarch, gdbarch->nr_data, void *);
0f71a2f6
JM
5151}
5152
76860b5f 5153/* Initialize the current value of the specified per-architecture
0963b4bd 5154 data-pointer. */
b3cc3077 5155
95160752 5156void
030f20e1
AC
5157deprecated_set_gdbarch_data (struct gdbarch *gdbarch,
5158 struct gdbarch_data *data,
5159 void *pointer)
95160752
AC
5160{
5161 gdb_assert (data->index < gdbarch->nr_data);
aebd7893 5162 gdb_assert (gdbarch->data[data->index] == NULL);
030f20e1 5163 gdb_assert (data->pre_init == NULL);
95160752
AC
5164 gdbarch->data[data->index] = pointer;
5165}
5166
0f71a2f6 5167/* Return the current value of the specified per-architecture
0963b4bd 5168 data-pointer. */
0f71a2f6
JM
5169
5170void *
451fbdda 5171gdbarch_data (struct gdbarch *gdbarch, struct gdbarch_data *data)
0f71a2f6 5172{
451fbdda 5173 gdb_assert (data->index < gdbarch->nr_data);
030f20e1 5174 if (gdbarch->data[data->index] == NULL)
76860b5f 5175 {
030f20e1
AC
5176 /* The data-pointer isn't initialized, call init() to get a
5177 value. */
5178 if (data->pre_init != NULL)
5179 /* Mid architecture creation: pass just the obstack, and not
5180 the entire architecture, as that way it isn't possible for
5181 pre-init code to refer to undefined architecture
5182 fields. */
5183 gdbarch->data[data->index] = data->pre_init (gdbarch->obstack);
5184 else if (gdbarch->initialized_p
5185 && data->post_init != NULL)
5186 /* Post architecture creation: pass the entire architecture
5187 (as all fields are valid), but be careful to also detect
5188 recursive references. */
5189 {
5190 gdb_assert (data->init_p);
5191 data->init_p = 0;
5192 gdbarch->data[data->index] = data->post_init (gdbarch);
5193 data->init_p = 1;
5194 }
5195 else
5196 /* The architecture initialization hasn't completed - punt -
5197 hope that the caller knows what they are doing. Once
5198 deprecated_set_gdbarch_data has been initialized, this can be
5199 changed to an internal error. */
5200 return NULL;
76860b5f
AC
5201 gdb_assert (gdbarch->data[data->index] != NULL);
5202 }
451fbdda 5203 return gdbarch->data[data->index];
0f71a2f6
JM
5204}
5205
5206
0963b4bd 5207/* Keep a registry of the architectures known by GDB. */
0f71a2f6 5208
4b9b3959 5209struct gdbarch_registration
0f71a2f6
JM
5210{
5211 enum bfd_architecture bfd_architecture;
5212 gdbarch_init_ftype *init;
4b9b3959 5213 gdbarch_dump_tdep_ftype *dump_tdep;
0f71a2f6 5214 struct gdbarch_list *arches;
4b9b3959 5215 struct gdbarch_registration *next;
0f71a2f6
JM
5216};
5217
be5a57e1 5218static struct gdbarch_registration *gdbarch_registry = NULL;
0f71a2f6 5219
b4a20239
AC
5220static void
5221append_name (const char ***buf, int *nr, const char *name)
5222{
1dc7a623 5223 *buf = XRESIZEVEC (const char *, *buf, *nr + 1);
b4a20239
AC
5224 (*buf)[*nr] = name;
5225 *nr += 1;
5226}
5227
5228const char **
5229gdbarch_printable_names (void)
5230{
7996bcec 5231 /* Accumulate a list of names based on the registed list of
0963b4bd 5232 architectures. */
7996bcec
AC
5233 int nr_arches = 0;
5234 const char **arches = NULL;
5235 struct gdbarch_registration *rego;
05c547f6 5236
7996bcec
AC
5237 for (rego = gdbarch_registry;
5238 rego != NULL;
5239 rego = rego->next)
b4a20239 5240 {
7996bcec
AC
5241 const struct bfd_arch_info *ap;
5242 ap = bfd_lookup_arch (rego->bfd_architecture, 0);
5243 if (ap == NULL)
5244 internal_error (__FILE__, __LINE__,
e2e0b3e5 5245 _("gdbarch_architecture_names: multi-arch unknown"));
7996bcec
AC
5246 do
5247 {
5248 append_name (&arches, &nr_arches, ap->printable_name);
5249 ap = ap->next;
5250 }
5251 while (ap != NULL);
b4a20239 5252 }
7996bcec
AC
5253 append_name (&arches, &nr_arches, NULL);
5254 return arches;
b4a20239
AC
5255}
5256
5257
0f71a2f6 5258void
4b9b3959
AC
5259gdbarch_register (enum bfd_architecture bfd_architecture,
5260 gdbarch_init_ftype *init,
5261 gdbarch_dump_tdep_ftype *dump_tdep)
0f71a2f6 5262{
4b9b3959 5263 struct gdbarch_registration **curr;
0f71a2f6 5264 const struct bfd_arch_info *bfd_arch_info;
05c547f6 5265
ec3d358c 5266 /* Check that BFD recognizes this architecture */
0f71a2f6
JM
5267 bfd_arch_info = bfd_lookup_arch (bfd_architecture, 0);
5268 if (bfd_arch_info == NULL)
5269 {
8e65ff28 5270 internal_error (__FILE__, __LINE__,
0963b4bd
MS
5271 _("gdbarch: Attempt to register "
5272 "unknown architecture (%d)"),
8e65ff28 5273 bfd_architecture);
0f71a2f6 5274 }
0963b4bd 5275 /* Check that we haven't seen this architecture before. */
be5a57e1 5276 for (curr = &gdbarch_registry;
0f71a2f6
JM
5277 (*curr) != NULL;
5278 curr = &(*curr)->next)
5279 {
5280 if (bfd_architecture == (*curr)->bfd_architecture)
8e65ff28 5281 internal_error (__FILE__, __LINE__,
64b9b334 5282 _("gdbarch: Duplicate registration "
0963b4bd 5283 "of architecture (%s)"),
8e65ff28 5284 bfd_arch_info->printable_name);
0f71a2f6
JM
5285 }
5286 /* log it */
5287 if (gdbarch_debug)
30737ed9 5288 fprintf_unfiltered (gdb_stdlog, "register_gdbarch_init (%s, %s)\n",
0f71a2f6 5289 bfd_arch_info->printable_name,
30737ed9 5290 host_address_to_string (init));
0f71a2f6 5291 /* Append it */
70ba0933 5292 (*curr) = XNEW (struct gdbarch_registration);
0f71a2f6
JM
5293 (*curr)->bfd_architecture = bfd_architecture;
5294 (*curr)->init = init;
4b9b3959 5295 (*curr)->dump_tdep = dump_tdep;
0f71a2f6
JM
5296 (*curr)->arches = NULL;
5297 (*curr)->next = NULL;
4b9b3959
AC
5298}
5299
5300void
5301register_gdbarch_init (enum bfd_architecture bfd_architecture,
5302 gdbarch_init_ftype *init)
5303{
5304 gdbarch_register (bfd_architecture, init, NULL);
0f71a2f6 5305}
0f71a2f6
JM
5306
5307
424163ea 5308/* Look for an architecture using gdbarch_info. */
0f71a2f6
JM
5309
5310struct gdbarch_list *
104c1213
JM
5311gdbarch_list_lookup_by_info (struct gdbarch_list *arches,
5312 const struct gdbarch_info *info)
0f71a2f6
JM
5313{
5314 for (; arches != NULL; arches = arches->next)
5315 {
5316 if (info->bfd_arch_info != arches->gdbarch->bfd_arch_info)
5317 continue;
5318 if (info->byte_order != arches->gdbarch->byte_order)
5319 continue;
4be87837
DJ
5320 if (info->osabi != arches->gdbarch->osabi)
5321 continue;
424163ea
DJ
5322 if (info->target_desc != arches->gdbarch->target_desc)
5323 continue;
0f71a2f6
JM
5324 return arches;
5325 }
5326 return NULL;
5327}
5328
5329
ebdba546 5330/* Find an architecture that matches the specified INFO. Create a new
59837fe0 5331 architecture if needed. Return that new architecture. */
0f71a2f6 5332
59837fe0
UW
5333struct gdbarch *
5334gdbarch_find_by_info (struct gdbarch_info info)
0f71a2f6
JM
5335{
5336 struct gdbarch *new_gdbarch;
4b9b3959 5337 struct gdbarch_registration *rego;
0f71a2f6 5338
b732d07d 5339 /* Fill in missing parts of the INFO struct using a number of
7a107747
DJ
5340 sources: "set ..."; INFOabfd supplied; and the global
5341 defaults. */
5342 gdbarch_info_fill (&info);
4be87837 5343
0963b4bd 5344 /* Must have found some sort of architecture. */
b732d07d 5345 gdb_assert (info.bfd_arch_info != NULL);
0f71a2f6
JM
5346
5347 if (gdbarch_debug)
5348 {
0f71a2f6 5349 fprintf_unfiltered (gdb_stdlog,
59837fe0 5350 "gdbarch_find_by_info: info.bfd_arch_info %s\n",
0f71a2f6
JM
5351 (info.bfd_arch_info != NULL
5352 ? info.bfd_arch_info->printable_name
5353 : "(null)"));
5354 fprintf_unfiltered (gdb_stdlog,
59837fe0 5355 "gdbarch_find_by_info: info.byte_order %d (%s)\n",
0f71a2f6 5356 info.byte_order,
d7449b42 5357 (info.byte_order == BFD_ENDIAN_BIG ? "big"
778eb05e 5358 : info.byte_order == BFD_ENDIAN_LITTLE ? "little"
0f71a2f6 5359 : "default"));
4be87837 5360 fprintf_unfiltered (gdb_stdlog,
59837fe0 5361 "gdbarch_find_by_info: info.osabi %d (%s)\n",
4be87837 5362 info.osabi, gdbarch_osabi_name (info.osabi));
0f71a2f6 5363 fprintf_unfiltered (gdb_stdlog,
59837fe0 5364 "gdbarch_find_by_info: info.abfd %s\n",
30737ed9 5365 host_address_to_string (info.abfd));
0f71a2f6 5366 fprintf_unfiltered (gdb_stdlog,
59837fe0 5367 "gdbarch_find_by_info: info.tdep_info %s\n",
30737ed9 5368 host_address_to_string (info.tdep_info));
0f71a2f6
JM
5369 }
5370
ebdba546 5371 /* Find the tdep code that knows about this architecture. */
b732d07d
AC
5372 for (rego = gdbarch_registry;
5373 rego != NULL;
5374 rego = rego->next)
5375 if (rego->bfd_architecture == info.bfd_arch_info->arch)
5376 break;
5377 if (rego == NULL)
5378 {
5379 if (gdbarch_debug)
59837fe0 5380 fprintf_unfiltered (gdb_stdlog, "gdbarch_find_by_info: "
ebdba546 5381 "No matching architecture\n");
b732d07d
AC
5382 return 0;
5383 }
5384
ebdba546 5385 /* Ask the tdep code for an architecture that matches "info". */
0f71a2f6
JM
5386 new_gdbarch = rego->init (info, rego->arches);
5387
ebdba546
AC
5388 /* Did the tdep code like it? No. Reject the change and revert to
5389 the old architecture. */
0f71a2f6
JM
5390 if (new_gdbarch == NULL)
5391 {
5392 if (gdbarch_debug)
59837fe0 5393 fprintf_unfiltered (gdb_stdlog, "gdbarch_find_by_info: "
ebdba546
AC
5394 "Target rejected architecture\n");
5395 return NULL;
0f71a2f6
JM
5396 }
5397
ebdba546
AC
5398 /* Is this a pre-existing architecture (as determined by already
5399 being initialized)? Move it to the front of the architecture
5400 list (keeping the list sorted Most Recently Used). */
5401 if (new_gdbarch->initialized_p)
0f71a2f6 5402 {
ebdba546 5403 struct gdbarch_list **list;
fe978cb0 5404 struct gdbarch_list *self;
0f71a2f6 5405 if (gdbarch_debug)
59837fe0 5406 fprintf_unfiltered (gdb_stdlog, "gdbarch_find_by_info: "
30737ed9
JB
5407 "Previous architecture %s (%s) selected\n",
5408 host_address_to_string (new_gdbarch),
0f71a2f6 5409 new_gdbarch->bfd_arch_info->printable_name);
ebdba546
AC
5410 /* Find the existing arch in the list. */
5411 for (list = &rego->arches;
5412 (*list) != NULL && (*list)->gdbarch != new_gdbarch;
5413 list = &(*list)->next);
5414 /* It had better be in the list of architectures. */
5415 gdb_assert ((*list) != NULL && (*list)->gdbarch == new_gdbarch);
fe978cb0
PA
5416 /* Unlink SELF. */
5417 self = (*list);
5418 (*list) = self->next;
5419 /* Insert SELF at the front. */
5420 self->next = rego->arches;
5421 rego->arches = self;
ebdba546
AC
5422 /* Return it. */
5423 return new_gdbarch;
0f71a2f6
JM
5424 }
5425
ebdba546
AC
5426 /* It's a new architecture. */
5427 if (gdbarch_debug)
59837fe0 5428 fprintf_unfiltered (gdb_stdlog, "gdbarch_find_by_info: "
30737ed9
JB
5429 "New architecture %s (%s) selected\n",
5430 host_address_to_string (new_gdbarch),
ebdba546
AC
5431 new_gdbarch->bfd_arch_info->printable_name);
5432
5433 /* Insert the new architecture into the front of the architecture
5434 list (keep the list sorted Most Recently Used). */
0f79675b 5435 {
fe978cb0
PA
5436 struct gdbarch_list *self = XNEW (struct gdbarch_list);
5437 self->next = rego->arches;
5438 self->gdbarch = new_gdbarch;
5439 rego->arches = self;
0f79675b 5440 }
0f71a2f6 5441
4b9b3959
AC
5442 /* Check that the newly installed architecture is valid. Plug in
5443 any post init values. */
5444 new_gdbarch->dump_tdep = rego->dump_tdep;
0f71a2f6 5445 verify_gdbarch (new_gdbarch);
ebdba546 5446 new_gdbarch->initialized_p = 1;
0f71a2f6 5447
4b9b3959 5448 if (gdbarch_debug)
ebdba546 5449 gdbarch_dump (new_gdbarch, gdb_stdlog);
4b9b3959 5450
ebdba546 5451 return new_gdbarch;
0f71a2f6 5452}
c906108c 5453
e487cc15 5454/* Make the specified architecture current. */
ebdba546
AC
5455
5456void
aff68abb 5457set_target_gdbarch (struct gdbarch *new_gdbarch)
ebdba546
AC
5458{
5459 gdb_assert (new_gdbarch != NULL);
ebdba546 5460 gdb_assert (new_gdbarch->initialized_p);
6ecd4729 5461 current_inferior ()->gdbarch = new_gdbarch;
383f836e 5462 observer_notify_architecture_changed (new_gdbarch);
a3ecef73 5463 registers_changed ();
ebdba546 5464}
c906108c 5465
f5656ead 5466/* Return the current inferior's arch. */
6ecd4729
PA
5467
5468struct gdbarch *
f5656ead 5469target_gdbarch (void)
6ecd4729
PA
5470{
5471 return current_inferior ()->gdbarch;
5472}
5473
104c1213 5474extern void _initialize_gdbarch (void);
b4a20239 5475
c906108c 5476void
7c7651b2 5477_initialize_gdbarch (void)
c906108c 5478{
ccce17b0 5479 add_setshow_zuinteger_cmd ("arch", class_maintenance, &gdbarch_debug, _("\
85c07804
AC
5480Set architecture debugging."), _("\
5481Show architecture debugging."), _("\
5482When non-zero, architecture debugging is enabled."),
5483 NULL,
920d2a44 5484 show_gdbarch_debug,
85c07804 5485 &setdebuglist, &showdebuglist);
c906108c 5486}
This page took 1.860178 seconds and 4 git commands to generate.