1 /* *INDENT-OFF* */ /* THIS FILE IS GENERATED -*- buffer-read-only: t -*- */
4 /* Dynamic architecture support for GDB, the GNU debugger.
6 Copyright (C) 1998-2020 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''. */
27 #include "arch-utils.h"
33 #include "floatformat.h"
34 #include "reggroups.h"
36 #include "gdb_obstack.h"
37 #include "observable.h"
41 #include "frame-unwind.h"
42 #include "dummy-frame.h"
44 /* Static function declarations */
46 static void alloc_gdbarch_data (struct gdbarch
*);
48 /* Non-zero if we want to trace architecture code. */
51 #define GDBARCH_DEBUG 0
53 unsigned int gdbarch_debug
= GDBARCH_DEBUG
;
55 show_gdbarch_debug (struct ui_file
*file
, int from_tty
,
56 struct cmd_list_element
*c
, const char *value
)
58 fprintf_filtered (file
, _("Architecture debugging is %s.\n"), value
);
62 pformat (const struct floatformat
**format
)
67 /* Just print out one of them - this is only for diagnostics. */
68 return format
[0]->name
;
72 pstring (const char *string
)
80 pstring_ptr (char **string
)
82 if (string
== NULL
|| *string
== NULL
)
87 /* Helper function to print a list of strings, represented as "const
88 char *const *". The list is printed comma-separated. */
91 pstring_list (const char *const *list
)
101 for (p
= list
; *p
!= NULL
&& offset
< sizeof (ret
); ++p
)
103 size_t s
= xsnprintf (ret
+ offset
, sizeof (ret
) - offset
, "%s, ", *p
);
109 gdb_assert (offset
- 2 < sizeof (ret
));
110 ret
[offset
- 2] = '\0';
117 /* Maintain the struct gdbarch object. */
121 /* Has this architecture been fully initialized? */
124 /* An obstack bound to the lifetime of the architecture. */
125 struct obstack
*obstack
;
127 /* basic architectural information. */
128 const struct bfd_arch_info
* bfd_arch_info
;
129 enum bfd_endian byte_order
;
130 enum bfd_endian byte_order_for_code
;
131 enum gdb_osabi osabi
;
132 const struct target_desc
* target_desc
;
134 /* target specific vector. */
135 struct gdbarch_tdep
*tdep
;
136 gdbarch_dump_tdep_ftype
*dump_tdep
;
138 /* per-architecture data-pointers. */
142 /* Multi-arch values.
144 When extending this structure you must:
148 Declare set/get functions and define the corresponding
151 gdbarch_alloc(): If zero/NULL is not a suitable default,
152 initialize the new field.
154 verify_gdbarch(): Confirm that the target updated the field
157 gdbarch_dump(): Add a fprintf_unfiltered call so that the new
160 get_gdbarch(): Implement the set/get functions (probably using
161 the macro's as shortcuts).
170 const struct floatformat
** half_format
;
172 const struct floatformat
** float_format
;
174 const struct floatformat
** double_format
;
176 const struct floatformat
** long_double_format
;
179 gdbarch_floatformat_for_type_ftype
*floatformat_for_type
;
182 int dwarf2_addr_size
;
184 gdbarch_read_pc_ftype
*read_pc
;
185 gdbarch_write_pc_ftype
*write_pc
;
186 gdbarch_virtual_frame_pointer_ftype
*virtual_frame_pointer
;
187 gdbarch_pseudo_register_read_ftype
*pseudo_register_read
;
188 gdbarch_pseudo_register_read_value_ftype
*pseudo_register_read_value
;
189 gdbarch_pseudo_register_write_ftype
*pseudo_register_write
;
192 gdbarch_ax_pseudo_register_collect_ftype
*ax_pseudo_register_collect
;
193 gdbarch_ax_pseudo_register_push_stack_ftype
*ax_pseudo_register_push_stack
;
194 gdbarch_report_signal_info_ftype
*report_signal_info
;
199 gdbarch_stab_reg_to_regnum_ftype
*stab_reg_to_regnum
;
200 gdbarch_ecoff_reg_to_regnum_ftype
*ecoff_reg_to_regnum
;
201 gdbarch_sdb_reg_to_regnum_ftype
*sdb_reg_to_regnum
;
202 gdbarch_dwarf2_reg_to_regnum_ftype
*dwarf2_reg_to_regnum
;
203 gdbarch_register_name_ftype
*register_name
;
204 gdbarch_register_type_ftype
*register_type
;
205 gdbarch_dummy_id_ftype
*dummy_id
;
206 int deprecated_fp_regnum
;
207 gdbarch_push_dummy_call_ftype
*push_dummy_call
;
208 int call_dummy_location
;
209 gdbarch_push_dummy_code_ftype
*push_dummy_code
;
210 gdbarch_code_of_frame_writable_ftype
*code_of_frame_writable
;
211 gdbarch_print_registers_info_ftype
*print_registers_info
;
212 gdbarch_print_float_info_ftype
*print_float_info
;
213 gdbarch_print_vector_info_ftype
*print_vector_info
;
214 gdbarch_register_sim_regno_ftype
*register_sim_regno
;
215 gdbarch_cannot_fetch_register_ftype
*cannot_fetch_register
;
216 gdbarch_cannot_store_register_ftype
*cannot_store_register
;
217 gdbarch_get_longjmp_target_ftype
*get_longjmp_target
;
218 int believe_pcc_promotion
;
219 gdbarch_convert_register_p_ftype
*convert_register_p
;
220 gdbarch_register_to_value_ftype
*register_to_value
;
221 gdbarch_value_to_register_ftype
*value_to_register
;
222 gdbarch_value_from_register_ftype
*value_from_register
;
223 gdbarch_pointer_to_address_ftype
*pointer_to_address
;
224 gdbarch_address_to_pointer_ftype
*address_to_pointer
;
225 gdbarch_integer_to_address_ftype
*integer_to_address
;
226 gdbarch_return_value_ftype
*return_value
;
227 gdbarch_return_in_first_hidden_param_p_ftype
*return_in_first_hidden_param_p
;
228 gdbarch_skip_prologue_ftype
*skip_prologue
;
229 gdbarch_skip_main_prologue_ftype
*skip_main_prologue
;
230 gdbarch_skip_entrypoint_ftype
*skip_entrypoint
;
231 gdbarch_inner_than_ftype
*inner_than
;
232 gdbarch_breakpoint_from_pc_ftype
*breakpoint_from_pc
;
233 gdbarch_breakpoint_kind_from_pc_ftype
*breakpoint_kind_from_pc
;
234 gdbarch_sw_breakpoint_from_kind_ftype
*sw_breakpoint_from_kind
;
235 gdbarch_breakpoint_kind_from_current_state_ftype
*breakpoint_kind_from_current_state
;
236 gdbarch_adjust_breakpoint_address_ftype
*adjust_breakpoint_address
;
237 gdbarch_memory_insert_breakpoint_ftype
*memory_insert_breakpoint
;
238 gdbarch_memory_remove_breakpoint_ftype
*memory_remove_breakpoint
;
239 CORE_ADDR decr_pc_after_break
;
240 CORE_ADDR deprecated_function_start_offset
;
241 gdbarch_remote_register_number_ftype
*remote_register_number
;
242 gdbarch_fetch_tls_load_module_address_ftype
*fetch_tls_load_module_address
;
243 gdbarch_get_thread_local_address_ftype
*get_thread_local_address
;
244 CORE_ADDR frame_args_skip
;
245 gdbarch_unwind_pc_ftype
*unwind_pc
;
246 gdbarch_unwind_sp_ftype
*unwind_sp
;
247 gdbarch_frame_num_args_ftype
*frame_num_args
;
248 gdbarch_frame_align_ftype
*frame_align
;
249 gdbarch_stabs_argument_has_addr_ftype
*stabs_argument_has_addr
;
250 int frame_red_zone_size
;
251 gdbarch_convert_from_func_ptr_addr_ftype
*convert_from_func_ptr_addr
;
252 gdbarch_addr_bits_remove_ftype
*addr_bits_remove
;
253 int significant_addr_bit
;
254 gdbarch_software_single_step_ftype
*software_single_step
;
255 gdbarch_single_step_through_delay_ftype
*single_step_through_delay
;
256 gdbarch_print_insn_ftype
*print_insn
;
257 gdbarch_skip_trampoline_code_ftype
*skip_trampoline_code
;
258 gdbarch_skip_solib_resolver_ftype
*skip_solib_resolver
;
259 gdbarch_in_solib_return_trampoline_ftype
*in_solib_return_trampoline
;
260 gdbarch_in_indirect_branch_thunk_ftype
*in_indirect_branch_thunk
;
261 gdbarch_stack_frame_destroyed_p_ftype
*stack_frame_destroyed_p
;
262 gdbarch_elf_make_msymbol_special_ftype
*elf_make_msymbol_special
;
263 gdbarch_coff_make_msymbol_special_ftype
*coff_make_msymbol_special
;
264 gdbarch_make_symbol_special_ftype
*make_symbol_special
;
265 gdbarch_adjust_dwarf2_addr_ftype
*adjust_dwarf2_addr
;
266 gdbarch_adjust_dwarf2_line_ftype
*adjust_dwarf2_line
;
267 int cannot_step_breakpoint
;
268 int have_nonsteppable_watchpoint
;
269 gdbarch_address_class_type_flags_ftype
*address_class_type_flags
;
270 gdbarch_address_class_type_flags_to_name_ftype
*address_class_type_flags_to_name
;
271 gdbarch_execute_dwarf_cfa_vendor_op_ftype
*execute_dwarf_cfa_vendor_op
;
272 gdbarch_address_class_name_to_type_flags_ftype
*address_class_name_to_type_flags
;
273 gdbarch_register_reggroup_p_ftype
*register_reggroup_p
;
274 gdbarch_fetch_pointer_argument_ftype
*fetch_pointer_argument
;
275 gdbarch_iterate_over_regset_sections_ftype
*iterate_over_regset_sections
;
276 gdbarch_make_corefile_notes_ftype
*make_corefile_notes
;
277 gdbarch_find_memory_regions_ftype
*find_memory_regions
;
278 gdbarch_core_xfer_shared_libraries_ftype
*core_xfer_shared_libraries
;
279 gdbarch_core_xfer_shared_libraries_aix_ftype
*core_xfer_shared_libraries_aix
;
280 gdbarch_core_pid_to_str_ftype
*core_pid_to_str
;
281 gdbarch_core_thread_name_ftype
*core_thread_name
;
282 gdbarch_core_xfer_siginfo_ftype
*core_xfer_siginfo
;
283 const char * gcore_bfd_target
;
284 int vtable_function_descriptors
;
286 gdbarch_skip_permanent_breakpoint_ftype
*skip_permanent_breakpoint
;
287 ULONGEST max_insn_length
;
288 gdbarch_displaced_step_copy_insn_ftype
*displaced_step_copy_insn
;
289 gdbarch_displaced_step_hw_singlestep_ftype
*displaced_step_hw_singlestep
;
290 gdbarch_displaced_step_fixup_ftype
*displaced_step_fixup
;
291 gdbarch_displaced_step_location_ftype
*displaced_step_location
;
292 gdbarch_relocate_instruction_ftype
*relocate_instruction
;
293 gdbarch_overlay_update_ftype
*overlay_update
;
294 gdbarch_core_read_description_ftype
*core_read_description
;
295 int sofun_address_maybe_missing
;
296 gdbarch_process_record_ftype
*process_record
;
297 gdbarch_process_record_signal_ftype
*process_record_signal
;
298 gdbarch_gdb_signal_from_target_ftype
*gdb_signal_from_target
;
299 gdbarch_gdb_signal_to_target_ftype
*gdb_signal_to_target
;
300 gdbarch_get_siginfo_type_ftype
*get_siginfo_type
;
301 gdbarch_record_special_symbol_ftype
*record_special_symbol
;
302 gdbarch_get_syscall_number_ftype
*get_syscall_number
;
303 const char * xml_syscall_file
;
304 struct syscalls_info
* syscalls_info
;
305 const char *const * stap_integer_prefixes
;
306 const char *const * stap_integer_suffixes
;
307 const char *const * stap_register_prefixes
;
308 const char *const * stap_register_suffixes
;
309 const char *const * stap_register_indirection_prefixes
;
310 const char *const * stap_register_indirection_suffixes
;
311 const char * stap_gdb_register_prefix
;
312 const char * stap_gdb_register_suffix
;
313 gdbarch_stap_is_single_operand_ftype
*stap_is_single_operand
;
314 gdbarch_stap_parse_special_token_ftype
*stap_parse_special_token
;
315 gdbarch_stap_adjust_register_ftype
*stap_adjust_register
;
316 gdbarch_dtrace_parse_probe_argument_ftype
*dtrace_parse_probe_argument
;
317 gdbarch_dtrace_probe_is_enabled_ftype
*dtrace_probe_is_enabled
;
318 gdbarch_dtrace_enable_probe_ftype
*dtrace_enable_probe
;
319 gdbarch_dtrace_disable_probe_ftype
*dtrace_disable_probe
;
320 int has_global_solist
;
321 int has_global_breakpoints
;
322 gdbarch_has_shared_address_space_ftype
*has_shared_address_space
;
323 gdbarch_fast_tracepoint_valid_at_ftype
*fast_tracepoint_valid_at
;
324 gdbarch_guess_tracepoint_registers_ftype
*guess_tracepoint_registers
;
325 gdbarch_auto_charset_ftype
*auto_charset
;
326 gdbarch_auto_wide_charset_ftype
*auto_wide_charset
;
327 const char * solib_symbols_extension
;
328 int has_dos_based_file_system
;
329 gdbarch_gen_return_address_ftype
*gen_return_address
;
330 gdbarch_info_proc_ftype
*info_proc
;
331 gdbarch_core_info_proc_ftype
*core_info_proc
;
332 gdbarch_iterate_over_objfiles_in_search_order_ftype
*iterate_over_objfiles_in_search_order
;
333 struct ravenscar_arch_ops
* ravenscar_ops
;
334 gdbarch_insn_is_call_ftype
*insn_is_call
;
335 gdbarch_insn_is_ret_ftype
*insn_is_ret
;
336 gdbarch_insn_is_jump_ftype
*insn_is_jump
;
337 gdbarch_program_breakpoint_here_p_ftype
*program_breakpoint_here_p
;
338 gdbarch_auxv_parse_ftype
*auxv_parse
;
339 gdbarch_print_auxv_entry_ftype
*print_auxv_entry
;
340 gdbarch_vsyscall_range_ftype
*vsyscall_range
;
341 gdbarch_infcall_mmap_ftype
*infcall_mmap
;
342 gdbarch_infcall_munmap_ftype
*infcall_munmap
;
343 gdbarch_gcc_target_options_ftype
*gcc_target_options
;
344 gdbarch_gnu_triplet_regexp_ftype
*gnu_triplet_regexp
;
345 gdbarch_addressable_memory_unit_size_ftype
*addressable_memory_unit_size
;
346 const char * disassembler_options_implicit
;
347 char ** disassembler_options
;
348 const disasm_options_and_args_t
* valid_disassembler_options
;
349 gdbarch_type_align_ftype
*type_align
;
350 gdbarch_get_pc_address_flags_ftype
*get_pc_address_flags
;
351 gdbarch_read_core_file_mappings_ftype
*read_core_file_mappings
;
354 /* Create a new ``struct gdbarch'' based on information provided by
355 ``struct gdbarch_info''. */
358 gdbarch_alloc (const struct gdbarch_info
*info
,
359 struct gdbarch_tdep
*tdep
)
361 struct gdbarch
*gdbarch
;
363 /* Create an obstack for allocating all the per-architecture memory,
364 then use that to allocate the architecture vector. */
365 struct obstack
*obstack
= XNEW (struct obstack
);
366 obstack_init (obstack
);
367 gdbarch
= XOBNEW (obstack
, struct gdbarch
);
368 memset (gdbarch
, 0, sizeof (*gdbarch
));
369 gdbarch
->obstack
= obstack
;
371 alloc_gdbarch_data (gdbarch
);
373 gdbarch
->tdep
= tdep
;
375 gdbarch
->bfd_arch_info
= info
->bfd_arch_info
;
376 gdbarch
->byte_order
= info
->byte_order
;
377 gdbarch
->byte_order_for_code
= info
->byte_order_for_code
;
378 gdbarch
->osabi
= info
->osabi
;
379 gdbarch
->target_desc
= info
->target_desc
;
381 /* Force the explicit initialization of these. */
382 gdbarch
->short_bit
= 2*TARGET_CHAR_BIT
;
383 gdbarch
->int_bit
= 4*TARGET_CHAR_BIT
;
384 gdbarch
->long_bit
= 4*TARGET_CHAR_BIT
;
385 gdbarch
->long_long_bit
= 2*gdbarch
->long_bit
;
386 gdbarch
->half_bit
= 2*TARGET_CHAR_BIT
;
387 gdbarch
->float_bit
= 4*TARGET_CHAR_BIT
;
388 gdbarch
->double_bit
= 8*TARGET_CHAR_BIT
;
389 gdbarch
->long_double_bit
= 8*TARGET_CHAR_BIT
;
390 gdbarch
->wchar_bit
= 4*TARGET_CHAR_BIT
;
391 gdbarch
->wchar_signed
= -1;
392 gdbarch
->floatformat_for_type
= default_floatformat_for_type
;
393 gdbarch
->ptr_bit
= gdbarch
->int_bit
;
394 gdbarch
->char_signed
= -1;
395 gdbarch
->virtual_frame_pointer
= legacy_virtual_frame_pointer
;
396 gdbarch
->num_regs
= -1;
397 gdbarch
->sp_regnum
= -1;
398 gdbarch
->pc_regnum
= -1;
399 gdbarch
->ps_regnum
= -1;
400 gdbarch
->fp0_regnum
= -1;
401 gdbarch
->stab_reg_to_regnum
= no_op_reg_to_regnum
;
402 gdbarch
->ecoff_reg_to_regnum
= no_op_reg_to_regnum
;
403 gdbarch
->sdb_reg_to_regnum
= no_op_reg_to_regnum
;
404 gdbarch
->dwarf2_reg_to_regnum
= no_op_reg_to_regnum
;
405 gdbarch
->dummy_id
= default_dummy_id
;
406 gdbarch
->deprecated_fp_regnum
= -1;
407 gdbarch
->call_dummy_location
= AT_ENTRY_POINT
;
408 gdbarch
->code_of_frame_writable
= default_code_of_frame_writable
;
409 gdbarch
->print_registers_info
= default_print_registers_info
;
410 gdbarch
->print_float_info
= default_print_float_info
;
411 gdbarch
->register_sim_regno
= legacy_register_sim_regno
;
412 gdbarch
->cannot_fetch_register
= cannot_register_not
;
413 gdbarch
->cannot_store_register
= cannot_register_not
;
414 gdbarch
->convert_register_p
= generic_convert_register_p
;
415 gdbarch
->value_from_register
= default_value_from_register
;
416 gdbarch
->pointer_to_address
= unsigned_pointer_to_address
;
417 gdbarch
->address_to_pointer
= unsigned_address_to_pointer
;
418 gdbarch
->return_in_first_hidden_param_p
= default_return_in_first_hidden_param_p
;
419 gdbarch
->breakpoint_from_pc
= default_breakpoint_from_pc
;
420 gdbarch
->sw_breakpoint_from_kind
= NULL
;
421 gdbarch
->breakpoint_kind_from_current_state
= default_breakpoint_kind_from_current_state
;
422 gdbarch
->memory_insert_breakpoint
= default_memory_insert_breakpoint
;
423 gdbarch
->memory_remove_breakpoint
= default_memory_remove_breakpoint
;
424 gdbarch
->remote_register_number
= default_remote_register_number
;
425 gdbarch
->unwind_pc
= default_unwind_pc
;
426 gdbarch
->unwind_sp
= default_unwind_sp
;
427 gdbarch
->stabs_argument_has_addr
= default_stabs_argument_has_addr
;
428 gdbarch
->convert_from_func_ptr_addr
= convert_from_func_ptr_addr_identity
;
429 gdbarch
->addr_bits_remove
= core_addr_identity
;
430 gdbarch
->print_insn
= default_print_insn
;
431 gdbarch
->skip_trampoline_code
= generic_skip_trampoline_code
;
432 gdbarch
->skip_solib_resolver
= generic_skip_solib_resolver
;
433 gdbarch
->in_solib_return_trampoline
= generic_in_solib_return_trampoline
;
434 gdbarch
->in_indirect_branch_thunk
= default_in_indirect_branch_thunk
;
435 gdbarch
->stack_frame_destroyed_p
= generic_stack_frame_destroyed_p
;
436 gdbarch
->coff_make_msymbol_special
= default_coff_make_msymbol_special
;
437 gdbarch
->make_symbol_special
= default_make_symbol_special
;
438 gdbarch
->adjust_dwarf2_addr
= default_adjust_dwarf2_addr
;
439 gdbarch
->adjust_dwarf2_line
= default_adjust_dwarf2_line
;
440 gdbarch
->execute_dwarf_cfa_vendor_op
= default_execute_dwarf_cfa_vendor_op
;
441 gdbarch
->register_reggroup_p
= default_register_reggroup_p
;
442 gdbarch
->skip_permanent_breakpoint
= default_skip_permanent_breakpoint
;
443 gdbarch
->displaced_step_hw_singlestep
= default_displaced_step_hw_singlestep
;
444 gdbarch
->displaced_step_fixup
= NULL
;
445 gdbarch
->displaced_step_location
= NULL
;
446 gdbarch
->relocate_instruction
= NULL
;
447 gdbarch
->has_shared_address_space
= default_has_shared_address_space
;
448 gdbarch
->fast_tracepoint_valid_at
= default_fast_tracepoint_valid_at
;
449 gdbarch
->guess_tracepoint_registers
= default_guess_tracepoint_registers
;
450 gdbarch
->auto_charset
= default_auto_charset
;
451 gdbarch
->auto_wide_charset
= default_auto_wide_charset
;
452 gdbarch
->gen_return_address
= default_gen_return_address
;
453 gdbarch
->iterate_over_objfiles_in_search_order
= default_iterate_over_objfiles_in_search_order
;
454 gdbarch
->ravenscar_ops
= NULL
;
455 gdbarch
->insn_is_call
= default_insn_is_call
;
456 gdbarch
->insn_is_ret
= default_insn_is_ret
;
457 gdbarch
->insn_is_jump
= default_insn_is_jump
;
458 gdbarch
->program_breakpoint_here_p
= default_program_breakpoint_here_p
;
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
->type_align
= default_type_align
;
467 gdbarch
->get_pc_address_flags
= default_get_pc_address_flags
;
468 gdbarch
->read_core_file_mappings
= default_read_core_file_mappings
;
469 /* gdbarch_alloc() */
476 obstack
*gdbarch_obstack (gdbarch
*arch
)
478 return arch
->obstack
;
484 gdbarch_obstack_strdup (struct gdbarch
*arch
, const char *string
)
486 return obstack_strdup (arch
->obstack
, string
);
490 /* Free a gdbarch struct. This should never happen in normal
491 operation --- once you've created a gdbarch, you keep it around.
492 However, if an architecture's init function encounters an error
493 building the structure, it may need to clean up a partially
494 constructed gdbarch. */
497 gdbarch_free (struct gdbarch
*arch
)
499 struct obstack
*obstack
;
501 gdb_assert (arch
!= NULL
);
502 gdb_assert (!arch
->initialized_p
);
503 obstack
= arch
->obstack
;
504 obstack_free (obstack
, 0); /* Includes the ARCH. */
509 /* Ensure that all values in a GDBARCH are reasonable. */
512 verify_gdbarch (struct gdbarch
*gdbarch
)
517 if (gdbarch
->byte_order
== BFD_ENDIAN_UNKNOWN
)
518 log
.puts ("\n\tbyte-order");
519 if (gdbarch
->bfd_arch_info
== NULL
)
520 log
.puts ("\n\tbfd_arch_info");
521 /* Check those that need to be defined for the given multi-arch level. */
522 /* Skip verify of short_bit, invalid_p == 0 */
523 /* Skip verify of int_bit, invalid_p == 0 */
524 /* Skip verify of long_bit, invalid_p == 0 */
525 /* Skip verify of long_long_bit, invalid_p == 0 */
526 /* Skip verify of half_bit, invalid_p == 0 */
527 if (gdbarch
->half_format
== 0)
528 gdbarch
->half_format
= floatformats_ieee_half
;
529 /* Skip verify of float_bit, invalid_p == 0 */
530 if (gdbarch
->float_format
== 0)
531 gdbarch
->float_format
= floatformats_ieee_single
;
532 /* Skip verify of double_bit, invalid_p == 0 */
533 if (gdbarch
->double_format
== 0)
534 gdbarch
->double_format
= floatformats_ieee_double
;
535 /* Skip verify of long_double_bit, invalid_p == 0 */
536 if (gdbarch
->long_double_format
== 0)
537 gdbarch
->long_double_format
= floatformats_ieee_double
;
538 /* Skip verify of wchar_bit, invalid_p == 0 */
539 if (gdbarch
->wchar_signed
== -1)
540 gdbarch
->wchar_signed
= 1;
541 /* Skip verify of floatformat_for_type, invalid_p == 0 */
542 /* Skip verify of ptr_bit, invalid_p == 0 */
543 if (gdbarch
->addr_bit
== 0)
544 gdbarch
->addr_bit
= gdbarch_ptr_bit (gdbarch
);
545 if (gdbarch
->dwarf2_addr_size
== 0)
546 gdbarch
->dwarf2_addr_size
= gdbarch_ptr_bit (gdbarch
) / TARGET_CHAR_BIT
;
547 if (gdbarch
->char_signed
== -1)
548 gdbarch
->char_signed
= 1;
549 /* Skip verify of read_pc, has predicate. */
550 /* Skip verify of write_pc, has predicate. */
551 /* Skip verify of virtual_frame_pointer, invalid_p == 0 */
552 /* Skip verify of pseudo_register_read, has predicate. */
553 /* Skip verify of pseudo_register_read_value, has predicate. */
554 /* Skip verify of pseudo_register_write, has predicate. */
555 if (gdbarch
->num_regs
== -1)
556 log
.puts ("\n\tnum_regs");
557 /* Skip verify of num_pseudo_regs, invalid_p == 0 */
558 /* Skip verify of ax_pseudo_register_collect, has predicate. */
559 /* Skip verify of ax_pseudo_register_push_stack, has predicate. */
560 /* Skip verify of report_signal_info, has predicate. */
561 /* Skip verify of sp_regnum, invalid_p == 0 */
562 /* Skip verify of pc_regnum, invalid_p == 0 */
563 /* Skip verify of ps_regnum, invalid_p == 0 */
564 /* Skip verify of fp0_regnum, invalid_p == 0 */
565 /* Skip verify of stab_reg_to_regnum, invalid_p == 0 */
566 /* Skip verify of ecoff_reg_to_regnum, invalid_p == 0 */
567 /* Skip verify of sdb_reg_to_regnum, invalid_p == 0 */
568 /* Skip verify of dwarf2_reg_to_regnum, invalid_p == 0 */
569 if (gdbarch
->register_name
== 0)
570 log
.puts ("\n\tregister_name");
571 /* Skip verify of register_type, has predicate. */
572 /* Skip verify of dummy_id, invalid_p == 0 */
573 /* Skip verify of deprecated_fp_regnum, invalid_p == 0 */
574 /* Skip verify of push_dummy_call, has predicate. */
575 /* Skip verify of call_dummy_location, invalid_p == 0 */
576 /* Skip verify of push_dummy_code, has predicate. */
577 /* Skip verify of code_of_frame_writable, invalid_p == 0 */
578 /* Skip verify of print_registers_info, invalid_p == 0 */
579 /* Skip verify of print_float_info, invalid_p == 0 */
580 /* Skip verify of print_vector_info, has predicate. */
581 /* Skip verify of register_sim_regno, invalid_p == 0 */
582 /* Skip verify of cannot_fetch_register, invalid_p == 0 */
583 /* Skip verify of cannot_store_register, invalid_p == 0 */
584 /* Skip verify of get_longjmp_target, has predicate. */
585 /* Skip verify of convert_register_p, invalid_p == 0 */
586 /* Skip verify of value_from_register, invalid_p == 0 */
587 /* Skip verify of pointer_to_address, invalid_p == 0 */
588 /* Skip verify of address_to_pointer, invalid_p == 0 */
589 /* Skip verify of integer_to_address, has predicate. */
590 /* Skip verify of return_value, has predicate. */
591 /* Skip verify of return_in_first_hidden_param_p, invalid_p == 0 */
592 if (gdbarch
->skip_prologue
== 0)
593 log
.puts ("\n\tskip_prologue");
594 /* Skip verify of skip_main_prologue, has predicate. */
595 /* Skip verify of skip_entrypoint, has predicate. */
596 if (gdbarch
->inner_than
== 0)
597 log
.puts ("\n\tinner_than");
598 /* Skip verify of breakpoint_from_pc, invalid_p == 0 */
599 if (gdbarch
->breakpoint_kind_from_pc
== 0)
600 log
.puts ("\n\tbreakpoint_kind_from_pc");
601 /* Skip verify of sw_breakpoint_from_kind, invalid_p == 0 */
602 /* Skip verify of breakpoint_kind_from_current_state, invalid_p == 0 */
603 /* Skip verify of adjust_breakpoint_address, has predicate. */
604 /* Skip verify of memory_insert_breakpoint, invalid_p == 0 */
605 /* Skip verify of memory_remove_breakpoint, invalid_p == 0 */
606 /* Skip verify of decr_pc_after_break, invalid_p == 0 */
607 /* Skip verify of deprecated_function_start_offset, invalid_p == 0 */
608 /* Skip verify of remote_register_number, invalid_p == 0 */
609 /* Skip verify of fetch_tls_load_module_address, has predicate. */
610 /* Skip verify of get_thread_local_address, has predicate. */
611 /* Skip verify of frame_args_skip, invalid_p == 0 */
612 /* Skip verify of unwind_pc, invalid_p == 0 */
613 /* Skip verify of unwind_sp, invalid_p == 0 */
614 /* Skip verify of frame_num_args, has predicate. */
615 /* Skip verify of frame_align, has predicate. */
616 /* Skip verify of stabs_argument_has_addr, invalid_p == 0 */
617 /* Skip verify of convert_from_func_ptr_addr, invalid_p == 0 */
618 /* Skip verify of addr_bits_remove, invalid_p == 0 */
619 /* Skip verify of significant_addr_bit, invalid_p == 0 */
620 /* Skip verify of software_single_step, has predicate. */
621 /* Skip verify of single_step_through_delay, has predicate. */
622 /* Skip verify of print_insn, invalid_p == 0 */
623 /* Skip verify of skip_trampoline_code, invalid_p == 0 */
624 /* Skip verify of skip_solib_resolver, invalid_p == 0 */
625 /* Skip verify of in_solib_return_trampoline, invalid_p == 0 */
626 /* Skip verify of in_indirect_branch_thunk, invalid_p == 0 */
627 /* Skip verify of stack_frame_destroyed_p, invalid_p == 0 */
628 /* Skip verify of elf_make_msymbol_special, has predicate. */
629 /* Skip verify of coff_make_msymbol_special, invalid_p == 0 */
630 /* Skip verify of make_symbol_special, invalid_p == 0 */
631 /* Skip verify of adjust_dwarf2_addr, invalid_p == 0 */
632 /* Skip verify of adjust_dwarf2_line, invalid_p == 0 */
633 /* Skip verify of cannot_step_breakpoint, invalid_p == 0 */
634 /* Skip verify of have_nonsteppable_watchpoint, invalid_p == 0 */
635 /* Skip verify of address_class_type_flags, has predicate. */
636 /* Skip verify of address_class_type_flags_to_name, has predicate. */
637 /* Skip verify of execute_dwarf_cfa_vendor_op, invalid_p == 0 */
638 /* Skip verify of address_class_name_to_type_flags, has predicate. */
639 /* Skip verify of register_reggroup_p, invalid_p == 0 */
640 /* Skip verify of fetch_pointer_argument, has predicate. */
641 /* Skip verify of iterate_over_regset_sections, has predicate. */
642 /* Skip verify of make_corefile_notes, has predicate. */
643 /* Skip verify of find_memory_regions, has predicate. */
644 /* Skip verify of core_xfer_shared_libraries, has predicate. */
645 /* Skip verify of core_xfer_shared_libraries_aix, has predicate. */
646 /* Skip verify of core_pid_to_str, has predicate. */
647 /* Skip verify of core_thread_name, has predicate. */
648 /* Skip verify of core_xfer_siginfo, has predicate. */
649 /* Skip verify of gcore_bfd_target, has predicate. */
650 /* Skip verify of vtable_function_descriptors, invalid_p == 0 */
651 /* Skip verify of vbit_in_delta, invalid_p == 0 */
652 /* Skip verify of skip_permanent_breakpoint, invalid_p == 0 */
653 /* Skip verify of max_insn_length, has predicate. */
654 /* Skip verify of displaced_step_copy_insn, has predicate. */
655 /* Skip verify of displaced_step_hw_singlestep, invalid_p == 0 */
656 /* Skip verify of displaced_step_fixup, has predicate. */
657 if ((! gdbarch
->displaced_step_location
) != (! gdbarch
->displaced_step_copy_insn
))
658 log
.puts ("\n\tdisplaced_step_location");
659 /* Skip verify of relocate_instruction, has predicate. */
660 /* Skip verify of overlay_update, has predicate. */
661 /* Skip verify of core_read_description, has predicate. */
662 /* Skip verify of sofun_address_maybe_missing, invalid_p == 0 */
663 /* Skip verify of process_record, has predicate. */
664 /* Skip verify of process_record_signal, has predicate. */
665 /* Skip verify of gdb_signal_from_target, has predicate. */
666 /* Skip verify of gdb_signal_to_target, has predicate. */
667 /* Skip verify of get_siginfo_type, has predicate. */
668 /* Skip verify of record_special_symbol, has predicate. */
669 /* Skip verify of get_syscall_number, has predicate. */
670 /* Skip verify of xml_syscall_file, invalid_p == 0 */
671 /* Skip verify of syscalls_info, invalid_p == 0 */
672 /* Skip verify of stap_integer_prefixes, invalid_p == 0 */
673 /* Skip verify of stap_integer_suffixes, invalid_p == 0 */
674 /* Skip verify of stap_register_prefixes, invalid_p == 0 */
675 /* Skip verify of stap_register_suffixes, invalid_p == 0 */
676 /* Skip verify of stap_register_indirection_prefixes, invalid_p == 0 */
677 /* Skip verify of stap_register_indirection_suffixes, invalid_p == 0 */
678 /* Skip verify of stap_gdb_register_prefix, invalid_p == 0 */
679 /* Skip verify of stap_gdb_register_suffix, invalid_p == 0 */
680 /* Skip verify of stap_is_single_operand, has predicate. */
681 /* Skip verify of stap_parse_special_token, has predicate. */
682 /* Skip verify of stap_adjust_register, has predicate. */
683 /* Skip verify of dtrace_parse_probe_argument, has predicate. */
684 /* Skip verify of dtrace_probe_is_enabled, has predicate. */
685 /* Skip verify of dtrace_enable_probe, has predicate. */
686 /* Skip verify of dtrace_disable_probe, has predicate. */
687 /* Skip verify of has_global_solist, invalid_p == 0 */
688 /* Skip verify of has_global_breakpoints, invalid_p == 0 */
689 /* Skip verify of has_shared_address_space, invalid_p == 0 */
690 /* Skip verify of fast_tracepoint_valid_at, invalid_p == 0 */
691 /* Skip verify of guess_tracepoint_registers, invalid_p == 0 */
692 /* Skip verify of auto_charset, invalid_p == 0 */
693 /* Skip verify of auto_wide_charset, invalid_p == 0 */
694 /* Skip verify of has_dos_based_file_system, invalid_p == 0 */
695 /* Skip verify of gen_return_address, invalid_p == 0 */
696 /* Skip verify of info_proc, has predicate. */
697 /* Skip verify of core_info_proc, has predicate. */
698 /* Skip verify of iterate_over_objfiles_in_search_order, invalid_p == 0 */
699 /* Skip verify of ravenscar_ops, invalid_p == 0 */
700 /* Skip verify of insn_is_call, invalid_p == 0 */
701 /* Skip verify of insn_is_ret, invalid_p == 0 */
702 /* Skip verify of insn_is_jump, invalid_p == 0 */
703 /* Skip verify of program_breakpoint_here_p, invalid_p == 0 */
704 /* Skip verify of auxv_parse, has predicate. */
705 /* Skip verify of print_auxv_entry, invalid_p == 0 */
706 /* Skip verify of vsyscall_range, invalid_p == 0 */
707 /* Skip verify of infcall_mmap, invalid_p == 0 */
708 /* Skip verify of infcall_munmap, invalid_p == 0 */
709 /* Skip verify of gcc_target_options, invalid_p == 0 */
710 /* Skip verify of gnu_triplet_regexp, invalid_p == 0 */
711 /* Skip verify of addressable_memory_unit_size, invalid_p == 0 */
712 /* Skip verify of disassembler_options_implicit, invalid_p == 0 */
713 /* Skip verify of disassembler_options, invalid_p == 0 */
714 /* Skip verify of valid_disassembler_options, invalid_p == 0 */
715 /* Skip verify of type_align, invalid_p == 0 */
716 /* Skip verify of get_pc_address_flags, invalid_p == 0 */
717 /* Skip verify of read_core_file_mappings, invalid_p == 0 */
719 internal_error (__FILE__
, __LINE__
,
720 _("verify_gdbarch: the following are invalid ...%s"),
725 /* Print out the details of the current architecture. */
728 gdbarch_dump (struct gdbarch
*gdbarch
, struct ui_file
*file
)
730 const char *gdb_nm_file
= "<not-defined>";
732 #if defined (GDB_NM_FILE)
733 gdb_nm_file
= GDB_NM_FILE
;
735 fprintf_unfiltered (file
,
736 "gdbarch_dump: GDB_NM_FILE = %s\n",
738 fprintf_unfiltered (file
,
739 "gdbarch_dump: addr_bit = %s\n",
740 plongest (gdbarch
->addr_bit
));
741 fprintf_unfiltered (file
,
742 "gdbarch_dump: addr_bits_remove = <%s>\n",
743 host_address_to_string (gdbarch
->addr_bits_remove
));
744 fprintf_unfiltered (file
,
745 "gdbarch_dump: gdbarch_address_class_name_to_type_flags_p() = %d\n",
746 gdbarch_address_class_name_to_type_flags_p (gdbarch
));
747 fprintf_unfiltered (file
,
748 "gdbarch_dump: address_class_name_to_type_flags = <%s>\n",
749 host_address_to_string (gdbarch
->address_class_name_to_type_flags
));
750 fprintf_unfiltered (file
,
751 "gdbarch_dump: gdbarch_address_class_type_flags_p() = %d\n",
752 gdbarch_address_class_type_flags_p (gdbarch
));
753 fprintf_unfiltered (file
,
754 "gdbarch_dump: address_class_type_flags = <%s>\n",
755 host_address_to_string (gdbarch
->address_class_type_flags
));
756 fprintf_unfiltered (file
,
757 "gdbarch_dump: gdbarch_address_class_type_flags_to_name_p() = %d\n",
758 gdbarch_address_class_type_flags_to_name_p (gdbarch
));
759 fprintf_unfiltered (file
,
760 "gdbarch_dump: address_class_type_flags_to_name = <%s>\n",
761 host_address_to_string (gdbarch
->address_class_type_flags_to_name
));
762 fprintf_unfiltered (file
,
763 "gdbarch_dump: address_to_pointer = <%s>\n",
764 host_address_to_string (gdbarch
->address_to_pointer
));
765 fprintf_unfiltered (file
,
766 "gdbarch_dump: addressable_memory_unit_size = <%s>\n",
767 host_address_to_string (gdbarch
->addressable_memory_unit_size
));
768 fprintf_unfiltered (file
,
769 "gdbarch_dump: gdbarch_adjust_breakpoint_address_p() = %d\n",
770 gdbarch_adjust_breakpoint_address_p (gdbarch
));
771 fprintf_unfiltered (file
,
772 "gdbarch_dump: adjust_breakpoint_address = <%s>\n",
773 host_address_to_string (gdbarch
->adjust_breakpoint_address
));
774 fprintf_unfiltered (file
,
775 "gdbarch_dump: adjust_dwarf2_addr = <%s>\n",
776 host_address_to_string (gdbarch
->adjust_dwarf2_addr
));
777 fprintf_unfiltered (file
,
778 "gdbarch_dump: adjust_dwarf2_line = <%s>\n",
779 host_address_to_string (gdbarch
->adjust_dwarf2_line
));
780 fprintf_unfiltered (file
,
781 "gdbarch_dump: auto_charset = <%s>\n",
782 host_address_to_string (gdbarch
->auto_charset
));
783 fprintf_unfiltered (file
,
784 "gdbarch_dump: auto_wide_charset = <%s>\n",
785 host_address_to_string (gdbarch
->auto_wide_charset
));
786 fprintf_unfiltered (file
,
787 "gdbarch_dump: gdbarch_auxv_parse_p() = %d\n",
788 gdbarch_auxv_parse_p (gdbarch
));
789 fprintf_unfiltered (file
,
790 "gdbarch_dump: auxv_parse = <%s>\n",
791 host_address_to_string (gdbarch
->auxv_parse
));
792 fprintf_unfiltered (file
,
793 "gdbarch_dump: gdbarch_ax_pseudo_register_collect_p() = %d\n",
794 gdbarch_ax_pseudo_register_collect_p (gdbarch
));
795 fprintf_unfiltered (file
,
796 "gdbarch_dump: ax_pseudo_register_collect = <%s>\n",
797 host_address_to_string (gdbarch
->ax_pseudo_register_collect
));
798 fprintf_unfiltered (file
,
799 "gdbarch_dump: gdbarch_ax_pseudo_register_push_stack_p() = %d\n",
800 gdbarch_ax_pseudo_register_push_stack_p (gdbarch
));
801 fprintf_unfiltered (file
,
802 "gdbarch_dump: ax_pseudo_register_push_stack = <%s>\n",
803 host_address_to_string (gdbarch
->ax_pseudo_register_push_stack
));
804 fprintf_unfiltered (file
,
805 "gdbarch_dump: believe_pcc_promotion = %s\n",
806 plongest (gdbarch
->believe_pcc_promotion
));
807 fprintf_unfiltered (file
,
808 "gdbarch_dump: bfd_arch_info = %s\n",
809 gdbarch_bfd_arch_info (gdbarch
)->printable_name
);
810 fprintf_unfiltered (file
,
811 "gdbarch_dump: breakpoint_from_pc = <%s>\n",
812 host_address_to_string (gdbarch
->breakpoint_from_pc
));
813 fprintf_unfiltered (file
,
814 "gdbarch_dump: breakpoint_kind_from_current_state = <%s>\n",
815 host_address_to_string (gdbarch
->breakpoint_kind_from_current_state
));
816 fprintf_unfiltered (file
,
817 "gdbarch_dump: breakpoint_kind_from_pc = <%s>\n",
818 host_address_to_string (gdbarch
->breakpoint_kind_from_pc
));
819 fprintf_unfiltered (file
,
820 "gdbarch_dump: byte_order = %s\n",
821 plongest (gdbarch
->byte_order
));
822 fprintf_unfiltered (file
,
823 "gdbarch_dump: byte_order_for_code = %s\n",
824 plongest (gdbarch
->byte_order_for_code
));
825 fprintf_unfiltered (file
,
826 "gdbarch_dump: call_dummy_location = %s\n",
827 plongest (gdbarch
->call_dummy_location
));
828 fprintf_unfiltered (file
,
829 "gdbarch_dump: cannot_fetch_register = <%s>\n",
830 host_address_to_string (gdbarch
->cannot_fetch_register
));
831 fprintf_unfiltered (file
,
832 "gdbarch_dump: cannot_step_breakpoint = %s\n",
833 plongest (gdbarch
->cannot_step_breakpoint
));
834 fprintf_unfiltered (file
,
835 "gdbarch_dump: cannot_store_register = <%s>\n",
836 host_address_to_string (gdbarch
->cannot_store_register
));
837 fprintf_unfiltered (file
,
838 "gdbarch_dump: char_signed = %s\n",
839 plongest (gdbarch
->char_signed
));
840 fprintf_unfiltered (file
,
841 "gdbarch_dump: code_of_frame_writable = <%s>\n",
842 host_address_to_string (gdbarch
->code_of_frame_writable
));
843 fprintf_unfiltered (file
,
844 "gdbarch_dump: coff_make_msymbol_special = <%s>\n",
845 host_address_to_string (gdbarch
->coff_make_msymbol_special
));
846 fprintf_unfiltered (file
,
847 "gdbarch_dump: convert_from_func_ptr_addr = <%s>\n",
848 host_address_to_string (gdbarch
->convert_from_func_ptr_addr
));
849 fprintf_unfiltered (file
,
850 "gdbarch_dump: convert_register_p = <%s>\n",
851 host_address_to_string (gdbarch
->convert_register_p
));
852 fprintf_unfiltered (file
,
853 "gdbarch_dump: gdbarch_core_info_proc_p() = %d\n",
854 gdbarch_core_info_proc_p (gdbarch
));
855 fprintf_unfiltered (file
,
856 "gdbarch_dump: core_info_proc = <%s>\n",
857 host_address_to_string (gdbarch
->core_info_proc
));
858 fprintf_unfiltered (file
,
859 "gdbarch_dump: gdbarch_core_pid_to_str_p() = %d\n",
860 gdbarch_core_pid_to_str_p (gdbarch
));
861 fprintf_unfiltered (file
,
862 "gdbarch_dump: core_pid_to_str = <%s>\n",
863 host_address_to_string (gdbarch
->core_pid_to_str
));
864 fprintf_unfiltered (file
,
865 "gdbarch_dump: gdbarch_core_read_description_p() = %d\n",
866 gdbarch_core_read_description_p (gdbarch
));
867 fprintf_unfiltered (file
,
868 "gdbarch_dump: core_read_description = <%s>\n",
869 host_address_to_string (gdbarch
->core_read_description
));
870 fprintf_unfiltered (file
,
871 "gdbarch_dump: gdbarch_core_thread_name_p() = %d\n",
872 gdbarch_core_thread_name_p (gdbarch
));
873 fprintf_unfiltered (file
,
874 "gdbarch_dump: core_thread_name = <%s>\n",
875 host_address_to_string (gdbarch
->core_thread_name
));
876 fprintf_unfiltered (file
,
877 "gdbarch_dump: gdbarch_core_xfer_shared_libraries_p() = %d\n",
878 gdbarch_core_xfer_shared_libraries_p (gdbarch
));
879 fprintf_unfiltered (file
,
880 "gdbarch_dump: core_xfer_shared_libraries = <%s>\n",
881 host_address_to_string (gdbarch
->core_xfer_shared_libraries
));
882 fprintf_unfiltered (file
,
883 "gdbarch_dump: gdbarch_core_xfer_shared_libraries_aix_p() = %d\n",
884 gdbarch_core_xfer_shared_libraries_aix_p (gdbarch
));
885 fprintf_unfiltered (file
,
886 "gdbarch_dump: core_xfer_shared_libraries_aix = <%s>\n",
887 host_address_to_string (gdbarch
->core_xfer_shared_libraries_aix
));
888 fprintf_unfiltered (file
,
889 "gdbarch_dump: gdbarch_core_xfer_siginfo_p() = %d\n",
890 gdbarch_core_xfer_siginfo_p (gdbarch
));
891 fprintf_unfiltered (file
,
892 "gdbarch_dump: core_xfer_siginfo = <%s>\n",
893 host_address_to_string (gdbarch
->core_xfer_siginfo
));
894 fprintf_unfiltered (file
,
895 "gdbarch_dump: decr_pc_after_break = %s\n",
896 core_addr_to_string_nz (gdbarch
->decr_pc_after_break
));
897 fprintf_unfiltered (file
,
898 "gdbarch_dump: deprecated_fp_regnum = %s\n",
899 plongest (gdbarch
->deprecated_fp_regnum
));
900 fprintf_unfiltered (file
,
901 "gdbarch_dump: deprecated_function_start_offset = %s\n",
902 core_addr_to_string_nz (gdbarch
->deprecated_function_start_offset
));
903 fprintf_unfiltered (file
,
904 "gdbarch_dump: disassembler_options = %s\n",
905 pstring_ptr (gdbarch
->disassembler_options
));
906 fprintf_unfiltered (file
,
907 "gdbarch_dump: disassembler_options_implicit = %s\n",
908 pstring (gdbarch
->disassembler_options_implicit
));
909 fprintf_unfiltered (file
,
910 "gdbarch_dump: gdbarch_displaced_step_copy_insn_p() = %d\n",
911 gdbarch_displaced_step_copy_insn_p (gdbarch
));
912 fprintf_unfiltered (file
,
913 "gdbarch_dump: displaced_step_copy_insn = <%s>\n",
914 host_address_to_string (gdbarch
->displaced_step_copy_insn
));
915 fprintf_unfiltered (file
,
916 "gdbarch_dump: gdbarch_displaced_step_fixup_p() = %d\n",
917 gdbarch_displaced_step_fixup_p (gdbarch
));
918 fprintf_unfiltered (file
,
919 "gdbarch_dump: displaced_step_fixup = <%s>\n",
920 host_address_to_string (gdbarch
->displaced_step_fixup
));
921 fprintf_unfiltered (file
,
922 "gdbarch_dump: displaced_step_hw_singlestep = <%s>\n",
923 host_address_to_string (gdbarch
->displaced_step_hw_singlestep
));
924 fprintf_unfiltered (file
,
925 "gdbarch_dump: displaced_step_location = <%s>\n",
926 host_address_to_string (gdbarch
->displaced_step_location
));
927 fprintf_unfiltered (file
,
928 "gdbarch_dump: double_bit = %s\n",
929 plongest (gdbarch
->double_bit
));
930 fprintf_unfiltered (file
,
931 "gdbarch_dump: double_format = %s\n",
932 pformat (gdbarch
->double_format
));
933 fprintf_unfiltered (file
,
934 "gdbarch_dump: gdbarch_dtrace_disable_probe_p() = %d\n",
935 gdbarch_dtrace_disable_probe_p (gdbarch
));
936 fprintf_unfiltered (file
,
937 "gdbarch_dump: dtrace_disable_probe = <%s>\n",
938 host_address_to_string (gdbarch
->dtrace_disable_probe
));
939 fprintf_unfiltered (file
,
940 "gdbarch_dump: gdbarch_dtrace_enable_probe_p() = %d\n",
941 gdbarch_dtrace_enable_probe_p (gdbarch
));
942 fprintf_unfiltered (file
,
943 "gdbarch_dump: dtrace_enable_probe = <%s>\n",
944 host_address_to_string (gdbarch
->dtrace_enable_probe
));
945 fprintf_unfiltered (file
,
946 "gdbarch_dump: gdbarch_dtrace_parse_probe_argument_p() = %d\n",
947 gdbarch_dtrace_parse_probe_argument_p (gdbarch
));
948 fprintf_unfiltered (file
,
949 "gdbarch_dump: dtrace_parse_probe_argument = <%s>\n",
950 host_address_to_string (gdbarch
->dtrace_parse_probe_argument
));
951 fprintf_unfiltered (file
,
952 "gdbarch_dump: gdbarch_dtrace_probe_is_enabled_p() = %d\n",
953 gdbarch_dtrace_probe_is_enabled_p (gdbarch
));
954 fprintf_unfiltered (file
,
955 "gdbarch_dump: dtrace_probe_is_enabled = <%s>\n",
956 host_address_to_string (gdbarch
->dtrace_probe_is_enabled
));
957 fprintf_unfiltered (file
,
958 "gdbarch_dump: dummy_id = <%s>\n",
959 host_address_to_string (gdbarch
->dummy_id
));
960 fprintf_unfiltered (file
,
961 "gdbarch_dump: dwarf2_addr_size = %s\n",
962 plongest (gdbarch
->dwarf2_addr_size
));
963 fprintf_unfiltered (file
,
964 "gdbarch_dump: dwarf2_reg_to_regnum = <%s>\n",
965 host_address_to_string (gdbarch
->dwarf2_reg_to_regnum
));
966 fprintf_unfiltered (file
,
967 "gdbarch_dump: ecoff_reg_to_regnum = <%s>\n",
968 host_address_to_string (gdbarch
->ecoff_reg_to_regnum
));
969 fprintf_unfiltered (file
,
970 "gdbarch_dump: gdbarch_elf_make_msymbol_special_p() = %d\n",
971 gdbarch_elf_make_msymbol_special_p (gdbarch
));
972 fprintf_unfiltered (file
,
973 "gdbarch_dump: elf_make_msymbol_special = <%s>\n",
974 host_address_to_string (gdbarch
->elf_make_msymbol_special
));
975 fprintf_unfiltered (file
,
976 "gdbarch_dump: execute_dwarf_cfa_vendor_op = <%s>\n",
977 host_address_to_string (gdbarch
->execute_dwarf_cfa_vendor_op
));
978 fprintf_unfiltered (file
,
979 "gdbarch_dump: fast_tracepoint_valid_at = <%s>\n",
980 host_address_to_string (gdbarch
->fast_tracepoint_valid_at
));
981 fprintf_unfiltered (file
,
982 "gdbarch_dump: gdbarch_fetch_pointer_argument_p() = %d\n",
983 gdbarch_fetch_pointer_argument_p (gdbarch
));
984 fprintf_unfiltered (file
,
985 "gdbarch_dump: fetch_pointer_argument = <%s>\n",
986 host_address_to_string (gdbarch
->fetch_pointer_argument
));
987 fprintf_unfiltered (file
,
988 "gdbarch_dump: gdbarch_fetch_tls_load_module_address_p() = %d\n",
989 gdbarch_fetch_tls_load_module_address_p (gdbarch
));
990 fprintf_unfiltered (file
,
991 "gdbarch_dump: fetch_tls_load_module_address = <%s>\n",
992 host_address_to_string (gdbarch
->fetch_tls_load_module_address
));
993 fprintf_unfiltered (file
,
994 "gdbarch_dump: gdbarch_find_memory_regions_p() = %d\n",
995 gdbarch_find_memory_regions_p (gdbarch
));
996 fprintf_unfiltered (file
,
997 "gdbarch_dump: find_memory_regions = <%s>\n",
998 host_address_to_string (gdbarch
->find_memory_regions
));
999 fprintf_unfiltered (file
,
1000 "gdbarch_dump: float_bit = %s\n",
1001 plongest (gdbarch
->float_bit
));
1002 fprintf_unfiltered (file
,
1003 "gdbarch_dump: float_format = %s\n",
1004 pformat (gdbarch
->float_format
));
1005 fprintf_unfiltered (file
,
1006 "gdbarch_dump: floatformat_for_type = <%s>\n",
1007 host_address_to_string (gdbarch
->floatformat_for_type
));
1008 fprintf_unfiltered (file
,
1009 "gdbarch_dump: fp0_regnum = %s\n",
1010 plongest (gdbarch
->fp0_regnum
));
1011 fprintf_unfiltered (file
,
1012 "gdbarch_dump: gdbarch_frame_align_p() = %d\n",
1013 gdbarch_frame_align_p (gdbarch
));
1014 fprintf_unfiltered (file
,
1015 "gdbarch_dump: frame_align = <%s>\n",
1016 host_address_to_string (gdbarch
->frame_align
));
1017 fprintf_unfiltered (file
,
1018 "gdbarch_dump: frame_args_skip = %s\n",
1019 core_addr_to_string_nz (gdbarch
->frame_args_skip
));
1020 fprintf_unfiltered (file
,
1021 "gdbarch_dump: gdbarch_frame_num_args_p() = %d\n",
1022 gdbarch_frame_num_args_p (gdbarch
));
1023 fprintf_unfiltered (file
,
1024 "gdbarch_dump: frame_num_args = <%s>\n",
1025 host_address_to_string (gdbarch
->frame_num_args
));
1026 fprintf_unfiltered (file
,
1027 "gdbarch_dump: frame_red_zone_size = %s\n",
1028 plongest (gdbarch
->frame_red_zone_size
));
1029 fprintf_unfiltered (file
,
1030 "gdbarch_dump: gcc_target_options = <%s>\n",
1031 host_address_to_string (gdbarch
->gcc_target_options
));
1032 fprintf_unfiltered (file
,
1033 "gdbarch_dump: gdbarch_gcore_bfd_target_p() = %d\n",
1034 gdbarch_gcore_bfd_target_p (gdbarch
));
1035 fprintf_unfiltered (file
,
1036 "gdbarch_dump: gcore_bfd_target = %s\n",
1037 pstring (gdbarch
->gcore_bfd_target
));
1038 fprintf_unfiltered (file
,
1039 "gdbarch_dump: gdbarch_gdb_signal_from_target_p() = %d\n",
1040 gdbarch_gdb_signal_from_target_p (gdbarch
));
1041 fprintf_unfiltered (file
,
1042 "gdbarch_dump: gdb_signal_from_target = <%s>\n",
1043 host_address_to_string (gdbarch
->gdb_signal_from_target
));
1044 fprintf_unfiltered (file
,
1045 "gdbarch_dump: gdbarch_gdb_signal_to_target_p() = %d\n",
1046 gdbarch_gdb_signal_to_target_p (gdbarch
));
1047 fprintf_unfiltered (file
,
1048 "gdbarch_dump: gdb_signal_to_target = <%s>\n",
1049 host_address_to_string (gdbarch
->gdb_signal_to_target
));
1050 fprintf_unfiltered (file
,
1051 "gdbarch_dump: gen_return_address = <%s>\n",
1052 host_address_to_string (gdbarch
->gen_return_address
));
1053 fprintf_unfiltered (file
,
1054 "gdbarch_dump: gdbarch_get_longjmp_target_p() = %d\n",
1055 gdbarch_get_longjmp_target_p (gdbarch
));
1056 fprintf_unfiltered (file
,
1057 "gdbarch_dump: get_longjmp_target = <%s>\n",
1058 host_address_to_string (gdbarch
->get_longjmp_target
));
1059 fprintf_unfiltered (file
,
1060 "gdbarch_dump: get_pc_address_flags = <%s>\n",
1061 host_address_to_string (gdbarch
->get_pc_address_flags
));
1062 fprintf_unfiltered (file
,
1063 "gdbarch_dump: gdbarch_get_siginfo_type_p() = %d\n",
1064 gdbarch_get_siginfo_type_p (gdbarch
));
1065 fprintf_unfiltered (file
,
1066 "gdbarch_dump: get_siginfo_type = <%s>\n",
1067 host_address_to_string (gdbarch
->get_siginfo_type
));
1068 fprintf_unfiltered (file
,
1069 "gdbarch_dump: gdbarch_get_syscall_number_p() = %d\n",
1070 gdbarch_get_syscall_number_p (gdbarch
));
1071 fprintf_unfiltered (file
,
1072 "gdbarch_dump: get_syscall_number = <%s>\n",
1073 host_address_to_string (gdbarch
->get_syscall_number
));
1074 fprintf_unfiltered (file
,
1075 "gdbarch_dump: gdbarch_get_thread_local_address_p() = %d\n",
1076 gdbarch_get_thread_local_address_p (gdbarch
));
1077 fprintf_unfiltered (file
,
1078 "gdbarch_dump: get_thread_local_address = <%s>\n",
1079 host_address_to_string (gdbarch
->get_thread_local_address
));
1080 fprintf_unfiltered (file
,
1081 "gdbarch_dump: gnu_triplet_regexp = <%s>\n",
1082 host_address_to_string (gdbarch
->gnu_triplet_regexp
));
1083 fprintf_unfiltered (file
,
1084 "gdbarch_dump: guess_tracepoint_registers = <%s>\n",
1085 host_address_to_string (gdbarch
->guess_tracepoint_registers
));
1086 fprintf_unfiltered (file
,
1087 "gdbarch_dump: half_bit = %s\n",
1088 plongest (gdbarch
->half_bit
));
1089 fprintf_unfiltered (file
,
1090 "gdbarch_dump: half_format = %s\n",
1091 pformat (gdbarch
->half_format
));
1092 fprintf_unfiltered (file
,
1093 "gdbarch_dump: has_dos_based_file_system = %s\n",
1094 plongest (gdbarch
->has_dos_based_file_system
));
1095 fprintf_unfiltered (file
,
1096 "gdbarch_dump: has_global_breakpoints = %s\n",
1097 plongest (gdbarch
->has_global_breakpoints
));
1098 fprintf_unfiltered (file
,
1099 "gdbarch_dump: has_global_solist = %s\n",
1100 plongest (gdbarch
->has_global_solist
));
1101 fprintf_unfiltered (file
,
1102 "gdbarch_dump: has_shared_address_space = <%s>\n",
1103 host_address_to_string (gdbarch
->has_shared_address_space
));
1104 fprintf_unfiltered (file
,
1105 "gdbarch_dump: have_nonsteppable_watchpoint = %s\n",
1106 plongest (gdbarch
->have_nonsteppable_watchpoint
));
1107 fprintf_unfiltered (file
,
1108 "gdbarch_dump: in_indirect_branch_thunk = <%s>\n",
1109 host_address_to_string (gdbarch
->in_indirect_branch_thunk
));
1110 fprintf_unfiltered (file
,
1111 "gdbarch_dump: in_solib_return_trampoline = <%s>\n",
1112 host_address_to_string (gdbarch
->in_solib_return_trampoline
));
1113 fprintf_unfiltered (file
,
1114 "gdbarch_dump: infcall_mmap = <%s>\n",
1115 host_address_to_string (gdbarch
->infcall_mmap
));
1116 fprintf_unfiltered (file
,
1117 "gdbarch_dump: infcall_munmap = <%s>\n",
1118 host_address_to_string (gdbarch
->infcall_munmap
));
1119 fprintf_unfiltered (file
,
1120 "gdbarch_dump: gdbarch_info_proc_p() = %d\n",
1121 gdbarch_info_proc_p (gdbarch
));
1122 fprintf_unfiltered (file
,
1123 "gdbarch_dump: info_proc = <%s>\n",
1124 host_address_to_string (gdbarch
->info_proc
));
1125 fprintf_unfiltered (file
,
1126 "gdbarch_dump: inner_than = <%s>\n",
1127 host_address_to_string (gdbarch
->inner_than
));
1128 fprintf_unfiltered (file
,
1129 "gdbarch_dump: insn_is_call = <%s>\n",
1130 host_address_to_string (gdbarch
->insn_is_call
));
1131 fprintf_unfiltered (file
,
1132 "gdbarch_dump: insn_is_jump = <%s>\n",
1133 host_address_to_string (gdbarch
->insn_is_jump
));
1134 fprintf_unfiltered (file
,
1135 "gdbarch_dump: insn_is_ret = <%s>\n",
1136 host_address_to_string (gdbarch
->insn_is_ret
));
1137 fprintf_unfiltered (file
,
1138 "gdbarch_dump: int_bit = %s\n",
1139 plongest (gdbarch
->int_bit
));
1140 fprintf_unfiltered (file
,
1141 "gdbarch_dump: gdbarch_integer_to_address_p() = %d\n",
1142 gdbarch_integer_to_address_p (gdbarch
));
1143 fprintf_unfiltered (file
,
1144 "gdbarch_dump: integer_to_address = <%s>\n",
1145 host_address_to_string (gdbarch
->integer_to_address
));
1146 fprintf_unfiltered (file
,
1147 "gdbarch_dump: iterate_over_objfiles_in_search_order = <%s>\n",
1148 host_address_to_string (gdbarch
->iterate_over_objfiles_in_search_order
));
1149 fprintf_unfiltered (file
,
1150 "gdbarch_dump: gdbarch_iterate_over_regset_sections_p() = %d\n",
1151 gdbarch_iterate_over_regset_sections_p (gdbarch
));
1152 fprintf_unfiltered (file
,
1153 "gdbarch_dump: iterate_over_regset_sections = <%s>\n",
1154 host_address_to_string (gdbarch
->iterate_over_regset_sections
));
1155 fprintf_unfiltered (file
,
1156 "gdbarch_dump: long_bit = %s\n",
1157 plongest (gdbarch
->long_bit
));
1158 fprintf_unfiltered (file
,
1159 "gdbarch_dump: long_double_bit = %s\n",
1160 plongest (gdbarch
->long_double_bit
));
1161 fprintf_unfiltered (file
,
1162 "gdbarch_dump: long_double_format = %s\n",
1163 pformat (gdbarch
->long_double_format
));
1164 fprintf_unfiltered (file
,
1165 "gdbarch_dump: long_long_bit = %s\n",
1166 plongest (gdbarch
->long_long_bit
));
1167 fprintf_unfiltered (file
,
1168 "gdbarch_dump: gdbarch_make_corefile_notes_p() = %d\n",
1169 gdbarch_make_corefile_notes_p (gdbarch
));
1170 fprintf_unfiltered (file
,
1171 "gdbarch_dump: make_corefile_notes = <%s>\n",
1172 host_address_to_string (gdbarch
->make_corefile_notes
));
1173 fprintf_unfiltered (file
,
1174 "gdbarch_dump: make_symbol_special = <%s>\n",
1175 host_address_to_string (gdbarch
->make_symbol_special
));
1176 fprintf_unfiltered (file
,
1177 "gdbarch_dump: gdbarch_max_insn_length_p() = %d\n",
1178 gdbarch_max_insn_length_p (gdbarch
));
1179 fprintf_unfiltered (file
,
1180 "gdbarch_dump: max_insn_length = %s\n",
1181 plongest (gdbarch
->max_insn_length
));
1182 fprintf_unfiltered (file
,
1183 "gdbarch_dump: memory_insert_breakpoint = <%s>\n",
1184 host_address_to_string (gdbarch
->memory_insert_breakpoint
));
1185 fprintf_unfiltered (file
,
1186 "gdbarch_dump: memory_remove_breakpoint = <%s>\n",
1187 host_address_to_string (gdbarch
->memory_remove_breakpoint
));
1188 fprintf_unfiltered (file
,
1189 "gdbarch_dump: num_pseudo_regs = %s\n",
1190 plongest (gdbarch
->num_pseudo_regs
));
1191 fprintf_unfiltered (file
,
1192 "gdbarch_dump: num_regs = %s\n",
1193 plongest (gdbarch
->num_regs
));
1194 fprintf_unfiltered (file
,
1195 "gdbarch_dump: osabi = %s\n",
1196 plongest (gdbarch
->osabi
));
1197 fprintf_unfiltered (file
,
1198 "gdbarch_dump: gdbarch_overlay_update_p() = %d\n",
1199 gdbarch_overlay_update_p (gdbarch
));
1200 fprintf_unfiltered (file
,
1201 "gdbarch_dump: overlay_update = <%s>\n",
1202 host_address_to_string (gdbarch
->overlay_update
));
1203 fprintf_unfiltered (file
,
1204 "gdbarch_dump: pc_regnum = %s\n",
1205 plongest (gdbarch
->pc_regnum
));
1206 fprintf_unfiltered (file
,
1207 "gdbarch_dump: pointer_to_address = <%s>\n",
1208 host_address_to_string (gdbarch
->pointer_to_address
));
1209 fprintf_unfiltered (file
,
1210 "gdbarch_dump: print_auxv_entry = <%s>\n",
1211 host_address_to_string (gdbarch
->print_auxv_entry
));
1212 fprintf_unfiltered (file
,
1213 "gdbarch_dump: print_float_info = <%s>\n",
1214 host_address_to_string (gdbarch
->print_float_info
));
1215 fprintf_unfiltered (file
,
1216 "gdbarch_dump: print_insn = <%s>\n",
1217 host_address_to_string (gdbarch
->print_insn
));
1218 fprintf_unfiltered (file
,
1219 "gdbarch_dump: print_registers_info = <%s>\n",
1220 host_address_to_string (gdbarch
->print_registers_info
));
1221 fprintf_unfiltered (file
,
1222 "gdbarch_dump: gdbarch_print_vector_info_p() = %d\n",
1223 gdbarch_print_vector_info_p (gdbarch
));
1224 fprintf_unfiltered (file
,
1225 "gdbarch_dump: print_vector_info = <%s>\n",
1226 host_address_to_string (gdbarch
->print_vector_info
));
1227 fprintf_unfiltered (file
,
1228 "gdbarch_dump: gdbarch_process_record_p() = %d\n",
1229 gdbarch_process_record_p (gdbarch
));
1230 fprintf_unfiltered (file
,
1231 "gdbarch_dump: process_record = <%s>\n",
1232 host_address_to_string (gdbarch
->process_record
));
1233 fprintf_unfiltered (file
,
1234 "gdbarch_dump: gdbarch_process_record_signal_p() = %d\n",
1235 gdbarch_process_record_signal_p (gdbarch
));
1236 fprintf_unfiltered (file
,
1237 "gdbarch_dump: process_record_signal = <%s>\n",
1238 host_address_to_string (gdbarch
->process_record_signal
));
1239 fprintf_unfiltered (file
,
1240 "gdbarch_dump: program_breakpoint_here_p = <%s>\n",
1241 host_address_to_string (gdbarch
->program_breakpoint_here_p
));
1242 fprintf_unfiltered (file
,
1243 "gdbarch_dump: ps_regnum = %s\n",
1244 plongest (gdbarch
->ps_regnum
));
1245 fprintf_unfiltered (file
,
1246 "gdbarch_dump: gdbarch_pseudo_register_read_p() = %d\n",
1247 gdbarch_pseudo_register_read_p (gdbarch
));
1248 fprintf_unfiltered (file
,
1249 "gdbarch_dump: pseudo_register_read = <%s>\n",
1250 host_address_to_string (gdbarch
->pseudo_register_read
));
1251 fprintf_unfiltered (file
,
1252 "gdbarch_dump: gdbarch_pseudo_register_read_value_p() = %d\n",
1253 gdbarch_pseudo_register_read_value_p (gdbarch
));
1254 fprintf_unfiltered (file
,
1255 "gdbarch_dump: pseudo_register_read_value = <%s>\n",
1256 host_address_to_string (gdbarch
->pseudo_register_read_value
));
1257 fprintf_unfiltered (file
,
1258 "gdbarch_dump: gdbarch_pseudo_register_write_p() = %d\n",
1259 gdbarch_pseudo_register_write_p (gdbarch
));
1260 fprintf_unfiltered (file
,
1261 "gdbarch_dump: pseudo_register_write = <%s>\n",
1262 host_address_to_string (gdbarch
->pseudo_register_write
));
1263 fprintf_unfiltered (file
,
1264 "gdbarch_dump: ptr_bit = %s\n",
1265 plongest (gdbarch
->ptr_bit
));
1266 fprintf_unfiltered (file
,
1267 "gdbarch_dump: gdbarch_push_dummy_call_p() = %d\n",
1268 gdbarch_push_dummy_call_p (gdbarch
));
1269 fprintf_unfiltered (file
,
1270 "gdbarch_dump: push_dummy_call = <%s>\n",
1271 host_address_to_string (gdbarch
->push_dummy_call
));
1272 fprintf_unfiltered (file
,
1273 "gdbarch_dump: gdbarch_push_dummy_code_p() = %d\n",
1274 gdbarch_push_dummy_code_p (gdbarch
));
1275 fprintf_unfiltered (file
,
1276 "gdbarch_dump: push_dummy_code = <%s>\n",
1277 host_address_to_string (gdbarch
->push_dummy_code
));
1278 fprintf_unfiltered (file
,
1279 "gdbarch_dump: ravenscar_ops = %s\n",
1280 host_address_to_string (gdbarch
->ravenscar_ops
));
1281 fprintf_unfiltered (file
,
1282 "gdbarch_dump: read_core_file_mappings = <%s>\n",
1283 host_address_to_string (gdbarch
->read_core_file_mappings
));
1284 fprintf_unfiltered (file
,
1285 "gdbarch_dump: gdbarch_read_pc_p() = %d\n",
1286 gdbarch_read_pc_p (gdbarch
));
1287 fprintf_unfiltered (file
,
1288 "gdbarch_dump: read_pc = <%s>\n",
1289 host_address_to_string (gdbarch
->read_pc
));
1290 fprintf_unfiltered (file
,
1291 "gdbarch_dump: gdbarch_record_special_symbol_p() = %d\n",
1292 gdbarch_record_special_symbol_p (gdbarch
));
1293 fprintf_unfiltered (file
,
1294 "gdbarch_dump: record_special_symbol = <%s>\n",
1295 host_address_to_string (gdbarch
->record_special_symbol
));
1296 fprintf_unfiltered (file
,
1297 "gdbarch_dump: register_name = <%s>\n",
1298 host_address_to_string (gdbarch
->register_name
));
1299 fprintf_unfiltered (file
,
1300 "gdbarch_dump: register_reggroup_p = <%s>\n",
1301 host_address_to_string (gdbarch
->register_reggroup_p
));
1302 fprintf_unfiltered (file
,
1303 "gdbarch_dump: register_sim_regno = <%s>\n",
1304 host_address_to_string (gdbarch
->register_sim_regno
));
1305 fprintf_unfiltered (file
,
1306 "gdbarch_dump: register_to_value = <%s>\n",
1307 host_address_to_string (gdbarch
->register_to_value
));
1308 fprintf_unfiltered (file
,
1309 "gdbarch_dump: gdbarch_register_type_p() = %d\n",
1310 gdbarch_register_type_p (gdbarch
));
1311 fprintf_unfiltered (file
,
1312 "gdbarch_dump: register_type = <%s>\n",
1313 host_address_to_string (gdbarch
->register_type
));
1314 fprintf_unfiltered (file
,
1315 "gdbarch_dump: gdbarch_relocate_instruction_p() = %d\n",
1316 gdbarch_relocate_instruction_p (gdbarch
));
1317 fprintf_unfiltered (file
,
1318 "gdbarch_dump: relocate_instruction = <%s>\n",
1319 host_address_to_string (gdbarch
->relocate_instruction
));
1320 fprintf_unfiltered (file
,
1321 "gdbarch_dump: remote_register_number = <%s>\n",
1322 host_address_to_string (gdbarch
->remote_register_number
));
1323 fprintf_unfiltered (file
,
1324 "gdbarch_dump: gdbarch_report_signal_info_p() = %d\n",
1325 gdbarch_report_signal_info_p (gdbarch
));
1326 fprintf_unfiltered (file
,
1327 "gdbarch_dump: report_signal_info = <%s>\n",
1328 host_address_to_string (gdbarch
->report_signal_info
));
1329 fprintf_unfiltered (file
,
1330 "gdbarch_dump: return_in_first_hidden_param_p = <%s>\n",
1331 host_address_to_string (gdbarch
->return_in_first_hidden_param_p
));
1332 fprintf_unfiltered (file
,
1333 "gdbarch_dump: gdbarch_return_value_p() = %d\n",
1334 gdbarch_return_value_p (gdbarch
));
1335 fprintf_unfiltered (file
,
1336 "gdbarch_dump: return_value = <%s>\n",
1337 host_address_to_string (gdbarch
->return_value
));
1338 fprintf_unfiltered (file
,
1339 "gdbarch_dump: sdb_reg_to_regnum = <%s>\n",
1340 host_address_to_string (gdbarch
->sdb_reg_to_regnum
));
1341 fprintf_unfiltered (file
,
1342 "gdbarch_dump: short_bit = %s\n",
1343 plongest (gdbarch
->short_bit
));
1344 fprintf_unfiltered (file
,
1345 "gdbarch_dump: significant_addr_bit = %s\n",
1346 plongest (gdbarch
->significant_addr_bit
));
1347 fprintf_unfiltered (file
,
1348 "gdbarch_dump: gdbarch_single_step_through_delay_p() = %d\n",
1349 gdbarch_single_step_through_delay_p (gdbarch
));
1350 fprintf_unfiltered (file
,
1351 "gdbarch_dump: single_step_through_delay = <%s>\n",
1352 host_address_to_string (gdbarch
->single_step_through_delay
));
1353 fprintf_unfiltered (file
,
1354 "gdbarch_dump: gdbarch_skip_entrypoint_p() = %d\n",
1355 gdbarch_skip_entrypoint_p (gdbarch
));
1356 fprintf_unfiltered (file
,
1357 "gdbarch_dump: skip_entrypoint = <%s>\n",
1358 host_address_to_string (gdbarch
->skip_entrypoint
));
1359 fprintf_unfiltered (file
,
1360 "gdbarch_dump: gdbarch_skip_main_prologue_p() = %d\n",
1361 gdbarch_skip_main_prologue_p (gdbarch
));
1362 fprintf_unfiltered (file
,
1363 "gdbarch_dump: skip_main_prologue = <%s>\n",
1364 host_address_to_string (gdbarch
->skip_main_prologue
));
1365 fprintf_unfiltered (file
,
1366 "gdbarch_dump: skip_permanent_breakpoint = <%s>\n",
1367 host_address_to_string (gdbarch
->skip_permanent_breakpoint
));
1368 fprintf_unfiltered (file
,
1369 "gdbarch_dump: skip_prologue = <%s>\n",
1370 host_address_to_string (gdbarch
->skip_prologue
));
1371 fprintf_unfiltered (file
,
1372 "gdbarch_dump: skip_solib_resolver = <%s>\n",
1373 host_address_to_string (gdbarch
->skip_solib_resolver
));
1374 fprintf_unfiltered (file
,
1375 "gdbarch_dump: skip_trampoline_code = <%s>\n",
1376 host_address_to_string (gdbarch
->skip_trampoline_code
));
1377 fprintf_unfiltered (file
,
1378 "gdbarch_dump: gdbarch_software_single_step_p() = %d\n",
1379 gdbarch_software_single_step_p (gdbarch
));
1380 fprintf_unfiltered (file
,
1381 "gdbarch_dump: software_single_step = <%s>\n",
1382 host_address_to_string (gdbarch
->software_single_step
));
1383 fprintf_unfiltered (file
,
1384 "gdbarch_dump: sofun_address_maybe_missing = %s\n",
1385 plongest (gdbarch
->sofun_address_maybe_missing
));
1386 fprintf_unfiltered (file
,
1387 "gdbarch_dump: solib_symbols_extension = %s\n",
1388 pstring (gdbarch
->solib_symbols_extension
));
1389 fprintf_unfiltered (file
,
1390 "gdbarch_dump: sp_regnum = %s\n",
1391 plongest (gdbarch
->sp_regnum
));
1392 fprintf_unfiltered (file
,
1393 "gdbarch_dump: stab_reg_to_regnum = <%s>\n",
1394 host_address_to_string (gdbarch
->stab_reg_to_regnum
));
1395 fprintf_unfiltered (file
,
1396 "gdbarch_dump: stabs_argument_has_addr = <%s>\n",
1397 host_address_to_string (gdbarch
->stabs_argument_has_addr
));
1398 fprintf_unfiltered (file
,
1399 "gdbarch_dump: stack_frame_destroyed_p = <%s>\n",
1400 host_address_to_string (gdbarch
->stack_frame_destroyed_p
));
1401 fprintf_unfiltered (file
,
1402 "gdbarch_dump: gdbarch_stap_adjust_register_p() = %d\n",
1403 gdbarch_stap_adjust_register_p (gdbarch
));
1404 fprintf_unfiltered (file
,
1405 "gdbarch_dump: stap_adjust_register = <%s>\n",
1406 host_address_to_string (gdbarch
->stap_adjust_register
));
1407 fprintf_unfiltered (file
,
1408 "gdbarch_dump: stap_gdb_register_prefix = %s\n",
1409 pstring (gdbarch
->stap_gdb_register_prefix
));
1410 fprintf_unfiltered (file
,
1411 "gdbarch_dump: stap_gdb_register_suffix = %s\n",
1412 pstring (gdbarch
->stap_gdb_register_suffix
));
1413 fprintf_unfiltered (file
,
1414 "gdbarch_dump: stap_integer_prefixes = %s\n",
1415 pstring_list (gdbarch
->stap_integer_prefixes
));
1416 fprintf_unfiltered (file
,
1417 "gdbarch_dump: stap_integer_suffixes = %s\n",
1418 pstring_list (gdbarch
->stap_integer_suffixes
));
1419 fprintf_unfiltered (file
,
1420 "gdbarch_dump: gdbarch_stap_is_single_operand_p() = %d\n",
1421 gdbarch_stap_is_single_operand_p (gdbarch
));
1422 fprintf_unfiltered (file
,
1423 "gdbarch_dump: stap_is_single_operand = <%s>\n",
1424 host_address_to_string (gdbarch
->stap_is_single_operand
));
1425 fprintf_unfiltered (file
,
1426 "gdbarch_dump: gdbarch_stap_parse_special_token_p() = %d\n",
1427 gdbarch_stap_parse_special_token_p (gdbarch
));
1428 fprintf_unfiltered (file
,
1429 "gdbarch_dump: stap_parse_special_token = <%s>\n",
1430 host_address_to_string (gdbarch
->stap_parse_special_token
));
1431 fprintf_unfiltered (file
,
1432 "gdbarch_dump: stap_register_indirection_prefixes = %s\n",
1433 pstring_list (gdbarch
->stap_register_indirection_prefixes
));
1434 fprintf_unfiltered (file
,
1435 "gdbarch_dump: stap_register_indirection_suffixes = %s\n",
1436 pstring_list (gdbarch
->stap_register_indirection_suffixes
));
1437 fprintf_unfiltered (file
,
1438 "gdbarch_dump: stap_register_prefixes = %s\n",
1439 pstring_list (gdbarch
->stap_register_prefixes
));
1440 fprintf_unfiltered (file
,
1441 "gdbarch_dump: stap_register_suffixes = %s\n",
1442 pstring_list (gdbarch
->stap_register_suffixes
));
1443 fprintf_unfiltered (file
,
1444 "gdbarch_dump: sw_breakpoint_from_kind = <%s>\n",
1445 host_address_to_string (gdbarch
->sw_breakpoint_from_kind
));
1446 fprintf_unfiltered (file
,
1447 "gdbarch_dump: syscalls_info = %s\n",
1448 host_address_to_string (gdbarch
->syscalls_info
));
1449 fprintf_unfiltered (file
,
1450 "gdbarch_dump: target_desc = %s\n",
1451 host_address_to_string (gdbarch
->target_desc
));
1452 fprintf_unfiltered (file
,
1453 "gdbarch_dump: type_align = <%s>\n",
1454 host_address_to_string (gdbarch
->type_align
));
1455 fprintf_unfiltered (file
,
1456 "gdbarch_dump: unwind_pc = <%s>\n",
1457 host_address_to_string (gdbarch
->unwind_pc
));
1458 fprintf_unfiltered (file
,
1459 "gdbarch_dump: unwind_sp = <%s>\n",
1460 host_address_to_string (gdbarch
->unwind_sp
));
1461 fprintf_unfiltered (file
,
1462 "gdbarch_dump: valid_disassembler_options = %s\n",
1463 host_address_to_string (gdbarch
->valid_disassembler_options
));
1464 fprintf_unfiltered (file
,
1465 "gdbarch_dump: value_from_register = <%s>\n",
1466 host_address_to_string (gdbarch
->value_from_register
));
1467 fprintf_unfiltered (file
,
1468 "gdbarch_dump: value_to_register = <%s>\n",
1469 host_address_to_string (gdbarch
->value_to_register
));
1470 fprintf_unfiltered (file
,
1471 "gdbarch_dump: vbit_in_delta = %s\n",
1472 plongest (gdbarch
->vbit_in_delta
));
1473 fprintf_unfiltered (file
,
1474 "gdbarch_dump: virtual_frame_pointer = <%s>\n",
1475 host_address_to_string (gdbarch
->virtual_frame_pointer
));
1476 fprintf_unfiltered (file
,
1477 "gdbarch_dump: vsyscall_range = <%s>\n",
1478 host_address_to_string (gdbarch
->vsyscall_range
));
1479 fprintf_unfiltered (file
,
1480 "gdbarch_dump: vtable_function_descriptors = %s\n",
1481 plongest (gdbarch
->vtable_function_descriptors
));
1482 fprintf_unfiltered (file
,
1483 "gdbarch_dump: wchar_bit = %s\n",
1484 plongest (gdbarch
->wchar_bit
));
1485 fprintf_unfiltered (file
,
1486 "gdbarch_dump: wchar_signed = %s\n",
1487 plongest (gdbarch
->wchar_signed
));
1488 fprintf_unfiltered (file
,
1489 "gdbarch_dump: gdbarch_write_pc_p() = %d\n",
1490 gdbarch_write_pc_p (gdbarch
));
1491 fprintf_unfiltered (file
,
1492 "gdbarch_dump: write_pc = <%s>\n",
1493 host_address_to_string (gdbarch
->write_pc
));
1494 fprintf_unfiltered (file
,
1495 "gdbarch_dump: xml_syscall_file = %s\n",
1496 pstring (gdbarch
->xml_syscall_file
));
1497 if (gdbarch
->dump_tdep
!= NULL
)
1498 gdbarch
->dump_tdep (gdbarch
, file
);
1501 struct gdbarch_tdep
*
1502 gdbarch_tdep (struct gdbarch
*gdbarch
)
1504 if (gdbarch_debug
>= 2)
1505 fprintf_unfiltered (gdb_stdlog
, "gdbarch_tdep called\n");
1506 return gdbarch
->tdep
;
1510 const struct bfd_arch_info
*
1511 gdbarch_bfd_arch_info (struct gdbarch
*gdbarch
)
1513 gdb_assert (gdbarch
!= NULL
);
1514 if (gdbarch_debug
>= 2)
1515 fprintf_unfiltered (gdb_stdlog
, "gdbarch_bfd_arch_info called\n");
1516 return gdbarch
->bfd_arch_info
;
1520 gdbarch_byte_order (struct gdbarch
*gdbarch
)
1522 gdb_assert (gdbarch
!= NULL
);
1523 if (gdbarch_debug
>= 2)
1524 fprintf_unfiltered (gdb_stdlog
, "gdbarch_byte_order called\n");
1525 return gdbarch
->byte_order
;
1529 gdbarch_byte_order_for_code (struct gdbarch
*gdbarch
)
1531 gdb_assert (gdbarch
!= NULL
);
1532 if (gdbarch_debug
>= 2)
1533 fprintf_unfiltered (gdb_stdlog
, "gdbarch_byte_order_for_code called\n");
1534 return gdbarch
->byte_order_for_code
;
1538 gdbarch_osabi (struct gdbarch
*gdbarch
)
1540 gdb_assert (gdbarch
!= NULL
);
1541 if (gdbarch_debug
>= 2)
1542 fprintf_unfiltered (gdb_stdlog
, "gdbarch_osabi called\n");
1543 return gdbarch
->osabi
;
1546 const struct target_desc
*
1547 gdbarch_target_desc (struct gdbarch
*gdbarch
)
1549 gdb_assert (gdbarch
!= NULL
);
1550 if (gdbarch_debug
>= 2)
1551 fprintf_unfiltered (gdb_stdlog
, "gdbarch_target_desc called\n");
1552 return gdbarch
->target_desc
;
1556 gdbarch_short_bit (struct gdbarch
*gdbarch
)
1558 gdb_assert (gdbarch
!= NULL
);
1559 /* Skip verify of short_bit, invalid_p == 0 */
1560 if (gdbarch_debug
>= 2)
1561 fprintf_unfiltered (gdb_stdlog
, "gdbarch_short_bit called\n");
1562 return gdbarch
->short_bit
;
1566 set_gdbarch_short_bit (struct gdbarch
*gdbarch
,
1569 gdbarch
->short_bit
= short_bit
;
1573 gdbarch_int_bit (struct gdbarch
*gdbarch
)
1575 gdb_assert (gdbarch
!= NULL
);
1576 /* Skip verify of int_bit, invalid_p == 0 */
1577 if (gdbarch_debug
>= 2)
1578 fprintf_unfiltered (gdb_stdlog
, "gdbarch_int_bit called\n");
1579 return gdbarch
->int_bit
;
1583 set_gdbarch_int_bit (struct gdbarch
*gdbarch
,
1586 gdbarch
->int_bit
= int_bit
;
1590 gdbarch_long_bit (struct gdbarch
*gdbarch
)
1592 gdb_assert (gdbarch
!= NULL
);
1593 /* Skip verify of long_bit, invalid_p == 0 */
1594 if (gdbarch_debug
>= 2)
1595 fprintf_unfiltered (gdb_stdlog
, "gdbarch_long_bit called\n");
1596 return gdbarch
->long_bit
;
1600 set_gdbarch_long_bit (struct gdbarch
*gdbarch
,
1603 gdbarch
->long_bit
= long_bit
;
1607 gdbarch_long_long_bit (struct gdbarch
*gdbarch
)
1609 gdb_assert (gdbarch
!= NULL
);
1610 /* Skip verify of long_long_bit, invalid_p == 0 */
1611 if (gdbarch_debug
>= 2)
1612 fprintf_unfiltered (gdb_stdlog
, "gdbarch_long_long_bit called\n");
1613 return gdbarch
->long_long_bit
;
1617 set_gdbarch_long_long_bit (struct gdbarch
*gdbarch
,
1620 gdbarch
->long_long_bit
= long_long_bit
;
1624 gdbarch_half_bit (struct gdbarch
*gdbarch
)
1626 gdb_assert (gdbarch
!= NULL
);
1627 /* Skip verify of half_bit, invalid_p == 0 */
1628 if (gdbarch_debug
>= 2)
1629 fprintf_unfiltered (gdb_stdlog
, "gdbarch_half_bit called\n");
1630 return gdbarch
->half_bit
;
1634 set_gdbarch_half_bit (struct gdbarch
*gdbarch
,
1637 gdbarch
->half_bit
= half_bit
;
1640 const struct floatformat
**
1641 gdbarch_half_format (struct gdbarch
*gdbarch
)
1643 gdb_assert (gdbarch
!= NULL
);
1644 if (gdbarch_debug
>= 2)
1645 fprintf_unfiltered (gdb_stdlog
, "gdbarch_half_format called\n");
1646 return gdbarch
->half_format
;
1650 set_gdbarch_half_format (struct gdbarch
*gdbarch
,
1651 const struct floatformat
** half_format
)
1653 gdbarch
->half_format
= half_format
;
1657 gdbarch_float_bit (struct gdbarch
*gdbarch
)
1659 gdb_assert (gdbarch
!= NULL
);
1660 /* Skip verify of float_bit, invalid_p == 0 */
1661 if (gdbarch_debug
>= 2)
1662 fprintf_unfiltered (gdb_stdlog
, "gdbarch_float_bit called\n");
1663 return gdbarch
->float_bit
;
1667 set_gdbarch_float_bit (struct gdbarch
*gdbarch
,
1670 gdbarch
->float_bit
= float_bit
;
1673 const struct floatformat
**
1674 gdbarch_float_format (struct gdbarch
*gdbarch
)
1676 gdb_assert (gdbarch
!= NULL
);
1677 if (gdbarch_debug
>= 2)
1678 fprintf_unfiltered (gdb_stdlog
, "gdbarch_float_format called\n");
1679 return gdbarch
->float_format
;
1683 set_gdbarch_float_format (struct gdbarch
*gdbarch
,
1684 const struct floatformat
** float_format
)
1686 gdbarch
->float_format
= float_format
;
1690 gdbarch_double_bit (struct gdbarch
*gdbarch
)
1692 gdb_assert (gdbarch
!= NULL
);
1693 /* Skip verify of double_bit, invalid_p == 0 */
1694 if (gdbarch_debug
>= 2)
1695 fprintf_unfiltered (gdb_stdlog
, "gdbarch_double_bit called\n");
1696 return gdbarch
->double_bit
;
1700 set_gdbarch_double_bit (struct gdbarch
*gdbarch
,
1703 gdbarch
->double_bit
= double_bit
;
1706 const struct floatformat
**
1707 gdbarch_double_format (struct gdbarch
*gdbarch
)
1709 gdb_assert (gdbarch
!= NULL
);
1710 if (gdbarch_debug
>= 2)
1711 fprintf_unfiltered (gdb_stdlog
, "gdbarch_double_format called\n");
1712 return gdbarch
->double_format
;
1716 set_gdbarch_double_format (struct gdbarch
*gdbarch
,
1717 const struct floatformat
** double_format
)
1719 gdbarch
->double_format
= double_format
;
1723 gdbarch_long_double_bit (struct gdbarch
*gdbarch
)
1725 gdb_assert (gdbarch
!= NULL
);
1726 /* Skip verify of long_double_bit, invalid_p == 0 */
1727 if (gdbarch_debug
>= 2)
1728 fprintf_unfiltered (gdb_stdlog
, "gdbarch_long_double_bit called\n");
1729 return gdbarch
->long_double_bit
;
1733 set_gdbarch_long_double_bit (struct gdbarch
*gdbarch
,
1734 int long_double_bit
)
1736 gdbarch
->long_double_bit
= long_double_bit
;
1739 const struct floatformat
**
1740 gdbarch_long_double_format (struct gdbarch
*gdbarch
)
1742 gdb_assert (gdbarch
!= NULL
);
1743 if (gdbarch_debug
>= 2)
1744 fprintf_unfiltered (gdb_stdlog
, "gdbarch_long_double_format called\n");
1745 return gdbarch
->long_double_format
;
1749 set_gdbarch_long_double_format (struct gdbarch
*gdbarch
,
1750 const struct floatformat
** long_double_format
)
1752 gdbarch
->long_double_format
= long_double_format
;
1756 gdbarch_wchar_bit (struct gdbarch
*gdbarch
)
1758 gdb_assert (gdbarch
!= NULL
);
1759 /* Skip verify of wchar_bit, invalid_p == 0 */
1760 if (gdbarch_debug
>= 2)
1761 fprintf_unfiltered (gdb_stdlog
, "gdbarch_wchar_bit called\n");
1762 return gdbarch
->wchar_bit
;
1766 set_gdbarch_wchar_bit (struct gdbarch
*gdbarch
,
1769 gdbarch
->wchar_bit
= wchar_bit
;
1773 gdbarch_wchar_signed (struct gdbarch
*gdbarch
)
1775 gdb_assert (gdbarch
!= NULL
);
1776 /* Check variable changed from pre-default. */
1777 gdb_assert (gdbarch
->wchar_signed
!= -1);
1778 if (gdbarch_debug
>= 2)
1779 fprintf_unfiltered (gdb_stdlog
, "gdbarch_wchar_signed called\n");
1780 return gdbarch
->wchar_signed
;
1784 set_gdbarch_wchar_signed (struct gdbarch
*gdbarch
,
1787 gdbarch
->wchar_signed
= wchar_signed
;
1790 const struct floatformat
**
1791 gdbarch_floatformat_for_type (struct gdbarch
*gdbarch
, const char *name
, int length
)
1793 gdb_assert (gdbarch
!= NULL
);
1794 gdb_assert (gdbarch
->floatformat_for_type
!= NULL
);
1795 if (gdbarch_debug
>= 2)
1796 fprintf_unfiltered (gdb_stdlog
, "gdbarch_floatformat_for_type called\n");
1797 return gdbarch
->floatformat_for_type (gdbarch
, name
, length
);
1801 set_gdbarch_floatformat_for_type (struct gdbarch
*gdbarch
,
1802 gdbarch_floatformat_for_type_ftype floatformat_for_type
)
1804 gdbarch
->floatformat_for_type
= floatformat_for_type
;
1808 gdbarch_ptr_bit (struct gdbarch
*gdbarch
)
1810 gdb_assert (gdbarch
!= NULL
);
1811 /* Skip verify of ptr_bit, invalid_p == 0 */
1812 if (gdbarch_debug
>= 2)
1813 fprintf_unfiltered (gdb_stdlog
, "gdbarch_ptr_bit called\n");
1814 return gdbarch
->ptr_bit
;
1818 set_gdbarch_ptr_bit (struct gdbarch
*gdbarch
,
1821 gdbarch
->ptr_bit
= ptr_bit
;
1825 gdbarch_addr_bit (struct gdbarch
*gdbarch
)
1827 gdb_assert (gdbarch
!= NULL
);
1828 /* Check variable changed from pre-default. */
1829 gdb_assert (gdbarch
->addr_bit
!= 0);
1830 if (gdbarch_debug
>= 2)
1831 fprintf_unfiltered (gdb_stdlog
, "gdbarch_addr_bit called\n");
1832 return gdbarch
->addr_bit
;
1836 set_gdbarch_addr_bit (struct gdbarch
*gdbarch
,
1839 gdbarch
->addr_bit
= addr_bit
;
1843 gdbarch_dwarf2_addr_size (struct gdbarch
*gdbarch
)
1845 gdb_assert (gdbarch
!= NULL
);
1846 /* Check variable changed from pre-default. */
1847 gdb_assert (gdbarch
->dwarf2_addr_size
!= 0);
1848 if (gdbarch_debug
>= 2)
1849 fprintf_unfiltered (gdb_stdlog
, "gdbarch_dwarf2_addr_size called\n");
1850 return gdbarch
->dwarf2_addr_size
;
1854 set_gdbarch_dwarf2_addr_size (struct gdbarch
*gdbarch
,
1855 int dwarf2_addr_size
)
1857 gdbarch
->dwarf2_addr_size
= dwarf2_addr_size
;
1861 gdbarch_char_signed (struct gdbarch
*gdbarch
)
1863 gdb_assert (gdbarch
!= NULL
);
1864 /* Check variable changed from pre-default. */
1865 gdb_assert (gdbarch
->char_signed
!= -1);
1866 if (gdbarch_debug
>= 2)
1867 fprintf_unfiltered (gdb_stdlog
, "gdbarch_char_signed called\n");
1868 return gdbarch
->char_signed
;
1872 set_gdbarch_char_signed (struct gdbarch
*gdbarch
,
1875 gdbarch
->char_signed
= char_signed
;
1879 gdbarch_read_pc_p (struct gdbarch
*gdbarch
)
1881 gdb_assert (gdbarch
!= NULL
);
1882 return gdbarch
->read_pc
!= NULL
;
1886 gdbarch_read_pc (struct gdbarch
*gdbarch
, readable_regcache
*regcache
)
1888 gdb_assert (gdbarch
!= NULL
);
1889 gdb_assert (gdbarch
->read_pc
!= NULL
);
1890 if (gdbarch_debug
>= 2)
1891 fprintf_unfiltered (gdb_stdlog
, "gdbarch_read_pc called\n");
1892 return gdbarch
->read_pc (regcache
);
1896 set_gdbarch_read_pc (struct gdbarch
*gdbarch
,
1897 gdbarch_read_pc_ftype read_pc
)
1899 gdbarch
->read_pc
= read_pc
;
1903 gdbarch_write_pc_p (struct gdbarch
*gdbarch
)
1905 gdb_assert (gdbarch
!= NULL
);
1906 return gdbarch
->write_pc
!= NULL
;
1910 gdbarch_write_pc (struct gdbarch
*gdbarch
, struct regcache
*regcache
, CORE_ADDR val
)
1912 gdb_assert (gdbarch
!= NULL
);
1913 gdb_assert (gdbarch
->write_pc
!= NULL
);
1914 if (gdbarch_debug
>= 2)
1915 fprintf_unfiltered (gdb_stdlog
, "gdbarch_write_pc called\n");
1916 gdbarch
->write_pc (regcache
, val
);
1920 set_gdbarch_write_pc (struct gdbarch
*gdbarch
,
1921 gdbarch_write_pc_ftype write_pc
)
1923 gdbarch
->write_pc
= write_pc
;
1927 gdbarch_virtual_frame_pointer (struct gdbarch
*gdbarch
, CORE_ADDR pc
, int *frame_regnum
, LONGEST
*frame_offset
)
1929 gdb_assert (gdbarch
!= NULL
);
1930 gdb_assert (gdbarch
->virtual_frame_pointer
!= NULL
);
1931 if (gdbarch_debug
>= 2)
1932 fprintf_unfiltered (gdb_stdlog
, "gdbarch_virtual_frame_pointer called\n");
1933 gdbarch
->virtual_frame_pointer (gdbarch
, pc
, frame_regnum
, frame_offset
);
1937 set_gdbarch_virtual_frame_pointer (struct gdbarch
*gdbarch
,
1938 gdbarch_virtual_frame_pointer_ftype virtual_frame_pointer
)
1940 gdbarch
->virtual_frame_pointer
= virtual_frame_pointer
;
1944 gdbarch_pseudo_register_read_p (struct gdbarch
*gdbarch
)
1946 gdb_assert (gdbarch
!= NULL
);
1947 return gdbarch
->pseudo_register_read
!= NULL
;
1950 enum register_status
1951 gdbarch_pseudo_register_read (struct gdbarch
*gdbarch
, readable_regcache
*regcache
, int cookednum
, gdb_byte
*buf
)
1953 gdb_assert (gdbarch
!= NULL
);
1954 gdb_assert (gdbarch
->pseudo_register_read
!= NULL
);
1955 if (gdbarch_debug
>= 2)
1956 fprintf_unfiltered (gdb_stdlog
, "gdbarch_pseudo_register_read called\n");
1957 return gdbarch
->pseudo_register_read (gdbarch
, regcache
, cookednum
, buf
);
1961 set_gdbarch_pseudo_register_read (struct gdbarch
*gdbarch
,
1962 gdbarch_pseudo_register_read_ftype pseudo_register_read
)
1964 gdbarch
->pseudo_register_read
= pseudo_register_read
;
1968 gdbarch_pseudo_register_read_value_p (struct gdbarch
*gdbarch
)
1970 gdb_assert (gdbarch
!= NULL
);
1971 return gdbarch
->pseudo_register_read_value
!= NULL
;
1975 gdbarch_pseudo_register_read_value (struct gdbarch
*gdbarch
, readable_regcache
*regcache
, int cookednum
)
1977 gdb_assert (gdbarch
!= NULL
);
1978 gdb_assert (gdbarch
->pseudo_register_read_value
!= NULL
);
1979 if (gdbarch_debug
>= 2)
1980 fprintf_unfiltered (gdb_stdlog
, "gdbarch_pseudo_register_read_value called\n");
1981 return gdbarch
->pseudo_register_read_value (gdbarch
, regcache
, cookednum
);
1985 set_gdbarch_pseudo_register_read_value (struct gdbarch
*gdbarch
,
1986 gdbarch_pseudo_register_read_value_ftype pseudo_register_read_value
)
1988 gdbarch
->pseudo_register_read_value
= pseudo_register_read_value
;
1992 gdbarch_pseudo_register_write_p (struct gdbarch
*gdbarch
)
1994 gdb_assert (gdbarch
!= NULL
);
1995 return gdbarch
->pseudo_register_write
!= NULL
;
1999 gdbarch_pseudo_register_write (struct gdbarch
*gdbarch
, struct regcache
*regcache
, int cookednum
, const gdb_byte
*buf
)
2001 gdb_assert (gdbarch
!= NULL
);
2002 gdb_assert (gdbarch
->pseudo_register_write
!= NULL
);
2003 if (gdbarch_debug
>= 2)
2004 fprintf_unfiltered (gdb_stdlog
, "gdbarch_pseudo_register_write called\n");
2005 gdbarch
->pseudo_register_write (gdbarch
, regcache
, cookednum
, buf
);
2009 set_gdbarch_pseudo_register_write (struct gdbarch
*gdbarch
,
2010 gdbarch_pseudo_register_write_ftype pseudo_register_write
)
2012 gdbarch
->pseudo_register_write
= pseudo_register_write
;
2016 gdbarch_num_regs (struct gdbarch
*gdbarch
)
2018 gdb_assert (gdbarch
!= NULL
);
2019 /* Check variable changed from pre-default. */
2020 gdb_assert (gdbarch
->num_regs
!= -1);
2021 if (gdbarch_debug
>= 2)
2022 fprintf_unfiltered (gdb_stdlog
, "gdbarch_num_regs called\n");
2023 return gdbarch
->num_regs
;
2027 set_gdbarch_num_regs (struct gdbarch
*gdbarch
,
2030 gdbarch
->num_regs
= num_regs
;
2034 gdbarch_num_pseudo_regs (struct gdbarch
*gdbarch
)
2036 gdb_assert (gdbarch
!= NULL
);
2037 /* Skip verify of num_pseudo_regs, invalid_p == 0 */
2038 if (gdbarch_debug
>= 2)
2039 fprintf_unfiltered (gdb_stdlog
, "gdbarch_num_pseudo_regs called\n");
2040 return gdbarch
->num_pseudo_regs
;
2044 set_gdbarch_num_pseudo_regs (struct gdbarch
*gdbarch
,
2045 int num_pseudo_regs
)
2047 gdbarch
->num_pseudo_regs
= num_pseudo_regs
;
2051 gdbarch_ax_pseudo_register_collect_p (struct gdbarch
*gdbarch
)
2053 gdb_assert (gdbarch
!= NULL
);
2054 return gdbarch
->ax_pseudo_register_collect
!= NULL
;
2058 gdbarch_ax_pseudo_register_collect (struct gdbarch
*gdbarch
, struct agent_expr
*ax
, int reg
)
2060 gdb_assert (gdbarch
!= NULL
);
2061 gdb_assert (gdbarch
->ax_pseudo_register_collect
!= NULL
);
2062 if (gdbarch_debug
>= 2)
2063 fprintf_unfiltered (gdb_stdlog
, "gdbarch_ax_pseudo_register_collect called\n");
2064 return gdbarch
->ax_pseudo_register_collect (gdbarch
, ax
, reg
);
2068 set_gdbarch_ax_pseudo_register_collect (struct gdbarch
*gdbarch
,
2069 gdbarch_ax_pseudo_register_collect_ftype ax_pseudo_register_collect
)
2071 gdbarch
->ax_pseudo_register_collect
= ax_pseudo_register_collect
;
2075 gdbarch_ax_pseudo_register_push_stack_p (struct gdbarch
*gdbarch
)
2077 gdb_assert (gdbarch
!= NULL
);
2078 return gdbarch
->ax_pseudo_register_push_stack
!= NULL
;
2082 gdbarch_ax_pseudo_register_push_stack (struct gdbarch
*gdbarch
, struct agent_expr
*ax
, int reg
)
2084 gdb_assert (gdbarch
!= NULL
);
2085 gdb_assert (gdbarch
->ax_pseudo_register_push_stack
!= NULL
);
2086 if (gdbarch_debug
>= 2)
2087 fprintf_unfiltered (gdb_stdlog
, "gdbarch_ax_pseudo_register_push_stack called\n");
2088 return gdbarch
->ax_pseudo_register_push_stack (gdbarch
, ax
, reg
);
2092 set_gdbarch_ax_pseudo_register_push_stack (struct gdbarch
*gdbarch
,
2093 gdbarch_ax_pseudo_register_push_stack_ftype ax_pseudo_register_push_stack
)
2095 gdbarch
->ax_pseudo_register_push_stack
= ax_pseudo_register_push_stack
;
2099 gdbarch_report_signal_info_p (struct gdbarch
*gdbarch
)
2101 gdb_assert (gdbarch
!= NULL
);
2102 return gdbarch
->report_signal_info
!= NULL
;
2106 gdbarch_report_signal_info (struct gdbarch
*gdbarch
, struct ui_out
*uiout
, enum gdb_signal siggnal
)
2108 gdb_assert (gdbarch
!= NULL
);
2109 gdb_assert (gdbarch
->report_signal_info
!= NULL
);
2110 if (gdbarch_debug
>= 2)
2111 fprintf_unfiltered (gdb_stdlog
, "gdbarch_report_signal_info called\n");
2112 gdbarch
->report_signal_info (gdbarch
, uiout
, siggnal
);
2116 set_gdbarch_report_signal_info (struct gdbarch
*gdbarch
,
2117 gdbarch_report_signal_info_ftype report_signal_info
)
2119 gdbarch
->report_signal_info
= report_signal_info
;
2123 gdbarch_sp_regnum (struct gdbarch
*gdbarch
)
2125 gdb_assert (gdbarch
!= NULL
);
2126 /* Skip verify of sp_regnum, invalid_p == 0 */
2127 if (gdbarch_debug
>= 2)
2128 fprintf_unfiltered (gdb_stdlog
, "gdbarch_sp_regnum called\n");
2129 return gdbarch
->sp_regnum
;
2133 set_gdbarch_sp_regnum (struct gdbarch
*gdbarch
,
2136 gdbarch
->sp_regnum
= sp_regnum
;
2140 gdbarch_pc_regnum (struct gdbarch
*gdbarch
)
2142 gdb_assert (gdbarch
!= NULL
);
2143 /* Skip verify of pc_regnum, invalid_p == 0 */
2144 if (gdbarch_debug
>= 2)
2145 fprintf_unfiltered (gdb_stdlog
, "gdbarch_pc_regnum called\n");
2146 return gdbarch
->pc_regnum
;
2150 set_gdbarch_pc_regnum (struct gdbarch
*gdbarch
,
2153 gdbarch
->pc_regnum
= pc_regnum
;
2157 gdbarch_ps_regnum (struct gdbarch
*gdbarch
)
2159 gdb_assert (gdbarch
!= NULL
);
2160 /* Skip verify of ps_regnum, invalid_p == 0 */
2161 if (gdbarch_debug
>= 2)
2162 fprintf_unfiltered (gdb_stdlog
, "gdbarch_ps_regnum called\n");
2163 return gdbarch
->ps_regnum
;
2167 set_gdbarch_ps_regnum (struct gdbarch
*gdbarch
,
2170 gdbarch
->ps_regnum
= ps_regnum
;
2174 gdbarch_fp0_regnum (struct gdbarch
*gdbarch
)
2176 gdb_assert (gdbarch
!= NULL
);
2177 /* Skip verify of fp0_regnum, invalid_p == 0 */
2178 if (gdbarch_debug
>= 2)
2179 fprintf_unfiltered (gdb_stdlog
, "gdbarch_fp0_regnum called\n");
2180 return gdbarch
->fp0_regnum
;
2184 set_gdbarch_fp0_regnum (struct gdbarch
*gdbarch
,
2187 gdbarch
->fp0_regnum
= fp0_regnum
;
2191 gdbarch_stab_reg_to_regnum (struct gdbarch
*gdbarch
, int stab_regnr
)
2193 gdb_assert (gdbarch
!= NULL
);
2194 gdb_assert (gdbarch
->stab_reg_to_regnum
!= NULL
);
2195 if (gdbarch_debug
>= 2)
2196 fprintf_unfiltered (gdb_stdlog
, "gdbarch_stab_reg_to_regnum called\n");
2197 return gdbarch
->stab_reg_to_regnum (gdbarch
, stab_regnr
);
2201 set_gdbarch_stab_reg_to_regnum (struct gdbarch
*gdbarch
,
2202 gdbarch_stab_reg_to_regnum_ftype stab_reg_to_regnum
)
2204 gdbarch
->stab_reg_to_regnum
= stab_reg_to_regnum
;
2208 gdbarch_ecoff_reg_to_regnum (struct gdbarch
*gdbarch
, int ecoff_regnr
)
2210 gdb_assert (gdbarch
!= NULL
);
2211 gdb_assert (gdbarch
->ecoff_reg_to_regnum
!= NULL
);
2212 if (gdbarch_debug
>= 2)
2213 fprintf_unfiltered (gdb_stdlog
, "gdbarch_ecoff_reg_to_regnum called\n");
2214 return gdbarch
->ecoff_reg_to_regnum (gdbarch
, ecoff_regnr
);
2218 set_gdbarch_ecoff_reg_to_regnum (struct gdbarch
*gdbarch
,
2219 gdbarch_ecoff_reg_to_regnum_ftype ecoff_reg_to_regnum
)
2221 gdbarch
->ecoff_reg_to_regnum
= ecoff_reg_to_regnum
;
2225 gdbarch_sdb_reg_to_regnum (struct gdbarch
*gdbarch
, int sdb_regnr
)
2227 gdb_assert (gdbarch
!= NULL
);
2228 gdb_assert (gdbarch
->sdb_reg_to_regnum
!= NULL
);
2229 if (gdbarch_debug
>= 2)
2230 fprintf_unfiltered (gdb_stdlog
, "gdbarch_sdb_reg_to_regnum called\n");
2231 return gdbarch
->sdb_reg_to_regnum (gdbarch
, sdb_regnr
);
2235 set_gdbarch_sdb_reg_to_regnum (struct gdbarch
*gdbarch
,
2236 gdbarch_sdb_reg_to_regnum_ftype sdb_reg_to_regnum
)
2238 gdbarch
->sdb_reg_to_regnum
= sdb_reg_to_regnum
;
2242 gdbarch_dwarf2_reg_to_regnum (struct gdbarch
*gdbarch
, int dwarf2_regnr
)
2244 gdb_assert (gdbarch
!= NULL
);
2245 gdb_assert (gdbarch
->dwarf2_reg_to_regnum
!= NULL
);
2246 if (gdbarch_debug
>= 2)
2247 fprintf_unfiltered (gdb_stdlog
, "gdbarch_dwarf2_reg_to_regnum called\n");
2248 return gdbarch
->dwarf2_reg_to_regnum (gdbarch
, dwarf2_regnr
);
2252 set_gdbarch_dwarf2_reg_to_regnum (struct gdbarch
*gdbarch
,
2253 gdbarch_dwarf2_reg_to_regnum_ftype dwarf2_reg_to_regnum
)
2255 gdbarch
->dwarf2_reg_to_regnum
= dwarf2_reg_to_regnum
;
2259 gdbarch_register_name (struct gdbarch
*gdbarch
, int regnr
)
2261 gdb_assert (gdbarch
!= NULL
);
2262 gdb_assert (gdbarch
->register_name
!= NULL
);
2263 if (gdbarch_debug
>= 2)
2264 fprintf_unfiltered (gdb_stdlog
, "gdbarch_register_name called\n");
2265 return gdbarch
->register_name (gdbarch
, regnr
);
2269 set_gdbarch_register_name (struct gdbarch
*gdbarch
,
2270 gdbarch_register_name_ftype register_name
)
2272 gdbarch
->register_name
= register_name
;
2276 gdbarch_register_type_p (struct gdbarch
*gdbarch
)
2278 gdb_assert (gdbarch
!= NULL
);
2279 return gdbarch
->register_type
!= NULL
;
2283 gdbarch_register_type (struct gdbarch
*gdbarch
, int reg_nr
)
2285 gdb_assert (gdbarch
!= NULL
);
2286 gdb_assert (gdbarch
->register_type
!= NULL
);
2287 if (gdbarch_debug
>= 2)
2288 fprintf_unfiltered (gdb_stdlog
, "gdbarch_register_type called\n");
2289 return gdbarch
->register_type (gdbarch
, reg_nr
);
2293 set_gdbarch_register_type (struct gdbarch
*gdbarch
,
2294 gdbarch_register_type_ftype register_type
)
2296 gdbarch
->register_type
= register_type
;
2300 gdbarch_dummy_id (struct gdbarch
*gdbarch
, struct frame_info
*this_frame
)
2302 gdb_assert (gdbarch
!= NULL
);
2303 gdb_assert (gdbarch
->dummy_id
!= NULL
);
2304 if (gdbarch_debug
>= 2)
2305 fprintf_unfiltered (gdb_stdlog
, "gdbarch_dummy_id called\n");
2306 return gdbarch
->dummy_id (gdbarch
, this_frame
);
2310 set_gdbarch_dummy_id (struct gdbarch
*gdbarch
,
2311 gdbarch_dummy_id_ftype dummy_id
)
2313 gdbarch
->dummy_id
= dummy_id
;
2317 gdbarch_deprecated_fp_regnum (struct gdbarch
*gdbarch
)
2319 gdb_assert (gdbarch
!= NULL
);
2320 /* Skip verify of deprecated_fp_regnum, invalid_p == 0 */
2321 if (gdbarch_debug
>= 2)
2322 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_fp_regnum called\n");
2323 return gdbarch
->deprecated_fp_regnum
;
2327 set_gdbarch_deprecated_fp_regnum (struct gdbarch
*gdbarch
,
2328 int deprecated_fp_regnum
)
2330 gdbarch
->deprecated_fp_regnum
= deprecated_fp_regnum
;
2334 gdbarch_push_dummy_call_p (struct gdbarch
*gdbarch
)
2336 gdb_assert (gdbarch
!= NULL
);
2337 return gdbarch
->push_dummy_call
!= NULL
;
2341 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
, function_call_return_method return_method
, CORE_ADDR struct_addr
)
2343 gdb_assert (gdbarch
!= NULL
);
2344 gdb_assert (gdbarch
->push_dummy_call
!= NULL
);
2345 if (gdbarch_debug
>= 2)
2346 fprintf_unfiltered (gdb_stdlog
, "gdbarch_push_dummy_call called\n");
2347 return gdbarch
->push_dummy_call (gdbarch
, function
, regcache
, bp_addr
, nargs
, args
, sp
, return_method
, struct_addr
);
2351 set_gdbarch_push_dummy_call (struct gdbarch
*gdbarch
,
2352 gdbarch_push_dummy_call_ftype push_dummy_call
)
2354 gdbarch
->push_dummy_call
= push_dummy_call
;
2358 gdbarch_call_dummy_location (struct gdbarch
*gdbarch
)
2360 gdb_assert (gdbarch
!= NULL
);
2361 /* Skip verify of call_dummy_location, invalid_p == 0 */
2362 if (gdbarch_debug
>= 2)
2363 fprintf_unfiltered (gdb_stdlog
, "gdbarch_call_dummy_location called\n");
2364 return gdbarch
->call_dummy_location
;
2368 set_gdbarch_call_dummy_location (struct gdbarch
*gdbarch
,
2369 int call_dummy_location
)
2371 gdbarch
->call_dummy_location
= call_dummy_location
;
2375 gdbarch_push_dummy_code_p (struct gdbarch
*gdbarch
)
2377 gdb_assert (gdbarch
!= NULL
);
2378 return gdbarch
->push_dummy_code
!= NULL
;
2382 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
)
2384 gdb_assert (gdbarch
!= NULL
);
2385 gdb_assert (gdbarch
->push_dummy_code
!= NULL
);
2386 if (gdbarch_debug
>= 2)
2387 fprintf_unfiltered (gdb_stdlog
, "gdbarch_push_dummy_code called\n");
2388 return gdbarch
->push_dummy_code (gdbarch
, sp
, funaddr
, args
, nargs
, value_type
, real_pc
, bp_addr
, regcache
);
2392 set_gdbarch_push_dummy_code (struct gdbarch
*gdbarch
,
2393 gdbarch_push_dummy_code_ftype push_dummy_code
)
2395 gdbarch
->push_dummy_code
= push_dummy_code
;
2399 gdbarch_code_of_frame_writable (struct gdbarch
*gdbarch
, struct frame_info
*frame
)
2401 gdb_assert (gdbarch
!= NULL
);
2402 gdb_assert (gdbarch
->code_of_frame_writable
!= NULL
);
2403 if (gdbarch_debug
>= 2)
2404 fprintf_unfiltered (gdb_stdlog
, "gdbarch_code_of_frame_writable called\n");
2405 return gdbarch
->code_of_frame_writable (gdbarch
, frame
);
2409 set_gdbarch_code_of_frame_writable (struct gdbarch
*gdbarch
,
2410 gdbarch_code_of_frame_writable_ftype code_of_frame_writable
)
2412 gdbarch
->code_of_frame_writable
= code_of_frame_writable
;
2416 gdbarch_print_registers_info (struct gdbarch
*gdbarch
, struct ui_file
*file
, struct frame_info
*frame
, int regnum
, int all
)
2418 gdb_assert (gdbarch
!= NULL
);
2419 gdb_assert (gdbarch
->print_registers_info
!= NULL
);
2420 if (gdbarch_debug
>= 2)
2421 fprintf_unfiltered (gdb_stdlog
, "gdbarch_print_registers_info called\n");
2422 gdbarch
->print_registers_info (gdbarch
, file
, frame
, regnum
, all
);
2426 set_gdbarch_print_registers_info (struct gdbarch
*gdbarch
,
2427 gdbarch_print_registers_info_ftype print_registers_info
)
2429 gdbarch
->print_registers_info
= print_registers_info
;
2433 gdbarch_print_float_info (struct gdbarch
*gdbarch
, struct ui_file
*file
, struct frame_info
*frame
, const char *args
)
2435 gdb_assert (gdbarch
!= NULL
);
2436 gdb_assert (gdbarch
->print_float_info
!= NULL
);
2437 if (gdbarch_debug
>= 2)
2438 fprintf_unfiltered (gdb_stdlog
, "gdbarch_print_float_info called\n");
2439 gdbarch
->print_float_info (gdbarch
, file
, frame
, args
);
2443 set_gdbarch_print_float_info (struct gdbarch
*gdbarch
,
2444 gdbarch_print_float_info_ftype print_float_info
)
2446 gdbarch
->print_float_info
= print_float_info
;
2450 gdbarch_print_vector_info_p (struct gdbarch
*gdbarch
)
2452 gdb_assert (gdbarch
!= NULL
);
2453 return gdbarch
->print_vector_info
!= NULL
;
2457 gdbarch_print_vector_info (struct gdbarch
*gdbarch
, struct ui_file
*file
, struct frame_info
*frame
, const char *args
)
2459 gdb_assert (gdbarch
!= NULL
);
2460 gdb_assert (gdbarch
->print_vector_info
!= NULL
);
2461 if (gdbarch_debug
>= 2)
2462 fprintf_unfiltered (gdb_stdlog
, "gdbarch_print_vector_info called\n");
2463 gdbarch
->print_vector_info (gdbarch
, file
, frame
, args
);
2467 set_gdbarch_print_vector_info (struct gdbarch
*gdbarch
,
2468 gdbarch_print_vector_info_ftype print_vector_info
)
2470 gdbarch
->print_vector_info
= print_vector_info
;
2474 gdbarch_register_sim_regno (struct gdbarch
*gdbarch
, int reg_nr
)
2476 gdb_assert (gdbarch
!= NULL
);
2477 gdb_assert (gdbarch
->register_sim_regno
!= NULL
);
2478 if (gdbarch_debug
>= 2)
2479 fprintf_unfiltered (gdb_stdlog
, "gdbarch_register_sim_regno called\n");
2480 return gdbarch
->register_sim_regno (gdbarch
, reg_nr
);
2484 set_gdbarch_register_sim_regno (struct gdbarch
*gdbarch
,
2485 gdbarch_register_sim_regno_ftype register_sim_regno
)
2487 gdbarch
->register_sim_regno
= register_sim_regno
;
2491 gdbarch_cannot_fetch_register (struct gdbarch
*gdbarch
, int regnum
)
2493 gdb_assert (gdbarch
!= NULL
);
2494 gdb_assert (gdbarch
->cannot_fetch_register
!= NULL
);
2495 if (gdbarch_debug
>= 2)
2496 fprintf_unfiltered (gdb_stdlog
, "gdbarch_cannot_fetch_register called\n");
2497 return gdbarch
->cannot_fetch_register (gdbarch
, regnum
);
2501 set_gdbarch_cannot_fetch_register (struct gdbarch
*gdbarch
,
2502 gdbarch_cannot_fetch_register_ftype cannot_fetch_register
)
2504 gdbarch
->cannot_fetch_register
= cannot_fetch_register
;
2508 gdbarch_cannot_store_register (struct gdbarch
*gdbarch
, int regnum
)
2510 gdb_assert (gdbarch
!= NULL
);
2511 gdb_assert (gdbarch
->cannot_store_register
!= NULL
);
2512 if (gdbarch_debug
>= 2)
2513 fprintf_unfiltered (gdb_stdlog
, "gdbarch_cannot_store_register called\n");
2514 return gdbarch
->cannot_store_register (gdbarch
, regnum
);
2518 set_gdbarch_cannot_store_register (struct gdbarch
*gdbarch
,
2519 gdbarch_cannot_store_register_ftype cannot_store_register
)
2521 gdbarch
->cannot_store_register
= cannot_store_register
;
2525 gdbarch_get_longjmp_target_p (struct gdbarch
*gdbarch
)
2527 gdb_assert (gdbarch
!= NULL
);
2528 return gdbarch
->get_longjmp_target
!= NULL
;
2532 gdbarch_get_longjmp_target (struct gdbarch
*gdbarch
, struct frame_info
*frame
, CORE_ADDR
*pc
)
2534 gdb_assert (gdbarch
!= NULL
);
2535 gdb_assert (gdbarch
->get_longjmp_target
!= NULL
);
2536 if (gdbarch_debug
>= 2)
2537 fprintf_unfiltered (gdb_stdlog
, "gdbarch_get_longjmp_target called\n");
2538 return gdbarch
->get_longjmp_target (frame
, pc
);
2542 set_gdbarch_get_longjmp_target (struct gdbarch
*gdbarch
,
2543 gdbarch_get_longjmp_target_ftype get_longjmp_target
)
2545 gdbarch
->get_longjmp_target
= get_longjmp_target
;
2549 gdbarch_believe_pcc_promotion (struct gdbarch
*gdbarch
)
2551 gdb_assert (gdbarch
!= NULL
);
2552 if (gdbarch_debug
>= 2)
2553 fprintf_unfiltered (gdb_stdlog
, "gdbarch_believe_pcc_promotion called\n");
2554 return gdbarch
->believe_pcc_promotion
;
2558 set_gdbarch_believe_pcc_promotion (struct gdbarch
*gdbarch
,
2559 int believe_pcc_promotion
)
2561 gdbarch
->believe_pcc_promotion
= believe_pcc_promotion
;
2565 gdbarch_convert_register_p (struct gdbarch
*gdbarch
, int regnum
, struct type
*type
)
2567 gdb_assert (gdbarch
!= NULL
);
2568 gdb_assert (gdbarch
->convert_register_p
!= NULL
);
2569 if (gdbarch_debug
>= 2)
2570 fprintf_unfiltered (gdb_stdlog
, "gdbarch_convert_register_p called\n");
2571 return gdbarch
->convert_register_p (gdbarch
, regnum
, type
);
2575 set_gdbarch_convert_register_p (struct gdbarch
*gdbarch
,
2576 gdbarch_convert_register_p_ftype convert_register_p
)
2578 gdbarch
->convert_register_p
= convert_register_p
;
2582 gdbarch_register_to_value (struct gdbarch
*gdbarch
, struct frame_info
*frame
, int regnum
, struct type
*type
, gdb_byte
*buf
, int *optimizedp
, int *unavailablep
)
2584 gdb_assert (gdbarch
!= NULL
);
2585 gdb_assert (gdbarch
->register_to_value
!= NULL
);
2586 if (gdbarch_debug
>= 2)
2587 fprintf_unfiltered (gdb_stdlog
, "gdbarch_register_to_value called\n");
2588 return gdbarch
->register_to_value (frame
, regnum
, type
, buf
, optimizedp
, unavailablep
);
2592 set_gdbarch_register_to_value (struct gdbarch
*gdbarch
,
2593 gdbarch_register_to_value_ftype register_to_value
)
2595 gdbarch
->register_to_value
= register_to_value
;
2599 gdbarch_value_to_register (struct gdbarch
*gdbarch
, struct frame_info
*frame
, int regnum
, struct type
*type
, const gdb_byte
*buf
)
2601 gdb_assert (gdbarch
!= NULL
);
2602 gdb_assert (gdbarch
->value_to_register
!= NULL
);
2603 if (gdbarch_debug
>= 2)
2604 fprintf_unfiltered (gdb_stdlog
, "gdbarch_value_to_register called\n");
2605 gdbarch
->value_to_register (frame
, regnum
, type
, buf
);
2609 set_gdbarch_value_to_register (struct gdbarch
*gdbarch
,
2610 gdbarch_value_to_register_ftype value_to_register
)
2612 gdbarch
->value_to_register
= value_to_register
;
2616 gdbarch_value_from_register (struct gdbarch
*gdbarch
, struct type
*type
, int regnum
, struct frame_id frame_id
)
2618 gdb_assert (gdbarch
!= NULL
);
2619 gdb_assert (gdbarch
->value_from_register
!= NULL
);
2620 if (gdbarch_debug
>= 2)
2621 fprintf_unfiltered (gdb_stdlog
, "gdbarch_value_from_register called\n");
2622 return gdbarch
->value_from_register (gdbarch
, type
, regnum
, frame_id
);
2626 set_gdbarch_value_from_register (struct gdbarch
*gdbarch
,
2627 gdbarch_value_from_register_ftype value_from_register
)
2629 gdbarch
->value_from_register
= value_from_register
;
2633 gdbarch_pointer_to_address (struct gdbarch
*gdbarch
, struct type
*type
, const gdb_byte
*buf
)
2635 gdb_assert (gdbarch
!= NULL
);
2636 gdb_assert (gdbarch
->pointer_to_address
!= NULL
);
2637 if (gdbarch_debug
>= 2)
2638 fprintf_unfiltered (gdb_stdlog
, "gdbarch_pointer_to_address called\n");
2639 return gdbarch
->pointer_to_address (gdbarch
, type
, buf
);
2643 set_gdbarch_pointer_to_address (struct gdbarch
*gdbarch
,
2644 gdbarch_pointer_to_address_ftype pointer_to_address
)
2646 gdbarch
->pointer_to_address
= pointer_to_address
;
2650 gdbarch_address_to_pointer (struct gdbarch
*gdbarch
, struct type
*type
, gdb_byte
*buf
, CORE_ADDR addr
)
2652 gdb_assert (gdbarch
!= NULL
);
2653 gdb_assert (gdbarch
->address_to_pointer
!= NULL
);
2654 if (gdbarch_debug
>= 2)
2655 fprintf_unfiltered (gdb_stdlog
, "gdbarch_address_to_pointer called\n");
2656 gdbarch
->address_to_pointer (gdbarch
, type
, buf
, addr
);
2660 set_gdbarch_address_to_pointer (struct gdbarch
*gdbarch
,
2661 gdbarch_address_to_pointer_ftype address_to_pointer
)
2663 gdbarch
->address_to_pointer
= address_to_pointer
;
2667 gdbarch_integer_to_address_p (struct gdbarch
*gdbarch
)
2669 gdb_assert (gdbarch
!= NULL
);
2670 return gdbarch
->integer_to_address
!= NULL
;
2674 gdbarch_integer_to_address (struct gdbarch
*gdbarch
, struct type
*type
, const gdb_byte
*buf
)
2676 gdb_assert (gdbarch
!= NULL
);
2677 gdb_assert (gdbarch
->integer_to_address
!= NULL
);
2678 if (gdbarch_debug
>= 2)
2679 fprintf_unfiltered (gdb_stdlog
, "gdbarch_integer_to_address called\n");
2680 return gdbarch
->integer_to_address (gdbarch
, type
, buf
);
2684 set_gdbarch_integer_to_address (struct gdbarch
*gdbarch
,
2685 gdbarch_integer_to_address_ftype integer_to_address
)
2687 gdbarch
->integer_to_address
= integer_to_address
;
2691 gdbarch_return_value_p (struct gdbarch
*gdbarch
)
2693 gdb_assert (gdbarch
!= NULL
);
2694 return gdbarch
->return_value
!= NULL
;
2697 enum return_value_convention
2698 gdbarch_return_value (struct gdbarch
*gdbarch
, struct value
*function
, struct type
*valtype
, struct regcache
*regcache
, gdb_byte
*readbuf
, const gdb_byte
*writebuf
)
2700 gdb_assert (gdbarch
!= NULL
);
2701 gdb_assert (gdbarch
->return_value
!= NULL
);
2702 if (gdbarch_debug
>= 2)
2703 fprintf_unfiltered (gdb_stdlog
, "gdbarch_return_value called\n");
2704 return gdbarch
->return_value (gdbarch
, function
, valtype
, regcache
, readbuf
, writebuf
);
2708 set_gdbarch_return_value (struct gdbarch
*gdbarch
,
2709 gdbarch_return_value_ftype return_value
)
2711 gdbarch
->return_value
= return_value
;
2715 gdbarch_return_in_first_hidden_param_p (struct gdbarch
*gdbarch
, struct type
*type
)
2717 gdb_assert (gdbarch
!= NULL
);
2718 gdb_assert (gdbarch
->return_in_first_hidden_param_p
!= NULL
);
2719 if (gdbarch_debug
>= 2)
2720 fprintf_unfiltered (gdb_stdlog
, "gdbarch_return_in_first_hidden_param_p called\n");
2721 return gdbarch
->return_in_first_hidden_param_p (gdbarch
, type
);
2725 set_gdbarch_return_in_first_hidden_param_p (struct gdbarch
*gdbarch
,
2726 gdbarch_return_in_first_hidden_param_p_ftype return_in_first_hidden_param_p
)
2728 gdbarch
->return_in_first_hidden_param_p
= return_in_first_hidden_param_p
;
2732 gdbarch_skip_prologue (struct gdbarch
*gdbarch
, CORE_ADDR ip
)
2734 gdb_assert (gdbarch
!= NULL
);
2735 gdb_assert (gdbarch
->skip_prologue
!= NULL
);
2736 if (gdbarch_debug
>= 2)
2737 fprintf_unfiltered (gdb_stdlog
, "gdbarch_skip_prologue called\n");
2738 return gdbarch
->skip_prologue (gdbarch
, ip
);
2742 set_gdbarch_skip_prologue (struct gdbarch
*gdbarch
,
2743 gdbarch_skip_prologue_ftype skip_prologue
)
2745 gdbarch
->skip_prologue
= skip_prologue
;
2749 gdbarch_skip_main_prologue_p (struct gdbarch
*gdbarch
)
2751 gdb_assert (gdbarch
!= NULL
);
2752 return gdbarch
->skip_main_prologue
!= NULL
;
2756 gdbarch_skip_main_prologue (struct gdbarch
*gdbarch
, CORE_ADDR ip
)
2758 gdb_assert (gdbarch
!= NULL
);
2759 gdb_assert (gdbarch
->skip_main_prologue
!= NULL
);
2760 if (gdbarch_debug
>= 2)
2761 fprintf_unfiltered (gdb_stdlog
, "gdbarch_skip_main_prologue called\n");
2762 return gdbarch
->skip_main_prologue (gdbarch
, ip
);
2766 set_gdbarch_skip_main_prologue (struct gdbarch
*gdbarch
,
2767 gdbarch_skip_main_prologue_ftype skip_main_prologue
)
2769 gdbarch
->skip_main_prologue
= skip_main_prologue
;
2773 gdbarch_skip_entrypoint_p (struct gdbarch
*gdbarch
)
2775 gdb_assert (gdbarch
!= NULL
);
2776 return gdbarch
->skip_entrypoint
!= NULL
;
2780 gdbarch_skip_entrypoint (struct gdbarch
*gdbarch
, CORE_ADDR ip
)
2782 gdb_assert (gdbarch
!= NULL
);
2783 gdb_assert (gdbarch
->skip_entrypoint
!= NULL
);
2784 if (gdbarch_debug
>= 2)
2785 fprintf_unfiltered (gdb_stdlog
, "gdbarch_skip_entrypoint called\n");
2786 return gdbarch
->skip_entrypoint (gdbarch
, ip
);
2790 set_gdbarch_skip_entrypoint (struct gdbarch
*gdbarch
,
2791 gdbarch_skip_entrypoint_ftype skip_entrypoint
)
2793 gdbarch
->skip_entrypoint
= skip_entrypoint
;
2797 gdbarch_inner_than (struct gdbarch
*gdbarch
, CORE_ADDR lhs
, CORE_ADDR rhs
)
2799 gdb_assert (gdbarch
!= NULL
);
2800 gdb_assert (gdbarch
->inner_than
!= NULL
);
2801 if (gdbarch_debug
>= 2)
2802 fprintf_unfiltered (gdb_stdlog
, "gdbarch_inner_than called\n");
2803 return gdbarch
->inner_than (lhs
, rhs
);
2807 set_gdbarch_inner_than (struct gdbarch
*gdbarch
,
2808 gdbarch_inner_than_ftype inner_than
)
2810 gdbarch
->inner_than
= inner_than
;
2814 gdbarch_breakpoint_from_pc (struct gdbarch
*gdbarch
, CORE_ADDR
*pcptr
, int *lenptr
)
2816 gdb_assert (gdbarch
!= NULL
);
2817 gdb_assert (gdbarch
->breakpoint_from_pc
!= NULL
);
2818 if (gdbarch_debug
>= 2)
2819 fprintf_unfiltered (gdb_stdlog
, "gdbarch_breakpoint_from_pc called\n");
2820 return gdbarch
->breakpoint_from_pc (gdbarch
, pcptr
, lenptr
);
2824 set_gdbarch_breakpoint_from_pc (struct gdbarch
*gdbarch
,
2825 gdbarch_breakpoint_from_pc_ftype breakpoint_from_pc
)
2827 gdbarch
->breakpoint_from_pc
= breakpoint_from_pc
;
2831 gdbarch_breakpoint_kind_from_pc (struct gdbarch
*gdbarch
, CORE_ADDR
*pcptr
)
2833 gdb_assert (gdbarch
!= NULL
);
2834 gdb_assert (gdbarch
->breakpoint_kind_from_pc
!= NULL
);
2835 if (gdbarch_debug
>= 2)
2836 fprintf_unfiltered (gdb_stdlog
, "gdbarch_breakpoint_kind_from_pc called\n");
2837 return gdbarch
->breakpoint_kind_from_pc (gdbarch
, pcptr
);
2841 set_gdbarch_breakpoint_kind_from_pc (struct gdbarch
*gdbarch
,
2842 gdbarch_breakpoint_kind_from_pc_ftype breakpoint_kind_from_pc
)
2844 gdbarch
->breakpoint_kind_from_pc
= breakpoint_kind_from_pc
;
2848 gdbarch_sw_breakpoint_from_kind (struct gdbarch
*gdbarch
, int kind
, int *size
)
2850 gdb_assert (gdbarch
!= NULL
);
2851 gdb_assert (gdbarch
->sw_breakpoint_from_kind
!= NULL
);
2852 if (gdbarch_debug
>= 2)
2853 fprintf_unfiltered (gdb_stdlog
, "gdbarch_sw_breakpoint_from_kind called\n");
2854 return gdbarch
->sw_breakpoint_from_kind (gdbarch
, kind
, size
);
2858 set_gdbarch_sw_breakpoint_from_kind (struct gdbarch
*gdbarch
,
2859 gdbarch_sw_breakpoint_from_kind_ftype sw_breakpoint_from_kind
)
2861 gdbarch
->sw_breakpoint_from_kind
= sw_breakpoint_from_kind
;
2865 gdbarch_breakpoint_kind_from_current_state (struct gdbarch
*gdbarch
, struct regcache
*regcache
, CORE_ADDR
*pcptr
)
2867 gdb_assert (gdbarch
!= NULL
);
2868 gdb_assert (gdbarch
->breakpoint_kind_from_current_state
!= NULL
);
2869 if (gdbarch_debug
>= 2)
2870 fprintf_unfiltered (gdb_stdlog
, "gdbarch_breakpoint_kind_from_current_state called\n");
2871 return gdbarch
->breakpoint_kind_from_current_state (gdbarch
, regcache
, pcptr
);
2875 set_gdbarch_breakpoint_kind_from_current_state (struct gdbarch
*gdbarch
,
2876 gdbarch_breakpoint_kind_from_current_state_ftype breakpoint_kind_from_current_state
)
2878 gdbarch
->breakpoint_kind_from_current_state
= breakpoint_kind_from_current_state
;
2882 gdbarch_adjust_breakpoint_address_p (struct gdbarch
*gdbarch
)
2884 gdb_assert (gdbarch
!= NULL
);
2885 return gdbarch
->adjust_breakpoint_address
!= NULL
;
2889 gdbarch_adjust_breakpoint_address (struct gdbarch
*gdbarch
, CORE_ADDR bpaddr
)
2891 gdb_assert (gdbarch
!= NULL
);
2892 gdb_assert (gdbarch
->adjust_breakpoint_address
!= NULL
);
2893 if (gdbarch_debug
>= 2)
2894 fprintf_unfiltered (gdb_stdlog
, "gdbarch_adjust_breakpoint_address called\n");
2895 return gdbarch
->adjust_breakpoint_address (gdbarch
, bpaddr
);
2899 set_gdbarch_adjust_breakpoint_address (struct gdbarch
*gdbarch
,
2900 gdbarch_adjust_breakpoint_address_ftype adjust_breakpoint_address
)
2902 gdbarch
->adjust_breakpoint_address
= adjust_breakpoint_address
;
2906 gdbarch_memory_insert_breakpoint (struct gdbarch
*gdbarch
, struct bp_target_info
*bp_tgt
)
2908 gdb_assert (gdbarch
!= NULL
);
2909 gdb_assert (gdbarch
->memory_insert_breakpoint
!= NULL
);
2910 if (gdbarch_debug
>= 2)
2911 fprintf_unfiltered (gdb_stdlog
, "gdbarch_memory_insert_breakpoint called\n");
2912 return gdbarch
->memory_insert_breakpoint (gdbarch
, bp_tgt
);
2916 set_gdbarch_memory_insert_breakpoint (struct gdbarch
*gdbarch
,
2917 gdbarch_memory_insert_breakpoint_ftype memory_insert_breakpoint
)
2919 gdbarch
->memory_insert_breakpoint
= memory_insert_breakpoint
;
2923 gdbarch_memory_remove_breakpoint (struct gdbarch
*gdbarch
, struct bp_target_info
*bp_tgt
)
2925 gdb_assert (gdbarch
!= NULL
);
2926 gdb_assert (gdbarch
->memory_remove_breakpoint
!= NULL
);
2927 if (gdbarch_debug
>= 2)
2928 fprintf_unfiltered (gdb_stdlog
, "gdbarch_memory_remove_breakpoint called\n");
2929 return gdbarch
->memory_remove_breakpoint (gdbarch
, bp_tgt
);
2933 set_gdbarch_memory_remove_breakpoint (struct gdbarch
*gdbarch
,
2934 gdbarch_memory_remove_breakpoint_ftype memory_remove_breakpoint
)
2936 gdbarch
->memory_remove_breakpoint
= memory_remove_breakpoint
;
2940 gdbarch_decr_pc_after_break (struct gdbarch
*gdbarch
)
2942 gdb_assert (gdbarch
!= NULL
);
2943 /* Skip verify of decr_pc_after_break, invalid_p == 0 */
2944 if (gdbarch_debug
>= 2)
2945 fprintf_unfiltered (gdb_stdlog
, "gdbarch_decr_pc_after_break called\n");
2946 return gdbarch
->decr_pc_after_break
;
2950 set_gdbarch_decr_pc_after_break (struct gdbarch
*gdbarch
,
2951 CORE_ADDR decr_pc_after_break
)
2953 gdbarch
->decr_pc_after_break
= decr_pc_after_break
;
2957 gdbarch_deprecated_function_start_offset (struct gdbarch
*gdbarch
)
2959 gdb_assert (gdbarch
!= NULL
);
2960 /* Skip verify of deprecated_function_start_offset, invalid_p == 0 */
2961 if (gdbarch_debug
>= 2)
2962 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_function_start_offset called\n");
2963 return gdbarch
->deprecated_function_start_offset
;
2967 set_gdbarch_deprecated_function_start_offset (struct gdbarch
*gdbarch
,
2968 CORE_ADDR deprecated_function_start_offset
)
2970 gdbarch
->deprecated_function_start_offset
= deprecated_function_start_offset
;
2974 gdbarch_remote_register_number (struct gdbarch
*gdbarch
, int regno
)
2976 gdb_assert (gdbarch
!= NULL
);
2977 gdb_assert (gdbarch
->remote_register_number
!= NULL
);
2978 if (gdbarch_debug
>= 2)
2979 fprintf_unfiltered (gdb_stdlog
, "gdbarch_remote_register_number called\n");
2980 return gdbarch
->remote_register_number (gdbarch
, regno
);
2984 set_gdbarch_remote_register_number (struct gdbarch
*gdbarch
,
2985 gdbarch_remote_register_number_ftype remote_register_number
)
2987 gdbarch
->remote_register_number
= remote_register_number
;
2991 gdbarch_fetch_tls_load_module_address_p (struct gdbarch
*gdbarch
)
2993 gdb_assert (gdbarch
!= NULL
);
2994 return gdbarch
->fetch_tls_load_module_address
!= NULL
;
2998 gdbarch_fetch_tls_load_module_address (struct gdbarch
*gdbarch
, struct objfile
*objfile
)
3000 gdb_assert (gdbarch
!= NULL
);
3001 gdb_assert (gdbarch
->fetch_tls_load_module_address
!= NULL
);
3002 if (gdbarch_debug
>= 2)
3003 fprintf_unfiltered (gdb_stdlog
, "gdbarch_fetch_tls_load_module_address called\n");
3004 return gdbarch
->fetch_tls_load_module_address (objfile
);
3008 set_gdbarch_fetch_tls_load_module_address (struct gdbarch
*gdbarch
,
3009 gdbarch_fetch_tls_load_module_address_ftype fetch_tls_load_module_address
)
3011 gdbarch
->fetch_tls_load_module_address
= fetch_tls_load_module_address
;
3015 gdbarch_get_thread_local_address_p (struct gdbarch
*gdbarch
)
3017 gdb_assert (gdbarch
!= NULL
);
3018 return gdbarch
->get_thread_local_address
!= NULL
;
3022 gdbarch_get_thread_local_address (struct gdbarch
*gdbarch
, ptid_t ptid
, CORE_ADDR lm_addr
, CORE_ADDR offset
)
3024 gdb_assert (gdbarch
!= NULL
);
3025 gdb_assert (gdbarch
->get_thread_local_address
!= NULL
);
3026 if (gdbarch_debug
>= 2)
3027 fprintf_unfiltered (gdb_stdlog
, "gdbarch_get_thread_local_address called\n");
3028 return gdbarch
->get_thread_local_address (gdbarch
, ptid
, lm_addr
, offset
);
3032 set_gdbarch_get_thread_local_address (struct gdbarch
*gdbarch
,
3033 gdbarch_get_thread_local_address_ftype get_thread_local_address
)
3035 gdbarch
->get_thread_local_address
= get_thread_local_address
;
3039 gdbarch_frame_args_skip (struct gdbarch
*gdbarch
)
3041 gdb_assert (gdbarch
!= NULL
);
3042 /* Skip verify of frame_args_skip, invalid_p == 0 */
3043 if (gdbarch_debug
>= 2)
3044 fprintf_unfiltered (gdb_stdlog
, "gdbarch_frame_args_skip called\n");
3045 return gdbarch
->frame_args_skip
;
3049 set_gdbarch_frame_args_skip (struct gdbarch
*gdbarch
,
3050 CORE_ADDR frame_args_skip
)
3052 gdbarch
->frame_args_skip
= frame_args_skip
;
3056 gdbarch_unwind_pc (struct gdbarch
*gdbarch
, struct frame_info
*next_frame
)
3058 gdb_assert (gdbarch
!= NULL
);
3059 gdb_assert (gdbarch
->unwind_pc
!= NULL
);
3060 if (gdbarch_debug
>= 2)
3061 fprintf_unfiltered (gdb_stdlog
, "gdbarch_unwind_pc called\n");
3062 return gdbarch
->unwind_pc (gdbarch
, next_frame
);
3066 set_gdbarch_unwind_pc (struct gdbarch
*gdbarch
,
3067 gdbarch_unwind_pc_ftype unwind_pc
)
3069 gdbarch
->unwind_pc
= unwind_pc
;
3073 gdbarch_unwind_sp (struct gdbarch
*gdbarch
, struct frame_info
*next_frame
)
3075 gdb_assert (gdbarch
!= NULL
);
3076 gdb_assert (gdbarch
->unwind_sp
!= NULL
);
3077 if (gdbarch_debug
>= 2)
3078 fprintf_unfiltered (gdb_stdlog
, "gdbarch_unwind_sp called\n");
3079 return gdbarch
->unwind_sp (gdbarch
, next_frame
);
3083 set_gdbarch_unwind_sp (struct gdbarch
*gdbarch
,
3084 gdbarch_unwind_sp_ftype unwind_sp
)
3086 gdbarch
->unwind_sp
= unwind_sp
;
3090 gdbarch_frame_num_args_p (struct gdbarch
*gdbarch
)
3092 gdb_assert (gdbarch
!= NULL
);
3093 return gdbarch
->frame_num_args
!= NULL
;
3097 gdbarch_frame_num_args (struct gdbarch
*gdbarch
, struct frame_info
*frame
)
3099 gdb_assert (gdbarch
!= NULL
);
3100 gdb_assert (gdbarch
->frame_num_args
!= NULL
);
3101 if (gdbarch_debug
>= 2)
3102 fprintf_unfiltered (gdb_stdlog
, "gdbarch_frame_num_args called\n");
3103 return gdbarch
->frame_num_args (frame
);
3107 set_gdbarch_frame_num_args (struct gdbarch
*gdbarch
,
3108 gdbarch_frame_num_args_ftype frame_num_args
)
3110 gdbarch
->frame_num_args
= frame_num_args
;
3114 gdbarch_frame_align_p (struct gdbarch
*gdbarch
)
3116 gdb_assert (gdbarch
!= NULL
);
3117 return gdbarch
->frame_align
!= NULL
;
3121 gdbarch_frame_align (struct gdbarch
*gdbarch
, CORE_ADDR address
)
3123 gdb_assert (gdbarch
!= NULL
);
3124 gdb_assert (gdbarch
->frame_align
!= NULL
);
3125 if (gdbarch_debug
>= 2)
3126 fprintf_unfiltered (gdb_stdlog
, "gdbarch_frame_align called\n");
3127 return gdbarch
->frame_align (gdbarch
, address
);
3131 set_gdbarch_frame_align (struct gdbarch
*gdbarch
,
3132 gdbarch_frame_align_ftype frame_align
)
3134 gdbarch
->frame_align
= frame_align
;
3138 gdbarch_stabs_argument_has_addr (struct gdbarch
*gdbarch
, struct type
*type
)
3140 gdb_assert (gdbarch
!= NULL
);
3141 gdb_assert (gdbarch
->stabs_argument_has_addr
!= NULL
);
3142 if (gdbarch_debug
>= 2)
3143 fprintf_unfiltered (gdb_stdlog
, "gdbarch_stabs_argument_has_addr called\n");
3144 return gdbarch
->stabs_argument_has_addr (gdbarch
, type
);
3148 set_gdbarch_stabs_argument_has_addr (struct gdbarch
*gdbarch
,
3149 gdbarch_stabs_argument_has_addr_ftype stabs_argument_has_addr
)
3151 gdbarch
->stabs_argument_has_addr
= stabs_argument_has_addr
;
3155 gdbarch_frame_red_zone_size (struct gdbarch
*gdbarch
)
3157 gdb_assert (gdbarch
!= NULL
);
3158 if (gdbarch_debug
>= 2)
3159 fprintf_unfiltered (gdb_stdlog
, "gdbarch_frame_red_zone_size called\n");
3160 return gdbarch
->frame_red_zone_size
;
3164 set_gdbarch_frame_red_zone_size (struct gdbarch
*gdbarch
,
3165 int frame_red_zone_size
)
3167 gdbarch
->frame_red_zone_size
= frame_red_zone_size
;
3171 gdbarch_convert_from_func_ptr_addr (struct gdbarch
*gdbarch
, CORE_ADDR addr
, struct target_ops
*targ
)
3173 gdb_assert (gdbarch
!= NULL
);
3174 gdb_assert (gdbarch
->convert_from_func_ptr_addr
!= NULL
);
3175 if (gdbarch_debug
>= 2)
3176 fprintf_unfiltered (gdb_stdlog
, "gdbarch_convert_from_func_ptr_addr called\n");
3177 return gdbarch
->convert_from_func_ptr_addr (gdbarch
, addr
, targ
);
3181 set_gdbarch_convert_from_func_ptr_addr (struct gdbarch
*gdbarch
,
3182 gdbarch_convert_from_func_ptr_addr_ftype convert_from_func_ptr_addr
)
3184 gdbarch
->convert_from_func_ptr_addr
= convert_from_func_ptr_addr
;
3188 gdbarch_addr_bits_remove (struct gdbarch
*gdbarch
, CORE_ADDR addr
)
3190 gdb_assert (gdbarch
!= NULL
);
3191 gdb_assert (gdbarch
->addr_bits_remove
!= NULL
);
3192 if (gdbarch_debug
>= 2)
3193 fprintf_unfiltered (gdb_stdlog
, "gdbarch_addr_bits_remove called\n");
3194 return gdbarch
->addr_bits_remove (gdbarch
, addr
);
3198 set_gdbarch_addr_bits_remove (struct gdbarch
*gdbarch
,
3199 gdbarch_addr_bits_remove_ftype addr_bits_remove
)
3201 gdbarch
->addr_bits_remove
= addr_bits_remove
;
3205 gdbarch_significant_addr_bit (struct gdbarch
*gdbarch
)
3207 gdb_assert (gdbarch
!= NULL
);
3208 /* Skip verify of significant_addr_bit, invalid_p == 0 */
3209 if (gdbarch_debug
>= 2)
3210 fprintf_unfiltered (gdb_stdlog
, "gdbarch_significant_addr_bit called\n");
3211 return gdbarch
->significant_addr_bit
;
3215 set_gdbarch_significant_addr_bit (struct gdbarch
*gdbarch
,
3216 int significant_addr_bit
)
3218 gdbarch
->significant_addr_bit
= significant_addr_bit
;
3222 gdbarch_software_single_step_p (struct gdbarch
*gdbarch
)
3224 gdb_assert (gdbarch
!= NULL
);
3225 return gdbarch
->software_single_step
!= NULL
;
3228 std::vector
<CORE_ADDR
>
3229 gdbarch_software_single_step (struct gdbarch
*gdbarch
, struct regcache
*regcache
)
3231 gdb_assert (gdbarch
!= NULL
);
3232 gdb_assert (gdbarch
->software_single_step
!= NULL
);
3233 if (gdbarch_debug
>= 2)
3234 fprintf_unfiltered (gdb_stdlog
, "gdbarch_software_single_step called\n");
3235 return gdbarch
->software_single_step (regcache
);
3239 set_gdbarch_software_single_step (struct gdbarch
*gdbarch
,
3240 gdbarch_software_single_step_ftype software_single_step
)
3242 gdbarch
->software_single_step
= software_single_step
;
3246 gdbarch_single_step_through_delay_p (struct gdbarch
*gdbarch
)
3248 gdb_assert (gdbarch
!= NULL
);
3249 return gdbarch
->single_step_through_delay
!= NULL
;
3253 gdbarch_single_step_through_delay (struct gdbarch
*gdbarch
, struct frame_info
*frame
)
3255 gdb_assert (gdbarch
!= NULL
);
3256 gdb_assert (gdbarch
->single_step_through_delay
!= NULL
);
3257 if (gdbarch_debug
>= 2)
3258 fprintf_unfiltered (gdb_stdlog
, "gdbarch_single_step_through_delay called\n");
3259 return gdbarch
->single_step_through_delay (gdbarch
, frame
);
3263 set_gdbarch_single_step_through_delay (struct gdbarch
*gdbarch
,
3264 gdbarch_single_step_through_delay_ftype single_step_through_delay
)
3266 gdbarch
->single_step_through_delay
= single_step_through_delay
;
3270 gdbarch_print_insn (struct gdbarch
*gdbarch
, bfd_vma vma
, struct disassemble_info
*info
)
3272 gdb_assert (gdbarch
!= NULL
);
3273 gdb_assert (gdbarch
->print_insn
!= NULL
);
3274 if (gdbarch_debug
>= 2)
3275 fprintf_unfiltered (gdb_stdlog
, "gdbarch_print_insn called\n");
3276 return gdbarch
->print_insn (vma
, info
);
3280 set_gdbarch_print_insn (struct gdbarch
*gdbarch
,
3281 gdbarch_print_insn_ftype print_insn
)
3283 gdbarch
->print_insn
= print_insn
;
3287 gdbarch_skip_trampoline_code (struct gdbarch
*gdbarch
, struct frame_info
*frame
, CORE_ADDR pc
)
3289 gdb_assert (gdbarch
!= NULL
);
3290 gdb_assert (gdbarch
->skip_trampoline_code
!= NULL
);
3291 if (gdbarch_debug
>= 2)
3292 fprintf_unfiltered (gdb_stdlog
, "gdbarch_skip_trampoline_code called\n");
3293 return gdbarch
->skip_trampoline_code (frame
, pc
);
3297 set_gdbarch_skip_trampoline_code (struct gdbarch
*gdbarch
,
3298 gdbarch_skip_trampoline_code_ftype skip_trampoline_code
)
3300 gdbarch
->skip_trampoline_code
= skip_trampoline_code
;
3304 gdbarch_skip_solib_resolver (struct gdbarch
*gdbarch
, CORE_ADDR pc
)
3306 gdb_assert (gdbarch
!= NULL
);
3307 gdb_assert (gdbarch
->skip_solib_resolver
!= NULL
);
3308 if (gdbarch_debug
>= 2)
3309 fprintf_unfiltered (gdb_stdlog
, "gdbarch_skip_solib_resolver called\n");
3310 return gdbarch
->skip_solib_resolver (gdbarch
, pc
);
3314 set_gdbarch_skip_solib_resolver (struct gdbarch
*gdbarch
,
3315 gdbarch_skip_solib_resolver_ftype skip_solib_resolver
)
3317 gdbarch
->skip_solib_resolver
= skip_solib_resolver
;
3321 gdbarch_in_solib_return_trampoline (struct gdbarch
*gdbarch
, CORE_ADDR pc
, const char *name
)
3323 gdb_assert (gdbarch
!= NULL
);
3324 gdb_assert (gdbarch
->in_solib_return_trampoline
!= NULL
);
3325 if (gdbarch_debug
>= 2)
3326 fprintf_unfiltered (gdb_stdlog
, "gdbarch_in_solib_return_trampoline called\n");
3327 return gdbarch
->in_solib_return_trampoline (gdbarch
, pc
, name
);
3331 set_gdbarch_in_solib_return_trampoline (struct gdbarch
*gdbarch
,
3332 gdbarch_in_solib_return_trampoline_ftype in_solib_return_trampoline
)
3334 gdbarch
->in_solib_return_trampoline
= in_solib_return_trampoline
;
3338 gdbarch_in_indirect_branch_thunk (struct gdbarch
*gdbarch
, CORE_ADDR pc
)
3340 gdb_assert (gdbarch
!= NULL
);
3341 gdb_assert (gdbarch
->in_indirect_branch_thunk
!= NULL
);
3342 if (gdbarch_debug
>= 2)
3343 fprintf_unfiltered (gdb_stdlog
, "gdbarch_in_indirect_branch_thunk called\n");
3344 return gdbarch
->in_indirect_branch_thunk (gdbarch
, pc
);
3348 set_gdbarch_in_indirect_branch_thunk (struct gdbarch
*gdbarch
,
3349 gdbarch_in_indirect_branch_thunk_ftype in_indirect_branch_thunk
)
3351 gdbarch
->in_indirect_branch_thunk
= in_indirect_branch_thunk
;
3355 gdbarch_stack_frame_destroyed_p (struct gdbarch
*gdbarch
, CORE_ADDR addr
)
3357 gdb_assert (gdbarch
!= NULL
);
3358 gdb_assert (gdbarch
->stack_frame_destroyed_p
!= NULL
);
3359 if (gdbarch_debug
>= 2)
3360 fprintf_unfiltered (gdb_stdlog
, "gdbarch_stack_frame_destroyed_p called\n");
3361 return gdbarch
->stack_frame_destroyed_p (gdbarch
, addr
);
3365 set_gdbarch_stack_frame_destroyed_p (struct gdbarch
*gdbarch
,
3366 gdbarch_stack_frame_destroyed_p_ftype stack_frame_destroyed_p
)
3368 gdbarch
->stack_frame_destroyed_p
= stack_frame_destroyed_p
;
3372 gdbarch_elf_make_msymbol_special_p (struct gdbarch
*gdbarch
)
3374 gdb_assert (gdbarch
!= NULL
);
3375 return gdbarch
->elf_make_msymbol_special
!= NULL
;
3379 gdbarch_elf_make_msymbol_special (struct gdbarch
*gdbarch
, asymbol
*sym
, struct minimal_symbol
*msym
)
3381 gdb_assert (gdbarch
!= NULL
);
3382 gdb_assert (gdbarch
->elf_make_msymbol_special
!= NULL
);
3383 if (gdbarch_debug
>= 2)
3384 fprintf_unfiltered (gdb_stdlog
, "gdbarch_elf_make_msymbol_special called\n");
3385 gdbarch
->elf_make_msymbol_special (sym
, msym
);
3389 set_gdbarch_elf_make_msymbol_special (struct gdbarch
*gdbarch
,
3390 gdbarch_elf_make_msymbol_special_ftype elf_make_msymbol_special
)
3392 gdbarch
->elf_make_msymbol_special
= elf_make_msymbol_special
;
3396 gdbarch_coff_make_msymbol_special (struct gdbarch
*gdbarch
, int val
, struct minimal_symbol
*msym
)
3398 gdb_assert (gdbarch
!= NULL
);
3399 gdb_assert (gdbarch
->coff_make_msymbol_special
!= NULL
);
3400 if (gdbarch_debug
>= 2)
3401 fprintf_unfiltered (gdb_stdlog
, "gdbarch_coff_make_msymbol_special called\n");
3402 gdbarch
->coff_make_msymbol_special (val
, msym
);
3406 set_gdbarch_coff_make_msymbol_special (struct gdbarch
*gdbarch
,
3407 gdbarch_coff_make_msymbol_special_ftype coff_make_msymbol_special
)
3409 gdbarch
->coff_make_msymbol_special
= coff_make_msymbol_special
;
3413 gdbarch_make_symbol_special (struct gdbarch
*gdbarch
, struct symbol
*sym
, struct objfile
*objfile
)
3415 gdb_assert (gdbarch
!= NULL
);
3416 gdb_assert (gdbarch
->make_symbol_special
!= NULL
);
3417 if (gdbarch_debug
>= 2)
3418 fprintf_unfiltered (gdb_stdlog
, "gdbarch_make_symbol_special called\n");
3419 gdbarch
->make_symbol_special (sym
, objfile
);
3423 set_gdbarch_make_symbol_special (struct gdbarch
*gdbarch
,
3424 gdbarch_make_symbol_special_ftype make_symbol_special
)
3426 gdbarch
->make_symbol_special
= make_symbol_special
;
3430 gdbarch_adjust_dwarf2_addr (struct gdbarch
*gdbarch
, CORE_ADDR pc
)
3432 gdb_assert (gdbarch
!= NULL
);
3433 gdb_assert (gdbarch
->adjust_dwarf2_addr
!= NULL
);
3434 if (gdbarch_debug
>= 2)
3435 fprintf_unfiltered (gdb_stdlog
, "gdbarch_adjust_dwarf2_addr called\n");
3436 return gdbarch
->adjust_dwarf2_addr (pc
);
3440 set_gdbarch_adjust_dwarf2_addr (struct gdbarch
*gdbarch
,
3441 gdbarch_adjust_dwarf2_addr_ftype adjust_dwarf2_addr
)
3443 gdbarch
->adjust_dwarf2_addr
= adjust_dwarf2_addr
;
3447 gdbarch_adjust_dwarf2_line (struct gdbarch
*gdbarch
, CORE_ADDR addr
, int rel
)
3449 gdb_assert (gdbarch
!= NULL
);
3450 gdb_assert (gdbarch
->adjust_dwarf2_line
!= NULL
);
3451 if (gdbarch_debug
>= 2)
3452 fprintf_unfiltered (gdb_stdlog
, "gdbarch_adjust_dwarf2_line called\n");
3453 return gdbarch
->adjust_dwarf2_line (addr
, rel
);
3457 set_gdbarch_adjust_dwarf2_line (struct gdbarch
*gdbarch
,
3458 gdbarch_adjust_dwarf2_line_ftype adjust_dwarf2_line
)
3460 gdbarch
->adjust_dwarf2_line
= adjust_dwarf2_line
;
3464 gdbarch_cannot_step_breakpoint (struct gdbarch
*gdbarch
)
3466 gdb_assert (gdbarch
!= NULL
);
3467 /* Skip verify of cannot_step_breakpoint, invalid_p == 0 */
3468 if (gdbarch_debug
>= 2)
3469 fprintf_unfiltered (gdb_stdlog
, "gdbarch_cannot_step_breakpoint called\n");
3470 return gdbarch
->cannot_step_breakpoint
;
3474 set_gdbarch_cannot_step_breakpoint (struct gdbarch
*gdbarch
,
3475 int cannot_step_breakpoint
)
3477 gdbarch
->cannot_step_breakpoint
= cannot_step_breakpoint
;
3481 gdbarch_have_nonsteppable_watchpoint (struct gdbarch
*gdbarch
)
3483 gdb_assert (gdbarch
!= NULL
);
3484 /* Skip verify of have_nonsteppable_watchpoint, invalid_p == 0 */
3485 if (gdbarch_debug
>= 2)
3486 fprintf_unfiltered (gdb_stdlog
, "gdbarch_have_nonsteppable_watchpoint called\n");
3487 return gdbarch
->have_nonsteppable_watchpoint
;
3491 set_gdbarch_have_nonsteppable_watchpoint (struct gdbarch
*gdbarch
,
3492 int have_nonsteppable_watchpoint
)
3494 gdbarch
->have_nonsteppable_watchpoint
= have_nonsteppable_watchpoint
;
3498 gdbarch_address_class_type_flags_p (struct gdbarch
*gdbarch
)
3500 gdb_assert (gdbarch
!= NULL
);
3501 return gdbarch
->address_class_type_flags
!= NULL
;
3505 gdbarch_address_class_type_flags (struct gdbarch
*gdbarch
, int byte_size
, int dwarf2_addr_class
)
3507 gdb_assert (gdbarch
!= NULL
);
3508 gdb_assert (gdbarch
->address_class_type_flags
!= NULL
);
3509 if (gdbarch_debug
>= 2)
3510 fprintf_unfiltered (gdb_stdlog
, "gdbarch_address_class_type_flags called\n");
3511 return gdbarch
->address_class_type_flags (byte_size
, dwarf2_addr_class
);
3515 set_gdbarch_address_class_type_flags (struct gdbarch
*gdbarch
,
3516 gdbarch_address_class_type_flags_ftype address_class_type_flags
)
3518 gdbarch
->address_class_type_flags
= address_class_type_flags
;
3522 gdbarch_address_class_type_flags_to_name_p (struct gdbarch
*gdbarch
)
3524 gdb_assert (gdbarch
!= NULL
);
3525 return gdbarch
->address_class_type_flags_to_name
!= NULL
;
3529 gdbarch_address_class_type_flags_to_name (struct gdbarch
*gdbarch
, int type_flags
)
3531 gdb_assert (gdbarch
!= NULL
);
3532 gdb_assert (gdbarch
->address_class_type_flags_to_name
!= NULL
);
3533 if (gdbarch_debug
>= 2)
3534 fprintf_unfiltered (gdb_stdlog
, "gdbarch_address_class_type_flags_to_name called\n");
3535 return gdbarch
->address_class_type_flags_to_name (gdbarch
, type_flags
);
3539 set_gdbarch_address_class_type_flags_to_name (struct gdbarch
*gdbarch
,
3540 gdbarch_address_class_type_flags_to_name_ftype address_class_type_flags_to_name
)
3542 gdbarch
->address_class_type_flags_to_name
= address_class_type_flags_to_name
;
3546 gdbarch_execute_dwarf_cfa_vendor_op (struct gdbarch
*gdbarch
, gdb_byte op
, struct dwarf2_frame_state
*fs
)
3548 gdb_assert (gdbarch
!= NULL
);
3549 gdb_assert (gdbarch
->execute_dwarf_cfa_vendor_op
!= NULL
);
3550 if (gdbarch_debug
>= 2)
3551 fprintf_unfiltered (gdb_stdlog
, "gdbarch_execute_dwarf_cfa_vendor_op called\n");
3552 return gdbarch
->execute_dwarf_cfa_vendor_op (gdbarch
, op
, fs
);
3556 set_gdbarch_execute_dwarf_cfa_vendor_op (struct gdbarch
*gdbarch
,
3557 gdbarch_execute_dwarf_cfa_vendor_op_ftype execute_dwarf_cfa_vendor_op
)
3559 gdbarch
->execute_dwarf_cfa_vendor_op
= execute_dwarf_cfa_vendor_op
;
3563 gdbarch_address_class_name_to_type_flags_p (struct gdbarch
*gdbarch
)
3565 gdb_assert (gdbarch
!= NULL
);
3566 return gdbarch
->address_class_name_to_type_flags
!= NULL
;
3570 gdbarch_address_class_name_to_type_flags (struct gdbarch
*gdbarch
, const char *name
, int *type_flags_ptr
)
3572 gdb_assert (gdbarch
!= NULL
);
3573 gdb_assert (gdbarch
->address_class_name_to_type_flags
!= NULL
);
3574 if (gdbarch_debug
>= 2)
3575 fprintf_unfiltered (gdb_stdlog
, "gdbarch_address_class_name_to_type_flags called\n");
3576 return gdbarch
->address_class_name_to_type_flags (gdbarch
, name
, type_flags_ptr
);
3580 set_gdbarch_address_class_name_to_type_flags (struct gdbarch
*gdbarch
,
3581 gdbarch_address_class_name_to_type_flags_ftype address_class_name_to_type_flags
)
3583 gdbarch
->address_class_name_to_type_flags
= address_class_name_to_type_flags
;
3587 gdbarch_register_reggroup_p (struct gdbarch
*gdbarch
, int regnum
, struct reggroup
*reggroup
)
3589 gdb_assert (gdbarch
!= NULL
);
3590 gdb_assert (gdbarch
->register_reggroup_p
!= NULL
);
3591 if (gdbarch_debug
>= 2)
3592 fprintf_unfiltered (gdb_stdlog
, "gdbarch_register_reggroup_p called\n");
3593 return gdbarch
->register_reggroup_p (gdbarch
, regnum
, reggroup
);
3597 set_gdbarch_register_reggroup_p (struct gdbarch
*gdbarch
,
3598 gdbarch_register_reggroup_p_ftype register_reggroup_p
)
3600 gdbarch
->register_reggroup_p
= register_reggroup_p
;
3604 gdbarch_fetch_pointer_argument_p (struct gdbarch
*gdbarch
)
3606 gdb_assert (gdbarch
!= NULL
);
3607 return gdbarch
->fetch_pointer_argument
!= NULL
;
3611 gdbarch_fetch_pointer_argument (struct gdbarch
*gdbarch
, struct frame_info
*frame
, int argi
, struct type
*type
)
3613 gdb_assert (gdbarch
!= NULL
);
3614 gdb_assert (gdbarch
->fetch_pointer_argument
!= NULL
);
3615 if (gdbarch_debug
>= 2)
3616 fprintf_unfiltered (gdb_stdlog
, "gdbarch_fetch_pointer_argument called\n");
3617 return gdbarch
->fetch_pointer_argument (frame
, argi
, type
);
3621 set_gdbarch_fetch_pointer_argument (struct gdbarch
*gdbarch
,
3622 gdbarch_fetch_pointer_argument_ftype fetch_pointer_argument
)
3624 gdbarch
->fetch_pointer_argument
= fetch_pointer_argument
;
3628 gdbarch_iterate_over_regset_sections_p (struct gdbarch
*gdbarch
)
3630 gdb_assert (gdbarch
!= NULL
);
3631 return gdbarch
->iterate_over_regset_sections
!= NULL
;
3635 gdbarch_iterate_over_regset_sections (struct gdbarch
*gdbarch
, iterate_over_regset_sections_cb
*cb
, void *cb_data
, const struct regcache
*regcache
)
3637 gdb_assert (gdbarch
!= NULL
);
3638 gdb_assert (gdbarch
->iterate_over_regset_sections
!= NULL
);
3639 if (gdbarch_debug
>= 2)
3640 fprintf_unfiltered (gdb_stdlog
, "gdbarch_iterate_over_regset_sections called\n");
3641 gdbarch
->iterate_over_regset_sections (gdbarch
, cb
, cb_data
, regcache
);
3645 set_gdbarch_iterate_over_regset_sections (struct gdbarch
*gdbarch
,
3646 gdbarch_iterate_over_regset_sections_ftype iterate_over_regset_sections
)
3648 gdbarch
->iterate_over_regset_sections
= iterate_over_regset_sections
;
3652 gdbarch_make_corefile_notes_p (struct gdbarch
*gdbarch
)
3654 gdb_assert (gdbarch
!= NULL
);
3655 return gdbarch
->make_corefile_notes
!= NULL
;
3659 gdbarch_make_corefile_notes (struct gdbarch
*gdbarch
, bfd
*obfd
, int *note_size
)
3661 gdb_assert (gdbarch
!= NULL
);
3662 gdb_assert (gdbarch
->make_corefile_notes
!= NULL
);
3663 if (gdbarch_debug
>= 2)
3664 fprintf_unfiltered (gdb_stdlog
, "gdbarch_make_corefile_notes called\n");
3665 return gdbarch
->make_corefile_notes (gdbarch
, obfd
, note_size
);
3669 set_gdbarch_make_corefile_notes (struct gdbarch
*gdbarch
,
3670 gdbarch_make_corefile_notes_ftype make_corefile_notes
)
3672 gdbarch
->make_corefile_notes
= make_corefile_notes
;
3676 gdbarch_find_memory_regions_p (struct gdbarch
*gdbarch
)
3678 gdb_assert (gdbarch
!= NULL
);
3679 return gdbarch
->find_memory_regions
!= NULL
;
3683 gdbarch_find_memory_regions (struct gdbarch
*gdbarch
, find_memory_region_ftype func
, void *data
)
3685 gdb_assert (gdbarch
!= NULL
);
3686 gdb_assert (gdbarch
->find_memory_regions
!= NULL
);
3687 if (gdbarch_debug
>= 2)
3688 fprintf_unfiltered (gdb_stdlog
, "gdbarch_find_memory_regions called\n");
3689 return gdbarch
->find_memory_regions (gdbarch
, func
, data
);
3693 set_gdbarch_find_memory_regions (struct gdbarch
*gdbarch
,
3694 gdbarch_find_memory_regions_ftype find_memory_regions
)
3696 gdbarch
->find_memory_regions
= find_memory_regions
;
3700 gdbarch_core_xfer_shared_libraries_p (struct gdbarch
*gdbarch
)
3702 gdb_assert (gdbarch
!= NULL
);
3703 return gdbarch
->core_xfer_shared_libraries
!= NULL
;
3707 gdbarch_core_xfer_shared_libraries (struct gdbarch
*gdbarch
, gdb_byte
*readbuf
, ULONGEST offset
, ULONGEST len
)
3709 gdb_assert (gdbarch
!= NULL
);
3710 gdb_assert (gdbarch
->core_xfer_shared_libraries
!= NULL
);
3711 if (gdbarch_debug
>= 2)
3712 fprintf_unfiltered (gdb_stdlog
, "gdbarch_core_xfer_shared_libraries called\n");
3713 return gdbarch
->core_xfer_shared_libraries (gdbarch
, readbuf
, offset
, len
);
3717 set_gdbarch_core_xfer_shared_libraries (struct gdbarch
*gdbarch
,
3718 gdbarch_core_xfer_shared_libraries_ftype core_xfer_shared_libraries
)
3720 gdbarch
->core_xfer_shared_libraries
= core_xfer_shared_libraries
;
3724 gdbarch_core_xfer_shared_libraries_aix_p (struct gdbarch
*gdbarch
)
3726 gdb_assert (gdbarch
!= NULL
);
3727 return gdbarch
->core_xfer_shared_libraries_aix
!= NULL
;
3731 gdbarch_core_xfer_shared_libraries_aix (struct gdbarch
*gdbarch
, gdb_byte
*readbuf
, ULONGEST offset
, ULONGEST len
)
3733 gdb_assert (gdbarch
!= NULL
);
3734 gdb_assert (gdbarch
->core_xfer_shared_libraries_aix
!= NULL
);
3735 if (gdbarch_debug
>= 2)
3736 fprintf_unfiltered (gdb_stdlog
, "gdbarch_core_xfer_shared_libraries_aix called\n");
3737 return gdbarch
->core_xfer_shared_libraries_aix (gdbarch
, readbuf
, offset
, len
);
3741 set_gdbarch_core_xfer_shared_libraries_aix (struct gdbarch
*gdbarch
,
3742 gdbarch_core_xfer_shared_libraries_aix_ftype core_xfer_shared_libraries_aix
)
3744 gdbarch
->core_xfer_shared_libraries_aix
= core_xfer_shared_libraries_aix
;
3748 gdbarch_core_pid_to_str_p (struct gdbarch
*gdbarch
)
3750 gdb_assert (gdbarch
!= NULL
);
3751 return gdbarch
->core_pid_to_str
!= NULL
;
3755 gdbarch_core_pid_to_str (struct gdbarch
*gdbarch
, ptid_t ptid
)
3757 gdb_assert (gdbarch
!= NULL
);
3758 gdb_assert (gdbarch
->core_pid_to_str
!= NULL
);
3759 if (gdbarch_debug
>= 2)
3760 fprintf_unfiltered (gdb_stdlog
, "gdbarch_core_pid_to_str called\n");
3761 return gdbarch
->core_pid_to_str (gdbarch
, ptid
);
3765 set_gdbarch_core_pid_to_str (struct gdbarch
*gdbarch
,
3766 gdbarch_core_pid_to_str_ftype core_pid_to_str
)
3768 gdbarch
->core_pid_to_str
= core_pid_to_str
;
3772 gdbarch_core_thread_name_p (struct gdbarch
*gdbarch
)
3774 gdb_assert (gdbarch
!= NULL
);
3775 return gdbarch
->core_thread_name
!= NULL
;
3779 gdbarch_core_thread_name (struct gdbarch
*gdbarch
, struct thread_info
*thr
)
3781 gdb_assert (gdbarch
!= NULL
);
3782 gdb_assert (gdbarch
->core_thread_name
!= NULL
);
3783 if (gdbarch_debug
>= 2)
3784 fprintf_unfiltered (gdb_stdlog
, "gdbarch_core_thread_name called\n");
3785 return gdbarch
->core_thread_name (gdbarch
, thr
);
3789 set_gdbarch_core_thread_name (struct gdbarch
*gdbarch
,
3790 gdbarch_core_thread_name_ftype core_thread_name
)
3792 gdbarch
->core_thread_name
= core_thread_name
;
3796 gdbarch_core_xfer_siginfo_p (struct gdbarch
*gdbarch
)
3798 gdb_assert (gdbarch
!= NULL
);
3799 return gdbarch
->core_xfer_siginfo
!= NULL
;
3803 gdbarch_core_xfer_siginfo (struct gdbarch
*gdbarch
, gdb_byte
*readbuf
, ULONGEST offset
, ULONGEST len
)
3805 gdb_assert (gdbarch
!= NULL
);
3806 gdb_assert (gdbarch
->core_xfer_siginfo
!= NULL
);
3807 if (gdbarch_debug
>= 2)
3808 fprintf_unfiltered (gdb_stdlog
, "gdbarch_core_xfer_siginfo called\n");
3809 return gdbarch
->core_xfer_siginfo (gdbarch
, readbuf
, offset
, len
);
3813 set_gdbarch_core_xfer_siginfo (struct gdbarch
*gdbarch
,
3814 gdbarch_core_xfer_siginfo_ftype core_xfer_siginfo
)
3816 gdbarch
->core_xfer_siginfo
= core_xfer_siginfo
;
3820 gdbarch_gcore_bfd_target_p (struct gdbarch
*gdbarch
)
3822 gdb_assert (gdbarch
!= NULL
);
3823 return gdbarch
->gcore_bfd_target
!= 0;
3827 gdbarch_gcore_bfd_target (struct gdbarch
*gdbarch
)
3829 gdb_assert (gdbarch
!= NULL
);
3830 /* Check variable changed from pre-default. */
3831 gdb_assert (gdbarch
->gcore_bfd_target
!= 0);
3832 if (gdbarch_debug
>= 2)
3833 fprintf_unfiltered (gdb_stdlog
, "gdbarch_gcore_bfd_target called\n");
3834 return gdbarch
->gcore_bfd_target
;
3838 set_gdbarch_gcore_bfd_target (struct gdbarch
*gdbarch
,
3839 const char * gcore_bfd_target
)
3841 gdbarch
->gcore_bfd_target
= gcore_bfd_target
;
3845 gdbarch_vtable_function_descriptors (struct gdbarch
*gdbarch
)
3847 gdb_assert (gdbarch
!= NULL
);
3848 /* Skip verify of vtable_function_descriptors, invalid_p == 0 */
3849 if (gdbarch_debug
>= 2)
3850 fprintf_unfiltered (gdb_stdlog
, "gdbarch_vtable_function_descriptors called\n");
3851 return gdbarch
->vtable_function_descriptors
;
3855 set_gdbarch_vtable_function_descriptors (struct gdbarch
*gdbarch
,
3856 int vtable_function_descriptors
)
3858 gdbarch
->vtable_function_descriptors
= vtable_function_descriptors
;
3862 gdbarch_vbit_in_delta (struct gdbarch
*gdbarch
)
3864 gdb_assert (gdbarch
!= NULL
);
3865 /* Skip verify of vbit_in_delta, invalid_p == 0 */
3866 if (gdbarch_debug
>= 2)
3867 fprintf_unfiltered (gdb_stdlog
, "gdbarch_vbit_in_delta called\n");
3868 return gdbarch
->vbit_in_delta
;
3872 set_gdbarch_vbit_in_delta (struct gdbarch
*gdbarch
,
3875 gdbarch
->vbit_in_delta
= vbit_in_delta
;
3879 gdbarch_skip_permanent_breakpoint (struct gdbarch
*gdbarch
, struct regcache
*regcache
)
3881 gdb_assert (gdbarch
!= NULL
);
3882 gdb_assert (gdbarch
->skip_permanent_breakpoint
!= NULL
);
3883 if (gdbarch_debug
>= 2)
3884 fprintf_unfiltered (gdb_stdlog
, "gdbarch_skip_permanent_breakpoint called\n");
3885 gdbarch
->skip_permanent_breakpoint (regcache
);
3889 set_gdbarch_skip_permanent_breakpoint (struct gdbarch
*gdbarch
,
3890 gdbarch_skip_permanent_breakpoint_ftype skip_permanent_breakpoint
)
3892 gdbarch
->skip_permanent_breakpoint
= skip_permanent_breakpoint
;
3896 gdbarch_max_insn_length_p (struct gdbarch
*gdbarch
)
3898 gdb_assert (gdbarch
!= NULL
);
3899 return gdbarch
->max_insn_length
!= 0;
3903 gdbarch_max_insn_length (struct gdbarch
*gdbarch
)
3905 gdb_assert (gdbarch
!= NULL
);
3906 /* Check variable changed from pre-default. */
3907 gdb_assert (gdbarch
->max_insn_length
!= 0);
3908 if (gdbarch_debug
>= 2)
3909 fprintf_unfiltered (gdb_stdlog
, "gdbarch_max_insn_length called\n");
3910 return gdbarch
->max_insn_length
;
3914 set_gdbarch_max_insn_length (struct gdbarch
*gdbarch
,
3915 ULONGEST max_insn_length
)
3917 gdbarch
->max_insn_length
= max_insn_length
;
3921 gdbarch_displaced_step_copy_insn_p (struct gdbarch
*gdbarch
)
3923 gdb_assert (gdbarch
!= NULL
);
3924 return gdbarch
->displaced_step_copy_insn
!= NULL
;
3927 displaced_step_closure_up
3928 gdbarch_displaced_step_copy_insn (struct gdbarch
*gdbarch
, CORE_ADDR from
, CORE_ADDR to
, struct regcache
*regs
)
3930 gdb_assert (gdbarch
!= NULL
);
3931 gdb_assert (gdbarch
->displaced_step_copy_insn
!= NULL
);
3932 if (gdbarch_debug
>= 2)
3933 fprintf_unfiltered (gdb_stdlog
, "gdbarch_displaced_step_copy_insn called\n");
3934 return gdbarch
->displaced_step_copy_insn (gdbarch
, from
, to
, regs
);
3938 set_gdbarch_displaced_step_copy_insn (struct gdbarch
*gdbarch
,
3939 gdbarch_displaced_step_copy_insn_ftype displaced_step_copy_insn
)
3941 gdbarch
->displaced_step_copy_insn
= displaced_step_copy_insn
;
3945 gdbarch_displaced_step_hw_singlestep (struct gdbarch
*gdbarch
, struct displaced_step_closure
*closure
)
3947 gdb_assert (gdbarch
!= NULL
);
3948 gdb_assert (gdbarch
->displaced_step_hw_singlestep
!= NULL
);
3949 if (gdbarch_debug
>= 2)
3950 fprintf_unfiltered (gdb_stdlog
, "gdbarch_displaced_step_hw_singlestep called\n");
3951 return gdbarch
->displaced_step_hw_singlestep (gdbarch
, closure
);
3955 set_gdbarch_displaced_step_hw_singlestep (struct gdbarch
*gdbarch
,
3956 gdbarch_displaced_step_hw_singlestep_ftype displaced_step_hw_singlestep
)
3958 gdbarch
->displaced_step_hw_singlestep
= displaced_step_hw_singlestep
;
3962 gdbarch_displaced_step_fixup_p (struct gdbarch
*gdbarch
)
3964 gdb_assert (gdbarch
!= NULL
);
3965 return gdbarch
->displaced_step_fixup
!= NULL
;
3969 gdbarch_displaced_step_fixup (struct gdbarch
*gdbarch
, struct displaced_step_closure
*closure
, CORE_ADDR from
, CORE_ADDR to
, struct regcache
*regs
)
3971 gdb_assert (gdbarch
!= NULL
);
3972 gdb_assert (gdbarch
->displaced_step_fixup
!= NULL
);
3973 /* Do not check predicate: gdbarch->displaced_step_fixup != NULL, allow call. */
3974 if (gdbarch_debug
>= 2)
3975 fprintf_unfiltered (gdb_stdlog
, "gdbarch_displaced_step_fixup called\n");
3976 gdbarch
->displaced_step_fixup (gdbarch
, closure
, from
, to
, regs
);
3980 set_gdbarch_displaced_step_fixup (struct gdbarch
*gdbarch
,
3981 gdbarch_displaced_step_fixup_ftype displaced_step_fixup
)
3983 gdbarch
->displaced_step_fixup
= displaced_step_fixup
;
3987 gdbarch_displaced_step_location (struct gdbarch
*gdbarch
)
3989 gdb_assert (gdbarch
!= NULL
);
3990 gdb_assert (gdbarch
->displaced_step_location
!= NULL
);
3991 if (gdbarch_debug
>= 2)
3992 fprintf_unfiltered (gdb_stdlog
, "gdbarch_displaced_step_location called\n");
3993 return gdbarch
->displaced_step_location (gdbarch
);
3997 set_gdbarch_displaced_step_location (struct gdbarch
*gdbarch
,
3998 gdbarch_displaced_step_location_ftype displaced_step_location
)
4000 gdbarch
->displaced_step_location
= displaced_step_location
;
4004 gdbarch_relocate_instruction_p (struct gdbarch
*gdbarch
)
4006 gdb_assert (gdbarch
!= NULL
);
4007 return gdbarch
->relocate_instruction
!= NULL
;
4011 gdbarch_relocate_instruction (struct gdbarch
*gdbarch
, CORE_ADDR
*to
, CORE_ADDR from
)
4013 gdb_assert (gdbarch
!= NULL
);
4014 gdb_assert (gdbarch
->relocate_instruction
!= NULL
);
4015 /* Do not check predicate: gdbarch->relocate_instruction != NULL, allow call. */
4016 if (gdbarch_debug
>= 2)
4017 fprintf_unfiltered (gdb_stdlog
, "gdbarch_relocate_instruction called\n");
4018 gdbarch
->relocate_instruction (gdbarch
, to
, from
);
4022 set_gdbarch_relocate_instruction (struct gdbarch
*gdbarch
,
4023 gdbarch_relocate_instruction_ftype relocate_instruction
)
4025 gdbarch
->relocate_instruction
= relocate_instruction
;
4029 gdbarch_overlay_update_p (struct gdbarch
*gdbarch
)
4031 gdb_assert (gdbarch
!= NULL
);
4032 return gdbarch
->overlay_update
!= NULL
;
4036 gdbarch_overlay_update (struct gdbarch
*gdbarch
, struct obj_section
*osect
)
4038 gdb_assert (gdbarch
!= NULL
);
4039 gdb_assert (gdbarch
->overlay_update
!= NULL
);
4040 if (gdbarch_debug
>= 2)
4041 fprintf_unfiltered (gdb_stdlog
, "gdbarch_overlay_update called\n");
4042 gdbarch
->overlay_update (osect
);
4046 set_gdbarch_overlay_update (struct gdbarch
*gdbarch
,
4047 gdbarch_overlay_update_ftype overlay_update
)
4049 gdbarch
->overlay_update
= overlay_update
;
4053 gdbarch_core_read_description_p (struct gdbarch
*gdbarch
)
4055 gdb_assert (gdbarch
!= NULL
);
4056 return gdbarch
->core_read_description
!= NULL
;
4059 const struct target_desc
*
4060 gdbarch_core_read_description (struct gdbarch
*gdbarch
, struct target_ops
*target
, bfd
*abfd
)
4062 gdb_assert (gdbarch
!= NULL
);
4063 gdb_assert (gdbarch
->core_read_description
!= NULL
);
4064 if (gdbarch_debug
>= 2)
4065 fprintf_unfiltered (gdb_stdlog
, "gdbarch_core_read_description called\n");
4066 return gdbarch
->core_read_description (gdbarch
, target
, abfd
);
4070 set_gdbarch_core_read_description (struct gdbarch
*gdbarch
,
4071 gdbarch_core_read_description_ftype core_read_description
)
4073 gdbarch
->core_read_description
= core_read_description
;
4077 gdbarch_sofun_address_maybe_missing (struct gdbarch
*gdbarch
)
4079 gdb_assert (gdbarch
!= NULL
);
4080 /* Skip verify of sofun_address_maybe_missing, invalid_p == 0 */
4081 if (gdbarch_debug
>= 2)
4082 fprintf_unfiltered (gdb_stdlog
, "gdbarch_sofun_address_maybe_missing called\n");
4083 return gdbarch
->sofun_address_maybe_missing
;
4087 set_gdbarch_sofun_address_maybe_missing (struct gdbarch
*gdbarch
,
4088 int sofun_address_maybe_missing
)
4090 gdbarch
->sofun_address_maybe_missing
= sofun_address_maybe_missing
;
4094 gdbarch_process_record_p (struct gdbarch
*gdbarch
)
4096 gdb_assert (gdbarch
!= NULL
);
4097 return gdbarch
->process_record
!= NULL
;
4101 gdbarch_process_record (struct gdbarch
*gdbarch
, struct regcache
*regcache
, CORE_ADDR addr
)
4103 gdb_assert (gdbarch
!= NULL
);
4104 gdb_assert (gdbarch
->process_record
!= NULL
);
4105 if (gdbarch_debug
>= 2)
4106 fprintf_unfiltered (gdb_stdlog
, "gdbarch_process_record called\n");
4107 return gdbarch
->process_record (gdbarch
, regcache
, addr
);
4111 set_gdbarch_process_record (struct gdbarch
*gdbarch
,
4112 gdbarch_process_record_ftype process_record
)
4114 gdbarch
->process_record
= process_record
;
4118 gdbarch_process_record_signal_p (struct gdbarch
*gdbarch
)
4120 gdb_assert (gdbarch
!= NULL
);
4121 return gdbarch
->process_record_signal
!= NULL
;
4125 gdbarch_process_record_signal (struct gdbarch
*gdbarch
, struct regcache
*regcache
, enum gdb_signal signal
)
4127 gdb_assert (gdbarch
!= NULL
);
4128 gdb_assert (gdbarch
->process_record_signal
!= NULL
);
4129 if (gdbarch_debug
>= 2)
4130 fprintf_unfiltered (gdb_stdlog
, "gdbarch_process_record_signal called\n");
4131 return gdbarch
->process_record_signal (gdbarch
, regcache
, signal
);
4135 set_gdbarch_process_record_signal (struct gdbarch
*gdbarch
,
4136 gdbarch_process_record_signal_ftype process_record_signal
)
4138 gdbarch
->process_record_signal
= process_record_signal
;
4142 gdbarch_gdb_signal_from_target_p (struct gdbarch
*gdbarch
)
4144 gdb_assert (gdbarch
!= NULL
);
4145 return gdbarch
->gdb_signal_from_target
!= NULL
;
4149 gdbarch_gdb_signal_from_target (struct gdbarch
*gdbarch
, int signo
)
4151 gdb_assert (gdbarch
!= NULL
);
4152 gdb_assert (gdbarch
->gdb_signal_from_target
!= NULL
);
4153 if (gdbarch_debug
>= 2)
4154 fprintf_unfiltered (gdb_stdlog
, "gdbarch_gdb_signal_from_target called\n");
4155 return gdbarch
->gdb_signal_from_target (gdbarch
, signo
);
4159 set_gdbarch_gdb_signal_from_target (struct gdbarch
*gdbarch
,
4160 gdbarch_gdb_signal_from_target_ftype gdb_signal_from_target
)
4162 gdbarch
->gdb_signal_from_target
= gdb_signal_from_target
;
4166 gdbarch_gdb_signal_to_target_p (struct gdbarch
*gdbarch
)
4168 gdb_assert (gdbarch
!= NULL
);
4169 return gdbarch
->gdb_signal_to_target
!= NULL
;
4173 gdbarch_gdb_signal_to_target (struct gdbarch
*gdbarch
, enum gdb_signal signal
)
4175 gdb_assert (gdbarch
!= NULL
);
4176 gdb_assert (gdbarch
->gdb_signal_to_target
!= NULL
);
4177 if (gdbarch_debug
>= 2)
4178 fprintf_unfiltered (gdb_stdlog
, "gdbarch_gdb_signal_to_target called\n");
4179 return gdbarch
->gdb_signal_to_target (gdbarch
, signal
);
4183 set_gdbarch_gdb_signal_to_target (struct gdbarch
*gdbarch
,
4184 gdbarch_gdb_signal_to_target_ftype gdb_signal_to_target
)
4186 gdbarch
->gdb_signal_to_target
= gdb_signal_to_target
;
4190 gdbarch_get_siginfo_type_p (struct gdbarch
*gdbarch
)
4192 gdb_assert (gdbarch
!= NULL
);
4193 return gdbarch
->get_siginfo_type
!= NULL
;
4197 gdbarch_get_siginfo_type (struct gdbarch
*gdbarch
)
4199 gdb_assert (gdbarch
!= NULL
);
4200 gdb_assert (gdbarch
->get_siginfo_type
!= NULL
);
4201 if (gdbarch_debug
>= 2)
4202 fprintf_unfiltered (gdb_stdlog
, "gdbarch_get_siginfo_type called\n");
4203 return gdbarch
->get_siginfo_type (gdbarch
);
4207 set_gdbarch_get_siginfo_type (struct gdbarch
*gdbarch
,
4208 gdbarch_get_siginfo_type_ftype get_siginfo_type
)
4210 gdbarch
->get_siginfo_type
= get_siginfo_type
;
4214 gdbarch_record_special_symbol_p (struct gdbarch
*gdbarch
)
4216 gdb_assert (gdbarch
!= NULL
);
4217 return gdbarch
->record_special_symbol
!= NULL
;
4221 gdbarch_record_special_symbol (struct gdbarch
*gdbarch
, struct objfile
*objfile
, asymbol
*sym
)
4223 gdb_assert (gdbarch
!= NULL
);
4224 gdb_assert (gdbarch
->record_special_symbol
!= NULL
);
4225 if (gdbarch_debug
>= 2)
4226 fprintf_unfiltered (gdb_stdlog
, "gdbarch_record_special_symbol called\n");
4227 gdbarch
->record_special_symbol (gdbarch
, objfile
, sym
);
4231 set_gdbarch_record_special_symbol (struct gdbarch
*gdbarch
,
4232 gdbarch_record_special_symbol_ftype record_special_symbol
)
4234 gdbarch
->record_special_symbol
= record_special_symbol
;
4238 gdbarch_get_syscall_number_p (struct gdbarch
*gdbarch
)
4240 gdb_assert (gdbarch
!= NULL
);
4241 return gdbarch
->get_syscall_number
!= NULL
;
4245 gdbarch_get_syscall_number (struct gdbarch
*gdbarch
, thread_info
*thread
)
4247 gdb_assert (gdbarch
!= NULL
);
4248 gdb_assert (gdbarch
->get_syscall_number
!= NULL
);
4249 if (gdbarch_debug
>= 2)
4250 fprintf_unfiltered (gdb_stdlog
, "gdbarch_get_syscall_number called\n");
4251 return gdbarch
->get_syscall_number (gdbarch
, thread
);
4255 set_gdbarch_get_syscall_number (struct gdbarch
*gdbarch
,
4256 gdbarch_get_syscall_number_ftype get_syscall_number
)
4258 gdbarch
->get_syscall_number
= get_syscall_number
;
4262 gdbarch_xml_syscall_file (struct gdbarch
*gdbarch
)
4264 gdb_assert (gdbarch
!= NULL
);
4265 /* Skip verify of xml_syscall_file, invalid_p == 0 */
4266 if (gdbarch_debug
>= 2)
4267 fprintf_unfiltered (gdb_stdlog
, "gdbarch_xml_syscall_file called\n");
4268 return gdbarch
->xml_syscall_file
;
4272 set_gdbarch_xml_syscall_file (struct gdbarch
*gdbarch
,
4273 const char * xml_syscall_file
)
4275 gdbarch
->xml_syscall_file
= xml_syscall_file
;
4278 struct syscalls_info
*
4279 gdbarch_syscalls_info (struct gdbarch
*gdbarch
)
4281 gdb_assert (gdbarch
!= NULL
);
4282 /* Skip verify of syscalls_info, invalid_p == 0 */
4283 if (gdbarch_debug
>= 2)
4284 fprintf_unfiltered (gdb_stdlog
, "gdbarch_syscalls_info called\n");
4285 return gdbarch
->syscalls_info
;
4289 set_gdbarch_syscalls_info (struct gdbarch
*gdbarch
,
4290 struct syscalls_info
* syscalls_info
)
4292 gdbarch
->syscalls_info
= syscalls_info
;
4296 gdbarch_stap_integer_prefixes (struct gdbarch
*gdbarch
)
4298 gdb_assert (gdbarch
!= NULL
);
4299 /* Skip verify of stap_integer_prefixes, invalid_p == 0 */
4300 if (gdbarch_debug
>= 2)
4301 fprintf_unfiltered (gdb_stdlog
, "gdbarch_stap_integer_prefixes called\n");
4302 return gdbarch
->stap_integer_prefixes
;
4306 set_gdbarch_stap_integer_prefixes (struct gdbarch
*gdbarch
,
4307 const char *const * stap_integer_prefixes
)
4309 gdbarch
->stap_integer_prefixes
= stap_integer_prefixes
;
4313 gdbarch_stap_integer_suffixes (struct gdbarch
*gdbarch
)
4315 gdb_assert (gdbarch
!= NULL
);
4316 /* Skip verify of stap_integer_suffixes, invalid_p == 0 */
4317 if (gdbarch_debug
>= 2)
4318 fprintf_unfiltered (gdb_stdlog
, "gdbarch_stap_integer_suffixes called\n");
4319 return gdbarch
->stap_integer_suffixes
;
4323 set_gdbarch_stap_integer_suffixes (struct gdbarch
*gdbarch
,
4324 const char *const * stap_integer_suffixes
)
4326 gdbarch
->stap_integer_suffixes
= stap_integer_suffixes
;
4330 gdbarch_stap_register_prefixes (struct gdbarch
*gdbarch
)
4332 gdb_assert (gdbarch
!= NULL
);
4333 /* Skip verify of stap_register_prefixes, invalid_p == 0 */
4334 if (gdbarch_debug
>= 2)
4335 fprintf_unfiltered (gdb_stdlog
, "gdbarch_stap_register_prefixes called\n");
4336 return gdbarch
->stap_register_prefixes
;
4340 set_gdbarch_stap_register_prefixes (struct gdbarch
*gdbarch
,
4341 const char *const * stap_register_prefixes
)
4343 gdbarch
->stap_register_prefixes
= stap_register_prefixes
;
4347 gdbarch_stap_register_suffixes (struct gdbarch
*gdbarch
)
4349 gdb_assert (gdbarch
!= NULL
);
4350 /* Skip verify of stap_register_suffixes, invalid_p == 0 */
4351 if (gdbarch_debug
>= 2)
4352 fprintf_unfiltered (gdb_stdlog
, "gdbarch_stap_register_suffixes called\n");
4353 return gdbarch
->stap_register_suffixes
;
4357 set_gdbarch_stap_register_suffixes (struct gdbarch
*gdbarch
,
4358 const char *const * stap_register_suffixes
)
4360 gdbarch
->stap_register_suffixes
= stap_register_suffixes
;
4364 gdbarch_stap_register_indirection_prefixes (struct gdbarch
*gdbarch
)
4366 gdb_assert (gdbarch
!= NULL
);
4367 /* Skip verify of stap_register_indirection_prefixes, invalid_p == 0 */
4368 if (gdbarch_debug
>= 2)
4369 fprintf_unfiltered (gdb_stdlog
, "gdbarch_stap_register_indirection_prefixes called\n");
4370 return gdbarch
->stap_register_indirection_prefixes
;
4374 set_gdbarch_stap_register_indirection_prefixes (struct gdbarch
*gdbarch
,
4375 const char *const * stap_register_indirection_prefixes
)
4377 gdbarch
->stap_register_indirection_prefixes
= stap_register_indirection_prefixes
;
4381 gdbarch_stap_register_indirection_suffixes (struct gdbarch
*gdbarch
)
4383 gdb_assert (gdbarch
!= NULL
);
4384 /* Skip verify of stap_register_indirection_suffixes, invalid_p == 0 */
4385 if (gdbarch_debug
>= 2)
4386 fprintf_unfiltered (gdb_stdlog
, "gdbarch_stap_register_indirection_suffixes called\n");
4387 return gdbarch
->stap_register_indirection_suffixes
;
4391 set_gdbarch_stap_register_indirection_suffixes (struct gdbarch
*gdbarch
,
4392 const char *const * stap_register_indirection_suffixes
)
4394 gdbarch
->stap_register_indirection_suffixes
= stap_register_indirection_suffixes
;
4398 gdbarch_stap_gdb_register_prefix (struct gdbarch
*gdbarch
)
4400 gdb_assert (gdbarch
!= NULL
);
4401 /* Skip verify of stap_gdb_register_prefix, invalid_p == 0 */
4402 if (gdbarch_debug
>= 2)
4403 fprintf_unfiltered (gdb_stdlog
, "gdbarch_stap_gdb_register_prefix called\n");
4404 return gdbarch
->stap_gdb_register_prefix
;
4408 set_gdbarch_stap_gdb_register_prefix (struct gdbarch
*gdbarch
,
4409 const char * stap_gdb_register_prefix
)
4411 gdbarch
->stap_gdb_register_prefix
= stap_gdb_register_prefix
;
4415 gdbarch_stap_gdb_register_suffix (struct gdbarch
*gdbarch
)
4417 gdb_assert (gdbarch
!= NULL
);
4418 /* Skip verify of stap_gdb_register_suffix, invalid_p == 0 */
4419 if (gdbarch_debug
>= 2)
4420 fprintf_unfiltered (gdb_stdlog
, "gdbarch_stap_gdb_register_suffix called\n");
4421 return gdbarch
->stap_gdb_register_suffix
;
4425 set_gdbarch_stap_gdb_register_suffix (struct gdbarch
*gdbarch
,
4426 const char * stap_gdb_register_suffix
)
4428 gdbarch
->stap_gdb_register_suffix
= stap_gdb_register_suffix
;
4432 gdbarch_stap_is_single_operand_p (struct gdbarch
*gdbarch
)
4434 gdb_assert (gdbarch
!= NULL
);
4435 return gdbarch
->stap_is_single_operand
!= NULL
;
4439 gdbarch_stap_is_single_operand (struct gdbarch
*gdbarch
, const char *s
)
4441 gdb_assert (gdbarch
!= NULL
);
4442 gdb_assert (gdbarch
->stap_is_single_operand
!= NULL
);
4443 if (gdbarch_debug
>= 2)
4444 fprintf_unfiltered (gdb_stdlog
, "gdbarch_stap_is_single_operand called\n");
4445 return gdbarch
->stap_is_single_operand (gdbarch
, s
);
4449 set_gdbarch_stap_is_single_operand (struct gdbarch
*gdbarch
,
4450 gdbarch_stap_is_single_operand_ftype stap_is_single_operand
)
4452 gdbarch
->stap_is_single_operand
= stap_is_single_operand
;
4456 gdbarch_stap_parse_special_token_p (struct gdbarch
*gdbarch
)
4458 gdb_assert (gdbarch
!= NULL
);
4459 return gdbarch
->stap_parse_special_token
!= NULL
;
4463 gdbarch_stap_parse_special_token (struct gdbarch
*gdbarch
, struct stap_parse_info
*p
)
4465 gdb_assert (gdbarch
!= NULL
);
4466 gdb_assert (gdbarch
->stap_parse_special_token
!= NULL
);
4467 if (gdbarch_debug
>= 2)
4468 fprintf_unfiltered (gdb_stdlog
, "gdbarch_stap_parse_special_token called\n");
4469 return gdbarch
->stap_parse_special_token (gdbarch
, p
);
4473 set_gdbarch_stap_parse_special_token (struct gdbarch
*gdbarch
,
4474 gdbarch_stap_parse_special_token_ftype stap_parse_special_token
)
4476 gdbarch
->stap_parse_special_token
= stap_parse_special_token
;
4480 gdbarch_stap_adjust_register_p (struct gdbarch
*gdbarch
)
4482 gdb_assert (gdbarch
!= NULL
);
4483 return gdbarch
->stap_adjust_register
!= NULL
;
4487 gdbarch_stap_adjust_register (struct gdbarch
*gdbarch
, struct stap_parse_info
*p
, const std::string
®name
, int regnum
)
4489 gdb_assert (gdbarch
!= NULL
);
4490 gdb_assert (gdbarch
->stap_adjust_register
!= NULL
);
4491 if (gdbarch_debug
>= 2)
4492 fprintf_unfiltered (gdb_stdlog
, "gdbarch_stap_adjust_register called\n");
4493 return gdbarch
->stap_adjust_register (gdbarch
, p
, regname
, regnum
);
4497 set_gdbarch_stap_adjust_register (struct gdbarch
*gdbarch
,
4498 gdbarch_stap_adjust_register_ftype stap_adjust_register
)
4500 gdbarch
->stap_adjust_register
= stap_adjust_register
;
4504 gdbarch_dtrace_parse_probe_argument_p (struct gdbarch
*gdbarch
)
4506 gdb_assert (gdbarch
!= NULL
);
4507 return gdbarch
->dtrace_parse_probe_argument
!= NULL
;
4511 gdbarch_dtrace_parse_probe_argument (struct gdbarch
*gdbarch
, struct expr_builder
*builder
, int narg
)
4513 gdb_assert (gdbarch
!= NULL
);
4514 gdb_assert (gdbarch
->dtrace_parse_probe_argument
!= NULL
);
4515 if (gdbarch_debug
>= 2)
4516 fprintf_unfiltered (gdb_stdlog
, "gdbarch_dtrace_parse_probe_argument called\n");
4517 gdbarch
->dtrace_parse_probe_argument (gdbarch
, builder
, narg
);
4521 set_gdbarch_dtrace_parse_probe_argument (struct gdbarch
*gdbarch
,
4522 gdbarch_dtrace_parse_probe_argument_ftype dtrace_parse_probe_argument
)
4524 gdbarch
->dtrace_parse_probe_argument
= dtrace_parse_probe_argument
;
4528 gdbarch_dtrace_probe_is_enabled_p (struct gdbarch
*gdbarch
)
4530 gdb_assert (gdbarch
!= NULL
);
4531 return gdbarch
->dtrace_probe_is_enabled
!= NULL
;
4535 gdbarch_dtrace_probe_is_enabled (struct gdbarch
*gdbarch
, CORE_ADDR addr
)
4537 gdb_assert (gdbarch
!= NULL
);
4538 gdb_assert (gdbarch
->dtrace_probe_is_enabled
!= NULL
);
4539 if (gdbarch_debug
>= 2)
4540 fprintf_unfiltered (gdb_stdlog
, "gdbarch_dtrace_probe_is_enabled called\n");
4541 return gdbarch
->dtrace_probe_is_enabled (gdbarch
, addr
);
4545 set_gdbarch_dtrace_probe_is_enabled (struct gdbarch
*gdbarch
,
4546 gdbarch_dtrace_probe_is_enabled_ftype dtrace_probe_is_enabled
)
4548 gdbarch
->dtrace_probe_is_enabled
= dtrace_probe_is_enabled
;
4552 gdbarch_dtrace_enable_probe_p (struct gdbarch
*gdbarch
)
4554 gdb_assert (gdbarch
!= NULL
);
4555 return gdbarch
->dtrace_enable_probe
!= NULL
;
4559 gdbarch_dtrace_enable_probe (struct gdbarch
*gdbarch
, CORE_ADDR addr
)
4561 gdb_assert (gdbarch
!= NULL
);
4562 gdb_assert (gdbarch
->dtrace_enable_probe
!= NULL
);
4563 if (gdbarch_debug
>= 2)
4564 fprintf_unfiltered (gdb_stdlog
, "gdbarch_dtrace_enable_probe called\n");
4565 gdbarch
->dtrace_enable_probe (gdbarch
, addr
);
4569 set_gdbarch_dtrace_enable_probe (struct gdbarch
*gdbarch
,
4570 gdbarch_dtrace_enable_probe_ftype dtrace_enable_probe
)
4572 gdbarch
->dtrace_enable_probe
= dtrace_enable_probe
;
4576 gdbarch_dtrace_disable_probe_p (struct gdbarch
*gdbarch
)
4578 gdb_assert (gdbarch
!= NULL
);
4579 return gdbarch
->dtrace_disable_probe
!= NULL
;
4583 gdbarch_dtrace_disable_probe (struct gdbarch
*gdbarch
, CORE_ADDR addr
)
4585 gdb_assert (gdbarch
!= NULL
);
4586 gdb_assert (gdbarch
->dtrace_disable_probe
!= NULL
);
4587 if (gdbarch_debug
>= 2)
4588 fprintf_unfiltered (gdb_stdlog
, "gdbarch_dtrace_disable_probe called\n");
4589 gdbarch
->dtrace_disable_probe (gdbarch
, addr
);
4593 set_gdbarch_dtrace_disable_probe (struct gdbarch
*gdbarch
,
4594 gdbarch_dtrace_disable_probe_ftype dtrace_disable_probe
)
4596 gdbarch
->dtrace_disable_probe
= dtrace_disable_probe
;
4600 gdbarch_has_global_solist (struct gdbarch
*gdbarch
)
4602 gdb_assert (gdbarch
!= NULL
);
4603 /* Skip verify of has_global_solist, invalid_p == 0 */
4604 if (gdbarch_debug
>= 2)
4605 fprintf_unfiltered (gdb_stdlog
, "gdbarch_has_global_solist called\n");
4606 return gdbarch
->has_global_solist
;
4610 set_gdbarch_has_global_solist (struct gdbarch
*gdbarch
,
4611 int has_global_solist
)
4613 gdbarch
->has_global_solist
= has_global_solist
;
4617 gdbarch_has_global_breakpoints (struct gdbarch
*gdbarch
)
4619 gdb_assert (gdbarch
!= NULL
);
4620 /* Skip verify of has_global_breakpoints, invalid_p == 0 */
4621 if (gdbarch_debug
>= 2)
4622 fprintf_unfiltered (gdb_stdlog
, "gdbarch_has_global_breakpoints called\n");
4623 return gdbarch
->has_global_breakpoints
;
4627 set_gdbarch_has_global_breakpoints (struct gdbarch
*gdbarch
,
4628 int has_global_breakpoints
)
4630 gdbarch
->has_global_breakpoints
= has_global_breakpoints
;
4634 gdbarch_has_shared_address_space (struct gdbarch
*gdbarch
)
4636 gdb_assert (gdbarch
!= NULL
);
4637 gdb_assert (gdbarch
->has_shared_address_space
!= NULL
);
4638 if (gdbarch_debug
>= 2)
4639 fprintf_unfiltered (gdb_stdlog
, "gdbarch_has_shared_address_space called\n");
4640 return gdbarch
->has_shared_address_space (gdbarch
);
4644 set_gdbarch_has_shared_address_space (struct gdbarch
*gdbarch
,
4645 gdbarch_has_shared_address_space_ftype has_shared_address_space
)
4647 gdbarch
->has_shared_address_space
= has_shared_address_space
;
4651 gdbarch_fast_tracepoint_valid_at (struct gdbarch
*gdbarch
, CORE_ADDR addr
, std::string
*msg
)
4653 gdb_assert (gdbarch
!= NULL
);
4654 gdb_assert (gdbarch
->fast_tracepoint_valid_at
!= NULL
);
4655 if (gdbarch_debug
>= 2)
4656 fprintf_unfiltered (gdb_stdlog
, "gdbarch_fast_tracepoint_valid_at called\n");
4657 return gdbarch
->fast_tracepoint_valid_at (gdbarch
, addr
, msg
);
4661 set_gdbarch_fast_tracepoint_valid_at (struct gdbarch
*gdbarch
,
4662 gdbarch_fast_tracepoint_valid_at_ftype fast_tracepoint_valid_at
)
4664 gdbarch
->fast_tracepoint_valid_at
= fast_tracepoint_valid_at
;
4668 gdbarch_guess_tracepoint_registers (struct gdbarch
*gdbarch
, struct regcache
*regcache
, CORE_ADDR addr
)
4670 gdb_assert (gdbarch
!= NULL
);
4671 gdb_assert (gdbarch
->guess_tracepoint_registers
!= NULL
);
4672 if (gdbarch_debug
>= 2)
4673 fprintf_unfiltered (gdb_stdlog
, "gdbarch_guess_tracepoint_registers called\n");
4674 gdbarch
->guess_tracepoint_registers (gdbarch
, regcache
, addr
);
4678 set_gdbarch_guess_tracepoint_registers (struct gdbarch
*gdbarch
,
4679 gdbarch_guess_tracepoint_registers_ftype guess_tracepoint_registers
)
4681 gdbarch
->guess_tracepoint_registers
= guess_tracepoint_registers
;
4685 gdbarch_auto_charset (struct gdbarch
*gdbarch
)
4687 gdb_assert (gdbarch
!= NULL
);
4688 gdb_assert (gdbarch
->auto_charset
!= NULL
);
4689 if (gdbarch_debug
>= 2)
4690 fprintf_unfiltered (gdb_stdlog
, "gdbarch_auto_charset called\n");
4691 return gdbarch
->auto_charset ();
4695 set_gdbarch_auto_charset (struct gdbarch
*gdbarch
,
4696 gdbarch_auto_charset_ftype auto_charset
)
4698 gdbarch
->auto_charset
= auto_charset
;
4702 gdbarch_auto_wide_charset (struct gdbarch
*gdbarch
)
4704 gdb_assert (gdbarch
!= NULL
);
4705 gdb_assert (gdbarch
->auto_wide_charset
!= NULL
);
4706 if (gdbarch_debug
>= 2)
4707 fprintf_unfiltered (gdb_stdlog
, "gdbarch_auto_wide_charset called\n");
4708 return gdbarch
->auto_wide_charset ();
4712 set_gdbarch_auto_wide_charset (struct gdbarch
*gdbarch
,
4713 gdbarch_auto_wide_charset_ftype auto_wide_charset
)
4715 gdbarch
->auto_wide_charset
= auto_wide_charset
;
4719 gdbarch_solib_symbols_extension (struct gdbarch
*gdbarch
)
4721 gdb_assert (gdbarch
!= NULL
);
4722 if (gdbarch_debug
>= 2)
4723 fprintf_unfiltered (gdb_stdlog
, "gdbarch_solib_symbols_extension called\n");
4724 return gdbarch
->solib_symbols_extension
;
4728 set_gdbarch_solib_symbols_extension (struct gdbarch
*gdbarch
,
4729 const char * solib_symbols_extension
)
4731 gdbarch
->solib_symbols_extension
= solib_symbols_extension
;
4735 gdbarch_has_dos_based_file_system (struct gdbarch
*gdbarch
)
4737 gdb_assert (gdbarch
!= NULL
);
4738 /* Skip verify of has_dos_based_file_system, invalid_p == 0 */
4739 if (gdbarch_debug
>= 2)
4740 fprintf_unfiltered (gdb_stdlog
, "gdbarch_has_dos_based_file_system called\n");
4741 return gdbarch
->has_dos_based_file_system
;
4745 set_gdbarch_has_dos_based_file_system (struct gdbarch
*gdbarch
,
4746 int has_dos_based_file_system
)
4748 gdbarch
->has_dos_based_file_system
= has_dos_based_file_system
;
4752 gdbarch_gen_return_address (struct gdbarch
*gdbarch
, struct agent_expr
*ax
, struct axs_value
*value
, CORE_ADDR scope
)
4754 gdb_assert (gdbarch
!= NULL
);
4755 gdb_assert (gdbarch
->gen_return_address
!= NULL
);
4756 if (gdbarch_debug
>= 2)
4757 fprintf_unfiltered (gdb_stdlog
, "gdbarch_gen_return_address called\n");
4758 gdbarch
->gen_return_address (gdbarch
, ax
, value
, scope
);
4762 set_gdbarch_gen_return_address (struct gdbarch
*gdbarch
,
4763 gdbarch_gen_return_address_ftype gen_return_address
)
4765 gdbarch
->gen_return_address
= gen_return_address
;
4769 gdbarch_info_proc_p (struct gdbarch
*gdbarch
)
4771 gdb_assert (gdbarch
!= NULL
);
4772 return gdbarch
->info_proc
!= NULL
;
4776 gdbarch_info_proc (struct gdbarch
*gdbarch
, const char *args
, enum info_proc_what what
)
4778 gdb_assert (gdbarch
!= NULL
);
4779 gdb_assert (gdbarch
->info_proc
!= NULL
);
4780 if (gdbarch_debug
>= 2)
4781 fprintf_unfiltered (gdb_stdlog
, "gdbarch_info_proc called\n");
4782 gdbarch
->info_proc (gdbarch
, args
, what
);
4786 set_gdbarch_info_proc (struct gdbarch
*gdbarch
,
4787 gdbarch_info_proc_ftype info_proc
)
4789 gdbarch
->info_proc
= info_proc
;
4793 gdbarch_core_info_proc_p (struct gdbarch
*gdbarch
)
4795 gdb_assert (gdbarch
!= NULL
);
4796 return gdbarch
->core_info_proc
!= NULL
;
4800 gdbarch_core_info_proc (struct gdbarch
*gdbarch
, const char *args
, enum info_proc_what what
)
4802 gdb_assert (gdbarch
!= NULL
);
4803 gdb_assert (gdbarch
->core_info_proc
!= NULL
);
4804 if (gdbarch_debug
>= 2)
4805 fprintf_unfiltered (gdb_stdlog
, "gdbarch_core_info_proc called\n");
4806 gdbarch
->core_info_proc (gdbarch
, args
, what
);
4810 set_gdbarch_core_info_proc (struct gdbarch
*gdbarch
,
4811 gdbarch_core_info_proc_ftype core_info_proc
)
4813 gdbarch
->core_info_proc
= core_info_proc
;
4817 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
)
4819 gdb_assert (gdbarch
!= NULL
);
4820 gdb_assert (gdbarch
->iterate_over_objfiles_in_search_order
!= NULL
);
4821 if (gdbarch_debug
>= 2)
4822 fprintf_unfiltered (gdb_stdlog
, "gdbarch_iterate_over_objfiles_in_search_order called\n");
4823 gdbarch
->iterate_over_objfiles_in_search_order (gdbarch
, cb
, cb_data
, current_objfile
);
4827 set_gdbarch_iterate_over_objfiles_in_search_order (struct gdbarch
*gdbarch
,
4828 gdbarch_iterate_over_objfiles_in_search_order_ftype iterate_over_objfiles_in_search_order
)
4830 gdbarch
->iterate_over_objfiles_in_search_order
= iterate_over_objfiles_in_search_order
;
4833 struct ravenscar_arch_ops
*
4834 gdbarch_ravenscar_ops (struct gdbarch
*gdbarch
)
4836 gdb_assert (gdbarch
!= NULL
);
4837 /* Skip verify of ravenscar_ops, invalid_p == 0 */
4838 if (gdbarch_debug
>= 2)
4839 fprintf_unfiltered (gdb_stdlog
, "gdbarch_ravenscar_ops called\n");
4840 return gdbarch
->ravenscar_ops
;
4844 set_gdbarch_ravenscar_ops (struct gdbarch
*gdbarch
,
4845 struct ravenscar_arch_ops
* ravenscar_ops
)
4847 gdbarch
->ravenscar_ops
= ravenscar_ops
;
4851 gdbarch_insn_is_call (struct gdbarch
*gdbarch
, CORE_ADDR addr
)
4853 gdb_assert (gdbarch
!= NULL
);
4854 gdb_assert (gdbarch
->insn_is_call
!= NULL
);
4855 if (gdbarch_debug
>= 2)
4856 fprintf_unfiltered (gdb_stdlog
, "gdbarch_insn_is_call called\n");
4857 return gdbarch
->insn_is_call (gdbarch
, addr
);
4861 set_gdbarch_insn_is_call (struct gdbarch
*gdbarch
,
4862 gdbarch_insn_is_call_ftype insn_is_call
)
4864 gdbarch
->insn_is_call
= insn_is_call
;
4868 gdbarch_insn_is_ret (struct gdbarch
*gdbarch
, CORE_ADDR addr
)
4870 gdb_assert (gdbarch
!= NULL
);
4871 gdb_assert (gdbarch
->insn_is_ret
!= NULL
);
4872 if (gdbarch_debug
>= 2)
4873 fprintf_unfiltered (gdb_stdlog
, "gdbarch_insn_is_ret called\n");
4874 return gdbarch
->insn_is_ret (gdbarch
, addr
);
4878 set_gdbarch_insn_is_ret (struct gdbarch
*gdbarch
,
4879 gdbarch_insn_is_ret_ftype insn_is_ret
)
4881 gdbarch
->insn_is_ret
= insn_is_ret
;
4885 gdbarch_insn_is_jump (struct gdbarch
*gdbarch
, CORE_ADDR addr
)
4887 gdb_assert (gdbarch
!= NULL
);
4888 gdb_assert (gdbarch
->insn_is_jump
!= NULL
);
4889 if (gdbarch_debug
>= 2)
4890 fprintf_unfiltered (gdb_stdlog
, "gdbarch_insn_is_jump called\n");
4891 return gdbarch
->insn_is_jump (gdbarch
, addr
);
4895 set_gdbarch_insn_is_jump (struct gdbarch
*gdbarch
,
4896 gdbarch_insn_is_jump_ftype insn_is_jump
)
4898 gdbarch
->insn_is_jump
= insn_is_jump
;
4902 gdbarch_program_breakpoint_here_p (struct gdbarch
*gdbarch
, CORE_ADDR address
)
4904 gdb_assert (gdbarch
!= NULL
);
4905 gdb_assert (gdbarch
->program_breakpoint_here_p
!= NULL
);
4906 if (gdbarch_debug
>= 2)
4907 fprintf_unfiltered (gdb_stdlog
, "gdbarch_program_breakpoint_here_p called\n");
4908 return gdbarch
->program_breakpoint_here_p (gdbarch
, address
);
4912 set_gdbarch_program_breakpoint_here_p (struct gdbarch
*gdbarch
,
4913 gdbarch_program_breakpoint_here_p_ftype program_breakpoint_here_p
)
4915 gdbarch
->program_breakpoint_here_p
= program_breakpoint_here_p
;
4919 gdbarch_auxv_parse_p (struct gdbarch
*gdbarch
)
4921 gdb_assert (gdbarch
!= NULL
);
4922 return gdbarch
->auxv_parse
!= NULL
;
4926 gdbarch_auxv_parse (struct gdbarch
*gdbarch
, gdb_byte
**readptr
, gdb_byte
*endptr
, CORE_ADDR
*typep
, CORE_ADDR
*valp
)
4928 gdb_assert (gdbarch
!= NULL
);
4929 gdb_assert (gdbarch
->auxv_parse
!= NULL
);
4930 if (gdbarch_debug
>= 2)
4931 fprintf_unfiltered (gdb_stdlog
, "gdbarch_auxv_parse called\n");
4932 return gdbarch
->auxv_parse (gdbarch
, readptr
, endptr
, typep
, valp
);
4936 set_gdbarch_auxv_parse (struct gdbarch
*gdbarch
,
4937 gdbarch_auxv_parse_ftype auxv_parse
)
4939 gdbarch
->auxv_parse
= auxv_parse
;
4943 gdbarch_print_auxv_entry (struct gdbarch
*gdbarch
, struct ui_file
*file
, CORE_ADDR type
, CORE_ADDR val
)
4945 gdb_assert (gdbarch
!= NULL
);
4946 gdb_assert (gdbarch
->print_auxv_entry
!= NULL
);
4947 if (gdbarch_debug
>= 2)
4948 fprintf_unfiltered (gdb_stdlog
, "gdbarch_print_auxv_entry called\n");
4949 gdbarch
->print_auxv_entry (gdbarch
, file
, type
, val
);
4953 set_gdbarch_print_auxv_entry (struct gdbarch
*gdbarch
,
4954 gdbarch_print_auxv_entry_ftype print_auxv_entry
)
4956 gdbarch
->print_auxv_entry
= print_auxv_entry
;
4960 gdbarch_vsyscall_range (struct gdbarch
*gdbarch
, struct mem_range
*range
)
4962 gdb_assert (gdbarch
!= NULL
);
4963 gdb_assert (gdbarch
->vsyscall_range
!= NULL
);
4964 if (gdbarch_debug
>= 2)
4965 fprintf_unfiltered (gdb_stdlog
, "gdbarch_vsyscall_range called\n");
4966 return gdbarch
->vsyscall_range (gdbarch
, range
);
4970 set_gdbarch_vsyscall_range (struct gdbarch
*gdbarch
,
4971 gdbarch_vsyscall_range_ftype vsyscall_range
)
4973 gdbarch
->vsyscall_range
= vsyscall_range
;
4977 gdbarch_infcall_mmap (struct gdbarch
*gdbarch
, CORE_ADDR size
, unsigned prot
)
4979 gdb_assert (gdbarch
!= NULL
);
4980 gdb_assert (gdbarch
->infcall_mmap
!= NULL
);
4981 if (gdbarch_debug
>= 2)
4982 fprintf_unfiltered (gdb_stdlog
, "gdbarch_infcall_mmap called\n");
4983 return gdbarch
->infcall_mmap (size
, prot
);
4987 set_gdbarch_infcall_mmap (struct gdbarch
*gdbarch
,
4988 gdbarch_infcall_mmap_ftype infcall_mmap
)
4990 gdbarch
->infcall_mmap
= infcall_mmap
;
4994 gdbarch_infcall_munmap (struct gdbarch
*gdbarch
, CORE_ADDR addr
, CORE_ADDR size
)
4996 gdb_assert (gdbarch
!= NULL
);
4997 gdb_assert (gdbarch
->infcall_munmap
!= NULL
);
4998 if (gdbarch_debug
>= 2)
4999 fprintf_unfiltered (gdb_stdlog
, "gdbarch_infcall_munmap called\n");
5000 gdbarch
->infcall_munmap (addr
, size
);
5004 set_gdbarch_infcall_munmap (struct gdbarch
*gdbarch
,
5005 gdbarch_infcall_munmap_ftype infcall_munmap
)
5007 gdbarch
->infcall_munmap
= infcall_munmap
;
5011 gdbarch_gcc_target_options (struct gdbarch
*gdbarch
)
5013 gdb_assert (gdbarch
!= NULL
);
5014 gdb_assert (gdbarch
->gcc_target_options
!= NULL
);
5015 if (gdbarch_debug
>= 2)
5016 fprintf_unfiltered (gdb_stdlog
, "gdbarch_gcc_target_options called\n");
5017 return gdbarch
->gcc_target_options (gdbarch
);
5021 set_gdbarch_gcc_target_options (struct gdbarch
*gdbarch
,
5022 gdbarch_gcc_target_options_ftype gcc_target_options
)
5024 gdbarch
->gcc_target_options
= gcc_target_options
;
5028 gdbarch_gnu_triplet_regexp (struct gdbarch
*gdbarch
)
5030 gdb_assert (gdbarch
!= NULL
);
5031 gdb_assert (gdbarch
->gnu_triplet_regexp
!= NULL
);
5032 if (gdbarch_debug
>= 2)
5033 fprintf_unfiltered (gdb_stdlog
, "gdbarch_gnu_triplet_regexp called\n");
5034 return gdbarch
->gnu_triplet_regexp (gdbarch
);
5038 set_gdbarch_gnu_triplet_regexp (struct gdbarch
*gdbarch
,
5039 gdbarch_gnu_triplet_regexp_ftype gnu_triplet_regexp
)
5041 gdbarch
->gnu_triplet_regexp
= gnu_triplet_regexp
;
5045 gdbarch_addressable_memory_unit_size (struct gdbarch
*gdbarch
)
5047 gdb_assert (gdbarch
!= NULL
);
5048 gdb_assert (gdbarch
->addressable_memory_unit_size
!= NULL
);
5049 if (gdbarch_debug
>= 2)
5050 fprintf_unfiltered (gdb_stdlog
, "gdbarch_addressable_memory_unit_size called\n");
5051 return gdbarch
->addressable_memory_unit_size (gdbarch
);
5055 set_gdbarch_addressable_memory_unit_size (struct gdbarch
*gdbarch
,
5056 gdbarch_addressable_memory_unit_size_ftype addressable_memory_unit_size
)
5058 gdbarch
->addressable_memory_unit_size
= addressable_memory_unit_size
;
5062 gdbarch_disassembler_options_implicit (struct gdbarch
*gdbarch
)
5064 gdb_assert (gdbarch
!= NULL
);
5065 /* Skip verify of disassembler_options_implicit, invalid_p == 0 */
5066 if (gdbarch_debug
>= 2)
5067 fprintf_unfiltered (gdb_stdlog
, "gdbarch_disassembler_options_implicit called\n");
5068 return gdbarch
->disassembler_options_implicit
;
5072 set_gdbarch_disassembler_options_implicit (struct gdbarch
*gdbarch
,
5073 const char * disassembler_options_implicit
)
5075 gdbarch
->disassembler_options_implicit
= disassembler_options_implicit
;
5079 gdbarch_disassembler_options (struct gdbarch
*gdbarch
)
5081 gdb_assert (gdbarch
!= NULL
);
5082 /* Skip verify of disassembler_options, invalid_p == 0 */
5083 if (gdbarch_debug
>= 2)
5084 fprintf_unfiltered (gdb_stdlog
, "gdbarch_disassembler_options called\n");
5085 return gdbarch
->disassembler_options
;
5089 set_gdbarch_disassembler_options (struct gdbarch
*gdbarch
,
5090 char ** disassembler_options
)
5092 gdbarch
->disassembler_options
= disassembler_options
;
5095 const disasm_options_and_args_t
*
5096 gdbarch_valid_disassembler_options (struct gdbarch
*gdbarch
)
5098 gdb_assert (gdbarch
!= NULL
);
5099 /* Skip verify of valid_disassembler_options, invalid_p == 0 */
5100 if (gdbarch_debug
>= 2)
5101 fprintf_unfiltered (gdb_stdlog
, "gdbarch_valid_disassembler_options called\n");
5102 return gdbarch
->valid_disassembler_options
;
5106 set_gdbarch_valid_disassembler_options (struct gdbarch
*gdbarch
,
5107 const disasm_options_and_args_t
* valid_disassembler_options
)
5109 gdbarch
->valid_disassembler_options
= valid_disassembler_options
;
5113 gdbarch_type_align (struct gdbarch
*gdbarch
, struct type
*type
)
5115 gdb_assert (gdbarch
!= NULL
);
5116 gdb_assert (gdbarch
->type_align
!= NULL
);
5117 if (gdbarch_debug
>= 2)
5118 fprintf_unfiltered (gdb_stdlog
, "gdbarch_type_align called\n");
5119 return gdbarch
->type_align (gdbarch
, type
);
5123 set_gdbarch_type_align (struct gdbarch
*gdbarch
,
5124 gdbarch_type_align_ftype type_align
)
5126 gdbarch
->type_align
= type_align
;
5130 gdbarch_get_pc_address_flags (struct gdbarch
*gdbarch
, frame_info
*frame
, CORE_ADDR pc
)
5132 gdb_assert (gdbarch
!= NULL
);
5133 gdb_assert (gdbarch
->get_pc_address_flags
!= NULL
);
5134 if (gdbarch_debug
>= 2)
5135 fprintf_unfiltered (gdb_stdlog
, "gdbarch_get_pc_address_flags called\n");
5136 return gdbarch
->get_pc_address_flags (frame
, pc
);
5140 set_gdbarch_get_pc_address_flags (struct gdbarch
*gdbarch
,
5141 gdbarch_get_pc_address_flags_ftype get_pc_address_flags
)
5143 gdbarch
->get_pc_address_flags
= get_pc_address_flags
;
5147 gdbarch_read_core_file_mappings (struct gdbarch
*gdbarch
, struct bfd
*cbfd
,gdb::function_view
<void (ULONGEST count
)> pre_loop_cb
,gdb::function_view
<void (int num
, ULONGEST start
, ULONGEST end
, ULONGEST file_ofs
, const char *filename
, const void *other
)> loop_cb
)
5149 gdb_assert (gdbarch
!= NULL
);
5150 gdb_assert (gdbarch
->read_core_file_mappings
!= NULL
);
5151 if (gdbarch_debug
>= 2)
5152 fprintf_unfiltered (gdb_stdlog
, "gdbarch_read_core_file_mappings called\n");
5153 gdbarch
->read_core_file_mappings (gdbarch
, cbfd
, pre_loop_cb
, loop_cb
);
5157 set_gdbarch_read_core_file_mappings (struct gdbarch
*gdbarch
,
5158 gdbarch_read_core_file_mappings_ftype read_core_file_mappings
)
5160 gdbarch
->read_core_file_mappings
= read_core_file_mappings
;
5164 /* Keep a registry of per-architecture data-pointers required by GDB
5171 gdbarch_data_pre_init_ftype
*pre_init
;
5172 gdbarch_data_post_init_ftype
*post_init
;
5175 struct gdbarch_data_registration
5177 struct gdbarch_data
*data
;
5178 struct gdbarch_data_registration
*next
;
5181 struct gdbarch_data_registry
5184 struct gdbarch_data_registration
*registrations
;
5187 struct gdbarch_data_registry gdbarch_data_registry
=
5192 static struct gdbarch_data
*
5193 gdbarch_data_register (gdbarch_data_pre_init_ftype
*pre_init
,
5194 gdbarch_data_post_init_ftype
*post_init
)
5196 struct gdbarch_data_registration
**curr
;
5198 /* Append the new registration. */
5199 for (curr
= &gdbarch_data_registry
.registrations
;
5201 curr
= &(*curr
)->next
);
5202 (*curr
) = XNEW (struct gdbarch_data_registration
);
5203 (*curr
)->next
= NULL
;
5204 (*curr
)->data
= XNEW (struct gdbarch_data
);
5205 (*curr
)->data
->index
= gdbarch_data_registry
.nr
++;
5206 (*curr
)->data
->pre_init
= pre_init
;
5207 (*curr
)->data
->post_init
= post_init
;
5208 (*curr
)->data
->init_p
= 1;
5209 return (*curr
)->data
;
5212 struct gdbarch_data
*
5213 gdbarch_data_register_pre_init (gdbarch_data_pre_init_ftype
*pre_init
)
5215 return gdbarch_data_register (pre_init
, NULL
);
5218 struct gdbarch_data
*
5219 gdbarch_data_register_post_init (gdbarch_data_post_init_ftype
*post_init
)
5221 return gdbarch_data_register (NULL
, post_init
);
5224 /* Create/delete the gdbarch data vector. */
5227 alloc_gdbarch_data (struct gdbarch
*gdbarch
)
5229 gdb_assert (gdbarch
->data
== NULL
);
5230 gdbarch
->nr_data
= gdbarch_data_registry
.nr
;
5231 gdbarch
->data
= GDBARCH_OBSTACK_CALLOC (gdbarch
, gdbarch
->nr_data
, void *);
5234 /* Return the current value of the specified per-architecture
5238 gdbarch_data (struct gdbarch
*gdbarch
, struct gdbarch_data
*data
)
5240 gdb_assert (data
->index
< gdbarch
->nr_data
);
5241 if (gdbarch
->data
[data
->index
] == NULL
)
5243 /* The data-pointer isn't initialized, call init() to get a
5245 if (data
->pre_init
!= NULL
)
5246 /* Mid architecture creation: pass just the obstack, and not
5247 the entire architecture, as that way it isn't possible for
5248 pre-init code to refer to undefined architecture
5250 gdbarch
->data
[data
->index
] = data
->pre_init (gdbarch
->obstack
);
5251 else if (gdbarch
->initialized_p
5252 && data
->post_init
!= NULL
)
5253 /* Post architecture creation: pass the entire architecture
5254 (as all fields are valid), but be careful to also detect
5255 recursive references. */
5257 gdb_assert (data
->init_p
);
5259 gdbarch
->data
[data
->index
] = data
->post_init (gdbarch
);
5263 internal_error (__FILE__
, __LINE__
,
5264 _("gdbarch post-init data field can only be used "
5265 "after gdbarch is fully initialised"));
5266 gdb_assert (gdbarch
->data
[data
->index
] != NULL
);
5268 return gdbarch
->data
[data
->index
];
5272 /* Keep a registry of the architectures known by GDB. */
5274 struct gdbarch_registration
5276 enum bfd_architecture bfd_architecture
;
5277 gdbarch_init_ftype
*init
;
5278 gdbarch_dump_tdep_ftype
*dump_tdep
;
5279 struct gdbarch_list
*arches
;
5280 struct gdbarch_registration
*next
;
5283 static struct gdbarch_registration
*gdbarch_registry
= NULL
;
5286 append_name (const char ***buf
, int *nr
, const char *name
)
5288 *buf
= XRESIZEVEC (const char *, *buf
, *nr
+ 1);
5294 gdbarch_printable_names (void)
5296 /* Accumulate a list of names based on the registed list of
5299 const char **arches
= NULL
;
5300 struct gdbarch_registration
*rego
;
5302 for (rego
= gdbarch_registry
;
5306 const struct bfd_arch_info
*ap
;
5307 ap
= bfd_lookup_arch (rego
->bfd_architecture
, 0);
5309 internal_error (__FILE__
, __LINE__
,
5310 _("gdbarch_architecture_names: multi-arch unknown"));
5313 append_name (&arches
, &nr_arches
, ap
->printable_name
);
5318 append_name (&arches
, &nr_arches
, NULL
);
5324 gdbarch_register (enum bfd_architecture bfd_architecture
,
5325 gdbarch_init_ftype
*init
,
5326 gdbarch_dump_tdep_ftype
*dump_tdep
)
5328 struct gdbarch_registration
**curr
;
5329 const struct bfd_arch_info
*bfd_arch_info
;
5331 /* Check that BFD recognizes this architecture */
5332 bfd_arch_info
= bfd_lookup_arch (bfd_architecture
, 0);
5333 if (bfd_arch_info
== NULL
)
5335 internal_error (__FILE__
, __LINE__
,
5336 _("gdbarch: Attempt to register "
5337 "unknown architecture (%d)"),
5340 /* Check that we haven't seen this architecture before. */
5341 for (curr
= &gdbarch_registry
;
5343 curr
= &(*curr
)->next
)
5345 if (bfd_architecture
== (*curr
)->bfd_architecture
)
5346 internal_error (__FILE__
, __LINE__
,
5347 _("gdbarch: Duplicate registration "
5348 "of architecture (%s)"),
5349 bfd_arch_info
->printable_name
);
5353 fprintf_unfiltered (gdb_stdlog
, "register_gdbarch_init (%s, %s)\n",
5354 bfd_arch_info
->printable_name
,
5355 host_address_to_string (init
));
5357 (*curr
) = XNEW (struct gdbarch_registration
);
5358 (*curr
)->bfd_architecture
= bfd_architecture
;
5359 (*curr
)->init
= init
;
5360 (*curr
)->dump_tdep
= dump_tdep
;
5361 (*curr
)->arches
= NULL
;
5362 (*curr
)->next
= NULL
;
5366 register_gdbarch_init (enum bfd_architecture bfd_architecture
,
5367 gdbarch_init_ftype
*init
)
5369 gdbarch_register (bfd_architecture
, init
, NULL
);
5373 /* Look for an architecture using gdbarch_info. */
5375 struct gdbarch_list
*
5376 gdbarch_list_lookup_by_info (struct gdbarch_list
*arches
,
5377 const struct gdbarch_info
*info
)
5379 for (; arches
!= NULL
; arches
= arches
->next
)
5381 if (info
->bfd_arch_info
!= arches
->gdbarch
->bfd_arch_info
)
5383 if (info
->byte_order
!= arches
->gdbarch
->byte_order
)
5385 if (info
->osabi
!= arches
->gdbarch
->osabi
)
5387 if (info
->target_desc
!= arches
->gdbarch
->target_desc
)
5395 /* Find an architecture that matches the specified INFO. Create a new
5396 architecture if needed. Return that new architecture. */
5399 gdbarch_find_by_info (struct gdbarch_info info
)
5401 struct gdbarch
*new_gdbarch
;
5402 struct gdbarch_registration
*rego
;
5404 /* Fill in missing parts of the INFO struct using a number of
5405 sources: "set ..."; INFOabfd supplied; and the global
5407 gdbarch_info_fill (&info
);
5409 /* Must have found some sort of architecture. */
5410 gdb_assert (info
.bfd_arch_info
!= NULL
);
5414 fprintf_unfiltered (gdb_stdlog
,
5415 "gdbarch_find_by_info: info.bfd_arch_info %s\n",
5416 (info
.bfd_arch_info
!= NULL
5417 ? info
.bfd_arch_info
->printable_name
5419 fprintf_unfiltered (gdb_stdlog
,
5420 "gdbarch_find_by_info: info.byte_order %d (%s)\n",
5422 (info
.byte_order
== BFD_ENDIAN_BIG
? "big"
5423 : info
.byte_order
== BFD_ENDIAN_LITTLE
? "little"
5425 fprintf_unfiltered (gdb_stdlog
,
5426 "gdbarch_find_by_info: info.osabi %d (%s)\n",
5427 info
.osabi
, gdbarch_osabi_name (info
.osabi
));
5428 fprintf_unfiltered (gdb_stdlog
,
5429 "gdbarch_find_by_info: info.abfd %s\n",
5430 host_address_to_string (info
.abfd
));
5431 fprintf_unfiltered (gdb_stdlog
,
5432 "gdbarch_find_by_info: info.tdep_info %s\n",
5433 host_address_to_string (info
.tdep_info
));
5436 /* Find the tdep code that knows about this architecture. */
5437 for (rego
= gdbarch_registry
;
5440 if (rego
->bfd_architecture
== info
.bfd_arch_info
->arch
)
5445 fprintf_unfiltered (gdb_stdlog
, "gdbarch_find_by_info: "
5446 "No matching architecture\n");
5450 /* Ask the tdep code for an architecture that matches "info". */
5451 new_gdbarch
= rego
->init (info
, rego
->arches
);
5453 /* Did the tdep code like it? No. Reject the change and revert to
5454 the old architecture. */
5455 if (new_gdbarch
== NULL
)
5458 fprintf_unfiltered (gdb_stdlog
, "gdbarch_find_by_info: "
5459 "Target rejected architecture\n");
5463 /* Is this a pre-existing architecture (as determined by already
5464 being initialized)? Move it to the front of the architecture
5465 list (keeping the list sorted Most Recently Used). */
5466 if (new_gdbarch
->initialized_p
)
5468 struct gdbarch_list
**list
;
5469 struct gdbarch_list
*self
;
5471 fprintf_unfiltered (gdb_stdlog
, "gdbarch_find_by_info: "
5472 "Previous architecture %s (%s) selected\n",
5473 host_address_to_string (new_gdbarch
),
5474 new_gdbarch
->bfd_arch_info
->printable_name
);
5475 /* Find the existing arch in the list. */
5476 for (list
= ®o
->arches
;
5477 (*list
) != NULL
&& (*list
)->gdbarch
!= new_gdbarch
;
5478 list
= &(*list
)->next
);
5479 /* It had better be in the list of architectures. */
5480 gdb_assert ((*list
) != NULL
&& (*list
)->gdbarch
== new_gdbarch
);
5483 (*list
) = self
->next
;
5484 /* Insert SELF at the front. */
5485 self
->next
= rego
->arches
;
5486 rego
->arches
= self
;
5491 /* It's a new architecture. */
5493 fprintf_unfiltered (gdb_stdlog
, "gdbarch_find_by_info: "
5494 "New architecture %s (%s) selected\n",
5495 host_address_to_string (new_gdbarch
),
5496 new_gdbarch
->bfd_arch_info
->printable_name
);
5498 /* Insert the new architecture into the front of the architecture
5499 list (keep the list sorted Most Recently Used). */
5501 struct gdbarch_list
*self
= XNEW (struct gdbarch_list
);
5502 self
->next
= rego
->arches
;
5503 self
->gdbarch
= new_gdbarch
;
5504 rego
->arches
= self
;
5507 /* Check that the newly installed architecture is valid. Plug in
5508 any post init values. */
5509 new_gdbarch
->dump_tdep
= rego
->dump_tdep
;
5510 verify_gdbarch (new_gdbarch
);
5511 new_gdbarch
->initialized_p
= 1;
5514 gdbarch_dump (new_gdbarch
, gdb_stdlog
);
5519 /* Make the specified architecture current. */
5522 set_target_gdbarch (struct gdbarch
*new_gdbarch
)
5524 gdb_assert (new_gdbarch
!= NULL
);
5525 gdb_assert (new_gdbarch
->initialized_p
);
5526 current_inferior ()->gdbarch
= new_gdbarch
;
5527 gdb::observers::architecture_changed
.notify (new_gdbarch
);
5528 registers_changed ();
5531 /* Return the current inferior's arch. */
5534 target_gdbarch (void)
5536 return current_inferior ()->gdbarch
;
5539 void _initialize_gdbarch ();
5541 _initialize_gdbarch ()
5543 add_setshow_zuinteger_cmd ("arch", class_maintenance
, &gdbarch_debug
, _("\
5544 Set architecture debugging."), _("\
5545 Show architecture debugging."), _("\
5546 When non-zero, architecture debugging is enabled."),
5549 &setdebuglist
, &showdebuglist
);