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