1 /* *INDENT-OFF* */ /* THIS FILE IS GENERATED -*- buffer-read-only: t -*- */
4 /* Dynamic architecture support for GDB, the GNU debugger.
6 Copyright (C) 1998-2017 Free Software Foundation, Inc.
8 This file is part of GDB.
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
12 the Free Software Foundation; either version 3 of the License, or
13 (at your option) any later version.
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.
20 You should have received a copy of the GNU General Public License
21 along with this program. If not, see <http://www.gnu.org/licenses/>. */
23 /* This file was created with the aid of ``gdbarch.sh''.
25 The Bourne shell script ``gdbarch.sh'' creates the files
26 ``new-gdbarch.c'' and ``new-gdbarch.h and then compares them
27 against the existing ``gdbarch.[hc]''. Any differences found
30 If editing this file, please also run gdbarch.sh and merge any
31 changes into that script. Conversely, when making sweeping changes
32 to this file, modifying gdbarch.sh and using its output may prove
37 #include "arch-utils.h"
43 #include "floatformat.h"
44 #include "reggroups.h"
46 #include "gdb_obstack.h"
52 /* Static function declarations */
54 static void alloc_gdbarch_data (struct gdbarch *);
56 /* Non-zero if we want to trace architecture code. */
59 #define GDBARCH_DEBUG 0
61 unsigned int gdbarch_debug = GDBARCH_DEBUG;
63 show_gdbarch_debug (struct ui_file *file, int from_tty,
64 struct cmd_list_element *c, const char *value)
66 fprintf_filtered (file, _("Architecture debugging is %s.\n"), value);
70 pformat (const struct floatformat **format)
75 /* Just print out one of them - this is only for diagnostics. */
76 return format[0]->name;
80 pstring (const char *string)
88 pstring_ptr (char **string)
90 if (string == NULL || *string == NULL)
95 /* Helper function to print a list of strings, represented as "const
96 char *const *". The list is printed comma-separated. */
99 pstring_list (const char *const *list)
101 static char ret[100];
102 const char *const *p;
109 for (p = list; *p != NULL && offset < sizeof (ret); ++p)
111 size_t s = xsnprintf (ret + offset, sizeof (ret) - offset, "%s, ", *p);
117 gdb_assert (offset - 2 < sizeof (ret));
118 ret[offset - 2] = '\0';
125 /* Maintain the struct gdbarch object. */
129 /* Has this architecture been fully initialized? */
132 /* An obstack bound to the lifetime of the architecture. */
133 struct obstack *obstack;
135 /* basic architectural information. */
136 const struct bfd_arch_info * bfd_arch_info;
137 enum bfd_endian byte_order;
138 enum bfd_endian byte_order_for_code;
139 enum gdb_osabi osabi;
140 const struct target_desc * target_desc;
142 /* target specific vector. */
143 struct gdbarch_tdep *tdep;
144 gdbarch_dump_tdep_ftype *dump_tdep;
146 /* per-architecture data-pointers. */
150 /* Multi-arch values.
152 When extending this structure you must:
156 Declare set/get functions and define the corresponding
159 gdbarch_alloc(): If zero/NULL is not a suitable default,
160 initialize the new field.
162 verify_gdbarch(): Confirm that the target updated the field
165 gdbarch_dump(): Add a fprintf_unfiltered call so that the new
168 get_gdbarch(): Implement the set/get functions (probably using
169 the macro's as shortcuts).
178 int long_long_align_bit;
180 const struct floatformat ** half_format;
182 const struct floatformat ** float_format;
184 const struct floatformat ** double_format;
186 const struct floatformat ** long_double_format;
189 gdbarch_floatformat_for_type_ftype *floatformat_for_type;
192 int dwarf2_addr_size;
194 gdbarch_read_pc_ftype *read_pc;
195 gdbarch_write_pc_ftype *write_pc;
196 gdbarch_virtual_frame_pointer_ftype *virtual_frame_pointer;
197 gdbarch_pseudo_register_read_ftype *pseudo_register_read;
198 gdbarch_pseudo_register_read_value_ftype *pseudo_register_read_value;
199 gdbarch_pseudo_register_write_ftype *pseudo_register_write;
202 gdbarch_ax_pseudo_register_collect_ftype *ax_pseudo_register_collect;
203 gdbarch_ax_pseudo_register_push_stack_ftype *ax_pseudo_register_push_stack;
204 gdbarch_handle_segmentation_fault_ftype *handle_segmentation_fault;
209 gdbarch_stab_reg_to_regnum_ftype *stab_reg_to_regnum;
210 gdbarch_ecoff_reg_to_regnum_ftype *ecoff_reg_to_regnum;
211 gdbarch_sdb_reg_to_regnum_ftype *sdb_reg_to_regnum;
212 gdbarch_dwarf2_reg_to_regnum_ftype *dwarf2_reg_to_regnum;
213 gdbarch_register_name_ftype *register_name;
214 gdbarch_register_type_ftype *register_type;
215 gdbarch_dummy_id_ftype *dummy_id;
216 int deprecated_fp_regnum;
217 gdbarch_push_dummy_call_ftype *push_dummy_call;
218 int call_dummy_location;
219 gdbarch_push_dummy_code_ftype *push_dummy_code;
220 gdbarch_code_of_frame_writable_ftype *code_of_frame_writable;
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;
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;
228 int believe_pcc_promotion;
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;
232 gdbarch_value_from_register_ftype *value_from_register;
233 gdbarch_pointer_to_address_ftype *pointer_to_address;
234 gdbarch_address_to_pointer_ftype *address_to_pointer;
235 gdbarch_integer_to_address_ftype *integer_to_address;
236 gdbarch_return_value_ftype *return_value;
237 gdbarch_return_in_first_hidden_param_p_ftype *return_in_first_hidden_param_p;
238 gdbarch_skip_prologue_ftype *skip_prologue;
239 gdbarch_skip_main_prologue_ftype *skip_main_prologue;
240 gdbarch_skip_entrypoint_ftype *skip_entrypoint;
241 gdbarch_inner_than_ftype *inner_than;
242 gdbarch_breakpoint_from_pc_ftype *breakpoint_from_pc;
243 gdbarch_breakpoint_kind_from_pc_ftype *breakpoint_kind_from_pc;
244 gdbarch_sw_breakpoint_from_kind_ftype *sw_breakpoint_from_kind;
245 gdbarch_breakpoint_kind_from_current_state_ftype *breakpoint_kind_from_current_state;
246 gdbarch_adjust_breakpoint_address_ftype *adjust_breakpoint_address;
247 gdbarch_memory_insert_breakpoint_ftype *memory_insert_breakpoint;
248 gdbarch_memory_remove_breakpoint_ftype *memory_remove_breakpoint;
249 CORE_ADDR decr_pc_after_break;
250 CORE_ADDR deprecated_function_start_offset;
251 gdbarch_remote_register_number_ftype *remote_register_number;
252 gdbarch_fetch_tls_load_module_address_ftype *fetch_tls_load_module_address;
253 CORE_ADDR frame_args_skip;
254 gdbarch_unwind_pc_ftype *unwind_pc;
255 gdbarch_unwind_sp_ftype *unwind_sp;
256 gdbarch_frame_num_args_ftype *frame_num_args;
257 gdbarch_frame_align_ftype *frame_align;
258 gdbarch_stabs_argument_has_addr_ftype *stabs_argument_has_addr;
259 int frame_red_zone_size;
260 gdbarch_convert_from_func_ptr_addr_ftype *convert_from_func_ptr_addr;
261 gdbarch_addr_bits_remove_ftype *addr_bits_remove;
262 int significant_addr_bit;
263 gdbarch_software_single_step_ftype *software_single_step;
264 gdbarch_single_step_through_delay_ftype *single_step_through_delay;
265 gdbarch_print_insn_ftype *print_insn;
266 gdbarch_skip_trampoline_code_ftype *skip_trampoline_code;
267 gdbarch_skip_solib_resolver_ftype *skip_solib_resolver;
268 gdbarch_in_solib_return_trampoline_ftype *in_solib_return_trampoline;
269 gdbarch_stack_frame_destroyed_p_ftype *stack_frame_destroyed_p;
270 gdbarch_elf_make_msymbol_special_ftype *elf_make_msymbol_special;
271 gdbarch_coff_make_msymbol_special_ftype *coff_make_msymbol_special;
272 gdbarch_make_symbol_special_ftype *make_symbol_special;
273 gdbarch_adjust_dwarf2_addr_ftype *adjust_dwarf2_addr;
274 gdbarch_adjust_dwarf2_line_ftype *adjust_dwarf2_line;
275 int cannot_step_breakpoint;
276 int have_nonsteppable_watchpoint;
277 gdbarch_address_class_type_flags_ftype *address_class_type_flags;
278 gdbarch_address_class_type_flags_to_name_ftype *address_class_type_flags_to_name;
279 gdbarch_execute_dwarf_cfa_vendor_op_ftype *execute_dwarf_cfa_vendor_op;
280 gdbarch_address_class_name_to_type_flags_ftype *address_class_name_to_type_flags;
281 gdbarch_register_reggroup_p_ftype *register_reggroup_p;
282 gdbarch_fetch_pointer_argument_ftype *fetch_pointer_argument;
283 gdbarch_iterate_over_regset_sections_ftype *iterate_over_regset_sections;
284 gdbarch_make_corefile_notes_ftype *make_corefile_notes;
285 gdbarch_find_memory_regions_ftype *find_memory_regions;
286 gdbarch_core_xfer_shared_libraries_ftype *core_xfer_shared_libraries;
287 gdbarch_core_xfer_shared_libraries_aix_ftype *core_xfer_shared_libraries_aix;
288 gdbarch_core_pid_to_str_ftype *core_pid_to_str;
289 gdbarch_core_thread_name_ftype *core_thread_name;
290 gdbarch_core_xfer_siginfo_ftype *core_xfer_siginfo;
291 const char * gcore_bfd_target;
292 int vtable_function_descriptors;
294 gdbarch_skip_permanent_breakpoint_ftype *skip_permanent_breakpoint;
295 ULONGEST max_insn_length;
296 gdbarch_displaced_step_copy_insn_ftype *displaced_step_copy_insn;
297 gdbarch_displaced_step_hw_singlestep_ftype *displaced_step_hw_singlestep;
298 gdbarch_displaced_step_fixup_ftype *displaced_step_fixup;
299 gdbarch_displaced_step_location_ftype *displaced_step_location;
300 gdbarch_relocate_instruction_ftype *relocate_instruction;
301 gdbarch_overlay_update_ftype *overlay_update;
302 gdbarch_core_read_description_ftype *core_read_description;
303 gdbarch_static_transform_name_ftype *static_transform_name;
304 int sofun_address_maybe_missing;
305 gdbarch_process_record_ftype *process_record;
306 gdbarch_process_record_signal_ftype *process_record_signal;
307 gdbarch_gdb_signal_from_target_ftype *gdb_signal_from_target;
308 gdbarch_gdb_signal_to_target_ftype *gdb_signal_to_target;
309 gdbarch_get_siginfo_type_ftype *get_siginfo_type;
310 gdbarch_record_special_symbol_ftype *record_special_symbol;
311 gdbarch_get_syscall_number_ftype *get_syscall_number;
312 const char * xml_syscall_file;
313 struct syscalls_info * syscalls_info;
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;
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;
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;
328 int has_global_solist;
329 int has_global_breakpoints;
330 gdbarch_has_shared_address_space_ftype *has_shared_address_space;
331 gdbarch_fast_tracepoint_valid_at_ftype *fast_tracepoint_valid_at;
332 gdbarch_guess_tracepoint_registers_ftype *guess_tracepoint_registers;
333 gdbarch_auto_charset_ftype *auto_charset;
334 gdbarch_auto_wide_charset_ftype *auto_wide_charset;
335 const char * solib_symbols_extension;
336 int has_dos_based_file_system;
337 gdbarch_gen_return_address_ftype *gen_return_address;
338 gdbarch_info_proc_ftype *info_proc;
339 gdbarch_core_info_proc_ftype *core_info_proc;
340 gdbarch_iterate_over_objfiles_in_search_order_ftype *iterate_over_objfiles_in_search_order;
341 struct ravenscar_arch_ops * ravenscar_ops;
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;
345 gdbarch_auxv_parse_ftype *auxv_parse;
346 gdbarch_print_auxv_entry_ftype *print_auxv_entry;
347 gdbarch_vsyscall_range_ftype *vsyscall_range;
348 gdbarch_infcall_mmap_ftype *infcall_mmap;
349 gdbarch_infcall_munmap_ftype *infcall_munmap;
350 gdbarch_gcc_target_options_ftype *gcc_target_options;
351 gdbarch_gnu_triplet_regexp_ftype *gnu_triplet_regexp;
352 gdbarch_addressable_memory_unit_size_ftype *addressable_memory_unit_size;
353 char ** disassembler_options;
354 const disasm_options_t * valid_disassembler_options;
357 /* Create a new ``struct gdbarch'' based on information provided by
358 ``struct gdbarch_info''. */
361 gdbarch_alloc (const struct gdbarch_info *info,
362 struct gdbarch_tdep *tdep)
364 struct gdbarch *gdbarch;
366 /* Create an obstack for allocating all the per-architecture memory,
367 then use that to allocate the architecture vector. */
368 struct obstack *obstack = XNEW (struct obstack);
369 obstack_init (obstack);
370 gdbarch = XOBNEW (obstack, struct gdbarch);
371 memset (gdbarch, 0, sizeof (*gdbarch));
372 gdbarch->obstack = obstack;
374 alloc_gdbarch_data (gdbarch);
376 gdbarch->tdep = tdep;
378 gdbarch->bfd_arch_info = info->bfd_arch_info;
379 gdbarch->byte_order = info->byte_order;
380 gdbarch->byte_order_for_code = info->byte_order_for_code;
381 gdbarch->osabi = info->osabi;
382 gdbarch->target_desc = info->target_desc;
384 /* Force the explicit initialization of these. */
385 gdbarch->bits_big_endian = (gdbarch->byte_order == BFD_ENDIAN_BIG);
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;
390 gdbarch->long_long_align_bit = 2*gdbarch->long_bit;
391 gdbarch->half_bit = 2*TARGET_CHAR_BIT;
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;
395 gdbarch->wchar_bit = 4*TARGET_CHAR_BIT;
396 gdbarch->wchar_signed = -1;
397 gdbarch->floatformat_for_type = default_floatformat_for_type;
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;
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;
412 gdbarch->code_of_frame_writable = default_code_of_frame_writable;
413 gdbarch->print_registers_info = default_print_registers_info;
414 gdbarch->print_float_info = default_print_float_info;
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;
422 gdbarch->return_in_first_hidden_param_p = default_return_in_first_hidden_param_p;
423 gdbarch->breakpoint_from_pc = default_breakpoint_from_pc;
424 gdbarch->sw_breakpoint_from_kind = NULL;
425 gdbarch->breakpoint_kind_from_current_state = default_breakpoint_kind_from_current_state;
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;
432 gdbarch->print_insn = default_print_insn;
433 gdbarch->skip_trampoline_code = generic_skip_trampoline_code;
434 gdbarch->skip_solib_resolver = generic_skip_solib_resolver;
435 gdbarch->in_solib_return_trampoline = generic_in_solib_return_trampoline;
436 gdbarch->stack_frame_destroyed_p = generic_stack_frame_destroyed_p;
437 gdbarch->coff_make_msymbol_special = default_coff_make_msymbol_special;
438 gdbarch->make_symbol_special = default_make_symbol_special;
439 gdbarch->adjust_dwarf2_addr = default_adjust_dwarf2_addr;
440 gdbarch->adjust_dwarf2_line = default_adjust_dwarf2_line;
441 gdbarch->execute_dwarf_cfa_vendor_op = default_execute_dwarf_cfa_vendor_op;
442 gdbarch->register_reggroup_p = default_register_reggroup_p;
443 gdbarch->skip_permanent_breakpoint = default_skip_permanent_breakpoint;
444 gdbarch->displaced_step_hw_singlestep = default_displaced_step_hw_singlestep;
445 gdbarch->displaced_step_fixup = NULL;
446 gdbarch->displaced_step_location = NULL;
447 gdbarch->relocate_instruction = NULL;
448 gdbarch->has_shared_address_space = default_has_shared_address_space;
449 gdbarch->fast_tracepoint_valid_at = default_fast_tracepoint_valid_at;
450 gdbarch->guess_tracepoint_registers = default_guess_tracepoint_registers;
451 gdbarch->auto_charset = default_auto_charset;
452 gdbarch->auto_wide_charset = default_auto_wide_charset;
453 gdbarch->gen_return_address = default_gen_return_address;
454 gdbarch->iterate_over_objfiles_in_search_order = default_iterate_over_objfiles_in_search_order;
455 gdbarch->ravenscar_ops = NULL;
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;
459 gdbarch->print_auxv_entry = default_print_auxv_entry;
460 gdbarch->vsyscall_range = default_vsyscall_range;
461 gdbarch->infcall_mmap = default_infcall_mmap;
462 gdbarch->infcall_munmap = default_infcall_munmap;
463 gdbarch->gcc_target_options = default_gcc_target_options;
464 gdbarch->gnu_triplet_regexp = default_gnu_triplet_regexp;
465 gdbarch->addressable_memory_unit_size = default_addressable_memory_unit_size;
466 /* gdbarch_alloc() */
472 /* Allocate extra space using the per-architecture obstack. */
475 gdbarch_obstack_zalloc (struct gdbarch *arch, long size)
477 void *data = obstack_alloc (arch->obstack, size);
479 memset (data, 0, size);
486 gdbarch_obstack_strdup (struct gdbarch *arch, const char *string)
488 return obstack_strdup (arch->obstack, string);
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. */
499 gdbarch_free (struct gdbarch *arch)
501 struct obstack *obstack;
503 gdb_assert (arch != NULL);
504 gdb_assert (!arch->initialized_p);
505 obstack = arch->obstack;
506 obstack_free (obstack, 0); /* Includes the ARCH. */
511 /* Ensure that all values in a GDBARCH are reasonable. */
514 verify_gdbarch (struct gdbarch *gdbarch)
519 if (gdbarch->byte_order == BFD_ENDIAN_UNKNOWN)
520 log.puts ("\n\tbyte-order");
521 if (gdbarch->bfd_arch_info == NULL)
522 log.puts ("\n\tbfd_arch_info");
523 /* Check those that need to be defined for the given multi-arch level. */
524 /* Skip verify of bits_big_endian, invalid_p == 0 */
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 */
529 /* Skip verify of long_long_align_bit, invalid_p == 0 */
530 /* Skip verify of half_bit, invalid_p == 0 */
531 if (gdbarch->half_format == 0)
532 gdbarch->half_format = floatformats_ieee_half;
533 /* Skip verify of float_bit, invalid_p == 0 */
534 if (gdbarch->float_format == 0)
535 gdbarch->float_format = floatformats_ieee_single;
536 /* Skip verify of double_bit, invalid_p == 0 */
537 if (gdbarch->double_format == 0)
538 gdbarch->double_format = floatformats_ieee_double;
539 /* Skip verify of long_double_bit, invalid_p == 0 */
540 if (gdbarch->long_double_format == 0)
541 gdbarch->long_double_format = floatformats_ieee_double;
542 /* Skip verify of wchar_bit, invalid_p == 0 */
543 if (gdbarch->wchar_signed == -1)
544 gdbarch->wchar_signed = 1;
545 /* Skip verify of floatformat_for_type, invalid_p == 0 */
546 /* Skip verify of ptr_bit, invalid_p == 0 */
547 if (gdbarch->addr_bit == 0)
548 gdbarch->addr_bit = gdbarch_ptr_bit (gdbarch);
549 if (gdbarch->dwarf2_addr_size == 0)
550 gdbarch->dwarf2_addr_size = gdbarch_ptr_bit (gdbarch) / TARGET_CHAR_BIT;
551 if (gdbarch->char_signed == -1)
552 gdbarch->char_signed = 1;
553 /* Skip verify of read_pc, has predicate. */
554 /* Skip verify of write_pc, has predicate. */
555 /* Skip verify of virtual_frame_pointer, invalid_p == 0 */
556 /* Skip verify of pseudo_register_read, has predicate. */
557 /* Skip verify of pseudo_register_read_value, has predicate. */
558 /* Skip verify of pseudo_register_write, has predicate. */
559 if (gdbarch->num_regs == -1)
560 log.puts ("\n\tnum_regs");
561 /* Skip verify of num_pseudo_regs, invalid_p == 0 */
562 /* Skip verify of ax_pseudo_register_collect, has predicate. */
563 /* Skip verify of ax_pseudo_register_push_stack, has predicate. */
564 /* Skip verify of handle_segmentation_fault, has predicate. */
565 /* Skip verify of sp_regnum, invalid_p == 0 */
566 /* Skip verify of pc_regnum, invalid_p == 0 */
567 /* Skip verify of ps_regnum, invalid_p == 0 */
568 /* Skip verify of fp0_regnum, invalid_p == 0 */
569 /* Skip verify of stab_reg_to_regnum, invalid_p == 0 */
570 /* Skip verify of ecoff_reg_to_regnum, invalid_p == 0 */
571 /* Skip verify of sdb_reg_to_regnum, invalid_p == 0 */
572 /* Skip verify of dwarf2_reg_to_regnum, invalid_p == 0 */
573 if (gdbarch->register_name == 0)
574 log.puts ("\n\tregister_name");
575 /* Skip verify of register_type, has predicate. */
576 /* Skip verify of dummy_id, has predicate. */
577 /* Skip verify of deprecated_fp_regnum, invalid_p == 0 */
578 /* Skip verify of push_dummy_call, has predicate. */
579 /* Skip verify of call_dummy_location, invalid_p == 0 */
580 /* Skip verify of push_dummy_code, has predicate. */
581 /* Skip verify of code_of_frame_writable, invalid_p == 0 */
582 /* Skip verify of print_registers_info, invalid_p == 0 */
583 /* Skip verify of print_float_info, invalid_p == 0 */
584 /* Skip verify of print_vector_info, has predicate. */
585 /* Skip verify of register_sim_regno, invalid_p == 0 */
586 /* Skip verify of cannot_fetch_register, invalid_p == 0 */
587 /* Skip verify of cannot_store_register, invalid_p == 0 */
588 /* Skip verify of get_longjmp_target, has predicate. */
589 /* Skip verify of convert_register_p, invalid_p == 0 */
590 /* Skip verify of value_from_register, invalid_p == 0 */
591 /* Skip verify of pointer_to_address, invalid_p == 0 */
592 /* Skip verify of address_to_pointer, invalid_p == 0 */
593 /* Skip verify of integer_to_address, has predicate. */
594 /* Skip verify of return_value, has predicate. */
595 /* Skip verify of return_in_first_hidden_param_p, invalid_p == 0 */
596 if (gdbarch->skip_prologue == 0)
597 log.puts ("\n\tskip_prologue");
598 /* Skip verify of skip_main_prologue, has predicate. */
599 /* Skip verify of skip_entrypoint, has predicate. */
600 if (gdbarch->inner_than == 0)
601 log.puts ("\n\tinner_than");
602 /* Skip verify of breakpoint_from_pc, invalid_p == 0 */
603 if (gdbarch->breakpoint_kind_from_pc == 0)
604 log.puts ("\n\tbreakpoint_kind_from_pc");
605 /* Skip verify of sw_breakpoint_from_kind, invalid_p == 0 */
606 /* Skip verify of breakpoint_kind_from_current_state, invalid_p == 0 */
607 /* Skip verify of adjust_breakpoint_address, has predicate. */
608 /* Skip verify of memory_insert_breakpoint, invalid_p == 0 */
609 /* Skip verify of memory_remove_breakpoint, invalid_p == 0 */
610 /* Skip verify of decr_pc_after_break, invalid_p == 0 */
611 /* Skip verify of deprecated_function_start_offset, invalid_p == 0 */
612 /* Skip verify of remote_register_number, invalid_p == 0 */
613 /* Skip verify of fetch_tls_load_module_address, has predicate. */
614 /* Skip verify of frame_args_skip, invalid_p == 0 */
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. */
619 /* Skip verify of stabs_argument_has_addr, invalid_p == 0 */
620 /* Skip verify of convert_from_func_ptr_addr, invalid_p == 0 */
621 /* Skip verify of addr_bits_remove, invalid_p == 0 */
622 if (gdbarch->significant_addr_bit == 0)
623 gdbarch->significant_addr_bit = gdbarch_addr_bit (gdbarch);
624 /* Skip verify of software_single_step, has predicate. */
625 /* Skip verify of single_step_through_delay, has predicate. */
626 /* Skip verify of print_insn, invalid_p == 0 */
627 /* Skip verify of skip_trampoline_code, invalid_p == 0 */
628 /* Skip verify of skip_solib_resolver, invalid_p == 0 */
629 /* Skip verify of in_solib_return_trampoline, invalid_p == 0 */
630 /* Skip verify of stack_frame_destroyed_p, invalid_p == 0 */
631 /* Skip verify of elf_make_msymbol_special, has predicate. */
632 /* Skip verify of coff_make_msymbol_special, invalid_p == 0 */
633 /* Skip verify of make_symbol_special, invalid_p == 0 */
634 /* Skip verify of adjust_dwarf2_addr, invalid_p == 0 */
635 /* Skip verify of adjust_dwarf2_line, invalid_p == 0 */
636 /* Skip verify of cannot_step_breakpoint, invalid_p == 0 */
637 /* Skip verify of have_nonsteppable_watchpoint, invalid_p == 0 */
638 /* Skip verify of address_class_type_flags, has predicate. */
639 /* Skip verify of address_class_type_flags_to_name, has predicate. */
640 /* Skip verify of execute_dwarf_cfa_vendor_op, invalid_p == 0 */
641 /* Skip verify of address_class_name_to_type_flags, has predicate. */
642 /* Skip verify of register_reggroup_p, invalid_p == 0 */
643 /* Skip verify of fetch_pointer_argument, has predicate. */
644 /* Skip verify of iterate_over_regset_sections, has predicate. */
645 /* Skip verify of make_corefile_notes, has predicate. */
646 /* Skip verify of find_memory_regions, has predicate. */
647 /* Skip verify of core_xfer_shared_libraries, has predicate. */
648 /* Skip verify of core_xfer_shared_libraries_aix, has predicate. */
649 /* Skip verify of core_pid_to_str, has predicate. */
650 /* Skip verify of core_thread_name, has predicate. */
651 /* Skip verify of core_xfer_siginfo, has predicate. */
652 /* Skip verify of gcore_bfd_target, has predicate. */
653 /* Skip verify of vtable_function_descriptors, invalid_p == 0 */
654 /* Skip verify of vbit_in_delta, invalid_p == 0 */
655 /* Skip verify of skip_permanent_breakpoint, invalid_p == 0 */
656 /* Skip verify of max_insn_length, has predicate. */
657 /* Skip verify of displaced_step_copy_insn, has predicate. */
658 /* Skip verify of displaced_step_hw_singlestep, invalid_p == 0 */
659 /* Skip verify of displaced_step_fixup, has predicate. */
660 if ((! gdbarch->displaced_step_location) != (! gdbarch->displaced_step_copy_insn))
661 log.puts ("\n\tdisplaced_step_location");
662 /* Skip verify of relocate_instruction, has predicate. */
663 /* Skip verify of overlay_update, has predicate. */
664 /* Skip verify of core_read_description, has predicate. */
665 /* Skip verify of static_transform_name, has predicate. */
666 /* Skip verify of sofun_address_maybe_missing, invalid_p == 0 */
667 /* Skip verify of process_record, has predicate. */
668 /* Skip verify of process_record_signal, has predicate. */
669 /* Skip verify of gdb_signal_from_target, has predicate. */
670 /* Skip verify of gdb_signal_to_target, has predicate. */
671 /* Skip verify of get_siginfo_type, has predicate. */
672 /* Skip verify of record_special_symbol, has predicate. */
673 /* Skip verify of get_syscall_number, has predicate. */
674 /* Skip verify of xml_syscall_file, invalid_p == 0 */
675 /* Skip verify of syscalls_info, invalid_p == 0 */
676 /* Skip verify of stap_integer_prefixes, invalid_p == 0 */
677 /* Skip verify of stap_integer_suffixes, invalid_p == 0 */
678 /* Skip verify of stap_register_prefixes, invalid_p == 0 */
679 /* Skip verify of stap_register_suffixes, invalid_p == 0 */
680 /* Skip verify of stap_register_indirection_prefixes, invalid_p == 0 */
681 /* Skip verify of stap_register_indirection_suffixes, invalid_p == 0 */
682 /* Skip verify of stap_gdb_register_prefix, invalid_p == 0 */
683 /* Skip verify of stap_gdb_register_suffix, invalid_p == 0 */
684 /* Skip verify of stap_is_single_operand, has predicate. */
685 /* Skip verify of stap_parse_special_token, has predicate. */
686 /* Skip verify of dtrace_parse_probe_argument, has predicate. */
687 /* Skip verify of dtrace_probe_is_enabled, has predicate. */
688 /* Skip verify of dtrace_enable_probe, has predicate. */
689 /* Skip verify of dtrace_disable_probe, has predicate. */
690 /* Skip verify of has_global_solist, invalid_p == 0 */
691 /* Skip verify of has_global_breakpoints, invalid_p == 0 */
692 /* Skip verify of has_shared_address_space, invalid_p == 0 */
693 /* Skip verify of fast_tracepoint_valid_at, invalid_p == 0 */
694 /* Skip verify of guess_tracepoint_registers, invalid_p == 0 */
695 /* Skip verify of auto_charset, invalid_p == 0 */
696 /* Skip verify of auto_wide_charset, invalid_p == 0 */
697 /* Skip verify of has_dos_based_file_system, invalid_p == 0 */
698 /* Skip verify of gen_return_address, invalid_p == 0 */
699 /* Skip verify of info_proc, has predicate. */
700 /* Skip verify of core_info_proc, has predicate. */
701 /* Skip verify of iterate_over_objfiles_in_search_order, invalid_p == 0 */
702 /* Skip verify of ravenscar_ops, invalid_p == 0 */
703 /* Skip verify of insn_is_call, invalid_p == 0 */
704 /* Skip verify of insn_is_ret, invalid_p == 0 */
705 /* Skip verify of insn_is_jump, invalid_p == 0 */
706 /* Skip verify of auxv_parse, has predicate. */
707 /* Skip verify of print_auxv_entry, invalid_p == 0 */
708 /* Skip verify of vsyscall_range, invalid_p == 0 */
709 /* Skip verify of infcall_mmap, invalid_p == 0 */
710 /* Skip verify of infcall_munmap, invalid_p == 0 */
711 /* Skip verify of gcc_target_options, invalid_p == 0 */
712 /* Skip verify of gnu_triplet_regexp, invalid_p == 0 */
713 /* Skip verify of addressable_memory_unit_size, invalid_p == 0 */
714 /* Skip verify of disassembler_options, invalid_p == 0 */
715 /* Skip verify of valid_disassembler_options, invalid_p == 0 */
717 internal_error (__FILE__, __LINE__,
718 _("verify_gdbarch: the following are invalid ...%s"),
723 /* Print out the details of the current architecture. */
726 gdbarch_dump (struct gdbarch *gdbarch, struct ui_file *file)
728 const char *gdb_nm_file = "<not-defined>";
730 #if defined (GDB_NM_FILE)
731 gdb_nm_file = GDB_NM_FILE;
733 fprintf_unfiltered (file,
734 "gdbarch_dump: GDB_NM_FILE = %s\n",
736 fprintf_unfiltered (file,
737 "gdbarch_dump: addr_bit = %s\n",
738 plongest (gdbarch->addr_bit));
739 fprintf_unfiltered (file,
740 "gdbarch_dump: addr_bits_remove = <%s>\n",
741 host_address_to_string (gdbarch->addr_bits_remove));
742 fprintf_unfiltered (file,
743 "gdbarch_dump: gdbarch_address_class_name_to_type_flags_p() = %d\n",
744 gdbarch_address_class_name_to_type_flags_p (gdbarch));
745 fprintf_unfiltered (file,
746 "gdbarch_dump: address_class_name_to_type_flags = <%s>\n",
747 host_address_to_string (gdbarch->address_class_name_to_type_flags));
748 fprintf_unfiltered (file,
749 "gdbarch_dump: gdbarch_address_class_type_flags_p() = %d\n",
750 gdbarch_address_class_type_flags_p (gdbarch));
751 fprintf_unfiltered (file,
752 "gdbarch_dump: address_class_type_flags = <%s>\n",
753 host_address_to_string (gdbarch->address_class_type_flags));
754 fprintf_unfiltered (file,
755 "gdbarch_dump: gdbarch_address_class_type_flags_to_name_p() = %d\n",
756 gdbarch_address_class_type_flags_to_name_p (gdbarch));
757 fprintf_unfiltered (file,
758 "gdbarch_dump: address_class_type_flags_to_name = <%s>\n",
759 host_address_to_string (gdbarch->address_class_type_flags_to_name));
760 fprintf_unfiltered (file,
761 "gdbarch_dump: address_to_pointer = <%s>\n",
762 host_address_to_string (gdbarch->address_to_pointer));
763 fprintf_unfiltered (file,
764 "gdbarch_dump: addressable_memory_unit_size = <%s>\n",
765 host_address_to_string (gdbarch->addressable_memory_unit_size));
766 fprintf_unfiltered (file,
767 "gdbarch_dump: gdbarch_adjust_breakpoint_address_p() = %d\n",
768 gdbarch_adjust_breakpoint_address_p (gdbarch));
769 fprintf_unfiltered (file,
770 "gdbarch_dump: adjust_breakpoint_address = <%s>\n",
771 host_address_to_string (gdbarch->adjust_breakpoint_address));
772 fprintf_unfiltered (file,
773 "gdbarch_dump: adjust_dwarf2_addr = <%s>\n",
774 host_address_to_string (gdbarch->adjust_dwarf2_addr));
775 fprintf_unfiltered (file,
776 "gdbarch_dump: adjust_dwarf2_line = <%s>\n",
777 host_address_to_string (gdbarch->adjust_dwarf2_line));
778 fprintf_unfiltered (file,
779 "gdbarch_dump: auto_charset = <%s>\n",
780 host_address_to_string (gdbarch->auto_charset));
781 fprintf_unfiltered (file,
782 "gdbarch_dump: auto_wide_charset = <%s>\n",
783 host_address_to_string (gdbarch->auto_wide_charset));
784 fprintf_unfiltered (file,
785 "gdbarch_dump: gdbarch_auxv_parse_p() = %d\n",
786 gdbarch_auxv_parse_p (gdbarch));
787 fprintf_unfiltered (file,
788 "gdbarch_dump: auxv_parse = <%s>\n",
789 host_address_to_string (gdbarch->auxv_parse));
790 fprintf_unfiltered (file,
791 "gdbarch_dump: gdbarch_ax_pseudo_register_collect_p() = %d\n",
792 gdbarch_ax_pseudo_register_collect_p (gdbarch));
793 fprintf_unfiltered (file,
794 "gdbarch_dump: ax_pseudo_register_collect = <%s>\n",
795 host_address_to_string (gdbarch->ax_pseudo_register_collect));
796 fprintf_unfiltered (file,
797 "gdbarch_dump: gdbarch_ax_pseudo_register_push_stack_p() = %d\n",
798 gdbarch_ax_pseudo_register_push_stack_p (gdbarch));
799 fprintf_unfiltered (file,
800 "gdbarch_dump: ax_pseudo_register_push_stack = <%s>\n",
801 host_address_to_string (gdbarch->ax_pseudo_register_push_stack));
802 fprintf_unfiltered (file,
803 "gdbarch_dump: believe_pcc_promotion = %s\n",
804 plongest (gdbarch->believe_pcc_promotion));
805 fprintf_unfiltered (file,
806 "gdbarch_dump: bfd_arch_info = %s\n",
807 gdbarch_bfd_arch_info (gdbarch)->printable_name);
808 fprintf_unfiltered (file,
809 "gdbarch_dump: bits_big_endian = %s\n",
810 plongest (gdbarch->bits_big_endian));
811 fprintf_unfiltered (file,
812 "gdbarch_dump: breakpoint_from_pc = <%s>\n",
813 host_address_to_string (gdbarch->breakpoint_from_pc));
814 fprintf_unfiltered (file,
815 "gdbarch_dump: breakpoint_kind_from_current_state = <%s>\n",
816 host_address_to_string (gdbarch->breakpoint_kind_from_current_state));
817 fprintf_unfiltered (file,
818 "gdbarch_dump: breakpoint_kind_from_pc = <%s>\n",
819 host_address_to_string (gdbarch->breakpoint_kind_from_pc));
820 fprintf_unfiltered (file,
821 "gdbarch_dump: byte_order = %s\n",
822 plongest (gdbarch->byte_order));
823 fprintf_unfiltered (file,
824 "gdbarch_dump: byte_order_for_code = %s\n",
825 plongest (gdbarch->byte_order_for_code));
826 fprintf_unfiltered (file,
827 "gdbarch_dump: call_dummy_location = %s\n",
828 plongest (gdbarch->call_dummy_location));
829 fprintf_unfiltered (file,
830 "gdbarch_dump: cannot_fetch_register = <%s>\n",
831 host_address_to_string (gdbarch->cannot_fetch_register));
832 fprintf_unfiltered (file,
833 "gdbarch_dump: cannot_step_breakpoint = %s\n",
834 plongest (gdbarch->cannot_step_breakpoint));
835 fprintf_unfiltered (file,
836 "gdbarch_dump: cannot_store_register = <%s>\n",
837 host_address_to_string (gdbarch->cannot_store_register));
838 fprintf_unfiltered (file,
839 "gdbarch_dump: char_signed = %s\n",
840 plongest (gdbarch->char_signed));
841 fprintf_unfiltered (file,
842 "gdbarch_dump: code_of_frame_writable = <%s>\n",
843 host_address_to_string (gdbarch->code_of_frame_writable));
844 fprintf_unfiltered (file,
845 "gdbarch_dump: coff_make_msymbol_special = <%s>\n",
846 host_address_to_string (gdbarch->coff_make_msymbol_special));
847 fprintf_unfiltered (file,
848 "gdbarch_dump: convert_from_func_ptr_addr = <%s>\n",
849 host_address_to_string (gdbarch->convert_from_func_ptr_addr));
850 fprintf_unfiltered (file,
851 "gdbarch_dump: convert_register_p = <%s>\n",
852 host_address_to_string (gdbarch->convert_register_p));
853 fprintf_unfiltered (file,
854 "gdbarch_dump: gdbarch_core_info_proc_p() = %d\n",
855 gdbarch_core_info_proc_p (gdbarch));
856 fprintf_unfiltered (file,
857 "gdbarch_dump: core_info_proc = <%s>\n",
858 host_address_to_string (gdbarch->core_info_proc));
859 fprintf_unfiltered (file,
860 "gdbarch_dump: gdbarch_core_pid_to_str_p() = %d\n",
861 gdbarch_core_pid_to_str_p (gdbarch));
862 fprintf_unfiltered (file,
863 "gdbarch_dump: core_pid_to_str = <%s>\n",
864 host_address_to_string (gdbarch->core_pid_to_str));
865 fprintf_unfiltered (file,
866 "gdbarch_dump: gdbarch_core_read_description_p() = %d\n",
867 gdbarch_core_read_description_p (gdbarch));
868 fprintf_unfiltered (file,
869 "gdbarch_dump: core_read_description = <%s>\n",
870 host_address_to_string (gdbarch->core_read_description));
871 fprintf_unfiltered (file,
872 "gdbarch_dump: gdbarch_core_thread_name_p() = %d\n",
873 gdbarch_core_thread_name_p (gdbarch));
874 fprintf_unfiltered (file,
875 "gdbarch_dump: core_thread_name = <%s>\n",
876 host_address_to_string (gdbarch->core_thread_name));
877 fprintf_unfiltered (file,
878 "gdbarch_dump: gdbarch_core_xfer_shared_libraries_p() = %d\n",
879 gdbarch_core_xfer_shared_libraries_p (gdbarch));
880 fprintf_unfiltered (file,
881 "gdbarch_dump: core_xfer_shared_libraries = <%s>\n",
882 host_address_to_string (gdbarch->core_xfer_shared_libraries));
883 fprintf_unfiltered (file,
884 "gdbarch_dump: gdbarch_core_xfer_shared_libraries_aix_p() = %d\n",
885 gdbarch_core_xfer_shared_libraries_aix_p (gdbarch));
886 fprintf_unfiltered (file,
887 "gdbarch_dump: core_xfer_shared_libraries_aix = <%s>\n",
888 host_address_to_string (gdbarch->core_xfer_shared_libraries_aix));
889 fprintf_unfiltered (file,
890 "gdbarch_dump: gdbarch_core_xfer_siginfo_p() = %d\n",
891 gdbarch_core_xfer_siginfo_p (gdbarch));
892 fprintf_unfiltered (file,
893 "gdbarch_dump: core_xfer_siginfo = <%s>\n",
894 host_address_to_string (gdbarch->core_xfer_siginfo));
895 fprintf_unfiltered (file,
896 "gdbarch_dump: decr_pc_after_break = %s\n",
897 core_addr_to_string_nz (gdbarch->decr_pc_after_break));
898 fprintf_unfiltered (file,
899 "gdbarch_dump: deprecated_fp_regnum = %s\n",
900 plongest (gdbarch->deprecated_fp_regnum));
901 fprintf_unfiltered (file,
902 "gdbarch_dump: deprecated_function_start_offset = %s\n",
903 core_addr_to_string_nz (gdbarch->deprecated_function_start_offset));
904 fprintf_unfiltered (file,
905 "gdbarch_dump: disassembler_options = %s\n",
906 pstring_ptr (gdbarch->disassembler_options));
907 fprintf_unfiltered (file,
908 "gdbarch_dump: gdbarch_displaced_step_copy_insn_p() = %d\n",
909 gdbarch_displaced_step_copy_insn_p (gdbarch));
910 fprintf_unfiltered (file,
911 "gdbarch_dump: displaced_step_copy_insn = <%s>\n",
912 host_address_to_string (gdbarch->displaced_step_copy_insn));
913 fprintf_unfiltered (file,
914 "gdbarch_dump: gdbarch_displaced_step_fixup_p() = %d\n",
915 gdbarch_displaced_step_fixup_p (gdbarch));
916 fprintf_unfiltered (file,
917 "gdbarch_dump: displaced_step_fixup = <%s>\n",
918 host_address_to_string (gdbarch->displaced_step_fixup));
919 fprintf_unfiltered (file,
920 "gdbarch_dump: displaced_step_hw_singlestep = <%s>\n",
921 host_address_to_string (gdbarch->displaced_step_hw_singlestep));
922 fprintf_unfiltered (file,
923 "gdbarch_dump: displaced_step_location = <%s>\n",
924 host_address_to_string (gdbarch->displaced_step_location));
925 fprintf_unfiltered (file,
926 "gdbarch_dump: double_bit = %s\n",
927 plongest (gdbarch->double_bit));
928 fprintf_unfiltered (file,
929 "gdbarch_dump: double_format = %s\n",
930 pformat (gdbarch->double_format));
931 fprintf_unfiltered (file,
932 "gdbarch_dump: gdbarch_dtrace_disable_probe_p() = %d\n",
933 gdbarch_dtrace_disable_probe_p (gdbarch));
934 fprintf_unfiltered (file,
935 "gdbarch_dump: dtrace_disable_probe = <%s>\n",
936 host_address_to_string (gdbarch->dtrace_disable_probe));
937 fprintf_unfiltered (file,
938 "gdbarch_dump: gdbarch_dtrace_enable_probe_p() = %d\n",
939 gdbarch_dtrace_enable_probe_p (gdbarch));
940 fprintf_unfiltered (file,
941 "gdbarch_dump: dtrace_enable_probe = <%s>\n",
942 host_address_to_string (gdbarch->dtrace_enable_probe));
943 fprintf_unfiltered (file,
944 "gdbarch_dump: gdbarch_dtrace_parse_probe_argument_p() = %d\n",
945 gdbarch_dtrace_parse_probe_argument_p (gdbarch));
946 fprintf_unfiltered (file,
947 "gdbarch_dump: dtrace_parse_probe_argument = <%s>\n",
948 host_address_to_string (gdbarch->dtrace_parse_probe_argument));
949 fprintf_unfiltered (file,
950 "gdbarch_dump: gdbarch_dtrace_probe_is_enabled_p() = %d\n",
951 gdbarch_dtrace_probe_is_enabled_p (gdbarch));
952 fprintf_unfiltered (file,
953 "gdbarch_dump: dtrace_probe_is_enabled = <%s>\n",
954 host_address_to_string (gdbarch->dtrace_probe_is_enabled));
955 fprintf_unfiltered (file,
956 "gdbarch_dump: gdbarch_dummy_id_p() = %d\n",
957 gdbarch_dummy_id_p (gdbarch));
958 fprintf_unfiltered (file,
959 "gdbarch_dump: dummy_id = <%s>\n",
960 host_address_to_string (gdbarch->dummy_id));
961 fprintf_unfiltered (file,
962 "gdbarch_dump: dwarf2_addr_size = %s\n",
963 plongest (gdbarch->dwarf2_addr_size));
964 fprintf_unfiltered (file,
965 "gdbarch_dump: dwarf2_reg_to_regnum = <%s>\n",
966 host_address_to_string (gdbarch->dwarf2_reg_to_regnum));
967 fprintf_unfiltered (file,
968 "gdbarch_dump: ecoff_reg_to_regnum = <%s>\n",
969 host_address_to_string (gdbarch->ecoff_reg_to_regnum));
970 fprintf_unfiltered (file,
971 "gdbarch_dump: gdbarch_elf_make_msymbol_special_p() = %d\n",
972 gdbarch_elf_make_msymbol_special_p (gdbarch));
973 fprintf_unfiltered (file,
974 "gdbarch_dump: elf_make_msymbol_special = <%s>\n",
975 host_address_to_string (gdbarch->elf_make_msymbol_special));
976 fprintf_unfiltered (file,
977 "gdbarch_dump: execute_dwarf_cfa_vendor_op = <%s>\n",
978 host_address_to_string (gdbarch->execute_dwarf_cfa_vendor_op));
979 fprintf_unfiltered (file,
980 "gdbarch_dump: fast_tracepoint_valid_at = <%s>\n",
981 host_address_to_string (gdbarch->fast_tracepoint_valid_at));
982 fprintf_unfiltered (file,
983 "gdbarch_dump: gdbarch_fetch_pointer_argument_p() = %d\n",
984 gdbarch_fetch_pointer_argument_p (gdbarch));
985 fprintf_unfiltered (file,
986 "gdbarch_dump: fetch_pointer_argument = <%s>\n",
987 host_address_to_string (gdbarch->fetch_pointer_argument));
988 fprintf_unfiltered (file,
989 "gdbarch_dump: gdbarch_fetch_tls_load_module_address_p() = %d\n",
990 gdbarch_fetch_tls_load_module_address_p (gdbarch));
991 fprintf_unfiltered (file,
992 "gdbarch_dump: fetch_tls_load_module_address = <%s>\n",
993 host_address_to_string (gdbarch->fetch_tls_load_module_address));
994 fprintf_unfiltered (file,
995 "gdbarch_dump: gdbarch_find_memory_regions_p() = %d\n",
996 gdbarch_find_memory_regions_p (gdbarch));
997 fprintf_unfiltered (file,
998 "gdbarch_dump: find_memory_regions = <%s>\n",
999 host_address_to_string (gdbarch->find_memory_regions));
1000 fprintf_unfiltered (file,
1001 "gdbarch_dump: float_bit = %s\n",
1002 plongest (gdbarch->float_bit));
1003 fprintf_unfiltered (file,
1004 "gdbarch_dump: float_format = %s\n",
1005 pformat (gdbarch->float_format));
1006 fprintf_unfiltered (file,
1007 "gdbarch_dump: floatformat_for_type = <%s>\n",
1008 host_address_to_string (gdbarch->floatformat_for_type));
1009 fprintf_unfiltered (file,
1010 "gdbarch_dump: fp0_regnum = %s\n",
1011 plongest (gdbarch->fp0_regnum));
1012 fprintf_unfiltered (file,
1013 "gdbarch_dump: gdbarch_frame_align_p() = %d\n",
1014 gdbarch_frame_align_p (gdbarch));
1015 fprintf_unfiltered (file,
1016 "gdbarch_dump: frame_align = <%s>\n",
1017 host_address_to_string (gdbarch->frame_align));
1018 fprintf_unfiltered (file,
1019 "gdbarch_dump: frame_args_skip = %s\n",
1020 core_addr_to_string_nz (gdbarch->frame_args_skip));
1021 fprintf_unfiltered (file,
1022 "gdbarch_dump: gdbarch_frame_num_args_p() = %d\n",
1023 gdbarch_frame_num_args_p (gdbarch));
1024 fprintf_unfiltered (file,
1025 "gdbarch_dump: frame_num_args = <%s>\n",
1026 host_address_to_string (gdbarch->frame_num_args));
1027 fprintf_unfiltered (file,
1028 "gdbarch_dump: frame_red_zone_size = %s\n",
1029 plongest (gdbarch->frame_red_zone_size));
1030 fprintf_unfiltered (file,
1031 "gdbarch_dump: gcc_target_options = <%s>\n",
1032 host_address_to_string (gdbarch->gcc_target_options));
1033 fprintf_unfiltered (file,
1034 "gdbarch_dump: gdbarch_gcore_bfd_target_p() = %d\n",
1035 gdbarch_gcore_bfd_target_p (gdbarch));
1036 fprintf_unfiltered (file,
1037 "gdbarch_dump: gcore_bfd_target = %s\n",
1038 pstring (gdbarch->gcore_bfd_target));
1039 fprintf_unfiltered (file,
1040 "gdbarch_dump: gdbarch_gdb_signal_from_target_p() = %d\n",
1041 gdbarch_gdb_signal_from_target_p (gdbarch));
1042 fprintf_unfiltered (file,
1043 "gdbarch_dump: gdb_signal_from_target = <%s>\n",
1044 host_address_to_string (gdbarch->gdb_signal_from_target));
1045 fprintf_unfiltered (file,
1046 "gdbarch_dump: gdbarch_gdb_signal_to_target_p() = %d\n",
1047 gdbarch_gdb_signal_to_target_p (gdbarch));
1048 fprintf_unfiltered (file,
1049 "gdbarch_dump: gdb_signal_to_target = <%s>\n",
1050 host_address_to_string (gdbarch->gdb_signal_to_target));
1051 fprintf_unfiltered (file,
1052 "gdbarch_dump: gen_return_address = <%s>\n",
1053 host_address_to_string (gdbarch->gen_return_address));
1054 fprintf_unfiltered (file,
1055 "gdbarch_dump: gdbarch_get_longjmp_target_p() = %d\n",
1056 gdbarch_get_longjmp_target_p (gdbarch));
1057 fprintf_unfiltered (file,
1058 "gdbarch_dump: get_longjmp_target = <%s>\n",
1059 host_address_to_string (gdbarch->get_longjmp_target));
1060 fprintf_unfiltered (file,
1061 "gdbarch_dump: gdbarch_get_siginfo_type_p() = %d\n",
1062 gdbarch_get_siginfo_type_p (gdbarch));
1063 fprintf_unfiltered (file,
1064 "gdbarch_dump: get_siginfo_type = <%s>\n",
1065 host_address_to_string (gdbarch->get_siginfo_type));
1066 fprintf_unfiltered (file,
1067 "gdbarch_dump: gdbarch_get_syscall_number_p() = %d\n",
1068 gdbarch_get_syscall_number_p (gdbarch));
1069 fprintf_unfiltered (file,
1070 "gdbarch_dump: get_syscall_number = <%s>\n",
1071 host_address_to_string (gdbarch->get_syscall_number));
1072 fprintf_unfiltered (file,
1073 "gdbarch_dump: gnu_triplet_regexp = <%s>\n",
1074 host_address_to_string (gdbarch->gnu_triplet_regexp));
1075 fprintf_unfiltered (file,
1076 "gdbarch_dump: guess_tracepoint_registers = <%s>\n",
1077 host_address_to_string (gdbarch->guess_tracepoint_registers));
1078 fprintf_unfiltered (file,
1079 "gdbarch_dump: half_bit = %s\n",
1080 plongest (gdbarch->half_bit));
1081 fprintf_unfiltered (file,
1082 "gdbarch_dump: half_format = %s\n",
1083 pformat (gdbarch->half_format));
1084 fprintf_unfiltered (file,
1085 "gdbarch_dump: gdbarch_handle_segmentation_fault_p() = %d\n",
1086 gdbarch_handle_segmentation_fault_p (gdbarch));
1087 fprintf_unfiltered (file,
1088 "gdbarch_dump: handle_segmentation_fault = <%s>\n",
1089 host_address_to_string (gdbarch->handle_segmentation_fault));
1090 fprintf_unfiltered (file,
1091 "gdbarch_dump: has_dos_based_file_system = %s\n",
1092 plongest (gdbarch->has_dos_based_file_system));
1093 fprintf_unfiltered (file,
1094 "gdbarch_dump: has_global_breakpoints = %s\n",
1095 plongest (gdbarch->has_global_breakpoints));
1096 fprintf_unfiltered (file,
1097 "gdbarch_dump: has_global_solist = %s\n",
1098 plongest (gdbarch->has_global_solist));
1099 fprintf_unfiltered (file,
1100 "gdbarch_dump: has_shared_address_space = <%s>\n",
1101 host_address_to_string (gdbarch->has_shared_address_space));
1102 fprintf_unfiltered (file,
1103 "gdbarch_dump: have_nonsteppable_watchpoint = %s\n",
1104 plongest (gdbarch->have_nonsteppable_watchpoint));
1105 fprintf_unfiltered (file,
1106 "gdbarch_dump: in_solib_return_trampoline = <%s>\n",
1107 host_address_to_string (gdbarch->in_solib_return_trampoline));
1108 fprintf_unfiltered (file,
1109 "gdbarch_dump: infcall_mmap = <%s>\n",
1110 host_address_to_string (gdbarch->infcall_mmap));
1111 fprintf_unfiltered (file,
1112 "gdbarch_dump: infcall_munmap = <%s>\n",
1113 host_address_to_string (gdbarch->infcall_munmap));
1114 fprintf_unfiltered (file,
1115 "gdbarch_dump: gdbarch_info_proc_p() = %d\n",
1116 gdbarch_info_proc_p (gdbarch));
1117 fprintf_unfiltered (file,
1118 "gdbarch_dump: info_proc = <%s>\n",
1119 host_address_to_string (gdbarch->info_proc));
1120 fprintf_unfiltered (file,
1121 "gdbarch_dump: inner_than = <%s>\n",
1122 host_address_to_string (gdbarch->inner_than));
1123 fprintf_unfiltered (file,
1124 "gdbarch_dump: insn_is_call = <%s>\n",
1125 host_address_to_string (gdbarch->insn_is_call));
1126 fprintf_unfiltered (file,
1127 "gdbarch_dump: insn_is_jump = <%s>\n",
1128 host_address_to_string (gdbarch->insn_is_jump));
1129 fprintf_unfiltered (file,
1130 "gdbarch_dump: insn_is_ret = <%s>\n",
1131 host_address_to_string (gdbarch->insn_is_ret));
1132 fprintf_unfiltered (file,
1133 "gdbarch_dump: int_bit = %s\n",
1134 plongest (gdbarch->int_bit));
1135 fprintf_unfiltered (file,
1136 "gdbarch_dump: gdbarch_integer_to_address_p() = %d\n",
1137 gdbarch_integer_to_address_p (gdbarch));
1138 fprintf_unfiltered (file,
1139 "gdbarch_dump: integer_to_address = <%s>\n",
1140 host_address_to_string (gdbarch->integer_to_address));
1141 fprintf_unfiltered (file,
1142 "gdbarch_dump: iterate_over_objfiles_in_search_order = <%s>\n",
1143 host_address_to_string (gdbarch->iterate_over_objfiles_in_search_order));
1144 fprintf_unfiltered (file,
1145 "gdbarch_dump: gdbarch_iterate_over_regset_sections_p() = %d\n",
1146 gdbarch_iterate_over_regset_sections_p (gdbarch));
1147 fprintf_unfiltered (file,
1148 "gdbarch_dump: iterate_over_regset_sections = <%s>\n",
1149 host_address_to_string (gdbarch->iterate_over_regset_sections));
1150 fprintf_unfiltered (file,
1151 "gdbarch_dump: long_bit = %s\n",
1152 plongest (gdbarch->long_bit));
1153 fprintf_unfiltered (file,
1154 "gdbarch_dump: long_double_bit = %s\n",
1155 plongest (gdbarch->long_double_bit));
1156 fprintf_unfiltered (file,
1157 "gdbarch_dump: long_double_format = %s\n",
1158 pformat (gdbarch->long_double_format));
1159 fprintf_unfiltered (file,
1160 "gdbarch_dump: long_long_align_bit = %s\n",
1161 plongest (gdbarch->long_long_align_bit));
1162 fprintf_unfiltered (file,
1163 "gdbarch_dump: long_long_bit = %s\n",
1164 plongest (gdbarch->long_long_bit));
1165 fprintf_unfiltered (file,
1166 "gdbarch_dump: gdbarch_make_corefile_notes_p() = %d\n",
1167 gdbarch_make_corefile_notes_p (gdbarch));
1168 fprintf_unfiltered (file,
1169 "gdbarch_dump: make_corefile_notes = <%s>\n",
1170 host_address_to_string (gdbarch->make_corefile_notes));
1171 fprintf_unfiltered (file,
1172 "gdbarch_dump: make_symbol_special = <%s>\n",
1173 host_address_to_string (gdbarch->make_symbol_special));
1174 fprintf_unfiltered (file,
1175 "gdbarch_dump: gdbarch_max_insn_length_p() = %d\n",
1176 gdbarch_max_insn_length_p (gdbarch));
1177 fprintf_unfiltered (file,
1178 "gdbarch_dump: max_insn_length = %s\n",
1179 plongest (gdbarch->max_insn_length));
1180 fprintf_unfiltered (file,
1181 "gdbarch_dump: memory_insert_breakpoint = <%s>\n",
1182 host_address_to_string (gdbarch->memory_insert_breakpoint));
1183 fprintf_unfiltered (file,
1184 "gdbarch_dump: memory_remove_breakpoint = <%s>\n",
1185 host_address_to_string (gdbarch->memory_remove_breakpoint));
1186 fprintf_unfiltered (file,
1187 "gdbarch_dump: num_pseudo_regs = %s\n",
1188 plongest (gdbarch->num_pseudo_regs));
1189 fprintf_unfiltered (file,
1190 "gdbarch_dump: num_regs = %s\n",
1191 plongest (gdbarch->num_regs));
1192 fprintf_unfiltered (file,
1193 "gdbarch_dump: osabi = %s\n",
1194 plongest (gdbarch->osabi));
1195 fprintf_unfiltered (file,
1196 "gdbarch_dump: gdbarch_overlay_update_p() = %d\n",
1197 gdbarch_overlay_update_p (gdbarch));
1198 fprintf_unfiltered (file,
1199 "gdbarch_dump: overlay_update = <%s>\n",
1200 host_address_to_string (gdbarch->overlay_update));
1201 fprintf_unfiltered (file,
1202 "gdbarch_dump: pc_regnum = %s\n",
1203 plongest (gdbarch->pc_regnum));
1204 fprintf_unfiltered (file,
1205 "gdbarch_dump: pointer_to_address = <%s>\n",
1206 host_address_to_string (gdbarch->pointer_to_address));
1207 fprintf_unfiltered (file,
1208 "gdbarch_dump: print_auxv_entry = <%s>\n",
1209 host_address_to_string (gdbarch->print_auxv_entry));
1210 fprintf_unfiltered (file,
1211 "gdbarch_dump: print_float_info = <%s>\n",
1212 host_address_to_string (gdbarch->print_float_info));
1213 fprintf_unfiltered (file,
1214 "gdbarch_dump: print_insn = <%s>\n",
1215 host_address_to_string (gdbarch->print_insn));
1216 fprintf_unfiltered (file,
1217 "gdbarch_dump: print_registers_info = <%s>\n",
1218 host_address_to_string (gdbarch->print_registers_info));
1219 fprintf_unfiltered (file,
1220 "gdbarch_dump: gdbarch_print_vector_info_p() = %d\n",
1221 gdbarch_print_vector_info_p (gdbarch));
1222 fprintf_unfiltered (file,
1223 "gdbarch_dump: print_vector_info = <%s>\n",
1224 host_address_to_string (gdbarch->print_vector_info));
1225 fprintf_unfiltered (file,
1226 "gdbarch_dump: gdbarch_process_record_p() = %d\n",
1227 gdbarch_process_record_p (gdbarch));
1228 fprintf_unfiltered (file,
1229 "gdbarch_dump: process_record = <%s>\n",
1230 host_address_to_string (gdbarch->process_record));
1231 fprintf_unfiltered (file,
1232 "gdbarch_dump: gdbarch_process_record_signal_p() = %d\n",
1233 gdbarch_process_record_signal_p (gdbarch));
1234 fprintf_unfiltered (file,
1235 "gdbarch_dump: process_record_signal = <%s>\n",
1236 host_address_to_string (gdbarch->process_record_signal));
1237 fprintf_unfiltered (file,
1238 "gdbarch_dump: ps_regnum = %s\n",
1239 plongest (gdbarch->ps_regnum));
1240 fprintf_unfiltered (file,
1241 "gdbarch_dump: gdbarch_pseudo_register_read_p() = %d\n",
1242 gdbarch_pseudo_register_read_p (gdbarch));
1243 fprintf_unfiltered (file,
1244 "gdbarch_dump: pseudo_register_read = <%s>\n",
1245 host_address_to_string (gdbarch->pseudo_register_read));
1246 fprintf_unfiltered (file,
1247 "gdbarch_dump: gdbarch_pseudo_register_read_value_p() = %d\n",
1248 gdbarch_pseudo_register_read_value_p (gdbarch));
1249 fprintf_unfiltered (file,
1250 "gdbarch_dump: pseudo_register_read_value = <%s>\n",
1251 host_address_to_string (gdbarch->pseudo_register_read_value));
1252 fprintf_unfiltered (file,
1253 "gdbarch_dump: gdbarch_pseudo_register_write_p() = %d\n",
1254 gdbarch_pseudo_register_write_p (gdbarch));
1255 fprintf_unfiltered (file,
1256 "gdbarch_dump: pseudo_register_write = <%s>\n",
1257 host_address_to_string (gdbarch->pseudo_register_write));
1258 fprintf_unfiltered (file,
1259 "gdbarch_dump: ptr_bit = %s\n",
1260 plongest (gdbarch->ptr_bit));
1261 fprintf_unfiltered (file,
1262 "gdbarch_dump: gdbarch_push_dummy_call_p() = %d\n",
1263 gdbarch_push_dummy_call_p (gdbarch));
1264 fprintf_unfiltered (file,
1265 "gdbarch_dump: push_dummy_call = <%s>\n",
1266 host_address_to_string (gdbarch->push_dummy_call));
1267 fprintf_unfiltered (file,
1268 "gdbarch_dump: gdbarch_push_dummy_code_p() = %d\n",
1269 gdbarch_push_dummy_code_p (gdbarch));
1270 fprintf_unfiltered (file,
1271 "gdbarch_dump: push_dummy_code = <%s>\n",
1272 host_address_to_string (gdbarch->push_dummy_code));
1273 fprintf_unfiltered (file,
1274 "gdbarch_dump: ravenscar_ops = %s\n",
1275 host_address_to_string (gdbarch->ravenscar_ops));
1276 fprintf_unfiltered (file,
1277 "gdbarch_dump: gdbarch_read_pc_p() = %d\n",
1278 gdbarch_read_pc_p (gdbarch));
1279 fprintf_unfiltered (file,
1280 "gdbarch_dump: read_pc = <%s>\n",
1281 host_address_to_string (gdbarch->read_pc));
1282 fprintf_unfiltered (file,
1283 "gdbarch_dump: gdbarch_record_special_symbol_p() = %d\n",
1284 gdbarch_record_special_symbol_p (gdbarch));
1285 fprintf_unfiltered (file,
1286 "gdbarch_dump: record_special_symbol = <%s>\n",
1287 host_address_to_string (gdbarch->record_special_symbol));
1288 fprintf_unfiltered (file,
1289 "gdbarch_dump: register_name = <%s>\n",
1290 host_address_to_string (gdbarch->register_name));
1291 fprintf_unfiltered (file,
1292 "gdbarch_dump: register_reggroup_p = <%s>\n",
1293 host_address_to_string (gdbarch->register_reggroup_p));
1294 fprintf_unfiltered (file,
1295 "gdbarch_dump: register_sim_regno = <%s>\n",
1296 host_address_to_string (gdbarch->register_sim_regno));
1297 fprintf_unfiltered (file,
1298 "gdbarch_dump: register_to_value = <%s>\n",
1299 host_address_to_string (gdbarch->register_to_value));
1300 fprintf_unfiltered (file,
1301 "gdbarch_dump: gdbarch_register_type_p() = %d\n",
1302 gdbarch_register_type_p (gdbarch));
1303 fprintf_unfiltered (file,
1304 "gdbarch_dump: register_type = <%s>\n",
1305 host_address_to_string (gdbarch->register_type));
1306 fprintf_unfiltered (file,
1307 "gdbarch_dump: gdbarch_relocate_instruction_p() = %d\n",
1308 gdbarch_relocate_instruction_p (gdbarch));
1309 fprintf_unfiltered (file,
1310 "gdbarch_dump: relocate_instruction = <%s>\n",
1311 host_address_to_string (gdbarch->relocate_instruction));
1312 fprintf_unfiltered (file,
1313 "gdbarch_dump: remote_register_number = <%s>\n",
1314 host_address_to_string (gdbarch->remote_register_number));
1315 fprintf_unfiltered (file,
1316 "gdbarch_dump: return_in_first_hidden_param_p = <%s>\n",
1317 host_address_to_string (gdbarch->return_in_first_hidden_param_p));
1318 fprintf_unfiltered (file,
1319 "gdbarch_dump: gdbarch_return_value_p() = %d\n",
1320 gdbarch_return_value_p (gdbarch));
1321 fprintf_unfiltered (file,
1322 "gdbarch_dump: return_value = <%s>\n",
1323 host_address_to_string (gdbarch->return_value));
1324 fprintf_unfiltered (file,
1325 "gdbarch_dump: sdb_reg_to_regnum = <%s>\n",
1326 host_address_to_string (gdbarch->sdb_reg_to_regnum));
1327 fprintf_unfiltered (file,
1328 "gdbarch_dump: short_bit = %s\n",
1329 plongest (gdbarch->short_bit));
1330 fprintf_unfiltered (file,
1331 "gdbarch_dump: significant_addr_bit = %s\n",
1332 plongest (gdbarch->significant_addr_bit));
1333 fprintf_unfiltered (file,
1334 "gdbarch_dump: gdbarch_single_step_through_delay_p() = %d\n",
1335 gdbarch_single_step_through_delay_p (gdbarch));
1336 fprintf_unfiltered (file,
1337 "gdbarch_dump: single_step_through_delay = <%s>\n",
1338 host_address_to_string (gdbarch->single_step_through_delay));
1339 fprintf_unfiltered (file,
1340 "gdbarch_dump: gdbarch_skip_entrypoint_p() = %d\n",
1341 gdbarch_skip_entrypoint_p (gdbarch));
1342 fprintf_unfiltered (file,
1343 "gdbarch_dump: skip_entrypoint = <%s>\n",
1344 host_address_to_string (gdbarch->skip_entrypoint));
1345 fprintf_unfiltered (file,
1346 "gdbarch_dump: gdbarch_skip_main_prologue_p() = %d\n",
1347 gdbarch_skip_main_prologue_p (gdbarch));
1348 fprintf_unfiltered (file,
1349 "gdbarch_dump: skip_main_prologue = <%s>\n",
1350 host_address_to_string (gdbarch->skip_main_prologue));
1351 fprintf_unfiltered (file,
1352 "gdbarch_dump: skip_permanent_breakpoint = <%s>\n",
1353 host_address_to_string (gdbarch->skip_permanent_breakpoint));
1354 fprintf_unfiltered (file,
1355 "gdbarch_dump: skip_prologue = <%s>\n",
1356 host_address_to_string (gdbarch->skip_prologue));
1357 fprintf_unfiltered (file,
1358 "gdbarch_dump: skip_solib_resolver = <%s>\n",
1359 host_address_to_string (gdbarch->skip_solib_resolver));
1360 fprintf_unfiltered (file,
1361 "gdbarch_dump: skip_trampoline_code = <%s>\n",
1362 host_address_to_string (gdbarch->skip_trampoline_code));
1363 fprintf_unfiltered (file,
1364 "gdbarch_dump: gdbarch_software_single_step_p() = %d\n",
1365 gdbarch_software_single_step_p (gdbarch));
1366 fprintf_unfiltered (file,
1367 "gdbarch_dump: software_single_step = <%s>\n",
1368 host_address_to_string (gdbarch->software_single_step));
1369 fprintf_unfiltered (file,
1370 "gdbarch_dump: sofun_address_maybe_missing = %s\n",
1371 plongest (gdbarch->sofun_address_maybe_missing));
1372 fprintf_unfiltered (file,
1373 "gdbarch_dump: solib_symbols_extension = %s\n",
1374 pstring (gdbarch->solib_symbols_extension));
1375 fprintf_unfiltered (file,
1376 "gdbarch_dump: sp_regnum = %s\n",
1377 plongest (gdbarch->sp_regnum));
1378 fprintf_unfiltered (file,
1379 "gdbarch_dump: stab_reg_to_regnum = <%s>\n",
1380 host_address_to_string (gdbarch->stab_reg_to_regnum));
1381 fprintf_unfiltered (file,
1382 "gdbarch_dump: stabs_argument_has_addr = <%s>\n",
1383 host_address_to_string (gdbarch->stabs_argument_has_addr));
1384 fprintf_unfiltered (file,
1385 "gdbarch_dump: stack_frame_destroyed_p = <%s>\n",
1386 host_address_to_string (gdbarch->stack_frame_destroyed_p));
1387 fprintf_unfiltered (file,
1388 "gdbarch_dump: stap_gdb_register_prefix = %s\n",
1389 pstring (gdbarch->stap_gdb_register_prefix));
1390 fprintf_unfiltered (file,
1391 "gdbarch_dump: stap_gdb_register_suffix = %s\n",
1392 pstring (gdbarch->stap_gdb_register_suffix));
1393 fprintf_unfiltered (file,
1394 "gdbarch_dump: stap_integer_prefixes = %s\n",
1395 pstring_list (gdbarch->stap_integer_prefixes));
1396 fprintf_unfiltered (file,
1397 "gdbarch_dump: stap_integer_suffixes = %s\n",
1398 pstring_list (gdbarch->stap_integer_suffixes));
1399 fprintf_unfiltered (file,
1400 "gdbarch_dump: gdbarch_stap_is_single_operand_p() = %d\n",
1401 gdbarch_stap_is_single_operand_p (gdbarch));
1402 fprintf_unfiltered (file,
1403 "gdbarch_dump: stap_is_single_operand = <%s>\n",
1404 host_address_to_string (gdbarch->stap_is_single_operand));
1405 fprintf_unfiltered (file,
1406 "gdbarch_dump: gdbarch_stap_parse_special_token_p() = %d\n",
1407 gdbarch_stap_parse_special_token_p (gdbarch));
1408 fprintf_unfiltered (file,
1409 "gdbarch_dump: stap_parse_special_token = <%s>\n",
1410 host_address_to_string (gdbarch->stap_parse_special_token));
1411 fprintf_unfiltered (file,
1412 "gdbarch_dump: stap_register_indirection_prefixes = %s\n",
1413 pstring_list (gdbarch->stap_register_indirection_prefixes));
1414 fprintf_unfiltered (file,
1415 "gdbarch_dump: stap_register_indirection_suffixes = %s\n",
1416 pstring_list (gdbarch->stap_register_indirection_suffixes));
1417 fprintf_unfiltered (file,
1418 "gdbarch_dump: stap_register_prefixes = %s\n",
1419 pstring_list (gdbarch->stap_register_prefixes));
1420 fprintf_unfiltered (file,
1421 "gdbarch_dump: stap_register_suffixes = %s\n",
1422 pstring_list (gdbarch->stap_register_suffixes));
1423 fprintf_unfiltered (file,
1424 "gdbarch_dump: gdbarch_static_transform_name_p() = %d\n",
1425 gdbarch_static_transform_name_p (gdbarch));
1426 fprintf_unfiltered (file,
1427 "gdbarch_dump: static_transform_name = <%s>\n",
1428 host_address_to_string (gdbarch->static_transform_name));
1429 fprintf_unfiltered (file,
1430 "gdbarch_dump: sw_breakpoint_from_kind = <%s>\n",
1431 host_address_to_string (gdbarch->sw_breakpoint_from_kind));
1432 fprintf_unfiltered (file,
1433 "gdbarch_dump: syscalls_info = %s\n",
1434 host_address_to_string (gdbarch->syscalls_info));
1435 fprintf_unfiltered (file,
1436 "gdbarch_dump: target_desc = %s\n",
1437 host_address_to_string (gdbarch->target_desc));
1438 fprintf_unfiltered (file,
1439 "gdbarch_dump: gdbarch_unwind_pc_p() = %d\n",
1440 gdbarch_unwind_pc_p (gdbarch));
1441 fprintf_unfiltered (file,
1442 "gdbarch_dump: unwind_pc = <%s>\n",
1443 host_address_to_string (gdbarch->unwind_pc));
1444 fprintf_unfiltered (file,
1445 "gdbarch_dump: gdbarch_unwind_sp_p() = %d\n",
1446 gdbarch_unwind_sp_p (gdbarch));
1447 fprintf_unfiltered (file,
1448 "gdbarch_dump: unwind_sp = <%s>\n",
1449 host_address_to_string (gdbarch->unwind_sp));
1450 fprintf_unfiltered (file,
1451 "gdbarch_dump: valid_disassembler_options = %s\n",
1452 host_address_to_string (gdbarch->valid_disassembler_options));
1453 fprintf_unfiltered (file,
1454 "gdbarch_dump: value_from_register = <%s>\n",
1455 host_address_to_string (gdbarch->value_from_register));
1456 fprintf_unfiltered (file,
1457 "gdbarch_dump: value_to_register = <%s>\n",
1458 host_address_to_string (gdbarch->value_to_register));
1459 fprintf_unfiltered (file,
1460 "gdbarch_dump: vbit_in_delta = %s\n",
1461 plongest (gdbarch->vbit_in_delta));
1462 fprintf_unfiltered (file,
1463 "gdbarch_dump: virtual_frame_pointer = <%s>\n",
1464 host_address_to_string (gdbarch->virtual_frame_pointer));
1465 fprintf_unfiltered (file,
1466 "gdbarch_dump: vsyscall_range = <%s>\n",
1467 host_address_to_string (gdbarch->vsyscall_range));
1468 fprintf_unfiltered (file,
1469 "gdbarch_dump: vtable_function_descriptors = %s\n",
1470 plongest (gdbarch->vtable_function_descriptors));
1471 fprintf_unfiltered (file,
1472 "gdbarch_dump: wchar_bit = %s\n",
1473 plongest (gdbarch->wchar_bit));
1474 fprintf_unfiltered (file,
1475 "gdbarch_dump: wchar_signed = %s\n",
1476 plongest (gdbarch->wchar_signed));
1477 fprintf_unfiltered (file,
1478 "gdbarch_dump: gdbarch_write_pc_p() = %d\n",
1479 gdbarch_write_pc_p (gdbarch));
1480 fprintf_unfiltered (file,
1481 "gdbarch_dump: write_pc = <%s>\n",
1482 host_address_to_string (gdbarch->write_pc));
1483 fprintf_unfiltered (file,
1484 "gdbarch_dump: xml_syscall_file = %s\n",
1485 pstring (gdbarch->xml_syscall_file));
1486 if (gdbarch->dump_tdep != NULL)
1487 gdbarch->dump_tdep (gdbarch, file);
1490 struct gdbarch_tdep *
1491 gdbarch_tdep (struct gdbarch *gdbarch)
1493 if (gdbarch_debug >= 2)
1494 fprintf_unfiltered (gdb_stdlog, "gdbarch_tdep called\n");
1495 return gdbarch->tdep;
1499 const struct bfd_arch_info *
1500 gdbarch_bfd_arch_info (struct gdbarch *gdbarch)
1502 gdb_assert (gdbarch != NULL);
1503 if (gdbarch_debug >= 2)
1504 fprintf_unfiltered (gdb_stdlog, "gdbarch_bfd_arch_info called\n");
1505 return gdbarch->bfd_arch_info;
1509 gdbarch_byte_order (struct gdbarch *gdbarch)
1511 gdb_assert (gdbarch != NULL);
1512 if (gdbarch_debug >= 2)
1513 fprintf_unfiltered (gdb_stdlog, "gdbarch_byte_order called\n");
1514 return gdbarch->byte_order;
1518 gdbarch_byte_order_for_code (struct gdbarch *gdbarch)
1520 gdb_assert (gdbarch != NULL);
1521 if (gdbarch_debug >= 2)
1522 fprintf_unfiltered (gdb_stdlog, "gdbarch_byte_order_for_code called\n");
1523 return gdbarch->byte_order_for_code;
1527 gdbarch_osabi (struct gdbarch *gdbarch)
1529 gdb_assert (gdbarch != NULL);
1530 if (gdbarch_debug >= 2)
1531 fprintf_unfiltered (gdb_stdlog, "gdbarch_osabi called\n");
1532 return gdbarch->osabi;
1535 const struct target_desc *
1536 gdbarch_target_desc (struct gdbarch *gdbarch)
1538 gdb_assert (gdbarch != NULL);
1539 if (gdbarch_debug >= 2)
1540 fprintf_unfiltered (gdb_stdlog, "gdbarch_target_desc called\n");
1541 return gdbarch->target_desc;
1545 gdbarch_bits_big_endian (struct gdbarch *gdbarch)
1547 gdb_assert (gdbarch != NULL);
1548 /* Skip verify of bits_big_endian, invalid_p == 0 */
1549 if (gdbarch_debug >= 2)
1550 fprintf_unfiltered (gdb_stdlog, "gdbarch_bits_big_endian called\n");
1551 return gdbarch->bits_big_endian;
1555 set_gdbarch_bits_big_endian (struct gdbarch *gdbarch,
1556 int bits_big_endian)
1558 gdbarch->bits_big_endian = bits_big_endian;
1562 gdbarch_short_bit (struct gdbarch *gdbarch)
1564 gdb_assert (gdbarch != NULL);
1565 /* Skip verify of short_bit, invalid_p == 0 */
1566 if (gdbarch_debug >= 2)
1567 fprintf_unfiltered (gdb_stdlog, "gdbarch_short_bit called\n");
1568 return gdbarch->short_bit;
1572 set_gdbarch_short_bit (struct gdbarch *gdbarch,
1575 gdbarch->short_bit = short_bit;
1579 gdbarch_int_bit (struct gdbarch *gdbarch)
1581 gdb_assert (gdbarch != NULL);
1582 /* Skip verify of int_bit, invalid_p == 0 */
1583 if (gdbarch_debug >= 2)
1584 fprintf_unfiltered (gdb_stdlog, "gdbarch_int_bit called\n");
1585 return gdbarch->int_bit;
1589 set_gdbarch_int_bit (struct gdbarch *gdbarch,
1592 gdbarch->int_bit = int_bit;
1596 gdbarch_long_bit (struct gdbarch *gdbarch)
1598 gdb_assert (gdbarch != NULL);
1599 /* Skip verify of long_bit, invalid_p == 0 */
1600 if (gdbarch_debug >= 2)
1601 fprintf_unfiltered (gdb_stdlog, "gdbarch_long_bit called\n");
1602 return gdbarch->long_bit;
1606 set_gdbarch_long_bit (struct gdbarch *gdbarch,
1609 gdbarch->long_bit = long_bit;
1613 gdbarch_long_long_bit (struct gdbarch *gdbarch)
1615 gdb_assert (gdbarch != NULL);
1616 /* Skip verify of long_long_bit, invalid_p == 0 */
1617 if (gdbarch_debug >= 2)
1618 fprintf_unfiltered (gdb_stdlog, "gdbarch_long_long_bit called\n");
1619 return gdbarch->long_long_bit;
1623 set_gdbarch_long_long_bit (struct gdbarch *gdbarch,
1626 gdbarch->long_long_bit = long_long_bit;
1630 gdbarch_long_long_align_bit (struct gdbarch *gdbarch)
1632 gdb_assert (gdbarch != NULL);
1633 /* Skip verify of long_long_align_bit, invalid_p == 0 */
1634 if (gdbarch_debug >= 2)
1635 fprintf_unfiltered (gdb_stdlog, "gdbarch_long_long_align_bit called\n");
1636 return gdbarch->long_long_align_bit;
1640 set_gdbarch_long_long_align_bit (struct gdbarch *gdbarch,
1641 int long_long_align_bit)
1643 gdbarch->long_long_align_bit = long_long_align_bit;
1647 gdbarch_half_bit (struct gdbarch *gdbarch)
1649 gdb_assert (gdbarch != NULL);
1650 /* Skip verify of half_bit, invalid_p == 0 */
1651 if (gdbarch_debug >= 2)
1652 fprintf_unfiltered (gdb_stdlog, "gdbarch_half_bit called\n");
1653 return gdbarch->half_bit;
1657 set_gdbarch_half_bit (struct gdbarch *gdbarch,
1660 gdbarch->half_bit = half_bit;
1663 const struct floatformat **
1664 gdbarch_half_format (struct gdbarch *gdbarch)
1666 gdb_assert (gdbarch != NULL);
1667 if (gdbarch_debug >= 2)
1668 fprintf_unfiltered (gdb_stdlog, "gdbarch_half_format called\n");
1669 return gdbarch->half_format;
1673 set_gdbarch_half_format (struct gdbarch *gdbarch,
1674 const struct floatformat ** half_format)
1676 gdbarch->half_format = half_format;
1680 gdbarch_float_bit (struct gdbarch *gdbarch)
1682 gdb_assert (gdbarch != NULL);
1683 /* Skip verify of float_bit, invalid_p == 0 */
1684 if (gdbarch_debug >= 2)
1685 fprintf_unfiltered (gdb_stdlog, "gdbarch_float_bit called\n");
1686 return gdbarch->float_bit;
1690 set_gdbarch_float_bit (struct gdbarch *gdbarch,
1693 gdbarch->float_bit = float_bit;
1696 const struct floatformat **
1697 gdbarch_float_format (struct gdbarch *gdbarch)
1699 gdb_assert (gdbarch != NULL);
1700 if (gdbarch_debug >= 2)
1701 fprintf_unfiltered (gdb_stdlog, "gdbarch_float_format called\n");
1702 return gdbarch->float_format;
1706 set_gdbarch_float_format (struct gdbarch *gdbarch,
1707 const struct floatformat ** float_format)
1709 gdbarch->float_format = float_format;
1713 gdbarch_double_bit (struct gdbarch *gdbarch)
1715 gdb_assert (gdbarch != NULL);
1716 /* Skip verify of double_bit, invalid_p == 0 */
1717 if (gdbarch_debug >= 2)
1718 fprintf_unfiltered (gdb_stdlog, "gdbarch_double_bit called\n");
1719 return gdbarch->double_bit;
1723 set_gdbarch_double_bit (struct gdbarch *gdbarch,
1726 gdbarch->double_bit = double_bit;
1729 const struct floatformat **
1730 gdbarch_double_format (struct gdbarch *gdbarch)
1732 gdb_assert (gdbarch != NULL);
1733 if (gdbarch_debug >= 2)
1734 fprintf_unfiltered (gdb_stdlog, "gdbarch_double_format called\n");
1735 return gdbarch->double_format;
1739 set_gdbarch_double_format (struct gdbarch *gdbarch,
1740 const struct floatformat ** double_format)
1742 gdbarch->double_format = double_format;
1746 gdbarch_long_double_bit (struct gdbarch *gdbarch)
1748 gdb_assert (gdbarch != NULL);
1749 /* Skip verify of long_double_bit, invalid_p == 0 */
1750 if (gdbarch_debug >= 2)
1751 fprintf_unfiltered (gdb_stdlog, "gdbarch_long_double_bit called\n");
1752 return gdbarch->long_double_bit;
1756 set_gdbarch_long_double_bit (struct gdbarch *gdbarch,
1757 int long_double_bit)
1759 gdbarch->long_double_bit = long_double_bit;
1762 const struct floatformat **
1763 gdbarch_long_double_format (struct gdbarch *gdbarch)
1765 gdb_assert (gdbarch != NULL);
1766 if (gdbarch_debug >= 2)
1767 fprintf_unfiltered (gdb_stdlog, "gdbarch_long_double_format called\n");
1768 return gdbarch->long_double_format;
1772 set_gdbarch_long_double_format (struct gdbarch *gdbarch,
1773 const struct floatformat ** long_double_format)
1775 gdbarch->long_double_format = long_double_format;
1779 gdbarch_wchar_bit (struct gdbarch *gdbarch)
1781 gdb_assert (gdbarch != NULL);
1782 /* Skip verify of wchar_bit, invalid_p == 0 */
1783 if (gdbarch_debug >= 2)
1784 fprintf_unfiltered (gdb_stdlog, "gdbarch_wchar_bit called\n");
1785 return gdbarch->wchar_bit;
1789 set_gdbarch_wchar_bit (struct gdbarch *gdbarch,
1792 gdbarch->wchar_bit = wchar_bit;
1796 gdbarch_wchar_signed (struct gdbarch *gdbarch)
1798 gdb_assert (gdbarch != NULL);
1799 /* Check variable changed from pre-default. */
1800 gdb_assert (gdbarch->wchar_signed != -1);
1801 if (gdbarch_debug >= 2)
1802 fprintf_unfiltered (gdb_stdlog, "gdbarch_wchar_signed called\n");
1803 return gdbarch->wchar_signed;
1807 set_gdbarch_wchar_signed (struct gdbarch *gdbarch,
1810 gdbarch->wchar_signed = wchar_signed;
1813 const struct floatformat **
1814 gdbarch_floatformat_for_type (struct gdbarch *gdbarch, const char *name, int length)
1816 gdb_assert (gdbarch != NULL);
1817 gdb_assert (gdbarch->floatformat_for_type != NULL);
1818 if (gdbarch_debug >= 2)
1819 fprintf_unfiltered (gdb_stdlog, "gdbarch_floatformat_for_type called\n");
1820 return gdbarch->floatformat_for_type (gdbarch, name, length);
1824 set_gdbarch_floatformat_for_type (struct gdbarch *gdbarch,
1825 gdbarch_floatformat_for_type_ftype floatformat_for_type)
1827 gdbarch->floatformat_for_type = floatformat_for_type;
1831 gdbarch_ptr_bit (struct gdbarch *gdbarch)
1833 gdb_assert (gdbarch != NULL);
1834 /* Skip verify of ptr_bit, invalid_p == 0 */
1835 if (gdbarch_debug >= 2)
1836 fprintf_unfiltered (gdb_stdlog, "gdbarch_ptr_bit called\n");
1837 return gdbarch->ptr_bit;
1841 set_gdbarch_ptr_bit (struct gdbarch *gdbarch,
1844 gdbarch->ptr_bit = ptr_bit;
1848 gdbarch_addr_bit (struct gdbarch *gdbarch)
1850 gdb_assert (gdbarch != NULL);
1851 /* Check variable changed from pre-default. */
1852 gdb_assert (gdbarch->addr_bit != 0);
1853 if (gdbarch_debug >= 2)
1854 fprintf_unfiltered (gdb_stdlog, "gdbarch_addr_bit called\n");
1855 return gdbarch->addr_bit;
1859 set_gdbarch_addr_bit (struct gdbarch *gdbarch,
1862 gdbarch->addr_bit = addr_bit;
1866 gdbarch_dwarf2_addr_size (struct gdbarch *gdbarch)
1868 gdb_assert (gdbarch != NULL);
1869 /* Check variable changed from pre-default. */
1870 gdb_assert (gdbarch->dwarf2_addr_size != 0);
1871 if (gdbarch_debug >= 2)
1872 fprintf_unfiltered (gdb_stdlog, "gdbarch_dwarf2_addr_size called\n");
1873 return gdbarch->dwarf2_addr_size;
1877 set_gdbarch_dwarf2_addr_size (struct gdbarch *gdbarch,
1878 int dwarf2_addr_size)
1880 gdbarch->dwarf2_addr_size = dwarf2_addr_size;
1884 gdbarch_char_signed (struct gdbarch *gdbarch)
1886 gdb_assert (gdbarch != NULL);
1887 /* Check variable changed from pre-default. */
1888 gdb_assert (gdbarch->char_signed != -1);
1889 if (gdbarch_debug >= 2)
1890 fprintf_unfiltered (gdb_stdlog, "gdbarch_char_signed called\n");
1891 return gdbarch->char_signed;
1895 set_gdbarch_char_signed (struct gdbarch *gdbarch,
1898 gdbarch->char_signed = char_signed;
1902 gdbarch_read_pc_p (struct gdbarch *gdbarch)
1904 gdb_assert (gdbarch != NULL);
1905 return gdbarch->read_pc != NULL;
1909 gdbarch_read_pc (struct gdbarch *gdbarch, struct regcache *regcache)
1911 gdb_assert (gdbarch != NULL);
1912 gdb_assert (gdbarch->read_pc != NULL);
1913 if (gdbarch_debug >= 2)
1914 fprintf_unfiltered (gdb_stdlog, "gdbarch_read_pc called\n");
1915 return gdbarch->read_pc (regcache);
1919 set_gdbarch_read_pc (struct gdbarch *gdbarch,
1920 gdbarch_read_pc_ftype read_pc)
1922 gdbarch->read_pc = read_pc;
1926 gdbarch_write_pc_p (struct gdbarch *gdbarch)
1928 gdb_assert (gdbarch != NULL);
1929 return gdbarch->write_pc != NULL;
1933 gdbarch_write_pc (struct gdbarch *gdbarch, struct regcache *regcache, CORE_ADDR val)
1935 gdb_assert (gdbarch != NULL);
1936 gdb_assert (gdbarch->write_pc != NULL);
1937 if (gdbarch_debug >= 2)
1938 fprintf_unfiltered (gdb_stdlog, "gdbarch_write_pc called\n");
1939 gdbarch->write_pc (regcache, val);
1943 set_gdbarch_write_pc (struct gdbarch *gdbarch,
1944 gdbarch_write_pc_ftype write_pc)
1946 gdbarch->write_pc = write_pc;
1950 gdbarch_virtual_frame_pointer (struct gdbarch *gdbarch, CORE_ADDR pc, int *frame_regnum, LONGEST *frame_offset)
1952 gdb_assert (gdbarch != NULL);
1953 gdb_assert (gdbarch->virtual_frame_pointer != NULL);
1954 if (gdbarch_debug >= 2)
1955 fprintf_unfiltered (gdb_stdlog, "gdbarch_virtual_frame_pointer called\n");
1956 gdbarch->virtual_frame_pointer (gdbarch, pc, frame_regnum, frame_offset);
1960 set_gdbarch_virtual_frame_pointer (struct gdbarch *gdbarch,
1961 gdbarch_virtual_frame_pointer_ftype virtual_frame_pointer)
1963 gdbarch->virtual_frame_pointer = virtual_frame_pointer;
1967 gdbarch_pseudo_register_read_p (struct gdbarch *gdbarch)
1969 gdb_assert (gdbarch != NULL);
1970 return gdbarch->pseudo_register_read != NULL;
1973 enum register_status
1974 gdbarch_pseudo_register_read (struct gdbarch *gdbarch, struct regcache *regcache, int cookednum, gdb_byte *buf)
1976 gdb_assert (gdbarch != NULL);
1977 gdb_assert (gdbarch->pseudo_register_read != NULL);
1978 if (gdbarch_debug >= 2)
1979 fprintf_unfiltered (gdb_stdlog, "gdbarch_pseudo_register_read called\n");
1980 return gdbarch->pseudo_register_read (gdbarch, regcache, cookednum, buf);
1984 set_gdbarch_pseudo_register_read (struct gdbarch *gdbarch,
1985 gdbarch_pseudo_register_read_ftype pseudo_register_read)
1987 gdbarch->pseudo_register_read = pseudo_register_read;
1991 gdbarch_pseudo_register_read_value_p (struct gdbarch *gdbarch)
1993 gdb_assert (gdbarch != NULL);
1994 return gdbarch->pseudo_register_read_value != NULL;
1998 gdbarch_pseudo_register_read_value (struct gdbarch *gdbarch, struct regcache *regcache, int cookednum)
2000 gdb_assert (gdbarch != NULL);
2001 gdb_assert (gdbarch->pseudo_register_read_value != NULL);
2002 if (gdbarch_debug >= 2)
2003 fprintf_unfiltered (gdb_stdlog, "gdbarch_pseudo_register_read_value called\n");
2004 return gdbarch->pseudo_register_read_value (gdbarch, regcache, cookednum);
2008 set_gdbarch_pseudo_register_read_value (struct gdbarch *gdbarch,
2009 gdbarch_pseudo_register_read_value_ftype pseudo_register_read_value)
2011 gdbarch->pseudo_register_read_value = pseudo_register_read_value;
2015 gdbarch_pseudo_register_write_p (struct gdbarch *gdbarch)
2017 gdb_assert (gdbarch != NULL);
2018 return gdbarch->pseudo_register_write != NULL;
2022 gdbarch_pseudo_register_write (struct gdbarch *gdbarch, struct regcache *regcache, int cookednum, const gdb_byte *buf)
2024 gdb_assert (gdbarch != NULL);
2025 gdb_assert (gdbarch->pseudo_register_write != NULL);
2026 if (gdbarch_debug >= 2)
2027 fprintf_unfiltered (gdb_stdlog, "gdbarch_pseudo_register_write called\n");
2028 gdbarch->pseudo_register_write (gdbarch, regcache, cookednum, buf);
2032 set_gdbarch_pseudo_register_write (struct gdbarch *gdbarch,
2033 gdbarch_pseudo_register_write_ftype pseudo_register_write)
2035 gdbarch->pseudo_register_write = pseudo_register_write;
2039 gdbarch_num_regs (struct gdbarch *gdbarch)
2041 gdb_assert (gdbarch != NULL);
2042 /* Check variable changed from pre-default. */
2043 gdb_assert (gdbarch->num_regs != -1);
2044 if (gdbarch_debug >= 2)
2045 fprintf_unfiltered (gdb_stdlog, "gdbarch_num_regs called\n");
2046 return gdbarch->num_regs;
2050 set_gdbarch_num_regs (struct gdbarch *gdbarch,
2053 gdbarch->num_regs = num_regs;
2057 gdbarch_num_pseudo_regs (struct gdbarch *gdbarch)
2059 gdb_assert (gdbarch != NULL);
2060 /* Skip verify of num_pseudo_regs, invalid_p == 0 */
2061 if (gdbarch_debug >= 2)
2062 fprintf_unfiltered (gdb_stdlog, "gdbarch_num_pseudo_regs called\n");
2063 return gdbarch->num_pseudo_regs;
2067 set_gdbarch_num_pseudo_regs (struct gdbarch *gdbarch,
2068 int num_pseudo_regs)
2070 gdbarch->num_pseudo_regs = num_pseudo_regs;
2074 gdbarch_ax_pseudo_register_collect_p (struct gdbarch *gdbarch)
2076 gdb_assert (gdbarch != NULL);
2077 return gdbarch->ax_pseudo_register_collect != NULL;
2081 gdbarch_ax_pseudo_register_collect (struct gdbarch *gdbarch, struct agent_expr *ax, int reg)
2083 gdb_assert (gdbarch != NULL);
2084 gdb_assert (gdbarch->ax_pseudo_register_collect != NULL);
2085 if (gdbarch_debug >= 2)
2086 fprintf_unfiltered (gdb_stdlog, "gdbarch_ax_pseudo_register_collect called\n");
2087 return gdbarch->ax_pseudo_register_collect (gdbarch, ax, reg);
2091 set_gdbarch_ax_pseudo_register_collect (struct gdbarch *gdbarch,
2092 gdbarch_ax_pseudo_register_collect_ftype ax_pseudo_register_collect)
2094 gdbarch->ax_pseudo_register_collect = ax_pseudo_register_collect;
2098 gdbarch_ax_pseudo_register_push_stack_p (struct gdbarch *gdbarch)
2100 gdb_assert (gdbarch != NULL);
2101 return gdbarch->ax_pseudo_register_push_stack != NULL;
2105 gdbarch_ax_pseudo_register_push_stack (struct gdbarch *gdbarch, struct agent_expr *ax, int reg)
2107 gdb_assert (gdbarch != NULL);
2108 gdb_assert (gdbarch->ax_pseudo_register_push_stack != NULL);
2109 if (gdbarch_debug >= 2)
2110 fprintf_unfiltered (gdb_stdlog, "gdbarch_ax_pseudo_register_push_stack called\n");
2111 return gdbarch->ax_pseudo_register_push_stack (gdbarch, ax, reg);
2115 set_gdbarch_ax_pseudo_register_push_stack (struct gdbarch *gdbarch,
2116 gdbarch_ax_pseudo_register_push_stack_ftype ax_pseudo_register_push_stack)
2118 gdbarch->ax_pseudo_register_push_stack = ax_pseudo_register_push_stack;
2122 gdbarch_handle_segmentation_fault_p (struct gdbarch *gdbarch)
2124 gdb_assert (gdbarch != NULL);
2125 return gdbarch->handle_segmentation_fault != NULL;
2129 gdbarch_handle_segmentation_fault (struct gdbarch *gdbarch, struct ui_out *uiout)
2131 gdb_assert (gdbarch != NULL);
2132 gdb_assert (gdbarch->handle_segmentation_fault != NULL);
2133 if (gdbarch_debug >= 2)
2134 fprintf_unfiltered (gdb_stdlog, "gdbarch_handle_segmentation_fault called\n");
2135 gdbarch->handle_segmentation_fault (gdbarch, uiout);
2139 set_gdbarch_handle_segmentation_fault (struct gdbarch *gdbarch,
2140 gdbarch_handle_segmentation_fault_ftype handle_segmentation_fault)
2142 gdbarch->handle_segmentation_fault = handle_segmentation_fault;
2146 gdbarch_sp_regnum (struct gdbarch *gdbarch)
2148 gdb_assert (gdbarch != NULL);
2149 /* Skip verify of sp_regnum, invalid_p == 0 */
2150 if (gdbarch_debug >= 2)
2151 fprintf_unfiltered (gdb_stdlog, "gdbarch_sp_regnum called\n");
2152 return gdbarch->sp_regnum;
2156 set_gdbarch_sp_regnum (struct gdbarch *gdbarch,
2159 gdbarch->sp_regnum = sp_regnum;
2163 gdbarch_pc_regnum (struct gdbarch *gdbarch)
2165 gdb_assert (gdbarch != NULL);
2166 /* Skip verify of pc_regnum, invalid_p == 0 */
2167 if (gdbarch_debug >= 2)
2168 fprintf_unfiltered (gdb_stdlog, "gdbarch_pc_regnum called\n");
2169 return gdbarch->pc_regnum;
2173 set_gdbarch_pc_regnum (struct gdbarch *gdbarch,
2176 gdbarch->pc_regnum = pc_regnum;
2180 gdbarch_ps_regnum (struct gdbarch *gdbarch)
2182 gdb_assert (gdbarch != NULL);
2183 /* Skip verify of ps_regnum, invalid_p == 0 */
2184 if (gdbarch_debug >= 2)
2185 fprintf_unfiltered (gdb_stdlog, "gdbarch_ps_regnum called\n");
2186 return gdbarch->ps_regnum;
2190 set_gdbarch_ps_regnum (struct gdbarch *gdbarch,
2193 gdbarch->ps_regnum = ps_regnum;
2197 gdbarch_fp0_regnum (struct gdbarch *gdbarch)
2199 gdb_assert (gdbarch != NULL);
2200 /* Skip verify of fp0_regnum, invalid_p == 0 */
2201 if (gdbarch_debug >= 2)
2202 fprintf_unfiltered (gdb_stdlog, "gdbarch_fp0_regnum called\n");
2203 return gdbarch->fp0_regnum;
2207 set_gdbarch_fp0_regnum (struct gdbarch *gdbarch,
2210 gdbarch->fp0_regnum = fp0_regnum;
2214 gdbarch_stab_reg_to_regnum (struct gdbarch *gdbarch, int stab_regnr)
2216 gdb_assert (gdbarch != NULL);
2217 gdb_assert (gdbarch->stab_reg_to_regnum != NULL);
2218 if (gdbarch_debug >= 2)
2219 fprintf_unfiltered (gdb_stdlog, "gdbarch_stab_reg_to_regnum called\n");
2220 return gdbarch->stab_reg_to_regnum (gdbarch, stab_regnr);
2224 set_gdbarch_stab_reg_to_regnum (struct gdbarch *gdbarch,
2225 gdbarch_stab_reg_to_regnum_ftype stab_reg_to_regnum)
2227 gdbarch->stab_reg_to_regnum = stab_reg_to_regnum;
2231 gdbarch_ecoff_reg_to_regnum (struct gdbarch *gdbarch, int ecoff_regnr)
2233 gdb_assert (gdbarch != NULL);
2234 gdb_assert (gdbarch->ecoff_reg_to_regnum != NULL);
2235 if (gdbarch_debug >= 2)
2236 fprintf_unfiltered (gdb_stdlog, "gdbarch_ecoff_reg_to_regnum called\n");
2237 return gdbarch->ecoff_reg_to_regnum (gdbarch, ecoff_regnr);
2241 set_gdbarch_ecoff_reg_to_regnum (struct gdbarch *gdbarch,
2242 gdbarch_ecoff_reg_to_regnum_ftype ecoff_reg_to_regnum)
2244 gdbarch->ecoff_reg_to_regnum = ecoff_reg_to_regnum;
2248 gdbarch_sdb_reg_to_regnum (struct gdbarch *gdbarch, int sdb_regnr)
2250 gdb_assert (gdbarch != NULL);
2251 gdb_assert (gdbarch->sdb_reg_to_regnum != NULL);
2252 if (gdbarch_debug >= 2)
2253 fprintf_unfiltered (gdb_stdlog, "gdbarch_sdb_reg_to_regnum called\n");
2254 return gdbarch->sdb_reg_to_regnum (gdbarch, sdb_regnr);
2258 set_gdbarch_sdb_reg_to_regnum (struct gdbarch *gdbarch,
2259 gdbarch_sdb_reg_to_regnum_ftype sdb_reg_to_regnum)
2261 gdbarch->sdb_reg_to_regnum = sdb_reg_to_regnum;
2265 gdbarch_dwarf2_reg_to_regnum (struct gdbarch *gdbarch, int dwarf2_regnr)
2267 gdb_assert (gdbarch != NULL);
2268 gdb_assert (gdbarch->dwarf2_reg_to_regnum != NULL);
2269 if (gdbarch_debug >= 2)
2270 fprintf_unfiltered (gdb_stdlog, "gdbarch_dwarf2_reg_to_regnum called\n");
2271 return gdbarch->dwarf2_reg_to_regnum (gdbarch, dwarf2_regnr);
2275 set_gdbarch_dwarf2_reg_to_regnum (struct gdbarch *gdbarch,
2276 gdbarch_dwarf2_reg_to_regnum_ftype dwarf2_reg_to_regnum)
2278 gdbarch->dwarf2_reg_to_regnum = dwarf2_reg_to_regnum;
2282 gdbarch_register_name (struct gdbarch *gdbarch, int regnr)
2284 gdb_assert (gdbarch != NULL);
2285 gdb_assert (gdbarch->register_name != NULL);
2286 if (gdbarch_debug >= 2)
2287 fprintf_unfiltered (gdb_stdlog, "gdbarch_register_name called\n");
2288 return gdbarch->register_name (gdbarch, regnr);
2292 set_gdbarch_register_name (struct gdbarch *gdbarch,
2293 gdbarch_register_name_ftype register_name)
2295 gdbarch->register_name = register_name;
2299 gdbarch_register_type_p (struct gdbarch *gdbarch)
2301 gdb_assert (gdbarch != NULL);
2302 return gdbarch->register_type != NULL;
2306 gdbarch_register_type (struct gdbarch *gdbarch, int reg_nr)
2308 gdb_assert (gdbarch != NULL);
2309 gdb_assert (gdbarch->register_type != NULL);
2310 if (gdbarch_debug >= 2)
2311 fprintf_unfiltered (gdb_stdlog, "gdbarch_register_type called\n");
2312 return gdbarch->register_type (gdbarch, reg_nr);
2316 set_gdbarch_register_type (struct gdbarch *gdbarch,
2317 gdbarch_register_type_ftype register_type)
2319 gdbarch->register_type = register_type;
2323 gdbarch_dummy_id_p (struct gdbarch *gdbarch)
2325 gdb_assert (gdbarch != NULL);
2326 return gdbarch->dummy_id != NULL;
2330 gdbarch_dummy_id (struct gdbarch *gdbarch, struct frame_info *this_frame)
2332 gdb_assert (gdbarch != NULL);
2333 gdb_assert (gdbarch->dummy_id != NULL);
2334 if (gdbarch_debug >= 2)
2335 fprintf_unfiltered (gdb_stdlog, "gdbarch_dummy_id called\n");
2336 return gdbarch->dummy_id (gdbarch, this_frame);
2340 set_gdbarch_dummy_id (struct gdbarch *gdbarch,
2341 gdbarch_dummy_id_ftype dummy_id)
2343 gdbarch->dummy_id = dummy_id;
2347 gdbarch_deprecated_fp_regnum (struct gdbarch *gdbarch)
2349 gdb_assert (gdbarch != NULL);
2350 /* Skip verify of deprecated_fp_regnum, invalid_p == 0 */
2351 if (gdbarch_debug >= 2)
2352 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_fp_regnum called\n");
2353 return gdbarch->deprecated_fp_regnum;
2357 set_gdbarch_deprecated_fp_regnum (struct gdbarch *gdbarch,
2358 int deprecated_fp_regnum)
2360 gdbarch->deprecated_fp_regnum = deprecated_fp_regnum;
2364 gdbarch_push_dummy_call_p (struct gdbarch *gdbarch)
2366 gdb_assert (gdbarch != NULL);
2367 return gdbarch->push_dummy_call != NULL;
2371 gdbarch_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)
2373 gdb_assert (gdbarch != NULL);
2374 gdb_assert (gdbarch->push_dummy_call != NULL);
2375 if (gdbarch_debug >= 2)
2376 fprintf_unfiltered (gdb_stdlog, "gdbarch_push_dummy_call called\n");
2377 return gdbarch->push_dummy_call (gdbarch, function, regcache, bp_addr, nargs, args, sp, struct_return, struct_addr);
2381 set_gdbarch_push_dummy_call (struct gdbarch *gdbarch,
2382 gdbarch_push_dummy_call_ftype push_dummy_call)
2384 gdbarch->push_dummy_call = push_dummy_call;
2388 gdbarch_call_dummy_location (struct gdbarch *gdbarch)
2390 gdb_assert (gdbarch != NULL);
2391 /* Skip verify of call_dummy_location, invalid_p == 0 */
2392 if (gdbarch_debug >= 2)
2393 fprintf_unfiltered (gdb_stdlog, "gdbarch_call_dummy_location called\n");
2394 return gdbarch->call_dummy_location;
2398 set_gdbarch_call_dummy_location (struct gdbarch *gdbarch,
2399 int call_dummy_location)
2401 gdbarch->call_dummy_location = call_dummy_location;
2405 gdbarch_push_dummy_code_p (struct gdbarch *gdbarch)
2407 gdb_assert (gdbarch != NULL);
2408 return gdbarch->push_dummy_code != NULL;
2412 gdbarch_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)
2414 gdb_assert (gdbarch != NULL);
2415 gdb_assert (gdbarch->push_dummy_code != NULL);
2416 if (gdbarch_debug >= 2)
2417 fprintf_unfiltered (gdb_stdlog, "gdbarch_push_dummy_code called\n");
2418 return gdbarch->push_dummy_code (gdbarch, sp, funaddr, args, nargs, value_type, real_pc, bp_addr, regcache);
2422 set_gdbarch_push_dummy_code (struct gdbarch *gdbarch,
2423 gdbarch_push_dummy_code_ftype push_dummy_code)
2425 gdbarch->push_dummy_code = push_dummy_code;
2429 gdbarch_code_of_frame_writable (struct gdbarch *gdbarch, struct frame_info *frame)
2431 gdb_assert (gdbarch != NULL);
2432 gdb_assert (gdbarch->code_of_frame_writable != NULL);
2433 if (gdbarch_debug >= 2)
2434 fprintf_unfiltered (gdb_stdlog, "gdbarch_code_of_frame_writable called\n");
2435 return gdbarch->code_of_frame_writable (gdbarch, frame);
2439 set_gdbarch_code_of_frame_writable (struct gdbarch *gdbarch,
2440 gdbarch_code_of_frame_writable_ftype code_of_frame_writable)
2442 gdbarch->code_of_frame_writable = code_of_frame_writable;
2446 gdbarch_print_registers_info (struct gdbarch *gdbarch, struct ui_file *file, struct frame_info *frame, int regnum, int all)
2448 gdb_assert (gdbarch != NULL);
2449 gdb_assert (gdbarch->print_registers_info != NULL);
2450 if (gdbarch_debug >= 2)
2451 fprintf_unfiltered (gdb_stdlog, "gdbarch_print_registers_info called\n");
2452 gdbarch->print_registers_info (gdbarch, file, frame, regnum, all);
2456 set_gdbarch_print_registers_info (struct gdbarch *gdbarch,
2457 gdbarch_print_registers_info_ftype print_registers_info)
2459 gdbarch->print_registers_info = print_registers_info;
2463 gdbarch_print_float_info (struct gdbarch *gdbarch, struct ui_file *file, struct frame_info *frame, const char *args)
2465 gdb_assert (gdbarch != NULL);
2466 gdb_assert (gdbarch->print_float_info != NULL);
2467 if (gdbarch_debug >= 2)
2468 fprintf_unfiltered (gdb_stdlog, "gdbarch_print_float_info called\n");
2469 gdbarch->print_float_info (gdbarch, file, frame, args);
2473 set_gdbarch_print_float_info (struct gdbarch *gdbarch,
2474 gdbarch_print_float_info_ftype print_float_info)
2476 gdbarch->print_float_info = print_float_info;
2480 gdbarch_print_vector_info_p (struct gdbarch *gdbarch)
2482 gdb_assert (gdbarch != NULL);
2483 return gdbarch->print_vector_info != NULL;
2487 gdbarch_print_vector_info (struct gdbarch *gdbarch, struct ui_file *file, struct frame_info *frame, const char *args)
2489 gdb_assert (gdbarch != NULL);
2490 gdb_assert (gdbarch->print_vector_info != NULL);
2491 if (gdbarch_debug >= 2)
2492 fprintf_unfiltered (gdb_stdlog, "gdbarch_print_vector_info called\n");
2493 gdbarch->print_vector_info (gdbarch, file, frame, args);
2497 set_gdbarch_print_vector_info (struct gdbarch *gdbarch,
2498 gdbarch_print_vector_info_ftype print_vector_info)
2500 gdbarch->print_vector_info = print_vector_info;
2504 gdbarch_register_sim_regno (struct gdbarch *gdbarch, int reg_nr)
2506 gdb_assert (gdbarch != NULL);
2507 gdb_assert (gdbarch->register_sim_regno != NULL);
2508 if (gdbarch_debug >= 2)
2509 fprintf_unfiltered (gdb_stdlog, "gdbarch_register_sim_regno called\n");
2510 return gdbarch->register_sim_regno (gdbarch, reg_nr);
2514 set_gdbarch_register_sim_regno (struct gdbarch *gdbarch,
2515 gdbarch_register_sim_regno_ftype register_sim_regno)
2517 gdbarch->register_sim_regno = register_sim_regno;
2521 gdbarch_cannot_fetch_register (struct gdbarch *gdbarch, int regnum)
2523 gdb_assert (gdbarch != NULL);
2524 gdb_assert (gdbarch->cannot_fetch_register != NULL);
2525 if (gdbarch_debug >= 2)
2526 fprintf_unfiltered (gdb_stdlog, "gdbarch_cannot_fetch_register called\n");
2527 return gdbarch->cannot_fetch_register (gdbarch, regnum);
2531 set_gdbarch_cannot_fetch_register (struct gdbarch *gdbarch,
2532 gdbarch_cannot_fetch_register_ftype cannot_fetch_register)
2534 gdbarch->cannot_fetch_register = cannot_fetch_register;
2538 gdbarch_cannot_store_register (struct gdbarch *gdbarch, int regnum)
2540 gdb_assert (gdbarch != NULL);
2541 gdb_assert (gdbarch->cannot_store_register != NULL);
2542 if (gdbarch_debug >= 2)
2543 fprintf_unfiltered (gdb_stdlog, "gdbarch_cannot_store_register called\n");
2544 return gdbarch->cannot_store_register (gdbarch, regnum);
2548 set_gdbarch_cannot_store_register (struct gdbarch *gdbarch,
2549 gdbarch_cannot_store_register_ftype cannot_store_register)
2551 gdbarch->cannot_store_register = cannot_store_register;
2555 gdbarch_get_longjmp_target_p (struct gdbarch *gdbarch)
2557 gdb_assert (gdbarch != NULL);
2558 return gdbarch->get_longjmp_target != NULL;
2562 gdbarch_get_longjmp_target (struct gdbarch *gdbarch, struct frame_info *frame, CORE_ADDR *pc)
2564 gdb_assert (gdbarch != NULL);
2565 gdb_assert (gdbarch->get_longjmp_target != NULL);
2566 if (gdbarch_debug >= 2)
2567 fprintf_unfiltered (gdb_stdlog, "gdbarch_get_longjmp_target called\n");
2568 return gdbarch->get_longjmp_target (frame, pc);
2572 set_gdbarch_get_longjmp_target (struct gdbarch *gdbarch,
2573 gdbarch_get_longjmp_target_ftype get_longjmp_target)
2575 gdbarch->get_longjmp_target = get_longjmp_target;
2579 gdbarch_believe_pcc_promotion (struct gdbarch *gdbarch)
2581 gdb_assert (gdbarch != NULL);
2582 if (gdbarch_debug >= 2)
2583 fprintf_unfiltered (gdb_stdlog, "gdbarch_believe_pcc_promotion called\n");
2584 return gdbarch->believe_pcc_promotion;
2588 set_gdbarch_believe_pcc_promotion (struct gdbarch *gdbarch,
2589 int believe_pcc_promotion)
2591 gdbarch->believe_pcc_promotion = believe_pcc_promotion;
2595 gdbarch_convert_register_p (struct gdbarch *gdbarch, int regnum, struct type *type)
2597 gdb_assert (gdbarch != NULL);
2598 gdb_assert (gdbarch->convert_register_p != NULL);
2599 if (gdbarch_debug >= 2)
2600 fprintf_unfiltered (gdb_stdlog, "gdbarch_convert_register_p called\n");
2601 return gdbarch->convert_register_p (gdbarch, regnum, type);
2605 set_gdbarch_convert_register_p (struct gdbarch *gdbarch,
2606 gdbarch_convert_register_p_ftype convert_register_p)
2608 gdbarch->convert_register_p = convert_register_p;
2612 gdbarch_register_to_value (struct gdbarch *gdbarch, struct frame_info *frame, int regnum, struct type *type, gdb_byte *buf, int *optimizedp, int *unavailablep)
2614 gdb_assert (gdbarch != NULL);
2615 gdb_assert (gdbarch->register_to_value != NULL);
2616 if (gdbarch_debug >= 2)
2617 fprintf_unfiltered (gdb_stdlog, "gdbarch_register_to_value called\n");
2618 return gdbarch->register_to_value (frame, regnum, type, buf, optimizedp, unavailablep);
2622 set_gdbarch_register_to_value (struct gdbarch *gdbarch,
2623 gdbarch_register_to_value_ftype register_to_value)
2625 gdbarch->register_to_value = register_to_value;
2629 gdbarch_value_to_register (struct gdbarch *gdbarch, struct frame_info *frame, int regnum, struct type *type, const gdb_byte *buf)
2631 gdb_assert (gdbarch != NULL);
2632 gdb_assert (gdbarch->value_to_register != NULL);
2633 if (gdbarch_debug >= 2)
2634 fprintf_unfiltered (gdb_stdlog, "gdbarch_value_to_register called\n");
2635 gdbarch->value_to_register (frame, regnum, type, buf);
2639 set_gdbarch_value_to_register (struct gdbarch *gdbarch,
2640 gdbarch_value_to_register_ftype value_to_register)
2642 gdbarch->value_to_register = value_to_register;
2646 gdbarch_value_from_register (struct gdbarch *gdbarch, struct type *type, int regnum, struct frame_id frame_id)
2648 gdb_assert (gdbarch != NULL);
2649 gdb_assert (gdbarch->value_from_register != NULL);
2650 if (gdbarch_debug >= 2)
2651 fprintf_unfiltered (gdb_stdlog, "gdbarch_value_from_register called\n");
2652 return gdbarch->value_from_register (gdbarch, type, regnum, frame_id);
2656 set_gdbarch_value_from_register (struct gdbarch *gdbarch,
2657 gdbarch_value_from_register_ftype value_from_register)
2659 gdbarch->value_from_register = value_from_register;
2663 gdbarch_pointer_to_address (struct gdbarch *gdbarch, struct type *type, const gdb_byte *buf)
2665 gdb_assert (gdbarch != NULL);
2666 gdb_assert (gdbarch->pointer_to_address != NULL);
2667 if (gdbarch_debug >= 2)
2668 fprintf_unfiltered (gdb_stdlog, "gdbarch_pointer_to_address called\n");
2669 return gdbarch->pointer_to_address (gdbarch, type, buf);
2673 set_gdbarch_pointer_to_address (struct gdbarch *gdbarch,
2674 gdbarch_pointer_to_address_ftype pointer_to_address)
2676 gdbarch->pointer_to_address = pointer_to_address;
2680 gdbarch_address_to_pointer (struct gdbarch *gdbarch, struct type *type, gdb_byte *buf, CORE_ADDR addr)
2682 gdb_assert (gdbarch != NULL);
2683 gdb_assert (gdbarch->address_to_pointer != NULL);
2684 if (gdbarch_debug >= 2)
2685 fprintf_unfiltered (gdb_stdlog, "gdbarch_address_to_pointer called\n");
2686 gdbarch->address_to_pointer (gdbarch, type, buf, addr);
2690 set_gdbarch_address_to_pointer (struct gdbarch *gdbarch,
2691 gdbarch_address_to_pointer_ftype address_to_pointer)
2693 gdbarch->address_to_pointer = address_to_pointer;
2697 gdbarch_integer_to_address_p (struct gdbarch *gdbarch)
2699 gdb_assert (gdbarch != NULL);
2700 return gdbarch->integer_to_address != NULL;
2704 gdbarch_integer_to_address (struct gdbarch *gdbarch, struct type *type, const gdb_byte *buf)
2706 gdb_assert (gdbarch != NULL);
2707 gdb_assert (gdbarch->integer_to_address != NULL);
2708 if (gdbarch_debug >= 2)
2709 fprintf_unfiltered (gdb_stdlog, "gdbarch_integer_to_address called\n");
2710 return gdbarch->integer_to_address (gdbarch, type, buf);
2714 set_gdbarch_integer_to_address (struct gdbarch *gdbarch,
2715 gdbarch_integer_to_address_ftype integer_to_address)
2717 gdbarch->integer_to_address = integer_to_address;
2721 gdbarch_return_value_p (struct gdbarch *gdbarch)
2723 gdb_assert (gdbarch != NULL);
2724 return gdbarch->return_value != NULL;
2727 enum return_value_convention
2728 gdbarch_return_value (struct gdbarch *gdbarch, struct value *function, struct type *valtype, struct regcache *regcache, gdb_byte *readbuf, const gdb_byte *writebuf)
2730 gdb_assert (gdbarch != NULL);
2731 gdb_assert (gdbarch->return_value != NULL);
2732 if (gdbarch_debug >= 2)
2733 fprintf_unfiltered (gdb_stdlog, "gdbarch_return_value called\n");
2734 return gdbarch->return_value (gdbarch, function, valtype, regcache, readbuf, writebuf);
2738 set_gdbarch_return_value (struct gdbarch *gdbarch,
2739 gdbarch_return_value_ftype return_value)
2741 gdbarch->return_value = return_value;
2745 gdbarch_return_in_first_hidden_param_p (struct gdbarch *gdbarch, struct type *type)
2747 gdb_assert (gdbarch != NULL);
2748 gdb_assert (gdbarch->return_in_first_hidden_param_p != NULL);
2749 if (gdbarch_debug >= 2)
2750 fprintf_unfiltered (gdb_stdlog, "gdbarch_return_in_first_hidden_param_p called\n");
2751 return gdbarch->return_in_first_hidden_param_p (gdbarch, type);
2755 set_gdbarch_return_in_first_hidden_param_p (struct gdbarch *gdbarch,
2756 gdbarch_return_in_first_hidden_param_p_ftype return_in_first_hidden_param_p)
2758 gdbarch->return_in_first_hidden_param_p = return_in_first_hidden_param_p;
2762 gdbarch_skip_prologue (struct gdbarch *gdbarch, CORE_ADDR ip)
2764 gdb_assert (gdbarch != NULL);
2765 gdb_assert (gdbarch->skip_prologue != NULL);
2766 if (gdbarch_debug >= 2)
2767 fprintf_unfiltered (gdb_stdlog, "gdbarch_skip_prologue called\n");
2768 return gdbarch->skip_prologue (gdbarch, ip);
2772 set_gdbarch_skip_prologue (struct gdbarch *gdbarch,
2773 gdbarch_skip_prologue_ftype skip_prologue)
2775 gdbarch->skip_prologue = skip_prologue;
2779 gdbarch_skip_main_prologue_p (struct gdbarch *gdbarch)
2781 gdb_assert (gdbarch != NULL);
2782 return gdbarch->skip_main_prologue != NULL;
2786 gdbarch_skip_main_prologue (struct gdbarch *gdbarch, CORE_ADDR ip)
2788 gdb_assert (gdbarch != NULL);
2789 gdb_assert (gdbarch->skip_main_prologue != NULL);
2790 if (gdbarch_debug >= 2)
2791 fprintf_unfiltered (gdb_stdlog, "gdbarch_skip_main_prologue called\n");
2792 return gdbarch->skip_main_prologue (gdbarch, ip);
2796 set_gdbarch_skip_main_prologue (struct gdbarch *gdbarch,
2797 gdbarch_skip_main_prologue_ftype skip_main_prologue)
2799 gdbarch->skip_main_prologue = skip_main_prologue;
2803 gdbarch_skip_entrypoint_p (struct gdbarch *gdbarch)
2805 gdb_assert (gdbarch != NULL);
2806 return gdbarch->skip_entrypoint != NULL;
2810 gdbarch_skip_entrypoint (struct gdbarch *gdbarch, CORE_ADDR ip)
2812 gdb_assert (gdbarch != NULL);
2813 gdb_assert (gdbarch->skip_entrypoint != NULL);
2814 if (gdbarch_debug >= 2)
2815 fprintf_unfiltered (gdb_stdlog, "gdbarch_skip_entrypoint called\n");
2816 return gdbarch->skip_entrypoint (gdbarch, ip);
2820 set_gdbarch_skip_entrypoint (struct gdbarch *gdbarch,
2821 gdbarch_skip_entrypoint_ftype skip_entrypoint)
2823 gdbarch->skip_entrypoint = skip_entrypoint;
2827 gdbarch_inner_than (struct gdbarch *gdbarch, CORE_ADDR lhs, CORE_ADDR rhs)
2829 gdb_assert (gdbarch != NULL);
2830 gdb_assert (gdbarch->inner_than != NULL);
2831 if (gdbarch_debug >= 2)
2832 fprintf_unfiltered (gdb_stdlog, "gdbarch_inner_than called\n");
2833 return gdbarch->inner_than (lhs, rhs);
2837 set_gdbarch_inner_than (struct gdbarch *gdbarch,
2838 gdbarch_inner_than_ftype inner_than)
2840 gdbarch->inner_than = inner_than;
2844 gdbarch_breakpoint_from_pc (struct gdbarch *gdbarch, CORE_ADDR *pcptr, int *lenptr)
2846 gdb_assert (gdbarch != NULL);
2847 gdb_assert (gdbarch->breakpoint_from_pc != NULL);
2848 if (gdbarch_debug >= 2)
2849 fprintf_unfiltered (gdb_stdlog, "gdbarch_breakpoint_from_pc called\n");
2850 return gdbarch->breakpoint_from_pc (gdbarch, pcptr, lenptr);
2854 set_gdbarch_breakpoint_from_pc (struct gdbarch *gdbarch,
2855 gdbarch_breakpoint_from_pc_ftype breakpoint_from_pc)
2857 gdbarch->breakpoint_from_pc = breakpoint_from_pc;
2861 gdbarch_breakpoint_kind_from_pc (struct gdbarch *gdbarch, CORE_ADDR *pcptr)
2863 gdb_assert (gdbarch != NULL);
2864 gdb_assert (gdbarch->breakpoint_kind_from_pc != NULL);
2865 if (gdbarch_debug >= 2)
2866 fprintf_unfiltered (gdb_stdlog, "gdbarch_breakpoint_kind_from_pc called\n");
2867 return gdbarch->breakpoint_kind_from_pc (gdbarch, pcptr);
2871 set_gdbarch_breakpoint_kind_from_pc (struct gdbarch *gdbarch,
2872 gdbarch_breakpoint_kind_from_pc_ftype breakpoint_kind_from_pc)
2874 gdbarch->breakpoint_kind_from_pc = breakpoint_kind_from_pc;
2878 gdbarch_sw_breakpoint_from_kind (struct gdbarch *gdbarch, int kind, int *size)
2880 gdb_assert (gdbarch != NULL);
2881 gdb_assert (gdbarch->sw_breakpoint_from_kind != NULL);
2882 if (gdbarch_debug >= 2)
2883 fprintf_unfiltered (gdb_stdlog, "gdbarch_sw_breakpoint_from_kind called\n");
2884 return gdbarch->sw_breakpoint_from_kind (gdbarch, kind, size);
2888 set_gdbarch_sw_breakpoint_from_kind (struct gdbarch *gdbarch,
2889 gdbarch_sw_breakpoint_from_kind_ftype sw_breakpoint_from_kind)
2891 gdbarch->sw_breakpoint_from_kind = sw_breakpoint_from_kind;
2895 gdbarch_breakpoint_kind_from_current_state (struct gdbarch *gdbarch, struct regcache *regcache, CORE_ADDR *pcptr)
2897 gdb_assert (gdbarch != NULL);
2898 gdb_assert (gdbarch->breakpoint_kind_from_current_state != NULL);
2899 if (gdbarch_debug >= 2)
2900 fprintf_unfiltered (gdb_stdlog, "gdbarch_breakpoint_kind_from_current_state called\n");
2901 return gdbarch->breakpoint_kind_from_current_state (gdbarch, regcache, pcptr);
2905 set_gdbarch_breakpoint_kind_from_current_state (struct gdbarch *gdbarch,
2906 gdbarch_breakpoint_kind_from_current_state_ftype breakpoint_kind_from_current_state)
2908 gdbarch->breakpoint_kind_from_current_state = breakpoint_kind_from_current_state;
2912 gdbarch_adjust_breakpoint_address_p (struct gdbarch *gdbarch)
2914 gdb_assert (gdbarch != NULL);
2915 return gdbarch->adjust_breakpoint_address != NULL;
2919 gdbarch_adjust_breakpoint_address (struct gdbarch *gdbarch, CORE_ADDR bpaddr)
2921 gdb_assert (gdbarch != NULL);
2922 gdb_assert (gdbarch->adjust_breakpoint_address != NULL);
2923 if (gdbarch_debug >= 2)
2924 fprintf_unfiltered (gdb_stdlog, "gdbarch_adjust_breakpoint_address called\n");
2925 return gdbarch->adjust_breakpoint_address (gdbarch, bpaddr);
2929 set_gdbarch_adjust_breakpoint_address (struct gdbarch *gdbarch,
2930 gdbarch_adjust_breakpoint_address_ftype adjust_breakpoint_address)
2932 gdbarch->adjust_breakpoint_address = adjust_breakpoint_address;
2936 gdbarch_memory_insert_breakpoint (struct gdbarch *gdbarch, struct bp_target_info *bp_tgt)
2938 gdb_assert (gdbarch != NULL);
2939 gdb_assert (gdbarch->memory_insert_breakpoint != NULL);
2940 if (gdbarch_debug >= 2)
2941 fprintf_unfiltered (gdb_stdlog, "gdbarch_memory_insert_breakpoint called\n");
2942 return gdbarch->memory_insert_breakpoint (gdbarch, bp_tgt);
2946 set_gdbarch_memory_insert_breakpoint (struct gdbarch *gdbarch,
2947 gdbarch_memory_insert_breakpoint_ftype memory_insert_breakpoint)
2949 gdbarch->memory_insert_breakpoint = memory_insert_breakpoint;
2953 gdbarch_memory_remove_breakpoint (struct gdbarch *gdbarch, struct bp_target_info *bp_tgt)
2955 gdb_assert (gdbarch != NULL);
2956 gdb_assert (gdbarch->memory_remove_breakpoint != NULL);
2957 if (gdbarch_debug >= 2)
2958 fprintf_unfiltered (gdb_stdlog, "gdbarch_memory_remove_breakpoint called\n");
2959 return gdbarch->memory_remove_breakpoint (gdbarch, bp_tgt);
2963 set_gdbarch_memory_remove_breakpoint (struct gdbarch *gdbarch,
2964 gdbarch_memory_remove_breakpoint_ftype memory_remove_breakpoint)
2966 gdbarch->memory_remove_breakpoint = memory_remove_breakpoint;
2970 gdbarch_decr_pc_after_break (struct gdbarch *gdbarch)
2972 gdb_assert (gdbarch != NULL);
2973 /* Skip verify of decr_pc_after_break, invalid_p == 0 */
2974 if (gdbarch_debug >= 2)
2975 fprintf_unfiltered (gdb_stdlog, "gdbarch_decr_pc_after_break called\n");
2976 return gdbarch->decr_pc_after_break;
2980 set_gdbarch_decr_pc_after_break (struct gdbarch *gdbarch,
2981 CORE_ADDR decr_pc_after_break)
2983 gdbarch->decr_pc_after_break = decr_pc_after_break;
2987 gdbarch_deprecated_function_start_offset (struct gdbarch *gdbarch)
2989 gdb_assert (gdbarch != NULL);
2990 /* Skip verify of deprecated_function_start_offset, invalid_p == 0 */
2991 if (gdbarch_debug >= 2)
2992 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_function_start_offset called\n");
2993 return gdbarch->deprecated_function_start_offset;
2997 set_gdbarch_deprecated_function_start_offset (struct gdbarch *gdbarch,
2998 CORE_ADDR deprecated_function_start_offset)
3000 gdbarch->deprecated_function_start_offset = deprecated_function_start_offset;
3004 gdbarch_remote_register_number (struct gdbarch *gdbarch, int regno)
3006 gdb_assert (gdbarch != NULL);
3007 gdb_assert (gdbarch->remote_register_number != NULL);
3008 if (gdbarch_debug >= 2)
3009 fprintf_unfiltered (gdb_stdlog, "gdbarch_remote_register_number called\n");
3010 return gdbarch->remote_register_number (gdbarch, regno);
3014 set_gdbarch_remote_register_number (struct gdbarch *gdbarch,
3015 gdbarch_remote_register_number_ftype remote_register_number)
3017 gdbarch->remote_register_number = remote_register_number;
3021 gdbarch_fetch_tls_load_module_address_p (struct gdbarch *gdbarch)
3023 gdb_assert (gdbarch != NULL);
3024 return gdbarch->fetch_tls_load_module_address != NULL;
3028 gdbarch_fetch_tls_load_module_address (struct gdbarch *gdbarch, struct objfile *objfile)
3030 gdb_assert (gdbarch != NULL);
3031 gdb_assert (gdbarch->fetch_tls_load_module_address != NULL);
3032 if (gdbarch_debug >= 2)
3033 fprintf_unfiltered (gdb_stdlog, "gdbarch_fetch_tls_load_module_address called\n");
3034 return gdbarch->fetch_tls_load_module_address (objfile);
3038 set_gdbarch_fetch_tls_load_module_address (struct gdbarch *gdbarch,
3039 gdbarch_fetch_tls_load_module_address_ftype fetch_tls_load_module_address)
3041 gdbarch->fetch_tls_load_module_address = fetch_tls_load_module_address;
3045 gdbarch_frame_args_skip (struct gdbarch *gdbarch)
3047 gdb_assert (gdbarch != NULL);
3048 /* Skip verify of frame_args_skip, invalid_p == 0 */
3049 if (gdbarch_debug >= 2)
3050 fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_args_skip called\n");
3051 return gdbarch->frame_args_skip;
3055 set_gdbarch_frame_args_skip (struct gdbarch *gdbarch,
3056 CORE_ADDR frame_args_skip)
3058 gdbarch->frame_args_skip = frame_args_skip;
3062 gdbarch_unwind_pc_p (struct gdbarch *gdbarch)
3064 gdb_assert (gdbarch != NULL);
3065 return gdbarch->unwind_pc != NULL;
3069 gdbarch_unwind_pc (struct gdbarch *gdbarch, struct frame_info *next_frame)
3071 gdb_assert (gdbarch != NULL);
3072 gdb_assert (gdbarch->unwind_pc != NULL);
3073 if (gdbarch_debug >= 2)
3074 fprintf_unfiltered (gdb_stdlog, "gdbarch_unwind_pc called\n");
3075 return gdbarch->unwind_pc (gdbarch, next_frame);
3079 set_gdbarch_unwind_pc (struct gdbarch *gdbarch,
3080 gdbarch_unwind_pc_ftype unwind_pc)
3082 gdbarch->unwind_pc = unwind_pc;
3086 gdbarch_unwind_sp_p (struct gdbarch *gdbarch)
3088 gdb_assert (gdbarch != NULL);
3089 return gdbarch->unwind_sp != NULL;
3093 gdbarch_unwind_sp (struct gdbarch *gdbarch, struct frame_info *next_frame)
3095 gdb_assert (gdbarch != NULL);
3096 gdb_assert (gdbarch->unwind_sp != NULL);
3097 if (gdbarch_debug >= 2)
3098 fprintf_unfiltered (gdb_stdlog, "gdbarch_unwind_sp called\n");
3099 return gdbarch->unwind_sp (gdbarch, next_frame);
3103 set_gdbarch_unwind_sp (struct gdbarch *gdbarch,
3104 gdbarch_unwind_sp_ftype unwind_sp)
3106 gdbarch->unwind_sp = unwind_sp;
3110 gdbarch_frame_num_args_p (struct gdbarch *gdbarch)
3112 gdb_assert (gdbarch != NULL);
3113 return gdbarch->frame_num_args != NULL;
3117 gdbarch_frame_num_args (struct gdbarch *gdbarch, struct frame_info *frame)
3119 gdb_assert (gdbarch != NULL);
3120 gdb_assert (gdbarch->frame_num_args != NULL);
3121 if (gdbarch_debug >= 2)
3122 fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_num_args called\n");
3123 return gdbarch->frame_num_args (frame);
3127 set_gdbarch_frame_num_args (struct gdbarch *gdbarch,
3128 gdbarch_frame_num_args_ftype frame_num_args)
3130 gdbarch->frame_num_args = frame_num_args;
3134 gdbarch_frame_align_p (struct gdbarch *gdbarch)
3136 gdb_assert (gdbarch != NULL);
3137 return gdbarch->frame_align != NULL;
3141 gdbarch_frame_align (struct gdbarch *gdbarch, CORE_ADDR address)
3143 gdb_assert (gdbarch != NULL);
3144 gdb_assert (gdbarch->frame_align != NULL);
3145 if (gdbarch_debug >= 2)
3146 fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_align called\n");
3147 return gdbarch->frame_align (gdbarch, address);
3151 set_gdbarch_frame_align (struct gdbarch *gdbarch,
3152 gdbarch_frame_align_ftype frame_align)
3154 gdbarch->frame_align = frame_align;
3158 gdbarch_stabs_argument_has_addr (struct gdbarch *gdbarch, struct type *type)
3160 gdb_assert (gdbarch != NULL);
3161 gdb_assert (gdbarch->stabs_argument_has_addr != NULL);
3162 if (gdbarch_debug >= 2)
3163 fprintf_unfiltered (gdb_stdlog, "gdbarch_stabs_argument_has_addr called\n");
3164 return gdbarch->stabs_argument_has_addr (gdbarch, type);
3168 set_gdbarch_stabs_argument_has_addr (struct gdbarch *gdbarch,
3169 gdbarch_stabs_argument_has_addr_ftype stabs_argument_has_addr)
3171 gdbarch->stabs_argument_has_addr = stabs_argument_has_addr;
3175 gdbarch_frame_red_zone_size (struct gdbarch *gdbarch)
3177 gdb_assert (gdbarch != NULL);
3178 if (gdbarch_debug >= 2)
3179 fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_red_zone_size called\n");
3180 return gdbarch->frame_red_zone_size;
3184 set_gdbarch_frame_red_zone_size (struct gdbarch *gdbarch,
3185 int frame_red_zone_size)
3187 gdbarch->frame_red_zone_size = frame_red_zone_size;
3191 gdbarch_convert_from_func_ptr_addr (struct gdbarch *gdbarch, CORE_ADDR addr, struct target_ops *targ)
3193 gdb_assert (gdbarch != NULL);
3194 gdb_assert (gdbarch->convert_from_func_ptr_addr != NULL);
3195 if (gdbarch_debug >= 2)
3196 fprintf_unfiltered (gdb_stdlog, "gdbarch_convert_from_func_ptr_addr called\n");
3197 return gdbarch->convert_from_func_ptr_addr (gdbarch, addr, targ);
3201 set_gdbarch_convert_from_func_ptr_addr (struct gdbarch *gdbarch,
3202 gdbarch_convert_from_func_ptr_addr_ftype convert_from_func_ptr_addr)
3204 gdbarch->convert_from_func_ptr_addr = convert_from_func_ptr_addr;
3208 gdbarch_addr_bits_remove (struct gdbarch *gdbarch, CORE_ADDR addr)
3210 gdb_assert (gdbarch != NULL);
3211 gdb_assert (gdbarch->addr_bits_remove != NULL);
3212 if (gdbarch_debug >= 2)
3213 fprintf_unfiltered (gdb_stdlog, "gdbarch_addr_bits_remove called\n");
3214 return gdbarch->addr_bits_remove (gdbarch, addr);
3218 set_gdbarch_addr_bits_remove (struct gdbarch *gdbarch,
3219 gdbarch_addr_bits_remove_ftype addr_bits_remove)
3221 gdbarch->addr_bits_remove = addr_bits_remove;
3225 gdbarch_significant_addr_bit (struct gdbarch *gdbarch)
3227 gdb_assert (gdbarch != NULL);
3228 if (gdbarch_debug >= 2)
3229 fprintf_unfiltered (gdb_stdlog, "gdbarch_significant_addr_bit called\n");
3230 return gdbarch->significant_addr_bit;
3234 set_gdbarch_significant_addr_bit (struct gdbarch *gdbarch,
3235 int significant_addr_bit)
3237 gdbarch->significant_addr_bit = significant_addr_bit;
3241 gdbarch_software_single_step_p (struct gdbarch *gdbarch)
3243 gdb_assert (gdbarch != NULL);
3244 return gdbarch->software_single_step != NULL;
3247 std::vector<CORE_ADDR>
3248 gdbarch_software_single_step (struct gdbarch *gdbarch, struct regcache *regcache)
3250 gdb_assert (gdbarch != NULL);
3251 gdb_assert (gdbarch->software_single_step != NULL);
3252 if (gdbarch_debug >= 2)
3253 fprintf_unfiltered (gdb_stdlog, "gdbarch_software_single_step called\n");
3254 return gdbarch->software_single_step (regcache);
3258 set_gdbarch_software_single_step (struct gdbarch *gdbarch,
3259 gdbarch_software_single_step_ftype software_single_step)
3261 gdbarch->software_single_step = software_single_step;
3265 gdbarch_single_step_through_delay_p (struct gdbarch *gdbarch)
3267 gdb_assert (gdbarch != NULL);
3268 return gdbarch->single_step_through_delay != NULL;
3272 gdbarch_single_step_through_delay (struct gdbarch *gdbarch, struct frame_info *frame)
3274 gdb_assert (gdbarch != NULL);
3275 gdb_assert (gdbarch->single_step_through_delay != NULL);
3276 if (gdbarch_debug >= 2)
3277 fprintf_unfiltered (gdb_stdlog, "gdbarch_single_step_through_delay called\n");
3278 return gdbarch->single_step_through_delay (gdbarch, frame);
3282 set_gdbarch_single_step_through_delay (struct gdbarch *gdbarch,
3283 gdbarch_single_step_through_delay_ftype single_step_through_delay)
3285 gdbarch->single_step_through_delay = single_step_through_delay;
3289 gdbarch_print_insn (struct gdbarch *gdbarch, bfd_vma vma, struct disassemble_info *info)
3291 gdb_assert (gdbarch != NULL);
3292 gdb_assert (gdbarch->print_insn != NULL);
3293 if (gdbarch_debug >= 2)
3294 fprintf_unfiltered (gdb_stdlog, "gdbarch_print_insn called\n");
3295 return gdbarch->print_insn (vma, info);
3299 set_gdbarch_print_insn (struct gdbarch *gdbarch,
3300 gdbarch_print_insn_ftype print_insn)
3302 gdbarch->print_insn = print_insn;
3306 gdbarch_skip_trampoline_code (struct gdbarch *gdbarch, struct frame_info *frame, CORE_ADDR pc)
3308 gdb_assert (gdbarch != NULL);
3309 gdb_assert (gdbarch->skip_trampoline_code != NULL);
3310 if (gdbarch_debug >= 2)
3311 fprintf_unfiltered (gdb_stdlog, "gdbarch_skip_trampoline_code called\n");
3312 return gdbarch->skip_trampoline_code (frame, pc);
3316 set_gdbarch_skip_trampoline_code (struct gdbarch *gdbarch,
3317 gdbarch_skip_trampoline_code_ftype skip_trampoline_code)
3319 gdbarch->skip_trampoline_code = skip_trampoline_code;
3323 gdbarch_skip_solib_resolver (struct gdbarch *gdbarch, CORE_ADDR pc)
3325 gdb_assert (gdbarch != NULL);
3326 gdb_assert (gdbarch->skip_solib_resolver != NULL);
3327 if (gdbarch_debug >= 2)
3328 fprintf_unfiltered (gdb_stdlog, "gdbarch_skip_solib_resolver called\n");
3329 return gdbarch->skip_solib_resolver (gdbarch, pc);
3333 set_gdbarch_skip_solib_resolver (struct gdbarch *gdbarch,
3334 gdbarch_skip_solib_resolver_ftype skip_solib_resolver)
3336 gdbarch->skip_solib_resolver = skip_solib_resolver;
3340 gdbarch_in_solib_return_trampoline (struct gdbarch *gdbarch, CORE_ADDR pc, const char *name)
3342 gdb_assert (gdbarch != NULL);
3343 gdb_assert (gdbarch->in_solib_return_trampoline != NULL);
3344 if (gdbarch_debug >= 2)
3345 fprintf_unfiltered (gdb_stdlog, "gdbarch_in_solib_return_trampoline called\n");
3346 return gdbarch->in_solib_return_trampoline (gdbarch, pc, name);
3350 set_gdbarch_in_solib_return_trampoline (struct gdbarch *gdbarch,
3351 gdbarch_in_solib_return_trampoline_ftype in_solib_return_trampoline)
3353 gdbarch->in_solib_return_trampoline = in_solib_return_trampoline;
3357 gdbarch_stack_frame_destroyed_p (struct gdbarch *gdbarch, CORE_ADDR addr)
3359 gdb_assert (gdbarch != NULL);
3360 gdb_assert (gdbarch->stack_frame_destroyed_p != NULL);
3361 if (gdbarch_debug >= 2)
3362 fprintf_unfiltered (gdb_stdlog, "gdbarch_stack_frame_destroyed_p called\n");
3363 return gdbarch->stack_frame_destroyed_p (gdbarch, addr);
3367 set_gdbarch_stack_frame_destroyed_p (struct gdbarch *gdbarch,
3368 gdbarch_stack_frame_destroyed_p_ftype stack_frame_destroyed_p)
3370 gdbarch->stack_frame_destroyed_p = stack_frame_destroyed_p;
3374 gdbarch_elf_make_msymbol_special_p (struct gdbarch *gdbarch)
3376 gdb_assert (gdbarch != NULL);
3377 return gdbarch->elf_make_msymbol_special != NULL;
3381 gdbarch_elf_make_msymbol_special (struct gdbarch *gdbarch, asymbol *sym, struct minimal_symbol *msym)
3383 gdb_assert (gdbarch != NULL);
3384 gdb_assert (gdbarch->elf_make_msymbol_special != NULL);
3385 if (gdbarch_debug >= 2)
3386 fprintf_unfiltered (gdb_stdlog, "gdbarch_elf_make_msymbol_special called\n");
3387 gdbarch->elf_make_msymbol_special (sym, msym);
3391 set_gdbarch_elf_make_msymbol_special (struct gdbarch *gdbarch,
3392 gdbarch_elf_make_msymbol_special_ftype elf_make_msymbol_special)
3394 gdbarch->elf_make_msymbol_special = elf_make_msymbol_special;
3398 gdbarch_coff_make_msymbol_special (struct gdbarch *gdbarch, int val, struct minimal_symbol *msym)
3400 gdb_assert (gdbarch != NULL);
3401 gdb_assert (gdbarch->coff_make_msymbol_special != NULL);
3402 if (gdbarch_debug >= 2)
3403 fprintf_unfiltered (gdb_stdlog, "gdbarch_coff_make_msymbol_special called\n");
3404 gdbarch->coff_make_msymbol_special (val, msym);
3408 set_gdbarch_coff_make_msymbol_special (struct gdbarch *gdbarch,
3409 gdbarch_coff_make_msymbol_special_ftype coff_make_msymbol_special)
3411 gdbarch->coff_make_msymbol_special = coff_make_msymbol_special;
3415 gdbarch_make_symbol_special (struct gdbarch *gdbarch, struct symbol *sym, struct objfile *objfile)
3417 gdb_assert (gdbarch != NULL);
3418 gdb_assert (gdbarch->make_symbol_special != NULL);
3419 if (gdbarch_debug >= 2)
3420 fprintf_unfiltered (gdb_stdlog, "gdbarch_make_symbol_special called\n");
3421 gdbarch->make_symbol_special (sym, objfile);
3425 set_gdbarch_make_symbol_special (struct gdbarch *gdbarch,
3426 gdbarch_make_symbol_special_ftype make_symbol_special)
3428 gdbarch->make_symbol_special = make_symbol_special;
3432 gdbarch_adjust_dwarf2_addr (struct gdbarch *gdbarch, CORE_ADDR pc)
3434 gdb_assert (gdbarch != NULL);
3435 gdb_assert (gdbarch->adjust_dwarf2_addr != NULL);
3436 if (gdbarch_debug >= 2)
3437 fprintf_unfiltered (gdb_stdlog, "gdbarch_adjust_dwarf2_addr called\n");
3438 return gdbarch->adjust_dwarf2_addr (pc);
3442 set_gdbarch_adjust_dwarf2_addr (struct gdbarch *gdbarch,
3443 gdbarch_adjust_dwarf2_addr_ftype adjust_dwarf2_addr)
3445 gdbarch->adjust_dwarf2_addr = adjust_dwarf2_addr;
3449 gdbarch_adjust_dwarf2_line (struct gdbarch *gdbarch, CORE_ADDR addr, int rel)
3451 gdb_assert (gdbarch != NULL);
3452 gdb_assert (gdbarch->adjust_dwarf2_line != NULL);
3453 if (gdbarch_debug >= 2)
3454 fprintf_unfiltered (gdb_stdlog, "gdbarch_adjust_dwarf2_line called\n");
3455 return gdbarch->adjust_dwarf2_line (addr, rel);
3459 set_gdbarch_adjust_dwarf2_line (struct gdbarch *gdbarch,
3460 gdbarch_adjust_dwarf2_line_ftype adjust_dwarf2_line)
3462 gdbarch->adjust_dwarf2_line = adjust_dwarf2_line;
3466 gdbarch_cannot_step_breakpoint (struct gdbarch *gdbarch)
3468 gdb_assert (gdbarch != NULL);
3469 /* Skip verify of cannot_step_breakpoint, invalid_p == 0 */
3470 if (gdbarch_debug >= 2)
3471 fprintf_unfiltered (gdb_stdlog, "gdbarch_cannot_step_breakpoint called\n");
3472 return gdbarch->cannot_step_breakpoint;
3476 set_gdbarch_cannot_step_breakpoint (struct gdbarch *gdbarch,
3477 int cannot_step_breakpoint)
3479 gdbarch->cannot_step_breakpoint = cannot_step_breakpoint;
3483 gdbarch_have_nonsteppable_watchpoint (struct gdbarch *gdbarch)
3485 gdb_assert (gdbarch != NULL);
3486 /* Skip verify of have_nonsteppable_watchpoint, invalid_p == 0 */
3487 if (gdbarch_debug >= 2)
3488 fprintf_unfiltered (gdb_stdlog, "gdbarch_have_nonsteppable_watchpoint called\n");
3489 return gdbarch->have_nonsteppable_watchpoint;
3493 set_gdbarch_have_nonsteppable_watchpoint (struct gdbarch *gdbarch,
3494 int have_nonsteppable_watchpoint)
3496 gdbarch->have_nonsteppable_watchpoint = have_nonsteppable_watchpoint;
3500 gdbarch_address_class_type_flags_p (struct gdbarch *gdbarch)
3502 gdb_assert (gdbarch != NULL);
3503 return gdbarch->address_class_type_flags != NULL;
3507 gdbarch_address_class_type_flags (struct gdbarch *gdbarch, int byte_size, int dwarf2_addr_class)
3509 gdb_assert (gdbarch != NULL);
3510 gdb_assert (gdbarch->address_class_type_flags != NULL);
3511 if (gdbarch_debug >= 2)
3512 fprintf_unfiltered (gdb_stdlog, "gdbarch_address_class_type_flags called\n");
3513 return gdbarch->address_class_type_flags (byte_size, dwarf2_addr_class);
3517 set_gdbarch_address_class_type_flags (struct gdbarch *gdbarch,
3518 gdbarch_address_class_type_flags_ftype address_class_type_flags)
3520 gdbarch->address_class_type_flags = address_class_type_flags;
3524 gdbarch_address_class_type_flags_to_name_p (struct gdbarch *gdbarch)
3526 gdb_assert (gdbarch != NULL);
3527 return gdbarch->address_class_type_flags_to_name != NULL;
3531 gdbarch_address_class_type_flags_to_name (struct gdbarch *gdbarch, int type_flags)
3533 gdb_assert (gdbarch != NULL);
3534 gdb_assert (gdbarch->address_class_type_flags_to_name != NULL);
3535 if (gdbarch_debug >= 2)
3536 fprintf_unfiltered (gdb_stdlog, "gdbarch_address_class_type_flags_to_name called\n");
3537 return gdbarch->address_class_type_flags_to_name (gdbarch, type_flags);
3541 set_gdbarch_address_class_type_flags_to_name (struct gdbarch *gdbarch,
3542 gdbarch_address_class_type_flags_to_name_ftype address_class_type_flags_to_name)
3544 gdbarch->address_class_type_flags_to_name = address_class_type_flags_to_name;
3548 gdbarch_execute_dwarf_cfa_vendor_op (struct gdbarch *gdbarch, gdb_byte op, struct dwarf2_frame_state *fs)
3550 gdb_assert (gdbarch != NULL);
3551 gdb_assert (gdbarch->execute_dwarf_cfa_vendor_op != NULL);
3552 if (gdbarch_debug >= 2)
3553 fprintf_unfiltered (gdb_stdlog, "gdbarch_execute_dwarf_cfa_vendor_op called\n");
3554 return gdbarch->execute_dwarf_cfa_vendor_op (gdbarch, op, fs);
3558 set_gdbarch_execute_dwarf_cfa_vendor_op (struct gdbarch *gdbarch,
3559 gdbarch_execute_dwarf_cfa_vendor_op_ftype execute_dwarf_cfa_vendor_op)
3561 gdbarch->execute_dwarf_cfa_vendor_op = execute_dwarf_cfa_vendor_op;
3565 gdbarch_address_class_name_to_type_flags_p (struct gdbarch *gdbarch)
3567 gdb_assert (gdbarch != NULL);
3568 return gdbarch->address_class_name_to_type_flags != NULL;
3572 gdbarch_address_class_name_to_type_flags (struct gdbarch *gdbarch, const char *name, int *type_flags_ptr)
3574 gdb_assert (gdbarch != NULL);
3575 gdb_assert (gdbarch->address_class_name_to_type_flags != NULL);
3576 if (gdbarch_debug >= 2)
3577 fprintf_unfiltered (gdb_stdlog, "gdbarch_address_class_name_to_type_flags called\n");
3578 return gdbarch->address_class_name_to_type_flags (gdbarch, name, type_flags_ptr);
3582 set_gdbarch_address_class_name_to_type_flags (struct gdbarch *gdbarch,
3583 gdbarch_address_class_name_to_type_flags_ftype address_class_name_to_type_flags)
3585 gdbarch->address_class_name_to_type_flags = address_class_name_to_type_flags;
3589 gdbarch_register_reggroup_p (struct gdbarch *gdbarch, int regnum, struct reggroup *reggroup)
3591 gdb_assert (gdbarch != NULL);
3592 gdb_assert (gdbarch->register_reggroup_p != NULL);
3593 if (gdbarch_debug >= 2)
3594 fprintf_unfiltered (gdb_stdlog, "gdbarch_register_reggroup_p called\n");
3595 return gdbarch->register_reggroup_p (gdbarch, regnum, reggroup);
3599 set_gdbarch_register_reggroup_p (struct gdbarch *gdbarch,
3600 gdbarch_register_reggroup_p_ftype register_reggroup_p)
3602 gdbarch->register_reggroup_p = register_reggroup_p;
3606 gdbarch_fetch_pointer_argument_p (struct gdbarch *gdbarch)
3608 gdb_assert (gdbarch != NULL);
3609 return gdbarch->fetch_pointer_argument != NULL;
3613 gdbarch_fetch_pointer_argument (struct gdbarch *gdbarch, struct frame_info *frame, int argi, struct type *type)
3615 gdb_assert (gdbarch != NULL);
3616 gdb_assert (gdbarch->fetch_pointer_argument != NULL);
3617 if (gdbarch_debug >= 2)
3618 fprintf_unfiltered (gdb_stdlog, "gdbarch_fetch_pointer_argument called\n");
3619 return gdbarch->fetch_pointer_argument (frame, argi, type);
3623 set_gdbarch_fetch_pointer_argument (struct gdbarch *gdbarch,
3624 gdbarch_fetch_pointer_argument_ftype fetch_pointer_argument)
3626 gdbarch->fetch_pointer_argument = fetch_pointer_argument;
3630 gdbarch_iterate_over_regset_sections_p (struct gdbarch *gdbarch)
3632 gdb_assert (gdbarch != NULL);
3633 return gdbarch->iterate_over_regset_sections != NULL;
3637 gdbarch_iterate_over_regset_sections (struct gdbarch *gdbarch, iterate_over_regset_sections_cb *cb, void *cb_data, const struct regcache *regcache)
3639 gdb_assert (gdbarch != NULL);
3640 gdb_assert (gdbarch->iterate_over_regset_sections != NULL);
3641 if (gdbarch_debug >= 2)
3642 fprintf_unfiltered (gdb_stdlog, "gdbarch_iterate_over_regset_sections called\n");
3643 gdbarch->iterate_over_regset_sections (gdbarch, cb, cb_data, regcache);
3647 set_gdbarch_iterate_over_regset_sections (struct gdbarch *gdbarch,
3648 gdbarch_iterate_over_regset_sections_ftype iterate_over_regset_sections)
3650 gdbarch->iterate_over_regset_sections = iterate_over_regset_sections;
3654 gdbarch_make_corefile_notes_p (struct gdbarch *gdbarch)
3656 gdb_assert (gdbarch != NULL);
3657 return gdbarch->make_corefile_notes != NULL;
3661 gdbarch_make_corefile_notes (struct gdbarch *gdbarch, bfd *obfd, int *note_size)
3663 gdb_assert (gdbarch != NULL);
3664 gdb_assert (gdbarch->make_corefile_notes != NULL);
3665 if (gdbarch_debug >= 2)
3666 fprintf_unfiltered (gdb_stdlog, "gdbarch_make_corefile_notes called\n");
3667 return gdbarch->make_corefile_notes (gdbarch, obfd, note_size);
3671 set_gdbarch_make_corefile_notes (struct gdbarch *gdbarch,
3672 gdbarch_make_corefile_notes_ftype make_corefile_notes)
3674 gdbarch->make_corefile_notes = make_corefile_notes;
3678 gdbarch_find_memory_regions_p (struct gdbarch *gdbarch)
3680 gdb_assert (gdbarch != NULL);
3681 return gdbarch->find_memory_regions != NULL;
3685 gdbarch_find_memory_regions (struct gdbarch *gdbarch, find_memory_region_ftype func, void *data)
3687 gdb_assert (gdbarch != NULL);
3688 gdb_assert (gdbarch->find_memory_regions != NULL);
3689 if (gdbarch_debug >= 2)
3690 fprintf_unfiltered (gdb_stdlog, "gdbarch_find_memory_regions called\n");
3691 return gdbarch->find_memory_regions (gdbarch, func, data);
3695 set_gdbarch_find_memory_regions (struct gdbarch *gdbarch,
3696 gdbarch_find_memory_regions_ftype find_memory_regions)
3698 gdbarch->find_memory_regions = find_memory_regions;
3702 gdbarch_core_xfer_shared_libraries_p (struct gdbarch *gdbarch)
3704 gdb_assert (gdbarch != NULL);
3705 return gdbarch->core_xfer_shared_libraries != NULL;
3709 gdbarch_core_xfer_shared_libraries (struct gdbarch *gdbarch, gdb_byte *readbuf, ULONGEST offset, ULONGEST len)
3711 gdb_assert (gdbarch != NULL);
3712 gdb_assert (gdbarch->core_xfer_shared_libraries != NULL);
3713 if (gdbarch_debug >= 2)
3714 fprintf_unfiltered (gdb_stdlog, "gdbarch_core_xfer_shared_libraries called\n");
3715 return gdbarch->core_xfer_shared_libraries (gdbarch, readbuf, offset, len);
3719 set_gdbarch_core_xfer_shared_libraries (struct gdbarch *gdbarch,
3720 gdbarch_core_xfer_shared_libraries_ftype core_xfer_shared_libraries)
3722 gdbarch->core_xfer_shared_libraries = core_xfer_shared_libraries;
3726 gdbarch_core_xfer_shared_libraries_aix_p (struct gdbarch *gdbarch)
3728 gdb_assert (gdbarch != NULL);
3729 return gdbarch->core_xfer_shared_libraries_aix != NULL;
3733 gdbarch_core_xfer_shared_libraries_aix (struct gdbarch *gdbarch, gdb_byte *readbuf, ULONGEST offset, ULONGEST len)
3735 gdb_assert (gdbarch != NULL);
3736 gdb_assert (gdbarch->core_xfer_shared_libraries_aix != NULL);
3737 if (gdbarch_debug >= 2)
3738 fprintf_unfiltered (gdb_stdlog, "gdbarch_core_xfer_shared_libraries_aix called\n");
3739 return gdbarch->core_xfer_shared_libraries_aix (gdbarch, readbuf, offset, len);
3743 set_gdbarch_core_xfer_shared_libraries_aix (struct gdbarch *gdbarch,
3744 gdbarch_core_xfer_shared_libraries_aix_ftype core_xfer_shared_libraries_aix)
3746 gdbarch->core_xfer_shared_libraries_aix = core_xfer_shared_libraries_aix;
3750 gdbarch_core_pid_to_str_p (struct gdbarch *gdbarch)
3752 gdb_assert (gdbarch != NULL);
3753 return gdbarch->core_pid_to_str != NULL;
3757 gdbarch_core_pid_to_str (struct gdbarch *gdbarch, ptid_t ptid)
3759 gdb_assert (gdbarch != NULL);
3760 gdb_assert (gdbarch->core_pid_to_str != NULL);
3761 if (gdbarch_debug >= 2)
3762 fprintf_unfiltered (gdb_stdlog, "gdbarch_core_pid_to_str called\n");
3763 return gdbarch->core_pid_to_str (gdbarch, ptid);
3767 set_gdbarch_core_pid_to_str (struct gdbarch *gdbarch,
3768 gdbarch_core_pid_to_str_ftype core_pid_to_str)
3770 gdbarch->core_pid_to_str = core_pid_to_str;
3774 gdbarch_core_thread_name_p (struct gdbarch *gdbarch)
3776 gdb_assert (gdbarch != NULL);
3777 return gdbarch->core_thread_name != NULL;
3781 gdbarch_core_thread_name (struct gdbarch *gdbarch, struct thread_info *thr)
3783 gdb_assert (gdbarch != NULL);
3784 gdb_assert (gdbarch->core_thread_name != NULL);
3785 if (gdbarch_debug >= 2)
3786 fprintf_unfiltered (gdb_stdlog, "gdbarch_core_thread_name called\n");
3787 return gdbarch->core_thread_name (gdbarch, thr);
3791 set_gdbarch_core_thread_name (struct gdbarch *gdbarch,
3792 gdbarch_core_thread_name_ftype core_thread_name)
3794 gdbarch->core_thread_name = core_thread_name;
3798 gdbarch_core_xfer_siginfo_p (struct gdbarch *gdbarch)
3800 gdb_assert (gdbarch != NULL);
3801 return gdbarch->core_xfer_siginfo != NULL;
3805 gdbarch_core_xfer_siginfo (struct gdbarch *gdbarch, gdb_byte *readbuf, ULONGEST offset, ULONGEST len)
3807 gdb_assert (gdbarch != NULL);
3808 gdb_assert (gdbarch->core_xfer_siginfo != NULL);
3809 if (gdbarch_debug >= 2)
3810 fprintf_unfiltered (gdb_stdlog, "gdbarch_core_xfer_siginfo called\n");
3811 return gdbarch->core_xfer_siginfo (gdbarch, readbuf, offset, len);
3815 set_gdbarch_core_xfer_siginfo (struct gdbarch *gdbarch,
3816 gdbarch_core_xfer_siginfo_ftype core_xfer_siginfo)
3818 gdbarch->core_xfer_siginfo = core_xfer_siginfo;
3822 gdbarch_gcore_bfd_target_p (struct gdbarch *gdbarch)
3824 gdb_assert (gdbarch != NULL);
3825 return gdbarch->gcore_bfd_target != 0;
3829 gdbarch_gcore_bfd_target (struct gdbarch *gdbarch)
3831 gdb_assert (gdbarch != NULL);
3832 /* Check variable changed from pre-default. */
3833 gdb_assert (gdbarch->gcore_bfd_target != 0);
3834 if (gdbarch_debug >= 2)
3835 fprintf_unfiltered (gdb_stdlog, "gdbarch_gcore_bfd_target called\n");
3836 return gdbarch->gcore_bfd_target;
3840 set_gdbarch_gcore_bfd_target (struct gdbarch *gdbarch,
3841 const char * gcore_bfd_target)
3843 gdbarch->gcore_bfd_target = gcore_bfd_target;
3847 gdbarch_vtable_function_descriptors (struct gdbarch *gdbarch)
3849 gdb_assert (gdbarch != NULL);
3850 /* Skip verify of vtable_function_descriptors, invalid_p == 0 */
3851 if (gdbarch_debug >= 2)
3852 fprintf_unfiltered (gdb_stdlog, "gdbarch_vtable_function_descriptors called\n");
3853 return gdbarch->vtable_function_descriptors;
3857 set_gdbarch_vtable_function_descriptors (struct gdbarch *gdbarch,
3858 int vtable_function_descriptors)
3860 gdbarch->vtable_function_descriptors = vtable_function_descriptors;
3864 gdbarch_vbit_in_delta (struct gdbarch *gdbarch)
3866 gdb_assert (gdbarch != NULL);
3867 /* Skip verify of vbit_in_delta, invalid_p == 0 */
3868 if (gdbarch_debug >= 2)
3869 fprintf_unfiltered (gdb_stdlog, "gdbarch_vbit_in_delta called\n");
3870 return gdbarch->vbit_in_delta;
3874 set_gdbarch_vbit_in_delta (struct gdbarch *gdbarch,
3877 gdbarch->vbit_in_delta = vbit_in_delta;
3881 gdbarch_skip_permanent_breakpoint (struct gdbarch *gdbarch, struct regcache *regcache)
3883 gdb_assert (gdbarch != NULL);
3884 gdb_assert (gdbarch->skip_permanent_breakpoint != NULL);
3885 if (gdbarch_debug >= 2)
3886 fprintf_unfiltered (gdb_stdlog, "gdbarch_skip_permanent_breakpoint called\n");
3887 gdbarch->skip_permanent_breakpoint (regcache);
3891 set_gdbarch_skip_permanent_breakpoint (struct gdbarch *gdbarch,
3892 gdbarch_skip_permanent_breakpoint_ftype skip_permanent_breakpoint)
3894 gdbarch->skip_permanent_breakpoint = skip_permanent_breakpoint;
3898 gdbarch_max_insn_length_p (struct gdbarch *gdbarch)
3900 gdb_assert (gdbarch != NULL);
3901 return gdbarch->max_insn_length != 0;
3905 gdbarch_max_insn_length (struct gdbarch *gdbarch)
3907 gdb_assert (gdbarch != NULL);
3908 /* Check variable changed from pre-default. */
3909 gdb_assert (gdbarch->max_insn_length != 0);
3910 if (gdbarch_debug >= 2)
3911 fprintf_unfiltered (gdb_stdlog, "gdbarch_max_insn_length called\n");
3912 return gdbarch->max_insn_length;
3916 set_gdbarch_max_insn_length (struct gdbarch *gdbarch,
3917 ULONGEST max_insn_length)
3919 gdbarch->max_insn_length = max_insn_length;
3923 gdbarch_displaced_step_copy_insn_p (struct gdbarch *gdbarch)
3925 gdb_assert (gdbarch != NULL);
3926 return gdbarch->displaced_step_copy_insn != NULL;
3929 struct displaced_step_closure *
3930 gdbarch_displaced_step_copy_insn (struct gdbarch *gdbarch, CORE_ADDR from, CORE_ADDR to, struct regcache *regs)
3932 gdb_assert (gdbarch != NULL);
3933 gdb_assert (gdbarch->displaced_step_copy_insn != NULL);
3934 if (gdbarch_debug >= 2)
3935 fprintf_unfiltered (gdb_stdlog, "gdbarch_displaced_step_copy_insn called\n");
3936 return gdbarch->displaced_step_copy_insn (gdbarch, from, to, regs);
3940 set_gdbarch_displaced_step_copy_insn (struct gdbarch *gdbarch,
3941 gdbarch_displaced_step_copy_insn_ftype displaced_step_copy_insn)
3943 gdbarch->displaced_step_copy_insn = displaced_step_copy_insn;
3947 gdbarch_displaced_step_hw_singlestep (struct gdbarch *gdbarch, struct displaced_step_closure *closure)
3949 gdb_assert (gdbarch != NULL);
3950 gdb_assert (gdbarch->displaced_step_hw_singlestep != NULL);
3951 if (gdbarch_debug >= 2)
3952 fprintf_unfiltered (gdb_stdlog, "gdbarch_displaced_step_hw_singlestep called\n");
3953 return gdbarch->displaced_step_hw_singlestep (gdbarch, closure);
3957 set_gdbarch_displaced_step_hw_singlestep (struct gdbarch *gdbarch,
3958 gdbarch_displaced_step_hw_singlestep_ftype displaced_step_hw_singlestep)
3960 gdbarch->displaced_step_hw_singlestep = displaced_step_hw_singlestep;
3964 gdbarch_displaced_step_fixup_p (struct gdbarch *gdbarch)
3966 gdb_assert (gdbarch != NULL);
3967 return gdbarch->displaced_step_fixup != NULL;
3971 gdbarch_displaced_step_fixup (struct gdbarch *gdbarch, struct displaced_step_closure *closure, CORE_ADDR from, CORE_ADDR to, struct regcache *regs)
3973 gdb_assert (gdbarch != NULL);
3974 gdb_assert (gdbarch->displaced_step_fixup != NULL);
3975 /* Do not check predicate: gdbarch->displaced_step_fixup != NULL, allow call. */
3976 if (gdbarch_debug >= 2)
3977 fprintf_unfiltered (gdb_stdlog, "gdbarch_displaced_step_fixup called\n");
3978 gdbarch->displaced_step_fixup (gdbarch, closure, from, to, regs);
3982 set_gdbarch_displaced_step_fixup (struct gdbarch *gdbarch,
3983 gdbarch_displaced_step_fixup_ftype displaced_step_fixup)
3985 gdbarch->displaced_step_fixup = displaced_step_fixup;
3989 gdbarch_displaced_step_location (struct gdbarch *gdbarch)
3991 gdb_assert (gdbarch != NULL);
3992 gdb_assert (gdbarch->displaced_step_location != NULL);
3993 if (gdbarch_debug >= 2)
3994 fprintf_unfiltered (gdb_stdlog, "gdbarch_displaced_step_location called\n");
3995 return gdbarch->displaced_step_location (gdbarch);
3999 set_gdbarch_displaced_step_location (struct gdbarch *gdbarch,
4000 gdbarch_displaced_step_location_ftype displaced_step_location)
4002 gdbarch->displaced_step_location = displaced_step_location;
4006 gdbarch_relocate_instruction_p (struct gdbarch *gdbarch)
4008 gdb_assert (gdbarch != NULL);
4009 return gdbarch->relocate_instruction != NULL;
4013 gdbarch_relocate_instruction (struct gdbarch *gdbarch, CORE_ADDR *to, CORE_ADDR from)
4015 gdb_assert (gdbarch != NULL);
4016 gdb_assert (gdbarch->relocate_instruction != NULL);
4017 /* Do not check predicate: gdbarch->relocate_instruction != NULL, allow call. */
4018 if (gdbarch_debug >= 2)
4019 fprintf_unfiltered (gdb_stdlog, "gdbarch_relocate_instruction called\n");
4020 gdbarch->relocate_instruction (gdbarch, to, from);
4024 set_gdbarch_relocate_instruction (struct gdbarch *gdbarch,
4025 gdbarch_relocate_instruction_ftype relocate_instruction)
4027 gdbarch->relocate_instruction = relocate_instruction;
4031 gdbarch_overlay_update_p (struct gdbarch *gdbarch)
4033 gdb_assert (gdbarch != NULL);
4034 return gdbarch->overlay_update != NULL;
4038 gdbarch_overlay_update (struct gdbarch *gdbarch, struct obj_section *osect)
4040 gdb_assert (gdbarch != NULL);
4041 gdb_assert (gdbarch->overlay_update != NULL);
4042 if (gdbarch_debug >= 2)
4043 fprintf_unfiltered (gdb_stdlog, "gdbarch_overlay_update called\n");
4044 gdbarch->overlay_update (osect);
4048 set_gdbarch_overlay_update (struct gdbarch *gdbarch,
4049 gdbarch_overlay_update_ftype overlay_update)
4051 gdbarch->overlay_update = overlay_update;
4055 gdbarch_core_read_description_p (struct gdbarch *gdbarch)
4057 gdb_assert (gdbarch != NULL);
4058 return gdbarch->core_read_description != NULL;
4061 const struct target_desc *
4062 gdbarch_core_read_description (struct gdbarch *gdbarch, struct target_ops *target, bfd *abfd)
4064 gdb_assert (gdbarch != NULL);
4065 gdb_assert (gdbarch->core_read_description != NULL);
4066 if (gdbarch_debug >= 2)
4067 fprintf_unfiltered (gdb_stdlog, "gdbarch_core_read_description called\n");
4068 return gdbarch->core_read_description (gdbarch, target, abfd);
4072 set_gdbarch_core_read_description (struct gdbarch *gdbarch,
4073 gdbarch_core_read_description_ftype core_read_description)
4075 gdbarch->core_read_description = core_read_description;
4079 gdbarch_static_transform_name_p (struct gdbarch *gdbarch)
4081 gdb_assert (gdbarch != NULL);
4082 return gdbarch->static_transform_name != NULL;
4086 gdbarch_static_transform_name (struct gdbarch *gdbarch, const char *name)
4088 gdb_assert (gdbarch != NULL);
4089 gdb_assert (gdbarch->static_transform_name != NULL);
4090 if (gdbarch_debug >= 2)
4091 fprintf_unfiltered (gdb_stdlog, "gdbarch_static_transform_name called\n");
4092 return gdbarch->static_transform_name (name);
4096 set_gdbarch_static_transform_name (struct gdbarch *gdbarch,
4097 gdbarch_static_transform_name_ftype static_transform_name)
4099 gdbarch->static_transform_name = static_transform_name;
4103 gdbarch_sofun_address_maybe_missing (struct gdbarch *gdbarch)
4105 gdb_assert (gdbarch != NULL);
4106 /* Skip verify of sofun_address_maybe_missing, invalid_p == 0 */
4107 if (gdbarch_debug >= 2)
4108 fprintf_unfiltered (gdb_stdlog, "gdbarch_sofun_address_maybe_missing called\n");
4109 return gdbarch->sofun_address_maybe_missing;
4113 set_gdbarch_sofun_address_maybe_missing (struct gdbarch *gdbarch,
4114 int sofun_address_maybe_missing)
4116 gdbarch->sofun_address_maybe_missing = sofun_address_maybe_missing;
4120 gdbarch_process_record_p (struct gdbarch *gdbarch)
4122 gdb_assert (gdbarch != NULL);
4123 return gdbarch->process_record != NULL;
4127 gdbarch_process_record (struct gdbarch *gdbarch, struct regcache *regcache, CORE_ADDR addr)
4129 gdb_assert (gdbarch != NULL);
4130 gdb_assert (gdbarch->process_record != NULL);
4131 if (gdbarch_debug >= 2)
4132 fprintf_unfiltered (gdb_stdlog, "gdbarch_process_record called\n");
4133 return gdbarch->process_record (gdbarch, regcache, addr);
4137 set_gdbarch_process_record (struct gdbarch *gdbarch,
4138 gdbarch_process_record_ftype process_record)
4140 gdbarch->process_record = process_record;
4144 gdbarch_process_record_signal_p (struct gdbarch *gdbarch)
4146 gdb_assert (gdbarch != NULL);
4147 return gdbarch->process_record_signal != NULL;
4151 gdbarch_process_record_signal (struct gdbarch *gdbarch, struct regcache *regcache, enum gdb_signal signal)
4153 gdb_assert (gdbarch != NULL);
4154 gdb_assert (gdbarch->process_record_signal != NULL);
4155 if (gdbarch_debug >= 2)
4156 fprintf_unfiltered (gdb_stdlog, "gdbarch_process_record_signal called\n");
4157 return gdbarch->process_record_signal (gdbarch, regcache, signal);
4161 set_gdbarch_process_record_signal (struct gdbarch *gdbarch,
4162 gdbarch_process_record_signal_ftype process_record_signal)
4164 gdbarch->process_record_signal = process_record_signal;
4168 gdbarch_gdb_signal_from_target_p (struct gdbarch *gdbarch)
4170 gdb_assert (gdbarch != NULL);
4171 return gdbarch->gdb_signal_from_target != NULL;
4175 gdbarch_gdb_signal_from_target (struct gdbarch *gdbarch, int signo)
4177 gdb_assert (gdbarch != NULL);
4178 gdb_assert (gdbarch->gdb_signal_from_target != NULL);
4179 if (gdbarch_debug >= 2)
4180 fprintf_unfiltered (gdb_stdlog, "gdbarch_gdb_signal_from_target called\n");
4181 return gdbarch->gdb_signal_from_target (gdbarch, signo);
4185 set_gdbarch_gdb_signal_from_target (struct gdbarch *gdbarch,
4186 gdbarch_gdb_signal_from_target_ftype gdb_signal_from_target)
4188 gdbarch->gdb_signal_from_target = gdb_signal_from_target;
4192 gdbarch_gdb_signal_to_target_p (struct gdbarch *gdbarch)
4194 gdb_assert (gdbarch != NULL);
4195 return gdbarch->gdb_signal_to_target != NULL;
4199 gdbarch_gdb_signal_to_target (struct gdbarch *gdbarch, enum gdb_signal signal)
4201 gdb_assert (gdbarch != NULL);
4202 gdb_assert (gdbarch->gdb_signal_to_target != NULL);
4203 if (gdbarch_debug >= 2)
4204 fprintf_unfiltered (gdb_stdlog, "gdbarch_gdb_signal_to_target called\n");
4205 return gdbarch->gdb_signal_to_target (gdbarch, signal);
4209 set_gdbarch_gdb_signal_to_target (struct gdbarch *gdbarch,
4210 gdbarch_gdb_signal_to_target_ftype gdb_signal_to_target)
4212 gdbarch->gdb_signal_to_target = gdb_signal_to_target;
4216 gdbarch_get_siginfo_type_p (struct gdbarch *gdbarch)
4218 gdb_assert (gdbarch != NULL);
4219 return gdbarch->get_siginfo_type != NULL;
4223 gdbarch_get_siginfo_type (struct gdbarch *gdbarch)
4225 gdb_assert (gdbarch != NULL);
4226 gdb_assert (gdbarch->get_siginfo_type != NULL);
4227 if (gdbarch_debug >= 2)
4228 fprintf_unfiltered (gdb_stdlog, "gdbarch_get_siginfo_type called\n");
4229 return gdbarch->get_siginfo_type (gdbarch);
4233 set_gdbarch_get_siginfo_type (struct gdbarch *gdbarch,
4234 gdbarch_get_siginfo_type_ftype get_siginfo_type)
4236 gdbarch->get_siginfo_type = get_siginfo_type;
4240 gdbarch_record_special_symbol_p (struct gdbarch *gdbarch)
4242 gdb_assert (gdbarch != NULL);
4243 return gdbarch->record_special_symbol != NULL;
4247 gdbarch_record_special_symbol (struct gdbarch *gdbarch, struct objfile *objfile, asymbol *sym)
4249 gdb_assert (gdbarch != NULL);
4250 gdb_assert (gdbarch->record_special_symbol != NULL);
4251 if (gdbarch_debug >= 2)
4252 fprintf_unfiltered (gdb_stdlog, "gdbarch_record_special_symbol called\n");
4253 gdbarch->record_special_symbol (gdbarch, objfile, sym);
4257 set_gdbarch_record_special_symbol (struct gdbarch *gdbarch,
4258 gdbarch_record_special_symbol_ftype record_special_symbol)
4260 gdbarch->record_special_symbol = record_special_symbol;
4264 gdbarch_get_syscall_number_p (struct gdbarch *gdbarch)
4266 gdb_assert (gdbarch != NULL);
4267 return gdbarch->get_syscall_number != NULL;
4271 gdbarch_get_syscall_number (struct gdbarch *gdbarch, ptid_t ptid)
4273 gdb_assert (gdbarch != NULL);
4274 gdb_assert (gdbarch->get_syscall_number != NULL);
4275 if (gdbarch_debug >= 2)
4276 fprintf_unfiltered (gdb_stdlog, "gdbarch_get_syscall_number called\n");
4277 return gdbarch->get_syscall_number (gdbarch, ptid);
4281 set_gdbarch_get_syscall_number (struct gdbarch *gdbarch,
4282 gdbarch_get_syscall_number_ftype get_syscall_number)
4284 gdbarch->get_syscall_number = get_syscall_number;
4288 gdbarch_xml_syscall_file (struct gdbarch *gdbarch)
4290 gdb_assert (gdbarch != NULL);
4291 /* Skip verify of xml_syscall_file, invalid_p == 0 */
4292 if (gdbarch_debug >= 2)
4293 fprintf_unfiltered (gdb_stdlog, "gdbarch_xml_syscall_file called\n");
4294 return gdbarch->xml_syscall_file;
4298 set_gdbarch_xml_syscall_file (struct gdbarch *gdbarch,
4299 const char * xml_syscall_file)
4301 gdbarch->xml_syscall_file = xml_syscall_file;
4304 struct syscalls_info *
4305 gdbarch_syscalls_info (struct gdbarch *gdbarch)
4307 gdb_assert (gdbarch != NULL);
4308 /* Skip verify of syscalls_info, invalid_p == 0 */
4309 if (gdbarch_debug >= 2)
4310 fprintf_unfiltered (gdb_stdlog, "gdbarch_syscalls_info called\n");
4311 return gdbarch->syscalls_info;
4315 set_gdbarch_syscalls_info (struct gdbarch *gdbarch,
4316 struct syscalls_info * syscalls_info)
4318 gdbarch->syscalls_info = syscalls_info;
4322 gdbarch_stap_integer_prefixes (struct gdbarch *gdbarch)
4324 gdb_assert (gdbarch != NULL);
4325 /* Skip verify of stap_integer_prefixes, invalid_p == 0 */
4326 if (gdbarch_debug >= 2)
4327 fprintf_unfiltered (gdb_stdlog, "gdbarch_stap_integer_prefixes called\n");
4328 return gdbarch->stap_integer_prefixes;
4332 set_gdbarch_stap_integer_prefixes (struct gdbarch *gdbarch,
4333 const char *const * stap_integer_prefixes)
4335 gdbarch->stap_integer_prefixes = stap_integer_prefixes;
4339 gdbarch_stap_integer_suffixes (struct gdbarch *gdbarch)
4341 gdb_assert (gdbarch != NULL);
4342 /* Skip verify of stap_integer_suffixes, invalid_p == 0 */
4343 if (gdbarch_debug >= 2)
4344 fprintf_unfiltered (gdb_stdlog, "gdbarch_stap_integer_suffixes called\n");
4345 return gdbarch->stap_integer_suffixes;
4349 set_gdbarch_stap_integer_suffixes (struct gdbarch *gdbarch,
4350 const char *const * stap_integer_suffixes)
4352 gdbarch->stap_integer_suffixes = stap_integer_suffixes;
4356 gdbarch_stap_register_prefixes (struct gdbarch *gdbarch)
4358 gdb_assert (gdbarch != NULL);
4359 /* Skip verify of stap_register_prefixes, invalid_p == 0 */
4360 if (gdbarch_debug >= 2)
4361 fprintf_unfiltered (gdb_stdlog, "gdbarch_stap_register_prefixes called\n");
4362 return gdbarch->stap_register_prefixes;
4366 set_gdbarch_stap_register_prefixes (struct gdbarch *gdbarch,
4367 const char *const * stap_register_prefixes)
4369 gdbarch->stap_register_prefixes = stap_register_prefixes;
4373 gdbarch_stap_register_suffixes (struct gdbarch *gdbarch)
4375 gdb_assert (gdbarch != NULL);
4376 /* Skip verify of stap_register_suffixes, invalid_p == 0 */
4377 if (gdbarch_debug >= 2)
4378 fprintf_unfiltered (gdb_stdlog, "gdbarch_stap_register_suffixes called\n");
4379 return gdbarch->stap_register_suffixes;
4383 set_gdbarch_stap_register_suffixes (struct gdbarch *gdbarch,
4384 const char *const * stap_register_suffixes)
4386 gdbarch->stap_register_suffixes = stap_register_suffixes;
4390 gdbarch_stap_register_indirection_prefixes (struct gdbarch *gdbarch)
4392 gdb_assert (gdbarch != NULL);
4393 /* Skip verify of stap_register_indirection_prefixes, invalid_p == 0 */
4394 if (gdbarch_debug >= 2)
4395 fprintf_unfiltered (gdb_stdlog, "gdbarch_stap_register_indirection_prefixes called\n");
4396 return gdbarch->stap_register_indirection_prefixes;
4400 set_gdbarch_stap_register_indirection_prefixes (struct gdbarch *gdbarch,
4401 const char *const * stap_register_indirection_prefixes)
4403 gdbarch->stap_register_indirection_prefixes = stap_register_indirection_prefixes;
4407 gdbarch_stap_register_indirection_suffixes (struct gdbarch *gdbarch)
4409 gdb_assert (gdbarch != NULL);
4410 /* Skip verify of stap_register_indirection_suffixes, invalid_p == 0 */
4411 if (gdbarch_debug >= 2)
4412 fprintf_unfiltered (gdb_stdlog, "gdbarch_stap_register_indirection_suffixes called\n");
4413 return gdbarch->stap_register_indirection_suffixes;
4417 set_gdbarch_stap_register_indirection_suffixes (struct gdbarch *gdbarch,
4418 const char *const * stap_register_indirection_suffixes)
4420 gdbarch->stap_register_indirection_suffixes = stap_register_indirection_suffixes;
4424 gdbarch_stap_gdb_register_prefix (struct gdbarch *gdbarch)
4426 gdb_assert (gdbarch != NULL);
4427 /* Skip verify of stap_gdb_register_prefix, invalid_p == 0 */
4428 if (gdbarch_debug >= 2)
4429 fprintf_unfiltered (gdb_stdlog, "gdbarch_stap_gdb_register_prefix called\n");
4430 return gdbarch->stap_gdb_register_prefix;
4434 set_gdbarch_stap_gdb_register_prefix (struct gdbarch *gdbarch,
4435 const char * stap_gdb_register_prefix)
4437 gdbarch->stap_gdb_register_prefix = stap_gdb_register_prefix;
4441 gdbarch_stap_gdb_register_suffix (struct gdbarch *gdbarch)
4443 gdb_assert (gdbarch != NULL);
4444 /* Skip verify of stap_gdb_register_suffix, invalid_p == 0 */
4445 if (gdbarch_debug >= 2)
4446 fprintf_unfiltered (gdb_stdlog, "gdbarch_stap_gdb_register_suffix called\n");
4447 return gdbarch->stap_gdb_register_suffix;
4451 set_gdbarch_stap_gdb_register_suffix (struct gdbarch *gdbarch,
4452 const char * stap_gdb_register_suffix)
4454 gdbarch->stap_gdb_register_suffix = stap_gdb_register_suffix;
4458 gdbarch_stap_is_single_operand_p (struct gdbarch *gdbarch)
4460 gdb_assert (gdbarch != NULL);
4461 return gdbarch->stap_is_single_operand != NULL;
4465 gdbarch_stap_is_single_operand (struct gdbarch *gdbarch, const char *s)
4467 gdb_assert (gdbarch != NULL);
4468 gdb_assert (gdbarch->stap_is_single_operand != NULL);
4469 if (gdbarch_debug >= 2)
4470 fprintf_unfiltered (gdb_stdlog, "gdbarch_stap_is_single_operand called\n");
4471 return gdbarch->stap_is_single_operand (gdbarch, s);
4475 set_gdbarch_stap_is_single_operand (struct gdbarch *gdbarch,
4476 gdbarch_stap_is_single_operand_ftype stap_is_single_operand)
4478 gdbarch->stap_is_single_operand = stap_is_single_operand;
4482 gdbarch_stap_parse_special_token_p (struct gdbarch *gdbarch)
4484 gdb_assert (gdbarch != NULL);
4485 return gdbarch->stap_parse_special_token != NULL;
4489 gdbarch_stap_parse_special_token (struct gdbarch *gdbarch, struct stap_parse_info *p)
4491 gdb_assert (gdbarch != NULL);
4492 gdb_assert (gdbarch->stap_parse_special_token != NULL);
4493 if (gdbarch_debug >= 2)
4494 fprintf_unfiltered (gdb_stdlog, "gdbarch_stap_parse_special_token called\n");
4495 return gdbarch->stap_parse_special_token (gdbarch, p);
4499 set_gdbarch_stap_parse_special_token (struct gdbarch *gdbarch,
4500 gdbarch_stap_parse_special_token_ftype stap_parse_special_token)
4502 gdbarch->stap_parse_special_token = stap_parse_special_token;
4506 gdbarch_dtrace_parse_probe_argument_p (struct gdbarch *gdbarch)
4508 gdb_assert (gdbarch != NULL);
4509 return gdbarch->dtrace_parse_probe_argument != NULL;
4513 gdbarch_dtrace_parse_probe_argument (struct gdbarch *gdbarch, struct parser_state *pstate, int narg)
4515 gdb_assert (gdbarch != NULL);
4516 gdb_assert (gdbarch->dtrace_parse_probe_argument != NULL);
4517 if (gdbarch_debug >= 2)
4518 fprintf_unfiltered (gdb_stdlog, "gdbarch_dtrace_parse_probe_argument called\n");
4519 gdbarch->dtrace_parse_probe_argument (gdbarch, pstate, narg);
4523 set_gdbarch_dtrace_parse_probe_argument (struct gdbarch *gdbarch,
4524 gdbarch_dtrace_parse_probe_argument_ftype dtrace_parse_probe_argument)
4526 gdbarch->dtrace_parse_probe_argument = dtrace_parse_probe_argument;
4530 gdbarch_dtrace_probe_is_enabled_p (struct gdbarch *gdbarch)
4532 gdb_assert (gdbarch != NULL);
4533 return gdbarch->dtrace_probe_is_enabled != NULL;
4537 gdbarch_dtrace_probe_is_enabled (struct gdbarch *gdbarch, CORE_ADDR addr)
4539 gdb_assert (gdbarch != NULL);
4540 gdb_assert (gdbarch->dtrace_probe_is_enabled != NULL);
4541 if (gdbarch_debug >= 2)
4542 fprintf_unfiltered (gdb_stdlog, "gdbarch_dtrace_probe_is_enabled called\n");
4543 return gdbarch->dtrace_probe_is_enabled (gdbarch, addr);
4547 set_gdbarch_dtrace_probe_is_enabled (struct gdbarch *gdbarch,
4548 gdbarch_dtrace_probe_is_enabled_ftype dtrace_probe_is_enabled)
4550 gdbarch->dtrace_probe_is_enabled = dtrace_probe_is_enabled;
4554 gdbarch_dtrace_enable_probe_p (struct gdbarch *gdbarch)
4556 gdb_assert (gdbarch != NULL);
4557 return gdbarch->dtrace_enable_probe != NULL;
4561 gdbarch_dtrace_enable_probe (struct gdbarch *gdbarch, CORE_ADDR addr)
4563 gdb_assert (gdbarch != NULL);
4564 gdb_assert (gdbarch->dtrace_enable_probe != NULL);
4565 if (gdbarch_debug >= 2)
4566 fprintf_unfiltered (gdb_stdlog, "gdbarch_dtrace_enable_probe called\n");
4567 gdbarch->dtrace_enable_probe (gdbarch, addr);
4571 set_gdbarch_dtrace_enable_probe (struct gdbarch *gdbarch,
4572 gdbarch_dtrace_enable_probe_ftype dtrace_enable_probe)
4574 gdbarch->dtrace_enable_probe = dtrace_enable_probe;
4578 gdbarch_dtrace_disable_probe_p (struct gdbarch *gdbarch)
4580 gdb_assert (gdbarch != NULL);
4581 return gdbarch->dtrace_disable_probe != NULL;
4585 gdbarch_dtrace_disable_probe (struct gdbarch *gdbarch, CORE_ADDR addr)
4587 gdb_assert (gdbarch != NULL);
4588 gdb_assert (gdbarch->dtrace_disable_probe != NULL);
4589 if (gdbarch_debug >= 2)
4590 fprintf_unfiltered (gdb_stdlog, "gdbarch_dtrace_disable_probe called\n");
4591 gdbarch->dtrace_disable_probe (gdbarch, addr);
4595 set_gdbarch_dtrace_disable_probe (struct gdbarch *gdbarch,
4596 gdbarch_dtrace_disable_probe_ftype dtrace_disable_probe)
4598 gdbarch->dtrace_disable_probe = dtrace_disable_probe;
4602 gdbarch_has_global_solist (struct gdbarch *gdbarch)
4604 gdb_assert (gdbarch != NULL);
4605 /* Skip verify of has_global_solist, invalid_p == 0 */
4606 if (gdbarch_debug >= 2)
4607 fprintf_unfiltered (gdb_stdlog, "gdbarch_has_global_solist called\n");
4608 return gdbarch->has_global_solist;
4612 set_gdbarch_has_global_solist (struct gdbarch *gdbarch,
4613 int has_global_solist)
4615 gdbarch->has_global_solist = has_global_solist;
4619 gdbarch_has_global_breakpoints (struct gdbarch *gdbarch)
4621 gdb_assert (gdbarch != NULL);
4622 /* Skip verify of has_global_breakpoints, invalid_p == 0 */
4623 if (gdbarch_debug >= 2)
4624 fprintf_unfiltered (gdb_stdlog, "gdbarch_has_global_breakpoints called\n");
4625 return gdbarch->has_global_breakpoints;
4629 set_gdbarch_has_global_breakpoints (struct gdbarch *gdbarch,
4630 int has_global_breakpoints)
4632 gdbarch->has_global_breakpoints = has_global_breakpoints;
4636 gdbarch_has_shared_address_space (struct gdbarch *gdbarch)
4638 gdb_assert (gdbarch != NULL);
4639 gdb_assert (gdbarch->has_shared_address_space != NULL);
4640 if (gdbarch_debug >= 2)
4641 fprintf_unfiltered (gdb_stdlog, "gdbarch_has_shared_address_space called\n");
4642 return gdbarch->has_shared_address_space (gdbarch);
4646 set_gdbarch_has_shared_address_space (struct gdbarch *gdbarch,
4647 gdbarch_has_shared_address_space_ftype has_shared_address_space)
4649 gdbarch->has_shared_address_space = has_shared_address_space;
4653 gdbarch_fast_tracepoint_valid_at (struct gdbarch *gdbarch, CORE_ADDR addr, char **msg)
4655 gdb_assert (gdbarch != NULL);
4656 gdb_assert (gdbarch->fast_tracepoint_valid_at != NULL);
4657 if (gdbarch_debug >= 2)
4658 fprintf_unfiltered (gdb_stdlog, "gdbarch_fast_tracepoint_valid_at called\n");
4659 return gdbarch->fast_tracepoint_valid_at (gdbarch, addr, msg);
4663 set_gdbarch_fast_tracepoint_valid_at (struct gdbarch *gdbarch,
4664 gdbarch_fast_tracepoint_valid_at_ftype fast_tracepoint_valid_at)
4666 gdbarch->fast_tracepoint_valid_at = fast_tracepoint_valid_at;
4670 gdbarch_guess_tracepoint_registers (struct gdbarch *gdbarch, struct regcache *regcache, CORE_ADDR addr)
4672 gdb_assert (gdbarch != NULL);
4673 gdb_assert (gdbarch->guess_tracepoint_registers != NULL);
4674 if (gdbarch_debug >= 2)
4675 fprintf_unfiltered (gdb_stdlog, "gdbarch_guess_tracepoint_registers called\n");
4676 gdbarch->guess_tracepoint_registers (gdbarch, regcache, addr);
4680 set_gdbarch_guess_tracepoint_registers (struct gdbarch *gdbarch,
4681 gdbarch_guess_tracepoint_registers_ftype guess_tracepoint_registers)
4683 gdbarch->guess_tracepoint_registers = guess_tracepoint_registers;
4687 gdbarch_auto_charset (struct gdbarch *gdbarch)
4689 gdb_assert (gdbarch != NULL);
4690 gdb_assert (gdbarch->auto_charset != NULL);
4691 if (gdbarch_debug >= 2)
4692 fprintf_unfiltered (gdb_stdlog, "gdbarch_auto_charset called\n");
4693 return gdbarch->auto_charset ();
4697 set_gdbarch_auto_charset (struct gdbarch *gdbarch,
4698 gdbarch_auto_charset_ftype auto_charset)
4700 gdbarch->auto_charset = auto_charset;
4704 gdbarch_auto_wide_charset (struct gdbarch *gdbarch)
4706 gdb_assert (gdbarch != NULL);
4707 gdb_assert (gdbarch->auto_wide_charset != NULL);
4708 if (gdbarch_debug >= 2)
4709 fprintf_unfiltered (gdb_stdlog, "gdbarch_auto_wide_charset called\n");
4710 return gdbarch->auto_wide_charset ();
4714 set_gdbarch_auto_wide_charset (struct gdbarch *gdbarch,
4715 gdbarch_auto_wide_charset_ftype auto_wide_charset)
4717 gdbarch->auto_wide_charset = auto_wide_charset;
4721 gdbarch_solib_symbols_extension (struct gdbarch *gdbarch)
4723 gdb_assert (gdbarch != NULL);
4724 if (gdbarch_debug >= 2)
4725 fprintf_unfiltered (gdb_stdlog, "gdbarch_solib_symbols_extension called\n");
4726 return gdbarch->solib_symbols_extension;
4730 set_gdbarch_solib_symbols_extension (struct gdbarch *gdbarch,
4731 const char * solib_symbols_extension)
4733 gdbarch->solib_symbols_extension = solib_symbols_extension;
4737 gdbarch_has_dos_based_file_system (struct gdbarch *gdbarch)
4739 gdb_assert (gdbarch != NULL);
4740 /* Skip verify of has_dos_based_file_system, invalid_p == 0 */
4741 if (gdbarch_debug >= 2)
4742 fprintf_unfiltered (gdb_stdlog, "gdbarch_has_dos_based_file_system called\n");
4743 return gdbarch->has_dos_based_file_system;
4747 set_gdbarch_has_dos_based_file_system (struct gdbarch *gdbarch,
4748 int has_dos_based_file_system)
4750 gdbarch->has_dos_based_file_system = has_dos_based_file_system;
4754 gdbarch_gen_return_address (struct gdbarch *gdbarch, struct agent_expr *ax, struct axs_value *value, CORE_ADDR scope)
4756 gdb_assert (gdbarch != NULL);
4757 gdb_assert (gdbarch->gen_return_address != NULL);
4758 if (gdbarch_debug >= 2)
4759 fprintf_unfiltered (gdb_stdlog, "gdbarch_gen_return_address called\n");
4760 gdbarch->gen_return_address (gdbarch, ax, value, scope);
4764 set_gdbarch_gen_return_address (struct gdbarch *gdbarch,
4765 gdbarch_gen_return_address_ftype gen_return_address)
4767 gdbarch->gen_return_address = gen_return_address;
4771 gdbarch_info_proc_p (struct gdbarch *gdbarch)
4773 gdb_assert (gdbarch != NULL);
4774 return gdbarch->info_proc != NULL;
4778 gdbarch_info_proc (struct gdbarch *gdbarch, const char *args, enum info_proc_what what)
4780 gdb_assert (gdbarch != NULL);
4781 gdb_assert (gdbarch->info_proc != NULL);
4782 if (gdbarch_debug >= 2)
4783 fprintf_unfiltered (gdb_stdlog, "gdbarch_info_proc called\n");
4784 gdbarch->info_proc (gdbarch, args, what);
4788 set_gdbarch_info_proc (struct gdbarch *gdbarch,
4789 gdbarch_info_proc_ftype info_proc)
4791 gdbarch->info_proc = info_proc;
4795 gdbarch_core_info_proc_p (struct gdbarch *gdbarch)
4797 gdb_assert (gdbarch != NULL);
4798 return gdbarch->core_info_proc != NULL;
4802 gdbarch_core_info_proc (struct gdbarch *gdbarch, const char *args, enum info_proc_what what)
4804 gdb_assert (gdbarch != NULL);
4805 gdb_assert (gdbarch->core_info_proc != NULL);
4806 if (gdbarch_debug >= 2)
4807 fprintf_unfiltered (gdb_stdlog, "gdbarch_core_info_proc called\n");
4808 gdbarch->core_info_proc (gdbarch, args, what);
4812 set_gdbarch_core_info_proc (struct gdbarch *gdbarch,
4813 gdbarch_core_info_proc_ftype core_info_proc)
4815 gdbarch->core_info_proc = core_info_proc;
4819 gdbarch_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)
4821 gdb_assert (gdbarch != NULL);
4822 gdb_assert (gdbarch->iterate_over_objfiles_in_search_order != NULL);
4823 if (gdbarch_debug >= 2)
4824 fprintf_unfiltered (gdb_stdlog, "gdbarch_iterate_over_objfiles_in_search_order called\n");
4825 gdbarch->iterate_over_objfiles_in_search_order (gdbarch, cb, cb_data, current_objfile);
4829 set_gdbarch_iterate_over_objfiles_in_search_order (struct gdbarch *gdbarch,
4830 gdbarch_iterate_over_objfiles_in_search_order_ftype iterate_over_objfiles_in_search_order)
4832 gdbarch->iterate_over_objfiles_in_search_order = iterate_over_objfiles_in_search_order;
4835 struct ravenscar_arch_ops *
4836 gdbarch_ravenscar_ops (struct gdbarch *gdbarch)
4838 gdb_assert (gdbarch != NULL);
4839 /* Skip verify of ravenscar_ops, invalid_p == 0 */
4840 if (gdbarch_debug >= 2)
4841 fprintf_unfiltered (gdb_stdlog, "gdbarch_ravenscar_ops called\n");
4842 return gdbarch->ravenscar_ops;
4846 set_gdbarch_ravenscar_ops (struct gdbarch *gdbarch,
4847 struct ravenscar_arch_ops * ravenscar_ops)
4849 gdbarch->ravenscar_ops = ravenscar_ops;
4853 gdbarch_insn_is_call (struct gdbarch *gdbarch, CORE_ADDR addr)
4855 gdb_assert (gdbarch != NULL);
4856 gdb_assert (gdbarch->insn_is_call != NULL);
4857 if (gdbarch_debug >= 2)
4858 fprintf_unfiltered (gdb_stdlog, "gdbarch_insn_is_call called\n");
4859 return gdbarch->insn_is_call (gdbarch, addr);
4863 set_gdbarch_insn_is_call (struct gdbarch *gdbarch,
4864 gdbarch_insn_is_call_ftype insn_is_call)
4866 gdbarch->insn_is_call = insn_is_call;
4870 gdbarch_insn_is_ret (struct gdbarch *gdbarch, CORE_ADDR addr)
4872 gdb_assert (gdbarch != NULL);
4873 gdb_assert (gdbarch->insn_is_ret != NULL);
4874 if (gdbarch_debug >= 2)
4875 fprintf_unfiltered (gdb_stdlog, "gdbarch_insn_is_ret called\n");
4876 return gdbarch->insn_is_ret (gdbarch, addr);
4880 set_gdbarch_insn_is_ret (struct gdbarch *gdbarch,
4881 gdbarch_insn_is_ret_ftype insn_is_ret)
4883 gdbarch->insn_is_ret = insn_is_ret;
4887 gdbarch_insn_is_jump (struct gdbarch *gdbarch, CORE_ADDR addr)
4889 gdb_assert (gdbarch != NULL);
4890 gdb_assert (gdbarch->insn_is_jump != NULL);
4891 if (gdbarch_debug >= 2)
4892 fprintf_unfiltered (gdb_stdlog, "gdbarch_insn_is_jump called\n");
4893 return gdbarch->insn_is_jump (gdbarch, addr);
4897 set_gdbarch_insn_is_jump (struct gdbarch *gdbarch,
4898 gdbarch_insn_is_jump_ftype insn_is_jump)
4900 gdbarch->insn_is_jump = insn_is_jump;
4904 gdbarch_auxv_parse_p (struct gdbarch *gdbarch)
4906 gdb_assert (gdbarch != NULL);
4907 return gdbarch->auxv_parse != NULL;
4911 gdbarch_auxv_parse (struct gdbarch *gdbarch, gdb_byte **readptr, gdb_byte *endptr, CORE_ADDR *typep, CORE_ADDR *valp)
4913 gdb_assert (gdbarch != NULL);
4914 gdb_assert (gdbarch->auxv_parse != NULL);
4915 if (gdbarch_debug >= 2)
4916 fprintf_unfiltered (gdb_stdlog, "gdbarch_auxv_parse called\n");
4917 return gdbarch->auxv_parse (gdbarch, readptr, endptr, typep, valp);
4921 set_gdbarch_auxv_parse (struct gdbarch *gdbarch,
4922 gdbarch_auxv_parse_ftype auxv_parse)
4924 gdbarch->auxv_parse = auxv_parse;
4928 gdbarch_print_auxv_entry (struct gdbarch *gdbarch, struct ui_file *file, CORE_ADDR type, CORE_ADDR val)
4930 gdb_assert (gdbarch != NULL);
4931 gdb_assert (gdbarch->print_auxv_entry != NULL);
4932 if (gdbarch_debug >= 2)
4933 fprintf_unfiltered (gdb_stdlog, "gdbarch_print_auxv_entry called\n");
4934 gdbarch->print_auxv_entry (gdbarch, file, type, val);
4938 set_gdbarch_print_auxv_entry (struct gdbarch *gdbarch,
4939 gdbarch_print_auxv_entry_ftype print_auxv_entry)
4941 gdbarch->print_auxv_entry = print_auxv_entry;
4945 gdbarch_vsyscall_range (struct gdbarch *gdbarch, struct mem_range *range)
4947 gdb_assert (gdbarch != NULL);
4948 gdb_assert (gdbarch->vsyscall_range != NULL);
4949 if (gdbarch_debug >= 2)
4950 fprintf_unfiltered (gdb_stdlog, "gdbarch_vsyscall_range called\n");
4951 return gdbarch->vsyscall_range (gdbarch, range);
4955 set_gdbarch_vsyscall_range (struct gdbarch *gdbarch,
4956 gdbarch_vsyscall_range_ftype vsyscall_range)
4958 gdbarch->vsyscall_range = vsyscall_range;
4962 gdbarch_infcall_mmap (struct gdbarch *gdbarch, CORE_ADDR size, unsigned prot)
4964 gdb_assert (gdbarch != NULL);
4965 gdb_assert (gdbarch->infcall_mmap != NULL);
4966 if (gdbarch_debug >= 2)
4967 fprintf_unfiltered (gdb_stdlog, "gdbarch_infcall_mmap called\n");
4968 return gdbarch->infcall_mmap (size, prot);
4972 set_gdbarch_infcall_mmap (struct gdbarch *gdbarch,
4973 gdbarch_infcall_mmap_ftype infcall_mmap)
4975 gdbarch->infcall_mmap = infcall_mmap;
4979 gdbarch_infcall_munmap (struct gdbarch *gdbarch, CORE_ADDR addr, CORE_ADDR size)
4981 gdb_assert (gdbarch != NULL);
4982 gdb_assert (gdbarch->infcall_munmap != NULL);
4983 if (gdbarch_debug >= 2)
4984 fprintf_unfiltered (gdb_stdlog, "gdbarch_infcall_munmap called\n");
4985 gdbarch->infcall_munmap (addr, size);
4989 set_gdbarch_infcall_munmap (struct gdbarch *gdbarch,
4990 gdbarch_infcall_munmap_ftype infcall_munmap)
4992 gdbarch->infcall_munmap = infcall_munmap;
4996 gdbarch_gcc_target_options (struct gdbarch *gdbarch)
4998 gdb_assert (gdbarch != NULL);
4999 gdb_assert (gdbarch->gcc_target_options != NULL);
5000 if (gdbarch_debug >= 2)
5001 fprintf_unfiltered (gdb_stdlog, "gdbarch_gcc_target_options called\n");
5002 return gdbarch->gcc_target_options (gdbarch);
5006 set_gdbarch_gcc_target_options (struct gdbarch *gdbarch,
5007 gdbarch_gcc_target_options_ftype gcc_target_options)
5009 gdbarch->gcc_target_options = gcc_target_options;
5013 gdbarch_gnu_triplet_regexp (struct gdbarch *gdbarch)
5015 gdb_assert (gdbarch != NULL);
5016 gdb_assert (gdbarch->gnu_triplet_regexp != NULL);
5017 if (gdbarch_debug >= 2)
5018 fprintf_unfiltered (gdb_stdlog, "gdbarch_gnu_triplet_regexp called\n");
5019 return gdbarch->gnu_triplet_regexp (gdbarch);
5023 set_gdbarch_gnu_triplet_regexp (struct gdbarch *gdbarch,
5024 gdbarch_gnu_triplet_regexp_ftype gnu_triplet_regexp)
5026 gdbarch->gnu_triplet_regexp = gnu_triplet_regexp;
5030 gdbarch_addressable_memory_unit_size (struct gdbarch *gdbarch)
5032 gdb_assert (gdbarch != NULL);
5033 gdb_assert (gdbarch->addressable_memory_unit_size != NULL);
5034 if (gdbarch_debug >= 2)
5035 fprintf_unfiltered (gdb_stdlog, "gdbarch_addressable_memory_unit_size called\n");
5036 return gdbarch->addressable_memory_unit_size (gdbarch);
5040 set_gdbarch_addressable_memory_unit_size (struct gdbarch *gdbarch,
5041 gdbarch_addressable_memory_unit_size_ftype addressable_memory_unit_size)
5043 gdbarch->addressable_memory_unit_size = addressable_memory_unit_size;
5047 gdbarch_disassembler_options (struct gdbarch *gdbarch)
5049 gdb_assert (gdbarch != NULL);
5050 /* Skip verify of disassembler_options, invalid_p == 0 */
5051 if (gdbarch_debug >= 2)
5052 fprintf_unfiltered (gdb_stdlog, "gdbarch_disassembler_options called\n");
5053 return gdbarch->disassembler_options;
5057 set_gdbarch_disassembler_options (struct gdbarch *gdbarch,
5058 char ** disassembler_options)
5060 gdbarch->disassembler_options = disassembler_options;
5063 const disasm_options_t *
5064 gdbarch_valid_disassembler_options (struct gdbarch *gdbarch)
5066 gdb_assert (gdbarch != NULL);
5067 /* Skip verify of valid_disassembler_options, invalid_p == 0 */
5068 if (gdbarch_debug >= 2)
5069 fprintf_unfiltered (gdb_stdlog, "gdbarch_valid_disassembler_options called\n");
5070 return gdbarch->valid_disassembler_options;
5074 set_gdbarch_valid_disassembler_options (struct gdbarch *gdbarch,
5075 const disasm_options_t * valid_disassembler_options)
5077 gdbarch->valid_disassembler_options = valid_disassembler_options;
5081 /* Keep a registry of per-architecture data-pointers required by GDB
5088 gdbarch_data_pre_init_ftype *pre_init;
5089 gdbarch_data_post_init_ftype *post_init;
5092 struct gdbarch_data_registration
5094 struct gdbarch_data *data;
5095 struct gdbarch_data_registration *next;
5098 struct gdbarch_data_registry
5101 struct gdbarch_data_registration *registrations;
5104 struct gdbarch_data_registry gdbarch_data_registry =
5109 static struct gdbarch_data *
5110 gdbarch_data_register (gdbarch_data_pre_init_ftype *pre_init,
5111 gdbarch_data_post_init_ftype *post_init)
5113 struct gdbarch_data_registration **curr;
5115 /* Append the new registration. */
5116 for (curr = &gdbarch_data_registry.registrations;
5118 curr = &(*curr)->next);
5119 (*curr) = XNEW (struct gdbarch_data_registration);
5120 (*curr)->next = NULL;
5121 (*curr)->data = XNEW (struct gdbarch_data);
5122 (*curr)->data->index = gdbarch_data_registry.nr++;
5123 (*curr)->data->pre_init = pre_init;
5124 (*curr)->data->post_init = post_init;
5125 (*curr)->data->init_p = 1;
5126 return (*curr)->data;
5129 struct gdbarch_data *
5130 gdbarch_data_register_pre_init (gdbarch_data_pre_init_ftype *pre_init)
5132 return gdbarch_data_register (pre_init, NULL);
5135 struct gdbarch_data *
5136 gdbarch_data_register_post_init (gdbarch_data_post_init_ftype *post_init)
5138 return gdbarch_data_register (NULL, post_init);
5141 /* Create/delete the gdbarch data vector. */
5144 alloc_gdbarch_data (struct gdbarch *gdbarch)
5146 gdb_assert (gdbarch->data == NULL);
5147 gdbarch->nr_data = gdbarch_data_registry.nr;
5148 gdbarch->data = GDBARCH_OBSTACK_CALLOC (gdbarch, gdbarch->nr_data, void *);
5151 /* Initialize the current value of the specified per-architecture
5155 deprecated_set_gdbarch_data (struct gdbarch *gdbarch,
5156 struct gdbarch_data *data,
5159 gdb_assert (data->index < gdbarch->nr_data);
5160 gdb_assert (gdbarch->data[data->index] == NULL);
5161 gdb_assert (data->pre_init == NULL);
5162 gdbarch->data[data->index] = pointer;
5165 /* Return the current value of the specified per-architecture
5169 gdbarch_data (struct gdbarch *gdbarch, struct gdbarch_data *data)
5171 gdb_assert (data->index < gdbarch->nr_data);
5172 if (gdbarch->data[data->index] == NULL)
5174 /* The data-pointer isn't initialized, call init() to get a
5176 if (data->pre_init != NULL)
5177 /* Mid architecture creation: pass just the obstack, and not
5178 the entire architecture, as that way it isn't possible for
5179 pre-init code to refer to undefined architecture
5181 gdbarch->data[data->index] = data->pre_init (gdbarch->obstack);
5182 else if (gdbarch->initialized_p
5183 && data->post_init != NULL)
5184 /* Post architecture creation: pass the entire architecture
5185 (as all fields are valid), but be careful to also detect
5186 recursive references. */
5188 gdb_assert (data->init_p);
5190 gdbarch->data[data->index] = data->post_init (gdbarch);
5194 /* The architecture initialization hasn't completed - punt -
5195 hope that the caller knows what they are doing. Once
5196 deprecated_set_gdbarch_data has been initialized, this can be
5197 changed to an internal error. */
5199 gdb_assert (gdbarch->data[data->index] != NULL);
5201 return gdbarch->data[data->index];
5205 /* Keep a registry of the architectures known by GDB. */
5207 struct gdbarch_registration
5209 enum bfd_architecture bfd_architecture;
5210 gdbarch_init_ftype *init;
5211 gdbarch_dump_tdep_ftype *dump_tdep;
5212 struct gdbarch_list *arches;
5213 struct gdbarch_registration *next;
5216 static struct gdbarch_registration *gdbarch_registry = NULL;
5219 append_name (const char ***buf, int *nr, const char *name)
5221 *buf = XRESIZEVEC (const char *, *buf, *nr + 1);
5227 gdbarch_printable_names (void)
5229 /* Accumulate a list of names based on the registed list of
5232 const char **arches = NULL;
5233 struct gdbarch_registration *rego;
5235 for (rego = gdbarch_registry;
5239 const struct bfd_arch_info *ap;
5240 ap = bfd_lookup_arch (rego->bfd_architecture, 0);
5242 internal_error (__FILE__, __LINE__,
5243 _("gdbarch_architecture_names: multi-arch unknown"));
5246 append_name (&arches, &nr_arches, ap->printable_name);
5251 append_name (&arches, &nr_arches, NULL);
5257 gdbarch_register (enum bfd_architecture bfd_architecture,
5258 gdbarch_init_ftype *init,
5259 gdbarch_dump_tdep_ftype *dump_tdep)
5261 struct gdbarch_registration **curr;
5262 const struct bfd_arch_info *bfd_arch_info;
5264 /* Check that BFD recognizes this architecture */
5265 bfd_arch_info = bfd_lookup_arch (bfd_architecture, 0);
5266 if (bfd_arch_info == NULL)
5268 internal_error (__FILE__, __LINE__,
5269 _("gdbarch: Attempt to register "
5270 "unknown architecture (%d)"),
5273 /* Check that we haven't seen this architecture before. */
5274 for (curr = &gdbarch_registry;
5276 curr = &(*curr)->next)
5278 if (bfd_architecture == (*curr)->bfd_architecture)
5279 internal_error (__FILE__, __LINE__,
5280 _("gdbarch: Duplicate registration "
5281 "of architecture (%s)"),
5282 bfd_arch_info->printable_name);
5286 fprintf_unfiltered (gdb_stdlog, "register_gdbarch_init (%s, %s)\n",
5287 bfd_arch_info->printable_name,
5288 host_address_to_string (init));
5290 (*curr) = XNEW (struct gdbarch_registration);
5291 (*curr)->bfd_architecture = bfd_architecture;
5292 (*curr)->init = init;
5293 (*curr)->dump_tdep = dump_tdep;
5294 (*curr)->arches = NULL;
5295 (*curr)->next = NULL;
5299 register_gdbarch_init (enum bfd_architecture bfd_architecture,
5300 gdbarch_init_ftype *init)
5302 gdbarch_register (bfd_architecture, init, NULL);
5306 /* Look for an architecture using gdbarch_info. */
5308 struct gdbarch_list *
5309 gdbarch_list_lookup_by_info (struct gdbarch_list *arches,
5310 const struct gdbarch_info *info)
5312 for (; arches != NULL; arches = arches->next)
5314 if (info->bfd_arch_info != arches->gdbarch->bfd_arch_info)
5316 if (info->byte_order != arches->gdbarch->byte_order)
5318 if (info->osabi != arches->gdbarch->osabi)
5320 if (info->target_desc != arches->gdbarch->target_desc)
5328 /* Find an architecture that matches the specified INFO. Create a new
5329 architecture if needed. Return that new architecture. */
5332 gdbarch_find_by_info (struct gdbarch_info info)
5334 struct gdbarch *new_gdbarch;
5335 struct gdbarch_registration *rego;
5337 /* Fill in missing parts of the INFO struct using a number of
5338 sources: "set ..."; INFOabfd supplied; and the global
5340 gdbarch_info_fill (&info);
5342 /* Must have found some sort of architecture. */
5343 gdb_assert (info.bfd_arch_info != NULL);
5347 fprintf_unfiltered (gdb_stdlog,
5348 "gdbarch_find_by_info: info.bfd_arch_info %s\n",
5349 (info.bfd_arch_info != NULL
5350 ? info.bfd_arch_info->printable_name
5352 fprintf_unfiltered (gdb_stdlog,
5353 "gdbarch_find_by_info: info.byte_order %d (%s)\n",
5355 (info.byte_order == BFD_ENDIAN_BIG ? "big"
5356 : info.byte_order == BFD_ENDIAN_LITTLE ? "little"
5358 fprintf_unfiltered (gdb_stdlog,
5359 "gdbarch_find_by_info: info.osabi %d (%s)\n",
5360 info.osabi, gdbarch_osabi_name (info.osabi));
5361 fprintf_unfiltered (gdb_stdlog,
5362 "gdbarch_find_by_info: info.abfd %s\n",
5363 host_address_to_string (info.abfd));
5364 fprintf_unfiltered (gdb_stdlog,
5365 "gdbarch_find_by_info: info.tdep_info %s\n",
5366 host_address_to_string (info.tdep_info));
5369 /* Find the tdep code that knows about this architecture. */
5370 for (rego = gdbarch_registry;
5373 if (rego->bfd_architecture == info.bfd_arch_info->arch)
5378 fprintf_unfiltered (gdb_stdlog, "gdbarch_find_by_info: "
5379 "No matching architecture\n");
5383 /* Ask the tdep code for an architecture that matches "info". */
5384 new_gdbarch = rego->init (info, rego->arches);
5386 /* Did the tdep code like it? No. Reject the change and revert to
5387 the old architecture. */
5388 if (new_gdbarch == NULL)
5391 fprintf_unfiltered (gdb_stdlog, "gdbarch_find_by_info: "
5392 "Target rejected architecture\n");
5396 /* Is this a pre-existing architecture (as determined by already
5397 being initialized)? Move it to the front of the architecture
5398 list (keeping the list sorted Most Recently Used). */
5399 if (new_gdbarch->initialized_p)
5401 struct gdbarch_list **list;
5402 struct gdbarch_list *self;
5404 fprintf_unfiltered (gdb_stdlog, "gdbarch_find_by_info: "
5405 "Previous architecture %s (%s) selected\n",
5406 host_address_to_string (new_gdbarch),
5407 new_gdbarch->bfd_arch_info->printable_name);
5408 /* Find the existing arch in the list. */
5409 for (list = ®o->arches;
5410 (*list) != NULL && (*list)->gdbarch != new_gdbarch;
5411 list = &(*list)->next);
5412 /* It had better be in the list of architectures. */
5413 gdb_assert ((*list) != NULL && (*list)->gdbarch == new_gdbarch);
5416 (*list) = self->next;
5417 /* Insert SELF at the front. */
5418 self->next = rego->arches;
5419 rego->arches = self;
5424 /* It's a new architecture. */
5426 fprintf_unfiltered (gdb_stdlog, "gdbarch_find_by_info: "
5427 "New architecture %s (%s) selected\n",
5428 host_address_to_string (new_gdbarch),
5429 new_gdbarch->bfd_arch_info->printable_name);
5431 /* Insert the new architecture into the front of the architecture
5432 list (keep the list sorted Most Recently Used). */
5434 struct gdbarch_list *self = XNEW (struct gdbarch_list);
5435 self->next = rego->arches;
5436 self->gdbarch = new_gdbarch;
5437 rego->arches = self;
5440 /* Check that the newly installed architecture is valid. Plug in
5441 any post init values. */
5442 new_gdbarch->dump_tdep = rego->dump_tdep;
5443 verify_gdbarch (new_gdbarch);
5444 new_gdbarch->initialized_p = 1;
5447 gdbarch_dump (new_gdbarch, gdb_stdlog);
5452 /* Make the specified architecture current. */
5455 set_target_gdbarch (struct gdbarch *new_gdbarch)
5457 gdb_assert (new_gdbarch != NULL);
5458 gdb_assert (new_gdbarch->initialized_p);
5459 current_inferior ()->gdbarch = new_gdbarch;
5460 observer_notify_architecture_changed (new_gdbarch);
5461 registers_changed ();
5464 /* Return the current inferior's arch. */
5467 target_gdbarch (void)
5469 return current_inferior ()->gdbarch;
5473 _initialize_gdbarch (void)
5475 add_setshow_zuinteger_cmd ("arch", class_maintenance, &gdbarch_debug, _("\
5476 Set architecture debugging."), _("\
5477 Show architecture debugging."), _("\
5478 When non-zero, architecture debugging is enabled."),
5481 &setdebuglist, &showdebuglist);