-# Copyright 2009, 2010, 2011 Free Software Foundation, Inc.
+# Copyright 2009-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
if ![supports_process_record] {
return
}
+if {[skip_shlib_tests]} {
+ return
+}
+
+standard_testfile solib-reverse.c
+set precsave [standard_output_file solib.precsave]
+set lib1file "shr1"
+set lib1src ${lib1file}.c
+set library1 [standard_output_file ${lib1file}.sl]
+set lib2file "shr2"
+set lib2src ${lib2file}.c
+set library2 [standard_output_file ${lib2file}.sl]
-set testfile "solib-reverse"
-set srcfile ${testfile}.c
-set libfile "shr2"
-set libsrc ${libfile}.c
-set library ${objdir}/${subdir}/${libfile}.sl
-set binfile ${objdir}/${subdir}/${testfile}
+if [get_compiler_info] {
+ return -1
+}
-if [get_compiler_info ${binfile}] {
+# Compile the first without debug info so that
+# stepping and reverse stepping doesn't end up inside them.
+if { [gdb_compile_shlib ${srcdir}/${subdir}/${lib1src} ${library1} ""] != "" } {
+ untested "failed to compile shared library 1"
return -1
}
-if { [gdb_compile_shlib ${srcdir}/${subdir}/${libsrc} ${library} "debug"] != "" } {
- untested "Could not compile shared library."
+if { [gdb_compile_shlib ${srcdir}/${subdir}/${lib2src} ${library2} "debug"] != "" } {
+ untested "failed to compile shared library 2"
return -1
}
-set exec_opts [list debug shlib=${library}]
+set exec_opts [list debug shlib=${library1} shlib=${library2}]
-if { [gdb_compile ${srcdir}/${subdir}/${srcfile} ${binfile} executable $exec_opts] != "" } {
- untested "Could not compile $binfile."
+# Attempt to prevent -Wl,-z,relro which may happen by default with some
+# toolchain configurations. Due to PR corefiles/11804 GDB will then produce
+# invalid core file.
+
+if { [gdb_compile ${srcdir}/${subdir}/${srcfile} ${binfile} executable \
+ [concat $exec_opts additional_flags=-Wl,-z,norelro]] != ""
+ && [gdb_compile ${srcdir}/${subdir}/${srcfile} ${binfile} executable $exec_opts] != "" } {
+ untested "failed to compile"
return -1
}
gdb_exit
gdb_start
+
+# Note: The test previously did "set debug-file-directory" to (try to)
+# ensure the debug info for the dynamic loader and libc weren't found.
+# This doesn't work if the debug info is in the .debug subdirectory.
+# Avoiding debug info for system libraries is not germaine to this test
+# and is no longer attempted. Instead, the test does not make assumptions
+# about whether the debug info is present or not.
+
gdb_reinitialize_dir $srcdir/$subdir
gdb_load ${binfile}
-
+gdb_load_shlib $library1
+gdb_load_shlib $library2
runto main
if [supports_process_record] {
# Activate process record/replay
- gdb_test_no_output "record" "Turn on process record"
+ gdb_test_no_output "record" "turn on process record"
}
set end_of_main [gdb_get_line_number "end of main" ]
gdb_test "break $end_of_main" \
- "Breakpoint $decimal at .*/$srcfile, line $end_of_main\." \
- "BP at end of main"
+ "Breakpoint $decimal at .*$srcfile, line $end_of_main\." \
+ "breakpoint at end of main"
gdb_test "continue" "Breakpoint .* end of main .*" "run to end of main"
-gdb_test "record save solib.precsave" \
- "Saved core file solib.precsave with execution log\." \
+gdb_test "record save $precsave" \
+ "Saved core file $precsave with execution log\." \
"save process recfile"
-gdb_test "kill" "" "Kill process, prepare to debug log file" \
+gdb_test "kill" "" "kill process, prepare to debug log file" \
"Kill the program being debugged\\? \\(y or n\\) " "y"
-gdb_test "record restore solib.precsave" \
- "Program terminated with signal .*" \
+gdb_test "record restore $precsave" \
+ "Restored records from core file .*" \
"reload core file"
#
set end_part_two [gdb_get_line_number " end part two" "$srcfile"]
gdb_test "until $end_part_one" " end part one.*" "run until end part one"
-gdb_test "reverse-step" " sleep three .*" "reverse-step third sleep"
-gdb_test "reverse-step" " sleep two .*" "reverse-step second sleep"
-gdb_test "reverse-step" " sleep one .*" \
- "reverse-step first sleep, dynsym resolve"
+gdb_test "reverse-step" " shr1 three .*" "reverse-step third shr1"
+gdb_test "reverse-step" " shr1 two .*" "reverse-step second shr1"
+gdb_test "reverse-step" " shr1 one .*" "reverse-step first shr1"
-gdb_test "reverse-step" " printf three .*" "reverse-step third printf"
-gdb_test "reverse-step" " printf two .*" "reverse-step second printf"
-gdb_test "reverse-step" " printf one .*" \
- "reverse-step first printf, dynsym resolve"
gdb_test "reverse-step" " generic statement.*" "reverse-step generic"
gdb_test "until $end_part_one" " end part one.*" "forward to end part one"
-gdb_test "reverse-next" " sleep three .*" "reverse-next third sleep"
-gdb_test "reverse-next" " sleep two .*" "reverse-next second sleep"
-gdb_test "reverse-next" " sleep one .*" \
- "reverse-next first sleep, dynsym resolve"
+gdb_test "reverse-next" " shr1 three .*" "reverse-next third shr1"
+gdb_test "reverse-next" " shr1 two .*" "reverse-next second shr1"
+gdb_test "reverse-next" " shr1 one .*" "reverse-next first shr1"
-gdb_test "reverse-next" " printf three .*" "reverse-next third printf"
-gdb_test "reverse-next" " printf two .*" "reverse-next second printf"
-gdb_test "reverse-next" " printf one .*" \
- "reverse-next first printf, dynsym resolve"
gdb_test "reverse-next" " generic statement.*" "reverse-next generic"
# Test reverse-step into debuggable solib function
#
-gdb_test "reverse-step" "${libsrc}.*" "reverse-step into solib function one"
+gdb_test "reverse-step" "${lib2src}.*" "reverse-step into solib function one"
gdb_test "reverse-step" "return 2.x.*" "reverse-step within solib function one"
gdb_test "reverse-step" " middle part two.*" "reverse-step back to main one"
-gdb_test "reverse-step" "${libsrc}.*" "reverse-step into solib function two"
+gdb_test "reverse-step" "${lib2src}.*" "reverse-step into solib function two"
gdb_test "reverse-step" "return 2.x.*" "reverse-step within solib function two"
gdb_test "reverse-step" " begin part two.*" "reverse-step back to main two"