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