[gdb/symtab] Add set/show always-read-ctf on/off

[ This is a simplified rewrite of an earlier submission "[RFC][gdb/symtab] Add
maint set symbol-read-order", submitted here (
https://sourceware.org/pipermail/gdb-patches/2022-September/192044.html
). ]

With the test-case included in this patch, we run into:
...
(gdb) file dwarf2-and-ctf
(gdb) print var_ctf^M
'var_ctf' has unknown type; cast it to its declared type^M
...

The problem is that the executable contains both ctf and dwarf2, so the ctf
info (which contains the type information about var_ctf) is ignored.

GDB has support for handling multiple debug formats, but the common use case
for ctf is to be used when dwarf2 is not present, and gdb reflects that,
assuming that by reading ctf in addition there won't be any extra information,
so it's not worth the additional cycles and memory.

Add a new command "set/show always-read-ctf on/off", that when on forces
unconditional reading of ctf, allowing us to do:
...
(gdb) set always-read-ctf on
(gdb) file dwarf2-and-ctf
(gdb) print var_ctf^M
$2 = 2^M
...

The setting is off by default, preserving current behaviour.

A bit of background on the relevance of reading order: the formats have a
priority relationship between them, where reading earlier means lower
priority.  By reading the format with the most detail last, we ensure it has
the highest priority, which makes sure that in case there is overlapping info,
the most detailed info is found.  This explains the current reading order of
mdebug, stabs and dwarf2.

Add the unconditional reading of ctf before dwarf2, because it's less detailed
than dwarf2.  The conditional reading of ctf is still done after the attempt to
read dwarf2, necessarily so because we only know whether there's dwarf2 after
we've tried to read it.

The new command allow us to replace uses of -Wl,--strip-debug added in commit
908a926ec4e ("[gdb/testsuite] Fix ctf test-cases on openSUSE Tumbleweed") by
uses of "set always-read-ctf on", but I've left that for another commit.

Tested on x86_64-linux.

Reviewed-By: Eli Zaretskii <eliz@gnu.org>
Reviewed-By: Tom Tromey <tom@tromey.com>
This commit is contained in:
Tom de Vries 2023-03-02 10:56:40 +01:00
parent 14ade91660
commit 0d5adb56c8
6 changed files with 143 additions and 1 deletions

View File

@ -68,6 +68,11 @@ maintenance info frame-unwinders
List the frame unwinders currently in effect, starting with the highest
priority.
set always-read-ctf on|off
show always-read-ctf
When off, CTF is only read if DWARF is not present. When on, CTF is
read regardless of whether DWARF is present. Off by default.
* New convenience function "$_shell", to execute a shell command and
return the result. This lets you run shell commands in expressions.
Some examples:

View File

@ -20365,6 +20365,17 @@ location to represent a line or a statement. The @samp{PROLOGUE-END} column
indicates that a given address is an adequate place to set a breakpoint at the
first instruction following a function prologue.
@kindex set always-read-ctf [on|off]
@kindex show always-read-ctf
@cindex always-read-ctf
@cindex CTF info, when to read
@item set always-read-ctf [on|off]
@itemx show always-read-ctf
When off, CTF debug info is only read if DWARF debug info is not
present. When on, CTF debug info is read regardless of whether DWARF
debug info is present. The default value is off.
@kindex maint set symbol-cache-size
@cindex symbol cache size
@item maint set symbol-cache-size @var{size}

View File

@ -51,6 +51,10 @@
#include "gdbsupport/scoped_fd.h"
#include "debuginfod-support.h"
#include "dwarf2/public.h"
#include "cli/cli-cmds.h"
/* Whether ctf should always be read, or only if no dwarf is present. */
static bool always_read_ctf;
/* The struct elfinfo is available only during ELF symbol table and
psymtab reading. It is destroyed at the completion of psymtab-reading.
@ -1349,10 +1353,16 @@ elf_symfile_read (struct objfile *objfile, symfile_add_flags symfile_flags)
bfd_section_size (str_sect));
}
/* Read the CTF section only if there is no DWARF info. */
if (always_read_ctf && ei.ctfsect)
{
elfctf_build_psymtabs (objfile);
}
bool has_dwarf2 = elf_symfile_read_dwarf2 (objfile, symfile_flags);
/* Read the CTF section only if there is no DWARF info. */
if (!has_dwarf2 && ei.ctfsect)
if (!always_read_ctf && !has_dwarf2 && ei.ctfsect)
{
elfctf_build_psymtabs (objfile);
}
@ -1449,4 +1459,16 @@ _initialize_elfread ()
add_symtab_fns (bfd_target_elf_flavour, &elf_sym_fns);
gnu_ifunc_fns_p = &elf_gnu_ifunc_fns;
/* Add "set always-read-ctf on/off". */
add_setshow_boolean_cmd ("always-read-ctf", class_support, &always_read_ctf,
_("\
Set whether CTF is always read."),
_("\
Show whether CTF is always read."),
_("\
When off, CTF is only read if DWARF is not present. When on, CTF is read\
regardless of whether DWARF is present."),
nullptr /* set_func */, nullptr /* show_func */,
&setlist, &showlist);
}

View File

@ -0,0 +1,24 @@
/* This testcase is part of GDB, the GNU debugger.
Copyright 2023 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 <http://www.gnu.org/licenses/>. */
int var_ctf = 2;
int
foo (void)
{
return var_ctf;
}

View File

@ -0,0 +1,26 @@
/* This testcase is part of GDB, the GNU debugger.
Copyright 2023 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 <http://www.gnu.org/licenses/>. */
int var_dwarf = 1;
extern int foo ();
int
main (void)
{
return var_dwarf + foo ();
}

View File

@ -0,0 +1,54 @@
# Copyright 2023 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 <http://www.gnu.org/licenses/>.
require allow_ctf_tests
standard_testfile .c -2.c
set objfile [standard_output_file ${testfile}.o]
set objfile2 [standard_output_file ${testfile}-2.o]
set s1 ${srcdir}/${subdir}/${srcfile}
set s2 ${srcdir}/${subdir}/${srcfile2}
set opts {}
lappend opts debug
if { [gdb_compile $s1 ${objfile} object $opts] != "" } {
untested "failed to compile"
return -1
}
set opts {}
lappend opts "additional_flags=-gctf"
if { [gdb_compile $s2 ${objfile2} object $opts] != "" } {
untested "failed to compile"
return -1
}
set opts {}
lappend opts "additional_flags=-Wl,-ctf-variables"
if { [gdb_compile [list ${objfile} ${objfile2}] $binfile executable $opts] != "" } {
unsupported "failed to link"
return -1
}
clean_restart
gdb_test_no_output "set always-read-ctf on"
gdb_load $binfile
gdb_test "print var_dwarf" " = 1"
gdb_test "print var_ctf" " = 2"