1 /* Native-dependent code for GNU/Linux x86-64.
3 Copyright (C) 2001-2014 Free Software Foundation, Inc.
4 Contributed by Jiri Smid, SuSE Labs.
6 This file is part of GDB.
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 3 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program. If not, see <http://www.gnu.org/licenses/>. */
24 #include "elf/common.h"
25 #include <sys/ptrace.h>
26 #include <asm/prctl.h>
29 #include "gdb_proc_service.h"
31 #include "amd64-nat.h"
32 #include "linux-nat.h"
33 #include "x86-linux-nat.h"
34 #include "amd64-tdep.h"
35 #include "amd64-linux-tdep.h"
36 #include "i386-linux-tdep.h"
37 #include "i386-xstate.h"
39 #include "x86-linux-nat.h"
41 /* Mapping between the general-purpose registers in GNU/Linux x86-64
42 `struct user' format and GDB's register cache layout for GNU/Linux
45 Note that most GNU/Linux x86-64 registers are 64-bit, while the
46 GNU/Linux i386 registers are all 32-bit, but since we're
47 little-endian we get away with that. */
49 /* From <sys/reg.h> on GNU/Linux i386. */
50 static int amd64_linux_gregset32_reg_offset[] =
52 RAX * 8, RCX * 8, /* %eax, %ecx */
53 RDX * 8, RBX * 8, /* %edx, %ebx */
54 RSP * 8, RBP * 8, /* %esp, %ebp */
55 RSI * 8, RDI * 8, /* %esi, %edi */
56 RIP * 8, EFLAGS * 8, /* %eip, %eflags */
57 CS * 8, SS * 8, /* %cs, %ss */
58 DS * 8, ES * 8, /* %ds, %es */
59 FS * 8, GS * 8, /* %fs, %gs */
60 -1, -1, -1, -1, -1, -1, -1, -1,
61 -1, -1, -1, -1, -1, -1, -1, -1,
62 -1, -1, -1, -1, -1, -1, -1, -1, -1,
63 -1, -1, -1, -1, -1, -1, -1, -1,
64 -1, -1, -1, -1, /* MPX registers BND0 ... BND3. */
65 -1, -1, /* MPX registers BNDCFGU, BNDSTATUS. */
66 -1, -1, -1, -1, -1, -1, -1, -1, /* k0 ... k7 (AVX512) */
67 -1, -1, -1, -1, -1, -1, -1, -1, /* zmm0 ... zmm7 (AVX512) */
68 ORIG_RAX * 8 /* "orig_eax" */
72 /* Transfering the general-purpose registers between GDB, inferiors
75 /* Fill GDB's register cache with the general-purpose register values
79 supply_gregset (struct regcache *regcache, const elf_gregset_t *gregsetp)
81 amd64_supply_native_gregset (regcache, gregsetp, -1);
84 /* Fill register REGNUM (if it is a general-purpose register) in
85 *GREGSETP with the value in GDB's register cache. If REGNUM is -1,
86 do this for all registers. */
89 fill_gregset (const struct regcache *regcache,
90 elf_gregset_t *gregsetp, int regnum)
92 amd64_collect_native_gregset (regcache, gregsetp, regnum);
95 /* Transfering floating-point registers between GDB, inferiors and cores. */
97 /* Fill GDB's register cache with the floating-point and SSE register
98 values in *FPREGSETP. */
101 supply_fpregset (struct regcache *regcache, const elf_fpregset_t *fpregsetp)
103 amd64_supply_fxsave (regcache, -1, fpregsetp);
106 /* Fill register REGNUM (if it is a floating-point or SSE register) in
107 *FPREGSETP with the value in GDB's register cache. If REGNUM is
108 -1, do this for all registers. */
111 fill_fpregset (const struct regcache *regcache,
112 elf_fpregset_t *fpregsetp, int regnum)
114 amd64_collect_fxsave (regcache, regnum, fpregsetp);
118 /* Transferring arbitrary registers between GDB and inferior. */
120 /* Fetch register REGNUM from the child process. If REGNUM is -1, do
121 this for all registers (including the floating point and SSE
125 amd64_linux_fetch_inferior_registers (struct target_ops *ops,
126 struct regcache *regcache, int regnum)
128 struct gdbarch *gdbarch = get_regcache_arch (regcache);
131 /* GNU/Linux LWP ID's are process ID's. */
132 tid = ptid_get_lwp (inferior_ptid);
134 tid = ptid_get_pid (inferior_ptid); /* Not a threaded program. */
136 if (regnum == -1 || amd64_native_gregset_supplies_p (gdbarch, regnum))
140 if (ptrace (PTRACE_GETREGS, tid, 0, (long) ®s) < 0)
141 perror_with_name (_("Couldn't get registers"));
143 amd64_supply_native_gregset (regcache, ®s, -1);
148 if (regnum == -1 || !amd64_native_gregset_supplies_p (gdbarch, regnum))
150 elf_fpregset_t fpregs;
152 if (have_ptrace_getregset)
154 char xstateregs[I386_XSTATE_MAX_SIZE];
157 iov.iov_base = xstateregs;
158 iov.iov_len = sizeof (xstateregs);
159 if (ptrace (PTRACE_GETREGSET, tid,
160 (unsigned int) NT_X86_XSTATE, (long) &iov) < 0)
161 perror_with_name (_("Couldn't get extended state status"));
163 amd64_supply_xsave (regcache, -1, xstateregs);
167 if (ptrace (PTRACE_GETFPREGS, tid, 0, (long) &fpregs) < 0)
168 perror_with_name (_("Couldn't get floating point status"));
170 amd64_supply_fxsave (regcache, -1, &fpregs);
175 /* Store register REGNUM back into the child process. If REGNUM is
176 -1, do this for all registers (including the floating-point and SSE
180 amd64_linux_store_inferior_registers (struct target_ops *ops,
181 struct regcache *regcache, int regnum)
183 struct gdbarch *gdbarch = get_regcache_arch (regcache);
186 /* GNU/Linux LWP ID's are process ID's. */
187 tid = ptid_get_lwp (inferior_ptid);
189 tid = ptid_get_pid (inferior_ptid); /* Not a threaded program. */
191 if (regnum == -1 || amd64_native_gregset_supplies_p (gdbarch, regnum))
195 if (ptrace (PTRACE_GETREGS, tid, 0, (long) ®s) < 0)
196 perror_with_name (_("Couldn't get registers"));
198 amd64_collect_native_gregset (regcache, ®s, regnum);
200 if (ptrace (PTRACE_SETREGS, tid, 0, (long) ®s) < 0)
201 perror_with_name (_("Couldn't write registers"));
207 if (regnum == -1 || !amd64_native_gregset_supplies_p (gdbarch, regnum))
209 elf_fpregset_t fpregs;
211 if (have_ptrace_getregset)
213 char xstateregs[I386_XSTATE_MAX_SIZE];
216 iov.iov_base = xstateregs;
217 iov.iov_len = sizeof (xstateregs);
218 if (ptrace (PTRACE_GETREGSET, tid,
219 (unsigned int) NT_X86_XSTATE, (long) &iov) < 0)
220 perror_with_name (_("Couldn't get extended state status"));
222 amd64_collect_xsave (regcache, regnum, xstateregs, 0);
224 if (ptrace (PTRACE_SETREGSET, tid,
225 (unsigned int) NT_X86_XSTATE, (long) &iov) < 0)
226 perror_with_name (_("Couldn't write extended state status"));
230 if (ptrace (PTRACE_GETFPREGS, tid, 0, (long) &fpregs) < 0)
231 perror_with_name (_("Couldn't get floating point status"));
233 amd64_collect_fxsave (regcache, regnum, &fpregs);
235 if (ptrace (PTRACE_SETFPREGS, tid, 0, (long) &fpregs) < 0)
236 perror_with_name (_("Couldn't write floating point status"));
242 /* This function is called by libthread_db as part of its handling of
243 a request for a thread's local storage address. */
246 ps_get_thread_area (const struct ps_prochandle *ph,
247 lwpid_t lwpid, int idx, void **base)
249 if (gdbarch_bfd_arch_info (target_gdbarch ())->bits_per_word == 32)
251 unsigned int base_addr;
254 result = x86_linux_get_thread_area (lwpid, (void *) (long) idx,
258 /* Extend the value to 64 bits. Here it's assumed that
259 a "long" and a "void *" are the same. */
260 (*base) = (void *) (long) base_addr;
266 /* This definition comes from prctl.h, but some kernels may not
268 #ifndef PTRACE_ARCH_PRCTL
269 #define PTRACE_ARCH_PRCTL 30
271 /* FIXME: ezannoni-2003-07-09 see comment above about include
272 file order. We could be getting bogus values for these two. */
273 gdb_assert (FS < ELF_NGREG);
274 gdb_assert (GS < ELF_NGREG);
278 #ifdef HAVE_STRUCT_USER_REGS_STRUCT_FS_BASE
280 /* PTRACE_ARCH_PRCTL is obsolete since 2.6.25, where the
281 fs_base and gs_base fields of user_regs_struct can be
285 fs = ptrace (PTRACE_PEEKUSER, lwpid,
286 offsetof (struct user_regs_struct, fs_base), 0);
294 if (ptrace (PTRACE_ARCH_PRCTL, lwpid, base, ARCH_GET_FS) == 0)
298 #ifdef HAVE_STRUCT_USER_REGS_STRUCT_GS_BASE
302 gs = ptrace (PTRACE_PEEKUSER, lwpid,
303 offsetof (struct user_regs_struct, gs_base), 0);
311 if (ptrace (PTRACE_ARCH_PRCTL, lwpid, base, ARCH_GET_GS) == 0)
314 default: /* Should not happen. */
318 return PS_ERR; /* ptrace failed. */
322 /* When GDB is built as a 64-bit application on linux, the
323 PTRACE_GETSIGINFO data is always presented in 64-bit layout. Since
324 debugging a 32-bit inferior with a 64-bit GDB should look the same
325 as debugging it with a 32-bit GDB, we do the 32-bit <-> 64-bit
326 conversion in-place ourselves. */
328 /* These types below (compat_*) define a siginfo type that is layout
329 compatible with the siginfo type exported by the 32-bit userspace
332 typedef int compat_int_t;
333 typedef unsigned int compat_uptr_t;
335 typedef int compat_time_t;
336 typedef int compat_timer_t;
337 typedef int compat_clock_t;
339 struct compat_timeval
341 compat_time_t tv_sec;
345 typedef union compat_sigval
347 compat_int_t sival_int;
348 compat_uptr_t sival_ptr;
351 typedef struct compat_siginfo
359 int _pad[((128 / sizeof (int)) - 3)];
368 /* POSIX.1b timers */
373 compat_sigval_t _sigval;
376 /* POSIX.1b signals */
381 compat_sigval_t _sigval;
390 compat_clock_t _utime;
391 compat_clock_t _stime;
394 /* SIGILL, SIGFPE, SIGSEGV, SIGBUS */
409 /* For x32, clock_t in _sigchld is 64bit aligned at 4 bytes. */
410 typedef struct compat_x32_clock
414 } compat_x32_clock_t;
416 typedef struct compat_x32_siginfo
424 int _pad[((128 / sizeof (int)) - 3)];
433 /* POSIX.1b timers */
438 compat_sigval_t _sigval;
441 /* POSIX.1b signals */
446 compat_sigval_t _sigval;
455 compat_x32_clock_t _utime;
456 compat_x32_clock_t _stime;
459 /* SIGILL, SIGFPE, SIGSEGV, SIGBUS */
472 } compat_x32_siginfo_t;
474 #define cpt_si_pid _sifields._kill._pid
475 #define cpt_si_uid _sifields._kill._uid
476 #define cpt_si_timerid _sifields._timer._tid
477 #define cpt_si_overrun _sifields._timer._overrun
478 #define cpt_si_status _sifields._sigchld._status
479 #define cpt_si_utime _sifields._sigchld._utime
480 #define cpt_si_stime _sifields._sigchld._stime
481 #define cpt_si_ptr _sifields._rt._sigval.sival_ptr
482 #define cpt_si_addr _sifields._sigfault._addr
483 #define cpt_si_band _sifields._sigpoll._band
484 #define cpt_si_fd _sifields._sigpoll._fd
486 /* glibc at least up to 2.3.2 doesn't have si_timerid, si_overrun.
487 In their place is si_timer1,si_timer2. */
489 #define si_timerid si_timer1
492 #define si_overrun si_timer2
496 compat_siginfo_from_siginfo (compat_siginfo_t *to, siginfo_t *from)
498 memset (to, 0, sizeof (*to));
500 to->si_signo = from->si_signo;
501 to->si_errno = from->si_errno;
502 to->si_code = from->si_code;
504 if (to->si_code == SI_TIMER)
506 to->cpt_si_timerid = from->si_timerid;
507 to->cpt_si_overrun = from->si_overrun;
508 to->cpt_si_ptr = (intptr_t) from->si_ptr;
510 else if (to->si_code == SI_USER)
512 to->cpt_si_pid = from->si_pid;
513 to->cpt_si_uid = from->si_uid;
515 else if (to->si_code < 0)
517 to->cpt_si_pid = from->si_pid;
518 to->cpt_si_uid = from->si_uid;
519 to->cpt_si_ptr = (intptr_t) from->si_ptr;
523 switch (to->si_signo)
526 to->cpt_si_pid = from->si_pid;
527 to->cpt_si_uid = from->si_uid;
528 to->cpt_si_status = from->si_status;
529 to->cpt_si_utime = from->si_utime;
530 to->cpt_si_stime = from->si_stime;
536 to->cpt_si_addr = (intptr_t) from->si_addr;
539 to->cpt_si_band = from->si_band;
540 to->cpt_si_fd = from->si_fd;
543 to->cpt_si_pid = from->si_pid;
544 to->cpt_si_uid = from->si_uid;
545 to->cpt_si_ptr = (intptr_t) from->si_ptr;
552 siginfo_from_compat_siginfo (siginfo_t *to, compat_siginfo_t *from)
554 memset (to, 0, sizeof (*to));
556 to->si_signo = from->si_signo;
557 to->si_errno = from->si_errno;
558 to->si_code = from->si_code;
560 if (to->si_code == SI_TIMER)
562 to->si_timerid = from->cpt_si_timerid;
563 to->si_overrun = from->cpt_si_overrun;
564 to->si_ptr = (void *) (intptr_t) from->cpt_si_ptr;
566 else if (to->si_code == SI_USER)
568 to->si_pid = from->cpt_si_pid;
569 to->si_uid = from->cpt_si_uid;
573 to->si_pid = from->cpt_si_pid;
574 to->si_uid = from->cpt_si_uid;
575 to->si_ptr = (void *) (intptr_t) from->cpt_si_ptr;
579 switch (to->si_signo)
582 to->si_pid = from->cpt_si_pid;
583 to->si_uid = from->cpt_si_uid;
584 to->si_status = from->cpt_si_status;
585 to->si_utime = from->cpt_si_utime;
586 to->si_stime = from->cpt_si_stime;
592 to->si_addr = (void *) (intptr_t) from->cpt_si_addr;
595 to->si_band = from->cpt_si_band;
596 to->si_fd = from->cpt_si_fd;
599 to->si_pid = from->cpt_si_pid;
600 to->si_uid = from->cpt_si_uid;
601 to->si_ptr = (void* ) (intptr_t) from->cpt_si_ptr;
608 compat_x32_siginfo_from_siginfo (compat_x32_siginfo_t *to,
611 memset (to, 0, sizeof (*to));
613 to->si_signo = from->si_signo;
614 to->si_errno = from->si_errno;
615 to->si_code = from->si_code;
617 if (to->si_code == SI_TIMER)
619 to->cpt_si_timerid = from->si_timerid;
620 to->cpt_si_overrun = from->si_overrun;
621 to->cpt_si_ptr = (intptr_t) from->si_ptr;
623 else if (to->si_code == SI_USER)
625 to->cpt_si_pid = from->si_pid;
626 to->cpt_si_uid = from->si_uid;
628 else if (to->si_code < 0)
630 to->cpt_si_pid = from->si_pid;
631 to->cpt_si_uid = from->si_uid;
632 to->cpt_si_ptr = (intptr_t) from->si_ptr;
636 switch (to->si_signo)
639 to->cpt_si_pid = from->si_pid;
640 to->cpt_si_uid = from->si_uid;
641 to->cpt_si_status = from->si_status;
642 memcpy (&to->cpt_si_utime, &from->si_utime,
643 sizeof (to->cpt_si_utime));
644 memcpy (&to->cpt_si_stime, &from->si_stime,
645 sizeof (to->cpt_si_stime));
651 to->cpt_si_addr = (intptr_t) from->si_addr;
654 to->cpt_si_band = from->si_band;
655 to->cpt_si_fd = from->si_fd;
658 to->cpt_si_pid = from->si_pid;
659 to->cpt_si_uid = from->si_uid;
660 to->cpt_si_ptr = (intptr_t) from->si_ptr;
667 siginfo_from_compat_x32_siginfo (siginfo_t *to,
668 compat_x32_siginfo_t *from)
670 memset (to, 0, sizeof (*to));
672 to->si_signo = from->si_signo;
673 to->si_errno = from->si_errno;
674 to->si_code = from->si_code;
676 if (to->si_code == SI_TIMER)
678 to->si_timerid = from->cpt_si_timerid;
679 to->si_overrun = from->cpt_si_overrun;
680 to->si_ptr = (void *) (intptr_t) from->cpt_si_ptr;
682 else if (to->si_code == SI_USER)
684 to->si_pid = from->cpt_si_pid;
685 to->si_uid = from->cpt_si_uid;
689 to->si_pid = from->cpt_si_pid;
690 to->si_uid = from->cpt_si_uid;
691 to->si_ptr = (void *) (intptr_t) from->cpt_si_ptr;
695 switch (to->si_signo)
698 to->si_pid = from->cpt_si_pid;
699 to->si_uid = from->cpt_si_uid;
700 to->si_status = from->cpt_si_status;
701 memcpy (&to->si_utime, &from->cpt_si_utime,
702 sizeof (to->si_utime));
703 memcpy (&to->si_stime, &from->cpt_si_stime,
704 sizeof (to->si_stime));
710 to->si_addr = (void *) (intptr_t) from->cpt_si_addr;
713 to->si_band = from->cpt_si_band;
714 to->si_fd = from->cpt_si_fd;
717 to->si_pid = from->cpt_si_pid;
718 to->si_uid = from->cpt_si_uid;
719 to->si_ptr = (void* ) (intptr_t) from->cpt_si_ptr;
725 /* Convert a native/host siginfo object, into/from the siginfo in the
726 layout of the inferiors' architecture. Returns true if any
727 conversion was done; false otherwise. If DIRECTION is 1, then copy
728 from INF to NATIVE. If DIRECTION is 0, copy from NATIVE to
732 amd64_linux_siginfo_fixup (siginfo_t *native, gdb_byte *inf, int direction)
734 struct gdbarch *gdbarch = get_frame_arch (get_current_frame ());
736 /* Is the inferior 32-bit? If so, then do fixup the siginfo
738 if (gdbarch_bfd_arch_info (gdbarch)->bits_per_word == 32)
740 gdb_assert (sizeof (siginfo_t) == sizeof (compat_siginfo_t));
743 compat_siginfo_from_siginfo ((struct compat_siginfo *) inf, native);
745 siginfo_from_compat_siginfo (native, (struct compat_siginfo *) inf);
749 /* No fixup for native x32 GDB. */
750 else if (gdbarch_addr_bit (gdbarch) == 32 && sizeof (void *) == 8)
752 gdb_assert (sizeof (siginfo_t) == sizeof (compat_x32_siginfo_t));
755 compat_x32_siginfo_from_siginfo ((struct compat_x32_siginfo *) inf,
758 siginfo_from_compat_x32_siginfo (native,
759 (struct compat_x32_siginfo *) inf);
768 /* Provide a prototype to silence -Wmissing-prototypes. */
769 void _initialize_amd64_linux_nat (void);
772 _initialize_amd64_linux_nat (void)
774 struct target_ops *t;
776 amd64_native_gregset32_reg_offset = amd64_linux_gregset32_reg_offset;
777 amd64_native_gregset32_num_regs = I386_LINUX_NUM_REGS;
778 amd64_native_gregset64_reg_offset = amd64_linux_gregset_reg_offset;
779 amd64_native_gregset64_num_regs = AMD64_LINUX_NUM_REGS;
781 gdb_assert (ARRAY_SIZE (amd64_linux_gregset32_reg_offset)
782 == amd64_native_gregset32_num_regs);
784 /* Create a generic x86 GNU/Linux target. */
785 t = x86_linux_create_target ();
787 /* Add our register access methods. */
788 t->to_fetch_registers = amd64_linux_fetch_inferior_registers;
789 t->to_store_registers = amd64_linux_store_inferior_registers;
791 /* Add the target. */
792 x86_linux_add_target (t);
794 /* Add our siginfo layout converter. */
795 linux_nat_set_siginfo_fixup (t, amd64_linux_siginfo_fixup);