1 /* Common target-dependent code for NetBSD systems.
3 Copyright (C) 2002-2023 Free Software Foundation, Inc.
5 Contributed by Wasabi Systems, Inc.
7 This file is part of GDB.
9 This program is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; either version 3 of the License, or
12 (at your option) any later version.
14 This program is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
19 You should have received a copy of the GNU General Public License
20 along with this program. If not, see <http://www.gnu.org/licenses/>. */
24 #include "solib-svr4.h"
25 #include "netbsd-tdep.h"
28 #include "xml-syscall.h"
30 /* Flags in the 'kve_protection' field in struct kinfo_vmentry. These
31 match the KVME_PROT_* constants in <sys/sysctl.h>. */
33 #define KINFO_VME_PROT_READ 0x00000001
34 #define KINFO_VME_PROT_WRITE 0x00000002
35 #define KINFO_VME_PROT_EXEC 0x00000004
37 /* Flags in the 'kve_flags' field in struct kinfo_vmentry. These
38 match the KVME_FLAG_* constants in <sys/sysctl.h>. */
40 #define KINFO_VME_FLAG_COW 0x00000001
41 #define KINFO_VME_FLAG_NEEDS_COPY 0x00000002
42 #define KINFO_VME_FLAG_NOCOREDUMP 0x00000004
43 #define KINFO_VME_FLAG_PAGEABLE 0x00000008
44 #define KINFO_VME_FLAG_GROWS_UP 0x00000010
45 #define KINFO_VME_FLAG_GROWS_DOWN 0x00000020
47 /* FIXME: kettenis/20060115: We should really eliminate the next two
48 functions completely. */
50 struct link_map_offsets
*
51 nbsd_ilp32_solib_svr4_fetch_link_map_offsets (void)
53 return svr4_ilp32_fetch_link_map_offsets ();
56 struct link_map_offsets
*
57 nbsd_lp64_solib_svr4_fetch_link_map_offsets (void)
59 return svr4_lp64_fetch_link_map_offsets ();
63 nbsd_pc_in_sigtramp (CORE_ADDR pc
, const char *func_name
)
65 /* Check for libc-provided signal trampoline. All such trampolines
66 have function names which begin with "__sigtramp". */
68 return (func_name
!= NULL
69 && startswith (func_name
, "__sigtramp"));
72 /* This enum is derived from NETBSD's <sys/signal.h>. */
112 /* Implement the "gdb_signal_from_target" gdbarch method. */
114 static enum gdb_signal
115 nbsd_gdb_signal_from_target (struct gdbarch
*gdbarch
, int signal
)
123 return GDB_SIGNAL_HUP
;
126 return GDB_SIGNAL_INT
;
129 return GDB_SIGNAL_QUIT
;
132 return GDB_SIGNAL_ILL
;
135 return GDB_SIGNAL_TRAP
;
138 return GDB_SIGNAL_ABRT
;
141 return GDB_SIGNAL_EMT
;
144 return GDB_SIGNAL_FPE
;
147 return GDB_SIGNAL_KILL
;
150 return GDB_SIGNAL_BUS
;
153 return GDB_SIGNAL_SEGV
;
156 return GDB_SIGNAL_SYS
;
159 return GDB_SIGNAL_PIPE
;
162 return GDB_SIGNAL_ALRM
;
165 return GDB_SIGNAL_TERM
;
168 return GDB_SIGNAL_URG
;
171 return GDB_SIGNAL_STOP
;
174 return GDB_SIGNAL_TSTP
;
177 return GDB_SIGNAL_CONT
;
180 return GDB_SIGNAL_CHLD
;
183 return GDB_SIGNAL_TTIN
;
186 return GDB_SIGNAL_TTOU
;
189 return GDB_SIGNAL_IO
;
192 return GDB_SIGNAL_XCPU
;
195 return GDB_SIGNAL_XFSZ
;
198 return GDB_SIGNAL_VTALRM
;
201 return GDB_SIGNAL_PROF
;
204 return GDB_SIGNAL_WINCH
;
207 return GDB_SIGNAL_INFO
;
210 return GDB_SIGNAL_USR1
;
213 return GDB_SIGNAL_USR2
;
216 return GDB_SIGNAL_PWR
;
218 /* SIGRTMIN and SIGRTMAX are not continuous in <gdb/signals.def>,
219 therefore we have to handle them here. */
221 return GDB_SIGNAL_REALTIME_33
;
224 return GDB_SIGNAL_REALTIME_63
;
227 if (signal
>= NBSD_SIGRTMIN
+ 1 && signal
<= NBSD_SIGRTMAX
- 1)
229 int offset
= signal
- NBSD_SIGRTMIN
+ 1;
231 return (enum gdb_signal
) ((int) GDB_SIGNAL_REALTIME_34
+ offset
);
234 return GDB_SIGNAL_UNKNOWN
;
237 /* Implement the "gdb_signal_to_target" gdbarch method. */
240 nbsd_gdb_signal_to_target (struct gdbarch
*gdbarch
,
241 enum gdb_signal signal
)
254 case GDB_SIGNAL_QUIT
:
260 case GDB_SIGNAL_TRAP
:
263 case GDB_SIGNAL_ABRT
:
272 case GDB_SIGNAL_KILL
:
278 case GDB_SIGNAL_SEGV
:
284 case GDB_SIGNAL_PIPE
:
287 case GDB_SIGNAL_ALRM
:
290 case GDB_SIGNAL_TERM
:
296 case GDB_SIGNAL_TSTP
:
299 case GDB_SIGNAL_CONT
:
302 case GDB_SIGNAL_CHLD
:
305 case GDB_SIGNAL_TTIN
:
308 case GDB_SIGNAL_TTOU
:
314 case GDB_SIGNAL_XCPU
:
317 case GDB_SIGNAL_XFSZ
:
320 case GDB_SIGNAL_VTALRM
:
321 return NBSD_SIGVTALRM
;
323 case GDB_SIGNAL_PROF
:
326 case GDB_SIGNAL_WINCH
:
327 return NBSD_SIGWINCH
;
329 case GDB_SIGNAL_INFO
:
332 case GDB_SIGNAL_USR1
:
335 case GDB_SIGNAL_USR2
:
341 /* GDB_SIGNAL_REALTIME_33 is not continuous in <gdb/signals.def>,
342 therefore we have to handle it here. */
343 case GDB_SIGNAL_REALTIME_33
:
344 return NBSD_SIGRTMIN
;
346 /* Same comment applies to _64. */
347 case GDB_SIGNAL_REALTIME_63
:
348 return NBSD_SIGRTMAX
;
351 if (signal
>= GDB_SIGNAL_REALTIME_34
352 && signal
<= GDB_SIGNAL_REALTIME_62
)
354 int offset
= signal
- GDB_SIGNAL_REALTIME_32
;
356 return NBSD_SIGRTMIN
+ 1 + offset
;
362 /* Shared library resolver handling. */
365 nbsd_skip_solib_resolver (struct gdbarch
*gdbarch
, CORE_ADDR pc
)
367 struct bound_minimal_symbol msym
;
369 msym
= lookup_minimal_symbol ("_rtld_bind_start", NULL
, NULL
);
370 if (msym
.minsym
&& msym
.value_address () == pc
)
371 return frame_unwind_caller_pc (get_current_frame ());
373 return find_solib_trampoline_target (get_current_frame (), pc
);
376 struct nbsd_gdbarch_data
378 struct type
*siginfo_type
= nullptr;
381 static const registry
<gdbarch
>::key
<nbsd_gdbarch_data
>
382 nbsd_gdbarch_data_handle
;
384 static struct nbsd_gdbarch_data
*
385 get_nbsd_gdbarch_data (struct gdbarch
*gdbarch
)
387 struct nbsd_gdbarch_data
*result
= nbsd_gdbarch_data_handle
.get (gdbarch
);
388 if (result
== nullptr)
389 result
= nbsd_gdbarch_data_handle
.emplace (gdbarch
);
393 /* Implement the "get_siginfo_type" gdbarch method. */
396 nbsd_get_siginfo_type (struct gdbarch
*gdbarch
)
398 nbsd_gdbarch_data
*nbsd_gdbarch_data
= get_nbsd_gdbarch_data (gdbarch
);
399 if (nbsd_gdbarch_data
->siginfo_type
!= NULL
)
400 return nbsd_gdbarch_data
->siginfo_type
;
402 type
*char_type
= builtin_type (gdbarch
)->builtin_char
;
403 type
*int_type
= builtin_type (gdbarch
)->builtin_int
;
404 type
*long_type
= builtin_type (gdbarch
)->builtin_long
;
407 = lookup_pointer_type (builtin_type (gdbarch
)->builtin_void
);
409 type
*int32_type
= builtin_type (gdbarch
)->builtin_int32
;
410 type
*uint32_type
= builtin_type (gdbarch
)->builtin_uint32
;
411 type
*uint64_type
= builtin_type (gdbarch
)->builtin_uint64
;
413 bool lp64
= void_ptr_type
->length () == 8;
414 size_t char_bits
= gdbarch_addressable_memory_unit_size (gdbarch
) * 8;
417 type_allocator
alloc (gdbarch
);
418 type
*pid_type
= alloc
.new_type (TYPE_CODE_TYPEDEF
,
419 int32_type
->length () * char_bits
,
421 pid_type
->set_target_type (int32_type
);
424 type
*uid_type
= alloc
.new_type (TYPE_CODE_TYPEDEF
,
425 uint32_type
->length () * char_bits
,
427 uid_type
->set_target_type (uint32_type
);
430 type
*clock_type
= alloc
.new_type (TYPE_CODE_TYPEDEF
,
431 int_type
->length () * char_bits
,
433 clock_type
->set_target_type (int_type
);
436 type
*lwpid_type
= alloc
.new_type (TYPE_CODE_TYPEDEF
,
437 int32_type
->length () * char_bits
,
439 lwpid_type
->set_target_type (int32_type
);
442 type
*sigval_type
= arch_composite_type (gdbarch
, NULL
, TYPE_CODE_UNION
);
443 sigval_type
->set_name (gdbarch_obstack_strdup (gdbarch
, "sigval"));
444 append_composite_type_field (sigval_type
, "sival_int", int_type
);
445 append_composite_type_field (sigval_type
, "sival_ptr", void_ptr_type
);
448 type
*option_type
= arch_composite_type (gdbarch
, NULL
, TYPE_CODE_UNION
);
449 option_type
->set_name (gdbarch_obstack_strdup (gdbarch
, "_option"));
450 append_composite_type_field (option_type
, "_pe_other_pid", pid_type
);
451 append_composite_type_field (option_type
, "_pe_lwp", lwpid_type
);
454 type
*reason_type
= arch_composite_type (gdbarch
, NULL
, TYPE_CODE_UNION
);
457 type
*t
= arch_composite_type (gdbarch
, NULL
, TYPE_CODE_STRUCT
);
458 append_composite_type_field (t
, "_pid", pid_type
);
459 append_composite_type_field (t
, "_uid", uid_type
);
460 append_composite_type_field (t
, "_value", sigval_type
);
461 append_composite_type_field (reason_type
, "_rt", t
);
464 t
= arch_composite_type (gdbarch
, NULL
, TYPE_CODE_STRUCT
);
465 append_composite_type_field (t
, "_pid", pid_type
);
466 append_composite_type_field (t
, "_uid", uid_type
);
467 append_composite_type_field (t
, "_status", int_type
);
468 append_composite_type_field (t
, "_utime", clock_type
);
469 append_composite_type_field (t
, "_stime", clock_type
);
470 append_composite_type_field (reason_type
, "_child", t
);
473 t
= arch_composite_type (gdbarch
, NULL
, TYPE_CODE_STRUCT
);
474 append_composite_type_field (t
, "_addr", void_ptr_type
);
475 append_composite_type_field (t
, "_trap", int_type
);
476 append_composite_type_field (t
, "_trap2", int_type
);
477 append_composite_type_field (t
, "_trap3", int_type
);
478 append_composite_type_field (reason_type
, "_fault", t
);
481 t
= arch_composite_type (gdbarch
, NULL
, TYPE_CODE_STRUCT
);
482 append_composite_type_field (t
, "_band", long_type
);
483 append_composite_type_field (t
, "_fd", int_type
);
484 append_composite_type_field (reason_type
, "_poll", t
);
487 t
= arch_composite_type (gdbarch
, NULL
, TYPE_CODE_STRUCT
);
488 append_composite_type_field (t
, "_sysnum", int_type
);
489 append_composite_type_field (t
, "_retval",
490 init_vector_type (int_type
, 2));
491 append_composite_type_field (t
, "_error", int_type
);
492 append_composite_type_field (t
, "_args",
493 init_vector_type (uint64_type
, 8));
494 append_composite_type_field (reason_type
, "_syscall", t
);
497 t
= arch_composite_type (gdbarch
, NULL
, TYPE_CODE_STRUCT
);
498 append_composite_type_field (t
, "_pe_report_event", int_type
);
499 append_composite_type_field (t
, "_option", option_type
);
500 append_composite_type_field (reason_type
, "_ptrace_state", t
);
502 /* struct _ksiginfo */
503 type
*ksiginfo_type
= arch_composite_type (gdbarch
, NULL
, TYPE_CODE_STRUCT
);
504 ksiginfo_type
->set_name (gdbarch_obstack_strdup (gdbarch
, "_ksiginfo"));
505 append_composite_type_field (ksiginfo_type
, "_signo", int_type
);
506 append_composite_type_field (ksiginfo_type
, "_code", int_type
);
507 append_composite_type_field (ksiginfo_type
, "_errno", int_type
);
509 append_composite_type_field (ksiginfo_type
, "_pad", int_type
);
510 append_composite_type_field (ksiginfo_type
, "_reason", reason_type
);
513 type
*siginfo_type
= arch_composite_type (gdbarch
, NULL
, TYPE_CODE_UNION
);
514 siginfo_type
->set_name (gdbarch_obstack_strdup (gdbarch
, "siginfo"));
515 append_composite_type_field (siginfo_type
, "si_pad",
516 init_vector_type (char_type
, 128));
517 append_composite_type_field (siginfo_type
, "_info", ksiginfo_type
);
519 nbsd_gdbarch_data
->siginfo_type
= siginfo_type
;
524 /* See netbsd-tdep.h. */
527 nbsd_info_proc_mappings_header (int addr_bit
)
529 gdb_printf (_("Mapped address spaces:\n\n"));
532 gdb_printf (" %18s %18s %10s %10s %9s %s\n",
535 " Size", " Offset", "Flags ", "File");
539 gdb_printf ("\t%10s %10s %10s %10s %9s %s\n",
542 " Size", " Offset", "Flags ", "File");
546 /* Helper function to generate mappings flags for a single VM map
547 entry in 'info proc mappings'. */
550 nbsd_vm_map_entry_flags (int kve_flags
, int kve_protection
)
552 static char vm_flags
[9];
554 vm_flags
[0] = (kve_protection
& KINFO_VME_PROT_READ
) ? 'r' : '-';
555 vm_flags
[1] = (kve_protection
& KINFO_VME_PROT_WRITE
) ? 'w' : '-';
556 vm_flags
[2] = (kve_protection
& KINFO_VME_PROT_EXEC
) ? 'x' : '-';
558 vm_flags
[4] = (kve_flags
& KINFO_VME_FLAG_COW
) ? 'C' : '-';
559 vm_flags
[5] = (kve_flags
& KINFO_VME_FLAG_NEEDS_COPY
) ? 'N' : '-';
560 vm_flags
[6] = (kve_flags
& KINFO_VME_FLAG_PAGEABLE
) ? 'P' : '-';
561 vm_flags
[7] = (kve_flags
& KINFO_VME_FLAG_GROWS_UP
) ? 'U'
562 : (kve_flags
& KINFO_VME_FLAG_GROWS_DOWN
) ? 'D' : '-';
569 nbsd_info_proc_mappings_entry (int addr_bit
, ULONGEST kve_start
,
570 ULONGEST kve_end
, ULONGEST kve_offset
,
571 int kve_flags
, int kve_protection
,
572 const char *kve_path
)
576 gdb_printf (" %18s %18s %10s %10s %9s %s\n",
577 hex_string (kve_start
),
578 hex_string (kve_end
),
579 hex_string (kve_end
- kve_start
),
580 hex_string (kve_offset
),
581 nbsd_vm_map_entry_flags (kve_flags
, kve_protection
),
586 gdb_printf ("\t%10s %10s %10s %10s %9s %s\n",
587 hex_string (kve_start
),
588 hex_string (kve_end
),
589 hex_string (kve_end
- kve_start
),
590 hex_string (kve_offset
),
591 nbsd_vm_map_entry_flags (kve_flags
, kve_protection
),
596 /* Implement the "get_syscall_number" gdbarch method. */
599 nbsd_get_syscall_number (struct gdbarch
*gdbarch
, thread_info
*thread
)
602 /* NetBSD doesn't use gdbarch_get_syscall_number since NetBSD
603 native targets fetch the system call number from the
604 'si_sysnum' member of siginfo_t in nbsd_nat_target::wait.
605 However, system call catching requires this function to be
608 internal_error (_("nbsd_get_sycall_number called"));
611 /* See netbsd-tdep.h. */
614 nbsd_init_abi (struct gdbarch_info info
, struct gdbarch
*gdbarch
)
616 set_gdbarch_gdb_signal_from_target (gdbarch
, nbsd_gdb_signal_from_target
);
617 set_gdbarch_gdb_signal_to_target (gdbarch
, nbsd_gdb_signal_to_target
);
618 set_gdbarch_skip_solib_resolver (gdbarch
, nbsd_skip_solib_resolver
);
619 set_gdbarch_auxv_parse (gdbarch
, svr4_auxv_parse
);
620 set_gdbarch_get_siginfo_type (gdbarch
, nbsd_get_siginfo_type
);
622 /* `catch syscall' */
623 set_xml_syscall_file_name (gdbarch
, "syscalls/netbsd.xml");
624 set_gdbarch_get_syscall_number (gdbarch
, nbsd_get_syscall_number
);