123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632 |
- /* Common target-dependent code for NetBSD systems.
- Copyright (C) 2002-2022 Free Software Foundation, Inc.
- Contributed by Wasabi Systems, Inc.
-
- This file is part of GDB.
-
- This program is free software; you can redistribute it and/or modify
- it under the terms of the GNU General Public License as published by
- the Free Software Foundation; either version 3 of the License, or
- (at your option) any later version.
- This program is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- GNU General Public License for more details.
- You should have received a copy of the GNU General Public License
- along with this program. If not, see <http://www.gnu.org/licenses/>. */
- #include "defs.h"
- #include "auxv.h"
- #include "solib-svr4.h"
- #include "netbsd-tdep.h"
- #include "gdbarch.h"
- #include "objfiles.h"
- #include "xml-syscall.h"
- /* Flags in the 'kve_protection' field in struct kinfo_vmentry. These
- match the KVME_PROT_* constants in <sys/sysctl.h>. */
- #define KINFO_VME_PROT_READ 0x00000001
- #define KINFO_VME_PROT_WRITE 0x00000002
- #define KINFO_VME_PROT_EXEC 0x00000004
- /* Flags in the 'kve_flags' field in struct kinfo_vmentry. These
- match the KVME_FLAG_* constants in <sys/sysctl.h>. */
- #define KINFO_VME_FLAG_COW 0x00000001
- #define KINFO_VME_FLAG_NEEDS_COPY 0x00000002
- #define KINFO_VME_FLAG_NOCOREDUMP 0x00000004
- #define KINFO_VME_FLAG_PAGEABLE 0x00000008
- #define KINFO_VME_FLAG_GROWS_UP 0x00000010
- #define KINFO_VME_FLAG_GROWS_DOWN 0x00000020
- /* FIXME: kettenis/20060115: We should really eliminate the next two
- functions completely. */
- struct link_map_offsets *
- nbsd_ilp32_solib_svr4_fetch_link_map_offsets (void)
- {
- return svr4_ilp32_fetch_link_map_offsets ();
- }
- struct link_map_offsets *
- nbsd_lp64_solib_svr4_fetch_link_map_offsets (void)
- {
- return svr4_lp64_fetch_link_map_offsets ();
- }
- int
- nbsd_pc_in_sigtramp (CORE_ADDR pc, const char *func_name)
- {
- /* Check for libc-provided signal trampoline. All such trampolines
- have function names which begin with "__sigtramp". */
- return (func_name != NULL
- && startswith (func_name, "__sigtramp"));
- }
- /* This enum is derived from NETBSD's <sys/signal.h>. */
- enum
- {
- NBSD_SIGHUP = 1,
- NBSD_SIGINT = 2,
- NBSD_SIGQUIT = 3,
- NBSD_SIGILL = 4,
- NBSD_SIGTRAP = 5,
- NBSD_SIGABRT = 6,
- NBSD_SIGEMT = 7,
- NBSD_SIGFPE = 8,
- NBSD_SIGKILL = 9,
- NBSD_SIGBUS = 10,
- NBSD_SIGSEGV = 11,
- NBSD_SIGSYS = 12,
- NBSD_SIGPIPE = 13,
- NBSD_SIGALRM = 14,
- NBSD_SIGTERM = 15,
- NBSD_SIGURG = 16,
- NBSD_SIGSTOP = 17,
- NBSD_SIGTSTP = 18,
- NBSD_SIGCONT = 19,
- NBSD_SIGCHLD = 20,
- NBSD_SIGTTIN = 21,
- NBSD_SIGTTOU = 22,
- NBSD_SIGIO = 23,
- NBSD_SIGXCPU = 24,
- NBSD_SIGXFSZ = 25,
- NBSD_SIGVTALRM = 26,
- NBSD_SIGPROF = 27,
- NBSD_SIGWINCH = 28,
- NBSD_SIGINFO = 29,
- NBSD_SIGUSR1 = 30,
- NBSD_SIGUSR2 = 31,
- NBSD_SIGPWR = 32,
- NBSD_SIGRTMIN = 33,
- NBSD_SIGRTMAX = 63,
- };
- /* Implement the "gdb_signal_from_target" gdbarch method. */
- static enum gdb_signal
- nbsd_gdb_signal_from_target (struct gdbarch *gdbarch, int signal)
- {
- switch (signal)
- {
- case 0:
- return GDB_SIGNAL_0;
- case NBSD_SIGHUP:
- return GDB_SIGNAL_HUP;
- case NBSD_SIGINT:
- return GDB_SIGNAL_INT;
- case NBSD_SIGQUIT:
- return GDB_SIGNAL_QUIT;
- case NBSD_SIGILL:
- return GDB_SIGNAL_ILL;
- case NBSD_SIGTRAP:
- return GDB_SIGNAL_TRAP;
- case NBSD_SIGABRT:
- return GDB_SIGNAL_ABRT;
- case NBSD_SIGEMT:
- return GDB_SIGNAL_EMT;
- case NBSD_SIGFPE:
- return GDB_SIGNAL_FPE;
- case NBSD_SIGKILL:
- return GDB_SIGNAL_KILL;
- case NBSD_SIGBUS:
- return GDB_SIGNAL_BUS;
- case NBSD_SIGSEGV:
- return GDB_SIGNAL_SEGV;
- case NBSD_SIGSYS:
- return GDB_SIGNAL_SYS;
- case NBSD_SIGPIPE:
- return GDB_SIGNAL_PIPE;
- case NBSD_SIGALRM:
- return GDB_SIGNAL_ALRM;
- case NBSD_SIGTERM:
- return GDB_SIGNAL_TERM;
- case NBSD_SIGURG:
- return GDB_SIGNAL_URG;
- case NBSD_SIGSTOP:
- return GDB_SIGNAL_STOP;
- case NBSD_SIGTSTP:
- return GDB_SIGNAL_TSTP;
- case NBSD_SIGCONT:
- return GDB_SIGNAL_CONT;
- case NBSD_SIGCHLD:
- return GDB_SIGNAL_CHLD;
- case NBSD_SIGTTIN:
- return GDB_SIGNAL_TTIN;
- case NBSD_SIGTTOU:
- return GDB_SIGNAL_TTOU;
- case NBSD_SIGIO:
- return GDB_SIGNAL_IO;
- case NBSD_SIGXCPU:
- return GDB_SIGNAL_XCPU;
- case NBSD_SIGXFSZ:
- return GDB_SIGNAL_XFSZ;
- case NBSD_SIGVTALRM:
- return GDB_SIGNAL_VTALRM;
- case NBSD_SIGPROF:
- return GDB_SIGNAL_PROF;
- case NBSD_SIGWINCH:
- return GDB_SIGNAL_WINCH;
- case NBSD_SIGINFO:
- return GDB_SIGNAL_INFO;
- case NBSD_SIGUSR1:
- return GDB_SIGNAL_USR1;
- case NBSD_SIGUSR2:
- return GDB_SIGNAL_USR2;
- case NBSD_SIGPWR:
- return GDB_SIGNAL_PWR;
- /* SIGRTMIN and SIGRTMAX are not continuous in <gdb/signals.def>,
- therefore we have to handle them here. */
- case NBSD_SIGRTMIN:
- return GDB_SIGNAL_REALTIME_33;
- case NBSD_SIGRTMAX:
- return GDB_SIGNAL_REALTIME_63;
- }
- if (signal >= NBSD_SIGRTMIN + 1 && signal <= NBSD_SIGRTMAX - 1)
- {
- int offset = signal - NBSD_SIGRTMIN + 1;
- return (enum gdb_signal) ((int) GDB_SIGNAL_REALTIME_34 + offset);
- }
- return GDB_SIGNAL_UNKNOWN;
- }
- /* Implement the "gdb_signal_to_target" gdbarch method. */
- static int
- nbsd_gdb_signal_to_target (struct gdbarch *gdbarch,
- enum gdb_signal signal)
- {
- switch (signal)
- {
- case GDB_SIGNAL_0:
- return 0;
- case GDB_SIGNAL_HUP:
- return NBSD_SIGHUP;
- case GDB_SIGNAL_INT:
- return NBSD_SIGINT;
- case GDB_SIGNAL_QUIT:
- return NBSD_SIGQUIT;
- case GDB_SIGNAL_ILL:
- return NBSD_SIGILL;
- case GDB_SIGNAL_TRAP:
- return NBSD_SIGTRAP;
- case GDB_SIGNAL_ABRT:
- return NBSD_SIGABRT;
- case GDB_SIGNAL_EMT:
- return NBSD_SIGEMT;
- case GDB_SIGNAL_FPE:
- return NBSD_SIGFPE;
- case GDB_SIGNAL_KILL:
- return NBSD_SIGKILL;
- case GDB_SIGNAL_BUS:
- return NBSD_SIGBUS;
- case GDB_SIGNAL_SEGV:
- return NBSD_SIGSEGV;
- case GDB_SIGNAL_SYS:
- return NBSD_SIGSYS;
- case GDB_SIGNAL_PIPE:
- return NBSD_SIGPIPE;
- case GDB_SIGNAL_ALRM:
- return NBSD_SIGALRM;
- case GDB_SIGNAL_TERM:
- return NBSD_SIGTERM;
- case GDB_SIGNAL_URG:
- return NBSD_SIGSTOP;
- case GDB_SIGNAL_TSTP:
- return NBSD_SIGTSTP;
- case GDB_SIGNAL_CONT:
- return NBSD_SIGCONT;
- case GDB_SIGNAL_CHLD:
- return NBSD_SIGCHLD;
- case GDB_SIGNAL_TTIN:
- return NBSD_SIGTTIN;
- case GDB_SIGNAL_TTOU:
- return NBSD_SIGTTOU;
- case GDB_SIGNAL_IO:
- return NBSD_SIGIO;
- case GDB_SIGNAL_XCPU:
- return NBSD_SIGXCPU;
- case GDB_SIGNAL_XFSZ:
- return NBSD_SIGXFSZ;
- case GDB_SIGNAL_VTALRM:
- return NBSD_SIGVTALRM;
- case GDB_SIGNAL_PROF:
- return NBSD_SIGPROF;
- case GDB_SIGNAL_WINCH:
- return NBSD_SIGWINCH;
- case GDB_SIGNAL_INFO:
- return NBSD_SIGINFO;
- case GDB_SIGNAL_USR1:
- return NBSD_SIGUSR1;
- case GDB_SIGNAL_USR2:
- return NBSD_SIGUSR2;
- case GDB_SIGNAL_PWR:
- return NBSD_SIGPWR;
- /* GDB_SIGNAL_REALTIME_33 is not continuous in <gdb/signals.def>,
- therefore we have to handle it here. */
- case GDB_SIGNAL_REALTIME_33:
- return NBSD_SIGRTMIN;
- /* Same comment applies to _64. */
- case GDB_SIGNAL_REALTIME_63:
- return NBSD_SIGRTMAX;
- }
- if (signal >= GDB_SIGNAL_REALTIME_34
- && signal <= GDB_SIGNAL_REALTIME_62)
- {
- int offset = signal - GDB_SIGNAL_REALTIME_32;
- return NBSD_SIGRTMIN + 1 + offset;
- }
- return -1;
- }
- /* Shared library resolver handling. */
- static CORE_ADDR
- nbsd_skip_solib_resolver (struct gdbarch *gdbarch, CORE_ADDR pc)
- {
- struct bound_minimal_symbol msym;
- msym = lookup_minimal_symbol ("_rtld_bind_start", NULL, NULL);
- if (msym.minsym && BMSYMBOL_VALUE_ADDRESS (msym) == pc)
- return frame_unwind_caller_pc (get_current_frame ());
- else
- return find_solib_trampoline_target (get_current_frame (), pc);
- }
- static struct gdbarch_data *nbsd_gdbarch_data_handle;
- struct nbsd_gdbarch_data
- {
- struct type *siginfo_type;
- };
- static void *
- init_nbsd_gdbarch_data (struct gdbarch *gdbarch)
- {
- return GDBARCH_OBSTACK_ZALLOC (gdbarch, struct nbsd_gdbarch_data);
- }
- static struct nbsd_gdbarch_data *
- get_nbsd_gdbarch_data (struct gdbarch *gdbarch)
- {
- return ((struct nbsd_gdbarch_data *)
- gdbarch_data (gdbarch, nbsd_gdbarch_data_handle));
- }
- /* Implement the "get_siginfo_type" gdbarch method. */
- static struct type *
- nbsd_get_siginfo_type (struct gdbarch *gdbarch)
- {
- nbsd_gdbarch_data *nbsd_gdbarch_data = get_nbsd_gdbarch_data (gdbarch);
- if (nbsd_gdbarch_data->siginfo_type != NULL)
- return nbsd_gdbarch_data->siginfo_type;
- type *char_type = builtin_type (gdbarch)->builtin_char;
- type *int_type = builtin_type (gdbarch)->builtin_int;
- type *long_type = builtin_type (gdbarch)->builtin_long;
- type *void_ptr_type
- = lookup_pointer_type (builtin_type (gdbarch)->builtin_void);
- type *int32_type = builtin_type (gdbarch)->builtin_int32;
- type *uint32_type = builtin_type (gdbarch)->builtin_uint32;
- type *uint64_type = builtin_type (gdbarch)->builtin_uint64;
- bool lp64 = TYPE_LENGTH (void_ptr_type) == 8;
- size_t char_bits = gdbarch_addressable_memory_unit_size (gdbarch) * 8;
- /* pid_t */
- type *pid_type = arch_type (gdbarch, TYPE_CODE_TYPEDEF,
- TYPE_LENGTH (int32_type) * char_bits, "pid_t");
- TYPE_TARGET_TYPE (pid_type) = int32_type;
- /* uid_t */
- type *uid_type = arch_type (gdbarch, TYPE_CODE_TYPEDEF,
- TYPE_LENGTH (uint32_type) * char_bits, "uid_t");
- TYPE_TARGET_TYPE (uid_type) = uint32_type;
- /* clock_t */
- type *clock_type = arch_type (gdbarch, TYPE_CODE_TYPEDEF,
- TYPE_LENGTH (int_type) * char_bits, "clock_t");
- TYPE_TARGET_TYPE (clock_type) = int_type;
- /* lwpid_t */
- type *lwpid_type = arch_type (gdbarch, TYPE_CODE_TYPEDEF,
- TYPE_LENGTH (int32_type) * char_bits,
- "lwpid_t");
- TYPE_TARGET_TYPE (lwpid_type) = int32_type;
- /* union sigval */
- type *sigval_type = arch_composite_type (gdbarch, NULL, TYPE_CODE_UNION);
- sigval_type->set_name (gdbarch_obstack_strdup (gdbarch, "sigval"));
- append_composite_type_field (sigval_type, "sival_int", int_type);
- append_composite_type_field (sigval_type, "sival_ptr", void_ptr_type);
- /* union _option */
- type *option_type = arch_composite_type (gdbarch, NULL, TYPE_CODE_UNION);
- option_type->set_name (gdbarch_obstack_strdup (gdbarch, "_option"));
- append_composite_type_field (option_type, "_pe_other_pid", pid_type);
- append_composite_type_field (option_type, "_pe_lwp", lwpid_type);
- /* union _reason */
- type *reason_type = arch_composite_type (gdbarch, NULL, TYPE_CODE_UNION);
- /* _rt */
- type *t = arch_composite_type (gdbarch, NULL, TYPE_CODE_STRUCT);
- append_composite_type_field (t, "_pid", pid_type);
- append_composite_type_field (t, "_uid", uid_type);
- append_composite_type_field (t, "_value", sigval_type);
- append_composite_type_field (reason_type, "_rt", t);
- /* _child */
- t = arch_composite_type (gdbarch, NULL, TYPE_CODE_STRUCT);
- append_composite_type_field (t, "_pid", pid_type);
- append_composite_type_field (t, "_uid", uid_type);
- append_composite_type_field (t, "_status", int_type);
- append_composite_type_field (t, "_utime", clock_type);
- append_composite_type_field (t, "_stime", clock_type);
- append_composite_type_field (reason_type, "_child", t);
- /* _fault */
- t = arch_composite_type (gdbarch, NULL, TYPE_CODE_STRUCT);
- append_composite_type_field (t, "_addr", void_ptr_type);
- append_composite_type_field (t, "_trap", int_type);
- append_composite_type_field (t, "_trap2", int_type);
- append_composite_type_field (t, "_trap3", int_type);
- append_composite_type_field (reason_type, "_fault", t);
- /* _poll */
- t = arch_composite_type (gdbarch, NULL, TYPE_CODE_STRUCT);
- append_composite_type_field (t, "_band", long_type);
- append_composite_type_field (t, "_fd", int_type);
- append_composite_type_field (reason_type, "_poll", t);
- /* _syscall */
- t = arch_composite_type (gdbarch, NULL, TYPE_CODE_STRUCT);
- append_composite_type_field (t, "_sysnum", int_type);
- append_composite_type_field (t, "_retval",
- init_vector_type (int_type, 2));
- append_composite_type_field (t, "_error", int_type);
- append_composite_type_field (t, "_args",
- init_vector_type (uint64_type, 8));
- append_composite_type_field (reason_type, "_syscall", t);
- /* _ptrace_state */
- t = arch_composite_type (gdbarch, NULL, TYPE_CODE_STRUCT);
- append_composite_type_field (t, "_pe_report_event", int_type);
- append_composite_type_field (t, "_option", option_type);
- append_composite_type_field (reason_type, "_ptrace_state", t);
- /* struct _ksiginfo */
- type *ksiginfo_type = arch_composite_type (gdbarch, NULL, TYPE_CODE_STRUCT);
- ksiginfo_type->set_name (gdbarch_obstack_strdup (gdbarch, "_ksiginfo"));
- append_composite_type_field (ksiginfo_type, "_signo", int_type);
- append_composite_type_field (ksiginfo_type, "_code", int_type);
- append_composite_type_field (ksiginfo_type, "_errno", int_type);
- if (lp64)
- append_composite_type_field (ksiginfo_type, "_pad", int_type);
- append_composite_type_field (ksiginfo_type, "_reason", reason_type);
- /* union siginfo */
- type *siginfo_type = arch_composite_type (gdbarch, NULL, TYPE_CODE_UNION);
- siginfo_type->set_name (gdbarch_obstack_strdup (gdbarch, "siginfo"));
- append_composite_type_field (siginfo_type, "si_pad",
- init_vector_type (char_type, 128));
- append_composite_type_field (siginfo_type, "_info", ksiginfo_type);
- nbsd_gdbarch_data->siginfo_type = siginfo_type;
- return siginfo_type;
- }
- /* See netbsd-tdep.h. */
- void
- nbsd_info_proc_mappings_header (int addr_bit)
- {
- gdb_printf (_("Mapped address spaces:\n\n"));
- if (addr_bit == 64)
- {
- gdb_printf (" %18s %18s %10s %10s %9s %s\n",
- "Start Addr",
- " End Addr",
- " Size", " Offset", "Flags ", "File");
- }
- else
- {
- gdb_printf ("\t%10s %10s %10s %10s %9s %s\n",
- "Start Addr",
- " End Addr",
- " Size", " Offset", "Flags ", "File");
- }
- }
- /* Helper function to generate mappings flags for a single VM map
- entry in 'info proc mappings'. */
- static const char *
- nbsd_vm_map_entry_flags (int kve_flags, int kve_protection)
- {
- static char vm_flags[9];
- vm_flags[0] = (kve_protection & KINFO_VME_PROT_READ) ? 'r' : '-';
- vm_flags[1] = (kve_protection & KINFO_VME_PROT_WRITE) ? 'w' : '-';
- vm_flags[2] = (kve_protection & KINFO_VME_PROT_EXEC) ? 'x' : '-';
- vm_flags[3] = ' ';
- vm_flags[4] = (kve_flags & KINFO_VME_FLAG_COW) ? 'C' : '-';
- vm_flags[5] = (kve_flags & KINFO_VME_FLAG_NEEDS_COPY) ? 'N' : '-';
- vm_flags[6] = (kve_flags & KINFO_VME_FLAG_PAGEABLE) ? 'P' : '-';
- vm_flags[7] = (kve_flags & KINFO_VME_FLAG_GROWS_UP) ? 'U'
- : (kve_flags & KINFO_VME_FLAG_GROWS_DOWN) ? 'D' : '-';
- vm_flags[8] = '\0';
- return vm_flags;
- }
- void
- nbsd_info_proc_mappings_entry (int addr_bit, ULONGEST kve_start,
- ULONGEST kve_end, ULONGEST kve_offset,
- int kve_flags, int kve_protection,
- const char *kve_path)
- {
- if (addr_bit == 64)
- {
- gdb_printf (" %18s %18s %10s %10s %9s %s\n",
- hex_string (kve_start),
- hex_string (kve_end),
- hex_string (kve_end - kve_start),
- hex_string (kve_offset),
- nbsd_vm_map_entry_flags (kve_flags, kve_protection),
- kve_path);
- }
- else
- {
- gdb_printf ("\t%10s %10s %10s %10s %9s %s\n",
- hex_string (kve_start),
- hex_string (kve_end),
- hex_string (kve_end - kve_start),
- hex_string (kve_offset),
- nbsd_vm_map_entry_flags (kve_flags, kve_protection),
- kve_path);
- }
- }
- /* Implement the "get_syscall_number" gdbarch method. */
- static LONGEST
- nbsd_get_syscall_number (struct gdbarch *gdbarch, thread_info *thread)
- {
- /* NetBSD doesn't use gdbarch_get_syscall_number since NetBSD
- native targets fetch the system call number from the
- 'si_sysnum' member of siginfo_t in nbsd_nat_target::wait.
- However, system call catching requires this function to be
- set. */
- internal_error (__FILE__, __LINE__, _("nbsd_get_sycall_number called"));
- }
- /* See netbsd-tdep.h. */
- void
- nbsd_init_abi (struct gdbarch_info info, struct gdbarch *gdbarch)
- {
- set_gdbarch_gdb_signal_from_target (gdbarch, nbsd_gdb_signal_from_target);
- set_gdbarch_gdb_signal_to_target (gdbarch, nbsd_gdb_signal_to_target);
- set_gdbarch_skip_solib_resolver (gdbarch, nbsd_skip_solib_resolver);
- set_gdbarch_auxv_parse (gdbarch, svr4_auxv_parse);
- set_gdbarch_get_siginfo_type (gdbarch, nbsd_get_siginfo_type);
- /* `catch syscall' */
- set_xml_syscall_file_name (gdbarch, "syscalls/netbsd.xml");
- set_gdbarch_get_syscall_number (gdbarch, nbsd_get_syscall_number);
- }
- void _initialize_nbsd_tdep ();
- void
- _initialize_nbsd_tdep ()
- {
- nbsd_gdbarch_data_handle
- = gdbarch_data_register_post_init (init_nbsd_gdbarch_data);
- }
|