From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from simark.ca by simark.ca with LMTP id oQ+yDLmoMWrBzAoAWB0awg (envelope-from ) for ; Tue, 16 Jun 2026 15:49:13 -0400 Authentication-Results: simark.ca; dkim=pass (1024-bit key; unprotected) header.d=redhat.com header.i=@redhat.com header.a=rsa-sha256 header.s=mimecast20190719 header.b=dwaXnRKS; dkim-atps=neutral Received: by simark.ca (Postfix, from userid 112) id 2A5041E0A6; Tue, 16 Jun 2026 15:49:13 -0400 (EDT) X-Spam-Checker-Version: SpamAssassin 4.0.1 (2024-03-25) on simark.ca X-Spam-Level: X-Spam-Status: No, score=-6.4 required=5.0 tests=ARC_SIGNED,ARC_VALID,BAYES_00, DKIMWL_WL_HIGH,DKIM_SIGNED,DKIM_VALID,DKIM_VALID_AU,MAILING_LIST_MULTI, RCVD_IN_DNSWL_MED autolearn=ham autolearn_force=no version=4.0.1 Received: from vm01.sourceware.org (vm01.sourceware.org [38.145.34.32]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits) key-exchange x25519 server-signature ECDSA (prime256v1) server-digest SHA256) (No client certificate requested) by simark.ca (Postfix) with ESMTPS id DCB4C1E070 for ; Tue, 16 Jun 2026 15:49:10 -0400 (EDT) Received: from vm01.sourceware.org (localhost [IPv6:::1]) by sourceware.org (Postfix) with ESMTP id 7CB3B48F60F0 for ; Tue, 16 Jun 2026 19:49:10 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org 7CB3B48F60F0 Authentication-Results: sourceware.org; dkim=pass (1024-bit key, unprotected) header.d=redhat.com header.i=@redhat.com header.a=rsa-sha256 header.s=mimecast20190719 header.b=dwaXnRKS Received: from us-smtp-delivery-124.mimecast.com (us-smtp-delivery-124.mimecast.com [170.10.129.124]) by sourceware.org (Postfix) with ESMTP id 4A2EA48A080E for ; Tue, 16 Jun 2026 19:47:31 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.4.2 sourceware.org 4A2EA48A080E Authentication-Results: sourceware.org; dmarc=pass (p=quarantine dis=none) header.from=redhat.com Authentication-Results: sourceware.org; spf=pass smtp.mailfrom=redhat.com ARC-Filter: OpenARC Filter v1.0.0 sourceware.org 4A2EA48A080E Authentication-Results: sourceware.org; arc=none smtp.remote-ip=170.10.129.124 ARC-Seal: i=1; a=rsa-sha256; d=sourceware.org; s=key; t=1781639251; cv=none; b=tWDoF/m/sLwA69w0uzLjVMgBZWk4DAM59+YpaQek8db7GmkHnWYdHMDSncgF2Zsi16MPr9ApP0xOdKf6MRQpUiDgC/r7YFeVpUAX3r0fa/Ha4oC/+yqXeQ1wgumwWAemHBRgGpSEa+NcVvBr/gXjThaLpicL93Qt4HbiFjSGCzk= ARC-Message-Signature: i=1; a=rsa-sha256; d=sourceware.org; s=key; t=1781639251; c=relaxed/simple; bh=Bl5wy9sbZsemFdHQqtH30rv+tjt4bTCORT/LUgDmStU=; h=DKIM-Signature:From:To:Subject:Date:Message-Id:MIME-Version; b=uZTPnEBAzk/Qw097TQ1oQCuoVjpGi2/aO7N3LvCB9TBakDoDkGak618M4VCUdUCiPjiFx5sM1Dnv+PPTP+bF0rm2bAv1g4e3C7zvfVJU6ZOmQTp7loZ+2e9hyw17KKdfg2KWpINCe0Tkflni3Y8gU/ZqJKTFMpV0+LZVygR5I+U= ARC-Authentication-Results: i=1; sourceware.org; dkim=pass (1024-bit key, unprotected) header.d=redhat.com header.i=@redhat.com header.a=rsa-sha256 header.s=mimecast20190719 header.b=dwaXnRKS DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org 4A2EA48A080E DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=redhat.com; s=mimecast20190719; t=1781639251; h=from:from:reply-to:subject:subject:date:date:message-id:message-id: to:to:cc:cc:mime-version:mime-version:content-type:content-type: content-transfer-encoding:content-transfer-encoding: in-reply-to:in-reply-to:references:references; bh=rEJ0I5iL/GGToJYbWjLSJfJ7V3wD+NtufDMPrORo9XI=; b=dwaXnRKSFD8V6qdhOlHAE3LzYb/NaMOi8QA+38/CZiGf7N7ZigjEFNYOSR8/OzvHUjsfB0 IFPEje+OgiP7jGSXODW8T50vcku5WGQyuNo4JtV6I0CcJxAPXBHhu63+6SiORXcQXB+W7b 2oWFyMyBoJsjs1GUQ67eSp7svgzVVaA= Received: from mail-wr1-f71.google.com (mail-wr1-f71.google.com [209.85.221.71]) by relay.mimecast.com with ESMTP with STARTTLS (version=TLSv1.3, cipher=TLS_AES_256_GCM_SHA384) id us-mta-297-HTch0WzvOaG-Vr8FeF5EBg-1; Tue, 16 Jun 2026 15:47:29 -0400 X-MC-Unique: HTch0WzvOaG-Vr8FeF5EBg-1 X-Mimecast-MFC-AGG-ID: HTch0WzvOaG-Vr8FeF5EBg_1781639248 Received: by mail-wr1-f71.google.com with SMTP id ffacd0b85a97d-45ef616db45so3863126f8f.2 for ; Tue, 16 Jun 2026 12:47:29 -0700 (PDT) X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20251104; t=1781639248; x=1782244048; h=content-transfer-encoding:mime-version:references:in-reply-to :message-id:date:subject:cc:to:from:x-gm-gg:x-gm-message-state:from :to:cc:subject:date:message-id:reply-to; bh=rEJ0I5iL/GGToJYbWjLSJfJ7V3wD+NtufDMPrORo9XI=; b=T4uH7pNEEzwM8t3d6fngDmj/peCtx8JKvvjrY9mVqZQeJ5K6pWXN+dJClELxlA8qZB XmcwOBwnkG1Cm8uZvfEnPxQ6loU3PqUAzVU0uU0UacUcyNTbCnJptL07oFm6cs9xIkbm 2vnTZq61A2Kd8HhRAksvxutbSwUXTGxjS1AUO3JK+DcXKvFqDZ0bmXjNLoaoyhacJFpI egsmjfB6ujSKMXNkeT/D8//AG7fsNyhMq0B/NWkU0EkdJG1QHLwmp21ajekvdf5oeeX/ U5NMRIhn81ndNeYpsPqR3ZVo2DgnjOB8QIBItlT1XUXsZv7FIfA9Ror3pbhK26XhmFUE +0EA== X-Gm-Message-State: AOJu0Yze+98XkkucYVvb7JE2+5m9AiS0PV9wPUHH4arA+bU8ePV+27ED j5DMZwoXfok8jJebkItFhjGwdEsxXBqfW0BEO947Z8si3jlfmSeeE+WIbx6OsM7YCgIHZWH6jhZ Wye7qXNobVxb0XQJCm8+NY0MG+f8pFduj6cHwdeeDzEdn6aXefxyu7ObJmcZG45U7I/3njZxBtI K8OJN1XNTNwGPqh1eTPuZsHk1mkJy7d+iZxlcABDdzYtSftQc= X-Gm-Gg: Acq92OEzi2zlwj8JnyIQkkv1vwWPAyqxXCMkZ3H9mjd+ZOqAkr3tf4Nk1rmEdGaIt/8 53r7Z+vDIMY9ZSDkvBEz2DhAjIgxeLErXmsZrS6o1I+7Ztp60KdsShR/PcRWU8/XKglIsfF58Fs CGg3qVZ9C+AOiRaq7r/UB1e2F75ZvvOKf7A9k+KQES2zKpegVhgCmw6j3EYI1sa6DuoHu2BziRV lYXDPfeRW6A7i4/ZRghdYCfy6sv7AK4P9f1MaOUqwvulku84f7L1HOA1cUa3obFnvuF13J6YMAF S45NcS9aOjybI9s/KmdcGKOmoiDEFvx/AHQOeS1ltXVhaq2y2cxdgHpznXwQNr61hDwOdmEDlaj AB/GnA4NkF/TvSehKryNz+2dbbFs4fKLNFPHsbJTSONE= X-Received: by 2002:a05:600c:c0c8:b0:490:ba0a:1178 with SMTP id 5b1f17b1804b1-492333ee1dcmr12369445e9.28.1781639247772; Tue, 16 Jun 2026 12:47:27 -0700 (PDT) X-Received: by 2002:a05:600c:c0c8:b0:490:ba0a:1178 with SMTP id 5b1f17b1804b1-492333ee1dcmr12369025e9.28.1781639247067; Tue, 16 Jun 2026 12:47:27 -0700 (PDT) Received: from localhost (92.40.184.41.threembb.co.uk. [92.40.184.41]) by smtp.gmail.com with ESMTPSA id 5b1f17b1804b1-49230a45b30sm83045185e9.2.2026.06.16.12.47.24 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256); Tue, 16 Jun 2026 12:47:24 -0700 (PDT) From: Andrew Burgess To: gdb-patches@sourceware.org Cc: Guinevere Larsen , Pedro Alves , Andrew Burgess , Eli Zaretskii Subject: [PATCHv3 2/4] gdb: introduce program_space::get_entry_point_info function Date: Tue, 16 Jun 2026 20:47:15 +0100 Message-Id: X-Mailer: git-send-email 2.25.4 In-Reply-To: References: MIME-Version: 1.0 X-Mimecast-Spam-Score: 0 X-Mimecast-MFC-PROC-ID: yHbRlFfKonuBSR9_wlP2T_DmezhE3LhyXGeBp5VBKaY_1781639248 X-Mimecast-Originator: redhat.com Content-Transfer-Encoding: 8bit content-type: text/plain; charset="US-ASCII"; x-default=true X-BeenThere: gdb-patches@sourceware.org X-Mailman-Version: 2.1.30 Precedence: list List-Id: Gdb-patches mailing list List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: gdb-patches-bounces~public-inbox=simark.ca@sourceware.org I noticed that when debugging a dynamically linked executable, if I started the inferior with 'starti' then used 'bt' I would see some bogus frames: (gdb) starti Starting program: /tmp/hello Program stopped. 0x00007ffff7fd3110 in _start () from /lib64/ld-linux-x86-64.so.2 (gdb) bt #0 0x00007ffff7fd3110 in _start () from /lib64/ld-linux-x86-64.so.2 #1 0x0000000000000001 in ?? () #2 0x00007fffffffac13 in ?? () #3 0x0000000000000000 in ?? () (gdb) This surprised me as 'backtrace past-entry' was off: (gdb) show backtrace past-entry Whether backtraces should continue past the entry point of a program is off. I was expecting GDB to stop the backtrace at the inferior's entry address. Frame unwinding starts in get_prev_frame, and in here we find this block: if (this_frame->level >= 0 && get_frame_type (this_frame) == NORMAL_FRAME && !user_set_backtrace_options.backtrace_past_entry && frame_pc.has_value () && inside_entry_func (this_frame)) { frame_debug_got_null_frame (this_frame, "inside entry func"); return NULL; } Which uses inside_entry_func to terminate the backtrace when we reach the entry frame. The inside_entry_func function calls current_program_space->exec_entry_point_address_if_available and uses the result to figure out if we are in the entry frame. And here the problem becomes obvious, we are only checking if we are in the "entry frame" for the main executable, not for the inferior as a whole. And indeed, if I compile the same test program as a static binary, where there will be no run-time linker, and the entry point of the executable is the entry point for the inferior, then the 'bt' problem I saw above goes away. This suggests, I think, that we need to track two different entry addresses, the entry address for the executable file, and the entry address for the entire inferior. Then, for dynamically linked executables, these two addresses can be different, the former will still be the same address within the main executable file, while the latter will be the address of the entry point within the run-time linker. If we had this information then we could extend inside_entry_func to check both addresses, and the 'bt' problem seen above will be resolved. To make this information available I added a new solib_ops method, solib_ops::inferior_entry_point_address, for svr4 targets this figures out if the main executable is dynamically linked, and if it is, uses the AT_BASE auxv entry and the entry address pulled from the ELF header to compute the inferior entry address. I then added program_space::get_entry_point_info, which returns a struct containing the two entry point addresses, one comes from the new solib_ops method, and one comes from the existing method program_space::exec_entry_point_address_if_available. With the infrastructure in place I can then update inside_entry_func to check against both entry addresses. To aid in debugging GDB, I added a new maintenance command: maintenance info entry-address which just calls program_space::get_entry_point_info and then prints the two addresses. I left this as a maintenance command as I don't see much user utility in this right now, but it made it easier for me to see what GDB was doing, so I left the command in this commit. Reviewed-By: Eli Zaretskii --- gdb/NEWS | 7 + gdb/doc/gdb.texinfo | 22 +++ gdb/frame.c | 10 +- gdb/progspace.c | 60 ++++++++ gdb/progspace.h | 48 ++++++ gdb/solib-svr4.c | 85 +++++++++++ gdb/solib-svr4.h | 1 + gdb/solib.h | 14 ++ gdb/testsuite/gdb.base/bt-after-starti.exp | 167 +++++++++++++++++++++ gdb/testsuite/lib/gdb.exp | 8 + 10 files changed, 417 insertions(+), 5 deletions(-) create mode 100644 gdb/testsuite/gdb.base/bt-after-starti.exp diff --git a/gdb/NEWS b/gdb/NEWS index d5214a98a57..99c9fb6999c 100644 --- a/gdb/NEWS +++ b/gdb/NEWS @@ -146,6 +146,13 @@ disable skip These are new aliases for 'skip delete', 'skip enable', and 'skip disable' respectively. +maint info entry-address + Display the inferior and main executable entry addresses for the + current inferior. The inferior entry address is the address of the + first instruction in the inferior that was executed. The main + executable entry address is the address of the first instruction in + the main executable that was executed. + * MI changes ** The "-trace-save" command no longer supports the "-ctf" flag. diff --git a/gdb/doc/gdb.texinfo b/gdb/doc/gdb.texinfo index a698b2b8451..4c0c4709a23 100644 --- a/gdb/doc/gdb.texinfo +++ b/gdb/doc/gdb.texinfo @@ -43212,6 +43212,28 @@ Maintenance Commands Ignoring SystemTap probe libc longjmp in /lib64/libc.so.6.^M Ignoring SystemTap probe libc longjmp in /lib64/libc.so.6.^M @end smallexample + +@kindex maint info entry-address +@item maint info entry-address +Display the entry addresses for the currently selected inferior. Two +addresses are displayed, the inferior entry address and the executable +entry address. + +Neither address is the address of @code{main}. When a program is +started, low-level startup code (typically a function called +@code{_start}) runs before @code{main} is called. + +The executable entry address is the address of this startup code +within the main executable (@pxref{Files, ,Commands to Specify +Files}). + +The inferior entry address is the address of the very first +instruction executed when the inferior is started. For statically +linked programs this is the same as the executable entry address. For +dynamically linked programs the run-time linker must execute first in +order to load shared libraries, so the inferior entry address will be +an address within the run-time linker rather than within the main +executable. @end table The following command is useful for non-interactive invocations of diff --git a/gdb/frame.c b/gdb/frame.c index f5a6a8919df..3920d8d03f7 100644 --- a/gdb/frame.c +++ b/gdb/frame.c @@ -2699,12 +2699,12 @@ inside_main_func (const frame_info_ptr &this_frame) static bool inside_entry_func (const frame_info_ptr &this_frame) { - std::optional entry_point - = current_program_space->exec_entry_point_address_if_available (); - if (!entry_point.has_value ()) - return false; + const program_space::entry_point_info &ep_info + = current_program_space->get_entry_point_info (); - return get_frame_func (this_frame) == *entry_point; + CORE_ADDR frame_func_addr = get_frame_func (this_frame); + return (ep_info.exec_entry_address () == frame_func_addr + || ep_info.inferior_entry_address () == frame_func_addr); } /* Return a structure containing various interesting information about diff --git a/gdb/progspace.c b/gdb/progspace.c index 0e8516f4640..26e16cae8d0 100644 --- a/gdb/progspace.c +++ b/gdb/progspace.c @@ -26,6 +26,7 @@ #include #include "cli/cli-style.h" #include "observable.h" +#include "arch-utils.h" /* The last program space number assigned. */ static int last_program_space_num = 0; @@ -288,6 +289,55 @@ program_space::exec_entry_point_address () const /* See progspace.h. */ +program_space::entry_point_info +program_space::get_entry_point_info () const +{ + std::optional exec_entry_address + = this->exec_entry_point_address_if_available (); + + std::optional inferior_entry_address; + if (m_solib_ops != nullptr) + inferior_entry_address = m_solib_ops->inferior_entry_point_address (); + + return entry_point_info (std::move (inferior_entry_address), + std::move (exec_entry_address)); +} + +/* Implement the 'maint info entry-address' command. */ + +static void +maintenance_info_entry_address (const char *args, int from_tty) +{ + if (args != nullptr && *args != '\0') + error (_("unknown argument: %s"), args); + + struct gdbarch *gdbarch = get_current_arch (); + + const program_space::entry_point_info &ep_info + = current_program_space->get_entry_point_info (); + + /* Display a single entry address ADDR with TITLE as a description. */ + auto display_entry_address + = [&gdbarch] (const char *title, + const std::optional &addr) -> void + { + gdb_puts (title); + if (addr.has_value ()) + fputs_styled (paddress (gdbarch, addr.value ()), + address_style.style (), gdb_stdout); + else + fputs_styled ("", metadata_style.style (), gdb_stdout); + gdb_puts ("\n"); + }; + + display_entry_address (_("Inferior entry address: "), + ep_info.inferior_entry_address ()); + display_entry_address (_("Executable entry address: "), + ep_info.exec_entry_address ()); +} + +/* See progspace.h. */ + bool program_space::has_partial_symbols () { @@ -498,6 +548,16 @@ initialize_progspace () _("Info about currently known program spaces."), &maintenanceinfolist); + add_cmd ("entry-address", class_maintenance, + maintenance_info_entry_address, + _("Information about the current inferior's entry addresses.\n\ +Display the address of the first instruction executed within the\n\ +inferior, and the first instruction executed within the main executable.\n\ +The entry address of the whole inferior will be prior to the\n\ +inferior starting, and either or both addresses can be if\n\ +GDB is unable to find the required information."), + &maintenanceinfolist); + /* There's always one program space. Note that this function isn't an automatic _initialize_foo function, since other _initialize_foo routines may need to install their per-pspace diff --git a/gdb/progspace.h b/gdb/progspace.h index 1ae1e42f3bb..d75379fe621 100644 --- a/gdb/progspace.h +++ b/gdb/progspace.h @@ -323,6 +323,54 @@ struct program_space return m_target_sections; } + /* Class for tracking two possible entry points that an inferior might + have, the entry point for the entire inferior, and the entry point + within the main executable. */ + struct entry_point_info + { + explicit entry_point_info (std::optional inferior_entry_address, + std::optional exec_entry_address) + : m_inferior_entry_address (std::move (inferior_entry_address)), + m_exec_entry_address (std::move (exec_entry_address)) + { /* Nothing. */ } + + DISABLE_COPY_AND_ASSIGN (entry_point_info); + + /* The entry address within the inferior as a whole. See the member + variable definition below for more details. */ + const std::optional &inferior_entry_address () const + { + return m_inferior_entry_address; + } + + /* The entry address within the main executable. See the member + variable definition below for more details. */ + const std::optional &exec_entry_address () const + { + return m_exec_entry_address; + } + + private: + /* The entry address within the inferior. This can be outside of the + main executable, e.g. for dynamically linked executables this could + be the entry address for the run-time linker. For statically linked + executables this will be the entry address of the main executable. + This can be empty if GDB doesn't know how to figure out the correct + entry address for any reason. */ + std::optional m_inferior_entry_address; + + /* The entry address within the main executable. This can be empty if + the main executable is not set yet, or GDB doesn't have an objfile + associated with the main executable, e.g. in some attach, or remote + debug cases. */ + std::optional m_exec_entry_address; + }; + + /* Return information about the entry point in the main executable, and + the entry point for the inferior, which might be different from the + main executable. */ + entry_point_info get_entry_point_info () const; + /* If there is a valid and known entry point in the main executable of this program space, return it. Otherwise return an empty optional. */ std::optional exec_entry_point_address_if_available () const; diff --git a/gdb/solib-svr4.c b/gdb/solib-svr4.c index 8e3de4d3ea1..12f3e783744 100644 --- a/gdb/solib-svr4.c +++ b/gdb/solib-svr4.c @@ -3777,6 +3777,91 @@ svr4_solib_ops::get_solibs_in_ns (int nsid) const return ns_solibs; } +/* See solib.h. */ + +std::optional +svr4_solib_ops::inferior_entry_point_address () const +{ + std::optional interp_name_holder + = svr4_find_program_interpreter (); + + /* No interpreter means this is a static executable. Ask the + program_space for the entry address within the main executable. */ + if (!interp_name_holder.has_value ()) + return m_pspace->exec_entry_point_address_if_available (); + + /* For a dynamically linked executable the inferior's true entry point + is the entry point of the dynamic linker. We find this using the + AT_BASE auxiliary vector entry, which gives the dynamic linker's + load address, combined with e_entry address pulled from the + inferior. We assume that the ELF header can be read from AT_BASE. */ + CORE_ADDR at_base_addr; + if (target_auxv_search (AT_BASE, &at_base_addr) <= 0) + return {}; + + /* Determine ELF architecture type. Use the size of a program header + entry to determine which ELF header we can expect to find. */ + size_t e_entry_offset = 0; + size_t e_entry_size = 0; + CORE_ADDR at_phent; + if (target_auxv_search (AT_PHENT, &at_phent) <= 0) + return {}; + if (at_phent == sizeof (Elf32_External_Phdr)) + { + e_entry_offset = offsetof (Elf32_External_Ehdr, e_entry); + e_entry_size = 4; + } + else if (at_phent == sizeof (Elf64_External_Phdr)) + { + e_entry_offset = offsetof (Elf64_External_Ehdr, e_entry); + e_entry_size = 8; + } + else + return {}; + + /* Architecture of the current inferior. */ + gdbarch *gdbarch = current_inferior ()->arch (); + + /* Read the entry address from the ELF header at AT_BASE_ADDR. */ + CORE_ADDR e_entry; + gdb_byte buffer[sizeof (CORE_ADDR)]; + if (target_read_memory (at_base_addr + e_entry_offset, buffer, e_entry_size)) + return {}; + bfd_endian byte_order = gdbarch_byte_order (gdbarch); + e_entry = extract_unsigned_integer (buffer, e_entry_size, byte_order); + + /* Ensure AT_BASE_ADDR has proper sign in its possible upper bits so + that `+ at_base_addr' will overflow CORE_ADDR width not creating + invalid addresses like 0x101234567 for 32bit inferiors on 64bit + GDB. */ + int addr_bit = gdbarch_addr_bit (gdbarch); + if (addr_bit < (sizeof (CORE_ADDR) * HOST_CHAR_BIT)) + { + CORE_ADDR space_size = (CORE_ADDR) 1 << addr_bit; + + gdb_assert (at_base_addr < space_size); + + /* E_ENTRY exceeding SPACE_SIZE would be for prelinked + 64bit ld.so with 32bit executable, it should not happen. */ + if (e_entry < space_size + && e_entry + at_base_addr >= space_size) + at_base_addr -= space_size; + } + + /* Compute the entry address. */ + e_entry = at_base_addr + e_entry; + + /* Handle the case where E_ENTRY is a function descriptor. Also remove + any non-address (e.g. tag) bits from E_ENTRY. */ + e_entry + = gdbarch_convert_from_func_ptr_addr (gdbarch, e_entry, + current_inferior ()->top_target ()); + e_entry + = gdbarch_addr_bits_remove (gdbarch, e_entry); + + return e_entry; +} + INIT_GDB_FILE (svr4_solib) { gdb::observers::free_objfile.attach (svr4_free_objfile_observer, diff --git a/gdb/solib-svr4.h b/gdb/solib-svr4.h index 3078a092778..f76f350d951 100644 --- a/gdb/solib-svr4.h +++ b/gdb/solib-svr4.h @@ -115,6 +115,7 @@ struct svr4_solib_ops : public solib_ops void iterate_over_objfiles_in_search_order (iterate_over_objfiles_in_search_order_cb_ftype cb, objfile *current_objfile) const override; + std::optional inferior_entry_point_address () const override; /* Return the appropriate link map offsets table for the architecture. */ virtual link_map_offsets *fetch_link_map_offsets () const = 0; diff --git a/gdb/solib.h b/gdb/solib.h index 9e6c3f7346e..7ed00c63471 100644 --- a/gdb/solib.h +++ b/gdb/solib.h @@ -288,6 +288,20 @@ struct solib_ops (iterate_over_objfiles_in_search_order_cb_ftype cb, objfile *current_objfile) const; + /* Return the inferior entry point address. This isn't always the entry + point of the main executable, but will be the actual entry point where + the inferior starts (or started) executing. + + For example on SVR4 targets, for dynamically linked executables, this + will be the entry address of the dynamic linker. But for statically + linked executables, this will be the entry point of the main + executable. + + If the entry address cannot be found then an empty optional is + returned. */ + virtual std::optional inferior_entry_point_address () const + { return {}; } + protected: /* The program space for which this solib_ops was created. */ program_space *m_pspace; diff --git a/gdb/testsuite/gdb.base/bt-after-starti.exp b/gdb/testsuite/gdb.base/bt-after-starti.exp new file mode 100644 index 00000000000..6fd8a065878 --- /dev/null +++ b/gdb/testsuite/gdb.base/bt-after-starti.exp @@ -0,0 +1,167 @@ +# Copyright 2026 Free Software Foundation, Inc. +# +# This program is free software; you can redistribute it and/or modify +# it under the terms of the GNU General Public License as published by +# the Free Software Foundation; either version 3 of the License, or +# (at your option) any later version. +# +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with this program. If not, see . + +# Check that 'bt' from the very first instruction (where 'starti' +# stops GDB) doesn't display any unexpected frames. + +require !use_gdb_stub + +standard_testfile main.c + +# Build default executable, hopefully dynamically linked, but we check +# this below. +if { [build_executable "failed to build" $testfile $srcfile] } { + return +} + +# Build a statically linked executable. +set testfile_static ${testfile}-static +if { [build_executable "failed to build" $testfile_static $srcfile \ + {debug additional_flags=-static}] } { + return +} + +# Run the 'maint info entry-address' command. Expect INF_RE to match +# the inferior entry address and EXE_RE to match the executable entry +# address. TESTNAME is used as the test name. +proc check_maint_info_entry_addr { inf_re exe_re testname } { + gdb_test "maint info entry-address" \ + [multi_line \ + "Inferior entry address: ${inf_re}" \ + "Executable entry address: ${exe_re}"] \ + $testname +} + +# Use 'objdump' to extract the entry point address from TESTFILE. +proc get_exec_entry_address { testfile } { + set objdump_program [gdb_find_objdump] + set command "exec $objdump_program -f [standard_output_file $testfile]" + verbose -log "command is $command" + set result [catch {{*}$command} output] + verbose -log "result is $result" + verbose -log "output is $output" + + set testname "get_exec_entry_address" + + if {$result != 0} { + fail $testname + return "UNKNOWN" + } + + if {![regexp "\nstart address ($::hex)\n" $output trash addr]} { + fail "$testname (no entry point address header)" + return "UNKNOWN" + } + + return 0x[format %x $addr] +} + +# Start TESTFILE using 'starti'. Check if the 'backtrace' command +# prints any additional frames; we don't expect any. Create a core +# file from the running inferior. Restart GDB and load the core file, +# check that GDB can still figure out the entry addresses. +# +# When IS_DYNAMIC is true then TESTFILE is a dynamically linked +# executable, otherwise TESTFILE is statically linked. +proc run_test { testfile is_dynamic } { + clean_restart $testfile + + set exe_entry_addr [get_exec_entry_address $testfile] + + # The inferior entry address is always unknown before starting the + # inferior because GDB has no solib_ops yet, and it is only + # through that that we figure out the inferior entry address. + check_maint_info_entry_addr "" $exe_entry_addr \ + "check 'maint info entry-address' before inferior starts" + + # Start inferior with 'starti' and then wait for a prompt. + gdb_starti_cmd + gdb_test "" ".*" "prompt after starti" + + # Only svr4 targets currently support querying the inferior entry + # address. + if {[is_svr4_target]} { + set pc [get_hexadecimal_valueof "\$pc" "UNKNOWN" \ + "get current program counter"] + + if { !$is_dynamic } { + # In static binaries, the first address should be the first + # address in the executable. + gdb_assert { $pc == $exe_entry_addr } \ + "stopped at executable entry address" + } + + set inf_entry_addr $pc + } else { + set inf_entry_addr "" + } + + check_maint_info_entry_addr $inf_entry_addr $exe_entry_addr \ + "check 'maint info entry-address' after starti" + + # Allow backtrace past the entry frame, count how many frames GDB + # finds. If on this target there are no additional frames then + # the following test isn't going to tell us much, so skip it. + gdb_test_no_output "set backtrace past-entry on" + set frame_count 0 + gdb_test_multiple "bt" "count possible frames" -lbl { + -re "\r\n#($::decimal)\\s+\[^\r\n\]+(?=\r\n)" { + incr frame_count + exp_continue + } + -re "\r\n$::gdb_prompt $" { + gdb_assert { $frame_count > 0 } $gdb_test_name + } + } + + if { $frame_count > 1 } { + # Turn off backtrace past the entry frame. Use the 'bt' command, + # and check we see only a single frame. + gdb_test_no_output "set backtrace past-entry off" + gdb_test "bt" "^#0 \[^\r\n\]+" \ + "single frame when backtrace past-entry is off" + } else { + unsupported "no additional frames that GDB can hide" + } + + # Create a core file. Restart GDB. Load the core file. Check + # that 'maint info entry-address' gives the correct output. + set corefile ${::binfile}.core + if {![gdb_gcore_cmd $corefile "generate corefile"]} { + return + } + + clean_restart $testfile + + if {[gdb_core_cmd $corefile "load corefile"] != 1} { + return + } + + check_maint_info_entry_addr $inf_entry_addr $exe_entry_addr \ + "check 'maint info entry-address' after loading core file" +} + +with_test_prefix "dynamic" { + set dyln_name [section_get $binfile .interp] + if { $dyln_name eq "" } { + unsupported "couldn't find dynamic linker name" + } else { + run_test $testfile true + } +} + +with_test_prefix "static" { + run_test $testfile_static false +} diff --git a/gdb/testsuite/lib/gdb.exp b/gdb/testsuite/lib/gdb.exp index 7b1feeaac84..7a924a270f1 100644 --- a/gdb/testsuite/lib/gdb.exp +++ b/gdb/testsuite/lib/gdb.exp @@ -4188,6 +4188,14 @@ proc is_aarch64_target {} { return [expr {![is_aarch32_target]}] } +# Return true for svr4 targets, otherwise, return false. + +proc is_svr4_target {} { + return [expr {[istarget *-linux*] || [istarget *-freebsd*] + || [istarget *-netbsd*] || [istarget *-openbsd*] + || [istarget *-solaris*] || [istarget *-gnu]}] +} + # Return 1 if displaced stepping is supported on target, otherwise, return 0. proc support_displaced_stepping {} { -- 2.25.4