X-Git-Url: http://git.efficios.com/?a=blobdiff_plain;f=gdb%2Fi386-linux-nat.c;h=b08470f3058661807a50594f4fbe210405a6cc24;hb=a102602bc56e418f9794d653ef103a65f08a5a49;hp=31b9086f465b43c81f924667a0ca8f8a859c067b;hpb=90884b2b1f853f181e4d0c80c99a516b2bf3d85c;p=deliverable%2Fbinutils-gdb.git diff --git a/gdb/i386-linux-nat.c b/gdb/i386-linux-nat.c index 31b9086f46..b08470f305 100644 --- a/gdb/i386-linux-nat.c +++ b/gdb/i386-linux-nat.c @@ -1,7 +1,6 @@ /* Native-dependent code for GNU/Linux i386. - Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, - 2009, 2010 Free Software Foundation, Inc. + Copyright (C) 1999-2017 Free Software Foundation, Inc. This file is part of GDB. @@ -19,57 +18,25 @@ along with this program. If not, see . */ #include "defs.h" -#include "i386-nat.h" #include "inferior.h" #include "gdbcore.h" #include "regcache.h" -#include "target.h" -#include "linux-nat.h" - -#include "gdb_assert.h" -#include "gdb_string.h" -#include -#include -#include - -#ifdef HAVE_SYS_REG_H -#include -#endif - -#ifndef ORIG_EAX -#define ORIG_EAX -1 -#endif - -#ifdef HAVE_SYS_DEBUGREG_H -#include -#endif - -#ifndef DR_FIRSTADDR -#define DR_FIRSTADDR 0 -#endif - -#ifndef DR_LASTADDR -#define DR_LASTADDR 3 -#endif - -#ifndef DR_STATUS -#define DR_STATUS 6 -#endif - -#ifndef DR_CONTROL -#define DR_CONTROL 7 -#endif - -/* Prototypes for supply_gregset etc. */ +#include "elf/common.h" +#include "nat/gdb_ptrace.h" +#include #include "gregset.h" +#include "gdb_proc_service.h" +#include "i386-linux-nat.h" #include "i387-tdep.h" #include "i386-tdep.h" #include "i386-linux-tdep.h" +#include "x86-xstate.h" -/* Defines ps_err_e, struct ps_prochandle. */ -#include "gdb_proc_service.h" - +#include "linux-nat.h" +#include "x86-linux-nat.h" +#include "nat/linux-ptrace.h" +#include "inf-ptrace.h" /* The register sets used in GNU/Linux ELF core-dumps are identical to the register sets in `struct user' that is used for a.out @@ -83,24 +50,6 @@ those names are now used for the register sets used in the `mcontext_t' type, and have a different size and layout. */ -/* Mapping between the general-purpose registers in `struct user' - format and GDB's register array layout. */ -static int regmap[] = -{ - EAX, ECX, EDX, EBX, - UESP, EBP, ESI, EDI, - EIP, EFL, CS, SS, - DS, ES, FS, GS, - -1, -1, -1, -1, /* st0, st1, st2, st3 */ - -1, -1, -1, -1, /* st4, st5, st6, st7 */ - -1, -1, -1, -1, /* fctrl, fstat, ftag, fiseg */ - -1, -1, -1, -1, /* fioff, foseg, fooff, fop */ - -1, -1, -1, -1, /* xmm0, xmm1, xmm2, xmm3 */ - -1, -1, -1, -1, /* xmm4, xmm5, xmm6, xmm6 */ - -1, /* mxcsr */ - ORIG_EAX -}; - /* Which ptrace request retrieves which registers? These apply to the corresponding SET requests as well. */ @@ -110,6 +59,9 @@ static int regmap[] = #define GETFPXREGS_SUPPLIES(regno) \ (I386_ST0_REGNUM <= (regno) && (regno) < I386_SSE_NUM_REGS) +#define GETXSTATEREGS_SUPPLIES(regno) \ + (I386_ST0_REGNUM <= (regno) && (regno) < I386_PKEYS_NUM_REGS) + /* Does the current host support the GETREGS request? */ int have_ptrace_getregs = #ifdef HAVE_PTRACE_GETREGS @@ -129,7 +81,7 @@ int have_ptrace_getregs = for this to be a simple variable. */ int have_ptrace_getfpxregs = #ifdef HAVE_PTRACE_GETFPXREGS - 1 + -1 #else 0 #endif @@ -143,23 +95,21 @@ int have_ptrace_getfpxregs = static void fetch_register (struct regcache *regcache, int regno) { - int tid; + pid_t tid; int val; gdb_assert (!have_ptrace_getregs); - if (regmap[regno] == -1) + if (i386_linux_gregset_reg_offset[regno] == -1) { regcache_raw_supply (regcache, regno, NULL); return; } - /* GNU/Linux LWP ID's are process ID's. */ - tid = TIDGET (inferior_ptid); - if (tid == 0) - tid = PIDGET (inferior_ptid); /* Not a threaded program. */ + tid = get_ptrace_pid (regcache_get_ptid (regcache)); errno = 0; - val = ptrace (PTRACE_PEEKUSER, tid, 4 * regmap[regno], 0); + val = ptrace (PTRACE_PEEKUSER, tid, + i386_linux_gregset_reg_offset[regno], 0); if (errno != 0) error (_("Couldn't read register %s (#%d): %s."), gdbarch_register_name (get_regcache_arch (regcache), regno), @@ -168,26 +118,24 @@ fetch_register (struct regcache *regcache, int regno) regcache_raw_supply (regcache, regno, &val); } -/* Store one register. */ +/* Store one register. */ static void store_register (const struct regcache *regcache, int regno) { - int tid; + pid_t tid; int val; gdb_assert (!have_ptrace_getregs); - if (regmap[regno] == -1) + if (i386_linux_gregset_reg_offset[regno] == -1) return; - /* GNU/Linux LWP ID's are process ID's. */ - tid = TIDGET (inferior_ptid); - if (tid == 0) - tid = PIDGET (inferior_ptid); /* Not a threaded program. */ + tid = get_ptrace_pid (regcache_get_ptid (regcache)); errno = 0; regcache_raw_collect (regcache, regno, &val); - ptrace (PTRACE_POKEUSER, tid, 4 * regmap[regno], val); + ptrace (PTRACE_POKEUSER, tid, + i386_linux_gregset_reg_offset[regno], val); if (errno != 0) error (_("Couldn't write register %s (#%d): %s."), gdbarch_register_name (get_regcache_arch (regcache), regno), @@ -204,16 +152,17 @@ store_register (const struct regcache *regcache, int regno) void supply_gregset (struct regcache *regcache, const elf_gregset_t *gregsetp) { - const elf_greg_t *regp = (const elf_greg_t *) gregsetp; + const gdb_byte *regp = (const gdb_byte *) gregsetp; int i; for (i = 0; i < I386_NUM_GREGS; i++) - regcache_raw_supply (regcache, i, regp + regmap[i]); + regcache_raw_supply (regcache, i, + regp + i386_linux_gregset_reg_offset[i]); if (I386_LINUX_ORIG_EAX_REGNUM < gdbarch_num_regs (get_regcache_arch (regcache))) - regcache_raw_supply (regcache, I386_LINUX_ORIG_EAX_REGNUM, - regp + ORIG_EAX); + regcache_raw_supply (regcache, I386_LINUX_ORIG_EAX_REGNUM, regp + + i386_linux_gregset_reg_offset[I386_LINUX_ORIG_EAX_REGNUM]); } /* Fill register REGNO (if it is a general-purpose register) in @@ -224,18 +173,19 @@ void fill_gregset (const struct regcache *regcache, elf_gregset_t *gregsetp, int regno) { - elf_greg_t *regp = (elf_greg_t *) gregsetp; + gdb_byte *regp = (gdb_byte *) gregsetp; int i; for (i = 0; i < I386_NUM_GREGS; i++) if (regno == -1 || regno == i) - regcache_raw_collect (regcache, i, regp + regmap[i]); + regcache_raw_collect (regcache, i, + regp + i386_linux_gregset_reg_offset[i]); if ((regno == -1 || regno == I386_LINUX_ORIG_EAX_REGNUM) && I386_LINUX_ORIG_EAX_REGNUM < gdbarch_num_regs (get_regcache_arch (regcache))) - regcache_raw_collect (regcache, I386_LINUX_ORIG_EAX_REGNUM, - regp + ORIG_EAX); + regcache_raw_collect (regcache, I386_LINUX_ORIG_EAX_REGNUM, regp + + i386_linux_gregset_reg_offset[I386_LINUX_ORIG_EAX_REGNUM]); } #ifdef HAVE_PTRACE_GETREGS @@ -347,37 +297,74 @@ store_fpregs (const struct regcache *regcache, int tid, int regno) #else -static void fetch_fpregs (struct regcache *regcache, int tid) {} -static void store_fpregs (const struct regcache *regcache, int tid, int regno) {} +static void +fetch_fpregs (struct regcache *regcache, int tid) +{ +} + +static void +store_fpregs (const struct regcache *regcache, int tid, int regno) +{ +} #endif /* Transfering floating-point and SSE registers to and from GDB. */ -#ifdef HAVE_PTRACE_GETFPXREGS - -/* Fill GDB's register array with the floating-point and SSE register - values in *FPXREGSETP. */ +/* Fetch all registers covered by the PTRACE_GETREGSET request from + process/thread TID and store their values in GDB's register array. + Return non-zero if successful, zero otherwise. */ -void -supply_fpxregset (struct regcache *regcache, - const elf_fpxregset_t *fpxregsetp) +static int +fetch_xstateregs (struct regcache *regcache, int tid) { - i387_supply_fxsave (regcache, -1, fpxregsetp); + char xstateregs[X86_XSTATE_MAX_SIZE]; + struct iovec iov; + + if (have_ptrace_getregset != TRIBOOL_TRUE) + return 0; + + iov.iov_base = xstateregs; + iov.iov_len = sizeof(xstateregs); + if (ptrace (PTRACE_GETREGSET, tid, (unsigned int) NT_X86_XSTATE, + &iov) < 0) + perror_with_name (_("Couldn't read extended state status")); + + i387_supply_xsave (regcache, -1, xstateregs); + return 1; } -/* Fill register REGNO (if it is a floating-point or SSE register) in - *FPXREGSETP with the value in GDB's register array. If REGNO is - -1, do this for all registers. */ +/* Store all valid registers in GDB's register array covered by the + PTRACE_SETREGSET request into the process/thread specified by TID. + Return non-zero if successful, zero otherwise. */ -void -fill_fpxregset (const struct regcache *regcache, - elf_fpxregset_t *fpxregsetp, int regno) +static int +store_xstateregs (const struct regcache *regcache, int tid, int regno) { - i387_collect_fxsave (regcache, regno, fpxregsetp); + char xstateregs[X86_XSTATE_MAX_SIZE]; + struct iovec iov; + + if (have_ptrace_getregset != TRIBOOL_TRUE) + return 0; + + iov.iov_base = xstateregs; + iov.iov_len = sizeof(xstateregs); + if (ptrace (PTRACE_GETREGSET, tid, (unsigned int) NT_X86_XSTATE, + &iov) < 0) + perror_with_name (_("Couldn't read extended state status")); + + i387_collect_xsave (regcache, regno, xstateregs, 0); + + if (ptrace (PTRACE_SETREGSET, tid, (unsigned int) NT_X86_XSTATE, + (int) &iov) < 0) + perror_with_name (_("Couldn't write extended state status")); + + return 1; } +#ifdef HAVE_PTRACE_GETFPXREGS + /* Fetch all registers covered by the PTRACE_GETFPXREGS request from process/thread TID and store their values in GDB's register array. Return non-zero if successful, zero otherwise. */ @@ -401,7 +388,7 @@ fetch_fpxregs (struct regcache *regcache, int tid) perror_with_name (_("Couldn't read floating-point and SSE registers")); } - supply_fpxregset (regcache, (const elf_fpxregset_t *) &fpxregs); + i387_supply_fxsave (regcache, -1, (const elf_fpxregset_t *) &fpxregs); return 1; } @@ -428,7 +415,7 @@ store_fpxregs (const struct regcache *regcache, int tid, int regno) perror_with_name (_("Couldn't read floating-point and SSE registers")); } - fill_fpxregset (regcache, &fpxregs, regno); + i387_collect_fxsave (regcache, regno, &fpxregs); if (ptrace (PTRACE_SETFPXREGS, tid, 0, &fpxregs) == -1) perror_with_name (_("Couldn't write floating-point and SSE registers")); @@ -438,8 +425,17 @@ store_fpxregs (const struct regcache *regcache, int tid, int regno) #else -static int fetch_fpxregs (struct regcache *regcache, int tid) { return 0; } -static int store_fpxregs (const struct regcache *regcache, int tid, int regno) { return 0; } +static int +fetch_fpxregs (struct regcache *regcache, int tid) +{ + return 0; +} + +static int +store_fpxregs (const struct regcache *regcache, int tid, int regno) +{ + return 0; +} #endif /* HAVE_PTRACE_GETFPXREGS */ @@ -454,7 +450,7 @@ static void i386_linux_fetch_inferior_registers (struct target_ops *ops, struct regcache *regcache, int regno) { - int tid; + pid_t tid; /* Use the old method of peeking around in `struct user' if the GETREGS request isn't available. */ @@ -469,10 +465,7 @@ i386_linux_fetch_inferior_registers (struct target_ops *ops, return; } - /* GNU/Linux LWP ID's are process ID's. */ - tid = TIDGET (inferior_ptid); - if (tid == 0) - tid = PIDGET (inferior_ptid); /* Not a threaded program. */ + tid = get_ptrace_pid (regcache_get_ptid (regcache)); /* Use the PTRACE_GETFPXREGS request whenever possible, since it transfers more registers in one system call, and we'll cache the @@ -489,6 +482,8 @@ i386_linux_fetch_inferior_registers (struct target_ops *ops, return; } + if (fetch_xstateregs (regcache, tid)) + return; if (fetch_fpxregs (regcache, tid)) return; fetch_fpregs (regcache, tid); @@ -501,6 +496,12 @@ i386_linux_fetch_inferior_registers (struct target_ops *ops, return; } + if (GETXSTATEREGS_SUPPLIES (regno)) + { + if (fetch_xstateregs (regcache, tid)) + return; + } + if (GETFPXREGS_SUPPLIES (regno)) { if (fetch_fpxregs (regcache, tid)) @@ -527,7 +528,7 @@ static void i386_linux_store_inferior_registers (struct target_ops *ops, struct regcache *regcache, int regno) { - int tid; + pid_t tid; /* Use the old method of poking around in `struct user' if the SETREGS request isn't available. */ @@ -542,10 +543,7 @@ i386_linux_store_inferior_registers (struct target_ops *ops, return; } - /* GNU/Linux LWP ID's are process ID's. */ - tid = TIDGET (inferior_ptid); - if (tid == 0) - tid = PIDGET (inferior_ptid); /* Not a threaded program. */ + tid = get_ptrace_pid (regcache_get_ptid (regcache)); /* Use the PTRACE_SETFPXREGS requests whenever possible, since it transfers more registers in one system call. But remember that @@ -553,6 +551,8 @@ i386_linux_store_inferior_registers (struct target_ops *ops, if (regno == -1) { store_regs (regcache, tid, regno); + if (store_xstateregs (regcache, tid, regno)) + return; if (store_fpxregs (regcache, tid, regno)) return; store_fpregs (regcache, tid, regno); @@ -565,6 +565,12 @@ i386_linux_store_inferior_registers (struct target_ops *ops, return; } + if (GETXSTATEREGS_SUPPLIES (regno)) + { + if (store_xstateregs (regcache, tid, regno)) + return; + } + if (GETFPXREGS_SUPPLIES (regno)) { if (store_fpxregs (regcache, tid, regno)) @@ -582,169 +588,22 @@ i386_linux_store_inferior_registers (struct target_ops *ops, } -/* Support for debug registers. */ - -static unsigned long i386_linux_dr[DR_CONTROL + 1]; - -/* Get debug register REGNUM value from only the one LWP of PTID. */ - -static unsigned long -i386_linux_dr_get (ptid_t ptid, int regnum) -{ - int tid; - unsigned long value; - - tid = TIDGET (ptid); - if (tid == 0) - tid = PIDGET (ptid); - - /* FIXME: kettenis/2001-03-27: Calling perror_with_name if the - ptrace call fails breaks debugging remote targets. The correct - way to fix this is to add the hardware breakpoint and watchpoint - stuff to the target vector. For now, just return zero if the - ptrace call fails. */ - errno = 0; - value = ptrace (PTRACE_PEEKUSER, tid, - offsetof (struct user, u_debugreg[regnum]), 0); - if (errno != 0) -#if 0 - perror_with_name (_("Couldn't read debug register")); -#else - return 0; -#endif - - return value; -} - -/* Set debug register REGNUM to VALUE in only the one LWP of PTID. */ - -static void -i386_linux_dr_set (ptid_t ptid, int regnum, unsigned long value) -{ - int tid; - - tid = TIDGET (ptid); - if (tid == 0) - tid = PIDGET (ptid); - - errno = 0; - ptrace (PTRACE_POKEUSER, tid, - offsetof (struct user, u_debugreg[regnum]), value); - if (errno != 0) - perror_with_name (_("Couldn't write debug register")); -} - -/* Set DR_CONTROL to ADDR in all LWPs of LWP_LIST. */ - -static void -i386_linux_dr_set_control (unsigned long control) -{ - struct lwp_info *lp; - ptid_t ptid; - - i386_linux_dr[DR_CONTROL] = control; - ALL_LWPS (lp, ptid) - i386_linux_dr_set (ptid, DR_CONTROL, control); -} - -/* Set address REGNUM (zero based) to ADDR in all LWPs of LWP_LIST. */ - -static void -i386_linux_dr_set_addr (int regnum, CORE_ADDR addr) -{ - struct lwp_info *lp; - ptid_t ptid; - - gdb_assert (regnum >= 0 && regnum <= DR_LASTADDR - DR_FIRSTADDR); - - i386_linux_dr[DR_FIRSTADDR + regnum] = addr; - ALL_LWPS (lp, ptid) - i386_linux_dr_set (ptid, DR_FIRSTADDR + regnum, addr); -} - -/* Set address REGNUM (zero based) to zero in all LWPs of LWP_LIST. */ - -static void -i386_linux_dr_reset_addr (int regnum) -{ - i386_linux_dr_set_addr (regnum, 0); -} - -/* Get DR_STATUS from only the one LWP of INFERIOR_PTID. */ - -static unsigned long -i386_linux_dr_get_status (void) -{ - return i386_linux_dr_get (inferior_ptid, DR_STATUS); -} - -/* Unset MASK bits in DR_STATUS in all LWPs of LWP_LIST. */ - -static void -i386_linux_dr_unset_status (unsigned long mask) -{ - struct lwp_info *lp; - ptid_t ptid; - - ALL_LWPS (lp, ptid) - { - unsigned long value; - - value = i386_linux_dr_get (ptid, DR_STATUS); - value &= ~mask; - i386_linux_dr_set (ptid, DR_STATUS, value); - } -} - -static void -i386_linux_new_thread (ptid_t ptid) -{ - int i; - - for (i = DR_FIRSTADDR; i <= DR_LASTADDR; i++) - i386_linux_dr_set (ptid, i, i386_linux_dr[i]); - - i386_linux_dr_set (ptid, DR_CONTROL, i386_linux_dr[DR_CONTROL]); -} - - /* Called by libthread_db. Returns a pointer to the thread local storage (or its descriptor). */ ps_err_e -ps_get_thread_area (const struct ps_prochandle *ph, +ps_get_thread_area (struct ps_prochandle *ph, lwpid_t lwpid, int idx, void **base) { - /* NOTE: cagney/2003-08-26: The definition of this buffer is found - in the kernel header . It, after padding, is 4 x - 4 byte integers in size: `entry_number', `base_addr', `limit', - and a bunch of status bits. - - The values returned by this ptrace call should be part of the - regcache buffer, and ps_get_thread_area should channel its - request through the regcache. That way remote targets could - provide the value using the remote protocol and not this direct - call. - - Is this function needed? I'm guessing that the `base' is the - address of a a descriptor that libthread_db uses to find the - thread local address base that GDB needs. Perhaps that - descriptor is defined by the ABI. Anyway, given that - libthread_db calls this function without prompting (gdb - requesting tls base) I guess it needs info in there anyway. */ - unsigned int desc[4]; - gdb_assert (sizeof (int) == 4); - -#ifndef PTRACE_GET_THREAD_AREA -#define PTRACE_GET_THREAD_AREA 25 -#endif + unsigned int base_addr; + ps_err_e result; - if (ptrace (PTRACE_GET_THREAD_AREA, lwpid, - (void *) idx, (unsigned long) &desc) < 0) - return PS_ERR; + result = x86_linux_get_thread_area (lwpid, (void *) idx, &base_addr); - *(int *)base = desc[1]; - return PS_OK; + if (result == PS_OK) + *(int *) base = base_addr; + + return result; } @@ -778,10 +637,9 @@ static const unsigned char linux_syscall[] = { 0xcd, 0x80 }; static void i386_linux_resume (struct target_ops *ops, - ptid_t ptid, int step, enum target_signal signal) + ptid_t ptid, int step, enum gdb_signal signal) { - int pid = PIDGET (ptid); - + int pid = ptid_get_lwp (ptid); int request; if (catch_syscall_enabled () > 0) @@ -791,7 +649,7 @@ i386_linux_resume (struct target_ops *ops, if (step) { - struct regcache *regcache = get_thread_regcache (pid_to_ptid (pid)); + struct regcache *regcache = get_thread_regcache (ptid); struct gdbarch *gdbarch = get_regcache_arch (regcache); enum bfd_endian byte_order = gdbarch_byte_order (gdbarch); ULONGEST pc; @@ -826,7 +684,8 @@ i386_linux_resume (struct target_ops *ops, regcache_cooked_read_unsigned (regcache, I386_ESP_REGNUM, &sp); if (syscall == SYS_rt_sigreturn) - addr = read_memory_integer (sp + 8, 4, byte_order) + 20; + addr = read_memory_unsigned_integer (sp + 8, 4, byte_order) + + 20; else addr = sp; @@ -840,58 +699,27 @@ i386_linux_resume (struct target_ops *ops, } } - if (ptrace (request, pid, 0, target_signal_to_host (signal)) == -1) + if (ptrace (request, pid, 0, gdb_signal_to_host (signal)) == -1) perror_with_name (("ptrace")); } + -static void (*super_post_startup_inferior) (ptid_t ptid); - -static void -i386_linux_child_post_startup_inferior (ptid_t ptid) -{ - i386_cleanup_dregs (); - super_post_startup_inferior (ptid); -} - -/* Get Linux/x86 target description from running target. */ - -static const struct target_desc * -i386_linux_read_description (struct target_ops *ops) -{ - return tdesc_i386_linux; -} +/* -Wmissing-prototypes */ +extern initialize_file_ftype _initialize_i386_linux_nat; void _initialize_i386_linux_nat (void) { - struct target_ops *t; - - /* Fill in the generic GNU/Linux methods. */ - t = linux_target (); - - i386_use_watchpoints (t); - - i386_dr_low.set_control = i386_linux_dr_set_control; - i386_dr_low.set_addr = i386_linux_dr_set_addr; - i386_dr_low.reset_addr = i386_linux_dr_reset_addr; - i386_dr_low.get_status = i386_linux_dr_get_status; - i386_dr_low.unset_status = i386_linux_dr_unset_status; - i386_set_debug_register_length (4); + /* Create a generic x86 GNU/Linux target. */ + struct target_ops *t = x86_linux_create_target (); /* Override the default ptrace resume method. */ t->to_resume = i386_linux_resume; - /* Override the GNU/Linux inferior startup hook. */ - super_post_startup_inferior = t->to_post_startup_inferior; - t->to_post_startup_inferior = i386_linux_child_post_startup_inferior; - /* Add our register access methods. */ t->to_fetch_registers = i386_linux_fetch_inferior_registers; t->to_store_registers = i386_linux_store_inferior_registers; - t->to_read_description = i386_linux_read_description; - - /* Register the target. */ - linux_nat_add_target (t); - linux_nat_set_new_thread (t, i386_linux_new_thread); + /* Add the target. */ + x86_linux_add_target (t); }