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 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/>. */
26 #include "linux-nat.h"
27 #include "amd64-linux-tdep.h"
29 #include "gdb_assert.h"
30 #include "gdb_string.h"
31 #include <sys/ptrace.h>
32 #include <sys/debugreg.h>
33 #include <sys/syscall.h>
34 #include <sys/procfs.h>
35 #include <asm/prctl.h>
36 /* FIXME ezannoni-2003-07-09: we need <sys/reg.h> to be included after
37 <asm/ptrace.h> because the latter redefines FS and GS for no apparent
38 reason, and those definitions don't match the ones that libpthread_db
39 uses, which come from <sys/reg.h>. */
40 /* ezannoni-2003-07-09: I think this is fixed. The extraneous defs have
41 been removed from ptrace.h in the kernel. However, better safe than
43 #include <asm/ptrace.h>
45 #include "gdb_proc_service.h"
47 /* Prototypes for supply_gregset etc. */
50 #include "amd64-tdep.h"
51 #include "i386-linux-tdep.h"
52 #include "amd64-nat.h"
54 /* Mapping between the general-purpose registers in GNU/Linux x86-64
55 `struct user' format and GDB's register cache layout. */
57 static int amd64_linux_gregset64_reg_offset
[] =
59 RAX
* 8, RBX
* 8, /* %rax, %rbx */
60 RCX
* 8, RDX
* 8, /* %rcx, %rdx */
61 RSI
* 8, RDI
* 8, /* %rsi, %rdi */
62 RBP
* 8, RSP
* 8, /* %rbp, %rsp */
63 R8
* 8, R9
* 8, /* %r8 ... */
66 R14
* 8, R15
* 8, /* ... %r15 */
67 RIP
* 8, EFLAGS
* 8, /* %rip, %eflags */
68 CS
* 8, SS
* 8, /* %cs, %ss */
69 DS
* 8, ES
* 8, /* %ds, %es */
70 FS
* 8, GS
* 8, /* %fs, %gs */
71 -1, -1, -1, -1, -1, -1, -1, -1,
72 -1, -1, -1, -1, -1, -1, -1, -1,
73 -1, -1, -1, -1, -1, -1, -1, -1,
74 -1, -1, -1, -1, -1, -1, -1, -1, -1,
79 /* Mapping between the general-purpose registers in GNU/Linux x86-64
80 `struct user' format and GDB's register cache layout for GNU/Linux
83 Note that most GNU/Linux x86-64 registers are 64-bit, while the
84 GNU/Linux i386 registers are all 32-bit, but since we're
85 little-endian we get away with that. */
87 /* From <sys/reg.h> on GNU/Linux i386. */
88 static int amd64_linux_gregset32_reg_offset
[] =
90 RAX
* 8, RCX
* 8, /* %eax, %ecx */
91 RDX
* 8, RBX
* 8, /* %edx, %ebx */
92 RSP
* 8, RBP
* 8, /* %esp, %ebp */
93 RSI
* 8, RDI
* 8, /* %esi, %edi */
94 RIP
* 8, EFLAGS
* 8, /* %eip, %eflags */
95 CS
* 8, SS
* 8, /* %cs, %ss */
96 DS
* 8, ES
* 8, /* %ds, %es */
97 FS
* 8, GS
* 8, /* %fs, %gs */
98 -1, -1, -1, -1, -1, -1, -1, -1,
99 -1, -1, -1, -1, -1, -1, -1, -1,
100 -1, -1, -1, -1, -1, -1, -1, -1, -1,
101 ORIG_RAX
* 8 /* "orig_eax" */
105 /* Transfering the general-purpose registers between GDB, inferiors
108 /* Fill GDB's register cache with the general-purpose register values
112 supply_gregset (struct regcache
*regcache
, const elf_gregset_t
*gregsetp
)
114 amd64_supply_native_gregset (regcache
, gregsetp
, -1);
117 /* Fill register REGNUM (if it is a general-purpose register) in
118 *GREGSETP with the value in GDB's register cache. If REGNUM is -1,
119 do this for all registers. */
122 fill_gregset (const struct regcache
*regcache
,
123 elf_gregset_t
*gregsetp
, int regnum
)
125 amd64_collect_native_gregset (regcache
, gregsetp
, regnum
);
128 /* Transfering floating-point registers between GDB, inferiors and cores. */
130 /* Fill GDB's register cache with the floating-point and SSE register
131 values in *FPREGSETP. */
134 supply_fpregset (struct regcache
*regcache
, const elf_fpregset_t
*fpregsetp
)
136 amd64_supply_fxsave (regcache
, -1, fpregsetp
);
139 /* Fill register REGNUM (if it is a floating-point or SSE register) in
140 *FPREGSETP with the value in GDB's register cache. If REGNUM is
141 -1, do this for all registers. */
144 fill_fpregset (const struct regcache
*regcache
,
145 elf_fpregset_t
*fpregsetp
, int regnum
)
147 amd64_collect_fxsave (regcache
, regnum
, fpregsetp
);
151 /* Transferring arbitrary registers between GDB and inferior. */
153 /* Fetch register REGNUM from the child process. If REGNUM is -1, do
154 this for all registers (including the floating point and SSE
158 amd64_linux_fetch_inferior_registers (struct regcache
*regcache
, int regnum
)
162 /* GNU/Linux LWP ID's are process ID's. */
163 tid
= TIDGET (inferior_ptid
);
165 tid
= PIDGET (inferior_ptid
); /* Not a threaded program. */
167 if (regnum
== -1 || amd64_native_gregset_supplies_p (regnum
))
171 if (ptrace (PTRACE_GETREGS
, tid
, 0, (long) ®s
) < 0)
172 perror_with_name (_("Couldn't get registers"));
174 amd64_supply_native_gregset (regcache
, ®s
, -1);
179 if (regnum
== -1 || !amd64_native_gregset_supplies_p (regnum
))
181 elf_fpregset_t fpregs
;
183 if (ptrace (PTRACE_GETFPREGS
, tid
, 0, (long) &fpregs
) < 0)
184 perror_with_name (_("Couldn't get floating point status"));
186 amd64_supply_fxsave (regcache
, -1, &fpregs
);
190 /* Store register REGNUM back into the child process. If REGNUM is
191 -1, do this for all registers (including the floating-point and SSE
195 amd64_linux_store_inferior_registers (struct regcache
*regcache
, int regnum
)
199 /* GNU/Linux LWP ID's are process ID's. */
200 tid
= TIDGET (inferior_ptid
);
202 tid
= PIDGET (inferior_ptid
); /* Not a threaded program. */
204 if (regnum
== -1 || amd64_native_gregset_supplies_p (regnum
))
208 if (ptrace (PTRACE_GETREGS
, tid
, 0, (long) ®s
) < 0)
209 perror_with_name (_("Couldn't get registers"));
211 amd64_collect_native_gregset (regcache
, ®s
, regnum
);
213 if (ptrace (PTRACE_SETREGS
, tid
, 0, (long) ®s
) < 0)
214 perror_with_name (_("Couldn't write registers"));
220 if (regnum
== -1 || !amd64_native_gregset_supplies_p (regnum
))
222 elf_fpregset_t fpregs
;
224 if (ptrace (PTRACE_GETFPREGS
, tid
, 0, (long) &fpregs
) < 0)
225 perror_with_name (_("Couldn't get floating point status"));
227 amd64_collect_fxsave (regcache
, regnum
, &fpregs
);
229 if (ptrace (PTRACE_SETFPREGS
, tid
, 0, (long) &fpregs
) < 0)
230 perror_with_name (_("Couldn't write floating point status"));
236 /* Support for debug registers. */
238 static unsigned long amd64_linux_dr
[DR_CONTROL
+ 1];
241 amd64_linux_dr_get (ptid_t ptid
, int regnum
)
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 vector. For now, just return zero if the
254 ptrace call fails. */
256 value
= ptrace (PTRACE_PEEKUSER
, tid
,
257 offsetof (struct user
, u_debugreg
[regnum
]), 0);
260 perror_with_name (_("Couldn't read debug register"));
269 amd64_linux_dr_set (ptid_t ptid
, int regnum
, unsigned long value
)
278 ptrace (PTRACE_POKEUSER
, tid
,
279 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
)
290 amd64_linux_dr
[DR_CONTROL
] = control
;
292 amd64_linux_dr_set (ptid
, DR_CONTROL
, control
);
296 amd64_linux_dr_set_addr (int regnum
, CORE_ADDR addr
)
301 gdb_assert (regnum
>= 0 && regnum
<= DR_LASTADDR
- DR_FIRSTADDR
);
303 amd64_linux_dr
[DR_FIRSTADDR
+ regnum
] = addr
;
305 amd64_linux_dr_set (ptid
, DR_FIRSTADDR
+ regnum
, addr
);
309 amd64_linux_dr_reset_addr (int regnum
)
311 amd64_linux_dr_set_addr (regnum
, 0);
315 amd64_linux_dr_get_status (void)
317 return amd64_linux_dr_get (inferior_ptid
, DR_STATUS
);
321 amd64_linux_new_thread (ptid_t ptid
)
325 for (i
= DR_FIRSTADDR
; i
<= DR_LASTADDR
; i
++)
326 amd64_linux_dr_set (ptid
, i
, amd64_linux_dr
[i
]);
328 amd64_linux_dr_set (ptid
, DR_CONTROL
, amd64_linux_dr
[DR_CONTROL
]);
332 /* This function is called by libthread_db as part of its handling of
333 a request for a thread's local storage address. */
336 ps_get_thread_area (const struct ps_prochandle
*ph
,
337 lwpid_t lwpid
, int idx
, void **base
)
339 if (gdbarch_ptr_bit (current_gdbarch
) == 32)
341 /* The full structure is found in <asm-i386/ldt.h>. The second
342 integer is the LDT's base_address and that is used to locate
343 the thread's local storage. See i386-linux-nat.c more
345 unsigned int desc
[4];
347 /* This code assumes that "int" is 32 bits and that
348 GET_THREAD_AREA returns no more than 4 int values. */
349 gdb_assert (sizeof (int) == 4);
350 #ifndef PTRACE_GET_THREAD_AREA
351 #define PTRACE_GET_THREAD_AREA 25
353 if (ptrace (PTRACE_GET_THREAD_AREA
,
354 lwpid
, (void *) (long) idx
, (unsigned long) &desc
) < 0)
357 /* Extend the value to 64 bits. Here it's assumed that a "long"
358 and a "void *" are the same. */
359 (*base
) = (void *) (long) desc
[1];
364 /* This definition comes from prctl.h, but some kernels may not
366 #ifndef PTRACE_ARCH_PRCTL
367 #define PTRACE_ARCH_PRCTL 30
369 /* FIXME: ezannoni-2003-07-09 see comment above about include
370 file order. We could be getting bogus values for these two. */
371 gdb_assert (FS
< ELF_NGREG
);
372 gdb_assert (GS
< ELF_NGREG
);
376 if (ptrace (PTRACE_ARCH_PRCTL
, lwpid
, base
, ARCH_GET_FS
) == 0)
380 if (ptrace (PTRACE_ARCH_PRCTL
, lwpid
, base
, ARCH_GET_GS
) == 0)
383 default: /* Should not happen. */
387 return PS_ERR
; /* ptrace failed. */
391 static void (*super_post_startup_inferior
) (ptid_t ptid
);
394 amd64_linux_child_post_startup_inferior (ptid_t ptid
)
396 i386_cleanup_dregs ();
397 super_post_startup_inferior (ptid
);
401 /* Provide a prototype to silence -Wmissing-prototypes. */
402 void _initialize_amd64_linux_nat (void);
405 _initialize_amd64_linux_nat (void)
407 struct target_ops
*t
;
409 amd64_native_gregset32_reg_offset
= amd64_linux_gregset32_reg_offset
;
410 amd64_native_gregset32_num_regs
= I386_LINUX_NUM_REGS
;
411 amd64_native_gregset64_reg_offset
= amd64_linux_gregset64_reg_offset
;
412 amd64_native_gregset64_num_regs
= AMD64_LINUX_NUM_REGS
;
414 gdb_assert (ARRAY_SIZE (amd64_linux_gregset32_reg_offset
)
415 == amd64_native_gregset32_num_regs
);
416 gdb_assert (ARRAY_SIZE (amd64_linux_gregset64_reg_offset
)
417 == amd64_native_gregset64_num_regs
);
419 /* Fill in the generic GNU/Linux methods. */
422 /* Override the GNU/Linux inferior startup hook. */
423 super_post_startup_inferior
= t
->to_post_startup_inferior
;
424 t
->to_post_startup_inferior
= amd64_linux_child_post_startup_inferior
;
426 /* Add our register access methods. */
427 t
->to_fetch_registers
= amd64_linux_fetch_inferior_registers
;
428 t
->to_store_registers
= amd64_linux_store_inferior_registers
;
430 /* Register the target. */
431 linux_nat_add_target (t
);
432 linux_nat_set_new_thread (t
, amd64_linux_new_thread
);