testsuite, threads: fix LD_LIBRARY_PATH in 'tls-sepdebug.exp'
[binutils-gdb.git] / gdb / amd64-bsd-nat.c
blobe0ba28fa9fb8b8a65c66b9872f7b3a722b936512
1 /* Native-dependent code for AMD64 BSD's.
3 Copyright (C) 2003-2024 Free Software Foundation, Inc.
5 This file is part of GDB.
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program. If not, see <http://www.gnu.org/licenses/>. */
20 #include "inferior.h"
21 #include "regcache.h"
22 #include "target.h"
24 /* We include <signal.h> to make sure `struct fxsave64' is defined on
25 NetBSD, since NetBSD's <machine/reg.h> needs it. */
26 #include <signal.h>
27 #include <sys/types.h>
28 #include <sys/ptrace.h>
29 #include <machine/reg.h>
31 #include "amd64-tdep.h"
32 #include "amd64-nat.h"
33 #include "x86-bsd-nat.h"
34 #include "inf-ptrace.h"
35 #include "amd64-bsd-nat.h"
38 static PTRACE_TYPE_RET
39 gdb_ptrace (PTRACE_TYPE_ARG1 request, ptid_t ptid, PTRACE_TYPE_ARG3 addr,
40 PTRACE_TYPE_ARG4 data)
42 #ifdef __NetBSD__
43 gdb_assert (data == 0);
44 /* Support for NetBSD threads: unlike other ptrace implementations in this
45 file, NetBSD requires that we pass both the pid and lwp. */
46 return ptrace (request, ptid.pid (), addr, ptid.lwp ());
47 #else
48 pid_t pid = get_ptrace_pid (ptid);
49 return ptrace (request, pid, addr, data);
50 #endif
53 /* Fetch register REGNUM from the inferior. If REGNUM is -1, do this
54 for all registers (including the floating-point registers). */
56 void
57 amd64bsd_fetch_inferior_registers (struct regcache *regcache, int regnum)
59 struct gdbarch *gdbarch = regcache->arch ();
60 ptid_t ptid = regcache->ptid ();
62 if (regnum == -1 || amd64_native_gregset_supplies_p (gdbarch, regnum))
64 struct reg regs;
66 if (gdb_ptrace (PT_GETREGS, ptid, (PTRACE_TYPE_ARG3) &regs, 0) == -1)
67 perror_with_name (_("Couldn't get registers"));
69 amd64_supply_native_gregset (regcache, &regs, -1);
70 if (regnum != -1)
71 return;
74 if (regnum == -1 || !amd64_native_gregset_supplies_p (gdbarch, regnum))
76 struct fpreg fpregs;
78 if (gdb_ptrace (PT_GETFPREGS, ptid, (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
79 perror_with_name (_("Couldn't get floating point status"));
81 amd64_supply_fxsave (regcache, -1, &fpregs);
85 /* Store register REGNUM back into the inferior. If REGNUM is -1, do
86 this for all registers (including the floating-point registers). */
88 void
89 amd64bsd_store_inferior_registers (struct regcache *regcache, int regnum)
91 struct gdbarch *gdbarch = regcache->arch ();
92 ptid_t ptid = regcache->ptid ();
94 if (regnum == -1 || amd64_native_gregset_supplies_p (gdbarch, regnum))
96 struct reg regs;
98 if (gdb_ptrace (PT_GETREGS, ptid, (PTRACE_TYPE_ARG3) &regs, 0) == -1)
99 perror_with_name (_("Couldn't get registers"));
101 amd64_collect_native_gregset (regcache, &regs, regnum);
103 if (gdb_ptrace (PT_SETREGS, ptid, (PTRACE_TYPE_ARG3) &regs, 0) == -1)
104 perror_with_name (_("Couldn't write registers"));
106 if (regnum != -1)
107 return;
110 if (regnum == -1 || !amd64_native_gregset_supplies_p (gdbarch, regnum))
112 struct fpreg fpregs;
114 if (gdb_ptrace (PT_GETFPREGS, ptid, (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
115 perror_with_name (_("Couldn't get floating point status"));
117 amd64_collect_fxsave (regcache, regnum, &fpregs);
119 if (gdb_ptrace (PT_SETFPREGS, ptid, (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
120 perror_with_name (_("Couldn't write floating point status"));