Compare commits
No commits in common. "f36" and "master" have entirely different histories.
@ -1 +0,0 @@
|
|||||||
1
|
|
6
.gitignore
vendored
6
.gitignore
vendored
@ -1,4 +1,4 @@
|
|||||||
/new-fedora-release
|
/binutils-gdb
|
||||||
/gdb-libstdc++-v3-python-8.1.1-20180626.tar.xz
|
/gdb-libstdc++-v3-python-8.1.1-20180626.tar.xz
|
||||||
/gdb-12.1.tar.xz
|
/v2.0.2.tar.gz
|
||||||
/v2.0.5.tar.gz
|
/gdb-10.1.tar.xz
|
||||||
|
@ -2,296 +2,361 @@
|
|||||||
#=fedora
|
#=fedora
|
||||||
Patch001: gdb-6.3-rh-testversion-20041202.patch
|
Patch001: gdb-6.3-rh-testversion-20041202.patch
|
||||||
|
|
||||||
|
# VLA (Fortran dynamic arrays) from Intel + archer-jankratochvil-vla tests.
|
||||||
|
#=push
|
||||||
|
Patch002: gdb-vla-intel-fortran-strides.patch
|
||||||
|
|
||||||
|
#=push
|
||||||
|
Patch003: gdb-vla-intel-fortran-vla-strings.patch
|
||||||
|
|
||||||
|
#=push+jan
|
||||||
|
Patch004: gdb-vla-intel-stringbt-fix.patch
|
||||||
|
|
||||||
# Add a wrapper script to GDB that implements pstack using the
|
# Add a wrapper script to GDB that implements pstack using the
|
||||||
# --readnever option.
|
# --readnever option.
|
||||||
#=push
|
#=push
|
||||||
Patch002: gdb-6.3-gstack-20050411.patch
|
Patch005: gdb-6.3-gstack-20050411.patch
|
||||||
|
|
||||||
|
# VSYSCALL and PIE
|
||||||
|
#=fedoratest
|
||||||
|
Patch006: gdb-6.3-test-pie-20050107.patch
|
||||||
|
|
||||||
|
# Get selftest working with sep-debug-info
|
||||||
|
#=fedoratest
|
||||||
|
Patch007: gdb-6.3-test-self-20050110.patch
|
||||||
|
|
||||||
# Test support of multiple destructors just like multiple constructors
|
# Test support of multiple destructors just like multiple constructors
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch003: gdb-6.3-test-dtorfix-20050121.patch
|
Patch008: gdb-6.3-test-dtorfix-20050121.patch
|
||||||
|
|
||||||
# Fix to support executable moving
|
# Fix to support executable moving
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch004: gdb-6.3-test-movedir-20050125.patch
|
Patch009: gdb-6.3-test-movedir-20050125.patch
|
||||||
|
|
||||||
# Test sibling threads to set threaded watchpoints for x86 and x86-64
|
# Test sibling threads to set threaded watchpoints for x86 and x86-64
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch005: gdb-6.3-threaded-watchpoints2-20050225.patch
|
Patch010: gdb-6.3-threaded-watchpoints2-20050225.patch
|
||||||
|
|
||||||
# Verify printing of inherited members test
|
# Verify printing of inherited members test
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch006: gdb-6.3-inheritancetest-20050726.patch
|
Patch012: gdb-6.3-inheritancetest-20050726.patch
|
||||||
|
|
||||||
# Support TLS symbols (+`errno' suggestion if no pthread is found) (BZ 185337).
|
# Support TLS symbols (+`errno' suggestion if no pthread is found) (BZ 185337).
|
||||||
#=push+jan: It should be replaced by Infinity project.
|
#=push+jan: It should be replaced by Infinity project.
|
||||||
Patch007: gdb-6.5-bz185337-resolve-tls-without-debuginfo-v2.patch
|
Patch013: gdb-6.5-bz185337-resolve-tls-without-debuginfo-v2.patch
|
||||||
|
|
||||||
# Fix TLS symbols resolving for shared libraries with a relative pathname.
|
# Fix TLS symbols resolving for shared libraries with a relative pathname.
|
||||||
# The testsuite needs `gdb-6.5-tls-of-separate-debuginfo.patch'.
|
# The testsuite needs `gdb-6.5-tls-of-separate-debuginfo.patch'.
|
||||||
#=fedoratest: One should recheck if it is really fixed upstream.
|
#=fedoratest: One should recheck if it is really fixed upstream.
|
||||||
Patch008: gdb-6.5-sharedlibrary-path.patch
|
Patch014: gdb-6.5-sharedlibrary-path.patch
|
||||||
|
|
||||||
# Improved testsuite results by the testsuite provided by the courtesy of BEA.
|
# Improved testsuite results by the testsuite provided by the courtesy of BEA.
|
||||||
#=fedoratest: For upstream it should be rewritten as a dejagnu test, the test of no "??" was useful.
|
#=fedoratest: For upstream it should be rewritten as a dejagnu test, the test of no "??" was useful.
|
||||||
Patch009: gdb-6.5-BEA-testsuite.patch
|
Patch015: gdb-6.5-BEA-testsuite.patch
|
||||||
|
|
||||||
# Testcase for deadlocking on last address space byte; for corrupted backtraces.
|
# Testcase for deadlocking on last address space byte; for corrupted backtraces.
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch010: gdb-6.5-last-address-space-byte-test.patch
|
Patch016: gdb-6.5-last-address-space-byte-test.patch
|
||||||
|
|
||||||
# Fix readline segfault on excessively long hand-typed lines.
|
# Fix readline segfault on excessively long hand-typed lines.
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch011: gdb-6.5-readline-long-line-crash-test.patch
|
Patch017: gdb-6.5-readline-long-line-crash-test.patch
|
||||||
|
|
||||||
# Test sideeffects of skipping ppc .so libs trampolines (BZ 218379).
|
# Test sideeffects of skipping ppc .so libs trampolines (BZ 218379).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch012: gdb-6.5-bz218379-ppc-solib-trampoline-test.patch
|
Patch018: gdb-6.5-bz218379-ppc-solib-trampoline-test.patch
|
||||||
|
|
||||||
|
# Fix lockup on trampoline vs. its function lookup; unreproducible (BZ 218379).
|
||||||
|
#=fedora
|
||||||
|
Patch019: gdb-6.5-bz218379-solib-trampoline-lookup-lock-fix.patch
|
||||||
|
|
||||||
# Find symbols properly at their original (included) file (BZ 109921).
|
# Find symbols properly at their original (included) file (BZ 109921).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch013: gdb-6.5-bz109921-DW_AT_decl_file-test.patch
|
Patch020: gdb-6.5-bz109921-DW_AT_decl_file-test.patch
|
||||||
|
|
||||||
# Update PPC unwinding patches to their upstream variants (BZ 140532).
|
# Update PPC unwinding patches to their upstream variants (BZ 140532).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch014: gdb-6.3-bz140532-ppc-unwinding-test.patch
|
Patch021: gdb-6.3-bz140532-ppc-unwinding-test.patch
|
||||||
|
|
||||||
# Testcase for exec() from threaded program (BZ 202689).
|
# Testcase for exec() from threaded program (BZ 202689).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch015: gdb-6.3-bz202689-exec-from-pthread-test.patch
|
Patch022: gdb-6.3-bz202689-exec-from-pthread-test.patch
|
||||||
|
|
||||||
# Testcase for PPC Power6/DFP instructions disassembly (BZ 230000).
|
# Testcase for PPC Power6/DFP instructions disassembly (BZ 230000).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch016: gdb-6.6-bz230000-power6-disassembly-test.patch
|
Patch023: gdb-6.6-bz230000-power6-disassembly-test.patch
|
||||||
|
|
||||||
# Allow running `/usr/bin/gcore' with provided but inaccessible tty (BZ 229517).
|
# Allow running `/usr/bin/gcore' with provided but inaccessible tty (BZ 229517).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch017: gdb-6.6-bz229517-gcore-without-terminal.patch
|
Patch024: gdb-6.6-bz229517-gcore-without-terminal.patch
|
||||||
|
|
||||||
# Avoid too long timeouts on failing cases of "annota1.exp annota3.exp".
|
# Avoid too long timeouts on failing cases of "annota1.exp annota3.exp".
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch018: gdb-6.6-testsuite-timeouts.patch
|
Patch025: gdb-6.6-testsuite-timeouts.patch
|
||||||
|
|
||||||
# Support for stepping over PPC atomic instruction sequences (BZ 237572).
|
# Support for stepping over PPC atomic instruction sequences (BZ 237572).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch019: gdb-6.6-bz237572-ppc-atomic-sequence-test.patch
|
Patch026: gdb-6.6-bz237572-ppc-atomic-sequence-test.patch
|
||||||
|
|
||||||
# Test kernel VDSO decoding while attaching to an i386 process.
|
|
||||||
#=fedoratest
|
|
||||||
Patch020: gdb-6.3-attach-see-vdso-test.patch
|
|
||||||
|
|
||||||
# Test leftover zombie process (BZ 243845).
|
# Test leftover zombie process (BZ 243845).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch021: gdb-6.5-bz243845-stale-testing-zombie-test.patch
|
Patch028: gdb-6.5-bz243845-stale-testing-zombie-test.patch
|
||||||
|
|
||||||
# New locating of the matching binaries from the pure core file (build-id).
|
# New locating of the matching binaries from the pure core file (build-id).
|
||||||
#=push+jan
|
#=push+jan
|
||||||
Patch022: gdb-6.6-buildid-locate.patch
|
Patch029: gdb-6.6-buildid-locate.patch
|
||||||
|
|
||||||
# Fix loading of core files without build-ids but with build-ids in executables.
|
# Fix loading of core files without build-ids but with build-ids in executables.
|
||||||
# Load strictly build-id-checked core files only if no executable is specified
|
# Load strictly build-id-checked core files only if no executable is specified
|
||||||
# (Jan Kratochvil, RH BZ 1339862).
|
# (Jan Kratochvil, RH BZ 1339862).
|
||||||
#=push+jan
|
#=push+jan
|
||||||
Patch023: gdb-6.6-buildid-locate-solib-missing-ids.patch
|
Patch030: gdb-6.6-buildid-locate-solib-missing-ids.patch
|
||||||
|
|
||||||
#=push+jan
|
#=push+jan
|
||||||
Patch024: gdb-6.6-buildid-locate-rpm.patch
|
Patch031: gdb-6.6-buildid-locate-rpm.patch
|
||||||
|
|
||||||
# Fix displaying of numeric char arrays as strings (BZ 224128).
|
# Fix displaying of numeric char arrays as strings (BZ 224128).
|
||||||
#=fedoratest: But it is failing anyway, one should check the behavior more.
|
#=fedoratest: But it is failing anyway, one should check the behavior more.
|
||||||
Patch025: gdb-6.7-charsign-test.patch
|
Patch032: gdb-6.7-charsign-test.patch
|
||||||
|
|
||||||
# Test PPC hiding of call-volatile parameter register.
|
# Test PPC hiding of call-volatile parameter register.
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch026: gdb-6.7-ppc-clobbered-registers-O2-test.patch
|
Patch033: gdb-6.7-ppc-clobbered-registers-O2-test.patch
|
||||||
|
|
||||||
# Testsuite fixes for more stable/comparable results.
|
# Testsuite fixes for more stable/comparable results.
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch027: gdb-6.7-testsuite-stable-results.patch
|
Patch034: gdb-6.7-testsuite-stable-results.patch
|
||||||
|
|
||||||
# Test ia64 memory leaks of the code using libunwind.
|
# Test ia64 memory leaks of the code using libunwind.
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch028: gdb-6.5-ia64-libunwind-leak-test.patch
|
Patch035: gdb-6.5-ia64-libunwind-leak-test.patch
|
||||||
|
|
||||||
# Test hiding unexpected breakpoints on intentional step commands.
|
# Test hiding unexpected breakpoints on intentional step commands.
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch029: gdb-6.5-missed-trap-on-step-test.patch
|
Patch036: gdb-6.5-missed-trap-on-step-test.patch
|
||||||
|
|
||||||
# Test gcore memory and time requirements for large inferiors.
|
|
||||||
#=fedoratest
|
|
||||||
Patch030: gdb-6.5-gcore-buffer-limit-test.patch
|
|
||||||
|
|
||||||
# Test GCORE for shmid 0 shared memory mappings.
|
# Test GCORE for shmid 0 shared memory mappings.
|
||||||
#=fedoratest: But it is broken anyway, sometimes the case being tested is not reproducible.
|
#=fedoratest: But it is broken anyway, sometimes the case being tested is not reproducible.
|
||||||
Patch031: gdb-6.3-mapping-zero-inode-test.patch
|
Patch038: gdb-6.3-mapping-zero-inode-test.patch
|
||||||
|
|
||||||
# Test a crash on `focus cmd', `focus prev' commands.
|
# Test a crash on `focus cmd', `focus prev' commands.
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch032: gdb-6.3-focus-cmd-prev-test.patch
|
Patch039: gdb-6.3-focus-cmd-prev-test.patch
|
||||||
|
|
||||||
# Test various forms of threads tracking across exec() (BZ 442765).
|
# Test various forms of threads tracking across exec() (BZ 442765).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch033: gdb-6.8-bz442765-threaded-exec-test.patch
|
Patch040: gdb-6.8-bz442765-threaded-exec-test.patch
|
||||||
|
|
||||||
# Test a crash on libraries missing the .text section.
|
# Test a crash on libraries missing the .text section.
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch034: gdb-6.5-section-num-fixup-test.patch
|
Patch041: gdb-6.5-section-num-fixup-test.patch
|
||||||
|
|
||||||
# Fix resolving of variables at locations lists in prelinked libs (BZ 466901).
|
# Fix resolving of variables at locations lists in prelinked libs (BZ 466901).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch035: gdb-6.8-bz466901-backtrace-full-prelinked.patch
|
Patch042: gdb-6.8-bz466901-backtrace-full-prelinked.patch
|
||||||
|
|
||||||
# New test for step-resume breakpoint placed in multiple threads at once.
|
# New test for step-resume breakpoint placed in multiple threads at once.
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch036: gdb-simultaneous-step-resume-breakpoint-test.patch
|
Patch043: gdb-simultaneous-step-resume-breakpoint-test.patch
|
||||||
|
|
||||||
# Fix GNU/Linux core open: Can't read pathname for load map: Input/output error.
|
# Fix GNU/Linux core open: Can't read pathname for load map: Input/output error.
|
||||||
# Fix regression of undisplayed missing shared libraries caused by a fix for.
|
# Fix regression of undisplayed missing shared libraries caused by a fix for.
|
||||||
#=fedoratest: It should be in glibc: libc-alpha: <20091004161706.GA27450@.*>
|
#=fedoratest: It should be in glibc: libc-alpha: <20091004161706.GA27450@.*>
|
||||||
Patch037: gdb-core-open-vdso-warning.patch
|
Patch044: gdb-core-open-vdso-warning.patch
|
||||||
|
|
||||||
|
# Fix stepping with OMP parallel Fortran sections (BZ 533176).
|
||||||
|
#=push+jan: It requires some better DWARF annotations.
|
||||||
|
Patch045: gdb-bz533176-fortran-omp-step.patch
|
||||||
|
|
||||||
# Workaround ccache making lineno non-zero for command-line definitions.
|
# Workaround ccache making lineno non-zero for command-line definitions.
|
||||||
#=fedoratest: ccache is rarely used and it is even fixed now.
|
#=fedoratest: ccache is rarely used and it is even fixed now.
|
||||||
Patch038: gdb-ccache-workaround.patch
|
Patch046: gdb-ccache-workaround.patch
|
||||||
|
|
||||||
|
#=push+jan: May get obsoleted by Tom's unrelocated objfiles patch.
|
||||||
|
Patch047: gdb-archer-pie-addons.patch
|
||||||
|
|
||||||
|
#=push+jan: Breakpoints disabling matching should not be based on address.
|
||||||
|
Patch048: gdb-archer-pie-addons-keep-disabled.patch
|
||||||
|
|
||||||
# Testcase for "Do not make up line information" fix by Daniel Jacobowitz.
|
# Testcase for "Do not make up line information" fix by Daniel Jacobowitz.
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch039: gdb-lineno-makeup-test.patch
|
Patch049: gdb-lineno-makeup-test.patch
|
||||||
|
|
||||||
# Test power7 ppc disassembly.
|
# Test power7 ppc disassembly.
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch040: gdb-ppc-power7-test.patch
|
Patch050: gdb-ppc-power7-test.patch
|
||||||
|
|
||||||
|
# Workaround non-stop moribund locations exploited by kernel utrace (BZ 590623).
|
||||||
|
#=push+jan: Currently it is still not fully safe.
|
||||||
|
Patch051: gdb-moribund-utrace-workaround.patch
|
||||||
|
|
||||||
# Fix follow-exec for C++ programs (bugreported by Martin Stransky).
|
# Fix follow-exec for C++ programs (bugreported by Martin Stransky).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch041: gdb-archer-next-over-throw-cxx-exec.patch
|
Patch052: gdb-archer-next-over-throw-cxx-exec.patch
|
||||||
|
|
||||||
# Backport DWARF-4 support (BZ 601887, Tom Tromey).
|
# Backport DWARF-4 support (BZ 601887, Tom Tromey).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch042: gdb-bz601887-dwarf4-rh-test.patch
|
Patch053: gdb-bz601887-dwarf4-rh-test.patch
|
||||||
|
|
||||||
|
#=push+jan
|
||||||
|
Patch054: gdb-6.6-buildid-locate-core-as-arg.patch
|
||||||
|
|
||||||
# Workaround librpm BZ 643031 due to its unexpected exit() calls (BZ 642879).
|
# Workaround librpm BZ 643031 due to its unexpected exit() calls (BZ 642879).
|
||||||
#=push+jan
|
#=push+jan
|
||||||
Patch043: gdb-6.6-buildid-locate-rpm-librpm-workaround.patch
|
Patch055: gdb-6.6-buildid-locate-rpm-librpm-workaround.patch
|
||||||
|
|
||||||
# [delayed-symfile] Test a backtrace regression on CFIs without DIE (BZ 614604).
|
# [delayed-symfile] Test a backtrace regression on CFIs without DIE (BZ 614604).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch044: gdb-test-bt-cfi-without-die.patch
|
Patch056: gdb-test-bt-cfi-without-die.patch
|
||||||
|
|
||||||
# Verify GDB Python built-in function gdb.solib_address exists (BZ # 634108).
|
# Verify GDB Python built-in function gdb.solib_address exists (BZ # 634108).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch045: gdb-bz634108-solib_address.patch
|
Patch057: gdb-bz634108-solib_address.patch
|
||||||
|
|
||||||
# New test gdb.arch/x86_64-pid0-core.exp for kernel PID 0 cores (BZ 611435).
|
# New test gdb.arch/x86_64-pid0-core.exp for kernel PID 0 cores (BZ 611435).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch046: gdb-test-pid0-core.patch
|
Patch058: gdb-test-pid0-core.patch
|
||||||
|
|
||||||
# [archer-tromey-delayed-symfile] New test gdb.dwarf2/dw2-aranges.exp.
|
# [archer-tromey-delayed-symfile] New test gdb.dwarf2/dw2-aranges.exp.
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch047: gdb-test-dw2-aranges.patch
|
Patch059: gdb-test-dw2-aranges.patch
|
||||||
|
|
||||||
# [archer-keiths-expr-cumulative+upstream] Import C++ testcases.
|
# [archer-keiths-expr-cumulative+upstream] Import C++ testcases.
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch048: gdb-test-expr-cumulative-archer.patch
|
Patch060: gdb-test-expr-cumulative-archer.patch
|
||||||
|
|
||||||
# Fix regressions on C++ names resolving (PR 11734, PR 12273, Keith Seitz).
|
# Fix regressions on C++ names resolving (PR 11734, PR 12273, Keith Seitz).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch049: gdb-physname-pr11734-test.patch
|
Patch061: gdb-physname-pr11734-test.patch
|
||||||
|
|
||||||
# Fix regressions on C++ names resolving (PR 11734, PR 12273, Keith Seitz).
|
# Fix regressions on C++ names resolving (PR 11734, PR 12273, Keith Seitz).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch050: gdb-physname-pr12273-test.patch
|
Patch062: gdb-physname-pr12273-test.patch
|
||||||
|
|
||||||
# Test GDB opcodes/ disassembly of Intel Ivy Bridge instructions (BZ 696890).
|
# Test GDB opcodes/ disassembly of Intel Ivy Bridge instructions (BZ 696890).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch051: gdb-test-ivy-bridge.patch
|
Patch063: gdb-test-ivy-bridge.patch
|
||||||
|
|
||||||
# Hack for proper PIE run of the testsuite.
|
# Hack for proper PIE run of the testsuite.
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch052: gdb-runtest-pie-override.patch
|
Patch064: gdb-runtest-pie-override.patch
|
||||||
|
|
||||||
|
# Print reasons for failed attach/spawn incl. SELinux deny_ptrace (BZ 786878).
|
||||||
|
#=push+jan
|
||||||
|
Patch065: gdb-attach-fail-reasons-5of5.patch
|
||||||
|
|
||||||
# Workaround PR libc/14166 for inferior calls of strstr.
|
# Workaround PR libc/14166 for inferior calls of strstr.
|
||||||
#=fedoratest: Compatibility with RHELs (unchecked which ones).
|
#=fedoratest: Compatibility with RHELs (unchecked which ones).
|
||||||
Patch053: gdb-glibc-strstr-workaround.patch
|
Patch066: gdb-glibc-strstr-workaround.patch
|
||||||
|
|
||||||
# Include testcase for `Unable to see a variable inside a module (XLF)' (BZ 823789).
|
# Include testcase for `Unable to see a variable inside a module (XLF)' (BZ 823789).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch054: gdb-rhel5.9-testcase-xlf-var-inside-mod.patch
|
Patch067: gdb-rhel5.9-testcase-xlf-var-inside-mod.patch
|
||||||
|
|
||||||
# Testcase for `Setting solib-absolute-prefix breaks vDSO' (BZ 818343).
|
# Testcase for `Setting solib-absolute-prefix breaks vDSO' (BZ 818343).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch055: gdb-rhbz-818343-set-solib-absolute-prefix-testcase.patch
|
Patch068: gdb-rhbz-818343-set-solib-absolute-prefix-testcase.patch
|
||||||
|
|
||||||
# Import regression test for `gdb/findvar.c:417: internal-error:
|
# Import regression test for `gdb/findvar.c:417: internal-error:
|
||||||
# read_var_value: Assertion `frame' failed.' (RH BZ 947564) from RHEL 6.5.
|
# read_var_value: Assertion `frame' failed.' (RH BZ 947564) from RHEL 6.5.
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch056: gdb-rhbz947564-findvar-assertion-frame-failed-testcase.patch
|
Patch069: gdb-rhbz947564-findvar-assertion-frame-failed-testcase.patch
|
||||||
|
|
||||||
|
# Fix crash of -readnow /usr/lib/debug/usr/bin/gnatbind.debug (BZ 1069211).
|
||||||
|
#=push+jan
|
||||||
|
Patch070: gdb-gnat-dwarf-crash-3of3.patch
|
||||||
|
|
||||||
# Fix 'memory leak in infpy_read_memory()' (RH BZ 1007614)
|
# Fix 'memory leak in infpy_read_memory()' (RH BZ 1007614)
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch057: gdb-rhbz1007614-memleak-infpy_read_memory-test.patch
|
Patch071: gdb-rhbz1007614-memleak-infpy_read_memory-test.patch
|
||||||
|
|
||||||
# Fix 'gdb gives highly misleading error when debuginfo pkg is present,
|
# Fix 'gdb gives highly misleading error when debuginfo pkg is present,
|
||||||
# but not corresponding binary pkg' (RH BZ 981154).
|
# but not corresponding binary pkg' (RH BZ 981154).
|
||||||
#=push+jan
|
#=push+jan
|
||||||
Patch058: gdb-6.6-buildid-locate-misleading-warning-missing-debuginfo-rhbz981154.patch
|
Patch072: gdb-6.6-buildid-locate-misleading-warning-missing-debuginfo-rhbz981154.patch
|
||||||
|
|
||||||
|
#=fedoratest
|
||||||
|
Patch073: gdb-archer-vla-tests.patch
|
||||||
|
|
||||||
|
#=fedoratest
|
||||||
|
Patch074: gdb-vla-intel-tests.patch
|
||||||
|
|
||||||
|
# Continue backtrace even if a frame filter throws an exception (Phil Muldoon).
|
||||||
|
#=push
|
||||||
|
Patch075: gdb-btrobust.patch
|
||||||
|
|
||||||
# Display Fortran strings in backtraces.
|
# Display Fortran strings in backtraces.
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch059: gdb-fortran-frame-string.patch
|
Patch076: gdb-fortran-frame-string.patch
|
||||||
|
|
||||||
# Testcase for '[SAP] Recursive dlopen causes SAP HANA installer to
|
# Testcase for '[SAP] Recursive dlopen causes SAP HANA installer to
|
||||||
# crash.' (RH BZ 1156192).
|
# crash.' (RH BZ 1156192).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch060: gdb-rhbz1156192-recursive-dlopen-test.patch
|
Patch077: gdb-rhbz1156192-recursive-dlopen-test.patch
|
||||||
|
|
||||||
|
# Fix jit-reader.h for multi-lib.
|
||||||
|
#=push+jan
|
||||||
|
Patch078: gdb-jit-reader-multilib.patch
|
||||||
|
|
||||||
# Fix '`catch syscall' doesn't work for parent after `fork' is called'
|
# Fix '`catch syscall' doesn't work for parent after `fork' is called'
|
||||||
# (Philippe Waroquiers, RH BZ 1149205).
|
# (Philippe Waroquiers, RH BZ 1149205).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch061: gdb-rhbz1149205-catch-syscall-after-fork-test.patch
|
Patch079: gdb-rhbz1149205-catch-syscall-after-fork-test.patch
|
||||||
|
|
||||||
# Fix 'backport GDB 7.4 fix to RHEL 6.6 GDB' [Original Sourceware bug
|
# Fix 'backport GDB 7.4 fix to RHEL 6.6 GDB' [Original Sourceware bug
|
||||||
# description: 'C++ (and objc): Internal error on unqualified name
|
# description: 'C++ (and objc): Internal error on unqualified name
|
||||||
# re-set', PR 11657] (RH BZ 1186476).
|
# re-set', PR 11657] (RH BZ 1186476).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch062: gdb-rhbz1186476-internal-error-unqualified-name-re-set-test.patch
|
Patch080: gdb-rhbz1186476-internal-error-unqualified-name-re-set-test.patch
|
||||||
|
|
||||||
# Test 'info type-printers' Python error (RH BZ 1350436).
|
# Test 'info type-printers' Python error (RH BZ 1350436).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch063: gdb-rhbz1350436-type-printers-error.patch
|
Patch081: gdb-rhbz1350436-type-printers-error.patch
|
||||||
|
|
||||||
# Fix '[ppc64] and [s390x] wrong prologue skip on -O2 -g code' (Jan
|
# Fix '[ppc64] and [s390x] wrong prologue skip on -O2 -g code' (Jan
|
||||||
# Kratochvil, RH BZ 1084404).
|
# Kratochvil, RH BZ 1084404).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch064: gdb-rhbz1084404-ppc64-s390x-wrong-prologue-skip-O2-g-3of3.patch
|
Patch082: gdb-rhbz1084404-ppc64-s390x-wrong-prologue-skip-O2-g-3of3.patch
|
||||||
|
|
||||||
|
# Never kill PID on: gdb exec PID (Jan Kratochvil, RH BZ 1219747).
|
||||||
|
#=push+jan
|
||||||
|
Patch083: gdb-bz1219747-attach-kills.patch
|
||||||
|
|
||||||
# Force libncursesw over libncurses to match the includes (RH BZ 1270534).
|
# Force libncursesw over libncurses to match the includes (RH BZ 1270534).
|
||||||
#=push+jan
|
#=push+jan
|
||||||
Patch065: gdb-fedora-libncursesw.patch
|
Patch084: gdb-fedora-libncursesw.patch
|
||||||
|
|
||||||
# Test clflushopt instruction decode (for RH BZ 1262471).
|
# Test clflushopt instruction decode (for RH BZ 1262471).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch066: gdb-opcodes-clflushopt-test.patch
|
Patch085: gdb-opcodes-clflushopt-test.patch
|
||||||
|
|
||||||
|
# [rhel6] DTS backward Python compatibility API (BZ 1020004, Phil Muldoon).
|
||||||
|
#=fedora
|
||||||
|
Patch086: gdb-dts-rhel6-python-compat.patch
|
||||||
|
|
||||||
# [SCL] Skip deprecated .gdb_index warning for Red Hat built files (BZ 953585).
|
# [SCL] Skip deprecated .gdb_index warning for Red Hat built files (BZ 953585).
|
||||||
#=push+jan
|
#=push+jan
|
||||||
Patch067: gdb-6.6-buildid-locate-rpm-scl.patch
|
Patch087: gdb-6.6-buildid-locate-rpm-scl.patch
|
||||||
|
|
||||||
|
# Make the GDB quit processing non-abortable to cleanup everything properly.
|
||||||
|
#=fedora: It was useful only after gdb-6.8-attach-signalled-detach-stopped.patch .
|
||||||
|
Patch088: gdb-6.8-quit-never-aborts.patch
|
||||||
|
|
||||||
# [aarch64] Fix hardware watchpoints (RH BZ 1261564).
|
# [aarch64] Fix hardware watchpoints (RH BZ 1261564).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch068: gdb-rhbz1261564-aarch64-hw-watchpoint-test.patch
|
Patch089: gdb-rhbz1261564-aarch64-hw-watchpoint-test.patch
|
||||||
|
|
||||||
# Add messages suggesting more recent RHEL gdbserver (RH BZ 1321114).
|
# Add messages suggesting more recent RHEL gdbserver (RH BZ 1321114).
|
||||||
#=fedora
|
#=fedora
|
||||||
Patch069: gdb-container-rh-pkg.patch
|
Patch090: gdb-container-rh-pkg.patch
|
||||||
|
|
||||||
# New test for Python "Cannot locate object file for block" (for RH BZ 1325795).
|
# New test for Python "Cannot locate object file for block" (for RH BZ 1325795).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch070: gdb-rhbz1325795-framefilters-test.patch
|
Patch091: gdb-rhbz1325795-framefilters-test.patch
|
||||||
|
|
||||||
# [dts+el7] [x86*] Bundle linux_perf.h for libipt (RH BZ 1256513).
|
# [dts+el7] [x86*] Bundle linux_perf.h for libipt (RH BZ 1256513).
|
||||||
#=fedora
|
#=fedora
|
||||||
Patch071: gdb-linux_perf-bundle.patch
|
Patch092: gdb-linux_perf-bundle.patch
|
||||||
|
|
||||||
# Fix gdb-headless /usr/bin/ executables (BZ 1390251).
|
# Fix gdb-headless /usr/bin/ executables (BZ 1390251).
|
||||||
#
|
#
|
||||||
@ -300,20 +365,20 @@ Patch071: gdb-linux_perf-bundle.patch
|
|||||||
#
|
#
|
||||||
# https://fedoraproject.org/wiki/Changes/Minimal_GDB_in_buildroot
|
# https://fedoraproject.org/wiki/Changes/Minimal_GDB_in_buildroot
|
||||||
#=fedora
|
#=fedora
|
||||||
Patch072: gdb-libexec-add-index.patch
|
Patch093: gdb-libexec-add-index.patch
|
||||||
|
|
||||||
# New testcase for: Fix <tab>-completion crash (Gary Benson, RH BZ 1398387).
|
# New testcase for: Fix <tab>-completion crash (Gary Benson, RH BZ 1398387).
|
||||||
#=fedoratest
|
#=fedoratest
|
||||||
Patch073: gdb-rhbz1398387-tab-crash-test.patch
|
Patch094: gdb-rhbz1398387-tab-crash-test.patch
|
||||||
|
|
||||||
|
# Python patches of: http://sourceware.org/gdb/wiki/ProjectArcher
|
||||||
|
#=push
|
||||||
|
Patch095: gdb-archer.patch
|
||||||
|
|
||||||
|
# Revert upstream commit 469412dd9ccc4de5874fd3299b105833f36b34cd
|
||||||
|
Patch096: gdb-vla-intel-fix-print-char-array.patch
|
||||||
|
|
||||||
# [s390x] Backport arch12 instructions decoding (RH BZ 1553104).
|
# [s390x] Backport arch12 instructions decoding (RH BZ 1553104).
|
||||||
# =fedoratest
|
# =fedoratest
|
||||||
Patch074: gdb-rhbz1553104-s390x-arch12-test.patch
|
Patch097: gdb-rhbz1553104-s390x-arch12-test.patch
|
||||||
|
|
||||||
|
|
||||||
Patch075: gdb-backport-readline_support.patch
|
|
||||||
|
|
||||||
# Back-port upstream commits 38665d717a and c3efaf0afd to fix
|
|
||||||
# bug 2152431.
|
|
||||||
Patch076: gdb-rhbz2152431-label-symbol-value.patch
|
|
||||||
|
|
||||||
|
@ -8,7 +8,6 @@
|
|||||||
%patch008 -p1
|
%patch008 -p1
|
||||||
%patch009 -p1
|
%patch009 -p1
|
||||||
%patch010 -p1
|
%patch010 -p1
|
||||||
%patch011 -p1
|
|
||||||
%patch012 -p1
|
%patch012 -p1
|
||||||
%patch013 -p1
|
%patch013 -p1
|
||||||
%patch014 -p1
|
%patch014 -p1
|
||||||
@ -24,7 +23,6 @@
|
|||||||
%patch024 -p1
|
%patch024 -p1
|
||||||
%patch025 -p1
|
%patch025 -p1
|
||||||
%patch026 -p1
|
%patch026 -p1
|
||||||
%patch027 -p1
|
|
||||||
%patch028 -p1
|
%patch028 -p1
|
||||||
%patch029 -p1
|
%patch029 -p1
|
||||||
%patch030 -p1
|
%patch030 -p1
|
||||||
@ -34,7 +32,6 @@
|
|||||||
%patch034 -p1
|
%patch034 -p1
|
||||||
%patch035 -p1
|
%patch035 -p1
|
||||||
%patch036 -p1
|
%patch036 -p1
|
||||||
%patch037 -p1
|
|
||||||
%patch038 -p1
|
%patch038 -p1
|
||||||
%patch039 -p1
|
%patch039 -p1
|
||||||
%patch040 -p1
|
%patch040 -p1
|
||||||
@ -74,3 +71,24 @@
|
|||||||
%patch074 -p1
|
%patch074 -p1
|
||||||
%patch075 -p1
|
%patch075 -p1
|
||||||
%patch076 -p1
|
%patch076 -p1
|
||||||
|
%patch077 -p1
|
||||||
|
%patch078 -p1
|
||||||
|
%patch079 -p1
|
||||||
|
%patch080 -p1
|
||||||
|
%patch081 -p1
|
||||||
|
%patch082 -p1
|
||||||
|
%patch083 -p1
|
||||||
|
%patch084 -p1
|
||||||
|
%patch085 -p1
|
||||||
|
%patch086 -p1
|
||||||
|
%patch087 -p1
|
||||||
|
%patch088 -p1
|
||||||
|
%patch089 -p1
|
||||||
|
%patch090 -p1
|
||||||
|
%patch091 -p1
|
||||||
|
%patch092 -p1
|
||||||
|
%patch093 -p1
|
||||||
|
%patch094 -p1
|
||||||
|
%patch095 -p1
|
||||||
|
%patch096 -p1
|
||||||
|
%patch097 -p1
|
||||||
|
@ -1 +1 @@
|
|||||||
e53a8e8685685c97588f8319d993ea6cd5635e47
|
606e3fd147ed9a00df165e46f30fe5c46dcda345
|
||||||
|
25
_patch_order
25
_patch_order
@ -1,8 +1,14 @@
|
|||||||
gdb-6.3-rh-testversion-20041202.patch
|
gdb-6.3-rh-testversion-20041202.patch
|
||||||
|
gdb-vla-intel-fortran-strides.patch
|
||||||
|
gdb-vla-intel-fortran-vla-strings.patch
|
||||||
|
gdb-vla-intel-stringbt-fix.patch
|
||||||
gdb-6.3-gstack-20050411.patch
|
gdb-6.3-gstack-20050411.patch
|
||||||
|
gdb-6.3-test-pie-20050107.patch
|
||||||
|
gdb-6.3-test-self-20050110.patch
|
||||||
gdb-6.3-test-dtorfix-20050121.patch
|
gdb-6.3-test-dtorfix-20050121.patch
|
||||||
gdb-6.3-test-movedir-20050125.patch
|
gdb-6.3-test-movedir-20050125.patch
|
||||||
gdb-6.3-threaded-watchpoints2-20050225.patch
|
gdb-6.3-threaded-watchpoints2-20050225.patch
|
||||||
|
gdb-6.3-inferior-notification-20050721.patch
|
||||||
gdb-6.3-inheritancetest-20050726.patch
|
gdb-6.3-inheritancetest-20050726.patch
|
||||||
gdb-6.5-bz185337-resolve-tls-without-debuginfo-v2.patch
|
gdb-6.5-bz185337-resolve-tls-without-debuginfo-v2.patch
|
||||||
gdb-6.5-sharedlibrary-path.patch
|
gdb-6.5-sharedlibrary-path.patch
|
||||||
@ -10,6 +16,7 @@ gdb-6.5-BEA-testsuite.patch
|
|||||||
gdb-6.5-last-address-space-byte-test.patch
|
gdb-6.5-last-address-space-byte-test.patch
|
||||||
gdb-6.5-readline-long-line-crash-test.patch
|
gdb-6.5-readline-long-line-crash-test.patch
|
||||||
gdb-6.5-bz218379-ppc-solib-trampoline-test.patch
|
gdb-6.5-bz218379-ppc-solib-trampoline-test.patch
|
||||||
|
gdb-6.5-bz218379-solib-trampoline-lookup-lock-fix.patch
|
||||||
gdb-6.5-bz109921-DW_AT_decl_file-test.patch
|
gdb-6.5-bz109921-DW_AT_decl_file-test.patch
|
||||||
gdb-6.3-bz140532-ppc-unwinding-test.patch
|
gdb-6.3-bz140532-ppc-unwinding-test.patch
|
||||||
gdb-6.3-bz202689-exec-from-pthread-test.patch
|
gdb-6.3-bz202689-exec-from-pthread-test.patch
|
||||||
@ -35,11 +42,16 @@ gdb-6.5-section-num-fixup-test.patch
|
|||||||
gdb-6.8-bz466901-backtrace-full-prelinked.patch
|
gdb-6.8-bz466901-backtrace-full-prelinked.patch
|
||||||
gdb-simultaneous-step-resume-breakpoint-test.patch
|
gdb-simultaneous-step-resume-breakpoint-test.patch
|
||||||
gdb-core-open-vdso-warning.patch
|
gdb-core-open-vdso-warning.patch
|
||||||
|
gdb-bz533176-fortran-omp-step.patch
|
||||||
gdb-ccache-workaround.patch
|
gdb-ccache-workaround.patch
|
||||||
|
gdb-archer-pie-addons.patch
|
||||||
|
gdb-archer-pie-addons-keep-disabled.patch
|
||||||
gdb-lineno-makeup-test.patch
|
gdb-lineno-makeup-test.patch
|
||||||
gdb-ppc-power7-test.patch
|
gdb-ppc-power7-test.patch
|
||||||
|
gdb-moribund-utrace-workaround.patch
|
||||||
gdb-archer-next-over-throw-cxx-exec.patch
|
gdb-archer-next-over-throw-cxx-exec.patch
|
||||||
gdb-bz601887-dwarf4-rh-test.patch
|
gdb-bz601887-dwarf4-rh-test.patch
|
||||||
|
gdb-6.6-buildid-locate-core-as-arg.patch
|
||||||
gdb-6.6-buildid-locate-rpm-librpm-workaround.patch
|
gdb-6.6-buildid-locate-rpm-librpm-workaround.patch
|
||||||
gdb-test-bt-cfi-without-die.patch
|
gdb-test-bt-cfi-without-die.patch
|
||||||
gdb-bz634108-solib_address.patch
|
gdb-bz634108-solib_address.patch
|
||||||
@ -50,27 +62,36 @@ gdb-physname-pr11734-test.patch
|
|||||||
gdb-physname-pr12273-test.patch
|
gdb-physname-pr12273-test.patch
|
||||||
gdb-test-ivy-bridge.patch
|
gdb-test-ivy-bridge.patch
|
||||||
gdb-runtest-pie-override.patch
|
gdb-runtest-pie-override.patch
|
||||||
|
gdb-attach-fail-reasons-5of5.patch
|
||||||
gdb-glibc-strstr-workaround.patch
|
gdb-glibc-strstr-workaround.patch
|
||||||
gdb-rhel5.9-testcase-xlf-var-inside-mod.patch
|
gdb-rhel5.9-testcase-xlf-var-inside-mod.patch
|
||||||
gdb-rhbz-818343-set-solib-absolute-prefix-testcase.patch
|
gdb-rhbz-818343-set-solib-absolute-prefix-testcase.patch
|
||||||
gdb-rhbz947564-findvar-assertion-frame-failed-testcase.patch
|
gdb-rhbz947564-findvar-assertion-frame-failed-testcase.patch
|
||||||
|
gdb-gnat-dwarf-crash-3of3.patch
|
||||||
gdb-rhbz1007614-memleak-infpy_read_memory-test.patch
|
gdb-rhbz1007614-memleak-infpy_read_memory-test.patch
|
||||||
gdb-6.6-buildid-locate-misleading-warning-missing-debuginfo-rhbz981154.patch
|
gdb-6.6-buildid-locate-misleading-warning-missing-debuginfo-rhbz981154.patch
|
||||||
|
gdb-archer-vla-tests.patch
|
||||||
|
gdb-vla-intel-tests.patch
|
||||||
|
gdb-btrobust.patch
|
||||||
gdb-fortran-frame-string.patch
|
gdb-fortran-frame-string.patch
|
||||||
gdb-rhbz1156192-recursive-dlopen-test.patch
|
gdb-rhbz1156192-recursive-dlopen-test.patch
|
||||||
|
gdb-jit-reader-multilib.patch
|
||||||
gdb-rhbz1149205-catch-syscall-after-fork-test.patch
|
gdb-rhbz1149205-catch-syscall-after-fork-test.patch
|
||||||
gdb-rhbz1186476-internal-error-unqualified-name-re-set-test.patch
|
gdb-rhbz1186476-internal-error-unqualified-name-re-set-test.patch
|
||||||
gdb-rhbz1350436-type-printers-error.patch
|
gdb-rhbz1350436-type-printers-error.patch
|
||||||
gdb-rhbz1084404-ppc64-s390x-wrong-prologue-skip-O2-g-3of3.patch
|
gdb-rhbz1084404-ppc64-s390x-wrong-prologue-skip-O2-g-3of3.patch
|
||||||
|
gdb-bz1219747-attach-kills.patch
|
||||||
gdb-fedora-libncursesw.patch
|
gdb-fedora-libncursesw.patch
|
||||||
gdb-opcodes-clflushopt-test.patch
|
gdb-opcodes-clflushopt-test.patch
|
||||||
|
gdb-dts-rhel6-python-compat.patch
|
||||||
gdb-6.6-buildid-locate-rpm-scl.patch
|
gdb-6.6-buildid-locate-rpm-scl.patch
|
||||||
|
gdb-6.8-quit-never-aborts.patch
|
||||||
gdb-rhbz1261564-aarch64-hw-watchpoint-test.patch
|
gdb-rhbz1261564-aarch64-hw-watchpoint-test.patch
|
||||||
gdb-container-rh-pkg.patch
|
gdb-container-rh-pkg.patch
|
||||||
gdb-rhbz1325795-framefilters-test.patch
|
gdb-rhbz1325795-framefilters-test.patch
|
||||||
gdb-linux_perf-bundle.patch
|
gdb-linux_perf-bundle.patch
|
||||||
gdb-libexec-add-index.patch
|
gdb-libexec-add-index.patch
|
||||||
gdb-rhbz1398387-tab-crash-test.patch
|
gdb-rhbz1398387-tab-crash-test.patch
|
||||||
|
gdb-archer.patch
|
||||||
|
gdb-vla-intel-fix-print-char-array.patch
|
||||||
gdb-rhbz1553104-s390x-arch12-test.patch
|
gdb-rhbz1553104-s390x-arch12-test.patch
|
||||||
gdb-backport-readline_support.patch
|
|
||||||
gdb-rhbz2152431-label-symbol-value.patch
|
|
||||||
|
19
gating.yaml
19
gating.yaml
@ -1,19 +0,0 @@
|
|||||||
--- !Policy
|
|
||||||
product_versions:
|
|
||||||
- fedora-*
|
|
||||||
decision_context: bodhi_update_push_stable
|
|
||||||
subject_type: koji_build
|
|
||||||
rules:
|
|
||||||
- !PassingTestCaseRule {test_case_name: fedora-ci.koji-build.tier0.functional}
|
|
||||||
--- !Policy
|
|
||||||
product_versions:
|
|
||||||
- rhel-8
|
|
||||||
decision_context: osci_compose_gate
|
|
||||||
rules:
|
|
||||||
- !PassingTestCaseRule {test_case_name: osci.brew-build.tier0.functional}
|
|
||||||
--- !Policy
|
|
||||||
product_versions:
|
|
||||||
- rhel-9
|
|
||||||
decision_context: osci_compose_gate
|
|
||||||
rules:
|
|
||||||
- !PassingTestCaseRule {test_case_name: osci.brew-build.tier0.functional}
|
|
@ -40,7 +40,7 @@ diff --git a/gdb/testsuite/gdb.base/attach-see-vdso.exp b/gdb/testsuite/gdb.base
|
|||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
+++ b/gdb/testsuite/gdb.base/attach-see-vdso.exp
|
+++ b/gdb/testsuite/gdb.base/attach-see-vdso.exp
|
||||||
@@ -0,0 +1,77 @@
|
@@ -0,0 +1,72 @@
|
||||||
+# Copyright 2007
|
+# Copyright 2007
|
||||||
+
|
+
|
||||||
+# This program is free software; you can redistribute it and/or modify
|
+# This program is free software; you can redistribute it and/or modify
|
||||||
@ -64,11 +64,6 @@ new file mode 100644
|
|||||||
+ return 0
|
+ return 0
|
||||||
+}
|
+}
|
||||||
+
|
+
|
||||||
+if {[use_gdb_stub]} {
|
|
||||||
+ untested "skipping test because of use_gdb_stub"
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+set testfile "attach-see-vdso"
|
+set testfile "attach-see-vdso"
|
||||||
+set srcfile ${testfile}.c
|
+set srcfile ${testfile}.c
|
||||||
+set binfile [standard_output_file ${testfile}]
|
+set binfile [standard_output_file ${testfile}]
|
||||||
|
@ -81,7 +81,7 @@ new file mode 100644
|
|||||||
+#
|
+#
|
||||||
+# You should have received a copy of the GNU General Public License
|
+# You should have received a copy of the GNU General Public License
|
||||||
+# along with this program; if not, write to the Free Software
|
+# along with this program; if not, write to the Free Software
|
||||||
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
|
||||||
+
|
+
|
||||||
+# Please email any bugs, comments, and/or additions to this file to:
|
+# Please email any bugs, comments, and/or additions to this file to:
|
||||||
+# bug-gdb@prep.ai.mit.edu
|
+# bug-gdb@prep.ai.mit.edu
|
||||||
|
@ -16,7 +16,7 @@ Subject: gdb-6.3-gstack-20050411.patch
|
|||||||
diff --git a/gdb/Makefile.in b/gdb/Makefile.in
|
diff --git a/gdb/Makefile.in b/gdb/Makefile.in
|
||||||
--- a/gdb/Makefile.in
|
--- a/gdb/Makefile.in
|
||||||
+++ b/gdb/Makefile.in
|
+++ b/gdb/Makefile.in
|
||||||
@@ -1767,7 +1767,7 @@ info install-info clean-info dvi pdf install-pdf html install-html: force
|
@@ -1726,7 +1726,7 @@ info install-info clean-info dvi pdf install-pdf html install-html: force
|
||||||
install: all
|
install: all
|
||||||
@$(MAKE) $(FLAGS_TO_PASS) install-only
|
@$(MAKE) $(FLAGS_TO_PASS) install-only
|
||||||
|
|
||||||
@ -25,7 +25,7 @@ diff --git a/gdb/Makefile.in b/gdb/Makefile.in
|
|||||||
transformed_name=`t='$(program_transform_name)'; \
|
transformed_name=`t='$(program_transform_name)'; \
|
||||||
echo gdb | sed -e "$$t"` ; \
|
echo gdb | sed -e "$$t"` ; \
|
||||||
if test "x$$transformed_name" = x; then \
|
if test "x$$transformed_name" = x; then \
|
||||||
@@ -1816,7 +1816,25 @@ install-guile:
|
@@ -1775,7 +1775,25 @@ install-guile:
|
||||||
install-python:
|
install-python:
|
||||||
$(SHELL) $(srcdir)/../mkinstalldirs $(DESTDIR)$(GDB_DATADIR)/python/gdb
|
$(SHELL) $(srcdir)/../mkinstalldirs $(DESTDIR)$(GDB_DATADIR)/python/gdb
|
||||||
|
|
||||||
@ -52,8 +52,8 @@ diff --git a/gdb/Makefile.in b/gdb/Makefile.in
|
|||||||
transformed_name=`t='$(program_transform_name)'; \
|
transformed_name=`t='$(program_transform_name)'; \
|
||||||
echo gdb | sed -e $$t` ; \
|
echo gdb | sed -e $$t` ; \
|
||||||
if test "x$$transformed_name" = x; then \
|
if test "x$$transformed_name" = x; then \
|
||||||
@@ -1847,6 +1865,18 @@ uninstall: force $(CONFIG_UNINSTALL)
|
@@ -1798,6 +1816,18 @@ uninstall: force $(CONFIG_UNINSTALL)
|
||||||
rm -f $(DESTDIR)$(bindir)/$$transformed_name
|
fi
|
||||||
@$(MAKE) DO=uninstall "DODIRS=$(SUBDIRS)" $(FLAGS_TO_PASS) subdir_do
|
@$(MAKE) DO=uninstall "DODIRS=$(SUBDIRS)" $(FLAGS_TO_PASS) subdir_do
|
||||||
|
|
||||||
+.PHONY: uninstall-gstack
|
+.PHONY: uninstall-gstack
|
||||||
|
323
gdb-6.3-inferior-notification-20050721.patch
Normal file
323
gdb-6.3-inferior-notification-20050721.patch
Normal file
@ -0,0 +1,323 @@
|
|||||||
|
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
||||||
|
From: Jeff Johnston <jjohnstn@redhat.com>
|
||||||
|
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
||||||
|
Subject: gdb-6.3-inferior-notification-20050721.patch
|
||||||
|
|
||||||
|
;; Notify observers that the inferior has been created
|
||||||
|
;;=fedoratest
|
||||||
|
|
||||||
|
2005-07-21 Jeff Johnston <jjohnstn@redhat.com>
|
||||||
|
|
||||||
|
* gdb.base/attach-32.exp: New test for attaching in 32-bit
|
||||||
|
mode on 64-bit systems.
|
||||||
|
* gdb.base/attach-32.c: Ditto.
|
||||||
|
* gdb.base/attach-32b.c: Ditto.
|
||||||
|
|
||||||
|
2007-12-26 Jan Kratochvil <jan.kratochvil@redhat.com>
|
||||||
|
|
||||||
|
* gdb.base/attach-32.exp: Fix forgotten $GDBFLAGS as set.
|
||||||
|
|
||||||
|
diff --git a/gdb/testsuite/gdb.base/attach-32.c b/gdb/testsuite/gdb.base/attach-32.c
|
||||||
|
new file mode 100644
|
||||||
|
--- /dev/null
|
||||||
|
+++ b/gdb/testsuite/gdb.base/attach-32.c
|
||||||
|
@@ -0,0 +1,20 @@
|
||||||
|
+/* This program is intended to be started outside of gdb, and then
|
||||||
|
+ attached to by gdb. Thus, it simply spins in a loop. The loop
|
||||||
|
+ is exited when & if the variable 'should_exit' is non-zero. (It
|
||||||
|
+ is initialized to zero in this program, so the loop will never
|
||||||
|
+ exit unless/until gdb sets the variable to non-zero.)
|
||||||
|
+ */
|
||||||
|
+#include <stdio.h>
|
||||||
|
+
|
||||||
|
+int should_exit = 0;
|
||||||
|
+
|
||||||
|
+int main ()
|
||||||
|
+{
|
||||||
|
+ int local_i = 0;
|
||||||
|
+
|
||||||
|
+ while (! should_exit)
|
||||||
|
+ {
|
||||||
|
+ local_i++;
|
||||||
|
+ }
|
||||||
|
+ return 0;
|
||||||
|
+}
|
||||||
|
diff --git a/gdb/testsuite/gdb.base/attach-32.exp b/gdb/testsuite/gdb.base/attach-32.exp
|
||||||
|
new file mode 100644
|
||||||
|
--- /dev/null
|
||||||
|
+++ b/gdb/testsuite/gdb.base/attach-32.exp
|
||||||
|
@@ -0,0 +1,245 @@
|
||||||
|
+# Copyright 2005 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 2 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, write to the Free Software
|
||||||
|
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
||||||
|
+#
|
||||||
|
+# This test was based on attach.exp and modified for 32/64 bit Linux systems. */
|
||||||
|
+
|
||||||
|
+# On HP-UX 11.0, this test is causing a process running the program
|
||||||
|
+# "attach" to be left around spinning. Until we figure out why, I am
|
||||||
|
+# commenting out the test to avoid polluting tiamat (our 11.0 nightly
|
||||||
|
+# test machine) with these processes. RT
|
||||||
|
+#
|
||||||
|
+# Setting the magic bit in the target app should work. I added a
|
||||||
|
+# "kill", and also a test for the R3 register warning. JB
|
||||||
|
+if { ![istarget "x86_64*-*linux*"]
|
||||||
|
+ && ![istarget "powerpc64*-*linux*"]} {
|
||||||
|
+ return 0
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+# are we on a target board
|
||||||
|
+if [is_remote target] then {
|
||||||
|
+ return 0
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+set testfile "attach-32"
|
||||||
|
+set srcfile ${testfile}.c
|
||||||
|
+set srcfile2 ${testfile}b.c
|
||||||
|
+set binfile [standard_output_file ${testfile}]
|
||||||
|
+set binfile2 [standard_output_file ${testfile}b]
|
||||||
|
+set escapedbinfile [string_to_regexp [standard_output_file ${testfile}]]
|
||||||
|
+
|
||||||
|
+#execute_anywhere "rm -f ${binfile} ${binfile2}"
|
||||||
|
+remote_exec build "rm -f ${binfile} ${binfile2}"
|
||||||
|
+# For debugging this test
|
||||||
|
+#
|
||||||
|
+#log_user 1
|
||||||
|
+
|
||||||
|
+# build the first test case
|
||||||
|
+#
|
||||||
|
+if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable [list debug "additional_flags=-m32"]] != "" } {
|
||||||
|
+ gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+# Build the in-system-call test
|
||||||
|
+
|
||||||
|
+if { [gdb_compile "${srcdir}/${subdir}/${srcfile2}" "${binfile2}" executable [list debug "additional_flags=-m32"]] != "" } {
|
||||||
|
+ gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+if [get_compiler_info ${binfile}] {
|
||||||
|
+ return -1
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+proc do_attach_tests {} {
|
||||||
|
+ global gdb_prompt
|
||||||
|
+ global binfile
|
||||||
|
+ global escapedbinfile
|
||||||
|
+ global srcfile
|
||||||
|
+ global testfile
|
||||||
|
+ global objdir
|
||||||
|
+ global subdir
|
||||||
|
+ global timeout
|
||||||
|
+ global testpid
|
||||||
|
+
|
||||||
|
+ # Verify that we can "see" the variable "should_exit" in the
|
||||||
|
+ # program, and that it is zero.
|
||||||
|
+
|
||||||
|
+ gdb_test "print should_exit" " = 0" "after attach-32, print should_exit"
|
||||||
|
+
|
||||||
|
+ # Verify that we can modify the variable "should_exit" in the
|
||||||
|
+ # program.
|
||||||
|
+
|
||||||
|
+ gdb_test "set should_exit=1" "" "after attach-32, set should_exit"
|
||||||
|
+
|
||||||
|
+ # Verify that the modification really happened.
|
||||||
|
+
|
||||||
|
+ send_gdb "tbreak 19\n"
|
||||||
|
+ gdb_expect {
|
||||||
|
+ -re "reakpoint .*at.*$srcfile, line 19.*$gdb_prompt $" {
|
||||||
|
+ pass "after attach-32, set tbreak postloop"
|
||||||
|
+ }
|
||||||
|
+ -re "$gdb_prompt $" {
|
||||||
|
+ fail "after attach-32, set tbreak postloop"
|
||||||
|
+ }
|
||||||
|
+ timeout {
|
||||||
|
+ fail "(timeout) after attach-32, set tbreak postloop"
|
||||||
|
+ }
|
||||||
|
+ }
|
||||||
|
+ send_gdb "continue\n"
|
||||||
|
+ gdb_expect {
|
||||||
|
+ -re "main.*at.*$srcfile:19.*$gdb_prompt $" {
|
||||||
|
+ pass "after attach-32, reach tbreak postloop"
|
||||||
|
+ }
|
||||||
|
+ -re "$gdb_prompt $" {
|
||||||
|
+ fail "after attach-32, reach tbreak postloop"
|
||||||
|
+ }
|
||||||
|
+ timeout {
|
||||||
|
+ fail "(timeout) after attach-32, reach tbreak postloop"
|
||||||
|
+ }
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ # Allow the test process to exit, to cleanup after ourselves.
|
||||||
|
+
|
||||||
|
+ gdb_test "continue" {\[Inferior .* exited normally\]} "after attach-32, exit"
|
||||||
|
+
|
||||||
|
+ # Make sure we don't leave a process around to confuse
|
||||||
|
+ # the next test run (and prevent the compile by keeping
|
||||||
|
+ # the text file busy), in case the "set should_exit" didn't
|
||||||
|
+ # work.
|
||||||
|
+
|
||||||
|
+ remote_exec build "kill -9 ${testpid}"
|
||||||
|
+
|
||||||
|
+ # Start the program running and then wait for a bit, to be sure
|
||||||
|
+ # that it can be attached to.
|
||||||
|
+
|
||||||
|
+ set testpid [eval exec $binfile &]
|
||||||
|
+ exec sleep 2
|
||||||
|
+ if { [istarget "*-*-cygwin*"] } {
|
||||||
|
+ # testpid is the Cygwin PID, GDB uses the Windows PID, which might be
|
||||||
|
+ # different due to the way fork/exec works.
|
||||||
|
+ set testpid [ exec ps -e | gawk "{ if (\$1 == $testpid) print \$4; }" ]
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ # Verify that we can attach to the process, and find its a.out
|
||||||
|
+ # when we're cd'd to some directory that doesn't contain the
|
||||||
|
+ # a.out. (We use the source path set by the "dir" command.)
|
||||||
|
+
|
||||||
|
+ gdb_test "dir ${objdir}/${subdir}" "Source directories searched: .*" \
|
||||||
|
+ "set source path"
|
||||||
|
+
|
||||||
|
+ gdb_test "cd /tmp" "Working directory /tmp." \
|
||||||
|
+ "cd away from process working directory"
|
||||||
|
+
|
||||||
|
+ # Explicitly flush out any knowledge of the previous attachment.
|
||||||
|
+
|
||||||
|
+ set test "before attach-32-3, flush symbols"
|
||||||
|
+ gdb_test_multiple "symbol" "$test" {
|
||||||
|
+ -re "Discard symbol table from.*y or n. $" {
|
||||||
|
+ gdb_test "y" "No symbol file now." \
|
||||||
|
+ "$test"
|
||||||
|
+ }
|
||||||
|
+ -re "No symbol file now.*$gdb_prompt $" {
|
||||||
|
+ pass "$test"
|
||||||
|
+ }
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ gdb_test "exec" "No executable file now." \
|
||||||
|
+ "before attach-32-3, flush exec"
|
||||||
|
+
|
||||||
|
+ gdb_test "attach $testpid" \
|
||||||
|
+ "Attaching to process $testpid.*Reading symbols from $escapedbinfile.*main.*at .*" \
|
||||||
|
+ "attach-32 when process' a.out not in cwd"
|
||||||
|
+
|
||||||
|
+ set test "after attach-32-3, exit"
|
||||||
|
+ gdb_test_multiple "kill" "$test" {
|
||||||
|
+ -re "Kill the program being debugged.*y or n. $" {
|
||||||
|
+ gdb_test "y" "" "$test"
|
||||||
|
+ }
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ # Another "don't leave a process around"
|
||||||
|
+ remote_exec build "kill -9 ${testpid}"
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+proc do_call_attach_tests {} {
|
||||||
|
+ global gdb_prompt
|
||||||
|
+ global binfile2
|
||||||
|
+ global testpid
|
||||||
|
+
|
||||||
|
+ # See if other registers are problems
|
||||||
|
+
|
||||||
|
+ set test "info other register"
|
||||||
|
+ gdb_test_multiple "i r r3" "$test" {
|
||||||
|
+ -re "warning: reading register.*$gdb_prompt $" {
|
||||||
|
+ fail "$test"
|
||||||
|
+ }
|
||||||
|
+ -re "r3.*$gdb_prompt $" {
|
||||||
|
+ pass "$test"
|
||||||
|
+ }
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ # Get rid of the process
|
||||||
|
+
|
||||||
|
+ gdb_test "p should_exit = 1"
|
||||||
|
+ gdb_test "c" {\[Inferior .* exited normally\]}
|
||||||
|
+
|
||||||
|
+ # Be paranoid
|
||||||
|
+
|
||||||
|
+ remote_exec build "kill -9 ${testpid}"
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+
|
||||||
|
+# Start with a fresh gdb
|
||||||
|
+
|
||||||
|
+gdb_exit
|
||||||
|
+set testpid [eval exec $binfile &]
|
||||||
|
+exec sleep 3
|
||||||
|
+if { [istarget "*-*-cygwin*"] } {
|
||||||
|
+ # testpid is the Cygwin PID, GDB uses the Windows PID, which might be
|
||||||
|
+ # different due to the way fork/exec works.
|
||||||
|
+ set testpid [ exec ps -e | gawk "{ if (\$1 == $testpid) print \$4; }" ]
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+set GDBFLAGS_orig $GDBFLAGS
|
||||||
|
+set GDBFLAGS "-iex \"set height 0\" --pid=$testpid"
|
||||||
|
+gdb_start
|
||||||
|
+set GDBFLAGS $GDBFLAGS_orig
|
||||||
|
+
|
||||||
|
+gdb_reinitialize_dir $srcdir/$subdir
|
||||||
|
+
|
||||||
|
+# This is a test of gdb's ability to attach to a running process.
|
||||||
|
+
|
||||||
|
+do_attach_tests
|
||||||
|
+
|
||||||
|
+# Test attaching when the target is inside a system call
|
||||||
|
+
|
||||||
|
+gdb_exit
|
||||||
|
+set testpid [eval exec $binfile2 &]
|
||||||
|
+exec sleep 3
|
||||||
|
+if { [istarget "*-*-cygwin*"] } {
|
||||||
|
+ # testpid is the Cygwin PID, GDB uses the Windows PID, which might be
|
||||||
|
+ # different due to the way fork/exec works.
|
||||||
|
+ set testpid [ exec ps -e | gawk "{ if (\$1 == $testpid) print \$4; }" ]
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+set GDBFLAGS_orig $GDBFLAGS
|
||||||
|
+set GDBFLAGS "-iex \"set height 0\" --pid=$testpid"
|
||||||
|
+gdb_start
|
||||||
|
+set GDBFLAGS $GDBFLAGS_orig
|
||||||
|
+
|
||||||
|
+gdb_reinitialize_dir $srcdir/$subdir
|
||||||
|
+do_call_attach_tests
|
||||||
|
+
|
||||||
|
+return 0
|
||||||
|
diff --git a/gdb/testsuite/gdb.base/attach-32b.c b/gdb/testsuite/gdb.base/attach-32b.c
|
||||||
|
new file mode 100644
|
||||||
|
--- /dev/null
|
||||||
|
+++ b/gdb/testsuite/gdb.base/attach-32b.c
|
||||||
|
@@ -0,0 +1,24 @@
|
||||||
|
+/* This program is intended to be started outside of gdb, and then
|
||||||
|
+ attached to by gdb. Thus, it simply spins in a loop. The loop
|
||||||
|
+ is exited when & if the variable 'should_exit' is non-zero. (It
|
||||||
|
+ is initialized to zero in this program, so the loop will never
|
||||||
|
+ exit unless/until gdb sets the variable to non-zero.)
|
||||||
|
+ */
|
||||||
|
+#include <stdio.h>
|
||||||
|
+#include <stdlib.h>
|
||||||
|
+#include <unistd.h>
|
||||||
|
+
|
||||||
|
+int should_exit = 0;
|
||||||
|
+
|
||||||
|
+int main ()
|
||||||
|
+{
|
||||||
|
+ int local_i = 0;
|
||||||
|
+
|
||||||
|
+ sleep( 10 ); /* System call causes register fetch to fail */
|
||||||
|
+ /* This is a known HPUX "feature" */
|
||||||
|
+ while (! should_exit)
|
||||||
|
+ {
|
||||||
|
+ local_i++;
|
||||||
|
+ }
|
||||||
|
+ return (0);
|
||||||
|
+}
|
@ -17,7 +17,7 @@ diff --git a/gdb/testsuite/gdb.cp/b146835.cc b/gdb/testsuite/gdb.cp/b146835.cc
|
|||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
+++ b/gdb/testsuite/gdb.cp/b146835.cc
|
+++ b/gdb/testsuite/gdb.cp/b146835.cc
|
||||||
@@ -0,0 +1,31 @@
|
@@ -0,0 +1,32 @@
|
||||||
+#include "b146835.h"
|
+#include "b146835.h"
|
||||||
+#include <iostream>
|
+#include <iostream>
|
||||||
+
|
+
|
||||||
@ -49,6 +49,7 @@ new file mode 100644
|
|||||||
+ F f;
|
+ F f;
|
||||||
+ f.foo();
|
+ f.foo();
|
||||||
+}
|
+}
|
||||||
|
+
|
||||||
diff --git a/gdb/testsuite/gdb.cp/b146835.exp b/gdb/testsuite/gdb.cp/b146835.exp
|
diff --git a/gdb/testsuite/gdb.cp/b146835.exp b/gdb/testsuite/gdb.cp/b146835.exp
|
||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
|
@ -27,7 +27,7 @@ diff --git a/gdb/testsuite/gdb.gdb/selftest.exp b/gdb/testsuite/gdb.gdb/selftest
|
|||||||
diff --git a/gdb/top.c b/gdb/top.c
|
diff --git a/gdb/top.c b/gdb/top.c
|
||||||
--- a/gdb/top.c
|
--- a/gdb/top.c
|
||||||
+++ b/gdb/top.c
|
+++ b/gdb/top.c
|
||||||
@@ -2234,7 +2234,7 @@ init_gdb_version_vars (void)
|
@@ -2163,7 +2163,7 @@ init_gdb_version_vars (void)
|
||||||
struct internalvar *major_version_var = create_internalvar ("_gdb_major");
|
struct internalvar *major_version_var = create_internalvar ("_gdb_major");
|
||||||
struct internalvar *minor_version_var = create_internalvar ("_gdb_minor");
|
struct internalvar *minor_version_var = create_internalvar ("_gdb_minor");
|
||||||
int vmajor = 0, vminor = 0, vrevision = 0;
|
int vmajor = 0, vminor = 0, vrevision = 0;
|
||||||
|
@ -16,7 +16,7 @@ diff --git a/gdb/testsuite/gdb.base/move-dir.c b/gdb/testsuite/gdb.base/move-dir
|
|||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
+++ b/gdb/testsuite/gdb.base/move-dir.c
|
+++ b/gdb/testsuite/gdb.base/move-dir.c
|
||||||
@@ -0,0 +1,9 @@
|
@@ -0,0 +1,10 @@
|
||||||
+#include <stdio.h>
|
+#include <stdio.h>
|
||||||
+#include <stdlib.h>
|
+#include <stdlib.h>
|
||||||
+#include "move-dir.h"
|
+#include "move-dir.h"
|
||||||
@ -26,6 +26,7 @@ new file mode 100644
|
|||||||
+ printf ("%s\n", hw);;
|
+ printf ("%s\n", hw);;
|
||||||
+ other();
|
+ other();
|
||||||
+}
|
+}
|
||||||
|
+
|
||||||
diff --git a/gdb/testsuite/gdb.base/move-dir.exp b/gdb/testsuite/gdb.base/move-dir.exp
|
diff --git a/gdb/testsuite/gdb.base/move-dir.exp b/gdb/testsuite/gdb.base/move-dir.exp
|
||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
@ -92,10 +93,11 @@ diff --git a/gdb/testsuite/gdb.base/move-dir.h b/gdb/testsuite/gdb.base/move-dir
|
|||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
+++ b/gdb/testsuite/gdb.base/move-dir.h
|
+++ b/gdb/testsuite/gdb.base/move-dir.h
|
||||||
@@ -0,0 +1,6 @@
|
@@ -0,0 +1,7 @@
|
||||||
+#include <stdlib.h>
|
+#include <stdlib.h>
|
||||||
+
|
+
|
||||||
+void other() {
|
+void other() {
|
||||||
+ const char* ostring = "other";
|
+ const char* ostring = "other";
|
||||||
+ printf ("%s\n", ostring);;
|
+ printf ("%s\n", ostring);;
|
||||||
+}
|
+}
|
||||||
|
+
|
||||||
|
2027
gdb-6.3-test-pie-20050107.patch
Normal file
2027
gdb-6.3-test-pie-20050107.patch
Normal file
File diff suppressed because it is too large
Load Diff
42
gdb-6.3-test-self-20050110.patch
Normal file
42
gdb-6.3-test-self-20050110.patch
Normal file
@ -0,0 +1,42 @@
|
|||||||
|
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
||||||
|
From: Elena Zannoni <ezannoni@redhat.com>
|
||||||
|
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
||||||
|
Subject: gdb-6.3-test-self-20050110.patch
|
||||||
|
|
||||||
|
;; Get selftest working with sep-debug-info
|
||||||
|
;;=fedoratest
|
||||||
|
|
||||||
|
2004-02-23 Elena Zannoni <ezannoni@redhat.com>
|
||||||
|
|
||||||
|
* gdb.gdb/selftest.exp: Make sure that the debug directory is
|
||||||
|
set up properly.
|
||||||
|
* gdb.gdb/complaints.exp: Ditto.
|
||||||
|
* gdb.gdb/xfullpath.exp: Ditto.
|
||||||
|
* gdb.gdb/observer.exp: Ditto.
|
||||||
|
|
||||||
|
diff --git a/gdb/testsuite/lib/selftest-support.exp b/gdb/testsuite/lib/selftest-support.exp
|
||||||
|
--- a/gdb/testsuite/lib/selftest-support.exp
|
||||||
|
+++ b/gdb/testsuite/lib/selftest-support.exp
|
||||||
|
@@ -152,18 +152,18 @@ proc do_self_tests {function body} {
|
||||||
|
}
|
||||||
|
|
||||||
|
# Remove any old copy lying around.
|
||||||
|
- remote_file host delete $xgdb
|
||||||
|
+ #remote_file host delete $xgdb
|
||||||
|
|
||||||
|
gdb_start
|
||||||
|
- set file [remote_download host $GDB_FULLPATH $xgdb]
|
||||||
|
+ #set file [remote_download host $GDB_FULLPATH $xgdb]
|
||||||
|
|
||||||
|
- set result [selftest_setup $file $function]
|
||||||
|
+ set result [selftest_setup $GDB_FULLPATH $function]
|
||||||
|
if {$result == 0} then {
|
||||||
|
set result [uplevel $body]
|
||||||
|
}
|
||||||
|
|
||||||
|
gdb_exit
|
||||||
|
- catch "remote_file host delete $file"
|
||||||
|
+ #catch "remote_file host delete $file"
|
||||||
|
|
||||||
|
if {$result < 0} then {
|
||||||
|
warning "Couldn't test self"
|
@ -54,7 +54,7 @@ diff --git a/gdb/testsuite/gdb.threads/watchthreads-threaded.c b/gdb/testsuite/g
|
|||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
+++ b/gdb/testsuite/gdb.threads/watchthreads-threaded.c
|
+++ b/gdb/testsuite/gdb.threads/watchthreads-threaded.c
|
||||||
@@ -0,0 +1,65 @@
|
@@ -0,0 +1,66 @@
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
+/* This testcase is part of GDB, the GNU debugger.
|
||||||
+
|
+
|
||||||
+ Copyright 2002, 2003, 2004, 2005 Free Software Foundation, Inc.
|
+ Copyright 2002, 2003, 2004, 2005 Free Software Foundation, Inc.
|
||||||
@ -120,6 +120,7 @@ new file mode 100644
|
|||||||
+
|
+
|
||||||
+ pthread_exit(NULL);
|
+ pthread_exit(NULL);
|
||||||
+}
|
+}
|
||||||
|
+
|
||||||
diff --git a/gdb/testsuite/gdb.threads/watchthreads-threaded.exp b/gdb/testsuite/gdb.threads/watchthreads-threaded.exp
|
diff --git a/gdb/testsuite/gdb.threads/watchthreads-threaded.exp b/gdb/testsuite/gdb.threads/watchthreads-threaded.exp
|
||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
@ -212,9 +213,9 @@ new file mode 100644
|
|||||||
+ { set args_2 1; set test_flag 1 }
|
+ { set args_2 1; set test_flag 1 }
|
||||||
+ -re "Hardware watchpoint 4: args\\\[3\\\].*Old value = 0.*New value = 1.*main \\\(\\\) at .*watchthreads-threaded.c:$init_line.*$gdb_prompt $"
|
+ -re "Hardware watchpoint 4: args\\\[3\\\].*Old value = 0.*New value = 1.*main \\\(\\\) at .*watchthreads-threaded.c:$init_line.*$gdb_prompt $"
|
||||||
+ { set args_3 1; set test_flag 1 }
|
+ { set args_3 1; set test_flag 1 }
|
||||||
+ -re "Hardware watchpoint 3: args\\\[2\\\].*Old value = $args_2.*New value = [expr $args_2+1].*thread_function \\\(arg=0x2\\\) at .*watchthreads-threaded.c:$inc_line.*$gdb_prompt $"
|
+ -re "Hardware watchpoint 3: args\\\[2\\\].*Old value = $args_2.*New value = [expr $args_2+1].*in thread_function \\\(arg=0x2\\\) at .*watchthreads-threaded.c:$inc_line.*$gdb_prompt $"
|
||||||
+ { set args_2 [expr $args_2+1]; set test_flag 1 }
|
+ { set args_2 [expr $args_2+1]; set test_flag 1 }
|
||||||
+ -re "Hardware watchpoint 4: args\\\[3\\\].*Old value = $args_3.*New value = [expr $args_3+1].*thread_function \\\(arg=0x3\\\) at .*watchthreads-threaded.c:$inc_line.*$gdb_prompt $"
|
+ -re "Hardware watchpoint 4: args\\\[3\\\].*Old value = $args_3.*New value = [expr $args_3+1].*in thread_function \\\(arg=0x3\\\) at .*watchthreads-threaded.c:$inc_line.*$gdb_prompt $"
|
||||||
+ { set args_3 [expr $args_3+1]; set test_flag 1 }
|
+ { set args_3 [expr $args_3+1]; set test_flag 1 }
|
||||||
+ }
|
+ }
|
||||||
+ # If we fail above, don't bother continuing loop
|
+ # If we fail above, don't bother continuing loop
|
||||||
|
@ -44,17 +44,17 @@ glibc-debuginfo-2.7-2.x86_64: /usr/lib/debug/lib64/libc.so.6.debug:
|
|||||||
diff --git a/gdb/printcmd.c b/gdb/printcmd.c
|
diff --git a/gdb/printcmd.c b/gdb/printcmd.c
|
||||||
--- a/gdb/printcmd.c
|
--- a/gdb/printcmd.c
|
||||||
+++ b/gdb/printcmd.c
|
+++ b/gdb/printcmd.c
|
||||||
@@ -1301,6 +1301,10 @@ process_print_command_args (const char *args, value_print_options *print_opts,
|
@@ -1210,6 +1210,10 @@ print_command_1 (const char *args, int voidprint)
|
||||||
|
|
||||||
if (exp != nullptr && *exp)
|
if (exp != nullptr && *exp)
|
||||||
{
|
{
|
||||||
+ /* '*((int *(*) (void)) __errno_location) ()' is incompatible with
|
+ /* '*((int *(*) (void)) __errno_location) ()' is incompatible with
|
||||||
+ function descriptors. */
|
+ function descriptors. */
|
||||||
+ if (target_has_execution () && strcmp (exp, "errno") == 0)
|
+ if (target_has_execution && strcmp (exp, "errno") == 0)
|
||||||
+ exp = "*(*(int *(*)(void)) __errno_location) ()";
|
+ exp = "*(*(int *(*)(void)) __errno_location) ()";
|
||||||
/* VOIDPRINT is true to indicate that we do want to print a void
|
expression_up expr = parse_expression (exp);
|
||||||
value, so invert it for parse_expression. */
|
val = evaluate_expression (expr.get ());
|
||||||
expression_up expr = parse_expression (exp, nullptr, !voidprint);
|
}
|
||||||
diff --git a/gdb/testsuite/gdb.dwarf2/dw2-errno.c b/gdb/testsuite/gdb.dwarf2/dw2-errno.c
|
diff --git a/gdb/testsuite/gdb.dwarf2/dw2-errno.c b/gdb/testsuite/gdb.dwarf2/dw2-errno.c
|
||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
|
@ -45,7 +45,7 @@ diff --git a/gdb/testsuite/gdb.base/step-over-trampoline.exp b/gdb/testsuite/gdb
|
|||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
+++ b/gdb/testsuite/gdb.base/step-over-trampoline.exp
|
+++ b/gdb/testsuite/gdb.base/step-over-trampoline.exp
|
||||||
@@ -0,0 +1,59 @@
|
@@ -0,0 +1,54 @@
|
||||||
+# Copyright 2006 Free Software Foundation, Inc.
|
+# Copyright 2006 Free Software Foundation, Inc.
|
||||||
+
|
+
|
||||||
+# This program is free software; you can redistribute it and/or modify
|
+# This program is free software; you can redistribute it and/or modify
|
||||||
@ -62,11 +62,6 @@ new file mode 100644
|
|||||||
+# along with this program; if not, write to the Free Software
|
+# along with this program; if not, write to the Free Software
|
||||||
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
||||||
+
|
+
|
||||||
+if {[use_gdb_stub]} {
|
|
||||||
+ untested "skipping test because of use_gdb_stub"
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+if $tracelevel then {
|
+if $tracelevel then {
|
||||||
+ strace $tracelevel
|
+ strace $tracelevel
|
||||||
+}
|
+}
|
||||||
|
27
gdb-6.5-bz218379-solib-trampoline-lookup-lock-fix.patch
Normal file
27
gdb-6.5-bz218379-solib-trampoline-lookup-lock-fix.patch
Normal file
@ -0,0 +1,27 @@
|
|||||||
|
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
||||||
|
From: Fedora GDB patches <invalid@email.com>
|
||||||
|
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
||||||
|
Subject: gdb-6.5-bz218379-solib-trampoline-lookup-lock-fix.patch
|
||||||
|
|
||||||
|
;; Fix lockup on trampoline vs. its function lookup; unreproducible (BZ 218379).
|
||||||
|
;;=fedora
|
||||||
|
|
||||||
|
https://bugzilla.redhat.com/bugzilla/show_bug.cgi?id=218379
|
||||||
|
|
||||||
|
diff --git a/gdb/symtab.c b/gdb/symtab.c
|
||||||
|
--- a/gdb/symtab.c
|
||||||
|
+++ b/gdb/symtab.c
|
||||||
|
@@ -3169,6 +3169,13 @@ find_pc_sect_line (CORE_ADDR pc, struct obj_section *section, int notcurrent)
|
||||||
|
msymbol->linkage_name ()); */
|
||||||
|
;
|
||||||
|
/* fall through */
|
||||||
|
+ /* `msymbol' trampoline may be located before its .text symbol
|
||||||
|
+ but this text symbol may be the address we were looking for.
|
||||||
|
+ Avoid `find_pc_sect_line'<->`find_pc_line' infinite loop.
|
||||||
|
+ Red Hat Bug 218379. */
|
||||||
|
+ else if (BMSYMBOL_VALUE_ADDRESS (mfunsym) == pc)
|
||||||
|
+ warning ("In stub for %s (0x%s); interlocked, please submit the binary to http://bugzilla.redhat.com", msymbol.minsym->linkage_name (), paddress (target_gdbarch (), pc));
|
||||||
|
+ /* fall through */
|
||||||
|
else
|
||||||
|
{
|
||||||
|
/* Detect an obvious case of infinite recursion. If this
|
@ -10,7 +10,7 @@ diff --git a/gdb/testsuite/gdb.base/tracefork-zombie.exp b/gdb/testsuite/gdb.bas
|
|||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
+++ b/gdb/testsuite/gdb.base/tracefork-zombie.exp
|
+++ b/gdb/testsuite/gdb.base/tracefork-zombie.exp
|
||||||
@@ -0,0 +1,76 @@
|
@@ -0,0 +1,75 @@
|
||||||
+# Copyright 2007 Free Software Foundation, Inc.
|
+# Copyright 2007 Free Software Foundation, Inc.
|
||||||
+
|
+
|
||||||
+# This program is free software; you can redistribute it and/or modify
|
+# This program is free software; you can redistribute it and/or modify
|
||||||
@ -28,9 +28,8 @@ new file mode 100644
|
|||||||
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
|
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
|
||||||
+
|
+
|
||||||
+# are we on a target board
|
+# are we on a target board
|
||||||
+if {[use_gdb_stub]} {
|
+if [is_remote target] then {
|
||||||
+ untested "skipping test because of use_gdb_stub"
|
+ return 0
|
||||||
+ return -1
|
|
||||||
+}
|
+}
|
||||||
+
|
+
|
||||||
+# Start the program running and then wait for a bit, to be sure
|
+# Start the program running and then wait for a bit, to be sure
|
||||||
|
@ -52,7 +52,7 @@ diff --git a/gdb/testsuite/gdb.base/gcore-excessive-memory.exp b/gdb/testsuite/g
|
|||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
+++ b/gdb/testsuite/gdb.base/gcore-excessive-memory.exp
|
+++ b/gdb/testsuite/gdb.base/gcore-excessive-memory.exp
|
||||||
@@ -0,0 +1,99 @@
|
@@ -0,0 +1,94 @@
|
||||||
+# Copyright 2008 Free Software Foundation, Inc.
|
+# Copyright 2008 Free Software Foundation, Inc.
|
||||||
+
|
+
|
||||||
+# This program is free software; you can redistribute it and/or modify
|
+# This program is free software; you can redistribute it and/or modify
|
||||||
@ -69,11 +69,6 @@ new file mode 100644
|
|||||||
+# along with this program; if not, write to the Free Software
|
+# along with this program; if not, write to the Free Software
|
||||||
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
||||||
+
|
+
|
||||||
+if {[use_gdb_stub]} {
|
|
||||||
+ untested "skipping test because of use_gdb_stub"
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+set testfile gcore-excessive-memory
|
+set testfile gcore-excessive-memory
|
||||||
+set srcfile ${testfile}.c
|
+set srcfile ${testfile}.c
|
||||||
+set shfile [standard_output_file ${testfile}-gdb.sh]
|
+set shfile [standard_output_file ${testfile}-gdb.sh]
|
||||||
|
@ -44,7 +44,7 @@ diff --git a/gdb/testsuite/gdb.base/unwind-leak.exp b/gdb/testsuite/gdb.base/unw
|
|||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
+++ b/gdb/testsuite/gdb.base/unwind-leak.exp
|
+++ b/gdb/testsuite/gdb.base/unwind-leak.exp
|
||||||
@@ -0,0 +1,88 @@
|
@@ -0,0 +1,83 @@
|
||||||
+# Copyright 2007 Free Software Foundation, Inc.
|
+# Copyright 2007 Free Software Foundation, Inc.
|
||||||
+
|
+
|
||||||
+# This program is free software; you can redistribute it and/or modify
|
+# This program is free software; you can redistribute it and/or modify
|
||||||
@ -61,11 +61,6 @@ new file mode 100644
|
|||||||
+# along with this program; if not, write to the Free Software
|
+# along with this program; if not, write to the Free Software
|
||||||
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
||||||
+
|
+
|
||||||
+if {[use_gdb_stub]} {
|
|
||||||
+ untested "skipping test because of use_gdb_stub"
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+set testfile unwind-leak
|
+set testfile unwind-leak
|
||||||
+set srcfile ${testfile}.c
|
+set srcfile ${testfile}.c
|
||||||
+set shfile [standard_output_file ${testfile}-gdb.sh]
|
+set shfile [standard_output_file ${testfile}-gdb.sh]
|
||||||
|
@ -12,7 +12,7 @@ diff --git a/gdb/testsuite/gdb.base/readline-overflow.exp b/gdb/testsuite/gdb.ba
|
|||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
+++ b/gdb/testsuite/gdb.base/readline-overflow.exp
|
+++ b/gdb/testsuite/gdb.base/readline-overflow.exp
|
||||||
@@ -0,0 +1,96 @@
|
@@ -0,0 +1,104 @@
|
||||||
+# Copyright 2006 Free Software Foundation, Inc.
|
+# Copyright 2006 Free Software Foundation, Inc.
|
||||||
+
|
+
|
||||||
+# This program is free software; you can redistribute it and/or modify
|
+# This program is free software; you can redistribute it and/or modify
|
||||||
@ -46,12 +46,20 @@ new file mode 100644
|
|||||||
+
|
+
|
||||||
+global env
|
+global env
|
||||||
+
|
+
|
||||||
+save_vars { env(GDBHISTFILE) env(HISTSIZE) TERM timeout } {
|
+save_vars { env(INPUTRC) env(GDBHISTFILE) env(HISTSIZE) TERM timeout } {
|
||||||
+ # The arrow key test relies on the standard VT100 bindings, so
|
+ # The arrow key test relies on the standard VT100 bindings, so
|
||||||
+ # make sure that an appropriate terminal is selected. The same
|
+ # make sure that an appropriate terminal is selected. The same
|
||||||
+ # bug doesn't show up if we use ^P / ^N instead.
|
+ # bug doesn't show up if we use ^P / ^N instead.
|
||||||
+ setenv TERM vt100
|
+ setenv TERM vt100
|
||||||
+
|
+
|
||||||
|
+ # Don't let a .inputrc file or an existing setting of INPUTRC mess up
|
||||||
|
+ # the test results. Even if /dev/null doesn't exist on the particular
|
||||||
|
+ # platform, the readline library will use the default setting just by
|
||||||
|
+ # failing to open the file. OTOH, opening /dev/null successfully will
|
||||||
|
+ # also result in the default settings being used since nothing will be
|
||||||
|
+ # read from this file.
|
||||||
|
+ set env(INPUTRC) "/dev/null"
|
||||||
|
+
|
||||||
+ set timeout 600
|
+ set timeout 600
|
||||||
+
|
+
|
||||||
+ set env(GDBHISTFILE) "${srcdir}/${subdir}/gdb_history"
|
+ set env(GDBHISTFILE) "${srcdir}/${subdir}/gdb_history"
|
||||||
|
@ -68,7 +68,7 @@ diff --git a/gdb/testsuite/gdb.base/datalib.exp b/gdb/testsuite/gdb.base/datalib
|
|||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
+++ b/gdb/testsuite/gdb.base/datalib.exp
|
+++ b/gdb/testsuite/gdb.base/datalib.exp
|
||||||
@@ -0,0 +1,56 @@
|
@@ -0,0 +1,51 @@
|
||||||
+# Copyright 2008 Free Software Foundation, Inc.
|
+# Copyright 2008 Free Software Foundation, Inc.
|
||||||
+
|
+
|
||||||
+# This program is free software; you can redistribute it and/or modify
|
+# This program is free software; you can redistribute it and/or modify
|
||||||
@ -85,11 +85,6 @@ new file mode 100644
|
|||||||
+# along with this program; if not, write to the Free Software
|
+# along with this program; if not, write to the Free Software
|
||||||
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
||||||
+
|
+
|
||||||
+if {[use_gdb_stub]} {
|
|
||||||
+ untested "skipping test because of use_gdb_stub"
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+set testfile datalib
|
+set testfile datalib
|
||||||
+set srcfilemain ${testfile}-main.c
|
+set srcfilemain ${testfile}-main.c
|
||||||
+set srcfilelib ${testfile}-lib.c
|
+set srcfilelib ${testfile}-lib.c
|
||||||
|
@ -33,7 +33,7 @@ diff --git a/gdb/testsuite/gdb.threads/tls-sepdebug-main.c b/gdb/testsuite/gdb.t
|
|||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
+++ b/gdb/testsuite/gdb.threads/tls-sepdebug-main.c
|
+++ b/gdb/testsuite/gdb.threads/tls-sepdebug-main.c
|
||||||
@@ -0,0 +1,31 @@
|
@@ -0,0 +1,25 @@
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
+/* This testcase is part of GDB, the GNU debugger.
|
||||||
+
|
+
|
||||||
+ Copyright 2006 Free Software Foundation, Inc.
|
+ Copyright 2006 Free Software Foundation, Inc.
|
||||||
@ -55,15 +55,9 @@ new file mode 100644
|
|||||||
+ Please email any bugs, comments, and/or additions to this file to:
|
+ Please email any bugs, comments, and/or additions to this file to:
|
||||||
+ bug-gdb@prep.ai.mit.edu */
|
+ bug-gdb@prep.ai.mit.edu */
|
||||||
+
|
+
|
||||||
+#include <pthread.h>
|
|
||||||
+
|
|
||||||
+extern __thread int var;
|
|
||||||
+
|
|
||||||
+int main()
|
+int main()
|
||||||
+{
|
+{
|
||||||
+ /* Ensure we link against pthreads even with --as-needed. */
|
+ return 0;
|
||||||
+ pthread_testcancel();
|
|
||||||
+ return var;
|
|
||||||
+}
|
+}
|
||||||
diff --git a/gdb/testsuite/gdb.threads/tls-sepdebug-shared.c b/gdb/testsuite/gdb.threads/tls-sepdebug-shared.c
|
diff --git a/gdb/testsuite/gdb.threads/tls-sepdebug-shared.c b/gdb/testsuite/gdb.threads/tls-sepdebug-shared.c
|
||||||
new file mode 100644
|
new file mode 100644
|
||||||
@ -96,7 +90,7 @@ diff --git a/gdb/testsuite/gdb.threads/tls-sepdebug.exp b/gdb/testsuite/gdb.thre
|
|||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
+++ b/gdb/testsuite/gdb.threads/tls-sepdebug.exp
|
+++ b/gdb/testsuite/gdb.threads/tls-sepdebug.exp
|
||||||
@@ -0,0 +1,94 @@
|
@@ -0,0 +1,87 @@
|
||||||
+# Copyright 2006 Free Software Foundation, Inc.
|
+# Copyright 2006 Free Software Foundation, Inc.
|
||||||
+
|
+
|
||||||
+# This program is free software; you can redistribute it and/or modify
|
+# This program is free software; you can redistribute it and/or modify
|
||||||
@ -113,13 +107,6 @@ new file mode 100644
|
|||||||
+# along with this program; if not, write to the Free Software
|
+# along with this program; if not, write to the Free Software
|
||||||
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
||||||
+
|
+
|
||||||
+# This test uses gdb_exit and gdb_start, which are not supported
|
|
||||||
+# on non-extended-remote sessions.
|
|
||||||
+if {[use_gdb_stub]} {
|
|
||||||
+ untested "skipping test because of stub"
|
|
||||||
+ return 0
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+if $tracelevel then {
|
+if $tracelevel then {
|
||||||
+ strace $tracelevel
|
+ strace $tracelevel
|
||||||
+}
|
+}
|
||||||
|
196
gdb-6.6-buildid-locate-core-as-arg.patch
Normal file
196
gdb-6.6-buildid-locate-core-as-arg.patch
Normal file
@ -0,0 +1,196 @@
|
|||||||
|
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
||||||
|
From: Fedora GDB patches <invalid@email.com>
|
||||||
|
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
||||||
|
Subject: gdb-6.6-buildid-locate-core-as-arg.patch
|
||||||
|
|
||||||
|
;;=push+jan
|
||||||
|
|
||||||
|
http://sourceware.org/ml/gdb-patches/2010-01/msg00558.html
|
||||||
|
|
||||||
|
[ Fixed up since the mail. ]
|
||||||
|
|
||||||
|
On Thu, 21 Jan 2010 18:17:15 +0100, Doug Evans wrote:
|
||||||
|
> Not an exhaustive list, but if we go down the path of converting "gdb
|
||||||
|
> corefile" to "gdb -c corefile", then we also need to think about "file
|
||||||
|
> corefile" being converted to "core corefile" [or "target core
|
||||||
|
> corefile", "core" is apparently deprecated in favor of "target core"]
|
||||||
|
> and "target exec corefile" -> "target core corefile". Presumably
|
||||||
|
> "file corefile" (and "target exec corefile") would discard the
|
||||||
|
> currently selected executable. But maybe not. Will that be confusing
|
||||||
|
> for users? I don't know.
|
||||||
|
|
||||||
|
While thinking about it overriding some GDB _commands_ was not my intention.
|
||||||
|
|
||||||
|
There is a general assumption if I have a shell COMMAND and some FILE I can do
|
||||||
|
$ COMMAND FILE
|
||||||
|
and COMMAND will appropriately load the FILE.
|
||||||
|
|
||||||
|
FSF GDB currently needs to specify also the executable file for core files
|
||||||
|
which already inhibits this intuitive expectation. OTOH with the build-id
|
||||||
|
locating patch which could allow such intuitive start notneeding the
|
||||||
|
executable file. Still it currently did not work due to the required "-c":
|
||||||
|
$ COMMAND -c COREFILE
|
||||||
|
|
||||||
|
Entering "file", "core-file" or "attach" commands is already explicit enough
|
||||||
|
so that it IMO should do what the command name says without any
|
||||||
|
autodetections. The second command line argument
|
||||||
|
(captured_main->pid_or_core_arg) is also autodetected (for PID or CORE) but
|
||||||
|
neither "attach" accepts a core file nor "core-file" accepts a PID.
|
||||||
|
|
||||||
|
The patch makes sense only with the build-id patchset so this is not submit
|
||||||
|
for FSF GDB inclusion yet. I am fine with your patch (+/- Hui Zhu's pending
|
||||||
|
bfd_check_format_matches) as the patch below is its natural extension.
|
||||||
|
|
||||||
|
Sorry for the delay,
|
||||||
|
Jan
|
||||||
|
|
||||||
|
2010-01-25 Jan Kratochvil <jan.kratochvil@redhat.com>
|
||||||
|
|
||||||
|
* exceptions.h (enum errors <IS_CORE_ERROR>): New.
|
||||||
|
* exec.c: Include exceptions.h.
|
||||||
|
(exec_file_attach <bfd_core>): Call throw_error (IS_CORE_ERROR, ...).
|
||||||
|
* main.c (exec_or_core_file_attach): New.
|
||||||
|
(captured_main <optind < argc>): Set also corearg.
|
||||||
|
(captured_main <strcmp (execarg, symarg) == 0>): New variable func.
|
||||||
|
Call exec_or_core_file_attach if COREARG matches EXECARG. Call
|
||||||
|
symbol_file_add_main only if CORE_BFD remained NULL.
|
||||||
|
|
||||||
|
Http://sourceware.org/ml/gdb-patches/2010-01/msg00517.html
|
||||||
|
2010-01-20 Doug Evans <dje@google.com>
|
||||||
|
|
||||||
|
* exec.c (exec_file_attach): Print a more useful error message if the
|
||||||
|
user did "gdb core".
|
||||||
|
|
||||||
|
diff --git a/gdb/exec.c b/gdb/exec.c
|
||||||
|
--- a/gdb/exec.c
|
||||||
|
+++ b/gdb/exec.c
|
||||||
|
@@ -18,6 +18,8 @@
|
||||||
|
along with this program. If not, see <http://www.gnu.org/licenses/>. */
|
||||||
|
|
||||||
|
#include "defs.h"
|
||||||
|
+#include "arch-utils.h"
|
||||||
|
+#include "exceptions.h"
|
||||||
|
#include "frame.h"
|
||||||
|
#include "inferior.h"
|
||||||
|
#include "target.h"
|
||||||
|
@@ -495,12 +497,27 @@ exec_file_attach (const char *filename, int from_tty)
|
||||||
|
|
||||||
|
if (!bfd_check_format_matches (exec_bfd, bfd_object, &matching))
|
||||||
|
{
|
||||||
|
+ int is_core;
|
||||||
|
+
|
||||||
|
+ /* If the user accidentally did "gdb core", print a useful
|
||||||
|
+ error message. Check it only after bfd_object has been checked as
|
||||||
|
+ a valid executable may get recognized for example also as
|
||||||
|
+ "trad-core". */
|
||||||
|
+ is_core = bfd_check_format (exec_bfd, bfd_core);
|
||||||
|
+
|
||||||
|
/* Make sure to close exec_bfd, or else "run" might try to use
|
||||||
|
it. */
|
||||||
|
exec_close ();
|
||||||
|
- error (_("\"%ps\": not in executable format: %s"),
|
||||||
|
- styled_string (file_name_style.style (), scratch_pathname),
|
||||||
|
- gdb_bfd_errmsg (bfd_get_error (), matching).c_str ());
|
||||||
|
+
|
||||||
|
+ if (is_core != 0)
|
||||||
|
+ throw_error (IS_CORE_ERROR,
|
||||||
|
+ _("\"%s\" is a core file.\n"
|
||||||
|
+ "Please specify an executable to debug."),
|
||||||
|
+ scratch_pathname);
|
||||||
|
+ else
|
||||||
|
+ error (_("\"%ps\": not in executable format: %s"),
|
||||||
|
+ styled_string (file_name_style.style (), scratch_pathname),
|
||||||
|
+ gdb_bfd_errmsg (bfd_get_error (), matching).c_str ());
|
||||||
|
}
|
||||||
|
|
||||||
|
if (build_section_table (exec_bfd, §ions, §ions_end))
|
||||||
|
diff --git a/gdb/main.c b/gdb/main.c
|
||||||
|
--- a/gdb/main.c
|
||||||
|
+++ b/gdb/main.c
|
||||||
|
@@ -524,6 +524,34 @@ struct cmdarg
|
||||||
|
char *string;
|
||||||
|
};
|
||||||
|
|
||||||
|
+/* Call exec_file_attach. If it detected FILENAME is a core file call
|
||||||
|
+ core_file_command. Print the original exec_file_attach error only if
|
||||||
|
+ core_file_command failed to find a matching executable. */
|
||||||
|
+
|
||||||
|
+static void
|
||||||
|
+exec_or_core_file_attach (const char *filename, int from_tty)
|
||||||
|
+{
|
||||||
|
+ gdb_assert (exec_bfd == NULL);
|
||||||
|
+
|
||||||
|
+ try
|
||||||
|
+ {
|
||||||
|
+ exec_file_attach (filename, from_tty);
|
||||||
|
+ }
|
||||||
|
+ catch (gdb_exception_error &e)
|
||||||
|
+ {
|
||||||
|
+ if (e.error == IS_CORE_ERROR)
|
||||||
|
+ {
|
||||||
|
+ core_file_command ((char *) filename, from_tty);
|
||||||
|
+
|
||||||
|
+ /* Iff the core file found its executable suppress the error message
|
||||||
|
+ from exec_file_attach. */
|
||||||
|
+ if (exec_bfd != NULL)
|
||||||
|
+ return;
|
||||||
|
+ }
|
||||||
|
+ throw_exception (std::move (e));
|
||||||
|
+ }
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
static void
|
||||||
|
captured_main_1 (struct captured_main_args *context)
|
||||||
|
{
|
||||||
|
@@ -959,6 +987,8 @@ captured_main_1 (struct captured_main_args *context)
|
||||||
|
{
|
||||||
|
symarg = argv[optind];
|
||||||
|
execarg = argv[optind];
|
||||||
|
+ if (optind + 1 == argc && corearg == NULL)
|
||||||
|
+ corearg = argv[optind];
|
||||||
|
optind++;
|
||||||
|
}
|
||||||
|
|
||||||
|
@@ -1114,12 +1144,25 @@ captured_main_1 (struct captured_main_args *context)
|
||||||
|
&& symarg != NULL
|
||||||
|
&& strcmp (execarg, symarg) == 0)
|
||||||
|
{
|
||||||
|
+ catch_command_errors_const_ftype *func;
|
||||||
|
+
|
||||||
|
+ /* Call exec_or_core_file_attach only if the file was specified as
|
||||||
|
+ a command line argument (and not an a command line option). */
|
||||||
|
+ if (corearg != NULL && strcmp (corearg, execarg) == 0)
|
||||||
|
+ {
|
||||||
|
+ func = exec_or_core_file_attach;
|
||||||
|
+ corearg = NULL;
|
||||||
|
+ }
|
||||||
|
+ else
|
||||||
|
+ func = exec_file_attach;
|
||||||
|
+
|
||||||
|
/* The exec file and the symbol-file are the same. If we can't
|
||||||
|
open it, better only print one error message.
|
||||||
|
- catch_command_errors returns non-zero on success! */
|
||||||
|
- ret = catch_command_errors (exec_file_attach, execarg,
|
||||||
|
- !batch_flag);
|
||||||
|
- if (ret != 0)
|
||||||
|
+ catch_command_errors returns non-zero on success!
|
||||||
|
+ Do not load EXECARG as a symbol file if it has been already processed
|
||||||
|
+ as a core file. */
|
||||||
|
+ ret = catch_command_errors (func, execarg, !batch_flag);
|
||||||
|
+ if (ret != 0 && core_bfd == NULL)
|
||||||
|
ret = catch_command_errors (symbol_file_add_main_adapter,
|
||||||
|
symarg, !batch_flag);
|
||||||
|
}
|
||||||
|
diff --git a/gdbsupport/common-exceptions.h b/gdbsupport/common-exceptions.h
|
||||||
|
--- a/gdbsupport/common-exceptions.h
|
||||||
|
+++ b/gdbsupport/common-exceptions.h
|
||||||
|
@@ -106,6 +106,9 @@ enum errors {
|
||||||
|
"_ERROR" is appended to the name. */
|
||||||
|
MAX_COMPLETIONS_REACHED_ERROR,
|
||||||
|
|
||||||
|
+ /* Attempt to load a core file as executable. */
|
||||||
|
+ IS_CORE_ERROR,
|
||||||
|
+
|
||||||
|
/* Add more errors here. */
|
||||||
|
NR_ERRORS
|
||||||
|
};
|
@ -6,6 +6,29 @@ Subject: gdb-6.6-buildid-locate-rpm-librpm-workaround.patch
|
|||||||
;; Workaround librpm BZ 643031 due to its unexpected exit() calls (BZ 642879).
|
;; Workaround librpm BZ 643031 due to its unexpected exit() calls (BZ 642879).
|
||||||
;;=push+jan
|
;;=push+jan
|
||||||
|
|
||||||
|
diff --git a/gdb/build-id.c b/gdb/build-id.c
|
||||||
|
--- a/gdb/build-id.c
|
||||||
|
+++ b/gdb/build-id.c
|
||||||
|
@@ -708,6 +708,19 @@ build_id_to_filename (const struct bfd_build_id *build_id, char **link_return)
|
||||||
|
#include <dlfcn.h>
|
||||||
|
#endif
|
||||||
|
|
||||||
|
+/* Workarodun https://bugzilla.redhat.com/show_bug.cgi?id=643031
|
||||||
|
+ librpm must not exit() an application on SIGINT
|
||||||
|
+
|
||||||
|
+ Enable or disable a signal handler. SIGNUM: signal to enable (or disable
|
||||||
|
+ if negative). HANDLER: sa_sigaction handler (or NULL to use
|
||||||
|
+ rpmsqHandler()). Returns: no. of refs, -1 on error. */
|
||||||
|
+extern int rpmsqEnable (int signum, /* rpmsqAction_t handler */ void *handler);
|
||||||
|
+int
|
||||||
|
+rpmsqEnable (int signum, /* rpmsqAction_t handler */ void *handler)
|
||||||
|
+{
|
||||||
|
+ return 0;
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
/* This MISSING_RPM_HASH tracker is used to collect all the missing rpm files
|
||||||
|
and avoid their duplicities during a single inferior run. */
|
||||||
|
|
||||||
diff --git a/gdb/proc-service.list b/gdb/proc-service.list
|
diff --git a/gdb/proc-service.list b/gdb/proc-service.list
|
||||||
--- a/gdb/proc-service.list
|
--- a/gdb/proc-service.list
|
||||||
+++ b/gdb/proc-service.list
|
+++ b/gdb/proc-service.list
|
||||||
|
@ -9,10 +9,96 @@ Subject: gdb-6.6-buildid-locate-rpm-scl.patch
|
|||||||
warning: Skipping deprecated .gdb_index section
|
warning: Skipping deprecated .gdb_index section
|
||||||
https://bugzilla.redhat.com/show_bug.cgi?id=953585
|
https://bugzilla.redhat.com/show_bug.cgi?id=953585
|
||||||
|
|
||||||
|
diff --git a/gdb/build-id.c b/gdb/build-id.c
|
||||||
|
--- a/gdb/build-id.c
|
||||||
|
+++ b/gdb/build-id.c
|
||||||
|
@@ -742,7 +742,11 @@ static int missing_rpm_list_entries;
|
||||||
|
/* Returns the count of newly added rpms. */
|
||||||
|
|
||||||
|
static int
|
||||||
|
+#ifndef GDB_INDEX_VERIFY_VENDOR
|
||||||
|
missing_rpm_enlist (const char *filename)
|
||||||
|
+#else
|
||||||
|
+missing_rpm_enlist_1 (const char *filename, int verify_vendor)
|
||||||
|
+#endif
|
||||||
|
{
|
||||||
|
static int rpm_init_done = 0;
|
||||||
|
rpmts ts;
|
||||||
|
@@ -849,7 +853,11 @@ missing_rpm_enlist (const char *filename)
|
||||||
|
mi = rpmtsInitIterator_p (ts, RPMTAG_BASENAMES, filename, 0);
|
||||||
|
if (mi != NULL)
|
||||||
|
{
|
||||||
|
+#ifndef GDB_INDEX_VERIFY_VENDOR
|
||||||
|
for (;;)
|
||||||
|
+#else
|
||||||
|
+ if (!verify_vendor) for (;;)
|
||||||
|
+#endif
|
||||||
|
{
|
||||||
|
Header h;
|
||||||
|
char *debuginfo, **slot, *s, *s2;
|
||||||
|
@@ -967,6 +975,37 @@ missing_rpm_enlist (const char *filename)
|
||||||
|
xfree (debuginfo);
|
||||||
|
count++;
|
||||||
|
}
|
||||||
|
+#ifdef GDB_INDEX_VERIFY_VENDOR
|
||||||
|
+ else /* verify_vendor */
|
||||||
|
+ {
|
||||||
|
+ int vendor_pass = 0, vendor_fail = 0;
|
||||||
|
+
|
||||||
|
+ for (;;)
|
||||||
|
+ {
|
||||||
|
+ Header h;
|
||||||
|
+ errmsg_t err;
|
||||||
|
+ char *vendor;
|
||||||
|
+
|
||||||
|
+ h = rpmdbNextIterator_p (mi);
|
||||||
|
+ if (h == NULL)
|
||||||
|
+ break;
|
||||||
|
+
|
||||||
|
+ vendor = headerFormat_p (h, "%{vendor}", &err);
|
||||||
|
+ if (!vendor)
|
||||||
|
+ {
|
||||||
|
+ warning (_("Error querying the rpm file `%s': %s"), filename,
|
||||||
|
+ err);
|
||||||
|
+ continue;
|
||||||
|
+ }
|
||||||
|
+ if (strcmp (vendor, "Red Hat, Inc.") == 0)
|
||||||
|
+ vendor_pass = 1;
|
||||||
|
+ else
|
||||||
|
+ vendor_fail = 1;
|
||||||
|
+ xfree (vendor);
|
||||||
|
+ }
|
||||||
|
+ count = vendor_pass != 0 && vendor_fail == 0;
|
||||||
|
+ }
|
||||||
|
+#endif
|
||||||
|
|
||||||
|
rpmdbFreeIterator_p (mi);
|
||||||
|
}
|
||||||
|
@@ -976,6 +1015,20 @@ missing_rpm_enlist (const char *filename)
|
||||||
|
return count;
|
||||||
|
}
|
||||||
|
|
||||||
|
+#ifdef GDB_INDEX_VERIFY_VENDOR
|
||||||
|
+missing_rpm_enlist (const char *filename)
|
||||||
|
+{
|
||||||
|
+ return missing_rpm_enlist_1 (filename, 0);
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+extern int rpm_verify_vendor (const char *filename);
|
||||||
|
+int
|
||||||
|
+rpm_verify_vendor (const char *filename)
|
||||||
|
+{
|
||||||
|
+ return missing_rpm_enlist_1 (filename, 1);
|
||||||
|
+}
|
||||||
|
+#endif
|
||||||
|
+
|
||||||
|
static bool
|
||||||
|
missing_rpm_list_compar (const char *ap, const char *bp)
|
||||||
|
{
|
||||||
diff --git a/gdb/dwarf2/read.c b/gdb/dwarf2/read.c
|
diff --git a/gdb/dwarf2/read.c b/gdb/dwarf2/read.c
|
||||||
--- a/gdb/dwarf2/read.c
|
--- a/gdb/dwarf2/read.c
|
||||||
+++ b/gdb/dwarf2/read.c
|
+++ b/gdb/dwarf2/read.c
|
||||||
@@ -2797,6 +2797,16 @@ read_gdb_index_from_buffer (const char *filename,
|
@@ -3025,6 +3025,16 @@ read_gdb_index_from_buffer (const char *filename,
|
||||||
"set use-deprecated-index-sections on". */
|
"set use-deprecated-index-sections on". */
|
||||||
if (version < 6 && !deprecated_ok)
|
if (version < 6 && !deprecated_ok)
|
||||||
{
|
{
|
||||||
@ -29,7 +115,7 @@ diff --git a/gdb/dwarf2/read.c b/gdb/dwarf2/read.c
|
|||||||
static int warning_printed = 0;
|
static int warning_printed = 0;
|
||||||
if (!warning_printed)
|
if (!warning_printed)
|
||||||
{
|
{
|
||||||
@@ -2808,6 +2818,10 @@ to use the section anyway."),
|
@@ -3036,6 +3046,10 @@ to use the section anyway."),
|
||||||
warning_printed = 1;
|
warning_printed = 1;
|
||||||
}
|
}
|
||||||
return 0;
|
return 0;
|
||||||
|
@ -133,7 +133,7 @@ diff --git a/gdb/aclocal.m4 b/gdb/aclocal.m4
|
|||||||
+See the pkg-config man page for more details.])
|
+See the pkg-config man page for more details.])
|
||||||
+
|
+
|
||||||
+if test $pkg_failed = yes; then
|
+if test $pkg_failed = yes; then
|
||||||
+ AC_MSG_RESULT([no])
|
+ AC_MSG_RESULT([no])
|
||||||
+ _PKG_SHORT_ERRORS_SUPPORTED
|
+ _PKG_SHORT_ERRORS_SUPPORTED
|
||||||
+ if test $_pkg_short_errors_supported = yes; then
|
+ if test $_pkg_short_errors_supported = yes; then
|
||||||
+ $1[]_PKG_ERRORS=`$PKG_CONFIG --short-errors --print-errors --cflags --libs "$2" 2>&1`
|
+ $1[]_PKG_ERRORS=`$PKG_CONFIG --short-errors --print-errors --cflags --libs "$2" 2>&1`
|
||||||
@ -154,7 +154,7 @@ diff --git a/gdb/aclocal.m4 b/gdb/aclocal.m4
|
|||||||
+_PKG_TEXT])[]dnl
|
+_PKG_TEXT])[]dnl
|
||||||
+ ])
|
+ ])
|
||||||
+elif test $pkg_failed = untried; then
|
+elif test $pkg_failed = untried; then
|
||||||
+ AC_MSG_RESULT([no])
|
+ AC_MSG_RESULT([no])
|
||||||
+ m4_default([$4], [AC_MSG_FAILURE(
|
+ m4_default([$4], [AC_MSG_FAILURE(
|
||||||
+[The pkg-config script could not be found or is too old. Make sure it
|
+[The pkg-config script could not be found or is too old. Make sure it
|
||||||
+is in your PATH or set the PKG_CONFIG environment variable to the full
|
+is in your PATH or set the PKG_CONFIG environment variable to the full
|
||||||
@ -232,6 +232,457 @@ diff --git a/gdb/aclocal.m4 b/gdb/aclocal.m4
|
|||||||
# AM_AUX_DIR_EXPAND -*- Autoconf -*-
|
# AM_AUX_DIR_EXPAND -*- Autoconf -*-
|
||||||
|
|
||||||
# Copyright (C) 2001-2017 Free Software Foundation, Inc.
|
# Copyright (C) 2001-2017 Free Software Foundation, Inc.
|
||||||
|
diff --git a/gdb/build-id.c b/gdb/build-id.c
|
||||||
|
--- a/gdb/build-id.c
|
||||||
|
+++ b/gdb/build-id.c
|
||||||
|
@@ -33,6 +33,7 @@
|
||||||
|
#include "gdb_bfd.h"
|
||||||
|
#include "gdbcmd.h"
|
||||||
|
#include "gdbcore.h"
|
||||||
|
+#include "inferior.h"
|
||||||
|
#include "objfiles.h"
|
||||||
|
#include "observable.h"
|
||||||
|
#include "symfile.h"
|
||||||
|
@@ -697,8 +698,374 @@ build_id_to_filename (const struct bfd_build_id *build_id, char **link_return)
|
||||||
|
return result;
|
||||||
|
}
|
||||||
|
|
||||||
|
+#ifdef HAVE_LIBRPM
|
||||||
|
+
|
||||||
|
+#include <rpm/rpmlib.h>
|
||||||
|
+#include <rpm/rpmts.h>
|
||||||
|
+#include <rpm/rpmdb.h>
|
||||||
|
+#include <rpm/header.h>
|
||||||
|
+#ifdef DLOPEN_LIBRPM
|
||||||
|
+#include <dlfcn.h>
|
||||||
|
+#endif
|
||||||
|
+
|
||||||
|
+/* This MISSING_RPM_HASH tracker is used to collect all the missing rpm files
|
||||||
|
+ and avoid their duplicities during a single inferior run. */
|
||||||
|
+
|
||||||
|
+static struct htab *missing_rpm_hash;
|
||||||
|
+
|
||||||
|
+/* This MISSING_RPM_LIST tracker is used to collect and print as a single line
|
||||||
|
+ all the rpms right before the nearest GDB prompt. It gets cleared after
|
||||||
|
+ each such print (it is questionable if we should clear it after the print).
|
||||||
|
+ */
|
||||||
|
+
|
||||||
|
+struct missing_rpm
|
||||||
|
+ {
|
||||||
|
+ struct missing_rpm *next;
|
||||||
|
+ char rpm[1];
|
||||||
|
+ };
|
||||||
|
+static struct missing_rpm *missing_rpm_list;
|
||||||
|
+static int missing_rpm_list_entries;
|
||||||
|
+
|
||||||
|
+/* Returns the count of newly added rpms. */
|
||||||
|
+
|
||||||
|
+static int
|
||||||
|
+missing_rpm_enlist (const char *filename)
|
||||||
|
+{
|
||||||
|
+ static int rpm_init_done = 0;
|
||||||
|
+ rpmts ts;
|
||||||
|
+ rpmdbMatchIterator mi;
|
||||||
|
+ int count = 0;
|
||||||
|
+
|
||||||
|
+#ifdef DLOPEN_LIBRPM
|
||||||
|
+ /* Duplicate here the declarations to verify they match. The same sanity
|
||||||
|
+ check is present also in `configure.ac'. */
|
||||||
|
+ extern char * headerFormat(Header h, const char * fmt, errmsg_t * errmsg);
|
||||||
|
+ static char *(*headerFormat_p) (Header h, const char * fmt, errmsg_t *errmsg);
|
||||||
|
+ extern int rpmReadConfigFiles(const char * file, const char * target);
|
||||||
|
+ static int (*rpmReadConfigFiles_p) (const char * file, const char * target);
|
||||||
|
+ extern rpmdbMatchIterator rpmdbFreeIterator(rpmdbMatchIterator mi);
|
||||||
|
+ static rpmdbMatchIterator (*rpmdbFreeIterator_p) (rpmdbMatchIterator mi);
|
||||||
|
+ extern Header rpmdbNextIterator(rpmdbMatchIterator mi);
|
||||||
|
+ static Header (*rpmdbNextIterator_p) (rpmdbMatchIterator mi);
|
||||||
|
+ extern rpmts rpmtsCreate(void);
|
||||||
|
+ static rpmts (*rpmtsCreate_p) (void);
|
||||||
|
+ extern rpmts rpmtsFree(rpmts ts);
|
||||||
|
+ static rpmts (*rpmtsFree_p) (rpmts ts);
|
||||||
|
+ extern rpmdbMatchIterator rpmtsInitIterator(const rpmts ts, rpmTag rpmtag,
|
||||||
|
+ const void * keyp, size_t keylen);
|
||||||
|
+ static rpmdbMatchIterator (*rpmtsInitIterator_p) (const rpmts ts,
|
||||||
|
+ rpmTag rpmtag,
|
||||||
|
+ const void *keyp,
|
||||||
|
+ size_t keylen);
|
||||||
|
+#else /* !DLOPEN_LIBRPM */
|
||||||
|
+# define headerFormat_p headerFormat
|
||||||
|
+# define rpmReadConfigFiles_p rpmReadConfigFiles
|
||||||
|
+# define rpmdbFreeIterator_p rpmdbFreeIterator
|
||||||
|
+# define rpmdbNextIterator_p rpmdbNextIterator
|
||||||
|
+# define rpmtsCreate_p rpmtsCreate
|
||||||
|
+# define rpmtsFree_p rpmtsFree
|
||||||
|
+# define rpmtsInitIterator_p rpmtsInitIterator
|
||||||
|
+#endif /* !DLOPEN_LIBRPM */
|
||||||
|
+
|
||||||
|
+ gdb_assert (filename != NULL);
|
||||||
|
+
|
||||||
|
+ if (strcmp (filename, BUILD_ID_MAIN_EXECUTABLE_FILENAME) == 0)
|
||||||
|
+ return 0;
|
||||||
|
+
|
||||||
|
+ if (is_target_filename (filename))
|
||||||
|
+ return 0;
|
||||||
|
+
|
||||||
|
+ if (filename[0] != '/')
|
||||||
|
+ {
|
||||||
|
+ warning (_("Ignoring non-absolute filename: <%s>"), filename);
|
||||||
|
+ return 0;
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ if (!rpm_init_done)
|
||||||
|
+ {
|
||||||
|
+ static int init_tried;
|
||||||
|
+
|
||||||
|
+ /* Already failed the initialization before? */
|
||||||
|
+ if (init_tried)
|
||||||
|
+ return 0;
|
||||||
|
+ init_tried = 1;
|
||||||
|
+
|
||||||
|
+#ifdef DLOPEN_LIBRPM
|
||||||
|
+ {
|
||||||
|
+ void *h;
|
||||||
|
+
|
||||||
|
+ h = dlopen (DLOPEN_LIBRPM, RTLD_LAZY);
|
||||||
|
+ if (!h)
|
||||||
|
+ {
|
||||||
|
+ warning (_("Unable to open \"%s\" (%s), "
|
||||||
|
+ "missing debuginfos notifications will not be displayed"),
|
||||||
|
+ DLOPEN_LIBRPM, dlerror ());
|
||||||
|
+ return 0;
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ if (!((headerFormat_p = (char *(*) (Header h, const char * fmt, errmsg_t *errmsg)) dlsym (h, "headerFormat"))
|
||||||
|
+ && (rpmReadConfigFiles_p = (int (*) (const char * file, const char * target)) dlsym (h, "rpmReadConfigFiles"))
|
||||||
|
+ && (rpmdbFreeIterator_p = (rpmdbMatchIterator (*) (rpmdbMatchIterator mi)) dlsym (h, "rpmdbFreeIterator"))
|
||||||
|
+ && (rpmdbNextIterator_p = (Header (*) (rpmdbMatchIterator mi)) dlsym (h, "rpmdbNextIterator"))
|
||||||
|
+ && (rpmtsCreate_p = (rpmts (*) (void)) dlsym (h, "rpmtsCreate"))
|
||||||
|
+ && (rpmtsFree_p = (rpmts (*) (rpmts ts)) dlsym (h, "rpmtsFree"))
|
||||||
|
+ && (rpmtsInitIterator_p = (rpmdbMatchIterator (*) (const rpmts ts, rpmTag rpmtag, const void *keyp, size_t keylen)) dlsym (h, "rpmtsInitIterator"))))
|
||||||
|
+ {
|
||||||
|
+ warning (_("Opened library \"%s\" is incompatible (%s), "
|
||||||
|
+ "missing debuginfos notifications will not be displayed"),
|
||||||
|
+ DLOPEN_LIBRPM, dlerror ());
|
||||||
|
+ if (dlclose (h))
|
||||||
|
+ warning (_("Error closing library \"%s\": %s\n"), DLOPEN_LIBRPM,
|
||||||
|
+ dlerror ());
|
||||||
|
+ return 0;
|
||||||
|
+ }
|
||||||
|
+ }
|
||||||
|
+#endif /* DLOPEN_LIBRPM */
|
||||||
|
+
|
||||||
|
+ if (rpmReadConfigFiles_p (NULL, NULL) != 0)
|
||||||
|
+ {
|
||||||
|
+ warning (_("Error reading the rpm configuration files"));
|
||||||
|
+ return 0;
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ rpm_init_done = 1;
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ ts = rpmtsCreate_p ();
|
||||||
|
+
|
||||||
|
+ mi = rpmtsInitIterator_p (ts, RPMTAG_BASENAMES, filename, 0);
|
||||||
|
+ if (mi != NULL)
|
||||||
|
+ {
|
||||||
|
+ for (;;)
|
||||||
|
+ {
|
||||||
|
+ Header h;
|
||||||
|
+ char *debuginfo, **slot, *s, *s2;
|
||||||
|
+ errmsg_t err;
|
||||||
|
+ size_t srcrpmlen = sizeof (".src.rpm") - 1;
|
||||||
|
+ size_t debuginfolen = sizeof ("-debuginfo") - 1;
|
||||||
|
+ rpmdbMatchIterator mi_debuginfo;
|
||||||
|
+
|
||||||
|
+ h = rpmdbNextIterator_p (mi);
|
||||||
|
+ if (h == NULL)
|
||||||
|
+ break;
|
||||||
|
+
|
||||||
|
+ /* Verify the debuginfo file is not already installed. */
|
||||||
|
+
|
||||||
|
+ debuginfo = headerFormat_p (h, "%{sourcerpm}-debuginfo.%{arch}",
|
||||||
|
+ &err);
|
||||||
|
+ if (!debuginfo)
|
||||||
|
+ {
|
||||||
|
+ warning (_("Error querying the rpm file `%s': %s"), filename,
|
||||||
|
+ err);
|
||||||
|
+ continue;
|
||||||
|
+ }
|
||||||
|
+ /* s = `.src.rpm-debuginfo.%{arch}' */
|
||||||
|
+ s = strrchr (debuginfo, '-') - srcrpmlen;
|
||||||
|
+ s2 = NULL;
|
||||||
|
+ if (s > debuginfo && memcmp (s, ".src.rpm", srcrpmlen) == 0)
|
||||||
|
+ {
|
||||||
|
+ /* s2 = `-%{release}.src.rpm-debuginfo.%{arch}' */
|
||||||
|
+ s2 = (char *) memrchr (debuginfo, '-', s - debuginfo);
|
||||||
|
+ }
|
||||||
|
+ if (s2)
|
||||||
|
+ {
|
||||||
|
+ /* s2 = `-%{version}-%{release}.src.rpm-debuginfo.%{arch}' */
|
||||||
|
+ s2 = (char *) memrchr (debuginfo, '-', s2 - debuginfo);
|
||||||
|
+ }
|
||||||
|
+ if (!s2)
|
||||||
|
+ {
|
||||||
|
+ warning (_("Error querying the rpm file `%s': %s"), filename,
|
||||||
|
+ debuginfo);
|
||||||
|
+ xfree (debuginfo);
|
||||||
|
+ continue;
|
||||||
|
+ }
|
||||||
|
+ /* s = `.src.rpm-debuginfo.%{arch}' */
|
||||||
|
+ /* s2 = `-%{version}-%{release}.src.rpm-debuginfo.%{arch}' */
|
||||||
|
+ memmove (s2 + debuginfolen, s2, s - s2);
|
||||||
|
+ memcpy (s2, "-debuginfo", debuginfolen);
|
||||||
|
+ /* s = `XXXX.%{arch}' */
|
||||||
|
+ /* strlen ("XXXX") == srcrpmlen + debuginfolen */
|
||||||
|
+ /* s2 = `-debuginfo-%{version}-%{release}XX.%{arch}' */
|
||||||
|
+ /* strlen ("XX") == srcrpmlen */
|
||||||
|
+ memmove (s + debuginfolen, s + srcrpmlen + debuginfolen,
|
||||||
|
+ strlen (s + srcrpmlen + debuginfolen) + 1);
|
||||||
|
+ /* s = `-debuginfo-%{version}-%{release}.%{arch}' */
|
||||||
|
+
|
||||||
|
+ /* RPMDBI_PACKAGES requires keylen == sizeof (int). */
|
||||||
|
+ /* RPMDBI_LABEL is an interface for NVR-based dbiFindByLabel(). */
|
||||||
|
+ mi_debuginfo = rpmtsInitIterator_p (ts, (rpmTag) RPMDBI_LABEL, debuginfo, 0);
|
||||||
|
+ xfree (debuginfo);
|
||||||
|
+ if (mi_debuginfo)
|
||||||
|
+ {
|
||||||
|
+ rpmdbFreeIterator_p (mi_debuginfo);
|
||||||
|
+ count = 0;
|
||||||
|
+ break;
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ /* The allocated memory gets utilized below for MISSING_RPM_HASH. */
|
||||||
|
+ debuginfo = headerFormat_p (h,
|
||||||
|
+ "%{name}-%{version}-%{release}.%{arch}",
|
||||||
|
+ &err);
|
||||||
|
+ if (!debuginfo)
|
||||||
|
+ {
|
||||||
|
+ warning (_("Error querying the rpm file `%s': %s"), filename,
|
||||||
|
+ err);
|
||||||
|
+ continue;
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ /* Base package name for `debuginfo-install'. We do not use the
|
||||||
|
+ `yum' command directly as the line
|
||||||
|
+ yum --enablerepo='*debug*' install NAME-debuginfo.ARCH
|
||||||
|
+ would be more complicated than just:
|
||||||
|
+ debuginfo-install NAME-VERSION-RELEASE.ARCH
|
||||||
|
+ Do not supply the rpm base name (derived from .src.rpm name) as
|
||||||
|
+ debuginfo-install is unable to install the debuginfo package if
|
||||||
|
+ the base name PKG binary rpm is not installed while for example
|
||||||
|
+ PKG-libs would be installed (RH Bug 467901).
|
||||||
|
+ FUTURE: After multiple debuginfo versions simultaneously installed
|
||||||
|
+ get supported the support for the VERSION-RELEASE tags handling
|
||||||
|
+ may need an update. */
|
||||||
|
+
|
||||||
|
+ if (missing_rpm_hash == NULL)
|
||||||
|
+ {
|
||||||
|
+ /* DEL_F is passed NULL as MISSING_RPM_LIST's HTAB_DELETE
|
||||||
|
+ should not deallocate the entries. */
|
||||||
|
+
|
||||||
|
+ missing_rpm_hash = htab_create_alloc (64, htab_hash_string,
|
||||||
|
+ (int (*) (const void *, const void *)) streq,
|
||||||
|
+ NULL, xcalloc, xfree);
|
||||||
|
+ }
|
||||||
|
+ slot = (char **) htab_find_slot (missing_rpm_hash, debuginfo, INSERT);
|
||||||
|
+ /* XCALLOC never returns NULL. */
|
||||||
|
+ gdb_assert (slot != NULL);
|
||||||
|
+ if (*slot == NULL)
|
||||||
|
+ {
|
||||||
|
+ struct missing_rpm *missing_rpm;
|
||||||
|
+
|
||||||
|
+ *slot = debuginfo;
|
||||||
|
+
|
||||||
|
+ missing_rpm = (struct missing_rpm *) xmalloc (sizeof (*missing_rpm) + strlen (debuginfo));
|
||||||
|
+ strcpy (missing_rpm->rpm, debuginfo);
|
||||||
|
+ missing_rpm->next = missing_rpm_list;
|
||||||
|
+ missing_rpm_list = missing_rpm;
|
||||||
|
+ missing_rpm_list_entries++;
|
||||||
|
+ }
|
||||||
|
+ else
|
||||||
|
+ xfree (debuginfo);
|
||||||
|
+ count++;
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ rpmdbFreeIterator_p (mi);
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ rpmtsFree_p (ts);
|
||||||
|
+
|
||||||
|
+ return count;
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+static bool
|
||||||
|
+missing_rpm_list_compar (const char *ap, const char *bp)
|
||||||
|
+{
|
||||||
|
+ return strcoll (ap, bp) < 0;
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+/* It returns a NULL-terminated array of strings needing to be FREEd. It may
|
||||||
|
+ also return only NULL. */
|
||||||
|
+
|
||||||
|
+static void
|
||||||
|
+missing_rpm_list_print (void)
|
||||||
|
+{
|
||||||
|
+ struct missing_rpm *list_iter;
|
||||||
|
+
|
||||||
|
+ if (missing_rpm_list_entries == 0)
|
||||||
|
+ return;
|
||||||
|
+
|
||||||
|
+ std::vector<const char *> array (missing_rpm_list_entries);
|
||||||
|
+ size_t idx = 0;
|
||||||
|
+
|
||||||
|
+ for (list_iter = missing_rpm_list; list_iter != NULL;
|
||||||
|
+ list_iter = list_iter->next)
|
||||||
|
+ {
|
||||||
|
+ array[idx++] = list_iter->rpm;
|
||||||
|
+ }
|
||||||
|
+ gdb_assert (idx == missing_rpm_list_entries);
|
||||||
|
+
|
||||||
|
+ std::sort (array.begin (), array.end (), missing_rpm_list_compar);
|
||||||
|
+
|
||||||
|
+ /* We zero out the number of missing RPMs here because of a nasty
|
||||||
|
+ bug (see RHBZ 1801974).
|
||||||
|
+
|
||||||
|
+ When we call 'puts_unfiltered' below, if pagination is on and if
|
||||||
|
+ the number of missing RPMs is big enough to trigger pagination,
|
||||||
|
+ we will end up in an infinite recursion. The call chain looks
|
||||||
|
+ like this:
|
||||||
|
+
|
||||||
|
+ missing_rpm_list_print -> puts_unfiltered -> fputs_maybe_filtered
|
||||||
|
+ -> prompt_for_continue -> display_gdb_prompt ->
|
||||||
|
+ debug_flush_missing -> missing_rpm_list_print ...
|
||||||
|
+
|
||||||
|
+ For this reason, we make sure MISSING_RPM_LIST_ENTRIES is zero
|
||||||
|
+ *before* calling any print function. */
|
||||||
|
+ missing_rpm_list_entries = 0;
|
||||||
|
+
|
||||||
|
+ printf_unfiltered (_("Missing separate debuginfos, use: %s"),
|
||||||
|
+#ifdef DNF_DEBUGINFO_INSTALL
|
||||||
|
+ "dnf "
|
||||||
|
+#endif
|
||||||
|
+ "debuginfo-install");
|
||||||
|
+ for (const char *el : array)
|
||||||
|
+ {
|
||||||
|
+ puts_unfiltered (" ");
|
||||||
|
+ puts_unfiltered (el);
|
||||||
|
+ }
|
||||||
|
+ puts_unfiltered ("\n");
|
||||||
|
+
|
||||||
|
+ while (missing_rpm_list != NULL)
|
||||||
|
+ {
|
||||||
|
+ list_iter = missing_rpm_list;
|
||||||
|
+ missing_rpm_list = list_iter->next;
|
||||||
|
+ xfree (list_iter);
|
||||||
|
+ }
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+static void
|
||||||
|
+missing_rpm_change (void)
|
||||||
|
+{
|
||||||
|
+ debug_flush_missing ();
|
||||||
|
+
|
||||||
|
+ gdb_assert (missing_rpm_list == NULL);
|
||||||
|
+ if (missing_rpm_hash != NULL)
|
||||||
|
+ {
|
||||||
|
+ htab_delete (missing_rpm_hash);
|
||||||
|
+ missing_rpm_hash = NULL;
|
||||||
|
+ }
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+enum missing_exec
|
||||||
|
+ {
|
||||||
|
+ /* Init state. EXEC_BFD also still could be NULL. */
|
||||||
|
+ MISSING_EXEC_NOT_TRIED,
|
||||||
|
+ /* We saw a non-NULL EXEC_BFD but RPM has no info about it. */
|
||||||
|
+ MISSING_EXEC_NOT_FOUND,
|
||||||
|
+ /* We found EXEC_BFD by RPM and we either have its symbols (either embedded
|
||||||
|
+ or separate) or the main executable's RPM is now contained in
|
||||||
|
+ MISSING_RPM_HASH. */
|
||||||
|
+ MISSING_EXEC_ENLISTED
|
||||||
|
+ };
|
||||||
|
+static enum missing_exec missing_exec = MISSING_EXEC_NOT_TRIED;
|
||||||
|
+
|
||||||
|
+#endif /* HAVE_LIBRPM */
|
||||||
|
+
|
||||||
|
+void
|
||||||
|
+debug_flush_missing (void)
|
||||||
|
+{
|
||||||
|
+#ifdef HAVE_LIBRPM
|
||||||
|
+ missing_rpm_list_print ();
|
||||||
|
+#endif
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
/* This MISSING_FILEPAIR_HASH tracker is used only for the duplicite messages
|
||||||
|
- Try to install the hash file ...
|
||||||
|
+ yum --enablerepo='*debug*' install ...
|
||||||
|
avoidance. */
|
||||||
|
|
||||||
|
struct missing_filepair
|
||||||
|
@@ -752,11 +1119,17 @@ missing_filepair_change (void)
|
||||||
|
/* All their memory came just from missing_filepair_OBSTACK. */
|
||||||
|
missing_filepair_hash = NULL;
|
||||||
|
}
|
||||||
|
+#ifdef HAVE_LIBRPM
|
||||||
|
+ missing_exec = MISSING_EXEC_NOT_TRIED;
|
||||||
|
+#endif
|
||||||
|
}
|
||||||
|
|
||||||
|
static void
|
||||||
|
debug_print_executable_changed (void)
|
||||||
|
{
|
||||||
|
+#ifdef HAVE_LIBRPM
|
||||||
|
+ missing_rpm_change ();
|
||||||
|
+#endif
|
||||||
|
missing_filepair_change ();
|
||||||
|
}
|
||||||
|
|
||||||
|
@@ -823,14 +1196,38 @@ debug_print_missing (const char *binary, const char *debug)
|
||||||
|
|
||||||
|
*slot = missing_filepair;
|
||||||
|
|
||||||
|
- /* We do not collect and flush these messages as each such message
|
||||||
|
- already requires its own separate lines. */
|
||||||
|
+#ifdef HAVE_LIBRPM
|
||||||
|
+ if (missing_exec == MISSING_EXEC_NOT_TRIED)
|
||||||
|
+ {
|
||||||
|
+ const char *execfilename = get_exec_file (0);
|
||||||
|
|
||||||
|
- fprintf_unfiltered (gdb_stdlog,
|
||||||
|
- _("Missing separate debuginfo for %s\n"), binary);
|
||||||
|
- if (debug != NULL)
|
||||||
|
- fprintf_unfiltered (gdb_stdlog, _("Try to install the hash file %s\n"),
|
||||||
|
- debug);
|
||||||
|
+ if (execfilename != NULL)
|
||||||
|
+ {
|
||||||
|
+ if (missing_rpm_enlist (execfilename) == 0)
|
||||||
|
+ missing_exec = MISSING_EXEC_NOT_FOUND;
|
||||||
|
+ else
|
||||||
|
+ missing_exec = MISSING_EXEC_ENLISTED;
|
||||||
|
+ }
|
||||||
|
+ }
|
||||||
|
+ if (missing_exec != MISSING_EXEC_ENLISTED)
|
||||||
|
+ if ((binary[0] == 0 || missing_rpm_enlist (binary) == 0)
|
||||||
|
+ && (debug == NULL || missing_rpm_enlist (debug) == 0))
|
||||||
|
+#endif /* HAVE_LIBRPM */
|
||||||
|
+ {
|
||||||
|
+ /* We do not collect and flush these messages as each such message
|
||||||
|
+ already requires its own separate lines. */
|
||||||
|
+
|
||||||
|
+ fprintf_unfiltered (gdb_stdlog,
|
||||||
|
+ _("Missing separate debuginfo for %s\n"), binary);
|
||||||
|
+ if (debug != NULL)
|
||||||
|
+ fprintf_unfiltered (gdb_stdlog, _("Try: %s %s\n"),
|
||||||
|
+#ifdef DNF_DEBUGINFO_INSTALL
|
||||||
|
+ "dnf"
|
||||||
|
+#else
|
||||||
|
+ "yum"
|
||||||
|
+#endif
|
||||||
|
+ " --enablerepo='*debug*' install", debug);
|
||||||
|
+ }
|
||||||
|
}
|
||||||
|
|
||||||
|
/* See build-id.h. */
|
||||||
diff --git a/gdb/config.in b/gdb/config.in
|
diff --git a/gdb/config.in b/gdb/config.in
|
||||||
--- a/gdb/config.in
|
--- a/gdb/config.in
|
||||||
+++ b/gdb/config.in
|
+++ b/gdb/config.in
|
||||||
@ -245,7 +696,7 @@ diff --git a/gdb/config.in b/gdb/config.in
|
|||||||
/* Define to 1 if translation of program messages to the user's native
|
/* Define to 1 if translation of program messages to the user's native
|
||||||
language is requested. */
|
language is requested. */
|
||||||
#undef ENABLE_NLS
|
#undef ENABLE_NLS
|
||||||
@@ -259,6 +262,9 @@
|
@@ -247,6 +250,9 @@
|
||||||
/* Define if you have the mpfr library. */
|
/* Define if you have the mpfr library. */
|
||||||
#undef HAVE_LIBMPFR
|
#undef HAVE_LIBMPFR
|
||||||
|
|
||||||
@ -258,9 +709,9 @@ diff --git a/gdb/config.in b/gdb/config.in
|
|||||||
diff --git a/gdb/configure b/gdb/configure
|
diff --git a/gdb/configure b/gdb/configure
|
||||||
--- a/gdb/configure
|
--- a/gdb/configure
|
||||||
+++ b/gdb/configure
|
+++ b/gdb/configure
|
||||||
@@ -775,6 +775,11 @@ TARGET_OBS
|
@@ -769,6 +769,11 @@ PKG_CONFIG
|
||||||
ENABLE_BFD_64_BIT_FALSE
|
HAVE_NATIVE_GCORE_TARGET
|
||||||
ENABLE_BFD_64_BIT_TRUE
|
TARGET_OBS
|
||||||
subdirs
|
subdirs
|
||||||
+RPM_LIBS
|
+RPM_LIBS
|
||||||
+RPM_CFLAGS
|
+RPM_CFLAGS
|
||||||
@ -270,7 +721,7 @@ diff --git a/gdb/configure b/gdb/configure
|
|||||||
GDB_DATADIR
|
GDB_DATADIR
|
||||||
DEBUGDIR
|
DEBUGDIR
|
||||||
MAKEINFO_EXTRA_FLAGS
|
MAKEINFO_EXTRA_FLAGS
|
||||||
@@ -880,6 +885,7 @@ with_gdb_datadir
|
@@ -873,6 +878,7 @@ with_gdb_datadir
|
||||||
with_relocated_sources
|
with_relocated_sources
|
||||||
with_auto_load_dir
|
with_auto_load_dir
|
||||||
with_auto_load_safe_path
|
with_auto_load_safe_path
|
||||||
@ -278,7 +729,7 @@ diff --git a/gdb/configure b/gdb/configure
|
|||||||
enable_targets
|
enable_targets
|
||||||
enable_64_bit_bfd
|
enable_64_bit_bfd
|
||||||
enable_gdbmi
|
enable_gdbmi
|
||||||
@@ -959,6 +965,8 @@ PKG_CONFIG_PATH
|
@@ -949,6 +955,8 @@ PKG_CONFIG_PATH
|
||||||
PKG_CONFIG_LIBDIR
|
PKG_CONFIG_LIBDIR
|
||||||
DEBUGINFOD_CFLAGS
|
DEBUGINFOD_CFLAGS
|
||||||
DEBUGINFOD_LIBS
|
DEBUGINFOD_LIBS
|
||||||
@ -287,7 +738,7 @@ diff --git a/gdb/configure b/gdb/configure
|
|||||||
YACC
|
YACC
|
||||||
YFLAGS
|
YFLAGS
|
||||||
XMKMF'
|
XMKMF'
|
||||||
@@ -1635,6 +1643,8 @@ Optional Packages:
|
@@ -1621,6 +1629,8 @@ Optional Packages:
|
||||||
do not restrict auto-loaded files locations
|
do not restrict auto-loaded files locations
|
||||||
--with-debuginfod Enable debuginfo lookups with debuginfod
|
--with-debuginfod Enable debuginfo lookups with debuginfod
|
||||||
(auto/yes/no)
|
(auto/yes/no)
|
||||||
@ -296,7 +747,7 @@ diff --git a/gdb/configure b/gdb/configure
|
|||||||
--with-libunwind-ia64 use libunwind frame unwinding for ia64 targets
|
--with-libunwind-ia64 use libunwind frame unwinding for ia64 targets
|
||||||
--with-curses use the curses library instead of the termcap
|
--with-curses use the curses library instead of the termcap
|
||||||
library
|
library
|
||||||
@@ -1715,6 +1725,8 @@ Some influential environment variables:
|
@@ -1702,6 +1712,8 @@ Some influential environment variables:
|
||||||
C compiler flags for DEBUGINFOD, overriding pkg-config
|
C compiler flags for DEBUGINFOD, overriding pkg-config
|
||||||
DEBUGINFOD_LIBS
|
DEBUGINFOD_LIBS
|
||||||
linker flags for DEBUGINFOD, overriding pkg-config
|
linker flags for DEBUGINFOD, overriding pkg-config
|
||||||
@ -305,7 +756,7 @@ diff --git a/gdb/configure b/gdb/configure
|
|||||||
YACC The `Yet Another Compiler Compiler' implementation to use.
|
YACC The `Yet Another Compiler Compiler' implementation to use.
|
||||||
Defaults to the first program found out of: `bison -y', `byacc',
|
Defaults to the first program found out of: `bison -y', `byacc',
|
||||||
`yacc'.
|
`yacc'.
|
||||||
@@ -6634,6 +6646,494 @@ _ACEOF
|
@@ -6666,6 +6678,494 @@ _ACEOF
|
||||||
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $with_auto_load_safe_path" >&5
|
{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $with_auto_load_safe_path" >&5
|
||||||
$as_echo "$with_auto_load_safe_path" >&6; }
|
$as_echo "$with_auto_load_safe_path" >&6; }
|
||||||
|
|
||||||
@ -697,7 +1148,7 @@ diff --git a/gdb/configure b/gdb/configure
|
|||||||
+
|
+
|
||||||
+
|
+
|
||||||
+if test $pkg_failed = yes; then
|
+if test $pkg_failed = yes; then
|
||||||
+ { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
|
+ { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
|
||||||
+$as_echo "no" >&6; }
|
+$as_echo "no" >&6; }
|
||||||
+
|
+
|
||||||
+if $PKG_CONFIG --atleast-pkgconfig-version 0.20; then
|
+if $PKG_CONFIG --atleast-pkgconfig-version 0.20; then
|
||||||
@ -715,7 +1166,7 @@ diff --git a/gdb/configure b/gdb/configure
|
|||||||
+
|
+
|
||||||
+ HAVE_LIBRPM=false
|
+ HAVE_LIBRPM=false
|
||||||
+elif test $pkg_failed = untried; then
|
+elif test $pkg_failed = untried; then
|
||||||
+ { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
|
+ { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5
|
||||||
+$as_echo "no" >&6; }
|
+$as_echo "no" >&6; }
|
||||||
+ HAVE_LIBRPM=false
|
+ HAVE_LIBRPM=false
|
||||||
+else
|
+else
|
||||||
@ -803,7 +1254,7 @@ diff --git a/gdb/configure b/gdb/configure
|
|||||||
diff --git a/gdb/configure.ac b/gdb/configure.ac
|
diff --git a/gdb/configure.ac b/gdb/configure.ac
|
||||||
--- a/gdb/configure.ac
|
--- a/gdb/configure.ac
|
||||||
+++ b/gdb/configure.ac
|
+++ b/gdb/configure.ac
|
||||||
@@ -153,6 +153,199 @@ AC_DEFINE_DIR(AUTO_LOAD_SAFE_PATH, escape_dir,
|
@@ -143,6 +143,199 @@ AC_DEFINE_DIR(AUTO_LOAD_SAFE_PATH, escape_dir,
|
||||||
[Directories safe to hold auto-loaded files.])
|
[Directories safe to hold auto-loaded files.])
|
||||||
AC_MSG_RESULT([$with_auto_load_safe_path])
|
AC_MSG_RESULT([$with_auto_load_safe_path])
|
||||||
|
|
||||||
@ -1007,14 +1458,14 @@ diff --git a/gdb/event-top.c b/gdb/event-top.c
|
|||||||
--- a/gdb/event-top.c
|
--- a/gdb/event-top.c
|
||||||
+++ b/gdb/event-top.c
|
+++ b/gdb/event-top.c
|
||||||
@@ -42,6 +42,7 @@
|
@@ -42,6 +42,7 @@
|
||||||
|
#include "gdbsupport/gdb_select.h"
|
||||||
#include "gdbsupport/gdb-sigmask.h"
|
#include "gdbsupport/gdb-sigmask.h"
|
||||||
#include "async-event.h"
|
#include "async-event.h"
|
||||||
#include "bt-utils.h"
|
|
||||||
+#include "symfile.h"
|
+#include "symfile.h"
|
||||||
|
|
||||||
/* readline include files. */
|
/* readline include files. */
|
||||||
#include "readline/readline.h"
|
#include "readline/readline.h"
|
||||||
@@ -374,6 +375,8 @@ display_gdb_prompt (const char *new_prompt)
|
@@ -364,6 +365,8 @@ display_gdb_prompt (const char *new_prompt)
|
||||||
/* Reset the nesting depth used when trace-commands is set. */
|
/* Reset the nesting depth used when trace-commands is set. */
|
||||||
reset_command_nest_depth ();
|
reset_command_nest_depth ();
|
||||||
|
|
||||||
@ -1023,7 +1474,7 @@ diff --git a/gdb/event-top.c b/gdb/event-top.c
|
|||||||
/* Do not call the python hook on an explicit prompt change as
|
/* Do not call the python hook on an explicit prompt change as
|
||||||
passed to this function, as this forms a secondary/local prompt,
|
passed to this function, as this forms a secondary/local prompt,
|
||||||
IE, displayed but not set. */
|
IE, displayed but not set. */
|
||||||
@@ -800,7 +803,10 @@ command_line_handler (gdb::unique_xmalloc_ptr<char> &&rl)
|
@@ -773,7 +776,10 @@ command_line_handler (gdb::unique_xmalloc_ptr<char> &&rl)
|
||||||
command_handler (cmd);
|
command_handler (cmd);
|
||||||
|
|
||||||
if (ui->prompt_state != PROMPTED)
|
if (ui->prompt_state != PROMPTED)
|
||||||
@ -1038,11 +1489,11 @@ diff --git a/gdb/event-top.c b/gdb/event-top.c
|
|||||||
diff --git a/gdb/symfile.h b/gdb/symfile.h
|
diff --git a/gdb/symfile.h b/gdb/symfile.h
|
||||||
--- a/gdb/symfile.h
|
--- a/gdb/symfile.h
|
||||||
+++ b/gdb/symfile.h
|
+++ b/gdb/symfile.h
|
||||||
@@ -342,6 +342,7 @@ extern void generic_load (const char *args, int from_tty);
|
@@ -560,6 +560,7 @@ extern void generic_load (const char *args, int from_tty);
|
||||||
/* build-id support. */
|
/* build-id support. */
|
||||||
extern struct bfd_build_id *build_id_addr_get (CORE_ADDR addr);
|
extern struct bfd_build_id *build_id_addr_get (CORE_ADDR addr);
|
||||||
extern void debug_print_missing (const char *binary, const char *debug);
|
extern void debug_print_missing (const char *binary, const char *debug);
|
||||||
+extern void debug_flush_missing (void);
|
+extern void debug_flush_missing (void);
|
||||||
#define BUILD_ID_MAIN_EXECUTABLE_FILENAME _("the main executable file")
|
#define BUILD_ID_MAIN_EXECUTABLE_FILENAME _("the main executable file")
|
||||||
|
|
||||||
/* From minidebug.c. */
|
/* From dwarf2read.c */
|
||||||
|
@ -14,7 +14,7 @@ https://bugzilla.redhat.com/show_bug.cgi?id=1339862
|
|||||||
diff --git a/gdb/solib-svr4.c b/gdb/solib-svr4.c
|
diff --git a/gdb/solib-svr4.c b/gdb/solib-svr4.c
|
||||||
--- a/gdb/solib-svr4.c
|
--- a/gdb/solib-svr4.c
|
||||||
+++ b/gdb/solib-svr4.c
|
+++ b/gdb/solib-svr4.c
|
||||||
@@ -1250,14 +1250,28 @@ svr4_read_so_list (svr4_info *info, CORE_ADDR lm, CORE_ADDR prev_lm,
|
@@ -1340,14 +1340,27 @@ svr4_read_so_list (svr4_info *info, CORE_ADDR lm, CORE_ADDR prev_lm,
|
||||||
}
|
}
|
||||||
|
|
||||||
{
|
{
|
||||||
@ -38,14 +38,13 @@ diff --git a/gdb/solib-svr4.c b/gdb/solib-svr4.c
|
|||||||
+ not do any build-id checking of the libraries. There may be missing
|
+ not do any build-id checking of the libraries. There may be missing
|
||||||
+ build-ids dumped in the core file and we would map all the libraries
|
+ build-ids dumped in the core file and we would map all the libraries
|
||||||
+ to the only existing file loaded that time - the executable. */
|
+ to the only existing file loaded that time - the executable. */
|
||||||
+ if (current_program_space->symfile_object_file != NULL
|
+ if (symfile_objfile != NULL
|
||||||
+ && (current_program_space->symfile_object_file->flags
|
+ && (symfile_objfile->flags & OBJF_BUILD_ID_CORE_LOADED) != 0)
|
||||||
+ & OBJF_BUILD_ID_CORE_LOADED) != 0)
|
|
||||||
+ build_id = build_id_addr_get (li->l_ld);
|
+ build_id = build_id_addr_get (li->l_ld);
|
||||||
if (build_id != NULL)
|
if (build_id != NULL)
|
||||||
{
|
{
|
||||||
char *name, *build_id_filename;
|
char *name, *build_id_filename;
|
||||||
@@ -1272,23 +1286,7 @@ svr4_read_so_list (svr4_info *info, CORE_ADDR lm, CORE_ADDR prev_lm,
|
@@ -1362,23 +1375,7 @@ svr4_read_so_list (svr4_info *info, CORE_ADDR lm, CORE_ADDR prev_lm,
|
||||||
xfree (name);
|
xfree (name);
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
@ -61,8 +60,8 @@ diff --git a/gdb/solib-svr4.c b/gdb/solib-svr4.c
|
|||||||
- instead) if the on-disk files no longer match the
|
- instead) if the on-disk files no longer match the
|
||||||
- running program version. */
|
- running program version. */
|
||||||
-
|
-
|
||||||
- if (current_program_space->symfile_object_file != NULL
|
- if (symfile_objfile != NULL
|
||||||
- && (current_program_space->symfile_object_file->flags
|
- && (symfile_objfile->flags
|
||||||
- & OBJF_BUILD_ID_CORE_LOADED) != 0)
|
- & OBJF_BUILD_ID_CORE_LOADED) != 0)
|
||||||
- newobj->so_name[0] = 0;
|
- newobj->so_name[0] = 0;
|
||||||
- }
|
- }
|
||||||
|
File diff suppressed because it is too large
Load Diff
@ -175,7 +175,7 @@ diff --git a/gdb/testsuite/gdb.threads/threaded-exec.exp b/gdb/testsuite/gdb.thr
|
|||||||
+gdb_load ${binfile_nothreads}
|
+gdb_load ${binfile_nothreads}
|
||||||
|
|
||||||
-gdb_run_cmd
|
-gdb_run_cmd
|
||||||
+gdb_run_cmd [list ${binfile_nothreads} ${binfile_threads} 0]
|
+gdb_run_cmd ${binfile_nothreads} ${binfile_threads} 0
|
||||||
|
|
||||||
gdb_test_multiple {} "Program exited" {
|
gdb_test_multiple {} "Program exited" {
|
||||||
-re "\r\n\\\[Inferior .* exited normally\\\]\r\n$gdb_prompt $" {
|
-re "\r\n\\\[Inferior .* exited normally\\\]\r\n$gdb_prompt $" {
|
||||||
|
78
gdb-6.8-quit-never-aborts.patch
Normal file
78
gdb-6.8-quit-never-aborts.patch
Normal file
@ -0,0 +1,78 @@
|
|||||||
|
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
||||||
|
From: Fedora GDB patches <invalid@email.com>
|
||||||
|
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
||||||
|
Subject: gdb-6.8-quit-never-aborts.patch
|
||||||
|
|
||||||
|
;; Make the GDB quit processing non-abortable to cleanup everything properly.
|
||||||
|
;;=fedora: It was useful only after gdb-6.8-attach-signalled-detach-stopped.patch .
|
||||||
|
|
||||||
|
We may abort the process of detaching threads with multiple SIGINTs - which are
|
||||||
|
being sent during a testcase terminating its child GDB.
|
||||||
|
|
||||||
|
Some of the threads may not be properly PTRACE_DETACHed which hurts if they
|
||||||
|
should have been detached with SIGSTOP (as they are accidentally left running
|
||||||
|
on the debugger termination).
|
||||||
|
|
||||||
|
diff --git a/gdb/defs.h b/gdb/defs.h
|
||||||
|
--- a/gdb/defs.h
|
||||||
|
+++ b/gdb/defs.h
|
||||||
|
@@ -177,6 +177,10 @@ extern void default_quit_handler (void);
|
||||||
|
/* Flag that function quit should call quit_force. */
|
||||||
|
extern volatile int sync_quit_force_run;
|
||||||
|
|
||||||
|
+#ifdef NEED_DETACH_SIGSTOP
|
||||||
|
+extern int quit_flag_cleanup;
|
||||||
|
+#endif
|
||||||
|
+
|
||||||
|
extern void quit (void);
|
||||||
|
|
||||||
|
/* Helper for the QUIT macro. */
|
||||||
|
diff --git a/gdb/extension.c b/gdb/extension.c
|
||||||
|
--- a/gdb/extension.c
|
||||||
|
+++ b/gdb/extension.c
|
||||||
|
@@ -769,6 +769,11 @@ check_quit_flag (void)
|
||||||
|
{
|
||||||
|
int result = 0;
|
||||||
|
|
||||||
|
+#ifdef NEED_DETACH_SIGSTOP
|
||||||
|
+ if (quit_flag_cleanup)
|
||||||
|
+ return 0;
|
||||||
|
+#endif
|
||||||
|
+
|
||||||
|
for (const struct extension_language_defn *extlang : extension_languages)
|
||||||
|
{
|
||||||
|
if (extlang->ops != nullptr
|
||||||
|
diff --git a/gdb/top.c b/gdb/top.c
|
||||||
|
--- a/gdb/top.c
|
||||||
|
+++ b/gdb/top.c
|
||||||
|
@@ -1770,7 +1770,13 @@ quit_force (int *exit_arg, int from_tty)
|
||||||
|
else if (return_child_result)
|
||||||
|
exit_code = return_child_result_value;
|
||||||
|
|
||||||
|
+#ifndef NEED_DETACH_SIGSTOP
|
||||||
|
/* We want to handle any quit errors and exit regardless. */
|
||||||
|
+#else
|
||||||
|
+ /* We want to handle any quit errors and exit regardless but we should never
|
||||||
|
+ get user-interrupted to properly detach the inferior. */
|
||||||
|
+ quit_flag_cleanup = 1;
|
||||||
|
+#endif
|
||||||
|
|
||||||
|
/* Get out of tfind mode, and kill or detach all inferiors. */
|
||||||
|
try
|
||||||
|
diff --git a/gdb/utils.c b/gdb/utils.c
|
||||||
|
--- a/gdb/utils.c
|
||||||
|
+++ b/gdb/utils.c
|
||||||
|
@@ -103,6 +103,13 @@ static std::chrono::steady_clock::duration prompt_for_continue_wait_time;
|
||||||
|
|
||||||
|
static bool debug_timestamp = false;
|
||||||
|
|
||||||
|
+#ifdef NEED_DETACH_SIGSTOP
|
||||||
|
+/* Nonzero means we are already processing the quitting cleanups and we should
|
||||||
|
+ no longer get aborted. */
|
||||||
|
+
|
||||||
|
+int quit_flag_cleanup;
|
||||||
|
+#endif
|
||||||
|
+
|
||||||
|
/* True means that strings with character values >0x7F should be printed
|
||||||
|
as octal escapes. False means just print the value (e.g. it's an
|
||||||
|
international character, and the terminal or window can cope.) */
|
89
gdb-archer-pie-addons-keep-disabled.patch
Normal file
89
gdb-archer-pie-addons-keep-disabled.patch
Normal file
@ -0,0 +1,89 @@
|
|||||||
|
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
||||||
|
From: Fedora GDB patches <invalid@email.com>
|
||||||
|
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
||||||
|
Subject: gdb-archer-pie-addons-keep-disabled.patch
|
||||||
|
|
||||||
|
;;=push+jan: Breakpoints disabling matching should not be based on address.
|
||||||
|
|
||||||
|
diff --git a/gdb/breakpoint.c b/gdb/breakpoint.c
|
||||||
|
--- a/gdb/breakpoint.c
|
||||||
|
+++ b/gdb/breakpoint.c
|
||||||
|
@@ -15431,6 +15431,50 @@ static struct cmd_list_element *enablebreaklist = NULL;
|
||||||
|
|
||||||
|
cmd_list_element *commands_cmd_element = nullptr;
|
||||||
|
|
||||||
|
+void
|
||||||
|
+breakpoints_relocate (struct objfile *objfile, section_offsets &delta)
|
||||||
|
+{
|
||||||
|
+ struct bp_location *bl, **blp_tmp;
|
||||||
|
+ int changed = 0;
|
||||||
|
+
|
||||||
|
+ gdb_assert (objfile->separate_debug_objfile_backlink == NULL);
|
||||||
|
+
|
||||||
|
+ ALL_BP_LOCATIONS (bl, blp_tmp)
|
||||||
|
+ {
|
||||||
|
+ struct obj_section *osect;
|
||||||
|
+
|
||||||
|
+ /* BL->SECTION can be correctly NULL for breakpoints with multiple
|
||||||
|
+ locations expanded through symtab. */
|
||||||
|
+
|
||||||
|
+ ALL_OBJFILE_OSECTIONS (objfile, osect)
|
||||||
|
+ {
|
||||||
|
+ CORE_ADDR relocated_address;
|
||||||
|
+ CORE_ADDR delta_offset;
|
||||||
|
+
|
||||||
|
+ delta_offset = delta[osect->the_bfd_section->index];
|
||||||
|
+ if (delta_offset == 0)
|
||||||
|
+ continue;
|
||||||
|
+ relocated_address = bl->address + delta_offset;
|
||||||
|
+
|
||||||
|
+ if (obj_section_addr (osect) <= relocated_address
|
||||||
|
+ && relocated_address < obj_section_endaddr (osect))
|
||||||
|
+ {
|
||||||
|
+ if (bl->inserted)
|
||||||
|
+ remove_breakpoint (bl);
|
||||||
|
+
|
||||||
|
+ bl->address += delta_offset;
|
||||||
|
+ bl->requested_address += delta_offset;
|
||||||
|
+
|
||||||
|
+ changed = 1;
|
||||||
|
+ }
|
||||||
|
+ }
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ if (changed)
|
||||||
|
+ std::sort (bp_locations, bp_locations + bp_locations_count,
|
||||||
|
+ bp_location_is_less_than);
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
void _initialize_breakpoint ();
|
||||||
|
void
|
||||||
|
_initialize_breakpoint ()
|
||||||
|
diff --git a/gdb/breakpoint.h b/gdb/breakpoint.h
|
||||||
|
--- a/gdb/breakpoint.h
|
||||||
|
+++ b/gdb/breakpoint.h
|
||||||
|
@@ -1691,6 +1691,9 @@ extern const char *ep_parse_optional_if_clause (const char **arg);
|
||||||
|
UIOUT iff debugging multiple threads. */
|
||||||
|
extern void maybe_print_thread_hit_breakpoint (struct ui_out *uiout);
|
||||||
|
|
||||||
|
+extern void breakpoints_relocate (struct objfile *objfile,
|
||||||
|
+ section_offsets &delta);
|
||||||
|
+
|
||||||
|
/* Print the specified breakpoint. */
|
||||||
|
extern void print_breakpoint (breakpoint *bp);
|
||||||
|
|
||||||
|
diff --git a/gdb/objfiles.c b/gdb/objfiles.c
|
||||||
|
--- a/gdb/objfiles.c
|
||||||
|
+++ b/gdb/objfiles.c
|
||||||
|
@@ -742,6 +742,11 @@ objfile_relocate1 (struct objfile *objfile,
|
||||||
|
obj_section_addr (s));
|
||||||
|
}
|
||||||
|
|
||||||
|
+ /* Final call of breakpoint_re_set can keep breakpoint locations disabled if
|
||||||
|
+ their addresses match. */
|
||||||
|
+ if (objfile->separate_debug_objfile_backlink == NULL)
|
||||||
|
+ breakpoints_relocate (objfile, delta);
|
||||||
|
+
|
||||||
|
/* Data changed. */
|
||||||
|
return 1;
|
||||||
|
}
|
39
gdb-archer-pie-addons.patch
Normal file
39
gdb-archer-pie-addons.patch
Normal file
@ -0,0 +1,39 @@
|
|||||||
|
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
||||||
|
From: Fedora GDB patches <invalid@email.com>
|
||||||
|
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
||||||
|
Subject: gdb-archer-pie-addons.patch
|
||||||
|
|
||||||
|
;;=push+jan: May get obsoleted by Tom's unrelocated objfiles patch.
|
||||||
|
|
||||||
|
diff --git a/gdb/gdbtypes.h b/gdb/gdbtypes.h
|
||||||
|
--- a/gdb/gdbtypes.h
|
||||||
|
+++ b/gdb/gdbtypes.h
|
||||||
|
@@ -649,6 +649,7 @@ enum field_loc_kind
|
||||||
|
{
|
||||||
|
FIELD_LOC_KIND_BITPOS, /**< bitpos */
|
||||||
|
FIELD_LOC_KIND_ENUMVAL, /**< enumval */
|
||||||
|
+ /* This address is unrelocated by the objfile's ANOFFSET. */
|
||||||
|
FIELD_LOC_KIND_PHYSADDR, /**< physaddr */
|
||||||
|
FIELD_LOC_KIND_PHYSNAME, /**< physname */
|
||||||
|
FIELD_LOC_KIND_DWARF_BLOCK /**< dwarf_block */
|
||||||
|
@@ -699,6 +700,7 @@ union field_location
|
||||||
|
field. Otherwise, physname is the mangled label of the
|
||||||
|
static field. */
|
||||||
|
|
||||||
|
+ /* This address is unrelocated by the objfile's ANOFFSET. */
|
||||||
|
CORE_ADDR physaddr;
|
||||||
|
const char *physname;
|
||||||
|
|
||||||
|
diff --git a/gdb/value.c b/gdb/value.c
|
||||||
|
--- a/gdb/value.c
|
||||||
|
+++ b/gdb/value.c
|
||||||
|
@@ -2850,7 +2850,8 @@ value_static_field (struct type *type, int fieldno)
|
||||||
|
{
|
||||||
|
case FIELD_LOC_KIND_PHYSADDR:
|
||||||
|
retval = value_at_lazy (type->field (fieldno).type (),
|
||||||
|
- TYPE_FIELD_STATIC_PHYSADDR (type, fieldno));
|
||||||
|
+ TYPE_FIELD_STATIC_PHYSADDR (type, fieldno)
|
||||||
|
+ + (TYPE_OBJFILE (type) == NULL ? 0 : TYPE_OBJFILE (type)->section_offsets[SECT_OFF_TEXT (TYPE_OBJFILE (type))]));
|
||||||
|
break;
|
||||||
|
case FIELD_LOC_KIND_PHYSNAME:
|
||||||
|
{
|
3737
gdb-archer-vla-tests.patch
Normal file
3737
gdb-archer-vla-tests.patch
Normal file
File diff suppressed because it is too large
Load Diff
187
gdb-archer.patch
Normal file
187
gdb-archer.patch
Normal file
@ -0,0 +1,187 @@
|
|||||||
|
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
||||||
|
From: Fedora GDB patches <invalid@email.com>
|
||||||
|
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
||||||
|
Subject: gdb-archer.patch
|
||||||
|
|
||||||
|
;; Python patches of: http://sourceware.org/gdb/wiki/ProjectArcher
|
||||||
|
;;=push
|
||||||
|
|
||||||
|
http://sourceware.org/gdb/wiki/ProjectArcher
|
||||||
|
http://sourceware.org/gdb/wiki/ArcherBranchManagement
|
||||||
|
|
||||||
|
GIT snapshot:
|
||||||
|
commit 718a1618b2f691a7f407213bb50f100ac59f91c3
|
||||||
|
|
||||||
|
tromey/python
|
||||||
|
|
||||||
|
diff --git a/gdb/data-directory/Makefile.in b/gdb/data-directory/Makefile.in
|
||||||
|
--- a/gdb/data-directory/Makefile.in
|
||||||
|
+++ b/gdb/data-directory/Makefile.in
|
||||||
|
@@ -80,6 +80,7 @@ PYTHON_FILE_LIST = \
|
||||||
|
gdb/unwinder.py \
|
||||||
|
gdb/xmethod.py \
|
||||||
|
gdb/command/__init__.py \
|
||||||
|
+ gdb/command/ignore_errors.py \
|
||||||
|
gdb/command/explore.py \
|
||||||
|
gdb/command/backtrace.py \
|
||||||
|
gdb/command/frame_filters.py \
|
||||||
|
@@ -92,6 +93,7 @@ PYTHON_FILE_LIST = \
|
||||||
|
gdb/function/as_string.py \
|
||||||
|
gdb/function/caller_is.py \
|
||||||
|
gdb/function/strfns.py \
|
||||||
|
+ gdb/function/in_scope.py \
|
||||||
|
gdb/printer/__init__.py \
|
||||||
|
gdb/printer/bound_registers.py
|
||||||
|
|
||||||
|
diff --git a/gdb/gdb-gdb.gdb.in b/gdb/gdb-gdb.gdb.in
|
||||||
|
--- a/gdb/gdb-gdb.gdb.in
|
||||||
|
+++ b/gdb/gdb-gdb.gdb.in
|
||||||
|
@@ -1,5 +1,15 @@
|
||||||
|
echo Setting up the environment for debugging gdb.\n
|
||||||
|
|
||||||
|
+# Set up the Python library and "require" command.
|
||||||
|
+python
|
||||||
|
+from os.path import abspath
|
||||||
|
+gdb.datadir = abspath ('@srcdir@/python/lib')
|
||||||
|
+gdb.pythonlibdir = gdb.datadir
|
||||||
|
+gdb.__path__ = [gdb.datadir + '/gdb']
|
||||||
|
+sys.path.insert(0, gdb.datadir)
|
||||||
|
+end
|
||||||
|
+source @srcdir@/python/lib/gdb/__init__.py
|
||||||
|
+
|
||||||
|
if !$gdb_init_done
|
||||||
|
set variable $gdb_init_done = 1
|
||||||
|
|
||||||
|
diff --git a/gdb/python/lib/gdb/command/ignore_errors.py b/gdb/python/lib/gdb/command/ignore_errors.py
|
||||||
|
new file mode 100644
|
||||||
|
--- /dev/null
|
||||||
|
+++ b/gdb/python/lib/gdb/command/ignore_errors.py
|
||||||
|
@@ -0,0 +1,37 @@
|
||||||
|
+# Ignore errors in user commands.
|
||||||
|
+
|
||||||
|
+# Copyright (C) 2008 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/>.
|
||||||
|
+
|
||||||
|
+import gdb
|
||||||
|
+
|
||||||
|
+class IgnoreErrorsCommand (gdb.Command):
|
||||||
|
+ """Execute a single command, ignoring all errors.
|
||||||
|
+Only one-line commands are supported.
|
||||||
|
+This is primarily useful in scripts."""
|
||||||
|
+
|
||||||
|
+ def __init__ (self):
|
||||||
|
+ super (IgnoreErrorsCommand, self).__init__ ("ignore-errors",
|
||||||
|
+ gdb.COMMAND_OBSCURE,
|
||||||
|
+ # FIXME...
|
||||||
|
+ gdb.COMPLETE_COMMAND)
|
||||||
|
+
|
||||||
|
+ def invoke (self, arg, from_tty):
|
||||||
|
+ try:
|
||||||
|
+ gdb.execute (arg, from_tty)
|
||||||
|
+ except:
|
||||||
|
+ pass
|
||||||
|
+
|
||||||
|
+IgnoreErrorsCommand ()
|
||||||
|
diff --git a/gdb/python/lib/gdb/function/in_scope.py b/gdb/python/lib/gdb/function/in_scope.py
|
||||||
|
new file mode 100644
|
||||||
|
--- /dev/null
|
||||||
|
+++ b/gdb/python/lib/gdb/function/in_scope.py
|
||||||
|
@@ -0,0 +1,47 @@
|
||||||
|
+# In-scope function.
|
||||||
|
+
|
||||||
|
+# Copyright (C) 2008 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/>.
|
||||||
|
+
|
||||||
|
+import gdb
|
||||||
|
+
|
||||||
|
+class InScope (gdb.Function):
|
||||||
|
+ """Return True if all the given variables or macros are in scope.
|
||||||
|
+Takes one argument for each variable name to be checked."""
|
||||||
|
+
|
||||||
|
+ def __init__ (self):
|
||||||
|
+ super (InScope, self).__init__ ("in_scope")
|
||||||
|
+
|
||||||
|
+ def invoke (self, *vars):
|
||||||
|
+ if len (vars) == 0:
|
||||||
|
+ raise (TypeError, "in_scope takes at least one argument")
|
||||||
|
+
|
||||||
|
+ # gdb.Value isn't hashable so it can't be put in a map.
|
||||||
|
+ # Convert to string first.
|
||||||
|
+ wanted = set (map (lambda x: x.string (), vars))
|
||||||
|
+ found = set ()
|
||||||
|
+ block = gdb.selected_frame ().block ()
|
||||||
|
+ while block:
|
||||||
|
+ for sym in block:
|
||||||
|
+ if (sym.is_argument or sym.is_constant
|
||||||
|
+ or sym.is_function or sym.is_variable):
|
||||||
|
+ if sym.name in wanted:
|
||||||
|
+ found.add (sym.name)
|
||||||
|
+
|
||||||
|
+ block = block.superblock
|
||||||
|
+
|
||||||
|
+ return wanted == found
|
||||||
|
+
|
||||||
|
+InScope ()
|
||||||
|
diff --git a/gdb/testsuite/gdb.python/py-frame.exp b/gdb/testsuite/gdb.python/py-frame.exp
|
||||||
|
--- a/gdb/testsuite/gdb.python/py-frame.exp
|
||||||
|
+++ b/gdb/testsuite/gdb.python/py-frame.exp
|
||||||
|
@@ -95,6 +95,8 @@ gdb_test "python print ('result = %s' % f0.read_var ('a'))" " = 1" "test Frame.r
|
||||||
|
|
||||||
|
gdb_test "python print ('result = %s' % (gdb.selected_frame () == f1))" " = True" "test gdb.selected_frame"
|
||||||
|
|
||||||
|
+gdb_test "python print ('result = %s' % (f0.block ()))" "<gdb.Block object at 0x\[\[:xdigit:\]\]+>" "test Frame.block"
|
||||||
|
+
|
||||||
|
# Can read SP register.
|
||||||
|
gdb_test "python print ('result = %s' % (gdb.selected_frame ().read_register ('sp') == gdb.parse_and_eval ('\$sp')))" \
|
||||||
|
" = True" \
|
||||||
|
diff --git a/gdb/testsuite/gdb.python/py-value.exp b/gdb/testsuite/gdb.python/py-value.exp
|
||||||
|
--- a/gdb/testsuite/gdb.python/py-value.exp
|
||||||
|
+++ b/gdb/testsuite/gdb.python/py-value.exp
|
||||||
|
@@ -419,6 +419,15 @@ proc test_value_after_death {} {
|
||||||
|
"print value's type"
|
||||||
|
}
|
||||||
|
|
||||||
|
+# Regression test for a cast failure. The bug was that if we cast a
|
||||||
|
+# value to its own type, gdb could crash. This happened because we
|
||||||
|
+# could end up double-freeing a struct value.
|
||||||
|
+proc test_cast_regression {} {
|
||||||
|
+ gdb_test "python v = gdb.Value(5)" "" "create value for cast test"
|
||||||
|
+ gdb_test "python v = v.cast(v.type)" "" "cast value for cast test"
|
||||||
|
+ gdb_test "python print(v)" "5" "print value for cast test"
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
# Regression test for invalid subscript operations. The bug was that
|
||||||
|
# the type of the value was not being checked before allowing a
|
||||||
|
# subscript operation to proceed.
|
||||||
|
@@ -606,6 +615,7 @@ test_value_in_inferior
|
||||||
|
test_value_from_buffer
|
||||||
|
test_inferior_function_call
|
||||||
|
test_value_after_death
|
||||||
|
+test_cast_regression
|
||||||
|
|
||||||
|
# Test either C or C++ values.
|
||||||
|
|
356
gdb-attach-fail-reasons-5of5.patch
Normal file
356
gdb-attach-fail-reasons-5of5.patch
Normal file
@ -0,0 +1,356 @@
|
|||||||
|
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
||||||
|
From: Fedora GDB patches <invalid@email.com>
|
||||||
|
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
||||||
|
Subject: gdb-attach-fail-reasons-5of5.patch
|
||||||
|
|
||||||
|
;; Print reasons for failed attach/spawn incl. SELinux deny_ptrace (BZ 786878).
|
||||||
|
;;=push+jan
|
||||||
|
|
||||||
|
http://sourceware.org/ml/gdb-patches/2012-03/msg00171.html
|
||||||
|
|
||||||
|
Hi,
|
||||||
|
|
||||||
|
and here is the last bit for new SELinux 'deny_ptrace':
|
||||||
|
https://bugzilla.redhat.com/show_bug.cgi?id=786878
|
||||||
|
|
||||||
|
As even PTRACE_TRACEME fails in such case it needs to install hook for even
|
||||||
|
that event.
|
||||||
|
|
||||||
|
Thanks,
|
||||||
|
Jan
|
||||||
|
|
||||||
|
gdb/
|
||||||
|
2012-03-06 Jan Kratochvil <jan.kratochvil@redhat.com>
|
||||||
|
|
||||||
|
* common/linux-ptrace.c [HAVE_SELINUX_SELINUX_H]: include
|
||||||
|
selinux/selinux.h.
|
||||||
|
(linux_ptrace_attach_warnings): Call linux_ptrace_create_warnings.
|
||||||
|
(linux_ptrace_create_warnings): New.
|
||||||
|
* common/linux-ptrace.h (linux_ptrace_create_warnings): New declaration.
|
||||||
|
* config.in: Regenerate.
|
||||||
|
* configure: Regenerate.
|
||||||
|
* configure.ac: Check selinux/selinux.h and the selinux library.
|
||||||
|
* inf-ptrace.c (inf_ptrace_me): Check the ptrace result.
|
||||||
|
* linux-nat.c (linux_nat_create_inferior): New variable ex. Wrap
|
||||||
|
to_create_inferior into TRY_CATCH, call linux_ptrace_create_warnings.
|
||||||
|
|
||||||
|
gdb/gdbserver/
|
||||||
|
* config.in: Regenerate.
|
||||||
|
* configure: Regenerate.
|
||||||
|
* configure.ac: Check selinux/selinux.h and the selinux library.
|
||||||
|
* linux-low.c (linux_traceme): New function.
|
||||||
|
(linux_create_inferior, linux_tracefork_child): Call it instead of
|
||||||
|
direct ptrace.
|
||||||
|
|
||||||
|
diff --git a/gdb/config.in b/gdb/config.in
|
||||||
|
--- a/gdb/config.in
|
||||||
|
+++ b/gdb/config.in
|
||||||
|
@@ -253,6 +253,9 @@
|
||||||
|
/* Define if librpm library is being used. */
|
||||||
|
#undef HAVE_LIBRPM
|
||||||
|
|
||||||
|
+/* Define to 1 if you have the `selinux' library (-lselinux). */
|
||||||
|
+#undef HAVE_LIBSELINUX
|
||||||
|
+
|
||||||
|
/* Define to 1 if you have the <libunwind-ia64.h> header file. */
|
||||||
|
#undef HAVE_LIBUNWIND_IA64_H
|
||||||
|
|
||||||
|
@@ -388,6 +391,9 @@
|
||||||
|
/* Define to 1 if you have the `scm_new_smob' function. */
|
||||||
|
#undef HAVE_SCM_NEW_SMOB
|
||||||
|
|
||||||
|
+/* Define to 1 if you have the <selinux/selinux.h> header file. */
|
||||||
|
+#undef HAVE_SELINUX_SELINUX_H
|
||||||
|
+
|
||||||
|
/* Define to 1 if you have the `setlocale' function. */
|
||||||
|
#undef HAVE_SETLOCALE
|
||||||
|
|
||||||
|
diff --git a/gdb/configure b/gdb/configure
|
||||||
|
--- a/gdb/configure
|
||||||
|
+++ b/gdb/configure
|
||||||
|
@@ -16861,6 +16861,64 @@ cat >>confdefs.h <<_ACEOF
|
||||||
|
_ACEOF
|
||||||
|
|
||||||
|
|
||||||
|
+for ac_header in selinux/selinux.h
|
||||||
|
+do :
|
||||||
|
+ ac_fn_c_check_header_mongrel "$LINENO" "selinux/selinux.h" "ac_cv_header_selinux_selinux_h" "$ac_includes_default"
|
||||||
|
+if test "x$ac_cv_header_selinux_selinux_h" = x""yes; then :
|
||||||
|
+ cat >>confdefs.h <<_ACEOF
|
||||||
|
+#define HAVE_SELINUX_SELINUX_H 1
|
||||||
|
+_ACEOF
|
||||||
|
+
|
||||||
|
+fi
|
||||||
|
+
|
||||||
|
+done
|
||||||
|
+
|
||||||
|
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for security_get_boolean_active in -lselinux" >&5
|
||||||
|
+$as_echo_n "checking for security_get_boolean_active in -lselinux... " >&6; }
|
||||||
|
+if test "${ac_cv_lib_selinux_security_get_boolean_active+set}" = set; then :
|
||||||
|
+ $as_echo_n "(cached) " >&6
|
||||||
|
+else
|
||||||
|
+ ac_check_lib_save_LIBS=$LIBS
|
||||||
|
+LIBS="-lselinux $LIBS"
|
||||||
|
+cat confdefs.h - <<_ACEOF >conftest.$ac_ext
|
||||||
|
+/* end confdefs.h. */
|
||||||
|
+
|
||||||
|
+/* Override any GCC internal prototype to avoid an error.
|
||||||
|
+ Use char because int might match the return type of a GCC
|
||||||
|
+ builtin and then its argument prototype would still apply. */
|
||||||
|
+#ifdef __cplusplus
|
||||||
|
+extern "C"
|
||||||
|
+#endif
|
||||||
|
+char security_get_boolean_active ();
|
||||||
|
+int
|
||||||
|
+main ()
|
||||||
|
+{
|
||||||
|
+return security_get_boolean_active ();
|
||||||
|
+ ;
|
||||||
|
+ return 0;
|
||||||
|
+}
|
||||||
|
+_ACEOF
|
||||||
|
+if ac_fn_c_try_link "$LINENO"; then :
|
||||||
|
+ ac_cv_lib_selinux_security_get_boolean_active=yes
|
||||||
|
+else
|
||||||
|
+ ac_cv_lib_selinux_security_get_boolean_active=no
|
||||||
|
+fi
|
||||||
|
+rm -f core conftest.err conftest.$ac_objext \
|
||||||
|
+ conftest$ac_exeext conftest.$ac_ext
|
||||||
|
+LIBS=$ac_check_lib_save_LIBS
|
||||||
|
+fi
|
||||||
|
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_selinux_security_get_boolean_active" >&5
|
||||||
|
+$as_echo "$ac_cv_lib_selinux_security_get_boolean_active" >&6; }
|
||||||
|
+if test "x$ac_cv_lib_selinux_security_get_boolean_active" = x""yes; then :
|
||||||
|
+ cat >>confdefs.h <<_ACEOF
|
||||||
|
+#define HAVE_LIBSELINUX 1
|
||||||
|
+_ACEOF
|
||||||
|
+
|
||||||
|
+ LIBS="-lselinux $LIBS"
|
||||||
|
+
|
||||||
|
+fi
|
||||||
|
+
|
||||||
|
+
|
||||||
|
|
||||||
|
# Support for --with-sysroot is a copy of GDB_AC_WITH_DIR,
|
||||||
|
# except that the argument to --with-sysroot is optional.
|
||||||
|
diff --git a/gdb/configure.ac b/gdb/configure.ac
|
||||||
|
--- a/gdb/configure.ac
|
||||||
|
+++ b/gdb/configure.ac
|
||||||
|
@@ -1900,6 +1900,10 @@ case $host_os in
|
||||||
|
esac
|
||||||
|
AC_DEFINE_UNQUOTED(GDBINIT,"$gdbinit",[The .gdbinit filename.])
|
||||||
|
|
||||||
|
+dnl Check security_get_boolean_active availability.
|
||||||
|
+AC_CHECK_HEADERS(selinux/selinux.h)
|
||||||
|
+AC_CHECK_LIB(selinux, security_get_boolean_active)
|
||||||
|
+
|
||||||
|
dnl Handle optional features that can be enabled.
|
||||||
|
|
||||||
|
# Support for --with-sysroot is a copy of GDB_AC_WITH_DIR,
|
||||||
|
diff --git a/gdb/linux-nat.c b/gdb/linux-nat.c
|
||||||
|
--- a/gdb/linux-nat.c
|
||||||
|
+++ b/gdb/linux-nat.c
|
||||||
|
@@ -1103,7 +1103,16 @@ linux_nat_target::create_inferior (const char *exec_file,
|
||||||
|
/* Make sure we report all signals during startup. */
|
||||||
|
pass_signals ({});
|
||||||
|
|
||||||
|
- inf_ptrace_target::create_inferior (exec_file, allargs, env, from_tty);
|
||||||
|
+ try
|
||||||
|
+ {
|
||||||
|
+ inf_ptrace_target::create_inferior (exec_file, allargs, env, from_tty);
|
||||||
|
+ }
|
||||||
|
+ catch (const gdb_exception_error &ex)
|
||||||
|
+ {
|
||||||
|
+ std::string result = linux_ptrace_create_warnings ();
|
||||||
|
+
|
||||||
|
+ throw_error (ex.error, "%s%s", result.c_str (), ex.message->c_str ());
|
||||||
|
+ }
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Callback for linux_proc_attach_tgid_threads. Attach to PTID if not
|
||||||
|
diff --git a/gdb/nat/linux-ptrace.c b/gdb/nat/linux-ptrace.c
|
||||||
|
--- a/gdb/nat/linux-ptrace.c
|
||||||
|
+++ b/gdb/nat/linux-ptrace.c
|
||||||
|
@@ -25,6 +25,10 @@
|
||||||
|
#include <sys/procfs.h>
|
||||||
|
#endif
|
||||||
|
|
||||||
|
+#ifdef HAVE_SELINUX_SELINUX_H
|
||||||
|
+# include <selinux/selinux.h>
|
||||||
|
+#endif /* HAVE_SELINUX_SELINUX_H */
|
||||||
|
+
|
||||||
|
/* Stores the ptrace options supported by the running kernel.
|
||||||
|
A value of -1 means we did not check for features yet. A value
|
||||||
|
of 0 means there are no supported features. */
|
||||||
|
@@ -50,6 +54,8 @@ linux_ptrace_attach_fail_reason (pid_t pid)
|
||||||
|
"terminated"),
|
||||||
|
(int) pid);
|
||||||
|
|
||||||
|
+ result += linux_ptrace_create_warnings ();
|
||||||
|
+
|
||||||
|
return result;
|
||||||
|
}
|
||||||
|
|
||||||
|
@@ -586,6 +592,25 @@ linux_ptrace_init_warnings (void)
|
||||||
|
linux_ptrace_test_ret_to_nx ();
|
||||||
|
}
|
||||||
|
|
||||||
|
+/* Print all possible reasons we could fail to create a traced process. */
|
||||||
|
+
|
||||||
|
+std::string
|
||||||
|
+linux_ptrace_create_warnings ()
|
||||||
|
+{
|
||||||
|
+ std::string result;
|
||||||
|
+
|
||||||
|
+#ifdef HAVE_LIBSELINUX
|
||||||
|
+ /* -1 is returned for errors, 0 if it has no effect, 1 if PTRACE_ATTACH is
|
||||||
|
+ forbidden. */
|
||||||
|
+ if (security_get_boolean_active ("deny_ptrace") == 1)
|
||||||
|
+ string_appendf (result,
|
||||||
|
+ _("the SELinux boolean 'deny_ptrace' is enabled, "
|
||||||
|
+ "you can disable this process attach protection by: "
|
||||||
|
+ "(gdb) shell sudo setsebool deny_ptrace=0\n"));
|
||||||
|
+#endif /* HAVE_LIBSELINUX */
|
||||||
|
+ return result;
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
/* Extract extended ptrace event from wait status. */
|
||||||
|
|
||||||
|
int
|
||||||
|
diff --git a/gdb/nat/linux-ptrace.h b/gdb/nat/linux-ptrace.h
|
||||||
|
--- a/gdb/nat/linux-ptrace.h
|
||||||
|
+++ b/gdb/nat/linux-ptrace.h
|
||||||
|
@@ -184,6 +184,7 @@ extern std::string linux_ptrace_attach_fail_reason (pid_t pid);
|
||||||
|
extern std::string linux_ptrace_attach_fail_reason_string (ptid_t ptid, int err);
|
||||||
|
|
||||||
|
extern void linux_ptrace_init_warnings (void);
|
||||||
|
+extern std::string linux_ptrace_create_warnings ();
|
||||||
|
extern void linux_check_ptrace_features (void);
|
||||||
|
extern void linux_enable_event_reporting (pid_t pid, int attached);
|
||||||
|
extern void linux_disable_event_reporting (pid_t pid);
|
||||||
|
diff --git a/gdbserver/config.in b/gdbserver/config.in
|
||||||
|
--- a/gdbserver/config.in
|
||||||
|
+++ b/gdbserver/config.in
|
||||||
|
@@ -143,6 +143,9 @@
|
||||||
|
/* Define if you have the ipt library. */
|
||||||
|
#undef HAVE_LIBIPT
|
||||||
|
|
||||||
|
+/* Define to 1 if you have the `selinux' library (-lselinux). */
|
||||||
|
+#undef HAVE_LIBSELINUX
|
||||||
|
+
|
||||||
|
/* Define if the target supports branch tracing. */
|
||||||
|
#undef HAVE_LINUX_BTRACE
|
||||||
|
|
||||||
|
@@ -249,6 +252,9 @@
|
||||||
|
/* Define to 1 if you have the `sbrk' function. */
|
||||||
|
#undef HAVE_SBRK
|
||||||
|
|
||||||
|
+/* Define to 1 if you have the <selinux/selinux.h> header file. */
|
||||||
|
+#undef HAVE_SELINUX_SELINUX_H
|
||||||
|
+
|
||||||
|
/* Define to 1 if you have the `setns' function. */
|
||||||
|
#undef HAVE_SETNS
|
||||||
|
|
||||||
|
diff --git a/gdbserver/configure b/gdbserver/configure
|
||||||
|
--- a/gdbserver/configure
|
||||||
|
+++ b/gdbserver/configure
|
||||||
|
@@ -10683,6 +10683,64 @@ if $want_ipa ; then
|
||||||
|
fi
|
||||||
|
fi
|
||||||
|
|
||||||
|
+for ac_header in selinux/selinux.h
|
||||||
|
+do :
|
||||||
|
+ ac_fn_c_check_header_mongrel "$LINENO" "selinux/selinux.h" "ac_cv_header_selinux_selinux_h" "$ac_includes_default"
|
||||||
|
+if test "x$ac_cv_header_selinux_selinux_h" = x""yes; then :
|
||||||
|
+ cat >>confdefs.h <<_ACEOF
|
||||||
|
+#define HAVE_SELINUX_SELINUX_H 1
|
||||||
|
+_ACEOF
|
||||||
|
+
|
||||||
|
+fi
|
||||||
|
+
|
||||||
|
+done
|
||||||
|
+
|
||||||
|
+{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for security_get_boolean_active in -lselinux" >&5
|
||||||
|
+$as_echo_n "checking for security_get_boolean_active in -lselinux... " >&6; }
|
||||||
|
+if test "${ac_cv_lib_selinux_security_get_boolean_active+set}" = set; then :
|
||||||
|
+ $as_echo_n "(cached) " >&6
|
||||||
|
+else
|
||||||
|
+ ac_check_lib_save_LIBS=$LIBS
|
||||||
|
+LIBS="-lselinux $LIBS"
|
||||||
|
+cat confdefs.h - <<_ACEOF >conftest.$ac_ext
|
||||||
|
+/* end confdefs.h. */
|
||||||
|
+
|
||||||
|
+/* Override any GCC internal prototype to avoid an error.
|
||||||
|
+ Use char because int might match the return type of a GCC
|
||||||
|
+ builtin and then its argument prototype would still apply. */
|
||||||
|
+#ifdef __cplusplus
|
||||||
|
+extern "C"
|
||||||
|
+#endif
|
||||||
|
+char security_get_boolean_active ();
|
||||||
|
+int
|
||||||
|
+main ()
|
||||||
|
+{
|
||||||
|
+return security_get_boolean_active ();
|
||||||
|
+ ;
|
||||||
|
+ return 0;
|
||||||
|
+}
|
||||||
|
+_ACEOF
|
||||||
|
+if ac_fn_c_try_link "$LINENO"; then :
|
||||||
|
+ ac_cv_lib_selinux_security_get_boolean_active=yes
|
||||||
|
+else
|
||||||
|
+ ac_cv_lib_selinux_security_get_boolean_active=no
|
||||||
|
+fi
|
||||||
|
+rm -f core conftest.err conftest.$ac_objext \
|
||||||
|
+ conftest$ac_exeext conftest.$ac_ext
|
||||||
|
+LIBS=$ac_check_lib_save_LIBS
|
||||||
|
+fi
|
||||||
|
+{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_selinux_security_get_boolean_active" >&5
|
||||||
|
+$as_echo "$ac_cv_lib_selinux_security_get_boolean_active" >&6; }
|
||||||
|
+if test "x$ac_cv_lib_selinux_security_get_boolean_active" = x""yes; then :
|
||||||
|
+ cat >>confdefs.h <<_ACEOF
|
||||||
|
+#define HAVE_LIBSELINUX 1
|
||||||
|
+_ACEOF
|
||||||
|
+
|
||||||
|
+ LIBS="-lselinux $LIBS"
|
||||||
|
+
|
||||||
|
+fi
|
||||||
|
+
|
||||||
|
+
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
diff --git a/gdbserver/configure.ac b/gdbserver/configure.ac
|
||||||
|
--- a/gdbserver/configure.ac
|
||||||
|
+++ b/gdbserver/configure.ac
|
||||||
|
@@ -401,6 +401,10 @@ if $want_ipa ; then
|
||||||
|
fi
|
||||||
|
fi
|
||||||
|
|
||||||
|
+dnl Check security_get_boolean_active availability.
|
||||||
|
+AC_CHECK_HEADERS(selinux/selinux.h)
|
||||||
|
+AC_CHECK_LIB(selinux, security_get_boolean_active)
|
||||||
|
+
|
||||||
|
AC_SUBST(GDBSERVER_DEPFILES)
|
||||||
|
AC_SUBST(GDBSERVER_LIBS)
|
||||||
|
AC_SUBST(srv_xmlbuiltin)
|
||||||
|
diff --git a/gdbserver/linux-low.cc b/gdbserver/linux-low.cc
|
||||||
|
--- a/gdbserver/linux-low.cc
|
||||||
|
+++ b/gdbserver/linux-low.cc
|
||||||
|
@@ -932,7 +932,16 @@ linux_ptrace_fun ()
|
||||||
|
{
|
||||||
|
if (ptrace (PTRACE_TRACEME, 0, (PTRACE_TYPE_ARG3) 0,
|
||||||
|
(PTRACE_TYPE_ARG4) 0) < 0)
|
||||||
|
- trace_start_error_with_name ("ptrace");
|
||||||
|
+ {
|
||||||
|
+ int save_errno = errno;
|
||||||
|
+
|
||||||
|
+ std::string msg (linux_ptrace_create_warnings ());
|
||||||
|
+
|
||||||
|
+ msg += _("Cannot trace created process");
|
||||||
|
+
|
||||||
|
+ errno = save_errno;
|
||||||
|
+ trace_start_error_with_name (msg.c_str ());
|
||||||
|
+ }
|
||||||
|
|
||||||
|
if (setpgid (0, 0) < 0)
|
||||||
|
trace_start_error_with_name ("setpgid");
|
@ -1,31 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: =?UTF-8?q?Alexandra=20H=C3=A1jkov=C3=A1?= <ahajkova@redhat.com>
|
|
||||||
Date: Tue, 13 Dec 2022 10:34:42 +0100
|
|
||||||
Subject: gdb-backport-readline_support.patch
|
|
||||||
|
|
||||||
Add support for readline 8.2
|
|
||||||
|
|
||||||
In readline 8.2 the type of rl_completer_word_break_characters changed to
|
|
||||||
include const.
|
|
||||||
|
|
||||||
diff --git a/gdb/completer.c b/gdb/completer.c
|
|
||||||
--- a/gdb/completer.c
|
|
||||||
+++ b/gdb/completer.c
|
|
||||||
@@ -36,7 +36,7 @@
|
|
||||||
calling a hook instead so we eliminate the CLI dependency. */
|
|
||||||
#include "gdbcmd.h"
|
|
||||||
|
|
||||||
-/* Needed for rl_completer_word_break_characters() and for
|
|
||||||
+/* Needed for rl_completer_word_break_characters and for
|
|
||||||
rl_filename_completion_function. */
|
|
||||||
#include "readline/readline.h"
|
|
||||||
|
|
||||||
@@ -2011,7 +2011,7 @@ gdb_completion_word_break_characters_throw ()
|
|
||||||
rl_basic_quote_characters = NULL;
|
|
||||||
}
|
|
||||||
|
|
||||||
- return rl_completer_word_break_characters;
|
|
||||||
+ return (char *) rl_completer_word_break_characters;
|
|
||||||
}
|
|
||||||
|
|
||||||
char *
|
|
45
gdb-btrobust.patch
Normal file
45
gdb-btrobust.patch
Normal file
@ -0,0 +1,45 @@
|
|||||||
|
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
||||||
|
From: Fedora GDB patches <invalid@email.com>
|
||||||
|
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
||||||
|
Subject: gdb-btrobust.patch
|
||||||
|
|
||||||
|
;; Continue backtrace even if a frame filter throws an exception (Phil Muldoon).
|
||||||
|
;;=push
|
||||||
|
|
||||||
|
This should fix the error with glib. An error message will still be
|
||||||
|
printed, but a default backtrace will occur in this case.
|
||||||
|
|
||||||
|
--
|
||||||
|
|
||||||
|
diff --git a/gdb/python/py-framefilter.c b/gdb/python/py-framefilter.c
|
||||||
|
--- a/gdb/python/py-framefilter.c
|
||||||
|
+++ b/gdb/python/py-framefilter.c
|
||||||
|
@@ -1204,6 +1204,7 @@ gdbpy_apply_frame_filter (const struct extension_language_defn *extlang,
|
||||||
|
htab_eq_pointer,
|
||||||
|
NULL));
|
||||||
|
|
||||||
|
+ int count_printed = 0;
|
||||||
|
while (true)
|
||||||
|
{
|
||||||
|
gdbpy_ref<> item (PyIter_Next (iterable.get ()));
|
||||||
|
@@ -1212,8 +1213,8 @@ gdbpy_apply_frame_filter (const struct extension_language_defn *extlang,
|
||||||
|
{
|
||||||
|
if (PyErr_Occurred ())
|
||||||
|
{
|
||||||
|
- gdbpy_print_stack_or_quit ();
|
||||||
|
- return EXT_LANG_BT_ERROR;
|
||||||
|
+ gdbpy_print_stack ();
|
||||||
|
+ return count_printed > 0 ? EXT_LANG_BT_ERROR : EXT_LANG_BT_NO_FILTERS;
|
||||||
|
}
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
@@ -1245,7 +1246,8 @@ gdbpy_apply_frame_filter (const struct extension_language_defn *extlang,
|
||||||
|
/* Do not exit on error printing a single frame. Print the
|
||||||
|
error and continue with other frames. */
|
||||||
|
if (success == EXT_LANG_BT_ERROR)
|
||||||
|
- gdbpy_print_stack_or_quit ();
|
||||||
|
+ gdbpy_print_stack ();
|
||||||
|
+ count_printed++;
|
||||||
|
}
|
||||||
|
|
||||||
|
return success;
|
178
gdb-bz1219747-attach-kills.patch
Normal file
178
gdb-bz1219747-attach-kills.patch
Normal file
@ -0,0 +1,178 @@
|
|||||||
|
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
||||||
|
From: Fedora GDB patches <invalid@email.com>
|
||||||
|
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
||||||
|
Subject: gdb-bz1219747-attach-kills.patch
|
||||||
|
|
||||||
|
;; Never kill PID on: gdb exec PID (Jan Kratochvil, RH BZ 1219747).
|
||||||
|
;;=push+jan
|
||||||
|
|
||||||
|
http://sourceware.org/ml/gdb-patches/2015-10/msg00301.html
|
||||||
|
|
||||||
|
Hi,
|
||||||
|
|
||||||
|
in some cases with deleted main executable GDB will want to kill the inferior.
|
||||||
|
|
||||||
|
$ cp /bin/sleep /tmp/sleep;/tmp/sleep 1h&p=$!
|
||||||
|
$ rm /tmp/sleep
|
||||||
|
$ gdb /tmp/sleep $p
|
||||||
|
GNU gdb (GDB) 7.10.50.20151016-cvs
|
||||||
|
/tmp/sleep: No such file or directory.
|
||||||
|
Attaching to process 9694
|
||||||
|
/tmp/sleep (deleted): No such file or directory.
|
||||||
|
A program is being debugged already. Kill it? (y or n) _
|
||||||
|
|
||||||
|
The first attachment of "/tmp/sleep" commandline argument errors at:
|
||||||
|
|
||||||
|
267 if (scratch_chan < 0)
|
||||||
|
268 perror_with_name (filename);
|
||||||
|
1051 if (catch_command_errors_const (exec_file_attach, execarg,
|
||||||
|
1052 !batch_flag))
|
||||||
|
|
||||||
|
Then GDB tries to attach to the process $p:
|
||||||
|
|
||||||
|
1082 if (catch_command_errors (attach_command, pid_or_core_arg,
|
||||||
|
1083 !batch_flag) == 0)
|
||||||
|
|
||||||
|
This succeeds and since this moment GDB has a valid inferior. But despite that
|
||||||
|
the lines
|
||||||
|
1082 if (catch_command_errors (attach_command, pid_or_core_arg,
|
||||||
|
1083 !batch_flag) == 0)
|
||||||
|
still fail because consequently attach_command() fails to find the associated
|
||||||
|
executable file:
|
||||||
|
|
||||||
|
267 if (scratch_chan < 0)
|
||||||
|
268 perror_with_name (filename);
|
||||||
|
1082 if (catch_command_errors (attach_command, pid_or_core_arg,
|
||||||
|
1083 !batch_flag) == 0)
|
||||||
|
|
||||||
|
and therefore GDB executes the following:
|
||||||
|
|
||||||
|
(gdb) bt
|
||||||
|
2179 if (have_inferiors ())
|
||||||
|
2180 {
|
||||||
|
2181 if (!from_tty
|
||||||
|
2182 || !have_live_inferiors ()
|
||||||
|
2183 || query (_("A program is being debugged already. Kill it? ")))
|
||||||
|
2184 iterate_over_inferiors (dispose_inferior, NULL);
|
||||||
|
2185 else
|
||||||
|
2186 error (_("Program not killed."));
|
||||||
|
2187 }
|
||||||
|
1084 catch_command_errors (core_file_command, pid_or_core_arg,
|
||||||
|
1085 !batch_flag);
|
||||||
|
|
||||||
|
No regressions on {x86_64,x86_64-m32,i686}-fedora24pre-linux-gnu.
|
||||||
|
|
||||||
|
Thanks,
|
||||||
|
Jan
|
||||||
|
|
||||||
|
gdb/ChangeLog
|
||||||
|
2015-10-16 Jan Kratochvil <jan.kratochvil@redhat.com>
|
||||||
|
|
||||||
|
* main.c (captured_main): Run core_file_command for pid_or_core_arg
|
||||||
|
only if not have_inferiors ().
|
||||||
|
|
||||||
|
gdb/testsuite/ChangeLog
|
||||||
|
2015-10-16 Jan Kratochvil <jan.kratochvil@redhat.com>
|
||||||
|
|
||||||
|
* gdb.base/attach-kills.c: New.
|
||||||
|
* gdb.base/attach-kills.exp: New.
|
||||||
|
|
||||||
|
diff --git a/gdb/main.c b/gdb/main.c
|
||||||
|
--- a/gdb/main.c
|
||||||
|
+++ b/gdb/main.c
|
||||||
|
@@ -1199,7 +1199,10 @@ captured_main_1 (struct captured_main_args *context)
|
||||||
|
{
|
||||||
|
ret = catch_command_errors (attach_command, pid_or_core_arg,
|
||||||
|
!batch_flag);
|
||||||
|
- if (ret == 0)
|
||||||
|
+ if (ret == 0
|
||||||
|
+ /* attach_command could succeed partially and core_file_command
|
||||||
|
+ would try to kill it. */
|
||||||
|
+ && !have_inferiors ())
|
||||||
|
ret = catch_command_errors (core_file_command,
|
||||||
|
pid_or_core_arg,
|
||||||
|
!batch_flag);
|
||||||
|
diff --git a/gdb/testsuite/gdb.base/attach-kills.c b/gdb/testsuite/gdb.base/attach-kills.c
|
||||||
|
new file mode 100644
|
||||||
|
--- /dev/null
|
||||||
|
+++ b/gdb/testsuite/gdb.base/attach-kills.c
|
||||||
|
@@ -0,0 +1,25 @@
|
||||||
|
+/* This testcase is part of GDB, the GNU debugger.
|
||||||
|
+
|
||||||
|
+ Copyright 2015 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/>. */
|
||||||
|
+
|
||||||
|
+#include <unistd.h>
|
||||||
|
+
|
||||||
|
+int
|
||||||
|
+main (void)
|
||||||
|
+{
|
||||||
|
+ sleep (600);
|
||||||
|
+ return 0;
|
||||||
|
+}
|
||||||
|
diff --git a/gdb/testsuite/gdb.base/attach-kills.exp b/gdb/testsuite/gdb.base/attach-kills.exp
|
||||||
|
new file mode 100644
|
||||||
|
--- /dev/null
|
||||||
|
+++ b/gdb/testsuite/gdb.base/attach-kills.exp
|
||||||
|
@@ -0,0 +1,49 @@
|
||||||
|
+# Copyright (C) 2015 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/>.
|
||||||
|
+
|
||||||
|
+if { ![can_spawn_for_attach] } {
|
||||||
|
+ return 0
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+standard_testfile
|
||||||
|
+
|
||||||
|
+if { [build_executable ${testfile}.exp $testfile] == -1 } {
|
||||||
|
+ return -1
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+# Start the program running and then wait for a bit, to be sure
|
||||||
|
+# that it can be attached to.
|
||||||
|
+
|
||||||
|
+set test_spawn_id [spawn_wait_for_attach $binfile]
|
||||||
|
+set testpid [spawn_id_get_pid $test_spawn_id]
|
||||||
|
+
|
||||||
|
+remote_exec target "cp -pf -- $binfile $binfile-copy"
|
||||||
|
+remote_exec target "rm -f -- $binfile"
|
||||||
|
+
|
||||||
|
+set test "start gdb"
|
||||||
|
+set res [gdb_spawn_with_cmdline_opts \
|
||||||
|
+ "-iex \"set height 0\" -iex \"set width 0\" /DoEsNoTeXySt $testpid"]
|
||||||
|
+if { $res != 0} {
|
||||||
|
+ fail "$test (spawn)"
|
||||||
|
+ kill_wait_spawned_process $test_spawn_id
|
||||||
|
+ return -1
|
||||||
|
+}
|
||||||
|
+gdb_test_multiple "" $test {
|
||||||
|
+ -re "\r\nAttaching to .*\r\n$gdb_prompt $" {
|
||||||
|
+ pass $test
|
||||||
|
+ }
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+kill_wait_spawned_process $test_spawn_id
|
130
gdb-bz533176-fortran-omp-step.patch
Normal file
130
gdb-bz533176-fortran-omp-step.patch
Normal file
@ -0,0 +1,130 @@
|
|||||||
|
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
||||||
|
From: Fedora GDB patches <invalid@email.com>
|
||||||
|
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
||||||
|
Subject: gdb-bz533176-fortran-omp-step.patch
|
||||||
|
|
||||||
|
;; Fix stepping with OMP parallel Fortran sections (BZ 533176).
|
||||||
|
;;=push+jan: It requires some better DWARF annotations.
|
||||||
|
|
||||||
|
https://bugzilla.redhat.com/show_bug.cgi?id=533176#c4
|
||||||
|
|
||||||
|
I find it a bug in DWARF and gdb behaves correctly according to it. From the
|
||||||
|
current DWARF's point of view the is a function call which you skip by "next".
|
||||||
|
|
||||||
|
If you hide any /usr/lib/debug such as using:
|
||||||
|
gdb -nx -ex 'set debug-file-directory /qwe' -ex 'file ./tpcommon_gfortran44'
|
||||||
|
and use "step" command instead of "next" there it will work.
|
||||||
|
(You need to hide debuginfo from libgomp as you would step into libgomp sources
|
||||||
|
to maintain the threads for execution.)
|
||||||
|
|
||||||
|
There should be some DWARF extension for it, currently tried to detect
|
||||||
|
substring ".omp_fn." as this function is called "MAIN__.omp_fn.0" and do not
|
||||||
|
consider such sub-function as a skippable by "next".
|
||||||
|
|
||||||
|
Another problem is that with "set scheduler-locking" being "off" (default
|
||||||
|
upstream) or "step" (default in F/RHEL) the simultaneous execution of the
|
||||||
|
threads is inconvenient. Setting it to "on" will lockup the debugging as the
|
||||||
|
threads need to get synchronized at some point. This is a more general
|
||||||
|
debugging problem of GOMP outside of the scope of this Bug.
|
||||||
|
|
||||||
|
diff --git a/gdb/infrun.c b/gdb/infrun.c
|
||||||
|
--- a/gdb/infrun.c
|
||||||
|
+++ b/gdb/infrun.c
|
||||||
|
@@ -6788,6 +6788,16 @@ process_event_stop_test (struct execution_control_state *ecs)
|
||||||
|
|
||||||
|
if (ecs->event_thread->control.step_over_calls == STEP_OVER_ALL)
|
||||||
|
{
|
||||||
|
+ struct symbol *stop_fn = find_pc_function (stop_pc);
|
||||||
|
+ struct minimal_symbol *stopf = lookup_minimal_symbol_by_pc (stop_pc).minsym;
|
||||||
|
+
|
||||||
|
+ if ((stop_fn == NULL
|
||||||
|
+ || strstr (stop_fn->linkage_name (), ".omp_fn.") == NULL)
|
||||||
|
+ /* gcc-4.7.2-9.fc19.x86_64 uses a new format. */
|
||||||
|
+ && (stopf == NULL
|
||||||
|
+ || strstr (stopf->linkage_name (), "._omp_fn.") == NULL))
|
||||||
|
+{ /* ".omp_fn." */
|
||||||
|
+
|
||||||
|
/* We're doing a "next".
|
||||||
|
|
||||||
|
Normal (forward) execution: set a breakpoint at the
|
||||||
|
@@ -6821,6 +6831,7 @@ process_event_stop_test (struct execution_control_state *ecs)
|
||||||
|
|
||||||
|
keep_going (ecs);
|
||||||
|
return;
|
||||||
|
+} /* ".omp_fn." */
|
||||||
|
}
|
||||||
|
|
||||||
|
/* If we are in a function call trampoline (a stub between the
|
||||||
|
diff --git a/gdb/testsuite/gdb.fortran/omp-step.exp b/gdb/testsuite/gdb.fortran/omp-step.exp
|
||||||
|
new file mode 100644
|
||||||
|
--- /dev/null
|
||||||
|
+++ b/gdb/testsuite/gdb.fortran/omp-step.exp
|
||||||
|
@@ -0,0 +1,31 @@
|
||||||
|
+# Copyright 2009 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/>.
|
||||||
|
+
|
||||||
|
+set testfile "omp-step"
|
||||||
|
+set srcfile ${testfile}.f90
|
||||||
|
+if { [prepare_for_testing $testfile.exp $testfile $srcfile {debug f90 additional_flags=-fopenmp}] } {
|
||||||
|
+ return -1
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+if ![runto [gdb_get_line_number "start-here"]] {
|
||||||
|
+ perror "Couldn't run to start-here"
|
||||||
|
+ return 0
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+gdb_test "next" {!\$omp parallel} "step closer"
|
||||||
|
+gdb_test "next" {a\(omp_get_thread_num\(\) \+ 1\) = 1} "step into omp"
|
||||||
|
+
|
||||||
|
+gdb_breakpoint [gdb_get_line_number "success"]
|
||||||
|
+gdb_continue_to_breakpoint "success" ".*success.*"
|
||||||
|
diff --git a/gdb/testsuite/gdb.fortran/omp-step.f90 b/gdb/testsuite/gdb.fortran/omp-step.f90
|
||||||
|
new file mode 100644
|
||||||
|
--- /dev/null
|
||||||
|
+++ b/gdb/testsuite/gdb.fortran/omp-step.f90
|
||||||
|
@@ -0,0 +1,32 @@
|
||||||
|
+! Copyright 2009 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/>.
|
||||||
|
+
|
||||||
|
+ use omp_lib
|
||||||
|
+ integer nthreads, i, a(1000)
|
||||||
|
+ nthreads = omp_get_num_threads()
|
||||||
|
+ if (nthreads .gt. 1000) call abort
|
||||||
|
+
|
||||||
|
+ do i = 1, nthreads
|
||||||
|
+ a(i) = 0
|
||||||
|
+ end do
|
||||||
|
+ print *, "start-here"
|
||||||
|
+!$omp parallel
|
||||||
|
+ a(omp_get_thread_num() + 1) = 1
|
||||||
|
+!$omp end parallel
|
||||||
|
+ do i = 1, nthreads
|
||||||
|
+ if (a(i) .ne. 1) call abort
|
||||||
|
+ end do
|
||||||
|
+ print *, "success"
|
||||||
|
+ end
|
@ -38,4 +38,4 @@ new file mode 100644
|
|||||||
+# Skip all tests if Python scripting is not enabled.
|
+# Skip all tests if Python scripting is not enabled.
|
||||||
+if { [skip_python_tests] } { continue }
|
+if { [skip_python_tests] } { continue }
|
||||||
+
|
+
|
||||||
+gdb_test "python print (gdb.solib_name(-1))" "None" "gdb.solib_name exists"
|
+gdb_test "python print gdb.solib_name(-1)" "None" "gdb.solib_name exists"
|
||||||
|
@ -9,8 +9,8 @@ Subject: gdb-ccache-workaround.patch
|
|||||||
diff --git a/gdb/testsuite/gdb.base/macscp.exp b/gdb/testsuite/gdb.base/macscp.exp
|
diff --git a/gdb/testsuite/gdb.base/macscp.exp b/gdb/testsuite/gdb.base/macscp.exp
|
||||||
--- a/gdb/testsuite/gdb.base/macscp.exp
|
--- a/gdb/testsuite/gdb.base/macscp.exp
|
||||||
+++ b/gdb/testsuite/gdb.base/macscp.exp
|
+++ b/gdb/testsuite/gdb.base/macscp.exp
|
||||||
@@ -27,6 +27,14 @@ if { [test_compiler_info "gcc-*"] } {
|
@@ -25,6 +25,14 @@ if { [test_compiler_info "gcc-*"] || [test_compiler_info "clang-*"] } {
|
||||||
lappend options additional_flags=-fdebug-macro
|
lappend options additional_flags=-g3
|
||||||
}
|
}
|
||||||
|
|
||||||
+# Workaround ccache making lineno non-zero for command-line definitions.
|
+# Workaround ccache making lineno non-zero for command-line definitions.
|
||||||
|
56
gdb-config.patch
Normal file
56
gdb-config.patch
Normal file
@ -0,0 +1,56 @@
|
|||||||
|
diff -Nrup a/gnulib/import/m4/alloca.m4 b/gnulib/import/m4/alloca.m4
|
||||||
|
--- a/gnulib/import/m4/alloca.m4 2019-11-18 18:49:20.000000000 -0700
|
||||||
|
+++ b/gnulib/import/m4/alloca.m4 2020-01-11 01:07:36.200483085 -0700
|
||||||
|
@@ -89,7 +89,7 @@ AC_CACHE_CHECK([stack direction for C al
|
||||||
|
[ac_cv_c_stack_direction],
|
||||||
|
[AC_RUN_IFELSE([AC_LANG_SOURCE(
|
||||||
|
[AC_INCLUDES_DEFAULT
|
||||||
|
-int
|
||||||
|
+__attribute__ (noinline,noclone)) int
|
||||||
|
find_stack_direction (int *addr, int depth)
|
||||||
|
{
|
||||||
|
int dir, dummy = 0;
|
||||||
|
diff -Nrup a/libiberty/aclocal.m4 b/libiberty/aclocal.m4
|
||||||
|
--- a/libiberty/aclocal.m4 2019-01-19 09:01:34.000000000 -0700
|
||||||
|
+++ b/libiberty/aclocal.m4 2020-01-09 22:00:27.183312982 -0700
|
||||||
|
@@ -147,7 +147,7 @@ if test $ac_cv_os_cray = yes; then
|
||||||
|
fi
|
||||||
|
|
||||||
|
AC_CACHE_CHECK(stack direction for C alloca, ac_cv_c_stack_direction,
|
||||||
|
-[AC_TRY_RUN([find_stack_direction ()
|
||||||
|
+[AC_TRY_RUN([__attribute__ ((noclone,noinline)) find_stack_direction ()
|
||||||
|
{
|
||||||
|
static char *addr = 0;
|
||||||
|
auto char dummy;
|
||||||
|
diff --git a/config/intdiv0.m4 b/config/intdiv0.m4
|
||||||
|
index 55dddcf1..ba906efc 100644
|
||||||
|
--- a/config/intdiv0.m4
|
||||||
|
+++ b/config/intdiv0.m4
|
||||||
|
@@ -31,10 +31,10 @@ sigfpe_handler (sig) int sig;
|
||||||
|
exit (sig != SIGFPE);
|
||||||
|
}
|
||||||
|
|
||||||
|
-int x = 1;
|
||||||
|
-int y = 0;
|
||||||
|
-int z;
|
||||||
|
-int nan;
|
||||||
|
+volatile int x = 1;
|
||||||
|
+volatile int y = 0;
|
||||||
|
+volatile int z;
|
||||||
|
+volatile int nan;
|
||||||
|
|
||||||
|
int main ()
|
||||||
|
{
|
||||||
|
diff --git a/libiberty/configure.ac b/libiberty/configure.ac
|
||||||
|
index f1ce7601..fc20d228 100644
|
||||||
|
--- a/libiberty/configure.ac
|
||||||
|
+++ b/libiberty/configure.ac
|
||||||
|
@@ -661,7 +661,7 @@ if test -z "${setobjs}"; then
|
||||||
|
for v in $vars; do
|
||||||
|
AC_MSG_CHECKING([for $v])
|
||||||
|
AC_CACHE_VAL(libiberty_cv_var_$v,
|
||||||
|
- [AC_LINK_IFELSE([AC_LANG_PROGRAM([[int *p;]],[[extern int $v []; p = $v;]])],
|
||||||
|
+ [AC_LINK_IFELSE([AC_LANG_PROGRAM([[__attribute__ ((used)) int *p;]],[[extern int $v []; p = $v;]])],
|
||||||
|
[eval "libiberty_cv_var_$v=yes"],
|
||||||
|
[eval "libiberty_cv_var_$v=no"])])
|
||||||
|
if eval "test \"`echo '$libiberty_cv_var_'$v`\" = yes"; then
|
@ -9,7 +9,7 @@ Subject: gdb-container-rh-pkg.patch
|
|||||||
diff --git a/gdb/remote.c b/gdb/remote.c
|
diff --git a/gdb/remote.c b/gdb/remote.c
|
||||||
--- a/gdb/remote.c
|
--- a/gdb/remote.c
|
||||||
+++ b/gdb/remote.c
|
+++ b/gdb/remote.c
|
||||||
@@ -14343,7 +14343,17 @@ remote_target::pid_to_exec_file (int pid)
|
@@ -14031,7 +14031,17 @@ remote_target::pid_to_exec_file (int pid)
|
||||||
char *annex = NULL;
|
char *annex = NULL;
|
||||||
|
|
||||||
if (packet_support (PACKET_qXfer_exec_file) != PACKET_ENABLE)
|
if (packet_support (PACKET_qXfer_exec_file) != PACKET_ENABLE)
|
||||||
|
@ -27,7 +27,7 @@ diff --git a/gdb/testsuite/gdb.base/solib-symbol.exp b/gdb/testsuite/gdb.base/so
|
|||||||
|
|
||||||
if [get_compiler_info] {
|
if [get_compiler_info] {
|
||||||
return -1
|
return -1
|
||||||
@@ -70,8 +71,26 @@ gdb_test "br foo2" \
|
@@ -71,8 +72,26 @@ gdb_test "br foo2" \
|
||||||
"Breakpoint.*: foo2. .2 locations..*" \
|
"Breakpoint.*: foo2. .2 locations..*" \
|
||||||
"foo2 in mdlib"
|
"foo2 in mdlib"
|
||||||
|
|
||||||
|
315
gdb-dts-rhel6-python-compat.patch
Normal file
315
gdb-dts-rhel6-python-compat.patch
Normal file
@ -0,0 +1,315 @@
|
|||||||
|
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
||||||
|
From: Fedora GDB patches <invalid@email.com>
|
||||||
|
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
||||||
|
Subject: gdb-dts-rhel6-python-compat.patch
|
||||||
|
|
||||||
|
;; [rhel6] DTS backward Python compatibility API (BZ 1020004, Phil Muldoon).
|
||||||
|
;;=fedora
|
||||||
|
|
||||||
|
https://bugzilla.redhat.com/show_bug.cgi?id=1020004
|
||||||
|
|
||||||
|
diff --git a/gdb/data-directory/Makefile.in b/gdb/data-directory/Makefile.in
|
||||||
|
--- a/gdb/data-directory/Makefile.in
|
||||||
|
+++ b/gdb/data-directory/Makefile.in
|
||||||
|
@@ -71,6 +71,8 @@ PYTHON_FILE_LIST = \
|
||||||
|
gdb/__init__.py \
|
||||||
|
gdb/FrameDecorator.py \
|
||||||
|
gdb/FrameIterator.py \
|
||||||
|
+ gdb/FrameWrapper.py \
|
||||||
|
+ gdb/backtrace.py \
|
||||||
|
gdb/frames.py \
|
||||||
|
gdb/printing.py \
|
||||||
|
gdb/prompt.py \
|
||||||
|
@@ -79,6 +81,7 @@ PYTHON_FILE_LIST = \
|
||||||
|
gdb/xmethod.py \
|
||||||
|
gdb/command/__init__.py \
|
||||||
|
gdb/command/explore.py \
|
||||||
|
+ gdb/command/backtrace.py \
|
||||||
|
gdb/command/frame_filters.py \
|
||||||
|
gdb/command/pretty_printers.py \
|
||||||
|
gdb/command/prompt.py \
|
||||||
|
diff --git a/gdb/python/lib/gdb/FrameWrapper.py b/gdb/python/lib/gdb/FrameWrapper.py
|
||||||
|
new file mode 100644
|
||||||
|
--- /dev/null
|
||||||
|
+++ b/gdb/python/lib/gdb/FrameWrapper.py
|
||||||
|
@@ -0,0 +1,122 @@
|
||||||
|
+# Wrapper API for frames.
|
||||||
|
+
|
||||||
|
+# Copyright (C) 2008, 2009 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/>.
|
||||||
|
+
|
||||||
|
+import gdb
|
||||||
|
+
|
||||||
|
+# FIXME: arguably all this should be on Frame somehow.
|
||||||
|
+class FrameWrapper:
|
||||||
|
+ def __init__ (self, frame):
|
||||||
|
+ self.frame = frame;
|
||||||
|
+
|
||||||
|
+ def write_symbol (self, stream, sym, block):
|
||||||
|
+ if len (sym.linkage_name):
|
||||||
|
+ nsym, is_field_of_this = gdb.lookup_symbol (sym.linkage_name, block)
|
||||||
|
+ if nsym.addr_class != gdb.SYMBOL_LOC_REGISTER:
|
||||||
|
+ sym = nsym
|
||||||
|
+
|
||||||
|
+ stream.write (sym.print_name + "=")
|
||||||
|
+ try:
|
||||||
|
+ val = self.read_var (sym)
|
||||||
|
+ if val != None:
|
||||||
|
+ val = str (val)
|
||||||
|
+ # FIXME: would be nice to have a more precise exception here.
|
||||||
|
+ except RuntimeError as text:
|
||||||
|
+ val = text
|
||||||
|
+ if val == None:
|
||||||
|
+ stream.write ("???")
|
||||||
|
+ else:
|
||||||
|
+ stream.write (str (val))
|
||||||
|
+
|
||||||
|
+ def print_frame_locals (self, stream, func):
|
||||||
|
+
|
||||||
|
+ try:
|
||||||
|
+ block = self.frame.block()
|
||||||
|
+ except RuntimeError:
|
||||||
|
+ block = None
|
||||||
|
+
|
||||||
|
+ while block != None:
|
||||||
|
+ if block.is_global or block.is_static:
|
||||||
|
+ break
|
||||||
|
+
|
||||||
|
+ for sym in block:
|
||||||
|
+ if sym.is_argument:
|
||||||
|
+ continue;
|
||||||
|
+
|
||||||
|
+ self.write_symbol (stream, sym, block)
|
||||||
|
+ stream.write ('\n')
|
||||||
|
+
|
||||||
|
+ def print_frame_args (self, stream, func):
|
||||||
|
+
|
||||||
|
+ try:
|
||||||
|
+ block = self.frame.block()
|
||||||
|
+ except RuntimeError:
|
||||||
|
+ block = None
|
||||||
|
+
|
||||||
|
+ while block != None:
|
||||||
|
+ if block.function != None:
|
||||||
|
+ break
|
||||||
|
+ block = block.superblock
|
||||||
|
+
|
||||||
|
+ first = True
|
||||||
|
+ for sym in block:
|
||||||
|
+ if not sym.is_argument:
|
||||||
|
+ continue;
|
||||||
|
+
|
||||||
|
+ if not first:
|
||||||
|
+ stream.write (", ")
|
||||||
|
+
|
||||||
|
+ self.write_symbol (stream, sym, block)
|
||||||
|
+ first = False
|
||||||
|
+
|
||||||
|
+ # FIXME: this should probably just be a method on gdb.Frame.
|
||||||
|
+ # But then we need stream wrappers.
|
||||||
|
+ def describe (self, stream, full):
|
||||||
|
+ if self.type () == gdb.DUMMY_FRAME:
|
||||||
|
+ stream.write (" <function called from gdb>\n")
|
||||||
|
+ elif self.type () == gdb.SIGTRAMP_FRAME:
|
||||||
|
+ stream.write (" <signal handler called>\n")
|
||||||
|
+ else:
|
||||||
|
+ sal = self.find_sal ()
|
||||||
|
+ pc = self.pc ()
|
||||||
|
+ name = self.name ()
|
||||||
|
+ if not name:
|
||||||
|
+ name = "??"
|
||||||
|
+ if pc != sal.pc or not sal.symtab:
|
||||||
|
+ stream.write (" 0x%08x in" % pc)
|
||||||
|
+ stream.write (" " + name + " (")
|
||||||
|
+
|
||||||
|
+ func = self.function ()
|
||||||
|
+ self.print_frame_args (stream, func)
|
||||||
|
+
|
||||||
|
+ stream.write (")")
|
||||||
|
+
|
||||||
|
+ if sal.symtab and sal.symtab.filename:
|
||||||
|
+ stream.write (" at " + sal.symtab.filename)
|
||||||
|
+ stream.write (":" + str (sal.line))
|
||||||
|
+
|
||||||
|
+ if not self.name () or (not sal.symtab or not sal.symtab.filename):
|
||||||
|
+ lib = gdb.solib_name (pc)
|
||||||
|
+ if lib:
|
||||||
|
+ stream.write (" from " + lib)
|
||||||
|
+
|
||||||
|
+ stream.write ("\n")
|
||||||
|
+
|
||||||
|
+ if full:
|
||||||
|
+ self.print_frame_locals (stream, func)
|
||||||
|
+
|
||||||
|
+ def __getattr__ (self, name):
|
||||||
|
+ return getattr (self.frame, name)
|
||||||
|
diff --git a/gdb/python/lib/gdb/backtrace.py b/gdb/python/lib/gdb/backtrace.py
|
||||||
|
new file mode 100644
|
||||||
|
--- /dev/null
|
||||||
|
+++ b/gdb/python/lib/gdb/backtrace.py
|
||||||
|
@@ -0,0 +1,42 @@
|
||||||
|
+# Filtering backtrace.
|
||||||
|
+
|
||||||
|
+# Copyright (C) 2008, 2011 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/>.
|
||||||
|
+
|
||||||
|
+import gdb
|
||||||
|
+import itertools
|
||||||
|
+
|
||||||
|
+# Our only exports.
|
||||||
|
+__all__ = ['push_frame_filter', 'create_frame_filter']
|
||||||
|
+
|
||||||
|
+old_frame_filter = None
|
||||||
|
+
|
||||||
|
+def push_frame_filter (constructor):
|
||||||
|
+ """Register a new backtrace filter class with the 'backtrace' command.
|
||||||
|
+The filter will be passed an iterator as an argument. The iterator
|
||||||
|
+will return gdb.Frame-like objects. The filter should in turn act as
|
||||||
|
+an iterator returning such objects."""
|
||||||
|
+ global old_frame_filter
|
||||||
|
+ if old_frame_filter == None:
|
||||||
|
+ old_frame_filter = constructor
|
||||||
|
+ else:
|
||||||
|
+ old_frame_filter = lambda iterator, filter = frame_filter: constructor (filter(iterator))
|
||||||
|
+
|
||||||
|
+def create_frame_filter (iter):
|
||||||
|
+ global old_frame_filter
|
||||||
|
+ if old_frame_filter is None:
|
||||||
|
+ return iter
|
||||||
|
+ return old_frame_filter (iter)
|
||||||
|
+
|
||||||
|
diff --git a/gdb/python/lib/gdb/command/backtrace.py b/gdb/python/lib/gdb/command/backtrace.py
|
||||||
|
new file mode 100644
|
||||||
|
--- /dev/null
|
||||||
|
+++ b/gdb/python/lib/gdb/command/backtrace.py
|
||||||
|
@@ -0,0 +1,106 @@
|
||||||
|
+# New backtrace command.
|
||||||
|
+
|
||||||
|
+# Copyright (C) 2008, 2009, 2011 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/>.
|
||||||
|
+
|
||||||
|
+import gdb
|
||||||
|
+import gdb.backtrace
|
||||||
|
+import itertools
|
||||||
|
+from gdb.FrameIterator import FrameIterator
|
||||||
|
+from gdb.FrameWrapper import FrameWrapper
|
||||||
|
+import sys
|
||||||
|
+
|
||||||
|
+class ReverseBacktraceParameter (gdb.Parameter):
|
||||||
|
+ """The new-backtrace command can show backtraces in 'reverse' order.
|
||||||
|
+This means that the innermost frame will be printed last.
|
||||||
|
+Note that reverse backtraces are more expensive to compute."""
|
||||||
|
+
|
||||||
|
+ set_doc = "Enable or disable reverse backtraces."
|
||||||
|
+ show_doc = "Show whether backtraces will be printed in reverse order."
|
||||||
|
+
|
||||||
|
+ def __init__(self):
|
||||||
|
+ gdb.Parameter.__init__ (self, "reverse-backtrace",
|
||||||
|
+ gdb.COMMAND_STACK, gdb.PARAM_BOOLEAN)
|
||||||
|
+ # Default to compatibility with gdb.
|
||||||
|
+ self.value = False
|
||||||
|
+
|
||||||
|
+class FilteringBacktrace (gdb.Command):
|
||||||
|
+ """Print backtrace of all stack frames, or innermost COUNT frames.
|
||||||
|
+With a negative argument, print outermost -COUNT frames.
|
||||||
|
+Use of the 'full' qualifier also prints the values of the local variables.
|
||||||
|
+Use of the 'raw' qualifier avoids any filtering by loadable modules.
|
||||||
|
+"""
|
||||||
|
+
|
||||||
|
+ def __init__ (self):
|
||||||
|
+ # FIXME: this is not working quite well enough to replace
|
||||||
|
+ # "backtrace" yet.
|
||||||
|
+ gdb.Command.__init__ (self, "new-backtrace", gdb.COMMAND_STACK)
|
||||||
|
+ self.reverse = ReverseBacktraceParameter()
|
||||||
|
+
|
||||||
|
+ def reverse_iter (self, iter):
|
||||||
|
+ result = []
|
||||||
|
+ for item in iter:
|
||||||
|
+ result.append (item)
|
||||||
|
+ result.reverse()
|
||||||
|
+ return result
|
||||||
|
+
|
||||||
|
+ def final_n (self, iter, x):
|
||||||
|
+ result = []
|
||||||
|
+ for item in iter:
|
||||||
|
+ result.append (item)
|
||||||
|
+ return result[x:]
|
||||||
|
+
|
||||||
|
+ def invoke (self, arg, from_tty):
|
||||||
|
+ i = 0
|
||||||
|
+ count = 0
|
||||||
|
+ filter = True
|
||||||
|
+ full = False
|
||||||
|
+
|
||||||
|
+ for word in arg.split (" "):
|
||||||
|
+ if word == '':
|
||||||
|
+ continue
|
||||||
|
+ elif word == 'raw':
|
||||||
|
+ filter = False
|
||||||
|
+ elif word == 'full':
|
||||||
|
+ full = True
|
||||||
|
+ else:
|
||||||
|
+ count = int (word)
|
||||||
|
+
|
||||||
|
+ # FIXME: provide option to start at selected frame
|
||||||
|
+ # However, should still number as if starting from newest
|
||||||
|
+ newest_frame = gdb.newest_frame()
|
||||||
|
+ iter = itertools.imap (FrameWrapper,
|
||||||
|
+ FrameIterator (newest_frame))
|
||||||
|
+ if filter:
|
||||||
|
+ iter = gdb.backtrace.create_frame_filter (iter)
|
||||||
|
+
|
||||||
|
+ # Now wrap in an iterator that numbers the frames.
|
||||||
|
+ iter = itertools.izip (itertools.count (0), iter)
|
||||||
|
+
|
||||||
|
+ # Reverse if the user wanted that.
|
||||||
|
+ if self.reverse.value:
|
||||||
|
+ iter = self.reverse_iter (iter)
|
||||||
|
+
|
||||||
|
+ # Extract sub-range user wants.
|
||||||
|
+ if count < 0:
|
||||||
|
+ iter = self.final_n (iter, count)
|
||||||
|
+ elif count > 0:
|
||||||
|
+ iter = itertools.islice (iter, 0, count)
|
||||||
|
+
|
||||||
|
+ for pair in iter:
|
||||||
|
+ sys.stdout.write ("#%-2d" % pair[0])
|
||||||
|
+ pair[1].describe (sys.stdout, full)
|
||||||
|
+
|
||||||
|
+FilteringBacktrace()
|
@ -12,7 +12,7 @@ https://bugzilla.redhat.com/show_bug.cgi?id=1270534
|
|||||||
diff --git a/gdb/configure b/gdb/configure
|
diff --git a/gdb/configure b/gdb/configure
|
||||||
--- a/gdb/configure
|
--- a/gdb/configure
|
||||||
+++ b/gdb/configure
|
+++ b/gdb/configure
|
||||||
@@ -9567,6 +9567,7 @@ if test x"$prefer_curses" = xyes; then
|
@@ -9649,6 +9649,7 @@ if test x"$prefer_curses" = xyes; then
|
||||||
# search /usr/local/include, if ncurses is installed in /usr/local. A
|
# search /usr/local/include, if ncurses is installed in /usr/local. A
|
||||||
# default installation of ncurses on alpha*-dec-osf* will lead to such
|
# default installation of ncurses on alpha*-dec-osf* will lead to such
|
||||||
# a situation.
|
# a situation.
|
||||||
@ -20,7 +20,7 @@ diff --git a/gdb/configure b/gdb/configure
|
|||||||
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for library containing waddstr" >&5
|
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for library containing waddstr" >&5
|
||||||
$as_echo_n "checking for library containing waddstr... " >&6; }
|
$as_echo_n "checking for library containing waddstr... " >&6; }
|
||||||
if ${ac_cv_search_waddstr+:} false; then :
|
if ${ac_cv_search_waddstr+:} false; then :
|
||||||
@@ -9591,7 +9592,7 @@ return waddstr ();
|
@@ -9673,7 +9674,7 @@ return waddstr ();
|
||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
_ACEOF
|
_ACEOF
|
||||||
@ -29,7 +29,7 @@ diff --git a/gdb/configure b/gdb/configure
|
|||||||
if test -z "$ac_lib"; then
|
if test -z "$ac_lib"; then
|
||||||
ac_res="none required"
|
ac_res="none required"
|
||||||
else
|
else
|
||||||
@@ -9665,6 +9666,7 @@ case $host_os in
|
@@ -9747,6 +9748,7 @@ case $host_os in
|
||||||
esac
|
esac
|
||||||
|
|
||||||
# These are the libraries checked by Readline.
|
# These are the libraries checked by Readline.
|
||||||
@ -37,7 +37,7 @@ diff --git a/gdb/configure b/gdb/configure
|
|||||||
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for library containing tgetent" >&5
|
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for library containing tgetent" >&5
|
||||||
$as_echo_n "checking for library containing tgetent... " >&6; }
|
$as_echo_n "checking for library containing tgetent... " >&6; }
|
||||||
if ${ac_cv_search_tgetent+:} false; then :
|
if ${ac_cv_search_tgetent+:} false; then :
|
||||||
@@ -9689,7 +9691,7 @@ return tgetent ();
|
@@ -9771,7 +9773,7 @@ return tgetent ();
|
||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
_ACEOF
|
_ACEOF
|
||||||
@ -49,7 +49,7 @@ diff --git a/gdb/configure b/gdb/configure
|
|||||||
diff --git a/gdb/configure.ac b/gdb/configure.ac
|
diff --git a/gdb/configure.ac b/gdb/configure.ac
|
||||||
--- a/gdb/configure.ac
|
--- a/gdb/configure.ac
|
||||||
+++ b/gdb/configure.ac
|
+++ b/gdb/configure.ac
|
||||||
@@ -713,7 +713,8 @@ if test x"$prefer_curses" = xyes; then
|
@@ -712,7 +712,8 @@ if test x"$prefer_curses" = xyes; then
|
||||||
# search /usr/local/include, if ncurses is installed in /usr/local. A
|
# search /usr/local/include, if ncurses is installed in /usr/local. A
|
||||||
# default installation of ncurses on alpha*-dec-osf* will lead to such
|
# default installation of ncurses on alpha*-dec-osf* will lead to such
|
||||||
# a situation.
|
# a situation.
|
||||||
@ -59,7 +59,7 @@ diff --git a/gdb/configure.ac b/gdb/configure.ac
|
|||||||
|
|
||||||
if test "$ac_cv_search_waddstr" != no; then
|
if test "$ac_cv_search_waddstr" != no; then
|
||||||
curses_found=yes
|
curses_found=yes
|
||||||
@@ -755,7 +756,8 @@ case $host_os in
|
@@ -754,7 +755,8 @@ case $host_os in
|
||||||
esac
|
esac
|
||||||
|
|
||||||
# These are the libraries checked by Readline.
|
# These are the libraries checked by Readline.
|
||||||
|
@ -10,7 +10,7 @@ diff --git a/gdb/testsuite/gdb.base/gnu-ifunc-strstr-workaround.exp b/gdb/testsu
|
|||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
+++ b/gdb/testsuite/gdb.base/gnu-ifunc-strstr-workaround.exp
|
+++ b/gdb/testsuite/gdb.base/gnu-ifunc-strstr-workaround.exp
|
||||||
@@ -0,0 +1,119 @@
|
@@ -0,0 +1,115 @@
|
||||||
+# Copyright (C) 2012 Free Software Foundation, Inc.
|
+# Copyright (C) 2012 Free Software Foundation, Inc.
|
||||||
+
|
+
|
||||||
+# This program is free software; you can redistribute it and/or modify
|
+# This program is free software; you can redistribute it and/or modify
|
||||||
@ -56,10 +56,6 @@ new file mode 100644
|
|||||||
+ untested "$test (no DWARF)"
|
+ untested "$test (no DWARF)"
|
||||||
+ return 0
|
+ return 0
|
||||||
+ }
|
+ }
|
||||||
+ -re "type = <unknown return type> \\(\\)\r\n$gdb_prompt $" {
|
|
||||||
+ untested "$test (no DWARF)"
|
|
||||||
+ return 0
|
|
||||||
+ }
|
|
||||||
+}
|
+}
|
||||||
+
|
+
|
||||||
+set addr ""
|
+set addr ""
|
||||||
@ -128,5 +124,5 @@ new file mode 100644
|
|||||||
+ }
|
+ }
|
||||||
+}
|
+}
|
||||||
+
|
+
|
||||||
+gdb_test {print (char *)strstr("abc","b")} { = 0x[0-9a-f]+ "bc"}
|
+gdb_test {print strstr("abc","b")} { = 0x[0-9a-f]+ "bc"}
|
||||||
+gdb_test {print (char *)strstr("def","e")} { = 0x[0-9a-f]+ "ef"}
|
+gdb_test {print strstr("def","e")} { = 0x[0-9a-f]+ "ef"}
|
||||||
|
219
gdb-gnat-dwarf-crash-3of3.patch
Normal file
219
gdb-gnat-dwarf-crash-3of3.patch
Normal file
@ -0,0 +1,219 @@
|
|||||||
|
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
||||||
|
From: Fedora GDB patches <invalid@email.com>
|
||||||
|
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
||||||
|
Subject: gdb-gnat-dwarf-crash-3of3.patch
|
||||||
|
|
||||||
|
;; Fix crash of -readnow /usr/lib/debug/usr/bin/gnatbind.debug (BZ 1069211).
|
||||||
|
;;=push+jan
|
||||||
|
|
||||||
|
http://sourceware.org/ml/gdb-patches/2014-02/msg00731.html
|
||||||
|
|
||||||
|
--6TrnltStXW4iwmi0
|
||||||
|
Content-Type: text/plain; charset=us-ascii
|
||||||
|
Content-Disposition: inline
|
||||||
|
|
||||||
|
Hi,
|
||||||
|
|
||||||
|
PR 16581:
|
||||||
|
GDB crash on inherit_abstract_dies infinite recursion
|
||||||
|
https://sourceware.org/bugzilla/show_bug.cgi?id=16581
|
||||||
|
|
||||||
|
fixed crash from an infinite recursion. But in rare cases the new code can
|
||||||
|
now gdb_assert() due to weird DWARF file.
|
||||||
|
|
||||||
|
I do not yet fully understand why the DWARF is as it is but just GDB should
|
||||||
|
never crash due to invalid DWARF anyway. The "invalid" DWARF I see only in
|
||||||
|
Fedora GCC build, not in FSF GCC build, more info at:
|
||||||
|
https://bugzilla.redhat.com/show_bug.cgi?id=1069382
|
||||||
|
http://people.redhat.com/jkratoch/gcc-debuginfo-4.8.2-7.fc20.x86_64-gnatbind.debug
|
||||||
|
|
||||||
|
Thanks,
|
||||||
|
Jan
|
||||||
|
|
||||||
|
--6TrnltStXW4iwmi0
|
||||||
|
Content-Type: text/plain; charset=us-ascii
|
||||||
|
Content-Disposition: inline; filename="complaint.patch"
|
||||||
|
|
||||||
|
gdb/
|
||||||
|
2014-02-24 Jan Kratochvil <jan.kratochvil@redhat.com>
|
||||||
|
|
||||||
|
* dwarf2read.c (process_die): Change gdb_assert to complaint.
|
||||||
|
|
||||||
|
diff --git a/gdb/dwarf2/read.c b/gdb/dwarf2/read.c
|
||||||
|
--- a/gdb/dwarf2/read.c
|
||||||
|
+++ b/gdb/dwarf2/read.c
|
||||||
|
@@ -10162,6 +10162,13 @@ class process_die_scope
|
||||||
|
static void
|
||||||
|
process_die (struct die_info *die, struct dwarf2_cu *cu)
|
||||||
|
{
|
||||||
|
+ if (die->in_process)
|
||||||
|
+ {
|
||||||
|
+ complaint (_("DIE at 0x%s attempted to be processed twice"),
|
||||||
|
+ sect_offset_str (die->sect_off));
|
||||||
|
+ return;
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
process_die_scope scope (die, cu);
|
||||||
|
|
||||||
|
switch (die->tag)
|
||||||
|
diff --git a/gdb/linux-nat.c b/gdb/linux-nat.c
|
||||||
|
--- a/gdb/linux-nat.c
|
||||||
|
+++ b/gdb/linux-nat.c
|
||||||
|
@@ -190,6 +190,12 @@ struct linux_nat_target *linux_target;
|
||||||
|
/* Does the current host support PTRACE_GETREGSET? */
|
||||||
|
enum tribool have_ptrace_getregset = TRIBOOL_UNKNOWN;
|
||||||
|
|
||||||
|
+#ifdef NEED_DETACH_SIGSTOP
|
||||||
|
+/* PID of the inferior stopped by SIGSTOP before attaching (or zero). */
|
||||||
|
+static pid_t pid_was_stopped;
|
||||||
|
+
|
||||||
|
+#endif
|
||||||
|
+
|
||||||
|
static unsigned int debug_linux_nat;
|
||||||
|
static void
|
||||||
|
show_debug_linux_nat (struct ui_file *file, int from_tty,
|
||||||
|
@@ -1044,6 +1050,9 @@ linux_nat_post_attach_wait (ptid_t ptid, int *signalled)
|
||||||
|
if (linux_proc_pid_is_stopped (pid))
|
||||||
|
{
|
||||||
|
linux_nat_debug_printf ("Attaching to a stopped process");
|
||||||
|
+#ifdef NEED_DETACH_SIGSTOP
|
||||||
|
+ pid_was_stopped = ptid.pid ();
|
||||||
|
+#endif
|
||||||
|
|
||||||
|
/* The process is definitely stopped. It is in a job control
|
||||||
|
stop, unless the kernel predates the TASK_STOPPED /
|
||||||
|
@@ -1359,6 +1368,25 @@ get_detach_signal (struct lwp_info *lp)
|
||||||
|
return gdb_signal_to_host (signo);
|
||||||
|
}
|
||||||
|
|
||||||
|
+#ifdef NEED_DETACH_SIGSTOP
|
||||||
|
+ /* Workaround RHEL-5 kernel which has unreliable PTRACE_DETACH, SIGSTOP (that
|
||||||
|
+ many TIDs are left unstopped). See RH Bug 496732. */
|
||||||
|
+ if (lp->ptid.pid () == pid_was_stopped)
|
||||||
|
+ {
|
||||||
|
+ int err;
|
||||||
|
+
|
||||||
|
+ errno = 0;
|
||||||
|
+ err = kill_lwp (lp->ptid.lwp (), SIGSTOP);
|
||||||
|
+ if (debug_linux_nat)
|
||||||
|
+ {
|
||||||
|
+ fprintf_unfiltered (gdb_stdlog,
|
||||||
|
+ "SC: lwp kill %d %s\n",
|
||||||
|
+ err,
|
||||||
|
+ errno ? safe_strerror (errno) : "ERRNO-OK");
|
||||||
|
+ }
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+#endif
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
@@ -1502,6 +1530,10 @@ linux_nat_target::detach (inferior *inf, int from_tty)
|
||||||
|
detach_one_lwp (main_lwp, &signo);
|
||||||
|
|
||||||
|
detach_success (inf);
|
||||||
|
+
|
||||||
|
+#ifdef NEED_DETACH_SIGSTOP
|
||||||
|
+ pid_was_stopped = 0;
|
||||||
|
+#endif
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
@@ -1744,6 +1776,16 @@ linux_nat_target::resume (ptid_t ptid, int step, enum gdb_signal signo)
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
|
||||||
|
+#ifdef NEED_DETACH_SIGSTOP
|
||||||
|
+ /* At this point, we are going to resume the inferior and if we
|
||||||
|
+ have attached to a stopped process, we no longer should leave
|
||||||
|
+ it as stopped if the user detaches. PTID variable has PID set to LWP
|
||||||
|
+ while we need to check the real PID here. */
|
||||||
|
+
|
||||||
|
+ if (!step && lp && pid_was_stopped == lp->ptid.pid ())
|
||||||
|
+ pid_was_stopped = 0;
|
||||||
|
+
|
||||||
|
+#endif
|
||||||
|
if (resume_many)
|
||||||
|
iterate_over_lwps (ptid, [=] (struct lwp_info *info)
|
||||||
|
{
|
||||||
|
@@ -3617,6 +3659,10 @@ linux_nat_target::mourn_inferior ()
|
||||||
|
|
||||||
|
/* Let the arch-specific native code know this process is gone. */
|
||||||
|
linux_target->low_forget_process (pid);
|
||||||
|
+#ifdef NEED_DETACH_SIGSTOP
|
||||||
|
+
|
||||||
|
+ pid_was_stopped = 0;
|
||||||
|
+#endif
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Convert a native/host siginfo object, into/from the siginfo in the
|
||||||
|
diff --git a/gdb/testsuite/gdb.threads/attach-stopped.exp b/gdb/testsuite/gdb.threads/attach-stopped.exp
|
||||||
|
--- a/gdb/testsuite/gdb.threads/attach-stopped.exp
|
||||||
|
+++ b/gdb/testsuite/gdb.threads/attach-stopped.exp
|
||||||
|
@@ -56,7 +56,65 @@ proc corefunc { threadtype } {
|
||||||
|
gdb_reinitialize_dir $srcdir/$subdir
|
||||||
|
gdb_load ${binfile}
|
||||||
|
|
||||||
|
- # Verify that we can attach to the stopped process.
|
||||||
|
+ # Verify that we can attach to the process by first giving its
|
||||||
|
+ # executable name via the file command, and using attach with the
|
||||||
|
+ # process ID.
|
||||||
|
+
|
||||||
|
+ set test "$threadtype: set file, before attach1 to stopped process"
|
||||||
|
+ gdb_test_multiple "file $binfile" "$test" {
|
||||||
|
+ -re "Load new symbol table from.*y or n. $" {
|
||||||
|
+ gdb_test "y" "Reading symbols from $escapedbinfile\.\.\.*done." \
|
||||||
|
+ "$test (re-read)"
|
||||||
|
+ }
|
||||||
|
+ -re "Reading symbols from $escapedbinfile\.\.\.*done.*$gdb_prompt $" {
|
||||||
|
+ pass "$test"
|
||||||
|
+ }
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ set test "$threadtype: attach1 to stopped, after setting file"
|
||||||
|
+ gdb_test_multiple "attach $testpid" "$test" {
|
||||||
|
+ -re "Attaching to program.*`?$escapedbinfile'?, process $testpid.*$gdb_prompt $" {
|
||||||
|
+ pass "$test"
|
||||||
|
+ }
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ # ".*sleep.*clone.*" would fail on s390x as bt stops at START_THREAD there.
|
||||||
|
+ if {[string equal $threadtype threaded]} {
|
||||||
|
+ gdb_test "thread apply all bt" ".*sleep.*start_thread.*" "$threadtype: attach1 to stopped bt"
|
||||||
|
+ } else {
|
||||||
|
+ gdb_test "bt" ".*sleep.*main.*" "$threadtype: attach1 to stopped bt"
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ # Exit and detach the process.
|
||||||
|
+
|
||||||
|
+ gdb_exit
|
||||||
|
+
|
||||||
|
+ # Avoid some race:
|
||||||
|
+ sleep 2
|
||||||
|
+
|
||||||
|
+ if [catch {open /proc/${testpid}/status r} fileid] {
|
||||||
|
+ set line2 "NOTFOUND"
|
||||||
|
+ } else {
|
||||||
|
+ gets $fileid line1;
|
||||||
|
+ gets $fileid line2;
|
||||||
|
+ close $fileid;
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ set test "$threadtype: attach1, exit leaves process stopped"
|
||||||
|
+ if {[string match "*(stopped)*" $line2]} {
|
||||||
|
+ pass $test
|
||||||
|
+ } else {
|
||||||
|
+ fail $test
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ # At this point, the process should still be stopped
|
||||||
|
+
|
||||||
|
+ gdb_start
|
||||||
|
+ gdb_reinitialize_dir $srcdir/$subdir
|
||||||
|
+ gdb_load ${binfile}
|
||||||
|
+
|
||||||
|
+ # Verify that we can attach to the process just by giving the
|
||||||
|
+ # process ID.
|
||||||
|
|
||||||
|
set test "$threadtype: attach2 to stopped, after setting file"
|
||||||
|
gdb_test_multiple "attach $testpid" "$test" {
|
46
gdb-jit-reader-multilib.patch
Normal file
46
gdb-jit-reader-multilib.patch
Normal file
@ -0,0 +1,46 @@
|
|||||||
|
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
||||||
|
From: Fedora GDB patches <invalid@email.com>
|
||||||
|
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
||||||
|
Subject: gdb-jit-reader-multilib.patch
|
||||||
|
|
||||||
|
;; Fix jit-reader.h for multi-lib.
|
||||||
|
;;=push+jan
|
||||||
|
|
||||||
|
diff --git a/gdb/configure b/gdb/configure
|
||||||
|
--- a/gdb/configure
|
||||||
|
+++ b/gdb/configure
|
||||||
|
@@ -9968,10 +9968,12 @@ _ACEOF
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
-if test "x${ac_cv_sizeof_unsigned_long}" = "x8"; then
|
||||||
|
- TARGET_PTR="unsigned long"
|
||||||
|
-elif test "x${ac_cv_sizeof_unsigned_long_long}" = "x8"; then
|
||||||
|
+# Try to keep TARGET_PTR the same across archs so that jit-reader.h file
|
||||||
|
+# content is the same for multilib distributions.
|
||||||
|
+if test "x${ac_cv_sizeof_unsigned_long_long}" = "x8"; then
|
||||||
|
TARGET_PTR="unsigned long long"
|
||||||
|
+elif test "x${ac_cv_sizeof_unsigned_long}" = "x8"; then
|
||||||
|
+ TARGET_PTR="unsigned long"
|
||||||
|
elif test "x${ac_cv_sizeof_unsigned___int128}" = "x16"; then
|
||||||
|
TARGET_PTR="unsigned __int128"
|
||||||
|
else
|
||||||
|
diff --git a/gdb/configure.ac b/gdb/configure.ac
|
||||||
|
--- a/gdb/configure.ac
|
||||||
|
+++ b/gdb/configure.ac
|
||||||
|
@@ -803,10 +803,12 @@ AC_CHECK_SIZEOF(unsigned long long)
|
||||||
|
AC_CHECK_SIZEOF(unsigned long)
|
||||||
|
AC_CHECK_SIZEOF(unsigned __int128)
|
||||||
|
|
||||||
|
-if test "x${ac_cv_sizeof_unsigned_long}" = "x8"; then
|
||||||
|
- TARGET_PTR="unsigned long"
|
||||||
|
-elif test "x${ac_cv_sizeof_unsigned_long_long}" = "x8"; then
|
||||||
|
+# Try to keep TARGET_PTR the same across archs so that jit-reader.h file
|
||||||
|
+# content is the same for multilib distributions.
|
||||||
|
+if test "x${ac_cv_sizeof_unsigned_long_long}" = "x8"; then
|
||||||
|
TARGET_PTR="unsigned long long"
|
||||||
|
+elif test "x${ac_cv_sizeof_unsigned_long}" = "x8"; then
|
||||||
|
+ TARGET_PTR="unsigned long"
|
||||||
|
elif test "x${ac_cv_sizeof_unsigned___int128}" = "x16"; then
|
||||||
|
TARGET_PTR="unsigned __int128"
|
||||||
|
else
|
@ -213,7 +213,7 @@ diff --git a/gdb/nat/linux-btrace.h b/gdb/nat/linux-btrace.h
|
|||||||
diff --git a/gdbsupport/common.m4 b/gdbsupport/common.m4
|
diff --git a/gdbsupport/common.m4 b/gdbsupport/common.m4
|
||||||
--- a/gdbsupport/common.m4
|
--- a/gdbsupport/common.m4
|
||||||
+++ b/gdbsupport/common.m4
|
+++ b/gdbsupport/common.m4
|
||||||
@@ -156,7 +156,7 @@ AC_DEFUN([GDB_AC_COMMON], [
|
@@ -145,7 +145,7 @@ AC_DEFUN([GDB_AC_COMMON], [
|
||||||
AC_PREPROC_IFELSE([AC_LANG_SOURCE([[
|
AC_PREPROC_IFELSE([AC_LANG_SOURCE([[
|
||||||
#include <linux/perf_event.h>
|
#include <linux/perf_event.h>
|
||||||
#ifndef PERF_ATTR_SIZE_VER5
|
#ifndef PERF_ATTR_SIZE_VER5
|
||||||
|
25
gdb-moribund-utrace-workaround.patch
Normal file
25
gdb-moribund-utrace-workaround.patch
Normal file
@ -0,0 +1,25 @@
|
|||||||
|
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
||||||
|
From: Fedora GDB patches <invalid@email.com>
|
||||||
|
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
||||||
|
Subject: gdb-moribund-utrace-workaround.patch
|
||||||
|
|
||||||
|
;; Workaround non-stop moribund locations exploited by kernel utrace (BZ 590623).
|
||||||
|
;;=push+jan: Currently it is still not fully safe.
|
||||||
|
|
||||||
|
https://bugzilla.redhat.com/show_bug.cgi?id=590623
|
||||||
|
http://sources.redhat.com/bugzilla/show_bug.cgi?id=11593
|
||||||
|
|
||||||
|
Bug in FSF GDB exploited by the ptrace-on-utrace interaction.
|
||||||
|
|
||||||
|
diff --git a/gdb/breakpoint.c b/gdb/breakpoint.c
|
||||||
|
--- a/gdb/breakpoint.c
|
||||||
|
+++ b/gdb/breakpoint.c
|
||||||
|
@@ -11948,6 +11948,8 @@ update_global_location_list (enum ugll_insert_mode insert_mode)
|
||||||
|
= 3 * (thread_count (proc_target) + 1);
|
||||||
|
else
|
||||||
|
old_loc->events_till_retirement = 1;
|
||||||
|
+ /* Red Hat Bug 590623. */
|
||||||
|
+ old_loc->events_till_retirement *= 10;
|
||||||
|
old_loc->owner = NULL;
|
||||||
|
|
||||||
|
moribund_locations.push_back (old_loc);
|
@ -12,7 +12,7 @@ diff --git a/gdb/testsuite/gdb.cp/pr11734-1.cc b/gdb/testsuite/gdb.cp/pr11734-1.
|
|||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
+++ b/gdb/testsuite/gdb.cp/pr11734-1.cc
|
+++ b/gdb/testsuite/gdb.cp/pr11734-1.cc
|
||||||
@@ -0,0 +1,29 @@
|
@@ -0,0 +1,30 @@
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
+/* This testcase is part of GDB, the GNU debugger.
|
||||||
+
|
+
|
||||||
+ Copyright 2010 Free Software Foundation, Inc.
|
+ Copyright 2010 Free Software Foundation, Inc.
|
||||||
@ -42,11 +42,12 @@ new file mode 100644
|
|||||||
+ p->foo ();
|
+ p->foo ();
|
||||||
+ return 0;
|
+ return 0;
|
||||||
+}
|
+}
|
||||||
|
+
|
||||||
diff --git a/gdb/testsuite/gdb.cp/pr11734-2.cc b/gdb/testsuite/gdb.cp/pr11734-2.cc
|
diff --git a/gdb/testsuite/gdb.cp/pr11734-2.cc b/gdb/testsuite/gdb.cp/pr11734-2.cc
|
||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
+++ b/gdb/testsuite/gdb.cp/pr11734-2.cc
|
+++ b/gdb/testsuite/gdb.cp/pr11734-2.cc
|
||||||
@@ -0,0 +1,26 @@
|
@@ -0,0 +1,27 @@
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
+/* This testcase is part of GDB, the GNU debugger.
|
||||||
+
|
+
|
||||||
+ Copyright 2010 Free Software Foundation, Inc.
|
+ Copyright 2010 Free Software Foundation, Inc.
|
||||||
@ -73,11 +74,12 @@ new file mode 100644
|
|||||||
+pr11734::foo(void)
|
+pr11734::foo(void)
|
||||||
+{
|
+{
|
||||||
+}
|
+}
|
||||||
|
+
|
||||||
diff --git a/gdb/testsuite/gdb.cp/pr11734-3.cc b/gdb/testsuite/gdb.cp/pr11734-3.cc
|
diff --git a/gdb/testsuite/gdb.cp/pr11734-3.cc b/gdb/testsuite/gdb.cp/pr11734-3.cc
|
||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
+++ b/gdb/testsuite/gdb.cp/pr11734-3.cc
|
+++ b/gdb/testsuite/gdb.cp/pr11734-3.cc
|
||||||
@@ -0,0 +1,26 @@
|
@@ -0,0 +1,27 @@
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
+/* This testcase is part of GDB, the GNU debugger.
|
||||||
+
|
+
|
||||||
+ Copyright 2010 Free Software Foundation, Inc.
|
+ Copyright 2010 Free Software Foundation, Inc.
|
||||||
@ -104,11 +106,12 @@ new file mode 100644
|
|||||||
+pr11734::foo (int a)
|
+pr11734::foo (int a)
|
||||||
+{
|
+{
|
||||||
+}
|
+}
|
||||||
|
+
|
||||||
diff --git a/gdb/testsuite/gdb.cp/pr11734-4.cc b/gdb/testsuite/gdb.cp/pr11734-4.cc
|
diff --git a/gdb/testsuite/gdb.cp/pr11734-4.cc b/gdb/testsuite/gdb.cp/pr11734-4.cc
|
||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
+++ b/gdb/testsuite/gdb.cp/pr11734-4.cc
|
+++ b/gdb/testsuite/gdb.cp/pr11734-4.cc
|
||||||
@@ -0,0 +1,26 @@
|
@@ -0,0 +1,27 @@
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
+/* This testcase is part of GDB, the GNU debugger.
|
||||||
+
|
+
|
||||||
+ Copyright 2010 Free Software Foundation, Inc.
|
+ Copyright 2010 Free Software Foundation, Inc.
|
||||||
@ -135,6 +138,7 @@ new file mode 100644
|
|||||||
+pr11734::foo (char *a)
|
+pr11734::foo (char *a)
|
||||||
+{
|
+{
|
||||||
+}
|
+}
|
||||||
|
+
|
||||||
diff --git a/gdb/testsuite/gdb.cp/pr11734.exp b/gdb/testsuite/gdb.cp/pr11734.exp
|
diff --git a/gdb/testsuite/gdb.cp/pr11734.exp b/gdb/testsuite/gdb.cp/pr11734.exp
|
||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
@ -199,7 +203,7 @@ diff --git a/gdb/testsuite/gdb.cp/pr11734.h b/gdb/testsuite/gdb.cp/pr11734.h
|
|||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
+++ b/gdb/testsuite/gdb.cp/pr11734.h
|
+++ b/gdb/testsuite/gdb.cp/pr11734.h
|
||||||
@@ -0,0 +1,27 @@
|
@@ -0,0 +1,28 @@
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
+/* This testcase is part of GDB, the GNU debugger.
|
||||||
+
|
+
|
||||||
+ Copyright 2010 Free Software Foundation, Inc.
|
+ Copyright 2010 Free Software Foundation, Inc.
|
||||||
@ -227,3 +231,4 @@ new file mode 100644
|
|||||||
+ void foo (int);
|
+ void foo (int);
|
||||||
+ void foo (char *);
|
+ void foo (char *);
|
||||||
+};
|
+};
|
||||||
|
+
|
||||||
|
@ -81,7 +81,7 @@ diff --git a/gdb/testsuite/gdb.base/gdb-rhbz1156192-recursive-dlopen.c b/gdb/tes
|
|||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
+++ b/gdb/testsuite/gdb.base/gdb-rhbz1156192-recursive-dlopen.c
|
+++ b/gdb/testsuite/gdb.base/gdb-rhbz1156192-recursive-dlopen.c
|
||||||
@@ -0,0 +1,125 @@
|
@@ -0,0 +1,124 @@
|
||||||
+/* Testcase for recursive dlopen calls.
|
+/* Testcase for recursive dlopen calls.
|
||||||
+
|
+
|
||||||
+ Copyright (C) 2014 Free Software Foundation, Inc.
|
+ Copyright (C) 2014 Free Software Foundation, Inc.
|
||||||
@ -178,7 +178,6 @@ new file mode 100644
|
|||||||
+ /* Called recursively. */
|
+ /* Called recursively. */
|
||||||
+ result = malloc (size);
|
+ result = malloc (size);
|
||||||
+ /* Restore new hooks. */
|
+ /* Restore new hooks. */
|
||||||
+ old_malloc_hook = __malloc_hook;
|
|
||||||
+ __malloc_hook = custom_malloc_hook;
|
+ __malloc_hook = custom_malloc_hook;
|
||||||
+ return result;
|
+ return result;
|
||||||
+}
|
+}
|
||||||
@ -211,7 +210,7 @@ diff --git a/gdb/testsuite/gdb.base/gdb-rhbz1156192-recursive-dlopen.exp b/gdb/t
|
|||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
+++ b/gdb/testsuite/gdb.base/gdb-rhbz1156192-recursive-dlopen.exp
|
+++ b/gdb/testsuite/gdb.base/gdb-rhbz1156192-recursive-dlopen.exp
|
||||||
@@ -0,0 +1,157 @@
|
@@ -0,0 +1,137 @@
|
||||||
+# Copyright 2014 Free Software Foundation, Inc.
|
+# Copyright 2014 Free Software Foundation, Inc.
|
||||||
+#
|
+#
|
||||||
+# This program is free software; you can redistribute it and/or modify
|
+# This program is free software; you can redistribute it and/or modify
|
||||||
@ -227,12 +226,8 @@ new file mode 100644
|
|||||||
+# You should have received a copy of the GNU General Public License
|
+# You should have received a copy of the GNU General Public License
|
||||||
+# along with this program. If not, see <http://www.gnu.org/licenses/>.
|
+# along with this program. If not, see <http://www.gnu.org/licenses/>.
|
||||||
+
|
+
|
||||||
+if {[skip_shlib_tests]} {
|
+if { [skip_shlib_tests] } {
|
||||||
+ untested "skipping shlib tests"
|
+ return 0
|
||||||
+ return 0
|
|
||||||
+} elseif {[use_gdb_stub]} {
|
|
||||||
+ untested "skipping tests because of stub"
|
|
||||||
+ return 0
|
|
||||||
+}
|
+}
|
||||||
+
|
+
|
||||||
+# Library foo
|
+# Library foo
|
||||||
@ -267,21 +262,6 @@ new file mode 100644
|
|||||||
+ return -1
|
+ return -1
|
||||||
+}
|
+}
|
||||||
+
|
+
|
||||||
+set supported 0
|
|
||||||
+gdb_test_multiple "run" "initial trial run" {
|
|
||||||
+ -re -wrap "exited normally.*" {
|
|
||||||
+ set supported 1
|
|
||||||
+ pass $gdb_test_name
|
|
||||||
+ }
|
|
||||||
+ -re -wrap "exited with code.*" {
|
|
||||||
+ untested "failed at $gdb_test_name"
|
|
||||||
+ }
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+if { $supported == 0 } {
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+proc do_test { has_libfoo has_libbar } {
|
+proc do_test { has_libfoo has_libbar } {
|
||||||
+ global hex binfile_lib2 binfile_lib1 gdb_prompt
|
+ global hex binfile_lib2 binfile_lib1 gdb_prompt
|
||||||
+ set libbar_match "[string_to_regexp $binfile_lib2]"
|
+ set libbar_match "[string_to_regexp $binfile_lib2]"
|
||||||
@ -334,7 +314,6 @@ new file mode 100644
|
|||||||
+ gdb_test_no_output "set stop-on-solib-events 1" "setting stop-on-solib-events"
|
+ gdb_test_no_output "set stop-on-solib-events 1" "setting stop-on-solib-events"
|
||||||
+
|
+
|
||||||
+ gdb_run_cmd
|
+ gdb_run_cmd
|
||||||
+ gdb_test "" "Wait for first prompt"
|
|
||||||
+ foreach l $solib_event_order {
|
+ foreach l $solib_event_order {
|
||||||
+ incr pass
|
+ incr pass
|
||||||
+ with_test_prefix "pass #$pass" {
|
+ with_test_prefix "pass #$pass" {
|
||||||
|
@ -42,24 +42,22 @@ diff --git a/gdb/testsuite/gdb.python/py-typeprint.exp b/gdb/testsuite/gdb.pytho
|
|||||||
diff --git a/gdb/testsuite/gdb.python/py-typeprint.py b/gdb/testsuite/gdb.python/py-typeprint.py
|
diff --git a/gdb/testsuite/gdb.python/py-typeprint.py b/gdb/testsuite/gdb.python/py-typeprint.py
|
||||||
--- a/gdb/testsuite/gdb.python/py-typeprint.py
|
--- a/gdb/testsuite/gdb.python/py-typeprint.py
|
||||||
+++ b/gdb/testsuite/gdb.python/py-typeprint.py
|
+++ b/gdb/testsuite/gdb.python/py-typeprint.py
|
||||||
@@ -15,8 +15,7 @@
|
@@ -15,7 +15,7 @@
|
||||||
|
|
||||||
import gdb
|
import gdb
|
||||||
|
|
||||||
-
|
|
||||||
-class Recognizer(object):
|
-class Recognizer(object):
|
||||||
+class StringRecognizer(object):
|
+class StringRecognizer(object):
|
||||||
def __init__(self):
|
def __init__(self):
|
||||||
self.enabled = True
|
self.enabled = True
|
||||||
|
|
||||||
@@ -32,7 +31,27 @@ class StringTypePrinter(object):
|
@@ -30,6 +30,26 @@ class StringTypePrinter(object):
|
||||||
self.enabled = True
|
self.enabled = True
|
||||||
|
|
||||||
def instantiate(self):
|
def instantiate(self):
|
||||||
- return Recognizer()
|
- return Recognizer()
|
||||||
+ return StringRecognizer()
|
+ return StringRecognizer()
|
||||||
|
|
||||||
|
|
||||||
gdb.type_printers.append(StringTypePrinter())
|
gdb.type_printers.append(StringTypePrinter())
|
||||||
+
|
+
|
||||||
+class OtherRecognizer(object):
|
+class OtherRecognizer(object):
|
||||||
|
@ -1,184 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Andrew Burgess <aburgess@redhat.com>
|
|
||||||
Date: Mon, 16 Jan 2023 14:59:30 +0000
|
|
||||||
Subject: gdb-rhbz2152431-label-symbol-value.patch
|
|
||||||
|
|
||||||
;; Back-port upstream commits 38665d717a and c3efaf0afd to fix
|
|
||||||
;; bug 2152431.
|
|
||||||
|
|
||||||
Backport these two upstream commits to fix bug 2152431:
|
|
||||||
|
|
||||||
commit 38665d717a3e65c70e6432243d5eed9728a4888a
|
|
||||||
Date: Mon Dec 12 14:09:40 2022 +0000
|
|
||||||
|
|
||||||
gdb: use gdb_assert not internal_error
|
|
||||||
|
|
||||||
And:
|
|
||||||
|
|
||||||
commit c3efaf0afd9d37004c42cdfd3ce0c1bfa979c45e
|
|
||||||
Date: Mon Dec 12 14:05:22 2022 +0000
|
|
||||||
|
|
||||||
gdb: fix crash when getting the value of a label symbol
|
|
||||||
|
|
||||||
diff --git a/gdb/findvar.c b/gdb/findvar.c
|
|
||||||
--- a/gdb/findvar.c
|
|
||||||
+++ b/gdb/findvar.c
|
|
||||||
@@ -152,11 +152,7 @@ extract_long_unsigned_integer (const gdb_byte *addr, int orig_len,
|
|
||||||
CORE_ADDR
|
|
||||||
extract_typed_address (const gdb_byte *buf, struct type *type)
|
|
||||||
{
|
|
||||||
- if (!type->is_pointer_or_reference ())
|
|
||||||
- internal_error (__FILE__, __LINE__,
|
|
||||||
- _("extract_typed_address: "
|
|
||||||
- "type is not a pointer or reference"));
|
|
||||||
-
|
|
||||||
+ gdb_assert (type->is_pointer_or_reference ());
|
|
||||||
return gdbarch_pointer_to_address (type->arch (), type, buf);
|
|
||||||
}
|
|
||||||
|
|
||||||
@@ -205,11 +201,7 @@ template void store_integer (gdb_byte *addr, int len,
|
|
||||||
void
|
|
||||||
store_typed_address (gdb_byte *buf, struct type *type, CORE_ADDR addr)
|
|
||||||
{
|
|
||||||
- if (!type->is_pointer_or_reference ())
|
|
||||||
- internal_error (__FILE__, __LINE__,
|
|
||||||
- _("store_typed_address: "
|
|
||||||
- "type is not a pointer or reference"));
|
|
||||||
-
|
|
||||||
+ gdb_assert (type->is_pointer_or_reference ());
|
|
||||||
gdbarch_address_to_pointer (type->arch (), type, buf, addr);
|
|
||||||
}
|
|
||||||
|
|
||||||
@@ -634,19 +626,32 @@ language_defn::read_var_value (struct symbol *var,
|
|
||||||
|
|
||||||
case LOC_LABEL:
|
|
||||||
/* Put the constant back in target format. */
|
|
||||||
- v = allocate_value (type);
|
|
||||||
- if (overlay_debugging)
|
|
||||||
- {
|
|
||||||
- struct objfile *var_objfile = symbol_objfile (var);
|
|
||||||
- addr = symbol_overlayed_address (SYMBOL_VALUE_ADDRESS (var),
|
|
||||||
- var->obj_section (var_objfile));
|
|
||||||
- store_typed_address (value_contents_raw (v).data (), type, addr);
|
|
||||||
- }
|
|
||||||
- else
|
|
||||||
- store_typed_address (value_contents_raw (v).data (), type,
|
|
||||||
- SYMBOL_VALUE_ADDRESS (var));
|
|
||||||
- VALUE_LVAL (v) = not_lval;
|
|
||||||
- return v;
|
|
||||||
+ {
|
|
||||||
+ /* Put the constant back in target format. */
|
|
||||||
+ if (overlay_debugging)
|
|
||||||
+ {
|
|
||||||
+ struct objfile *var_objfile = symbol_objfile (var);
|
|
||||||
+ addr = symbol_overlayed_address (SYMBOL_VALUE_ADDRESS (var),
|
|
||||||
+ var->obj_section (var_objfile));
|
|
||||||
+ }
|
|
||||||
+ else
|
|
||||||
+ addr = SYMBOL_VALUE_ADDRESS (var);
|
|
||||||
+
|
|
||||||
+ /* First convert the CORE_ADDR to a function pointer type, this
|
|
||||||
+ ensures the gdbarch knows what type of pointer we are
|
|
||||||
+ manipulating when value_from_pointer is called. */
|
|
||||||
+ type = builtin_type (symbol_arch (var))->builtin_func_ptr;
|
|
||||||
+ v = value_from_pointer (type, addr);
|
|
||||||
+
|
|
||||||
+ /* But we want to present the value as 'void *', so cast it to the
|
|
||||||
+ required type now, this will not change the values bit
|
|
||||||
+ representation. */
|
|
||||||
+ struct type *void_ptr_type
|
|
||||||
+ = builtin_type (symbol_arch (var))->builtin_data_ptr;
|
|
||||||
+ v = value_cast_pointers (void_ptr_type, v, 0);
|
|
||||||
+ VALUE_LVAL (v) = not_lval;
|
|
||||||
+ return v;
|
|
||||||
+ }
|
|
||||||
|
|
||||||
case LOC_CONST_BYTES:
|
|
||||||
if (is_dynamic_type (type))
|
|
||||||
diff --git a/gdb/testsuite/gdb.python/py-label-symbol-value.c b/gdb/testsuite/gdb.python/py-label-symbol-value.c
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.python/py-label-symbol-value.c
|
|
||||||
@@ -0,0 +1,38 @@
|
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ Copyright 2022 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/>. */
|
|
||||||
+
|
|
||||||
+volatile int global_var = 1;
|
|
||||||
+
|
|
||||||
+int
|
|
||||||
+get_value ()
|
|
||||||
+{
|
|
||||||
+ return global_var;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+int
|
|
||||||
+main (void)
|
|
||||||
+{
|
|
||||||
+ int value = get_value ();
|
|
||||||
+ if (value > 0)
|
|
||||||
+ goto some_label;
|
|
||||||
+
|
|
||||||
+ return 1;
|
|
||||||
+
|
|
||||||
+ some_label:
|
|
||||||
+
|
|
||||||
+ return 0;
|
|
||||||
+}
|
|
||||||
diff --git a/gdb/testsuite/gdb.python/py-label-symbol-value.exp b/gdb/testsuite/gdb.python/py-label-symbol-value.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.python/py-label-symbol-value.exp
|
|
||||||
@@ -0,0 +1,39 @@
|
|
||||||
+# Copyright 2022 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/>.
|
|
||||||
+
|
|
||||||
+# Check that GDB handles the user asking for the value of a label
|
|
||||||
+# symbol (i.e. a symbol for a goto label).
|
|
||||||
+
|
|
||||||
+load_lib gdb-python.exp
|
|
||||||
+standard_testfile
|
|
||||||
+
|
|
||||||
+if { [prepare_for_testing "failed to prepare" ${testfile} ${srcfile}] } {
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Skip all tests if Python scripting is not enabled.
|
|
||||||
+if { [skip_python_tests] } { continue }
|
|
||||||
+
|
|
||||||
+if ![runto_main] {
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Use Python to print the value of the 'some_label' symbol.
|
|
||||||
+gdb_test "python frame = gdb.selected_frame()"
|
|
||||||
+gdb_test "python frame_pc = frame.pc()"
|
|
||||||
+gdb_test "python block = gdb.current_progspace().block_for_pc(frame_pc)"
|
|
||||||
+gdb_test "python symbol,_ = gdb.lookup_symbol('some_label', block, gdb.SYMBOL_LABEL_DOMAIN)"
|
|
||||||
+gdb_test "python print(str(symbol.value()))" "$hex <main\\+$decimal>"
|
|
||||||
+gdb_test "python print(str(symbol.value().type))" "void \\*"
|
|
@ -136,7 +136,7 @@ new file mode 100644
|
|||||||
+set testfile amd64-ivy-bridge
|
+set testfile amd64-ivy-bridge
|
||||||
+set test compilation
|
+set test compilation
|
||||||
+if [prepare_for_testing ${testfile}.exp ${testfile}.x ${testfile}.S [list debug "additional_flags=-m64 -nostdlib"]] {
|
+if [prepare_for_testing ${testfile}.exp ${testfile}.x ${testfile}.S [list debug "additional_flags=-m64 -nostdlib"]] {
|
||||||
+ unsupported $test
|
+ fail $test
|
||||||
+ return -1
|
+ return -1
|
||||||
+}
|
+}
|
||||||
+pass $test
|
+pass $test
|
||||||
@ -288,7 +288,7 @@ diff --git a/gdb/testsuite/gdb.arch/i386-ivy-bridge.S b/gdb/testsuite/gdb.arch/i
|
|||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
+++ b/gdb/testsuite/gdb.arch/i386-ivy-bridge.S
|
+++ b/gdb/testsuite/gdb.arch/i386-ivy-bridge.S
|
||||||
@@ -0,0 +1,66 @@
|
@@ -0,0 +1,67 @@
|
||||||
+/* Copyright 2011 Free Software Foundation, Inc.
|
+/* Copyright 2011 Free Software Foundation, Inc.
|
||||||
+
|
+
|
||||||
+ This program is free software; you can redistribute it and/or modify
|
+ This program is free software; you can redistribute it and/or modify
|
||||||
@ -355,6 +355,7 @@ new file mode 100644
|
|||||||
+ rdgsbase ebx
|
+ rdgsbase ebx
|
||||||
+ wrfsbase ebx
|
+ wrfsbase ebx
|
||||||
+ wrgsbase ebx
|
+ wrgsbase ebx
|
||||||
|
+
|
||||||
diff --git a/gdb/testsuite/gdb.arch/i386-ivy-bridge.exp b/gdb/testsuite/gdb.arch/i386-ivy-bridge.exp
|
diff --git a/gdb/testsuite/gdb.arch/i386-ivy-bridge.exp b/gdb/testsuite/gdb.arch/i386-ivy-bridge.exp
|
||||||
new file mode 100644
|
new file mode 100644
|
||||||
--- /dev/null
|
--- /dev/null
|
||||||
|
59
gdb-vla-intel-fix-print-char-array.patch
Normal file
59
gdb-vla-intel-fix-print-char-array.patch
Normal file
@ -0,0 +1,59 @@
|
|||||||
|
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
||||||
|
From: Sergio Durigan Junior <sergiodj@redhat.com>
|
||||||
|
Date: Thu, 7 Dec 2017 16:20:31 -0500
|
||||||
|
Subject: gdb-vla-intel-fix-print-char-array.patch
|
||||||
|
|
||||||
|
;; Revert upstream commit 469412dd9ccc4de5874fd3299b105833f36b34cd
|
||||||
|
|
||||||
|
Revert commit (only the part touching gdb/f-valprint.c):
|
||||||
|
|
||||||
|
commit 469412dd9ccc4de5874fd3299b105833f36b34cd
|
||||||
|
Author: Christoph Weinmann <christoph.t.weinmann@intel.com>
|
||||||
|
Date: Fri Sep 8 15:11:47 2017 +0200
|
||||||
|
|
||||||
|
Remove C/C++ relevant code in Fortran specific file.
|
||||||
|
|
||||||
|
Remove code relevant for printing C/C++ Integer values in a
|
||||||
|
Fortran specific file to unify printing of Fortran values.
|
||||||
|
This does not change the output.
|
||||||
|
|
||||||
|
And adjust its testcase.
|
||||||
|
|
||||||
|
diff --git a/gdb/f-valprint.c b/gdb/f-valprint.c
|
||||||
|
--- a/gdb/f-valprint.c
|
||||||
|
+++ b/gdb/f-valprint.c
|
||||||
|
@@ -310,7 +310,21 @@ f_value_print_inner (struct value *val, struct ui_file *stream, int recurse,
|
||||||
|
value_print_scalar_formatted (val, &opts, 0, stream);
|
||||||
|
}
|
||||||
|
else
|
||||||
|
- value_print_scalar_formatted (val, options, 0, stream);
|
||||||
|
+ {
|
||||||
|
+ value_print_scalar_formatted (val, options, 0, stream);
|
||||||
|
+ /* C and C++ has no single byte int type, char is used instead.
|
||||||
|
+ Since we don't know whether the value is really intended to
|
||||||
|
+ be used as an integer or a character, print the character
|
||||||
|
+ equivalent as well. */
|
||||||
|
+ if (TYPE_LENGTH (type) == 1)
|
||||||
|
+ {
|
||||||
|
+ LONGEST c;
|
||||||
|
+
|
||||||
|
+ fputs_filtered (" ", stream);
|
||||||
|
+ c = unpack_long (type, valaddr);
|
||||||
|
+ LA_PRINT_CHAR ((unsigned char) c, type, stream);
|
||||||
|
+ }
|
||||||
|
+ }
|
||||||
|
break;
|
||||||
|
|
||||||
|
case TYPE_CODE_STRUCT:
|
||||||
|
diff --git a/gdb/testsuite/gdb.fortran/printing-types.exp b/gdb/testsuite/gdb.fortran/printing-types.exp
|
||||||
|
--- a/gdb/testsuite/gdb.fortran/printing-types.exp
|
||||||
|
+++ b/gdb/testsuite/gdb.fortran/printing-types.exp
|
||||||
|
@@ -30,7 +30,7 @@ if {![fortran_runto_main]} then {
|
||||||
|
gdb_breakpoint [gdb_get_line_number "write"]
|
||||||
|
gdb_continue_to_breakpoint "write"
|
||||||
|
|
||||||
|
-gdb_test "print oneByte" " = 1"
|
||||||
|
+gdb_test "print oneByte" " = 1 \'\\\\001\'"
|
||||||
|
gdb_test "print twobytes" " = 2"
|
||||||
|
gdb_test "print chvalue" " = \'a\'"
|
||||||
|
gdb_test "print logvalue" " = \.TRUE\."
|
1778
gdb-vla-intel-fortran-strides.patch
Normal file
1778
gdb-vla-intel-fortran-strides.patch
Normal file
File diff suppressed because it is too large
Load Diff
1086
gdb-vla-intel-fortran-vla-strings.patch
Normal file
1086
gdb-vla-intel-fortran-vla-strings.patch
Normal file
File diff suppressed because it is too large
Load Diff
167
gdb-vla-intel-stringbt-fix.patch
Normal file
167
gdb-vla-intel-stringbt-fix.patch
Normal file
@ -0,0 +1,167 @@
|
|||||||
|
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
||||||
|
From: Jan Kratochvil <jan.kratochvil@redhat.com>
|
||||||
|
Date: Fri, 1 Aug 2014 23:02:17 +0200
|
||||||
|
Subject: gdb-vla-intel-stringbt-fix.patch
|
||||||
|
|
||||||
|
;;=push+jan
|
||||||
|
|
||||||
|
http://sourceware.org/ml/gdb-patches/2014-08/msg00025.html
|
||||||
|
|
||||||
|
On Fri, 01 Aug 2014 09:20:19 +0200, Keven Boell wrote:
|
||||||
|
> I just tried it on Fedora 20 i686. Applied the patch, you mentioned, on top of
|
||||||
|
> the Fortran VLA series and executed your dynamic-other-frame test. Everything
|
||||||
|
> is working fine here, I cannot reproduce the crash.
|
||||||
|
|
||||||
|
I have it reproducible on Fedora 20 i686 with plain
|
||||||
|
CFLAGS=-g ./configure;make;cd gdb/testsuite;make site.exp;runtest gdb.fortran/dynamic-other-frame.exp
|
||||||
|
|
||||||
|
Besides that I have updated the testcase with
|
||||||
|
gdb_test_no_output "set print frame-arguments all"
|
||||||
|
so that there is no longer needed the patch:
|
||||||
|
[patch] Display Fortran strings in backtraces
|
||||||
|
https://sourceware.org/ml/gdb-patches/2014-07/msg00709.html
|
||||||
|
|
||||||
|
The fix below has no regressions for me. Unfortunately I do not see why you
|
||||||
|
cannot reproduce it.
|
||||||
|
|
||||||
|
Thanks,
|
||||||
|
Jan
|
||||||
|
|
||||||
|
diff --git a/gdb/dwarf2/loc.c b/gdb/dwarf2/loc.c
|
||||||
|
--- a/gdb/dwarf2/loc.c
|
||||||
|
+++ b/gdb/dwarf2/loc.c
|
||||||
|
@@ -2249,6 +2249,20 @@ dwarf2_evaluate_loc_desc_full (struct type *type, struct frame_info *frame,
|
||||||
|
ctx.per_cu = per_cu;
|
||||||
|
ctx.obj_address = 0;
|
||||||
|
|
||||||
|
+frame_id old_frame_id (get_frame_id (deprecated_safe_get_selected_frame ()));
|
||||||
|
+class RestoreCall {
|
||||||
|
+private:
|
||||||
|
+ const std::function<void ()> func;
|
||||||
|
+public:
|
||||||
|
+ RestoreCall(std::function<void ()> func_):func(func_) {}
|
||||||
|
+ ~RestoreCall() { func(); }
|
||||||
|
+} restore_frame([=]() {
|
||||||
|
+ frame_info *old_frame (frame_find_by_id (old_frame_id));
|
||||||
|
+ if (old_frame != NULL)
|
||||||
|
+ select_frame (old_frame);
|
||||||
|
+});
|
||||||
|
+if (frame != NULL) select_frame (frame);
|
||||||
|
+
|
||||||
|
scoped_value_mark free_values;
|
||||||
|
|
||||||
|
ctx.gdbarch = per_objfile->objfile->arch ();
|
||||||
|
diff --git a/gdb/testsuite/gdb.fortran/dynamic-other-frame-stub.f90 b/gdb/testsuite/gdb.fortran/dynamic-other-frame-stub.f90
|
||||||
|
new file mode 100644
|
||||||
|
--- /dev/null
|
||||||
|
+++ b/gdb/testsuite/gdb.fortran/dynamic-other-frame-stub.f90
|
||||||
|
@@ -0,0 +1,24 @@
|
||||||
|
+! Copyright 2010 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 2 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, write to the Free Software
|
||||||
|
+! Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
||||||
|
+!
|
||||||
|
+! Ihis file is the Fortran source file for dynamic.exp.
|
||||||
|
+! Original file written by Jakub Jelinek <jakub@redhat.com>.
|
||||||
|
+! Modified for the GDB testcase by Jan Kratochvil <jan.kratochvil@redhat.com>.
|
||||||
|
+
|
||||||
|
+subroutine bar
|
||||||
|
+ real :: dummy
|
||||||
|
+ dummy = 1
|
||||||
|
+end subroutine bar
|
||||||
|
diff --git a/gdb/testsuite/gdb.fortran/dynamic-other-frame.exp b/gdb/testsuite/gdb.fortran/dynamic-other-frame.exp
|
||||||
|
new file mode 100644
|
||||||
|
--- /dev/null
|
||||||
|
+++ b/gdb/testsuite/gdb.fortran/dynamic-other-frame.exp
|
||||||
|
@@ -0,0 +1,39 @@
|
||||||
|
+# Copyright 2010 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 2 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, write to the Free Software
|
||||||
|
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
||||||
|
+
|
||||||
|
+set testfile "dynamic-other-frame"
|
||||||
|
+set srcfile1 ${testfile}.f90
|
||||||
|
+set srcfile2 ${testfile}-stub.f90
|
||||||
|
+set objfile2 [standard_output_file ${testfile}-stub.o]
|
||||||
|
+set executable ${testfile}
|
||||||
|
+set binfile [standard_output_file ${executable}]
|
||||||
|
+
|
||||||
|
+if { [gdb_compile "${srcdir}/${subdir}/${srcfile2}" "${objfile2}" object {f90}] != ""
|
||||||
|
+ || [gdb_compile "${srcdir}/${subdir}/${srcfile1} ${objfile2}" "${binfile}" executable {debug f90}] != "" } {
|
||||||
|
+ untested "Couldn't compile ${srcfile1} or ${srcfile2}"
|
||||||
|
+ return -1
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+clean_restart ${executable}
|
||||||
|
+
|
||||||
|
+gdb_test_no_output "set print frame-arguments all"
|
||||||
|
+
|
||||||
|
+if ![runto bar_] then {
|
||||||
|
+ perror "couldn't run to bar_"
|
||||||
|
+ continue
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+gdb_test "bt" {foo \(string='hello'.*}
|
||||||
|
diff --git a/gdb/testsuite/gdb.fortran/dynamic-other-frame.f90 b/gdb/testsuite/gdb.fortran/dynamic-other-frame.f90
|
||||||
|
new file mode 100644
|
||||||
|
--- /dev/null
|
||||||
|
+++ b/gdb/testsuite/gdb.fortran/dynamic-other-frame.f90
|
||||||
|
@@ -0,0 +1,36 @@
|
||||||
|
+! Copyright 2010 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 2 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, write to the Free Software
|
||||||
|
+! Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
||||||
|
+!
|
||||||
|
+! Ihis file is the Fortran source file for dynamic.exp.
|
||||||
|
+! Original file written by Jakub Jelinek <jakub@redhat.com>.
|
||||||
|
+! Modified for the GDB testcase by Jan Kratochvil <jan.kratochvil@redhat.com>.
|
||||||
|
+
|
||||||
|
+subroutine foo (string)
|
||||||
|
+ interface
|
||||||
|
+ subroutine bar
|
||||||
|
+ end subroutine
|
||||||
|
+ end interface
|
||||||
|
+ character string*(*)
|
||||||
|
+ call bar ! stop-here
|
||||||
|
+end subroutine foo
|
||||||
|
+program test
|
||||||
|
+ interface
|
||||||
|
+ subroutine foo (string)
|
||||||
|
+ character string*(*)
|
||||||
|
+ end subroutine
|
||||||
|
+ end interface
|
||||||
|
+ call foo ('hello')
|
||||||
|
+end
|
350
gdb-vla-intel-tests.patch
Normal file
350
gdb-vla-intel-tests.patch
Normal file
@ -0,0 +1,350 @@
|
|||||||
|
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
||||||
|
From: Fedora GDB patches <invalid@email.com>
|
||||||
|
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
||||||
|
Subject: gdb-vla-intel-tests.patch
|
||||||
|
|
||||||
|
;;=fedoratest
|
||||||
|
|
||||||
|
diff --git a/gdb/testsuite/gdb.fortran/ptr-indentation.exp b/gdb/testsuite/gdb.fortran/ptr-indentation.exp
|
||||||
|
--- a/gdb/testsuite/gdb.fortran/ptr-indentation.exp
|
||||||
|
+++ b/gdb/testsuite/gdb.fortran/ptr-indentation.exp
|
||||||
|
@@ -37,5 +37,5 @@ gdb_continue_to_breakpoint "BP1"
|
||||||
|
gdb_test "ptype tinsta" \
|
||||||
|
[multi_line "type = Type tuserdef" \
|
||||||
|
" $int :: i" \
|
||||||
|
- " PTR TO -> \\( $real :: ptr \\)" \
|
||||||
|
+ " PTR TO -> \\( $real :: ptr\\)" \
|
||||||
|
"End Type tuserdef"]
|
||||||
|
diff --git a/gdb/testsuite/gdb.fortran/ptype-on-functions.exp b/gdb/testsuite/gdb.fortran/ptype-on-functions.exp
|
||||||
|
--- a/gdb/testsuite/gdb.fortran/ptype-on-functions.exp
|
||||||
|
+++ b/gdb/testsuite/gdb.fortran/ptype-on-functions.exp
|
||||||
|
@@ -42,7 +42,7 @@ gdb_test "ptype say_numbers" \
|
||||||
|
"type = void \\(integer\\(kind=4\\), integer\\(kind=4\\), integer\\(kind=4\\)\\)"
|
||||||
|
|
||||||
|
gdb_test "ptype fun_ptr" \
|
||||||
|
- "type = PTR TO -> \\( integer\\(kind=4\\) \\(\\) \\(REF TO -> \\( integer\\(kind=4\\) \\)\\) \\)"
|
||||||
|
+ "type = PTR TO -> \\( integer\\(kind=4\\) \\(\\) \\(REF TO -> \\( integer\\(kind=4\\)\\)\\)\\)"
|
||||||
|
|
||||||
|
gdb_test "ptype say_string" \
|
||||||
|
"type = void \\(character\\*\\(\\*\\), integer\\(kind=\\d+\\)\\)"
|
||||||
|
diff --git a/gdb/testsuite/gdb.fortran/vla-func.exp b/gdb/testsuite/gdb.fortran/vla-func.exp
|
||||||
|
new file mode 100644
|
||||||
|
--- /dev/null
|
||||||
|
+++ b/gdb/testsuite/gdb.fortran/vla-func.exp
|
||||||
|
@@ -0,0 +1,61 @@
|
||||||
|
+# Copyright 2014 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/>.
|
||||||
|
+
|
||||||
|
+standard_testfile ".f90"
|
||||||
|
+
|
||||||
|
+if { [prepare_for_testing ${testfile}.exp ${testfile} ${srcfile} \
|
||||||
|
+ {debug f90 quiet}] } {
|
||||||
|
+ return -1
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+if ![runto MAIN__] then {
|
||||||
|
+ perror "couldn't run to breakpoint MAIN__"
|
||||||
|
+ continue
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+# Check VLA passed to first Fortran function.
|
||||||
|
+gdb_breakpoint [gdb_get_line_number "func1-vla-passed"]
|
||||||
|
+gdb_continue_to_breakpoint "func1-vla-passed"
|
||||||
|
+gdb_test "print vla" " = \\( *\\( *22, *22, *22,\[()22, .\]*\\)" \
|
||||||
|
+ "print vla (func1)"
|
||||||
|
+gdb_test "ptype vla" "type = integer\\\(kind=4\\\), allocatable \\\(10,10\\\)" \
|
||||||
|
+ "ptype vla (func1)"
|
||||||
|
+
|
||||||
|
+gdb_breakpoint [gdb_get_line_number "func1-vla-modified"]
|
||||||
|
+gdb_continue_to_breakpoint "func1-vla-modified"
|
||||||
|
+gdb_test "print vla(5,5)" " = 55" "print vla(5,5) (func1)"
|
||||||
|
+gdb_test "print vla(7,7)" " = 77" "print vla(5,5) (func1)"
|
||||||
|
+
|
||||||
|
+# Check if the values are correct after returning from func1
|
||||||
|
+gdb_breakpoint [gdb_get_line_number "func1-returned"]
|
||||||
|
+gdb_continue_to_breakpoint "func1-returned"
|
||||||
|
+gdb_test "print ret" " = .TRUE." "print ret after func1 returned"
|
||||||
|
+
|
||||||
|
+# Check VLA passed to second Fortran function
|
||||||
|
+gdb_breakpoint [gdb_get_line_number "func2-vla-passed"]
|
||||||
|
+gdb_continue_to_breakpoint "func2-vla-passed"
|
||||||
|
+gdb_test "print vla" \
|
||||||
|
+ " = \\\(44, 44, 44, 44, 44, 44, 44, 44, 44, 44\\\)" \
|
||||||
|
+ "print vla (func2)"
|
||||||
|
+gdb_test "ptype vla" "type = integer\\\(kind=4\\\) \\\(10\\\)" \
|
||||||
|
+ "ptype vla (func2)"
|
||||||
|
+
|
||||||
|
+# Check if the returned VLA has the correct values and ptype.
|
||||||
|
+gdb_breakpoint [gdb_get_line_number "func2-returned"]
|
||||||
|
+gdb_continue_to_breakpoint "func2-returned"
|
||||||
|
+gdb_test "print vla3" " = \\\(1, 2, 44, 4, 44, 44, 44, 8, 44, 44\\\)" \
|
||||||
|
+ "print vla3 (after func2)"
|
||||||
|
+gdb_test "ptype vla3" "type = integer\\\(kind=4\\\), allocatable \\\(10\\\)" \
|
||||||
|
+ "ptype vla3 (after func2)"
|
||||||
|
diff --git a/gdb/testsuite/gdb.fortran/vla-func.f90 b/gdb/testsuite/gdb.fortran/vla-func.f90
|
||||||
|
new file mode 100644
|
||||||
|
--- /dev/null
|
||||||
|
+++ b/gdb/testsuite/gdb.fortran/vla-func.f90
|
||||||
|
@@ -0,0 +1,71 @@
|
||||||
|
+! Copyright 2014 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 2 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, write to the Free Software
|
||||||
|
+! Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
||||||
|
+
|
||||||
|
+logical function func1 (vla)
|
||||||
|
+ implicit none
|
||||||
|
+ integer, allocatable :: vla (:, :)
|
||||||
|
+ func1 = allocated(vla)
|
||||||
|
+ vla(5,5) = 55 ! func1-vla-passed
|
||||||
|
+ vla(7,7) = 77
|
||||||
|
+ return ! func1-vla-modified
|
||||||
|
+end function func1
|
||||||
|
+
|
||||||
|
+function func2(vla)
|
||||||
|
+ implicit none
|
||||||
|
+ integer :: vla (:)
|
||||||
|
+ integer :: func2(size(vla))
|
||||||
|
+ integer :: k
|
||||||
|
+
|
||||||
|
+ vla(1) = 1 ! func2-vla-passed
|
||||||
|
+ vla(2) = 2
|
||||||
|
+ vla(4) = 4
|
||||||
|
+ vla(8) = 8
|
||||||
|
+
|
||||||
|
+ func2 = vla
|
||||||
|
+end function func2
|
||||||
|
+
|
||||||
|
+program vla_func
|
||||||
|
+ implicit none
|
||||||
|
+ interface
|
||||||
|
+ logical function func1 (vla)
|
||||||
|
+ integer, allocatable :: vla (:, :)
|
||||||
|
+ end function
|
||||||
|
+ end interface
|
||||||
|
+ interface
|
||||||
|
+ function func2 (vla)
|
||||||
|
+ integer :: vla (:)
|
||||||
|
+ integer func2(size(vla))
|
||||||
|
+ end function
|
||||||
|
+ end interface
|
||||||
|
+
|
||||||
|
+ logical :: ret
|
||||||
|
+ integer, allocatable :: vla1 (:, :)
|
||||||
|
+ integer, allocatable :: vla2 (:)
|
||||||
|
+ integer, allocatable :: vla3 (:)
|
||||||
|
+
|
||||||
|
+ ret = .FALSE.
|
||||||
|
+
|
||||||
|
+ allocate (vla1 (10,10))
|
||||||
|
+ vla1(:,:) = 22
|
||||||
|
+
|
||||||
|
+ allocate (vla2 (10))
|
||||||
|
+ vla2(:) = 44
|
||||||
|
+
|
||||||
|
+ ret = func1(vla1)
|
||||||
|
+ vla3 = func2(vla2) ! func1-returned
|
||||||
|
+
|
||||||
|
+ ret = .TRUE. ! func2-returned
|
||||||
|
+end program vla_func
|
||||||
|
diff --git a/gdb/testsuite/gdb.fortran/vla-ptr-info.exp b/gdb/testsuite/gdb.fortran/vla-ptr-info.exp
|
||||||
|
--- a/gdb/testsuite/gdb.fortran/vla-ptr-info.exp
|
||||||
|
+++ b/gdb/testsuite/gdb.fortran/vla-ptr-info.exp
|
||||||
|
@@ -33,5 +33,5 @@ set real4 [fortran_real4]
|
||||||
|
# Check the status of a pointer to a dynamic array.
|
||||||
|
gdb_breakpoint [gdb_get_line_number "pvla-associated"]
|
||||||
|
gdb_continue_to_breakpoint "pvla-associated"
|
||||||
|
-gdb_test "print &pvla" " = \\(PTR TO -> \\( $real4 \\(10,10,10\\) \\)\\) ${hex}" \
|
||||||
|
+gdb_test "print &pvla" " = \\(PTR TO -> \\( $real4 \\(10,10,10\\)\\)\\) ${hex}" \
|
||||||
|
"print pvla pointer information"
|
||||||
|
diff --git a/gdb/testsuite/gdb.fortran/vla-stringsold.exp b/gdb/testsuite/gdb.fortran/vla-stringsold.exp
|
||||||
|
new file mode 100644
|
||||||
|
--- /dev/null
|
||||||
|
+++ b/gdb/testsuite/gdb.fortran/vla-stringsold.exp
|
||||||
|
@@ -0,0 +1,101 @@
|
||||||
|
+# Copyright 2014 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/>.
|
||||||
|
+
|
||||||
|
+standard_testfile ".f90"
|
||||||
|
+
|
||||||
|
+if { [prepare_for_testing ${testfile}.exp ${testfile} ${srcfile} \
|
||||||
|
+ {debug f90 quiet}] } {
|
||||||
|
+ return -1
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+# check that all fortran standard datatypes will be
|
||||||
|
+# handled correctly when using as VLA's
|
||||||
|
+
|
||||||
|
+if ![runto MAIN__] then {
|
||||||
|
+ perror "couldn't run to breakpoint MAIN__"
|
||||||
|
+ continue
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+gdb_breakpoint [gdb_get_line_number "var_char-allocated-1"]
|
||||||
|
+gdb_continue_to_breakpoint "var_char-allocated-1"
|
||||||
|
+gdb_test "print var_char" \
|
||||||
|
+ " = \\(PTR TO -> \\( character\\*10\\)\\) ${hex}" \
|
||||||
|
+ "print var_char after allocated first time"
|
||||||
|
+gdb_test "whatis var_char" "type = PTR TO -> \\( character\\*10\\)" \
|
||||||
|
+ "whatis var_char first time"
|
||||||
|
+gdb_test "ptype var_char" "type = PTR TO -> \\( character\\*10\\)" \
|
||||||
|
+ "ptype var_char first time"
|
||||||
|
+gdb_test "next" "\\d+.*var_char = 'foo'.*" \
|
||||||
|
+ "next to allocation status of var_char"
|
||||||
|
+gdb_test "print l" " = .TRUE." "print allocation status first time"
|
||||||
|
+
|
||||||
|
+gdb_breakpoint [gdb_get_line_number "var_char-filled-1"]
|
||||||
|
+gdb_continue_to_breakpoint "var_char-filled-1"
|
||||||
|
+gdb_test "print var_char" \
|
||||||
|
+ " = \\(PTR TO -> \\( character\\*3\\)\\) ${hex}" \
|
||||||
|
+ "print var_char after filled first time"
|
||||||
|
+gdb_test "print *var_char" " = 'foo'" \
|
||||||
|
+ "print *var_char after filled first time"
|
||||||
|
+gdb_test "whatis var_char" "type = PTR TO -> \\( character\\*3\\)" \
|
||||||
|
+ "whatis var_char after filled first time"
|
||||||
|
+gdb_test "ptype var_char" "type = PTR TO -> \\( character\\*3\\)" \
|
||||||
|
+ "ptype var_char after filled first time"
|
||||||
|
+gdb_test "print var_char(1)" " = 102 'f'" "print var_char(1)"
|
||||||
|
+gdb_test "print var_char(3)" " = 111 'o'" "print var_char(3)"
|
||||||
|
+
|
||||||
|
+gdb_breakpoint [gdb_get_line_number "var_char-filled-2"]
|
||||||
|
+gdb_continue_to_breakpoint "var_char-filled-2"
|
||||||
|
+gdb_test "print var_char" \
|
||||||
|
+ " = \\(PTR TO -> \\( character\\*6\\)\\) ${hex}" \
|
||||||
|
+ "print var_char after allocated second time"
|
||||||
|
+gdb_test "print *var_char" " = 'foobar'" \
|
||||||
|
+ "print *var_char after allocated second time"
|
||||||
|
+gdb_test "whatis var_char" "type = PTR TO -> \\( character\\*6\\)" \
|
||||||
|
+ "whatis var_char second time"
|
||||||
|
+gdb_test "ptype var_char" "type = PTR TO -> \\( character\\*6\\)" \
|
||||||
|
+ "ptype var_char second time"
|
||||||
|
+
|
||||||
|
+gdb_breakpoint [gdb_get_line_number "var_char-empty"]
|
||||||
|
+gdb_continue_to_breakpoint "var_char-empty"
|
||||||
|
+gdb_test "print var_char" \
|
||||||
|
+ " = \\(PTR TO -> \\( character\\*0\\)\\) ${hex}" \
|
||||||
|
+ "print var_char after set empty"
|
||||||
|
+gdb_test "print *var_char" " = \"\"" "print *var_char after set empty"
|
||||||
|
+gdb_test "whatis var_char" "type = PTR TO -> \\( character\\*0\\)" \
|
||||||
|
+ "whatis var_char after set empty"
|
||||||
|
+gdb_test "ptype var_char" "type = PTR TO -> \\( character\\*0\\)" \
|
||||||
|
+ "ptype var_char after set empty"
|
||||||
|
+
|
||||||
|
+gdb_breakpoint [gdb_get_line_number "var_char-allocated-3"]
|
||||||
|
+gdb_continue_to_breakpoint "var_char-allocated-3"
|
||||||
|
+gdb_test "print var_char" \
|
||||||
|
+ " = \\(PTR TO -> \\( character\\*21\\)\\) ${hex}" \
|
||||||
|
+ "print var_char after allocated third time"
|
||||||
|
+gdb_test "whatis var_char" "type = PTR TO -> \\( character\\*21\\)" \
|
||||||
|
+ "whatis var_char after allocated third time"
|
||||||
|
+gdb_test "ptype var_char" "type = PTR TO -> \\( character\\*21\\)" \
|
||||||
|
+ "ptype var_char after allocated third time"
|
||||||
|
+
|
||||||
|
+gdb_breakpoint [gdb_get_line_number "var_char_p-associated"]
|
||||||
|
+gdb_continue_to_breakpoint "var_char_p-associated"
|
||||||
|
+gdb_test "print var_char_p" \
|
||||||
|
+ " = \\(PTR TO -> \\( character\\*7\\)\\) ${hex}" \
|
||||||
|
+ "print var_char_p after associated"
|
||||||
|
+gdb_test "print *var_char_p" " = 'johndoe'" \
|
||||||
|
+ "print *var_char_ after associated"
|
||||||
|
+gdb_test "whatis var_char_p" "type = PTR TO -> \\( character\\*7\\)" \
|
||||||
|
+ "whatis var_char_p after associated"
|
||||||
|
+gdb_test "ptype var_char_p" "type = PTR TO -> \\( character\\*7\\)" \
|
||||||
|
+ "ptype var_char_p after associated"
|
||||||
|
diff --git a/gdb/testsuite/gdb.fortran/vla-stringsold.f90 b/gdb/testsuite/gdb.fortran/vla-stringsold.f90
|
||||||
|
new file mode 100644
|
||||||
|
--- /dev/null
|
||||||
|
+++ b/gdb/testsuite/gdb.fortran/vla-stringsold.f90
|
||||||
|
@@ -0,0 +1,40 @@
|
||||||
|
+! Copyright 2014 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 2 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, write to the Free Software
|
||||||
|
+! Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
||||||
|
+
|
||||||
|
+program vla_strings
|
||||||
|
+ character(len=:), target, allocatable :: var_char
|
||||||
|
+ character(len=:), pointer :: var_char_p
|
||||||
|
+ logical :: l
|
||||||
|
+
|
||||||
|
+ allocate(character(len=10) :: var_char)
|
||||||
|
+ l = allocated(var_char) ! var_char-allocated-1
|
||||||
|
+ var_char = 'foo'
|
||||||
|
+ deallocate(var_char) ! var_char-filled-1
|
||||||
|
+ l = allocated(var_char) ! var_char-deallocated
|
||||||
|
+ allocate(character(len=42) :: var_char)
|
||||||
|
+ l = allocated(var_char)
|
||||||
|
+ var_char = 'foobar'
|
||||||
|
+ var_char = '' ! var_char-filled-2
|
||||||
|
+ var_char = 'bar' ! var_char-empty
|
||||||
|
+ deallocate(var_char)
|
||||||
|
+ allocate(character(len=21) :: var_char)
|
||||||
|
+ l = allocated(var_char) ! var_char-allocated-3
|
||||||
|
+ var_char = 'johndoe'
|
||||||
|
+ var_char_p => var_char
|
||||||
|
+ l = associated(var_char_p) ! var_char_p-associated
|
||||||
|
+ var_char_p => null()
|
||||||
|
+ l = associated(var_char_p) ! var_char_p-not-associated
|
||||||
|
+end program vla_strings
|
||||||
|
diff --git a/gdb/testsuite/gdb.fortran/whatis_type.exp b/gdb/testsuite/gdb.fortran/whatis_type.exp
|
||||||
|
--- a/gdb/testsuite/gdb.fortran/whatis_type.exp
|
||||||
|
+++ b/gdb/testsuite/gdb.fortran/whatis_type.exp
|
||||||
|
@@ -44,7 +44,7 @@ gdb_test "whatis t2" "type = Type t2"
|
||||||
|
gdb_test "whatis t2v" "type = Type t2"
|
||||||
|
gdb_test "whatis t3" "type = Type t3"
|
||||||
|
gdb_test "whatis t3v" "type = Type t3"
|
||||||
|
-gdb_test "whatis t3p" "type = PTR TO -> \\( Type t3 \\)"
|
||||||
|
+gdb_test "whatis t3p" "type = PTR TO -> \\( Type t3\\)"
|
||||||
|
|
||||||
|
gdb_test "ptype t1" \
|
||||||
|
[multi_line "type = Type t1" \
|
||||||
|
@@ -73,4 +73,4 @@ gdb_test "ptype t3p" \
|
||||||
|
[multi_line "type = PTR TO -> \\( Type t3" \
|
||||||
|
" $int :: t3_i" \
|
||||||
|
" Type t2 :: t2_n" \
|
||||||
|
- "End Type t3 \\)"]
|
||||||
|
+ "End Type t3\\)"]
|
360
gdb.spec
360
gdb.spec
@ -21,23 +21,23 @@
|
|||||||
%global _root_libdir %{_libdir}
|
%global _root_libdir %{_libdir}
|
||||||
}
|
}
|
||||||
|
|
||||||
# If we're on Fedora or RHEL 9+, we will build the gdb-minimal package.
|
# If we're on Fedora, we will build the gdb-minimal package.
|
||||||
%if 0%{?fedora} || 0%{?rhel} > 8
|
%if 0%{?fedora}
|
||||||
%global _build_minimal 1
|
%global _build_minimal 1
|
||||||
%endif
|
%endif
|
||||||
|
|
||||||
Name: %{?scl_prefix}gdb
|
Name: %{?scl_prefix}gdb
|
||||||
|
|
||||||
# Freeze it when GDB gets branched
|
# Freeze it when GDB gets branched
|
||||||
%global snapsrc 20220501
|
%global snapsrc 20200208
|
||||||
# See timestamp of source gnulib installed into gnulib/ .
|
# See timestamp of source gnulib installed into gnulib/ .
|
||||||
%global snapgnulib 20210105
|
%global snapgnulib 20200630
|
||||||
%global tarname gdb-%{version}
|
%global tarname gdb-%{version}
|
||||||
Version: 12.1
|
Version: 10.1
|
||||||
|
|
||||||
# The release always contains a leading reserved number, start it at 1.
|
# The release always contains a leading reserved number, start it at 1.
|
||||||
# `upstream' is not a part of `name' to stay fully rpm dependencies compatible for the testing.
|
# `upstream' is not a part of `name' to stay fully rpm dependencies compatible for the testing.
|
||||||
Release: 3%{?dist}
|
Release: 1%{?dist}
|
||||||
|
|
||||||
License: GPLv3+ and GPLv3+ with exceptions and GPLv2+ and GPLv2+ with exceptions and GPL+ and LGPLv2+ and LGPLv3+ and BSD and Public Domain and GFDL
|
License: GPLv3+ and GPLv3+ with exceptions and GPLv2+ and GPLv2+ with exceptions and GPL+ and LGPLv2+ and LGPLv3+ and BSD and Public Domain and GFDL
|
||||||
# Do not provide URL for snapshots as the file lasts there only for 2 days.
|
# Do not provide URL for snapshots as the file lasts there only for 2 days.
|
||||||
@ -157,6 +157,8 @@ Recommends: %{librpmname}
|
|||||||
BuildRequires: %{?scl_prefix}gcc-c++
|
BuildRequires: %{?scl_prefix}gcc-c++
|
||||||
%endif
|
%endif
|
||||||
|
|
||||||
|
BuildRequires: autoconf
|
||||||
|
|
||||||
# GDB patches have the format `gdb-<version>-bz<red-hat-bz-#>-<desc>.patch'.
|
# GDB patches have the format `gdb-<version>-bz<red-hat-bz-#>-<desc>.patch'.
|
||||||
# They should be created using patch level 1: diff -up ./gdb (or gdb-6.3/gdb).
|
# They should be created using patch level 1: diff -up ./gdb (or gdb-6.3/gdb).
|
||||||
|
|
||||||
@ -187,12 +189,22 @@ Source5: %{libstdcxxpython}.tar.xz
|
|||||||
Source6: gdbtui
|
Source6: gdbtui
|
||||||
|
|
||||||
# libipt: Intel Processor Trace Decoder Library
|
# libipt: Intel Processor Trace Decoder Library
|
||||||
%global libipt_version 2.0.5
|
%global libipt_version 2.0.2
|
||||||
#=fedora
|
#=fedora
|
||||||
Source7: v%{libipt_version}.tar.gz
|
Source7: v%{libipt_version}.tar.gz
|
||||||
#=fedora
|
#=fedora
|
||||||
Patch1142: v1.5-libipt-static.patch
|
Patch1142: v1.5-libipt-static.patch
|
||||||
|
|
||||||
|
## [testsuite] Fix false selftest.exp FAIL from system readline-6.3+ (Patrick Palka).
|
||||||
|
##=fedoratest
|
||||||
|
#Patch1075: gdb-testsuite-readline63-sigint.patch
|
||||||
|
##=fedoratest
|
||||||
|
Patch1119: gdb-testsuite-readline63-sigint-revert.patch
|
||||||
|
|
||||||
|
# Fix broken configure tests compromised by LTO
|
||||||
|
#push=Should be pushed upstream.
|
||||||
|
Patch2000: gdb-config.patch
|
||||||
|
|
||||||
# Include the auto-generated file containing the "Patch:" directives.
|
# Include the auto-generated file containing the "Patch:" directives.
|
||||||
# See README.local-patches for more details.
|
# See README.local-patches for more details.
|
||||||
Patch9998: _gdb.spec.Patch.include
|
Patch9998: _gdb.spec.Patch.include
|
||||||
@ -237,9 +249,7 @@ BuildRequires: texlive-collection-latexrecommended
|
|||||||
BuildRequires: /usr/bin/pod2man
|
BuildRequires: /usr/bin/pod2man
|
||||||
%if 0%{!?rhel:1} || 0%{?rhel} > 7
|
%if 0%{!?rhel:1} || 0%{?rhel} > 7
|
||||||
BuildRequires: libbabeltrace-devel%{buildisa}
|
BuildRequires: libbabeltrace-devel%{buildisa}
|
||||||
%if 0%{?rhel} < 9
|
BuildRequires: guile-devel%{buildisa}
|
||||||
BuildRequires: guile22-devel%{buildisa}
|
|
||||||
%endif
|
|
||||||
%endif
|
%endif
|
||||||
%global have_libipt 0
|
%global have_libipt 0
|
||||||
%if 0%{!?rhel:1} || 0%{?rhel} > 7 || (0%{?rhel} == 7 && 0%{?scl:1})
|
%if 0%{!?rhel:1} || 0%{?rhel} > 7 || (0%{?rhel} == 7 && 0%{?scl:1})
|
||||||
@ -259,7 +269,7 @@ BuildRequires: libipt-devel%{buildisa}
|
|||||||
BuildRequires: mpfr-devel%{buildisa}
|
BuildRequires: mpfr-devel%{buildisa}
|
||||||
%endif
|
%endif
|
||||||
BuildRequires: source-highlight-devel
|
BuildRequires: source-highlight-devel
|
||||||
%if 0%{!?rhel:1}
|
%if 0%{!?rhel:1} || 0%{?rhel} > 8
|
||||||
BuildRequires: xxhash-devel
|
BuildRequires: xxhash-devel
|
||||||
%endif
|
%endif
|
||||||
BuildRequires: elfutils-debuginfod-client-devel
|
BuildRequires: elfutils-debuginfod-client-devel
|
||||||
@ -270,16 +280,18 @@ BuildRequires: elfutils-debuginfod-client-devel
|
|||||||
%global bits_local %{?_isa}
|
%global bits_local %{?_isa}
|
||||||
%global bits_other %{?_isa}
|
%global bits_other %{?_isa}
|
||||||
%ifarch s390x
|
%ifarch s390x
|
||||||
%if 0%{?rhel:1} && 0%{?rhel} < 8
|
%if 0%{!?rhel:1} || 0%{?rhel} < 8
|
||||||
%global bits_other (%{__isa_name}-32)
|
%global bits_other (%{__isa_name}-32)
|
||||||
%endif
|
%endif
|
||||||
%endif
|
%else #!s390x
|
||||||
%ifarch ppc
|
%ifarch ppc
|
||||||
%global bits_other (%{__isa_name}-64)
|
%global bits_other (%{__isa_name}-64)
|
||||||
%endif
|
%else #!ppc
|
||||||
%ifarch sparc64 ppc64 x86_64
|
%ifarch sparc64 ppc64 s390x x86_64
|
||||||
%global bits_other (%{__isa_name}-32)
|
%global bits_other (%{__isa_name}-32)
|
||||||
%endif
|
%endif #sparc64 ppc64 s390x x86_64
|
||||||
|
%endif #!ppc
|
||||||
|
%endif #!s390x
|
||||||
|
|
||||||
BuildRequires: sharutils dejagnu
|
BuildRequires: sharutils dejagnu
|
||||||
# gcc-objc++ is not covered by the GDB testsuite.
|
# gcc-objc++ is not covered by the GDB testsuite.
|
||||||
@ -323,8 +335,8 @@ BuildRequires: prelink
|
|||||||
BuildRequires: opencl-headers ocl-icd-devel%{bits_local} ocl-icd-devel%{bits_other}
|
BuildRequires: opencl-headers ocl-icd-devel%{bits_local} ocl-icd-devel%{bits_other}
|
||||||
%endif
|
%endif
|
||||||
%if 0%{!?rhel:1}
|
%if 0%{!?rhel:1}
|
||||||
# Fedora s390x does not have fpc.
|
# Fedora arm+ppc64le do not yet have fpc built.
|
||||||
%ifnarch s390x
|
%ifnarch %{arm} ppc64le
|
||||||
BuildRequires: fpc
|
BuildRequires: fpc
|
||||||
%endif
|
%endif
|
||||||
%endif
|
%endif
|
||||||
@ -374,7 +386,6 @@ BuildRequires: rust
|
|||||||
|
|
||||||
BuildRequires: %{?scl_prefix}elfutils-debuginfod
|
BuildRequires: %{?scl_prefix}elfutils-debuginfod
|
||||||
%endif # 0%{?_with_testsuite:1}
|
%endif # 0%{?_with_testsuite:1}
|
||||||
BuildRequires: make
|
|
||||||
|
|
||||||
%{?scl:Requires:%scl_runtime}
|
%{?scl:Requires:%scl_runtime}
|
||||||
|
|
||||||
@ -466,6 +477,32 @@ find -name "*.info*"|xargs rm -f
|
|||||||
# See README.local-patches for more details.
|
# See README.local-patches for more details.
|
||||||
%include %{PATCH9999}
|
%include %{PATCH9999}
|
||||||
|
|
||||||
|
%if 0%{!?el6:1}
|
||||||
|
for i in \
|
||||||
|
gdb/python/lib/gdb/FrameWrapper.py \
|
||||||
|
gdb/python/lib/gdb/backtrace.py \
|
||||||
|
gdb/python/lib/gdb/command/backtrace.py \
|
||||||
|
;do
|
||||||
|
test -e $i
|
||||||
|
: >$i
|
||||||
|
done
|
||||||
|
%endif
|
||||||
|
|
||||||
|
%if 0%{?rhel:1} && 0%{?rhel} <= 7
|
||||||
|
%patch1119 -p1
|
||||||
|
%endif
|
||||||
|
|
||||||
|
%patch2000 -p1
|
||||||
|
|
||||||
|
# The above patches twiddle a .m4 file for configure, so update the affected
|
||||||
|
# configure files
|
||||||
|
pushd libiberty
|
||||||
|
autoconf -f
|
||||||
|
popd
|
||||||
|
pushd intl
|
||||||
|
autoconf -f
|
||||||
|
popd
|
||||||
|
|
||||||
find -name "*.orig" | xargs rm -f
|
find -name "*.orig" | xargs rm -f
|
||||||
! find -name "*.rej" # Should not happen.
|
! find -name "*.rej" # Should not happen.
|
||||||
|
|
||||||
@ -516,10 +553,7 @@ COMMON_GDB_CONFIGURE_FLAGS="\
|
|||||||
--mandir=%{_mandir} \
|
--mandir=%{_mandir} \
|
||||||
--infodir=%{_infodir} \
|
--infodir=%{_infodir} \
|
||||||
--with-gdb-datadir=%{_datadir}/gdb \
|
--with-gdb-datadir=%{_datadir}/gdb \
|
||||||
--enable-gdb-build-warnings=,-Wno-unused,-Wno-deprecated-declarations,-Wno-unused-function\
|
--enable-gdb-build-warnings=,-Wno-unused \
|
||||||
%ifarch %{ix86}
|
|
||||||
,-Wno-format-overflow\
|
|
||||||
%endif
|
|
||||||
--enable-build-with-cxx \
|
--enable-build-with-cxx \
|
||||||
%ifnarch %{ix86} alpha ppc s390 s390x x86_64 ppc64 ppc64le sparc sparcv9 sparc64 %{arm} aarch64
|
%ifnarch %{ix86} alpha ppc s390 s390x x86_64 ppc64 ppc64le sparc sparcv9 sparc64 %{arm} aarch64
|
||||||
--disable-werror \
|
--disable-werror \
|
||||||
@ -527,7 +561,7 @@ COMMON_GDB_CONFIGURE_FLAGS="\
|
|||||||
--enable-werror \
|
--enable-werror \
|
||||||
%endif
|
%endif
|
||||||
--with-separate-debug-dir=/usr/lib/debug \
|
--with-separate-debug-dir=/usr/lib/debug \
|
||||||
--disable-sim \
|
--disable-sim \
|
||||||
--disable-rpath \
|
--disable-rpath \
|
||||||
--without-stage1-ldflags \
|
--without-stage1-ldflags \
|
||||||
--disable-libmcheck \
|
--disable-libmcheck \
|
||||||
@ -551,11 +585,8 @@ COMMON_GDB_CONFIGURE_FLAGS="\
|
|||||||
--with-lzma \
|
--with-lzma \
|
||||||
%else
|
%else
|
||||||
--without-lzma \
|
--without-lzma \
|
||||||
%endif
|
%endif \
|
||||||
--with-debuginfod \
|
--with-debuginfod
|
||||||
%if 0%{?rhel:1}
|
|
||||||
--disable-libctf
|
|
||||||
%endif
|
|
||||||
"
|
"
|
||||||
|
|
||||||
# Identify the build directory with the version of gdb as well as the
|
# Identify the build directory with the version of gdb as well as the
|
||||||
@ -583,11 +614,10 @@ GDB_MINIMAL_CONFIGURE_FLAGS="\
|
|||||||
--disable-unit-tests \
|
--disable-unit-tests \
|
||||||
--disable-source-highlight"
|
--disable-source-highlight"
|
||||||
|
|
||||||
# Populate CFLAGS, LDFLAGS, CC, CXX, etc.
|
export CFLAGS="$RPM_OPT_FLAGS %{?_with_asan:-fsanitize=address}"
|
||||||
%set_build_flags
|
export LDFLAGS="%{?__global_ldflags} %{?_with_asan:-fsanitize=address}"
|
||||||
CFLAGS="$CFLAGS %{?_with_asan:-fsanitize=address}"
|
|
||||||
LDFLAGS="$LDFLAGS %{?_with_asan:-fsanitize=address}"
|
export CXXFLAGS="$CFLAGS"
|
||||||
CXXFLAGS="$CXXFLAGS %{?_with_asan:-fsanitize=address}"
|
|
||||||
|
|
||||||
# --htmldir and --pdfdir are not used as they are used from %{gdb_build}.
|
# --htmldir and --pdfdir are not used as they are used from %{gdb_build}.
|
||||||
../configure \
|
../configure \
|
||||||
@ -685,7 +715,7 @@ $(: ppc64 host build crashes on ppc variant of libexpat.so ) \
|
|||||||
%else
|
%else
|
||||||
--without-python \
|
--without-python \
|
||||||
%endif
|
%endif
|
||||||
%if 0%{!?rhel:1} || 0%{?rhel} == 8
|
%if 0%{!?rhel:1} || 0%{?rhel} > 7
|
||||||
--with-guile \
|
--with-guile \
|
||||||
%else
|
%else
|
||||||
--without-guile \
|
--without-guile \
|
||||||
@ -700,7 +730,7 @@ $(: ppc64 host build crashes on ppc variant of libexpat.so ) \
|
|||||||
%else
|
%else
|
||||||
--without-intel-pt \
|
--without-intel-pt \
|
||||||
%endif
|
%endif
|
||||||
%if 0%{!?rhel:1}
|
%if 0%{!?rhel:1} || 0%{?rhel} > 8
|
||||||
--with-xxhash \
|
--with-xxhash \
|
||||||
%endif
|
%endif
|
||||||
--with-rpm=librpm.so.%{librpmver} \
|
--with-rpm=librpm.so.%{librpmver} \
|
||||||
@ -758,6 +788,8 @@ perl -i.relocatable -pe 's/^(D\[".*_RELOCATABLE"\]=" )1(")$/${1}0$2/' gdb/config
|
|||||||
%make_build CFLAGS="$CFLAGS $FPROFILE_CFLAGS" LDFLAGS="$LDFLAGS $FPROFILE_CFLAGS" V=1
|
%make_build CFLAGS="$CFLAGS $FPROFILE_CFLAGS" LDFLAGS="$LDFLAGS $FPROFILE_CFLAGS" V=1
|
||||||
|
|
||||||
! grep '_RELOCATABLE.*1' gdb/config.h
|
! grep '_RELOCATABLE.*1' gdb/config.h
|
||||||
|
grep '^#define HAVE_LIBSELINUX 1$' gdb/config.h
|
||||||
|
grep '^#define HAVE_SELINUX_SELINUX_H 1$' gdb/config.h
|
||||||
|
|
||||||
if [ "$fprofile" = "-fprofile" ]
|
if [ "$fprofile" = "-fprofile" ]
|
||||||
then
|
then
|
||||||
@ -930,7 +962,7 @@ touch -r %{SOURCE4} $RPM_BUILD_ROOT%{_sysconfdir}/gdbinit
|
|||||||
for i in `find $RPM_BUILD_ROOT%{_datadir}/gdb/python/gdb -name "*.py"`
|
for i in `find $RPM_BUILD_ROOT%{_datadir}/gdb/python/gdb -name "*.py"`
|
||||||
do
|
do
|
||||||
# Files could be also patched getting the current time.
|
# Files could be also patched getting the current time.
|
||||||
touch -r $RPM_BUILD_DIR/%{gdb_src}/gdb/version.in $i
|
touch -r $RPM_BUILD_DIR/%{gdb_src}/gdb/ChangeLog $i
|
||||||
done
|
done
|
||||||
|
|
||||||
%if 0%{?_enable_debug_packages:1} && 0%{!?_without_python:1}
|
%if 0%{?_enable_debug_packages:1} && 0%{!?_without_python:1}
|
||||||
@ -976,7 +1008,7 @@ cp -a $RPM_BUILD_DIR/%{gdb_src}/%{libstdcxxpython}/libstdcxx \
|
|||||||
%endif # 0%{?rhel:1} && 0%{?rhel} <= 7
|
%endif # 0%{?rhel:1} && 0%{?rhel} <= 7
|
||||||
for i in `find $RPM_BUILD_ROOT%{_datadir}/gdb -name "*.py"`; do
|
for i in `find $RPM_BUILD_ROOT%{_datadir}/gdb -name "*.py"`; do
|
||||||
# Files are installed by install(1) not preserving the timestamps.
|
# Files are installed by install(1) not preserving the timestamps.
|
||||||
touch -r $RPM_BUILD_DIR/%{gdb_src}/gdb/version.in $i
|
touch -r $RPM_BUILD_DIR/%{gdb_src}/gdb/ChangeLog $i
|
||||||
done
|
done
|
||||||
%endif # 0%{!?_without_python:1}
|
%endif # 0%{!?_without_python:1}
|
||||||
|
|
||||||
@ -1022,7 +1054,6 @@ ln -s gstack $RPM_BUILD_ROOT%{_bindir}/pstack
|
|||||||
# Documentation only for development.
|
# Documentation only for development.
|
||||||
rm -f $RPM_BUILD_ROOT%{_infodir}/gdbint*
|
rm -f $RPM_BUILD_ROOT%{_infodir}/gdbint*
|
||||||
rm -f $RPM_BUILD_ROOT%{_infodir}/stabs*
|
rm -f $RPM_BUILD_ROOT%{_infodir}/stabs*
|
||||||
rm -f $RPM_BUILD_ROOT%{_infodir}/ctf-spec*
|
|
||||||
|
|
||||||
# Delete this too because the dir file will be updated at rpm install time.
|
# Delete this too because the dir file will be updated at rpm install time.
|
||||||
# We don't want a gdb specific one overwriting the system wide one.
|
# We don't want a gdb specific one overwriting the system wide one.
|
||||||
@ -1040,6 +1071,13 @@ rm -f $RPM_BUILD_ROOT%{_datadir}/gdb/system-gdbinit/elinos.py
|
|||||||
rm -f $RPM_BUILD_ROOT%{_datadir}/gdb/system-gdbinit/wrs-linux.py
|
rm -f $RPM_BUILD_ROOT%{_datadir}/gdb/system-gdbinit/wrs-linux.py
|
||||||
rmdir $RPM_BUILD_ROOT%{_datadir}/gdb/system-gdbinit
|
rmdir $RPM_BUILD_ROOT%{_datadir}/gdb/system-gdbinit
|
||||||
|
|
||||||
|
# Patch848: gdb-dts-rhel6-python-compat.patch
|
||||||
|
%if 0%{!?el6:1}
|
||||||
|
rm -f $RPM_BUILD_ROOT%{_datadir}/gdb/python/gdb/FrameWrapper.py
|
||||||
|
rm -f $RPM_BUILD_ROOT%{_datadir}/gdb/python/gdb/backtrace.py
|
||||||
|
rm -f $RPM_BUILD_ROOT%{_datadir}/gdb/python/gdb/command/backtrace.py
|
||||||
|
%endif
|
||||||
|
|
||||||
%files
|
%files
|
||||||
# File must begin with "/": {GFDL,COPYING3,COPYING,COPYING.LIB,COPYING3.LIB}
|
# File must begin with "/": {GFDL,COPYING3,COPYING,COPYING.LIB,COPYING3.LIB}
|
||||||
%if 0%{!?el6:1}
|
%if 0%{!?el6:1}
|
||||||
@ -1146,250 +1184,6 @@ fi
|
|||||||
%endif
|
%endif
|
||||||
|
|
||||||
%changelog
|
%changelog
|
||||||
* Tue Dec 13 2022 Alexandra Hájková - 12.1-3
|
|
||||||
- Backport upstream patch "Add support for readline 8.2". (Andreas Schwab)
|
|
||||||
|
|
||||||
* Wed Oct 5 2022 Alexandra Hájková - 12.1-2
|
|
||||||
- Update gdb-6.6-buildid-locate.patch to fix RHBZ 2122947.
|
|
||||||
|
|
||||||
* Fri May 6 2022 Kevin Buettner - 12.1-1
|
|
||||||
- Rebase to FSF GDB 12.1.
|
|
||||||
- Update gdb-6.6-buildid-locate.patch.
|
|
||||||
- Update gdb-6.6-buildid-locate-rpm.patch.
|
|
||||||
- Dropped backported patches from GDB 11.1 and 11.2.
|
|
||||||
|
|
||||||
* Wed Mar 30 2022 Kevin Buettner - 11.2-3
|
|
||||||
- Backport upstream patch which removes sizes from debuginfod download
|
|
||||||
messages when the size is not available (RHBZ 2068280, Aaron Merey).
|
|
||||||
|
|
||||||
* Wed Feb 9 2022 Kevin Buettner - 11.2-2
|
|
||||||
- On ix86, add -Wno-format-overflow to --enable-gdb-build-warnings.
|
|
||||||
(This is a workaround for the bogus warning/error that we now see
|
|
||||||
on i686 regarding a "may write a terminating nul past the end of
|
|
||||||
the destination" message for the sprintf() call in
|
|
||||||
global_symbol_searcher::search() in gdb/symtab.c.)
|
|
||||||
|
|
||||||
* Wed Feb 9 2022 Kevin Buettner - 11.2-1
|
|
||||||
- Rebase to FSF GDB 11.2.
|
|
||||||
|
|
||||||
* Mon Jan 31 2022 Kevin Buettner <kevinb@redhat.com> - 11.1-12
|
|
||||||
- Fix "sect_index_data not initialized" internal error. (RHBZ 2042664,
|
|
||||||
Kevin Buettner).
|
|
||||||
|
|
||||||
* Mon Jan 31 2022 Keith Seitz <keiths@redhat.com> - 11.1-11
|
|
||||||
- Fix buld issues. (RHBZ 2042257, Keith Seitz, Andrew Burgess)
|
|
||||||
- Update libipt to 2.0.5.
|
|
||||||
|
|
||||||
* Thu Jan 20 2022 Fedora Release Engineering <releng@fedoraproject.org>
|
|
||||||
- Rebuilt for https://fedoraproject.org/wiki/Fedora_36_Mass_Rebuild
|
|
||||||
|
|
||||||
* Wed Jan 12 2022 Alexandra Hájková - 11.1-9
|
|
||||||
- Remove gdb-6.3-inferior-notification-20050721.patch
|
|
||||||
which adds problematic attach-32 test.
|
|
||||||
|
|
||||||
* Tue Jan 11 2022 Alexandra Hájková - 11.1-8
|
|
||||||
- Backport upstream patch "[PR gdb/27026] CTRL-C is ignored
|
|
||||||
when debug info is downloaded" (RHBZ 2024875, Aaron Merey).
|
|
||||||
|
|
||||||
* Tue Jan 11 2022 Alexandra Hájková - 11.1-8
|
|
||||||
- Backport upstream patch "rework "set debuginfod" commands"
|
|
||||||
(RHBZ 2024875, Simon Marchi).
|
|
||||||
|
|
||||||
* Tue Jan 11 2022 Alexandra Hájková - 11.1-8
|
|
||||||
- Backport upstream patch "Fix unittest.exp failure due to 'set debuginfod' addition"
|
|
||||||
(RHBZ 2024875, Tom Tromey).
|
|
||||||
|
|
||||||
* Mon Jan 10 2022 Alexandra Hájková - 11.1-8
|
|
||||||
- Add -Wno-unused-function to --enable-gdb-build-warnings to prevent the build failure:
|
|
||||||
"../../gdb/c-exp.y:3455:1: error: 'void c_print_token(FILE*, int, YYSTYPE)'
|
|
||||||
defined but not used [-Werror=unused-function]"
|
|
||||||
|
|
||||||
* Mon Jan 10 2022 Alexandra Hájková - 11.1-8
|
|
||||||
- Backport upstream patch "gdb: add set/show commands for managing debuginfod"
|
|
||||||
(RHBZ 2024875, Aaron Merey).
|
|
||||||
|
|
||||||
* Mon Jan 10 2022 Alexandra Hájková - 11.1-8
|
|
||||||
- Backport upstream patch "gdb.texinfo: Expand documentation for debuginfod"
|
|
||||||
(RHBZ 2024875, Aaron Merey).
|
|
||||||
|
|
||||||
* Mon Dec 6 2021 Kevin Buettner - 11.1-7
|
|
||||||
- Add -Wno-deprecated-declarations to --enable-gdb-build-warnings to work
|
|
||||||
around the python 3.11 deprecation of Py_SetProgramName.
|
|
||||||
|
|
||||||
* Fri Nov 12 2021 Timm Bäder <tbaeder@redhat.com> - 11.1-6
|
|
||||||
- Use %%set_build_flags to populate all relevant build flags
|
|
||||||
|
|
||||||
* Wed Nov 10 2021 Kevin Buettner - 11.1-5
|
|
||||||
- Backport upstream fix and test case for a dprintf bug (RHBZ 2022177, Kevin
|
|
||||||
Buettner).
|
|
||||||
|
|
||||||
* Tue Nov 9 2021 Bruno Larsen - 11.1-4
|
|
||||||
- Backport manpage update to be closer to -help (RHBZ 853071)
|
|
||||||
|
|
||||||
* Wed Nov 3 2021 Kevin Buettner - 11.1-3
|
|
||||||
- Make adjustments to gdb-6.6-buildid-locate.patch, provided by Tom de Vries.
|
|
||||||
|
|
||||||
* Mon Oct 11 2021 Kevin Buettner - 11.1-2
|
|
||||||
- Backport upstream patch which papers over Fortran lexical analyzer
|
|
||||||
bug (RHBZ 2012976, Tom de Vries).
|
|
||||||
|
|
||||||
* Mon Oct 04 2021 Kevin Buettner - 11.1-1
|
|
||||||
- Rebase to FSF GDB 11.1.
|
|
||||||
- Adjust build-id related patches.
|
|
||||||
- Drop backported patches which are no longer relevant.
|
|
||||||
- Bump 'snapgnulib' date.
|
|
||||||
|
|
||||||
* Thu Sep 30 2021 Alexandra Hájková <ahajkova@redhat.com> - 10.2-9
|
|
||||||
- Backport test for RHBZ 1976887 (Kevin Buettner).
|
|
||||||
|
|
||||||
* Thu Sep 30 2021 Alexandra Hájková <ahajkova@redhat.com> - 10.2-9
|
|
||||||
- Backport upstream patch which fixes internal-error: Unexpected
|
|
||||||
type field location kind (RHBZ 1976887, Alexandra Hájková).
|
|
||||||
|
|
||||||
* Wed Sep 22 2021 Bruno Larsen <blarsen@redhat.com> - 10.2-8
|
|
||||||
- Backport "[gdb] Improve early exits for env var in debuginfod-support.c"
|
|
||||||
(Tom de Vries)
|
|
||||||
|
|
||||||
* Wed Sep 22 2021 Bruno Larsen <blarsen@redhat.com> - 10.2-8
|
|
||||||
- Backport "[gdb/cli] Don't assert on empty string for core-file"
|
|
||||||
(Tom de Vries)
|
|
||||||
|
|
||||||
* Tue Sep 21 2021 Peter Robinson <pbrobinson@fedoraproject.org> 10.2-7
|
|
||||||
- Use guile 2.2 (rhbz #1901353)
|
|
||||||
|
|
||||||
* Wed Jul 21 2021 Fedora Release Engineering <releng@fedoraproject.org> 10.2-6
|
|
||||||
- Rebuilt for https://fedoraproject.org/wiki/Fedora_35_Mass_Rebuild
|
|
||||||
|
|
||||||
* Tue Jul 20 2021 Kevin Buettner <kevinb@redhat.com> - 10.2-5
|
|
||||||
- Remove autoconf invocations from spec file.
|
|
||||||
- Remove BuildRequires: autoconf.
|
|
||||||
|
|
||||||
* Mon Jun 14 2021 Kevin Buettner <kevinb@redhat.com> - 10.2-4
|
|
||||||
- Backport upstream patches which fix multi-threaded debugging for
|
|
||||||
glibc-2.34 (RHBZ 1971096, Simon Marchi, Kevin Buettner).
|
|
||||||
|
|
||||||
* Fri Jun 11 2021 Keith Seitz <keiths@redhat.com> - 10.2-3
|
|
||||||
- Backport "Exclude debuginfo files from 'outside ELF segments' warning".
|
|
||||||
(Keith Seitz, RH BZ 1898252)
|
|
||||||
- Backport "Fix crash when expanding partial symtab..."
|
|
||||||
(Tom Tromey. gdb/27743)
|
|
||||||
- Backport "[gdb/server] Don't overwrite fs/gs_base with -m32"
|
|
||||||
- (Tom de Vries)
|
|
||||||
|
|
||||||
* Sun Jun 06 2021 Python Maint <python-maint@redhat.com>
|
|
||||||
- Rebuilt for Python 3.10
|
|
||||||
|
|
||||||
* Thu Jun 03 2021 Kevin Buettner <kevinb@redhat.com> - 10.2-1
|
|
||||||
- Rebase to FSF GDB 10.2.
|
|
||||||
- Drop gdb-6.3-test-pie-20050107.patch.
|
|
||||||
- Drop gdb-6.3-test-self-20050110.patch.
|
|
||||||
- Drop gdb-6.5-bz218379-ppc-solib-trampoline-test.patch.
|
|
||||||
- Drop gdb-6.6-buildid-locate-core-as-arg.patch.
|
|
||||||
- Drop gdb-6.8-quit-never-aborts.patch.
|
|
||||||
- Drop gdb-archer-pie-addons-keep-disabled.patch.
|
|
||||||
- Drop gdb-archer-pie-addons.patch.
|
|
||||||
- Drop gdb-archer-vla-tests.patch.
|
|
||||||
- Drop gdb-archer.patch.
|
|
||||||
- Drop gdb-attach-fail-reasons-5of5.patch.
|
|
||||||
- Drop gdb-btrobust.patch.
|
|
||||||
- Drop gdb-bz1219747-attach-kills.patch.
|
|
||||||
- Drop gdb-bz533176-fortran-omp-step.patch.
|
|
||||||
- Drop gdb-dts-rhel6-python-compat.patch.
|
|
||||||
- Drop gdb-gnat-dwarf-crash-3of3.patch.
|
|
||||||
- Drop gdb-jit-reader-multilib.patch.
|
|
||||||
- Drop gdb-moribund-utrace-workaround.patch.
|
|
||||||
- Drop gdb-rhbz1930528-fix-gnulib-build-error.patch.
|
|
||||||
- Drop gdb-rhbz1932645-aarch64-ptrace-header-order.patch.
|
|
||||||
- Drop gdb-vla-intel-fix-print-char-array.patch.
|
|
||||||
- Drop gdb-vla-intel-fortran-strides.patch.
|
|
||||||
- Drop gdb-vla-intel-stringbt-fix.patch.
|
|
||||||
- Drop gdb-vla-intel-tests.patch.
|
|
||||||
- Drop process_psymtab_comp_unit-type-unit.patch.
|
|
||||||
- Drop gdb-testsuite-readline63-sigint-revert.patch.
|
|
||||||
- Drop gdb-config.patch.
|
|
||||||
- Add following upstream patches for Fortran stride / slice support:
|
|
||||||
gdb-rhbz1964167-convert-enum-range_type.patch
|
|
||||||
gdb-rhbz1964167-fortran-array-slices-at-prompt.patch
|
|
||||||
gdb-rhbz1964167-fortran-array-strides-in-expressions.patch
|
|
||||||
gdb-rhbz1964167-fortran-clean-up-array-expression-evaluation.patch
|
|
||||||
gdb-rhbz1964167-fortran-range_type-to-range_flag.patch
|
|
||||||
gdb-rhbz1964167-fortran-whitespace_array.patch
|
|
||||||
gdb-rhbz1964167-move-fortran-expr-handling.patch
|
|
||||||
|
|
||||||
* Tue Jun 01 2021 Python Maint <python-maint@redhat.com>
|
|
||||||
- Bootstrap for Python 3.10
|
|
||||||
|
|
||||||
* Wed Mar 31 2021 Keith Seitz <keiths@redhat.com> - 10.1-18
|
|
||||||
- Backport "Save/restore file offset while reading notes in core file"
|
|
||||||
(Keith Seitz, RHBZ 1931344)
|
|
||||||
|
|
||||||
* Wed Mar 31 2021 Jonathan Wakely <jwakely@redhat.com> - 10.1-17
|
|
||||||
- Rebuilt for removed libstdc++ symbols (#1937698)
|
|
||||||
|
|
||||||
* Tue Mar 23 2021 Kevin Buettner <kevinb@redhat.com>
|
|
||||||
- Remove spec file workaround for RHBZ 1912913.
|
|
||||||
|
|
||||||
* Fri Mar 19 2021 Kevin Buettner <kevinb@redhat.com> - 10.1-16
|
|
||||||
- Fix potential hang during gdbserver testing (RHBZ 1941080, Kevin Buettner).
|
|
||||||
|
|
||||||
* Thu Mar 18 2021 Keith Seitz <keiths@redhat.com>
|
|
||||||
- Disable libctf on RHEL (RHBZ 1935517).
|
|
||||||
|
|
||||||
* Thu Mar 11 2021 Kevin Buettner <kevinb@redhat.com> - 10.1-15
|
|
||||||
- Update libipt to version 2.0.4.
|
|
||||||
|
|
||||||
* Fri Mar 05 2021 Kevin Buettner <kevinb@redhat.com> - 10.1-14
|
|
||||||
- Backport patches which fix frame_id_p assertion failure (RHBZ 1909902,
|
|
||||||
Pedro Alves).
|
|
||||||
|
|
||||||
* Fri Mar 5 2021 Jan Kratochvil <jan.kratochvil@redhat.com> - 10.1-13
|
|
||||||
- Drop gdb-vla-intel-fortran-vla-strings.patch as it was still regressing the
|
|
||||||
testsuite.
|
|
||||||
|
|
||||||
* Thu Mar 4 2021 Jan Kratochvil <jan.kratochvil@redhat.com> - 10.1-12
|
|
||||||
- Fix gdb-vla-intel-fortran-vla-strings.patch to no longer modify cached
|
|
||||||
inferior types.
|
|
||||||
|
|
||||||
* Thu Mar 4 2021 Jan Kratochvil <jan.kratochvil@redhat.com> - 10.1-11
|
|
||||||
- Align gdb-vla-intel-fortran-vla-strings.patch more to upstream
|
|
||||||
fixing whitespaces in Fortran types printing.
|
|
||||||
|
|
||||||
* Thu Mar 4 2021 Jan Kratochvil <jan.kratochvil@redhat.com> - 10.1-10
|
|
||||||
- Reapply 10.1-8 after it has been accidentally reverted by 10.1-9.
|
|
||||||
|
|
||||||
* Wed Feb 24 2021 Kevin Buettner <kevinb@redhat.com> - 10.1-9
|
|
||||||
- Fix aarch64 build problem (RHBZ 1932645, Kevin Buettner).
|
|
||||||
|
|
||||||
* Fri Feb 19 2021 Jan Kratochvil <jan.kratochvil@redhat.com> - 10.1-8
|
|
||||||
- Fix gdb-vla-intel-fortran-vla-strings.patch for compatiblity with GraalVM.
|
|
||||||
|
|
||||||
* Thu Feb 18 2021 Kevin Buettner <kevinb@redhat.com> - 10.1-7
|
|
||||||
- Fix gnulib related build problem (RHBZ 1930528, Kevin Buettner).
|
|
||||||
|
|
||||||
* Wed Feb 17 2021 Kevin Buettner <kevinb@redhat.com> - 10.1-6
|
|
||||||
- Fix libstdc++ assert when performing tab completion; build must be made
|
|
||||||
with -D_GLIBCXX_DEBUG flag in order to trigger assert (RHBZ 1912985,
|
|
||||||
Kevin Buettner).
|
|
||||||
|
|
||||||
* Thu Feb 11 2021 Keith Seitz
|
|
||||||
- Disable Guile support for RHEL9+.
|
|
||||||
|
|
||||||
* Tue Jan 26 2021 Stephen Gallagher <sgallagh@redhat.com> - 10.1-5
|
|
||||||
- Build gdb-minimal for ELN
|
|
||||||
|
|
||||||
* Tue Jan 26 2021 Fedora Release Engineering <releng@fedoraproject.org>
|
|
||||||
- Rebuilt for https://fedoraproject.org/wiki/Fedora_34_Mass_Rebuild
|
|
||||||
|
|
||||||
* Sat Jan 23 2021 Kevin Buettner <kevinb@redhat.com>
|
|
||||||
- Add -Wno-stringop-overread to CFLAGS to work around gcc
|
|
||||||
bug (RH BZ 1912913)
|
|
||||||
|
|
||||||
* Tue Jan 12 2021 Keith Seitz <keiths@redhat.com> - 10.1-3
|
|
||||||
- Disable xxhash support for RHEL.
|
|
||||||
|
|
||||||
* Wed Dec 09 2020 Kevin Buettner <kevinb@redhat.com> - 10.1-2
|
|
||||||
- Fix off-by-one error in ada_fold_name. (RHBZ 1905996, Kevin Buettner)
|
|
||||||
|
|
||||||
* Wed Nov 04 2020 Kevin Buettner <kevinb@redhat.com> - 10.1-1
|
* Wed Nov 04 2020 Kevin Buettner <kevinb@redhat.com> - 10.1-1
|
||||||
- Rebase to FSF GDB 10.1.
|
- Rebase to FSF GDB 10.1.
|
||||||
- Bump 'snapgnulib' date.
|
- Bump 'snapgnulib' date.
|
||||||
|
@ -34,8 +34,6 @@ test "$1" = "-h" && usage
|
|||||||
|
|
||||||
uncommit=0
|
uncommit=0
|
||||||
if [ "$1" = "-u" ]; then
|
if [ "$1" = "-u" ]; then
|
||||||
command -v stg > /dev/null 2>&1 \
|
|
||||||
|| die "Cannot find stg. Is stgit installed?"
|
|
||||||
uncommit=1
|
uncommit=1
|
||||||
shift
|
shift
|
||||||
fi
|
fi
|
||||||
@ -48,6 +46,7 @@ fi
|
|||||||
|
|
||||||
test -f _git_upstream_commit || die "Cannot find _git_upstream_commit file."
|
test -f _git_upstream_commit || die "Cannot find _git_upstream_commit file."
|
||||||
test -f _patch_order || die "Cannot find _patch_order file."
|
test -f _patch_order || die "Cannot find _patch_order file."
|
||||||
|
command -v stg > /dev/null 2>&1 || die "Cannot find stg. Is stgit installed?"
|
||||||
|
|
||||||
last_ancestor_commit=`cat _git_upstream_commit`
|
last_ancestor_commit=`cat _git_upstream_commit`
|
||||||
|
|
||||||
|
@ -1,6 +0,0 @@
|
|||||||
summary: CI Gating Plan
|
|
||||||
discover:
|
|
||||||
how: fmf
|
|
||||||
directory: tests
|
|
||||||
execute:
|
|
||||||
how: beakerlib
|
|
4
sources
4
sources
@ -1,3 +1,3 @@
|
|||||||
SHA512 (gdb-libstdc++-v3-python-8.1.1-20180626.tar.xz) = a8b1c54dd348cfeb37da73f968742896be3dd13a4215f8d8519870c2abea915f5176c3fa6989ddd10f20020a16f0fab20cbae68ee8d58a82234d8778023520f8
|
SHA512 (gdb-libstdc++-v3-python-8.1.1-20180626.tar.xz) = a8b1c54dd348cfeb37da73f968742896be3dd13a4215f8d8519870c2abea915f5176c3fa6989ddd10f20020a16f0fab20cbae68ee8d58a82234d8778023520f8
|
||||||
SHA512 (v2.0.5.tar.gz) = 2e7ac2aede84671b15597d9c56dbe077a81357bbf44b6684802592246fb7729b4a5743238ddf02f6ea143b4d29872f581408135f9c1ea1ccc99dab905916d98d
|
SHA512 (v2.0.2.tar.gz) = bc256a57a8481e0be8220624da3ccf1fe4bf0ea83e9808fdf0aad6db865aee402a36e78285efb0316c016f57e0d6fc56b647ee8e9a2ad4b05bfc1ad68ddde535
|
||||||
SHA512 (gdb-12.1.tar.xz) = 425568d2e84672177d0fb87b1ad7daafdde097648d605e30cf0656970f66adc6a82ca2d83375ea4be583e9683a340e5bfdf5819668ddf66728200141ae50ff2d
|
SHA512 (gdb-10.1.tar.xz) = 0dc54380435c6853db60f1e388b94836d294dfa9ad7f518385a27db4edd03cb970f8717d5f1e9c9a0d4a33d7fcf91bc2e5d6c9cf9e4b561dcc74e65b806c1537
|
||||||
|
31
tests/README
Normal file
31
tests/README
Normal file
@ -0,0 +1,31 @@
|
|||||||
|
Justification
|
||||||
|
|
||||||
|
Adds tests according to the CI wiki specifically the standard test
|
||||||
|
interface in the spec.
|
||||||
|
|
||||||
|
The playbook includes Tier1 level test cases that have been tested in
|
||||||
|
the following contexts and is passing reliably: Classic and
|
||||||
|
Container. Test logs are stored in the artifacts directory.
|
||||||
|
|
||||||
|
The following steps are used to execute the tests using the standard
|
||||||
|
test interface: Test environment
|
||||||
|
|
||||||
|
Make sure you have installed packages from the spec
|
||||||
|
|
||||||
|
# rpm -q ansible python2-dnf libselinux-python standard-test-roles
|
||||||
|
ansible-2.3.2.0-1.fc26.noarch
|
||||||
|
python2-dnf-2.6.3-11.fc26.noarch
|
||||||
|
libselinux-python-2.6-7.fc26.x86_64
|
||||||
|
standard-test-roles-2.4-1.fc26.noarch
|
||||||
|
|
||||||
|
Run tests for Classic (must be run as root)
|
||||||
|
|
||||||
|
# export ANSIBLE_INVENTORY=$(test -e inventory && echo inventory || echo /usr/share/ansible/inventory)
|
||||||
|
# ansible-playbook --tags=classic tests.yml
|
||||||
|
|
||||||
|
Run tests for Container (must be run as root)
|
||||||
|
|
||||||
|
# export ANSIBLE_INVENTORY=$(test -e inventory && echo inventory || echo /usr/share/ansible/inventory)
|
||||||
|
# export TEST_SUBJECTS=docker:docker.io/library/fedora:26
|
||||||
|
# ansible-playbook --tags=container tests.yml
|
||||||
|
|
@ -1,4 +1,4 @@
|
|||||||
start
|
sta
|
||||||
si 30
|
si 30
|
||||||
n 10
|
n 10
|
||||||
up
|
up
|
||||||
|
@ -1,17 +0,0 @@
|
|||||||
summary: Debug a system binary.
|
|
||||||
description: ''
|
|
||||||
contact:
|
|
||||||
- Marek Polacek <mpolacek@redhat.com>
|
|
||||||
component:
|
|
||||||
- gdb
|
|
||||||
test: ./runtest.sh
|
|
||||||
framework: beakerlib
|
|
||||||
recommend:
|
|
||||||
- gdb
|
|
||||||
- coreutils
|
|
||||||
- coreutils-debuginfo
|
|
||||||
- glibc
|
|
||||||
- glibc-debuginfo
|
|
||||||
duration: 5m
|
|
||||||
extra-summary: /tools/gdb/Sanity/debug-system-binary
|
|
||||||
extra-task: /tools/gdb/Sanity/debug-system-binary
|
|
@ -27,7 +27,8 @@
|
|||||||
# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
||||||
|
|
||||||
# Include Beaker environment
|
# Include Beaker environment
|
||||||
. /usr/share/beakerlib/beakerlib.sh || exit 1
|
. /usr/bin/rhts-environment.sh || exit 1
|
||||||
|
. /usr/lib/beakerlib/beakerlib.sh || exit 1
|
||||||
|
|
||||||
CMD="gdb"
|
CMD="gdb"
|
||||||
BIN="$(which $CMD)"
|
BIN="$(which $CMD)"
|
||||||
|
@ -14,4 +14,5 @@ frame 1
|
|||||||
b xexit
|
b xexit
|
||||||
c
|
c
|
||||||
c
|
c
|
||||||
|
c
|
||||||
q
|
q
|
||||||
|
@ -1,22 +0,0 @@
|
|||||||
summary: We debug a binary that is delivered via the Toolset.
|
|
||||||
description: ''
|
|
||||||
contact:
|
|
||||||
- Marek Polacek <mpolacek@redhat.com>
|
|
||||||
component:
|
|
||||||
- gdb
|
|
||||||
test: ./runtest.sh
|
|
||||||
framework: beakerlib
|
|
||||||
recommend:
|
|
||||||
- gdb
|
|
||||||
- coreutils
|
|
||||||
- binutils
|
|
||||||
- binutils-debuginfo
|
|
||||||
- glibc
|
|
||||||
- glibc-debuginfo
|
|
||||||
- gcc
|
|
||||||
- gcc-debuginfo
|
|
||||||
- zlib
|
|
||||||
- zlib-debuginfo
|
|
||||||
duration: 5m
|
|
||||||
extra-summary: /tools/gdb/Sanity/debug-toolset-binary
|
|
||||||
extra-task: /tools/gdb/Sanity/debug-toolset-binary
|
|
@ -32,7 +32,8 @@
|
|||||||
# but in fact, it doesn't have to. It should not fail either way.
|
# but in fact, it doesn't have to. It should not fail either way.
|
||||||
|
|
||||||
# Include Beaker environment
|
# Include Beaker environment
|
||||||
. /usr/share/beakerlib/beakerlib.sh || exit 1
|
. /usr/bin/rhts-environment.sh || exit 1
|
||||||
|
. /usr/lib/beakerlib/beakerlib.sh || exit 1
|
||||||
|
|
||||||
CMD="gdb"
|
CMD="gdb"
|
||||||
BIN="$(which $CMD)"
|
BIN="$(which $CMD)"
|
||||||
|
@ -1,68 +0,0 @@
|
|||||||
# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
|
||||||
#
|
|
||||||
# Makefile of /tools/gdb/Sanity/gdb-testsuite-sanity
|
|
||||||
# Description: gdb testing by upstream testsuite
|
|
||||||
# Author: Michal Kolar <mkolar@redhat.com>
|
|
||||||
#
|
|
||||||
# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
|
||||||
#
|
|
||||||
# Copyright (c) 2021 Red Hat, 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 2 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/.
|
|
||||||
#
|
|
||||||
# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
|
||||||
|
|
||||||
export TEST=/tools/gdb/Sanity/gdb-testsuite-sanity
|
|
||||||
export TESTVERSION=1.0
|
|
||||||
|
|
||||||
BUILT_FILES=
|
|
||||||
|
|
||||||
FILES=$(METADATA) runtest.sh Makefile PURPOSE ref
|
|
||||||
|
|
||||||
.PHONY: all install download clean
|
|
||||||
|
|
||||||
run: $(FILES) build
|
|
||||||
./runtest.sh
|
|
||||||
|
|
||||||
build: $(BUILT_FILES)
|
|
||||||
test -x runtest.sh || chmod a+x runtest.sh
|
|
||||||
|
|
||||||
.SILENT: ref_file
|
|
||||||
ref_file: ./ref/gen.sh
|
|
||||||
test -x ./ref/gen.sh || chmod a+x ./ref/gen.sh
|
|
||||||
./ref/gen.sh
|
|
||||||
|
|
||||||
clean:
|
|
||||||
rm -f *~ $(BUILT_FILES)
|
|
||||||
|
|
||||||
|
|
||||||
include /usr/share/rhts/lib/rhts-make.include
|
|
||||||
|
|
||||||
$(METADATA): Makefile
|
|
||||||
@echo "Owner: Michal Kolar <mkolar@redhat.com>" > $(METADATA)
|
|
||||||
@echo "Name: $(TEST)" >> $(METADATA)
|
|
||||||
@echo "TestVersion: $(TESTVERSION)" >> $(METADATA)
|
|
||||||
@echo "Path: $(TEST_DIR)" >> $(METADATA)
|
|
||||||
@echo "Description: gdb testing by upstream testsuite" >> $(METADATA)
|
|
||||||
@echo "Type: Sanity" >> $(METADATA)
|
|
||||||
@echo "TestTime: 1h" >> $(METADATA)
|
|
||||||
@echo "RunFor: gdb" >> $(METADATA)
|
|
||||||
@echo "Requires: gdb rpm-build yum-utils dejagnu make gcc gcc-gfortran glibc" >> $(METADATA)
|
|
||||||
@echo "Priority: Normal" >> $(METADATA)
|
|
||||||
@echo "License: GPLv2+" >> $(METADATA)
|
|
||||||
@echo "Confidential: no" >> $(METADATA)
|
|
||||||
@echo "Destructive: no" >> $(METADATA)
|
|
||||||
@echo "Releases: -RHEL4 -RHELClient5 -RHELServer5 -RHEL6 -RHEL7" >> $(METADATA)
|
|
||||||
|
|
||||||
rhts-lint $(METADATA)
|
|
@ -1,30 +0,0 @@
|
|||||||
PURPOSE of /tools/gdb/Sanity/gdb-testsuite-sanity
|
|
||||||
Description: gdb testing by upstream testsuite
|
|
||||||
Author: Michal Kolar <mkolar@redhat.com>
|
|
||||||
|
|
||||||
By default, testsuite is executed with default options for the package that
|
|
||||||
corresponds to the gdb command by newly created ordinary user. Before
|
|
||||||
executing, the testsuite is reduced by the appropriate reference file that
|
|
||||||
defines the allowed test range.
|
|
||||||
|
|
||||||
Executing can be modified by these variables:
|
|
||||||
* BUILD_USER -- user which will be used for building and testing gdb
|
|
||||||
* PACKAGE -- explicitly defines which rpm package should be tested
|
|
||||||
* RUNTESTFLAGS -- variable which will be forwarded to 'make check' command
|
|
||||||
and can be used to reduce the range of testing
|
|
||||||
* TESTS_COUNT_MIN -- minimum number of cases that should be tested (does not
|
|
||||||
affect the triggering of testcases, it only sets the
|
|
||||||
value of the reference comparator)
|
|
||||||
|
|
||||||
Example:
|
|
||||||
$ BUILD_USER=root \
|
|
||||||
PACKAGE=gdb \
|
|
||||||
RUNTESTFLAGS='GDB=/usr/bin/gdb gdb.base/break*.exp' \
|
|
||||||
TESTS_COUNT_MIN=32 make run
|
|
||||||
|
|
||||||
Reference files instructions:
|
|
||||||
* path of reference file for current package, distribution and architecture
|
|
||||||
can be generated by:
|
|
||||||
$ make ref_file
|
|
||||||
or directly by:
|
|
||||||
$ ./ref/gen.sh
|
|
@ -1,46 +0,0 @@
|
|||||||
summary: gdb testing by upstream testsuite
|
|
||||||
description: |
|
|
||||||
By default, testsuite is executed with default options for the package that
|
|
||||||
corresponds to the gdb command by newly created ordinary user. Before
|
|
||||||
executing, the testsuite is reduced by the appropriate reference file that
|
|
||||||
defines the allowed test range.
|
|
||||||
|
|
||||||
Executing can be modified by these variables:
|
|
||||||
* BUILD_USER -- user which will be used for building and testing gdb
|
|
||||||
* PACKAGE -- explicitly defines which rpm package should be tested
|
|
||||||
* RUNTESTFLAGS -- variable which will be forwarded to 'make check' command
|
|
||||||
and can be used to reduce the range of testing
|
|
||||||
* TESTS_COUNT_MIN -- minimum number of cases that should be tested (does not
|
|
||||||
affect the triggering of testcases, it only sets the
|
|
||||||
value of the reference comparator)
|
|
||||||
|
|
||||||
Example:
|
|
||||||
$ BUILD_USER=root \
|
|
||||||
PACKAGE=gdb \
|
|
||||||
RUNTESTFLAGS='GDB=/usr/bin/gdb gdb.base/break*.exp' \
|
|
||||||
TESTS_COUNT_MIN=32 make run
|
|
||||||
|
|
||||||
Reference files instructions:
|
|
||||||
* path of reference file for current package, distribution and architecture
|
|
||||||
can be generated by:
|
|
||||||
$ make ref_file
|
|
||||||
or directly by:
|
|
||||||
$ ./ref/gen.sh
|
|
||||||
contact: Michal Kolar <mkolar@redhat.com>
|
|
||||||
component:
|
|
||||||
- gdb
|
|
||||||
test: ./runtest.sh
|
|
||||||
framework: beakerlib
|
|
||||||
recommend:
|
|
||||||
- gdb
|
|
||||||
- rpm-build
|
|
||||||
- yum-utils
|
|
||||||
- dejagnu
|
|
||||||
- make
|
|
||||||
- gcc
|
|
||||||
- gcc-gfortran
|
|
||||||
- glibc
|
|
||||||
- glibc-debuginfo
|
|
||||||
duration: 1h
|
|
||||||
extra-summary: /tools/gdb/Sanity/gdb-testsuite-sanity
|
|
||||||
extra-task: /tools/gdb/Sanity/gdb-testsuite-sanity
|
|
@ -1,431 +0,0 @@
|
|||||||
gdb.base/advance-until-multiple-locations.exp
|
|
||||||
gdb.base/alias.exp
|
|
||||||
gdb.base/align-c.exp
|
|
||||||
gdb.base/annota-input-while-running.exp
|
|
||||||
gdb.base/anon.exp
|
|
||||||
gdb.base/args.exp
|
|
||||||
gdb.base/arrayidx.exp
|
|
||||||
gdb.base/attach-non-pgrp-leader.exp
|
|
||||||
gdb.base/attach-pie-noexec.exp
|
|
||||||
gdb.base/attach-twice.exp
|
|
||||||
gdb.base/attach-wait-input.exp
|
|
||||||
gdb.base/auto-load.exp
|
|
||||||
gdb.base/bang.exp
|
|
||||||
gdb.base/batch-exit-status.exp
|
|
||||||
gdb.base/bfp-test.exp
|
|
||||||
gdb.base/bg-execution-repeat.exp
|
|
||||||
gdb.base/bitfields2.exp
|
|
||||||
gdb.base/bitfields.exp
|
|
||||||
gdb.base/bitops.exp
|
|
||||||
gdb.base/bp-cmds-execution-x-script.exp
|
|
||||||
gdb.base/branch-to-self.exp
|
|
||||||
gdb.base/break-always.exp
|
|
||||||
gdb.base/break-caller-line.exp
|
|
||||||
gdb.base/break-include.exp
|
|
||||||
gdb.base/break-inline.exp
|
|
||||||
gdb.base/break-main-file-remove-fail.exp
|
|
||||||
gdb.base/break-on-linker-gcd-function.exp
|
|
||||||
gdb.base/breakpoint-shadow.exp
|
|
||||||
gdb.base/break-probes.exp
|
|
||||||
gdb.base/cached-source-file.exp
|
|
||||||
gdb.base/callexit.exp
|
|
||||||
gdb.base/call-strs.exp
|
|
||||||
gdb.base/catch-follow-exec.exp
|
|
||||||
gdb.base/catch-gdb-caused-signals.exp
|
|
||||||
gdb.base/catch-signal-fork.exp
|
|
||||||
gdb.base/catch-signal-siginfo-cond.exp
|
|
||||||
gdb.base/check-psymtab.exp
|
|
||||||
gdb.base/c-linkage-name.exp
|
|
||||||
gdb.base/code_elim.exp
|
|
||||||
gdb.base/command-line-input.exp
|
|
||||||
gdb.base/compare-sections.exp
|
|
||||||
gdb.base/complex.exp
|
|
||||||
gdb.base/comprdebug.exp
|
|
||||||
gdb.base/consecutive-step-over.exp
|
|
||||||
gdb.base/continue-all-already-running.exp
|
|
||||||
gdb.base/coredump-filter.exp
|
|
||||||
gdb.base/corefile2.exp
|
|
||||||
gdb.base/corefile-buildid.exp
|
|
||||||
gdb.base/cursal.exp
|
|
||||||
gdb.base/datalib.exp
|
|
||||||
gdb.base/dcache-line-read-error.exp
|
|
||||||
gdb.base/default-args.exp
|
|
||||||
gdb.base/define.exp
|
|
||||||
gdb.base/disabled-location.exp
|
|
||||||
gdb.base/disasm-end-cu.exp
|
|
||||||
gdb.base/disasm-optim.exp
|
|
||||||
gdb.base/double-prompt-target-event-error.exp
|
|
||||||
gdb.base/dprintf-detach.exp
|
|
||||||
gdb.base/dprintf-next.exp
|
|
||||||
gdb.base/dprintf-non-stop.exp
|
|
||||||
gdb.base/dprintf-pending.exp
|
|
||||||
gdb.base/dso2dso.exp
|
|
||||||
gdb.base/dump.exp
|
|
||||||
gdb.base/dup-sect.exp
|
|
||||||
gdb.base/echo.exp
|
|
||||||
gdb.base/empty_exe.exp
|
|
||||||
gdb.base/endian.exp
|
|
||||||
gdb.base/endianity.exp
|
|
||||||
gdb.base/enumval.exp
|
|
||||||
gdb.base/environ.exp
|
|
||||||
gdb.base/eu-strip-infcall.exp
|
|
||||||
gdb.base/eval.exp
|
|
||||||
gdb.base/examine-backward.exp
|
|
||||||
gdb.base/exec-invalid-sysroot.exp
|
|
||||||
gdb.base/execution-termios.exp
|
|
||||||
gdb.base/exe-lock.exp
|
|
||||||
gdb.base/exitsignal.exp
|
|
||||||
gdb.base/expand-psymtabs.exp
|
|
||||||
gdb.base/filesym.exp
|
|
||||||
gdb.base/find-unmapped.exp
|
|
||||||
gdb.base/fixsection.exp
|
|
||||||
gdb.base/flexible-array-member.exp
|
|
||||||
gdb.base/float.exp
|
|
||||||
gdb.base/floatn.exp
|
|
||||||
gdb.base/focus-cmd-prev.exp
|
|
||||||
gdb.base/foll-exec.exp
|
|
||||||
gdb.base/foll-exec-mode.exp
|
|
||||||
gdb.base/fortran-sym-case.exp
|
|
||||||
gdb.base/frame-selection.exp
|
|
||||||
gdb.base/freebpcmd.exp
|
|
||||||
gdb.base/fullname.exp
|
|
||||||
gdb.base/fullpath-expand.exp
|
|
||||||
gdb.base/func-ptr.exp
|
|
||||||
gdb.base/gcore-buffer-overflow.exp
|
|
||||||
gdb.base/gcore-relro.exp
|
|
||||||
gdb.base/gdb1056.exp
|
|
||||||
gdb.base/gdb1090.exp
|
|
||||||
gdb.base/gdb11530.exp
|
|
||||||
gdb.base/gdb11531.exp
|
|
||||||
gdb.base/gdb1250.exp
|
|
||||||
gdb.base/gdb1555.exp
|
|
||||||
gdb.base/gdb1821.exp
|
|
||||||
gdb.base/gdbhistsize-history.exp
|
|
||||||
gdb.base/gdb-sigterm-2.exp
|
|
||||||
gdb.base/hashline2.exp
|
|
||||||
gdb.base/hashline3.exp
|
|
||||||
gdb.base/hbreak.exp
|
|
||||||
gdb.base/hbreak-unmapped.exp
|
|
||||||
gdb.base/help.exp
|
|
||||||
gdb.base/history-duplicates.exp
|
|
||||||
gdb.base/hook-stop.exp
|
|
||||||
gdb.base/huge.exp
|
|
||||||
gdb.base/hw-sw-break-same-address.exp
|
|
||||||
gdb.base/ifelse.exp
|
|
||||||
gdb.base/index-cache.exp
|
|
||||||
gdb.base/infcall-input.exp
|
|
||||||
gdb.base/infcall-nested-structs-c++.exp
|
|
||||||
gdb.base/infcall-nested-structs-c.exp
|
|
||||||
gdb.base/infnan.exp
|
|
||||||
gdb.base/infoline.exp
|
|
||||||
gdb.base/info-locals-unused-static-var.exp
|
|
||||||
gdb.base/info_minsym.exp
|
|
||||||
gdb.base/info-proc.exp
|
|
||||||
gdb.base/info-program.exp
|
|
||||||
gdb.base/info_qt.exp
|
|
||||||
gdb.base/info-shared.exp
|
|
||||||
gdb.base/info_sources.exp
|
|
||||||
gdb.base/info-target.exp
|
|
||||||
gdb.base/info-types-c++.exp
|
|
||||||
gdb.base/info-types-c.exp
|
|
||||||
gdb.base/info-var.exp
|
|
||||||
gdb.base/interact.exp
|
|
||||||
gdb.base/interrupt-daemon-attach.exp
|
|
||||||
gdb.base/interrupt-daemon.exp
|
|
||||||
gdb.base/interrupt-noterm.exp
|
|
||||||
gdb.base/jit-attach-pie.exp
|
|
||||||
gdb.base/jit-reader-exec.exp
|
|
||||||
gdb.base/jit-reader-simple.exp
|
|
||||||
gdb.base/jump.exp
|
|
||||||
gdb.base/kill-detach-inferiors-cmd.exp
|
|
||||||
gdb.base/killed-outside.exp
|
|
||||||
gdb.base/label.exp
|
|
||||||
gdb.base/label-without-address.exp
|
|
||||||
gdb.base/largecore-last-address-lock.exp
|
|
||||||
gdb.base/lineinc.exp
|
|
||||||
gdb.base/lineno-makeup.exp
|
|
||||||
gdb.base/linespecs.exp
|
|
||||||
gdb.base/line-symtabs.exp
|
|
||||||
gdb.base/list-ambiguous.exp
|
|
||||||
gdb.base/list-missing-source.exp
|
|
||||||
gdb.base/logical.exp
|
|
||||||
gdb.base/longest-types.exp
|
|
||||||
gdb.base/longjmp.exp
|
|
||||||
gdb.base/long_long.exp
|
|
||||||
gdb.base/maint-expand-symbols-header-file.exp
|
|
||||||
gdb.base/maint-target-async-off.exp
|
|
||||||
gdb.base/many-completions.exp
|
|
||||||
gdb.base/many-headers.exp
|
|
||||||
gdb.base/max-depth-c++.exp
|
|
||||||
gdb.base/max-depth-c.exp
|
|
||||||
gdb.base/max-value-size.exp
|
|
||||||
gdb.base/memattr.exp
|
|
||||||
gdb.base/mips_pro.exp
|
|
||||||
gdb.base/move-dir.exp
|
|
||||||
gdb.base/msym-lang.exp
|
|
||||||
gdb.base/nested-addr.exp
|
|
||||||
gdb.base/nextoverexit.exp
|
|
||||||
gdb.base/nodebug.exp
|
|
||||||
gdb.base/noreturn-finish.exp
|
|
||||||
gdb.base/noreturn-return.exp
|
|
||||||
gdb.base/offsets.exp
|
|
||||||
gdb.base/osabi.exp
|
|
||||||
gdb.base/overlays.exp
|
|
||||||
gdb.base/page.exp
|
|
||||||
gdb.base/paginate-after-ctrl-c-running.exp
|
|
||||||
gdb.base/paginate-bg-execution.exp
|
|
||||||
gdb.base/paginate-execution-startup.exp
|
|
||||||
gdb.base/paginate-inferior-exit.exp
|
|
||||||
gdb.base/pc-fp.exp
|
|
||||||
gdb.base/permissions.exp
|
|
||||||
gdb.base/pr10179.exp
|
|
||||||
gdb.base/pretty-print.exp
|
|
||||||
gdb.base/prologue.exp
|
|
||||||
gdb.base/prologue-include.exp
|
|
||||||
gdb.base/psym-external-decl.exp
|
|
||||||
gdb.base/psymtab.exp
|
|
||||||
gdb.base/ptr-typedef.exp
|
|
||||||
gdb.base/quit.exp
|
|
||||||
gdb.base/quit-live.exp
|
|
||||||
gdb.base/randomize.exp
|
|
||||||
gdb.base/random-signal.exp
|
|
||||||
gdb.base/readline-overflow.exp
|
|
||||||
gdb.base/reggroups.exp
|
|
||||||
gdb.base/remote-exec-file.exp
|
|
||||||
gdb.base/remote.exp
|
|
||||||
gdb.base/remotetimeout.exp
|
|
||||||
gdb.base/reread-readsym.exp
|
|
||||||
gdb.base/return.exp
|
|
||||||
gdb.base/return-nodebug.exp
|
|
||||||
gdb.base/run-after-attach.exp
|
|
||||||
gdb.base/save-bp.exp
|
|
||||||
gdb.base/sect-cmd.exp
|
|
||||||
gdb.base/sep.exp
|
|
||||||
gdb.base/sepsymtab.exp
|
|
||||||
gdb.base/server-del-break.exp
|
|
||||||
gdb.base/set-inferior-tty.exp
|
|
||||||
gdb.base/set-lang-auto.exp
|
|
||||||
gdb.base/set-noassign.exp
|
|
||||||
gdb.base/set-solib-absolute-prefix.exp
|
|
||||||
gdb.base/shell.exp
|
|
||||||
gdb.base/shreloc.exp
|
|
||||||
gdb.base/sigall.exp
|
|
||||||
gdb.base/sigchld.exp
|
|
||||||
gdb.base/signest.exp
|
|
||||||
gdb.base/sigrepeat.exp
|
|
||||||
gdb.base/skip-inline.exp
|
|
||||||
gdb.base/solib-disc.exp
|
|
||||||
gdb.base/solib-nodir.exp
|
|
||||||
gdb.base/solib-probes-nosharedlibrary.exp
|
|
||||||
gdb.base/solib-vanish.exp
|
|
||||||
gdb.base/source-execution.exp
|
|
||||||
gdb.base/source.exp
|
|
||||||
gdb.base/sss-bp-on-user-bp.exp
|
|
||||||
gdb.base/stale-infcall.exp
|
|
||||||
gdb.base/start.exp
|
|
||||||
gdb.base/startup-with-shell.exp
|
|
||||||
gdb.base/statistics.exp
|
|
||||||
gdb.base/step-resume-infcall.exp
|
|
||||||
gdb.base/step-sw-breakpoint-adjust-pc.exp
|
|
||||||
gdb.base/step-symless.exp
|
|
||||||
gdb.base/step-test.exp
|
|
||||||
gdb.base/structs2.exp
|
|
||||||
gdb.base/structs3.exp
|
|
||||||
gdb.base/style.exp
|
|
||||||
gdb.base/style-logging.exp
|
|
||||||
gdb.base/symbol-alias.exp
|
|
||||||
gdb.base/sym-file.exp
|
|
||||||
gdb.base/symfile-warn.exp
|
|
||||||
gdb.base/symlink-sourcefile.exp
|
|
||||||
gdb.base/symtab-search-order.exp
|
|
||||||
gdb.base/tab-crash.exp
|
|
||||||
gdb.base/term.exp
|
|
||||||
gdb.base/testenv.exp
|
|
||||||
gdb.base/trace-commands.exp
|
|
||||||
gdb.base/tracefork-zombie.exp
|
|
||||||
gdb.base/twice.exp
|
|
||||||
gdb.base/type-opaque.exp
|
|
||||||
gdb.base/until.exp
|
|
||||||
gdb.base/value-double-free.exp
|
|
||||||
gdb.base/vdso-warning.exp
|
|
||||||
gdb.base/vla-ptr.exp
|
|
||||||
gdb.base/warning.exp
|
|
||||||
gdb.base/watch-cond-infcall.exp
|
|
||||||
gdb.base/watch-non-mem.exp
|
|
||||||
gdb.base/watchpoint-cond-gone.exp
|
|
||||||
gdb.base/watchpoint-delete.exp
|
|
||||||
gdb.base/watchpoint-during-step.exp
|
|
||||||
gdb.base/watch-vfork.exp
|
|
||||||
gdb.base/wchar.exp
|
|
||||||
gdb.base/with.exp
|
|
||||||
gdb.base/with-mf.exp
|
|
||||||
gdb.cp/abstract-origin.exp
|
|
||||||
gdb.cp/ambiguous.exp
|
|
||||||
gdb.cp/anon-ns.exp
|
|
||||||
gdb.cp/anon-struct.exp
|
|
||||||
gdb.cp/anon-union.exp
|
|
||||||
gdb.cp/arg-reference.exp
|
|
||||||
gdb.cp/b146835.exp
|
|
||||||
gdb.cp/baseenum.exp
|
|
||||||
gdb.cp/bool.exp
|
|
||||||
gdb.cp/breakpoint-locs.exp
|
|
||||||
gdb.cp/bs15503.exp
|
|
||||||
gdb.cp/call-c.exp
|
|
||||||
gdb.cp/chained-calls.exp
|
|
||||||
gdb.cp/class2.exp
|
|
||||||
gdb.cp/cmpd-minsyms.exp
|
|
||||||
gdb.cp/converts.exp
|
|
||||||
gdb.cp/cpcompletion.exp
|
|
||||||
gdb.cp/cpexprs-debug-types.exp
|
|
||||||
gdb.cp/cplabel.exp
|
|
||||||
gdb.cp/cpsizeof.exp
|
|
||||||
gdb.cp/ctti.exp
|
|
||||||
gdb.cp/debug-expr.exp
|
|
||||||
gdb.cp/demangle.exp
|
|
||||||
gdb.cp/derivation.exp
|
|
||||||
gdb.cp/destrprint.exp
|
|
||||||
gdb.cp/disasm-func-name.exp
|
|
||||||
gdb.cp/dispcxx.exp
|
|
||||||
gdb.cp/ena-dis-br-range.exp
|
|
||||||
gdb.cp/enum-class.exp
|
|
||||||
gdb.cp/exception.exp
|
|
||||||
gdb.cp/exceptprint.exp
|
|
||||||
gdb.cp/expand-psymtabs-cxx.exp
|
|
||||||
gdb.cp/expand-sals.exp
|
|
||||||
gdb.cp/extern-c.exp
|
|
||||||
gdb.cp/formatted-ref.exp
|
|
||||||
gdb.cp/fpointer.exp
|
|
||||||
gdb.cp/gdb1355.exp
|
|
||||||
gdb.cp/hang.exp
|
|
||||||
gdb.cp/impl-this.exp
|
|
||||||
gdb.cp/infcall-dlopen.exp
|
|
||||||
gdb.cp/infcall-nodebug-c++-d0.exp
|
|
||||||
gdb.cp/infcall-nodebug-c-d0.exp
|
|
||||||
gdb.cp/infcall-nodebug-c++-d1.exp
|
|
||||||
gdb.cp/infcall-nodebug-c-d1.exp
|
|
||||||
gdb.cp/iostream.exp
|
|
||||||
gdb.cp/local-static.exp
|
|
||||||
gdb.cp/mb-inline.exp
|
|
||||||
gdb.cp/mb-templates.exp
|
|
||||||
gdb.cp/m-data.exp
|
|
||||||
gdb.cp/member-name.exp
|
|
||||||
gdb.cp/member-ptr.exp
|
|
||||||
gdb.cp/method2.exp
|
|
||||||
gdb.cp/method.exp
|
|
||||||
gdb.cp/meth-typedefs.exp
|
|
||||||
gdb.cp/namelessclass.exp
|
|
||||||
gdb.cp/namespace-enum.exp
|
|
||||||
gdb.cp/namespace.exp
|
|
||||||
gdb.cp/namespace-nested-import.exp
|
|
||||||
gdb.cp/nested-types.exp
|
|
||||||
gdb.cp/nextoverthrow.exp
|
|
||||||
gdb.cp/non-trivial-retval.exp
|
|
||||||
gdb.cp/noparam.exp
|
|
||||||
gdb.cp/nsalias.exp
|
|
||||||
gdb.cp/nsdecl.exp
|
|
||||||
gdb.cp/nsimport.exp
|
|
||||||
gdb.cp/nsnoimports.exp
|
|
||||||
gdb.cp/nsrecurs.exp
|
|
||||||
gdb.cp/nsstress.exp
|
|
||||||
gdb.cp/operator.exp
|
|
||||||
gdb.cp/overload-const.exp
|
|
||||||
gdb.cp/overload.exp
|
|
||||||
gdb.cp/ovsrch.exp
|
|
||||||
gdb.cp/paren-type.exp
|
|
||||||
gdb.cp/parse-lang.exp
|
|
||||||
gdb.cp/pass-by-ref-2.exp
|
|
||||||
gdb.cp/pass-by-ref.exp
|
|
||||||
gdb.cp/pr-1023.exp
|
|
||||||
gdb.cp/pr10687.exp
|
|
||||||
gdb.cp/pr10728.exp
|
|
||||||
gdb.cp/pr11734.exp
|
|
||||||
gdb.cp/pr12028.exp
|
|
||||||
gdb.cp/pr-1210.exp
|
|
||||||
gdb.cp/pr12273.exp
|
|
||||||
gdb.cp/pr17132.exp
|
|
||||||
gdb.cp/pr9067.exp
|
|
||||||
gdb.cp/pr9631.exp
|
|
||||||
gdb.cp/print-demangle.exp
|
|
||||||
gdb.cp/printmethod.exp
|
|
||||||
gdb.cp/psmang.exp
|
|
||||||
gdb.cp/psymtab-parameter.exp
|
|
||||||
gdb.cp/ptype-cv-cp.exp
|
|
||||||
gdb.cp/ptype-flags.exp
|
|
||||||
gdb.cp/punctuator.exp
|
|
||||||
gdb.cp/readnow-language.exp
|
|
||||||
gdb.cp/ref-params.exp
|
|
||||||
gdb.cp/re-set-overloaded.exp
|
|
||||||
gdb.cp/rtti.exp
|
|
||||||
gdb.cp/rvalue-ref-casts.exp
|
|
||||||
gdb.cp/rvalue-ref-params.exp
|
|
||||||
gdb.cp/rvalue-ref-sizeof.exp
|
|
||||||
gdb.cp/rvalue-ref-types.exp
|
|
||||||
gdb.cp/save-bp-qualified.exp
|
|
||||||
gdb.cp/scope-err.exp
|
|
||||||
gdb.cp/shadow.exp
|
|
||||||
gdb.cp/smartp.exp
|
|
||||||
gdb.cp/static-method.exp
|
|
||||||
gdb.cp/static-print-quit.exp
|
|
||||||
gdb.cp/static-typedef-print.exp
|
|
||||||
gdb.cp/stub-array-size.exp
|
|
||||||
gdb.cp/subtypes.exp
|
|
||||||
gdb.cp/try_catch.exp
|
|
||||||
gdb.cp/typedef-base.exp
|
|
||||||
gdb.cp/typedef-operator.exp
|
|
||||||
gdb.cp/typed-enum.exp
|
|
||||||
gdb.cp/userdef.exp
|
|
||||||
gdb.cp/using-crash.exp
|
|
||||||
gdb.cp/virtbase2.exp
|
|
||||||
gdb.cp/virtbase.exp
|
|
||||||
gdb.cp/virtfunc2.exp
|
|
||||||
gdb.cp/wide_char_types.exp
|
|
||||||
gdb.fortran/array-bounds.exp
|
|
||||||
gdb.fortran/array-bounds-high.exp
|
|
||||||
gdb.fortran/array-element.exp
|
|
||||||
gdb.fortran/array-slices-bad.exp
|
|
||||||
gdb.fortran/array-slices-sub-slices.exp
|
|
||||||
gdb.fortran/block-data.exp
|
|
||||||
gdb.fortran/charset.exp
|
|
||||||
gdb.fortran/class-allocatable-array.exp
|
|
||||||
gdb.fortran/common-block.exp
|
|
||||||
gdb.fortran/complex.exp
|
|
||||||
gdb.fortran/derived-type.exp
|
|
||||||
gdb.fortran/derived-type-function.exp
|
|
||||||
gdb.fortran/derived-type-striding.exp
|
|
||||||
gdb.fortran/dot-ops.exp
|
|
||||||
gdb.fortran/exprs.exp
|
|
||||||
gdb.fortran/info-modules.exp
|
|
||||||
gdb.fortran/info-types.exp
|
|
||||||
gdb.fortran/intrinsics.exp
|
|
||||||
gdb.fortran/library-module.exp
|
|
||||||
gdb.fortran/logical.exp
|
|
||||||
gdb.fortran/max-depth.exp
|
|
||||||
gdb.fortran/mixed-lang-stack.exp
|
|
||||||
gdb.fortran/module.exp
|
|
||||||
gdb.fortran/multi-dim.exp
|
|
||||||
gdb.fortran/nested-funcs-2.exp
|
|
||||||
gdb.fortran/nested-funcs.exp
|
|
||||||
gdb.fortran/pointer-to-pointer.exp
|
|
||||||
gdb.fortran/print-formatted.exp
|
|
||||||
gdb.fortran/printing-types.exp
|
|
||||||
gdb.fortran/print_type.exp
|
|
||||||
gdb.fortran/ptr-indentation.exp
|
|
||||||
gdb.fortran/ptype-on-functions.exp
|
|
||||||
gdb.fortran/short-circuit-argument-list.exp
|
|
||||||
gdb.fortran/subarray.exp
|
|
||||||
gdb.fortran/type-kinds.exp
|
|
||||||
gdb.fortran/types.exp
|
|
||||||
gdb.fortran/vla-alloc-assoc.exp
|
|
||||||
gdb.fortran/vla-datatypes.exp
|
|
||||||
gdb.fortran/vla-history.exp
|
|
||||||
gdb.fortran/vla-ptr-info.exp
|
|
||||||
gdb.fortran/vla-ptype.exp
|
|
||||||
gdb.fortran/vla-ptype-sub.exp
|
|
||||||
gdb.fortran/vla-sizeof.exp
|
|
||||||
gdb.fortran/vla-type.exp
|
|
||||||
gdb.fortran/vla-value.exp
|
|
||||||
gdb.fortran/vla-value-sub-arbitrary.exp
|
|
||||||
gdb.fortran/vla-value-sub.exp
|
|
||||||
gdb.fortran/vla-value-sub-finish.exp
|
|
||||||
gdb.fortran/whatis_type.exp
|
|
||||||
gdb.fortran/xlf-variable.exp
|
|
@ -1,11 +0,0 @@
|
|||||||
#!/bin/bash
|
|
||||||
|
|
||||||
BIN=`which gdb` &&
|
|
||||||
PACKAGE=`rpm -qf --qf='%{name}\n' ${BIN}` &&
|
|
||||||
SYSTEM=`uname -r | grep -o -E 'el[0-9]+a?|fc[0-9]+'` &&
|
|
||||||
ARCH=`arch` &&
|
|
||||||
echo "./ref/${PACKAGE}/${SYSTEM}.${ARCH}" &&
|
|
||||||
exit 0
|
|
||||||
|
|
||||||
echo "ERROR" >&2
|
|
||||||
exit 1
|
|
@ -1,136 +0,0 @@
|
|||||||
#!/bin/bash
|
|
||||||
# vim: dict+=/usr/share/beakerlib/dictionary.vim cpt=.,w,b,u,t,i,k
|
|
||||||
# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
|
||||||
#
|
|
||||||
# runtest.sh of /tools/gdb/Sanity/gdb-testsuite-sanity
|
|
||||||
# Description: gdb testing by upstream testsuite
|
|
||||||
# Author: Michal Kolar <mkolar@redhat.com>
|
|
||||||
#
|
|
||||||
# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
|
||||||
#
|
|
||||||
# Copyright (c) 2021 Red Hat, 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 2 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/.
|
|
||||||
#
|
|
||||||
# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
|
||||||
|
|
||||||
# Include Beaker environment
|
|
||||||
. /usr/share/beakerlib/beakerlib.sh || exit 1
|
|
||||||
|
|
||||||
BUILD_USER=${BUILD_USER:-gdbbld}
|
|
||||||
export PACKAGE="${PACKAGE:-$(rpm -qf --qf='%{name}\n' `which gdb`)}"
|
|
||||||
RUNTESTFLAGS=${RUNTESTFLAGS:-GDB=`rpm -ql $PACKAGE | grep -E 'bin/gdb$'`}
|
|
||||||
TESTS_COUNT_MIN=${TESTS_COUNT_MIN:-4000}
|
|
||||||
REQUIRES="$PACKAGE rpm-build dejagnu make gcc glibc"
|
|
||||||
if rlIsFedora; then
|
|
||||||
REQUIRES="$REQUIRES dnf-utils"
|
|
||||||
else
|
|
||||||
REQUIRES="$REQUIRES yum-utils"
|
|
||||||
fi
|
|
||||||
|
|
||||||
rlJournalStart
|
|
||||||
rlPhaseStartSetup
|
|
||||||
rlShowRunningKernel
|
|
||||||
rlAssertRpm --all
|
|
||||||
rlRun "TmpDir=\$(mktemp -d)"
|
|
||||||
rlRun "cp -r ./ref $TmpDir"
|
|
||||||
rlRun "pushd $TmpDir"
|
|
||||||
rlFetchSrcForInstalled $PACKAGE
|
|
||||||
rlRun "useradd -M -N $BUILD_USER" 0,9
|
|
||||||
[ $? -eq 0 ] && rlRun "del=yes"
|
|
||||||
rlRun "chown -R $BUILD_USER:users $TmpDir"
|
|
||||||
rlRun "cp /proc/sys/kernel/core_pattern $TmpDir/core_pattern.bckp"
|
|
||||||
rlRun "echo 'core.%p' >/proc/sys/kernel/core_pattern"
|
|
||||||
rlRun "ulimit -c unlimited"
|
|
||||||
rlPhaseEnd
|
|
||||||
|
|
||||||
rlPhaseStartSetup "build gdb"
|
|
||||||
rlRun "su -c 'rpm -D \"_topdir $TmpDir\" -U *.src.rpm &>rpm.log' $BUILD_USER"
|
|
||||||
rlRun "rlFileSubmit $TmpDir/rpm.log rpm.log"
|
|
||||||
rlRun "su -c 'rpmbuild -D \"_topdir $TmpDir\" -bs --with testsuite $TmpDir/SPECS/*.spec &>rpmbuild-bs.log' $BUILD_USER"
|
|
||||||
rlRun "rlFileSubmit $TmpDir/rpmbuild-bs.log rpmbuild-bs.log"
|
|
||||||
rlRun "yum-builddep -y -D \"_topdir $TmpDir\" $TmpDir/SRPMS/*.src.rpm &>$TmpDir/yum-builddep.log" 0,1; ret=$?
|
|
||||||
rlRun "rlFileSubmit $TmpDir/yum-builddep.log yum-builddep.log"
|
|
||||||
if [ $ret -ne 0 ]; then
|
|
||||||
rlLogWarning "Dependencies was not successfully installed"
|
|
||||||
rlLogInfo "Trying to install dependencies of bare SPEC file ..."
|
|
||||||
rlRun "yum-builddep -y -D \"_topdir $TmpDir\" $TmpDir/SPECS/*.spec &>$TmpDir/yum-builddep-spec.log"
|
|
||||||
rlRun "rlFileSubmit $TmpDir/yum-builddep-spec.log yum-builddep-spec.log"
|
|
||||||
fi
|
|
||||||
rlRun "su -c 'rpmbuild -D \"_topdir $TmpDir\" -bp $TmpDir/SPECS/*.spec &>$TmpDir/rpmbuild-bp.log' $BUILD_USER"
|
|
||||||
rlRun "rlFileSubmit $TmpDir/rpmbuild-bp.log rpmbuild-bp.log"
|
|
||||||
if test -e $TmpDir/BUILD/gdb-*/gnulib/configure; then
|
|
||||||
rlRun "cd $TmpDir/BUILD/gdb-*/gnulib"
|
|
||||||
rlRun "su -c 'bash ./configure &>$TmpDir/configure-gnulib.log' $BUILD_USER"
|
|
||||||
rlRun "rlFileSubmit $TmpDir/configure-gnulib.log configure-gnulib.log"
|
|
||||||
fi
|
|
||||||
rlRun "configure_flags=\$(rpmspec -D \"_topdir $TmpDir\" -P $TmpDir/SPECS/*.spec | grep -o -E '\-\-(prefix|with\-gdb\-datadir|with\-separate\-debug\-dir|with\-python)=\S+' | tr '\n' ' ')"
|
|
||||||
rlRun "cd $TmpDir/BUILD/gdb-*/gdb"
|
|
||||||
rlRun "su -c './configure $configure_flags &>$TmpDir/configure.log' $BUILD_USER"
|
|
||||||
rlRun "rlFileSubmit $TmpDir/configure.log configure.log"
|
|
||||||
rlRun "DATADIR=`gdb -ex 'show data-directory' -batch | grep -o -E '/[^\"]+'`"
|
|
||||||
rlRun "mv data-directory data-directory.orig"
|
|
||||||
rlRun "ln -s $DATADIR ./data-directory"
|
|
||||||
rlPhaseEnd
|
|
||||||
|
|
||||||
rlPhaseStartSetup "filter testsuite"
|
|
||||||
rlRun "system=`uname -r | grep -o -E 'el[0-9]+a?|fc[0-9]+'` && [[ ! -z \$system ]]"
|
|
||||||
rlRun "ref_file=$TmpDir/ref/$PACKAGE/$system.`arch`"
|
|
||||||
if ! test -e $ref_file; then
|
|
||||||
rlLogWarning "Reference file $ref_file not found"
|
|
||||||
rlLogInfo "Using default reference file ..."
|
|
||||||
rlRun "ref_file=$TmpDir/ref/default"
|
|
||||||
fi
|
|
||||||
rlRun "test -e $ref_file"
|
|
||||||
rlRun "cd testsuite"
|
|
||||||
rlRun "find . -regex '^./gdb\..+\.exp$' -type f -printf '%P\n' | sort >$TmpDir/test_list"
|
|
||||||
rlRun "comm -23 $TmpDir/test_list $ref_file >$TmpDir/disable_list" # disable tests that are not included in the reference file
|
|
||||||
rlLogInfo "Testcase disabling ..."
|
|
||||||
while read file; do
|
|
||||||
mv "$file" "$file.disabled"
|
|
||||||
done <$TmpDir/disable_list
|
|
||||||
rlRun "cd $TmpDir/BUILD/gdb-*/gdb"
|
|
||||||
rlPhaseEnd
|
|
||||||
|
|
||||||
rlPhaseStartTest "run testsuite"
|
|
||||||
rlRun "su -c 'make check RUNTESTFLAGS=\"${RUNTESTFLAGS}\" |& tee $TmpDir/testsuite.log | grep -E \"^Running.+\.exp ...$\"; test \${PIPESTATUS[0]} -eq 0' $BUILD_USER"
|
|
||||||
rlRun "rlFileSubmit $TmpDir/testsuite.log testsuite.log"
|
|
||||||
rlRun "rlFileSubmit testsuite/gdb.sum gdb.sum"
|
|
||||||
rlRun "rlFileSubmit testsuite/gdb.log gdb.log"
|
|
||||||
rlLogInfo "`awk '/=== gdb Summary ===/,0' testsuite/gdb.sum`"
|
|
||||||
rlPhaseEnd
|
|
||||||
|
|
||||||
rlPhaseStartTest "evaluate results"
|
|
||||||
rlRun "tests_count=\$(grep -E '^PASS:' testsuite/gdb.sum | wc -l)"
|
|
||||||
[ "$tests_count" -ge "$TESTS_COUNT_MIN" ] && rlLogInfo "Test counter: $tests_count" || rlFail "Test counter $tests_count should be greater than or equal to $TESTS_COUNT_MIN"
|
|
||||||
rlRun "awk 'BEGIN { RS=\"Running /tmp/[^/]+/BUILD/gdb-[^/]+/gdb/testsuite/\" } /\sERROR:|\sFAIL:|\sKPASS:|\sUNRESOLVED:|\sXPASS:/ { print \$0 }' testsuite/gdb.sum >$TmpDir/error.log" # check for errors, unresolved testcases, unexpected failures and unexpected successes
|
|
||||||
if [ -s $TmpDir/error.log ]; then
|
|
||||||
rlFail "Errors observed";
|
|
||||||
rlRun "rlFileSubmit $TmpDir/error.log error.log"
|
|
||||||
rlRun "awk 'BEGIN { RS=\"Running /tmp/[^/]+/BUILD/gdb-[^/]+/gdb/testsuite/\" } /\sERROR:|\sFAIL:|\sKPASS:|\sUNRESOLVED:|\sXPASS:/ { print \$1 }' testsuite/gdb.sum >$TmpDir/affected_testcases.log"
|
|
||||||
rlLogInfo "`echo 'Affected testcases:';cat $TmpDir/affected_testcases.log`"
|
|
||||||
rlRun "rlFileSubmit $TmpDir/affected_testcases.log affected_testcases.log"
|
|
||||||
else
|
|
||||||
rlPass "No errors observed"
|
|
||||||
fi
|
|
||||||
rlPhaseEnd
|
|
||||||
|
|
||||||
rlPhaseStartCleanup
|
|
||||||
rlRun "cat $TmpDir/core_pattern.bckp >/proc/sys/kernel/core_pattern"
|
|
||||||
rlRun "popd"
|
|
||||||
rlRun "rm -r $TmpDir"
|
|
||||||
[ "$del" = "yes" ] && rlRun "userdel -f $BUILD_USER"
|
|
||||||
rlPhaseEnd
|
|
||||||
rlJournalPrintText
|
|
||||||
rlJournalEnd
|
|
3
tests/inventory
Executable file
3
tests/inventory
Executable file
@ -0,0 +1,3 @@
|
|||||||
|
#!/bin/bash
|
||||||
|
export TEST_DOCKER_EXTRA_ARGS="--privileged"
|
||||||
|
exec merge-standard-inventory "$@"
|
24
tests/tests.yml
Normal file
24
tests/tests.yml
Normal file
@ -0,0 +1,24 @@
|
|||||||
|
---
|
||||||
|
# This first play always runs on the local staging system
|
||||||
|
- hosts: localhost
|
||||||
|
roles:
|
||||||
|
- role: standard-test-beakerlib
|
||||||
|
tags:
|
||||||
|
- classic
|
||||||
|
- container
|
||||||
|
tests:
|
||||||
|
- debug-toolset-binary
|
||||||
|
- debug-system-binary
|
||||||
|
required_packages:
|
||||||
|
- gdb
|
||||||
|
- coreutils
|
||||||
|
- binutils
|
||||||
|
- binutils-debuginfo
|
||||||
|
- glibc
|
||||||
|
- glibc-debuginfo
|
||||||
|
- gcc
|
||||||
|
- gcc-debuginfo
|
||||||
|
- zlib
|
||||||
|
- zlib-debuginfo
|
||||||
|
- coreutils-debuginfo
|
||||||
|
- which
|
Loading…
Reference in New Issue
Block a user