From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: by sourceware.org (Postfix, from userid 1936) id 3B1563858C51; Tue, 3 May 2022 23:10:38 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org 3B1563858C51 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: quoted-printable From: John Baldwin To: gdb-cvs@sourceware.org Subject: [binutils-gdb] Support TLS variables on FreeBSD/arm. X-Act-Checkin: binutils-gdb X-Git-Author: John Baldwin X-Git-Refname: refs/heads/master X-Git-Oldrev: 099fbce0accf209677e041fd9dc10bcb4a5eb578 X-Git-Newrev: 2e686a74dc4782caeef75f76174909ab7ad358f8 Message-Id: <20220503231039.3B1563858C51@sourceware.org> Date: Tue, 3 May 2022 23:10:38 +0000 (GMT) X-BeenThere: gdb-cvs@sourceware.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: Gdb-cvs mailing list List-Unsubscribe: , List-Archive: List-Help: List-Subscribe: , X-List-Received-Date: Tue, 03 May 2022 23:10:39 -0000 https://sourceware.org/git/gitweb.cgi?p=3Dbinutils-gdb.git;h=3D2e686a74dc47= 82caeef75f76174909ab7ad358f8 commit 2e686a74dc4782caeef75f76174909ab7ad358f8 Author: John Baldwin Date: Tue May 3 16:05:10 2022 -0700 Support TLS variables on FreeBSD/arm. =20 Derive the pointer to the DTV array from the tpidruro register. Diff: --- gdb/arm-fbsd-tdep.c | 33 +++++++++++++++++++++++++++++++++ 1 file changed, 33 insertions(+) diff --git a/gdb/arm-fbsd-tdep.c b/gdb/arm-fbsd-tdep.c index a27dfb2fb4a..483820c1092 100644 --- a/gdb/arm-fbsd-tdep.c +++ b/gdb/arm-fbsd-tdep.c @@ -27,6 +27,7 @@ #include "auxv.h" #include "fbsd-tdep.h" #include "gdbcore.h" +#include "inferior.h" #include "osabi.h" #include "solib-svr4.h" #include "trad-frame.h" @@ -226,6 +227,30 @@ arm_fbsd_core_read_description (struct gdbarch *gdbarc= h, return arm_fbsd_read_description_auxv (target, tls !=3D nullptr); } =20 +/* Implement the get_thread_local_address gdbarch method. */ + +static CORE_ADDR +arm_fbsd_get_thread_local_address (struct gdbarch *gdbarch, ptid_t ptid, + CORE_ADDR lm_addr, CORE_ADDR offset) +{ + arm_gdbarch_tdep *tdep =3D (arm_gdbarch_tdep *) gdbarch_tdep (gdbarch); + struct regcache *regcache; + + regcache =3D get_thread_arch_regcache (current_inferior ()->process_targ= et (), + ptid, gdbarch); + + target_fetch_registers (regcache, tdep->tls_regnum); + + ULONGEST tpidruro; + if (regcache->cooked_read (tdep->tls_regnum, &tpidruro) !=3D REG_VALID) + error (_("Unable to fetch %%tpidruro")); + + /* %tpidruro points to the TCB whose first member is the dtv + pointer. */ + CORE_ADDR dtv_addr =3D tpidruro; + return fbsd_get_thread_local_address (gdbarch, dtv_addr, lm_addr, offset= ); +} + /* Implement the 'init_osabi' method of struct gdb_osabi_handler. */ =20 static void @@ -251,6 +276,14 @@ arm_fbsd_init_abi (struct gdbarch_info info, struct gd= barch *gdbarch) (gdbarch, arm_fbsd_iterate_over_regset_sections); set_gdbarch_core_read_description (gdbarch, arm_fbsd_core_read_descripti= on); =20 + if (tdep->tls_regnum > 0) + { + set_gdbarch_fetch_tls_load_module_address (gdbarch, + svr4_fetch_objfile_link_map); + set_gdbarch_get_thread_local_address (gdbarch, + arm_fbsd_get_thread_local_address); + } + /* Single stepping. */ set_gdbarch_software_single_step (gdbarch, arm_software_single_step); }