gdb/
[deliverable/binutils-gdb.git] / gdb / amd64-linux-nat.c
CommitLineData
a4b6fc86 1/* Native-dependent code for GNU/Linux x86-64.
0a65a603 2
7b6bb8da
JB
3 Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010,
4 2011 Free Software Foundation, Inc.
53e95fcf
JS
5 Contributed by Jiri Smid, SuSE Labs.
6
7 This file is part of GDB.
8
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
a9762ec7 11 the Free Software Foundation; either version 3 of the License, or
53e95fcf
JS
12 (at your option) any later version.
13
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.
18
19 You should have received a copy of the GNU General Public License
a9762ec7 20 along with this program. If not, see <http://www.gnu.org/licenses/>. */
53e95fcf
JS
21
22#include "defs.h"
23#include "inferior.h"
24#include "gdbcore.h"
25#include "regcache.h"
a055a187 26#include "regset.h"
4056d258 27#include "linux-nat.h"
8695c747 28#include "amd64-linux-tdep.h"
c4f35dd8 29
53e95fcf 30#include "gdb_assert.h"
30d52491 31#include "gdb_string.h"
a055a187
L
32#include "elf/common.h"
33#include <sys/uio.h>
53e95fcf
JS
34#include <sys/ptrace.h>
35#include <sys/debugreg.h>
36#include <sys/syscall.h>
37#include <sys/procfs.h>
c43af07c
EZ
38#include <asm/prctl.h>
39/* FIXME ezannoni-2003-07-09: we need <sys/reg.h> to be included after
40 <asm/ptrace.h> because the latter redefines FS and GS for no apparent
41 reason, and those definitions don't match the ones that libpthread_db
42 uses, which come from <sys/reg.h>. */
0963b4bd 43/* ezannoni-2003-07-09: I think this is fixed. The extraneous defs have
c43af07c
EZ
44 been removed from ptrace.h in the kernel. However, better safe than
45 sorry. */
46#include <asm/ptrace.h>
33a0a2ac 47#include <sys/reg.h>
c43af07c 48#include "gdb_proc_service.h"
33a0a2ac 49
c4f35dd8
MK
50/* Prototypes for supply_gregset etc. */
51#include "gregset.h"
52
9c1488cb 53#include "amd64-tdep.h"
60fac5b8
MK
54#include "i386-linux-tdep.h"
55#include "amd64-nat.h"
9bb9e8ad 56#include "i386-nat.h"
a055a187
L
57#include "i386-xstate.h"
58
59#ifndef PTRACE_GETREGSET
60#define PTRACE_GETREGSET 0x4204
61#endif
62
63#ifndef PTRACE_SETREGSET
64#define PTRACE_SETREGSET 0x4205
65#endif
66
67/* Does the current host support PTRACE_GETREGSET? */
68static int have_ptrace_getregset = -1;
60fac5b8 69
60fac5b8
MK
70/* Mapping between the general-purpose registers in GNU/Linux x86-64
71 `struct user' format and GDB's register cache layout for GNU/Linux
72 i386.
73
74 Note that most GNU/Linux x86-64 registers are 64-bit, while the
75 GNU/Linux i386 registers are all 32-bit, but since we're
76 little-endian we get away with that. */
77
78/* From <sys/reg.h> on GNU/Linux i386. */
430eaf2e 79static int amd64_linux_gregset32_reg_offset[] =
60fac5b8 80{
f5859b4d
MK
81 RAX * 8, RCX * 8, /* %eax, %ecx */
82 RDX * 8, RBX * 8, /* %edx, %ebx */
83 RSP * 8, RBP * 8, /* %esp, %ebp */
84 RSI * 8, RDI * 8, /* %esi, %edi */
85 RIP * 8, EFLAGS * 8, /* %eip, %eflags */
86 CS * 8, SS * 8, /* %cs, %ss */
87 DS * 8, ES * 8, /* %ds, %es */
88 FS * 8, GS * 8, /* %fs, %gs */
60fac5b8
MK
89 -1, -1, -1, -1, -1, -1, -1, -1,
90 -1, -1, -1, -1, -1, -1, -1, -1,
91 -1, -1, -1, -1, -1, -1, -1, -1, -1,
a055a187 92 -1, -1, -1, -1, -1, -1, -1, -1,
f5859b4d 93 ORIG_RAX * 8 /* "orig_eax" */
60fac5b8 94};
53e95fcf
JS
95\f
96
97/* Transfering the general-purpose registers between GDB, inferiors
98 and core files. */
99
60fac5b8 100/* Fill GDB's register cache with the general-purpose register values
53e95fcf
JS
101 in *GREGSETP. */
102
103void
7f7fe91e 104supply_gregset (struct regcache *regcache, const elf_gregset_t *gregsetp)
53e95fcf 105{
7f7fe91e 106 amd64_supply_native_gregset (regcache, gregsetp, -1);
53e95fcf
JS
107}
108
60fac5b8
MK
109/* Fill register REGNUM (if it is a general-purpose register) in
110 *GREGSETP with the value in GDB's register cache. If REGNUM is -1,
53e95fcf
JS
111 do this for all registers. */
112
113void
7f7fe91e
UW
114fill_gregset (const struct regcache *regcache,
115 elf_gregset_t *gregsetp, int regnum)
53e95fcf 116{
7f7fe91e 117 amd64_collect_native_gregset (regcache, gregsetp, regnum);
53e95fcf
JS
118}
119
53e95fcf
JS
120/* Transfering floating-point registers between GDB, inferiors and cores. */
121
60fac5b8 122/* Fill GDB's register cache with the floating-point and SSE register
c4f35dd8 123 values in *FPREGSETP. */
53e95fcf
JS
124
125void
7f7fe91e 126supply_fpregset (struct regcache *regcache, const elf_fpregset_t *fpregsetp)
53e95fcf 127{
7f7fe91e 128 amd64_supply_fxsave (regcache, -1, fpregsetp);
53e95fcf
JS
129}
130
8dda9770 131/* Fill register REGNUM (if it is a floating-point or SSE register) in
60fac5b8 132 *FPREGSETP with the value in GDB's register cache. If REGNUM is
c4f35dd8 133 -1, do this for all registers. */
53e95fcf
JS
134
135void
7f7fe91e
UW
136fill_fpregset (const struct regcache *regcache,
137 elf_fpregset_t *fpregsetp, int regnum)
53e95fcf 138{
7f7fe91e 139 amd64_collect_fxsave (regcache, regnum, fpregsetp);
53e95fcf 140}
53e95fcf
JS
141\f
142
143/* Transferring arbitrary registers between GDB and inferior. */
144
60fac5b8 145/* Fetch register REGNUM from the child process. If REGNUM is -1, do
53e95fcf
JS
146 this for all registers (including the floating point and SSE
147 registers). */
148
10d6c8cd 149static void
28439f5e
PA
150amd64_linux_fetch_inferior_registers (struct target_ops *ops,
151 struct regcache *regcache, int regnum)
53e95fcf 152{
f8028488 153 struct gdbarch *gdbarch = get_regcache_arch (regcache);
53e95fcf
JS
154 int tid;
155
a4b6fc86 156 /* GNU/Linux LWP ID's are process ID's. */
c4f35dd8
MK
157 tid = TIDGET (inferior_ptid);
158 if (tid == 0)
159 tid = PIDGET (inferior_ptid); /* Not a threaded program. */
53e95fcf 160
f8028488 161 if (regnum == -1 || amd64_native_gregset_supplies_p (gdbarch, regnum))
53e95fcf 162 {
99679982
MK
163 elf_gregset_t regs;
164
165 if (ptrace (PTRACE_GETREGS, tid, 0, (long) &regs) < 0)
edefbb7c 166 perror_with_name (_("Couldn't get registers"));
99679982 167
56be3814 168 amd64_supply_native_gregset (regcache, &regs, -1);
60fac5b8
MK
169 if (regnum != -1)
170 return;
53e95fcf
JS
171 }
172
f8028488 173 if (regnum == -1 || !amd64_native_gregset_supplies_p (gdbarch, regnum))
53e95fcf 174 {
99679982 175 elf_fpregset_t fpregs;
53e95fcf 176
a055a187
L
177 if (have_ptrace_getregset)
178 {
179 char xstateregs[I386_XSTATE_MAX_SIZE];
180 struct iovec iov;
181
182 iov.iov_base = xstateregs;
183 iov.iov_len = sizeof (xstateregs);
184 if (ptrace (PTRACE_GETREGSET, tid,
185 (unsigned int) NT_X86_XSTATE, (long) &iov) < 0)
186 perror_with_name (_("Couldn't get extended state status"));
99679982 187
a055a187
L
188 amd64_supply_xsave (regcache, -1, xstateregs);
189 }
190 else
191 {
192 if (ptrace (PTRACE_GETFPREGS, tid, 0, (long) &fpregs) < 0)
193 perror_with_name (_("Couldn't get floating point status"));
194
195 amd64_supply_fxsave (regcache, -1, &fpregs);
196 }
99679982 197 }
53e95fcf
JS
198}
199
60fac5b8
MK
200/* Store register REGNUM back into the child process. If REGNUM is
201 -1, do this for all registers (including the floating-point and SSE
53e95fcf 202 registers). */
c4f35dd8 203
10d6c8cd 204static void
28439f5e
PA
205amd64_linux_store_inferior_registers (struct target_ops *ops,
206 struct regcache *regcache, int regnum)
53e95fcf 207{
f8028488 208 struct gdbarch *gdbarch = get_regcache_arch (regcache);
53e95fcf
JS
209 int tid;
210
a4b6fc86 211 /* GNU/Linux LWP ID's are process ID's. */
c4f35dd8
MK
212 tid = TIDGET (inferior_ptid);
213 if (tid == 0)
214 tid = PIDGET (inferior_ptid); /* Not a threaded program. */
53e95fcf 215
f8028488 216 if (regnum == -1 || amd64_native_gregset_supplies_p (gdbarch, regnum))
53e95fcf 217 {
99679982
MK
218 elf_gregset_t regs;
219
220 if (ptrace (PTRACE_GETREGS, tid, 0, (long) &regs) < 0)
edefbb7c 221 perror_with_name (_("Couldn't get registers"));
99679982 222
56be3814 223 amd64_collect_native_gregset (regcache, &regs, regnum);
99679982
MK
224
225 if (ptrace (PTRACE_SETREGS, tid, 0, (long) &regs) < 0)
edefbb7c 226 perror_with_name (_("Couldn't write registers"));
99679982 227
60fac5b8
MK
228 if (regnum != -1)
229 return;
53e95fcf
JS
230 }
231
f8028488 232 if (regnum == -1 || !amd64_native_gregset_supplies_p (gdbarch, regnum))
53e95fcf 233 {
99679982
MK
234 elf_fpregset_t fpregs;
235
a055a187
L
236 if (have_ptrace_getregset)
237 {
238 char xstateregs[I386_XSTATE_MAX_SIZE];
239 struct iovec iov;
240
241 iov.iov_base = xstateregs;
242 iov.iov_len = sizeof (xstateregs);
243 if (ptrace (PTRACE_GETREGSET, tid,
244 (unsigned int) NT_X86_XSTATE, (long) &iov) < 0)
245 perror_with_name (_("Couldn't get extended state status"));
99679982 246
a055a187
L
247 amd64_collect_xsave (regcache, regnum, xstateregs, 0);
248
249 if (ptrace (PTRACE_SETREGSET, tid,
250 (unsigned int) NT_X86_XSTATE, (long) &iov) < 0)
251 perror_with_name (_("Couldn't write extended state status"));
252 }
253 else
254 {
255 if (ptrace (PTRACE_GETFPREGS, tid, 0, (long) &fpregs) < 0)
256 perror_with_name (_("Couldn't get floating point status"));
99679982 257
a055a187 258 amd64_collect_fxsave (regcache, regnum, &fpregs);
99679982 259
a055a187
L
260 if (ptrace (PTRACE_SETFPREGS, tid, 0, (long) &fpregs) < 0)
261 perror_with_name (_("Couldn't write floating point status"));
262 }
53e95fcf 263 }
53e95fcf
JS
264}
265\f
9f0bdab8
DJ
266/* Support for debug registers. */
267
268static unsigned long amd64_linux_dr[DR_CONTROL + 1];
53e95fcf 269
c4f35dd8 270static unsigned long
9f0bdab8 271amd64_linux_dr_get (ptid_t ptid, int regnum)
c4f35dd8
MK
272{
273 int tid;
274 unsigned long value;
53e95fcf 275
9f0bdab8
DJ
276 tid = TIDGET (ptid);
277 if (tid == 0)
278 tid = PIDGET (ptid);
53e95fcf 279
c4f35dd8
MK
280 /* FIXME: kettenis/2001-03-27: Calling perror_with_name if the
281 ptrace call fails breaks debugging remote targets. The correct
282 way to fix this is to add the hardware breakpoint and watchpoint
9f0bdab8 283 stuff to the target vector. For now, just return zero if the
c4f35dd8
MK
284 ptrace call fails. */
285 errno = 0;
9f0bdab8 286 value = ptrace (PTRACE_PEEKUSER, tid,
c4f35dd8
MK
287 offsetof (struct user, u_debugreg[regnum]), 0);
288 if (errno != 0)
289#if 0
edefbb7c 290 perror_with_name (_("Couldn't read debug register"));
c4f35dd8
MK
291#else
292 return 0;
53e95fcf
JS
293#endif
294
c4f35dd8
MK
295 return value;
296}
53e95fcf 297
a79d3c27
JK
298/* Set debug register REGNUM to VALUE in only the one LWP of PTID. */
299
53e95fcf 300static void
9f0bdab8 301amd64_linux_dr_set (ptid_t ptid, int regnum, unsigned long value)
53e95fcf 302{
c4f35dd8 303 int tid;
53e95fcf 304
9f0bdab8
DJ
305 tid = TIDGET (ptid);
306 if (tid == 0)
307 tid = PIDGET (ptid);
53e95fcf 308
c4f35dd8 309 errno = 0;
9f0bdab8
DJ
310 ptrace (PTRACE_POKEUSER, tid,
311 offsetof (struct user, u_debugreg[regnum]), value);
c4f35dd8 312 if (errno != 0)
edefbb7c 313 perror_with_name (_("Couldn't write debug register"));
c4f35dd8 314}
53e95fcf 315
a79d3c27
JK
316/* Set DR_CONTROL to ADDR in all LWPs of LWP_LIST. */
317
9bb9e8ad 318static void
430eaf2e 319amd64_linux_dr_set_control (unsigned long control)
c4f35dd8 320{
9f0bdab8 321 struct lwp_info *lp;
9f0bdab8
DJ
322
323 amd64_linux_dr[DR_CONTROL] = control;
4c38200f
PA
324 ALL_LWPS (lp)
325 amd64_linux_dr_set (lp->ptid, DR_CONTROL, control);
c4f35dd8 326}
53e95fcf 327
a79d3c27
JK
328/* Set address REGNUM (zero based) to ADDR in all LWPs of LWP_LIST. */
329
9bb9e8ad 330static void
430eaf2e 331amd64_linux_dr_set_addr (int regnum, CORE_ADDR addr)
b7c4cbf8 332{
9f0bdab8 333 struct lwp_info *lp;
9f0bdab8 334
c4f35dd8
MK
335 gdb_assert (regnum >= 0 && regnum <= DR_LASTADDR - DR_FIRSTADDR);
336
9f0bdab8 337 amd64_linux_dr[DR_FIRSTADDR + regnum] = addr;
4c38200f
PA
338 ALL_LWPS (lp)
339 amd64_linux_dr_set (lp->ptid, DR_FIRSTADDR + regnum, addr);
b7c4cbf8
AJ
340}
341
a79d3c27
JK
342/* Set address REGNUM (zero based) to zero in all LWPs of LWP_LIST. */
343
9bb9e8ad 344static void
430eaf2e 345amd64_linux_dr_reset_addr (int regnum)
53e95fcf 346{
9f0bdab8 347 amd64_linux_dr_set_addr (regnum, 0);
53e95fcf 348}
8cfda98c 349
a79d3c27
JK
350/* Get DR_STATUS from only the one LWP of INFERIOR_PTID. */
351
9bb9e8ad 352static unsigned long
430eaf2e 353amd64_linux_dr_get_status (void)
8cfda98c 354{
9f0bdab8
DJ
355 return amd64_linux_dr_get (inferior_ptid, DR_STATUS);
356}
357
a79d3c27
JK
358/* Unset MASK bits in DR_STATUS in all LWPs of LWP_LIST. */
359
360static void
361amd64_linux_dr_unset_status (unsigned long mask)
362{
363 struct lwp_info *lp;
a79d3c27 364
4c38200f 365 ALL_LWPS (lp)
a79d3c27
JK
366 {
367 unsigned long value;
368
4c38200f 369 value = amd64_linux_dr_get (lp->ptid, DR_STATUS);
a79d3c27 370 value &= ~mask;
4c38200f 371 amd64_linux_dr_set (lp->ptid, DR_STATUS, value);
a79d3c27
JK
372 }
373}
374
375
9f0bdab8
DJ
376static void
377amd64_linux_new_thread (ptid_t ptid)
378{
379 int i;
380
381 for (i = DR_FIRSTADDR; i <= DR_LASTADDR; i++)
382 amd64_linux_dr_set (ptid, i, amd64_linux_dr[i]);
383
384 amd64_linux_dr_set (ptid, DR_CONTROL, amd64_linux_dr[DR_CONTROL]);
8cfda98c 385}
5bca7895 386\f
c43af07c 387
50d71875
AC
388/* This function is called by libthread_db as part of its handling of
389 a request for a thread's local storage address. */
390
5bca7895 391ps_err_e
c43af07c
EZ
392ps_get_thread_area (const struct ps_prochandle *ph,
393 lwpid_t lwpid, int idx, void **base)
394{
a97b0ac8 395 if (gdbarch_ptr_bit (target_gdbarch) == 32)
50d71875
AC
396 {
397 /* The full structure is found in <asm-i386/ldt.h>. The second
398 integer is the LDT's base_address and that is used to locate
399 the thread's local storage. See i386-linux-nat.c more
400 info. */
401 unsigned int desc[4];
402
403 /* This code assumes that "int" is 32 bits and that
404 GET_THREAD_AREA returns no more than 4 int values. */
405 gdb_assert (sizeof (int) == 4);
406#ifndef PTRACE_GET_THREAD_AREA
407#define PTRACE_GET_THREAD_AREA 25
408#endif
409 if (ptrace (PTRACE_GET_THREAD_AREA,
410 lwpid, (void *) (long) idx, (unsigned long) &desc) < 0)
411 return PS_ERR;
412
413 /* Extend the value to 64 bits. Here it's assumed that a "long"
414 and a "void *" are the same. */
415 (*base) = (void *) (long) desc[1];
416 return PS_OK;
417 }
418 else
419 {
420 /* This definition comes from prctl.h, but some kernels may not
421 have it. */
c43af07c
EZ
422#ifndef PTRACE_ARCH_PRCTL
423#define PTRACE_ARCH_PRCTL 30
424#endif
50d71875
AC
425 /* FIXME: ezannoni-2003-07-09 see comment above about include
426 file order. We could be getting bogus values for these two. */
427 gdb_assert (FS < ELF_NGREG);
428 gdb_assert (GS < ELF_NGREG);
429 switch (idx)
430 {
431 case FS:
432 if (ptrace (PTRACE_ARCH_PRCTL, lwpid, base, ARCH_GET_FS) == 0)
433 return PS_OK;
434 break;
435 case GS:
436 if (ptrace (PTRACE_ARCH_PRCTL, lwpid, base, ARCH_GET_GS) == 0)
437 return PS_OK;
438 break;
439 default: /* Should not happen. */
440 return PS_BADADDR;
441 }
c43af07c 442 }
b6d42148 443 return PS_ERR; /* ptrace failed. */
c43af07c 444}
5bca7895 445\f
c43af07c 446
10d6c8cd
DJ
447static void (*super_post_startup_inferior) (ptid_t ptid);
448
449static void
450amd64_linux_child_post_startup_inferior (ptid_t ptid)
4056d258
ML
451{
452 i386_cleanup_dregs ();
10d6c8cd 453 super_post_startup_inferior (ptid);
4056d258 454}
60fac5b8
MK
455\f
456
5b009018
PA
457/* When GDB is built as a 64-bit application on linux, the
458 PTRACE_GETSIGINFO data is always presented in 64-bit layout. Since
459 debugging a 32-bit inferior with a 64-bit GDB should look the same
460 as debugging it with a 32-bit GDB, we do the 32-bit <-> 64-bit
461 conversion in-place ourselves. */
462
463/* These types below (compat_*) define a siginfo type that is layout
464 compatible with the siginfo type exported by the 32-bit userspace
465 support. */
466
467typedef int compat_int_t;
468typedef unsigned int compat_uptr_t;
469
470typedef int compat_time_t;
471typedef int compat_timer_t;
472typedef int compat_clock_t;
473
474struct compat_timeval
475{
476 compat_time_t tv_sec;
477 int tv_usec;
478};
479
480typedef union compat_sigval
481{
482 compat_int_t sival_int;
483 compat_uptr_t sival_ptr;
484} compat_sigval_t;
485
486typedef struct compat_siginfo
487{
488 int si_signo;
489 int si_errno;
490 int si_code;
491
492 union
493 {
494 int _pad[((128 / sizeof (int)) - 3)];
495
496 /* kill() */
497 struct
498 {
499 unsigned int _pid;
500 unsigned int _uid;
501 } _kill;
502
503 /* POSIX.1b timers */
504 struct
505 {
506 compat_timer_t _tid;
507 int _overrun;
508 compat_sigval_t _sigval;
509 } _timer;
510
511 /* POSIX.1b signals */
512 struct
513 {
514 unsigned int _pid;
515 unsigned int _uid;
516 compat_sigval_t _sigval;
517 } _rt;
518
519 /* SIGCHLD */
520 struct
521 {
522 unsigned int _pid;
523 unsigned int _uid;
524 int _status;
525 compat_clock_t _utime;
526 compat_clock_t _stime;
527 } _sigchld;
528
529 /* SIGILL, SIGFPE, SIGSEGV, SIGBUS */
530 struct
531 {
532 unsigned int _addr;
533 } _sigfault;
534
535 /* SIGPOLL */
536 struct
537 {
538 int _band;
539 int _fd;
540 } _sigpoll;
541 } _sifields;
542} compat_siginfo_t;
543
544#define cpt_si_pid _sifields._kill._pid
545#define cpt_si_uid _sifields._kill._uid
546#define cpt_si_timerid _sifields._timer._tid
547#define cpt_si_overrun _sifields._timer._overrun
548#define cpt_si_status _sifields._sigchld._status
549#define cpt_si_utime _sifields._sigchld._utime
550#define cpt_si_stime _sifields._sigchld._stime
551#define cpt_si_ptr _sifields._rt._sigval.sival_ptr
552#define cpt_si_addr _sifields._sigfault._addr
553#define cpt_si_band _sifields._sigpoll._band
554#define cpt_si_fd _sifields._sigpoll._fd
555
14064aa2
DE
556/* glibc at least up to 2.3.2 doesn't have si_timerid, si_overrun.
557 In their place is si_timer1,si_timer2. */
558#ifndef si_timerid
559#define si_timerid si_timer1
560#endif
561#ifndef si_overrun
562#define si_overrun si_timer2
563#endif
564
5b009018
PA
565static void
566compat_siginfo_from_siginfo (compat_siginfo_t *to, siginfo_t *from)
567{
568 memset (to, 0, sizeof (*to));
569
570 to->si_signo = from->si_signo;
571 to->si_errno = from->si_errno;
572 to->si_code = from->si_code;
573
b53a1623 574 if (to->si_code == SI_TIMER)
5b009018 575 {
b53a1623
PA
576 to->cpt_si_timerid = from->si_timerid;
577 to->cpt_si_overrun = from->si_overrun;
5b009018
PA
578 to->cpt_si_ptr = (intptr_t) from->si_ptr;
579 }
580 else if (to->si_code == SI_USER)
581 {
582 to->cpt_si_pid = from->si_pid;
583 to->cpt_si_uid = from->si_uid;
584 }
b53a1623 585 else if (to->si_code < 0)
5b009018 586 {
b53a1623
PA
587 to->cpt_si_pid = from->si_pid;
588 to->cpt_si_uid = from->si_uid;
5b009018
PA
589 to->cpt_si_ptr = (intptr_t) from->si_ptr;
590 }
591 else
592 {
593 switch (to->si_signo)
594 {
595 case SIGCHLD:
596 to->cpt_si_pid = from->si_pid;
597 to->cpt_si_uid = from->si_uid;
598 to->cpt_si_status = from->si_status;
599 to->cpt_si_utime = from->si_utime;
600 to->cpt_si_stime = from->si_stime;
601 break;
602 case SIGILL:
603 case SIGFPE:
604 case SIGSEGV:
605 case SIGBUS:
606 to->cpt_si_addr = (intptr_t) from->si_addr;
607 break;
608 case SIGPOLL:
609 to->cpt_si_band = from->si_band;
610 to->cpt_si_fd = from->si_fd;
611 break;
612 default:
613 to->cpt_si_pid = from->si_pid;
614 to->cpt_si_uid = from->si_uid;
615 to->cpt_si_ptr = (intptr_t) from->si_ptr;
616 break;
617 }
618 }
619}
620
621static void
622siginfo_from_compat_siginfo (siginfo_t *to, compat_siginfo_t *from)
623{
624 memset (to, 0, sizeof (*to));
625
626 to->si_signo = from->si_signo;
627 to->si_errno = from->si_errno;
628 to->si_code = from->si_code;
629
b53a1623 630 if (to->si_code == SI_TIMER)
5b009018 631 {
b53a1623
PA
632 to->si_timerid = from->cpt_si_timerid;
633 to->si_overrun = from->cpt_si_overrun;
5b009018
PA
634 to->si_ptr = (void *) (intptr_t) from->cpt_si_ptr;
635 }
636 else if (to->si_code == SI_USER)
637 {
638 to->si_pid = from->cpt_si_pid;
639 to->si_uid = from->cpt_si_uid;
640 }
b53a1623 641 if (to->si_code < 0)
5b009018 642 {
b53a1623
PA
643 to->si_pid = from->cpt_si_pid;
644 to->si_uid = from->cpt_si_uid;
5b009018
PA
645 to->si_ptr = (void *) (intptr_t) from->cpt_si_ptr;
646 }
647 else
648 {
649 switch (to->si_signo)
650 {
651 case SIGCHLD:
652 to->si_pid = from->cpt_si_pid;
653 to->si_uid = from->cpt_si_uid;
654 to->si_status = from->cpt_si_status;
655 to->si_utime = from->cpt_si_utime;
656 to->si_stime = from->cpt_si_stime;
657 break;
658 case SIGILL:
659 case SIGFPE:
660 case SIGSEGV:
661 case SIGBUS:
662 to->si_addr = (void *) (intptr_t) from->cpt_si_addr;
663 break;
664 case SIGPOLL:
665 to->si_band = from->cpt_si_band;
666 to->si_fd = from->cpt_si_fd;
667 break;
668 default:
669 to->si_pid = from->cpt_si_pid;
670 to->si_uid = from->cpt_si_uid;
671 to->si_ptr = (void* ) (intptr_t) from->cpt_si_ptr;
672 break;
673 }
674 }
675}
676
677/* Convert a native/host siginfo object, into/from the siginfo in the
678 layout of the inferiors' architecture. Returns true if any
679 conversion was done; false otherwise. If DIRECTION is 1, then copy
680 from INF to NATIVE. If DIRECTION is 0, copy from NATIVE to
681 INF. */
682
683static int
684amd64_linux_siginfo_fixup (struct siginfo *native, gdb_byte *inf, int direction)
685{
686 /* Is the inferior 32-bit? If so, then do fixup the siginfo
687 object. */
688 if (gdbarch_addr_bit (get_frame_arch (get_current_frame ())) == 32)
689 {
690 gdb_assert (sizeof (struct siginfo) == sizeof (compat_siginfo_t));
691
692 if (direction == 0)
693 compat_siginfo_from_siginfo ((struct compat_siginfo *) inf, native);
694 else
695 siginfo_from_compat_siginfo (native, (struct compat_siginfo *) inf);
696
697 return 1;
698 }
699 else
700 return 0;
701}
702
90884b2b
L
703/* Get Linux/x86 target description from running target.
704
705 Value of CS segment register:
706 1. 64bit process: 0x33.
707 2. 32bit process: 0x23.
708 */
709
710#define AMD64_LINUX_USER64_CS 0x33
711
712static const struct target_desc *
713amd64_linux_read_description (struct target_ops *ops)
714{
715 unsigned long cs;
716 int tid;
a055a187
L
717 int is_64bit;
718 static uint64_t xcr0;
90884b2b
L
719
720 /* GNU/Linux LWP ID's are process ID's. */
721 tid = TIDGET (inferior_ptid);
722 if (tid == 0)
723 tid = PIDGET (inferior_ptid); /* Not a threaded program. */
724
725 /* Get CS register. */
726 errno = 0;
727 cs = ptrace (PTRACE_PEEKUSER, tid,
728 offsetof (struct user_regs_struct, cs), 0);
729 if (errno != 0)
730 perror_with_name (_("Couldn't get CS register"));
731
a055a187
L
732 is_64bit = cs == AMD64_LINUX_USER64_CS;
733
734 if (have_ptrace_getregset == -1)
735 {
736 uint64_t xstateregs[(I386_XSTATE_SSE_SIZE / sizeof (uint64_t))];
737 struct iovec iov;
738
739 iov.iov_base = xstateregs;
740 iov.iov_len = sizeof (xstateregs);
741
742 /* Check if PTRACE_GETREGSET works. */
743 if (ptrace (PTRACE_GETREGSET, tid,
744 (unsigned int) NT_X86_XSTATE, (long) &iov) < 0)
745 have_ptrace_getregset = 0;
746 else
747 {
748 have_ptrace_getregset = 1;
749
750 /* Get XCR0 from XSAVE extended state. */
751 xcr0 = xstateregs[(I386_LINUX_XSAVE_XCR0_OFFSET
752 / sizeof (uint64_t))];
753 }
754 }
755
756 /* Check the native XCR0 only if PTRACE_GETREGSET is available. */
757 if (have_ptrace_getregset
758 && (xcr0 & I386_XSTATE_AVX_MASK) == I386_XSTATE_AVX_MASK)
759 {
760 if (is_64bit)
761 return tdesc_amd64_avx_linux;
762 else
763 return tdesc_i386_avx_linux;
764 }
90884b2b 765 else
a055a187
L
766 {
767 if (is_64bit)
768 return tdesc_amd64_linux;
769 else
770 return tdesc_i386_linux;
771 }
90884b2b
L
772}
773
60fac5b8 774/* Provide a prototype to silence -Wmissing-prototypes. */
430eaf2e 775void _initialize_amd64_linux_nat (void);
60fac5b8
MK
776
777void
430eaf2e 778_initialize_amd64_linux_nat (void)
60fac5b8 779{
10d6c8cd
DJ
780 struct target_ops *t;
781
430eaf2e 782 amd64_native_gregset32_reg_offset = amd64_linux_gregset32_reg_offset;
60fac5b8 783 amd64_native_gregset32_num_regs = I386_LINUX_NUM_REGS;
6cd6a2ae 784 amd64_native_gregset64_reg_offset = amd64_linux_gregset_reg_offset;
8695c747 785 amd64_native_gregset64_num_regs = AMD64_LINUX_NUM_REGS;
60fac5b8 786
430eaf2e 787 gdb_assert (ARRAY_SIZE (amd64_linux_gregset32_reg_offset)
60fac5b8 788 == amd64_native_gregset32_num_regs);
10d6c8cd
DJ
789
790 /* Fill in the generic GNU/Linux methods. */
791 t = linux_target ();
792
c03374d5
DJ
793 i386_use_watchpoints (t);
794
9bb9e8ad
PM
795 i386_dr_low.set_control = amd64_linux_dr_set_control;
796 i386_dr_low.set_addr = amd64_linux_dr_set_addr;
797 i386_dr_low.reset_addr = amd64_linux_dr_reset_addr;
798 i386_dr_low.get_status = amd64_linux_dr_get_status;
a79d3c27 799 i386_dr_low.unset_status = amd64_linux_dr_unset_status;
9bb9e8ad
PM
800 i386_set_debug_register_length (8);
801
10d6c8cd
DJ
802 /* Override the GNU/Linux inferior startup hook. */
803 super_post_startup_inferior = t->to_post_startup_inferior;
804 t->to_post_startup_inferior = amd64_linux_child_post_startup_inferior;
805
806 /* Add our register access methods. */
807 t->to_fetch_registers = amd64_linux_fetch_inferior_registers;
808 t->to_store_registers = amd64_linux_store_inferior_registers;
809
90884b2b
L
810 t->to_read_description = amd64_linux_read_description;
811
10d6c8cd 812 /* Register the target. */
f973ed9c 813 linux_nat_add_target (t);
9f0bdab8 814 linux_nat_set_new_thread (t, amd64_linux_new_thread);
5b009018 815 linux_nat_set_siginfo_fixup (t, amd64_linux_siginfo_fixup);
60fac5b8 816}
This page took 0.728732 seconds and 4 git commands to generate.