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