1 /* Native-dependent code for GNU/Linux x86-64.
3 Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007
4 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., 51 Franklin Street, Fifth Floor,
22 Boston, MA 02110-1301, USA. */
28 #include "linux-nat.h"
29 #include "amd64-linux-tdep.h"
31 #include "gdb_assert.h"
32 #include "gdb_string.h"
33 #include <sys/ptrace.h>
34 #include <sys/debugreg.h>
35 #include <sys/syscall.h>
36 #include <sys/procfs.h>
37 #include <asm/prctl.h>
38 /* FIXME ezannoni-2003-07-09: we need <sys/reg.h> to be included after
39 <asm/ptrace.h> because the latter redefines FS and GS for no apparent
40 reason, and those definitions don't match the ones that libpthread_db
41 uses, which come from <sys/reg.h>. */
42 /* ezannoni-2003-07-09: I think this is fixed. The extraneous defs have
43 been removed from ptrace.h in the kernel. However, better safe than
45 #include <asm/ptrace.h>
47 #include "gdb_proc_service.h"
49 /* Prototypes for supply_gregset etc. */
52 #include "amd64-tdep.h"
53 #include "i386-linux-tdep.h"
54 #include "amd64-nat.h"
56 /* Mapping between the general-purpose registers in GNU/Linux x86-64
57 `struct user' format and GDB's register cache layout. */
59 static int amd64_linux_gregset64_reg_offset
[] =
61 RAX
* 8, RBX
* 8, /* %rax, %rbx */
62 RCX
* 8, RDX
* 8, /* %rcx, %rdx */
63 RSI
* 8, RDI
* 8, /* %rsi, %rdi */
64 RBP
* 8, RSP
* 8, /* %rbp, %rsp */
65 R8
* 8, R9
* 8, /* %r8 ... */
68 R14
* 8, R15
* 8, /* ... %r15 */
69 RIP
* 8, EFLAGS
* 8, /* %rip, %eflags */
70 CS
* 8, SS
* 8, /* %cs, %ss */
71 DS
* 8, ES
* 8, /* %ds, %es */
72 FS
* 8, GS
* 8, /* %fs, %gs */
73 -1, -1, -1, -1, -1, -1, -1, -1,
74 -1, -1, -1, -1, -1, -1, -1, -1,
75 -1, -1, -1, -1, -1, -1, -1, -1,
76 -1, -1, -1, -1, -1, -1, -1, -1, -1,
81 /* Mapping between the general-purpose registers in GNU/Linux x86-64
82 `struct user' format and GDB's register cache layout for GNU/Linux
85 Note that most GNU/Linux x86-64 registers are 64-bit, while the
86 GNU/Linux i386 registers are all 32-bit, but since we're
87 little-endian we get away with that. */
89 /* From <sys/reg.h> on GNU/Linux i386. */
90 static int amd64_linux_gregset32_reg_offset
[] =
92 RAX
* 8, RCX
* 8, /* %eax, %ecx */
93 RDX
* 8, RBX
* 8, /* %edx, %ebx */
94 RSP
* 8, RBP
* 8, /* %esp, %ebp */
95 RSI
* 8, RDI
* 8, /* %esi, %edi */
96 RIP
* 8, EFLAGS
* 8, /* %eip, %eflags */
97 CS
* 8, SS
* 8, /* %cs, %ss */
98 DS
* 8, ES
* 8, /* %ds, %es */
99 FS
* 8, GS
* 8, /* %fs, %gs */
100 -1, -1, -1, -1, -1, -1, -1, -1,
101 -1, -1, -1, -1, -1, -1, -1, -1,
102 -1, -1, -1, -1, -1, -1, -1, -1, -1,
103 ORIG_RAX
* 8 /* "orig_eax" */
107 /* Transfering the general-purpose registers between GDB, inferiors
110 /* Fill GDB's register cache with the general-purpose register values
114 supply_gregset (struct regcache
*regcache
, const elf_gregset_t
*gregsetp
)
116 amd64_supply_native_gregset (regcache
, gregsetp
, -1);
119 /* Fill register REGNUM (if it is a general-purpose register) in
120 *GREGSETP with the value in GDB's register cache. If REGNUM is -1,
121 do this for all registers. */
124 fill_gregset (const struct regcache
*regcache
,
125 elf_gregset_t
*gregsetp
, int regnum
)
127 amd64_collect_native_gregset (regcache
, gregsetp
, regnum
);
130 /* Transfering floating-point registers between GDB, inferiors and cores. */
132 /* Fill GDB's register cache with the floating-point and SSE register
133 values in *FPREGSETP. */
136 supply_fpregset (struct regcache
*regcache
, const elf_fpregset_t
*fpregsetp
)
138 amd64_supply_fxsave (regcache
, -1, fpregsetp
);
141 /* Fill register REGNUM (if it is a floating-point or SSE register) in
142 *FPREGSETP with the value in GDB's register cache. If REGNUM is
143 -1, do this for all registers. */
146 fill_fpregset (const struct regcache
*regcache
,
147 elf_fpregset_t
*fpregsetp
, int regnum
)
149 amd64_collect_fxsave (regcache
, regnum
, fpregsetp
);
153 /* Transferring arbitrary registers between GDB and inferior. */
155 /* Fetch register REGNUM from the child process. If REGNUM is -1, do
156 this for all registers (including the floating point and SSE
160 amd64_linux_fetch_inferior_registers (struct regcache
*regcache
, int regnum
)
164 /* GNU/Linux LWP ID's are process ID's. */
165 tid
= TIDGET (inferior_ptid
);
167 tid
= PIDGET (inferior_ptid
); /* Not a threaded program. */
169 if (regnum
== -1 || amd64_native_gregset_supplies_p (regnum
))
173 if (ptrace (PTRACE_GETREGS
, tid
, 0, (long) ®s
) < 0)
174 perror_with_name (_("Couldn't get registers"));
176 amd64_supply_native_gregset (regcache
, ®s
, -1);
181 if (regnum
== -1 || !amd64_native_gregset_supplies_p (regnum
))
183 elf_fpregset_t fpregs
;
185 if (ptrace (PTRACE_GETFPREGS
, tid
, 0, (long) &fpregs
) < 0)
186 perror_with_name (_("Couldn't get floating point status"));
188 amd64_supply_fxsave (regcache
, -1, &fpregs
);
192 /* Store register REGNUM back into the child process. If REGNUM is
193 -1, do this for all registers (including the floating-point and SSE
197 amd64_linux_store_inferior_registers (struct regcache
*regcache
, int regnum
)
201 /* GNU/Linux LWP ID's are process ID's. */
202 tid
= TIDGET (inferior_ptid
);
204 tid
= PIDGET (inferior_ptid
); /* Not a threaded program. */
206 if (regnum
== -1 || amd64_native_gregset_supplies_p (regnum
))
210 if (ptrace (PTRACE_GETREGS
, tid
, 0, (long) ®s
) < 0)
211 perror_with_name (_("Couldn't get registers"));
213 amd64_collect_native_gregset (regcache
, ®s
, regnum
);
215 if (ptrace (PTRACE_SETREGS
, tid
, 0, (long) ®s
) < 0)
216 perror_with_name (_("Couldn't write registers"));
222 if (regnum
== -1 || !amd64_native_gregset_supplies_p (regnum
))
224 elf_fpregset_t fpregs
;
226 if (ptrace (PTRACE_GETFPREGS
, tid
, 0, (long) &fpregs
) < 0)
227 perror_with_name (_("Couldn't get floating point status"));
229 amd64_collect_fxsave (regcache
, regnum
, &fpregs
);
231 if (ptrace (PTRACE_SETFPREGS
, tid
, 0, (long) &fpregs
) < 0)
232 perror_with_name (_("Couldn't write floating point status"));
240 amd64_linux_dr_get (int regnum
)
245 /* FIXME: kettenis/2001-01-29: It's not clear what we should do with
246 multi-threaded processes here. For now, pretend there is just
248 tid
= PIDGET (inferior_ptid
);
250 /* FIXME: kettenis/2001-03-27: Calling perror_with_name if the
251 ptrace call fails breaks debugging remote targets. The correct
252 way to fix this is to add the hardware breakpoint and watchpoint
253 stuff to the target vectore. For now, just return zero if the
254 ptrace call fails. */
256 value
= ptrace (PT_READ_U
, tid
,
257 offsetof (struct user
, u_debugreg
[regnum
]), 0);
260 perror_with_name (_("Couldn't read debug register"));
269 amd64_linux_dr_set (int regnum
, unsigned long value
)
273 /* FIXME: kettenis/2001-01-29: It's not clear what we should do with
274 multi-threaded processes here. For now, pretend there is just
276 tid
= PIDGET (inferior_ptid
);
279 ptrace (PT_WRITE_U
, tid
, offsetof (struct user
, u_debugreg
[regnum
]), value
);
281 perror_with_name (_("Couldn't write debug register"));
285 amd64_linux_dr_set_control (unsigned long control
)
287 amd64_linux_dr_set (DR_CONTROL
, control
);
291 amd64_linux_dr_set_addr (int regnum
, CORE_ADDR addr
)
293 gdb_assert (regnum
>= 0 && regnum
<= DR_LASTADDR
- DR_FIRSTADDR
);
295 amd64_linux_dr_set (DR_FIRSTADDR
+ regnum
, addr
);
299 amd64_linux_dr_reset_addr (int regnum
)
301 gdb_assert (regnum
>= 0 && regnum
<= DR_LASTADDR
- DR_FIRSTADDR
);
303 amd64_linux_dr_set (DR_FIRSTADDR
+ regnum
, 0L);
307 amd64_linux_dr_get_status (void)
309 return amd64_linux_dr_get (DR_STATUS
);
313 /* This function is called by libthread_db as part of its handling of
314 a request for a thread's local storage address. */
317 ps_get_thread_area (const struct ps_prochandle
*ph
,
318 lwpid_t lwpid
, int idx
, void **base
)
320 if (gdbarch_ptr_bit (current_gdbarch
) == 32)
322 /* The full structure is found in <asm-i386/ldt.h>. The second
323 integer is the LDT's base_address and that is used to locate
324 the thread's local storage. See i386-linux-nat.c more
326 unsigned int desc
[4];
328 /* This code assumes that "int" is 32 bits and that
329 GET_THREAD_AREA returns no more than 4 int values. */
330 gdb_assert (sizeof (int) == 4);
331 #ifndef PTRACE_GET_THREAD_AREA
332 #define PTRACE_GET_THREAD_AREA 25
334 if (ptrace (PTRACE_GET_THREAD_AREA
,
335 lwpid
, (void *) (long) idx
, (unsigned long) &desc
) < 0)
338 /* Extend the value to 64 bits. Here it's assumed that a "long"
339 and a "void *" are the same. */
340 (*base
) = (void *) (long) desc
[1];
345 /* This definition comes from prctl.h, but some kernels may not
347 #ifndef PTRACE_ARCH_PRCTL
348 #define PTRACE_ARCH_PRCTL 30
350 /* FIXME: ezannoni-2003-07-09 see comment above about include
351 file order. We could be getting bogus values for these two. */
352 gdb_assert (FS
< ELF_NGREG
);
353 gdb_assert (GS
< ELF_NGREG
);
357 if (ptrace (PTRACE_ARCH_PRCTL
, lwpid
, base
, ARCH_GET_FS
) == 0)
361 if (ptrace (PTRACE_ARCH_PRCTL
, lwpid
, base
, ARCH_GET_GS
) == 0)
364 default: /* Should not happen. */
368 return PS_ERR
; /* ptrace failed. */
372 static void (*super_post_startup_inferior
) (ptid_t ptid
);
375 amd64_linux_child_post_startup_inferior (ptid_t ptid
)
377 i386_cleanup_dregs ();
378 super_post_startup_inferior (ptid
);
382 /* Provide a prototype to silence -Wmissing-prototypes. */
383 void _initialize_amd64_linux_nat (void);
386 _initialize_amd64_linux_nat (void)
388 struct target_ops
*t
;
390 amd64_native_gregset32_reg_offset
= amd64_linux_gregset32_reg_offset
;
391 amd64_native_gregset32_num_regs
= I386_LINUX_NUM_REGS
;
392 amd64_native_gregset64_reg_offset
= amd64_linux_gregset64_reg_offset
;
393 amd64_native_gregset64_num_regs
= AMD64_LINUX_NUM_REGS
;
395 gdb_assert (ARRAY_SIZE (amd64_linux_gregset32_reg_offset
)
396 == amd64_native_gregset32_num_regs
);
397 gdb_assert (ARRAY_SIZE (amd64_linux_gregset64_reg_offset
)
398 == amd64_native_gregset64_num_regs
);
400 /* Fill in the generic GNU/Linux methods. */
403 /* Override the GNU/Linux inferior startup hook. */
404 super_post_startup_inferior
= t
->to_post_startup_inferior
;
405 t
->to_post_startup_inferior
= amd64_linux_child_post_startup_inferior
;
407 /* Add our register access methods. */
408 t
->to_fetch_registers
= amd64_linux_fetch_inferior_registers
;
409 t
->to_store_registers
= amd64_linux_store_inferior_registers
;
411 /* Register the target. */
412 linux_nat_add_target (t
);