369 lines
11 KiB
Diff
369 lines
11 KiB
Diff
|
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
||
|
|
From: Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
||
|
|
Date: Wed, 7 Jul 2021 18:45:37 -0400
|
||
|
|
Subject: gdb-rhbz1854784-powerpc-remove-region-limit-dawr-3of7.patch
|
||
|
|
|
||
|
|
;; Backport "[PowerPC] Move up some register access routines"
|
||
|
|
;; (Pedro Franco de Carvalho, RH BZ 1854784)
|
||
|
|
|
||
|
|
Keep the routines related to register access grouped together.
|
||
|
|
|
||
|
|
gdb/ChangeLog:
|
||
|
|
2020-03-30 Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
||
|
|
|
||
|
|
* ppc-linux-nat.c (ppc_linux_nat_target::store_registers)
|
||
|
|
(ppc_linux_nat_target::auxv_parse)
|
||
|
|
(ppc_linux_nat_target::read_description)
|
||
|
|
(supply_gregset, fill_gregset, supply_fpregset, fill_fpregset):
|
||
|
|
Move up.
|
||
|
|
|
||
|
|
diff --git a/gdb/ppc-linux-nat.c b/gdb/ppc-linux-nat.c
|
||
|
|
--- a/gdb/ppc-linux-nat.c
|
||
|
|
+++ b/gdb/ppc-linux-nat.c
|
||
|
|
@@ -1561,6 +1561,170 @@ store_ppc_registers (const struct regcache *regcache, int tid)
|
||
|
|
function to fail most of the time, so we ignore them. */
|
||
|
|
}
|
||
|
|
|
||
|
|
+void
|
||
|
|
+ppc_linux_nat_target::store_registers (struct regcache *regcache, int regno)
|
||
|
|
+{
|
||
|
|
+ pid_t tid = get_ptrace_pid (regcache->ptid ());
|
||
|
|
+
|
||
|
|
+ if (regno >= 0)
|
||
|
|
+ store_register (regcache, tid, regno);
|
||
|
|
+ else
|
||
|
|
+ store_ppc_registers (regcache, tid);
|
||
|
|
+}
|
||
|
|
+
|
||
|
|
+/* Functions for transferring registers between a gregset_t or fpregset_t
|
||
|
|
+ (see sys/ucontext.h) and gdb's regcache. The word size is that used
|
||
|
|
+ by the ptrace interface, not the current program's ABI. Eg. if a
|
||
|
|
+ powerpc64-linux gdb is being used to debug a powerpc32-linux app, we
|
||
|
|
+ read or write 64-bit gregsets. This is to suit the host libthread_db. */
|
||
|
|
+
|
||
|
|
+void
|
||
|
|
+supply_gregset (struct regcache *regcache, const gdb_gregset_t *gregsetp)
|
||
|
|
+{
|
||
|
|
+ const struct regset *regset = ppc_linux_gregset (sizeof (long));
|
||
|
|
+
|
||
|
|
+ ppc_supply_gregset (regset, regcache, -1, gregsetp, sizeof (*gregsetp));
|
||
|
|
+}
|
||
|
|
+
|
||
|
|
+void
|
||
|
|
+fill_gregset (const struct regcache *regcache,
|
||
|
|
+ gdb_gregset_t *gregsetp, int regno)
|
||
|
|
+{
|
||
|
|
+ const struct regset *regset = ppc_linux_gregset (sizeof (long));
|
||
|
|
+
|
||
|
|
+ if (regno == -1)
|
||
|
|
+ memset (gregsetp, 0, sizeof (*gregsetp));
|
||
|
|
+ ppc_collect_gregset (regset, regcache, regno, gregsetp, sizeof (*gregsetp));
|
||
|
|
+}
|
||
|
|
+
|
||
|
|
+void
|
||
|
|
+supply_fpregset (struct regcache *regcache, const gdb_fpregset_t * fpregsetp)
|
||
|
|
+{
|
||
|
|
+ const struct regset *regset = ppc_linux_fpregset ();
|
||
|
|
+
|
||
|
|
+ ppc_supply_fpregset (regset, regcache, -1,
|
||
|
|
+ fpregsetp, sizeof (*fpregsetp));
|
||
|
|
+}
|
||
|
|
+
|
||
|
|
+void
|
||
|
|
+fill_fpregset (const struct regcache *regcache,
|
||
|
|
+ gdb_fpregset_t *fpregsetp, int regno)
|
||
|
|
+{
|
||
|
|
+ const struct regset *regset = ppc_linux_fpregset ();
|
||
|
|
+
|
||
|
|
+ ppc_collect_fpregset (regset, regcache, regno,
|
||
|
|
+ fpregsetp, sizeof (*fpregsetp));
|
||
|
|
+}
|
||
|
|
+
|
||
|
|
+int
|
||
|
|
+ppc_linux_nat_target::auxv_parse (gdb_byte **readptr,
|
||
|
|
+ gdb_byte *endptr, CORE_ADDR *typep,
|
||
|
|
+ CORE_ADDR *valp)
|
||
|
|
+{
|
||
|
|
+ int tid = inferior_ptid.lwp ();
|
||
|
|
+ if (tid == 0)
|
||
|
|
+ tid = inferior_ptid.pid ();
|
||
|
|
+
|
||
|
|
+ int sizeof_auxv_field = ppc_linux_target_wordsize (tid);
|
||
|
|
+
|
||
|
|
+ enum bfd_endian byte_order = gdbarch_byte_order (target_gdbarch ());
|
||
|
|
+ gdb_byte *ptr = *readptr;
|
||
|
|
+
|
||
|
|
+ if (endptr == ptr)
|
||
|
|
+ return 0;
|
||
|
|
+
|
||
|
|
+ if (endptr - ptr < sizeof_auxv_field * 2)
|
||
|
|
+ return -1;
|
||
|
|
+
|
||
|
|
+ *typep = extract_unsigned_integer (ptr, sizeof_auxv_field, byte_order);
|
||
|
|
+ ptr += sizeof_auxv_field;
|
||
|
|
+ *valp = extract_unsigned_integer (ptr, sizeof_auxv_field, byte_order);
|
||
|
|
+ ptr += sizeof_auxv_field;
|
||
|
|
+
|
||
|
|
+ *readptr = ptr;
|
||
|
|
+ return 1;
|
||
|
|
+}
|
||
|
|
+
|
||
|
|
+const struct target_desc *
|
||
|
|
+ppc_linux_nat_target::read_description ()
|
||
|
|
+{
|
||
|
|
+ int tid = inferior_ptid.lwp ();
|
||
|
|
+ if (tid == 0)
|
||
|
|
+ tid = inferior_ptid.pid ();
|
||
|
|
+
|
||
|
|
+ if (have_ptrace_getsetevrregs)
|
||
|
|
+ {
|
||
|
|
+ struct gdb_evrregset_t evrregset;
|
||
|
|
+
|
||
|
|
+ if (ptrace (PTRACE_GETEVRREGS, tid, 0, &evrregset) >= 0)
|
||
|
|
+ return tdesc_powerpc_e500l;
|
||
|
|
+
|
||
|
|
+ /* EIO means that the PTRACE_GETEVRREGS request isn't supported.
|
||
|
|
+ Anything else needs to be reported. */
|
||
|
|
+ else if (errno != EIO)
|
||
|
|
+ perror_with_name (_("Unable to fetch SPE registers"));
|
||
|
|
+ }
|
||
|
|
+
|
||
|
|
+ struct ppc_linux_features features = ppc_linux_no_features;
|
||
|
|
+
|
||
|
|
+ features.wordsize = ppc_linux_target_wordsize (tid);
|
||
|
|
+
|
||
|
|
+ CORE_ADDR hwcap = linux_get_hwcap (current_top_target ());
|
||
|
|
+ CORE_ADDR hwcap2 = linux_get_hwcap2 (current_top_target ());
|
||
|
|
+
|
||
|
|
+ if (have_ptrace_getsetvsxregs
|
||
|
|
+ && (hwcap & PPC_FEATURE_HAS_VSX))
|
||
|
|
+ {
|
||
|
|
+ gdb_vsxregset_t vsxregset;
|
||
|
|
+
|
||
|
|
+ if (ptrace (PTRACE_GETVSXREGS, tid, 0, &vsxregset) >= 0)
|
||
|
|
+ features.vsx = true;
|
||
|
|
+
|
||
|
|
+ /* EIO means that the PTRACE_GETVSXREGS request isn't supported.
|
||
|
|
+ Anything else needs to be reported. */
|
||
|
|
+ else if (errno != EIO)
|
||
|
|
+ perror_with_name (_("Unable to fetch VSX registers"));
|
||
|
|
+ }
|
||
|
|
+
|
||
|
|
+ if (have_ptrace_getvrregs
|
||
|
|
+ && (hwcap & PPC_FEATURE_HAS_ALTIVEC))
|
||
|
|
+ {
|
||
|
|
+ gdb_vrregset_t vrregset;
|
||
|
|
+
|
||
|
|
+ if (ptrace (PTRACE_GETVRREGS, tid, 0, &vrregset) >= 0)
|
||
|
|
+ features.altivec = true;
|
||
|
|
+
|
||
|
|
+ /* EIO means that the PTRACE_GETVRREGS request isn't supported.
|
||
|
|
+ Anything else needs to be reported. */
|
||
|
|
+ else if (errno != EIO)
|
||
|
|
+ perror_with_name (_("Unable to fetch AltiVec registers"));
|
||
|
|
+ }
|
||
|
|
+
|
||
|
|
+ features.isa205 = ppc_linux_has_isa205 (hwcap);
|
||
|
|
+
|
||
|
|
+ if ((hwcap2 & PPC_FEATURE2_DSCR)
|
||
|
|
+ && check_regset (tid, NT_PPC_PPR, PPC_LINUX_SIZEOF_PPRREGSET)
|
||
|
|
+ && check_regset (tid, NT_PPC_DSCR, PPC_LINUX_SIZEOF_DSCRREGSET))
|
||
|
|
+ {
|
||
|
|
+ features.ppr_dscr = true;
|
||
|
|
+ if ((hwcap2 & PPC_FEATURE2_ARCH_2_07)
|
||
|
|
+ && (hwcap2 & PPC_FEATURE2_TAR)
|
||
|
|
+ && (hwcap2 & PPC_FEATURE2_EBB)
|
||
|
|
+ && check_regset (tid, NT_PPC_TAR, PPC_LINUX_SIZEOF_TARREGSET)
|
||
|
|
+ && check_regset (tid, NT_PPC_EBB, PPC_LINUX_SIZEOF_EBBREGSET)
|
||
|
|
+ && check_regset (tid, NT_PPC_PMU, PPC_LINUX_SIZEOF_PMUREGSET))
|
||
|
|
+ {
|
||
|
|
+ features.isa207 = true;
|
||
|
|
+ if ((hwcap2 & PPC_FEATURE2_HTM)
|
||
|
|
+ && check_regset (tid, NT_PPC_TM_SPR,
|
||
|
|
+ PPC_LINUX_SIZEOF_TM_SPRREGSET))
|
||
|
|
+ features.htm = true;
|
||
|
|
+ }
|
||
|
|
+ }
|
||
|
|
+
|
||
|
|
+ return ppc_linux_match_description (features);
|
||
|
|
+}
|
||
|
|
+
|
||
|
|
/* The cached DABR value, to install in new threads.
|
||
|
|
This variable is used when the PowerPC HWDEBUG ptrace
|
||
|
|
interface is not available. */
|
||
|
|
@@ -2514,173 +2678,7 @@ ppc_linux_nat_target::masked_watch_num_registers (CORE_ADDR addr, CORE_ADDR mask
|
||
|
|
return 2;
|
||
|
|
}
|
||
|
|
|
||
|
|
-void
|
||
|
|
-ppc_linux_nat_target::store_registers (struct regcache *regcache, int regno)
|
||
|
|
-{
|
||
|
|
- pid_t tid = get_ptrace_pid (regcache->ptid ());
|
||
|
|
-
|
||
|
|
- if (regno >= 0)
|
||
|
|
- store_register (regcache, tid, regno);
|
||
|
|
- else
|
||
|
|
- store_ppc_registers (regcache, tid);
|
||
|
|
-}
|
||
|
|
-
|
||
|
|
-/* Functions for transferring registers between a gregset_t or fpregset_t
|
||
|
|
- (see sys/ucontext.h) and gdb's regcache. The word size is that used
|
||
|
|
- by the ptrace interface, not the current program's ABI. Eg. if a
|
||
|
|
- powerpc64-linux gdb is being used to debug a powerpc32-linux app, we
|
||
|
|
- read or write 64-bit gregsets. This is to suit the host libthread_db. */
|
||
|
|
-
|
||
|
|
-void
|
||
|
|
-supply_gregset (struct regcache *regcache, const gdb_gregset_t *gregsetp)
|
||
|
|
-{
|
||
|
|
- const struct regset *regset = ppc_linux_gregset (sizeof (long));
|
||
|
|
-
|
||
|
|
- ppc_supply_gregset (regset, regcache, -1, gregsetp, sizeof (*gregsetp));
|
||
|
|
-}
|
||
|
|
-
|
||
|
|
-void
|
||
|
|
-fill_gregset (const struct regcache *regcache,
|
||
|
|
- gdb_gregset_t *gregsetp, int regno)
|
||
|
|
-{
|
||
|
|
- const struct regset *regset = ppc_linux_gregset (sizeof (long));
|
||
|
|
-
|
||
|
|
- if (regno == -1)
|
||
|
|
- memset (gregsetp, 0, sizeof (*gregsetp));
|
||
|
|
- ppc_collect_gregset (regset, regcache, regno, gregsetp, sizeof (*gregsetp));
|
||
|
|
-}
|
||
|
|
-
|
||
|
|
-void
|
||
|
|
-supply_fpregset (struct regcache *regcache, const gdb_fpregset_t * fpregsetp)
|
||
|
|
-{
|
||
|
|
- const struct regset *regset = ppc_linux_fpregset ();
|
||
|
|
-
|
||
|
|
- ppc_supply_fpregset (regset, regcache, -1,
|
||
|
|
- fpregsetp, sizeof (*fpregsetp));
|
||
|
|
-}
|
||
|
|
-
|
||
|
|
-void
|
||
|
|
-fill_fpregset (const struct regcache *regcache,
|
||
|
|
- gdb_fpregset_t *fpregsetp, int regno)
|
||
|
|
-{
|
||
|
|
- const struct regset *regset = ppc_linux_fpregset ();
|
||
|
|
-
|
||
|
|
- ppc_collect_fpregset (regset, regcache, regno,
|
||
|
|
- fpregsetp, sizeof (*fpregsetp));
|
||
|
|
-}
|
||
|
|
-
|
||
|
|
-int
|
||
|
|
-ppc_linux_nat_target::auxv_parse (gdb_byte **readptr,
|
||
|
|
- gdb_byte *endptr, CORE_ADDR *typep,
|
||
|
|
- CORE_ADDR *valp)
|
||
|
|
-{
|
||
|
|
- int tid = inferior_ptid.lwp ();
|
||
|
|
- if (tid == 0)
|
||
|
|
- tid = inferior_ptid.pid ();
|
||
|
|
-
|
||
|
|
- int sizeof_auxv_field = ppc_linux_target_wordsize (tid);
|
||
|
|
-
|
||
|
|
- enum bfd_endian byte_order = gdbarch_byte_order (target_gdbarch ());
|
||
|
|
- gdb_byte *ptr = *readptr;
|
||
|
|
-
|
||
|
|
- if (endptr == ptr)
|
||
|
|
- return 0;
|
||
|
|
-
|
||
|
|
- if (endptr - ptr < sizeof_auxv_field * 2)
|
||
|
|
- return -1;
|
||
|
|
-
|
||
|
|
- *typep = extract_unsigned_integer (ptr, sizeof_auxv_field, byte_order);
|
||
|
|
- ptr += sizeof_auxv_field;
|
||
|
|
- *valp = extract_unsigned_integer (ptr, sizeof_auxv_field, byte_order);
|
||
|
|
- ptr += sizeof_auxv_field;
|
||
|
|
-
|
||
|
|
- *readptr = ptr;
|
||
|
|
- return 1;
|
||
|
|
-}
|
||
|
|
-
|
||
|
|
-const struct target_desc *
|
||
|
|
-ppc_linux_nat_target::read_description ()
|
||
|
|
-{
|
||
|
|
- int tid = inferior_ptid.lwp ();
|
||
|
|
- if (tid == 0)
|
||
|
|
- tid = inferior_ptid.pid ();
|
||
|
|
-
|
||
|
|
- if (have_ptrace_getsetevrregs)
|
||
|
|
- {
|
||
|
|
- struct gdb_evrregset_t evrregset;
|
||
|
|
-
|
||
|
|
- if (ptrace (PTRACE_GETEVRREGS, tid, 0, &evrregset) >= 0)
|
||
|
|
- return tdesc_powerpc_e500l;
|
||
|
|
-
|
||
|
|
- /* EIO means that the PTRACE_GETEVRREGS request isn't supported.
|
||
|
|
- Anything else needs to be reported. */
|
||
|
|
- else if (errno != EIO)
|
||
|
|
- perror_with_name (_("Unable to fetch SPE registers"));
|
||
|
|
- }
|
||
|
|
-
|
||
|
|
- struct ppc_linux_features features = ppc_linux_no_features;
|
||
|
|
-
|
||
|
|
- features.wordsize = ppc_linux_target_wordsize (tid);
|
||
|
|
-
|
||
|
|
- CORE_ADDR hwcap = linux_get_hwcap (current_top_target ());
|
||
|
|
- CORE_ADDR hwcap2 = linux_get_hwcap2 (current_top_target ());
|
||
|
|
-
|
||
|
|
- if (have_ptrace_getsetvsxregs
|
||
|
|
- && (hwcap & PPC_FEATURE_HAS_VSX))
|
||
|
|
- {
|
||
|
|
- gdb_vsxregset_t vsxregset;
|
||
|
|
-
|
||
|
|
- if (ptrace (PTRACE_GETVSXREGS, tid, 0, &vsxregset) >= 0)
|
||
|
|
- features.vsx = true;
|
||
|
|
-
|
||
|
|
- /* EIO means that the PTRACE_GETVSXREGS request isn't supported.
|
||
|
|
- Anything else needs to be reported. */
|
||
|
|
- else if (errno != EIO)
|
||
|
|
- perror_with_name (_("Unable to fetch VSX registers"));
|
||
|
|
- }
|
||
|
|
-
|
||
|
|
- if (have_ptrace_getvrregs
|
||
|
|
- && (hwcap & PPC_FEATURE_HAS_ALTIVEC))
|
||
|
|
- {
|
||
|
|
- gdb_vrregset_t vrregset;
|
||
|
|
-
|
||
|
|
- if (ptrace (PTRACE_GETVRREGS, tid, 0, &vrregset) >= 0)
|
||
|
|
- features.altivec = true;
|
||
|
|
-
|
||
|
|
- /* EIO means that the PTRACE_GETVRREGS request isn't supported.
|
||
|
|
- Anything else needs to be reported. */
|
||
|
|
- else if (errno != EIO)
|
||
|
|
- perror_with_name (_("Unable to fetch AltiVec registers"));
|
||
|
|
- }
|
||
|
|
-
|
||
|
|
- if (hwcap & PPC_FEATURE_CELL)
|
||
|
|
- features.cell = true;
|
||
|
|
-
|
||
|
|
- features.isa205 = ppc_linux_has_isa205 (hwcap);
|
||
|
|
-
|
||
|
|
- if ((hwcap2 & PPC_FEATURE2_DSCR)
|
||
|
|
- && check_regset (tid, NT_PPC_PPR, PPC_LINUX_SIZEOF_PPRREGSET)
|
||
|
|
- && check_regset (tid, NT_PPC_DSCR, PPC_LINUX_SIZEOF_DSCRREGSET))
|
||
|
|
- {
|
||
|
|
- features.ppr_dscr = true;
|
||
|
|
- if ((hwcap2 & PPC_FEATURE2_ARCH_2_07)
|
||
|
|
- && (hwcap2 & PPC_FEATURE2_TAR)
|
||
|
|
- && (hwcap2 & PPC_FEATURE2_EBB)
|
||
|
|
- && check_regset (tid, NT_PPC_TAR, PPC_LINUX_SIZEOF_TARREGSET)
|
||
|
|
- && check_regset (tid, NT_PPC_EBB, PPC_LINUX_SIZEOF_EBBREGSET)
|
||
|
|
- && check_regset (tid, NT_PPC_PMU, PPC_LINUX_SIZEOF_PMUREGSET))
|
||
|
|
- {
|
||
|
|
- features.isa207 = true;
|
||
|
|
- if ((hwcap2 & PPC_FEATURE2_HTM)
|
||
|
|
- && check_regset (tid, NT_PPC_TM_SPR,
|
||
|
|
- PPC_LINUX_SIZEOF_TM_SPRREGSET))
|
||
|
|
- features.htm = true;
|
||
|
|
- }
|
||
|
|
- }
|
||
|
|
-
|
||
|
|
- return ppc_linux_match_description (features);
|
||
|
|
-}
|
||
|
|
-
|
||
|
|
+void _initialize_ppc_linux_nat ();
|
||
|
|
void
|
||
|
|
_initialize_ppc_linux_nat (void)
|
||
|
|
{
|