gdb/SOURCES/gdb-rhbz1560010-fix-asserti...

184 lines
4.6 KiB
Diff

From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
From: Sergio Durigan Junior <sergiodj@redhat.com>
Date: Fri, 11 Jan 2019 11:31:59 -0500
Subject:
gdb-rhbz1560010-fix-assertion-symbol-language-dict-language-5of5.patch
;; Fix 'Assertion `SYMBOL_LANGUAGE (sym) == DICT_LANGUAGE (dict)->la_language' failed.'
;; Keith Seitz, RHBZ#1560010.
gdb/23712: Test case for multidictionary
This is a test derived from one of the reproducers in symtab/23010.
The DIE tree used here is typical of compilations with LTO, where an
artificial parent DIE of language C99 imports DIEs of other languages.
gdb/testsuite/ChangeLog:
PR gdb/23712
PR symtab/23010
* gdb.dwarf2/multidictionary.exp: New file.
diff --git a/gdb/testsuite/gdb.dwarf2/multidictionary.exp b/gdb/testsuite/gdb.dwarf2/multidictionary.exp
new file mode 100644
--- /dev/null
+++ b/gdb/testsuite/gdb.dwarf2/multidictionary.exp
@@ -0,0 +1,157 @@
+# Copyright 2019 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/>.
+
+# A test of multi-language dictionaries, a solution to symtab/23010 et al.
+
+load_lib dwarf.exp
+
+# This test can only be run on targets which support DWARF.
+if {![dwarf2_support]} {
+ return 0
+}
+
+standard_testfile main.c .S
+
+# Create the DWARF. This is derived from the reproducer in the bug
+# mentioned above. This DIE tree is typical of compilations wtih
+# LTO enabled.
+
+set asm_file [standard_output_file $srcfile2]
+Dwarf::assemble $asm_file {
+ declare_labels D45d9 D5079 D5080 D50a9 D50af D5ab2 D5ac2 D5ace D5acf
+ declare_labels D2135f D2216a D22171 D226c4 D226ca D244ca \
+ D245da D245e6
+ declare_labels D41c21 D42025 D42045 D42038 D42045 D420b5
+
+ cu {} {
+ D45d9: compile_unit {
+ {language @DW_LANG_C_plus_plus}
+ {name "SerialPortUtils.cpp"}
+ } {
+ D5079: base_type {
+ {byte_size 1 sdata}
+ {encoding @DW_ATE_unsigned}
+ {name "char"}
+ }
+
+ D5080: const_type {
+ {type :$D5079}
+ }
+
+ D50a9: pointer_type {
+ {byte_size 4 sdata}
+ {type :$D5080}
+ }
+
+ D50af: const_type {
+ {type :$D50a9}
+ }
+
+ D5ab2: subprogram {
+ {external 1 flag}
+ {linkage_name "_Z18SerialSyncWriteStrPKc"}
+ } {
+ D5ac2: formal_parameter {
+ {name "msg"}
+ {type :$D50af}
+ }
+ D5ace: lexical_block {} {
+ D5acf: DW_TAG_variable {
+ {name "p"}
+ {type :$D50a9}
+ }
+ }
+ }
+ }
+ }
+
+ cu {} {
+ D2135f: compile_unit {
+ {language @DW_LANG_C_plus_plus}
+ {name "Main.cpp"}
+ } {
+ D2216a: base_type {
+ {byte_size 1 sdata}
+ {encoding @DW_ATE_unsigned_char}
+ {name "char"}
+ }
+
+ D22171: const_type {
+ {type :$D2216a}
+ }
+
+ D226c4: pointer_type {
+ {byte_size 4 sdata}
+ {type :$D22171}
+ }
+
+ D226ca: const_type {
+ {type :$D226c4}
+ }
+
+ D245da: subprogram {
+ {name "PrintPanicMsg"}
+ } {
+ D245e6: formal_parameter {
+ {name "msg"}
+ {type :$D226ca}
+ }
+ }
+ }
+ }
+
+ cu {} {
+ D41c21: compile_unit {
+ {language @DW_LANG_C99}
+ {name "<artificial>"}
+ } {
+ D42025: subprogram {
+ {abstract_origin %$D245da}
+ {low_pc 0x80b60 addr}
+ {high_pc 0x6c data4}
+ } {
+ D42038: formal_parameter {
+ {abstract_origin %$D245e6}
+ }
+
+ D42045: inlined_subroutine {
+ {abstract_origin %$D5ab2}
+ {low_pc 0x8060 addr}
+ {high_pc 0xc data4}
+ } {
+ D420b5: formal_parameter {
+ {abstract_origin %$D5ac2}
+ }
+ }
+ }
+ }
+ }
+}
+
+# Build the test executable.
+if {[build_executable $testfile.exp $testfile [list $asm_file $srcfile] {}] \
+ == -1} {
+ return -1
+}
+
+# We force the DIEs above to be read in via "-readnow".
+gdb_spawn_with_cmdline_opts "-readnow"
+gdb_load $binfile
+
+# All we need to do is check whether GDB is alive. Without
+# multidictionaries, it will either crash, assert, or throw an
+# internal_error.
+gdb_test "p 1" "= 1" "GDB is alive"
+