1 /* Native-dependent code for GNU/Linux x86-64.
3 Copyright 2001, 2002, 2003 Free Software Foundation, Inc.
5 Contributed by Jiri Smid, SuSE Labs.
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 2 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, write to the Free Software
21 Foundation, Inc., 59 Temple Place - Suite 330,
22 Boston, MA 02111-1307, USA. */
28 #include "linux-nat.h"
30 #include "gdb_assert.h"
31 #include "gdb_string.h"
32 #include <sys/ptrace.h>
33 #include <sys/debugreg.h>
34 #include <sys/syscall.h>
35 #include <sys/procfs.h>
36 #include <asm/prctl.h>
37 /* FIXME ezannoni-2003-07-09: we need <sys/reg.h> to be included after
38 <asm/ptrace.h> because the latter redefines FS and GS for no apparent
39 reason, and those definitions don't match the ones that libpthread_db
40 uses, which come from <sys/reg.h>. */
41 /* ezannoni-2003-07-09: I think this is fixed. The extraneous defs have
42 been removed from ptrace.h in the kernel. However, better safe than
44 #include <asm/ptrace.h>
46 #include "gdb_proc_service.h"
48 /* Prototypes for supply_gregset etc. */
51 #include "x86-64-tdep.h"
52 #include "x86-64-linux-tdep.h"
54 /* Which ptrace request retrieves which registers?
55 These apply to the corresponding SET requests as well. */
57 #define GETREGS_SUPPLIES(regno) \
58 (0 <= (regno) && (regno) < X86_64_NUM_GREGS)
60 #define GETFPREGS_SUPPLIES(regno) \
61 (FP0_REGNUM <= (regno) && (regno) <= MXCSR_REGNUM)
64 /* Transfering the general-purpose registers between GDB, inferiors
67 /* Fill GDB's register array with the general-purpose register values
71 supply_gregset (elf_gregset_t
*gregsetp
)
73 x86_64_linux_supply_gregset ((char *) gregsetp
);
76 /* Fill register REGNO (if it is a general-purpose register) in
77 *GREGSETPS with the value in GDB's register array. If REGNO is -1,
78 do this for all registers. */
81 fill_gregset (elf_gregset_t
*gregsetp
, int regno
)
83 x86_64_linux_fill_gregset ((char *) gregsetp
, regno
);
86 /* Fetch all general-purpose registers from process/thread TID and
87 store their values in GDB's register array. */
94 if (ptrace (PTRACE_GETREGS
, tid
, 0, (long) ®s
) < 0)
95 perror_with_name ("Couldn't get registers");
97 supply_gregset (®s
);
100 /* Store all valid general-purpose registers in GDB's register array
101 into the process/thread specified by TID. */
104 store_regs (int tid
, int regno
)
108 if (ptrace (PTRACE_GETREGS
, tid
, 0, (long) ®s
) < 0)
109 perror_with_name ("Couldn't get registers");
111 fill_gregset (®s
, regno
);
113 if (ptrace (PTRACE_SETREGS
, tid
, 0, (long) ®s
) < 0)
114 perror_with_name ("Couldn't write registers");
118 /* Transfering floating-point registers between GDB, inferiors and cores. */
120 /* Fill GDB's register array with the floating-point and SSE register
121 values in *FPREGSETP. */
124 supply_fpregset (elf_fpregset_t
*fpregsetp
)
126 x86_64_supply_fxsave ((const char *) fpregsetp
, -1);
129 /* Fill register REGNUM (if it is a floating-point or SSE register) in
130 *FPREGSETP with the value in GDB's register array. If REGNUM is
131 -1, do this for all registers. */
134 fill_fpregset (elf_fpregset_t
*fpregsetp
, int regnum
)
136 x86_64_fill_fxsave ((char *) fpregsetp
, regnum
);
139 /* Fetch all floating-point registers from process/thread TID and store
140 thier values in GDB's register array. */
143 fetch_fpregs (int tid
)
145 elf_fpregset_t fpregs
;
147 if (ptrace (PTRACE_GETFPREGS
, tid
, 0, (long) &fpregs
) < 0)
148 perror_with_name ("Couldn't get floating point status");
150 supply_fpregset (&fpregs
);
153 /* Store all valid floating-point registers in GDB's register array
154 into the process/thread specified by TID. */
157 store_fpregs (int tid
, int regno
)
159 elf_fpregset_t fpregs
;
161 if (ptrace (PTRACE_GETFPREGS
, tid
, 0, (long) &fpregs
) < 0)
162 perror_with_name ("Couldn't get floating point status");
164 fill_fpregset (&fpregs
, regno
);
166 if (ptrace (PTRACE_SETFPREGS
, tid
, 0, (long) &fpregs
) < 0)
167 perror_with_name ("Couldn't write floating point status");
171 /* Transferring arbitrary registers between GDB and inferior. */
173 /* Fetch register REGNO from the child process. If REGNO is -1, do
174 this for all registers (including the floating point and SSE
178 fetch_inferior_registers (int regno
)
182 /* GNU/Linux LWP ID's are process ID's. */
183 tid
= TIDGET (inferior_ptid
);
185 tid
= PIDGET (inferior_ptid
); /* Not a threaded program. */
194 if (GETREGS_SUPPLIES (regno
))
200 if (GETFPREGS_SUPPLIES (regno
))
206 internal_error (__FILE__
, __LINE__
,
207 "Got request for bad register number %d.", regno
);
210 /* Store register REGNO back into the child process. If REGNO is -1,
211 do this for all registers (including the floating-point and SSE
215 store_inferior_registers (int regno
)
219 /* GNU/Linux LWP ID's are process ID's. */
220 tid
= TIDGET (inferior_ptid
);
222 tid
= PIDGET (inferior_ptid
); /* Not a threaded program. */
226 store_regs (tid
, regno
);
227 store_fpregs (tid
, regno
);
231 if (GETREGS_SUPPLIES (regno
))
233 store_regs (tid
, regno
);
237 if (GETFPREGS_SUPPLIES (regno
))
239 store_fpregs (tid
, regno
);
243 internal_error (__FILE__
, __LINE__
,
244 "Got request to store bad register number %d.", regno
);
249 x86_64_linux_dr_get (int regnum
)
254 /* FIXME: kettenis/2001-01-29: It's not clear what we should do with
255 multi-threaded processes here. For now, pretend there is just
257 tid
= PIDGET (inferior_ptid
);
259 /* FIXME: kettenis/2001-03-27: Calling perror_with_name if the
260 ptrace call fails breaks debugging remote targets. The correct
261 way to fix this is to add the hardware breakpoint and watchpoint
262 stuff to the target vectore. For now, just return zero if the
263 ptrace call fails. */
265 value
= ptrace (PT_READ_U
, tid
,
266 offsetof (struct user
, u_debugreg
[regnum
]), 0);
269 perror_with_name ("Couldn't read debug register");
278 x86_64_linux_dr_set (int regnum
, unsigned long value
)
282 /* FIXME: kettenis/2001-01-29: It's not clear what we should do with
283 multi-threaded processes here. For now, pretend there is just
285 tid
= PIDGET (inferior_ptid
);
288 ptrace (PT_WRITE_U
, tid
, offsetof (struct user
, u_debugreg
[regnum
]), value
);
290 perror_with_name ("Couldn't write debug register");
294 x86_64_linux_dr_set_control (unsigned long control
)
296 x86_64_linux_dr_set (DR_CONTROL
, control
);
300 x86_64_linux_dr_set_addr (int regnum
, CORE_ADDR addr
)
302 gdb_assert (regnum
>= 0 && regnum
<= DR_LASTADDR
- DR_FIRSTADDR
);
304 x86_64_linux_dr_set (DR_FIRSTADDR
+ regnum
, addr
);
308 x86_64_linux_dr_reset_addr (int regnum
)
310 gdb_assert (regnum
>= 0 && regnum
<= DR_LASTADDR
- DR_FIRSTADDR
);
312 x86_64_linux_dr_set (DR_FIRSTADDR
+ regnum
, 0L);
316 x86_64_linux_dr_get_status (void)
318 return x86_64_linux_dr_get (DR_STATUS
);
322 ps_get_thread_area (const struct ps_prochandle
*ph
,
323 lwpid_t lwpid
, int idx
, void **base
)
326 /* This definition comes from prctl.h, but some kernels may not have it. */
327 #ifndef PTRACE_ARCH_PRCTL
328 #define PTRACE_ARCH_PRCTL 30
331 /* FIXME: ezannoni-2003-07-09 see comment above about include file order.
332 We could be getting bogus values for these two. */
333 gdb_assert (FS
< ELF_NGREG
);
334 gdb_assert (GS
< ELF_NGREG
);
338 if (ptrace (PTRACE_ARCH_PRCTL
, lwpid
, base
, ARCH_GET_FS
) == 0)
342 if (ptrace (PTRACE_ARCH_PRCTL
, lwpid
, base
, ARCH_GET_GS
) == 0)
345 default: /* Should not happen. */
348 return PS_ERR
; /* ptrace failed. */
352 child_post_startup_inferior (ptid_t ptid
)
354 i386_cleanup_dregs ();
355 linux_child_post_startup_inferior (ptid
);
This page took 0.037607 seconds and 4 git commands to generate.