Compare commits
No commits in common. "c8" and "c9s" have entirely different histories.
@ -1,3 +1,3 @@
|
|||||||
ee66294d87a109f88a459d0da5d0bb2da5135f45 SOURCES/gdb-8.2.tar.xz
|
1ad1d2c6f0141b37bbe32b8add91b5691ecc6412 gdb-libstdc++-v3-python-8.1.1-20180626.tar.xz
|
||||||
1ad1d2c6f0141b37bbe32b8add91b5691ecc6412 SOURCES/gdb-libstdc++-v3-python-8.1.1-20180626.tar.xz
|
4f38f7c24d523b6923f22404b7dee4152a00d0d4 gdb-14.2.tar.xz
|
||||||
a08830edc095f4ea8ae516a154942105379c5f67 SOURCES/v2.0.tar.gz
|
fc22d7dfb0c4c686d7dfde9da2aa5b41c475899e v2.0.5.tar.gz
|
||||||
|
9
.gitignore
vendored
9
.gitignore
vendored
@ -1,3 +1,6 @@
|
|||||||
SOURCES/gdb-8.2.tar.xz
|
/binutils-gdb
|
||||||
SOURCES/gdb-libstdc++-v3-python-8.1.1-20180626.tar.xz
|
/gdb-libstdc++-v3-python-8.1.1-20180626.tar.xz
|
||||||
SOURCES/v2.0.tar.gz
|
/gdb-10.2.tar.xz
|
||||||
|
/v2.0.4.tar.gz
|
||||||
|
/gdb-14.2.tar.xz
|
||||||
|
/v2.0.5.tar.gz
|
||||||
|
104
README.local-patches.md
Normal file
104
README.local-patches.md
Normal file
@ -0,0 +1,104 @@
|
|||||||
|
# Fedora GDB local patches policy
|
||||||
|
|
||||||
|
In order to make things easier for the Fedora GDB maintainer, we
|
||||||
|
choose to auto-generate the local patches by making use of an upstream
|
||||||
|
git repository. Below you can find a few instructions on how to work
|
||||||
|
using this method.
|
||||||
|
|
||||||
|
You need to run the following commands from the directory that
|
||||||
|
contains the "gdb.spec" file.
|
||||||
|
|
||||||
|
## Importing the GDB patches into a git repository
|
||||||
|
|
||||||
|
1) The local patches (`*.patch`) need to be imported into an upstream
|
||||||
|
git repository. For example, let's assume you cloned the repository
|
||||||
|
by doing:
|
||||||
|
|
||||||
|
`$ git clone git://sourceware.org/git/binutils-gdb.git`
|
||||||
|
|
||||||
|
> TIP: if you already have the repository cloned somewhere in your
|
||||||
|
> system, you can pass a "--reference <dir>" to the "git clone"
|
||||||
|
> command and it will use your local repository as much as possible
|
||||||
|
> to make the clone, speeding up things.
|
||||||
|
|
||||||
|
2) After cloning the upstream repository, you can import your patches
|
||||||
|
by using the script "generate-git-repo-from-patches.sh":
|
||||||
|
|
||||||
|
`$ sh generate-git-repo-from-patches.sh <REPOSITORY_DIR>`
|
||||||
|
|
||||||
|
The script will basically cd into the repository, checkout the
|
||||||
|
revision specified in the file `_git_upstream_commit`, iterate through
|
||||||
|
the file `_patch_order` and "git-am" every patch *in that order*.
|
||||||
|
This operation should complete without errors; if you find a problem
|
||||||
|
with `git-am`, it probably means that the revision specified in the
|
||||||
|
file `_git_upstream_commit` is wrong.
|
||||||
|
|
||||||
|
## Rebasing the patches against a newer version/release
|
||||||
|
|
||||||
|
1) First, cd into the upstream repository. All you have to do is
|
||||||
|
choose the revision against which you plan to rebase the patches, and
|
||||||
|
`git rebase <REVISION>`. git will do the rest, and you will be able
|
||||||
|
to perform conflict resolution by git's algorithm, which is smarter.
|
||||||
|
|
||||||
|
## Creating new patches
|
||||||
|
|
||||||
|
1) Create the new patch on top of the the others, as usual. Note that
|
||||||
|
you can use `git rebase` whenever you want to reorder patch order, or
|
||||||
|
even to delete a patch.
|
||||||
|
|
||||||
|
2) When writing the commit log, you must obey a few rules. The
|
||||||
|
subject line *must* be the filename of the patch. This line will be
|
||||||
|
used when exporting the patches from the git repository, and
|
||||||
|
(obviously) it gives the filename that should be used for this
|
||||||
|
specific patch.
|
||||||
|
|
||||||
|
3) You can also add comments that will go into the auto-generated
|
||||||
|
`Patch:` file (see below). To do that, use the special marker `;;` at
|
||||||
|
the beginning of the line. This way, a commit log that says:
|
||||||
|
|
||||||
|
~~~~~~~~~~~
|
||||||
|
test-patch.patch
|
||||||
|
|
||||||
|
;; This is a test patch
|
||||||
|
;; Second line
|
||||||
|
~~~~~~~~~~~
|
||||||
|
|
||||||
|
Will generate the following entry in the auto-generated `Patch:` file:
|
||||||
|
|
||||||
|
~~~~~~~~~~~
|
||||||
|
# This is a test patch
|
||||||
|
# Second line
|
||||||
|
PatchXYZ: test-patch.patch
|
||||||
|
~~~~~~~~~~~
|
||||||
|
|
||||||
|
## Exporting the GDB patches from the git repository
|
||||||
|
|
||||||
|
1) When you're done working with the patches, go back to the directory
|
||||||
|
that contains the `gdb.spec` file, and from there you run:
|
||||||
|
|
||||||
|
`$ sh generate-patches-from-git-repo.sh <REPOSITORY_DIR>`
|
||||||
|
|
||||||
|
This will regenerate all of the `*.patch` files (excluding the ones that
|
||||||
|
were also excluded from the git repository), and also regenerate a few
|
||||||
|
control files. These control files are:
|
||||||
|
|
||||||
|
- `_gdb.spec.Patch.include`: This file contains the `Patch:` directives.
|
||||||
|
|
||||||
|
- `_gdb.spec.patch.include`: This file contains the `%patch` directives.
|
||||||
|
|
||||||
|
- `_patch_order`: This file contains the patches, in the exact order
|
||||||
|
that they must be applied. It is used when importing the patches
|
||||||
|
into the git repository.
|
||||||
|
|
||||||
|
- `_git_upstream_commit`: This file contains the last upstream commit
|
||||||
|
against which the patches were rebased. It is used when importing
|
||||||
|
the patches into the git repository.
|
||||||
|
|
||||||
|
NOTE: If you did a rebase against a newer upstream version, you need
|
||||||
|
to specify the commit/tag/branch against which you rebased:
|
||||||
|
|
||||||
|
`$ sh generate-patches-from-git-repo.sh <REPOSITORY_DIR> <COMMIT_OR_TAG_OR_BRANCH>`
|
||||||
|
|
||||||
|
For example, if you rebased against `gdb-8.1-release`:
|
||||||
|
|
||||||
|
`$ sh generate-patches-from-git-repo.sh <REPOSITORY_DIR> gdb-8.1-release`
|
@ -1,830 +0,0 @@
|
|||||||
# Match the Fedora's version info.
|
|
||||||
#=fedora
|
|
||||||
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
|
|
||||||
|
|
||||||
# Better parse 64-bit PPC system call prologues.
|
|
||||||
#=push: Write new testcase.
|
|
||||||
Patch005: gdb-6.3-ppc64syscall-20040622.patch
|
|
||||||
|
|
||||||
# Include the pc's section when doing a symbol lookup so that the
|
|
||||||
# correct symbol is found.
|
|
||||||
#=push: Write new testcase.
|
|
||||||
Patch006: gdb-6.3-ppc64displaysymbol-20041124.patch
|
|
||||||
|
|
||||||
# Add a wrapper script to GDB that implements pstack using the
|
|
||||||
# --readnever option.
|
|
||||||
#=push
|
|
||||||
Patch007: gdb-6.3-gstack-20050411.patch
|
|
||||||
|
|
||||||
# VSYSCALL and PIE
|
|
||||||
#=fedoratest
|
|
||||||
Patch008: gdb-6.3-test-pie-20050107.patch
|
|
||||||
|
|
||||||
# Get selftest working with sep-debug-info
|
|
||||||
#=fedoratest
|
|
||||||
Patch009: gdb-6.3-test-self-20050110.patch
|
|
||||||
|
|
||||||
# Test support of multiple destructors just like multiple constructors
|
|
||||||
#=fedoratest
|
|
||||||
Patch010: gdb-6.3-test-dtorfix-20050121.patch
|
|
||||||
|
|
||||||
# Fix to support executable moving
|
|
||||||
#=fedoratest
|
|
||||||
Patch011: gdb-6.3-test-movedir-20050125.patch
|
|
||||||
|
|
||||||
# Test sibling threads to set threaded watchpoints for x86 and x86-64
|
|
||||||
#=fedoratest
|
|
||||||
Patch012: gdb-6.3-threaded-watchpoints2-20050225.patch
|
|
||||||
|
|
||||||
# Notify observers that the inferior has been created
|
|
||||||
#=fedoratest
|
|
||||||
Patch013: gdb-6.3-inferior-notification-20050721.patch
|
|
||||||
|
|
||||||
# Verify printing of inherited members test
|
|
||||||
#=fedoratest
|
|
||||||
Patch014: gdb-6.3-inheritancetest-20050726.patch
|
|
||||||
|
|
||||||
# Add readnever option
|
|
||||||
#=push
|
|
||||||
Patch015: gdb-6.3-readnever-20050907.patch
|
|
||||||
|
|
||||||
# Fix debuginfo addresses resolving for --emit-relocs Linux kernels (BZ 203661).
|
|
||||||
#=push+jan: There was some mail thread about it, this patch may be a hack.
|
|
||||||
Patch016: gdb-6.5-bz203661-emit-relocs.patch
|
|
||||||
|
|
||||||
# Support TLS symbols (+`errno' suggestion if no pthread is found) (BZ 185337).
|
|
||||||
#=push+jan: It should be replaced by Infinity project.
|
|
||||||
Patch017: gdb-6.5-bz185337-resolve-tls-without-debuginfo-v2.patch
|
|
||||||
|
|
||||||
# Fix TLS symbols resolving for shared libraries with a relative pathname.
|
|
||||||
# The testsuite needs `gdb-6.5-tls-of-separate-debuginfo.patch'.
|
|
||||||
#=fedoratest: One should recheck if it is really fixed upstream.
|
|
||||||
Patch018: gdb-6.5-sharedlibrary-path.patch
|
|
||||||
|
|
||||||
# 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.
|
|
||||||
Patch019: gdb-6.5-BEA-testsuite.patch
|
|
||||||
|
|
||||||
# Testcase for deadlocking on last address space byte; for corrupted backtraces.
|
|
||||||
#=fedoratest
|
|
||||||
Patch020: gdb-6.5-last-address-space-byte-test.patch
|
|
||||||
|
|
||||||
# Fix readline segfault on excessively long hand-typed lines.
|
|
||||||
#=fedoratest
|
|
||||||
Patch021: gdb-6.5-readline-long-line-crash-test.patch
|
|
||||||
|
|
||||||
# Fix bogus 0x0 unwind of the thread's topmost function clone(3) (BZ 216711).
|
|
||||||
#=fedora
|
|
||||||
Patch022: gdb-6.5-bz216711-clone-is-outermost.patch
|
|
||||||
|
|
||||||
# Test sideeffects of skipping ppc .so libs trampolines (BZ 218379).
|
|
||||||
#=fedoratest
|
|
||||||
Patch023: gdb-6.5-bz218379-ppc-solib-trampoline-test.patch
|
|
||||||
|
|
||||||
# Fix lockup on trampoline vs. its function lookup; unreproducible (BZ 218379).
|
|
||||||
#=fedora
|
|
||||||
Patch024: gdb-6.5-bz218379-solib-trampoline-lookup-lock-fix.patch
|
|
||||||
|
|
||||||
# Find symbols properly at their original (included) file (BZ 109921).
|
|
||||||
#=fedoratest
|
|
||||||
Patch025: gdb-6.5-bz109921-DW_AT_decl_file-test.patch
|
|
||||||
|
|
||||||
# Update PPC unwinding patches to their upstream variants (BZ 140532).
|
|
||||||
#=fedoratest
|
|
||||||
Patch026: gdb-6.3-bz140532-ppc-unwinding-test.patch
|
|
||||||
|
|
||||||
# Testcase for exec() from threaded program (BZ 202689).
|
|
||||||
#=fedoratest
|
|
||||||
Patch027: gdb-6.3-bz202689-exec-from-pthread-test.patch
|
|
||||||
|
|
||||||
# Testcase for PPC Power6/DFP instructions disassembly (BZ 230000).
|
|
||||||
#=fedoratest
|
|
||||||
Patch028: gdb-6.6-bz230000-power6-disassembly-test.patch
|
|
||||||
|
|
||||||
# Allow running `/usr/bin/gcore' with provided but inaccessible tty (BZ 229517).
|
|
||||||
#=fedoratest
|
|
||||||
Patch029: gdb-6.6-bz229517-gcore-without-terminal.patch
|
|
||||||
|
|
||||||
# Avoid too long timeouts on failing cases of "annota1.exp annota3.exp".
|
|
||||||
#=fedoratest
|
|
||||||
Patch030: gdb-6.6-testsuite-timeouts.patch
|
|
||||||
|
|
||||||
# Support for stepping over PPC atomic instruction sequences (BZ 237572).
|
|
||||||
#=fedoratest
|
|
||||||
Patch031: gdb-6.6-bz237572-ppc-atomic-sequence-test.patch
|
|
||||||
|
|
||||||
# Make upstream `set scheduler-locking step' as default.
|
|
||||||
#=push+jan: How much is scheduler-locking relevant after non-stop?
|
|
||||||
Patch032: gdb-6.6-scheduler_locking-step-is-default.patch
|
|
||||||
|
|
||||||
# Test kernel VDSO decoding while attaching to an i386 process.
|
|
||||||
#=fedoratest
|
|
||||||
Patch033: gdb-6.3-attach-see-vdso-test.patch
|
|
||||||
|
|
||||||
# Test leftover zombie process (BZ 243845).
|
|
||||||
#=fedoratest
|
|
||||||
Patch034: gdb-6.5-bz243845-stale-testing-zombie-test.patch
|
|
||||||
|
|
||||||
# New locating of the matching binaries from the pure core file (build-id).
|
|
||||||
#=push+jan
|
|
||||||
Patch035: gdb-6.6-buildid-locate.patch
|
|
||||||
|
|
||||||
# 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
|
|
||||||
# (Jan Kratochvil, RH BZ 1339862).
|
|
||||||
#=push+jan
|
|
||||||
Patch036: gdb-6.6-buildid-locate-solib-missing-ids.patch
|
|
||||||
|
|
||||||
#=push+jan
|
|
||||||
Patch037: gdb-6.6-buildid-locate-rpm.patch
|
|
||||||
|
|
||||||
# Fix displaying of numeric char arrays as strings (BZ 224128).
|
|
||||||
#=fedoratest: But it is failing anyway, one should check the behavior more.
|
|
||||||
Patch038: gdb-6.7-charsign-test.patch
|
|
||||||
|
|
||||||
# Test PPC hiding of call-volatile parameter register.
|
|
||||||
#=fedoratest
|
|
||||||
Patch039: gdb-6.7-ppc-clobbered-registers-O2-test.patch
|
|
||||||
|
|
||||||
# Testsuite fixes for more stable/comparable results.
|
|
||||||
#=fedoratest
|
|
||||||
Patch040: gdb-6.7-testsuite-stable-results.patch
|
|
||||||
|
|
||||||
# Test ia64 memory leaks of the code using libunwind.
|
|
||||||
#=fedoratest
|
|
||||||
Patch041: gdb-6.5-ia64-libunwind-leak-test.patch
|
|
||||||
|
|
||||||
# Test hiding unexpected breakpoints on intentional step commands.
|
|
||||||
#=fedoratest
|
|
||||||
Patch042: gdb-6.5-missed-trap-on-step-test.patch
|
|
||||||
|
|
||||||
# Test gcore memory and time requirements for large inferiors.
|
|
||||||
#=fedoratest
|
|
||||||
Patch043: gdb-6.5-gcore-buffer-limit-test.patch
|
|
||||||
|
|
||||||
# Test GCORE for shmid 0 shared memory mappings.
|
|
||||||
#=fedoratest: But it is broken anyway, sometimes the case being tested is not reproducible.
|
|
||||||
Patch044: gdb-6.3-mapping-zero-inode-test.patch
|
|
||||||
|
|
||||||
# Test a crash on `focus cmd', `focus prev' commands.
|
|
||||||
#=fedoratest
|
|
||||||
Patch045: gdb-6.3-focus-cmd-prev-test.patch
|
|
||||||
|
|
||||||
# Test various forms of threads tracking across exec() (BZ 442765).
|
|
||||||
#=fedoratest
|
|
||||||
Patch046: gdb-6.8-bz442765-threaded-exec-test.patch
|
|
||||||
|
|
||||||
# Silence memcpy check which returns false positive (sparc64)
|
|
||||||
#=push: But it is just a GCC workaround, look up the existing GCC PR for it.
|
|
||||||
Patch047: gdb-6.8-sparc64-silence-memcpy-check.patch
|
|
||||||
|
|
||||||
# Test a crash on libraries missing the .text section.
|
|
||||||
#=fedoratest
|
|
||||||
Patch048: gdb-6.5-section-num-fixup-test.patch
|
|
||||||
|
|
||||||
# Fix register assignments with no GDB stack frames (BZ 436037).
|
|
||||||
#=push+jan: This fix is incorrect.
|
|
||||||
Patch049: gdb-6.8-bz436037-reg-no-longer-active.patch
|
|
||||||
|
|
||||||
# Test the watchpoints conditionals works.
|
|
||||||
#=fedoratest
|
|
||||||
Patch050: gdb-6.8-watchpoint-conditionals-test.patch
|
|
||||||
|
|
||||||
# Fix resolving of variables at locations lists in prelinked libs (BZ 466901).
|
|
||||||
#=fedoratest
|
|
||||||
Patch051: gdb-6.8-bz466901-backtrace-full-prelinked.patch
|
|
||||||
|
|
||||||
# New test for step-resume breakpoint placed in multiple threads at once.
|
|
||||||
#=fedoratest
|
|
||||||
Patch052: gdb-simultaneous-step-resume-breakpoint-test.patch
|
|
||||||
|
|
||||||
# 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.
|
|
||||||
#=fedoratest: It should be in glibc: libc-alpha: <20091004161706.GA27450@.*>
|
|
||||||
Patch053: gdb-core-open-vdso-warning.patch
|
|
||||||
|
|
||||||
# Fix syscall restarts for amd64->i386 biarch.
|
|
||||||
#=push+jan
|
|
||||||
Patch054: gdb-x86_64-i386-syscall-restart.patch
|
|
||||||
|
|
||||||
# Fix stepping with OMP parallel Fortran sections (BZ 533176).
|
|
||||||
#=push+jan: It requires some better DWARF annotations.
|
|
||||||
Patch055: gdb-bz533176-fortran-omp-step.patch
|
|
||||||
|
|
||||||
# Fix regression by python on ia64 due to stale current frame.
|
|
||||||
#=push+jan
|
|
||||||
Patch056: gdb-follow-child-stale-parent.patch
|
|
||||||
|
|
||||||
# Workaround ccache making lineno non-zero for command-line definitions.
|
|
||||||
#=fedoratest: ccache is rarely used and it is even fixed now.
|
|
||||||
Patch057: gdb-ccache-workaround.patch
|
|
||||||
|
|
||||||
#=push+jan: May get obsoleted by Tom's unrelocated objfiles patch.
|
|
||||||
Patch058: gdb-archer-pie-addons.patch
|
|
||||||
|
|
||||||
#=push+jan: Breakpoints disabling matching should not be based on address.
|
|
||||||
Patch059: gdb-archer-pie-addons-keep-disabled.patch
|
|
||||||
|
|
||||||
# Testcase for "Do not make up line information" fix by Daniel Jacobowitz.
|
|
||||||
#=fedoratest
|
|
||||||
Patch060: gdb-lineno-makeup-test.patch
|
|
||||||
|
|
||||||
# Test power7 ppc disassembly.
|
|
||||||
#=fedoratest
|
|
||||||
Patch061: gdb-ppc-power7-test.patch
|
|
||||||
|
|
||||||
# Fix i386+x86_64 rwatch+awatch before run, regression against 6.8 (BZ 541866).
|
|
||||||
# Fix i386 rwatch+awatch before run (BZ 688788, on top of BZ 541866).
|
|
||||||
#=push+jan: It should be fixed properly instead.
|
|
||||||
Patch062: gdb-bz541866-rwatch-before-run.patch
|
|
||||||
|
|
||||||
# Workaround non-stop moribund locations exploited by kernel utrace (BZ 590623).
|
|
||||||
#=push+jan: Currently it is still not fully safe.
|
|
||||||
Patch063: gdb-moribund-utrace-workaround.patch
|
|
||||||
|
|
||||||
# Fix follow-exec for C++ programs (bugreported by Martin Stransky).
|
|
||||||
#=fedoratest
|
|
||||||
Patch064: gdb-archer-next-over-throw-cxx-exec.patch
|
|
||||||
|
|
||||||
# Backport DWARF-4 support (BZ 601887, Tom Tromey).
|
|
||||||
#=fedoratest
|
|
||||||
Patch065: gdb-bz601887-dwarf4-rh-test.patch
|
|
||||||
|
|
||||||
#=push+jan
|
|
||||||
Patch066: gdb-6.6-buildid-locate-core-as-arg.patch
|
|
||||||
|
|
||||||
# Workaround librpm BZ 643031 due to its unexpected exit() calls (BZ 642879).
|
|
||||||
#=push+jan
|
|
||||||
Patch067: gdb-6.6-buildid-locate-rpm-librpm-workaround.patch
|
|
||||||
|
|
||||||
# [delayed-symfile] Test a backtrace regression on CFIs without DIE (BZ 614604).
|
|
||||||
#=fedoratest
|
|
||||||
Patch068: gdb-test-bt-cfi-without-die.patch
|
|
||||||
|
|
||||||
# Out of memory is just an error, not fatal (uninitialized VLS vars, BZ 568248).
|
|
||||||
#=push+jan: Inferior objects should be read in parts, then this patch gets obsoleted.
|
|
||||||
Patch069: gdb-bz568248-oom-is-error.patch
|
|
||||||
|
|
||||||
# Verify GDB Python built-in function gdb.solib_address exists (BZ # 634108).
|
|
||||||
#=fedoratest
|
|
||||||
Patch070: gdb-bz634108-solib_address.patch
|
|
||||||
|
|
||||||
# New test gdb.arch/x86_64-pid0-core.exp for kernel PID 0 cores (BZ 611435).
|
|
||||||
#=fedoratest
|
|
||||||
Patch071: gdb-test-pid0-core.patch
|
|
||||||
|
|
||||||
# [archer-tromey-delayed-symfile] New test gdb.dwarf2/dw2-aranges.exp.
|
|
||||||
#=fedoratest
|
|
||||||
Patch072: gdb-test-dw2-aranges.patch
|
|
||||||
|
|
||||||
# [archer-keiths-expr-cumulative+upstream] Import C++ testcases.
|
|
||||||
#=fedoratest
|
|
||||||
Patch073: gdb-test-expr-cumulative-archer.patch
|
|
||||||
|
|
||||||
# Fix regressions on C++ names resolving (PR 11734, PR 12273, Keith Seitz).
|
|
||||||
#=fedoratest
|
|
||||||
Patch074: gdb-physname-pr11734-test.patch
|
|
||||||
|
|
||||||
# Fix regressions on C++ names resolving (PR 11734, PR 12273, Keith Seitz).
|
|
||||||
#=fedoratest
|
|
||||||
Patch075: gdb-physname-pr12273-test.patch
|
|
||||||
|
|
||||||
# Toolchain on sparc is slightly broken and debuginfo files are generated
|
|
||||||
# with non 64bit aligned tables/offsets.
|
|
||||||
# See for example readelf -S ../Xvnc.debug.
|
|
||||||
#
|
|
||||||
# As a consenquence calculation of sectp->filepos as used in
|
|
||||||
# dwarf2_read_section (gdb/dwarf2read.c:1525) will return a non aligned buffer
|
|
||||||
# that cannot be used directly as done with MMAP.
|
|
||||||
# Usage will result in a BusError.
|
|
||||||
#
|
|
||||||
# While we figure out what's wrong in the toolchain and do a full archive
|
|
||||||
# rebuild to fix it, we need to be able to use gdb :)
|
|
||||||
#=push
|
|
||||||
Patch076: gdb-7.2.50-sparc-add-workaround-to-broken-debug-files.patch
|
|
||||||
|
|
||||||
# Test GDB opcodes/ disassembly of Intel Ivy Bridge instructions (BZ 696890).
|
|
||||||
#=fedoratest
|
|
||||||
Patch077: gdb-test-ivy-bridge.patch
|
|
||||||
|
|
||||||
# Hack for proper PIE run of the testsuite.
|
|
||||||
#=fedoratest
|
|
||||||
Patch078: gdb-runtest-pie-override.patch
|
|
||||||
|
|
||||||
# Print reasons for failed attach/spawn incl. SELinux deny_ptrace (BZ 786878).
|
|
||||||
#=push+jan
|
|
||||||
Patch079: gdb-attach-fail-reasons-5of5.patch
|
|
||||||
|
|
||||||
# Workaround PR libc/14166 for inferior calls of strstr.
|
|
||||||
#=fedora: Compatibility with RHELs (unchecked which ones).
|
|
||||||
Patch080: gdb-glibc-strstr-workaround.patch
|
|
||||||
|
|
||||||
# Include testcase for `Unable to see a variable inside a module (XLF)' (BZ 823789).
|
|
||||||
#=fedoratest
|
|
||||||
Patch081: gdb-rhel5.9-testcase-xlf-var-inside-mod.patch
|
|
||||||
|
|
||||||
# Testcase for `Setting solib-absolute-prefix breaks vDSO' (BZ 818343).
|
|
||||||
#=fedoratest
|
|
||||||
Patch082: gdb-rhbz-818343-set-solib-absolute-prefix-testcase.patch
|
|
||||||
|
|
||||||
# Fix `GDB cannot access struct member whose offset is larger than 256MB'
|
|
||||||
# (RH BZ 795424).
|
|
||||||
#=push
|
|
||||||
Patch083: gdb-rhbz795424-bitpos-20of25.patch
|
|
||||||
|
|
||||||
# Fix `GDB cannot access struct member whose offset is larger than 256MB'
|
|
||||||
# (RH BZ 795424).
|
|
||||||
#=push
|
|
||||||
Patch084: gdb-rhbz795424-bitpos-21of25.patch
|
|
||||||
|
|
||||||
# Fix `GDB cannot access struct member whose offset is larger than 256MB'
|
|
||||||
# (RH BZ 795424).
|
|
||||||
#=push
|
|
||||||
Patch085: gdb-rhbz795424-bitpos-22of25.patch
|
|
||||||
|
|
||||||
# Fix `GDB cannot access struct member whose offset is larger than 256MB'
|
|
||||||
# (RH BZ 795424).
|
|
||||||
#=push
|
|
||||||
Patch086: gdb-rhbz795424-bitpos-23of25.patch
|
|
||||||
|
|
||||||
# Fix `GDB cannot access struct member whose offset is larger than 256MB'
|
|
||||||
# (RH BZ 795424).
|
|
||||||
#=push
|
|
||||||
Patch087: gdb-rhbz795424-bitpos-25of25.patch
|
|
||||||
|
|
||||||
# Fix `GDB cannot access struct member whose offset is larger than 256MB'
|
|
||||||
# (RH BZ 795424).
|
|
||||||
#=push
|
|
||||||
Patch088: gdb-rhbz795424-bitpos-25of25-test.patch
|
|
||||||
|
|
||||||
# Fix `GDB cannot access struct member whose offset is larger than 256MB'
|
|
||||||
# (RH BZ 795424).
|
|
||||||
#=push
|
|
||||||
Patch089: gdb-rhbz795424-bitpos-lazyvalue.patch
|
|
||||||
|
|
||||||
# Import regression test for `gdb/findvar.c:417: internal-error:
|
|
||||||
# read_var_value: Assertion `frame' failed.' (RH BZ 947564) from RHEL 6.5.
|
|
||||||
#=fedoratest
|
|
||||||
Patch090: gdb-rhbz947564-findvar-assertion-frame-failed-testcase.patch
|
|
||||||
|
|
||||||
# Fix crash of -readnow /usr/lib/debug/usr/bin/gnatbind.debug (BZ 1069211).
|
|
||||||
#=push+jan
|
|
||||||
Patch091: gdb-gnat-dwarf-crash-3of3.patch
|
|
||||||
|
|
||||||
# Fix 'memory leak in infpy_read_memory()' (RH BZ 1007614)
|
|
||||||
#=fedoratest
|
|
||||||
Patch092: gdb-rhbz1007614-memleak-infpy_read_memory-test.patch
|
|
||||||
|
|
||||||
# Fix 'gdb gives highly misleading error when debuginfo pkg is present,
|
|
||||||
# but not corresponding binary pkg' (RH BZ 981154).
|
|
||||||
#=push+jan
|
|
||||||
Patch093: gdb-6.6-buildid-locate-misleading-warning-missing-debuginfo-rhbz981154.patch
|
|
||||||
|
|
||||||
#=fedoratest
|
|
||||||
Patch094: gdb-archer-vla-tests.patch
|
|
||||||
|
|
||||||
#=fedoratest
|
|
||||||
Patch095: gdb-vla-intel-tests.patch
|
|
||||||
|
|
||||||
# Continue backtrace even if a frame filter throws an exception (Phil Muldoon).
|
|
||||||
#=push
|
|
||||||
Patch096: gdb-btrobust.patch
|
|
||||||
|
|
||||||
# Display Fortran strings in backtraces.
|
|
||||||
#=fedoratest
|
|
||||||
Patch097: gdb-fortran-frame-string.patch
|
|
||||||
|
|
||||||
# Fix Python GIL with gdb.execute("continue") (Phil Muldoon, BZ 1116957).
|
|
||||||
#=push
|
|
||||||
Patch098: gdb-python-gil.patch
|
|
||||||
|
|
||||||
# Testcase for '[SAP] Recursive dlopen causes SAP HANA installer to
|
|
||||||
# crash.' (RH BZ 1156192).
|
|
||||||
#=fedoratest
|
|
||||||
Patch099: gdb-rhbz1156192-recursive-dlopen-test.patch
|
|
||||||
|
|
||||||
# Fix jit-reader.h for multi-lib.
|
|
||||||
#=push+jan
|
|
||||||
Patch100: gdb-jit-reader-multilib.patch
|
|
||||||
|
|
||||||
# Fix '`catch syscall' doesn't work for parent after `fork' is called'
|
|
||||||
# (Philippe Waroquiers, RH BZ 1149205).
|
|
||||||
#=fedoratest
|
|
||||||
Patch101: gdb-rhbz1149205-catch-syscall-after-fork-test.patch
|
|
||||||
|
|
||||||
# Fix 'backport GDB 7.4 fix to RHEL 6.6 GDB' [Original Sourceware bug
|
|
||||||
# description: 'C++ (and objc): Internal error on unqualified name
|
|
||||||
# re-set', PR 11657] (RH BZ 1186476).
|
|
||||||
#=fedoratest
|
|
||||||
Patch102: gdb-rhbz1186476-internal-error-unqualified-name-re-set-test.patch
|
|
||||||
|
|
||||||
# Test 'info type-printers' Python error (RH BZ 1350436).
|
|
||||||
#=fedoratest
|
|
||||||
Patch103: gdb-rhbz1350436-type-printers-error.patch
|
|
||||||
|
|
||||||
# Fix '[ppc64] and [s390x] wrong prologue skip on -O2 -g code' (Jan
|
|
||||||
# Kratochvil, RH BZ 1084404).
|
|
||||||
#=fedoratest
|
|
||||||
Patch104: 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
|
|
||||||
Patch105: gdb-bz1219747-attach-kills.patch
|
|
||||||
|
|
||||||
# Force libncursesw over libncurses to match the includes (RH BZ 1270534).
|
|
||||||
#=push+jan
|
|
||||||
Patch106: gdb-fedora-libncursesw.patch
|
|
||||||
|
|
||||||
# Test clflushopt instruction decode (for RH BZ 1262471).
|
|
||||||
#=fedoratest
|
|
||||||
Patch107: gdb-opcodes-clflushopt-test.patch
|
|
||||||
|
|
||||||
# [rhel6] DTS backward Python compatibility API (BZ 1020004, Phil Muldoon).
|
|
||||||
#=fedora
|
|
||||||
Patch108: gdb-dts-rhel6-python-compat.patch
|
|
||||||
|
|
||||||
# [SCL] Skip deprecated .gdb_index warning for Red Hat built files (BZ 953585).
|
|
||||||
#=push+jan
|
|
||||||
Patch109: gdb-6.6-buildid-locate-rpm-scl.patch
|
|
||||||
|
|
||||||
# Work around readline-6.2 incompatibility not asking for --more-- (BZ 701131).
|
|
||||||
#=fedora
|
|
||||||
Patch110: gdb-readline62-ask-more-rh.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 .
|
|
||||||
Patch111: gdb-6.8-quit-never-aborts.patch
|
|
||||||
|
|
||||||
# [aarch64] Fix hardware watchpoints (RH BZ 1261564).
|
|
||||||
#=fedoratest
|
|
||||||
Patch112: gdb-rhbz1261564-aarch64-hw-watchpoint-test.patch
|
|
||||||
|
|
||||||
# Add messages suggesting more recent RHEL gdbserver (RH BZ 1321114).
|
|
||||||
#=fedora
|
|
||||||
Patch113: gdb-container-rh-pkg.patch
|
|
||||||
|
|
||||||
# New test for Python "Cannot locate object file for block" (for RH BZ 1325795).
|
|
||||||
#=fedoratest
|
|
||||||
Patch114: gdb-rhbz1325795-framefilters-test.patch
|
|
||||||
|
|
||||||
# [dts+el7] [x86*] Bundle linux_perf.h for libipt (RH BZ 1256513).
|
|
||||||
#=fedora
|
|
||||||
Patch115: gdb-linux_perf-bundle.patch
|
|
||||||
|
|
||||||
# Fix gdb-headless /usr/bin/ executables (BZ 1390251).
|
|
||||||
#=fedora
|
|
||||||
Patch116: gdb-libexec-add-index.patch
|
|
||||||
|
|
||||||
# New testcase for: Fix <tab>-completion crash (Gary Benson, RH BZ 1398387).
|
|
||||||
#=fedoratest
|
|
||||||
Patch117: gdb-rhbz1398387-tab-crash-test.patch
|
|
||||||
|
|
||||||
# [testsuite] Fix false selftest.exp FAIL from system readline-6.3+ (Patrick Palka).
|
|
||||||
#=fedoratest
|
|
||||||
Patch118: gdb-testsuite-readline63-sigint.patch
|
|
||||||
|
|
||||||
# Python patches of: http://sourceware.org/gdb/wiki/ProjectArcher
|
|
||||||
#=push
|
|
||||||
Patch119: gdb-archer.patch
|
|
||||||
|
|
||||||
# Revert upstream commit 469412dd9ccc4de5874fd3299b105833f36b34cd
|
|
||||||
Patch120: gdb-vla-intel-fix-print-char-array.patch
|
|
||||||
|
|
||||||
# [s390x] Backport arch12 instructions decoding (RH BZ 1553104).
|
|
||||||
# =fedoratest
|
|
||||||
Patch121: gdb-rhbz1553104-s390x-arch12-test.patch
|
|
||||||
|
|
||||||
# Implement IPv6 support for GDB/gdbserver (RH BZ 881849, Sergio Durigan Junior).
|
|
||||||
Patch122: gdb-rhbz881849-ipv6-1of3.patch
|
|
||||||
|
|
||||||
|
|
||||||
Patch123: gdb-rhbz881849-ipv6-2of3.patch
|
|
||||||
|
|
||||||
|
|
||||||
Patch124: gdb-rhbz881849-ipv6-3of3.patch
|
|
||||||
|
|
||||||
# Add GDB support to access/display POWER8 registers (IBM, RH BZ 1187581).
|
|
||||||
Patch125: gdb-rhbz1187581-power8-regs-1of7.patch
|
|
||||||
|
|
||||||
# Add GDB support to access/display POWER8 registers (IBM, RH BZ 1187581).
|
|
||||||
Patch126: gdb-rhbz1187581-power8-regs-2of7.patch
|
|
||||||
|
|
||||||
# Add GDB support to access/display POWER8 registers (IBM, RH BZ 1187581).
|
|
||||||
Patch127: gdb-rhbz1187581-power8-regs-3of7.patch
|
|
||||||
|
|
||||||
# Add GDB support to access/display POWER8 registers (IBM, RH BZ 1187581).
|
|
||||||
Patch128: gdb-rhbz1187581-power8-regs-4of7.patch
|
|
||||||
|
|
||||||
# Add GDB support to access/display POWER8 registers (IBM, RH BZ 1187581).
|
|
||||||
Patch129: gdb-rhbz1187581-power8-regs-5of7.patch
|
|
||||||
|
|
||||||
# Add GDB support to access/display POWER8 registers (IBM, RH BZ 1187581).
|
|
||||||
Patch130: gdb-rhbz1187581-power8-regs-6of7.patch
|
|
||||||
|
|
||||||
# Add GDB support to access/display POWER8 registers (IBM, RH BZ 1187581).
|
|
||||||
Patch131: gdb-rhbz1187581-power8-regs-7of7.patch
|
|
||||||
|
|
||||||
# Fix for 'gdb in batch mode always exit with status 0' (Gary Benson)
|
|
||||||
# RHBZ #1491128
|
|
||||||
Patch132: gdb-rhbz1491128-batch-mode-exit-status-1of2.patch
|
|
||||||
|
|
||||||
# Fix for 'gdb in batch mode always exit with status 0' (Gary Benson)
|
|
||||||
# RHBZ #1491128
|
|
||||||
Patch133: gdb-rhbz1491128-batch-mode-exit-status-2of2.patch
|
|
||||||
|
|
||||||
# Use pulongest in aarch64-linux-tdep.c.
|
|
||||||
# This patch was forgotten during the 8.2 release process, and is
|
|
||||||
# needed to unbreak GDB when compiling on 32-bit arches.
|
|
||||||
Patch134: gdb-use-pulongest-aarch64-linux-tdep.patch
|
|
||||||
|
|
||||||
# Fix for 'GDB crashes when running from a deleted directory'
|
|
||||||
# (Tom Tromey, RHBZ#1653410)
|
|
||||||
Patch135: gdb-rhbz1653410-avoid-crash-when-calling-warning-too-early.patch
|
|
||||||
|
|
||||||
# Fix for 'py-bt is broken, results in exception'.
|
|
||||||
# RHBZ 1639242
|
|
||||||
Patch136: gdb-rhbz1639242-fix-dwarf2_find_containing_comp_unit-binary-search.patch
|
|
||||||
|
|
||||||
# Fix 'Assertion `SYMBOL_LANGUAGE (sym) == DICT_LANGUAGE (dict)->la_language' failed.'
|
|
||||||
# Keith Seitz, RHBZ#1560010.
|
|
||||||
Patch137: gdb-rhbz1560010-fix-assertion-symbol-language-dict-language-1of5.patch
|
|
||||||
|
|
||||||
# Fix 'Assertion `SYMBOL_LANGUAGE (sym) == DICT_LANGUAGE (dict)->la_language' failed.'
|
|
||||||
# Keith Seitz, RHBZ#1560010.
|
|
||||||
Patch138: gdb-rhbz1560010-fix-assertion-symbol-language-dict-language-2of5.patch
|
|
||||||
|
|
||||||
# Fix 'Assertion `SYMBOL_LANGUAGE (sym) == DICT_LANGUAGE (dict)->la_language' failed.'
|
|
||||||
# Keith Seitz, RHBZ#1560010.
|
|
||||||
Patch139: gdb-rhbz1560010-fix-assertion-symbol-language-dict-language-3of5.patch
|
|
||||||
|
|
||||||
# Fix 'Assertion `SYMBOL_LANGUAGE (sym) == DICT_LANGUAGE (dict)->la_language' failed.'
|
|
||||||
# Keith Seitz, RHBZ#1560010.
|
|
||||||
Patch140: gdb-rhbz1560010-fix-assertion-symbol-language-dict-language-4of5.patch
|
|
||||||
|
|
||||||
# Fix 'Assertion `SYMBOL_LANGUAGE (sym) == DICT_LANGUAGE (dict)->la_language' failed.'
|
|
||||||
# Keith Seitz, RHBZ#1560010.
|
|
||||||
Patch141: gdb-rhbz1560010-fix-assertion-symbol-language-dict-language-5of5.patch
|
|
||||||
|
|
||||||
# Fix 'gdb suggests using "dnf debuginfo-install'
|
|
||||||
# Keith Seitz, RHBZ 1666249
|
|
||||||
Patch142: gdb-rhbz1666249-suggest-yum-instead-of-dnf.patch
|
|
||||||
|
|
||||||
# Fix 'libiberty: Memory leak in demangle_template function resulting in a denial of service"
|
|
||||||
# Simon Marchi, RH BZ 1668635
|
|
||||||
Patch143: gdb-rhbz1668635-libiberty-demangle_template-memleak.patch
|
|
||||||
|
|
||||||
# Fix 'gdb fails to read zN registers from corefile with aarch64 SVE'
|
|
||||||
# Alan Hayward, RH BZ 1669953
|
|
||||||
Patch144: gdb-rhbz1669953-aarch64-sve-binutils.patch
|
|
||||||
|
|
||||||
# Fix remote.c build failure
|
|
||||||
# Szabolcs Nagy, RH BZ 1187581
|
|
||||||
Patch145: gdb-rhbz1187581-power8-regs-not-in-8.2-01of15.patch
|
|
||||||
|
|
||||||
# Add grok/write functions for new ppc core note sections
|
|
||||||
# Edjunior Barbosa Machado, RH BZ 1187581
|
|
||||||
Patch146: gdb-rhbz1187581-power8-regs-not-in-8.2-02of15.patch
|
|
||||||
|
|
||||||
# Zero-initialize linux note sections
|
|
||||||
# Pedro Franco de Carvalho, RH BZ 1187581
|
|
||||||
Patch147: gdb-rhbz1187581-power8-regs-not-in-8.2-03of15.patch
|
|
||||||
|
|
||||||
# [PowerPC] Don't zero-initialize vector register buffers
|
|
||||||
# Pedro Franco de Carvalho, RH BZ 1187581
|
|
||||||
Patch148: gdb-rhbz1187581-power8-regs-not-in-8.2-04of15.patch
|
|
||||||
|
|
||||||
# Add decfloat registers to float reggroup
|
|
||||||
# Pedro Franco de Carvalho, RH BZ 1187581
|
|
||||||
Patch149: gdb-rhbz1187581-power8-regs-not-in-8.2-05of15.patch
|
|
||||||
|
|
||||||
# [PowerPC] Remove rs6000_pseudo_register_reggroup_p
|
|
||||||
# Pedro Franco de Carvalho, RH BZ 1187581
|
|
||||||
Patch150: gdb-rhbz1187581-power8-regs-not-in-8.2-06of15.patch
|
|
||||||
|
|
||||||
# [PowerPC] Fix two if statements in gdb/ppc-linux-nat.c
|
|
||||||
# Pedro Franco de Carvalho, RH BZ 1187581
|
|
||||||
Patch151: gdb-rhbz1187581-power8-regs-not-in-8.2-07of15.patch
|
|
||||||
|
|
||||||
# [PowerPC] Fix indentation in arch/ppc-linux-common.c
|
|
||||||
# Pedro Franco de Carvalho, RH BZ 1187581
|
|
||||||
Patch152: gdb-rhbz1187581-power8-regs-not-in-8.2-08of15.patch
|
|
||||||
|
|
||||||
# [PowerPC] Refactor have_ initializers in rs6000-tdep.c
|
|
||||||
# Pedro Franco de Carvalho, RH BZ 1187581
|
|
||||||
Patch153: gdb-rhbz1187581-power8-regs-not-in-8.2-09of15.patch
|
|
||||||
|
|
||||||
# [PowerPC] Add support for PPR and DSCR
|
|
||||||
# Edjunior Barbosa Machado and Pedro Franco de Carvalho, RH BZ 1187581
|
|
||||||
Patch154: gdb-rhbz1187581-power8-regs-not-in-8.2-10of15.patch
|
|
||||||
|
|
||||||
# [PowerPC] Add support for TAR
|
|
||||||
# Edjunior Barbosa Machado and Pedro Franco de Carvalho, RH BZ 1187581
|
|
||||||
Patch155: gdb-rhbz1187581-power8-regs-not-in-8.2-11of15.patch
|
|
||||||
|
|
||||||
# [PowerPC] Add support for EBB and PMU registers
|
|
||||||
# Edjunior Barbosa Machado and Pedro Franco de Carvalho, RH BZ 1187581m
|
|
||||||
Patch156: gdb-rhbz1187581-power8-regs-not-in-8.2-12of15.patch
|
|
||||||
|
|
||||||
# [PowerPC] Reject tdescs with VSX and no FPU or Altivec
|
|
||||||
# Pedro Franco de Carvalho, RH BZ 1187581
|
|
||||||
Patch157: gdb-rhbz1187581-power8-regs-not-in-8.2-13of15.patch
|
|
||||||
|
|
||||||
# [PowerPC] Add support for HTM registers
|
|
||||||
# Edjunior Barbosa Machado and Pedro Franco de Carvalho, RH BZ 1187581
|
|
||||||
Patch158: gdb-rhbz1187581-power8-regs-not-in-8.2-14of15.patch
|
|
||||||
|
|
||||||
# [PowerPC] Document requirements for VSX feature
|
|
||||||
# Pedro Franco de Carvalho, RH BZ 1187581
|
|
||||||
Patch159: gdb-rhbz1187581-power8-regs-not-in-8.2-15of15.patch
|
|
||||||
|
|
||||||
# "Fix" segfault that happens on parse_macro_definition because
|
|
||||||
# debugedit corrupts the .debug_macro section.
|
|
||||||
# Sergio Durigan Junior, RH BZ 1708192.
|
|
||||||
Patch160: gdb-rhbz1708192-parse_macro_definition-crash.patch
|
|
||||||
|
|
||||||
# Prevent buffer overflow with sections with invalid sizes.
|
|
||||||
# Keith Seitz, RH BZ 1740299.
|
|
||||||
Patch161: gdb-rhbz1742099-reject-sections-with-invalid-sizes.patch
|
|
||||||
|
|
||||||
# Fix 'GDB needs s390x arch13 binutils patches'
|
|
||||||
# RHBZ 1768593, Andreas Krebbel
|
|
||||||
# This patch contains only the opcodes change.
|
|
||||||
Patch162: gdb-rhbz1768593-s390x-arch13-01.patch
|
|
||||||
|
|
||||||
# Fix 'GDB needs s390x arch13 binutils patches'
|
|
||||||
# RHBZ 1768593, Andreas Krebbel
|
|
||||||
# This patch contains only the opcodes and include changes.
|
|
||||||
Patch163: gdb-rhbz1768593-s390x-arch13-02.patch
|
|
||||||
|
|
||||||
# Fix 'GDB needs s390x arch13 binutils patches'
|
|
||||||
# RHBZ 1768593, Andreas Krebbel
|
|
||||||
Patch164: gdb-rhbz1768593-s390x-arch13-03.patch
|
|
||||||
|
|
||||||
# Backport z15 record/replay
|
|
||||||
# Andreas Arnaz, RH BZ 1659535
|
|
||||||
Patch165: gdb-rhbz1659535-z15-record-replay.patch
|
|
||||||
|
|
||||||
# Fix terminal problems when error() is called
|
|
||||||
# Alan Hayward (RH BZ 1852580)
|
|
||||||
Patch166: gdb-rhbz1852580-terminal-woes.patch
|
|
||||||
|
|
||||||
# Remove hack for GDB which sets the section size to 0
|
|
||||||
# Kevin Buettner, RH BZ 1842691
|
|
||||||
Patch167: gdb-rhbz1842691-corefile-mem-access-1of15.patch
|
|
||||||
|
|
||||||
# Adjust corefile.exp test to show regression after bfd hack removal
|
|
||||||
# Kevin Buettner, RH BZ 1842691
|
|
||||||
Patch168: gdb-rhbz1842691-corefile-mem-access-2of15.patch
|
|
||||||
|
|
||||||
# section_table_xfer_memory: Replace section name with callback predicate
|
|
||||||
# Kevin Buettner, RH BZ 1842691
|
|
||||||
Patch169: gdb-rhbz1842691-corefile-mem-access-3of15.patch
|
|
||||||
|
|
||||||
# Provide access to non SEC_HAS_CONTENTS core file sections
|
|
||||||
# Kevin Buettner, RH BZ 1842961
|
|
||||||
Patch170: gdb-rhbz1842691-corefile-mem-access-4of15.patch
|
|
||||||
|
|
||||||
# Test ability to access unwritten-to mmap data in core file
|
|
||||||
# Kevin Buettner, RH BZ 1842961
|
|
||||||
Patch171: gdb-rhbz1842691-corefile-mem-access-5of15.patch
|
|
||||||
|
|
||||||
# Update binary_get_section_contents to seek using section's file position
|
|
||||||
# Kevin Buettner, RH BZ 1842961
|
|
||||||
Patch172: gdb-rhbz1842691-corefile-mem-access-6of15.patch
|
|
||||||
|
|
||||||
# Add new gdbarch method, read_core_file_mappings
|
|
||||||
# Kevin Buettner, RH BZ 1842961
|
|
||||||
Patch173: gdb-rhbz1842691-corefile-mem-access-7of15.patch
|
|
||||||
|
|
||||||
# Use NT_FILE note section for reading core target memory
|
|
||||||
# Kevin Buettner, RH BZ 1842961
|
|
||||||
Patch174: gdb-rhbz1842691-corefile-mem-access-8of15.patch
|
|
||||||
|
|
||||||
# Add test for accessing read-only mmapped data in a core file
|
|
||||||
# Kevin Buettner, RH BZ 1842691
|
|
||||||
Patch175: gdb-rhbz1842691-corefile-mem-access-9of15.patch
|
|
||||||
|
|
||||||
# gcore command: Place all file-backed mappings in NT_FILE note
|
|
||||||
# Kevin Buettner, RH BZ 1842961
|
|
||||||
Patch176: gdb-rhbz1842691-corefile-mem-access-10of15.patch
|
|
||||||
|
|
||||||
# Adjust coredump-filter.exp to account for NT_FILE note handling
|
|
||||||
# Kevin Buettner, RH BZ 1842961
|
|
||||||
Patch177: gdb-rhbz1842691-corefile-mem-access-11of15.patch
|
|
||||||
|
|
||||||
# Add new command "maint print core-file-backed-mappings"
|
|
||||||
# Kevin Buettner, RH BZ 1842961
|
|
||||||
Patch178: gdb-rhbz1842691-corefile-mem-access-12of15.patch
|
|
||||||
|
|
||||||
# Add documentation for "maint print core-file-backed-mappings"
|
|
||||||
# Kevin Buettner, RH BZ 1842961
|
|
||||||
Patch179: gdb-rhbz1842691-corefile-mem-access-13of15.patch
|
|
||||||
|
|
||||||
# New core file tests with mappings over existing program memory
|
|
||||||
# Kevin Buettner, RH BZ 1842961
|
|
||||||
Patch180: gdb-rhbz1842691-corefile-mem-access-14of15.patch
|
|
||||||
|
|
||||||
# Add period to help text for maint print core-file-backed-mappings
|
|
||||||
# Kevin Buettner, RH BZ 1842961
|
|
||||||
Patch181: gdb-rhbz1842691-corefile-mem-access-15of15.patch
|
|
||||||
|
|
||||||
# Backport "Stop the BFD library from issuing a warning message when
|
|
||||||
# processing allocated sections in debuginfo files that lie outside of
|
|
||||||
# Nick Clifton and Keith Seitz, RH BZ 1878810
|
|
||||||
Patch182: gdb-rhbz1878810-bfd-suppress-loadable-section-outside-ELF-sections.patch
|
|
||||||
|
|
||||||
# Backport "fortran dynamic type related fixes"
|
|
||||||
# Andrew Burgess (RH BZ 1905701)
|
|
||||||
Patch183: gdb-rhbz1905701-DWARF-data_location.patch
|
|
||||||
|
|
||||||
# Backport of "Correct recording of 'store on condition' insns"
|
|
||||||
# Andreas Arnaz (RH BZ 1903374)
|
|
||||||
Patch184: gdb-rhbz1903374-s390x-store-on-condition.patch
|
|
||||||
|
|
||||||
# Fix segfault with nameless fortran modules.
|
|
||||||
# Bernhard Heckel, RH BZ 1943673
|
|
||||||
Patch185: gdb-rhbz1934673-fortran-nameless-modules.patch
|
|
||||||
|
|
||||||
# Backport "Add low_new_clone method to linux_nat_target."
|
|
||||||
# (Pedro Franco de Carvalho, RH BZ 1854784)
|
|
||||||
Patch186: gdb-rhbz1854784-powerpc-remove-region-limit-dawr-1of7.patch
|
|
||||||
|
|
||||||
# Backport "Add linux_get_hwcap"
|
|
||||||
# (Alan Hayward, RH BZ 1854784)
|
|
||||||
Patch187: gdb-rhbz1854784-powerpc-remove-region-limit-dawr-2of7.patch
|
|
||||||
|
|
||||||
# Backport "[PowerPC] Move up some register access routines"
|
|
||||||
# (Pedro Franco de Carvalho, RH BZ 1854784)
|
|
||||||
Patch188: gdb-rhbz1854784-powerpc-remove-region-limit-dawr-3of7.patch
|
|
||||||
|
|
||||||
# Backport "[PowerPC] Fix debug register issues in ppc-linux-nat"
|
|
||||||
# (Pedro Franco de Carvalho, RH BZ 1854784)
|
|
||||||
Patch189: gdb-rhbz1854784-powerpc-remove-region-limit-dawr-4of7.patch
|
|
||||||
|
|
||||||
# Backport "[PowerPC] Use < 0 and >= 0 for watchpoint ptrace calls"
|
|
||||||
# (Pedro Franco de Carvalho, RH BZ 1854784)
|
|
||||||
Patch190: gdb-rhbz1854784-powerpc-remove-region-limit-dawr-5of7.patch
|
|
||||||
|
|
||||||
# Backport "[PowerPC] Always clear watchpoint with PTRACE_SET_DEBUGREG"
|
|
||||||
# (Pedro Franco de Carvalho, RH BZ 1854784)
|
|
||||||
Patch191: gdb-rhbz1854784-powerpc-remove-region-limit-dawr-6of7.patch
|
|
||||||
|
|
||||||
# Backport "PowerPC remove 512 bytes region limit if 2nd DAWR is available."
|
|
||||||
# (Rogerio Alves, RH BZ 1854784)
|
|
||||||
Patch192: gdb-rhbz1854784-powerpc-remove-region-limit-dawr-7of7.patch
|
|
||||||
|
|
||||||
# IBM Z: Add support for HLASM extended mnemonics
|
|
||||||
# (Andreas Krebbel, RHBZ 2012818)
|
|
||||||
Patch193: gdb-rhbz2012818-ibmz-update-1of5.patch
|
|
||||||
|
|
||||||
# IBM Z: Add risbgz and risbgnz extended mnemonics
|
|
||||||
# (Andreas Krebbel, RHBZ 2012818)
|
|
||||||
Patch194: gdb-rhbz2012818-ibmz-update-2of5.patch
|
|
||||||
|
|
||||||
# IBM Z: Implement instruction set extensions
|
|
||||||
# (Andreas Krebbel, RHBZ 2012818)
|
|
||||||
Patch195: gdb-rhbz2012818-ibmz-update-3of5.patch
|
|
||||||
|
|
||||||
# IBM Z: Remove lpswey parameter
|
|
||||||
# (Andreas Krebbel, RHBZ 2012818)
|
|
||||||
Patch196: gdb-rhbz2012818-ibmz-update-4of5.patch
|
|
||||||
|
|
||||||
# IBM Z: Add another arch14 instruction
|
|
||||||
# (Andreas Krebbel, RHBZ 2012818)
|
|
||||||
Patch197: gdb-rhbz2012818-ibmz-update-5of5.patch
|
|
||||||
|
|
||||||
# Backport gdb/20948 (--write option to GDB causes segfault)
|
|
||||||
# (Jozef Lawrynowicz, RHBZ 2018504)
|
|
||||||
Patch198: gdb-rhbz2018504-do-not-update-elf-headers.patch
|
|
||||||
|
|
||||||
# Fix restoring of inferior terminal settings
|
|
||||||
# (Simon Marchi, RHBZ 2015131)
|
|
||||||
Patch199: gdb-rhbz2015131-restore-inferior-terminal-1of2.patch
|
|
||||||
|
|
||||||
# Avoid GDB SIGTTOU on catch exec + set follow-exec-mode new (PR 23368)
|
|
||||||
# (Simon Marchi, related to RHBZ 2015131)
|
|
||||||
Patch200: gdb-rhbz2015131-avoid-sigttou-forks-2of2.patch
|
|
||||||
|
|
||||||
# Change assertion to warning in dw2_find_pc_sect_compunit_symtab
|
|
||||||
# Based on "Fix crash in new DWARF indexer"
|
|
||||||
# (Tom Tromey, RHBZ 2150363)
|
|
||||||
Patch201: gdb-rhbz2150363-warn-dw2_find_pc_sect_compunit_symtab.patch
|
|
||||||
|
|
||||||
# Backport "Fix assertion failure in copy_type"
|
|
||||||
# (Tom Tromey, RHBZ 2156888)
|
|
||||||
Patch202: gdb-rhbz2156888-copy_type-assertion-1of2.patch
|
|
||||||
|
|
||||||
# Backport of "Fix PR20630 regression test in gdb.base/printcmds.exp"
|
|
||||||
# (Tom deVries, RHBZ 2156888)
|
|
||||||
Patch203: gdb-rhbz2156888-copy_type-assertion-2of2.patch
|
|
||||||
|
|
@ -1,203 +0,0 @@
|
|||||||
%patch001 -p1
|
|
||||||
%patch002 -p1
|
|
||||||
%patch003 -p1
|
|
||||||
%patch004 -p1
|
|
||||||
%patch005 -p1
|
|
||||||
%patch006 -p1
|
|
||||||
%patch007 -p1
|
|
||||||
%patch008 -p1
|
|
||||||
%patch009 -p1
|
|
||||||
%patch010 -p1
|
|
||||||
%patch011 -p1
|
|
||||||
%patch012 -p1
|
|
||||||
%patch013 -p1
|
|
||||||
%patch014 -p1
|
|
||||||
%patch015 -p1
|
|
||||||
%patch016 -p1
|
|
||||||
%patch017 -p1
|
|
||||||
%patch018 -p1
|
|
||||||
%patch019 -p1
|
|
||||||
%patch020 -p1
|
|
||||||
%patch021 -p1
|
|
||||||
%patch022 -p1
|
|
||||||
%patch023 -p1
|
|
||||||
%patch024 -p1
|
|
||||||
%patch025 -p1
|
|
||||||
%patch026 -p1
|
|
||||||
%patch027 -p1
|
|
||||||
%patch028 -p1
|
|
||||||
%patch029 -p1
|
|
||||||
%patch030 -p1
|
|
||||||
%patch031 -p1
|
|
||||||
%patch032 -p1
|
|
||||||
%patch033 -p1
|
|
||||||
%patch034 -p1
|
|
||||||
%patch035 -p1
|
|
||||||
%patch036 -p1
|
|
||||||
%patch037 -p1
|
|
||||||
%patch038 -p1
|
|
||||||
%patch039 -p1
|
|
||||||
%patch040 -p1
|
|
||||||
%patch041 -p1
|
|
||||||
%patch042 -p1
|
|
||||||
%patch043 -p1
|
|
||||||
%patch044 -p1
|
|
||||||
%patch045 -p1
|
|
||||||
%patch046 -p1
|
|
||||||
%patch047 -p1
|
|
||||||
%patch048 -p1
|
|
||||||
%patch049 -p1
|
|
||||||
%patch050 -p1
|
|
||||||
%patch051 -p1
|
|
||||||
%patch052 -p1
|
|
||||||
%patch053 -p1
|
|
||||||
%patch054 -p1
|
|
||||||
%patch055 -p1
|
|
||||||
%patch056 -p1
|
|
||||||
%patch057 -p1
|
|
||||||
%patch058 -p1
|
|
||||||
%patch059 -p1
|
|
||||||
%patch060 -p1
|
|
||||||
%patch061 -p1
|
|
||||||
%patch062 -p1
|
|
||||||
%patch063 -p1
|
|
||||||
%patch064 -p1
|
|
||||||
%patch065 -p1
|
|
||||||
%patch066 -p1
|
|
||||||
%patch067 -p1
|
|
||||||
%patch068 -p1
|
|
||||||
%patch069 -p1
|
|
||||||
%patch070 -p1
|
|
||||||
%patch071 -p1
|
|
||||||
%patch072 -p1
|
|
||||||
%patch073 -p1
|
|
||||||
%patch074 -p1
|
|
||||||
%patch075 -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
|
|
||||||
%patch098 -p1
|
|
||||||
%patch099 -p1
|
|
||||||
%patch100 -p1
|
|
||||||
%patch101 -p1
|
|
||||||
%patch102 -p1
|
|
||||||
%patch103 -p1
|
|
||||||
%patch104 -p1
|
|
||||||
%patch105 -p1
|
|
||||||
%patch106 -p1
|
|
||||||
%patch107 -p1
|
|
||||||
%patch108 -p1
|
|
||||||
%patch109 -p1
|
|
||||||
%patch110 -p1
|
|
||||||
%patch111 -p1
|
|
||||||
%patch112 -p1
|
|
||||||
%patch113 -p1
|
|
||||||
%patch114 -p1
|
|
||||||
%patch115 -p1
|
|
||||||
%patch116 -p1
|
|
||||||
%patch117 -p1
|
|
||||||
%patch118 -p1
|
|
||||||
%patch119 -p1
|
|
||||||
%patch120 -p1
|
|
||||||
%patch121 -p1
|
|
||||||
%patch122 -p1
|
|
||||||
%patch123 -p1
|
|
||||||
%patch124 -p1
|
|
||||||
%patch125 -p1
|
|
||||||
%patch126 -p1
|
|
||||||
%patch127 -p1
|
|
||||||
%patch128 -p1
|
|
||||||
%patch129 -p1
|
|
||||||
%patch130 -p1
|
|
||||||
%patch131 -p1
|
|
||||||
%patch132 -p1
|
|
||||||
%patch133 -p1
|
|
||||||
%patch134 -p1
|
|
||||||
%patch135 -p1
|
|
||||||
%patch136 -p1
|
|
||||||
%patch137 -p1
|
|
||||||
%patch138 -p1
|
|
||||||
%patch139 -p1
|
|
||||||
%patch140 -p1
|
|
||||||
%patch141 -p1
|
|
||||||
%patch142 -p1
|
|
||||||
%patch143 -p1
|
|
||||||
%patch144 -p1
|
|
||||||
%patch145 -p1
|
|
||||||
%patch146 -p1
|
|
||||||
%patch147 -p1
|
|
||||||
%patch148 -p1
|
|
||||||
%patch149 -p1
|
|
||||||
%patch150 -p1
|
|
||||||
%patch151 -p1
|
|
||||||
%patch152 -p1
|
|
||||||
%patch153 -p1
|
|
||||||
%patch154 -p1
|
|
||||||
%patch155 -p1
|
|
||||||
%patch156 -p1
|
|
||||||
%patch157 -p1
|
|
||||||
%patch158 -p1
|
|
||||||
%patch159 -p1
|
|
||||||
%patch160 -p1
|
|
||||||
%patch161 -p1
|
|
||||||
%patch162 -p1
|
|
||||||
%patch163 -p1
|
|
||||||
%patch164 -p1
|
|
||||||
%patch165 -p1
|
|
||||||
%patch166 -p1
|
|
||||||
%patch167 -p1
|
|
||||||
%patch168 -p1
|
|
||||||
%patch169 -p1
|
|
||||||
%patch170 -p1
|
|
||||||
%patch171 -p1
|
|
||||||
%patch172 -p1
|
|
||||||
%patch173 -p1
|
|
||||||
%patch174 -p1
|
|
||||||
%patch175 -p1
|
|
||||||
%patch176 -p1
|
|
||||||
%patch177 -p1
|
|
||||||
%patch178 -p1
|
|
||||||
%patch179 -p1
|
|
||||||
%patch180 -p1
|
|
||||||
%patch181 -p1
|
|
||||||
%patch182 -p1
|
|
||||||
%patch183 -p1
|
|
||||||
%patch184 -p1
|
|
||||||
%patch185 -p1
|
|
||||||
%patch186 -p1
|
|
||||||
%patch187 -p1
|
|
||||||
%patch188 -p1
|
|
||||||
%patch189 -p1
|
|
||||||
%patch190 -p1
|
|
||||||
%patch191 -p1
|
|
||||||
%patch192 -p1
|
|
||||||
%patch193 -p1
|
|
||||||
%patch194 -p1
|
|
||||||
%patch195 -p1
|
|
||||||
%patch196 -p1
|
|
||||||
%patch197 -p1
|
|
||||||
%patch198 -p1
|
|
||||||
%patch199 -p1
|
|
||||||
%patch200 -p1
|
|
||||||
%patch201 -p1
|
|
||||||
%patch202 -p1
|
|
||||||
%patch203 -p1
|
|
@ -1,320 +0,0 @@
|
|||||||
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.3-bz140532-ppc-unwinding-test.patch
|
|
||||||
|
|
||||||
;; Update PPC unwinding patches to their upstream variants (BZ 140532).
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.arch/powerpc-bcl-prologue-asm32.S b/gdb/testsuite/gdb.arch/powerpc-bcl-prologue-asm32.S
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.arch/powerpc-bcl-prologue-asm32.S
|
|
||||||
@@ -0,0 +1,78 @@
|
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ Copyright 2007 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. */
|
|
||||||
+
|
|
||||||
+ .section ".text"
|
|
||||||
+ .align 2
|
|
||||||
+ .globl func0
|
|
||||||
+ .type func0, @function
|
|
||||||
+func0:
|
|
||||||
+ stwu 1,-16(1)
|
|
||||||
+ mflr 0
|
|
||||||
+ stw 31,12(1)
|
|
||||||
+ stw 0,20(1)
|
|
||||||
+ mr 31,1
|
|
||||||
+ bl abort
|
|
||||||
+ .size func0, .-func0
|
|
||||||
+ .align 2
|
|
||||||
+ .globl func1
|
|
||||||
+ .type func1, @function
|
|
||||||
+func1:
|
|
||||||
+ stwu 1,-16(1)
|
|
||||||
+ mflr 0
|
|
||||||
+/* 20 = BO = branch always
|
|
||||||
+ 31 = BI = CR bit (ignored) */
|
|
||||||
+ bcl 20,31,.Lpie
|
|
||||||
+.Lpie: stw 31,12(1)
|
|
||||||
+ stw 0,20(1)
|
|
||||||
+ mr 31,1
|
|
||||||
+ bl func0
|
|
||||||
+ mr 0,3
|
|
||||||
+ lis 9,var@ha
|
|
||||||
+ lwz 9,var@l(9)
|
|
||||||
+ add 0,0,9
|
|
||||||
+ mr 3,0
|
|
||||||
+ lwz 11,0(1)
|
|
||||||
+ lwz 0,4(11)
|
|
||||||
+ mtlr 0
|
|
||||||
+ lwz 31,-4(11)
|
|
||||||
+ mr 1,11
|
|
||||||
+ blr
|
|
||||||
+ .size func1, .-func1
|
|
||||||
+ .section .note.GNU-stack,"",@progbits
|
|
||||||
+ .ident "GCC: (GNU) 3.4.6 20060404 (Red Hat 3.4.6-8)"
|
|
||||||
+
|
|
||||||
+/* Original source file:
|
|
||||||
+
|
|
||||||
+#include <stdlib.h>
|
|
||||||
+
|
|
||||||
+extern volatile int var;
|
|
||||||
+
|
|
||||||
+int func0 (void) __attribute__((__noinline__));
|
|
||||||
+int func0 (void)
|
|
||||||
+{
|
|
||||||
+ abort ();
|
|
||||||
+ return var;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+int func1 (void) __attribute__((__noinline__));
|
|
||||||
+int func1 (void)
|
|
||||||
+{
|
|
||||||
+ return func0 () + var;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+*/
|
|
||||||
diff --git a/gdb/testsuite/gdb.arch/powerpc-bcl-prologue-asm64.S b/gdb/testsuite/gdb.arch/powerpc-bcl-prologue-asm64.S
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.arch/powerpc-bcl-prologue-asm64.S
|
|
||||||
@@ -0,0 +1,98 @@
|
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ Copyright 2007 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. */
|
|
||||||
+
|
|
||||||
+ .section ".toc","aw"
|
|
||||||
+ .section ".text"
|
|
||||||
+ .align 2
|
|
||||||
+ .globl func0
|
|
||||||
+ .section ".opd","aw"
|
|
||||||
+ .align 3
|
|
||||||
+func0:
|
|
||||||
+ .quad .L.func0,.TOC.@tocbase
|
|
||||||
+ .previous
|
|
||||||
+ .type func0, @function
|
|
||||||
+.L.func0:
|
|
||||||
+ mflr 0
|
|
||||||
+ std 31,-8(1)
|
|
||||||
+ std 0,16(1)
|
|
||||||
+ stdu 1,-128(1)
|
|
||||||
+ mr 31,1
|
|
||||||
+ bl abort
|
|
||||||
+ nop
|
|
||||||
+ .long 0
|
|
||||||
+ .byte 0,0,0,1,128,1,0,1
|
|
||||||
+ .size func0,.-.L.func0
|
|
||||||
+ .section ".toc","aw"
|
|
||||||
+.LC1:
|
|
||||||
+ .tc var[TC],var
|
|
||||||
+ .section ".text"
|
|
||||||
+ .align 2
|
|
||||||
+ .globl func1
|
|
||||||
+ .section ".opd","aw"
|
|
||||||
+ .align 3
|
|
||||||
+func1:
|
|
||||||
+ .quad .L.func1,.TOC.@tocbase
|
|
||||||
+ .previous
|
|
||||||
+ .type func1, @function
|
|
||||||
+.L.func1:
|
|
||||||
+ mflr 0
|
|
||||||
+/* 20 = BO = branch always
|
|
||||||
+ 31 = BI = CR bit (ignored) */
|
|
||||||
+ bcl 20,31,.Lpie
|
|
||||||
+.Lpie: std 31,-8(1)
|
|
||||||
+ std 0,16(1)
|
|
||||||
+ stdu 1,-128(1)
|
|
||||||
+ mr 31,1
|
|
||||||
+ bl func0
|
|
||||||
+ mr 11,3
|
|
||||||
+ ld 9,.LC1@toc(2)
|
|
||||||
+ lwz 0,0(9)
|
|
||||||
+ add 0,11,0
|
|
||||||
+ extsw 0,0
|
|
||||||
+ mr 3,0
|
|
||||||
+ ld 1,0(1)
|
|
||||||
+ ld 0,16(1)
|
|
||||||
+ mtlr 0
|
|
||||||
+ ld 31,-8(1)
|
|
||||||
+ blr
|
|
||||||
+ .long 0
|
|
||||||
+ .byte 0,0,0,1,128,1,0,1
|
|
||||||
+ .size func1,.-.L.func1
|
|
||||||
+ .section .note.GNU-stack,"",@progbits
|
|
||||||
+ .ident "GCC: (GNU) 3.4.6 20060404 (Red Hat 3.4.6-8)"
|
|
||||||
+
|
|
||||||
+/* Original source file:
|
|
||||||
+
|
|
||||||
+#include <stdlib.h>
|
|
||||||
+
|
|
||||||
+extern volatile int var;
|
|
||||||
+
|
|
||||||
+int func0 (void) __attribute__((__noinline__));
|
|
||||||
+int func0 (void)
|
|
||||||
+{
|
|
||||||
+ abort ();
|
|
||||||
+ return var;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+int func1 (void) __attribute__((__noinline__));
|
|
||||||
+int func1 (void)
|
|
||||||
+{
|
|
||||||
+ return func0 () + var;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+*/
|
|
||||||
diff --git a/gdb/testsuite/gdb.arch/powerpc-bcl-prologue.c b/gdb/testsuite/gdb.arch/powerpc-bcl-prologue.c
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.arch/powerpc-bcl-prologue.c
|
|
||||||
@@ -0,0 +1,29 @@
|
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ Copyright 2007 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. */
|
|
||||||
+
|
|
||||||
+/* Force `-fpie' double jump bl->blrl. */
|
|
||||||
+/* No longer used. */
|
|
||||||
+volatile int var;
|
|
||||||
+
|
|
||||||
+extern int func1 (void);
|
|
||||||
+
|
|
||||||
+int main (void)
|
|
||||||
+{
|
|
||||||
+ func1 ();
|
|
||||||
+ return 0;
|
|
||||||
+}
|
|
||||||
diff --git a/gdb/testsuite/gdb.arch/powerpc-bcl-prologue.exp b/gdb/testsuite/gdb.arch/powerpc-bcl-prologue.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.arch/powerpc-bcl-prologue.exp
|
|
||||||
@@ -0,0 +1,72 @@
|
|
||||||
+# Copyright 2006, 2007 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.
|
|
||||||
+
|
|
||||||
+# Test unwinding fixes of the PPC platform, specifically on the coping with BCL
|
|
||||||
+# jump of the PIE code.
|
|
||||||
+
|
|
||||||
+if ![istarget "powerpc*-*-linux*"] then {
|
|
||||||
+ verbose "Skipping powerpc-linux prologue tests."
|
|
||||||
+ return
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+set testfile "powerpc-bcl-prologue"
|
|
||||||
+set srcfile1 ${testfile}.c
|
|
||||||
+set flags "debug"
|
|
||||||
+if [istarget "powerpc-*"] then {
|
|
||||||
+ set srcfile2 ${testfile}-asm32.S
|
|
||||||
+ set flags "$flags additional_flags=-m32"
|
|
||||||
+} elseif [istarget "powerpc64-*"] then {
|
|
||||||
+ set srcfile2 ${testfile}-asm64.S
|
|
||||||
+ set flags "$flags additional_flags=-m64"
|
|
||||||
+} else {
|
|
||||||
+ fail "powerpc arch test"
|
|
||||||
+ return
|
|
||||||
+}
|
|
||||||
+set objfile2 [standard_output_file ${testfile}-asm.o]
|
|
||||||
+set binfile [standard_output_file ${testfile}]
|
|
||||||
+
|
|
||||||
+if { [gdb_compile "${srcdir}/${subdir}/${srcfile1} ${srcdir}/${subdir}/${srcfile2}" ${binfile} executable $flags] != ""} {
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+gdb_exit
|
|
||||||
+gdb_start
|
|
||||||
+gdb_reinitialize_dir $srcdir/$subdir
|
|
||||||
+gdb_load ${binfile}
|
|
||||||
+
|
|
||||||
+# We should stop in abort(3).
|
|
||||||
+
|
|
||||||
+gdb_run_cmd
|
|
||||||
+
|
|
||||||
+gdb_test_multiple {} "continue to abort()" {
|
|
||||||
+ -re ".*Program received signal SIGABRT,.*$gdb_prompt $" {
|
|
||||||
+ pass "continue to abort()"
|
|
||||||
+ }
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Check backtrace:
|
|
||||||
+# #3 0x0804835f in func0 ()
|
|
||||||
+# #4 0x0804836a in func1 ()
|
|
||||||
+# #5 0x0804838c in main ()
|
|
||||||
+# (gdb)
|
|
||||||
+# `\\.?' prefixes are needed for ppc64 without `debug' (another bug).
|
|
||||||
+
|
|
||||||
+set test "matching unwind"
|
|
||||||
+gdb_test_multiple "backtrace" $test {
|
|
||||||
+ -re "\r\n#\[0-9\]\[^\r\n\]* in \\.?func0 \\(\[^\r\n\]*\r\n#\[0-9\]\[^\r\n\]* in \\.?func1 \\(\[^\r\n\]*\r\n#\[0-9\]\[^\r\n\]* in \\.?main \\(\[^\r\n\]*\r\n$gdb_prompt $" {
|
|
||||||
+ pass $test
|
|
||||||
+ }
|
|
||||||
+}
|
|
||||||
diff --git a/gdb/testsuite/gdb.arch/powerpc-prologue.exp b/gdb/testsuite/gdb.arch/powerpc-prologue.exp
|
|
||||||
--- a/gdb/testsuite/gdb.arch/powerpc-prologue.exp
|
|
||||||
+++ b/gdb/testsuite/gdb.arch/powerpc-prologue.exp
|
|
||||||
@@ -16,8 +16,9 @@
|
|
||||||
# Test PowerPC prologue analyzer.
|
|
||||||
|
|
||||||
# Do not run on AIX (where we won't be able to build the tests without
|
|
||||||
-# some surgery) or on PowerPC64 (ditto, dot symbols).
|
|
||||||
-if {[istarget *-*-aix*] || ![istarget "powerpc-*-*"]} then {
|
|
||||||
+# some surgery). PowerPC64 target would break due to dot symbols but we build
|
|
||||||
+# there PowerPC32 inferior.
|
|
||||||
+if {[istarget *-*-aix*] || ![istarget "powerpc*-*-*"]} then {
|
|
||||||
verbose "Skipping PowerPC prologue tests."
|
|
||||||
return
|
|
||||||
}
|
|
@ -1,109 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
|
||||||
Subject: gdb-6.3-bz202689-exec-from-pthread-test.patch
|
|
||||||
|
|
||||||
;; Testcase for exec() from threaded program (BZ 202689).
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
2007-01-17 Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
|
|
||||||
* gdb.threads/threaded-exec.exp, gdb.threads/threaded-exec.c: New files.
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.threads/threaded-exec.c b/gdb/testsuite/gdb.threads/threaded-exec.c
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.threads/threaded-exec.c
|
|
||||||
@@ -0,0 +1,46 @@
|
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ Copyright 2007 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. */
|
|
||||||
+
|
|
||||||
+#include <stddef.h>
|
|
||||||
+#include <pthread.h>
|
|
||||||
+#include <assert.h>
|
|
||||||
+#include <stdlib.h>
|
|
||||||
+#include <unistd.h>
|
|
||||||
+
|
|
||||||
+
|
|
||||||
+static void *
|
|
||||||
+threader (void *arg)
|
|
||||||
+{
|
|
||||||
+ return NULL;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+int
|
|
||||||
+main (void)
|
|
||||||
+{
|
|
||||||
+ pthread_t t1;
|
|
||||||
+ int i;
|
|
||||||
+
|
|
||||||
+ i = pthread_create (&t1, NULL, threader, (void *) NULL);
|
|
||||||
+ assert (i == 0);
|
|
||||||
+ i = pthread_join (t1, NULL);
|
|
||||||
+ assert (i == 0);
|
|
||||||
+
|
|
||||||
+ execl ("/bin/true", "/bin/true", NULL);
|
|
||||||
+ abort ();
|
|
||||||
+}
|
|
||||||
diff --git a/gdb/testsuite/gdb.threads/threaded-exec.exp b/gdb/testsuite/gdb.threads/threaded-exec.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.threads/threaded-exec.exp
|
|
||||||
@@ -0,0 +1,41 @@
|
|
||||||
+# threaded-exec.exp -- Check reset of the tracked threads on exec*(2)
|
|
||||||
+# Copyright (C) 2007 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. */
|
|
||||||
+
|
|
||||||
+# Please email any bugs, comments, and/or additions to this file to:
|
|
||||||
+# bug-gdb@prep.ai.mit.edu
|
|
||||||
+
|
|
||||||
+set testfile threaded-exec
|
|
||||||
+set srcfile ${testfile}.c
|
|
||||||
+set binfile [standard_output_file ${testfile}]
|
|
||||||
+
|
|
||||||
+if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable []] != "" } {
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+gdb_exit
|
|
||||||
+gdb_start
|
|
||||||
+gdb_reinitialize_dir $srcdir/$subdir
|
|
||||||
+
|
|
||||||
+gdb_load ${binfile}
|
|
||||||
+
|
|
||||||
+gdb_run_cmd
|
|
||||||
+
|
|
||||||
+gdb_test_multiple {} "Program exited" {
|
|
||||||
+ -re "\r\n\\\[Inferior .* exited normally\\\]\r\n$gdb_prompt $" {
|
|
||||||
+ pass "Program exited"
|
|
||||||
+ }
|
|
||||||
+}
|
|
@ -1,53 +0,0 @@
|
|||||||
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.3-focus-cmd-prev-test.patch
|
|
||||||
|
|
||||||
;; Test a crash on `focus cmd', `focus prev' commands.
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/focus-cmd-prev.exp b/gdb/testsuite/gdb.base/focus-cmd-prev.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.base/focus-cmd-prev.exp
|
|
||||||
@@ -0,0 +1,40 @@
|
|
||||||
+# Copyright 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 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.
|
|
||||||
+
|
|
||||||
+if $tracelevel then {
|
|
||||||
+ strace $tracelevel
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+gdb_exit
|
|
||||||
+gdb_start
|
|
||||||
+
|
|
||||||
+# Do not use gdb_test or \r\n there since:
|
|
||||||
+# commit d7e747318f4d04af033f16325f9b6d74f67079ec
|
|
||||||
+# Eliminate make_cleanup_ui_file_delete / make ui_file a class hierarchy
|
|
||||||
+
|
|
||||||
+set test "focus cmd"
|
|
||||||
+gdb_test_multiple $test $test {
|
|
||||||
+ -re "$gdb_prompt $" {
|
|
||||||
+ pass $test
|
|
||||||
+ }
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+set test "focus prev"
|
|
||||||
+gdb_test_multiple $test $test {
|
|
||||||
+ -re "$gdb_prompt $" {
|
|
||||||
+ pass $test
|
|
||||||
+ }
|
|
||||||
+}
|
|
@ -1,323 +0,0 @@
|
|||||||
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 "--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 "--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);
|
|
||||||
+}
|
|
@ -1,161 +0,0 @@
|
|||||||
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-inheritancetest-20050726.patch
|
|
||||||
|
|
||||||
;; Verify printing of inherited members test
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
2005-07-26 Jeff Johnston <jjohnstn@redhat.com>
|
|
||||||
|
|
||||||
* gdb.cp/b146835.exp: New testcase.
|
|
||||||
* gdb.cp/b146835.cc: Ditto.
|
|
||||||
* gdb.cp/b146835b.cc: Ditto.
|
|
||||||
* gdb.cp/b146835.h: Ditto.
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.cp/b146835.cc b/gdb/testsuite/gdb.cp/b146835.cc
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.cp/b146835.cc
|
|
||||||
@@ -0,0 +1,32 @@
|
|
||||||
+#include "b146835.h"
|
|
||||||
+#include <iostream>
|
|
||||||
+
|
|
||||||
+class F : public C {
|
|
||||||
+
|
|
||||||
+protected:
|
|
||||||
+
|
|
||||||
+ virtual void funcA (unsigned long a, B *b);
|
|
||||||
+ virtual void funcB (E *e);
|
|
||||||
+ virtual void funcC (unsigned long x, bool y);
|
|
||||||
+
|
|
||||||
+ char *s1, *s2;
|
|
||||||
+ bool b1;
|
|
||||||
+ int k;
|
|
||||||
+
|
|
||||||
+public:
|
|
||||||
+ void foo() {
|
|
||||||
+ std::cout << "foo" << std::endl;
|
|
||||||
+ }
|
|
||||||
+};
|
|
||||||
+
|
|
||||||
+
|
|
||||||
+void F::funcA (unsigned long a, B *b) {}
|
|
||||||
+void F::funcB (E *e) {}
|
|
||||||
+void F::funcC (unsigned long x, bool y) {}
|
|
||||||
+
|
|
||||||
+int main()
|
|
||||||
+{
|
|
||||||
+ F f;
|
|
||||||
+ f.foo();
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
diff --git a/gdb/testsuite/gdb.cp/b146835.exp b/gdb/testsuite/gdb.cp/b146835.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.cp/b146835.exp
|
|
||||||
@@ -0,0 +1,47 @@
|
|
||||||
+# This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+# 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.
|
|
||||||
+
|
|
||||||
+# Check that GDB can properly print an inherited member variable
|
|
||||||
+# (Bugzilla 146835)
|
|
||||||
+
|
|
||||||
+set testfile "b146835"
|
|
||||||
+set srcfile ${testfile}.cc
|
|
||||||
+set srcfile2 ${testfile}b.cc
|
|
||||||
+set binfile [standard_output_file ${testfile}]
|
|
||||||
+if {[gdb_compile "${srcdir}/${subdir}/${srcfile} ${srcdir}/${subdir}/${srcfile2}" "${binfile}" executable {debug c++}] != "" } {
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+gdb_exit
|
|
||||||
+gdb_start
|
|
||||||
+gdb_reinitialize_dir $srcdir/$subdir
|
|
||||||
+gdb_load ${binfile}
|
|
||||||
+
|
|
||||||
+#
|
|
||||||
+# Run to `main' where we begin our tests.
|
|
||||||
+#
|
|
||||||
+
|
|
||||||
+if ![runto_main] then {
|
|
||||||
+ gdb_suppress_tests
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+gdb_test "break 'F::foo()'" ""
|
|
||||||
+gdb_continue_to_breakpoint "First line foo"
|
|
||||||
+
|
|
||||||
+# Verify that we can access the inherited member d
|
|
||||||
+gdb_test "p d" " = \\(D \\*\\) *0x0" "Verify inherited member d accessible"
|
|
||||||
diff --git a/gdb/testsuite/gdb.cp/b146835.h b/gdb/testsuite/gdb.cp/b146835.h
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.cp/b146835.h
|
|
||||||
@@ -0,0 +1,36 @@
|
|
||||||
+
|
|
||||||
+class A {
|
|
||||||
+
|
|
||||||
+protected:
|
|
||||||
+
|
|
||||||
+ virtual void funcA (unsigned long a, class B *b) = 0;
|
|
||||||
+ virtual void funcB (class E *e) = 0;
|
|
||||||
+ virtual void funcC (unsigned long x, bool y) = 0;
|
|
||||||
+
|
|
||||||
+ void funcD (class E *e, class D* d);
|
|
||||||
+ virtual void funcE (E *e, D *d);
|
|
||||||
+ virtual void funcF (unsigned long x, D *d);
|
|
||||||
+};
|
|
||||||
+
|
|
||||||
+
|
|
||||||
+class C : public A {
|
|
||||||
+
|
|
||||||
+protected:
|
|
||||||
+
|
|
||||||
+ int x;
|
|
||||||
+ class K *k;
|
|
||||||
+ class H *h;
|
|
||||||
+
|
|
||||||
+ D *d;
|
|
||||||
+
|
|
||||||
+ class W *w;
|
|
||||||
+ class N *n;
|
|
||||||
+ class L *l;
|
|
||||||
+ unsigned long *r;
|
|
||||||
+
|
|
||||||
+public:
|
|
||||||
+
|
|
||||||
+ C();
|
|
||||||
+ int z (char *s);
|
|
||||||
+ virtual ~C();
|
|
||||||
+};
|
|
||||||
diff --git a/gdb/testsuite/gdb.cp/b146835b.cc b/gdb/testsuite/gdb.cp/b146835b.cc
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.cp/b146835b.cc
|
|
||||||
@@ -0,0 +1,11 @@
|
|
||||||
+#include "b146835.h"
|
|
||||||
+
|
|
||||||
+C::C() { d = 0; x = 3; }
|
|
||||||
+
|
|
||||||
+int C::z (char *s) { return 0; }
|
|
||||||
+
|
|
||||||
+C::~C() {}
|
|
||||||
+
|
|
||||||
+void A::funcD (class E *e, class D *d) {}
|
|
||||||
+void A::funcE (E *e, D *d) {}
|
|
||||||
+void A::funcF (unsigned long x, D *d) {}
|
|
@ -1,32 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Andrew Cagney <cagney@gnu.org>
|
|
||||||
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
|
||||||
Subject: gdb-6.3-ppc64displaysymbol-20041124.patch
|
|
||||||
|
|
||||||
;; Include the pc's section when doing a symbol lookup so that the
|
|
||||||
;; correct symbol is found.
|
|
||||||
;;=push: Write new testcase.
|
|
||||||
|
|
||||||
2004-11-24 Andrew Cagney <cagney@gnu.org>
|
|
||||||
|
|
||||||
* printcmd.c (build_address_symbolic): Find a section for the
|
|
||||||
address.
|
|
||||||
|
|
||||||
diff --git a/gdb/printcmd.c b/gdb/printcmd.c
|
|
||||||
--- a/gdb/printcmd.c
|
|
||||||
+++ b/gdb/printcmd.c
|
|
||||||
@@ -587,6 +587,14 @@ build_address_symbolic (struct gdbarch *gdbarch,
|
|
||||||
addr = overlay_mapped_address (addr, section);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
+ /* To ensure that the symbol returned belongs to the correct setion
|
|
||||||
+ (and that the last [random] symbol from the previous section
|
|
||||||
+ isn't returned) try to find the section containing PC. First try
|
|
||||||
+ the overlay code (which by default returns NULL); and second try
|
|
||||||
+ the normal section code (which almost always succeeds). */
|
|
||||||
+ section = find_pc_overlay (addr);
|
|
||||||
+ if (section == NULL)
|
|
||||||
+ section = find_pc_section (addr);
|
|
||||||
|
|
||||||
/* First try to find the address in the symbol table, then
|
|
||||||
in the minsyms. Take the closest one. */
|
|
@ -1,118 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Andrew Cagney <cagney@gnu.org>
|
|
||||||
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
|
||||||
Subject: gdb-6.3-ppc64syscall-20040622.patch
|
|
||||||
|
|
||||||
;; Better parse 64-bit PPC system call prologues.
|
|
||||||
;;=push: Write new testcase.
|
|
||||||
|
|
||||||
2004-06-22 Andrew Cagney <cagney@gnu.org>
|
|
||||||
|
|
||||||
* rs6000-tdep.c (struct rs6000_framedata): Add field "func_start".
|
|
||||||
(skip_prologue): Delete local variable "orig_pc", use
|
|
||||||
"func_start". Add local variable "num_skip_linux_syscall_insn",
|
|
||||||
use to skip over first half of a GNU/Linux syscall and update
|
|
||||||
"func_start".
|
|
||||||
|
|
||||||
diff --git a/gdb/rs6000-tdep.c b/gdb/rs6000-tdep.c
|
|
||||||
--- a/gdb/rs6000-tdep.c
|
|
||||||
+++ b/gdb/rs6000-tdep.c
|
|
||||||
@@ -134,6 +134,7 @@ static const char *powerpc_vector_abi_string = "auto";
|
|
||||||
|
|
||||||
struct rs6000_framedata
|
|
||||||
{
|
|
||||||
+ CORE_ADDR func_start; /* True function start. */
|
|
||||||
int offset; /* total size of frame --- the distance
|
|
||||||
by which we decrement sp to allocate
|
|
||||||
the frame */
|
|
||||||
@@ -1426,7 +1427,6 @@ static CORE_ADDR
|
|
||||||
skip_prologue (struct gdbarch *gdbarch, CORE_ADDR pc, CORE_ADDR lim_pc,
|
|
||||||
struct rs6000_framedata *fdata)
|
|
||||||
{
|
|
||||||
- CORE_ADDR orig_pc = pc;
|
|
||||||
CORE_ADDR last_prologue_pc = pc;
|
|
||||||
CORE_ADDR li_found_pc = 0;
|
|
||||||
gdb_byte buf[4];
|
|
||||||
@@ -1445,12 +1445,14 @@ skip_prologue (struct gdbarch *gdbarch, CORE_ADDR pc, CORE_ADDR lim_pc,
|
|
||||||
int minimal_toc_loaded = 0;
|
|
||||||
int prev_insn_was_prologue_insn = 1;
|
|
||||||
int num_skip_non_prologue_insns = 0;
|
|
||||||
+ int num_skip_ppc64_gnu_linux_syscall_insn = 0;
|
|
||||||
int r0_contains_arg = 0;
|
|
||||||
const struct bfd_arch_info *arch_info = gdbarch_bfd_arch_info (gdbarch);
|
|
||||||
struct gdbarch_tdep *tdep = gdbarch_tdep (gdbarch);
|
|
||||||
enum bfd_endian byte_order = gdbarch_byte_order (gdbarch);
|
|
||||||
|
|
||||||
memset (fdata, 0, sizeof (struct rs6000_framedata));
|
|
||||||
+ fdata->func_start = pc;
|
|
||||||
fdata->saved_gpr = -1;
|
|
||||||
fdata->saved_fpr = -1;
|
|
||||||
fdata->saved_vr = -1;
|
|
||||||
@@ -1484,6 +1486,55 @@ skip_prologue (struct gdbarch *gdbarch, CORE_ADDR pc, CORE_ADDR lim_pc,
|
|
||||||
break;
|
|
||||||
op = extract_unsigned_integer (buf, 4, byte_order);
|
|
||||||
|
|
||||||
+ /* A PPC64 GNU/Linux system call function is split into two
|
|
||||||
+ sub-functions: a non-threaded fast-path (__NAME_nocancel)
|
|
||||||
+ which does not use a frame; and a threaded slow-path
|
|
||||||
+ (Lpseudo_cancel) that does create a frame. Ref:
|
|
||||||
+ nptl/sysdeps/unix/sysv/linux/powerpc/powerpc32/sysdep-cancel.h
|
|
||||||
+
|
|
||||||
+ *INDENT-OFF*
|
|
||||||
+ NAME:
|
|
||||||
+ SINGLE_THREAD_P
|
|
||||||
+ bne- .Lpseudo_cancel
|
|
||||||
+ __NAME_nocancel:
|
|
||||||
+ li r0,162
|
|
||||||
+ sc
|
|
||||||
+ bnslr+
|
|
||||||
+ b 0x7fe014ef64 <.__syscall_error>
|
|
||||||
+ Lpseudo_cancel:
|
|
||||||
+ stdu r1,-128(r1)
|
|
||||||
+ ...
|
|
||||||
+ *INDENT-ON*
|
|
||||||
+
|
|
||||||
+ Unfortunatly, because the latter case uses a local label (not
|
|
||||||
+ in the symbol table) a PC in "Lpseudo_cancel" appears to be
|
|
||||||
+ in "__NAME_nocancel". The following code recognizes this,
|
|
||||||
+ adjusting FUNC_START to point to where "Lpseudo_cancel"
|
|
||||||
+ should be, and parsing the prologue sequence as if
|
|
||||||
+ "Lpseudo_cancel" was the entry point. */
|
|
||||||
+
|
|
||||||
+ if (((op & 0xffff0000) == 0x38000000 /* li r0,N */
|
|
||||||
+ && pc == fdata->func_start + 0
|
|
||||||
+ && num_skip_ppc64_gnu_linux_syscall_insn == 0)
|
|
||||||
+ || (op == 0x44000002 /* sc */
|
|
||||||
+ && pc == fdata->func_start + 4
|
|
||||||
+ && num_skip_ppc64_gnu_linux_syscall_insn == 1)
|
|
||||||
+ || (op == 0x4ca30020 /* bnslr+ */
|
|
||||||
+ && pc == fdata->func_start + 8
|
|
||||||
+ && num_skip_ppc64_gnu_linux_syscall_insn == 2))
|
|
||||||
+ {
|
|
||||||
+ num_skip_ppc64_gnu_linux_syscall_insn++;
|
|
||||||
+ continue;
|
|
||||||
+ }
|
|
||||||
+ else if ((op & 0xfc000003) == 0x48000000 /* b __syscall_error */
|
|
||||||
+ && pc == fdata->func_start + 12
|
|
||||||
+ && num_skip_ppc64_gnu_linux_syscall_insn == 3)
|
|
||||||
+ {
|
|
||||||
+ num_skip_ppc64_gnu_linux_syscall_insn = -1;
|
|
||||||
+ fdata->func_start = pc;
|
|
||||||
+ continue;
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
if ((op & 0xfc1fffff) == 0x7c0802a6)
|
|
||||||
{ /* mflr Rx */
|
|
||||||
/* Since shared library / PIC code, which needs to get its
|
|
||||||
@@ -1673,9 +1724,9 @@ skip_prologue (struct gdbarch *gdbarch, CORE_ADDR pc, CORE_ADDR lim_pc,
|
|
||||||
we have no line table information or the line info tells
|
|
||||||
us that the subroutine call is not part of the line
|
|
||||||
associated with the prologue. */
|
|
||||||
- if ((pc - orig_pc) > 8)
|
|
||||||
+ if ((pc - fdata->func_start) > 8)
|
|
||||||
{
|
|
||||||
- struct symtab_and_line prologue_sal = find_pc_line (orig_pc, 0);
|
|
||||||
+ struct symtab_and_line prologue_sal = find_pc_line (fdata->func_start, 0);
|
|
||||||
struct symtab_and_line this_sal = find_pc_line (pc, 0);
|
|
||||||
|
|
||||||
if ((prologue_sal.line == 0)
|
|
@ -1,35 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Andrew Cagney <cagney@gnu.org>
|
|
||||||
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
|
||||||
Subject: gdb-6.3-readnever-20050907.patch
|
|
||||||
|
|
||||||
;; Add readnever option
|
|
||||||
;;=push
|
|
||||||
|
|
||||||
2004-11-18 Andrew Cagney <cagney@gnu.org>
|
|
||||||
|
|
||||||
* dwarf2read.c: Include "top.c".
|
|
||||||
(dwarf2_has_info): Check for readnever_symbol_files.
|
|
||||||
* symfile.c (readnever_symbol_files): Define.
|
|
||||||
* top.h (readnever_symbol_files): Declare.
|
|
||||||
* main.c (captured_main): Add --readnever option.
|
|
||||||
(print_gdb_help): Ditto.
|
|
||||||
|
|
||||||
2004-11-18 Andrew Cagney <cagney@gnu.org>
|
|
||||||
|
|
||||||
* gdb.texinfo (File Options): Document --readnever.
|
|
||||||
|
|
||||||
Pushed upstream: https://sourceware.org/ml/gdb-cvs/2017-12/msg00007.html
|
|
||||||
|
|
||||||
diff --git a/gdb/gcore.in b/gdb/gcore.in
|
|
||||||
--- a/gdb/gcore.in
|
|
||||||
+++ b/gdb/gcore.in
|
|
||||||
@@ -97,7 +97,7 @@ for pid in "$@"
|
|
||||||
do
|
|
||||||
# `</dev/null' to avoid touching interactive terminal if it is
|
|
||||||
# available but not accessible as GDB would get stopped on SIGTTIN.
|
|
||||||
- "$binary_path/@GDB_TRANSFORM_NAME@" </dev/null --nx --batch \
|
|
||||||
+ "$binary_path/@GDB_TRANSFORM_NAME@" </dev/null --nx --batch --readnever \
|
|
||||||
-ex "set pagination off" -ex "set height 0" -ex "set width 0" \
|
|
||||||
"${dump_all_cmds[@]}" \
|
|
||||||
-ex "attach $pid" -ex "gcore $name.$pid" -ex detach -ex quit
|
|
@ -1,26 +0,0 @@
|
|||||||
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-rh-testversion-20041202.patch
|
|
||||||
|
|
||||||
;; Match the Fedora's version info.
|
|
||||||
;;=fedora
|
|
||||||
|
|
||||||
2003-02-24 Elena Zannoni <ezannoni@redhat.com>
|
|
||||||
|
|
||||||
* gdb.gdb/selftest.exp: Add matching on specific Red Hat only version
|
|
||||||
string.
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.gdb/selftest.exp b/gdb/testsuite/gdb.gdb/selftest.exp
|
|
||||||
--- a/gdb/testsuite/gdb.gdb/selftest.exp
|
|
||||||
+++ b/gdb/testsuite/gdb.gdb/selftest.exp
|
|
||||||
@@ -53,6 +53,9 @@ proc test_with_self { } {
|
|
||||||
-re ".\[0-9\]+ = +.+ +0x.*\[0-9.\]+.*$gdb_prompt $" {
|
|
||||||
pass "printed version with cast"
|
|
||||||
}
|
|
||||||
+ -re ".\[0-9\]+ = .(Fedora|Red Hat Enterprise Linux) \[\\(\\)0-9.a-z\\-\]+.*$gdb_prompt $" {
|
|
||||||
+ pass "printed version Fedora or Red Hat Enterprise Linux only"
|
|
||||||
+ }
|
|
||||||
}
|
|
||||||
|
|
||||||
# start the "xgdb" process
|
|
@ -1,247 +0,0 @@
|
|||||||
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.3-test-dtorfix-20050121.patch
|
|
||||||
|
|
||||||
;; Test support of multiple destructors just like multiple constructors
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.cp/constructortest.cc b/gdb/testsuite/gdb.cp/constructortest.cc
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.cp/constructortest.cc
|
|
||||||
@@ -0,0 +1,99 @@
|
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ 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. */
|
|
||||||
+
|
|
||||||
+class A
|
|
||||||
+{
|
|
||||||
+ public:
|
|
||||||
+ A();
|
|
||||||
+ ~A();
|
|
||||||
+ int k;
|
|
||||||
+ private:
|
|
||||||
+ int x;
|
|
||||||
+};
|
|
||||||
+
|
|
||||||
+class B: public A
|
|
||||||
+{
|
|
||||||
+ public:
|
|
||||||
+ B();
|
|
||||||
+ private:
|
|
||||||
+ int y;
|
|
||||||
+};
|
|
||||||
+
|
|
||||||
+/* C and D are for the $delete destructor. */
|
|
||||||
+
|
|
||||||
+class C
|
|
||||||
+{
|
|
||||||
+ public:
|
|
||||||
+ C();
|
|
||||||
+ virtual ~C();
|
|
||||||
+ private:
|
|
||||||
+ int x;
|
|
||||||
+};
|
|
||||||
+
|
|
||||||
+class D: public C
|
|
||||||
+{
|
|
||||||
+ public:
|
|
||||||
+ D();
|
|
||||||
+ private:
|
|
||||||
+ int y;
|
|
||||||
+};
|
|
||||||
+
|
|
||||||
+int main(int argc, char *argv[])
|
|
||||||
+{
|
|
||||||
+ A* a = new A;
|
|
||||||
+ B* b = new B;
|
|
||||||
+ D* d = new D;
|
|
||||||
+ delete a;
|
|
||||||
+ delete b;
|
|
||||||
+ delete d;
|
|
||||||
+ return 0;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+A::A() /* Constructor A */
|
|
||||||
+{
|
|
||||||
+ x = 1; /* First line A */
|
|
||||||
+ k = 4; /* Second line A */
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+A::~A() /* Destructor A */
|
|
||||||
+{
|
|
||||||
+ x = 3; /* First line ~A */
|
|
||||||
+ k = 6; /* Second line ~A */
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+B::B()
|
|
||||||
+{
|
|
||||||
+ y = 2; /* First line B */
|
|
||||||
+ k = 5;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+C::C() /* Constructor C */
|
|
||||||
+{
|
|
||||||
+ x = 1; /* First line C */
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+C::~C() /* Destructor C */
|
|
||||||
+{
|
|
||||||
+ x = 3; /* First line ~C */
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+D::D()
|
|
||||||
+{
|
|
||||||
+ y = 2; /* First line D */
|
|
||||||
+}
|
|
||||||
diff --git a/gdb/testsuite/gdb.cp/constructortest.exp b/gdb/testsuite/gdb.cp/constructortest.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.cp/constructortest.exp
|
|
||||||
@@ -0,0 +1,130 @@
|
|
||||||
+# This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+# Copyright 2005, 2007 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.
|
|
||||||
+
|
|
||||||
+# Check that GDB can break at multiple forms of constructors.
|
|
||||||
+
|
|
||||||
+set testfile "constructortest"
|
|
||||||
+set srcfile ${testfile}.cc
|
|
||||||
+set binfile [standard_output_file ${testfile}]
|
|
||||||
+# PIE is required for testing proper BREAKPOINT_RE_SET of the multiple-PC
|
|
||||||
+# breakpoints.
|
|
||||||
+if {[gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++ "additional_flags=-fpie -pie"}] != "" } {
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+gdb_exit
|
|
||||||
+gdb_start
|
|
||||||
+gdb_reinitialize_dir $srcdir/$subdir
|
|
||||||
+gdb_load ${binfile}
|
|
||||||
+
|
|
||||||
+#
|
|
||||||
+# Run to `main' where we begin our tests.
|
|
||||||
+#
|
|
||||||
+
|
|
||||||
+if ![runto_main] then {
|
|
||||||
+ gdb_suppress_tests
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Break on the various forms of the A::A constructor.
|
|
||||||
+# " (2 locations)" is displayed depending on G++ version.
|
|
||||||
+gdb_test "break A\:\:A" "Breakpoint 2 at .*" "breaking on A::A"
|
|
||||||
+
|
|
||||||
+# Verify that we break for the A constructor two times
|
|
||||||
+# Once for new A and once for new B
|
|
||||||
+gdb_continue_to_breakpoint "First line A"
|
|
||||||
+gdb_test "bt" "#0.*A.*#1.*main.*" "Verify in in-charge A::A"
|
|
||||||
+gdb_continue_to_breakpoint "First line A"
|
|
||||||
+gdb_test "bt" "#0.*A.*#1.*B.*#2.*main.*" "Verify in not-in-charge A::A"
|
|
||||||
+
|
|
||||||
+# Now do the same for destructors
|
|
||||||
+gdb_test "break 'A::~A()'" ""
|
|
||||||
+
|
|
||||||
+# Verify that we break for the A destructor two times
|
|
||||||
+# Once for delete a and once for delete b
|
|
||||||
+gdb_continue_to_breakpoint "First line ~A"
|
|
||||||
+gdb_test "bt" "#0.*~A.*#1.*main.*" "Verify in in-charge A::~A"
|
|
||||||
+gdb_continue_to_breakpoint "First line ~A"
|
|
||||||
+gdb_test "bt" "#0.*~A.*#1.*~B.*#2.*main.*" "Verify in not-in-charge A::~A"
|
|
||||||
+
|
|
||||||
+
|
|
||||||
+# Verify that we can break by line number in a constructor and find
|
|
||||||
+# both occurrences
|
|
||||||
+runto_main
|
|
||||||
+gdb_test "break 'A::A()'" "" "break in constructor A 2"
|
|
||||||
+gdb_continue_to_breakpoint "First line A"
|
|
||||||
+set second_line [gdb_get_line_number "Second line A"]
|
|
||||||
+# " (2 locations)" is displayed depending on G++ version.
|
|
||||||
+gdb_test "break $second_line" "Breakpoint .*, line $second_line\\..*" "break by line in constructor"
|
|
||||||
+gdb_continue_to_breakpoint "Second line A"
|
|
||||||
+gdb_test "bt" "#0.*A.*#1.*main.*" "Verify in in-charge A::A second line"
|
|
||||||
+gdb_continue_to_breakpoint "Second line A"
|
|
||||||
+gdb_test "bt" "#0.*A.*#1.*B.*#2.*main.*" "Verify in not-in-charge A::A second line"
|
|
||||||
+
|
|
||||||
+# Verify that we can break by line number in a destructor and find
|
|
||||||
+# both occurrences
|
|
||||||
+gdb_test "break 'A::~A()'" "" "break in constructor ~A 2"
|
|
||||||
+gdb_continue_to_breakpoint "First line ~A"
|
|
||||||
+set second_line_dtor [gdb_get_line_number "Second line ~A"]
|
|
||||||
+# " (2 locations)" is displayed depending on G++ version.
|
|
||||||
+gdb_test "break $second_line_dtor" "Breakpoint .*, line $second_line_dtor\\..*" "break by line in destructor"
|
|
||||||
+gdb_continue_to_breakpoint "Second line ~A"
|
|
||||||
+gdb_test "bt" "#0.*A.*#1.*main.*" "Verify in in-charge A::~A second line"
|
|
||||||
+# FIXME: Analyse this case better.
|
|
||||||
+gdb_continue_to_breakpoint "Second line ~A"
|
|
||||||
+gdb_test "bt" "#0.*A.*#1.*main.*" "Verify in A::~A second line #2"
|
|
||||||
+gdb_continue_to_breakpoint "Second line ~A"
|
|
||||||
+gdb_test "bt" "#0.*A.*#1.*B.*#2.*main.*" "Verify in not-in-charge A::~A second line"
|
|
||||||
+
|
|
||||||
+
|
|
||||||
+# Test now the $delete destructors.
|
|
||||||
+
|
|
||||||
+gdb_load ${binfile}
|
|
||||||
+runto_main
|
|
||||||
+
|
|
||||||
+set first_line_dtor [gdb_get_line_number "First line ~C"]
|
|
||||||
+set define_line_dtor [gdb_get_line_number "Destructor C"]
|
|
||||||
+# Break on the various forms of the C::~C destructor
|
|
||||||
+# " ([23] locations)" is displayed depending on G++ version.
|
|
||||||
+gdb_test "break C\:\:~C" "Breakpoint .*: C::~C\\. \\(2 locations\\)" "breaking on C::~C"
|
|
||||||
+gdb_continue_to_breakpoint "First line ~C"
|
|
||||||
+
|
|
||||||
+# Verify that we can break by line number in a destructor and find
|
|
||||||
+# the $delete occurence
|
|
||||||
+
|
|
||||||
+gdb_load ${binfile}
|
|
||||||
+delete_breakpoints
|
|
||||||
+
|
|
||||||
+# " (3 locations)" is displayed depending on G++ version.
|
|
||||||
+gdb_test "break $first_line_dtor" "Breakpoint .*, line $first_line_dtor\\..*" "break by line in destructor"
|
|
||||||
+
|
|
||||||
+# Run to `main' where we begin our tests.
|
|
||||||
+# Set the breakpoints first to test PIE multiple-PC BREAKPOINT_RE_SET.
|
|
||||||
+# RUNTO_MAIN or RUNTO MAIN are not usable here as it runs DELETE_BREAKPOINTS.
|
|
||||||
+
|
|
||||||
+if ![gdb_breakpoint main] {
|
|
||||||
+ gdb_suppress_tests
|
|
||||||
+}
|
|
||||||
+gdb_run_cmd
|
|
||||||
+set test "running to main"
|
|
||||||
+gdb_test_multiple "" $test {
|
|
||||||
+ -re "Breakpoint \[0-9\]*, main .*$gdb_prompt $" {
|
|
||||||
+ pass $test
|
|
||||||
+ }
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+gdb_continue_to_breakpoint "First line ~C"
|
|
@ -1,103 +0,0 @@
|
|||||||
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-movedir-20050125.patch
|
|
||||||
|
|
||||||
;; Fix to support executable moving
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
2005-01-25 Elena Zannoni <ezannoni@redhat.com>
|
|
||||||
|
|
||||||
* gdb.base/move-dir.exp: New test.
|
|
||||||
* gdb.base/move-dir.c: Ditto.
|
|
||||||
* gdb.base/move-dir.h: Ditto.
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/move-dir.c b/gdb/testsuite/gdb.base/move-dir.c
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.base/move-dir.c
|
|
||||||
@@ -0,0 +1,10 @@
|
|
||||||
+#include <stdio.h>
|
|
||||||
+#include <stdlib.h>
|
|
||||||
+#include "move-dir.h"
|
|
||||||
+
|
|
||||||
+int main() {
|
|
||||||
+ const char* hw = "hello world.";
|
|
||||||
+ printf ("%s\n", hw);;
|
|
||||||
+ other();
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/move-dir.exp b/gdb/testsuite/gdb.base/move-dir.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.base/move-dir.exp
|
|
||||||
@@ -0,0 +1,57 @@
|
|
||||||
+# 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.
|
|
||||||
+
|
|
||||||
+set testfile "move-dir"
|
|
||||||
+set srcfile ${testfile}.c
|
|
||||||
+set incfile ${testfile}.h
|
|
||||||
+set binfile [standard_output_file ${testfile}]
|
|
||||||
+
|
|
||||||
+set testdir [standard_output_file incdir]
|
|
||||||
+
|
|
||||||
+remote_exec build "mkdir $testdir"
|
|
||||||
+remote_exec build "cp ${srcdir}/${subdir}/${srcfile} [standard_output_file ${srcfile}]"
|
|
||||||
+remote_exec build "cp ${srcdir}/${subdir}/${incfile} [standard_output_file ${incfile}]"
|
|
||||||
+
|
|
||||||
+set additional_flags "additional_flags=-I${subdir}/incdir"
|
|
||||||
+
|
|
||||||
+if { [gdb_compile [standard_output_file ${srcfile}] "${binfile}" executable [list debug $additional_flags]] != "" } {
|
|
||||||
+ gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Create and source the file that provides information about the compiler
|
|
||||||
+# used to compile the test case.
|
|
||||||
+
|
|
||||||
+if [get_compiler_info ${binfile}] {
|
|
||||||
+ return -1;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+
|
|
||||||
+set oldtimeout $timeout
|
|
||||||
+set timeout [expr "$timeout + 60"]
|
|
||||||
+
|
|
||||||
+# Start with a fresh gdb.
|
|
||||||
+
|
|
||||||
+gdb_exit
|
|
||||||
+gdb_start
|
|
||||||
+gdb_test "cd ../.." "" ""
|
|
||||||
+gdb_load ${binfile}
|
|
||||||
+gdb_test "list main" ".*hw.*other.*" "found main"
|
|
||||||
+gdb_test "list other" ".*ostring.*" "found include file"
|
|
||||||
+
|
|
||||||
+
|
|
||||||
+set timeout $oldtimeout
|
|
||||||
+return 0
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/move-dir.h b/gdb/testsuite/gdb.base/move-dir.h
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.base/move-dir.h
|
|
||||||
@@ -0,0 +1,7 @@
|
|
||||||
+#include <stdlib.h>
|
|
||||||
+
|
|
||||||
+void other() {
|
|
||||||
+ const char* ostring = "other";
|
|
||||||
+ printf ("%s\n", ostring);;
|
|
||||||
+}
|
|
||||||
+
|
|
File diff suppressed because it is too large
Load Diff
@ -1,42 +0,0 @@
|
|||||||
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
|
|
||||||
@@ -151,18 +151,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"
|
|
@ -1,254 +0,0 @@
|
|||||||
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-threaded-watchpoints2-20050225.patch
|
|
||||||
|
|
||||||
;; Test sibling threads to set threaded watchpoints for x86 and x86-64
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
2005-02-28 Jeff Johnston <jjohnstn@redhat.com>
|
|
||||||
|
|
||||||
* config/i386/nm-linux.h: Change dr register routines to
|
|
||||||
accept a ptid_t first argument. Change all calling macros
|
|
||||||
to default the inferior_ptid for the first argument.
|
|
||||||
(i386_linux_insert_watchpoint): New prototype.
|
|
||||||
(i386_linux_remove_watchpoint, i386_linux_insert_hw_breakpoint): Ditto.
|
|
||||||
(i386_linux_remove_hw_breakpoint): Ditto.
|
|
||||||
(target_insert_watchpoint, target_remove_watchpoint): Undef and
|
|
||||||
override.
|
|
||||||
(target_insert_hw_breakpoint, target_remove_hw_breakpoint): Ditto.
|
|
||||||
* config/i386/nm-linux64.h: Ditto except add amd64 versions of
|
|
||||||
the watchpoint/hw-breakpoint insert/remove routines.
|
|
||||||
* i386-nat.c: Include "inferior.h" to define inferior_ptid.
|
|
||||||
* i386-linux-nat.c: Change all dr get/set routines to accept
|
|
||||||
ptid_t as first argument and to use this argument to determine
|
|
||||||
the tid for PTRACE.
|
|
||||||
(i386_linux_set_debug_regs_for_thread): New function.
|
|
||||||
(i386_linux_sync_debug_registers_callback): Ditto.
|
|
||||||
(i386_linux_sync_debug_registers_across_threads): Ditto.
|
|
||||||
(i386_linux_insert_watchpoint, i386_linux_remove_watchpoint): Ditto.
|
|
||||||
(i386_linux_hw_breakpoint, i386_linux_remove_hw_breakpoint): Ditto.
|
|
||||||
(i386_linux_new_thread): Ditto.
|
|
||||||
(_initialize_i386_linux_nat): Ditto.
|
|
||||||
* amd64-linux-nat.c: Change all dr get/set routines to accept
|
|
||||||
ptid_t as first argument and to use this argument to determine
|
|
||||||
the tid for PTRACE.
|
|
||||||
(amd64_linux_set_debug_regs_for_thread): New function.
|
|
||||||
(amd64_linux_sync_debug_registers_callback): Ditto.
|
|
||||||
(amd64_linux_sync_debug_registers_across_threads): Ditto.
|
|
||||||
(amd64_linux_insert_watchpoint, amd64_linux_remove_watchpoint): Ditto.
|
|
||||||
(amd64_linux_hw_breakpoint, amd64_linux_remove_hw_breakpoint): Ditto.
|
|
||||||
(amd64_linux_new_thread): Ditto.
|
|
||||||
(_initialize_amd64_linux_nat): Register linux new thread observer.
|
|
||||||
* testsuite/gdb.threads/watchthreads-threaded.c: New test case.
|
|
||||||
* testsuite/gdb.threads/watchthreads-threaded.exp: Ditto.
|
|
||||||
|
|
||||||
[ With recent upstream GDB (6.8) reduced only to the testcase. ]
|
|
||||||
|
|
||||||
[ It was called watchthreads2.{exp,c} before but it conflicted with FSF GDB new
|
|
||||||
testcase of the same name. ]
|
|
||||||
|
|
||||||
FIXME: The testcase does not expects multiple watchpoints hits per one stop.
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.threads/watchthreads-threaded.c b/gdb/testsuite/gdb.threads/watchthreads-threaded.c
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.threads/watchthreads-threaded.c
|
|
||||||
@@ -0,0 +1,66 @@
|
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ Copyright 2002, 2003, 2004, 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 file is copied from schedlock.c. */
|
|
||||||
+
|
|
||||||
+#include <stdio.h>
|
|
||||||
+#include <unistd.h>
|
|
||||||
+#include <stdlib.h>
|
|
||||||
+#include <pthread.h>
|
|
||||||
+
|
|
||||||
+void *thread_function(void *arg); /* Pointer to function executed by each thread */
|
|
||||||
+
|
|
||||||
+#define NUM 5
|
|
||||||
+
|
|
||||||
+unsigned int args[NUM+1];
|
|
||||||
+
|
|
||||||
+int main() {
|
|
||||||
+ int res;
|
|
||||||
+ pthread_t threads[NUM];
|
|
||||||
+ void *thread_result;
|
|
||||||
+ long i;
|
|
||||||
+
|
|
||||||
+ for (i = 0; i < NUM; i++)
|
|
||||||
+ {
|
|
||||||
+ args[i] = 1; /* Init value. */
|
|
||||||
+ res = pthread_create(&threads[i],
|
|
||||||
+ NULL,
|
|
||||||
+ thread_function,
|
|
||||||
+ (void *) i);
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+ args[i] = 1;
|
|
||||||
+ thread_function ((void *) i);
|
|
||||||
+
|
|
||||||
+ exit(EXIT_SUCCESS);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+void *thread_function(void *arg) {
|
|
||||||
+ int my_number = (long) arg;
|
|
||||||
+ int *myp = (int *) &args[my_number];
|
|
||||||
+
|
|
||||||
+ /* Don't run forever. Run just short of it :) */
|
|
||||||
+ while (*myp > 0)
|
|
||||||
+ {
|
|
||||||
+ (*myp) ++; usleep (1); /* Loop increment. */
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+ pthread_exit(NULL);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
diff --git a/gdb/testsuite/gdb.threads/watchthreads-threaded.exp b/gdb/testsuite/gdb.threads/watchthreads-threaded.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.threads/watchthreads-threaded.exp
|
|
||||||
@@ -0,0 +1,126 @@
|
|
||||||
+# This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+# 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.
|
|
||||||
+
|
|
||||||
+# Check that GDB can support multiple watchpoints across threads.
|
|
||||||
+
|
|
||||||
+# This test verifies that a watchpoint is detected in the proper thread
|
|
||||||
+# so the test is only meaningful on a system with hardware watchpoints.
|
|
||||||
+if [target_info exists gdb,no_hardware_watchpoints] {
|
|
||||||
+ return 0;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+set testfile "watchthreads-threaded"
|
|
||||||
+set srcfile ${testfile}.c
|
|
||||||
+set binfile [standard_output_file ${testfile}]
|
|
||||||
+if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable [list debug "incdir=${objdir}"]] != "" } {
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+gdb_exit
|
|
||||||
+gdb_start
|
|
||||||
+gdb_reinitialize_dir $srcdir/$subdir
|
|
||||||
+gdb_load ${binfile}
|
|
||||||
+
|
|
||||||
+gdb_test "set can-use-hw-watchpoints 1" "" ""
|
|
||||||
+
|
|
||||||
+#
|
|
||||||
+# Run to `main' where we begin our tests.
|
|
||||||
+#
|
|
||||||
+
|
|
||||||
+if ![runto_main] then {
|
|
||||||
+ gdb_suppress_tests
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+set args_2 0
|
|
||||||
+set args_3 0
|
|
||||||
+
|
|
||||||
+gdb_breakpoint "thread_function"
|
|
||||||
+gdb_continue_to_breakpoint "thread_function"
|
|
||||||
+gdb_test "disable 2" ""
|
|
||||||
+
|
|
||||||
+gdb_test_multiple "p args\[2\]" "get initial args2" {
|
|
||||||
+ -re "\\\$\[0-9\]* = (.*)$gdb_prompt $" {
|
|
||||||
+ set init_args_2 $expect_out(1,string)
|
|
||||||
+ pass "get initial args2"
|
|
||||||
+ }
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+gdb_test_multiple "p args\[3\]" "get initial args3" {
|
|
||||||
+ -re "\\\$\[0-9\]* = (.*)$gdb_prompt $" {
|
|
||||||
+ set init_args_3 $expect_out(1,string)
|
|
||||||
+ pass "get initial args3"
|
|
||||||
+ }
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+set args_2 $init_args_2
|
|
||||||
+set args_3 $init_args_3
|
|
||||||
+
|
|
||||||
+# Watch values that will be modified by distinct threads.
|
|
||||||
+gdb_test "watch args\[2\]" "Hardware watchpoint 3: args\\\[2\\\]"
|
|
||||||
+gdb_test "watch args\[3\]" "Hardware watchpoint 4: args\\\[3\\\]"
|
|
||||||
+
|
|
||||||
+set init_line [expr [gdb_get_line_number "Init value"]+1]
|
|
||||||
+set inc_line [gdb_get_line_number "Loop increment"]
|
|
||||||
+
|
|
||||||
+# Loop and continue to allow both watchpoints to be triggered.
|
|
||||||
+for {set i 0} {$i < 30} {incr i} {
|
|
||||||
+ set test_flag 0
|
|
||||||
+ gdb_test_multiple "continue" "threaded watch loop" {
|
|
||||||
+ -re "Hardware watchpoint 3: args\\\[2\\\].*Old value = 0.*New value = 1.*main \\\(\\\) at .*watchthreads-threaded.c:$init_line.*$gdb_prompt $"
|
|
||||||
+ { 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 $"
|
|
||||||
+ { set args_3 1; set test_flag 1 }
|
|
||||||
+ -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 }
|
|
||||||
+ -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 }
|
|
||||||
+ }
|
|
||||||
+ # If we fail above, don't bother continuing loop
|
|
||||||
+ if { $test_flag == 0 } {
|
|
||||||
+ set i 30;
|
|
||||||
+ }
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Print success message if loop succeeded.
|
|
||||||
+if { $test_flag == 1 } {
|
|
||||||
+ pass "threaded watch loop"
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Verify that we hit first watchpoint in child thread.
|
|
||||||
+set message "watchpoint on args\[2\] hit in thread"
|
|
||||||
+if { $args_2 > 1 } {
|
|
||||||
+ pass $message
|
|
||||||
+} else {
|
|
||||||
+ fail $message
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Verify that we hit second watchpoint in child thread.
|
|
||||||
+set message "watchpoint on args\[3\] hit in thread"
|
|
||||||
+if { $args_3 > 1 } {
|
|
||||||
+ pass $message
|
|
||||||
+} else {
|
|
||||||
+ fail $message
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Verify that all watchpoint hits are accounted for.
|
|
||||||
+set message "combination of threaded watchpoints = 30 + initial values"
|
|
||||||
+if { [expr $args_2+$args_3] == [expr [expr 30+$init_args_2]+$init_args_3] } {
|
|
||||||
+ pass $message
|
|
||||||
+} else {
|
|
||||||
+ fail $message
|
|
||||||
+}
|
|
@ -1,938 +0,0 @@
|
|||||||
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-BEA-testsuite.patch
|
|
||||||
|
|
||||||
;; 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.
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.threads/threadcrash.c b/gdb/testsuite/gdb.threads/threadcrash.c
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.threads/threadcrash.c
|
|
||||||
@@ -0,0 +1,301 @@
|
|
||||||
+/*
|
|
||||||
+ * The point of this program is to crash in a multi-threaded app.
|
|
||||||
+ * There are seven threads, doing the following things:
|
|
||||||
+ * * Spinning
|
|
||||||
+ * * Spinning inside a signal handler
|
|
||||||
+ * * Spinning inside a signal handler executing on the altstack
|
|
||||||
+ * * In a syscall
|
|
||||||
+ * * In a syscall inside a signal handler
|
|
||||||
+ * * In a syscall inside a signal handler executing on the altstack
|
|
||||||
+ * * Finally, the main thread crashes in main, with no frills.
|
|
||||||
+ *
|
|
||||||
+ * These are the things threads in JRockit tend to be doing. If gdb
|
|
||||||
+ * can handle those things, both in core files and during live
|
|
||||||
+ * debugging, that will help (at least) JRockit development.
|
|
||||||
+ *
|
|
||||||
+ * Let the program create a core file, then load the core file into
|
|
||||||
+ * gdb. Inside gdb, you should be able to do something like this:
|
|
||||||
+ *
|
|
||||||
+ * (gdb) t a a bt
|
|
||||||
+ *
|
|
||||||
+ * Thread 7 (process 4352):
|
|
||||||
+ * #0 0x001ba7dc in __nanosleep_nocancel () from /lib/tls/libc.so.6
|
|
||||||
+ * #1 0x001ba5ff in sleep () from /lib/tls/libc.so.6
|
|
||||||
+ * #2 0x080488a2 in makeSyscall (ignored=0x0) at threadcrash.c:118
|
|
||||||
+ * #3 0x006aadec in start_thread () from /lib/tls/libpthread.so.0
|
|
||||||
+ * #4 0x001ed19a in clone () from /lib/tls/libc.so.6
|
|
||||||
+ *
|
|
||||||
+ * Thread 6 (process 4353):
|
|
||||||
+ * #0 0x001ba7dc in __nanosleep_nocancel () from /lib/tls/libc.so.6
|
|
||||||
+ * #1 0x001ba5ff in sleep () from /lib/tls/libc.so.6
|
|
||||||
+ * #2 0x0804898f in syscallingSighandler (signo=10, info=0xb6be76f0, context=0xb6be7770)
|
|
||||||
+ * at threadcrash.c:168
|
|
||||||
+ * #3 <signal handler called>
|
|
||||||
+ * #4 0x006adf5e in pthread_kill () from /lib/tls/libpthread.so.0
|
|
||||||
+ * #5 0x08048a51 in makeSyscallFromSighandler (ignored=0x0) at threadcrash.c:204
|
|
||||||
+ * #6 0x006aadec in start_thread () from /lib/tls/libpthread.so.0
|
|
||||||
+ * #7 0x001ed19a in clone () from /lib/tls/libc.so.6
|
|
||||||
+ *
|
|
||||||
+ * Thread 5 (process 4354):
|
|
||||||
+ * #0 0x001ba7dc in __nanosleep_nocancel () from /lib/tls/libc.so.6
|
|
||||||
+ * #1 0x001ba5ff in sleep () from /lib/tls/libc.so.6
|
|
||||||
+ * #2 0x08048936 in syscallingAltSighandler (signo=3, info=0x959cd70, context=0x959cdf0)
|
|
||||||
+ * at threadcrash.c:144
|
|
||||||
+ * #3 <signal handler called>
|
|
||||||
+ * #4 0x006adf5e in pthread_kill () from /lib/tls/libpthread.so.0
|
|
||||||
+ * #5 0x080489e2 in makeSyscallFromAltSighandler (ignored=0x0) at threadcrash.c:190
|
|
||||||
+ * #6 0x006aadec in start_thread () from /lib/tls/libpthread.so.0
|
|
||||||
+ * #7 0x001ed19a in clone () from /lib/tls/libc.so.6
|
|
||||||
+ *
|
|
||||||
+ * Thread 4 (process 4355):
|
|
||||||
+ * #0 spin (ignored=0x0) at threadcrash.c:242
|
|
||||||
+ * #1 0x006aadec in start_thread () from /lib/tls/libpthread.so.0
|
|
||||||
+ * #2 0x001ed19a in clone () from /lib/tls/libc.so.6
|
|
||||||
+ *
|
|
||||||
+ * Thread 3 (process 4356):
|
|
||||||
+ * #0 spinningSighandler (signo=12, info=0xb4de46f0, context=0xb4de4770) at threadcrash.c:180
|
|
||||||
+ * #1 <signal handler called>
|
|
||||||
+ * #2 0x006adf5e in pthread_kill () from /lib/tls/libpthread.so.0
|
|
||||||
+ * #3 0x08048b2f in spinFromSighandler (ignored=0x0) at threadcrash.c:232
|
|
||||||
+ * #4 0x006aadec in start_thread () from /lib/tls/libpthread.so.0
|
|
||||||
+ * #5 0x001ed19a in clone () from /lib/tls/libc.so.6
|
|
||||||
+ *
|
|
||||||
+ * Thread 2 (process 4357):
|
|
||||||
+ * #0 spinningAltSighandler (signo=14, info=0x959ee50, context=0x959eed0) at threadcrash.c:156
|
|
||||||
+ * #1 <signal handler called>
|
|
||||||
+ * #2 0x006adf5e in pthread_kill () from /lib/tls/libpthread.so.0
|
|
||||||
+ * #3 0x08048ac0 in spinFromAltSighandler (ignored=0x0) at threadcrash.c:218
|
|
||||||
+ * #4 0x006aadec in start_thread () from /lib/tls/libpthread.so.0
|
|
||||||
+ * #5 0x001ed19a in clone () from /lib/tls/libc.so.6
|
|
||||||
+ *
|
|
||||||
+ * Thread 1 (process 4351):
|
|
||||||
+ * #0 0x08048cf3 in main (argc=1, argv=0xbfff9d74) at threadcrash.c:273
|
|
||||||
+ * (gdb)
|
|
||||||
+ */
|
|
||||||
+
|
|
||||||
+#include <pthread.h>
|
|
||||||
+#include <signal.h>
|
|
||||||
+#include <assert.h>
|
|
||||||
+#include <unistd.h>
|
|
||||||
+#include <stdio.h>
|
|
||||||
+#include <stdlib.h>
|
|
||||||
+#include <string.h>
|
|
||||||
+
|
|
||||||
+#define SIGSYSCALL_ALT SIGQUIT
|
|
||||||
+#define SIGSYSCALL SIGUSR1
|
|
||||||
+#define SIGSPIN_ALT SIGALRM
|
|
||||||
+#define SIGSPIN SIGUSR2
|
|
||||||
+
|
|
||||||
+typedef void (*sigaction_t)(int, siginfo_t *, void *);
|
|
||||||
+
|
|
||||||
+static void installHandler(int signo, sigaction_t handler, int onAltstack) {
|
|
||||||
+ struct sigaction action;
|
|
||||||
+ sigset_t sigset;
|
|
||||||
+ int result;
|
|
||||||
+ stack_t altstack;
|
|
||||||
+ stack_t oldaltstack;
|
|
||||||
+
|
|
||||||
+ memset(&action, 0, sizeof(action));
|
|
||||||
+ memset(&altstack, 0, sizeof(altstack));
|
|
||||||
+ memset(&oldaltstack, 0, sizeof(oldaltstack));
|
|
||||||
+
|
|
||||||
+ if (onAltstack) {
|
|
||||||
+ altstack.ss_sp = malloc(SIGSTKSZ);
|
|
||||||
+ assert(altstack.ss_sp != NULL);
|
|
||||||
+ altstack.ss_size = SIGSTKSZ;
|
|
||||||
+ altstack.ss_flags = 0;
|
|
||||||
+ result = sigaltstack(&altstack, &oldaltstack);
|
|
||||||
+ assert(result == 0);
|
|
||||||
+ assert(oldaltstack.ss_flags == SS_DISABLE);
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+ sigemptyset(&sigset);
|
|
||||||
+
|
|
||||||
+ action.sa_handler = NULL;
|
|
||||||
+ action.sa_sigaction = handler;
|
|
||||||
+ action.sa_mask = sigset;
|
|
||||||
+ action.sa_flags = SA_SIGINFO;
|
|
||||||
+ if (onAltstack) {
|
|
||||||
+ action.sa_flags |= SA_ONSTACK;
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+ result = sigaction(signo, &action, NULL);
|
|
||||||
+ assert(result == 0);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+static void installNormalHandler(int signo, sigaction_t handler) {
|
|
||||||
+ installHandler(signo, handler, 0);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+static void installAlthandler(int signo, sigaction_t handler) {
|
|
||||||
+ installHandler(signo, handler, 1);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+static void *makeSyscall(void *ignored) {
|
|
||||||
+ (void)ignored;
|
|
||||||
+
|
|
||||||
+ sleep(42);
|
|
||||||
+
|
|
||||||
+ fprintf(stderr, "%s: returning\n", __FUNCTION__);
|
|
||||||
+ return NULL;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+/* Return true if we're currently executing on the altstack */
|
|
||||||
+static int onAltstack(void) {
|
|
||||||
+ stack_t stack;
|
|
||||||
+ int result;
|
|
||||||
+
|
|
||||||
+ result = sigaltstack(NULL, &stack);
|
|
||||||
+ assert(result == 0);
|
|
||||||
+
|
|
||||||
+ return stack.ss_flags & SS_ONSTACK;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+static void syscallingAltSighandler(int signo, siginfo_t *info, void *context) {
|
|
||||||
+ (void)signo;
|
|
||||||
+ (void)info;
|
|
||||||
+ (void)context;
|
|
||||||
+
|
|
||||||
+ if (!onAltstack()) {
|
|
||||||
+ printf("%s() not running on altstack!\n", __FUNCTION__);
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+ sleep(42);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+static void spinningAltSighandler(int signo, siginfo_t *info, void *context) {
|
|
||||||
+ (void)signo;
|
|
||||||
+ (void)info;
|
|
||||||
+ (void)context;
|
|
||||||
+
|
|
||||||
+ if (!onAltstack()) {
|
|
||||||
+ printf("%s() not running on altstack!\n", __FUNCTION__);
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+ while (1);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+static void syscallingSighandler(int signo, siginfo_t *info, void *context) {
|
|
||||||
+ (void)signo;
|
|
||||||
+ (void)info;
|
|
||||||
+ (void)context;
|
|
||||||
+
|
|
||||||
+ if (onAltstack()) {
|
|
||||||
+ printf("%s() running on altstack!\n", __FUNCTION__);
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+ sleep(42);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+static void spinningSighandler(int signo, siginfo_t *info, void *context) {
|
|
||||||
+ (void)signo;
|
|
||||||
+ (void)info;
|
|
||||||
+ (void)context;
|
|
||||||
+
|
|
||||||
+ if (onAltstack()) {
|
|
||||||
+ printf("%s() running on altstack!\n", __FUNCTION__);
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+ while (1);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+static void *makeSyscallFromAltSighandler(void *ignored) {
|
|
||||||
+ (void)ignored;
|
|
||||||
+
|
|
||||||
+ int result;
|
|
||||||
+
|
|
||||||
+ installAlthandler(SIGSYSCALL_ALT, syscallingAltSighandler);
|
|
||||||
+
|
|
||||||
+ result = pthread_kill(pthread_self(), SIGSYSCALL_ALT);
|
|
||||||
+ assert(result == 0);
|
|
||||||
+
|
|
||||||
+ fprintf(stderr, "%s: returning\n", __FUNCTION__);
|
|
||||||
+ return NULL;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+static void *makeSyscallFromSighandler(void *ignored) {
|
|
||||||
+ (void)ignored;
|
|
||||||
+
|
|
||||||
+ int result;
|
|
||||||
+
|
|
||||||
+ installNormalHandler(SIGSYSCALL, syscallingSighandler);
|
|
||||||
+
|
|
||||||
+ result = pthread_kill(pthread_self(), SIGSYSCALL);
|
|
||||||
+ assert(result == 0);
|
|
||||||
+
|
|
||||||
+ fprintf(stderr, "%s: returning\n", __FUNCTION__);
|
|
||||||
+ return NULL;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+static void *spinFromAltSighandler(void *ignored) {
|
|
||||||
+ (void)ignored;
|
|
||||||
+
|
|
||||||
+ int result;
|
|
||||||
+
|
|
||||||
+ installAlthandler(SIGSPIN_ALT, spinningAltSighandler);
|
|
||||||
+
|
|
||||||
+ result = pthread_kill(pthread_self(), SIGSPIN_ALT);
|
|
||||||
+ assert(result == 0);
|
|
||||||
+
|
|
||||||
+ fprintf(stderr, "%s: returning\n", __FUNCTION__);
|
|
||||||
+ return NULL;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+static void *spinFromSighandler(void *ignored) {
|
|
||||||
+ (void)ignored;
|
|
||||||
+
|
|
||||||
+ int result;
|
|
||||||
+
|
|
||||||
+ installNormalHandler(SIGSPIN, spinningSighandler);
|
|
||||||
+
|
|
||||||
+ result = pthread_kill(pthread_self(), SIGSPIN);
|
|
||||||
+ assert(result == 0);
|
|
||||||
+
|
|
||||||
+ fprintf(stderr, "%s: returning\n", __FUNCTION__);
|
|
||||||
+ return NULL;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+static void *spin(void *ignored) {
|
|
||||||
+ (void)ignored;
|
|
||||||
+
|
|
||||||
+ while (1);
|
|
||||||
+
|
|
||||||
+ fprintf(stderr, "%s: returning\n", __FUNCTION__);
|
|
||||||
+ return NULL;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+int main(int argc, char *argv[]) {
|
|
||||||
+ int result;
|
|
||||||
+ pthread_t thread;
|
|
||||||
+ volatile int bad;
|
|
||||||
+
|
|
||||||
+ result = pthread_create(&thread, NULL, makeSyscall, NULL);
|
|
||||||
+ assert(result == 0);
|
|
||||||
+ result = pthread_create(&thread, NULL, makeSyscallFromSighandler, NULL);
|
|
||||||
+ assert(result == 0);
|
|
||||||
+ result = pthread_create(&thread, NULL, makeSyscallFromAltSighandler, NULL);
|
|
||||||
+ assert(result == 0);
|
|
||||||
+ result = pthread_create(&thread, NULL, spin, NULL);
|
|
||||||
+ assert(result == 0);
|
|
||||||
+ result = pthread_create(&thread, NULL, spinFromSighandler, NULL);
|
|
||||||
+ assert(result == 0);
|
|
||||||
+ result = pthread_create(&thread, NULL, spinFromAltSighandler, NULL);
|
|
||||||
+ assert(result == 0);
|
|
||||||
+
|
|
||||||
+ // Give threads some time to get going
|
|
||||||
+ sleep(3);
|
|
||||||
+
|
|
||||||
+ // Crash
|
|
||||||
+ bad = *(int*)7;
|
|
||||||
+
|
|
||||||
+ /* Workaround: http://gcc.gnu.org/bugzilla/show_bug.cgi?id=29628
|
|
||||||
+ Simulate use to ensure `DW_AT_location' for them:
|
|
||||||
+ readelf -a --debug threadcrash|grep -A5 -w argc
|
|
||||||
+ --> DW_AT_location : 2 byte block: 71 0 (DW_OP_breg1: 0)
|
|
||||||
+ This case verified on: gcc-4.1.1-30.i386
|
|
||||||
+ Keep it late to ensure persistency in the registers. */
|
|
||||||
+ bad = (int) argc;
|
|
||||||
+ bad = (unsigned long) argv;
|
|
||||||
+
|
|
||||||
+ return 0;
|
|
||||||
+}
|
|
||||||
diff --git a/gdb/testsuite/gdb.threads/threadcrash.exp b/gdb/testsuite/gdb.threads/threadcrash.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.threads/threadcrash.exp
|
|
||||||
@@ -0,0 +1,37 @@
|
|
||||||
+# threadcrash.exp - The point of this program is to crash in a multi-threaded app.
|
|
||||||
+
|
|
||||||
+
|
|
||||||
+set testfile threadcrash
|
|
||||||
+set srcfile ${testfile}.c
|
|
||||||
+set shellfile ${srcdir}/${subdir}/${testfile}.sh
|
|
||||||
+set binfile [standard_output_file ${testfile}]
|
|
||||||
+
|
|
||||||
+set GDB_abs ${GDB}
|
|
||||||
+if [regexp "^\[^/\]" ${GDB_abs}] {
|
|
||||||
+ set GDB_abs $env(PWD)/${GDB_abs}
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+if [istarget "*-*-linux"] then {
|
|
||||||
+ set target_cflags "-D_MIT_POSIX_THREADS"
|
|
||||||
+} else {
|
|
||||||
+ set target_cflags ""
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# ${shellfile} argument must not contain any directories.
|
|
||||||
+set fd [open "|bash ${shellfile} ${binfile} $GDB $INTERNAL_GDBFLAGS $GDBFLAGS [host_info gdb_opts]" r]
|
|
||||||
+while { [gets $fd line] >= 0 } {
|
|
||||||
+ if [regexp " PASS: (.*)$" $line trash message] {
|
|
||||||
+ pass $message
|
|
||||||
+ } elseif [regexp " FAIL: (.*)$" $line trash message] {
|
|
||||||
+ fail $message
|
|
||||||
+ }
|
|
||||||
+}
|
|
||||||
+catch {
|
|
||||||
+ close $fd
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+return 0
|
|
||||||
diff --git a/gdb/testsuite/gdb.threads/threadcrash.sh b/gdb/testsuite/gdb.threads/threadcrash.sh
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.threads/threadcrash.sh
|
|
||||||
@@ -0,0 +1,324 @@
|
|
||||||
+#! /bin/bash
|
|
||||||
+
|
|
||||||
+# NOTE: threadcrash.c *must* be built with debugging symbols
|
|
||||||
+#
|
|
||||||
+# The point of this shell script is to crash treadcrash.c, load the
|
|
||||||
+# resulting core file into gdb and verify that gdb can extract enough
|
|
||||||
+# information from the core file.
|
|
||||||
+#
|
|
||||||
+# The return code from this script is the number of failed tests.
|
|
||||||
+
|
|
||||||
+LOG=gdbresult.log
|
|
||||||
+
|
|
||||||
+if [ $# = 0 ] ; then
|
|
||||||
+ echo >&2 Syntax: $0 \<name of threadcrash binary\> [\<gdb binary\> \<args...\>]
|
|
||||||
+ exit 1
|
|
||||||
+fi
|
|
||||||
+RUNME="$1"
|
|
||||||
+shift
|
|
||||||
+GDB="${*:-gdb}"
|
|
||||||
+
|
|
||||||
+
|
|
||||||
+pf_prefix=""
|
|
||||||
+function pf_prefix() {
|
|
||||||
+ pf_prefix="$*"
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+set_test=""
|
|
||||||
+function set_test() {
|
|
||||||
+ if [ -n "$set_test" ] ; then
|
|
||||||
+ echo >&2 "DEJAGNU-BASH ERROR: set_test already set"
|
|
||||||
+ exit 1
|
|
||||||
+ fi
|
|
||||||
+ set_test="$*"
|
|
||||||
+ if [ -n "$pf_prefix" ] ; then
|
|
||||||
+ set_test="$pf_prefix: $set_test"
|
|
||||||
+ fi
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# INTERNAL
|
|
||||||
+function record_test {
|
|
||||||
+ if [ -z "$set_test" ] ; then
|
|
||||||
+ echo >&2 "DEJAGNU-BASH ERROR: set_test not set"
|
|
||||||
+ exit 1
|
|
||||||
+ fi
|
|
||||||
+ # Provide the leading whitespace delimiter:
|
|
||||||
+ echo " $1: $set_test"
|
|
||||||
+ set_test=""
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+function pass() {
|
|
||||||
+ record_test PASS
|
|
||||||
+}
|
|
||||||
+function fail() {
|
|
||||||
+ record_test FAIL
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+
|
|
||||||
+# Verify that the gdb output doesn't contain $1.
|
|
||||||
+function mustNotHave() {
|
|
||||||
+ local BADWORD=$1
|
|
||||||
+ set_test gdb output contains "$BADWORD"
|
|
||||||
+ if grep -q "$BADWORD" $LOG ; then
|
|
||||||
+ fail
|
|
||||||
+ return 1
|
|
||||||
+ fi
|
|
||||||
+ pass
|
|
||||||
+ return 0
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Verify that the gdb output contains exactly $1 $2s.
|
|
||||||
+function mustHaveCorrectAmount() {
|
|
||||||
+ local WANTEDNUMBER=$1
|
|
||||||
+ local GOODWORD=$2
|
|
||||||
+ local ACTUALNUMBER=$(grep "$GOODWORD" $LOG | wc -l)
|
|
||||||
+ set_test gdb output contained $ACTUALNUMBER \""$GOODWORD"\", not $WANTEDNUMBER as expected
|
|
||||||
+ if [ $ACTUALNUMBER != $WANTEDNUMBER ] ; then
|
|
||||||
+ fail
|
|
||||||
+ return 1
|
|
||||||
+ fi
|
|
||||||
+ pass
|
|
||||||
+ return 0
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Verify that the gdb output contains seven threads
|
|
||||||
+function mustHaveSevenThreads() {
|
|
||||||
+ NTHREADS=$(egrep "^Thread [1-7] \(" $LOG | wc -l)
|
|
||||||
+ set_test gdb output contains $NTHREADS threads, not 7 as expected
|
|
||||||
+ if [ $NTHREADS != 7 ] ; then
|
|
||||||
+ fail
|
|
||||||
+ return 1
|
|
||||||
+ fi
|
|
||||||
+ pass
|
|
||||||
+ return 0
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Verify that the gdb output has all parameters on consecutive lines
|
|
||||||
+function mustHaveSequence() {
|
|
||||||
+ SEQUENCE="$*"
|
|
||||||
+ NPARTS=$#
|
|
||||||
+ grep "$1" -A$((NPARTS - 1)) $LOG > matches.log
|
|
||||||
+
|
|
||||||
+ while [ $# -gt 1 ] ; do
|
|
||||||
+ shift
|
|
||||||
+ ((NPARTS--))
|
|
||||||
+ grep "$1" -A$((NPARTS - 1)) matches.log > temp.log
|
|
||||||
+ mv temp.log matches.log
|
|
||||||
+ done
|
|
||||||
+ LASTPART=$1
|
|
||||||
+
|
|
||||||
+ set_test gdb output does not contain the sequence: $SEQUENCE
|
|
||||||
+ if ! grep -q "$LASTPART" matches.log ; then
|
|
||||||
+ fail
|
|
||||||
+ return 1
|
|
||||||
+ fi
|
|
||||||
+ pass
|
|
||||||
+ return 0
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Verify that $LOG contains all information we want
|
|
||||||
+function verifyLog() {
|
|
||||||
+ local FAILURES=0
|
|
||||||
+
|
|
||||||
+ mustNotHave '??' || ((FAILURES++))
|
|
||||||
+ mustHaveCorrectAmount 11 threadcrash.c: || ((FAILURES++))
|
|
||||||
+
|
|
||||||
+ mustHaveSevenThreads || ((FAILURES++))
|
|
||||||
+ mustHaveSequence sleep "makeSyscall (ignored=" || ((FAILURES++))
|
|
||||||
+
|
|
||||||
+ mustHaveSequence sleep "syscallingSighandler (signo=" "signal handler called" 0x || ((FAILURES++))
|
|
||||||
+ mustHaveSequence pthread_kill "makeSyscallFromSighandler (ignored=" || ((FAILURES++))
|
|
||||||
+
|
|
||||||
+ mustHaveSequence sleep "syscallingAltSighandler (signo=" "signal handler called" 0x || ((FAILURES++))
|
|
||||||
+ mustHaveSequence pthread_kill "makeSyscallFromAltSighandler (ignored=" || ((FAILURES++))
|
|
||||||
+
|
|
||||||
+ mustHaveSequence Thread "spin (ignored=" || ((FAILURES++))
|
|
||||||
+
|
|
||||||
+ mustHaveSequence "spinningSighandler (signo=" "signal handler called" 0x || ((FAILURES++))
|
|
||||||
+ mustHaveSequence pthread_kill "spinFromSighandler (ignored=" || ((FAILURES++))
|
|
||||||
+
|
|
||||||
+ mustHaveSequence "spinningAltSighandler (signo=" "signal handler called" 0x || ((FAILURES++))
|
|
||||||
+ mustHaveSequence pthread_kill "spinFromAltSighandler (ignored=" || ((FAILURES++))
|
|
||||||
+
|
|
||||||
+ mustHaveSequence Thread "main (argc=1, argv=" || ((FAILURES++))
|
|
||||||
+
|
|
||||||
+ return $FAILURES
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Put result of debugging a core file in $LOG
|
|
||||||
+function getLogFromCore() {
|
|
||||||
+ # Make sure we get a core file
|
|
||||||
+ set_test Make sure we get a core file
|
|
||||||
+ if ! ulimit -c unlimited ; then
|
|
||||||
+ fail
|
|
||||||
+ exit 1
|
|
||||||
+ fi
|
|
||||||
+ pass
|
|
||||||
+
|
|
||||||
+ # Run the crasher
|
|
||||||
+ ./$(basename "$RUNME")
|
|
||||||
+ EXITCODE=$?
|
|
||||||
+
|
|
||||||
+ # Verify that we actually crashed
|
|
||||||
+ set_test $RUNME should have been killed by a signal, got non-signal exit code $EXITCODE
|
|
||||||
+ if [ $EXITCODE -lt 128 ] ; then
|
|
||||||
+ fail
|
|
||||||
+ exit 1
|
|
||||||
+ fi
|
|
||||||
+ pass
|
|
||||||
+
|
|
||||||
+ # Verify that we got a core file
|
|
||||||
+ set_test $RUNME did not create a core file
|
|
||||||
+ if [ ! -r core* ] ; then
|
|
||||||
+ fail
|
|
||||||
+ exit 1
|
|
||||||
+ fi
|
|
||||||
+ pass
|
|
||||||
+
|
|
||||||
+ # Run gdb
|
|
||||||
+ cat > gdbscript.gdb <<EOF
|
|
||||||
+set width 0
|
|
||||||
+t a a bt 100
|
|
||||||
+quit
|
|
||||||
+EOF
|
|
||||||
+ cat gdbscript.gdb /dev/zero | $GDB -nx "./$(basename "$RUNME")" core* > $LOG
|
|
||||||
+ EXITCODE=$?
|
|
||||||
+
|
|
||||||
+ set_test gdb exited with error code
|
|
||||||
+ if [ $EXITCODE != 0 ] ; then
|
|
||||||
+ ((FAILURES++))
|
|
||||||
+ echo >&2 gdb exited with error code $EXITCODE
|
|
||||||
+ fail
|
|
||||||
+ fi
|
|
||||||
+ pass
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Put result of debugging a gcore file in $LOG
|
|
||||||
+function getLogFromGcore() {
|
|
||||||
+ # Create the core file
|
|
||||||
+ rm -f core*
|
|
||||||
+ cat > gdbscript.gdb <<EOF
|
|
||||||
+handle SIGQUIT pass noprint nostop
|
|
||||||
+handle SIGUSR1 pass noprint nostop
|
|
||||||
+handle SIGUSR2 pass noprint nostop
|
|
||||||
+handle SIGALRM pass noprint nostop
|
|
||||||
+run
|
|
||||||
+gcore
|
|
||||||
+quit
|
|
||||||
+EOF
|
|
||||||
+ cat gdbscript.gdb /dev/zero | $GDB -nx "./$(basename "$RUNME")" > /dev/null
|
|
||||||
+ EXITCODE=$?
|
|
||||||
+
|
|
||||||
+ set_test gdb exited with error code when creating gcore file
|
|
||||||
+ if [ $EXITCODE != 0 ] ; then
|
|
||||||
+ ((FAILURES++))
|
|
||||||
+ echo >&2 gdb exited with error code $EXITCODE when creating gcore file
|
|
||||||
+ fail
|
|
||||||
+ fi
|
|
||||||
+ pass
|
|
||||||
+
|
|
||||||
+ # Verify that we got a core file from gcore
|
|
||||||
+ set_test gdb gcore did not create a core file
|
|
||||||
+ if [ ! -r core* ] ; then
|
|
||||||
+ fail
|
|
||||||
+ exit 1
|
|
||||||
+ fi
|
|
||||||
+ pass
|
|
||||||
+
|
|
||||||
+ # Run gdb on the gcore file
|
|
||||||
+ cat > gdbscript.gdb <<EOF
|
|
||||||
+set width 0
|
|
||||||
+t a a bt 100
|
|
||||||
+quit
|
|
||||||
+EOF
|
|
||||||
+ cat gdbscript.gdb /dev/zero | $GDB -nx "./$(basename "$RUNME")" core* > $LOG
|
|
||||||
+ EXITCODE=$?
|
|
||||||
+
|
|
||||||
+ set_test gdb exited with error code when examining gcore file
|
|
||||||
+ if [ $EXITCODE != 0 ] ; then
|
|
||||||
+ ((FAILURES++))
|
|
||||||
+ echo >&2 gdb exited with error code $EXITCODE when examining gcore file
|
|
||||||
+ fail
|
|
||||||
+ fi
|
|
||||||
+ pass
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Put result of debugging a core file in $LOG
|
|
||||||
+function getLogFromLiveProcess() {
|
|
||||||
+ # Run gdb
|
|
||||||
+ cat > gdbscript.gdb <<EOF
|
|
||||||
+handle SIGQUIT pass noprint nostop
|
|
||||||
+handle SIGUSR1 pass noprint nostop
|
|
||||||
+handle SIGUSR2 pass noprint nostop
|
|
||||||
+handle SIGALRM pass noprint nostop
|
|
||||||
+set width 0
|
|
||||||
+run
|
|
||||||
+t a a bt 100
|
|
||||||
+quit
|
|
||||||
+EOF
|
|
||||||
+ cat gdbscript.gdb /dev/zero | $GDB -nx "./$(basename "$RUNME")" > $LOG
|
|
||||||
+ EXITCODE=$?
|
|
||||||
+
|
|
||||||
+ set_test gdb exited with error code
|
|
||||||
+ if [ $EXITCODE != 0 ] ; then
|
|
||||||
+ ((FAILURES++))
|
|
||||||
+ echo >&2 gdb exited with error code $EXITCODE
|
|
||||||
+ fail
|
|
||||||
+ fi
|
|
||||||
+ pass
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+####### Main program follows #####################
|
|
||||||
+
|
|
||||||
+# Make sure we don't clobber anybody else's (core) file(s)
|
|
||||||
+WORKDIR=/tmp/$PPID
|
|
||||||
+mkdir -p $WORKDIR
|
|
||||||
+cp "$RUNME" $WORKDIR
|
|
||||||
+cd $WORKDIR
|
|
||||||
+
|
|
||||||
+# Count problems
|
|
||||||
+FAILURES=0
|
|
||||||
+
|
|
||||||
+echo === Testing gdb vs core file...
|
|
||||||
+pf_prefix core file
|
|
||||||
+getLogFromCore
|
|
||||||
+verifyLog
|
|
||||||
+((FAILURES+=$?))
|
|
||||||
+pf_prefix
|
|
||||||
+echo === Core file tests done.
|
|
||||||
+
|
|
||||||
+echo
|
|
||||||
+
|
|
||||||
+echo === Testing gdb vs gcore file...
|
|
||||||
+pf_prefix gcore file
|
|
||||||
+getLogFromGcore
|
|
||||||
+verifyLog
|
|
||||||
+((FAILURES+=$?))
|
|
||||||
+pf_prefix
|
|
||||||
+echo === Gcore file tests done.
|
|
||||||
+
|
|
||||||
+echo
|
|
||||||
+
|
|
||||||
+echo === Testing gdb vs live process...
|
|
||||||
+pf_prefix live process
|
|
||||||
+getLogFromLiveProcess
|
|
||||||
+verifyLog
|
|
||||||
+((FAILURES+=$?))
|
|
||||||
+pf_prefix
|
|
||||||
+echo === Live process tests done.
|
|
||||||
+
|
|
||||||
+# Executive summary
|
|
||||||
+echo
|
|
||||||
+if [ $FAILURES == 0 ] ; then
|
|
||||||
+ echo All tests passed!
|
|
||||||
+else
|
|
||||||
+ echo $FAILURES tests failed!
|
|
||||||
+ echo
|
|
||||||
+ echo Make sure the threadcrash binary contains debugging information \(build with \"gcc -g\"\).
|
|
||||||
+fi
|
|
||||||
+
|
|
||||||
+# Clean up
|
|
||||||
+cd /
|
|
||||||
+rm -rf $WORKDIR
|
|
||||||
+
|
|
||||||
+exit $FAILURES
|
|
||||||
diff --git a/gdb/testsuite/gdb.threads/threadcrash.sh-orig b/gdb/testsuite/gdb.threads/threadcrash.sh-orig
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.threads/threadcrash.sh-orig
|
|
||||||
@@ -0,0 +1,248 @@
|
|
||||||
+#! /bin/bash
|
|
||||||
+
|
|
||||||
+# NOTE: threadcrash.c *must* be built with debugging symbols
|
|
||||||
+#
|
|
||||||
+# The point of this shell script is to crash treadcrash.c, load the
|
|
||||||
+# resulting core file into gdb and verify that gdb can extract enough
|
|
||||||
+# information from the core file.
|
|
||||||
+#
|
|
||||||
+# The return code from this script is the number of failed tests.
|
|
||||||
+
|
|
||||||
+LOG=gdbresult.log
|
|
||||||
+
|
|
||||||
+if [ $# != 1 ] ; then
|
|
||||||
+ echo > /dev/stderr Syntax: $0 \<name of threadcrash binary\>
|
|
||||||
+ exit 1
|
|
||||||
+fi
|
|
||||||
+RUNME="$1"
|
|
||||||
+
|
|
||||||
+# Verify that the gdb output doesn't contain $1.
|
|
||||||
+function mustNotHave() {
|
|
||||||
+ local BADWORD=$1
|
|
||||||
+ if grep -q "$BADWORD" $LOG ; then
|
|
||||||
+ echo >> /dev/stderr WARNING: gdb output contains "$BADWORD"
|
|
||||||
+ return 1
|
|
||||||
+ fi
|
|
||||||
+ return 0
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Verify that the gdb output contains exactly $1 $2s.
|
|
||||||
+function mustHaveCorrectAmount() {
|
|
||||||
+ local WANTEDNUMBER=$1
|
|
||||||
+ local GOODWORD=$2
|
|
||||||
+ local ACTUALNUMBER=$(grep "$GOODWORD" $LOG | wc -l)
|
|
||||||
+ if [ $ACTUALNUMBER != $WANTEDNUMBER ] ; then
|
|
||||||
+ echo >> /dev/stderr WARNING: gdb output contained $ACTUALNUMBER \""$GOODWORD"\", not $WANTEDNUMBER as expected
|
|
||||||
+ return 1
|
|
||||||
+ fi
|
|
||||||
+ return 0
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Verify that the gdb output contains seven threads
|
|
||||||
+function mustHaveSevenThreads() {
|
|
||||||
+ NTHREADS=$(egrep "^Thread [1-7] \(" $LOG | wc -l)
|
|
||||||
+ if [ $NTHREADS != 7 ] ; then
|
|
||||||
+ echo >> /dev/stderr WARNING: gdb output contains $NTHREADS threads, not 7 as expected
|
|
||||||
+ return 1
|
|
||||||
+ fi
|
|
||||||
+ return 0
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Verify that the gdb output has all parameters on consecutive lines
|
|
||||||
+function mustHaveSequence() {
|
|
||||||
+ SEQUENCE="$*"
|
|
||||||
+ NPARTS=$#
|
|
||||||
+ grep "$1" -A$((NPARTS - 1)) $LOG > matches.log
|
|
||||||
+
|
|
||||||
+ while [ $# -gt 1 ] ; do
|
|
||||||
+ shift
|
|
||||||
+ ((NPARTS--))
|
|
||||||
+ grep "$1" -A$((NPARTS - 1)) matches.log > temp.log
|
|
||||||
+ mv temp.log matches.log
|
|
||||||
+ done
|
|
||||||
+ LASTPART=$1
|
|
||||||
+
|
|
||||||
+ if ! grep -q "$LASTPART" matches.log ; then
|
|
||||||
+ echo >> /dev/stderr WARNING: gdb output does not contain the sequence: $SEQUENCE
|
|
||||||
+ return 1
|
|
||||||
+ fi
|
|
||||||
+ return 0
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Verify that $LOG contains all information we want
|
|
||||||
+function verifyLog() {
|
|
||||||
+ local FAILURES=0
|
|
||||||
+
|
|
||||||
+ mustNotHave '??' || ((FAILURES++))
|
|
||||||
+ mustHaveCorrectAmount 12 threadcrash.c: || ((FAILURES++))
|
|
||||||
+
|
|
||||||
+ mustHaveSevenThreads || ((FAILURES++))
|
|
||||||
+ mustHaveSequence sleep "makeSyscall (ignored=" || ((FAILURES++))
|
|
||||||
+
|
|
||||||
+ mustHaveSequence sleep "syscallingSighandler (signo=" "signal handler called" 0x || ((FAILURES++))
|
|
||||||
+ mustHaveSequence pthread_kill "makeSyscallFromSighandler (ignored=" || ((FAILURES++))
|
|
||||||
+
|
|
||||||
+ mustHaveSequence sleep "syscallingAltSighandler (signo=" "signal handler called" 0x || ((FAILURES++))
|
|
||||||
+ mustHaveSequence pthread_kill "makeSyscallFromAltSighandler (ignored=" || ((FAILURES++))
|
|
||||||
+
|
|
||||||
+ mustHaveSequence Thread "spin (ignored=" || ((FAILURES++))
|
|
||||||
+
|
|
||||||
+ mustHaveSequence "spinningSighandler (signo=" "signal handler called" 0x || ((FAILURES++))
|
|
||||||
+ mustHaveSequence pthread_kill "spinFromSighandler (ignored=" || ((FAILURES++))
|
|
||||||
+
|
|
||||||
+ mustHaveSequence "spinningAltSighandler (signo=" "signal handler called" 0x || ((FAILURES++))
|
|
||||||
+ mustHaveSequence pthread_kill "spinFromAltSighandler (ignored=" || ((FAILURES++))
|
|
||||||
+
|
|
||||||
+ mustHaveSequence Thread "main (argc=1, argv=" || ((FAILURES++))
|
|
||||||
+
|
|
||||||
+ return $FAILURES
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Put result of debugging a core file in $LOG
|
|
||||||
+function getLogFromCore() {
|
|
||||||
+ # Make sure we get a core file
|
|
||||||
+ ulimit -c unlimited || exit 1
|
|
||||||
+
|
|
||||||
+ # Run the crasher
|
|
||||||
+ ./$(basename "$RUNME")
|
|
||||||
+ EXITCODE=$?
|
|
||||||
+
|
|
||||||
+ # Verify that we actually crashed
|
|
||||||
+ if [ $EXITCODE -lt 128 ] ; then
|
|
||||||
+ echo >> /dev/stderr ERROR: $RUNME should have been killed by a signal, got non-signal exit code $EXITCODE
|
|
||||||
+ exit 1
|
|
||||||
+ fi
|
|
||||||
+
|
|
||||||
+ # Verify that we got a core file
|
|
||||||
+ if [ ! -r core* ] ; then
|
|
||||||
+ echo >> /dev/stderr ERROR: $RUNME did not create a core file
|
|
||||||
+ exit 1
|
|
||||||
+ fi
|
|
||||||
+
|
|
||||||
+ # Run gdb
|
|
||||||
+ cat > gdbscript.gdb <<EOF
|
|
||||||
+set width 0
|
|
||||||
+t a a bt 100
|
|
||||||
+quit
|
|
||||||
+EOF
|
|
||||||
+ cat gdbscript.gdb /dev/zero | gdb -nx "./$(basename "$RUNME")" core* > $LOG
|
|
||||||
+ EXITCODE=$?
|
|
||||||
+
|
|
||||||
+ if [ $EXITCODE != 0 ] ; then
|
|
||||||
+ ((FAILURES++))
|
|
||||||
+ echo >> /dev/stderr WARNING: gdb exited with error code $EXITCODE
|
|
||||||
+ fi
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Put result of debugging a gcore file in $LOG
|
|
||||||
+function getLogFromGcore() {
|
|
||||||
+ # Create the core file
|
|
||||||
+ rm -f core*
|
|
||||||
+ cat > gdbscript.gdb <<EOF
|
|
||||||
+handle SIGQUIT pass noprint nostop
|
|
||||||
+handle SIGUSR1 pass noprint nostop
|
|
||||||
+handle SIGUSR2 pass noprint nostop
|
|
||||||
+handle SIGALRM pass noprint nostop
|
|
||||||
+run
|
|
||||||
+gcore
|
|
||||||
+quit
|
|
||||||
+EOF
|
|
||||||
+ cat gdbscript.gdb /dev/zero | gdb -nx "./$(basename "$RUNME")" > /dev/null
|
|
||||||
+ EXITCODE=$?
|
|
||||||
+
|
|
||||||
+ if [ $EXITCODE != 0 ] ; then
|
|
||||||
+ ((FAILURES++))
|
|
||||||
+ echo >> /dev/stderr WARNING: gdb exited with error code $EXITCODE when creating gcore file
|
|
||||||
+ fi
|
|
||||||
+
|
|
||||||
+ # Verify that we got a core file from gcore
|
|
||||||
+ if [ ! -r core* ] ; then
|
|
||||||
+ echo >> /dev/stderr ERROR: gdb gcore did not create a core file
|
|
||||||
+ exit 1
|
|
||||||
+ fi
|
|
||||||
+
|
|
||||||
+ # Run gdb on the gcore file
|
|
||||||
+ cat > gdbscript.gdb <<EOF
|
|
||||||
+set width 0
|
|
||||||
+t a a bt 100
|
|
||||||
+quit
|
|
||||||
+EOF
|
|
||||||
+ cat gdbscript.gdb /dev/zero | gdb -nx "./$(basename "$RUNME")" core* > $LOG
|
|
||||||
+ EXITCODE=$?
|
|
||||||
+
|
|
||||||
+ if [ $EXITCODE != 0 ] ; then
|
|
||||||
+ ((FAILURES++))
|
|
||||||
+ echo >> /dev/stderr WARNING: gdb exited with error code $EXITCODE when examining gcore file
|
|
||||||
+ fi
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Put result of debugging a core file in $LOG
|
|
||||||
+function getLogFromLiveProcess() {
|
|
||||||
+ # Run gdb
|
|
||||||
+ cat > gdbscript.gdb <<EOF
|
|
||||||
+handle SIGQUIT pass noprint nostop
|
|
||||||
+handle SIGUSR1 pass noprint nostop
|
|
||||||
+handle SIGUSR2 pass noprint nostop
|
|
||||||
+handle SIGALRM pass noprint nostop
|
|
||||||
+set width 0
|
|
||||||
+run
|
|
||||||
+t a a bt 100
|
|
||||||
+quit
|
|
||||||
+EOF
|
|
||||||
+ cat gdbscript.gdb /dev/zero | gdb -nx "./$(basename "$RUNME")" > $LOG
|
|
||||||
+ EXITCODE=$?
|
|
||||||
+
|
|
||||||
+ if [ $EXITCODE != 0 ] ; then
|
|
||||||
+ ((FAILURES++))
|
|
||||||
+ echo >> /dev/stderr WARNING: gdb exited with error code $EXITCODE
|
|
||||||
+ fi
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+####### Main program follows #####################
|
|
||||||
+
|
|
||||||
+# Make sure we don't clobber anybody else's (core) file(s)
|
|
||||||
+WORKDIR=/tmp/$PPID
|
|
||||||
+mkdir -p $WORKDIR
|
|
||||||
+cp "$RUNME" $WORKDIR
|
|
||||||
+cd $WORKDIR
|
|
||||||
+
|
|
||||||
+# Count problems
|
|
||||||
+FAILURES=0
|
|
||||||
+
|
|
||||||
+echo === Testing gdb vs core file...
|
|
||||||
+getLogFromCore
|
|
||||||
+verifyLog
|
|
||||||
+((FAILURES+=$?))
|
|
||||||
+echo === Core file tests done.
|
|
||||||
+
|
|
||||||
+echo
|
|
||||||
+
|
|
||||||
+echo === Testing gdb vs gcore file...
|
|
||||||
+getLogFromGcore
|
|
||||||
+verifyLog
|
|
||||||
+((FAILURES+=$?))
|
|
||||||
+echo === Gcore file tests done.
|
|
||||||
+
|
|
||||||
+echo
|
|
||||||
+
|
|
||||||
+echo === Testing gdb vs live process...
|
|
||||||
+getLogFromLiveProcess
|
|
||||||
+verifyLog
|
|
||||||
+((FAILURES+=$?))
|
|
||||||
+echo === Live process tests done.
|
|
||||||
+
|
|
||||||
+# Executive summary
|
|
||||||
+echo
|
|
||||||
+if [ $FAILURES == 0 ] ; then
|
|
||||||
+ echo All tests passed!
|
|
||||||
+else
|
|
||||||
+ echo $FAILURES tests failed!
|
|
||||||
+ echo
|
|
||||||
+ echo Make sure the threadcrash binary contains debugging information \(build with \"gcc -g\"\).
|
|
||||||
+fi
|
|
||||||
+
|
|
||||||
+# Clean up
|
|
||||||
+cd /
|
|
||||||
+rm -rf $WORKDIR
|
|
||||||
+
|
|
||||||
+exit $FAILURES
|
|
@ -1,134 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
|
||||||
Subject: gdb-6.5-bz109921-DW_AT_decl_file-test.patch
|
|
||||||
|
|
||||||
;; Find symbols properly at their original (included) file (BZ 109921).
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
https://bugzilla.redhat.com/bugzilla/show_bug.cgi?id=109921
|
|
||||||
|
|
||||||
It is duplicite to its upstream variant:
|
|
||||||
http://sourceware.org/ml/gdb-cvs/2007-01/msg00157.html
|
|
||||||
http://sourceware.org/ml/gdb-patches/2007-01/msg00434.html
|
|
||||||
2007-01-21 Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
Daniel Jacobowitz <dan@codesourcery.com>
|
|
||||||
|
|
||||||
* gdb.base/included.c, gdb.base/included.exp,
|
|
||||||
gdb.base/included.h: New files.
|
|
||||||
|
|
||||||
------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
2007-01-09 Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
|
|
||||||
* gdb.dwarf2/dw2-included.exp, gdb.dwarf2/dw2-included.c,
|
|
||||||
gdb.dwarf2/dw2-included.h: New files.
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.dwarf2/dw2-included.c b/gdb/testsuite/gdb.dwarf2/dw2-included.c
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.dwarf2/dw2-included.c
|
|
||||||
@@ -0,0 +1,26 @@
|
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ Copyright 2006 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. */
|
|
||||||
+
|
|
||||||
+#include "dw2-included.h"
|
|
||||||
+
|
|
||||||
+int
|
|
||||||
+main()
|
|
||||||
+{
|
|
||||||
+ return 0;
|
|
||||||
+}
|
|
||||||
diff --git a/gdb/testsuite/gdb.dwarf2/dw2-included.exp b/gdb/testsuite/gdb.dwarf2/dw2-included.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.dwarf2/dw2-included.exp
|
|
||||||
@@ -0,0 +1,47 @@
|
|
||||||
+# Copyright 2006 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.
|
|
||||||
+
|
|
||||||
+# Minimal DWARF-2 unit test
|
|
||||||
+
|
|
||||||
+# This test can only be run on targets which support DWARF-2.
|
|
||||||
+# For now pick a sampling of likely targets.
|
|
||||||
+if {![istarget *-*-linux*]
|
|
||||||
+ && ![istarget *-*-gnu*]
|
|
||||||
+ && ![istarget *-*-elf*]
|
|
||||||
+ && ![istarget *-*-openbsd*]
|
|
||||||
+ && ![istarget arm-*-eabi*]
|
|
||||||
+ && ![istarget powerpc-*-eabi*]} {
|
|
||||||
+ return 0
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+set testfile "dw2-included"
|
|
||||||
+set srcfile ${testfile}.c
|
|
||||||
+set binfile [standard_output_file ${testfile}]
|
|
||||||
+
|
|
||||||
+if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+gdb_exit
|
|
||||||
+gdb_start
|
|
||||||
+gdb_reinitialize_dir $srcdir/$subdir
|
|
||||||
+gdb_load ${binfile}
|
|
||||||
+
|
|
||||||
+gdb_test "set listsize 1" ""
|
|
||||||
+gdb_test "list integer" "int integer;\r"
|
|
||||||
+gdb_test "ptype integer" "type = int\r"
|
|
||||||
+# Path varies depending on the build location.
|
|
||||||
+gdb_test "info variables integer" "\r\nFile \[^\r\n\]*/gdb.dwarf2/dw2-included.h:\r\n${decimal}:.*int integer;\r"
|
|
||||||
diff --git a/gdb/testsuite/gdb.dwarf2/dw2-included.h b/gdb/testsuite/gdb.dwarf2/dw2-included.h
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.dwarf2/dw2-included.h
|
|
||||||
@@ -0,0 +1,20 @@
|
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ Copyright 2006 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. */
|
|
||||||
+
|
|
||||||
+int integer;
|
|
@ -1,24 +0,0 @@
|
|||||||
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-bz203661-emit-relocs.patch
|
|
||||||
|
|
||||||
;; Fix debuginfo addresses resolving for --emit-relocs Linux kernels (BZ 203661).
|
|
||||||
;;=push+jan: There was some mail thread about it, this patch may be a hack.
|
|
||||||
|
|
||||||
diff --git a/gdb/symfile.c b/gdb/symfile.c
|
|
||||||
--- a/gdb/symfile.c
|
|
||||||
+++ b/gdb/symfile.c
|
|
||||||
@@ -3584,6 +3584,12 @@ default_symfile_relocate (struct objfile *objfile, asection *sectp,
|
|
||||||
DWO file. */
|
|
||||||
bfd *abfd = sectp->owner;
|
|
||||||
|
|
||||||
+ /* Executable files have all the relocations already resolved.
|
|
||||||
+ Handle files linked with --emit-relocs.
|
|
||||||
+ http://sources.redhat.com/ml/gdb/2006-08/msg00137.html */
|
|
||||||
+ if ((abfd->flags & EXEC_P) != 0)
|
|
||||||
+ return NULL;
|
|
||||||
+
|
|
||||||
/* We're only interested in sections with relocation
|
|
||||||
information. */
|
|
||||||
if ((sectp->flags & SEC_RELOC) == 0)
|
|
@ -1,304 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
|
||||||
Subject: gdb-6.5-bz216711-clone-is-outermost.patch
|
|
||||||
|
|
||||||
;; Fix bogus 0x0 unwind of the thread's topmost function clone(3) (BZ 216711).
|
|
||||||
;;=fedora
|
|
||||||
|
|
||||||
https://bugzilla.redhat.com/bugzilla/show_bug.cgi?id=216711
|
|
||||||
|
|
||||||
FIXME: This workaround should be dropped and
|
|
||||||
glibc/sysdeps/unix/sysv/linux/x86_64/clone.S should get CFI for the child
|
|
||||||
instead.
|
|
||||||
|
|
||||||
2006-12-17 Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
|
|
||||||
* gdb/amd64-linux-tdep.c (linux_clone_code): New variable.
|
|
||||||
(LINUX_CLONE_LEN): New definition.
|
|
||||||
(amd64_linux_clone_running, amd64_linux_outermost_frame): New function.
|
|
||||||
(amd64_linux_init_abi): Initialize `outermost_frame_p'.
|
|
||||||
* gdb/i386-tdep.c (i386_gdbarch_init): Likewise.
|
|
||||||
* gdb/i386-tdep.h (gdbarch_tdep): Add `outermost_frame_p' member.
|
|
||||||
* gdb/amd64-tdep.c (amd64_frame_this_id): Call `outermost_frame_p'.
|
|
||||||
|
|
||||||
2006-12-17 Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
|
|
||||||
* gdb.threads/bt-clone-stop.exp, gdb.threads/bt-clone-stop.c:
|
|
||||||
New file.
|
|
||||||
|
|
||||||
2007-10-16 Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
|
|
||||||
Port to GDB-6.7.
|
|
||||||
|
|
||||||
diff --git a/gdb/amd64-linux-tdep.c b/gdb/amd64-linux-tdep.c
|
|
||||||
--- a/gdb/amd64-linux-tdep.c
|
|
||||||
+++ b/gdb/amd64-linux-tdep.c
|
|
||||||
@@ -291,6 +291,80 @@ amd64_linux_register_reggroup_p (struct gdbarch *gdbarch, int regnum,
|
|
||||||
|
|
||||||
/* Set the program counter for process PTID to PC. */
|
|
||||||
|
|
||||||
+/* Detect the outermost frame; during unwind of
|
|
||||||
+ #5 0x000000305cec68c3 in clone () from /lib64/tls/libc.so.6
|
|
||||||
+ avoid the additional bogus frame
|
|
||||||
+ #6 0x0000000000000000 in ??
|
|
||||||
+ We compare if the `linux_clone_code' block is _before_ unwound PC. */
|
|
||||||
+
|
|
||||||
+static const unsigned char linux_clone_code[] =
|
|
||||||
+{
|
|
||||||
+/* libc/sysdeps/unix/sysv/linux/x86_64/clone.S */
|
|
||||||
+/* #ifdef RESET_PID */
|
|
||||||
+/* ... */
|
|
||||||
+/* mov $SYS_ify(getpid), %eax */
|
|
||||||
+/* 0xb8, 0x27, 0x00, 0x00, 0x00 */
|
|
||||||
+/* OR */
|
|
||||||
+/* mov $SYS_ify(getpid), %rax */
|
|
||||||
+/* 0x48, 0xc7, 0xc0, 0x27, 0x00, 0x00, 0x00 */
|
|
||||||
+/* so just: */
|
|
||||||
+ 0x27, 0x00, 0x00, 0x00,
|
|
||||||
+/* syscall */
|
|
||||||
+ 0x0f, 0x05,
|
|
||||||
+/* movl %eax, %fs:PID */
|
|
||||||
+ 0x64, 0x89, 0x04, 0x25, 0x94, 0x00, 0x00, 0x00,
|
|
||||||
+/* movl %eax, %fs:TID */
|
|
||||||
+ 0x64, 0x89, 0x04, 0x25, 0x90, 0x00, 0x00, 0x00,
|
|
||||||
+/* #endif */
|
|
||||||
+/* |* Set up arguments for the function call. *| */
|
|
||||||
+/* popq %rax |* Function to call. *| */
|
|
||||||
+ 0x58,
|
|
||||||
+/* popq %rdi |* Argument. *| */
|
|
||||||
+ 0x5f,
|
|
||||||
+/* call *%rax$ */
|
|
||||||
+ 0xff, 0xd0
|
|
||||||
+};
|
|
||||||
+
|
|
||||||
+#define LINUX_CLONE_LEN (sizeof linux_clone_code)
|
|
||||||
+
|
|
||||||
+static int
|
|
||||||
+amd64_linux_clone_running (struct frame_info *this_frame)
|
|
||||||
+{
|
|
||||||
+ CORE_ADDR pc = get_frame_pc (this_frame);
|
|
||||||
+ unsigned char buf[LINUX_CLONE_LEN];
|
|
||||||
+
|
|
||||||
+ if (!safe_frame_unwind_memory (this_frame, pc - LINUX_CLONE_LEN, buf,
|
|
||||||
+ LINUX_CLONE_LEN))
|
|
||||||
+ return 0;
|
|
||||||
+
|
|
||||||
+ if (memcmp (buf, linux_clone_code, LINUX_CLONE_LEN) != 0)
|
|
||||||
+ return 0;
|
|
||||||
+
|
|
||||||
+ return 1;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+static int
|
|
||||||
+amd64_linux_outermost_frame (struct frame_info *this_frame)
|
|
||||||
+{
|
|
||||||
+ CORE_ADDR pc = get_frame_pc (this_frame);
|
|
||||||
+ const char *name;
|
|
||||||
+
|
|
||||||
+ find_pc_partial_function (pc, &name, NULL, NULL);
|
|
||||||
+
|
|
||||||
+ /* If we have NAME, we can optimize the search.
|
|
||||||
+ `clone' NAME still needs to have the code checked as its name may be
|
|
||||||
+ present in the user code.
|
|
||||||
+ `__clone' NAME should not be present in the user code but in the initial
|
|
||||||
+ parts of the `__clone' implementation the unwind still makes sense.
|
|
||||||
+ More detailed unwinding decision would be too much sensitive to possible
|
|
||||||
+ subtle changes in specific glibc revisions. */
|
|
||||||
+ if (name == NULL || strcmp (name, "clone") == 0
|
|
||||||
+ || strcmp ("__clone", name) == 0)
|
|
||||||
+ return (amd64_linux_clone_running (this_frame) != 0);
|
|
||||||
+
|
|
||||||
+ return 0;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
static void
|
|
||||||
amd64_linux_write_pc (struct regcache *regcache, CORE_ADDR pc)
|
|
||||||
{
|
|
||||||
@@ -1808,6 +1882,8 @@ amd64_linux_init_abi_common(struct gdbarch_info info, struct gdbarch *gdbarch)
|
|
||||||
|
|
||||||
tdep->xsave_xcr0_offset = I386_LINUX_XSAVE_XCR0_OFFSET;
|
|
||||||
|
|
||||||
+ tdep->outermost_frame_p = amd64_linux_outermost_frame;
|
|
||||||
+
|
|
||||||
/* Add the %orig_rax register used for syscall restarting. */
|
|
||||||
set_gdbarch_write_pc (gdbarch, amd64_linux_write_pc);
|
|
||||||
|
|
||||||
diff --git a/gdb/amd64-tdep.c b/gdb/amd64-tdep.c
|
|
||||||
--- a/gdb/amd64-tdep.c
|
|
||||||
+++ b/gdb/amd64-tdep.c
|
|
||||||
@@ -2595,6 +2595,7 @@ amd64_frame_unwind_stop_reason (struct frame_info *this_frame,
|
|
||||||
{
|
|
||||||
struct amd64_frame_cache *cache =
|
|
||||||
amd64_frame_cache (this_frame, this_cache);
|
|
||||||
+ struct gdbarch_tdep *tdep = gdbarch_tdep (get_frame_arch (this_frame));
|
|
||||||
|
|
||||||
if (!cache->base_p)
|
|
||||||
return UNWIND_UNAVAILABLE;
|
|
||||||
@@ -2603,6 +2604,10 @@ amd64_frame_unwind_stop_reason (struct frame_info *this_frame,
|
|
||||||
if (cache->base == 0)
|
|
||||||
return UNWIND_OUTERMOST;
|
|
||||||
|
|
||||||
+ /* Detect OS dependent outermost frames; such as `clone'. */
|
|
||||||
+ if (tdep->outermost_frame_p && tdep->outermost_frame_p (this_frame))
|
|
||||||
+ return UNWIND_OUTERMOST;
|
|
||||||
+
|
|
||||||
return UNWIND_NO_REASON;
|
|
||||||
}
|
|
||||||
|
|
||||||
@@ -2737,6 +2742,7 @@ amd64_sigtramp_frame_this_id (struct frame_info *this_frame,
|
|
||||||
{
|
|
||||||
struct amd64_frame_cache *cache =
|
|
||||||
amd64_sigtramp_frame_cache (this_frame, this_cache);
|
|
||||||
+ struct gdbarch_tdep *tdep = gdbarch_tdep (get_frame_arch (this_frame));
|
|
||||||
|
|
||||||
if (!cache->base_p)
|
|
||||||
(*this_id) = frame_id_build_unavailable_stack (get_frame_pc (this_frame));
|
|
||||||
@@ -2745,6 +2751,11 @@ amd64_sigtramp_frame_this_id (struct frame_info *this_frame,
|
|
||||||
/* This marks the outermost frame. */
|
|
||||||
return;
|
|
||||||
}
|
|
||||||
+ else if (tdep->outermost_frame_p && tdep->outermost_frame_p (this_frame))
|
|
||||||
+ {
|
|
||||||
+ /* Detect OS dependent outermost frames; such as `clone'. */
|
|
||||||
+ return;
|
|
||||||
+ }
|
|
||||||
else
|
|
||||||
(*this_id) = frame_id_build (cache->base + 16, get_frame_pc (this_frame));
|
|
||||||
}
|
|
||||||
diff --git a/gdb/i386-tdep.c b/gdb/i386-tdep.c
|
|
||||||
--- a/gdb/i386-tdep.c
|
|
||||||
+++ b/gdb/i386-tdep.c
|
|
||||||
@@ -8406,6 +8406,9 @@ i386_gdbarch_init (struct gdbarch_info info, struct gdbarch_list *arches)
|
|
||||||
|
|
||||||
tdep->xsave_xcr0_offset = -1;
|
|
||||||
|
|
||||||
+ /* Unwinding stops on i386 automatically. */
|
|
||||||
+ tdep->outermost_frame_p = NULL;
|
|
||||||
+
|
|
||||||
tdep->record_regmap = i386_record_regmap;
|
|
||||||
|
|
||||||
set_gdbarch_type_align (gdbarch, i386_type_align);
|
|
||||||
diff --git a/gdb/i386-tdep.h b/gdb/i386-tdep.h
|
|
||||||
--- a/gdb/i386-tdep.h
|
|
||||||
+++ b/gdb/i386-tdep.h
|
|
||||||
@@ -251,6 +251,9 @@ struct gdbarch_tdep
|
|
||||||
|
|
||||||
/* Regsets. */
|
|
||||||
const struct regset *fpregset;
|
|
||||||
+
|
|
||||||
+ /* Detect OS dependent outermost frames; such as `clone'. */
|
|
||||||
+ int (*outermost_frame_p) (struct frame_info *this_frame);
|
|
||||||
};
|
|
||||||
|
|
||||||
/* Floating-point registers. */
|
|
||||||
diff --git a/gdb/testsuite/gdb.threads/bt-clone-stop.c b/gdb/testsuite/gdb.threads/bt-clone-stop.c
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.threads/bt-clone-stop.c
|
|
||||||
@@ -0,0 +1,39 @@
|
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ Copyright 2006 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., 51 Franklin Street, Fifth Floor, Boston,
|
|
||||||
+ MA 02110-1301, USA. */
|
|
||||||
+
|
|
||||||
+
|
|
||||||
+#include <pthread.h>
|
|
||||||
+#include <unistd.h>
|
|
||||||
+#include <assert.h>
|
|
||||||
+
|
|
||||||
+
|
|
||||||
+void *threader (void *arg)
|
|
||||||
+{
|
|
||||||
+ assert (0);
|
|
||||||
+ return NULL;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+int main (void)
|
|
||||||
+{
|
|
||||||
+ pthread_t t1;
|
|
||||||
+
|
|
||||||
+ pthread_create (&t1, NULL, threader, (void *) NULL);
|
|
||||||
+ for (;;)
|
|
||||||
+ pause();
|
|
||||||
+}
|
|
||||||
diff --git a/gdb/testsuite/gdb.threads/bt-clone-stop.exp b/gdb/testsuite/gdb.threads/bt-clone-stop.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.threads/bt-clone-stop.exp
|
|
||||||
@@ -0,0 +1,61 @@
|
|
||||||
+# Copyright 2006 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.
|
|
||||||
+
|
|
||||||
+# Backtraced `clone' must not have `PC == 0' as its previous frame.
|
|
||||||
+
|
|
||||||
+if $tracelevel then {
|
|
||||||
+ strace $tracelevel
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+set testfile bt-clone-stop
|
|
||||||
+set srcfile ${testfile}.c
|
|
||||||
+set binfile [standard_output_file ${testfile}]
|
|
||||||
+if { [gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
|
|
||||||
+ untested "Couldn't compile test program"
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Get things started.
|
|
||||||
+
|
|
||||||
+gdb_exit
|
|
||||||
+gdb_start
|
|
||||||
+gdb_reinitialize_dir $srcdir/$subdir
|
|
||||||
+gdb_load ${binfile}
|
|
||||||
+
|
|
||||||
+# threader: threader.c:8: threader: Assertion `0' failed.
|
|
||||||
+# Program received signal SIGABRT, Aborted.
|
|
||||||
+
|
|
||||||
+gdb_test "run" \
|
|
||||||
+ {Thread 2 "bt-clone-stop" received signal SIGABRT.*} \
|
|
||||||
+ "run"
|
|
||||||
+
|
|
||||||
+# Former gdb unwind (the first function is `clone'):
|
|
||||||
+# #5 0x0000003421ecd62d in ?? () from /lib64/libc.so.6
|
|
||||||
+# #6 0x0000000000000000 in ?? ()
|
|
||||||
+# (gdb)
|
|
||||||
+# Tested `amd64_linux_outermost_frame' functionality should omit the line `#6'.
|
|
||||||
+#
|
|
||||||
+# Two `-re' cases below must be in this order (1st is a subset of the 2nd one).
|
|
||||||
+# Unhandled case below should not happen and it is fortunately handled by
|
|
||||||
+# `amd64_linux_outermost_frame' as FAIL (and result `0x0 entry output invalid').
|
|
||||||
+gdb_test_multiple "bt" "0x0 entry output invalid" {
|
|
||||||
+ -re "in threader \\(.*\n#\[0-9\]* *0x0* in .*$gdb_prompt $" {
|
|
||||||
+ fail "0x0 entry found"
|
|
||||||
+ }
|
|
||||||
+ -re "in threader \\(.*$gdb_prompt $" {
|
|
||||||
+ pass "0x0 entry not found"
|
|
||||||
+ }
|
|
||||||
+}
|
|
@ -1,27 +0,0 @@
|
|||||||
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
|
|
||||||
@@ -3165,6 +3165,13 @@ find_pc_sect_line (CORE_ADDR pc, struct obj_section *section, int notcurrent)
|
|
||||||
SYMBOL_LINKAGE_NAME (msymbol)); */
|
|
||||||
;
|
|
||||||
/* 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_LINKAGE_NAME (msymbol.minsym), paddress (target_gdbarch (), pc));
|
|
||||||
+ /* fall through */
|
|
||||||
else
|
|
||||||
return find_pc_line (BMSYMBOL_VALUE_ADDRESS (mfunsym), 0);
|
|
||||||
}
|
|
@ -1,130 +0,0 @@
|
|||||||
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-ia64-libunwind-leak-test.patch
|
|
||||||
|
|
||||||
;; Test ia64 memory leaks of the code using libunwind.
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/unwind-leak.c b/gdb/testsuite/gdb.base/unwind-leak.c
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.base/unwind-leak.c
|
|
||||||
@@ -0,0 +1,29 @@
|
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ Copyright 2007 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.
|
|
||||||
+
|
|
||||||
+ Please email any bugs, comments, and/or additions to this file to:
|
|
||||||
+ bug-gdb@prep.ai.mit.edu */
|
|
||||||
+
|
|
||||||
+#include <unistd.h>
|
|
||||||
+
|
|
||||||
+int main()
|
|
||||||
+{
|
|
||||||
+ for (;;)
|
|
||||||
+ alarm (0);
|
|
||||||
+ return 0;
|
|
||||||
+}
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/unwind-leak.exp b/gdb/testsuite/gdb.base/unwind-leak.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.base/unwind-leak.exp
|
|
||||||
@@ -0,0 +1,83 @@
|
|
||||||
+# Copyright 2007 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 unwind-leak
|
|
||||||
+set srcfile ${testfile}.c
|
|
||||||
+set shfile [standard_output_file ${testfile}-gdb.sh]
|
|
||||||
+set binfile [standard_output_file ${testfile}]
|
|
||||||
+if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
|
|
||||||
+ untested "Couldn't compile test program"
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Get things started.
|
|
||||||
+
|
|
||||||
+gdb_exit
|
|
||||||
+gdb_start
|
|
||||||
+gdb_reinitialize_dir $srcdir/$subdir
|
|
||||||
+gdb_load ${binfile}
|
|
||||||
+
|
|
||||||
+set pid [exp_pid -i [board_info host fileid]]
|
|
||||||
+
|
|
||||||
+# For C programs, "start" should stop in main().
|
|
||||||
+
|
|
||||||
+gdb_test "start" \
|
|
||||||
+ "main \\(\\) at .*$srcfile.*" \
|
|
||||||
+ "start"
|
|
||||||
+
|
|
||||||
+set loc [gdb_get_line_number "alarm"]
|
|
||||||
+gdb_breakpoint $loc
|
|
||||||
+
|
|
||||||
+proc memory_get {} {
|
|
||||||
+ global pid
|
|
||||||
+ set fd [open "/proc/$pid/statm"]
|
|
||||||
+ gets $fd line
|
|
||||||
+ close $fd
|
|
||||||
+ # number of pages of data/stack
|
|
||||||
+ scan $line "%*d%*d%*d%*d%*d%d" drs
|
|
||||||
+ return $drs
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+set cycles 100
|
|
||||||
+# For 100 cycles it was 1308: from = 363 KB, to = 1671 KB
|
|
||||||
+set permit_kb 100
|
|
||||||
+verbose -log "cycles = $cycles, permit_kb = $permit_kb"
|
|
||||||
+
|
|
||||||
+set fail 0
|
|
||||||
+set test "breakpoint stop/continue cycles"
|
|
||||||
+for {set i $cycles} {$i > 0} {set i [expr {$i - 1}]} {
|
|
||||||
+ gdb_test_multiple "continue" $test {
|
|
||||||
+ -re "Breakpoint 2, main .*alarm .*.*${gdb_prompt} $" {
|
|
||||||
+ }
|
|
||||||
+ -re "Segmentation fault" {
|
|
||||||
+ fail $test
|
|
||||||
+ set i 0
|
|
||||||
+ set fail 1
|
|
||||||
+ }
|
|
||||||
+ }
|
|
||||||
+ if ![info exists from] {
|
|
||||||
+ set from [memory_get]
|
|
||||||
+ }
|
|
||||||
+}
|
|
||||||
+set to [memory_get]
|
|
||||||
+if {!$fail} {
|
|
||||||
+ verbose -log "from = $from KB, to = $to KB"
|
|
||||||
+ if {$from > 0 && $to > 10 && $to < $from + $permit_kb} {
|
|
||||||
+ pass $test
|
|
||||||
+ } else {
|
|
||||||
+ fail $test
|
|
||||||
+ }
|
|
||||||
+}
|
|
@ -1,62 +0,0 @@
|
|||||||
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-last-address-space-byte-test.patch
|
|
||||||
|
|
||||||
;; Testcase for deadlocking on last address space byte; for corrupted backtraces.
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/largecore-last-address-lock.exp b/gdb/testsuite/gdb.base/largecore-last-address-lock.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.base/largecore-last-address-lock.exp
|
|
||||||
@@ -0,0 +1,49 @@
|
|
||||||
+# Copyright 2006 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.
|
|
||||||
+
|
|
||||||
+if $tracelevel then {
|
|
||||||
+ strace $tracelevel
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Get things started.
|
|
||||||
+
|
|
||||||
+gdb_exit
|
|
||||||
+gdb_start
|
|
||||||
+
|
|
||||||
+# i386 (32-bit) only: gdb with Red Hat largecore patch did lock up:
|
|
||||||
+# https://enterprise.redhat.com/issue-tracker/?module=issues&action=view&tid=103263
|
|
||||||
+# https://bugzilla.redhat.com/bugzilla/show_bug.cgi?id=210614
|
|
||||||
+
|
|
||||||
+# i386: Bug exists when the `target_xfer_memory' condition
|
|
||||||
+# `(memaddr + len < region->hi)' operates on 64-bit operands on
|
|
||||||
+# largecore-patched with 32-bit addresses and so it can get `false' with
|
|
||||||
+# arbitrary `len'.
|
|
||||||
+
|
|
||||||
+# x86_64: The bug is not present as the operands and calculations have the same
|
|
||||||
+# bit size. Would would still need to pass there the highest address
|
|
||||||
+# (`memaddr == 0xffffffffffffffff') but we would need to pass `len == 0'
|
|
||||||
+# to make the condition `(memaddr + len < region->hi)' false.
|
|
||||||
+# `len == 0' would get caught eariler.
|
|
||||||
+
|
|
||||||
+# Error in the success case is immediate.
|
|
||||||
+set timeoutold ${timeout}
|
|
||||||
+set timeout 10
|
|
||||||
+
|
|
||||||
+gdb_test "x/xb 0xffffffff" \
|
|
||||||
+ "Cannot access memory at address 0xffffffff" \
|
|
||||||
+ "Read the last address space byte"
|
|
||||||
+
|
|
||||||
+set timeout ${timeoutold}
|
|
@ -1,95 +0,0 @@
|
|||||||
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-missed-trap-on-step-test.patch
|
|
||||||
|
|
||||||
;; Test hiding unexpected breakpoints on intentional step commands.
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
Fix has been committed to:
|
|
||||||
gdb-6.6-scheduler_locking-step-sw-watchpoints2.patch
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/watchpoint-during-step.c b/gdb/testsuite/gdb.base/watchpoint-during-step.c
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.base/watchpoint-during-step.c
|
|
||||||
@@ -0,0 +1,30 @@
|
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ Copyright 2007 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.
|
|
||||||
+
|
|
||||||
+ Please email any bugs, comments, and/or additions to this file to:
|
|
||||||
+ bug-gdb@prep.ai.mit.edu */
|
|
||||||
+
|
|
||||||
+static int var;
|
|
||||||
+
|
|
||||||
+int main()
|
|
||||||
+{
|
|
||||||
+ var = 1;
|
|
||||||
+ var = 2;
|
|
||||||
+ var = 3;
|
|
||||||
+ return 0;
|
|
||||||
+}
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/watchpoint-during-step.exp b/gdb/testsuite/gdb.base/watchpoint-during-step.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.base/watchpoint-during-step.exp
|
|
||||||
@@ -0,0 +1,44 @@
|
|
||||||
+# Copyright 2007 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 watchpoint-during-step
|
|
||||||
+set srcfile ${testfile}.c
|
|
||||||
+set binfile [standard_output_file ${testfile}]
|
|
||||||
+if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
|
|
||||||
+ untested "Couldn't compile test program"
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Get things started.
|
|
||||||
+
|
|
||||||
+gdb_exit
|
|
||||||
+gdb_start
|
|
||||||
+gdb_reinitialize_dir $srcdir/$subdir
|
|
||||||
+gdb_load ${binfile}
|
|
||||||
+
|
|
||||||
+runto_main
|
|
||||||
+
|
|
||||||
+gdb_breakpoint [gdb_get_line_number "var = 2"]
|
|
||||||
+gdb_continue_to_breakpoint "Find the first var set"
|
|
||||||
+
|
|
||||||
+gdb_test "step" ".*var = 3;" "Step to the next var set"
|
|
||||||
+
|
|
||||||
+gdb_test "watch var" "atchpoint .*: var" "Set the watchpoint"
|
|
||||||
+
|
|
||||||
+# Here is the target point. Be careful to not have breakpoint set on the line
|
|
||||||
+# we step from as in this case it is a valid upstream KFAIL gdb/38
|
|
||||||
+
|
|
||||||
+gdb_test "step" ".*Old value = 2.*New value = 3.*" "Catch the watchpoint"
|
|
@ -1,141 +0,0 @@
|
|||||||
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-readline-long-line-crash-test.patch
|
|
||||||
|
|
||||||
;; Fix readline segfault on excessively long hand-typed lines.
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
https://bugzilla.redhat.com/bugzilla/show_bug.cgi?id=214196
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/readline-overflow.exp b/gdb/testsuite/gdb.base/readline-overflow.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.base/readline-overflow.exp
|
|
||||||
@@ -0,0 +1,126 @@
|
|
||||||
+# Copyright 2006 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.
|
|
||||||
+
|
|
||||||
+# Please email any bugs, comments, and/or additions to this file to:
|
|
||||||
+# bug-gdb@prep.ai.mit.edu
|
|
||||||
+
|
|
||||||
+# This file was written by Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
+
|
|
||||||
+# This file is part of the gdb testsuite.
|
|
||||||
+
|
|
||||||
+#
|
|
||||||
+# Tests for readline buffer overflow.
|
|
||||||
+#
|
|
||||||
+
|
|
||||||
+if $tracelevel {
|
|
||||||
+ strace $tracelevel
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# 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.
|
|
||||||
+global env
|
|
||||||
+if [info exists env(INPUTRC)] {
|
|
||||||
+ set old_inputrc $env(INPUTRC)
|
|
||||||
+}
|
|
||||||
+set env(INPUTRC) "/dev/null"
|
|
||||||
+
|
|
||||||
+set oldtimeout1 $timeout
|
|
||||||
+set timeout 600
|
|
||||||
+
|
|
||||||
+if [info exists env(GDBHISTFILE)] {
|
|
||||||
+ set old_gdbhistfile $env(GDBHISTFILE)
|
|
||||||
+}
|
|
||||||
+if [info exists env(HISTSIZE)] {
|
|
||||||
+ set old_histsize $env(HISTSIZE)
|
|
||||||
+}
|
|
||||||
+set env(GDBHISTFILE) "${srcdir}/${subdir}/gdb_history"
|
|
||||||
+set env(HISTSIZE) "10"
|
|
||||||
+
|
|
||||||
+gdb_exit
|
|
||||||
+gdb_start
|
|
||||||
+gdb_reinitialize_dir $srcdir/$subdir
|
|
||||||
+
|
|
||||||
+
|
|
||||||
+set width 11
|
|
||||||
+gdb_test "set width $width" \
|
|
||||||
+ "" \
|
|
||||||
+ "Setting width to $width."
|
|
||||||
+#gdb_test "set height 1" \
|
|
||||||
+# "" \
|
|
||||||
+# "Setting height to 1."
|
|
||||||
+send_gdb "run X"
|
|
||||||
+set i 0
|
|
||||||
+# It crashes using `set width 7' on `set total 3560'.
|
|
||||||
+# Sometimes it corrupts screen on `set width 7'.
|
|
||||||
+# Bugreport used `set total 130001':
|
|
||||||
+# https://bugzilla.redhat.com/bugzilla/show_bug.cgi?id=214196
|
|
||||||
+# Check also `timeout' above.
|
|
||||||
+set total 4200
|
|
||||||
+gdb_expect {
|
|
||||||
+ -re X {
|
|
||||||
+ incr i
|
|
||||||
+ if {$i <= $total} {
|
|
||||||
+ send_gdb "X"
|
|
||||||
+ exp_continue
|
|
||||||
+ }
|
|
||||||
+ }
|
|
||||||
+ -re "\[ \b\r\n\]" {
|
|
||||||
+ exp_continue
|
|
||||||
+ }
|
|
||||||
+ eof {
|
|
||||||
+ fail "gdb sending total $total characters"
|
|
||||||
+ note "Failed after sending $i characters, reason: EOF"
|
|
||||||
+ gdb_clear_suppressed
|
|
||||||
+ }
|
|
||||||
+ timeout {
|
|
||||||
+ fail "gdb sending total $total characters"
|
|
||||||
+ note "Failed after sending $i characters (timeout $timeout), reason: TIMEOUT"
|
|
||||||
+ gdb_clear_suppressed
|
|
||||||
+ }
|
|
||||||
+ default {
|
|
||||||
+ fail "gdb sending total $total characters"
|
|
||||||
+ note "Failed after sending $i characters, reason: 0=\[$expect_out(0,string)\] buffer=\[$expect_out(buffer)\]"
|
|
||||||
+ gdb_clear_suppressed
|
|
||||||
+ }
|
|
||||||
+}
|
|
||||||
+send_gdb "\r"
|
|
||||||
+gdb_test "" \
|
|
||||||
+ "No executable file specified..*" \
|
|
||||||
+ "All the characters transferred"
|
|
||||||
+
|
|
||||||
+
|
|
||||||
+# Restore globals modified in this test...
|
|
||||||
+if [info exists old_inputrc] {
|
|
||||||
+ set env(INPUTRC) $old_inputrc
|
|
||||||
+} else {
|
|
||||||
+ unset env(INPUTRC)
|
|
||||||
+}
|
|
||||||
+if [info exists old_gdbhistfile] {
|
|
||||||
+ set env(GDBHISTFILE) $old_gdbhistfile
|
|
||||||
+} else {
|
|
||||||
+ unset env(GDBHISTFILE)
|
|
||||||
+}
|
|
||||||
+if [info exists old_histsize] {
|
|
||||||
+ set env(HISTSIZE) $old_histsize
|
|
||||||
+} else {
|
|
||||||
+ unset env(HISTSIZE)
|
|
||||||
+}
|
|
||||||
+set timeout $oldtimeout1
|
|
||||||
+
|
|
@ -1,180 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
|
||||||
Subject: gdb-6.5-sharedlibrary-path.patch
|
|
||||||
|
|
||||||
;; Fix TLS symbols resolving for shared libraries with a relative pathname.
|
|
||||||
;; The testsuite needs `gdb-6.5-tls-of-separate-debuginfo.patch'.
|
|
||||||
;;=fedoratest: One should recheck if it is really fixed upstream.
|
|
||||||
|
|
||||||
If you provided some relative path to the shared library, such as with
|
|
||||||
export LD_LIBRARY_PATH=.
|
|
||||||
then gdb would fail to match the shared library name during the TLS lookup.
|
|
||||||
|
|
||||||
Dropped the workaround/fix for gdb-6.8.50.20081128 - is it still needed?
|
|
||||||
|
|
||||||
The testsuite needs `gdb-6.3-bz146810-solib_absolute_prefix_is_empty.patch'.
|
|
||||||
The testsuite needs `gdb-6.5-tls-of-separate-debuginfo.patch'.
|
|
||||||
|
|
||||||
2006-09-01 Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
|
|
||||||
* solib-svr4.c (svr4_fetch_objfile_link_map): Match even absolute
|
|
||||||
requested pathnames to the internal loaded relative pathnames.
|
|
||||||
|
|
||||||
2007-10-16 Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
|
|
||||||
Port to GDB-6.7.
|
|
||||||
|
|
||||||
2008-02-27 Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
|
|
||||||
Port to gdb-6.7.50.20080227.
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.threads/tls-sepdebug-main.c b/gdb/testsuite/gdb.threads/tls-sepdebug-main.c
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.threads/tls-sepdebug-main.c
|
|
||||||
@@ -0,0 +1,25 @@
|
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ Copyright 2006 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.
|
|
||||||
+
|
|
||||||
+ Please email any bugs, comments, and/or additions to this file to:
|
|
||||||
+ bug-gdb@prep.ai.mit.edu */
|
|
||||||
+
|
|
||||||
+int main()
|
|
||||||
+{
|
|
||||||
+ return 0;
|
|
||||||
+}
|
|
||||||
diff --git a/gdb/testsuite/gdb.threads/tls-sepdebug-shared.c b/gdb/testsuite/gdb.threads/tls-sepdebug-shared.c
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.threads/tls-sepdebug-shared.c
|
|
||||||
@@ -0,0 +1,22 @@
|
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ Copyright 2006 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.
|
|
||||||
+
|
|
||||||
+ Please email any bugs, comments, and/or additions to this file to:
|
|
||||||
+ bug-gdb@prep.ai.mit.edu */
|
|
||||||
+
|
|
||||||
+__thread int var = 42;
|
|
||||||
diff --git a/gdb/testsuite/gdb.threads/tls-sepdebug.exp b/gdb/testsuite/gdb.threads/tls-sepdebug.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.threads/tls-sepdebug.exp
|
|
||||||
@@ -0,0 +1,87 @@
|
|
||||||
+# Copyright 2006 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.
|
|
||||||
+
|
|
||||||
+if $tracelevel then {
|
|
||||||
+ strace $tracelevel
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+set testfile tls-sepdebug
|
|
||||||
+set srcmainfile ${testfile}-main.c
|
|
||||||
+set srcsharedfile ${testfile}-shared.c
|
|
||||||
+
|
|
||||||
+set binmainfile [standard_output_file ${testfile}-main]
|
|
||||||
+set binsharedbase ${testfile}-shared.so
|
|
||||||
+set binsharedfile [standard_output_file ${binsharedbase}]
|
|
||||||
+set binshareddebugfile [standard_output_file ${binsharedbase}.debug]
|
|
||||||
+
|
|
||||||
+# Use explicit -soname as otherwise the full path to the library would get
|
|
||||||
+# encoded into ${binmainfile} making LD_LIBRARY_PATH tests useless.
|
|
||||||
+
|
|
||||||
+# FIXME: gcc dependency (-Wl,-soname).
|
|
||||||
+
|
|
||||||
+if { [gdb_compile_shlib "${srcdir}/${subdir}/${srcsharedfile}" "${binsharedfile}" [list debug additional_flags=-Wl,-soname=${binsharedbase}]] != "" } {
|
|
||||||
+ untested "Couldn't compile test library"
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# eu-strip(1) works fine but it is a part of `elfutils', not `binutils'.
|
|
||||||
+if 0 then {
|
|
||||||
+ remote_exec build "eu-strip -f ${binshareddebugfile} ${binsharedfile}"
|
|
||||||
+} else {
|
|
||||||
+ remote_exec build "objcopy --only-keep-debug ${binsharedfile} ${binshareddebugfile}"
|
|
||||||
+ remote_exec build "objcopy --strip-debug ${binsharedfile}"
|
|
||||||
+ remote_exec build "objcopy --add-gnu-debuglink=${binshareddebugfile} ${binsharedfile}"
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Do not use `shlib=' as it will automatically add also -rpath for gcc.
|
|
||||||
+
|
|
||||||
+if { [gdb_compile_pthreads "${srcdir}/${subdir}/${srcmainfile} ${binsharedfile}" "${binmainfile}" executable {debug}] != "" } {
|
|
||||||
+ untested "Couldn't compile test program"
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Get things started.
|
|
||||||
+
|
|
||||||
+# Test also the proper resolving of relative library names to absolute ones.
|
|
||||||
+# \$PWD is easy - it is the absolute way
|
|
||||||
+# ${subdir} would fail on "print var"
|
|
||||||
+
|
|
||||||
+set absdir [file dirname [standard_output_file ${binsharedbase}]]
|
|
||||||
+foreach ld_library_path [list $absdir [relative_filename [pwd] $absdir]] name { absolute relative } {
|
|
||||||
+
|
|
||||||
+ gdb_exit
|
|
||||||
+ gdb_start
|
|
||||||
+ ###gdb_reinitialize_dir $srcdir/$subdir
|
|
||||||
+
|
|
||||||
+ gdb_test "set env LD_LIBRARY_PATH=$ld_library_path" \
|
|
||||||
+ "" \
|
|
||||||
+ "set env LD_LIBRARY_PATH is $name"
|
|
||||||
+
|
|
||||||
+ gdb_load ${binmainfile}
|
|
||||||
+
|
|
||||||
+ # For C programs, "start" should stop in main().
|
|
||||||
+
|
|
||||||
+ gdb_test "start" \
|
|
||||||
+ "main \\(\\) at .*${srcmainfile}.*" \
|
|
||||||
+ "start"
|
|
||||||
+
|
|
||||||
+ # Check for: Cannot find shared library `/usr/lib/debug/lib/libc-2.4.90.so.debug' in dynamic linker's load module list
|
|
||||||
+ # as happens with TLS variables and `separate_debug_objfile_backlink'.
|
|
||||||
+
|
|
||||||
+ gdb_test "print var" \
|
|
||||||
+ "\\\$1 = \[0-9\].*" \
|
|
||||||
+ "print TLS variable from a shared library with $name-directory separate debug info file"
|
|
||||||
+}
|
|
@ -1,197 +0,0 @@
|
|||||||
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/common/common-exceptions.h b/gdb/common/common-exceptions.h
|
|
||||||
--- a/gdb/common/common-exceptions.h
|
|
||||||
+++ b/gdb/common/common-exceptions.h
|
|
||||||
@@ -104,6 +104,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
|
|
||||||
};
|
|
||||||
diff --git a/gdb/exec.c b/gdb/exec.c
|
|
||||||
--- a/gdb/exec.c
|
|
||||||
+++ b/gdb/exec.c
|
|
||||||
@@ -36,6 +36,7 @@
|
|
||||||
#include "gdb_bfd.h"
|
|
||||||
#include "gcore.h"
|
|
||||||
#include "source.h"
|
|
||||||
+#include "exceptions.h"
|
|
||||||
|
|
||||||
#include <fcntl.h>
|
|
||||||
#include "readline/readline.h"
|
|
||||||
@@ -357,12 +358,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 (_("\"%s\": not in executable format: %s"),
|
|
||||||
- scratch_pathname,
|
|
||||||
- gdb_bfd_errmsg (bfd_get_error (), matching));
|
|
||||||
+
|
|
||||||
+ 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 (_("\"%s\": not in executable format: %s"),
|
|
||||||
+ scratch_pathname,
|
|
||||||
+ gdb_bfd_errmsg (bfd_get_error (), matching));
|
|
||||||
}
|
|
||||||
|
|
||||||
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
|
|
||||||
@@ -447,6 +447,37 @@ 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)
|
|
||||||
+{
|
|
||||||
+ volatile struct gdb_exception e;
|
|
||||||
+
|
|
||||||
+ gdb_assert (exec_bfd == NULL);
|
|
||||||
+
|
|
||||||
+ TRY
|
|
||||||
+ {
|
|
||||||
+ exec_file_attach (filename, from_tty);
|
|
||||||
+ }
|
|
||||||
+ CATCH (e, RETURN_MASK_ALL)
|
|
||||||
+ {
|
|
||||||
+ 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 (e);
|
|
||||||
+ }
|
|
||||||
+ END_CATCH
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
static void
|
|
||||||
captured_main_1 (struct captured_main_args *context)
|
|
||||||
{
|
|
||||||
@@ -883,6 +914,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++;
|
|
||||||
}
|
|
||||||
|
|
||||||
@@ -1033,11 +1066,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! */
|
|
||||||
- if (catch_command_errors (exec_file_attach, execarg,
|
|
||||||
- !batch_flag))
|
|
||||||
+ 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. */
|
|
||||||
+ if (catch_command_errors (func, execarg, !batch_flag)
|
|
||||||
+ && core_bfd == NULL)
|
|
||||||
catch_command_errors (symbol_file_add_main_adapter, symarg,
|
|
||||||
!batch_flag);
|
|
||||||
}
|
|
@ -1,42 +0,0 @@
|
|||||||
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-rpm-librpm-workaround.patch
|
|
||||||
|
|
||||||
;; Workaround librpm BZ 643031 due to its unexpected exit() calls (BZ 642879).
|
|
||||||
;;=push+jan
|
|
||||||
|
|
||||||
diff --git a/gdb/build-id.c b/gdb/build-id.c
|
|
||||||
--- a/gdb/build-id.c
|
|
||||||
+++ b/gdb/build-id.c
|
|
||||||
@@ -652,6 +652,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
|
|
||||||
--- a/gdb/proc-service.list
|
|
||||||
+++ b/gdb/proc-service.list
|
|
||||||
@@ -37,4 +37,7 @@
|
|
||||||
ps_pstop;
|
|
||||||
ps_ptread;
|
|
||||||
ps_ptwrite;
|
|
||||||
+
|
|
||||||
+ /* gdb-6.6-buildid-locate-rpm.patch */
|
|
||||||
+ rpmsqEnable;
|
|
||||||
};
|
|
@ -1,129 +0,0 @@
|
|||||||
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-rpm-scl.patch
|
|
||||||
|
|
||||||
;; [SCL] Skip deprecated .gdb_index warning for Red Hat built files (BZ 953585).
|
|
||||||
;;=push+jan
|
|
||||||
|
|
||||||
warning: Skipping deprecated .gdb_index section
|
|
||||||
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
|
|
||||||
@@ -689,7 +689,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;
|
|
||||||
@@ -796,7 +800,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;
|
|
||||||
@@ -914,6 +922,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);
|
|
||||||
}
|
|
||||||
@@ -924,6 +963,21 @@ missing_rpm_enlist (const char *filename)
|
|
||||||
}
|
|
||||||
|
|
||||||
static int
|
|
||||||
+#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);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+static int
|
|
||||||
+#endif
|
|
||||||
missing_rpm_list_compar (const char *const *ap, const char *const *bp)
|
|
||||||
{
|
|
||||||
return strcoll (*ap, *bp);
|
|
||||||
diff --git a/gdb/dwarf2read.c b/gdb/dwarf2read.c
|
|
||||||
--- a/gdb/dwarf2read.c
|
|
||||||
+++ b/gdb/dwarf2read.c
|
|
||||||
@@ -3469,6 +3469,16 @@ read_gdb_index_from_section (struct objfile *objfile,
|
|
||||||
"set use-deprecated-index-sections on". */
|
|
||||||
if (version < 6 && !deprecated_ok)
|
|
||||||
{
|
|
||||||
+#ifdef GDB_INDEX_VERIFY_VENDOR
|
|
||||||
+ extern int rpm_verify_vendor (const char *filename);
|
|
||||||
+
|
|
||||||
+ /* Red Hat Developer Toolset exception. */
|
|
||||||
+ if (rpm_verify_vendor (filename))
|
|
||||||
+ {}
|
|
||||||
+ else
|
|
||||||
+ {
|
|
||||||
+
|
|
||||||
+#endif
|
|
||||||
static int warning_printed = 0;
|
|
||||||
if (!warning_printed)
|
|
||||||
{
|
|
||||||
@@ -3480,6 +3490,10 @@ to use the section anyway."),
|
|
||||||
warning_printed = 1;
|
|
||||||
}
|
|
||||||
return 0;
|
|
||||||
+#ifdef GDB_INDEX_VERIFY_VENDOR
|
|
||||||
+
|
|
||||||
+ }
|
|
||||||
+#endif
|
|
||||||
}
|
|
||||||
/* Version 7 indices generated by gold refer to the CU for a symbol instead
|
|
||||||
of the TU (for symbols coming from TUs),
|
|
File diff suppressed because it is too large
Load Diff
@ -1,94 +0,0 @@
|
|||||||
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-bz230000-power6-disassembly-test.patch
|
|
||||||
|
|
||||||
;; Testcase for PPC Power6/DFP instructions disassembly (BZ 230000).
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
https://bugzilla.redhat.com/bugzilla/show_bug.cgi?id=230000
|
|
||||||
|
|
||||||
The original testcase
|
|
||||||
https://bugzilla.redhat.com/bugzilla/show_bug.cgi?id=230000#c1
|
|
||||||
requires too recent GCC.
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.arch/powerpc-power6.exp b/gdb/testsuite/gdb.arch/powerpc-power6.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.arch/powerpc-power6.exp
|
|
||||||
@@ -0,0 +1,54 @@
|
|
||||||
+# Copyright 2007 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.
|
|
||||||
+
|
|
||||||
+# Test PowerPC Power6 instructions disassembly.
|
|
||||||
+
|
|
||||||
+if {![istarget "powerpc*-*-*"]} then {
|
|
||||||
+ verbose "Skipping PowerPC Power6 instructions disassembly."
|
|
||||||
+ return
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+set testfile "powerpc-power6"
|
|
||||||
+set srcfile ${testfile}.s
|
|
||||||
+set objfile [standard_output_file ${testfile}.o]
|
|
||||||
+
|
|
||||||
+if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${objfile}" object {debug}] != "" } {
|
|
||||||
+ untested "PowerPC prologue tests"
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+
|
|
||||||
+gdb_exit
|
|
||||||
+gdb_start
|
|
||||||
+gdb_reinitialize_dir $srcdir/$subdir
|
|
||||||
+gdb_load ${objfile}
|
|
||||||
+
|
|
||||||
+# Disassemble the function.
|
|
||||||
+
|
|
||||||
+gdb_test "disass func" ":\tblr\r\n.*" "Basic disassembly"
|
|
||||||
+
|
|
||||||
+gdb_test "disass func" ":\tdcbzl *r8,r9\r\n.*" "Power5 disassembly dcbzl"
|
|
||||||
+gdb_test "disass func" ":\tfrsqrtes *f10,f11\r\n.*" "Power5 disassembly frsqrtes"
|
|
||||||
+gdb_test "disass func" ":\tdadd *f1,f2,f1\r\n.*" "Power6 disassembly dadd"
|
|
||||||
+gdb_test "disass func" ":\tdaddq *f0,f2,f0\r\n.*" "Power6 disassembly daddq"
|
|
||||||
+gdb_test "disass func" ":\tdsub *f1,f2,f1\r\n.*" "Power6 disassembly dsub"
|
|
||||||
+gdb_test "disass func" ":\tdsubq *f0,f2,f0\r\n.*" "Power6 disassembly dsubq"
|
|
||||||
+gdb_test "disass func" ":\tdmul *f1,f2,f1\r\n.*" "Power6 disassembly dmul"
|
|
||||||
+gdb_test "disass func" ":\tdmulq *f0,f2,f0\r\n.*" "Power6 disassembly dmulq"
|
|
||||||
+gdb_test "disass func" ":\tddiv *f1,f2,f1\r\n.*" "Power6 disassembly ddiv"
|
|
||||||
+gdb_test "disass func" ":\tddivq *f0,f2,f0\r\n.*" "Power6 disassembly ddivq"
|
|
||||||
+gdb_test "disass func" ":\tdcmpu *cr1,f2,f1\r\n.*" "Power6 disassembly dcmpu"
|
|
||||||
+gdb_test "disass func" ":\tdcmpuq *cr1,f2,f0\r\n.*" "Power6 disassembly dcmpuq"
|
|
||||||
diff --git a/gdb/testsuite/gdb.arch/powerpc-power6.s b/gdb/testsuite/gdb.arch/powerpc-power6.s
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.arch/powerpc-power6.s
|
|
||||||
@@ -0,0 +1,16 @@
|
|
||||||
+ .text
|
|
||||||
+ .globl func
|
|
||||||
+func:
|
|
||||||
+ blr
|
|
||||||
+ .long 0x7c284fec /* dcbzl r8,r9 */
|
|
||||||
+ .long 0xed405834 /* frsqrtes f10,f11 */
|
|
||||||
+ .long 0xec220804 /* dadd f1,f2,f1 */
|
|
||||||
+ .long 0xfc020004 /* daddq f0,f2,f0 */
|
|
||||||
+ .long 0xec220c04 /* dsub f1,f2,f1 */
|
|
||||||
+ .long 0xfc020404 /* dsubq f0,f2,f0 */
|
|
||||||
+ .long 0xec220844 /* dmul f1,f2,f1 */
|
|
||||||
+ .long 0xfc020044 /* dmulq f0,f2,f0 */
|
|
||||||
+ .long 0xec220c44 /* ddiv f1,f2,f1 */
|
|
||||||
+ .long 0xfc020444 /* ddivq f0,f2,f0 */
|
|
||||||
+ .long 0xec820d04 /* dcmpu cr1,f2,f1 */
|
|
||||||
+ .long 0xfc820504 /* dcmpuq cr1,f2,f0 */
|
|
@ -1,78 +0,0 @@
|
|||||||
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-scheduler_locking-step-is-default.patch
|
|
||||||
|
|
||||||
;; Make upstream `set scheduler-locking step' as default.
|
|
||||||
;;=push+jan: How much is scheduler-locking relevant after non-stop?
|
|
||||||
|
|
||||||
diff --git a/gdb/infrun.c b/gdb/infrun.c
|
|
||||||
--- a/gdb/infrun.c
|
|
||||||
+++ b/gdb/infrun.c
|
|
||||||
@@ -2193,7 +2193,7 @@ static const char *const scheduler_enums[] = {
|
|
||||||
schedlock_replay,
|
|
||||||
NULL
|
|
||||||
};
|
|
||||||
-static const char *scheduler_mode = schedlock_replay;
|
|
||||||
+static const char *scheduler_mode = schedlock_step;
|
|
||||||
static void
|
|
||||||
show_scheduler_mode (struct ui_file *file, int from_tty,
|
|
||||||
struct cmd_list_element *c, const char *value)
|
|
||||||
diff --git a/gdb/testsuite/gdb.mi/mi-cli.exp b/gdb/testsuite/gdb.mi/mi-cli.exp
|
|
||||||
--- a/gdb/testsuite/gdb.mi/mi-cli.exp
|
|
||||||
+++ b/gdb/testsuite/gdb.mi/mi-cli.exp
|
|
||||||
@@ -199,7 +199,7 @@ mi_expect_stop "breakpoint-hit" "main" "" ".*basics.c" \
|
|
||||||
# Test that the token is output even for CLI commands
|
|
||||||
# Also test that *stopped includes frame information.
|
|
||||||
mi_gdb_test "34 next" \
|
|
||||||
- ".*34\\\^running.*\\*running,thread-id=\"all\"" \
|
|
||||||
+ ".*34\\\^running.*\\*running,thread-id=\"1\"" \
|
|
||||||
"34 next: run"
|
|
||||||
|
|
||||||
# Test that the new current source line is output to the console
|
|
||||||
diff --git a/gdb/testsuite/gdb.mi/mi-console.exp b/gdb/testsuite/gdb.mi/mi-console.exp
|
|
||||||
--- a/gdb/testsuite/gdb.mi/mi-console.exp
|
|
||||||
+++ b/gdb/testsuite/gdb.mi/mi-console.exp
|
|
||||||
@@ -60,6 +60,9 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb
|
|
||||||
|
|
||||||
mi_run_to_main
|
|
||||||
|
|
||||||
+# thread-id=\"all\" vs. thread-id=\"1\" below:
|
|
||||||
+mi_gdb_test "210-gdb-set scheduler-locking off" "210\\^done" "set scheduler-locking off"
|
|
||||||
+
|
|
||||||
# The output we get from the target depends on how it is hosted. If
|
|
||||||
# we are semihosted (e.g., the sim or a remote target that supports
|
|
||||||
# the File I/O remote protocol extension), we see the target I/O
|
|
||||||
diff --git a/gdb/testsuite/gdb.mi/mi-logging.exp b/gdb/testsuite/gdb.mi/mi-logging.exp
|
|
||||||
--- a/gdb/testsuite/gdb.mi/mi-logging.exp
|
|
||||||
+++ b/gdb/testsuite/gdb.mi/mi-logging.exp
|
|
||||||
@@ -53,7 +53,7 @@ close $chan
|
|
||||||
|
|
||||||
set mi_log_prompt "\[(\]gdb\[)\] \[\r\n\]+"
|
|
||||||
|
|
||||||
-if [regexp "\\^done\[\r\n\]+$mi_log_prompt\\^running\[\r\n\]+\\*running,thread-id=\"all\"\[\r\n\]+$mi_log_prompt\\*stopped,reason=\"end-stepping-range\",.*\[\r\n\]+$mi_log_prompt\\^running\[\r\n\]+\\*running,thread-id=\"all\"\[\r\n\]+$mi_log_prompt\\*stopped,reason=\"end-stepping-range\",.*\[\r\n\]+$mi_log_prompt" $logcontent] {
|
|
||||||
+if [regexp "\\^done\[\r\n\]+$mi_log_prompt\\^running\[\r\n\]+\\*running,thread-id=\"1\"\[\r\n\]+$mi_log_prompt\\*stopped,reason=\"end-stepping-range\",.*\[\r\n\]+$mi_log_prompt\\^running\[\r\n\]+\\*running,thread-id=\"1\"\[\r\n\]+$mi_log_prompt\\*stopped,reason=\"end-stepping-range\",.*\[\r\n\]+$mi_log_prompt" $logcontent] {
|
|
||||||
pass "log file contents"
|
|
||||||
} else {
|
|
||||||
fail "log file contents"
|
|
||||||
@@ -76,7 +76,7 @@ set chan [open $milogfile]
|
|
||||||
set logcontent [read $chan]
|
|
||||||
close $chan
|
|
||||||
|
|
||||||
-if [regexp "1001\\^done\[\r\n\]+$mi_log_prompt.*1002\\^running\[\r\n\]+\\*running,thread-id=\"all\"\[\r\n\]+$mi_log_prompt\\*stopped,reason=\"end-stepping-range\",.*\[\r\n\]+$mi_log_prompt.*1003\\^running\[\r\n\]+\\*running,thread-id=\"all\"\[\r\n\]+$mi_log_prompt\\*stopped,reason=\"end-stepping-range\",.*\[\r\n\]+$mi_log_prompt" $logcontent] {
|
|
||||||
+if [regexp "1001\\^done\[\r\n\]+$mi_log_prompt.*1002\\^running\[\r\n\]+\\*running,thread-id=\"1\"\[\r\n\]+$mi_log_prompt\\*stopped,reason=\"end-stepping-range\",.*\[\r\n\]+$mi_log_prompt.*1003\\^running\[\r\n\]+\\*running,thread-id=\"1\"\[\r\n\]+$mi_log_prompt\\*stopped,reason=\"end-stepping-range\",.*\[\r\n\]+$mi_log_prompt" $logcontent] {
|
|
||||||
pass "redirect log file contents"
|
|
||||||
} else {
|
|
||||||
fail "redirect log file contents"
|
|
||||||
diff --git a/gdb/testsuite/gdb.opt/inline-cmds.exp b/gdb/testsuite/gdb.opt/inline-cmds.exp
|
|
||||||
--- a/gdb/testsuite/gdb.opt/inline-cmds.exp
|
|
||||||
+++ b/gdb/testsuite/gdb.opt/inline-cmds.exp
|
|
||||||
@@ -331,7 +331,7 @@ proc mi_cli_step {cli_output_re message} {
|
|
||||||
|
|
||||||
send_gdb "interpreter-exec console \"step\"\n"
|
|
||||||
gdb_expect {
|
|
||||||
- -re "\\^running\r\n\\*running,thread-id=\"all\"\r\n${mi_gdb_prompt}${cli_output_re}" {
|
|
||||||
+ -re "\\^running\r\n\\*running,thread-id=\"1\"\r\n${mi_gdb_prompt}${cli_output_re}" {
|
|
||||||
pass $message
|
|
||||||
}
|
|
||||||
timeout {
|
|
@ -1,130 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
|
||||||
Subject: gdb-6.7-charsign-test.patch
|
|
||||||
|
|
||||||
;; Fix displaying of numeric char arrays as strings (BZ 224128).
|
|
||||||
;;=fedoratest: But it is failing anyway, one should check the behavior more.
|
|
||||||
|
|
||||||
https://bugzilla.redhat.com/bugzilla/show_bug.cgi?id=224128
|
|
||||||
|
|
||||||
2007-01-25 Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
|
|
||||||
* gdb.base/charsign.exp, gdb.base/charsign.c: New files.
|
|
||||||
[ stripped ]
|
|
||||||
|
|
||||||
2007-10-19 Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
|
|
||||||
Port to GDB-6.7 - only the testcase left, patch has been reverted,
|
|
||||||
char-vectors restricted.
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/charsign.c b/gdb/testsuite/gdb.base/charsign.c
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.base/charsign.c
|
|
||||||
@@ -0,0 +1,37 @@
|
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ Copyright 2007 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.
|
|
||||||
+
|
|
||||||
+ Please email any bugs, comments, and/or additions to this file to:
|
|
||||||
+ bug-gdb@prep.ai.mit.edu */
|
|
||||||
+
|
|
||||||
+int main()
|
|
||||||
+{
|
|
||||||
+ return 0;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+char n[]="A";
|
|
||||||
+signed char s[]="A";
|
|
||||||
+unsigned char u[]="A";
|
|
||||||
+
|
|
||||||
+typedef char char_n;
|
|
||||||
+typedef signed char char_s;
|
|
||||||
+typedef unsigned char char_u;
|
|
||||||
+
|
|
||||||
+char_n n_typed[]="A";
|
|
||||||
+char_s s_typed[]="A";
|
|
||||||
+char_u u_typed[]="A";
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/charsign.exp b/gdb/testsuite/gdb.base/charsign.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.base/charsign.exp
|
|
||||||
@@ -0,0 +1,63 @@
|
|
||||||
+# Copyright 2007 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 charsign
|
|
||||||
+set srcfile ${testfile}.c
|
|
||||||
+set binfile [standard_output_file ${testfile}]
|
|
||||||
+
|
|
||||||
+proc do_test { cflags } {
|
|
||||||
+ global srcdir
|
|
||||||
+ global binfile
|
|
||||||
+ global subdir
|
|
||||||
+ global srcfile
|
|
||||||
+ global gdb_prompt
|
|
||||||
+
|
|
||||||
+ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable [list debug additional_flags=$cflags]] != "" } {
|
|
||||||
+ untested "Couldn't compile test program"
|
|
||||||
+ return -1
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+ # Get things started.
|
|
||||||
+
|
|
||||||
+ gdb_exit
|
|
||||||
+ gdb_start
|
|
||||||
+ gdb_reinitialize_dir $srcdir/$subdir
|
|
||||||
+ gdb_load ${binfile}
|
|
||||||
+
|
|
||||||
+ # For C programs, "start" should stop in main().
|
|
||||||
+
|
|
||||||
+ gdb_test "p n" \
|
|
||||||
+ "= \"A\""
|
|
||||||
+ gdb_test "p s" \
|
|
||||||
+ "= \\{65 'A', 0 '\\\\0'\\}"
|
|
||||||
+ gdb_test "p u" \
|
|
||||||
+ "= \\{65 'A', 0 '\\\\0'\\}"
|
|
||||||
+ gdb_test "p n_typed" \
|
|
||||||
+ "= \"A\""
|
|
||||||
+ gdb_test "p s_typed" \
|
|
||||||
+ "= \\{65 'A', 0 '\\\\0'\\}"
|
|
||||||
+ gdb_test "p u_typed" \
|
|
||||||
+ "= \\{65 'A', 0 '\\\\0'\\}"
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# The string identification works despite the compiler flags below due to
|
|
||||||
+# gdbtypes.c:
|
|
||||||
+# if (name && strcmp (name, "char") == 0)
|
|
||||||
+# TYPE_FLAGS (type) |= TYPE_FLAG_NOSIGN;
|
|
||||||
+
|
|
||||||
+do_test {}
|
|
||||||
+do_test {-fsigned-char}
|
|
||||||
+do_test {-funsigned-char}
|
|
@ -1,104 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
|
||||||
Subject: gdb-6.7-testsuite-stable-results.patch
|
|
||||||
|
|
||||||
;; Testsuite fixes for more stable/comparable results.
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
gdb/testsuite/gdb.base/fileio.c:
|
|
||||||
gdb/testsuite/gdb.base/fileio.exp:
|
|
||||||
2007-12-08 Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
|
|
||||||
* gdb.base/fileio.c (ROOTSUBDIR): New macro.
|
|
||||||
(main): CHDIR into ROOTSUBDIR. CHOWN ROOTSUBDIR and CHDIR into
|
|
||||||
ROOTSUBDIR if we are being run as root.
|
|
||||||
* gdb.base/fileio.exp: Change the startup and finish cleanup.
|
|
||||||
Change the test file reference to be into the `fileio.dir' directory.
|
|
||||||
|
|
||||||
sources/gdb/testsuite/gdb.base/dump.exp:
|
|
||||||
Found on RHEL-5.s390x.
|
|
||||||
|
|
||||||
gdb-6.8.50.20090209/gdb/testsuite/gdb.base/auxv.exp:
|
|
||||||
random FAIL: gdb.base/auxv.exp: matching auxv data from live and gcore
|
|
||||||
|
|
||||||
gdb-6.8.50.20090209/gdb/testsuite/gdb.base/annota1.exp:
|
|
||||||
frames-invalid can happen asynchronously.
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/fileio.c b/gdb/testsuite/gdb.base/fileio.c
|
|
||||||
--- a/gdb/testsuite/gdb.base/fileio.c
|
|
||||||
+++ b/gdb/testsuite/gdb.base/fileio.c
|
|
||||||
@@ -560,6 +560,28 @@ strerrno (int err)
|
|
||||||
int
|
|
||||||
main ()
|
|
||||||
{
|
|
||||||
+ /* These tests
|
|
||||||
+ Open for write but no write permission returns EACCES
|
|
||||||
+ Unlinking a file in a directory w/o write access returns EACCES
|
|
||||||
+ fail if we are being run as root - drop the privileges here. */
|
|
||||||
+
|
|
||||||
+ if (geteuid () == 0)
|
|
||||||
+ {
|
|
||||||
+ uid_t uid = 99;
|
|
||||||
+
|
|
||||||
+ if (chown (OUTDIR, uid, uid) != 0)
|
|
||||||
+ {
|
|
||||||
+ printf ("chown %d.%d %s: %s\n", (int) uid, (int) uid,
|
|
||||||
+ OUTDIR, strerror (errno));
|
|
||||||
+ exit (1);
|
|
||||||
+ }
|
|
||||||
+ if (setuid (uid) || geteuid () == 0)
|
|
||||||
+ {
|
|
||||||
+ printf ("setuid %d: %s\n", (int) uid, strerror (errno));
|
|
||||||
+ exit (1);
|
|
||||||
+ }
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
/* Don't change the order of the calls. They partly depend on each other */
|
|
||||||
test_open ();
|
|
||||||
test_write ();
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/fileio.exp b/gdb/testsuite/gdb.base/fileio.exp
|
|
||||||
--- a/gdb/testsuite/gdb.base/fileio.exp
|
|
||||||
+++ b/gdb/testsuite/gdb.base/fileio.exp
|
|
||||||
@@ -24,9 +24,9 @@ if [target_info exists gdb,nofileio] {
|
|
||||||
standard_testfile
|
|
||||||
|
|
||||||
if {[is_remote host]} {
|
|
||||||
- set outdir .
|
|
||||||
+ set outdir "fileio.dir"
|
|
||||||
} else {
|
|
||||||
- set outdir [standard_output_file {}]
|
|
||||||
+ set outdir [standard_output_file "fileio.dir"]
|
|
||||||
}
|
|
||||||
|
|
||||||
if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" \
|
|
||||||
@@ -47,7 +47,8 @@ set dir2 [standard_output_file dir2.fileio.test]
|
|
||||||
if {[file exists $dir2] && ![file writable $dir2]} {
|
|
||||||
system "chmod +w $dir2"
|
|
||||||
}
|
|
||||||
-system "rm -rf [standard_output_file *.fileio.test]"
|
|
||||||
+system "rm -rf [standard_output_file fileio.dir]"
|
|
||||||
+system "mkdir -m777 [standard_output_file fileio.dir]"
|
|
||||||
|
|
||||||
set oldtimeout $timeout
|
|
||||||
set timeout [expr "$timeout + 60"]
|
|
||||||
@@ -89,7 +90,7 @@ gdb_test continue \
|
|
||||||
|
|
||||||
gdb_test "continue" ".*" ""
|
|
||||||
|
|
||||||
-catch "system \"chmod -f -w [standard_output_file nowrt.fileio.test]\""
|
|
||||||
+catch "system \"chmod -f -w [standard_output_file fileio.dir/nowrt.fileio.test]\""
|
|
||||||
|
|
||||||
gdb_test continue \
|
|
||||||
"Continuing\\..*open 5:.*EACCES$stop_msg" \
|
|
||||||
@@ -276,9 +277,7 @@ gdb_test continue \
|
|
||||||
gdb_exit
|
|
||||||
|
|
||||||
# Make dir2 writable again so rm -rf of a build tree Just Works.
|
|
||||||
-if {[file exists $dir2] && ![file writable $dir2]} {
|
|
||||||
- system "chmod +w $dir2"
|
|
||||||
-}
|
|
||||||
+system "chmod -R +w $outdir"
|
|
||||||
|
|
||||||
set timeout $oldtimeout
|
|
||||||
return 0
|
|
@ -1,37 +0,0 @@
|
|||||||
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-bz436037-reg-no-longer-active.patch
|
|
||||||
|
|
||||||
;; Fix register assignments with no GDB stack frames (BZ 436037).
|
|
||||||
;;=push+jan: This fix is incorrect.
|
|
||||||
|
|
||||||
diff --git a/gdb/valops.c b/gdb/valops.c
|
|
||||||
--- a/gdb/valops.c
|
|
||||||
+++ b/gdb/valops.c
|
|
||||||
@@ -1104,6 +1104,8 @@ value_assign (struct value *toval, struct value *fromval)
|
|
||||||
struct gdbarch *gdbarch;
|
|
||||||
int value_reg;
|
|
||||||
|
|
||||||
+ value_reg = VALUE_REGNUM (toval);
|
|
||||||
+
|
|
||||||
/* Figure out which frame this is in currently.
|
|
||||||
|
|
||||||
We use VALUE_FRAME_ID for obtaining the value's frame id instead of
|
|
||||||
@@ -1113,8 +1115,14 @@ value_assign (struct value *toval, struct value *fromval)
|
|
||||||
frame. */
|
|
||||||
frame = frame_find_by_id (VALUE_FRAME_ID (toval));
|
|
||||||
|
|
||||||
- value_reg = VALUE_REGNUM (toval);
|
|
||||||
-
|
|
||||||
+ /* "set $reg+=1" should work on programs with no debug info,
|
|
||||||
+ but frame_find_by_id returns NULL here (RH bug 436037).
|
|
||||||
+ Use current frame, it represents CPU state in this case.
|
|
||||||
+ If frame_find_by_id is changed to do it internally
|
|
||||||
+ (it is contemplated there), remove this. */
|
|
||||||
+ if (!frame)
|
|
||||||
+ frame = get_current_frame ();
|
|
||||||
+ /* Probably never happens. */
|
|
||||||
if (!frame)
|
|
||||||
error (_("Value being assigned to is no longer active."));
|
|
||||||
|
|
@ -1,181 +0,0 @@
|
|||||||
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-bz442765-threaded-exec-test.patch
|
|
||||||
|
|
||||||
;; Test various forms of threads tracking across exec() (BZ 442765).
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
Test various forms of threads tracking across exec(2).
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.threads/threaded-exec.c b/gdb/testsuite/gdb.threads/threaded-exec.c
|
|
||||||
--- a/gdb/testsuite/gdb.threads/threaded-exec.c
|
|
||||||
+++ b/gdb/testsuite/gdb.threads/threaded-exec.c
|
|
||||||
@@ -18,21 +18,95 @@
|
|
||||||
Boston, MA 02111-1307, USA. */
|
|
||||||
|
|
||||||
#include <stddef.h>
|
|
||||||
-#include <pthread.h>
|
|
||||||
#include <assert.h>
|
|
||||||
#include <stdlib.h>
|
|
||||||
#include <unistd.h>
|
|
||||||
+#include <stdio.h>
|
|
||||||
|
|
||||||
+#ifdef THREADS
|
|
||||||
+
|
|
||||||
+# include <pthread.h>
|
|
||||||
|
|
||||||
static void *
|
|
||||||
threader (void *arg)
|
|
||||||
{
|
|
||||||
- return NULL;
|
|
||||||
+ return NULL;
|
|
||||||
}
|
|
||||||
|
|
||||||
+#endif
|
|
||||||
+
|
|
||||||
int
|
|
||||||
-main (void)
|
|
||||||
+main (int argc, char **argv)
|
|
||||||
{
|
|
||||||
+ char *exec_nothreads, *exec_threads, *cmd;
|
|
||||||
+ int phase;
|
|
||||||
+ char phase_s[8];
|
|
||||||
+
|
|
||||||
+ setbuf (stdout, NULL);
|
|
||||||
+
|
|
||||||
+ if (argc != 4)
|
|
||||||
+ {
|
|
||||||
+ fprintf (stderr, "%s <non-threaded> <threaded> <phase>\n", argv[0]);
|
|
||||||
+ return 1;
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+#ifdef THREADS
|
|
||||||
+ puts ("THREADS: Y");
|
|
||||||
+#else
|
|
||||||
+ puts ("THREADS: N");
|
|
||||||
+#endif
|
|
||||||
+ exec_nothreads = argv[1];
|
|
||||||
+ printf ("exec_nothreads: %s\n", exec_nothreads);
|
|
||||||
+ exec_threads = argv[2];
|
|
||||||
+ printf ("exec_threads: %s\n", exec_threads);
|
|
||||||
+ phase = atoi (argv[3]);
|
|
||||||
+ printf ("phase: %d\n", phase);
|
|
||||||
+
|
|
||||||
+ /* Phases: threading
|
|
||||||
+ 0: N -> N
|
|
||||||
+ 1: N -> Y
|
|
||||||
+ 2: Y -> Y
|
|
||||||
+ 3: Y -> N
|
|
||||||
+ 4: N -> exit */
|
|
||||||
+
|
|
||||||
+ cmd = NULL;
|
|
||||||
+
|
|
||||||
+#ifndef THREADS
|
|
||||||
+ switch (phase)
|
|
||||||
+ {
|
|
||||||
+ case 0:
|
|
||||||
+ cmd = exec_nothreads;
|
|
||||||
+ break;
|
|
||||||
+ case 1:
|
|
||||||
+ cmd = exec_threads;
|
|
||||||
+ break;
|
|
||||||
+ case 2:
|
|
||||||
+ fprintf (stderr, "%s: We should have threads for phase %d!\n", argv[0],
|
|
||||||
+ phase);
|
|
||||||
+ return 1;
|
|
||||||
+ case 3:
|
|
||||||
+ fprintf (stderr, "%s: We should have threads for phase %d!\n", argv[0],
|
|
||||||
+ phase);
|
|
||||||
+ return 1;
|
|
||||||
+ case 4:
|
|
||||||
+ return 0;
|
|
||||||
+ default:
|
|
||||||
+ assert (0);
|
|
||||||
+ }
|
|
||||||
+#else /* THREADS */
|
|
||||||
+ switch (phase)
|
|
||||||
+ {
|
|
||||||
+ case 0:
|
|
||||||
+ fprintf (stderr, "%s: We should not have threads for phase %d!\n",
|
|
||||||
+ argv[0], phase);
|
|
||||||
+ return 1;
|
|
||||||
+ case 1:
|
|
||||||
+ fprintf (stderr, "%s: We should not have threads for phase %d!\n",
|
|
||||||
+ argv[0], phase);
|
|
||||||
+ return 1;
|
|
||||||
+ case 2:
|
|
||||||
+ cmd = exec_threads;
|
|
||||||
+ {
|
|
||||||
pthread_t t1;
|
|
||||||
int i;
|
|
||||||
|
|
||||||
@@ -40,7 +114,34 @@ main (void)
|
|
||||||
assert (i == 0);
|
|
||||||
i = pthread_join (t1, NULL);
|
|
||||||
assert (i == 0);
|
|
||||||
+ }
|
|
||||||
+ break;
|
|
||||||
+ case 3:
|
|
||||||
+ cmd = exec_nothreads;
|
|
||||||
+ {
|
|
||||||
+ pthread_t t1;
|
|
||||||
+ int i;
|
|
||||||
+
|
|
||||||
+ i = pthread_create (&t1, NULL, threader, (void *) NULL);
|
|
||||||
+ assert (i == 0);
|
|
||||||
+ i = pthread_join (t1, NULL);
|
|
||||||
+ assert (i == 0);
|
|
||||||
+ }
|
|
||||||
+ break;
|
|
||||||
+ case 4:
|
|
||||||
+ fprintf (stderr, "%s: We should not have threads for phase %d!\n",
|
|
||||||
+ argv[0], phase);
|
|
||||||
+ return 1;
|
|
||||||
+ default:
|
|
||||||
+ assert (0);
|
|
||||||
+ }
|
|
||||||
+#endif /* THREADS */
|
|
||||||
+
|
|
||||||
+ assert (cmd != NULL);
|
|
||||||
+
|
|
||||||
+ phase++;
|
|
||||||
+ snprintf (phase_s, sizeof phase_s, "%d", phase);
|
|
||||||
|
|
||||||
- execl ("/bin/true", "/bin/true", NULL);
|
|
||||||
- abort ();
|
|
||||||
+ execl (cmd, cmd, exec_nothreads, exec_threads, phase_s, NULL);
|
|
||||||
+ assert (0);
|
|
||||||
}
|
|
||||||
diff --git a/gdb/testsuite/gdb.threads/threaded-exec.exp b/gdb/testsuite/gdb.threads/threaded-exec.exp
|
|
||||||
--- a/gdb/testsuite/gdb.threads/threaded-exec.exp
|
|
||||||
+++ b/gdb/testsuite/gdb.threads/threaded-exec.exp
|
|
||||||
@@ -20,9 +20,14 @@
|
|
||||||
|
|
||||||
set testfile threaded-exec
|
|
||||||
set srcfile ${testfile}.c
|
|
||||||
-set binfile [standard_output_file ${testfile}]
|
|
||||||
+set binfile_nothreads [standard_output_file ${testfile}N]
|
|
||||||
+set binfile_threads [standard_output_file ${testfile}Y]
|
|
||||||
|
|
||||||
-if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable []] != "" } {
|
|
||||||
+if {[gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile_nothreads}" executable {additional_flags=-UTHREADS}] != "" } {
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile_threads}" executable {additional_flags=-DTHREADS}] != "" } {
|
|
||||||
return -1
|
|
||||||
}
|
|
||||||
|
|
||||||
@@ -30,9 +35,9 @@ gdb_exit
|
|
||||||
gdb_start
|
|
||||||
gdb_reinitialize_dir $srcdir/$subdir
|
|
||||||
|
|
||||||
-gdb_load ${binfile}
|
|
||||||
+gdb_load ${binfile_nothreads}
|
|
||||||
|
|
||||||
-gdb_run_cmd
|
|
||||||
+gdb_run_cmd ${binfile_nothreads} ${binfile_threads} 0
|
|
||||||
|
|
||||||
gdb_test_multiple {} "Program exited" {
|
|
||||||
-re "\r\n\\\[Inferior .* exited normally\\\]\r\n$gdb_prompt $" {
|
|
@ -1,78 +0,0 @@
|
|||||||
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
|
|
||||||
@@ -168,6 +168,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
|
|
||||||
@@ -820,6 +820,11 @@ check_quit_flag (void)
|
|
||||||
int i, result = 0;
|
|
||||||
const struct extension_language_defn *extlang;
|
|
||||||
|
|
||||||
+#ifdef NEED_DETACH_SIGSTOP
|
|
||||||
+ if (quit_flag_cleanup)
|
|
||||||
+ return 0;
|
|
||||||
+#endif
|
|
||||||
+
|
|
||||||
ALL_ENABLED_EXTENSION_LANGUAGES (i, extlang)
|
|
||||||
{
|
|
||||||
if (extlang->ops->check_quit_flag != NULL)
|
|
||||||
diff --git a/gdb/top.c b/gdb/top.c
|
|
||||||
--- a/gdb/top.c
|
|
||||||
+++ b/gdb/top.c
|
|
||||||
@@ -1606,7 +1606,13 @@ quit_force (int *exit_arg, int from_tty)
|
|
||||||
|
|
||||||
qt.from_tty = from_tty;
|
|
||||||
|
|
||||||
+#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
|
|
||||||
@@ -108,6 +108,13 @@ static std::chrono::steady_clock::duration prompt_for_continue_wait_time;
|
|
||||||
|
|
||||||
static int debug_timestamp = 0;
|
|
||||||
|
|
||||||
+#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
|
|
||||||
+
|
|
||||||
/* Nonzero means that strings with character values >0x7F should be printed
|
|
||||||
as octal escapes. Zero means just print the value (e.g. it's an
|
|
||||||
international character, and the terminal or window can cope.) */
|
|
@ -1,19 +0,0 @@
|
|||||||
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-sparc64-silence-memcpy-check.patch
|
|
||||||
|
|
||||||
;; Silence memcpy check which returns false positive (sparc64)
|
|
||||||
;;=push: But it is just a GCC workaround, look up the existing GCC PR for it.
|
|
||||||
|
|
||||||
diff --git a/gdb/sparc-tdep.c b/gdb/sparc-tdep.c
|
|
||||||
--- a/gdb/sparc-tdep.c
|
|
||||||
+++ b/gdb/sparc-tdep.c
|
|
||||||
@@ -1462,6 +1462,7 @@ sparc32_store_return_value (struct type *type, struct regcache *regcache,
|
|
||||||
if (sparc_floating_p (type) || sparc_complex_floating_p (type))
|
|
||||||
{
|
|
||||||
/* Floating return values. */
|
|
||||||
+ len = (len <= 8) ? len : 8;
|
|
||||||
memcpy (buf, valbuf, len);
|
|
||||||
regcache->cooked_write (SPARC_F0_REGNUM, buf);
|
|
||||||
if (len > 4)
|
|
@ -1,90 +0,0 @@
|
|||||||
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-watchpoint-conditionals-test.patch
|
|
||||||
|
|
||||||
;; Test the watchpoints conditionals works.
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
For:
|
|
||||||
http://sourceware.org/ml/gdb-patches/2008-04/msg00379.html
|
|
||||||
http://sourceware.org/ml/gdb-cvs/2008-04/msg00104.html
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/watchpoint-cond.c b/gdb/testsuite/gdb.base/watchpoint-cond.c
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.base/watchpoint-cond.c
|
|
||||||
@@ -0,0 +1,31 @@
|
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ Copyright 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/>.
|
|
||||||
+
|
|
||||||
+ Please email any bugs, comments, and/or additions to this file to:
|
|
||||||
+ bug-gdb@prep.ai.mit.edu */
|
|
||||||
+
|
|
||||||
+int
|
|
||||||
+main (int argc, char **argv)
|
|
||||||
+{
|
|
||||||
+ static int i = 0; /* `static' to start initialized. */
|
|
||||||
+ int j = 2;
|
|
||||||
+
|
|
||||||
+ for (j = 0; j < 30; j++)
|
|
||||||
+ i = 30 - j;
|
|
||||||
+
|
|
||||||
+ return 0;
|
|
||||||
+}
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/watchpoint-cond.exp b/gdb/testsuite/gdb.base/watchpoint-cond.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.base/watchpoint-cond.exp
|
|
||||||
@@ -0,0 +1,37 @@
|
|
||||||
+# Copyright 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/>.
|
|
||||||
+
|
|
||||||
+set testfile watchpoint-cond
|
|
||||||
+set srcfile ${testfile}.c
|
|
||||||
+set binfile [standard_output_file ${testfile}]
|
|
||||||
+if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
|
|
||||||
+ untested "Couldn't compile test program"
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Get things started.
|
|
||||||
+
|
|
||||||
+gdb_exit
|
|
||||||
+gdb_start
|
|
||||||
+gdb_reinitialize_dir $srcdir/$subdir
|
|
||||||
+gdb_load ${binfile}
|
|
||||||
+
|
|
||||||
+if { [runto_main] < 0 } {
|
|
||||||
+ untested watchpoint-cond
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+gdb_test "watch i if i < 20" "atchpoint \[0-9\]+: i"
|
|
||||||
+gdb_test "cont" "atchpoint \[0-9\]+: i.*Old value = 20.*New value = 19.*"
|
|
@ -1,68 +0,0 @@
|
|||||||
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-7.2.50-sparc-add-workaround-to-broken-debug-files.patch
|
|
||||||
|
|
||||||
;; Toolchain on sparc is slightly broken and debuginfo files are generated
|
|
||||||
;; with non 64bit aligned tables/offsets.
|
|
||||||
;; See for example readelf -S ../Xvnc.debug.
|
|
||||||
;;
|
|
||||||
;; As a consenquence calculation of sectp->filepos as used in
|
|
||||||
;; dwarf2_read_section (gdb/dwarf2read.c:1525) will return a non aligned buffer
|
|
||||||
;; that cannot be used directly as done with MMAP.
|
|
||||||
;; Usage will result in a BusError.
|
|
||||||
;;
|
|
||||||
;; While we figure out what's wrong in the toolchain and do a full archive
|
|
||||||
;; rebuild to fix it, we need to be able to use gdb :)
|
|
||||||
;;=push
|
|
||||||
|
|
||||||
diff --git a/gdb/gdb_bfd.c b/gdb/gdb_bfd.c
|
|
||||||
--- a/gdb/gdb_bfd.c
|
|
||||||
+++ b/gdb/gdb_bfd.c
|
|
||||||
@@ -24,12 +24,14 @@
|
|
||||||
#include "hashtab.h"
|
|
||||||
#include "filestuff.h"
|
|
||||||
#include "vec.h"
|
|
||||||
+#ifndef __sparc__
|
|
||||||
#ifdef HAVE_MMAP
|
|
||||||
#include <sys/mman.h>
|
|
||||||
#ifndef MAP_FAILED
|
|
||||||
#define MAP_FAILED ((void *) -1)
|
|
||||||
#endif
|
|
||||||
#endif
|
|
||||||
+#endif
|
|
||||||
#include "target.h"
|
|
||||||
#include "gdb/fileio.h"
|
|
||||||
#include "inferior.h"
|
|
||||||
@@ -484,6 +486,7 @@ free_one_bfd_section (bfd *abfd, asection *sectp, void *ignore)
|
|
||||||
|
|
||||||
if (sect != NULL && sect->data != NULL)
|
|
||||||
{
|
|
||||||
+#ifndef __sparc__
|
|
||||||
#ifdef HAVE_MMAP
|
|
||||||
if (sect->map_addr != NULL)
|
|
||||||
{
|
|
||||||
@@ -493,6 +496,7 @@ free_one_bfd_section (bfd *abfd, asection *sectp, void *ignore)
|
|
||||||
gdb_assert (res == 0);
|
|
||||||
}
|
|
||||||
else
|
|
||||||
+#endif
|
|
||||||
#endif
|
|
||||||
xfree (sect->data);
|
|
||||||
}
|
|
||||||
@@ -659,6 +663,7 @@ gdb_bfd_map_section (asection *sectp, bfd_size_type *size)
|
|
||||||
if (descriptor->data != NULL)
|
|
||||||
goto done;
|
|
||||||
|
|
||||||
+#ifndef __sparc__
|
|
||||||
#ifdef HAVE_MMAP
|
|
||||||
if (!bfd_is_section_compressed (abfd, sectp))
|
|
||||||
{
|
|
||||||
@@ -693,6 +698,7 @@ gdb_bfd_map_section (asection *sectp, bfd_size_type *size)
|
|
||||||
}
|
|
||||||
}
|
|
||||||
#endif /* HAVE_MMAP */
|
|
||||||
+#endif
|
|
||||||
|
|
||||||
/* Handle compressed sections, or ordinary uncompressed sections in
|
|
||||||
the no-mmap case. */
|
|
@ -1,89 +0,0 @@
|
|||||||
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
|
|
||||||
@@ -15522,6 +15522,50 @@ initialize_breakpoint_ops (void)
|
|
||||||
|
|
||||||
static struct cmd_list_element *enablebreaklist = NULL;
|
|
||||||
|
|
||||||
+void
|
|
||||||
+breakpoints_relocate (struct objfile *objfile, struct 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 = ANOFFSET (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)
|
|
||||||
+ qsort (bp_locations, bp_locations_count, sizeof (*bp_locations),
|
|
||||||
+ bp_locations_compare);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
void
|
|
||||||
_initialize_breakpoint (void)
|
|
||||||
{
|
|
||||||
diff --git a/gdb/breakpoint.h b/gdb/breakpoint.h
|
|
||||||
--- a/gdb/breakpoint.h
|
|
||||||
+++ b/gdb/breakpoint.h
|
|
||||||
@@ -1679,6 +1679,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,
|
|
||||||
+ struct 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
|
|
||||||
@@ -883,6 +883,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;
|
|
||||||
}
|
|
@ -1,63 +0,0 @@
|
|||||||
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
|
|
||||||
@@ -505,6 +505,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 */
|
|
||||||
@@ -556,6 +557,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;
|
|
||||||
|
|
||||||
@@ -1438,6 +1440,7 @@ extern void set_type_vptr_basetype (struct type *, struct type *);
|
|
||||||
#define FIELD_ENUMVAL_LVAL(thisfld) ((thisfld).loc.enumval)
|
|
||||||
#define FIELD_ENUMVAL(thisfld) (FIELD_ENUMVAL_LVAL (thisfld) + 0)
|
|
||||||
#define FIELD_STATIC_PHYSNAME(thisfld) ((thisfld).loc.physname)
|
|
||||||
+/* This address is unrelocated by the objfile's ANOFFSET. */
|
|
||||||
#define FIELD_STATIC_PHYSADDR(thisfld) ((thisfld).loc.physaddr)
|
|
||||||
#define FIELD_DWARF_BLOCK(thisfld) ((thisfld).loc.dwarf_block)
|
|
||||||
#define SET_FIELD_BITPOS(thisfld, bitpos) \
|
|
||||||
@@ -1449,6 +1452,7 @@ extern void set_type_vptr_basetype (struct type *, struct type *);
|
|
||||||
#define SET_FIELD_PHYSNAME(thisfld, name) \
|
|
||||||
(FIELD_LOC_KIND (thisfld) = FIELD_LOC_KIND_PHYSNAME, \
|
|
||||||
FIELD_STATIC_PHYSNAME (thisfld) = (name))
|
|
||||||
+/* This address is unrelocated by the objfile's ANOFFSET. */
|
|
||||||
#define SET_FIELD_PHYSADDR(thisfld, addr) \
|
|
||||||
(FIELD_LOC_KIND (thisfld) = FIELD_LOC_KIND_PHYSADDR, \
|
|
||||||
FIELD_STATIC_PHYSADDR (thisfld) = (addr))
|
|
||||||
@@ -1465,6 +1469,7 @@ extern void set_type_vptr_basetype (struct type *, struct type *);
|
|
||||||
#define TYPE_FIELD_BITPOS(thistype, n) FIELD_BITPOS (TYPE_FIELD (thistype, n))
|
|
||||||
#define TYPE_FIELD_ENUMVAL(thistype, n) FIELD_ENUMVAL (TYPE_FIELD (thistype, n))
|
|
||||||
#define TYPE_FIELD_STATIC_PHYSNAME(thistype, n) FIELD_STATIC_PHYSNAME (TYPE_FIELD (thistype, n))
|
|
||||||
+/* This address is unrelocated by the objfile's ANOFFSET. */
|
|
||||||
#define TYPE_FIELD_STATIC_PHYSADDR(thistype, n) FIELD_STATIC_PHYSADDR (TYPE_FIELD (thistype, n))
|
|
||||||
#define TYPE_FIELD_DWARF_BLOCK(thistype, n) FIELD_DWARF_BLOCK (TYPE_FIELD (thistype, n))
|
|
||||||
#define TYPE_FIELD_ARTIFICIAL(thistype, n) FIELD_ARTIFICIAL(TYPE_FIELD(thistype,n))
|
|
||||||
diff --git a/gdb/value.c b/gdb/value.c
|
|
||||||
--- a/gdb/value.c
|
|
||||||
+++ b/gdb/value.c
|
|
||||||
@@ -2829,7 +2829,8 @@ value_static_field (struct type *type, int fieldno)
|
|
||||||
{
|
|
||||||
case FIELD_LOC_KIND_PHYSADDR:
|
|
||||||
retval = value_at_lazy (TYPE_FIELD_TYPE (type, fieldno),
|
|
||||||
- TYPE_FIELD_STATIC_PHYSADDR (type, fieldno));
|
|
||||||
+ TYPE_FIELD_STATIC_PHYSADDR (type, fieldno)
|
|
||||||
+ + (TYPE_OBJFILE (type) == NULL ? 0 : ANOFFSET (TYPE_OBJFILE (type)->section_offsets, SECT_OFF_TEXT (TYPE_OBJFILE (type)))));
|
|
||||||
break;
|
|
||||||
case FIELD_LOC_KIND_PHYSNAME:
|
|
||||||
{
|
|
File diff suppressed because it is too large
Load Diff
@ -1,600 +0,0 @@
|
|||||||
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/Makefile.in b/gdb/Makefile.in
|
|
||||||
--- a/gdb/Makefile.in
|
|
||||||
+++ b/gdb/Makefile.in
|
|
||||||
@@ -2112,6 +2112,12 @@ stamp-h: $(srcdir)/config.in config.status
|
|
||||||
CONFIG_LINKS= \
|
|
||||||
$(SHELL) config.status
|
|
||||||
|
|
||||||
+.gdbinit: $(srcdir)/gdbinit.in config.status
|
|
||||||
+ CONFIG_FILES=".gdbinit:gdbinit.in" \
|
|
||||||
+ CONFIG_COMMANDS= \
|
|
||||||
+ CONFIG_HEADERS= \
|
|
||||||
+ $(SHELL) config.status
|
|
||||||
+
|
|
||||||
config.status: $(srcdir)/configure configure.nat configure.tgt configure.host ../bfd/development.sh
|
|
||||||
$(SHELL) config.status --recheck
|
|
||||||
|
|
||||||
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,8 @@ PYTHON_FILE_LIST = \
|
|
||||||
gdb/function/as_string.py \
|
|
||||||
gdb/function/caller_is.py \
|
|
||||||
gdb/function/strfns.py \
|
|
||||||
+ gdb/function/caller_is.py \
|
|
||||||
+ gdb/function/in_scope.py \
|
|
||||||
gdb/printer/__init__.py \
|
|
||||||
gdb/printer/bound_registers.py
|
|
||||||
|
|
||||||
diff --git a/gdb/doc/gdb.texinfo b/gdb/doc/gdb.texinfo
|
|
||||||
--- a/gdb/doc/gdb.texinfo
|
|
||||||
+++ b/gdb/doc/gdb.texinfo
|
|
||||||
@@ -1245,6 +1245,16 @@ for remote debugging.
|
|
||||||
Run using @var{device} for your program's standard input and output.
|
|
||||||
@c FIXME: kingdon thinks there is more to -tty. Investigate.
|
|
||||||
|
|
||||||
+@item -P
|
|
||||||
+@cindex @code{-P}
|
|
||||||
+@itemx --python
|
|
||||||
+@cindex @code{--python}
|
|
||||||
+Change interpretation of command line so that the argument immediately
|
|
||||||
+following this switch is taken to be the name of a Python script file.
|
|
||||||
+This option stops option processing; subsequent options are passed to
|
|
||||||
+Python as @code{sys.argv}. This option is only available if Python
|
|
||||||
+scripting support was enabled when @value{GDBN} was configured.
|
|
||||||
+
|
|
||||||
@c resolve the situation of these eventually
|
|
||||||
@item -tui
|
|
||||||
@cindex @code{--tui}
|
|
||||||
diff --git a/gdb/doc/python.texi b/gdb/doc/python.texi
|
|
||||||
--- a/gdb/doc/python.texi
|
|
||||||
+++ b/gdb/doc/python.texi
|
|
||||||
@@ -88,8 +88,6 @@ containing @code{end}. For example:
|
|
||||||
|
|
||||||
@smallexample
|
|
||||||
(@value{GDBP}) python
|
|
||||||
-Type python script
|
|
||||||
-End with a line saying just "end".
|
|
||||||
>print 23
|
|
||||||
>end
|
|
||||||
23
|
|
||||||
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/main.c b/gdb/main.c
|
|
||||||
--- a/gdb/main.c
|
|
||||||
+++ b/gdb/main.c
|
|
||||||
@@ -33,6 +33,7 @@
|
|
||||||
|
|
||||||
#include "interps.h"
|
|
||||||
#include "main.h"
|
|
||||||
+#include "python/python.h"
|
|
||||||
#include "source.h"
|
|
||||||
#include "cli/cli-cmds.h"
|
|
||||||
#include "objfiles.h"
|
|
||||||
@@ -479,7 +480,7 @@ exec_or_core_file_attach (const char *filename, int from_tty)
|
|
||||||
}
|
|
||||||
|
|
||||||
static void
|
|
||||||
-captured_main_1 (struct captured_main_args *context)
|
|
||||||
+captured_main_1 (struct captured_main_args *context, int &python_script)
|
|
||||||
{
|
|
||||||
int argc = context->argc;
|
|
||||||
char **argv = context->argv;
|
|
||||||
@@ -695,10 +696,14 @@ captured_main_1 (struct captured_main_args *context)
|
|
||||||
{"args", no_argument, &set_args, 1},
|
|
||||||
{"l", required_argument, 0, 'l'},
|
|
||||||
{"return-child-result", no_argument, &return_child_result, 1},
|
|
||||||
+#if HAVE_PYTHON
|
|
||||||
+ {"python", no_argument, 0, 'P'},
|
|
||||||
+ {"P", no_argument, 0, 'P'},
|
|
||||||
+#endif
|
|
||||||
{0, no_argument, 0, 0}
|
|
||||||
};
|
|
||||||
|
|
||||||
- while (1)
|
|
||||||
+ while (!python_script)
|
|
||||||
{
|
|
||||||
int option_index;
|
|
||||||
|
|
||||||
@@ -716,6 +721,9 @@ captured_main_1 (struct captured_main_args *context)
|
|
||||||
case 0:
|
|
||||||
/* Long option that just sets a flag. */
|
|
||||||
break;
|
|
||||||
+ case 'P':
|
|
||||||
+ python_script = 1;
|
|
||||||
+ break;
|
|
||||||
case OPT_SE:
|
|
||||||
symarg = optarg;
|
|
||||||
execarg = optarg;
|
|
||||||
@@ -890,7 +898,31 @@ captured_main_1 (struct captured_main_args *context)
|
|
||||||
|
|
||||||
/* Now that gdb_init has created the initial inferior, we're in
|
|
||||||
position to set args for that inferior. */
|
|
||||||
- if (set_args)
|
|
||||||
+ if (python_script)
|
|
||||||
+ {
|
|
||||||
+ /* The first argument is a python script to evaluate, and
|
|
||||||
+ subsequent arguments are passed to the script for
|
|
||||||
+ processing there. */
|
|
||||||
+ if (optind >= argc)
|
|
||||||
+ {
|
|
||||||
+ fprintf_unfiltered (gdb_stderr,
|
|
||||||
+ _("%s: Python script file name required\n"),
|
|
||||||
+ argv[0]);
|
|
||||||
+ exit (1);
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+ /* FIXME: should handle inferior I/O intelligently here.
|
|
||||||
+ E.g., should be possible to run gdb in pipeline and have
|
|
||||||
+ Python (and gdb) output go to stderr or file; and if a
|
|
||||||
+ prompt is needed, open the tty. */
|
|
||||||
+ quiet = 1;
|
|
||||||
+ /* FIXME: should read .gdbinit if, and only if, a prompt is
|
|
||||||
+ requested by the script. Though... maybe this is not
|
|
||||||
+ ideal? */
|
|
||||||
+ /* FIXME: likewise, reading in history. */
|
|
||||||
+ inhibit_gdbinit = 1;
|
|
||||||
+ }
|
|
||||||
+ else if (set_args)
|
|
||||||
{
|
|
||||||
/* The remaining options are the command-line options for the
|
|
||||||
inferior. The first one is the sym/exec file, and the rest
|
|
||||||
@@ -1180,7 +1212,8 @@ captured_main_1 (struct captured_main_args *context)
|
|
||||||
|
|
||||||
/* Read in the old history after all the command files have been
|
|
||||||
read. */
|
|
||||||
- init_history ();
|
|
||||||
+ if (!python_script)
|
|
||||||
+ init_history ();
|
|
||||||
|
|
||||||
if (batch_flag)
|
|
||||||
{
|
|
||||||
@@ -1193,24 +1226,37 @@ static void
|
|
||||||
captured_main (void *data)
|
|
||||||
{
|
|
||||||
struct captured_main_args *context = (struct captured_main_args *) data;
|
|
||||||
+ int python_script = 0;
|
|
||||||
|
|
||||||
- captured_main_1 (context);
|
|
||||||
+ captured_main_1 (context, python_script);
|
|
||||||
|
|
||||||
- /* NOTE: cagney/1999-11-07: There is probably no reason for not
|
|
||||||
- moving this loop and the code found in captured_command_loop()
|
|
||||||
- into the command_loop() proper. The main thing holding back that
|
|
||||||
- change - SET_TOP_LEVEL() - has been eliminated. */
|
|
||||||
- while (1)
|
|
||||||
+#if HAVE_PYTHON
|
|
||||||
+ if (python_script)
|
|
||||||
{
|
|
||||||
- TRY
|
|
||||||
- {
|
|
||||||
- captured_command_loop ();
|
|
||||||
- }
|
|
||||||
- CATCH (ex, RETURN_MASK_ALL)
|
|
||||||
+ extern int pagination_enabled;
|
|
||||||
+ pagination_enabled = 0;
|
|
||||||
+ run_python_script (context->argc - optind, &context->argv[optind]);
|
|
||||||
+ return;
|
|
||||||
+ }
|
|
||||||
+ else
|
|
||||||
+#endif
|
|
||||||
+ {
|
|
||||||
+ /* NOTE: cagney/1999-11-07: There is probably no reason for not
|
|
||||||
+ moving this loop and the code found in captured_command_loop()
|
|
||||||
+ into the command_loop() proper. The main thing holding back that
|
|
||||||
+ change - SET_TOP_LEVEL() - has been eliminated. */
|
|
||||||
+ while (1)
|
|
||||||
{
|
|
||||||
- exception_print (gdb_stderr, ex);
|
|
||||||
+ TRY
|
|
||||||
+ {
|
|
||||||
+ captured_command_loop ();
|
|
||||||
+ }
|
|
||||||
+ CATCH (ex, RETURN_MASK_ALL)
|
|
||||||
+ {
|
|
||||||
+ exception_print (gdb_stderr, ex);
|
|
||||||
+ }
|
|
||||||
+ END_CATCH
|
|
||||||
}
|
|
||||||
- END_CATCH
|
|
||||||
}
|
|
||||||
/* No exit -- exit is through quit_command. */
|
|
||||||
}
|
|
||||||
@@ -1253,6 +1299,12 @@ print_gdb_help (struct ui_file *stream)
|
|
||||||
fputs_unfiltered (_("\
|
|
||||||
This is the GNU debugger. Usage:\n\n\
|
|
||||||
gdb [options] [executable-file [core-file or process-id]]\n\
|
|
||||||
+ gdb [options] --args executable-file [inferior-arguments ...]\n"), stream);
|
|
||||||
+#if HAVE_PYTHON
|
|
||||||
+ fputs_unfiltered (_("\
|
|
||||||
+ gdb [options] [--python|-P] script-file [script-arguments ...]\n"), stream);
|
|
||||||
+#endif
|
|
||||||
+ fputs_unfiltered (_("\n\
|
|
||||||
gdb [options] --args executable-file [inferior-arguments ...]\n\n\
|
|
||||||
"), stream);
|
|
||||||
fputs_unfiltered (_("\
|
|
||||||
@@ -1298,6 +1350,13 @@ Output and user interface control:\n\n\
|
|
||||||
#endif
|
|
||||||
fputs_unfiltered (_("\
|
|
||||||
--dbx DBX compatibility mode.\n\
|
|
||||||
+"), stream);
|
|
||||||
+#if HAVE_PYTHON
|
|
||||||
+ fputs_unfiltered (_("\
|
|
||||||
+ --python, -P Following argument is Python script file; remaining\n\
|
|
||||||
+ arguments are passed to script.\n"), stream);
|
|
||||||
+#endif
|
|
||||||
+ fputs_unfiltered (_("\
|
|
||||||
-q, --quiet, --silent\n\
|
|
||||||
Do not print version number on startup.\n\n\
|
|
||||||
"), stream);
|
|
||||||
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/python/python-internal.h b/gdb/python/python-internal.h
|
|
||||||
--- a/gdb/python/python-internal.h
|
|
||||||
+++ b/gdb/python/python-internal.h
|
|
||||||
@@ -644,6 +644,9 @@ class gdbpy_enter_varobj : public gdbpy_enter
|
|
||||||
|
|
||||||
};
|
|
||||||
|
|
||||||
+struct cleanup *ensure_python_env (struct gdbarch *gdbarch,
|
|
||||||
+ const struct language_defn *language);
|
|
||||||
+
|
|
||||||
extern struct gdbarch *python_gdbarch;
|
|
||||||
extern const struct language_defn *python_language;
|
|
||||||
|
|
||||||
diff --git a/gdb/python/python.c b/gdb/python/python.c
|
|
||||||
--- a/gdb/python/python.c
|
|
||||||
+++ b/gdb/python/python.c
|
|
||||||
@@ -95,6 +95,8 @@ const struct extension_language_defn extension_language_python =
|
|
||||||
#include "linespec.h"
|
|
||||||
#include "source.h"
|
|
||||||
#include "version.h"
|
|
||||||
+#include "inferior.h"
|
|
||||||
+#include "gdbthread.h"
|
|
||||||
#include "target.h"
|
|
||||||
#include "gdbthread.h"
|
|
||||||
#include "interps.h"
|
|
||||||
@@ -237,6 +239,29 @@ gdbpy_enter::~gdbpy_enter ()
|
|
||||||
restore_active_ext_lang (m_previous_active);
|
|
||||||
}
|
|
||||||
|
|
||||||
+static void
|
|
||||||
+restore_python_env (void *p)
|
|
||||||
+{
|
|
||||||
+ gdbpy_enter *env = (gdbpy_enter *) p;
|
|
||||||
+
|
|
||||||
+ delete env;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+/* Called before entering the Python interpreter to install the
|
|
||||||
+ current language and architecture to be used for Python values.
|
|
||||||
+ Also set the active extension language for GDB so that SIGINT's
|
|
||||||
+ are directed our way, and if necessary install the right SIGINT
|
|
||||||
+ handler. */
|
|
||||||
+
|
|
||||||
+struct cleanup *
|
|
||||||
+ensure_python_env (struct gdbarch *gdbarch,
|
|
||||||
+ const struct language_defn *language)
|
|
||||||
+{
|
|
||||||
+ gdbpy_enter *env = new gdbpy_enter (gdbarch, language);
|
|
||||||
+
|
|
||||||
+ return make_cleanup (restore_python_env, env);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
/* Set the quit flag. */
|
|
||||||
|
|
||||||
static void
|
|
||||||
@@ -1367,6 +1392,92 @@ gdbpy_print_stack (void)
|
|
||||||
|
|
||||||
/* Return the current Progspace.
|
|
||||||
There always is one. */
|
|
||||||
+/* True if 'gdb -P' was used, false otherwise. */
|
|
||||||
+static int running_python_script;
|
|
||||||
+
|
|
||||||
+/* True if we are currently in a call to 'gdb.cli', false otherwise. */
|
|
||||||
+static int in_cli;
|
|
||||||
+
|
|
||||||
+/* Enter the command loop. */
|
|
||||||
+
|
|
||||||
+static PyObject *
|
|
||||||
+gdbpy_cli (PyObject *unused1, PyObject *unused2)
|
|
||||||
+{
|
|
||||||
+ if (! running_python_script || in_cli)
|
|
||||||
+ return PyErr_Format (PyExc_RuntimeError, "cannot invoke CLI recursively");
|
|
||||||
+
|
|
||||||
+ if (current_uiout->is_mi_like_p ())
|
|
||||||
+ return PyErr_Format (PyExc_RuntimeError, _("Cannot invoke CLI from MI."));
|
|
||||||
+
|
|
||||||
+ in_cli = 1;
|
|
||||||
+ /* See captured_command_loop. */
|
|
||||||
+
|
|
||||||
+ /* Give the interpreter a chance to print a prompt. */
|
|
||||||
+ interp_pre_command_loop (top_level_interpreter ());
|
|
||||||
+
|
|
||||||
+ /* Now it's time to start the event loop. */
|
|
||||||
+ start_event_loop ();
|
|
||||||
+
|
|
||||||
+ in_cli = 0;
|
|
||||||
+
|
|
||||||
+ Py_RETURN_NONE;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+/* Set up the Python argument vector and evaluate a script. This is
|
|
||||||
+ used to implement 'gdb -P'. */
|
|
||||||
+
|
|
||||||
+void
|
|
||||||
+run_python_script (int argc, char **argv)
|
|
||||||
+{
|
|
||||||
+ FILE *input;
|
|
||||||
+
|
|
||||||
+ /* We never free this, since we plan to exit at the end. */
|
|
||||||
+ ensure_python_env (get_current_arch (), current_language);
|
|
||||||
+
|
|
||||||
+ running_python_script = 1;
|
|
||||||
+
|
|
||||||
+#if PYTHON_ABI_VERSION < 3
|
|
||||||
+ PySys_SetArgv (argc - 1, argv + 1);
|
|
||||||
+#else
|
|
||||||
+ {
|
|
||||||
+ wchar_t **wargv = (wchar_t **) alloca (sizeof (*wargv) * (argc + 1));
|
|
||||||
+ int i;
|
|
||||||
+
|
|
||||||
+ for (i = 1; i < argc; i++)
|
|
||||||
+ {
|
|
||||||
+ size_t len = mbstowcs (NULL, argv[i], 0);
|
|
||||||
+ /* Python-related GDB sources are built with -DNDEBUG
|
|
||||||
+ https://sourceware.org/bugzilla/show_bug.cgi?id=20445 */
|
|
||||||
+ size_t len2 ATTRIBUTE_UNUSED;
|
|
||||||
+
|
|
||||||
+ if (len == (size_t) -1)
|
|
||||||
+ {
|
|
||||||
+ fprintf (stderr, "Invalid multibyte argument #%d \"%s\"\n",
|
|
||||||
+ i, argv[i]);
|
|
||||||
+ exit (1);
|
|
||||||
+ }
|
|
||||||
+ wargv[i] = (wchar_t *) alloca (sizeof (**wargv) * (len + 1));
|
|
||||||
+ len2 = mbstowcs (wargv[i], argv[i], len + 1);
|
|
||||||
+ assert (len2 == len);
|
|
||||||
+ }
|
|
||||||
+ wargv[argc] = NULL;
|
|
||||||
+ PySys_SetArgv (argc - 1, wargv + 1);
|
|
||||||
+ }
|
|
||||||
+#endif
|
|
||||||
+
|
|
||||||
+ input = fopen (argv[0], "r");
|
|
||||||
+ if (! input)
|
|
||||||
+ {
|
|
||||||
+ fprintf (stderr, "could not open %s: %s\n", argv[0], strerror (errno));
|
|
||||||
+ exit (1);
|
|
||||||
+ }
|
|
||||||
+ PyRun_SimpleFile (input, argv[0]);
|
|
||||||
+ fclose (input);
|
|
||||||
+ exit (0);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+
|
|
||||||
+
|
|
||||||
|
|
||||||
static PyObject *
|
|
||||||
gdbpy_get_current_progspace (PyObject *unused1, PyObject *unused2)
|
|
||||||
@@ -2057,6 +2168,8 @@ PyMethodDef python_GdbMethods[] =
|
|
||||||
Evaluate command, a string, as a gdb CLI command. Optionally returns\n\
|
|
||||||
a Python String containing the output of the command if to_string is\n\
|
|
||||||
set to True." },
|
|
||||||
+ { "cli", gdbpy_cli, METH_NOARGS,
|
|
||||||
+ "Enter the gdb CLI" },
|
|
||||||
{ "parameter", gdbpy_parameter, METH_VARARGS,
|
|
||||||
"Return a gdb parameter's value" },
|
|
||||||
|
|
||||||
diff --git a/gdb/python/python.h b/gdb/python/python.h
|
|
||||||
--- a/gdb/python/python.h
|
|
||||||
+++ b/gdb/python/python.h
|
|
||||||
@@ -25,4 +25,6 @@
|
|
||||||
/* This is all that python exports to gdb. */
|
|
||||||
extern const struct extension_language_defn extension_language_python;
|
|
||||||
|
|
||||||
+extern void run_python_script (int argc, char **argv);
|
|
||||||
+
|
|
||||||
#endif /* GDB_PYTHON_H */
|
|
||||||
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
|
|
||||||
@@ -384,6 +384,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.
|
|
||||||
@@ -512,6 +521,7 @@ if ![runto_main] then {
|
|
||||||
test_value_in_inferior
|
|
||||||
test_inferior_function_call
|
|
||||||
test_value_after_death
|
|
||||||
+test_cast_regression
|
|
||||||
|
|
||||||
# Test either C or C++ values.
|
|
||||||
|
|
||||||
diff --git a/gdb/varobj.c b/gdb/varobj.c
|
|
||||||
--- a/gdb/varobj.c
|
|
||||||
+++ b/gdb/varobj.c
|
|
||||||
@@ -218,6 +218,14 @@ is_root_p (const struct varobj *var)
|
|
||||||
}
|
|
||||||
|
|
||||||
#ifdef HAVE_PYTHON
|
|
||||||
+/* Helper function to install a Python environment suitable for
|
|
||||||
+ use during operations on VAR. */
|
|
||||||
+struct cleanup *
|
|
||||||
+varobj_ensure_python_env (const struct varobj *var)
|
|
||||||
+{
|
|
||||||
+ return ensure_python_env (var->root->exp->gdbarch,
|
|
||||||
+ var->root->exp->language_defn);
|
|
||||||
+}
|
|
||||||
|
|
||||||
/* See python-internal.h. */
|
|
||||||
gdbpy_enter_varobj::gdbpy_enter_varobj (const struct varobj *var)
|
|
||||||
diff --git a/gdb/varobj.h b/gdb/varobj.h
|
|
||||||
--- a/gdb/varobj.h
|
|
||||||
+++ b/gdb/varobj.h
|
|
||||||
@@ -328,6 +328,8 @@ extern bool varobj_has_more (const struct varobj *var, int to);
|
|
||||||
|
|
||||||
extern bool varobj_is_dynamic_p (const struct varobj *var);
|
|
||||||
|
|
||||||
+extern struct cleanup *varobj_ensure_python_env (const struct varobj *var);
|
|
||||||
+
|
|
||||||
extern bool varobj_default_value_is_changeable_p (const struct varobj *var);
|
|
||||||
extern bool varobj_value_is_changeable_p (const struct varobj *var);
|
|
||||||
|
|
@ -1,357 +0,0 @@
|
|||||||
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
|
|
||||||
@@ -276,6 +276,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
|
|
||||||
|
|
||||||
@@ -399,6 +402,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
|
|
||||||
@@ -15854,6 +15854,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
|
|
||||||
@@ -2054,6 +2054,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/gdbserver/config.in b/gdb/gdbserver/config.in
|
|
||||||
--- a/gdb/gdbserver/config.in
|
|
||||||
+++ b/gdb/gdbserver/config.in
|
|
||||||
@@ -126,6 +126,9 @@
|
|
||||||
/* Define to 1 if you have the `mcheck' library (-lmcheck). */
|
|
||||||
#undef HAVE_LIBMCHECK
|
|
||||||
|
|
||||||
+/* Define to 1 if you have the `selinux' library (-lselinux). */
|
|
||||||
+#undef HAVE_LIBSELINUX
|
|
||||||
+
|
|
||||||
/* Define if the target supports branch tracing. */
|
|
||||||
#undef HAVE_LINUX_BTRACE
|
|
||||||
|
|
||||||
@@ -202,6 +205,9 @@
|
|
||||||
/* Define to 1 if you have the `pwrite' function. */
|
|
||||||
#undef HAVE_PWRITE
|
|
||||||
|
|
||||||
+/* 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/gdb/gdbserver/configure b/gdb/gdbserver/configure
|
|
||||||
--- a/gdb/gdbserver/configure
|
|
||||||
+++ b/gdb/gdbserver/configure
|
|
||||||
@@ -8535,6 +8535,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/gdb/gdbserver/configure.ac b/gdb/gdbserver/configure.ac
|
|
||||||
--- a/gdb/gdbserver/configure.ac
|
|
||||||
+++ b/gdb/gdbserver/configure.ac
|
|
||||||
@@ -486,6 +486,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/gdb/gdbserver/linux-low.c b/gdb/gdbserver/linux-low.c
|
|
||||||
--- a/gdb/gdbserver/linux-low.c
|
|
||||||
+++ b/gdb/gdbserver/linux-low.c
|
|
||||||
@@ -967,7 +967,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");
|
|
||||||
diff --git a/gdb/linux-nat.c b/gdb/linux-nat.c
|
|
||||||
--- a/gdb/linux-nat.c
|
|
||||||
+++ b/gdb/linux-nat.c
|
|
||||||
@@ -1089,7 +1089,17 @@ linux_nat_target::create_inferior (const char *exec_file,
|
|
||||||
/* Make sure we report all signals during startup. */
|
|
||||||
pass_signals (0, NULL);
|
|
||||||
|
|
||||||
- inf_ptrace_target::create_inferior (exec_file, allargs, env, from_tty);
|
|
||||||
+ TRY
|
|
||||||
+ {
|
|
||||||
+ inf_ptrace_target::create_inferior (exec_file, allargs, env, from_tty);
|
|
||||||
+ }
|
|
||||||
+ CATCH (ex, RETURN_MASK_ERROR)
|
|
||||||
+ {
|
|
||||||
+ std::string result = linux_ptrace_create_warnings ();
|
|
||||||
+
|
|
||||||
+ throw_error (ex.error, "%s%s", result.c_str (), ex.message);
|
|
||||||
+ }
|
|
||||||
+ END_CATCH
|
|
||||||
}
|
|
||||||
|
|
||||||
/* 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;
|
|
||||||
}
|
|
||||||
|
|
||||||
@@ -583,6 +589,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);
|
|
@ -1,45 +0,0 @@
|
|||||||
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
|
|
||||||
@@ -1151,6 +1151,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 ()));
|
|
||||||
@@ -1159,8 +1160,8 @@ gdbpy_apply_frame_filter (const struct extension_language_defn *extlang,
|
|
||||||
{
|
|
||||||
if (PyErr_Occurred ())
|
|
||||||
{
|
|
||||||
- throw_quit_or_print_exception ();
|
|
||||||
- return EXT_LANG_BT_ERROR;
|
|
||||||
+ gdbpy_print_stack ();
|
|
||||||
+ return count_printed > 0 ? EXT_LANG_BT_ERROR : EXT_LANG_BT_NO_FILTERS;
|
|
||||||
}
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
@@ -1193,7 +1194,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)
|
|
||||||
- throw_quit_or_print_exception ();
|
|
||||||
+ gdbpy_print_stack ();
|
|
||||||
+ count_printed++;
|
|
||||||
}
|
|
||||||
|
|
||||||
return success;
|
|
@ -1,178 +0,0 @@
|
|||||||
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
|
|
||||||
@@ -1115,7 +1115,10 @@ captured_main_1 (struct captured_main_args *context)
|
|
||||||
if (isdigit (pid_or_core_arg[0]))
|
|
||||||
{
|
|
||||||
if (catch_command_errors (attach_command, pid_or_core_arg,
|
|
||||||
- !batch_flag) == 0)
|
|
||||||
+ !batch_flag) == 0
|
|
||||||
+ /* attach_command could succeed partially and core_file_command
|
|
||||||
+ would try to kill it. */
|
|
||||||
+ && !have_inferiors ())
|
|
||||||
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
|
|
@ -1,130 +0,0 @@
|
|||||||
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
|
|
||||||
@@ -6695,6 +6695,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 (SYMBOL_LINKAGE_NAME (stop_fn), ".omp_fn.") == NULL)
|
|
||||||
+ /* gcc-4.7.2-9.fc19.x86_64 uses a new format. */
|
|
||||||
+ && (stopf == NULL
|
|
||||||
+ || strstr (MSYMBOL_LINKAGE_NAME (stopf), "._omp_fn.") == NULL))
|
|
||||||
+{ /* ".omp_fn." */
|
|
||||||
+
|
|
||||||
/* We're doing a "next".
|
|
||||||
|
|
||||||
Normal (forward) execution: set a breakpoint at the
|
|
||||||
@@ -6728,6 +6738,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
|
|
@ -1,175 +0,0 @@
|
|||||||
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-bz541866-rwatch-before-run.patch
|
|
||||||
|
|
||||||
;; Fix i386+x86_64 rwatch+awatch before run, regression against 6.8 (BZ 541866).
|
|
||||||
;; Fix i386 rwatch+awatch before run (BZ 688788, on top of BZ 541866).
|
|
||||||
;;=push+jan: It should be fixed properly instead.
|
|
||||||
|
|
||||||
diff --git a/gdb/breakpoint.c b/gdb/breakpoint.c
|
|
||||||
--- a/gdb/breakpoint.c
|
|
||||||
+++ b/gdb/breakpoint.c
|
|
||||||
@@ -8807,7 +8807,7 @@ init_breakpoint_sal (struct breakpoint *b, struct gdbarch *gdbarch,
|
|
||||||
int enabled, int internal, unsigned flags,
|
|
||||||
int display_canonical)
|
|
||||||
{
|
|
||||||
- int i;
|
|
||||||
+ int i ATTRIBUTE_UNUSED;
|
|
||||||
|
|
||||||
if (type == bp_hardware_breakpoint)
|
|
||||||
{
|
|
||||||
@@ -14356,7 +14356,7 @@ enable_breakpoint_disp (struct breakpoint *bpt, enum bpdisp disposition,
|
|
||||||
|
|
||||||
if (bpt->type == bp_hardware_breakpoint)
|
|
||||||
{
|
|
||||||
- int i;
|
|
||||||
+ int i ATTRIBUTE_UNUSED;
|
|
||||||
i = hw_breakpoint_used_count ();
|
|
||||||
target_resources_ok =
|
|
||||||
target_can_use_hardware_watchpoint (bp_hardware_breakpoint,
|
|
||||||
diff --git a/gdb/config/i386/nm-linux.h b/gdb/config/i386/nm-linux.h
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/config/i386/nm-linux.h
|
|
||||||
@@ -0,0 +1,28 @@
|
|
||||||
+/* Native support for GNU/Linux i386.
|
|
||||||
+
|
|
||||||
+ Copyright 2010 Free Software Foundation, Inc.
|
|
||||||
+
|
|
||||||
+ This file is part of GDB.
|
|
||||||
+
|
|
||||||
+ 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/>. */
|
|
||||||
+
|
|
||||||
+#ifndef NM_LINUX_H
|
|
||||||
+#define NM_LINUX_H
|
|
||||||
+
|
|
||||||
+#include "config/nm-linux.h"
|
|
||||||
+
|
|
||||||
+/* Red Hat backward compatibility with gdb-6.8. */
|
|
||||||
+#define target_can_use_hardware_watchpoint(type, cnt, ot) 1
|
|
||||||
+
|
|
||||||
+#endif /* NM_LINUX64_H */
|
|
||||||
diff --git a/gdb/config/i386/nm-linux64.h b/gdb/config/i386/nm-linux64.h
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/config/i386/nm-linux64.h
|
|
||||||
@@ -0,0 +1,28 @@
|
|
||||||
+/* Native support for GNU/Linux amd64.
|
|
||||||
+
|
|
||||||
+ Copyright 2010 Free Software Foundation, Inc.
|
|
||||||
+
|
|
||||||
+ This file is part of GDB.
|
|
||||||
+
|
|
||||||
+ 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/>. */
|
|
||||||
+
|
|
||||||
+#ifndef NM_LINUX64_H
|
|
||||||
+#define NM_LINUX64_H
|
|
||||||
+
|
|
||||||
+#include "config/nm-linux.h"
|
|
||||||
+
|
|
||||||
+/* Red Hat backward compatibility with gdb-6.8. */
|
|
||||||
+#define target_can_use_hardware_watchpoint(type, cnt, ot) 1
|
|
||||||
+
|
|
||||||
+#endif /* NM_LINUX64_H */
|
|
||||||
diff --git a/gdb/configure.nat b/gdb/configure.nat
|
|
||||||
--- a/gdb/configure.nat
|
|
||||||
+++ b/gdb/configure.nat
|
|
||||||
@@ -238,6 +238,7 @@ case ${gdb_host} in
|
|
||||||
;;
|
|
||||||
i386)
|
|
||||||
# Host: Intel 386 running GNU/Linux.
|
|
||||||
+ NAT_FILE="${srcdir}/config/${gdb_host_cpu}/nm-linux.h"
|
|
||||||
NATDEPFILES="${NATDEPFILES} x86-nat.o x86-dregs.o \
|
|
||||||
i386-linux-nat.o x86-linux-nat.o linux-btrace.o \
|
|
||||||
x86-linux.o x86-linux-dregs.o"
|
|
||||||
@@ -290,6 +291,7 @@ case ${gdb_host} in
|
|
||||||
case ${gdb_host_cpu} in
|
|
||||||
i386)
|
|
||||||
# Host: GNU/Linux x86-64
|
|
||||||
+ NAT_FILE="${srcdir}/config/${gdb_host_cpu}/nm-linux64.h"
|
|
||||||
NATDEPFILES="${NATDEPFILES} x86-nat.o x86-dregs.o \
|
|
||||||
amd64-nat.o amd64-linux-nat.o x86-linux-nat.o linux-btrace.o \
|
|
||||||
x86-linux.o x86-linux-dregs.o amd64-linux-siginfo.o"
|
|
||||||
diff --git a/gdb/target.h b/gdb/target.h
|
|
||||||
--- a/gdb/target.h
|
|
||||||
+++ b/gdb/target.h
|
|
||||||
@@ -1953,9 +1953,11 @@ extern struct thread_info *target_thread_handle_to_thread_info
|
|
||||||
one. OTHERTYPE is the number of watchpoints of other types than
|
|
||||||
this one used so far. */
|
|
||||||
|
|
||||||
+#ifndef target_can_use_hardware_watchpoint
|
|
||||||
#define target_can_use_hardware_watchpoint(TYPE,CNT,OTHERTYPE) \
|
|
||||||
(current_top_target ()->can_use_hw_breakpoint) ( \
|
|
||||||
TYPE, CNT, OTHERTYPE)
|
|
||||||
+#endif
|
|
||||||
|
|
||||||
/* Returns the number of debug registers needed to watch the given
|
|
||||||
memory region, or zero if not supported. */
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/watchpoint-hw-before-run.exp b/gdb/testsuite/gdb.base/watchpoint-hw-before-run.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.base/watchpoint-hw-before-run.exp
|
|
||||||
@@ -0,0 +1,40 @@
|
|
||||||
+# Copyright 2009, 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 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/>.
|
|
||||||
+
|
|
||||||
+# Arch not supporting hw watchpoints does not imply no_hardware_watchpoints set.
|
|
||||||
+if {(![istarget "i?86-*-*"] && ![istarget "x86_64-*-*"]
|
|
||||||
+ && ![istarget "ia64-*-*"])
|
|
||||||
+ || [target_info exists gdb,no_hardware_watchpoints]} then {
|
|
||||||
+ verbose "Skipping watchpoint-hw-before-run test."
|
|
||||||
+ return
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+set test watchpoint-hw-before-run
|
|
||||||
+set srcfile watchpoint-hw-hit-once.c
|
|
||||||
+if { [prepare_for_testing ${test}.exp ${test} ${srcfile}] } {
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+gdb_test "rwatch watchee" "ardware read watchpoint 1: watchee"
|
|
||||||
+
|
|
||||||
+# `runto_main' or `runto main' would delete the watchpoint created above.
|
|
||||||
+
|
|
||||||
+if { [gdb_start_cmd] < 0 } {
|
|
||||||
+ untested start
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+gdb_test "" "main .* at .*" "start"
|
|
||||||
+
|
|
||||||
+gdb_test "continue" "Continuing.\r\n\r\nHardware read watchpoint \[0-9\]+: watchee\r\n\r\nValue = 0\r\n.*"
|
|
@ -1,71 +0,0 @@
|
|||||||
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-bz568248-oom-is-error.patch
|
|
||||||
|
|
||||||
;; Out of memory is just an error, not fatal (uninitialized VLS vars, BZ 568248).
|
|
||||||
;;=push+jan: Inferior objects should be read in parts, then this patch gets obsoleted.
|
|
||||||
|
|
||||||
http://sourceware.org/ml/gdb-patches/2010-06/msg00005.html
|
|
||||||
|
|
||||||
Hi,
|
|
||||||
|
|
||||||
unfortunately I see this problem reproducible only with the
|
|
||||||
archer-jankratochvil-vla branch (VLA = Variable Length Arrays - char[var]).
|
|
||||||
OTOH this branch I hopefully submit in some form for FSF GDB later.
|
|
||||||
|
|
||||||
In this case (a general problem but tested for example on Fedora 13 i686):
|
|
||||||
|
|
||||||
int
|
|
||||||
main (int argc, char **argv)
|
|
||||||
{
|
|
||||||
char a[argc];
|
|
||||||
return a[0];
|
|
||||||
}
|
|
||||||
|
|
||||||
(gdb) start
|
|
||||||
(gdb) print a
|
|
||||||
../../gdb/utils.c:1251: internal-error: virtual memory exhausted: can't allocate 4294951689 bytes.
|
|
||||||
|
|
||||||
It is apparently because boundary for the variable `a' is not initialized
|
|
||||||
there. Users notice it due to Eclipse-CDT trying to automatically display all
|
|
||||||
the local variables on each step.
|
|
||||||
|
|
||||||
Apparentl no regressions on {x86_64,x86_64-m32,i686}-fedora13-linux-gnu.
|
|
||||||
But is anone aware of the reasons to use internal_error there?
|
|
||||||
I find simple error as a perfectly reasonable there.
|
|
||||||
(history only tracks it since the initial import)
|
|
||||||
|
|
||||||
IIRC this idea has been discussed with Tom Tromey, not sure of its origin.
|
|
||||||
|
|
||||||
I understand it may be offtopic for FSF GDB but from some GDB crashes I am not
|
|
||||||
sure if it can happen only due to the VLA variables.
|
|
||||||
|
|
||||||
Thanks,
|
|
||||||
Jan
|
|
||||||
|
|
||||||
gdb/
|
|
||||||
2010-06-01 Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
Tom Tromey <tromey@redhat.com>
|
|
||||||
|
|
||||||
* utils.c (nomem): Change internal_error to error.
|
|
||||||
|
|
||||||
diff --git a/gdb/utils.c b/gdb/utils.c
|
|
||||||
--- a/gdb/utils.c
|
|
||||||
+++ b/gdb/utils.c
|
|
||||||
@@ -746,13 +746,11 @@ malloc_failure (long size)
|
|
||||||
{
|
|
||||||
if (size > 0)
|
|
||||||
{
|
|
||||||
- internal_error (__FILE__, __LINE__,
|
|
||||||
- _("virtual memory exhausted: can't allocate %ld bytes."),
|
|
||||||
- size);
|
|
||||||
+ error (_("virtual memory exhausted: can't allocate %ld bytes."), size);
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
- internal_error (__FILE__, __LINE__, _("virtual memory exhausted."));
|
|
||||||
+ error (_("virtual memory exhausted."));
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
@ -1,254 +0,0 @@
|
|||||||
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-bz601887-dwarf4-rh-test.patch
|
|
||||||
|
|
||||||
;; Backport DWARF-4 support (BZ 601887, Tom Tromey).
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.dwarf2/rh-dwarf4-x86_64.S b/gdb/testsuite/gdb.dwarf2/rh-dwarf4-x86_64.S
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.dwarf2/rh-dwarf4-x86_64.S
|
|
||||||
@@ -0,0 +1,167 @@
|
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ 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 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/>. */
|
|
||||||
+
|
|
||||||
+ .file "rh-dwarf4-x86_64.c"
|
|
||||||
+ .section .debug_abbrev,"",@progbits
|
|
||||||
+.Ldebug_abbrev0:
|
|
||||||
+ .section .debug_info,"",@progbits
|
|
||||||
+.Ldebug_info0:
|
|
||||||
+ .section .debug_line,"",@progbits
|
|
||||||
+.Ldebug_line0:
|
|
||||||
+ .text
|
|
||||||
+.Ltext0:
|
|
||||||
+.globl main
|
|
||||||
+ .type main, @function
|
|
||||||
+main:
|
|
||||||
+.LFB0:
|
|
||||||
+ .file 1 "gdb.dwarf2/rh-dwarf4-x86_64.c"
|
|
||||||
+ # gdb.dwarf2/rh-dwarf4-x86_64.c:20
|
|
||||||
+ .loc 1 20 0
|
|
||||||
+ .cfi_startproc
|
|
||||||
+ # basic block 2
|
|
||||||
+ pushq %rbp
|
|
||||||
+ .cfi_def_cfa_offset 16
|
|
||||||
+ movq %rsp, %rbp
|
|
||||||
+ .cfi_offset 6, -16
|
|
||||||
+ .cfi_def_cfa_register 6
|
|
||||||
+ # gdb.dwarf2/rh-dwarf4-x86_64.c:21
|
|
||||||
+ .loc 1 21 0
|
|
||||||
+ movl $0, %eax
|
|
||||||
+ # gdb.dwarf2/rh-dwarf4-x86_64.c:22
|
|
||||||
+ .loc 1 22 0
|
|
||||||
+ leave
|
|
||||||
+ .cfi_def_cfa 7, 8
|
|
||||||
+ ret
|
|
||||||
+ .cfi_endproc
|
|
||||||
+.LFE0:
|
|
||||||
+ .size main, .-main
|
|
||||||
+.Letext0:
|
|
||||||
+ .section .debug_info
|
|
||||||
+ .long 0x4e # Length of Compilation Unit Info
|
|
||||||
+ .value 0x4 # DWARF version number
|
|
||||||
+ .long .Ldebug_abbrev0 # Offset Into Abbrev. Section
|
|
||||||
+ .byte 0x8 # Pointer Size (in bytes)
|
|
||||||
+ .uleb128 0x1 # (DIE (0xb) DW_TAG_compile_unit)
|
|
||||||
+ .long .LASF0 # DW_AT_producer: "GNU C 4.4.4 20100503 (Red Hat 4.4.4-2)"
|
|
||||||
+ .byte 0x1 # DW_AT_language
|
|
||||||
+ .long .LASF1 # DW_AT_name: "gdb.dwarf2/rh-dwarf4-x86_64.c"
|
|
||||||
+ .long .LASF2 # DW_AT_comp_dir
|
|
||||||
+ .quad .Ltext0 # DW_AT_low_pc
|
|
||||||
+ .quad .Letext0 # DW_AT_high_pc
|
|
||||||
+ .long .Ldebug_line0 # DW_AT_stmt_list
|
|
||||||
+ .uleb128 0x2 # (DIE (0x2d) DW_TAG_subprogram)
|
|
||||||
+ # DW_AT_external
|
|
||||||
+ .long .LASF3 # DW_AT_name: "main"
|
|
||||||
+ .byte 0x1 # DW_AT_decl_file (gdb.dwarf2/rh-dwarf4-x86_64.c)
|
|
||||||
+ .byte 0x13 # DW_AT_decl_line
|
|
||||||
+ # DW_AT_prototyped
|
|
||||||
+ .long 0x4a # DW_AT_type
|
|
||||||
+ .quad .LFB0 # DW_AT_low_pc
|
|
||||||
+ .quad .LFE0 # DW_AT_high_pc
|
|
||||||
+ .uleb128 0x1 # DW_AT_frame_base
|
|
||||||
+ .byte 0x9c # DW_OP_call_frame_cfa
|
|
||||||
+ .uleb128 0x3 # (DIE (0x4a) DW_TAG_base_type)
|
|
||||||
+ .byte 0x4 # DW_AT_byte_size
|
|
||||||
+ .byte 0x5 # DW_AT_encoding
|
|
||||||
+ .ascii "int\0" # DW_AT_name
|
|
||||||
+ .byte 0x0 # end of children of DIE 0xb
|
|
||||||
+ .section .debug_abbrev
|
|
||||||
+ .uleb128 0x1 # (abbrev code)
|
|
||||||
+ .uleb128 0x11 # (TAG: DW_TAG_compile_unit)
|
|
||||||
+ .byte 0x1 # DW_children_yes
|
|
||||||
+ .uleb128 0x25 # (DW_AT_producer)
|
|
||||||
+ .uleb128 0xe # (DW_FORM_strp)
|
|
||||||
+ .uleb128 0x13 # (DW_AT_language)
|
|
||||||
+ .uleb128 0xb # (DW_FORM_data1)
|
|
||||||
+ .uleb128 0x3 # (DW_AT_name)
|
|
||||||
+ .uleb128 0xe # (DW_FORM_strp)
|
|
||||||
+ .uleb128 0x1b # (DW_AT_comp_dir)
|
|
||||||
+ .uleb128 0xe # (DW_FORM_strp)
|
|
||||||
+ .uleb128 0x11 # (DW_AT_low_pc)
|
|
||||||
+ .uleb128 0x1 # (DW_FORM_addr)
|
|
||||||
+ .uleb128 0x12 # (DW_AT_high_pc)
|
|
||||||
+ .uleb128 0x1 # (DW_FORM_addr)
|
|
||||||
+ .uleb128 0x10 # (DW_AT_stmt_list)
|
|
||||||
+ .uleb128 0x17 # (DW_FORM_sec_offset)
|
|
||||||
+ .byte 0x0
|
|
||||||
+ .byte 0x0
|
|
||||||
+ .uleb128 0x2 # (abbrev code)
|
|
||||||
+ .uleb128 0x2e # (TAG: DW_TAG_subprogram)
|
|
||||||
+ .byte 0x0 # DW_children_no
|
|
||||||
+ .uleb128 0x3f # (DW_AT_external)
|
|
||||||
+ .uleb128 0x19 # (DW_FORM_flag_present)
|
|
||||||
+ .uleb128 0x3 # (DW_AT_name)
|
|
||||||
+ .uleb128 0xe # (DW_FORM_strp)
|
|
||||||
+ .uleb128 0x3a # (DW_AT_decl_file)
|
|
||||||
+ .uleb128 0xb # (DW_FORM_data1)
|
|
||||||
+ .uleb128 0x3b # (DW_AT_decl_line)
|
|
||||||
+ .uleb128 0xb # (DW_FORM_data1)
|
|
||||||
+ .uleb128 0x27 # (DW_AT_prototyped)
|
|
||||||
+ .uleb128 0x19 # (DW_FORM_flag_present)
|
|
||||||
+ .uleb128 0x49 # (DW_AT_type)
|
|
||||||
+ .uleb128 0x13 # (DW_FORM_ref4)
|
|
||||||
+ .uleb128 0x11 # (DW_AT_low_pc)
|
|
||||||
+ .uleb128 0x1 # (DW_FORM_addr)
|
|
||||||
+ .uleb128 0x12 # (DW_AT_high_pc)
|
|
||||||
+ .uleb128 0x1 # (DW_FORM_addr)
|
|
||||||
+ .uleb128 0x40 # (DW_AT_frame_base)
|
|
||||||
+ .uleb128 0x18 # (DW_FORM_exprloc)
|
|
||||||
+ .byte 0x0
|
|
||||||
+ .byte 0x0
|
|
||||||
+ .uleb128 0x3 # (abbrev code)
|
|
||||||
+ .uleb128 0x24 # (TAG: DW_TAG_base_type)
|
|
||||||
+ .byte 0x0 # DW_children_no
|
|
||||||
+ .uleb128 0xb # (DW_AT_byte_size)
|
|
||||||
+ .uleb128 0xb # (DW_FORM_data1)
|
|
||||||
+ .uleb128 0x3e # (DW_AT_encoding)
|
|
||||||
+ .uleb128 0xb # (DW_FORM_data1)
|
|
||||||
+ .uleb128 0x3 # (DW_AT_name)
|
|
||||||
+ .uleb128 0x8 # (DW_FORM_string)
|
|
||||||
+ .byte 0x0
|
|
||||||
+ .byte 0x0
|
|
||||||
+ .byte 0x0
|
|
||||||
+ .section .debug_pubnames,"",@progbits
|
|
||||||
+ .long 0x17 # Length of Public Names Info
|
|
||||||
+ .value 0x2 # DWARF Version
|
|
||||||
+ .long .Ldebug_info0 # Offset of Compilation Unit Info
|
|
||||||
+ .long 0x52 # Compilation Unit Length
|
|
||||||
+ .long 0x2d # DIE offset
|
|
||||||
+ .ascii "main\0" # external name
|
|
||||||
+ .long 0x0
|
|
||||||
+ .section .debug_aranges,"",@progbits
|
|
||||||
+ .long 0x2c # Length of Address Ranges Info
|
|
||||||
+ .value 0x2 # DWARF Version
|
|
||||||
+ .long .Ldebug_info0 # Offset of Compilation Unit Info
|
|
||||||
+ .byte 0x8 # Size of Address
|
|
||||||
+ .byte 0x0 # Size of Segment Descriptor
|
|
||||||
+ .value 0x0 # Pad to 16 byte boundary
|
|
||||||
+ .value 0x0
|
|
||||||
+ .quad .Ltext0 # Address
|
|
||||||
+ .quad .Letext0-.Ltext0 # Length
|
|
||||||
+ .quad 0x0
|
|
||||||
+ .quad 0x0
|
|
||||||
+ .section .debug_str,"MS",@progbits,1
|
|
||||||
+.LASF2:
|
|
||||||
+ .string "."
|
|
||||||
+.LASF0:
|
|
||||||
+ .string "GNU C 4.4.4 20100503 (Red Hat 4.4.4-2)"
|
|
||||||
+.LASF1:
|
|
||||||
+ .string "gdb.dwarf2/rh-dwarf4-x86_64.c"
|
|
||||||
+.LASF3:
|
|
||||||
+ .string "main"
|
|
||||||
+ .ident "GCC: (GNU) 4.4.4 20100503 (Red Hat 4.4.4-2)"
|
|
||||||
+ .section .note.GNU-stack,"",@progbits
|
|
||||||
diff --git a/gdb/testsuite/gdb.dwarf2/rh-dwarf4-x86_64.c b/gdb/testsuite/gdb.dwarf2/rh-dwarf4-x86_64.c
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.dwarf2/rh-dwarf4-x86_64.c
|
|
||||||
@@ -0,0 +1,22 @@
|
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ 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 3 of the License, or
|
|
||||||
+ (at your option) any later version.
|
|
||||||
+
|
|
||||||
+ This program is distributed in the hope that it will be useful,
|
|
||||||
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
||||||
+ GNU General Public License for more details.
|
|
||||||
+
|
|
||||||
+ You should have received a copy of the GNU General Public License
|
|
||||||
+ along with this program. If not, see <http://www.gnu.org/licenses/>. */
|
|
||||||
+
|
|
||||||
+int
|
|
||||||
+main (void)
|
|
||||||
+{
|
|
||||||
+ return 0;
|
|
||||||
+}
|
|
||||||
diff --git a/gdb/testsuite/gdb.dwarf2/rh-dwarf4-x86_64.exp b/gdb/testsuite/gdb.dwarf2/rh-dwarf4-x86_64.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.dwarf2/rh-dwarf4-x86_64.exp
|
|
||||||
@@ -0,0 +1,42 @@
|
|
||||||
+# 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 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/>.
|
|
||||||
+
|
|
||||||
+# This test can only be run on targets which support DWARF-2 and use gas.
|
|
||||||
+# For now pick a sampling of likely targets.
|
|
||||||
+if {![istarget *-*-linux*]
|
|
||||||
+ && ![istarget *-*-gnu*]
|
|
||||||
+ && ![istarget *-*-elf*]
|
|
||||||
+ && ![istarget *-*-openbsd*]
|
|
||||||
+ && ![istarget arm-*-eabi*]
|
|
||||||
+ && ![istarget powerpc-*-eabi*]} {
|
|
||||||
+ return 0
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+if {![istarget x86_64-*]} {
|
|
||||||
+ return 0
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+set testfile "rh-dwarf4-x86_64"
|
|
||||||
+set srcfile ${testfile}.S
|
|
||||||
+set executable ${testfile}.x
|
|
||||||
+set binfile [standard_output_file ${executable}]
|
|
||||||
+
|
|
||||||
+if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" object {}] != "" } {
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+clean_restart $executable
|
|
||||||
+
|
|
||||||
+gdb_test "ptype main" {type = int \(void\)}
|
|
@ -1,26 +0,0 @@
|
|||||||
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-ccache-workaround.patch
|
|
||||||
|
|
||||||
;; Workaround ccache making lineno non-zero for command-line definitions.
|
|
||||||
;;=fedoratest: ccache is rarely used and it is even fixed now.
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/macscp.exp b/gdb/testsuite/gdb.base/macscp.exp
|
|
||||||
--- a/gdb/testsuite/gdb.base/macscp.exp
|
|
||||||
+++ b/gdb/testsuite/gdb.base/macscp.exp
|
|
||||||
@@ -25,6 +25,14 @@ if { [test_compiler_info "gcc-*"] || [test_compiler_info "clang-*"] } {
|
|
||||||
lappend options additional_flags=-g3
|
|
||||||
}
|
|
||||||
|
|
||||||
+# Workaround ccache making lineno non-zero for command-line definitions.
|
|
||||||
+if {[find_gcc] == "gcc" && [file executable "/usr/bin/gcc"]} {
|
|
||||||
+ set result [catch "exec which gcc" output]
|
|
||||||
+ if {$result == 0 && [string first "/ccache/" $output] > -1} {
|
|
||||||
+ lappend options "compiler=/usr/bin/gcc"
|
|
||||||
+ }
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
# Generate the intermediate object file. This is required by Darwin to
|
|
||||||
# have access to the .debug_macinfo section.
|
|
||||||
if {[gdb_compile "${srcdir}/${subdir}/macscp1.c" "${objfile}" \
|
|
@ -1,315 +0,0 @@
|
|||||||
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()
|
|
@ -1,71 +0,0 @@
|
|||||||
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-fedora-libncursesw.patch
|
|
||||||
|
|
||||||
;; Force libncursesw over libncurses to match the includes (RH BZ 1270534).
|
|
||||||
;;=push+jan
|
|
||||||
|
|
||||||
Fedora: Force libncursesw over libncurses to match the includes.
|
|
||||||
https://bugzilla.redhat.com/show_bug.cgi?id=1270534
|
|
||||||
|
|
||||||
diff --git a/gdb/configure b/gdb/configure
|
|
||||||
--- a/gdb/configure
|
|
||||||
+++ b/gdb/configure
|
|
||||||
@@ -9393,6 +9393,7 @@ if test x"$prefer_curses" = xyes; then
|
|
||||||
# search /usr/local/include, if ncurses is installed in /usr/local. A
|
|
||||||
# default installation of ncurses on alpha*-dec-osf* will lead to such
|
|
||||||
# a situation.
|
|
||||||
+ # Fedora: Force libncursesw over libncurses to match the includes.
|
|
||||||
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for library containing waddstr" >&5
|
|
||||||
$as_echo_n "checking for library containing waddstr... " >&6; }
|
|
||||||
if ${ac_cv_search_waddstr+:} false; then :
|
|
||||||
@@ -9417,7 +9418,7 @@ return waddstr ();
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
_ACEOF
|
|
||||||
-for ac_lib in '' ncursesw ncurses cursesX curses; do
|
|
||||||
+for ac_lib in '' ncursesw; do
|
|
||||||
if test -z "$ac_lib"; then
|
|
||||||
ac_res="none required"
|
|
||||||
else
|
|
||||||
@@ -9491,6 +9492,7 @@ case $host_os in
|
|
||||||
esac
|
|
||||||
|
|
||||||
# These are the libraries checked by Readline.
|
|
||||||
+# Fedora: Force libncursesw over libncurses to match the includes.
|
|
||||||
{ $as_echo "$as_me:${as_lineno-$LINENO}: checking for library containing tgetent" >&5
|
|
||||||
$as_echo_n "checking for library containing tgetent... " >&6; }
|
|
||||||
if ${ac_cv_search_tgetent+:} false; then :
|
|
||||||
@@ -9515,7 +9517,7 @@ return tgetent ();
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
_ACEOF
|
|
||||||
-for ac_lib in '' termcap tinfo curses ncursesw ncurses; do
|
|
||||||
+for ac_lib in '' termcap tinfo ncursesw; do
|
|
||||||
if test -z "$ac_lib"; then
|
|
||||||
ac_res="none required"
|
|
||||||
else
|
|
||||||
diff --git a/gdb/configure.ac b/gdb/configure.ac
|
|
||||||
--- a/gdb/configure.ac
|
|
||||||
+++ b/gdb/configure.ac
|
|
||||||
@@ -766,7 +766,8 @@ if test x"$prefer_curses" = xyes; then
|
|
||||||
# search /usr/local/include, if ncurses is installed in /usr/local. A
|
|
||||||
# default installation of ncurses on alpha*-dec-osf* will lead to such
|
|
||||||
# a situation.
|
|
||||||
- AC_SEARCH_LIBS(waddstr, [ncursesw ncurses cursesX curses])
|
|
||||||
+ # Fedora: Force libncursesw over libncurses to match the includes.
|
|
||||||
+ AC_SEARCH_LIBS(waddstr, [ncursesw])
|
|
||||||
|
|
||||||
if test "$ac_cv_search_waddstr" != no; then
|
|
||||||
curses_found=yes
|
|
||||||
@@ -808,7 +809,8 @@ case $host_os in
|
|
||||||
esac
|
|
||||||
|
|
||||||
# These are the libraries checked by Readline.
|
|
||||||
-AC_SEARCH_LIBS(tgetent, [termcap tinfo curses ncursesw ncurses])
|
|
||||||
+# Fedora: Force libncursesw over libncurses to match the includes.
|
|
||||||
+AC_SEARCH_LIBS(tgetent, [termcap tinfo ncursesw])
|
|
||||||
|
|
||||||
if test "$ac_cv_search_tgetent" = no; then
|
|
||||||
CONFIG_OBS="$CONFIG_OBS stub-termcap.o"
|
|
@ -1,36 +0,0 @@
|
|||||||
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-follow-child-stale-parent.patch
|
|
||||||
|
|
||||||
;; Fix regression by python on ia64 due to stale current frame.
|
|
||||||
;;=push+jan
|
|
||||||
|
|
||||||
Problem occurs with python and its get_current_arch () as it selects
|
|
||||||
selected_frame and current_frame while still inferior_ptid is valid for the
|
|
||||||
original parent. But since this place it is already attached and later
|
|
||||||
unwinders try to access it, breaking:
|
|
||||||
-PASS: gdb.threads/watchpoint-fork.exp: child: singlethreaded: breakpoint after the first fork
|
|
||||||
-PASS: gdb.threads/watchpoint-fork.exp: child: singlethreaded: watchpoint after the first fork
|
|
||||||
-PASS: gdb.threads/watchpoint-fork.exp: child: singlethreaded: breakpoint after the second fork
|
|
||||||
-PASS: gdb.threads/watchpoint-fork.exp: child: singlethreaded: watchpoint after the second fork
|
|
||||||
-PASS: gdb.threads/watchpoint-fork.exp: child: singlethreaded: finish
|
|
||||||
+FAIL: gdb.threads/watchpoint-fork.exp: child: singlethreaded: breakpoint after the first fork
|
|
||||||
+FAIL: gdb.threads/watchpoint-fork.exp: child: singlethreaded: watchpoint after the first fork
|
|
||||||
+FAIL: gdb.threads/watchpoint-fork.exp: child: singlethreaded: breakpoint after the second fork
|
|
||||||
+FAIL: gdb.threads/watchpoint-fork.exp: child: singlethreaded: watchpoint after the second fork
|
|
||||||
+FAIL: gdb.threads/watchpoint-fork.exp: child: singlethreaded: finish
|
|
||||||
|
|
||||||
diff --git a/gdb/infrun.c b/gdb/infrun.c
|
|
||||||
--- a/gdb/infrun.c
|
|
||||||
+++ b/gdb/infrun.c
|
|
||||||
@@ -752,6 +752,9 @@ follow_fork (void)
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
+ /* Possibly referenced PARENT is no longer valid. */
|
|
||||||
+ reinit_frame_cache ();
|
|
||||||
+
|
|
||||||
/* This pending follow fork event is now handled, one way
|
|
||||||
or another. The previous selected thread may be gone
|
|
||||||
from the lists by now, but if it is still around, need
|
|
@ -1,104 +0,0 @@
|
|||||||
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-fortran-frame-string.patch
|
|
||||||
|
|
||||||
;; Display Fortran strings in backtraces.
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
http://sourceware.org/ml/gdb-patches/2014-07/msg00709.html
|
|
||||||
|
|
||||||
Hi,
|
|
||||||
|
|
||||||
for Fortran it fixes displaying normal strings also in frames/backtraces:
|
|
||||||
|
|
||||||
(gdb) frame
|
|
||||||
->
|
|
||||||
|
|
||||||
The patch is simple and I do not see why it should not be this way.
|
|
||||||
|
|
||||||
For C/C++ TYPE_CODE_STRING is not used. I am not aware of Pascal but that
|
|
||||||
language is currently not really much supported in GDB anyway.
|
|
||||||
|
|
||||||
This was a part of my archer/jankratochvil/vla branch but it is not a part of
|
|
||||||
the Intel VLA patchset as it in fact is completely unrelated to "VLA".
|
|
||||||
|
|
||||||
No regressions on {x86_64,x86_64-m32,i686}-fedora22pre-linux-gnu.
|
|
||||||
|
|
||||||
Thanks,
|
|
||||||
Jan
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.fortran/fortran-frame-string.exp b/gdb/testsuite/gdb.fortran/fortran-frame-string.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.fortran/fortran-frame-string.exp
|
|
||||||
@@ -0,0 +1,36 @@
|
|
||||||
+# 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.
|
|
||||||
+
|
|
||||||
+standard_testfile .f90
|
|
||||||
+if { [prepare_for_testing ${testfile}.exp ${testfile} ${srcfile} {debug f90}] } {
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+if ![runto MAIN__] then {
|
|
||||||
+ perror "couldn't run to breakpoint MAIN__"
|
|
||||||
+ continue
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+gdb_breakpoint [gdb_get_line_number "s = s"]
|
|
||||||
+gdb_continue_to_breakpoint "s = s"
|
|
||||||
+
|
|
||||||
+gdb_test "ptype s" {type = character\*3}
|
|
||||||
+gdb_test "p s" " = 'foo'"
|
|
||||||
+
|
|
||||||
+# Fix rejected upstream:
|
|
||||||
+# https://sourceware.org/ml/gdb-patches/2014-07/msg00768.html
|
|
||||||
+setup_kfail "rejected" *-*-*
|
|
||||||
+gdb_test "frame" { \(s='foo', .*}
|
|
||||||
diff --git a/gdb/testsuite/gdb.fortran/fortran-frame-string.f90 b/gdb/testsuite/gdb.fortran/fortran-frame-string.f90
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.fortran/fortran-frame-string.f90
|
|
||||||
@@ -0,0 +1,28 @@
|
|
||||||
+! 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.
|
|
||||||
+!
|
|
||||||
+! 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 f(s)
|
|
||||||
+ character*3 s
|
|
||||||
+ s = s
|
|
||||||
+ end
|
|
||||||
+
|
|
||||||
+ program main
|
|
||||||
+ call f ('foo')
|
|
||||||
+ end
|
|
@ -1,236 +0,0 @@
|
|||||||
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/dwarf2read.c b/gdb/dwarf2read.c
|
|
||||||
--- a/gdb/dwarf2read.c
|
|
||||||
+++ b/gdb/dwarf2read.c
|
|
||||||
@@ -10499,6 +10499,13 @@ private:
|
|
||||||
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/infrun.c b/gdb/infrun.c
|
|
||||||
--- a/gdb/infrun.c
|
|
||||||
+++ b/gdb/infrun.c
|
|
||||||
@@ -607,6 +607,13 @@ holding the child stopped. Try \"set detach-on-fork\" or \
|
|
||||||
target_pid_to_str (process_ptid));
|
|
||||||
}
|
|
||||||
|
|
||||||
+#ifdef NEED_DETACH_SIGSTOP
|
|
||||||
+ /* We should check PID_WAS_STOPPED and detach it stopped accordingly.
|
|
||||||
+ In this point of code it cannot be 1 as we would not get FORK
|
|
||||||
+ executed without CONTINUE first which resets PID_WAS_STOPPED.
|
|
||||||
+ We would have to first TARGET_STOP and WAITPID it as with running
|
|
||||||
+ inferior PTRACE_DETACH, SIGSTOP will ignore the signal. */
|
|
||||||
+#endif
|
|
||||||
target_detach (parent_inf, 0);
|
|
||||||
}
|
|
||||||
|
|
||||||
diff --git a/gdb/linux-nat.c b/gdb/linux-nat.c
|
|
||||||
--- a/gdb/linux-nat.c
|
|
||||||
+++ b/gdb/linux-nat.c
|
|
||||||
@@ -191,6 +191,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
|
|
||||||
+
|
|
||||||
/* The saved to_close method, inherited from inf-ptrace.c.
|
|
||||||
Called by our to_close. */
|
|
||||||
static void (*super_close) (struct target_ops *);
|
|
||||||
@@ -1027,6 +1033,9 @@ linux_nat_post_attach_wait (ptid_t ptid, int *signalled)
|
|
||||||
if (debug_linux_nat)
|
|
||||||
fprintf_unfiltered (gdb_stdlog,
|
|
||||||
"LNPAW: Attaching to a stopped process\n");
|
|
||||||
+#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;
|
|
||||||
}
|
|
||||||
|
|
||||||
@@ -1507,6 +1535,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
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
@@ -1765,6 +1797,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, linux_nat_resume_callback, lp);
|
|
||||||
|
|
||||||
@@ -3761,6 +3803,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" {
|
|
@ -1,46 +0,0 @@
|
|||||||
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
|
|
||||||
@@ -9680,10 +9680,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
|
|
||||||
@@ -843,10 +843,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
|
|
@ -1,23 +0,0 @@
|
|||||||
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-libexec-add-index.patch
|
|
||||||
|
|
||||||
;; Fix gdb-headless /usr/bin/ executables (BZ 1390251).
|
|
||||||
;;=fedora
|
|
||||||
|
|
||||||
diff --git a/gdb/contrib/gdb-add-index.sh b/gdb/contrib/gdb-add-index.sh
|
|
||||||
--- a/gdb/contrib/gdb-add-index.sh
|
|
||||||
+++ b/gdb/contrib/gdb-add-index.sh
|
|
||||||
@@ -21,6 +21,11 @@
|
|
||||||
GDB=${GDB:=gdb}
|
|
||||||
OBJCOPY=${OBJCOPY:=objcopy}
|
|
||||||
|
|
||||||
+GDB2=/usr/libexec/gdb
|
|
||||||
+if test -x $GDB2 && ! which $GDB &>/dev/null; then
|
|
||||||
+ GDB=$GDB2
|
|
||||||
+fi
|
|
||||||
+
|
|
||||||
myname="${0##*/}"
|
|
||||||
|
|
||||||
dwarf5=""
|
|
@ -1,165 +0,0 @@
|
|||||||
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-lineno-makeup-test.patch
|
|
||||||
|
|
||||||
;; Testcase for "Do not make up line information" fix by Daniel Jacobowitz.
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
New testcase for:
|
|
||||||
https://bugzilla.redhat.com/show_bug.cgi?id=466222
|
|
||||||
(for the first / customer recommended fix)
|
|
||||||
and the upstream fix:
|
|
||||||
http://sourceware.org/ml/gdb-patches/2006-11/msg00253.html
|
|
||||||
[rfc] Do not make up line information
|
|
||||||
http://sourceware.org/ml/gdb-cvs/2006-11/msg00127.html
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/lineno-makeup-func.c b/gdb/testsuite/gdb.base/lineno-makeup-func.c
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.base/lineno-makeup-func.c
|
|
||||||
@@ -0,0 +1,21 @@
|
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ 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/>. */
|
|
||||||
+
|
|
||||||
+void
|
|
||||||
+func (void)
|
|
||||||
+{
|
|
||||||
+}
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/lineno-makeup.c b/gdb/testsuite/gdb.base/lineno-makeup.c
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.base/lineno-makeup.c
|
|
||||||
@@ -0,0 +1,35 @@
|
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ 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/>. */
|
|
||||||
+
|
|
||||||
+/* DW_AT_low_pc-DW_AT_high_pc should cover the function without line number
|
|
||||||
+ information (.debug_line) so we cannot use an external object file.
|
|
||||||
+
|
|
||||||
+ It must not be just a label as it would alias on the next function even for
|
|
||||||
+ correct GDB. Therefore some stub data must be placed there.
|
|
||||||
+
|
|
||||||
+ We need to provide a real stub function body as at least s390
|
|
||||||
+ (s390_analyze_prologue) would skip the whole body till reaching `main'. */
|
|
||||||
+
|
|
||||||
+extern void func (void);
|
|
||||||
+asm ("func: .incbin \"" BINFILENAME "\"");
|
|
||||||
+
|
|
||||||
+int
|
|
||||||
+main (void)
|
|
||||||
+{
|
|
||||||
+ func ();
|
|
||||||
+ return 0;
|
|
||||||
+}
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/lineno-makeup.exp b/gdb/testsuite/gdb.base/lineno-makeup.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.base/lineno-makeup.exp
|
|
||||||
@@ -0,0 +1,78 @@
|
|
||||||
+# 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 "lineno-makeup"
|
|
||||||
+set srcfuncfile ${testfile}-func.c
|
|
||||||
+set srcfile ${testfile}.c
|
|
||||||
+set objfuncfile [standard_output_file ${testfile}-func.o]
|
|
||||||
+set binfuncfile [standard_output_file ${testfile}-func.bin]
|
|
||||||
+set binfile [standard_output_file ${testfile}]
|
|
||||||
+
|
|
||||||
+if { [gdb_compile "${srcdir}/${subdir}/${srcfuncfile}" "${objfuncfile}" object {}] != "" } {
|
|
||||||
+ gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+set objcopy [catch "exec objcopy -O binary --only-section .text ${objfuncfile} ${binfuncfile}" output]
|
|
||||||
+verbose -log "objcopy=$objcopy: $output"
|
|
||||||
+if { $objcopy != 0 } {
|
|
||||||
+ gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
|
|
||||||
+}
|
|
||||||
+set binfuncfilesize [file size $binfuncfile]
|
|
||||||
+verbose -log "file size $binfuncfile = $binfuncfilesize"
|
|
||||||
+
|
|
||||||
+if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable [list debug additional_flags=-DBINFILENAME=\"$binfuncfile\"]] != "" } {
|
|
||||||
+ gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+gdb_exit
|
|
||||||
+gdb_start
|
|
||||||
+gdb_reinitialize_dir $srcdir/$subdir
|
|
||||||
+gdb_load ${binfile}
|
|
||||||
+
|
|
||||||
+set b_addr ""
|
|
||||||
+set test "break func"
|
|
||||||
+gdb_test_multiple $test $test {
|
|
||||||
+ -re "Breakpoint \[0-9\]+ at (0x\[0-9a-f\]+)\r\n$gdb_prompt $" {
|
|
||||||
+ set b_addr $expect_out(1,string)
|
|
||||||
+ pass $test
|
|
||||||
+ }
|
|
||||||
+ -re "Breakpoint \[0-9\]+ at (0x\[0-9a-f\]+): .*\r\n$gdb_prompt $" {
|
|
||||||
+ set b_addr $expect_out(1,string)
|
|
||||||
+ fail $test
|
|
||||||
+ }
|
|
||||||
+}
|
|
||||||
+verbose -log "b_addr=<$b_addr>"
|
|
||||||
+
|
|
||||||
+set p_addr ""
|
|
||||||
+set test "print func"
|
|
||||||
+gdb_test_multiple $test $test {
|
|
||||||
+ -re "\\$\[0-9\]+ = {<text variable, no debug info>} (0x\[0-9a-f\]+) <func>\r\n$gdb_prompt $" {
|
|
||||||
+ set p_addr $expect_out(1,string)
|
|
||||||
+ pass $test
|
|
||||||
+ }
|
|
||||||
+}
|
|
||||||
+verbose -log "p_addr=<$p_addr>"
|
|
||||||
+
|
|
||||||
+set test "break address belongs to func"
|
|
||||||
+if {$b_addr == $p_addr} {
|
|
||||||
+ pass "$test (exact match)"
|
|
||||||
+} else {
|
|
||||||
+ set skip [expr $b_addr - $p_addr]
|
|
||||||
+ if {$skip > 0 && $skip < $binfuncfilesize} {
|
|
||||||
+ pass "$test (prologue skip by $skip bytes)"
|
|
||||||
+ } else {
|
|
||||||
+ fail $test
|
|
||||||
+ }
|
|
||||||
+}
|
|
@ -1,25 +0,0 @@
|
|||||||
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
|
|
||||||
@@ -12016,6 +12016,8 @@ update_global_location_list (enum ugll_insert_mode insert_mode)
|
|
||||||
traps we can no longer explain. */
|
|
||||||
|
|
||||||
old_loc->events_till_retirement = 3 * (thread_count () + 1);
|
|
||||||
+ /* Red Hat Bug 590623. */
|
|
||||||
+ old_loc->events_till_retirement *= 10;
|
|
||||||
old_loc->owner = NULL;
|
|
||||||
|
|
||||||
VEC_safe_push (bp_location_p, moribund_locations, old_loc);
|
|
@ -1,62 +0,0 @@
|
|||||||
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-opcodes-clflushopt-test.patch
|
|
||||||
|
|
||||||
;; Test clflushopt instruction decode (for RH BZ 1262471).
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.arch/amd64-clflushopt.S b/gdb/testsuite/gdb.arch/amd64-clflushopt.S
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.arch/amd64-clflushopt.S
|
|
||||||
@@ -0,0 +1,19 @@
|
|
||||||
+/* Copyright 2016 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/>.
|
|
||||||
+
|
|
||||||
+ This file is part of the gdb testsuite. */
|
|
||||||
+
|
|
||||||
+_start: .globl _start
|
|
||||||
+ clflushopt (%edi)
|
|
||||||
diff --git a/gdb/testsuite/gdb.arch/amd64-clflushopt.exp b/gdb/testsuite/gdb.arch/amd64-clflushopt.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.arch/amd64-clflushopt.exp
|
|
||||||
@@ -0,0 +1,25 @@
|
|
||||||
+# Copyright 2016 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 { ![istarget "x86_64-*-*"] && ![istarget "i?86-*-*"] } then {
|
|
||||||
+ verbose "Skipping amd64 clflushopt test."
|
|
||||||
+ return
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+if [prepare_for_testing amd64-clflushopt.exp amd64-clflushopt amd64-clflushopt.S [list debug "additional_flags=-nostdlib"]] {
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+gdb_test "disas _start" "Dump of assembler code for function _start:\r\n *0x\[0-9a-f\]+ <\[+\]0>:\tclflushopt \\(%edi\\)\r\nEnd of assembler dump\\." "clflushopt"
|
|
@ -1,234 +0,0 @@
|
|||||||
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-physname-pr11734-test.patch
|
|
||||||
|
|
||||||
;; Fix regressions on C++ names resolving (PR 11734, PR 12273, Keith Seitz).
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
http://sourceware.org/ml/gdb-patches/2010-12/msg00263.html
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.cp/pr11734-1.cc b/gdb/testsuite/gdb.cp/pr11734-1.cc
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.cp/pr11734-1.cc
|
|
||||||
@@ -0,0 +1,30 @@
|
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ 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 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/>.
|
|
||||||
+
|
|
||||||
+ Please email any bugs, comments, and/or additions to this file to:
|
|
||||||
+ bug-gdb@gnu.org */
|
|
||||||
+
|
|
||||||
+#include "pr11734.h"
|
|
||||||
+
|
|
||||||
+int
|
|
||||||
+main ()
|
|
||||||
+{
|
|
||||||
+ pr11734 *p = new pr11734;
|
|
||||||
+ p->foo ();
|
|
||||||
+ return 0;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
diff --git a/gdb/testsuite/gdb.cp/pr11734-2.cc b/gdb/testsuite/gdb.cp/pr11734-2.cc
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.cp/pr11734-2.cc
|
|
||||||
@@ -0,0 +1,27 @@
|
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ 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 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/>.
|
|
||||||
+
|
|
||||||
+ Please email any bugs, comments, and/or additions to this file to:
|
|
||||||
+ bug-gdb@gnu.org */
|
|
||||||
+
|
|
||||||
+#include "pr11734.h"
|
|
||||||
+
|
|
||||||
+void
|
|
||||||
+pr11734::foo(void)
|
|
||||||
+{
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
diff --git a/gdb/testsuite/gdb.cp/pr11734-3.cc b/gdb/testsuite/gdb.cp/pr11734-3.cc
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.cp/pr11734-3.cc
|
|
||||||
@@ -0,0 +1,27 @@
|
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ 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 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/>.
|
|
||||||
+
|
|
||||||
+ Please email any bugs, comments, and/or additions to this file to:
|
|
||||||
+ bug-gdb@gnu.org */
|
|
||||||
+
|
|
||||||
+#include "pr11734.h"
|
|
||||||
+
|
|
||||||
+void
|
|
||||||
+pr11734::foo (int a)
|
|
||||||
+{
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
diff --git a/gdb/testsuite/gdb.cp/pr11734-4.cc b/gdb/testsuite/gdb.cp/pr11734-4.cc
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.cp/pr11734-4.cc
|
|
||||||
@@ -0,0 +1,27 @@
|
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ 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 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/>.
|
|
||||||
+
|
|
||||||
+ Please email any bugs, comments, and/or additions to this file to:
|
|
||||||
+ bug-gdb@gnu.org */
|
|
||||||
+
|
|
||||||
+#include "pr11734.h"
|
|
||||||
+
|
|
||||||
+void
|
|
||||||
+pr11734::foo (char *a)
|
|
||||||
+{
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
diff --git a/gdb/testsuite/gdb.cp/pr11734.exp b/gdb/testsuite/gdb.cp/pr11734.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.cp/pr11734.exp
|
|
||||||
@@ -0,0 +1,55 @@
|
|
||||||
+# Copyright 2010 Free Software Foundation, Inc.
|
|
||||||
+#
|
|
||||||
+# Contributed by Red Hat, originally written by Keith Seitz.
|
|
||||||
+#
|
|
||||||
+# 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/>.
|
|
||||||
+
|
|
||||||
+# This file is part of the gdb testsuite.
|
|
||||||
+
|
|
||||||
+if { [skip_cplus_tests] } { continue }
|
|
||||||
+
|
|
||||||
+set testfile "pr11734"
|
|
||||||
+set class $testfile
|
|
||||||
+
|
|
||||||
+set srcfiles {}
|
|
||||||
+for {set i 1} {$i < 5} {incr i} {
|
|
||||||
+ lappend srcfiles $testfile-$i.cc
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+prepare_for_testing pr11734 $testfile $srcfiles {c++ debug}
|
|
||||||
+
|
|
||||||
+if {![runto_main]} {
|
|
||||||
+ perror "couldn't run to breakpoint"
|
|
||||||
+ continue
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# An array holding the overload types for the method pr11734::foo. The
|
|
||||||
+# first element is the overloaded method parameter. The second element
|
|
||||||
+# is the expected source file number, e.g. "pr11734-?.cc".
|
|
||||||
+array set tests {
|
|
||||||
+ "char*" 4
|
|
||||||
+ "int" 3
|
|
||||||
+ "" 2
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Test each overload instance twice: once quoted, once unquoted
|
|
||||||
+foreach ovld [array names tests] {
|
|
||||||
+ set method "${class}::foo\($ovld\)"
|
|
||||||
+ set result "Breakpoint (\[0-9\]).*file .*/$class-$tests($ovld).*"
|
|
||||||
+ gdb_test "break $method" $result
|
|
||||||
+ gdb_test "break '$method'" $result
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+gdb_exit
|
|
||||||
+return 0
|
|
||||||
diff --git a/gdb/testsuite/gdb.cp/pr11734.h b/gdb/testsuite/gdb.cp/pr11734.h
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.cp/pr11734.h
|
|
||||||
@@ -0,0 +1,28 @@
|
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ 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 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/>.
|
|
||||||
+
|
|
||||||
+ Please email any bugs, comments, and/or additions to this file to:
|
|
||||||
+ bug-gdb@gnu.org */
|
|
||||||
+
|
|
||||||
+class pr11734
|
|
||||||
+{
|
|
||||||
+ public:
|
|
||||||
+ void foo ();
|
|
||||||
+ void foo (int);
|
|
||||||
+ void foo (char *);
|
|
||||||
+};
|
|
||||||
+
|
|
@ -1,103 +0,0 @@
|
|||||||
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-physname-pr12273-test.patch
|
|
||||||
|
|
||||||
;; Fix regressions on C++ names resolving (PR 11734, PR 12273, Keith Seitz).
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
http://sourceware.org/ml/gdb-patches/2010-12/msg00264.html
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.cp/pr12273.cc b/gdb/testsuite/gdb.cp/pr12273.cc
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.cp/pr12273.cc
|
|
||||||
@@ -0,0 +1,37 @@
|
|
||||||
+/* This test case is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ 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 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/>. */
|
|
||||||
+
|
|
||||||
+template <typename T>
|
|
||||||
+class GDB
|
|
||||||
+{
|
|
||||||
+ public:
|
|
||||||
+ static int simple (void) { return 0; }
|
|
||||||
+ static int harder (T a) { return 1; }
|
|
||||||
+ template <typename X>
|
|
||||||
+ static X even_harder (T a) { return static_cast<X> (a); }
|
|
||||||
+ int operator == (GDB const& other)
|
|
||||||
+ { return 1; }
|
|
||||||
+};
|
|
||||||
+
|
|
||||||
+int main(int argc, char **argv)
|
|
||||||
+{
|
|
||||||
+ GDB<int> a, b;
|
|
||||||
+ if (a == b)
|
|
||||||
+ return GDB<char>::harder('a') + GDB<int>::harder(3)
|
|
||||||
+ + GDB<char>::even_harder<int> ('a');
|
|
||||||
+ return GDB<int>::simple ();
|
|
||||||
+}
|
|
||||||
diff --git a/gdb/testsuite/gdb.cp/pr12273.exp b/gdb/testsuite/gdb.cp/pr12273.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.cp/pr12273.exp
|
|
||||||
@@ -0,0 +1,46 @@
|
|
||||||
+# Copyright 2010 Free Software Foundation, Inc.
|
|
||||||
+#
|
|
||||||
+# Contributed by Red Hat, originally written by Keith Seitz.
|
|
||||||
+#
|
|
||||||
+# 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/>.
|
|
||||||
+
|
|
||||||
+# This file is part of the gdb testsuite.
|
|
||||||
+
|
|
||||||
+if {[skip_cplus_tests]} { continue }
|
|
||||||
+
|
|
||||||
+set testfile "pr12273"
|
|
||||||
+# Do NOT compile with debug flag.
|
|
||||||
+prepare_for_testing pr12273 $testfile $testfile.cc {c++}
|
|
||||||
+
|
|
||||||
+gdb_test_no_output "set language c++"
|
|
||||||
+
|
|
||||||
+# A list of minimal symbol names to check.
|
|
||||||
+# Note that GDB<char>::even_harder<int>(char) is quoted and includes
|
|
||||||
+# the return type. This is necessary because this is the demangled name
|
|
||||||
+# of the minimal symbol.
|
|
||||||
+set min_syms [list \
|
|
||||||
+ "GDB<int>::operator ==" \
|
|
||||||
+ "GDB<int>::operator==(GDB<int> const&)" \
|
|
||||||
+ "GDB<char>::harder(char)" \
|
|
||||||
+ "GDB<int>::harder(int)" \
|
|
||||||
+ {"int GDB<char>::even_harder<int>(char)"} \
|
|
||||||
+ "GDB<int>::simple()"]
|
|
||||||
+
|
|
||||||
+foreach sym $min_syms {
|
|
||||||
+ if {[gdb_breakpoint $sym]} {
|
|
||||||
+ pass "setting breakpoint at $sym"
|
|
||||||
+ }
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+gdb_exit
|
|
@ -1,303 +0,0 @@
|
|||||||
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-ppc-power7-test.patch
|
|
||||||
|
|
||||||
;; Test power7 ppc disassembly.
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.arch/powerpc-power7rh.exp b/gdb/testsuite/gdb.arch/powerpc-power7rh.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.arch/powerpc-power7rh.exp
|
|
||||||
@@ -0,0 +1,178 @@
|
|
||||||
+# 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 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.
|
|
||||||
+
|
|
||||||
+# Test PowerPC Power7 instructions disassembly.
|
|
||||||
+
|
|
||||||
+if {![istarget "powerpc*-*-*"]} then {
|
|
||||||
+ verbose "Skipping PowerPC Power7 instructions disassembly."
|
|
||||||
+ return
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+set testfile "powerpc-power7rh"
|
|
||||||
+set srcfile ${testfile}.s
|
|
||||||
+set objfile [standard_output_file ${testfile}.o]
|
|
||||||
+
|
|
||||||
+if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${objfile}" object {debug}] != "" } {
|
|
||||||
+ untested "PowerPC Power7 instructions disassembly"
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+
|
|
||||||
+gdb_exit
|
|
||||||
+gdb_start
|
|
||||||
+gdb_reinitialize_dir $srcdir/$subdir
|
|
||||||
+gdb_load ${objfile}
|
|
||||||
+
|
|
||||||
+
|
|
||||||
+# Disassemble the function.
|
|
||||||
+
|
|
||||||
+set test "disass func"
|
|
||||||
+gdb_test_multiple $test $test {
|
|
||||||
+ -re "\r\nDump of assembler code for function func:(\r\n.*\r\n)End of assembler dump.\r\n$gdb_prompt $" {
|
|
||||||
+ set func $expect_out(1,string)
|
|
||||||
+ pass $test
|
|
||||||
+ }
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+proc instr_to_patt {offset instr} {
|
|
||||||
+ # 0x0000000000000018 <func+24>: stxvd2x vs43,r4,r5
|
|
||||||
+ return ".*\r\n\[ \t\]*[string map {0x 0x0*} $offset] <(func)?\\+?\[0-9\]*>:\[ \t\]*[string map [list { } "\[ \t\]+" . {\.}] $instr]\[ \t\]*\r\n.*"
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# KFAIL strings would not exist if -Many would print the same as -Mpower7.
|
|
||||||
+# That means the power7 form should be the preferred one.
|
|
||||||
+# http://sourceware.org/ml/gdb-patches/2009-03/threads.html#00020
|
|
||||||
+
|
|
||||||
+proc func_check {offset instr {kfail ""}} {
|
|
||||||
+ global func
|
|
||||||
+
|
|
||||||
+ set test "Found $offset: $instr"
|
|
||||||
+ if [regexp -nocase -line [instr_to_patt $offset $instr] $func] {
|
|
||||||
+ pass $test
|
|
||||||
+ } elseif {$kfail != "" && [regexp -nocase -line [instr_to_patt $offset $kfail] $func]} {
|
|
||||||
+ kfail gdb/NNNN $test
|
|
||||||
+ } else {
|
|
||||||
+ fail $test
|
|
||||||
+ }
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+func_check 0x0 "lxvd2x vs3,r4,r5"
|
|
||||||
+# [PATCH] Remove support for POWER7 VSX load/store with update instructions
|
|
||||||
+# http://sourceware.org/ml/binutils/2009-09/msg00680.html
|
|
||||||
+# http://sourceware.org/ml/binutils-cvs/2009-09/msg00331.html
|
|
||||||
+func_check 0x4 "lxvb16x vs3,r4,r5"
|
|
||||||
+func_check 0x8 "lxvd2x vs43,r4,r5"
|
|
||||||
+func_check 0xc "lxvb16x vs43,r4,r5"
|
|
||||||
+func_check 0x10 "stxvd2x vs3,r4,r5"
|
|
||||||
+func_check 0x14 "stxvb16x vs3,r4,r5"
|
|
||||||
+func_check 0x18 "stxvd2x vs43,r4,r5"
|
|
||||||
+func_check 0x1c "stxvb16x vs43,r4,r5"
|
|
||||||
+func_check 0x20 "xxmrghd vs3,vs4,vs5"
|
|
||||||
+func_check 0x24 "xxmrghd vs43,vs44,vs45"
|
|
||||||
+func_check 0x28 "xxmrgld vs3,vs4,vs5"
|
|
||||||
+func_check 0x2c "xxmrgld vs43,vs44,vs45"
|
|
||||||
+func_check 0x30 "xxmrghd vs3,vs4,vs5"
|
|
||||||
+func_check 0x34 "xxmrghd vs43,vs44,vs45"
|
|
||||||
+func_check 0x38 "xxmrgld vs3,vs4,vs5"
|
|
||||||
+func_check 0x3c "xxmrgld vs43,vs44,vs45"
|
|
||||||
+func_check 0x40 "xxpermdi vs3,vs4,vs5,1"
|
|
||||||
+func_check 0x44 "xxpermdi vs43,vs44,vs45,1"
|
|
||||||
+func_check 0x48 "xxpermdi vs3,vs4,vs5,2"
|
|
||||||
+func_check 0x4c "xxpermdi vs43,vs44,vs45,2"
|
|
||||||
+func_check 0x50 "xvmovdp vs3,vs4"
|
|
||||||
+func_check 0x54 "xvmovdp vs43,vs44"
|
|
||||||
+func_check 0x58 "xvmovdp vs3,vs4"
|
|
||||||
+func_check 0x5c "xvmovdp vs43,vs44"
|
|
||||||
+func_check 0x60 "xvcpsgndp vs3,vs4,vs5"
|
|
||||||
+func_check 0x64 "xvcpsgndp vs43,vs44,vs45"
|
|
||||||
+func_check 0x68 "wait"
|
|
||||||
+func_check 0x6c "wait"
|
|
||||||
+func_check 0x70 "waitrsv"
|
|
||||||
+func_check 0x74 "waitrsv"
|
|
||||||
+func_check 0x78 "waitimpl"
|
|
||||||
+func_check 0x7c "waitimpl"
|
|
||||||
+func_check 0x80 "doze"
|
|
||||||
+func_check 0x84 "nap"
|
|
||||||
+func_check 0x88 "sleep"
|
|
||||||
+func_check 0x8c "rvwinkle"
|
|
||||||
+func_check 0x90 "prtyw r3,r4"
|
|
||||||
+func_check 0x94 "prtyd r13,r14"
|
|
||||||
+func_check 0x98 "mfcfar r10" "mfspr r10,28"
|
|
||||||
+func_check 0x9c "mtcfar r11" "mtspr 28,r11"
|
|
||||||
+func_check 0xa0 "cmpb r3,r4,r5"
|
|
||||||
+func_check 0xa4 "lwzcix r10,r11,r12"
|
|
||||||
+func_check 0xa8 "dadd f16,f17,f18"
|
|
||||||
+func_check 0xac "daddq f20,f22,f24"
|
|
||||||
+func_check 0xb0 "dss 3"
|
|
||||||
+func_check 0xb4 "dssall"
|
|
||||||
+func_check 0xb8 "dst r5,r4,1"
|
|
||||||
+func_check 0xbc "dstt r8,r7,0"
|
|
||||||
+func_check 0xc0 "dstst r5,r6,3"
|
|
||||||
+func_check 0xc4 "dststt r4,r5,2"
|
|
||||||
+func_check 0xc8 "divwe r10,r11,r12"
|
|
||||||
+func_check 0xcc "divwe. r11,r12,r13"
|
|
||||||
+func_check 0xd0 "divweo r12,r13,r14"
|
|
||||||
+func_check 0xd4 "divweo. r13,r14,r15"
|
|
||||||
+func_check 0xd8 "divweu r10,r11,r12"
|
|
||||||
+func_check 0xdc "divweu. r11,r12,r13"
|
|
||||||
+func_check 0xe0 "divweuo r12,r13,r14"
|
|
||||||
+func_check 0xe4 "divweuo. r13,r14,r15"
|
|
||||||
+func_check 0xe8 "bpermd r7,r17,r27"
|
|
||||||
+func_check 0xec "popcntw r10,r20"
|
|
||||||
+func_check 0xf0 "popcntd r10,r20"
|
|
||||||
+func_check 0xf4 "ldbrx r20,r21,r22"
|
|
||||||
+func_check 0xf8 "stdbrx r20,r21,r22"
|
|
||||||
+func_check 0xfc "lfiwzx f10,0,r10"
|
|
||||||
+func_check 0x100 "lfiwzx f10,r9,r10"
|
|
||||||
+func_check 0x104 "fcfids f4,f5"
|
|
||||||
+func_check 0x108 "fcfids. f4,f5"
|
|
||||||
+func_check 0x10c "fcfidus f4,f5"
|
|
||||||
+func_check 0x110 "fcfidus. f4,f5"
|
|
||||||
+func_check 0x114 "fctiwu f4,f5"
|
|
||||||
+func_check 0x118 "fctiwu. f4,f5"
|
|
||||||
+func_check 0x11c "fctiwuz f4,f5"
|
|
||||||
+func_check 0x120 "fctiwuz. f4,f5"
|
|
||||||
+func_check 0x124 "fctidu f4,f5"
|
|
||||||
+func_check 0x128 "fctidu. f4,f5"
|
|
||||||
+func_check 0x12c "fctiduz f4,f5"
|
|
||||||
+func_check 0x130 "fctiduz. f4,f5"
|
|
||||||
+func_check 0x134 "fcfidu f4,f5"
|
|
||||||
+func_check 0x138 "fcfidu. f4,f5"
|
|
||||||
+func_check 0x13c "ftdiv cr0,f10,f11"
|
|
||||||
+func_check 0x140 "ftdiv cr7,f10,f11"
|
|
||||||
+func_check 0x144 "ftsqrt cr0,f10"
|
|
||||||
+func_check 0x148 "ftsqrt cr7,f10"
|
|
||||||
+func_check 0x14c "dcbtt r8,r9" "dcbt 16,r8,r9"
|
|
||||||
+func_check 0x150 "dcbtstt r8,r9" "dcbtst 16,r8,r9"
|
|
||||||
+func_check 0x154 "dcffix f10,f12"
|
|
||||||
+func_check 0x158 "dcffix. f20,f22"
|
|
||||||
+func_check 0x15c "lbarx r10,r11,r12"
|
|
||||||
+func_check 0x160 "lbarx r10,r11,r12"
|
|
||||||
+func_check 0x164 "lbarx r10,r11,r12,1"
|
|
||||||
+func_check 0x168 "lharx r20,r21,r22"
|
|
||||||
+func_check 0x16c "lharx r20,r21,r22"
|
|
||||||
+func_check 0x170 "lharx r20,r21,r22,1"
|
|
||||||
+func_check 0x174 "stbcx. r10,r11,r12"
|
|
||||||
+func_check 0x178 "sthcx. r10,r11,r12"
|
|
||||||
+func_check 0x17c "fre f14,f15"
|
|
||||||
+func_check 0x180 "fre. f14,f15"
|
|
||||||
+func_check 0x184 "fres f14,f15"
|
|
||||||
+func_check 0x188 "fres. f14,f15"
|
|
||||||
+func_check 0x18c "frsqrte f14,f15"
|
|
||||||
+func_check 0x190 "frsqrte. f14,f15"
|
|
||||||
+func_check 0x194 "frsqrtes f14,f15"
|
|
||||||
+func_check 0x198 "frsqrtes. f14,f15"
|
|
||||||
+func_check 0x19c "isel r2,r3,r4,28"
|
|
||||||
diff --git a/gdb/testsuite/gdb.arch/powerpc-power7rh.s b/gdb/testsuite/gdb.arch/powerpc-power7rh.s
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.arch/powerpc-power7rh.s
|
|
||||||
@@ -0,0 +1,107 @@
|
|
||||||
+ .text
|
|
||||||
+ .globl func
|
|
||||||
+func:
|
|
||||||
+ .long 0x7c642e98 /* 0: lxvd2x vs3,r4,r5 */
|
|
||||||
+ .long 0x7c642ed8 /* 4: lxvd2ux vs3,r4,r5 */
|
|
||||||
+ .long 0x7d642e99 /* 8: lxvd2x vs43,r4,r5 */
|
|
||||||
+ .long 0x7d642ed9 /* c: lxvd2ux vs43,r4,r5 */
|
|
||||||
+ .long 0x7c642f98 /* 10: stxvd2x vs3,r4,r5 */
|
|
||||||
+ .long 0x7c642fd8 /* 14: stxvd2ux vs3,r4,r5 */
|
|
||||||
+ .long 0x7d642f99 /* 18: stxvd2x vs43,r4,r5 */
|
|
||||||
+ .long 0x7d642fd9 /* 1c: stxvd2ux vs43,r4,r5 */
|
|
||||||
+ .long 0xf0642850 /* 20: xxmrghd vs3,vs4,vs5 */
|
|
||||||
+ .long 0xf16c6857 /* 24: xxmrghd vs43,vs44,vs45 */
|
|
||||||
+ .long 0xf0642b50 /* 28: xxmrgld vs3,vs4,vs5 */
|
|
||||||
+ .long 0xf16c6b57 /* 2c: xxmrgld vs43,vs44,vs45 */
|
|
||||||
+ .long 0xf0642850 /* 30: xxmrghd vs3,vs4,vs5 */
|
|
||||||
+ .long 0xf16c6857 /* 34: xxmrghd vs43,vs44,vs45 */
|
|
||||||
+ .long 0xf0642b50 /* 38: xxmrgld vs3,vs4,vs5 */
|
|
||||||
+ .long 0xf16c6b57 /* 3c: xxmrgld vs43,vs44,vs45 */
|
|
||||||
+ .long 0xf0642950 /* 40: xxpermdi vs3,vs4,vs5,1 */
|
|
||||||
+ .long 0xf16c6957 /* 44: xxpermdi vs43,vs44,vs45,1 */
|
|
||||||
+ .long 0xf0642a50 /* 48: xxpermdi vs3,vs4,vs5,2 */
|
|
||||||
+ .long 0xf16c6a57 /* 4c: xxpermdi vs43,vs44,vs45,2 */
|
|
||||||
+ .long 0xf0642780 /* 50: xvmovdp vs3,vs4 */
|
|
||||||
+ .long 0xf16c6787 /* 54: xvmovdp vs43,vs44 */
|
|
||||||
+ .long 0xf0642780 /* 58: xvmovdp vs3,vs4 */
|
|
||||||
+ .long 0xf16c6787 /* 5c: xvmovdp vs43,vs44 */
|
|
||||||
+ .long 0xf0642f80 /* 60: xvcpsgndp vs3,vs4,vs5 */
|
|
||||||
+ .long 0xf16c6f87 /* 64: xvcpsgndp vs43,vs44,vs45 */
|
|
||||||
+ .long 0x7c00007c /* 68: wait */
|
|
||||||
+ .long 0x7c00007c /* 6c: wait */
|
|
||||||
+ .long 0x7c20007c /* 70: waitrsv */
|
|
||||||
+ .long 0x7c20007c /* 74: waitrsv */
|
|
||||||
+ .long 0x7c40007c /* 78: waitimpl */
|
|
||||||
+ .long 0x7c40007c /* 7c: waitimpl */
|
|
||||||
+ .long 0x4c000324 /* 80: doze */
|
|
||||||
+ .long 0x4c000364 /* 84: nap */
|
|
||||||
+ .long 0x4c0003a4 /* 88: sleep */
|
|
||||||
+ .long 0x4c0003e4 /* 8c: rvwinkle */
|
|
||||||
+ .long 0x7c830134 /* 90: prtyw r3,r4 */
|
|
||||||
+ .long 0x7dcd0174 /* 94: prtyd r13,r14 */
|
|
||||||
+ .long 0x7d5c02a6 /* 98: mfcfar r10 */
|
|
||||||
+ .long 0x7d7c03a6 /* 9c: mtcfar r11 */
|
|
||||||
+ .long 0x7c832bf8 /* a0: cmpb r3,r4,r5 */
|
|
||||||
+ .long 0x7d4b662a /* a4: lwzcix r10,r11,r12 */
|
|
||||||
+ .long 0xee119004 /* a8: dadd f16,f17,f18 */
|
|
||||||
+ .long 0xfe96c004 /* ac: daddq f20,f22,f24 */
|
|
||||||
+ .long 0x7c60066c /* b0: dss 3 */
|
|
||||||
+ .long 0x7e00066c /* b4: dssall */
|
|
||||||
+ .long 0x7c2522ac /* b8: dst r5,r4,1 */
|
|
||||||
+ .long 0x7e083aac /* bc: dstt r8,r7,0 */
|
|
||||||
+ .long 0x7c6532ec /* c0: dstst r5,r6,3 */
|
|
||||||
+ .long 0x7e442aec /* c4: dststt r4,r5,2 */
|
|
||||||
+ .long 0x7d4b6356 /* c8: divwe r10,r11,r12 */
|
|
||||||
+ .long 0x7d6c6b57 /* cc: divwe. r11,r12,r13 */
|
|
||||||
+ .long 0x7d8d7756 /* d0: divweo r12,r13,r14 */
|
|
||||||
+ .long 0x7dae7f57 /* d4: divweo. r13,r14,r15 */
|
|
||||||
+ .long 0x7d4b6316 /* d8: divweu r10,r11,r12 */
|
|
||||||
+ .long 0x7d6c6b17 /* dc: divweu. r11,r12,r13 */
|
|
||||||
+ .long 0x7d8d7716 /* e0: divweuo r12,r13,r14 */
|
|
||||||
+ .long 0x7dae7f17 /* e4: divweuo. r13,r14,r15 */
|
|
||||||
+ .long 0x7e27d9f8 /* e8: bpermd r7,r17,r27 */
|
|
||||||
+ .long 0x7e8a02f4 /* ec: popcntw r10,r20 */
|
|
||||||
+ .long 0x7e8a03f4 /* f0: popcntd r10,r20 */
|
|
||||||
+ .long 0x7e95b428 /* f4: ldbrx r20,r21,r22 */
|
|
||||||
+ .long 0x7e95b528 /* f8: stdbrx r20,r21,r22 */
|
|
||||||
+ .long 0x7d4056ee /* fc: lfiwzx f10,0,r10 */
|
|
||||||
+ .long 0x7d4956ee /* 100: lfiwzx f10,r9,r10 */
|
|
||||||
+ .long 0xec802e9c /* 104: fcfids f4,f5 */
|
|
||||||
+ .long 0xec802e9d /* 108: fcfids. f4,f5 */
|
|
||||||
+ .long 0xec802f9c /* 10c: fcfidus f4,f5 */
|
|
||||||
+ .long 0xec802f9d /* 110: fcfidus. f4,f5 */
|
|
||||||
+ .long 0xfc80291c /* 114: fctiwu f4,f5 */
|
|
||||||
+ .long 0xfc80291d /* 118: fctiwu. f4,f5 */
|
|
||||||
+ .long 0xfc80291e /* 11c: fctiwuz f4,f5 */
|
|
||||||
+ .long 0xfc80291f /* 120: fctiwuz. f4,f5 */
|
|
||||||
+ .long 0xfc802f5c /* 124: fctidu f4,f5 */
|
|
||||||
+ .long 0xfc802f5d /* 128: fctidu. f4,f5 */
|
|
||||||
+ .long 0xfc802f5e /* 12c: fctiduz f4,f5 */
|
|
||||||
+ .long 0xfc802f5f /* 130: fctiduz. f4,f5 */
|
|
||||||
+ .long 0xfc802f9c /* 134: fcfidu f4,f5 */
|
|
||||||
+ .long 0xfc802f9d /* 138: fcfidu. f4,f5 */
|
|
||||||
+ .long 0xfc0a5900 /* 13c: ftdiv cr0,f10,f11 */
|
|
||||||
+ .long 0xff8a5900 /* 140: ftdiv cr7,f10,f11 */
|
|
||||||
+ .long 0xfc005140 /* 144: ftsqrt cr0,f10 */
|
|
||||||
+ .long 0xff805140 /* 148: ftsqrt cr7,f10 */
|
|
||||||
+ .long 0x7e084a2c /* 14c: dcbtt r8,r9 */
|
|
||||||
+ .long 0x7e0849ec /* 150: dcbtstt r8,r9 */
|
|
||||||
+ .long 0xed406644 /* 154: dcffix f10,f12 */
|
|
||||||
+ .long 0xee80b645 /* 158: dcffix. f20,f22 */
|
|
||||||
+ .long 0x7d4b6068 /* 15c: lbarx r10,r11,r12 */
|
|
||||||
+ .long 0x7d4b6068 /* 160: lbarx r10,r11,r12 */
|
|
||||||
+ .long 0x7d4b6069 /* 164: lbarx r10,r11,r12,1 */
|
|
||||||
+ .long 0x7e95b0e8 /* 168: lharx r20,r21,r22 */
|
|
||||||
+ .long 0x7e95b0e8 /* 16c: lharx r20,r21,r22 */
|
|
||||||
+ .long 0x7e95b0e9 /* 170: lharx r20,r21,r22,1 */
|
|
||||||
+ .long 0x7d4b656d /* 174: stbcx. r10,r11,r12 */
|
|
||||||
+ .long 0x7d4b65ad /* 178: sthcx. r10,r11,r12 */
|
|
||||||
+ .long 0xfdc07830 /* 17c: fre f14,f15 */
|
|
||||||
+ .long 0xfdc07831 /* 180: fre. f14,f15 */
|
|
||||||
+ .long 0xedc07830 /* 184: fres f14,f15 */
|
|
||||||
+ .long 0xedc07831 /* 188: fres. f14,f15 */
|
|
||||||
+ .long 0xfdc07834 /* 18c: frsqrte f14,f15 */
|
|
||||||
+ .long 0xfdc07835 /* 190: frsqrte. f14,f15 */
|
|
||||||
+ .long 0xedc07834 /* 194: frsqrtes f14,f15 */
|
|
||||||
+ .long 0xedc07835 /* 198: frsqrtes. f14,f15 */
|
|
||||||
+ .long 0x7c43271e /* 19c: isel r2,r3,r4,28 */
|
|
@ -1,241 +0,0 @@
|
|||||||
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-python-gil.patch
|
|
||||||
|
|
||||||
;; Fix Python GIL with gdb.execute("continue") (Phil Muldoon, BZ 1116957).
|
|
||||||
;;=push
|
|
||||||
|
|
||||||
diff --git a/gdb/doc/python.texi b/gdb/doc/python.texi
|
|
||||||
--- a/gdb/doc/python.texi
|
|
||||||
+++ b/gdb/doc/python.texi
|
|
||||||
@@ -232,6 +232,14 @@ returned as a string. The default is @code{False}, in which case the
|
|
||||||
return value is @code{None}. If @var{to_string} is @code{True}, the
|
|
||||||
@value{GDBN} virtual terminal will be temporarily set to unlimited width
|
|
||||||
and height, and its pagination will be disabled; @pxref{Screen Size}.
|
|
||||||
+
|
|
||||||
+The @var{release_gil} flag specifies whether @value{GDBN} ought to
|
|
||||||
+release the Python GIL before executing the command. This is useful
|
|
||||||
+in multi-threaded Python programs where by default the Python
|
|
||||||
+interpreter will acquire the GIL and lock other threads from
|
|
||||||
+executing. After the command has completed executing in @value{GDBN}
|
|
||||||
+the Python GIL is reacquired. This flag must be a boolean value. If
|
|
||||||
+omitted, it defaults to @code{False}.
|
|
||||||
@end defun
|
|
||||||
|
|
||||||
@findex gdb.breakpoints
|
|
||||||
diff --git a/gdb/python/python-internal.h b/gdb/python/python-internal.h
|
|
||||||
--- a/gdb/python/python-internal.h
|
|
||||||
+++ b/gdb/python/python-internal.h
|
|
||||||
@@ -148,6 +148,8 @@ typedef int Py_ssize_t;
|
|
||||||
#define PyGILState_Release(ARG) ((void)(ARG))
|
|
||||||
#define PyEval_InitThreads()
|
|
||||||
#define PyThreadState_Swap(ARG) ((void)(ARG))
|
|
||||||
+#define PyEval_SaveThread() ((void)(ARG))
|
|
||||||
+#define PyEval_RestoreThread(ARG) ((void)(ARG))
|
|
||||||
#define PyEval_ReleaseLock()
|
|
||||||
#endif
|
|
||||||
|
|
||||||
diff --git a/gdb/python/python.c b/gdb/python/python.c
|
|
||||||
--- a/gdb/python/python.c
|
|
||||||
+++ b/gdb/python/python.c
|
|
||||||
@@ -556,12 +556,16 @@ execute_gdb_command (PyObject *self, PyObject *args, PyObject *kw)
|
|
||||||
{
|
|
||||||
const char *arg;
|
|
||||||
PyObject *from_tty_obj = NULL, *to_string_obj = NULL;
|
|
||||||
- int from_tty, to_string;
|
|
||||||
- static const char *keywords[] = { "command", "from_tty", "to_string", NULL };
|
|
||||||
+ int from_tty, to_string, release_gil;
|
|
||||||
+ static const char *keywords[] = {"command", "from_tty", "to_string", "release_gil", NULL };
|
|
||||||
+ PyObject *release_gil_obj = NULL;
|
|
||||||
+ /* Initialize it just to avoid a GCC false warning. */
|
|
||||||
+ PyThreadState *state = NULL;
|
|
||||||
|
|
||||||
- if (!gdb_PyArg_ParseTupleAndKeywords (args, kw, "s|O!O!", keywords, &arg,
|
|
||||||
+ if (!gdb_PyArg_ParseTupleAndKeywords (args, kw, "s|O!O!O!", keywords, &arg,
|
|
||||||
&PyBool_Type, &from_tty_obj,
|
|
||||||
- &PyBool_Type, &to_string_obj))
|
|
||||||
+ &PyBool_Type, &to_string_obj,
|
|
||||||
+ &PyBool_Type, &release_gil_obj))
|
|
||||||
return NULL;
|
|
||||||
|
|
||||||
from_tty = 0;
|
|
||||||
@@ -582,6 +586,15 @@ execute_gdb_command (PyObject *self, PyObject *args, PyObject *kw)
|
|
||||||
to_string = cmp;
|
|
||||||
}
|
|
||||||
|
|
||||||
+ release_gil = 0;
|
|
||||||
+ if (release_gil_obj)
|
|
||||||
+ {
|
|
||||||
+ int cmp = PyObject_IsTrue (release_gil_obj);
|
|
||||||
+ if (cmp < 0)
|
|
||||||
+ return NULL;
|
|
||||||
+ release_gil = cmp;
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
std::string to_string_res;
|
|
||||||
|
|
||||||
TRY
|
|
||||||
@@ -602,6 +615,13 @@ execute_gdb_command (PyObject *self, PyObject *args, PyObject *kw)
|
|
||||||
|
|
||||||
counted_command_line lines = read_command_lines_1 (reader, 1, nullptr);
|
|
||||||
|
|
||||||
+ /* In the case of long running GDB commands, allow the user to
|
|
||||||
+ release the Python GIL acquired by Python. Restore the GIL
|
|
||||||
+ after the command has completed before handing back to
|
|
||||||
+ Python. */
|
|
||||||
+ if (release_gil)
|
|
||||||
+ state = PyEval_SaveThread();
|
|
||||||
+
|
|
||||||
scoped_restore save_async = make_scoped_restore (¤t_ui->async, 0);
|
|
||||||
|
|
||||||
scoped_restore save_uiout = make_scoped_restore (¤t_uiout);
|
|
||||||
@@ -617,10 +637,22 @@ execute_gdb_command (PyObject *self, PyObject *args, PyObject *kw)
|
|
||||||
from_tty);
|
|
||||||
else
|
|
||||||
execute_control_commands (lines.get (), from_tty);
|
|
||||||
+
|
|
||||||
+ /* Reacquire the GIL if it was released earlier. */
|
|
||||||
+ if (release_gil)
|
|
||||||
+ PyEval_RestoreThread (state);
|
|
||||||
}
|
|
||||||
CATCH (except, RETURN_MASK_ALL)
|
|
||||||
{
|
|
||||||
- GDB_PY_HANDLE_EXCEPTION (except);
|
|
||||||
+ if (except.reason < 0)
|
|
||||||
+ {
|
|
||||||
+ /* Reacquire the GIL if it was released earlier. */
|
|
||||||
+ if (release_gil)
|
|
||||||
+ PyEval_RestoreThread (state);
|
|
||||||
+
|
|
||||||
+ gdbpy_convert_exception (except);
|
|
||||||
+ return NULL;
|
|
||||||
+ }
|
|
||||||
}
|
|
||||||
END_CATCH
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.python/py-gil-mthread.c b/gdb/testsuite/gdb.python/py-gil-mthread.c
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.python/py-gil-mthread.c
|
|
||||||
@@ -0,0 +1,13 @@
|
|
||||||
+#include <stdio.h>
|
|
||||||
+#include <unistd.h>
|
|
||||||
+
|
|
||||||
+int
|
|
||||||
+main (void)
|
|
||||||
+{
|
|
||||||
+ int i;
|
|
||||||
+ for (i = 0; i < 10; i++)
|
|
||||||
+ {
|
|
||||||
+ sleep (1); /* break-here */
|
|
||||||
+ printf ("Sleeping %d\n", i);
|
|
||||||
+ }
|
|
||||||
+}
|
|
||||||
diff --git a/gdb/testsuite/gdb.python/py-gil-mthread.exp b/gdb/testsuite/gdb.python/py-gil-mthread.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.python/py-gil-mthread.exp
|
|
||||||
@@ -0,0 +1,69 @@
|
|
||||||
+# Copyright (C) 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 .c .py
|
|
||||||
+set executable $testfile
|
|
||||||
+
|
|
||||||
+if { [prepare_for_testing $testfile.exp $executable $srcfile] } {
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Skip all tests if Python scripting is not enabled.
|
|
||||||
+if { [skip_python_tests] } { continue }
|
|
||||||
+
|
|
||||||
+if ![runto_main] {
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+gdb_breakpoint $srcfile:[gdb_get_line_number "break-here"] temporary
|
|
||||||
+gdb_continue_to_breakpoint "break-here" ".* break-here .*"
|
|
||||||
+
|
|
||||||
+set test "response"
|
|
||||||
+set timeout 60
|
|
||||||
+set sleeping_last -1
|
|
||||||
+set hello_last 0
|
|
||||||
+set minimal 5
|
|
||||||
+gdb_test_multiple "python exec (open ('$srcdir/$subdir/$srcfile2').read ())" $test {
|
|
||||||
+ -re "Error: unable to start thread\r\n" {
|
|
||||||
+ fail $test
|
|
||||||
+ # Not $gdb_prompt-synced!
|
|
||||||
+ }
|
|
||||||
+ -re "Sleeping (\[0-9\]+)\r\n" {
|
|
||||||
+ set n $expect_out(1,string)
|
|
||||||
+ if { $sleeping_last + 1 != $n } {
|
|
||||||
+ fail $test
|
|
||||||
+ } else {
|
|
||||||
+ set sleeping_last $n
|
|
||||||
+ if { $sleeping_last >= $minimal && $hello_last >= $minimal } {
|
|
||||||
+ pass $test
|
|
||||||
+ } else {
|
|
||||||
+ exp_continue
|
|
||||||
+ }
|
|
||||||
+ }
|
|
||||||
+ }
|
|
||||||
+ -re "Hello \\( (\[0-9\]+) \\)\r\n" {
|
|
||||||
+ set n $expect_out(1,string)
|
|
||||||
+ if { $hello_last + 1 != $n } {
|
|
||||||
+ fail $test
|
|
||||||
+ } else {
|
|
||||||
+ set hello_last $n
|
|
||||||
+ if { $sleeping_last >= $minimal && $hello_last >= $minimal } {
|
|
||||||
+ pass $test
|
|
||||||
+ } else {
|
|
||||||
+ exp_continue
|
|
||||||
+ }
|
|
||||||
+ }
|
|
||||||
+ }
|
|
||||||
+}
|
|
||||||
diff --git a/gdb/testsuite/gdb.python/py-gil-mthread.py b/gdb/testsuite/gdb.python/py-gil-mthread.py
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.python/py-gil-mthread.py
|
|
||||||
@@ -0,0 +1,28 @@
|
|
||||||
+try:
|
|
||||||
+ import thread
|
|
||||||
+except:
|
|
||||||
+ import _thread
|
|
||||||
+import time
|
|
||||||
+import gdb
|
|
||||||
+
|
|
||||||
+# Define a function for the thread
|
|
||||||
+def print_thread_hello():
|
|
||||||
+ count = 0
|
|
||||||
+ while count < 10:
|
|
||||||
+ time.sleep(1)
|
|
||||||
+ count += 1
|
|
||||||
+ print ("Hello ( %d )" % count)
|
|
||||||
+
|
|
||||||
+# Create a threads a continue
|
|
||||||
+try:
|
|
||||||
+ thread.start_new_thread (print_thread_hello, ())
|
|
||||||
+ gdb.execute ("continue", release_gil=True)
|
|
||||||
+except:
|
|
||||||
+ try:
|
|
||||||
+ _thread.start_new_thread (print_thread_hello, ())
|
|
||||||
+ gdb.execute ("continue", release_gil=True)
|
|
||||||
+ except:
|
|
||||||
+ print ("Error: unable to start thread")
|
|
||||||
+
|
|
||||||
+while 1:
|
|
||||||
+ pass
|
|
@ -1,25 +0,0 @@
|
|||||||
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-readline62-ask-more-rh.patch
|
|
||||||
|
|
||||||
;; Work around readline-6.2 incompatibility not asking for --more-- (BZ 701131).
|
|
||||||
;;=fedora
|
|
||||||
|
|
||||||
diff --git a/gdb/event-top.c b/gdb/event-top.c
|
|
||||||
--- a/gdb/event-top.c
|
|
||||||
+++ b/gdb/event-top.c
|
|
||||||
@@ -1183,6 +1183,13 @@ gdb_setup_readline (int editing)
|
|
||||||
{
|
|
||||||
struct ui *ui = current_ui;
|
|
||||||
|
|
||||||
+#ifdef NEED_RL_STATE_FEDORA_GDB
|
|
||||||
+ /* 6.2 regression: no longed asks for --more--
|
|
||||||
+ gdb.base/readline-ask.exp
|
|
||||||
+ https://bugzilla.redhat.com/show_bug.cgi?id=701131 */
|
|
||||||
+ RL_SETSTATE (RL_STATE_FEDORA_GDB);
|
|
||||||
+#endif
|
|
||||||
+
|
|
||||||
/* This function is a noop for the sync case. The assumption is
|
|
||||||
that the sync setup is ALL done in gdb_init, and we would only
|
|
||||||
mess it up here. The sync stuff should really go away over
|
|
@ -1,135 +0,0 @@
|
|||||||
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-rhbz1186476-internal-error-unqualified-name-re-set-test.patch
|
|
||||||
|
|
||||||
;; Fix 'backport GDB 7.4 fix to RHEL 6.6 GDB' [Original Sourceware bug
|
|
||||||
;; description: 'C++ (and objc): Internal error on unqualified name
|
|
||||||
;; re-set', PR 11657] (RH BZ 1186476).
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
Comments from Sergio Durigan Junior:
|
|
||||||
|
|
||||||
The "proper" fix for this whole problem would be to backport the
|
|
||||||
"ambiguous linespec" patch series. However, it is really not
|
|
||||||
recommended to do that for RHEL GDB, because the patch series is too
|
|
||||||
big and could introduce unwanted regressions. Instead, what we
|
|
||||||
chose to do was to replace the gdb_assert call by a warning (which
|
|
||||||
allows the user to continue the debugging session), and tell the
|
|
||||||
user that, although more than one location was found for his/her
|
|
||||||
breakpoint, only one will be used.
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.cp/gdb-rhbz1186476-internal-error-unqualified-name-re-set-main.cc b/gdb/testsuite/gdb.cp/gdb-rhbz1186476-internal-error-unqualified-name-re-set-main.cc
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.cp/gdb-rhbz1186476-internal-error-unqualified-name-re-set-main.cc
|
|
||||||
@@ -0,0 +1,22 @@
|
|
||||||
+/* 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/>. */
|
|
||||||
+
|
|
||||||
+int
|
|
||||||
+main (int argc, char *argv[])
|
|
||||||
+{
|
|
||||||
+ return 0;
|
|
||||||
+}
|
|
||||||
diff --git a/gdb/testsuite/gdb.cp/gdb-rhbz1186476-internal-error-unqualified-name-re-set.cc b/gdb/testsuite/gdb.cp/gdb-rhbz1186476-internal-error-unqualified-name-re-set.cc
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.cp/gdb-rhbz1186476-internal-error-unqualified-name-re-set.cc
|
|
||||||
@@ -0,0 +1,26 @@
|
|
||||||
+/* 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/>. */
|
|
||||||
+
|
|
||||||
+class C
|
|
||||||
+ {
|
|
||||||
+ public:
|
|
||||||
+ C () {}
|
|
||||||
+ C (int x) {}
|
|
||||||
+ };
|
|
||||||
+
|
|
||||||
+C a;
|
|
||||||
+C b (1);
|
|
||||||
diff --git a/gdb/testsuite/gdb.cp/gdb-rhbz1186476-internal-error-unqualified-name-re-set.exp b/gdb/testsuite/gdb.cp/gdb-rhbz1186476-internal-error-unqualified-name-re-set.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.cp/gdb-rhbz1186476-internal-error-unqualified-name-re-set.exp
|
|
||||||
@@ -0,0 +1,51 @@
|
|
||||||
+# 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/>.
|
|
||||||
+
|
|
||||||
+if { [skip_cplus_tests] } { continue }
|
|
||||||
+if { [skip_shlib_tests] } { continue }
|
|
||||||
+if { [is_remote target] } { continue }
|
|
||||||
+if { [target_info exists use_gdb_stub] } { continue }
|
|
||||||
+
|
|
||||||
+set testfile gdb-rhbz1186476-internal-error-unqualified-name-re-set-main
|
|
||||||
+set srcfile $testfile.cc
|
|
||||||
+set executable $testfile
|
|
||||||
+set binfile [standard_output_file $executable]
|
|
||||||
+
|
|
||||||
+set libtestfile gdb-rhbz1186476-internal-error-unqualified-name-re-set
|
|
||||||
+set libsrcfile $libtestfile.cc
|
|
||||||
+set sofile [standard_output_file lib$libtestfile.so]
|
|
||||||
+
|
|
||||||
+# Create and source the file that provides information about the compiler
|
|
||||||
+# used to compile the test case.
|
|
||||||
+if [get_compiler_info "c++"] {
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+if { [gdb_compile_shlib $srcdir/$subdir/$libsrcfile $sofile {debug c++ "additional_flags=-fPIC"}] != ""
|
|
||||||
+ || [gdb_compile $srcdir/$subdir/$srcfile $binfile executable [list additional_flags=-Wl,-rpath,[file dirname ${sofile}] "c++" shlib=${sofile} ]] != ""} {
|
|
||||||
+ untested $libtestfile.exp
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+clean_restart $executable
|
|
||||||
+
|
|
||||||
+gdb_test_no_output "set breakpoint pending on"
|
|
||||||
+# gdb_breakpoint would print a failure because of some warning messages
|
|
||||||
+gdb_test "break C::C" "Breakpoint $decimal \\(C::C\\) pending."
|
|
||||||
+
|
|
||||||
+#gdb_test "run" "warning: Found more than one location for breakpoint #$decimal; only the first location will be used.(\r\n)+Breakpoint $decimal, C::C.*"
|
|
||||||
+gdb_test "run"
|
|
||||||
+
|
|
||||||
+gdb_test "info break" " in C::C\\(\\) at .* in C::C\\(int\\) at .*"
|
|
@ -1,65 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
Date: Thu, 9 Aug 2018 17:09:48 +0200
|
|
||||||
Subject: gdb-rhbz1187581-power8-regs-1of7.patch
|
|
||||||
|
|
||||||
;; Add GDB support to access/display POWER8 registers (IBM, RH BZ 1187581).
|
|
||||||
|
|
||||||
commit 05abfc39c719e740530000059bb963ad33462479
|
|
||||||
Author: Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
Date: Mon Aug 6 16:24:55 2018 -0300
|
|
||||||
|
|
||||||
Fix indentation in remote_target::download_tracepoint
|
|
||||||
|
|
||||||
gdb/ChangeLog:
|
|
||||||
2018-08-06 Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
|
|
||||||
* remote.c (remote_target::download_tracepoint): Fix indentation
|
|
||||||
in for block.
|
|
||||||
|
|
||||||
diff --git a/gdb/remote.c b/gdb/remote.c
|
|
||||||
--- a/gdb/remote.c
|
|
||||||
+++ b/gdb/remote.c
|
|
||||||
@@ -12912,24 +12912,24 @@ remote_target::download_tracepoint (struct bp_location *loc)
|
|
||||||
error (_("Error on target while setting tracepoints."));
|
|
||||||
}
|
|
||||||
|
|
||||||
- for (auto action_it = stepping_actions.begin ();
|
|
||||||
- action_it != stepping_actions.end (); action_it++)
|
|
||||||
- {
|
|
||||||
- QUIT; /* Allow user to bail out with ^C. */
|
|
||||||
-
|
|
||||||
- bool is_first = action_it == stepping_actions.begin ();
|
|
||||||
- bool has_more = action_it != stepping_actions.end ();
|
|
||||||
-
|
|
||||||
- xsnprintf (buf, BUF_SIZE, "QTDP:-%x:%s:%s%s%s",
|
|
||||||
- b->number, addrbuf, /* address */
|
|
||||||
- is_first ? "S" : "",
|
|
||||||
- action_it->c_str (),
|
|
||||||
- has_more ? "-" : "");
|
|
||||||
- putpkt (buf);
|
|
||||||
- remote_get_noisy_reply ();
|
|
||||||
- if (strcmp (rs->buf, "OK"))
|
|
||||||
- error (_("Error on target while setting tracepoints."));
|
|
||||||
- }
|
|
||||||
+ for (auto action_it = stepping_actions.begin ();
|
|
||||||
+ action_it != stepping_actions.end (); action_it++)
|
|
||||||
+ {
|
|
||||||
+ QUIT; /* Allow user to bail out with ^C. */
|
|
||||||
+
|
|
||||||
+ bool is_first = action_it == stepping_actions.begin ();
|
|
||||||
+ bool has_more = action_it != stepping_actions.end ();
|
|
||||||
+
|
|
||||||
+ xsnprintf (buf, BUF_SIZE, "QTDP:-%x:%s:%s%s%s",
|
|
||||||
+ b->number, addrbuf, /* address */
|
|
||||||
+ is_first ? "S" : "",
|
|
||||||
+ action_it->c_str (),
|
|
||||||
+ has_more ? "-" : "");
|
|
||||||
+ putpkt (buf);
|
|
||||||
+ remote_get_noisy_reply ();
|
|
||||||
+ if (strcmp (rs->buf, "OK"))
|
|
||||||
+ error (_("Error on target while setting tracepoints."));
|
|
||||||
+ }
|
|
||||||
|
|
||||||
if (packet_support (PACKET_TracepointSource) == PACKET_ENABLE)
|
|
||||||
{
|
|
@ -1,45 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
Date: Thu, 9 Aug 2018 17:10:46 +0200
|
|
||||||
Subject: gdb-rhbz1187581-power8-regs-2of7.patch
|
|
||||||
|
|
||||||
;; Add GDB support to access/display POWER8 registers (IBM, RH BZ 1187581).
|
|
||||||
|
|
||||||
commit aa6f3694ce867884e43d1c0406c64df08ea24bd3
|
|
||||||
Author: Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
Date: Mon Aug 6 16:24:55 2018 -0300
|
|
||||||
|
|
||||||
Remove trailing '-' from the last QTDP action packet
|
|
||||||
|
|
||||||
The has_more predicate in remote_target::download_tracepoint always
|
|
||||||
evaluates to true, so the last action packet will be sent with a
|
|
||||||
trailing '-'. This patch changes the predicate to remove the last
|
|
||||||
trailing '-'.
|
|
||||||
|
|
||||||
gdb/ChangeLog:
|
|
||||||
2018-08-06 Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
|
|
||||||
* remote.c (remote_target::download_tracepoint): Fix the has_more
|
|
||||||
predicate in the QTDP action list iteration.
|
|
||||||
|
|
||||||
diff --git a/gdb/remote.c b/gdb/remote.c
|
|
||||||
--- a/gdb/remote.c
|
|
||||||
+++ b/gdb/remote.c
|
|
||||||
@@ -12899,7 +12899,7 @@ remote_target::download_tracepoint (struct bp_location *loc)
|
|
||||||
{
|
|
||||||
QUIT; /* Allow user to bail out with ^C. */
|
|
||||||
|
|
||||||
- bool has_more = (action_it != tdp_actions.end ()
|
|
||||||
+ bool has_more = ((action_it + 1) != tdp_actions.end ()
|
|
||||||
|| !stepping_actions.empty ());
|
|
||||||
|
|
||||||
xsnprintf (buf, BUF_SIZE, "QTDP:-%x:%s:%s%c",
|
|
||||||
@@ -12918,7 +12918,7 @@ remote_target::download_tracepoint (struct bp_location *loc)
|
|
||||||
QUIT; /* Allow user to bail out with ^C. */
|
|
||||||
|
|
||||||
bool is_first = action_it == stepping_actions.begin ();
|
|
||||||
- bool has_more = action_it != stepping_actions.end ();
|
|
||||||
+ bool has_more = (action_it + 1) != stepping_actions.end ();
|
|
||||||
|
|
||||||
xsnprintf (buf, BUF_SIZE, "QTDP:-%x:%s:%s%s%s",
|
|
||||||
b->number, addrbuf, /* address */
|
|
@ -1,258 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
Date: Thu, 9 Aug 2018 17:11:09 +0200
|
|
||||||
Subject: gdb-rhbz1187581-power8-regs-3of7.patch
|
|
||||||
|
|
||||||
;; Add GDB support to access/display POWER8 registers (IBM, RH BZ 1187581).
|
|
||||||
|
|
||||||
commit 3df3a985a475db004706d64f83d9085f99053611
|
|
||||||
Author: Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
Date: Mon Aug 6 16:24:55 2018 -0300
|
|
||||||
|
|
||||||
Use get_remote_packet_size in download_tracepoint
|
|
||||||
|
|
||||||
This patch changes the remote target to use the remote packet size to
|
|
||||||
build QTDP packets, and to check if there is enough room for the
|
|
||||||
packet.
|
|
||||||
|
|
||||||
I changed the function to raise an error if the packet is too small,
|
|
||||||
instead of aborting gdb (through xsnprintf). It isn't clear if gdb
|
|
||||||
will be in a consistent state with respect to the stub after this,
|
|
||||||
since it's possible that some packets will be sent but not others, and
|
|
||||||
there could be an incomplete tracepoint on the stub.
|
|
||||||
|
|
||||||
The char array used to build the packets is changed to a
|
|
||||||
gdb::char_vector and sized with the result from
|
|
||||||
get_remote_packet_size.
|
|
||||||
|
|
||||||
When checking if the buffer is large enough to hold the tracepoint
|
|
||||||
condition agent expression, the length of the expression is multiplied
|
|
||||||
by two, since it is encoded with two hex digits per expression
|
|
||||||
byte. For simplicity, I assume that the result won't overflow, which
|
|
||||||
can happen for very long condition expressions.
|
|
||||||
|
|
||||||
gdb/ChangeLog:
|
|
||||||
2018-08-06 Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
|
|
||||||
* remote.c (remote_target::download_tracepoint): Remove BUF_SIZE.
|
|
||||||
Replace array buf with gdb::char_vector buf, of size
|
|
||||||
get_remote_packet_size (). Replace references to buf and
|
|
||||||
BUF_SIZE to buf.data () and buf.size (). Replace strcpy, strcat
|
|
||||||
and xsnprintf with snprintf. Raise errors if the buffer is too
|
|
||||||
small.
|
|
||||||
|
|
||||||
diff --git a/gdb/remote.c b/gdb/remote.c
|
|
||||||
--- a/gdb/remote.c
|
|
||||||
+++ b/gdb/remote.c
|
|
||||||
@@ -12799,26 +12799,35 @@ remote_target::remote_download_command_source (int num, ULONGEST addr,
|
|
||||||
void
|
|
||||||
remote_target::download_tracepoint (struct bp_location *loc)
|
|
||||||
{
|
|
||||||
-#define BUF_SIZE 2048
|
|
||||||
-
|
|
||||||
CORE_ADDR tpaddr;
|
|
||||||
char addrbuf[40];
|
|
||||||
- char buf[BUF_SIZE];
|
|
||||||
std::vector<std::string> tdp_actions;
|
|
||||||
std::vector<std::string> stepping_actions;
|
|
||||||
char *pkt;
|
|
||||||
struct breakpoint *b = loc->owner;
|
|
||||||
struct tracepoint *t = (struct tracepoint *) b;
|
|
||||||
struct remote_state *rs = get_remote_state ();
|
|
||||||
+ int ret;
|
|
||||||
+ char *err_msg = _("Tracepoint packet too large for target.");
|
|
||||||
+ size_t size_left;
|
|
||||||
+
|
|
||||||
+ /* We use a buffer other than rs->buf because we'll build strings
|
|
||||||
+ across multiple statements, and other statements in between could
|
|
||||||
+ modify rs->buf. */
|
|
||||||
+ gdb::char_vector buf (get_remote_packet_size ());
|
|
||||||
|
|
||||||
encode_actions_rsp (loc, &tdp_actions, &stepping_actions);
|
|
||||||
|
|
||||||
tpaddr = loc->address;
|
|
||||||
sprintf_vma (addrbuf, tpaddr);
|
|
||||||
- xsnprintf (buf, BUF_SIZE, "QTDP:%x:%s:%c:%lx:%x", b->number,
|
|
||||||
- addrbuf, /* address */
|
|
||||||
- (b->enable_state == bp_enabled ? 'E' : 'D'),
|
|
||||||
- t->step_count, t->pass_count);
|
|
||||||
+ ret = snprintf (buf.data (), buf.size (), "QTDP:%x:%s:%c:%lx:%x",
|
|
||||||
+ b->number, addrbuf, /* address */
|
|
||||||
+ (b->enable_state == bp_enabled ? 'E' : 'D'),
|
|
||||||
+ t->step_count, t->pass_count);
|
|
||||||
+
|
|
||||||
+ if (ret < 0 || ret >= buf.size ())
|
|
||||||
+ error (err_msg);
|
|
||||||
+
|
|
||||||
/* Fast tracepoints are mostly handled by the target, but we can
|
|
||||||
tell the target how big of an instruction block should be moved
|
|
||||||
around. */
|
|
||||||
@@ -12830,8 +12839,15 @@ remote_target::download_tracepoint (struct bp_location *loc)
|
|
||||||
{
|
|
||||||
if (gdbarch_fast_tracepoint_valid_at (loc->gdbarch, tpaddr,
|
|
||||||
NULL))
|
|
||||||
- xsnprintf (buf + strlen (buf), BUF_SIZE - strlen (buf), ":F%x",
|
|
||||||
- gdb_insn_length (loc->gdbarch, tpaddr));
|
|
||||||
+ {
|
|
||||||
+ size_left = buf.size () - strlen (buf.data ());
|
|
||||||
+ ret = snprintf (buf.data () + strlen (buf.data ()),
|
|
||||||
+ size_left, ":F%x",
|
|
||||||
+ gdb_insn_length (loc->gdbarch, tpaddr));
|
|
||||||
+
|
|
||||||
+ if (ret < 0 || ret >= size_left)
|
|
||||||
+ error (err_msg);
|
|
||||||
+ }
|
|
||||||
else
|
|
||||||
/* If it passed validation at definition but fails now,
|
|
||||||
something is very wrong. */
|
|
||||||
@@ -12855,7 +12871,14 @@ remote_target::download_tracepoint (struct bp_location *loc)
|
|
||||||
struct static_tracepoint_marker marker;
|
|
||||||
|
|
||||||
if (target_static_tracepoint_marker_at (tpaddr, &marker))
|
|
||||||
- strcat (buf, ":S");
|
|
||||||
+ {
|
|
||||||
+ size_left = buf.size () - strlen (buf.data ());
|
|
||||||
+ ret = snprintf (buf.data () + strlen (buf.data ()),
|
|
||||||
+ size_left, ":S");
|
|
||||||
+
|
|
||||||
+ if (ret < 0 || ret >= size_left)
|
|
||||||
+ error (err_msg);
|
|
||||||
+ }
|
|
||||||
else
|
|
||||||
error (_("Static tracepoint not valid during download"));
|
|
||||||
}
|
|
||||||
@@ -12873,10 +12896,26 @@ remote_target::download_tracepoint (struct bp_location *loc)
|
|
||||||
capabilities at definition time. */
|
|
||||||
if (remote_supports_cond_tracepoints ())
|
|
||||||
{
|
|
||||||
- agent_expr_up aexpr = gen_eval_for_expr (tpaddr, loc->cond.get ());
|
|
||||||
- xsnprintf (buf + strlen (buf), BUF_SIZE - strlen (buf), ":X%x,",
|
|
||||||
- aexpr->len);
|
|
||||||
- pkt = buf + strlen (buf);
|
|
||||||
+ agent_expr_up aexpr = gen_eval_for_expr (tpaddr,
|
|
||||||
+ loc->cond.get ());
|
|
||||||
+
|
|
||||||
+ size_left = buf.size () - strlen (buf.data ());
|
|
||||||
+
|
|
||||||
+ ret = snprintf (buf.data () + strlen (buf.data ()),
|
|
||||||
+ size_left, ":X%x,", aexpr->len);
|
|
||||||
+
|
|
||||||
+ if (ret < 0 || ret >= size_left)
|
|
||||||
+ error (err_msg);
|
|
||||||
+
|
|
||||||
+ size_left = buf.size () - strlen (buf.data ());
|
|
||||||
+
|
|
||||||
+ /* Two bytes to encode each aexpr byte, plus the terminating
|
|
||||||
+ null byte. */
|
|
||||||
+ if (aexpr->len * 2 + 1 > size_left)
|
|
||||||
+ error (err_msg);
|
|
||||||
+
|
|
||||||
+ pkt = buf.data () + strlen (buf.data ());
|
|
||||||
+
|
|
||||||
for (int ndx = 0; ndx < aexpr->len; ++ndx)
|
|
||||||
pkt = pack_hex_byte (pkt, aexpr->buf[ndx]);
|
|
||||||
*pkt = '\0';
|
|
||||||
@@ -12887,8 +12926,17 @@ remote_target::download_tracepoint (struct bp_location *loc)
|
|
||||||
}
|
|
||||||
|
|
||||||
if (b->commands || *default_collect)
|
|
||||||
- strcat (buf, "-");
|
|
||||||
- putpkt (buf);
|
|
||||||
+ {
|
|
||||||
+ size_left = buf.size () - strlen (buf.data ());
|
|
||||||
+
|
|
||||||
+ ret = snprintf (buf.data () + strlen (buf.data ()),
|
|
||||||
+ size_left, "-");
|
|
||||||
+
|
|
||||||
+ if (ret < 0 || ret >= size_left)
|
|
||||||
+ error (err_msg);
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+ putpkt (buf.data ());
|
|
||||||
remote_get_noisy_reply ();
|
|
||||||
if (strcmp (rs->buf, "OK"))
|
|
||||||
error (_("Target does not support tracepoints."));
|
|
||||||
@@ -12902,11 +12950,15 @@ remote_target::download_tracepoint (struct bp_location *loc)
|
|
||||||
bool has_more = ((action_it + 1) != tdp_actions.end ()
|
|
||||||
|| !stepping_actions.empty ());
|
|
||||||
|
|
||||||
- xsnprintf (buf, BUF_SIZE, "QTDP:-%x:%s:%s%c",
|
|
||||||
- b->number, addrbuf, /* address */
|
|
||||||
- action_it->c_str (),
|
|
||||||
- has_more ? '-' : 0);
|
|
||||||
- putpkt (buf);
|
|
||||||
+ ret = snprintf (buf.data (), buf.size (), "QTDP:-%x:%s:%s%c",
|
|
||||||
+ b->number, addrbuf, /* address */
|
|
||||||
+ action_it->c_str (),
|
|
||||||
+ has_more ? '-' : 0);
|
|
||||||
+
|
|
||||||
+ if (ret < 0 || ret >= buf.size ())
|
|
||||||
+ error (err_msg);
|
|
||||||
+
|
|
||||||
+ putpkt (buf.data ());
|
|
||||||
remote_get_noisy_reply ();
|
|
||||||
if (strcmp (rs->buf, "OK"))
|
|
||||||
error (_("Error on target while setting tracepoints."));
|
|
||||||
@@ -12920,12 +12972,16 @@ remote_target::download_tracepoint (struct bp_location *loc)
|
|
||||||
bool is_first = action_it == stepping_actions.begin ();
|
|
||||||
bool has_more = (action_it + 1) != stepping_actions.end ();
|
|
||||||
|
|
||||||
- xsnprintf (buf, BUF_SIZE, "QTDP:-%x:%s:%s%s%s",
|
|
||||||
- b->number, addrbuf, /* address */
|
|
||||||
- is_first ? "S" : "",
|
|
||||||
- action_it->c_str (),
|
|
||||||
- has_more ? "-" : "");
|
|
||||||
- putpkt (buf);
|
|
||||||
+ ret = snprintf (buf.data (), buf.size (), "QTDP:-%x:%s:%s%s%s",
|
|
||||||
+ b->number, addrbuf, /* address */
|
|
||||||
+ is_first ? "S" : "",
|
|
||||||
+ action_it->c_str (),
|
|
||||||
+ has_more ? "-" : "");
|
|
||||||
+
|
|
||||||
+ if (ret < 0 || ret >= buf.size ())
|
|
||||||
+ error (err_msg);
|
|
||||||
+
|
|
||||||
+ putpkt (buf.data ());
|
|
||||||
remote_get_noisy_reply ();
|
|
||||||
if (strcmp (rs->buf, "OK"))
|
|
||||||
error (_("Error on target while setting tracepoints."));
|
|
||||||
@@ -12935,22 +12991,32 @@ remote_target::download_tracepoint (struct bp_location *loc)
|
|
||||||
{
|
|
||||||
if (b->location != NULL)
|
|
||||||
{
|
|
||||||
- strcpy (buf, "QTDPsrc:");
|
|
||||||
+ ret = snprintf (buf.data (), buf.size (), "QTDPsrc:");
|
|
||||||
+
|
|
||||||
+ if (ret < 0 || ret >= buf.size ())
|
|
||||||
+ error (err_msg);
|
|
||||||
+
|
|
||||||
encode_source_string (b->number, loc->address, "at",
|
|
||||||
event_location_to_string (b->location.get ()),
|
|
||||||
- buf + strlen (buf), 2048 - strlen (buf));
|
|
||||||
- putpkt (buf);
|
|
||||||
+ buf.data () + strlen (buf.data ()),
|
|
||||||
+ buf.size () - strlen (buf.data ()));
|
|
||||||
+ putpkt (buf.data ());
|
|
||||||
remote_get_noisy_reply ();
|
|
||||||
if (strcmp (rs->buf, "OK"))
|
|
||||||
warning (_("Target does not support source download."));
|
|
||||||
}
|
|
||||||
if (b->cond_string)
|
|
||||||
{
|
|
||||||
- strcpy (buf, "QTDPsrc:");
|
|
||||||
+ ret = snprintf (buf.data (), buf.size (), "QTDPsrc:");
|
|
||||||
+
|
|
||||||
+ if (ret < 0 || ret >= buf.size ())
|
|
||||||
+ error (err_msg);
|
|
||||||
+
|
|
||||||
encode_source_string (b->number, loc->address,
|
|
||||||
- "cond", b->cond_string, buf + strlen (buf),
|
|
||||||
- 2048 - strlen (buf));
|
|
||||||
- putpkt (buf);
|
|
||||||
+ "cond", b->cond_string,
|
|
||||||
+ buf.data () + strlen (buf.data ()),
|
|
||||||
+ buf.size () - strlen (buf.data ()));
|
|
||||||
+ putpkt (buf.data ());
|
|
||||||
remote_get_noisy_reply ();
|
|
||||||
if (strcmp (rs->buf, "OK"))
|
|
||||||
warning (_("Target does not support source download."));
|
|
@ -1,449 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
Date: Thu, 9 Aug 2018 17:17:16 +0200
|
|
||||||
Subject: gdb-rhbz1187581-power8-regs-4of7.patch
|
|
||||||
|
|
||||||
;; Add GDB support to access/display POWER8 registers (IBM, RH BZ 1187581).
|
|
||||||
|
|
||||||
commit 4277c4b87addb5354cc47b98d7a73e44cfaf22c2
|
|
||||||
Author: Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
Date: Mon Aug 6 16:24:55 2018 -0300
|
|
||||||
|
|
||||||
Use remote register numbers in tracepoint mask
|
|
||||||
|
|
||||||
Currently, tracepoint register masks in the QTDP packets include both
|
|
||||||
internal and remote register numbers, as well as pseudo-register
|
|
||||||
numbers.
|
|
||||||
|
|
||||||
This patch changes this so that the mask only includes remote register
|
|
||||||
numbers.
|
|
||||||
|
|
||||||
Register numbers from agent expressions are already set in the mask
|
|
||||||
using remote numbers. Other tracepoint actions used internal numbers,
|
|
||||||
e.g. "collect $regs" or "collect $<pseudoreg>". To handle pseudoreg
|
|
||||||
numbers, an empty agent expression is created and ax_reg_mask is
|
|
||||||
called for this expression and the pseudoreg. This will cause the ax
|
|
||||||
to set its mask with the corresponding remote raw register
|
|
||||||
numbers (using ax_regs_mask, which calls
|
|
||||||
gdbarch_ax_pseudo_register_collect).
|
|
||||||
|
|
||||||
If ax_regs_mask and gdbarch_ax_pseudo_register_collect also generate
|
|
||||||
more ax bytecode, the ax is also appended to the collection list. It
|
|
||||||
isn't clear that this was the original intent for
|
|
||||||
gdbarch_ax_pseudo_register_collect, and none of the arches seem to do
|
|
||||||
this, but if this changes in the future, it should work.
|
|
||||||
|
|
||||||
The patch also refactors the code used by validate_action line to
|
|
||||||
validate axs into a function that is now called from every place that
|
|
||||||
generates axs. Previously, some parts of tracepoint.c that generated
|
|
||||||
axs didn't check if the ax length was greater than MAX_AGENT_EXPR_LEN.
|
|
||||||
|
|
||||||
gdb/ChangeLog:
|
|
||||||
2018-08-06 Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
|
|
||||||
* tracepoint.h (class collection_list) <add_register>: Remove.
|
|
||||||
<add_remote_register, add_ax_registers, add_local_register>:
|
|
||||||
Declare.
|
|
||||||
<add_memrange>: Add scope parameter.
|
|
||||||
* tracepoint.c (encode_actions_1): Likewise.
|
|
||||||
(collection_list::add_register): Rename to ...
|
|
||||||
(collection_list::add_remote_register): ... this. Update
|
|
||||||
comment.
|
|
||||||
(collection_list::add_ax_registers, add_local_register): New
|
|
||||||
methods.
|
|
||||||
(collection_list::add_memrange): Add scope parameter. Call
|
|
||||||
add_local_register instead of add_register.
|
|
||||||
(finalize_tracepoint_aexpr): New function.
|
|
||||||
(collection_list::collect_symbol): Update calls to add_memrange.
|
|
||||||
Call add_local_register instead of add_register. Call
|
|
||||||
add_ax_registers. Call finalize_tracepoint_aexpr.
|
|
||||||
(encode_actions_1): Get remote regnos for $reg action. Call
|
|
||||||
add_remote_register, add_ax_registers, and add_local_register.
|
|
||||||
Update call to add_memrange. Call finalize_tracepoint_aexpr.
|
|
||||||
(validate_actionline): Call finalize_tracepoint_aexpr.
|
|
||||||
|
|
||||||
+2018-08-06 Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
+
|
|
||||||
+ * tracepoint.h (class collection_list) <add_register>: Remove.
|
|
||||||
+ <add_remote_register, add_ax_registers, add_local_register>:
|
|
||||||
+ Declare.
|
|
||||||
+ <add_memrange>: Add scope parameter.
|
|
||||||
+ * tracepoint.c (encode_actions_1): Likewise.
|
|
||||||
+ (collection_list::add_register): Rename to ...
|
|
||||||
+ (collection_list::add_remote_register): ... this. Update
|
|
||||||
+ comment.
|
|
||||||
+ (collection_list::add_ax_registers, add_local_register): New
|
|
||||||
+ methods.
|
|
||||||
+ (collection_list::add_memrange): Add scope parameter. Call
|
|
||||||
+ add_local_register instead of add_register.
|
|
||||||
+ (finalize_tracepoint_aexpr): New function.
|
|
||||||
+ (collection_list::collect_symbol): Update calls to add_memrange.
|
|
||||||
+ Call add_local_register instead of add_register. Call
|
|
||||||
+ add_ax_registers. Call finalize_tracepoint_aexpr.
|
|
||||||
+ (encode_actions_1): Get remote regnos for $reg action. Call
|
|
||||||
+ add_remote_register, add_ax_registers, and add_local_register.
|
|
||||||
+ Update call to add_memrange. Call finalize_tracepoint_aexpr.
|
|
||||||
+ (validate_actionline): Call finalize_tracepoint_aexpr.
|
|
||||||
+
|
|
||||||
2018-08-06 Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
|
|
||||||
* remote.c (remote_target::download_tracepoint): Remove BUF_SIZE.
|
|
||||||
|
|
||||||
diff --git a/gdb/tracepoint.c b/gdb/tracepoint.c
|
|
||||||
--- a/gdb/tracepoint.c
|
|
||||||
+++ b/gdb/tracepoint.c
|
|
||||||
@@ -615,6 +615,19 @@ report_agent_reqs_errors (struct agent_expr *aexpr)
|
|
||||||
error (_("Expression is too complicated."));
|
|
||||||
}
|
|
||||||
|
|
||||||
+/* Call ax_reqs on AEXPR and raise an error if something is wrong. */
|
|
||||||
+
|
|
||||||
+static void
|
|
||||||
+finalize_tracepoint_aexpr (struct agent_expr *aexpr)
|
|
||||||
+{
|
|
||||||
+ ax_reqs (aexpr);
|
|
||||||
+
|
|
||||||
+ if (aexpr->len > MAX_AGENT_EXPR_LEN)
|
|
||||||
+ error (_("Expression is too complicated."));
|
|
||||||
+
|
|
||||||
+ report_agent_reqs_errors (aexpr);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
/* worker function */
|
|
||||||
void
|
|
||||||
validate_actionline (const char *line, struct breakpoint *b)
|
|
||||||
@@ -699,12 +712,7 @@ validate_actionline (const char *line, struct breakpoint *b)
|
|
||||||
exp.get (),
|
|
||||||
trace_string);
|
|
||||||
|
|
||||||
- if (aexpr->len > MAX_AGENT_EXPR_LEN)
|
|
||||||
- error (_("Expression is too complicated."));
|
|
||||||
-
|
|
||||||
- ax_reqs (aexpr.get ());
|
|
||||||
-
|
|
||||||
- report_agent_reqs_errors (aexpr.get ());
|
|
||||||
+ finalize_tracepoint_aexpr (aexpr.get ());
|
|
||||||
}
|
|
||||||
}
|
|
||||||
while (p && *p++ == ',');
|
|
||||||
@@ -731,11 +739,7 @@ validate_actionline (const char *line, struct breakpoint *b)
|
|
||||||
long. */
|
|
||||||
agent_expr_up aexpr = gen_eval_for_expr (loc->address, exp.get ());
|
|
||||||
|
|
||||||
- if (aexpr->len > MAX_AGENT_EXPR_LEN)
|
|
||||||
- error (_("Expression is too complicated."));
|
|
||||||
-
|
|
||||||
- ax_reqs (aexpr.get ());
|
|
||||||
- report_agent_reqs_errors (aexpr.get ());
|
|
||||||
+ finalize_tracepoint_aexpr (aexpr.get ());
|
|
||||||
}
|
|
||||||
}
|
|
||||||
while (p && *p++ == ',');
|
|
||||||
@@ -811,10 +815,10 @@ memrange_sortmerge (std::vector<memrange> &memranges)
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
-/* Add a register to a collection list. */
|
|
||||||
+/* Add remote register number REGNO to the collection list mask. */
|
|
||||||
|
|
||||||
void
|
|
||||||
-collection_list::add_register (unsigned int regno)
|
|
||||||
+collection_list::add_remote_register (unsigned int regno)
|
|
||||||
{
|
|
||||||
if (info_verbose)
|
|
||||||
printf_filtered ("collect register %d\n", regno);
|
|
||||||
@@ -824,12 +828,74 @@ collection_list::add_register (unsigned int regno)
|
|
||||||
m_regs_mask[regno / 8] |= 1 << (regno % 8);
|
|
||||||
}
|
|
||||||
|
|
||||||
+/* Add all the registers from the mask in AEXPR to the mask in the
|
|
||||||
+ collection list. Registers in the AEXPR mask are already remote
|
|
||||||
+ register numbers. */
|
|
||||||
+
|
|
||||||
+void
|
|
||||||
+collection_list::add_ax_registers (struct agent_expr *aexpr)
|
|
||||||
+{
|
|
||||||
+ if (aexpr->reg_mask_len > 0)
|
|
||||||
+ {
|
|
||||||
+ for (int ndx1 = 0; ndx1 < aexpr->reg_mask_len; ndx1++)
|
|
||||||
+ {
|
|
||||||
+ QUIT; /* Allow user to bail out with ^C. */
|
|
||||||
+ if (aexpr->reg_mask[ndx1] != 0)
|
|
||||||
+ {
|
|
||||||
+ /* Assume chars have 8 bits. */
|
|
||||||
+ for (int ndx2 = 0; ndx2 < 8; ndx2++)
|
|
||||||
+ if (aexpr->reg_mask[ndx1] & (1 << ndx2))
|
|
||||||
+ /* It's used -- record it. */
|
|
||||||
+ add_remote_register (ndx1 * 8 + ndx2);
|
|
||||||
+ }
|
|
||||||
+ }
|
|
||||||
+ }
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+/* If REGNO is raw, add its corresponding remote register number to
|
|
||||||
+ the mask. If REGNO is a pseudo-register, figure out the necessary
|
|
||||||
+ registers using a temporary agent expression, and add it to the
|
|
||||||
+ list if it needs more than just a mask. */
|
|
||||||
+
|
|
||||||
+void
|
|
||||||
+collection_list::add_local_register (struct gdbarch *gdbarch,
|
|
||||||
+ unsigned int regno,
|
|
||||||
+ CORE_ADDR scope)
|
|
||||||
+{
|
|
||||||
+ if (regno < gdbarch_num_regs (gdbarch))
|
|
||||||
+ {
|
|
||||||
+ int remote_regno = gdbarch_remote_register_number (gdbarch, regno);
|
|
||||||
+
|
|
||||||
+ if (remote_regno < 0)
|
|
||||||
+ error (_("Can't collect register %d"), regno);
|
|
||||||
+
|
|
||||||
+ add_remote_register (remote_regno);
|
|
||||||
+ }
|
|
||||||
+ else
|
|
||||||
+ {
|
|
||||||
+ agent_expr_up aexpr (new agent_expr (gdbarch, scope));
|
|
||||||
+
|
|
||||||
+ ax_reg_mask (aexpr.get (), regno);
|
|
||||||
+
|
|
||||||
+ finalize_tracepoint_aexpr (aexpr.get ());
|
|
||||||
+
|
|
||||||
+ add_ax_registers (aexpr.get ());
|
|
||||||
+
|
|
||||||
+ /* Usually ax_reg_mask for a pseudo-regiser only sets the
|
|
||||||
+ corresponding raw registers in the ax mask, but if this isn't
|
|
||||||
+ the case add the expression that is generated to the
|
|
||||||
+ collection list. */
|
|
||||||
+ if (aexpr->len > 0)
|
|
||||||
+ add_aexpr (std::move (aexpr));
|
|
||||||
+ }
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
/* Add a memrange to a collection list. */
|
|
||||||
|
|
||||||
void
|
|
||||||
collection_list::add_memrange (struct gdbarch *gdbarch,
|
|
||||||
int type, bfd_signed_vma base,
|
|
||||||
- ULONGEST len)
|
|
||||||
+ ULONGEST len, CORE_ADDR scope)
|
|
||||||
{
|
|
||||||
if (info_verbose)
|
|
||||||
printf_filtered ("(%d,%s,%s)\n", type, paddress (gdbarch, base), pulongest (len));
|
|
||||||
@@ -840,7 +906,7 @@ collection_list::add_memrange (struct gdbarch *gdbarch,
|
|
||||||
m_memranges.emplace_back (type, base, base + len);
|
|
||||||
|
|
||||||
if (type != memrange_absolute) /* Better collect the base register! */
|
|
||||||
- add_register (type);
|
|
||||||
+ add_local_register (gdbarch, type, scope);
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Add a symbol to a collection list. */
|
|
||||||
@@ -882,19 +948,19 @@ collection_list::collect_symbol (struct symbol *sym,
|
|
||||||
if (TYPE_CODE (SYMBOL_TYPE (sym)) == TYPE_CODE_STRUCT)
|
|
||||||
treat_as_expr = 1;
|
|
||||||
else
|
|
||||||
- add_memrange (gdbarch, memrange_absolute, offset, len);
|
|
||||||
+ add_memrange (gdbarch, memrange_absolute, offset, len, scope);
|
|
||||||
break;
|
|
||||||
case LOC_REGISTER:
|
|
||||||
reg = SYMBOL_REGISTER_OPS (sym)->register_number (sym, gdbarch);
|
|
||||||
if (info_verbose)
|
|
||||||
printf_filtered ("LOC_REG[parm] %s: ",
|
|
||||||
SYMBOL_PRINT_NAME (sym));
|
|
||||||
- add_register (reg);
|
|
||||||
+ add_local_register (gdbarch, reg, scope);
|
|
||||||
/* Check for doubles stored in two registers. */
|
|
||||||
/* FIXME: how about larger types stored in 3 or more regs? */
|
|
||||||
if (TYPE_CODE (SYMBOL_TYPE (sym)) == TYPE_CODE_FLT &&
|
|
||||||
len > register_size (gdbarch, reg))
|
|
||||||
- add_register (reg + 1);
|
|
||||||
+ add_local_register (gdbarch, reg + 1, scope);
|
|
||||||
break;
|
|
||||||
case LOC_REF_ARG:
|
|
||||||
printf_filtered ("Sorry, don't know how to do LOC_REF_ARG yet.\n");
|
|
||||||
@@ -911,7 +977,7 @@ collection_list::collect_symbol (struct symbol *sym,
|
|
||||||
SYMBOL_PRINT_NAME (sym), pulongest (len),
|
|
||||||
paddress (gdbarch, offset), reg);
|
|
||||||
}
|
|
||||||
- add_memrange (gdbarch, reg, offset, len);
|
|
||||||
+ add_memrange (gdbarch, reg, offset, len, scope);
|
|
||||||
break;
|
|
||||||
case LOC_REGPARM_ADDR:
|
|
||||||
reg = SYMBOL_VALUE (sym);
|
|
||||||
@@ -923,7 +989,7 @@ collection_list::collect_symbol (struct symbol *sym,
|
|
||||||
SYMBOL_PRINT_NAME (sym), pulongest (len),
|
|
||||||
paddress (gdbarch, offset), reg);
|
|
||||||
}
|
|
||||||
- add_memrange (gdbarch, reg, offset, len);
|
|
||||||
+ add_memrange (gdbarch, reg, offset, len, scope);
|
|
||||||
break;
|
|
||||||
case LOC_LOCAL:
|
|
||||||
reg = frame_regno;
|
|
||||||
@@ -935,7 +1001,7 @@ collection_list::collect_symbol (struct symbol *sym,
|
|
||||||
SYMBOL_PRINT_NAME (sym), pulongest (len),
|
|
||||||
paddress (gdbarch, offset), reg);
|
|
||||||
}
|
|
||||||
- add_memrange (gdbarch, reg, offset, len);
|
|
||||||
+ add_memrange (gdbarch, reg, offset, len, scope);
|
|
||||||
break;
|
|
||||||
|
|
||||||
case LOC_UNRESOLVED:
|
|
||||||
@@ -968,26 +1034,10 @@ collection_list::collect_symbol (struct symbol *sym,
|
|
||||||
return;
|
|
||||||
}
|
|
||||||
|
|
||||||
- ax_reqs (aexpr.get ());
|
|
||||||
-
|
|
||||||
- report_agent_reqs_errors (aexpr.get ());
|
|
||||||
+ finalize_tracepoint_aexpr (aexpr.get ());
|
|
||||||
|
|
||||||
/* Take care of the registers. */
|
|
||||||
- if (aexpr->reg_mask_len > 0)
|
|
||||||
- {
|
|
||||||
- for (int ndx1 = 0; ndx1 < aexpr->reg_mask_len; ndx1++)
|
|
||||||
- {
|
|
||||||
- QUIT; /* Allow user to bail out with ^C. */
|
|
||||||
- if (aexpr->reg_mask[ndx1] != 0)
|
|
||||||
- {
|
|
||||||
- /* Assume chars have 8 bits. */
|
|
||||||
- for (int ndx2 = 0; ndx2 < 8; ndx2++)
|
|
||||||
- if (aexpr->reg_mask[ndx1] & (1 << ndx2))
|
|
||||||
- /* It's used -- record it. */
|
|
||||||
- add_register (ndx1 * 8 + ndx2);
|
|
||||||
- }
|
|
||||||
- }
|
|
||||||
- }
|
|
||||||
+ add_ax_registers (aexpr.get ());
|
|
||||||
|
|
||||||
add_aexpr (std::move (aexpr));
|
|
||||||
}
|
|
||||||
@@ -1257,8 +1307,18 @@ encode_actions_1 (struct command_line *action,
|
|
||||||
|
|
||||||
if (0 == strncasecmp ("$reg", action_exp, 4))
|
|
||||||
{
|
|
||||||
- for (i = 0; i < gdbarch_num_regs (target_gdbarch ()); i++)
|
|
||||||
- collect->add_register (i);
|
|
||||||
+ for (i = 0; i < gdbarch_num_regs (target_gdbarch ());
|
|
||||||
+ i++)
|
|
||||||
+ {
|
|
||||||
+ int remote_regno = (gdbarch_remote_register_number
|
|
||||||
+ (target_gdbarch (), i));
|
|
||||||
+
|
|
||||||
+ /* Ignore arch regnos without a corresponding
|
|
||||||
+ remote regno. This can happen for regnos not
|
|
||||||
+ in the tdesc. */
|
|
||||||
+ if (remote_regno >= 0)
|
|
||||||
+ collect->add_remote_register (remote_regno);
|
|
||||||
+ }
|
|
||||||
action_exp = strchr (action_exp, ','); /* more? */
|
|
||||||
}
|
|
||||||
else if (0 == strncasecmp ("$arg", action_exp, 4))
|
|
||||||
@@ -1288,27 +1348,10 @@ encode_actions_1 (struct command_line *action,
|
|
||||||
target_gdbarch (),
|
|
||||||
trace_string);
|
|
||||||
|
|
||||||
- ax_reqs (aexpr.get ());
|
|
||||||
- report_agent_reqs_errors (aexpr.get ());
|
|
||||||
+ finalize_tracepoint_aexpr (aexpr.get ());
|
|
||||||
|
|
||||||
/* take care of the registers */
|
|
||||||
- if (aexpr->reg_mask_len > 0)
|
|
||||||
- {
|
|
||||||
- for (int ndx1 = 0; ndx1 < aexpr->reg_mask_len; ndx1++)
|
|
||||||
- {
|
|
||||||
- QUIT; /* allow user to bail out with ^C */
|
|
||||||
- if (aexpr->reg_mask[ndx1] != 0)
|
|
||||||
- {
|
|
||||||
- /* assume chars have 8 bits */
|
|
||||||
- for (int ndx2 = 0; ndx2 < 8; ndx2++)
|
|
||||||
- if (aexpr->reg_mask[ndx1] & (1 << ndx2))
|
|
||||||
- {
|
|
||||||
- /* It's used -- record it. */
|
|
||||||
- collect->add_register (ndx1 * 8 + ndx2);
|
|
||||||
- }
|
|
||||||
- }
|
|
||||||
- }
|
|
||||||
- }
|
|
||||||
+ collect->add_ax_registers (aexpr.get ());
|
|
||||||
|
|
||||||
collect->add_aexpr (std::move (aexpr));
|
|
||||||
action_exp = strchr (action_exp, ','); /* more? */
|
|
||||||
@@ -1340,7 +1383,8 @@ encode_actions_1 (struct command_line *action,
|
|
||||||
name);
|
|
||||||
if (info_verbose)
|
|
||||||
printf_filtered ("OP_REGISTER: ");
|
|
||||||
- collect->add_register (i);
|
|
||||||
+ collect->add_local_register (target_gdbarch (),
|
|
||||||
+ i, tloc->address);
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
|
|
||||||
@@ -1352,7 +1396,8 @@ encode_actions_1 (struct command_line *action,
|
|
||||||
check_typedef (exp->elts[1].type);
|
|
||||||
collect->add_memrange (target_gdbarch (),
|
|
||||||
memrange_absolute, addr,
|
|
||||||
- TYPE_LENGTH (exp->elts[1].type));
|
|
||||||
+ TYPE_LENGTH (exp->elts[1].type),
|
|
||||||
+ tloc->address);
|
|
||||||
collect->append_exp (exp.get ());
|
|
||||||
break;
|
|
||||||
|
|
||||||
@@ -1376,28 +1421,10 @@ encode_actions_1 (struct command_line *action,
|
|
||||||
exp.get (),
|
|
||||||
trace_string);
|
|
||||||
|
|
||||||
- ax_reqs (aexpr.get ());
|
|
||||||
-
|
|
||||||
- report_agent_reqs_errors (aexpr.get ());
|
|
||||||
+ finalize_tracepoint_aexpr (aexpr.get ());
|
|
||||||
|
|
||||||
/* Take care of the registers. */
|
|
||||||
- if (aexpr->reg_mask_len > 0)
|
|
||||||
- {
|
|
||||||
- for (int ndx1 = 0; ndx1 < aexpr->reg_mask_len; ndx1++)
|
|
||||||
- {
|
|
||||||
- QUIT; /* Allow user to bail out with ^C. */
|
|
||||||
- if (aexpr->reg_mask[ndx1] != 0)
|
|
||||||
- {
|
|
||||||
- /* Assume chars have 8 bits. */
|
|
||||||
- for (int ndx2 = 0; ndx2 < 8; ndx2++)
|
|
||||||
- if (aexpr->reg_mask[ndx1] & (1 << ndx2))
|
|
||||||
- {
|
|
||||||
- /* It's used -- record it. */
|
|
||||||
- collect->add_register (ndx1 * 8 + ndx2);
|
|
||||||
- }
|
|
||||||
- }
|
|
||||||
- }
|
|
||||||
- }
|
|
||||||
+ collect->add_ax_registers (aexpr.get ());
|
|
||||||
|
|
||||||
collect->add_aexpr (std::move (aexpr));
|
|
||||||
collect->append_exp (exp.get ());
|
|
||||||
@@ -1422,8 +1449,7 @@ encode_actions_1 (struct command_line *action,
|
|
||||||
agent_expr_up aexpr = gen_eval_for_expr (tloc->address,
|
|
||||||
exp.get ());
|
|
||||||
|
|
||||||
- ax_reqs (aexpr.get ());
|
|
||||||
- report_agent_reqs_errors (aexpr.get ());
|
|
||||||
+ finalize_tracepoint_aexpr (aexpr.get ());
|
|
||||||
|
|
||||||
/* Even though we're not officially collecting, add
|
|
||||||
to the collect list anyway. */
|
|
||||||
diff --git a/gdb/tracepoint.h b/gdb/tracepoint.h
|
|
||||||
--- a/gdb/tracepoint.h
|
|
||||||
+++ b/gdb/tracepoint.h
|
|
||||||
@@ -263,9 +263,14 @@ public:
|
|
||||||
void add_aexpr (agent_expr_up aexpr);
|
|
||||||
|
|
||||||
void add_register (unsigned int regno);
|
|
||||||
+ void add_remote_register (unsigned int regno);
|
|
||||||
+ void add_ax_registers (struct agent_expr *aexpr);
|
|
||||||
+ void add_local_register (struct gdbarch *gdbarch,
|
|
||||||
+ unsigned int regno,
|
|
||||||
+ CORE_ADDR scope);
|
|
||||||
void add_memrange (struct gdbarch *gdbarch,
|
|
||||||
int type, bfd_signed_vma base,
|
|
||||||
- ULONGEST len);
|
|
||||||
+ ULONGEST len, CORE_ADDR scope);
|
|
||||||
void collect_symbol (struct symbol *sym,
|
|
||||||
struct gdbarch *gdbarch,
|
|
||||||
long frame_regno, long frame_offset,
|
|
@ -1,215 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
Date: Thu, 9 Aug 2018 17:17:46 +0200
|
|
||||||
Subject: gdb-rhbz1187581-power8-regs-5of7.patch
|
|
||||||
|
|
||||||
;; Add GDB support to access/display POWER8 registers (IBM, RH BZ 1187581).
|
|
||||||
|
|
||||||
commit a04b9d62a234923826e431a209d396a628661548
|
|
||||||
Author: Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
Date: Mon Aug 6 16:24:55 2018 -0300
|
|
||||||
|
|
||||||
Variable size for regs mask in collection list
|
|
||||||
|
|
||||||
This patch changes collection_list to allow larger register masks.
|
|
||||||
|
|
||||||
The mask is changed from an array to a vector and is initialized to
|
|
||||||
hold the maximum possible remote register number. The stringify
|
|
||||||
method is updated to resize temp_buf if needed.
|
|
||||||
|
|
||||||
gdb/ChangeLog:
|
|
||||||
2018-08-06 Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
|
|
||||||
* tracepoint.h (collection_list) <m_regs_mask>: Change type to
|
|
||||||
std::vector<unsigned char>.
|
|
||||||
* tracepoint.c (collection_list::collection_list): Remove
|
|
||||||
m_regs_mask initializer from initializer list. Resize
|
|
||||||
m_regs_mask using the largest remote register number.
|
|
||||||
(collection_list::add_remote_register): Remove size check on
|
|
||||||
m_regs_mask. Use at to access element.
|
|
||||||
(collection_list::stringify): Change type of temp_buf to
|
|
||||||
gdb::char_vector. Update uses of temp_buf. Resize if needed to
|
|
||||||
stringify the register mask. Use pack_hex_byte for the register
|
|
||||||
mask.
|
|
||||||
|
|
||||||
+2018-08-06 Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
+
|
|
||||||
+ * tracepoint.h (collection_list) <m_regs_mask>: Change type to
|
|
||||||
+ std::vector<unsigned char>.
|
|
||||||
+ * tracepoint.c (collection_list::collection_list): Remove
|
|
||||||
+ m_regs_mask initializer from initializer list. Resize
|
|
||||||
+ m_regs_mask using the largest remote register number.
|
|
||||||
+ (collection_list::add_remote_register): Remove size check on
|
|
||||||
+ m_regs_mask. Use at to access element.
|
|
||||||
+ (collection_list::stringify): Change type of temp_buf to
|
|
||||||
+ gdb::char_vector. Update uses of temp_buf. Resize if needed to
|
|
||||||
+ stringify the register mask. Use pack_hex_byte for the register
|
|
||||||
+ mask.
|
|
||||||
+
|
|
||||||
2018-08-06 Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
|
|
||||||
* tracepoint.h (class collection_list) <add_register>: Remove.
|
|
||||||
|
|
||||||
diff --git a/gdb/tracepoint.c b/gdb/tracepoint.c
|
|
||||||
--- a/gdb/tracepoint.c
|
|
||||||
+++ b/gdb/tracepoint.c
|
|
||||||
@@ -822,10 +822,8 @@ collection_list::add_remote_register (unsigned int regno)
|
|
||||||
{
|
|
||||||
if (info_verbose)
|
|
||||||
printf_filtered ("collect register %d\n", regno);
|
|
||||||
- if (regno >= (8 * sizeof (m_regs_mask)))
|
|
||||||
- error (_("Internal: register number %d too large for tracepoint"),
|
|
||||||
- regno);
|
|
||||||
- m_regs_mask[regno / 8] |= 1 << (regno % 8);
|
|
||||||
+
|
|
||||||
+ m_regs_mask.at (regno / 8) |= 1 << (regno % 8);
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Add all the registers from the mask in AEXPR to the mask in the
|
|
||||||
@@ -1136,9 +1134,20 @@ collection_list::add_static_trace_data ()
|
|
||||||
}
|
|
||||||
|
|
||||||
collection_list::collection_list ()
|
|
||||||
- : m_regs_mask (),
|
|
||||||
- m_strace_data (false)
|
|
||||||
+ : m_strace_data (false)
|
|
||||||
{
|
|
||||||
+ int max_remote_regno = 0;
|
|
||||||
+ for (int i = 0; i < gdbarch_num_regs (target_gdbarch ()); i++)
|
|
||||||
+ {
|
|
||||||
+ int remote_regno = (gdbarch_remote_register_number
|
|
||||||
+ (target_gdbarch (), i));
|
|
||||||
+
|
|
||||||
+ if (remote_regno >= 0 && remote_regno > max_remote_regno)
|
|
||||||
+ max_remote_regno = remote_regno;
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+ m_regs_mask.resize ((max_remote_regno / 8) + 1);
|
|
||||||
+
|
|
||||||
m_memranges.reserve (128);
|
|
||||||
m_aexprs.reserve (128);
|
|
||||||
}
|
|
||||||
@@ -1148,7 +1157,8 @@ collection_list::collection_list ()
|
|
||||||
std::vector<std::string>
|
|
||||||
collection_list::stringify ()
|
|
||||||
{
|
|
||||||
- char temp_buf[2048];
|
|
||||||
+ gdb::char_vector temp_buf (2048);
|
|
||||||
+
|
|
||||||
int count;
|
|
||||||
char *end;
|
|
||||||
long i;
|
|
||||||
@@ -1158,35 +1168,45 @@ collection_list::stringify ()
|
|
||||||
{
|
|
||||||
if (info_verbose)
|
|
||||||
printf_filtered ("\nCollecting static trace data\n");
|
|
||||||
- end = temp_buf;
|
|
||||||
+ end = temp_buf.data ();
|
|
||||||
*end++ = 'L';
|
|
||||||
- str_list.emplace_back (temp_buf, end - temp_buf);
|
|
||||||
+ str_list.emplace_back (temp_buf.data (), end - temp_buf.data ());
|
|
||||||
}
|
|
||||||
|
|
||||||
- for (i = sizeof (m_regs_mask) - 1; i > 0; i--)
|
|
||||||
+ for (i = m_regs_mask.size () - 1; i > 0; i--)
|
|
||||||
if (m_regs_mask[i] != 0) /* Skip leading zeroes in regs_mask. */
|
|
||||||
break;
|
|
||||||
if (m_regs_mask[i] != 0) /* Prepare to send regs_mask to the stub. */
|
|
||||||
{
|
|
||||||
if (info_verbose)
|
|
||||||
printf_filtered ("\nCollecting registers (mask): 0x");
|
|
||||||
- end = temp_buf;
|
|
||||||
+
|
|
||||||
+ /* One char for 'R', one for the null terminator and two per
|
|
||||||
+ mask byte. */
|
|
||||||
+ std::size_t new_size = (i + 1) * 2 + 2;
|
|
||||||
+ if (new_size > temp_buf.size ())
|
|
||||||
+ temp_buf.resize (new_size);
|
|
||||||
+
|
|
||||||
+ end = temp_buf.data ();
|
|
||||||
*end++ = 'R';
|
|
||||||
for (; i >= 0; i--)
|
|
||||||
{
|
|
||||||
QUIT; /* Allow user to bail out with ^C. */
|
|
||||||
if (info_verbose)
|
|
||||||
printf_filtered ("%02X", m_regs_mask[i]);
|
|
||||||
- sprintf (end, "%02X", m_regs_mask[i]);
|
|
||||||
- end += 2;
|
|
||||||
+
|
|
||||||
+ end = pack_hex_byte (end, m_regs_mask[i]);
|
|
||||||
}
|
|
||||||
- str_list.emplace_back (temp_buf);
|
|
||||||
+ *end = '\0';
|
|
||||||
+
|
|
||||||
+ str_list.emplace_back (temp_buf.data ());
|
|
||||||
}
|
|
||||||
if (info_verbose)
|
|
||||||
printf_filtered ("\n");
|
|
||||||
if (!m_memranges.empty () && info_verbose)
|
|
||||||
printf_filtered ("Collecting memranges: \n");
|
|
||||||
- for (i = 0, count = 0, end = temp_buf; i < m_memranges.size (); i++)
|
|
||||||
+ for (i = 0, count = 0, end = temp_buf.data ();
|
|
||||||
+ i < m_memranges.size (); i++)
|
|
||||||
{
|
|
||||||
QUIT; /* Allow user to bail out with ^C. */
|
|
||||||
if (info_verbose)
|
|
||||||
@@ -1200,9 +1220,9 @@ collection_list::stringify ()
|
|
||||||
}
|
|
||||||
if (count + 27 > MAX_AGENT_EXPR_LEN)
|
|
||||||
{
|
|
||||||
- str_list.emplace_back (temp_buf, count);
|
|
||||||
+ str_list.emplace_back (temp_buf.data (), count);
|
|
||||||
count = 0;
|
|
||||||
- end = temp_buf;
|
|
||||||
+ end = temp_buf.data ();
|
|
||||||
}
|
|
||||||
|
|
||||||
{
|
|
||||||
@@ -1222,7 +1242,7 @@ collection_list::stringify ()
|
|
||||||
}
|
|
||||||
|
|
||||||
count += strlen (end);
|
|
||||||
- end = temp_buf + count;
|
|
||||||
+ end = temp_buf.data () + count;
|
|
||||||
}
|
|
||||||
|
|
||||||
for (i = 0; i < m_aexprs.size (); i++)
|
|
||||||
@@ -1230,9 +1250,9 @@ collection_list::stringify ()
|
|
||||||
QUIT; /* Allow user to bail out with ^C. */
|
|
||||||
if ((count + 10 + 2 * m_aexprs[i]->len) > MAX_AGENT_EXPR_LEN)
|
|
||||||
{
|
|
||||||
- str_list.emplace_back (temp_buf, count);
|
|
||||||
+ str_list.emplace_back (temp_buf.data (), count);
|
|
||||||
count = 0;
|
|
||||||
- end = temp_buf;
|
|
||||||
+ end = temp_buf.data ();
|
|
||||||
}
|
|
||||||
sprintf (end, "X%08X,", m_aexprs[i]->len);
|
|
||||||
end += 10; /* 'X' + 8 hex digits + ',' */
|
|
||||||
@@ -1244,9 +1264,9 @@ collection_list::stringify ()
|
|
||||||
|
|
||||||
if (count != 0)
|
|
||||||
{
|
|
||||||
- str_list.emplace_back (temp_buf, count);
|
|
||||||
+ str_list.emplace_back (temp_buf.data (), count);
|
|
||||||
count = 0;
|
|
||||||
- end = temp_buf;
|
|
||||||
+ end = temp_buf.data ();
|
|
||||||
}
|
|
||||||
|
|
||||||
return str_list;
|
|
||||||
diff --git a/gdb/tracepoint.h b/gdb/tracepoint.h
|
|
||||||
--- a/gdb/tracepoint.h
|
|
||||||
+++ b/gdb/tracepoint.h
|
|
||||||
@@ -293,8 +293,9 @@ public:
|
|
||||||
{ return m_computed; }
|
|
||||||
|
|
||||||
private:
|
|
||||||
- /* room for up to 256 regs */
|
|
||||||
- unsigned char m_regs_mask[32];
|
|
||||||
+ /* We need the allocator zero-initialize the mask, so we don't use
|
|
||||||
+ gdb::byte_vector. */
|
|
||||||
+ std::vector<unsigned char> m_regs_mask;
|
|
||||||
|
|
||||||
std::vector<memrange> m_memranges;
|
|
||||||
|
|
@ -1,187 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
Date: Thu, 9 Aug 2018 17:18:15 +0200
|
|
||||||
Subject: gdb-rhbz1187581-power8-regs-6of7.patch
|
|
||||||
|
|
||||||
;; Add GDB support to access/display POWER8 registers (IBM, RH BZ 1187581).
|
|
||||||
|
|
||||||
commit 296956befef3711ed458c7cba8041fde0dab9c50
|
|
||||||
Author: Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
Date: Mon Aug 6 16:24:55 2018 -0300
|
|
||||||
|
|
||||||
Allow larger regblock sizes when saving tracefiles
|
|
||||||
|
|
||||||
The tracefile.c:trace_save function assumes trace_regblock_size won't
|
|
||||||
be larger than the MAX_TRACE_UPLOAD constant, used to size the buffer
|
|
||||||
which holds trace data. This can cause buffer overruns when this is
|
|
||||||
not the case. This patch changes this function so that the larger
|
|
||||||
size is used to size the buffer.
|
|
||||||
|
|
||||||
gdb/ChangeLog:
|
|
||||||
2018-08-06 Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
|
|
||||||
* tracefile.c: Include common/byte-vector.h.
|
|
||||||
(trace_save): Change type of buf to gdb::byte_vector. Initialize
|
|
||||||
with trace_regblock_size if needed. Update uses of buf.
|
|
||||||
|
|
||||||
+2018-08-06 Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
+
|
|
||||||
+ * tracefile.c: Include common/byte-vector.h.
|
|
||||||
+ (trace_save): Change type of buf to gdb::byte_vector. Initialize
|
|
||||||
+ with trace_regblock_size if needed. Update uses of buf.
|
|
||||||
+
|
|
||||||
2018-08-06 Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
|
|
||||||
* tracepoint.h (collection_list) <m_regs_mask>: Change type to
|
|
||||||
|
|
||||||
diff --git a/gdb/tracefile.c b/gdb/tracefile.c
|
|
||||||
--- a/gdb/tracefile.c
|
|
||||||
+++ b/gdb/tracefile.c
|
|
||||||
@@ -22,6 +22,7 @@
|
|
||||||
#include "ctf.h"
|
|
||||||
#include "exec.h"
|
|
||||||
#include "regcache.h"
|
|
||||||
+#include "common/byte-vector.h"
|
|
||||||
|
|
||||||
/* Helper macros. */
|
|
||||||
|
|
||||||
@@ -67,7 +68,7 @@ trace_save (const char *filename, struct trace_file_writer *writer,
|
|
||||||
|
|
||||||
ULONGEST offset = 0;
|
|
||||||
#define MAX_TRACE_UPLOAD 2000
|
|
||||||
- gdb_byte buf[MAX_TRACE_UPLOAD];
|
|
||||||
+ gdb::byte_vector buf (std::max (MAX_TRACE_UPLOAD, trace_regblock_size));
|
|
||||||
enum bfd_endian byte_order = gdbarch_byte_order (target_gdbarch ());
|
|
||||||
|
|
||||||
/* If the target is to save the data to a file on its own, then just
|
|
||||||
@@ -144,7 +145,7 @@ trace_save (const char *filename, struct trace_file_writer *writer,
|
|
||||||
/* We ask for big blocks, in the hopes of efficiency, but
|
|
||||||
will take less if the target has packet size limitations
|
|
||||||
or some such. */
|
|
||||||
- gotten = target_get_raw_trace_data (buf, offset,
|
|
||||||
+ gotten = target_get_raw_trace_data (buf.data (), offset,
|
|
||||||
MAX_TRACE_UPLOAD);
|
|
||||||
if (gotten < 0)
|
|
||||||
error (_("Failure to get requested trace buffer data"));
|
|
||||||
@@ -152,7 +153,7 @@ trace_save (const char *filename, struct trace_file_writer *writer,
|
|
||||||
if (gotten == 0)
|
|
||||||
break;
|
|
||||||
|
|
||||||
- writer->ops->write_trace_buffer (writer, buf, gotten);
|
|
||||||
+ writer->ops->write_trace_buffer (writer, buf.data (), gotten);
|
|
||||||
|
|
||||||
offset += gotten;
|
|
||||||
}
|
|
||||||
@@ -163,7 +164,7 @@ trace_save (const char *filename, struct trace_file_writer *writer,
|
|
||||||
/* Parse the trace buffers according to how data are stored
|
|
||||||
in trace buffer in GDBserver. */
|
|
||||||
|
|
||||||
- gotten = target_get_raw_trace_data (buf, offset, 6);
|
|
||||||
+ gotten = target_get_raw_trace_data (buf.data (), offset, 6);
|
|
||||||
|
|
||||||
if (gotten == 0)
|
|
||||||
break;
|
|
||||||
@@ -171,10 +172,10 @@ trace_save (const char *filename, struct trace_file_writer *writer,
|
|
||||||
/* Read the first six bytes in, which is the tracepoint
|
|
||||||
number and trace frame size. */
|
|
||||||
tp_num = (uint16_t)
|
|
||||||
- extract_unsigned_integer (&buf[0], 2, byte_order);
|
|
||||||
+ extract_unsigned_integer (&((buf.data ())[0]), 2, byte_order);
|
|
||||||
|
|
||||||
tf_size = (uint32_t)
|
|
||||||
- extract_unsigned_integer (&buf[2], 4, byte_order);
|
|
||||||
+ extract_unsigned_integer (&((buf.data ())[2]), 4, byte_order);
|
|
||||||
|
|
||||||
writer->ops->frame_ops->start (writer, tp_num);
|
|
||||||
gotten = 6;
|
|
||||||
@@ -192,7 +193,8 @@ trace_save (const char *filename, struct trace_file_writer *writer,
|
|
||||||
/* We'll fetch one block each time, in order to
|
|
||||||
handle the extremely large 'M' block. We first
|
|
||||||
fetch one byte to get the type of the block. */
|
|
||||||
- gotten = target_get_raw_trace_data (buf, offset, 1);
|
|
||||||
+ gotten = target_get_raw_trace_data (buf.data (),
|
|
||||||
+ offset, 1);
|
|
||||||
if (gotten < 1)
|
|
||||||
error (_("Failure to get requested trace buffer data"));
|
|
||||||
|
|
||||||
@@ -205,13 +207,13 @@ trace_save (const char *filename, struct trace_file_writer *writer,
|
|
||||||
{
|
|
||||||
case 'R':
|
|
||||||
gotten
|
|
||||||
- = target_get_raw_trace_data (buf, offset,
|
|
||||||
+ = target_get_raw_trace_data (buf.data (), offset,
|
|
||||||
trace_regblock_size);
|
|
||||||
if (gotten < trace_regblock_size)
|
|
||||||
error (_("Failure to get requested trace"
|
|
||||||
" buffer data"));
|
|
||||||
|
|
||||||
- TRACE_WRITE_R_BLOCK (writer, buf,
|
|
||||||
+ TRACE_WRITE_R_BLOCK (writer, buf.data (),
|
|
||||||
trace_regblock_size);
|
|
||||||
break;
|
|
||||||
case 'M':
|
|
||||||
@@ -221,7 +223,8 @@ trace_save (const char *filename, struct trace_file_writer *writer,
|
|
||||||
LONGEST t;
|
|
||||||
int j;
|
|
||||||
|
|
||||||
- t = target_get_raw_trace_data (buf,offset, 10);
|
|
||||||
+ t = target_get_raw_trace_data (buf.data (),
|
|
||||||
+ offset, 10);
|
|
||||||
if (t < 10)
|
|
||||||
error (_("Failure to get requested trace"
|
|
||||||
" buffer data"));
|
|
||||||
@@ -231,10 +234,10 @@ trace_save (const char *filename, struct trace_file_writer *writer,
|
|
||||||
|
|
||||||
gotten = 0;
|
|
||||||
addr = (ULONGEST)
|
|
||||||
- extract_unsigned_integer (buf, 8,
|
|
||||||
+ extract_unsigned_integer (buf.data (), 8,
|
|
||||||
byte_order);
|
|
||||||
mlen = (unsigned short)
|
|
||||||
- extract_unsigned_integer (&buf[8], 2,
|
|
||||||
+ extract_unsigned_integer (&((buf.data ())[8]), 2,
|
|
||||||
byte_order);
|
|
||||||
|
|
||||||
TRACE_WRITE_M_BLOCK_HEADER (writer, addr,
|
|
||||||
@@ -252,14 +255,15 @@ trace_save (const char *filename, struct trace_file_writer *writer,
|
|
||||||
else
|
|
||||||
read_length = mlen - j;
|
|
||||||
|
|
||||||
- t = target_get_raw_trace_data (buf,
|
|
||||||
+ t = target_get_raw_trace_data (buf.data (),
|
|
||||||
offset + j,
|
|
||||||
read_length);
|
|
||||||
if (t < read_length)
|
|
||||||
error (_("Failure to get requested"
|
|
||||||
" trace buffer data"));
|
|
||||||
|
|
||||||
- TRACE_WRITE_M_BLOCK_MEMORY (writer, buf,
|
|
||||||
+ TRACE_WRITE_M_BLOCK_MEMORY (writer,
|
|
||||||
+ buf.data (),
|
|
||||||
read_length);
|
|
||||||
|
|
||||||
j += read_length;
|
|
||||||
@@ -274,18 +278,18 @@ trace_save (const char *filename, struct trace_file_writer *writer,
|
|
||||||
LONGEST val;
|
|
||||||
|
|
||||||
gotten
|
|
||||||
- = target_get_raw_trace_data (buf, offset,
|
|
||||||
- 12);
|
|
||||||
+ = target_get_raw_trace_data (buf.data (),
|
|
||||||
+ offset, 12);
|
|
||||||
if (gotten < 12)
|
|
||||||
error (_("Failure to get requested"
|
|
||||||
" trace buffer data"));
|
|
||||||
|
|
||||||
- vnum = (int) extract_signed_integer (buf,
|
|
||||||
+ vnum = (int) extract_signed_integer (buf.data (),
|
|
||||||
4,
|
|
||||||
byte_order);
|
|
||||||
val
|
|
||||||
- = extract_signed_integer (&buf[4], 8,
|
|
||||||
- byte_order);
|
|
||||||
+ = extract_signed_integer (&((buf.data ())[4]),
|
|
||||||
+ 8, byte_order);
|
|
||||||
|
|
||||||
TRACE_WRITE_V_BLOCK (writer, vnum, val);
|
|
||||||
}
|
|
@ -1,129 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
Date: Thu, 9 Aug 2018 17:18:49 +0200
|
|
||||||
Subject: gdb-rhbz1187581-power8-regs-7of7.patch
|
|
||||||
|
|
||||||
;; Add GDB support to access/display POWER8 registers (IBM, RH BZ 1187581).
|
|
||||||
|
|
||||||
commit a7f25a84f4cc1df5248c46346337f19a2a66af5a
|
|
||||||
Author: Simon Marchi <simon.marchi@ericsson.com>
|
|
||||||
Date: Mon Aug 6 16:54:47 2018 -0400
|
|
||||||
|
|
||||||
Fix compilation failure in remote.c
|
|
||||||
|
|
||||||
A recent patch introduced a few of these:
|
|
||||||
|
|
||||||
/home/emaisin/src/binutils-gdb/gdb/remote.c:12862:19: error: format not a string literal and no format arguments [-Werror=format-security]
|
|
||||||
error (err_msg);
|
|
||||||
^
|
|
||||||
|
|
||||||
Fix them by replacing the call to error with
|
|
||||||
|
|
||||||
error ("%s", err_msg);
|
|
||||||
|
|
||||||
gdb/ChangeLog:
|
|
||||||
|
|
||||||
* remote.c (remote_target::download_tracepoint): Fix format
|
|
||||||
string errors.
|
|
||||||
|
|
||||||
+2018-08-06 Simon Marchi <simon.marchi@ericsson.com>
|
|
||||||
+
|
|
||||||
+ * remote.c (remote_target::download_tracepoint): Fix format
|
|
||||||
+ string errors.
|
|
||||||
+
|
|
||||||
2018-08-06 Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
|
|
||||||
* tracefile.c: Include common/byte-vector.h.
|
|
||||||
|
|
||||||
diff --git a/gdb/remote.c b/gdb/remote.c
|
|
||||||
--- a/gdb/remote.c
|
|
||||||
+++ b/gdb/remote.c
|
|
||||||
@@ -12826,7 +12826,7 @@ remote_target::download_tracepoint (struct bp_location *loc)
|
|
||||||
t->step_count, t->pass_count);
|
|
||||||
|
|
||||||
if (ret < 0 || ret >= buf.size ())
|
|
||||||
- error (err_msg);
|
|
||||||
+ error ("%s", err_msg);
|
|
||||||
|
|
||||||
/* Fast tracepoints are mostly handled by the target, but we can
|
|
||||||
tell the target how big of an instruction block should be moved
|
|
||||||
@@ -12846,7 +12846,7 @@ remote_target::download_tracepoint (struct bp_location *loc)
|
|
||||||
gdb_insn_length (loc->gdbarch, tpaddr));
|
|
||||||
|
|
||||||
if (ret < 0 || ret >= size_left)
|
|
||||||
- error (err_msg);
|
|
||||||
+ error ("%s", err_msg);
|
|
||||||
}
|
|
||||||
else
|
|
||||||
/* If it passed validation at definition but fails now,
|
|
||||||
@@ -12877,7 +12877,7 @@ remote_target::download_tracepoint (struct bp_location *loc)
|
|
||||||
size_left, ":S");
|
|
||||||
|
|
||||||
if (ret < 0 || ret >= size_left)
|
|
||||||
- error (err_msg);
|
|
||||||
+ error ("%s", err_msg);
|
|
||||||
}
|
|
||||||
else
|
|
||||||
error (_("Static tracepoint not valid during download"));
|
|
||||||
@@ -12905,14 +12905,14 @@ remote_target::download_tracepoint (struct bp_location *loc)
|
|
||||||
size_left, ":X%x,", aexpr->len);
|
|
||||||
|
|
||||||
if (ret < 0 || ret >= size_left)
|
|
||||||
- error (err_msg);
|
|
||||||
+ error ("%s", err_msg);
|
|
||||||
|
|
||||||
size_left = buf.size () - strlen (buf.data ());
|
|
||||||
|
|
||||||
/* Two bytes to encode each aexpr byte, plus the terminating
|
|
||||||
null byte. */
|
|
||||||
if (aexpr->len * 2 + 1 > size_left)
|
|
||||||
- error (err_msg);
|
|
||||||
+ error ("%s", err_msg);
|
|
||||||
|
|
||||||
pkt = buf.data () + strlen (buf.data ());
|
|
||||||
|
|
||||||
@@ -12933,7 +12933,7 @@ remote_target::download_tracepoint (struct bp_location *loc)
|
|
||||||
size_left, "-");
|
|
||||||
|
|
||||||
if (ret < 0 || ret >= size_left)
|
|
||||||
- error (err_msg);
|
|
||||||
+ error ("%s", err_msg);
|
|
||||||
}
|
|
||||||
|
|
||||||
putpkt (buf.data ());
|
|
||||||
@@ -12956,7 +12956,7 @@ remote_target::download_tracepoint (struct bp_location *loc)
|
|
||||||
has_more ? '-' : 0);
|
|
||||||
|
|
||||||
if (ret < 0 || ret >= buf.size ())
|
|
||||||
- error (err_msg);
|
|
||||||
+ error ("%s", err_msg);
|
|
||||||
|
|
||||||
putpkt (buf.data ());
|
|
||||||
remote_get_noisy_reply ();
|
|
||||||
@@ -12979,7 +12979,7 @@ remote_target::download_tracepoint (struct bp_location *loc)
|
|
||||||
has_more ? "-" : "");
|
|
||||||
|
|
||||||
if (ret < 0 || ret >= buf.size ())
|
|
||||||
- error (err_msg);
|
|
||||||
+ error ("%s", err_msg);
|
|
||||||
|
|
||||||
putpkt (buf.data ());
|
|
||||||
remote_get_noisy_reply ();
|
|
||||||
@@ -12994,7 +12994,7 @@ remote_target::download_tracepoint (struct bp_location *loc)
|
|
||||||
ret = snprintf (buf.data (), buf.size (), "QTDPsrc:");
|
|
||||||
|
|
||||||
if (ret < 0 || ret >= buf.size ())
|
|
||||||
- error (err_msg);
|
|
||||||
+ error ("%s", err_msg);
|
|
||||||
|
|
||||||
encode_source_string (b->number, loc->address, "at",
|
|
||||||
event_location_to_string (b->location.get ()),
|
|
||||||
@@ -13010,7 +13010,7 @@ remote_target::download_tracepoint (struct bp_location *loc)
|
|
||||||
ret = snprintf (buf.data (), buf.size (), "QTDPsrc:");
|
|
||||||
|
|
||||||
if (ret < 0 || ret >= buf.size ())
|
|
||||||
- error (err_msg);
|
|
||||||
+ error ("%s", err_msg);
|
|
||||||
|
|
||||||
encode_source_string (b->number, loc->address,
|
|
||||||
"cond", b->cond_string,
|
|
@ -1,35 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Keith Seitz <keiths@redhat.com>
|
|
||||||
Date: Fri, 11 Jan 2019 17:02:12 -0500
|
|
||||||
Subject: gdb-rhbz1187581-power8-regs-not-in-8.2-01of15.patch
|
|
||||||
|
|
||||||
;; Fix remote.c build failure
|
|
||||||
;; Szabolcs Nagy, RH BZ 1187581
|
|
||||||
|
|
||||||
Fix gdb/remote.c build failure
|
|
||||||
|
|
||||||
Add const qualifier to fix
|
|
||||||
|
|
||||||
/S/gdb/common/gdb_locale.h:35:27: error: deprecated conversion from string c
|
|
||||||
# define _(String) (String)
|
|
||||||
^
|
|
||||||
/S/gdb/remote.c:12844:19: note: in expansion of macro '_'
|
|
||||||
char *err_msg = _("Tracepoint packet too large for target.");
|
|
||||||
^
|
|
||||||
gdb/ChangeLog:
|
|
||||||
|
|
||||||
* remote.c (remote_target::download_tracepoint): Change char* to
|
|
||||||
const char*.
|
|
||||||
|
|
||||||
diff --git a/gdb/remote.c b/gdb/remote.c
|
|
||||||
--- a/gdb/remote.c
|
|
||||||
+++ b/gdb/remote.c
|
|
||||||
@@ -12808,7 +12808,7 @@ remote_target::download_tracepoint (struct bp_location *loc)
|
|
||||||
struct tracepoint *t = (struct tracepoint *) b;
|
|
||||||
struct remote_state *rs = get_remote_state ();
|
|
||||||
int ret;
|
|
||||||
- char *err_msg = _("Tracepoint packet too large for target.");
|
|
||||||
+ const char *err_msg = _("Tracepoint packet too large for target.");
|
|
||||||
size_t size_left;
|
|
||||||
|
|
||||||
/* We use a buffer other than rs->buf because we'll build strings
|
|
@ -1,479 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Keith Seitz <keiths@redhat.com>
|
|
||||||
Date: Fri, 11 Jan 2019 17:02:12 -0500
|
|
||||||
Subject: gdb-rhbz1187581-power8-regs-not-in-8.2-02of15.patch
|
|
||||||
|
|
||||||
;; Add grok/write functions for new ppc core note sections
|
|
||||||
;; Edjunior Barbosa Machado, RH BZ 1187581
|
|
||||||
|
|
||||||
Add grok/write functions for new ppc core note sections
|
|
||||||
|
|
||||||
This patch adds functions for grokking and writing more register core
|
|
||||||
note sections (NT_PPC_TAR, NT_PPC_PPR, NT_PPC_DSCR, NT_PPC_EBB,
|
|
||||||
NT_PPC_PMU, NT_PPC_TM_CGPR, NT_PPC_TM_CFPR, NT_PPC_TM_CVMX,
|
|
||||||
NT_PPC_TM_CVSX, NT_PPC_TM_SPR, NT_PPC_TM_CTAR, NT_PPC_TM_CPPR,
|
|
||||||
NT_PPC_TM_CDSCR).
|
|
||||||
|
|
||||||
2018-07-16 Edjunior Barbosa Machado <emachado@linux.vnet.ibm.com>
|
|
||||||
|
|
||||||
bfd/
|
|
||||||
* elf-bfd.h (elfcore_write_ppc_tar): Add prototype.
|
|
||||||
(elfcore_write_ppc_ppr): Likewise.
|
|
||||||
(elfcore_write_ppc_dscr): Likewise.
|
|
||||||
(elfcore_write_ppc_ebb): Likewise.
|
|
||||||
(elfcore_write_ppc_pmu): Likewise.
|
|
||||||
(elfcore_write_ppc_tm_cgpr): Likewise.
|
|
||||||
(elfcore_write_ppc_tm_cfpr): Likewise.
|
|
||||||
(elfcore_write_ppc_tm_cvmx): Likewise.
|
|
||||||
(elfcore_write_ppc_tm_cvsx): Likewise.
|
|
||||||
(elfcore_write_ppc_tm_spr): Likewise.
|
|
||||||
(elfcore_write_ppc_tm_ctar): Likewise.
|
|
||||||
(elfcore_write_ppc_tm_cppr): Likewise.
|
|
||||||
(elfcore_write_ppc_tm_cdscr): Likewise.
|
|
||||||
* elf.c (elfcore_write_ppc_tar): New function.
|
|
||||||
(elfcore_write_ppc_ppr): Likewise.
|
|
||||||
(elfcore_write_ppc_dscr): Likewise.
|
|
||||||
(elfcore_write_ppc_ebb): Likewise.
|
|
||||||
(elfcore_write_ppc_pmu): Likewise.
|
|
||||||
(elfcore_write_ppc_tm_cgpr): Likewise.
|
|
||||||
(elfcore_write_ppc_tm_cfpr): Likewise.
|
|
||||||
(elfcore_write_ppc_tm_cvmx): Likewise.
|
|
||||||
(elfcore_write_ppc_tm_cvsx): Likewise.
|
|
||||||
(elfcore_write_ppc_tm_spr): Likewise.
|
|
||||||
(elfcore_write_ppc_tm_ctar): Likewise.
|
|
||||||
(elfcore_write_ppc_tm_cppr): Likewise.
|
|
||||||
(elfcore_write_ppc_tm_cdscr): Likewise.
|
|
||||||
(elfcore_write_register_note): Call them.
|
|
||||||
(elfcore_grok_ppc_tar): New function.
|
|
||||||
(elfcore_grok_ppc_ppr): Likewise.
|
|
||||||
(elfcore_grok_ppc_dscr): Likewise.
|
|
||||||
(elfcore_grok_ppc_ebb): Likewise.
|
|
||||||
(elfcore_grok_ppc_pmu): Likewise.
|
|
||||||
(elfcore_grok_ppc_tm_cgpr): Likewise.
|
|
||||||
(elfcore_grok_ppc_tm_cfpr): Likewise.
|
|
||||||
(elfcore_grok_ppc_tm_cvmx): Likewise.
|
|
||||||
(elfcore_grok_ppc_tm_cvsx): Likewise.
|
|
||||||
(elfcore_grok_ppc_tm_spr): Likewise.
|
|
||||||
(elfcore_grok_ppc_tm_ctar): Likewise.
|
|
||||||
(elfcore_grok_ppc_tm_cppr): Likewise.
|
|
||||||
(elfcore_grok_ppc_tm_cdscr): Likewise.
|
|
||||||
(elfcore_grok_note): Call them.
|
|
||||||
|
|
||||||
diff --git a/bfd/elf-bfd.h b/bfd/elf-bfd.h
|
|
||||||
--- a/bfd/elf-bfd.h
|
|
||||||
+++ b/bfd/elf-bfd.h
|
|
||||||
@@ -2569,6 +2569,32 @@ extern char *elfcore_write_ppc_vmx
|
|
||||||
(bfd *, char *, int *, const void *, int);
|
|
||||||
extern char *elfcore_write_ppc_vsx
|
|
||||||
(bfd *, char *, int *, const void *, int);
|
|
||||||
+extern char *elfcore_write_ppc_tar
|
|
||||||
+ (bfd *, char *, int *, const void *, int);
|
|
||||||
+extern char *elfcore_write_ppc_ppr
|
|
||||||
+ (bfd *, char *, int *, const void *, int);
|
|
||||||
+extern char *elfcore_write_ppc_dscr
|
|
||||||
+ (bfd *, char *, int *, const void *, int);
|
|
||||||
+extern char *elfcore_write_ppc_ebb
|
|
||||||
+ (bfd *, char *, int *, const void *, int);
|
|
||||||
+extern char *elfcore_write_ppc_pmu
|
|
||||||
+ (bfd *, char *, int *, const void *, int);
|
|
||||||
+extern char *elfcore_write_ppc_tm_cgpr
|
|
||||||
+ (bfd *, char *, int *, const void *, int);
|
|
||||||
+extern char *elfcore_write_ppc_tm_cfpr
|
|
||||||
+ (bfd *, char *, int *, const void *, int);
|
|
||||||
+extern char *elfcore_write_ppc_tm_cvmx
|
|
||||||
+ (bfd *, char *, int *, const void *, int);
|
|
||||||
+extern char *elfcore_write_ppc_tm_cvsx
|
|
||||||
+ (bfd *, char *, int *, const void *, int);
|
|
||||||
+extern char *elfcore_write_ppc_tm_spr
|
|
||||||
+ (bfd *, char *, int *, const void *, int);
|
|
||||||
+extern char *elfcore_write_ppc_tm_ctar
|
|
||||||
+ (bfd *, char *, int *, const void *, int);
|
|
||||||
+extern char *elfcore_write_ppc_tm_cppr
|
|
||||||
+ (bfd *, char *, int *, const void *, int);
|
|
||||||
+extern char *elfcore_write_ppc_tm_cdscr
|
|
||||||
+ (bfd *, char *, int *, const void *, int);
|
|
||||||
extern char *elfcore_write_s390_timer
|
|
||||||
(bfd *, char *, int *, const void *, int);
|
|
||||||
extern char *elfcore_write_s390_todcmp
|
|
||||||
diff --git a/bfd/elf.c b/bfd/elf.c
|
|
||||||
--- a/bfd/elf.c
|
|
||||||
+++ b/bfd/elf.c
|
|
||||||
@@ -9238,6 +9238,84 @@ elfcore_grok_ppc_vsx (bfd *abfd, Elf_Internal_Note *note)
|
|
||||||
return elfcore_make_note_pseudosection (abfd, ".reg-ppc-vsx", note);
|
|
||||||
}
|
|
||||||
|
|
||||||
+static bfd_boolean
|
|
||||||
+elfcore_grok_ppc_tar (bfd *abfd, Elf_Internal_Note *note)
|
|
||||||
+{
|
|
||||||
+ return elfcore_make_note_pseudosection (abfd, ".reg-ppc-tar", note);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+static bfd_boolean
|
|
||||||
+elfcore_grok_ppc_ppr (bfd *abfd, Elf_Internal_Note *note)
|
|
||||||
+{
|
|
||||||
+ return elfcore_make_note_pseudosection (abfd, ".reg-ppc-ppr", note);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+static bfd_boolean
|
|
||||||
+elfcore_grok_ppc_dscr (bfd *abfd, Elf_Internal_Note *note)
|
|
||||||
+{
|
|
||||||
+ return elfcore_make_note_pseudosection (abfd, ".reg-ppc-dscr", note);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+static bfd_boolean
|
|
||||||
+elfcore_grok_ppc_ebb (bfd *abfd, Elf_Internal_Note *note)
|
|
||||||
+{
|
|
||||||
+ return elfcore_make_note_pseudosection (abfd, ".reg-ppc-ebb", note);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+static bfd_boolean
|
|
||||||
+elfcore_grok_ppc_pmu (bfd *abfd, Elf_Internal_Note *note)
|
|
||||||
+{
|
|
||||||
+ return elfcore_make_note_pseudosection (abfd, ".reg-ppc-pmu", note);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+static bfd_boolean
|
|
||||||
+elfcore_grok_ppc_tm_cgpr (bfd *abfd, Elf_Internal_Note *note)
|
|
||||||
+{
|
|
||||||
+ return elfcore_make_note_pseudosection (abfd, ".reg-ppc-tm-cgpr", note);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+static bfd_boolean
|
|
||||||
+elfcore_grok_ppc_tm_cfpr (bfd *abfd, Elf_Internal_Note *note)
|
|
||||||
+{
|
|
||||||
+ return elfcore_make_note_pseudosection (abfd, ".reg-ppc-tm-cfpr", note);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+static bfd_boolean
|
|
||||||
+elfcore_grok_ppc_tm_cvmx (bfd *abfd, Elf_Internal_Note *note)
|
|
||||||
+{
|
|
||||||
+ return elfcore_make_note_pseudosection (abfd, ".reg-ppc-tm-cvmx", note);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+static bfd_boolean
|
|
||||||
+elfcore_grok_ppc_tm_cvsx (bfd *abfd, Elf_Internal_Note *note)
|
|
||||||
+{
|
|
||||||
+ return elfcore_make_note_pseudosection (abfd, ".reg-ppc-tm-cvsx", note);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+static bfd_boolean
|
|
||||||
+elfcore_grok_ppc_tm_spr (bfd *abfd, Elf_Internal_Note *note)
|
|
||||||
+{
|
|
||||||
+ return elfcore_make_note_pseudosection (abfd, ".reg-ppc-tm-spr", note);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+static bfd_boolean
|
|
||||||
+elfcore_grok_ppc_tm_ctar (bfd *abfd, Elf_Internal_Note *note)
|
|
||||||
+{
|
|
||||||
+ return elfcore_make_note_pseudosection (abfd, ".reg-ppc-tm-ctar", note);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+static bfd_boolean
|
|
||||||
+elfcore_grok_ppc_tm_cppr (bfd *abfd, Elf_Internal_Note *note)
|
|
||||||
+{
|
|
||||||
+ return elfcore_make_note_pseudosection (abfd, ".reg-ppc-tm-cppr", note);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+static bfd_boolean
|
|
||||||
+elfcore_grok_ppc_tm_cdscr (bfd *abfd, Elf_Internal_Note *note)
|
|
||||||
+{
|
|
||||||
+ return elfcore_make_note_pseudosection (abfd, ".reg-ppc-tm-cdscr", note);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
static bfd_boolean
|
|
||||||
elfcore_grok_s390_high_gprs (bfd *abfd, Elf_Internal_Note *note)
|
|
||||||
{
|
|
||||||
@@ -9723,6 +9801,97 @@ elfcore_grok_note (bfd *abfd, Elf_Internal_Note *note)
|
|
||||||
else
|
|
||||||
return TRUE;
|
|
||||||
|
|
||||||
+ case NT_PPC_TAR:
|
|
||||||
+ if (note->namesz == 6
|
|
||||||
+ && strcmp (note->namedata, "LINUX") == 0)
|
|
||||||
+ return elfcore_grok_ppc_tar (abfd, note);
|
|
||||||
+ else
|
|
||||||
+ return TRUE;
|
|
||||||
+
|
|
||||||
+ case NT_PPC_PPR:
|
|
||||||
+ if (note->namesz == 6
|
|
||||||
+ && strcmp (note->namedata, "LINUX") == 0)
|
|
||||||
+ return elfcore_grok_ppc_ppr (abfd, note);
|
|
||||||
+ else
|
|
||||||
+ return TRUE;
|
|
||||||
+
|
|
||||||
+ case NT_PPC_DSCR:
|
|
||||||
+ if (note->namesz == 6
|
|
||||||
+ && strcmp (note->namedata, "LINUX") == 0)
|
|
||||||
+ return elfcore_grok_ppc_dscr (abfd, note);
|
|
||||||
+ else
|
|
||||||
+ return TRUE;
|
|
||||||
+
|
|
||||||
+ case NT_PPC_EBB:
|
|
||||||
+ if (note->namesz == 6
|
|
||||||
+ && strcmp (note->namedata, "LINUX") == 0)
|
|
||||||
+ return elfcore_grok_ppc_ebb (abfd, note);
|
|
||||||
+ else
|
|
||||||
+ return TRUE;
|
|
||||||
+
|
|
||||||
+ case NT_PPC_PMU:
|
|
||||||
+ if (note->namesz == 6
|
|
||||||
+ && strcmp (note->namedata, "LINUX") == 0)
|
|
||||||
+ return elfcore_grok_ppc_pmu (abfd, note);
|
|
||||||
+ else
|
|
||||||
+ return TRUE;
|
|
||||||
+
|
|
||||||
+ case NT_PPC_TM_CGPR:
|
|
||||||
+ if (note->namesz == 6
|
|
||||||
+ && strcmp (note->namedata, "LINUX") == 0)
|
|
||||||
+ return elfcore_grok_ppc_tm_cgpr (abfd, note);
|
|
||||||
+ else
|
|
||||||
+ return TRUE;
|
|
||||||
+
|
|
||||||
+ case NT_PPC_TM_CFPR:
|
|
||||||
+ if (note->namesz == 6
|
|
||||||
+ && strcmp (note->namedata, "LINUX") == 0)
|
|
||||||
+ return elfcore_grok_ppc_tm_cfpr (abfd, note);
|
|
||||||
+ else
|
|
||||||
+ return TRUE;
|
|
||||||
+
|
|
||||||
+ case NT_PPC_TM_CVMX:
|
|
||||||
+ if (note->namesz == 6
|
|
||||||
+ && strcmp (note->namedata, "LINUX") == 0)
|
|
||||||
+ return elfcore_grok_ppc_tm_cvmx (abfd, note);
|
|
||||||
+ else
|
|
||||||
+ return TRUE;
|
|
||||||
+
|
|
||||||
+ case NT_PPC_TM_CVSX:
|
|
||||||
+ if (note->namesz == 6
|
|
||||||
+ && strcmp (note->namedata, "LINUX") == 0)
|
|
||||||
+ return elfcore_grok_ppc_tm_cvsx (abfd, note);
|
|
||||||
+ else
|
|
||||||
+ return TRUE;
|
|
||||||
+
|
|
||||||
+ case NT_PPC_TM_SPR:
|
|
||||||
+ if (note->namesz == 6
|
|
||||||
+ && strcmp (note->namedata, "LINUX") == 0)
|
|
||||||
+ return elfcore_grok_ppc_tm_spr (abfd, note);
|
|
||||||
+ else
|
|
||||||
+ return TRUE;
|
|
||||||
+
|
|
||||||
+ case NT_PPC_TM_CTAR:
|
|
||||||
+ if (note->namesz == 6
|
|
||||||
+ && strcmp (note->namedata, "LINUX") == 0)
|
|
||||||
+ return elfcore_grok_ppc_tm_ctar (abfd, note);
|
|
||||||
+ else
|
|
||||||
+ return TRUE;
|
|
||||||
+
|
|
||||||
+ case NT_PPC_TM_CPPR:
|
|
||||||
+ if (note->namesz == 6
|
|
||||||
+ && strcmp (note->namedata, "LINUX") == 0)
|
|
||||||
+ return elfcore_grok_ppc_tm_cppr (abfd, note);
|
|
||||||
+ else
|
|
||||||
+ return TRUE;
|
|
||||||
+
|
|
||||||
+ case NT_PPC_TM_CDSCR:
|
|
||||||
+ if (note->namesz == 6
|
|
||||||
+ && strcmp (note->namedata, "LINUX") == 0)
|
|
||||||
+ return elfcore_grok_ppc_tm_cdscr (abfd, note);
|
|
||||||
+ else
|
|
||||||
+ return TRUE;
|
|
||||||
+
|
|
||||||
case NT_S390_HIGH_GPRS:
|
|
||||||
if (note->namesz == 6
|
|
||||||
&& strcmp (note->namedata, "LINUX") == 0)
|
|
||||||
@@ -10830,6 +10999,162 @@ elfcore_write_ppc_vsx (bfd *abfd,
|
|
||||||
note_name, NT_PPC_VSX, ppc_vsx, size);
|
|
||||||
}
|
|
||||||
|
|
||||||
+char *
|
|
||||||
+elfcore_write_ppc_tar (bfd *abfd,
|
|
||||||
+ char *buf,
|
|
||||||
+ int *bufsiz,
|
|
||||||
+ const void *ppc_tar,
|
|
||||||
+ int size)
|
|
||||||
+{
|
|
||||||
+ char *note_name = "LINUX";
|
|
||||||
+ return elfcore_write_note (abfd, buf, bufsiz,
|
|
||||||
+ note_name, NT_PPC_TAR, ppc_tar, size);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+char *
|
|
||||||
+elfcore_write_ppc_ppr (bfd *abfd,
|
|
||||||
+ char *buf,
|
|
||||||
+ int *bufsiz,
|
|
||||||
+ const void *ppc_ppr,
|
|
||||||
+ int size)
|
|
||||||
+{
|
|
||||||
+ char *note_name = "LINUX";
|
|
||||||
+ return elfcore_write_note (abfd, buf, bufsiz,
|
|
||||||
+ note_name, NT_PPC_PPR, ppc_ppr, size);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+char *
|
|
||||||
+elfcore_write_ppc_dscr (bfd *abfd,
|
|
||||||
+ char *buf,
|
|
||||||
+ int *bufsiz,
|
|
||||||
+ const void *ppc_dscr,
|
|
||||||
+ int size)
|
|
||||||
+{
|
|
||||||
+ char *note_name = "LINUX";
|
|
||||||
+ return elfcore_write_note (abfd, buf, bufsiz,
|
|
||||||
+ note_name, NT_PPC_DSCR, ppc_dscr, size);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+char *
|
|
||||||
+elfcore_write_ppc_ebb (bfd *abfd,
|
|
||||||
+ char *buf,
|
|
||||||
+ int *bufsiz,
|
|
||||||
+ const void *ppc_ebb,
|
|
||||||
+ int size)
|
|
||||||
+{
|
|
||||||
+ char *note_name = "LINUX";
|
|
||||||
+ return elfcore_write_note (abfd, buf, bufsiz,
|
|
||||||
+ note_name, NT_PPC_EBB, ppc_ebb, size);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+char *
|
|
||||||
+elfcore_write_ppc_pmu (bfd *abfd,
|
|
||||||
+ char *buf,
|
|
||||||
+ int *bufsiz,
|
|
||||||
+ const void *ppc_pmu,
|
|
||||||
+ int size)
|
|
||||||
+{
|
|
||||||
+ char *note_name = "LINUX";
|
|
||||||
+ return elfcore_write_note (abfd, buf, bufsiz,
|
|
||||||
+ note_name, NT_PPC_PMU, ppc_pmu, size);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+char *
|
|
||||||
+elfcore_write_ppc_tm_cgpr (bfd *abfd,
|
|
||||||
+ char *buf,
|
|
||||||
+ int *bufsiz,
|
|
||||||
+ const void *ppc_tm_cgpr,
|
|
||||||
+ int size)
|
|
||||||
+{
|
|
||||||
+ char *note_name = "LINUX";
|
|
||||||
+ return elfcore_write_note (abfd, buf, bufsiz,
|
|
||||||
+ note_name, NT_PPC_TM_CGPR, ppc_tm_cgpr, size);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+char *
|
|
||||||
+elfcore_write_ppc_tm_cfpr (bfd *abfd,
|
|
||||||
+ char *buf,
|
|
||||||
+ int *bufsiz,
|
|
||||||
+ const void *ppc_tm_cfpr,
|
|
||||||
+ int size)
|
|
||||||
+{
|
|
||||||
+ char *note_name = "LINUX";
|
|
||||||
+ return elfcore_write_note (abfd, buf, bufsiz,
|
|
||||||
+ note_name, NT_PPC_TM_CFPR, ppc_tm_cfpr, size);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+char *
|
|
||||||
+elfcore_write_ppc_tm_cvmx (bfd *abfd,
|
|
||||||
+ char *buf,
|
|
||||||
+ int *bufsiz,
|
|
||||||
+ const void *ppc_tm_cvmx,
|
|
||||||
+ int size)
|
|
||||||
+{
|
|
||||||
+ char *note_name = "LINUX";
|
|
||||||
+ return elfcore_write_note (abfd, buf, bufsiz,
|
|
||||||
+ note_name, NT_PPC_TM_CVMX, ppc_tm_cvmx, size);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+char *
|
|
||||||
+elfcore_write_ppc_tm_cvsx (bfd *abfd,
|
|
||||||
+ char *buf,
|
|
||||||
+ int *bufsiz,
|
|
||||||
+ const void *ppc_tm_cvsx,
|
|
||||||
+ int size)
|
|
||||||
+{
|
|
||||||
+ char *note_name = "LINUX";
|
|
||||||
+ return elfcore_write_note (abfd, buf, bufsiz,
|
|
||||||
+ note_name, NT_PPC_TM_CVSX, ppc_tm_cvsx, size);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+char *
|
|
||||||
+elfcore_write_ppc_tm_spr (bfd *abfd,
|
|
||||||
+ char *buf,
|
|
||||||
+ int *bufsiz,
|
|
||||||
+ const void *ppc_tm_spr,
|
|
||||||
+ int size)
|
|
||||||
+{
|
|
||||||
+ char *note_name = "LINUX";
|
|
||||||
+ return elfcore_write_note (abfd, buf, bufsiz,
|
|
||||||
+ note_name, NT_PPC_TM_SPR, ppc_tm_spr, size);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+char *
|
|
||||||
+elfcore_write_ppc_tm_ctar (bfd *abfd,
|
|
||||||
+ char *buf,
|
|
||||||
+ int *bufsiz,
|
|
||||||
+ const void *ppc_tm_ctar,
|
|
||||||
+ int size)
|
|
||||||
+{
|
|
||||||
+ char *note_name = "LINUX";
|
|
||||||
+ return elfcore_write_note (abfd, buf, bufsiz,
|
|
||||||
+ note_name, NT_PPC_TM_CTAR, ppc_tm_ctar, size);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+char *
|
|
||||||
+elfcore_write_ppc_tm_cppr (bfd *abfd,
|
|
||||||
+ char *buf,
|
|
||||||
+ int *bufsiz,
|
|
||||||
+ const void *ppc_tm_cppr,
|
|
||||||
+ int size)
|
|
||||||
+{
|
|
||||||
+ char *note_name = "LINUX";
|
|
||||||
+ return elfcore_write_note (abfd, buf, bufsiz,
|
|
||||||
+ note_name, NT_PPC_TM_CPPR, ppc_tm_cppr, size);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+char *
|
|
||||||
+elfcore_write_ppc_tm_cdscr (bfd *abfd,
|
|
||||||
+ char *buf,
|
|
||||||
+ int *bufsiz,
|
|
||||||
+ const void *ppc_tm_cdscr,
|
|
||||||
+ int size)
|
|
||||||
+{
|
|
||||||
+ char *note_name = "LINUX";
|
|
||||||
+ return elfcore_write_note (abfd, buf, bufsiz,
|
|
||||||
+ note_name, NT_PPC_TM_CDSCR, ppc_tm_cdscr, size);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
static char *
|
|
||||||
elfcore_write_s390_high_gprs (bfd *abfd,
|
|
||||||
char *buf,
|
|
||||||
@@ -11070,6 +11395,32 @@ elfcore_write_register_note (bfd *abfd,
|
|
||||||
return elfcore_write_ppc_vmx (abfd, buf, bufsiz, data, size);
|
|
||||||
if (strcmp (section, ".reg-ppc-vsx") == 0)
|
|
||||||
return elfcore_write_ppc_vsx (abfd, buf, bufsiz, data, size);
|
|
||||||
+ if (strcmp (section, ".reg-ppc-tar") == 0)
|
|
||||||
+ return elfcore_write_ppc_tar (abfd, buf, bufsiz, data, size);
|
|
||||||
+ if (strcmp (section, ".reg-ppc-ppr") == 0)
|
|
||||||
+ return elfcore_write_ppc_ppr (abfd, buf, bufsiz, data, size);
|
|
||||||
+ if (strcmp (section, ".reg-ppc-dscr") == 0)
|
|
||||||
+ return elfcore_write_ppc_dscr (abfd, buf, bufsiz, data, size);
|
|
||||||
+ if (strcmp (section, ".reg-ppc-ebb") == 0)
|
|
||||||
+ return elfcore_write_ppc_ebb (abfd, buf, bufsiz, data, size);
|
|
||||||
+ if (strcmp (section, ".reg-ppc-pmu") == 0)
|
|
||||||
+ return elfcore_write_ppc_pmu (abfd, buf, bufsiz, data, size);
|
|
||||||
+ if (strcmp (section, ".reg-ppc-tm-cgpr") == 0)
|
|
||||||
+ return elfcore_write_ppc_tm_cgpr (abfd, buf, bufsiz, data, size);
|
|
||||||
+ if (strcmp (section, ".reg-ppc-tm-cfpr") == 0)
|
|
||||||
+ return elfcore_write_ppc_tm_cfpr (abfd, buf, bufsiz, data, size);
|
|
||||||
+ if (strcmp (section, ".reg-ppc-tm-cvmx") == 0)
|
|
||||||
+ return elfcore_write_ppc_tm_cvmx (abfd, buf, bufsiz, data, size);
|
|
||||||
+ if (strcmp (section, ".reg-ppc-tm-cvsx") == 0)
|
|
||||||
+ return elfcore_write_ppc_tm_cvsx (abfd, buf, bufsiz, data, size);
|
|
||||||
+ if (strcmp (section, ".reg-ppc-tm-spr") == 0)
|
|
||||||
+ return elfcore_write_ppc_tm_spr (abfd, buf, bufsiz, data, size);
|
|
||||||
+ if (strcmp (section, ".reg-ppc-tm-ctar") == 0)
|
|
||||||
+ return elfcore_write_ppc_tm_ctar (abfd, buf, bufsiz, data, size);
|
|
||||||
+ if (strcmp (section, ".reg-ppc-tm-cppr") == 0)
|
|
||||||
+ return elfcore_write_ppc_tm_cppr (abfd, buf, bufsiz, data, size);
|
|
||||||
+ if (strcmp (section, ".reg-ppc-tm-cdscr") == 0)
|
|
||||||
+ return elfcore_write_ppc_tm_cdscr (abfd, buf, bufsiz, data, size);
|
|
||||||
if (strcmp (section, ".reg-s390-high-gprs") == 0)
|
|
||||||
return elfcore_write_s390_high_gprs (abfd, buf, bufsiz, data, size);
|
|
||||||
if (strcmp (section, ".reg-s390-timer") == 0)
|
|
@ -1,61 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Keith Seitz <keiths@redhat.com>
|
|
||||||
Date: Fri, 11 Jan 2019 17:02:13 -0500
|
|
||||||
Subject: gdb-rhbz1187581-power8-regs-not-in-8.2-03of15.patch
|
|
||||||
|
|
||||||
;; Zero-initialize linux note sections
|
|
||||||
;; Pedro Franco de Carvalho, RH BZ 1187581
|
|
||||||
|
|
||||||
Zero-initialize linux note sections
|
|
||||||
|
|
||||||
This patches changes linux-tdep.c so that the buffer used to write
|
|
||||||
note sections when generating a core file is zero-initialized. This
|
|
||||||
way, bytes that are not collected won't contain random
|
|
||||||
data (e.g. padding bytes).
|
|
||||||
|
|
||||||
gdb/ChangeLog:
|
|
||||||
2018-10-26 Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
|
|
||||||
* linux-tdep.c (linux_collect_regset_section_cb): Use
|
|
||||||
std::vector<gdb_byte> instead of char * and malloc for buf.
|
|
||||||
Remove xfree.
|
|
||||||
|
|
||||||
diff --git a/gdb/linux-tdep.c b/gdb/linux-tdep.c
|
|
||||||
--- a/gdb/linux-tdep.c
|
|
||||||
+++ b/gdb/linux-tdep.c
|
|
||||||
@@ -1584,7 +1584,6 @@ linux_collect_regset_section_cb (const char *sect_name, int supply_size,
|
|
||||||
int collect_size, const struct regset *regset,
|
|
||||||
const char *human_name, void *cb_data)
|
|
||||||
{
|
|
||||||
- char *buf;
|
|
||||||
struct linux_collect_regset_section_cb_data *data
|
|
||||||
= (struct linux_collect_regset_section_cb_data *) cb_data;
|
|
||||||
bool variable_size_section = (regset != NULL
|
|
||||||
@@ -1598,19 +1597,22 @@ linux_collect_regset_section_cb (const char *sect_name, int supply_size,
|
|
||||||
|
|
||||||
gdb_assert (regset && regset->collect_regset);
|
|
||||||
|
|
||||||
- buf = (char *) xmalloc (collect_size);
|
|
||||||
- regset->collect_regset (regset, data->regcache, -1, buf, collect_size);
|
|
||||||
+ /* This is intentionally zero-initialized by using std::vector, so
|
|
||||||
+ that any padding bytes in the core file will show as 0. */
|
|
||||||
+ std::vector<gdb_byte> buf (collect_size);
|
|
||||||
+
|
|
||||||
+ regset->collect_regset (regset, data->regcache, -1, buf.data (),
|
|
||||||
+ collect_size);
|
|
||||||
|
|
||||||
/* PRSTATUS still needs to be treated specially. */
|
|
||||||
if (strcmp (sect_name, ".reg") == 0)
|
|
||||||
data->note_data = (char *) elfcore_write_prstatus
|
|
||||||
(data->obfd, data->note_data, data->note_size, data->lwp,
|
|
||||||
- gdb_signal_to_host (data->stop_signal), buf);
|
|
||||||
+ gdb_signal_to_host (data->stop_signal), buf.data ());
|
|
||||||
else
|
|
||||||
data->note_data = (char *) elfcore_write_register_note
|
|
||||||
(data->obfd, data->note_data, data->note_size,
|
|
||||||
- sect_name, buf, collect_size);
|
|
||||||
- xfree (buf);
|
|
||||||
+ sect_name, buf.data (), collect_size);
|
|
||||||
|
|
||||||
if (data->note_data == NULL)
|
|
||||||
data->abort_iteration = 1;
|
|
@ -1,88 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Keith Seitz <keiths@redhat.com>
|
|
||||||
Date: Fri, 11 Jan 2019 17:02:13 -0500
|
|
||||||
Subject: gdb-rhbz1187581-power8-regs-not-in-8.2-04of15.patch
|
|
||||||
|
|
||||||
;; [PowerPC] Don't zero-initialize vector register buffers
|
|
||||||
;; Pedro Franco de Carvalho, RH BZ 1187581
|
|
||||||
|
|
||||||
[PowerPC] Don't zero-initialize vector register buffers
|
|
||||||
|
|
||||||
Now that linux-tdep.c already zero-initializes the buffer used for
|
|
||||||
generating core file notes, there is no need to do this in the linux
|
|
||||||
collect functions for the vector regset. The memsets in gdbserver were
|
|
||||||
not useful to begin with.
|
|
||||||
|
|
||||||
gdb/ChangeLog:
|
|
||||||
2018-10-26 Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
|
|
||||||
* ppc-linux-tdep.c (ppc_linux_collect_vrregset): Remove.
|
|
||||||
(ppc32_le_linux_vrregset, ppc32_be_linux_vrregset): Replace
|
|
||||||
ppc_linux_collect_vrregset by regcache_collect_regset.
|
|
||||||
|
|
||||||
gdb/gdbserver/ChangeLog:
|
|
||||||
2018-10-26 Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
|
|
||||||
* linux-ppc-low.c (ppc_fill_vrregset): Remove memset calls.
|
|
||||||
|
|
||||||
diff --git a/gdb/gdbserver/linux-ppc-low.c b/gdb/gdbserver/linux-ppc-low.c
|
|
||||||
--- a/gdb/gdbserver/linux-ppc-low.c
|
|
||||||
+++ b/gdb/gdbserver/linux-ppc-low.c
|
|
||||||
@@ -495,13 +495,9 @@ ppc_fill_vrregset (struct regcache *regcache, void *buf)
|
|
||||||
if (__BYTE_ORDER == __BIG_ENDIAN)
|
|
||||||
vscr_offset = 12;
|
|
||||||
|
|
||||||
- /* Zero-pad the unused bytes in the fields for vscr and vrsave in
|
|
||||||
- case they get displayed somewhere. */
|
|
||||||
- memset (®set[32 * 16], 0, 16);
|
|
||||||
collect_register_by_name (regcache, "vscr",
|
|
||||||
®set[32 * 16 + vscr_offset]);
|
|
||||||
|
|
||||||
- memset (®set[33 * 16], 0, 16);
|
|
||||||
collect_register_by_name (regcache, "vrsave", ®set[33 * 16]);
|
|
||||||
}
|
|
||||||
|
|
||||||
diff --git a/gdb/ppc-linux-tdep.c b/gdb/ppc-linux-tdep.c
|
|
||||||
--- a/gdb/ppc-linux-tdep.c
|
|
||||||
+++ b/gdb/ppc-linux-tdep.c
|
|
||||||
@@ -444,24 +444,6 @@ ppc_linux_collect_gregset (const struct regset *regset,
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
-static void
|
|
||||||
-ppc_linux_collect_vrregset (const struct regset *regset,
|
|
||||||
- const struct regcache *regcache,
|
|
||||||
- int regnum, void *buf, size_t len)
|
|
||||||
-{
|
|
||||||
- gdb_byte *vrregs = (gdb_byte *) buf;
|
|
||||||
-
|
|
||||||
- /* Zero-pad the unused bytes in the fields for vscr and vrsave
|
|
||||||
- in case they get displayed somewhere (e.g. in core files). */
|
|
||||||
- if (regnum == PPC_VSCR_REGNUM || regnum == -1)
|
|
||||||
- memset (&vrregs[32 * 16], 0, 16);
|
|
||||||
-
|
|
||||||
- if (regnum == PPC_VRSAVE_REGNUM || regnum == -1)
|
|
||||||
- memset (&vrregs[33 * 16], 0, 16);
|
|
||||||
-
|
|
||||||
- regcache_collect_regset (regset, regcache, regnum, buf, len);
|
|
||||||
-}
|
|
||||||
-
|
|
||||||
/* Regset descriptions. */
|
|
||||||
static const struct ppc_reg_offsets ppc32_linux_reg_offsets =
|
|
||||||
{
|
|
||||||
@@ -544,13 +526,13 @@ static const struct regcache_map_entry ppc32_be_linux_vrregmap[] =
|
|
||||||
static const struct regset ppc32_le_linux_vrregset = {
|
|
||||||
ppc32_le_linux_vrregmap,
|
|
||||||
regcache_supply_regset,
|
|
||||||
- ppc_linux_collect_vrregset
|
|
||||||
+ regcache_collect_regset
|
|
||||||
};
|
|
||||||
|
|
||||||
static const struct regset ppc32_be_linux_vrregset = {
|
|
||||||
ppc32_be_linux_vrregmap,
|
|
||||||
regcache_supply_regset,
|
|
||||||
- ppc_linux_collect_vrregset
|
|
||||||
+ regcache_collect_regset
|
|
||||||
};
|
|
||||||
|
|
||||||
static const struct regcache_map_entry ppc32_linux_vsxregmap[] =
|
|
@ -1,34 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Keith Seitz <keiths@redhat.com>
|
|
||||||
Date: Fri, 11 Jan 2019 17:02:14 -0500
|
|
||||||
Subject: gdb-rhbz1187581-power8-regs-not-in-8.2-05of15.patch
|
|
||||||
|
|
||||||
;; Add decfloat registers to float reggroup
|
|
||||||
;; Pedro Franco de Carvalho, RH BZ 1187581
|
|
||||||
|
|
||||||
Add decfloat registers to float reggroup
|
|
||||||
|
|
||||||
This patch changes default_register_reggroup_p to return true when the
|
|
||||||
register type is decimal floating point and the reggroup is
|
|
||||||
float_reggroup.
|
|
||||||
|
|
||||||
gdb/ChangeLog:
|
|
||||||
2018-10-26 Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
|
|
||||||
* reggroups.c (default_register_reggroup_p): Return true for
|
|
||||||
decfloat registers and float_reggroup.
|
|
||||||
|
|
||||||
diff --git a/gdb/reggroups.c b/gdb/reggroups.c
|
|
||||||
--- a/gdb/reggroups.c
|
|
||||||
+++ b/gdb/reggroups.c
|
|
||||||
@@ -202,7 +202,9 @@ default_register_reggroup_p (struct gdbarch *gdbarch, int regnum,
|
|
||||||
if (group == all_reggroup)
|
|
||||||
return 1;
|
|
||||||
vector_p = TYPE_VECTOR (register_type (gdbarch, regnum));
|
|
||||||
- float_p = TYPE_CODE (register_type (gdbarch, regnum)) == TYPE_CODE_FLT;
|
|
||||||
+ float_p = (TYPE_CODE (register_type (gdbarch, regnum)) == TYPE_CODE_FLT
|
|
||||||
+ || (TYPE_CODE (register_type (gdbarch, regnum))
|
|
||||||
+ == TYPE_CODE_DECFLOAT));
|
|
||||||
raw_p = regnum < gdbarch_num_regs (gdbarch);
|
|
||||||
if (group == float_reggroup)
|
|
||||||
return float_p;
|
|
@ -1,72 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Keith Seitz <keiths@redhat.com>
|
|
||||||
Date: Fri, 11 Jan 2019 17:02:14 -0500
|
|
||||||
Subject: gdb-rhbz1187581-power8-regs-not-in-8.2-06of15.patch
|
|
||||||
|
|
||||||
;; [PowerPC] Remove rs6000_pseudo_register_reggroup_p
|
|
||||||
;; Pedro Franco de Carvalho, RH BZ 1187581
|
|
||||||
|
|
||||||
[PowerPC] Remove rs6000_pseudo_register_reggroup_p
|
|
||||||
|
|
||||||
This patch removes rs6000_pseudo_register_reggroup_p.
|
|
||||||
|
|
||||||
Group membership for the pseudoregisters can be detected through their
|
|
||||||
types in default_register_reggroup_p through
|
|
||||||
tdesc_register_reggroup_p.
|
|
||||||
|
|
||||||
gdb/ChangeLog:
|
|
||||||
2018-10-26 Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
|
|
||||||
* rs6000-tdep.c: Remove reggroups.h include.
|
|
||||||
(rs6000_pseudo_register_reggroup_p): Remove.
|
|
||||||
(rs6000_gdbarch_init): Remove call to
|
|
||||||
set_tdesc_pseudo_register_reggroup_p.
|
|
||||||
|
|
||||||
diff --git a/gdb/rs6000-tdep.c b/gdb/rs6000-tdep.c
|
|
||||||
--- a/gdb/rs6000-tdep.c
|
|
||||||
+++ b/gdb/rs6000-tdep.c
|
|
||||||
@@ -36,7 +36,6 @@
|
|
||||||
#include "infcall.h"
|
|
||||||
#include "sim-regno.h"
|
|
||||||
#include "gdb/sim-ppc.h"
|
|
||||||
-#include "reggroups.h"
|
|
||||||
#include "dwarf2-frame.h"
|
|
||||||
#include "target-descriptions.h"
|
|
||||||
#include "user-regs.h"
|
|
||||||
@@ -2461,27 +2460,6 @@ rs6000_pseudo_register_type (struct gdbarch *gdbarch, int regnum)
|
|
||||||
return builtin_type (gdbarch)->builtin_double;
|
|
||||||
}
|
|
||||||
|
|
||||||
-/* Is REGNUM a member of REGGROUP? */
|
|
||||||
-static int
|
|
||||||
-rs6000_pseudo_register_reggroup_p (struct gdbarch *gdbarch, int regnum,
|
|
||||||
- struct reggroup *group)
|
|
||||||
-{
|
|
||||||
- struct gdbarch_tdep *tdep = gdbarch_tdep (gdbarch);
|
|
||||||
-
|
|
||||||
- /* These are the only pseudo-registers we support. */
|
|
||||||
- gdb_assert (IS_SPE_PSEUDOREG (tdep, regnum)
|
|
||||||
- || IS_DFP_PSEUDOREG (tdep, regnum)
|
|
||||||
- || IS_VSX_PSEUDOREG (tdep, regnum)
|
|
||||||
- || IS_EFP_PSEUDOREG (tdep, regnum));
|
|
||||||
-
|
|
||||||
- /* These are the e500 pseudo-registers or the POWER7 VSX registers. */
|
|
||||||
- if (IS_SPE_PSEUDOREG (tdep, regnum) || IS_VSX_PSEUDOREG (tdep, regnum))
|
|
||||||
- return group == all_reggroup || group == vector_reggroup;
|
|
||||||
- else
|
|
||||||
- /* PPC decimal128 or Extended FP pseudo-registers. */
|
|
||||||
- return group == all_reggroup || group == float_reggroup;
|
|
||||||
-}
|
|
||||||
-
|
|
||||||
/* The register format for RS/6000 floating point registers is always
|
|
||||||
double, we need a conversion if the memory format is float. */
|
|
||||||
|
|
||||||
@@ -6493,8 +6471,6 @@ rs6000_gdbarch_init (struct gdbarch_info info, struct gdbarch_list *arches)
|
|
||||||
}
|
|
||||||
|
|
||||||
set_tdesc_pseudo_register_type (gdbarch, rs6000_pseudo_register_type);
|
|
||||||
- set_tdesc_pseudo_register_reggroup_p (gdbarch,
|
|
||||||
- rs6000_pseudo_register_reggroup_p);
|
|
||||||
tdesc_use_registers (gdbarch, tdesc, tdesc_data);
|
|
||||||
|
|
||||||
/* Override the normal target description method to make the SPE upper
|
|
@ -1,41 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Keith Seitz <keiths@redhat.com>
|
|
||||||
Date: Fri, 11 Jan 2019 17:02:15 -0500
|
|
||||||
Subject: gdb-rhbz1187581-power8-regs-not-in-8.2-07of15.patch
|
|
||||||
|
|
||||||
;; [PowerPC] Fix two if statements in gdb/ppc-linux-nat.c
|
|
||||||
;; Pedro Franco de Carvalho, RH BZ 1187581
|
|
||||||
|
|
||||||
[PowerPC] Fix two if statements in gdb/ppc-linux-nat.c
|
|
||||||
|
|
||||||
This patch changes two if statements to else if statements in
|
|
||||||
ppc-linux-nat.c:fetch_register for clarity.
|
|
||||||
|
|
||||||
gdb/ChangeLog:
|
|
||||||
2018-10-26 Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
|
|
||||||
* ppc-linux-nat.c (fetch_register): Change if statement to else
|
|
||||||
if.
|
|
||||||
(store_register): Likewise.
|
|
||||||
|
|
||||||
diff --git a/gdb/ppc-linux-nat.c b/gdb/ppc-linux-nat.c
|
|
||||||
--- a/gdb/ppc-linux-nat.c
|
|
||||||
+++ b/gdb/ppc-linux-nat.c
|
|
||||||
@@ -554,7 +554,7 @@ fetch_register (struct regcache *regcache, int tid, int regno)
|
|
||||||
AltiVec registers, fall through and return zeroes, because
|
|
||||||
regaddr will be -1 in this case. */
|
|
||||||
}
|
|
||||||
- if (vsx_register_p (gdbarch, regno))
|
|
||||||
+ else if (vsx_register_p (gdbarch, regno))
|
|
||||||
{
|
|
||||||
if (have_ptrace_getsetvsxregs)
|
|
||||||
{
|
|
||||||
@@ -933,7 +933,7 @@ store_register (const struct regcache *regcache, int tid, int regno)
|
|
||||||
store_altivec_registers (regcache, tid, regno);
|
|
||||||
return;
|
|
||||||
}
|
|
||||||
- if (vsx_register_p (gdbarch, regno))
|
|
||||||
+ else if (vsx_register_p (gdbarch, regno))
|
|
||||||
{
|
|
||||||
store_vsx_registers (regcache, tid, regno);
|
|
||||||
return;
|
|
@ -1,64 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Keith Seitz <keiths@redhat.com>
|
|
||||||
Date: Fri, 11 Jan 2019 17:02:15 -0500
|
|
||||||
Subject: gdb-rhbz1187581-power8-regs-not-in-8.2-08of15.patch
|
|
||||||
|
|
||||||
;; [PowerPC] Fix indentation in arch/ppc-linux-common.c
|
|
||||||
;; Pedro Franco de Carvalho, RH BZ 1187581
|
|
||||||
|
|
||||||
[PowerPC] Fix indentation in arch/ppc-linux-common.c
|
|
||||||
|
|
||||||
This patch parenthesizes the tdesc selection expressions in
|
|
||||||
arch/ppc-linux-common.c so that they can be tab-indented.
|
|
||||||
|
|
||||||
gdb/ChangeLog:
|
|
||||||
2018-10-26 Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
|
|
||||||
* arch/ppc-linux-common.c (ppc_linux_match_description):
|
|
||||||
Parenthesize tdesc assignements and indent them properly.
|
|
||||||
|
|
||||||
diff --git a/gdb/arch/ppc-linux-common.c b/gdb/arch/ppc-linux-common.c
|
|
||||||
--- a/gdb/arch/ppc-linux-common.c
|
|
||||||
+++ b/gdb/arch/ppc-linux-common.c
|
|
||||||
@@ -53,14 +53,14 @@ ppc_linux_match_description (struct ppc_linux_features features)
|
|
||||||
if (features.cell)
|
|
||||||
tdesc = tdesc_powerpc_cell64l;
|
|
||||||
else if (features.vsx)
|
|
||||||
- tdesc = features.isa205
|
|
||||||
- ? tdesc_powerpc_isa205_vsx64l : tdesc_powerpc_vsx64l;
|
|
||||||
+ tdesc = (features.isa205? tdesc_powerpc_isa205_vsx64l
|
|
||||||
+ : tdesc_powerpc_vsx64l);
|
|
||||||
else if (features.altivec)
|
|
||||||
- tdesc = features.isa205
|
|
||||||
- ? tdesc_powerpc_isa205_altivec64l : tdesc_powerpc_altivec64l;
|
|
||||||
+ tdesc = (features.isa205? tdesc_powerpc_isa205_altivec64l
|
|
||||||
+ : tdesc_powerpc_altivec64l);
|
|
||||||
else
|
|
||||||
- tdesc = features.isa205?
|
|
||||||
- tdesc_powerpc_isa205_64l : tdesc_powerpc_64l;
|
|
||||||
+ tdesc = (features.isa205? tdesc_powerpc_isa205_64l
|
|
||||||
+ : tdesc_powerpc_64l);
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
@@ -69,14 +69,14 @@ ppc_linux_match_description (struct ppc_linux_features features)
|
|
||||||
if (features.cell)
|
|
||||||
tdesc = tdesc_powerpc_cell32l;
|
|
||||||
else if (features.vsx)
|
|
||||||
- tdesc = features.isa205
|
|
||||||
- ? tdesc_powerpc_isa205_vsx32l : tdesc_powerpc_vsx32l;
|
|
||||||
+ tdesc = (features.isa205? tdesc_powerpc_isa205_vsx32l
|
|
||||||
+ : tdesc_powerpc_vsx32l);
|
|
||||||
else if (features.altivec)
|
|
||||||
- tdesc = features.isa205
|
|
||||||
- ? tdesc_powerpc_isa205_altivec32l : tdesc_powerpc_altivec32l;
|
|
||||||
+ tdesc = (features.isa205? tdesc_powerpc_isa205_altivec32l
|
|
||||||
+ : tdesc_powerpc_altivec32l);
|
|
||||||
else
|
|
||||||
- tdesc = features.isa205
|
|
||||||
- ? tdesc_powerpc_isa205_32l : tdesc_powerpc_32l;
|
|
||||||
+ tdesc = (features.isa205? tdesc_powerpc_isa205_32l
|
|
||||||
+ : tdesc_powerpc_32l);
|
|
||||||
}
|
|
||||||
|
|
||||||
gdb_assert (tdesc != NULL);
|
|
@ -1,36 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Keith Seitz <keiths@redhat.com>
|
|
||||||
Date: Fri, 11 Jan 2019 17:02:16 -0500
|
|
||||||
Subject: gdb-rhbz1187581-power8-regs-not-in-8.2-09of15.patch
|
|
||||||
|
|
||||||
;; [PowerPC] Refactor have_ initializers in rs6000-tdep.c
|
|
||||||
;; Pedro Franco de Carvalho, RH BZ 1187581
|
|
||||||
|
|
||||||
[PowerPC] Refactor have_ initializers in rs6000-tdep.c
|
|
||||||
|
|
||||||
This patch refactors a series of initializers in rs6000_gdbarch_init
|
|
||||||
for clarity. The have_fpu initializer is also changed to set the
|
|
||||||
variable to 0, like the other similar variables. This doesn't affect
|
|
||||||
program behavior.
|
|
||||||
|
|
||||||
gdb/ChangeLog:
|
|
||||||
2018-10-26 Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
|
|
||||||
* rs6000-tdep.c (rs6000_gdbarch_init): Replace line wrapping by a
|
|
||||||
second initializer line for the have_* variables. Initialize
|
|
||||||
have_fpu to 0 instead of 1.
|
|
||||||
|
|
||||||
diff --git a/gdb/rs6000-tdep.c b/gdb/rs6000-tdep.c
|
|
||||||
--- a/gdb/rs6000-tdep.c
|
|
||||||
+++ b/gdb/rs6000-tdep.c
|
|
||||||
@@ -5845,8 +5845,8 @@ rs6000_gdbarch_init (struct gdbarch_info info, struct gdbarch_list *arches)
|
|
||||||
enum powerpc_long_double_abi long_double_abi = POWERPC_LONG_DOUBLE_AUTO;
|
|
||||||
enum powerpc_vector_abi vector_abi = powerpc_vector_abi_global;
|
|
||||||
enum powerpc_elf_abi elf_abi = POWERPC_ELF_AUTO;
|
|
||||||
- int have_fpu = 1, have_spe = 0, have_mq = 0, have_altivec = 0, have_dfp = 0,
|
|
||||||
- have_vsx = 0;
|
|
||||||
+ int have_fpu = 0, have_spe = 0, have_mq = 0, have_altivec = 0;
|
|
||||||
+ int have_dfp = 0, have_vsx = 0;
|
|
||||||
int tdesc_wordsize = -1;
|
|
||||||
const struct target_desc *tdesc = info.target_desc;
|
|
||||||
struct tdesc_arch_data *tdesc_data = NULL;
|
|
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
@ -1,779 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Keith Seitz <keiths@redhat.com>
|
|
||||||
Date: Fri, 11 Jan 2019 17:02:17 -0500
|
|
||||||
Subject: gdb-rhbz1187581-power8-regs-not-in-8.2-12of15.patch
|
|
||||||
|
|
||||||
;; [PowerPC] Add support for EBB and PMU registers
|
|
||||||
;; Edjunior Barbosa Machado and Pedro Franco de Carvalho, RH BZ 1187581m
|
|
||||||
|
|
||||||
[PowerPC] Add support for EBB and PMU registers
|
|
||||||
|
|
||||||
This patch adds support for registers of the Event Based Branching and
|
|
||||||
Performance Monitoring Units for the powerpc linux native and core
|
|
||||||
file targets, and for the powerpc linux server stub.
|
|
||||||
|
|
||||||
All three EBB registers are accessible. Only a subset of the PMU
|
|
||||||
registers can be accessed through ptrace. Because of this, the PMU
|
|
||||||
registers are enumerated individually in gdbarch_tdep, as opposed to
|
|
||||||
having a single "have_pmu" flag. This is intended to make it easier
|
|
||||||
to add additional PMU registers in the future, since checking a
|
|
||||||
"have_pmu" flag elsewhere in the code would no longer be correct. The
|
|
||||||
tdesc feature is named org.gnu.gdb.power.linux.pmu because of this.
|
|
||||||
|
|
||||||
It's unclear if it makes sense to save and restore these registers
|
|
||||||
across function calls, since some of them can be modified
|
|
||||||
asynchronously. They are also not tracked in record-replay mode.
|
|
||||||
|
|
||||||
The kernel can return ENODATA when ptrace is used to get the EBB
|
|
||||||
registers, unless a linux performance event that uses EBB is open in
|
|
||||||
the inferior. For this reason, the "fill" functions in the server
|
|
||||||
stub for the ebb register sets is not implemented.
|
|
||||||
|
|
||||||
Since gdbserver writes all registers in one go before resuming the
|
|
||||||
inferior, this error would not be detected at the time the user tries
|
|
||||||
to write to one of the registers on the client side, and gdbserver
|
|
||||||
would print out warnings every time it resumes the inferior when no
|
|
||||||
ebb performance event is opened, so there is currently no
|
|
||||||
straightforward way to handle this case. This means the ebb registers
|
|
||||||
in the client-side regcache can become dirty when the user tries to
|
|
||||||
write to them, until the inferior is resumed and stopped again.
|
|
||||||
|
|
||||||
A related issue is that 'G' packets used to write to unrelated
|
|
||||||
registers will include bad data for the EBB registers if they are
|
|
||||||
unavailable, since no register status information is included in the
|
|
||||||
'G' packet. This data won't be written to the inferior by the
|
|
||||||
gdbserver stub because the "fill" functions are not implemented, and
|
|
||||||
currently the gdbserver stub doesn't change the status of the
|
|
||||||
registers in its own regcache in response to 'G' packets.
|
|
||||||
|
|
||||||
Another limitation for the ebb registers is that traceframes don't
|
|
||||||
record if registers are available or not, so if these registers are
|
|
||||||
collected when a tracepoint is hit and the inferior has no ebb event
|
|
||||||
opened, the user will see zero values for all of them, instead of the
|
|
||||||
usual <unavailable>.
|
|
||||||
|
|
||||||
Because these registers are often unavailable, trying to store them
|
|
||||||
with target_store_registers with -1 for the regno argument (all
|
|
||||||
registers) would almost always fail, so they are ignored in this case.
|
|
||||||
|
|
||||||
gdb/ChangeLog:
|
|
||||||
2018-10-26 Edjunior Barbosa Machado <emachado@linux.vnet.ibm.com>
|
|
||||||
Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
|
|
||||||
* arch/ppc-linux-common.h (PPC_LINUX_SIZEOF_EBBREGSET)
|
|
||||||
(PPC_LINUX_SIZEOF_PMUREGSET): Declare.
|
|
||||||
* nat/ppc-linux.h (PPC_FEATURE2_EBB, NT_PPC_EBB, NT_PPC_PMU):
|
|
||||||
Define if not already defined.
|
|
||||||
* features/rs6000/power-ebb.xml: New file.
|
|
||||||
* features/rs6000/power-linux-pmu.xml: New file.
|
|
||||||
* features/rs6000/powerpc-isa207-vsx32l.xml: Include ebb and pmu
|
|
||||||
features.
|
|
||||||
* features/rs6000/powerpc-isa207-vsx64l.xml: Likewise.
|
|
||||||
* features/rs6000/powerpc-isa207-vsx32l.c: Re-generate.
|
|
||||||
* features/rs6000/powerpc-isa207-vsx64l.c: Re-generate.
|
|
||||||
* regformats/rs6000/powerpc-isa207-vsx32l.dat: Re-generate.
|
|
||||||
* regformats/rs6000/powerpc-isa207-vsx64l.dat: Re-generate.
|
|
||||||
* ppc-linux-nat.c (fetch_register, fetch_ppc_registers): Call
|
|
||||||
fetch_regset with ebb and pmu regsets.
|
|
||||||
(store_register, store_ppc_registers): Call store_regset with ebb
|
|
||||||
and pmu regsets.
|
|
||||||
(ppc_linux_nat_target::read_description): Set isa207 field in the
|
|
||||||
features struct if ebb and pmu are avaiable.
|
|
||||||
* ppc-linux-tdep.c (ppc32_regmap_ebb, ppc32_regmap_pmu)
|
|
||||||
(ppc32_linux_ebbregset, ppc32_linux_pmuregset): New globals.
|
|
||||||
(ppc_linux_iterate_over_regset_sections): Call back with the ebb
|
|
||||||
and pmu regsets.
|
|
||||||
(ppc_linux_core_read_description): Check if the pmu section is
|
|
||||||
present and set isa207 in the features struct.
|
|
||||||
* ppc-linux-tdep.h (ppc32_linux_ebbregset)
|
|
||||||
(ppc32_linux_pmuregset): Declare.
|
|
||||||
* ppc-tdep.h (struct gdbarch_tdep) <ppc_mmcr0_regnum>: New field.
|
|
||||||
<ppc_mmcr2_regnum, ppc_siar_regnum, ppc_sdar_regnum>: New fields.
|
|
||||||
<ppc_sier_regnum>: New field.
|
|
||||||
(enum): <PPC_BESCR_REGNUM, PPC_EBBHR_REGNUM, PPC_EBBRR_REGNUM>:
|
|
||||||
New enum values.
|
|
||||||
<PPC_MMCR0_REGNUM, PPC_MMCR2_REGNUM, PPC_SIAR_REGNUM>: New enum
|
|
||||||
values.
|
|
||||||
<PPC_SDAR_REGNUM, PPC_SIER_REGNUM>: New enum values.
|
|
||||||
(PPC_IS_EBB_REGNUM, PPC_IS_PMU_REGNUM): Define.
|
|
||||||
* rs6000-tdep.c (rs6000_gdbarch_init): Look for and validate the
|
|
||||||
ebb and pmu features.
|
|
||||||
|
|
||||||
gdb/gdbserver/ChangeLog:
|
|
||||||
2018-10-26 Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
|
|
||||||
* configure.srv (powerpc*-*-linux*): Add rs6000/power-ebb.xml and
|
|
||||||
rs6000/power-linux-pmu.xml to srv_xmlfiles.
|
|
||||||
* linux-ppc-low.c (ppc_store_ebbregset, ppc_fill_pmuregset)
|
|
||||||
(ppc_store_pmuregset): New functions.
|
|
||||||
(ppc_regsets): Add entries for ebb and pmu regsets.
|
|
||||||
(ppc_arch_setup): Set isa207 in features struct if the ebb and
|
|
||||||
pmu regsets are available. Set sizes for these regsets.
|
|
||||||
|
|
||||||
gdb/doc/ChangeLog:
|
|
||||||
2018-10-26 Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
|
|
||||||
* gdb.texinfo (PowerPC Features): Describe new features
|
|
||||||
"org.gnu.gdb.power.ebb" and "org.gnu.gdb.power.linux.pmu".
|
|
||||||
|
|
||||||
diff --git a/gdb/arch/ppc-linux-common.h b/gdb/arch/ppc-linux-common.h
|
|
||||||
--- a/gdb/arch/ppc-linux-common.h
|
|
||||||
+++ b/gdb/arch/ppc-linux-common.h
|
|
||||||
@@ -33,6 +33,8 @@ struct target_desc;
|
|
||||||
#define PPC_LINUX_SIZEOF_PPRREGSET 8
|
|
||||||
#define PPC_LINUX_SIZEOF_DSCRREGSET 8
|
|
||||||
#define PPC_LINUX_SIZEOF_TARREGSET 8
|
|
||||||
+#define PPC_LINUX_SIZEOF_EBBREGSET (3*8)
|
|
||||||
+#define PPC_LINUX_SIZEOF_PMUREGSET (5*8)
|
|
||||||
|
|
||||||
/* Check if the hwcap auxv entry indicates that isa205 is supported. */
|
|
||||||
bool ppc_linux_has_isa205 (CORE_ADDR hwcap);
|
|
||||||
diff --git a/gdb/doc/gdb.texinfo b/gdb/doc/gdb.texinfo
|
|
||||||
--- a/gdb/doc/gdb.texinfo
|
|
||||||
+++ b/gdb/doc/gdb.texinfo
|
|
||||||
@@ -42564,6 +42564,15 @@ contain the 64-bit register @samp{dscr}.
|
|
||||||
The @samp{org.gnu.gdb.power.tar} feature is optional. It should
|
|
||||||
contain the 64-bit register @samp{tar}.
|
|
||||||
|
|
||||||
+The @samp{org.gnu.gdb.power.ebb} feature is optional. It should
|
|
||||||
+contain registers @samp{bescr}, @samp{ebbhr} and @samp{ebbrr}, all
|
|
||||||
+64-bit wide.
|
|
||||||
+
|
|
||||||
+The @samp{org.gnu.gdb.power.linux.pmu} feature is optional. It should
|
|
||||||
+contain registers @samp{mmcr0}, @samp{mmcr2}, @samp{siar}, @samp{sdar}
|
|
||||||
+and @samp{sier}, all 64-bit wide. This is the subset of the isa 2.07
|
|
||||||
+server PMU registers provided by @sc{gnu}/Linux.
|
|
||||||
+
|
|
||||||
@node S/390 and System z Features
|
|
||||||
@subsection S/390 and System z Features
|
|
||||||
@cindex target descriptions, S/390 features
|
|
||||||
diff --git a/gdb/features/rs6000/power-ebb.xml b/gdb/features/rs6000/power-ebb.xml
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/features/rs6000/power-ebb.xml
|
|
||||||
@@ -0,0 +1,14 @@
|
|
||||||
+<?xml version="1.0"?>
|
|
||||||
+<!-- Copyright (C) 2018 Free Software Foundation, Inc.
|
|
||||||
+
|
|
||||||
+ Copying and distribution of this file, with or without modification,
|
|
||||||
+ are permitted in any medium without royalty provided the copyright
|
|
||||||
+ notice and this notice are preserved. -->
|
|
||||||
+
|
|
||||||
+<!-- POWER8 Event-based Branching Registers. -->
|
|
||||||
+<!DOCTYPE feature SYSTEM "gdb-target.dtd">
|
|
||||||
+<feature name="org.gnu.gdb.power.ebb">
|
|
||||||
+ <reg name="bescr" bitsize="64" type="uint64" save-restore="no"/>
|
|
||||||
+ <reg name="ebbhr" bitsize="64" type="uint64" save-restore="no"/>
|
|
||||||
+ <reg name="ebbrr" bitsize="64" type="uint64" save-restore="no"/>
|
|
||||||
+</feature>
|
|
||||||
diff --git a/gdb/features/rs6000/power-linux-pmu.xml b/gdb/features/rs6000/power-linux-pmu.xml
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/features/rs6000/power-linux-pmu.xml
|
|
||||||
@@ -0,0 +1,17 @@
|
|
||||||
+<?xml version="1.0"?>
|
|
||||||
+<!-- Copyright (C) 2018 Free Software Foundation, Inc.
|
|
||||||
+
|
|
||||||
+ Copying and distribution of this file, with or without modification,
|
|
||||||
+ are permitted in any medium without royalty provided the copyright
|
|
||||||
+ notice and this notice are preserved. -->
|
|
||||||
+
|
|
||||||
+<!-- Subset of the POWER8 ISA 2.07 Performance Monitor Registers
|
|
||||||
+ provided by Linux. -->
|
|
||||||
+<!DOCTYPE feature SYSTEM "gdb-target.dtd">
|
|
||||||
+<feature name="org.gnu.gdb.power.linux.pmu">
|
|
||||||
+ <reg name="mmcr0" bitsize="64" type="uint64" save-restore="no"/>
|
|
||||||
+ <reg name="mmcr2" bitsize="64" type="uint64" save-restore="no"/>
|
|
||||||
+ <reg name="siar" bitsize="64" type="uint64" save-restore="no"/>
|
|
||||||
+ <reg name="sdar" bitsize="64" type="uint64" save-restore="no"/>
|
|
||||||
+ <reg name="sier" bitsize="64" type="uint64" save-restore="no"/>
|
|
||||||
+</feature>
|
|
||||||
diff --git a/gdb/features/rs6000/powerpc-isa207-vsx32l.c b/gdb/features/rs6000/powerpc-isa207-vsx32l.c
|
|
||||||
--- a/gdb/features/rs6000/powerpc-isa207-vsx32l.c
|
|
||||||
+++ b/gdb/features/rs6000/powerpc-isa207-vsx32l.c
|
|
||||||
@@ -199,5 +199,17 @@ initialize_tdesc_powerpc_isa207_vsx32l (void)
|
|
||||||
feature = tdesc_create_feature (result, "org.gnu.gdb.power.tar");
|
|
||||||
tdesc_create_reg (feature, "tar", 141, 1, NULL, 64, "uint64");
|
|
||||||
|
|
||||||
+ feature = tdesc_create_feature (result, "org.gnu.gdb.power.ebb");
|
|
||||||
+ tdesc_create_reg (feature, "bescr", 142, 0, NULL, 64, "uint64");
|
|
||||||
+ tdesc_create_reg (feature, "ebbhr", 143, 0, NULL, 64, "uint64");
|
|
||||||
+ tdesc_create_reg (feature, "ebbrr", 144, 0, NULL, 64, "uint64");
|
|
||||||
+
|
|
||||||
+ feature = tdesc_create_feature (result, "org.gnu.gdb.power.linux.pmu");
|
|
||||||
+ tdesc_create_reg (feature, "mmcr0", 145, 0, NULL, 64, "uint64");
|
|
||||||
+ tdesc_create_reg (feature, "mmcr2", 146, 0, NULL, 64, "uint64");
|
|
||||||
+ tdesc_create_reg (feature, "siar", 147, 0, NULL, 64, "uint64");
|
|
||||||
+ tdesc_create_reg (feature, "sdar", 148, 0, NULL, 64, "uint64");
|
|
||||||
+ tdesc_create_reg (feature, "sier", 149, 0, NULL, 64, "uint64");
|
|
||||||
+
|
|
||||||
tdesc_powerpc_isa207_vsx32l = result;
|
|
||||||
}
|
|
||||||
diff --git a/gdb/features/rs6000/powerpc-isa207-vsx32l.xml b/gdb/features/rs6000/powerpc-isa207-vsx32l.xml
|
|
||||||
--- a/gdb/features/rs6000/powerpc-isa207-vsx32l.xml
|
|
||||||
+++ b/gdb/features/rs6000/powerpc-isa207-vsx32l.xml
|
|
||||||
@@ -16,4 +16,6 @@
|
|
||||||
<xi:include href="power-ppr.xml"/>
|
|
||||||
<xi:include href="power-dscr.xml"/>
|
|
||||||
<xi:include href="power-tar.xml"/>
|
|
||||||
+ <xi:include href="power-ebb.xml"/>
|
|
||||||
+ <xi:include href="power-linux-pmu.xml"/>
|
|
||||||
</target>
|
|
||||||
diff --git a/gdb/features/rs6000/powerpc-isa207-vsx64l.c b/gdb/features/rs6000/powerpc-isa207-vsx64l.c
|
|
||||||
--- a/gdb/features/rs6000/powerpc-isa207-vsx64l.c
|
|
||||||
+++ b/gdb/features/rs6000/powerpc-isa207-vsx64l.c
|
|
||||||
@@ -199,5 +199,17 @@ initialize_tdesc_powerpc_isa207_vsx64l (void)
|
|
||||||
feature = tdesc_create_feature (result, "org.gnu.gdb.power.tar");
|
|
||||||
tdesc_create_reg (feature, "tar", 141, 1, NULL, 64, "uint64");
|
|
||||||
|
|
||||||
+ feature = tdesc_create_feature (result, "org.gnu.gdb.power.ebb");
|
|
||||||
+ tdesc_create_reg (feature, "bescr", 142, 0, NULL, 64, "uint64");
|
|
||||||
+ tdesc_create_reg (feature, "ebbhr", 143, 0, NULL, 64, "uint64");
|
|
||||||
+ tdesc_create_reg (feature, "ebbrr", 144, 0, NULL, 64, "uint64");
|
|
||||||
+
|
|
||||||
+ feature = tdesc_create_feature (result, "org.gnu.gdb.power.linux.pmu");
|
|
||||||
+ tdesc_create_reg (feature, "mmcr0", 145, 0, NULL, 64, "uint64");
|
|
||||||
+ tdesc_create_reg (feature, "mmcr2", 146, 0, NULL, 64, "uint64");
|
|
||||||
+ tdesc_create_reg (feature, "siar", 147, 0, NULL, 64, "uint64");
|
|
||||||
+ tdesc_create_reg (feature, "sdar", 148, 0, NULL, 64, "uint64");
|
|
||||||
+ tdesc_create_reg (feature, "sier", 149, 0, NULL, 64, "uint64");
|
|
||||||
+
|
|
||||||
tdesc_powerpc_isa207_vsx64l = result;
|
|
||||||
}
|
|
||||||
diff --git a/gdb/features/rs6000/powerpc-isa207-vsx64l.xml b/gdb/features/rs6000/powerpc-isa207-vsx64l.xml
|
|
||||||
--- a/gdb/features/rs6000/powerpc-isa207-vsx64l.xml
|
|
||||||
+++ b/gdb/features/rs6000/powerpc-isa207-vsx64l.xml
|
|
||||||
@@ -16,4 +16,6 @@
|
|
||||||
<xi:include href="power-ppr.xml"/>
|
|
||||||
<xi:include href="power-dscr.xml"/>
|
|
||||||
<xi:include href="power-tar.xml"/>
|
|
||||||
+ <xi:include href="power-ebb.xml"/>
|
|
||||||
+ <xi:include href="power-linux-pmu.xml"/>
|
|
||||||
</target>
|
|
||||||
diff --git a/gdb/gdbserver/configure.srv b/gdb/gdbserver/configure.srv
|
|
||||||
--- a/gdb/gdbserver/configure.srv
|
|
||||||
+++ b/gdb/gdbserver/configure.srv
|
|
||||||
@@ -249,6 +249,8 @@ case "${target}" in
|
|
||||||
srv_xmlfiles="${srv_xmlfiles} rs6000/power-dscr.xml"
|
|
||||||
srv_xmlfiles="${srv_xmlfiles} rs6000/power-ppr.xml"
|
|
||||||
srv_xmlfiles="${srv_xmlfiles} rs6000/power-tar.xml"
|
|
||||||
+ srv_xmlfiles="${srv_xmlfiles} rs6000/power-ebb.xml"
|
|
||||||
+ srv_xmlfiles="${srv_xmlfiles} rs6000/power-linux-pmu.xml"
|
|
||||||
srv_xmlfiles="${srv_xmlfiles} rs6000/powerpc-e500l.xml"
|
|
||||||
srv_xmlfiles="${srv_xmlfiles} rs6000/power-spe.xml"
|
|
||||||
srv_xmlfiles="${srv_xmlfiles} rs6000/powerpc-64l.xml"
|
|
||||||
diff --git a/gdb/gdbserver/linux-ppc-low.c b/gdb/gdbserver/linux-ppc-low.c
|
|
||||||
--- a/gdb/gdbserver/linux-ppc-low.c
|
|
||||||
+++ b/gdb/gdbserver/linux-ppc-low.c
|
|
||||||
@@ -545,6 +545,61 @@ ppc_store_tarregset (struct regcache *regcache, const void *buf)
|
|
||||||
supply_register_by_name (regcache, "tar", tar);
|
|
||||||
}
|
|
||||||
|
|
||||||
+/* Event-Based Branching regset store function. Unless the inferior
|
|
||||||
+ has a perf event open, ptrace can return in error when reading and
|
|
||||||
+ writing to the regset, with ENODATA. For reading, the registers
|
|
||||||
+ will correctly show as unavailable. For writing, gdbserver
|
|
||||||
+ currently only caches any register writes from P and G packets and
|
|
||||||
+ the stub always tries to write all the regsets when resuming the
|
|
||||||
+ inferior, which would result in frequent warnings. For this
|
|
||||||
+ reason, we don't define a fill function. This also means that the
|
|
||||||
+ client-side regcache will be dirty if the user tries to write to
|
|
||||||
+ the EBB registers. G packets that the client sends to write to
|
|
||||||
+ unrelated registers will also include data for EBB registers, even
|
|
||||||
+ if they are unavailable. */
|
|
||||||
+
|
|
||||||
+static void
|
|
||||||
+ppc_store_ebbregset (struct regcache *regcache, const void *buf)
|
|
||||||
+{
|
|
||||||
+ const char *regset = (const char *) buf;
|
|
||||||
+
|
|
||||||
+ /* The order in the kernel regset is: EBBRR, EBBHR, BESCR. In the
|
|
||||||
+ .dat file is BESCR, EBBHR, EBBRR. */
|
|
||||||
+ supply_register_by_name (regcache, "ebbrr", ®set[0]);
|
|
||||||
+ supply_register_by_name (regcache, "ebbhr", ®set[8]);
|
|
||||||
+ supply_register_by_name (regcache, "bescr", ®set[16]);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+/* Performance Monitoring Unit regset fill function. */
|
|
||||||
+
|
|
||||||
+static void
|
|
||||||
+ppc_fill_pmuregset (struct regcache *regcache, void *buf)
|
|
||||||
+{
|
|
||||||
+ char *regset = (char *) buf;
|
|
||||||
+
|
|
||||||
+ /* The order in the kernel regset is SIAR, SDAR, SIER, MMCR2, MMCR0.
|
|
||||||
+ In the .dat file is MMCR0, MMCR2, SIAR, SDAR, SIER. */
|
|
||||||
+ collect_register_by_name (regcache, "siar", ®set[0]);
|
|
||||||
+ collect_register_by_name (regcache, "sdar", ®set[8]);
|
|
||||||
+ collect_register_by_name (regcache, "sier", ®set[16]);
|
|
||||||
+ collect_register_by_name (regcache, "mmcr2", ®set[24]);
|
|
||||||
+ collect_register_by_name (regcache, "mmcr0", ®set[32]);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+/* Performance Monitoring Unit regset store function. */
|
|
||||||
+
|
|
||||||
+static void
|
|
||||||
+ppc_store_pmuregset (struct regcache *regcache, const void *buf)
|
|
||||||
+{
|
|
||||||
+ const char *regset = (const char *) buf;
|
|
||||||
+
|
|
||||||
+ supply_register_by_name (regcache, "siar", ®set[0]);
|
|
||||||
+ supply_register_by_name (regcache, "sdar", ®set[8]);
|
|
||||||
+ supply_register_by_name (regcache, "sier", ®set[16]);
|
|
||||||
+ supply_register_by_name (regcache, "mmcr2", ®set[24]);
|
|
||||||
+ supply_register_by_name (regcache, "mmcr0", ®set[32]);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
static void
|
|
||||||
ppc_fill_vsxregset (struct regcache *regcache, void *buf)
|
|
||||||
{
|
|
||||||
@@ -654,6 +709,10 @@ static struct regset_info ppc_regsets[] = {
|
|
||||||
fetch them every time, but still fall back to PTRACE_PEEKUSER for the
|
|
||||||
general registers. Some kernels support these, but not the newer
|
|
||||||
PPC_PTRACE_GETREGS. */
|
|
||||||
+ { PTRACE_GETREGSET, PTRACE_SETREGSET, NT_PPC_EBB, 0, EXTENDED_REGS,
|
|
||||||
+ NULL, ppc_store_ebbregset },
|
|
||||||
+ { PTRACE_GETREGSET, PTRACE_SETREGSET, NT_PPC_PMU, 0, EXTENDED_REGS,
|
|
||||||
+ ppc_fill_pmuregset, ppc_store_pmuregset },
|
|
||||||
{ PTRACE_GETREGSET, PTRACE_SETREGSET, NT_PPC_TAR, 0, EXTENDED_REGS,
|
|
||||||
ppc_fill_tarregset, ppc_store_tarregset },
|
|
||||||
{ PTRACE_GETREGSET, PTRACE_SETREGSET, NT_PPC_PPR, 0, EXTENDED_REGS,
|
|
||||||
@@ -734,8 +793,13 @@ ppc_arch_setup (void)
|
|
||||||
features.ppr_dscr = true;
|
|
||||||
if ((ppc_hwcap2 & PPC_FEATURE2_ARCH_2_07)
|
|
||||||
&& (ppc_hwcap2 & PPC_FEATURE2_TAR)
|
|
||||||
+ && (ppc_hwcap2 & PPC_FEATURE2_EBB)
|
|
||||||
&& ppc_check_regset (tid, NT_PPC_TAR,
|
|
||||||
- PPC_LINUX_SIZEOF_TARREGSET))
|
|
||||||
+ PPC_LINUX_SIZEOF_TARREGSET)
|
|
||||||
+ && ppc_check_regset (tid, NT_PPC_EBB,
|
|
||||||
+ PPC_LINUX_SIZEOF_EBBREGSET)
|
|
||||||
+ && ppc_check_regset (tid, NT_PPC_PMU,
|
|
||||||
+ PPC_LINUX_SIZEOF_PMUREGSET))
|
|
||||||
features.isa207 = true;
|
|
||||||
}
|
|
||||||
|
|
||||||
@@ -798,6 +862,14 @@ ppc_arch_setup (void)
|
|
||||||
regset->size = (features.isa207 ?
|
|
||||||
PPC_LINUX_SIZEOF_TARREGSET : 0);
|
|
||||||
break;
|
|
||||||
+ case NT_PPC_EBB:
|
|
||||||
+ regset->size = (features.isa207 ?
|
|
||||||
+ PPC_LINUX_SIZEOF_EBBREGSET : 0);
|
|
||||||
+ break;
|
|
||||||
+ case NT_PPC_PMU:
|
|
||||||
+ regset->size = (features.isa207 ?
|
|
||||||
+ PPC_LINUX_SIZEOF_PMUREGSET : 0);
|
|
||||||
+ break;
|
|
||||||
default:
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
diff --git a/gdb/nat/ppc-linux.h b/gdb/nat/ppc-linux.h
|
|
||||||
--- a/gdb/nat/ppc-linux.h
|
|
||||||
+++ b/gdb/nat/ppc-linux.h
|
|
||||||
@@ -60,6 +60,9 @@
|
|
||||||
#ifndef PPC_FEATURE2_TAR
|
|
||||||
#define PPC_FEATURE2_TAR 0x04000000
|
|
||||||
#endif
|
|
||||||
+#ifndef PPC_FEATURE2_EBB
|
|
||||||
+#define PPC_FEATURE2_EBB 0x10000000
|
|
||||||
+#endif
|
|
||||||
|
|
||||||
/* Glibc's headers don't define PTRACE_GETVRREGS so we cannot use a
|
|
||||||
configure time check. Some older glibc's (for instance 2.2.1)
|
|
||||||
@@ -106,6 +109,16 @@
|
|
||||||
#define NT_PPC_DSCR 0x105
|
|
||||||
#endif
|
|
||||||
|
|
||||||
+/* Event Based Branch Registers. */
|
|
||||||
+#ifndef NT_PPC_EBB
|
|
||||||
+#define NT_PPC_EBB 0x106
|
|
||||||
+#endif
|
|
||||||
+
|
|
||||||
+/* Performance Monitor Registers. */
|
|
||||||
+#ifndef NT_PPC_PMU
|
|
||||||
+#define NT_PPC_PMU 0x107
|
|
||||||
+#endif
|
|
||||||
+
|
|
||||||
/* Return the wordsize of the target, either 4 or 8 bytes. */
|
|
||||||
int ppc_linux_target_wordsize (int tid);
|
|
||||||
|
|
||||||
diff --git a/gdb/ppc-linux-nat.c b/gdb/ppc-linux-nat.c
|
|
||||||
--- a/gdb/ppc-linux-nat.c
|
|
||||||
+++ b/gdb/ppc-linux-nat.c
|
|
||||||
@@ -667,6 +667,24 @@ fetch_register (struct regcache *regcache, int tid, int regno)
|
|
||||||
&ppc32_linux_tarregset);
|
|
||||||
return;
|
|
||||||
}
|
|
||||||
+ else if (PPC_IS_EBB_REGNUM (regno))
|
|
||||||
+ {
|
|
||||||
+ gdb_assert (tdep->have_ebb);
|
|
||||||
+
|
|
||||||
+ fetch_regset (regcache, tid, NT_PPC_EBB,
|
|
||||||
+ PPC_LINUX_SIZEOF_EBBREGSET,
|
|
||||||
+ &ppc32_linux_ebbregset);
|
|
||||||
+ return;
|
|
||||||
+ }
|
|
||||||
+ else if (PPC_IS_PMU_REGNUM (regno))
|
|
||||||
+ {
|
|
||||||
+ gdb_assert (tdep->ppc_mmcr0_regnum != -1);
|
|
||||||
+
|
|
||||||
+ fetch_regset (regcache, tid, NT_PPC_PMU,
|
|
||||||
+ PPC_LINUX_SIZEOF_PMUREGSET,
|
|
||||||
+ &ppc32_linux_pmuregset);
|
|
||||||
+ return;
|
|
||||||
+ }
|
|
||||||
|
|
||||||
if (regaddr == -1)
|
|
||||||
{
|
|
||||||
@@ -875,6 +893,14 @@ fetch_ppc_registers (struct regcache *regcache, int tid)
|
|
||||||
fetch_regset (regcache, tid, NT_PPC_TAR,
|
|
||||||
PPC_LINUX_SIZEOF_TARREGSET,
|
|
||||||
&ppc32_linux_tarregset);
|
|
||||||
+ if (tdep->have_ebb)
|
|
||||||
+ fetch_regset (regcache, tid, NT_PPC_EBB,
|
|
||||||
+ PPC_LINUX_SIZEOF_EBBREGSET,
|
|
||||||
+ &ppc32_linux_ebbregset);
|
|
||||||
+ if (tdep->ppc_mmcr0_regnum != -1)
|
|
||||||
+ fetch_regset (regcache, tid, NT_PPC_PMU,
|
|
||||||
+ PPC_LINUX_SIZEOF_PMUREGSET,
|
|
||||||
+ &ppc32_linux_pmuregset);
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Fetch registers from the child process. Fetch all registers if
|
|
||||||
@@ -1082,6 +1108,24 @@ store_register (const struct regcache *regcache, int tid, int regno)
|
|
||||||
&ppc32_linux_tarregset);
|
|
||||||
return;
|
|
||||||
}
|
|
||||||
+ else if (PPC_IS_EBB_REGNUM (regno))
|
|
||||||
+ {
|
|
||||||
+ gdb_assert (tdep->have_ebb);
|
|
||||||
+
|
|
||||||
+ store_regset (regcache, tid, regno, NT_PPC_EBB,
|
|
||||||
+ PPC_LINUX_SIZEOF_EBBREGSET,
|
|
||||||
+ &ppc32_linux_ebbregset);
|
|
||||||
+ return;
|
|
||||||
+ }
|
|
||||||
+ else if (PPC_IS_PMU_REGNUM (regno))
|
|
||||||
+ {
|
|
||||||
+ gdb_assert (tdep->ppc_mmcr0_regnum != -1);
|
|
||||||
+
|
|
||||||
+ store_regset (regcache, tid, regno, NT_PPC_PMU,
|
|
||||||
+ PPC_LINUX_SIZEOF_PMUREGSET,
|
|
||||||
+ &ppc32_linux_pmuregset);
|
|
||||||
+ return;
|
|
||||||
+ }
|
|
||||||
|
|
||||||
if (regaddr == -1)
|
|
||||||
return;
|
|
||||||
@@ -1308,6 +1352,15 @@ store_ppc_registers (const struct regcache *regcache, int tid)
|
|
||||||
store_regset (regcache, tid, -1, NT_PPC_TAR,
|
|
||||||
PPC_LINUX_SIZEOF_TARREGSET,
|
|
||||||
&ppc32_linux_tarregset);
|
|
||||||
+
|
|
||||||
+ if (tdep->ppc_mmcr0_regnum != -1)
|
|
||||||
+ store_regset (regcache, tid, -1, NT_PPC_PMU,
|
|
||||||
+ PPC_LINUX_SIZEOF_PMUREGSET,
|
|
||||||
+ &ppc32_linux_pmuregset);
|
|
||||||
+
|
|
||||||
+ /* Because the EBB registers can be unavailable, attempts to store
|
|
||||||
+ them here would cause this function to fail most of the time, so
|
|
||||||
+ we ignore them. */
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Fetch the AT_HWCAP entry from the aux vector. */
|
|
||||||
@@ -2439,7 +2492,10 @@ ppc_linux_nat_target::read_description ()
|
|
||||||
features.ppr_dscr = true;
|
|
||||||
if ((hwcap2 & PPC_FEATURE2_ARCH_2_07)
|
|
||||||
&& (hwcap2 & PPC_FEATURE2_TAR)
|
|
||||||
- && check_regset (tid, NT_PPC_TAR, PPC_LINUX_SIZEOF_TARREGSET))
|
|
||||||
+ && (hwcap2 & PPC_FEATURE2_EBB)
|
|
||||||
+ && check_regset (tid, NT_PPC_TAR, PPC_LINUX_SIZEOF_TARREGSET)
|
|
||||||
+ && check_regset (tid, NT_PPC_EBB, PPC_LINUX_SIZEOF_EBBREGSET)
|
|
||||||
+ && check_regset (tid, NT_PPC_PMU, PPC_LINUX_SIZEOF_PMUREGSET))
|
|
||||||
features.isa207 = true;
|
|
||||||
}
|
|
||||||
|
|
||||||
diff --git a/gdb/ppc-linux-tdep.c b/gdb/ppc-linux-tdep.c
|
|
||||||
--- a/gdb/ppc-linux-tdep.c
|
|
||||||
+++ b/gdb/ppc-linux-tdep.c
|
|
||||||
@@ -599,6 +599,44 @@ const struct regset ppc32_linux_tarregset = {
|
|
||||||
regcache_collect_regset
|
|
||||||
};
|
|
||||||
|
|
||||||
+/* Event-Based Branching regmap. */
|
|
||||||
+
|
|
||||||
+static const struct regcache_map_entry ppc32_regmap_ebb[] =
|
|
||||||
+ {
|
|
||||||
+ { 1, PPC_EBBRR_REGNUM, 8 },
|
|
||||||
+ { 1, PPC_EBBHR_REGNUM, 8 },
|
|
||||||
+ { 1, PPC_BESCR_REGNUM, 8 },
|
|
||||||
+ { 0 }
|
|
||||||
+ };
|
|
||||||
+
|
|
||||||
+/* Event-Based Branching regset. */
|
|
||||||
+
|
|
||||||
+const struct regset ppc32_linux_ebbregset = {
|
|
||||||
+ ppc32_regmap_ebb,
|
|
||||||
+ regcache_supply_regset,
|
|
||||||
+ regcache_collect_regset
|
|
||||||
+};
|
|
||||||
+
|
|
||||||
+/* Performance Monitoring Unit regmap. */
|
|
||||||
+
|
|
||||||
+static const struct regcache_map_entry ppc32_regmap_pmu[] =
|
|
||||||
+ {
|
|
||||||
+ { 1, PPC_SIAR_REGNUM, 8 },
|
|
||||||
+ { 1, PPC_SDAR_REGNUM, 8 },
|
|
||||||
+ { 1, PPC_SIER_REGNUM, 8 },
|
|
||||||
+ { 1, PPC_MMCR2_REGNUM, 8 },
|
|
||||||
+ { 1, PPC_MMCR0_REGNUM, 8 },
|
|
||||||
+ { 0 }
|
|
||||||
+ };
|
|
||||||
+
|
|
||||||
+/* Performance Monitoring Unit regset. */
|
|
||||||
+
|
|
||||||
+const struct regset ppc32_linux_pmuregset = {
|
|
||||||
+ ppc32_regmap_pmu,
|
|
||||||
+ regcache_supply_regset,
|
|
||||||
+ regcache_collect_regset
|
|
||||||
+};
|
|
||||||
+
|
|
||||||
const struct regset *
|
|
||||||
ppc_linux_gregset (int wordsize)
|
|
||||||
{
|
|
||||||
@@ -674,6 +712,22 @@ ppc_linux_iterate_over_regset_sections (struct gdbarch *gdbarch,
|
|
||||||
cb (".reg-ppc-tar", PPC_LINUX_SIZEOF_TARREGSET,
|
|
||||||
PPC_LINUX_SIZEOF_TARREGSET,
|
|
||||||
&ppc32_linux_tarregset, "Target Address Register", cb_data);
|
|
||||||
+
|
|
||||||
+ /* EBB registers are unavailable when ptrace returns ENODATA. Check
|
|
||||||
+ availability when generating a core file (regcache != NULL). */
|
|
||||||
+ if (tdep->have_ebb)
|
|
||||||
+ if (regcache == NULL
|
|
||||||
+ || REG_VALID == regcache->get_register_status (PPC_BESCR_REGNUM))
|
|
||||||
+ cb (".reg-ppc-ebb", PPC_LINUX_SIZEOF_EBBREGSET,
|
|
||||||
+ PPC_LINUX_SIZEOF_EBBREGSET,
|
|
||||||
+ &ppc32_linux_ebbregset, "Event-based Branching Registers",
|
|
||||||
+ cb_data);
|
|
||||||
+
|
|
||||||
+ if (tdep->ppc_mmcr0_regnum != -1)
|
|
||||||
+ cb (".reg-ppc-pmu", PPC_LINUX_SIZEOF_PMUREGSET,
|
|
||||||
+ PPC_LINUX_SIZEOF_PMUREGSET,
|
|
||||||
+ &ppc32_linux_pmuregset, "Performance Monitor Registers",
|
|
||||||
+ cb_data);
|
|
||||||
}
|
|
||||||
|
|
||||||
static void
|
|
||||||
@@ -1089,6 +1143,7 @@ ppc_linux_core_read_description (struct gdbarch *gdbarch,
|
|
||||||
asection *ppr = bfd_get_section_by_name (abfd, ".reg-ppc-ppr");
|
|
||||||
asection *dscr = bfd_get_section_by_name (abfd, ".reg-ppc-dscr");
|
|
||||||
asection *tar = bfd_get_section_by_name (abfd, ".reg-ppc-tar");
|
|
||||||
+ asection *pmu = bfd_get_section_by_name (abfd, ".reg-ppc-pmu");
|
|
||||||
|
|
||||||
if (! section)
|
|
||||||
return NULL;
|
|
||||||
@@ -1124,7 +1179,12 @@ ppc_linux_core_read_description (struct gdbarch *gdbarch,
|
|
||||||
if (ppr && dscr)
|
|
||||||
{
|
|
||||||
features.ppr_dscr = true;
|
|
||||||
- if (tar)
|
|
||||||
+
|
|
||||||
+ /* We don't require the EBB note section to be present in the
|
|
||||||
+ core file to select isa207 because these registers could have
|
|
||||||
+ been unavailable when the core file was created. They will
|
|
||||||
+ be in the tdep but will show as unavailable. */
|
|
||||||
+ if (tar && pmu)
|
|
||||||
features.isa207 = true;
|
|
||||||
}
|
|
||||||
|
|
||||||
diff --git a/gdb/ppc-linux-tdep.h b/gdb/ppc-linux-tdep.h
|
|
||||||
--- a/gdb/ppc-linux-tdep.h
|
|
||||||
+++ b/gdb/ppc-linux-tdep.h
|
|
||||||
@@ -48,5 +48,7 @@ int ppc_linux_trap_reg_p (struct gdbarch *gdbarch);
|
|
||||||
extern const struct regset ppc32_linux_pprregset;
|
|
||||||
extern const struct regset ppc32_linux_dscrregset;
|
|
||||||
extern const struct regset ppc32_linux_tarregset;
|
|
||||||
+extern const struct regset ppc32_linux_ebbregset;
|
|
||||||
+extern const struct regset ppc32_linux_pmuregset;
|
|
||||||
|
|
||||||
#endif /* PPC_LINUX_TDEP_H */
|
|
||||||
diff --git a/gdb/ppc-tdep.h b/gdb/ppc-tdep.h
|
|
||||||
--- a/gdb/ppc-tdep.h
|
|
||||||
+++ b/gdb/ppc-tdep.h
|
|
||||||
@@ -265,6 +265,15 @@ struct gdbarch_tdep
|
|
||||||
/* Decimal 128 registers. */
|
|
||||||
int ppc_dl0_regnum; /* First Decimal128 argument register pair. */
|
|
||||||
|
|
||||||
+ int have_ebb;
|
|
||||||
+
|
|
||||||
+ /* PMU registers. */
|
|
||||||
+ int ppc_mmcr0_regnum;
|
|
||||||
+ int ppc_mmcr2_regnum;
|
|
||||||
+ int ppc_siar_regnum;
|
|
||||||
+ int ppc_sdar_regnum;
|
|
||||||
+ int ppc_sier_regnum;
|
|
||||||
+
|
|
||||||
/* Offset to ABI specific location where link register is saved. */
|
|
||||||
int lr_frame_offset;
|
|
||||||
|
|
||||||
@@ -321,12 +330,31 @@ enum {
|
|
||||||
PPC_PPR_REGNUM = 172,
|
|
||||||
PPC_DSCR_REGNUM = 173,
|
|
||||||
PPC_TAR_REGNUM = 174,
|
|
||||||
+
|
|
||||||
+ /* EBB registers. */
|
|
||||||
+ PPC_BESCR_REGNUM = 175,
|
|
||||||
+ PPC_EBBHR_REGNUM = 176,
|
|
||||||
+ PPC_EBBRR_REGNUM = 177,
|
|
||||||
+
|
|
||||||
+ /* PMU registers. */
|
|
||||||
+ PPC_MMCR0_REGNUM = 178,
|
|
||||||
+ PPC_MMCR2_REGNUM = 179,
|
|
||||||
+ PPC_SIAR_REGNUM = 180,
|
|
||||||
+ PPC_SDAR_REGNUM = 181,
|
|
||||||
+ PPC_SIER_REGNUM = 182,
|
|
||||||
+
|
|
||||||
PPC_NUM_REGS
|
|
||||||
};
|
|
||||||
|
|
||||||
/* Big enough to hold the size of the largest register in bytes. */
|
|
||||||
#define PPC_MAX_REGISTER_SIZE 64
|
|
||||||
|
|
||||||
+#define PPC_IS_EBB_REGNUM(i) \
|
|
||||||
+ ((i) >= PPC_BESCR_REGNUM && (i) <= PPC_EBBRR_REGNUM)
|
|
||||||
+
|
|
||||||
+#define PPC_IS_PMU_REGNUM(i) \
|
|
||||||
+ ((i) >= PPC_MMCR0_REGNUM && (i) <= PPC_SIER_REGNUM)
|
|
||||||
+
|
|
||||||
/* An instruction to match. */
|
|
||||||
|
|
||||||
struct ppc_insn_pattern
|
|
||||||
diff --git a/gdb/regformats/rs6000/powerpc-isa207-vsx32l.dat b/gdb/regformats/rs6000/powerpc-isa207-vsx32l.dat
|
|
||||||
--- a/gdb/regformats/rs6000/powerpc-isa207-vsx32l.dat
|
|
||||||
+++ b/gdb/regformats/rs6000/powerpc-isa207-vsx32l.dat
|
|
||||||
@@ -145,3 +145,11 @@ expedite:r1,pc
|
|
||||||
64:ppr
|
|
||||||
64:dscr
|
|
||||||
64:tar
|
|
||||||
+64:bescr
|
|
||||||
+64:ebbhr
|
|
||||||
+64:ebbrr
|
|
||||||
+64:mmcr0
|
|
||||||
+64:mmcr2
|
|
||||||
+64:siar
|
|
||||||
+64:sdar
|
|
||||||
+64:sier
|
|
||||||
diff --git a/gdb/regformats/rs6000/powerpc-isa207-vsx64l.dat b/gdb/regformats/rs6000/powerpc-isa207-vsx64l.dat
|
|
||||||
--- a/gdb/regformats/rs6000/powerpc-isa207-vsx64l.dat
|
|
||||||
+++ b/gdb/regformats/rs6000/powerpc-isa207-vsx64l.dat
|
|
||||||
@@ -145,3 +145,11 @@ expedite:r1,pc
|
|
||||||
64:ppr
|
|
||||||
64:dscr
|
|
||||||
64:tar
|
|
||||||
+64:bescr
|
|
||||||
+64:ebbhr
|
|
||||||
+64:ebbrr
|
|
||||||
+64:mmcr0
|
|
||||||
+64:mmcr2
|
|
||||||
+64:siar
|
|
||||||
+64:sdar
|
|
||||||
+64:sier
|
|
||||||
diff --git a/gdb/rs6000-tdep.c b/gdb/rs6000-tdep.c
|
|
||||||
--- a/gdb/rs6000-tdep.c
|
|
||||||
+++ b/gdb/rs6000-tdep.c
|
|
||||||
@@ -5871,7 +5871,7 @@ rs6000_gdbarch_init (struct gdbarch_info info, struct gdbarch_list *arches)
|
|
||||||
enum powerpc_elf_abi elf_abi = POWERPC_ELF_AUTO;
|
|
||||||
int have_fpu = 0, have_spe = 0, have_mq = 0, have_altivec = 0;
|
|
||||||
int have_dfp = 0, have_vsx = 0, have_ppr = 0, have_dscr = 0;
|
|
||||||
- int have_tar = 0;
|
|
||||||
+ int have_tar = 0, have_ebb = 0, have_pmu = 0;
|
|
||||||
int tdesc_wordsize = -1;
|
|
||||||
const struct target_desc *tdesc = info.target_desc;
|
|
||||||
struct tdesc_arch_data *tdesc_data = NULL;
|
|
||||||
@@ -6211,6 +6211,64 @@ rs6000_gdbarch_init (struct gdbarch_info info, struct gdbarch_list *arches)
|
|
||||||
}
|
|
||||||
else
|
|
||||||
have_tar = 0;
|
|
||||||
+
|
|
||||||
+ /* Event-based Branching Registers. */
|
|
||||||
+ feature = tdesc_find_feature (tdesc,
|
|
||||||
+ "org.gnu.gdb.power.ebb");
|
|
||||||
+ if (feature != NULL)
|
|
||||||
+ {
|
|
||||||
+ static const char *const ebb_regs[] = {
|
|
||||||
+ "bescr", "ebbhr", "ebbrr"
|
|
||||||
+ };
|
|
||||||
+
|
|
||||||
+ valid_p = 1;
|
|
||||||
+ for (i = 0; i < ARRAY_SIZE (ebb_regs); i++)
|
|
||||||
+ valid_p &= tdesc_numbered_register (feature, tdesc_data,
|
|
||||||
+ PPC_BESCR_REGNUM + i,
|
|
||||||
+ ebb_regs[i]);
|
|
||||||
+ if (!valid_p)
|
|
||||||
+ {
|
|
||||||
+ tdesc_data_cleanup (tdesc_data);
|
|
||||||
+ return NULL;
|
|
||||||
+ }
|
|
||||||
+ have_ebb = 1;
|
|
||||||
+ }
|
|
||||||
+ else
|
|
||||||
+ have_ebb = 0;
|
|
||||||
+
|
|
||||||
+ /* Subset of the ISA 2.07 Performance Monitor Registers provided
|
|
||||||
+ by Linux. */
|
|
||||||
+ feature = tdesc_find_feature (tdesc,
|
|
||||||
+ "org.gnu.gdb.power.linux.pmu");
|
|
||||||
+ if (feature != NULL)
|
|
||||||
+ {
|
|
||||||
+ valid_p = 1;
|
|
||||||
+
|
|
||||||
+ valid_p &= tdesc_numbered_register (feature, tdesc_data,
|
|
||||||
+ PPC_MMCR0_REGNUM,
|
|
||||||
+ "mmcr0");
|
|
||||||
+ valid_p &= tdesc_numbered_register (feature, tdesc_data,
|
|
||||||
+ PPC_MMCR2_REGNUM,
|
|
||||||
+ "mmcr2");
|
|
||||||
+ valid_p &= tdesc_numbered_register (feature, tdesc_data,
|
|
||||||
+ PPC_SIAR_REGNUM,
|
|
||||||
+ "siar");
|
|
||||||
+ valid_p &= tdesc_numbered_register (feature, tdesc_data,
|
|
||||||
+ PPC_SDAR_REGNUM,
|
|
||||||
+ "sdar");
|
|
||||||
+ valid_p &= tdesc_numbered_register (feature, tdesc_data,
|
|
||||||
+ PPC_SIER_REGNUM,
|
|
||||||
+ "sier");
|
|
||||||
+
|
|
||||||
+ if (!valid_p)
|
|
||||||
+ {
|
|
||||||
+ tdesc_data_cleanup (tdesc_data);
|
|
||||||
+ return NULL;
|
|
||||||
+ }
|
|
||||||
+ have_pmu = 1;
|
|
||||||
+ }
|
|
||||||
+ else
|
|
||||||
+ have_pmu = 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* If we have a 64-bit binary on a 32-bit target, complain. Also
|
|
||||||
@@ -6408,6 +6466,20 @@ rs6000_gdbarch_init (struct gdbarch_info info, struct gdbarch_list *arches)
|
|
||||||
tdep->ppc_ppr_regnum = have_ppr ? PPC_PPR_REGNUM : -1;
|
|
||||||
tdep->ppc_dscr_regnum = have_dscr ? PPC_DSCR_REGNUM : -1;
|
|
||||||
tdep->ppc_tar_regnum = have_tar ? PPC_TAR_REGNUM : -1;
|
|
||||||
+ tdep->have_ebb = have_ebb;
|
|
||||||
+
|
|
||||||
+ /* If additional pmu registers are added, care must be taken when
|
|
||||||
+ setting new fields in the tdep below, to maintain compatibility
|
|
||||||
+ with features that only provide some of the registers. Currently
|
|
||||||
+ gdb access to the pmu registers is only supported in linux, and
|
|
||||||
+ linux only provides a subset of the pmu registers defined in the
|
|
||||||
+ architecture. */
|
|
||||||
+
|
|
||||||
+ tdep->ppc_mmcr0_regnum = have_pmu ? PPC_MMCR0_REGNUM : -1;
|
|
||||||
+ tdep->ppc_mmcr2_regnum = have_pmu ? PPC_MMCR2_REGNUM : -1;
|
|
||||||
+ tdep->ppc_siar_regnum = have_pmu ? PPC_SIAR_REGNUM : -1;
|
|
||||||
+ tdep->ppc_sdar_regnum = have_pmu ? PPC_SDAR_REGNUM : -1;
|
|
||||||
+ tdep->ppc_sier_regnum = have_pmu ? PPC_SIER_REGNUM : -1;
|
|
||||||
|
|
||||||
set_gdbarch_pc_regnum (gdbarch, PPC_PC_REGNUM);
|
|
||||||
set_gdbarch_sp_regnum (gdbarch, PPC_R0_REGNUM + 1);
|
|
@ -1,38 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Keith Seitz <keiths@redhat.com>
|
|
||||||
Date: Fri, 11 Jan 2019 17:02:18 -0500
|
|
||||||
Subject: gdb-rhbz1187581-power8-regs-not-in-8.2-13of15.patch
|
|
||||||
|
|
||||||
;; [PowerPC] Reject tdescs with VSX and no FPU or Altivec
|
|
||||||
;; Pedro Franco de Carvalho, RH BZ 1187581
|
|
||||||
|
|
||||||
[PowerPC] Reject tdescs with VSX and no FPU or Altivec
|
|
||||||
|
|
||||||
Currently rs6000_gdbarch_init will accept a tdesc with the
|
|
||||||
"org.gnu.gdb.power.vsx" feature but without the
|
|
||||||
"org.gnu.gdb.power.altivec" or "org.gnu.gdb.power.fpu".
|
|
||||||
|
|
||||||
It isn't clear from the standard features documentation that these are
|
|
||||||
requirements. However, these tdescs would cause trouble in the VSX
|
|
||||||
pseudo-register functions, so this patch will cause them to be
|
|
||||||
rejected.
|
|
||||||
|
|
||||||
gdb/ChangeLog:
|
|
||||||
2018-10-26 Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
|
|
||||||
* rs6000-tdep.c (rs6000_gdbarch_init): Reject tdescs with vsx but
|
|
||||||
without altivec or fpu.
|
|
||||||
|
|
||||||
diff --git a/gdb/rs6000-tdep.c b/gdb/rs6000-tdep.c
|
|
||||||
--- a/gdb/rs6000-tdep.c
|
|
||||||
+++ b/gdb/rs6000-tdep.c
|
|
||||||
@@ -6096,7 +6096,8 @@ rs6000_gdbarch_init (struct gdbarch_info info, struct gdbarch_list *arches)
|
|
||||||
valid_p &= tdesc_numbered_register (feature, tdesc_data,
|
|
||||||
PPC_VSR0_UPPER_REGNUM + i,
|
|
||||||
vsx_regs[i]);
|
|
||||||
- if (!valid_p)
|
|
||||||
+
|
|
||||||
+ if (!valid_p || !have_fpu || !have_altivec)
|
|
||||||
{
|
|
||||||
tdesc_data_cleanup (tdesc_data);
|
|
||||||
return NULL;
|
|
File diff suppressed because it is too large
Load Diff
@ -1,43 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Keith Seitz <keiths@redhat.com>
|
|
||||||
Date: Fri, 11 Jan 2019 17:02:19 -0500
|
|
||||||
Subject: gdb-rhbz1187581-power8-regs-not-in-8.2-15of15.patch
|
|
||||||
|
|
||||||
;; [PowerPC] Document requirements for VSX feature
|
|
||||||
;; Pedro Franco de Carvalho, RH BZ 1187581
|
|
||||||
|
|
||||||
[PowerPC] Document requirements for VSX feature
|
|
||||||
|
|
||||||
As suggested in
|
|
||||||
https://sourceware.org/ml/gdb-patches/2018-10/msg00510.html, this
|
|
||||||
patch changes the documentation for the VSX tdesc feature to make it
|
|
||||||
clear that the altivec and FPU features are requirements.
|
|
||||||
|
|
||||||
gdb/doc/ChangeLog:
|
|
||||||
2018-11-09 Pedro Franco de Carvalho <pedromfc@linux.ibm.com>
|
|
||||||
|
|
||||||
* gdb.texinfo (PowerPC Features): Document the altivec and fpu
|
|
||||||
requirements for the org.gnu.gdb.power.vsx feature.
|
|
||||||
|
|
||||||
diff --git a/gdb/doc/gdb.texinfo b/gdb/doc/gdb.texinfo
|
|
||||||
--- a/gdb/doc/gdb.texinfo
|
|
||||||
+++ b/gdb/doc/gdb.texinfo
|
|
||||||
@@ -42541,11 +42541,13 @@ contain registers @samp{vr0} through @samp{vr31}, @samp{vscr},
|
|
||||||
and @samp{vrsave}.
|
|
||||||
|
|
||||||
The @samp{org.gnu.gdb.power.vsx} feature is optional. It should
|
|
||||||
-contain registers @samp{vs0h} through @samp{vs31h}. @value{GDBN}
|
|
||||||
-will combine these registers with the floating point registers
|
|
||||||
-(@samp{f0} through @samp{f31}) and the altivec registers (@samp{vr0}
|
|
||||||
-through @samp{vr31}) to present the 128-bit wide registers @samp{vs0}
|
|
||||||
-through @samp{vs63}, the set of vector registers for POWER7.
|
|
||||||
+contain registers @samp{vs0h} through @samp{vs31h}. @value{GDBN} will
|
|
||||||
+combine these registers with the floating point registers (@samp{f0}
|
|
||||||
+through @samp{f31}) and the altivec registers (@samp{vr0} through
|
|
||||||
+@samp{vr31}) to present the 128-bit wide registers @samp{vs0} through
|
|
||||||
+@samp{vs63}, the set of vector-scalar registers for POWER7.
|
|
||||||
+Therefore, this feature requires both @samp{org.gnu.gdb.power.fpu} and
|
|
||||||
+@samp{org.gnu.gdb.power.altivec}.
|
|
||||||
|
|
||||||
The @samp{org.gnu.gdb.power.spe} feature is optional. It should
|
|
||||||
contain registers @samp{ev0h} through @samp{ev31h}, @samp{acc}, and
|
|
@ -1,176 +0,0 @@
|
|||||||
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-rhbz1325795-framefilters-test.patch
|
|
||||||
|
|
||||||
;; New test for Python "Cannot locate object file for block" (for RH BZ 1325795).
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.python/py-framefilter-thread.c b/gdb/testsuite/gdb.python/py-framefilter-thread.c
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.python/py-framefilter-thread.c
|
|
||||||
@@ -0,0 +1,39 @@
|
|
||||||
+/* This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+ Copyright 2016 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 <pthread.h>
|
|
||||||
+#include <assert.h>
|
|
||||||
+
|
|
||||||
+static void *
|
|
||||||
+start (void *arg)
|
|
||||||
+{
|
|
||||||
+ return arg; /* Backtrace end breakpoint */
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+int
|
|
||||||
+main (void)
|
|
||||||
+{
|
|
||||||
+ pthread_t thread1;
|
|
||||||
+ int i;
|
|
||||||
+
|
|
||||||
+ i = pthread_create (&thread1, NULL, start, NULL);
|
|
||||||
+ assert (i == 0);
|
|
||||||
+ i = pthread_join (thread1, NULL);
|
|
||||||
+ assert (i == 0);
|
|
||||||
+
|
|
||||||
+ return 0;
|
|
||||||
+}
|
|
||||||
diff --git a/gdb/testsuite/gdb.python/py-framefilter-thread.exp b/gdb/testsuite/gdb.python/py-framefilter-thread.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.python/py-framefilter-thread.exp
|
|
||||||
@@ -0,0 +1,54 @@
|
|
||||||
+# Copyright (C) 2016 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/>.
|
|
||||||
+
|
|
||||||
+load_lib gdb-python.exp
|
|
||||||
+
|
|
||||||
+standard_testfile
|
|
||||||
+
|
|
||||||
+if {[prepare_for_testing $testfile.exp $testfile $srcfile {debug pthreads}]} {
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# Skip all tests if Python scripting is not enabled.
|
|
||||||
+if { [skip_python_tests] } { continue }
|
|
||||||
+
|
|
||||||
+if ![runto_main] then {
|
|
||||||
+ return
|
|
||||||
+}
|
|
||||||
+gdb_test_no_output "set python print-stack full" \
|
|
||||||
+ "Set python print-stack to full"
|
|
||||||
+
|
|
||||||
+# Load global frame-filters
|
|
||||||
+set remote_python_file [remote_download host ${srcdir}/${subdir}/${testfile}.py]
|
|
||||||
+gdb_test_no_output "python exec (open ('${remote_python_file}').read ())" \
|
|
||||||
+ "Load python file"
|
|
||||||
+
|
|
||||||
+gdb_breakpoint [gdb_get_line_number "Backtrace end breakpoint"]
|
|
||||||
+gdb_continue_to_breakpoint "Backtrace end breakpoint"
|
|
||||||
+
|
|
||||||
+# #2 0x00007ffff75f228d in clone () at ../sysdeps/unix/sysv/linux/x86_64/clone.S:113^M
|
|
||||||
+gdb_test "bt no-filters" " in (\\.?_*clone|thread_start) \[^\r\n\]*" "bt no-filters"
|
|
||||||
+
|
|
||||||
+# #2 0x00007ffff75f228d in 941595343737041 () at ../sysdeps/unix/sysv/linux/x86_64/clone.S:113^M
|
|
||||||
+# vs.
|
|
||||||
+# #2 0x00007ffff75f228d in 941595343737041Traceback (most recent call last):
|
|
||||||
+# File "/home/jkratoch/redhat/rhel/gdb/rhel-7.3/gdb-7.6.1/gdb/testsuite/../data-directory/python/gdb/FrameDecorator.py", line 145, in frame_args
|
|
||||||
+# return self._base.frame_args()
|
|
||||||
+# File "/home/jkratoch/redhat/rhel/gdb/rhel-7.3/gdb-7.6.1/gdb/testsuite/../data-directory/python/gdb/FrameDecorator.py", line 152, in frame_args
|
|
||||||
+# return args.fetch_frame_args()
|
|
||||||
+# File "/home/jkratoch/redhat/rhel/gdb/rhel-7.3/gdb-7.6.1/gdb/testsuite/../data-directory/python/gdb/FrameDecorator.py", line 276, in fetch_frame_args
|
|
||||||
+# block = self.frame.block()
|
|
||||||
+# RuntimeError: Cannot locate object file for block.
|
|
||||||
+gdb_test "bt" " in \[0-9\]+ \[^\r\n\]*" "bt with filters"
|
|
||||||
diff --git a/gdb/testsuite/gdb.python/py-framefilter-thread.py b/gdb/testsuite/gdb.python/py-framefilter-thread.py
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.python/py-framefilter-thread.py
|
|
||||||
@@ -0,0 +1,60 @@
|
|
||||||
+# Copyright (C) 2016 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/>.
|
|
||||||
+
|
|
||||||
+# This file is part of the GDB testsuite. It tests Python-based
|
|
||||||
+# frame-filters.
|
|
||||||
+
|
|
||||||
+# This test is specifically crafted for RH BZ 1197665.
|
|
||||||
+
|
|
||||||
+import gdb
|
|
||||||
+import itertools
|
|
||||||
+from gdb.FrameDecorator import FrameDecorator
|
|
||||||
+import copy
|
|
||||||
+
|
|
||||||
+class Reverse_Function (FrameDecorator):
|
|
||||||
+
|
|
||||||
+ def __init__(self, fobj):
|
|
||||||
+ super(Reverse_Function, self).__init__(fobj)
|
|
||||||
+ self.fobj = fobj
|
|
||||||
+
|
|
||||||
+ def function (self):
|
|
||||||
+ # This function call should not fail.
|
|
||||||
+ gdb.target_charset ()
|
|
||||||
+
|
|
||||||
+ fname = str (self.fobj.function())
|
|
||||||
+ if (fname == None or fname == ""):
|
|
||||||
+ return None
|
|
||||||
+ else:
|
|
||||||
+ fname = fname[::-1]
|
|
||||||
+ return fname
|
|
||||||
+
|
|
||||||
+class FrameFilter ():
|
|
||||||
+
|
|
||||||
+ def __init__ (self):
|
|
||||||
+ self.name = "Reverse"
|
|
||||||
+ self.priority = 100
|
|
||||||
+ self.enabled = True
|
|
||||||
+ gdb.frame_filters [self.name] = self
|
|
||||||
+
|
|
||||||
+ def filter (self, frame_iter):
|
|
||||||
+ # Python 3.x moved the itertools.imap functionality to map(),
|
|
||||||
+ # so check if it is available.
|
|
||||||
+ if hasattr(itertools, "imap"):
|
|
||||||
+ frame_iter = itertools.imap (Reverse_Function, frame_iter)
|
|
||||||
+ else:
|
|
||||||
+ frame_iter = map (Reverse_Function, frame_iter)
|
|
||||||
+ return frame_iter
|
|
||||||
+
|
|
||||||
+FrameFilter()
|
|
@ -1,81 +0,0 @@
|
|||||||
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-rhbz1350436-type-printers-error.patch
|
|
||||||
|
|
||||||
;; Test 'info type-printers' Python error (RH BZ 1350436).
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
Typo in Python support breaks info type-printers command
|
|
||||||
https://bugzilla.redhat.com/show_bug.cgi?id=1350436
|
|
||||||
|
|
||||||
[testsuite patch] PR python/17136: 'info type-printers' causes an exception when there are per-objfile printers
|
|
||||||
https://sourceware.org/ml/gdb-patches/2016-06/msg00455.html
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.python/py-typeprint.cc b/gdb/testsuite/gdb.python/py-typeprint.cc
|
|
||||||
--- a/gdb/testsuite/gdb.python/py-typeprint.cc
|
|
||||||
+++ b/gdb/testsuite/gdb.python/py-typeprint.cc
|
|
||||||
@@ -31,6 +31,12 @@ templ<basic_string> s;
|
|
||||||
|
|
||||||
basic_string bs;
|
|
||||||
|
|
||||||
+class Other
|
|
||||||
+{
|
|
||||||
+};
|
|
||||||
+
|
|
||||||
+Other ovar;
|
|
||||||
+
|
|
||||||
int main()
|
|
||||||
{
|
|
||||||
return 0;
|
|
||||||
diff --git a/gdb/testsuite/gdb.python/py-typeprint.exp b/gdb/testsuite/gdb.python/py-typeprint.exp
|
|
||||||
--- a/gdb/testsuite/gdb.python/py-typeprint.exp
|
|
||||||
+++ b/gdb/testsuite/gdb.python/py-typeprint.exp
|
|
||||||
@@ -50,3 +50,7 @@ gdb_test_no_output "enable type-printer string"
|
|
||||||
gdb_test "whatis bs" "string" "whatis with enabled printer"
|
|
||||||
|
|
||||||
gdb_test "whatis s" "templ<string>"
|
|
||||||
+
|
|
||||||
+gdb_test "info type-printers" "Type printers for \[^\r\n\]*/py-typeprint:\r\n *other\r\n.*" \
|
|
||||||
+ "info type-printers for other"
|
|
||||||
+gdb_test "whatis ovar" "type = Another"
|
|
||||||
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
|
|
||||||
+++ b/gdb/testsuite/gdb.python/py-typeprint.py
|
|
||||||
@@ -15,7 +15,7 @@
|
|
||||||
|
|
||||||
import gdb
|
|
||||||
|
|
||||||
-class Recognizer(object):
|
|
||||||
+class StringRecognizer(object):
|
|
||||||
def __init__(self):
|
|
||||||
self.enabled = True
|
|
||||||
|
|
||||||
@@ -30,6 +30,26 @@ class StringTypePrinter(object):
|
|
||||||
self.enabled = True
|
|
||||||
|
|
||||||
def instantiate(self):
|
|
||||||
- return Recognizer()
|
|
||||||
+ return StringRecognizer()
|
|
||||||
|
|
||||||
gdb.type_printers.append(StringTypePrinter())
|
|
||||||
+
|
|
||||||
+class OtherRecognizer(object):
|
|
||||||
+ def __init__(self):
|
|
||||||
+ self.enabled = True
|
|
||||||
+
|
|
||||||
+ def recognize(self, type_obj):
|
|
||||||
+ if type_obj.tag == 'Other':
|
|
||||||
+ return 'Another'
|
|
||||||
+ return None
|
|
||||||
+
|
|
||||||
+class OtherTypePrinter(object):
|
|
||||||
+ def __init__(self):
|
|
||||||
+ self.name = 'other'
|
|
||||||
+ self.enabled = True
|
|
||||||
+
|
|
||||||
+ def instantiate(self):
|
|
||||||
+ return OtherRecognizer()
|
|
||||||
+
|
|
||||||
+import gdb.types
|
|
||||||
+gdb.types.register_type_printer(gdb.objfiles()[0], OtherTypePrinter())
|
|
@ -1,454 +0,0 @@
|
|||||||
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-rhbz1398387-tab-crash-test.patch
|
|
||||||
|
|
||||||
;; New testcase for: Fix <tab>-completion crash (Gary Benson, RH BZ 1398387).
|
|
||||||
;;=fedoratest
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/tab-crash.bz2.uu b/gdb/testsuite/gdb.base/tab-crash.bz2.uu
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.base/tab-crash.bz2.uu
|
|
||||||
@@ -0,0 +1,393 @@
|
|
||||||
+begin 644 /tmp/libgcc_s-6.3.1-20161221.so.1-objcopyR.debug.bz2
|
|
||||||
+M0EIH.3%!6293622@"44`>Q=_____________________________________
|
|
||||||
+M________X#\<>SD#OM[7/HAP:R]\H#D"=!/";NP7!]OOJG>U[N;WW'KVV?9I
|
|
||||||
+M[[,[X.\/;%2U``[[NUM7P^T[U617V#12M]6M7W;M7CZU<=!]/8WL[LI=AZZ>
|
|
||||||
+MJ5XW;QP]W<NQW8Q539B5-[UA8``:HSG=SF*R#=AT#0`'+3D>]DVHY@]/6RS=
|
|
||||||
+M8[:2][W/<YN3<[=[S=37NY[=X&IH@)H"8$T```3$U-@)@F)B,(TT:-#$T9``
|
|
||||||
+M`3`!H-`*G^BGB,$--4]E,R-"9JGL4V)J;*>F01Z:GIID,IC$GHU-HR$:@T0F
|
|
||||||
+M@$PC($P"`$PF)D9-&IZFCT-4\$TRI^330-$TR>32>FFF@F!H0GJ>TD_*9!E,
|
|
||||||
+MR3Q3/11M-,%#T-3:-3T9(P-3T3TT@;1ZD>C1E,AM0:`@@303"`(Q*>FGHU)Z
|
|
||||||
+MGDFR8FFJ'L5/1C313R3U/*?JF]&35-J!Y3U/TI^1$\IZGFBGJ>HVF4>H])ZA
|
|
||||||
+MZC)ZFT)H>IH]0>H!H&RC0,F0T9E!HT-`TT`)-1(A$R&J?J3T80]313\F0GHC
|
|
||||||
+MU3:90\H]$]3:C93U-!LH\IIZ$]0R>:D>329J--`/4_5'I-`TT9#3U!ZC0>H#
|
|
||||||
+M0])H!H9!Z@#30VH#30-/4T'J`]09%$!4\)A3R,-1'J`S2#0--,$:/$C9-3TG
|
|
||||||
+MH:FR9-(T>D\4],HT'I`/4`>HVFIIZFR:FR:)Y,3*/3*;"FT:(VIYJC:FF)Z:
|
|
||||||
+MCTFAIZCTAH:#U!F*")1`0!`"9#4Q-,FT(R33R-4VFE/U&TU-3RGZ1FJ>&H]2
|
|
||||||
+M;U38GJ-J3TQ0Q'DU-'J?JF]2&30-'J:>H,FC1HWJ@#RFC0!Z#2-/4T&&4T-/
|
|
||||||
+M2:&(>D'J,5#"1JH5B["KJTH:1R2I95!0TXN8+PQ'&*+8%8JVQCC/1G1D0A-S
|
|
||||||
+M<I944!D8K(C"*`I!((H+`S?O/"O^MIFA>91MLJJLK];M*G>^]MGIW=W7E>KL
|
|
||||||
+M)MXKMO7VV\M77ANM3H=6LGI)+AR&CF'#<66)4&4S6:;*26:S5DUQGS$+>97<
|
|
||||||
+M!3.,U$LQELITU,X3Y5[GW>0?IM4(5>Z!^AE04E8=:H(X[7T$U.`@QRT\Z]_"
|
|
||||||
+M7?`4-8Q_UDP"AQ@$1,B`G(D*S"^7Z%ABZ-%T<L]#FC8#-<VF6>6MS+#&8M+G
|
|
||||||
+M)M>_Y9ME3-K"RMO>,UK^9/4HYU5!3:6'45^1-AA23JG7FH&=KT9ZK-!6>?\-
|
|
||||||
+M;_HD;$V3C,[X\-20B*R?`.(:CK$3A&J2!XYI6TW[U*HI*560[F!42LB.:FO9
|
|
||||||
+MT2S-`KC"H/^S^JJFC(54?*/HIBKH,!73^2++62,G98Y/*,\,%R,Y08$R@$&L
|
|
||||||
+MC#"P#E53*YTZS&>L\]4*"<8&2^]*I?02,46;3.V(P+2P`3$>F+HNTY/(%Z<`
|
|
||||||
+MM.P&I]6,N<YQ5QZL0]B&[?*?757VV"$MA$PU!CM3C:=M[)14&\?,W,8G`:_Z
|
|
||||||
+M:"!X2U%Y27M:ALSP\;:NN/-<%#.J9]653UK^E@@[&^NWC27B&%J9M[R6M)90
|
|
||||||
+M1]AC4PE2-+_V#SBBFMO=0D\:GY]-F<'UYQ"RKVHV>ED[M1J4`O?!J@8`&>?1
|
|
||||||
+M%!8/]>.7UF-'?ZO,O??);\\L:3X7JN-O^ZWAPV:'ONI*N$I2REEE+$\Q47N6
|
|
||||||
+M)NB0W\O.LZ)TMD[9VG1NS+?94@_.$$=!P2#U2(8;*%.99OOW:1@#`W]ZV:OR
|
|
||||||
+M1IW<Y\T_[@G!L<&-V&1="[W(M!N9R^OOH?0``<D1CT)A(*L^:&H=+.^+:/]'
|
|
||||||
+M04%%.SW-\#;`53:0[GC?<_OK4%3=]'?\H^U4`^9^I>EL,R4\*2Y2^>SP[^QB
|
|
||||||
+M_,U-)GY3;9KT/P=<O3?SAWG$AXK@0I)`(AD(`)"("Z>Q.GX.7G"Q:>QK&9"$
|
|
||||||
+M[#-J-&>2W>*T.XDRFC(,4I`"ED(D0(($(R0#&6;D6H(.:&R(R,:JBHZ!54G<
|
|
||||||
+M11T9V@K&&$`@8+T3IN#,:<5@P(RTBD1%(JP%55$2*#^!4E,%ER22`*-**JU6
|
|
||||||
+MJZII6%N>*+(`*J_?LDI@")%A1D1`@0D?O:UXU=+B+/%.C.3P3935G@9N(=B(
|
|
||||||
+M39SA1$,K(<1`/."P@;M&4XI&*(9N(H[,#92F)PFDD,V:<P:&CI-74Y(%5G9Q
|
|
||||||
+M.;&CNT9/.(D(0E-%1E-38298NLWC1:8#&:TRBD72U("/%-3!D/9BWJ:]FM#)
|
|
||||||
+M2L@[*@&EK:079)8-B@%&PML&Q0"QSC<@!>;%@V(`6%EHV(`6$+T`+00*I0;U
|
|
||||||
+M`+6F`+<5+:@OPH!:+<%V-Y:H6@0ST6@@$DQO&U0"]M7&.2N,;AN4`HP8H!<7
|
|
||||||
+MT;QP4`N;A(R`&`P88BZ-&+V-:04?;20GS/LL>$_B,!&RT)$%@$(*)!"$E!7/
|
|
||||||
+M#&8("!8N/9=K.,FB'MY.._/VD>C9#^`XS.XJ/S:XR1TI^MMN1AER0/FI,QI<
|
|
||||||
+MI!S/-3&8!4S2B>DK$=5/`G2Z><=$L7)SB`(%.`?MXB?J?H_!K]]%1:Q0>>D5
|
|
||||||
+M@*,0!$21@`8Q[N?N_7_H;4[#S/![4O,^[NUOC?7F"'Z'YMMYO*;_)-<!Z[TG
|
|
||||||
+MI*)=+?,[8F8#>K^K9([W=II7_32_/>'@"M-U3'I3>\5F/7!,>LN:H3*N!L;;
|
|
||||||
+M")']UU7>>-S\,?K65#!/&(542)(!76C2F<92T@@7G-NX#D][M'6*;YS)AF7<
|
|
||||||
+M!W7=#3Y1,RGT_`:&!`EU8>JEM/&<Z=3T%4V1[G3DVDH\X<(1KVY(YKFX4,W#
|
|
||||||
+M@OCO$:6B8^HAC+,.^S`V.CG>JEI"+[5?4O\_]DT0",,XH95*#$@#=L,AO4L+
|
|
||||||
+M1BB(3Q$X?C1IAS!$AY.>_%4]AI=*'&F6&\>U;\YG,QV14-HP9\BY30H/3].G
|
|
||||||
+MTW36AQ.N"4&8U(-$CSEJ:IAKE6J,KC=.U9$\H:1I/5!WK37"2WTTCL+"6YJD
|
|
||||||
+MVV8?W_`MAI=@)]J^U-YAOBS;:'(S4SPBJP))LEQ'+GK;<]US[@5VN)U.SEI]
|
|
||||||
+M@B6(>WE8&UNN(Z_Y^_U`>?=I<YH<:Y7@Z9C$)>*[4=\'V/"\YOXXU=RH7$2P
|
|
||||||
+MZ8AP5/2</TOZ\C(9=&&[AG/8E@*VB@8L:0:5=Y66\X2D.7TV9:?@;+B>@#F"
|
|
||||||
+M^(R"5",K@5=:R=P=>/%\_!=LCS0>*ISX$*;G?\$9(P-<"734Z=7:V/E#,EJ3
|
|
||||||
+MR#)DN].):$0+S";E13Q8UADO"%],GD)5UBLW<J)YR".E/J3J`^PF6,0SG-%0
|
|
||||||
+M"7N9K0*D#I.`[B%7`^)[%EN<\.D]+[$>UDCN34&A3.I3U+69_K:PL#9:%6F)
|
|
||||||
+M[AU5/05TLKLJ2*QB0,US:"U%(#G!9N81MN&'7T1O*J^]%%^#HV->-]LNGN*=
|
|
||||||
+M"C%H8>WG7$,^&0"244E4:#V6Y!289:<&E<<-ZGKH1[>$BW"MUU,#SL;,,),V
|
|
||||||
+M565B6/E!Z,H8E#]WD=(P%@X(,/C7GD<S]$14+$KE2?!'&@4#"J4DUM@S<>0D
|
|
||||||
+MP-:,NZ$0>8GQY;JN=^^\XXXN0&5=W>Z5]AZ1HYC%E&S'8*.!D@5[<8]"EYC)
|
|
||||||
+M7*.I"&7-3RH1V#K4>$VO7@MZ*G*`]>M6049!<IIHH&:*@U..`8SPN9NZ/@W$
|
|
||||||
+M&,^",8M/J#@-9F,F35FU[UMWUZ`A^/!1>\$(C%$3O$(">"B@IT'Y=.=H)`'G
|
|
||||||
+MP?T,;OF2.6;FQ;,.#Y<(PT)/0+73.OI!]&#-""F<TJ>[4ST51A!FJDN2B3PA
|
|
||||||
+MCB(Q@J)!V14/5@R7:FG%FN\:RY!,K%<CRJ)2E'H':71::U+B9EZ&^[QA"$(6
|
|
||||||
+MW[UV*8E.$)YLMO(SQ!W:VB68:T<\[J:GE`^T,VO'GU:)Q<37E7%6&7=6*0:C
|
|
||||||
+M130555L1[```B"D1'L4)04H@+`D`!*40I2""85*?;,!0/,ML%:I2GZ7JOT_^
|
|
||||||
+M__JGX^`88*"^A2B!("$DD)-JTBB*)!&01619$18(D%1(C(BL!EM046+$148*
|
|
||||||
+MB0448@JBJK$4L`JZA/-TU(2O62'UK"RTDD#%#32HU54TJU&$I.=`:'<L4M&Z
|
|
||||||
+M#3XD##Y(;+O*'P?O/*L$0M7X4(Q+A$./HU"$E?+2H4$0_*[S[.?+^5OM!_4_
|
|
||||||
+M&;Y:7'A#\NXTI=P]9X81`(@)D"("VFZ#(``(E`BHF35`Z,7BT/QW.\K-?*=`
|
|
||||||
+M#H[THS)C:DZ[>>T32S-L$$!!O<Z/1:=GW7L.-`@+OC?L!%%%01YJ0`W\#O_<
|
|
||||||
+MU7+AYV=\KX_M\G+/<I8S?E:J'"]%[4IBH5:8;!*?B5.\9;(40FH14V2K4D9\
|
|
||||||
+MU79K*ZG:G;26OW<;!(4112K2I_&OTNYP.TXS2`2<66Z>M9<,*\;?V9^D]EW*
|
|
||||||
+MBQ6*UR5PQ\J=9&)2U[%%,*&2VK(M$(BHTDQO)TV^76K`\E7:.HV99X,B$L68
|
|
||||||
+MSG"]BK3]QP^-(JA!,M42_#=-`S`(@)8T4R,S_Y[7P__.8YW/0JJJJJJJNK8X
|
|
||||||
+M-=3PO'T&C*J9)`]F0`%K%$*P$#"""'MX"\OETF6EW>4IT9RN8.;PY_?U:<^?
|
|
||||||
+M*X$4<G+IS96`!RXB`W?+I9`4-_^=]@=5PM10NDDBBA..4DY\"D#+`\7;U[G#
|
|
||||||
+MO=@@?%VQX&)]5][V?U]Z-?DW??P?H<?6U2\`#8A\D^S^;\VZ[QY0#'`3U,IK
|
|
||||||
+MLXHES[NTJ)5](L\+[G%+;D/B#Q`X4AG*UHL1KC9MFPLT`%,&%)B_^A;.P#UH
|
|
||||||
+MFUO;E0'(83(IV[A:>&<5`%`1414BR`"1@4.DH8`QG9@#`TT7)^C&:7C@<GE+
|
|
||||||
+MH21&K'625@X1SV8=C[7_!BK`FS4,OJG>IA^%"_<3WTX+Q5*-=*7Y#/IE(_)_
|
|
||||||
+MYYO52X/>^`A8NS+]GQ6$%J!9HFB5*_*22UE#*>TYS.T"1U[AFR44'A(ZIZ$N
|
|
||||||
+M7O')DXRK49/4T!7XG8#F7\)CF+,TPJAPV;\#4,AD7,Z/*?9D2DQDGR.^]LB(
|
|
||||||
+M%[`,/\]CK_:F,LN`#`T>]RT?A*WQ[K='\FN+&[/YKKD[GOG)".MPK9KOE&2>
|
|
||||||
+M4312<,\Y^C:>3=S-OHU-R)^F^*9H5Q"=7^-'_#GT?0V-ZX-3_S"6N2Q?O;7:
|
|
||||||
+M=G#ZR=L/JQG[<S([.GUTY(]YW<0002-&03+]]@]K1M228\@$'[8E&`X0,H(P
|
|
||||||
+M1&=K.;MCX^[[_\*P#V$[N)^U]G0V?:4`Z41`"(&!@9N"#?S[?F^CU<GQ*7,>
|
|
||||||
+MO\_!J];07#9:XP=/JNC6V$KW5]`_.82T05/S?='X=WG0YS.[I94'X$?S()[N
|
|
||||||
+M#_Y@OQH(_`@/2399*2&\0*8=X^IVZ-3#*-44=7^#1YU#@<+A<&%:']\FNF[I
|
|
||||||
+M29_6J&Z$R.&H/.2,M8LDC$UZC*6*@F7SBW:"GQ3@-&AS/D'%[PAX*Z.!&Q`!
|
|
||||||
+MK?M_?V/CA,ZX91WMR-A0992O)T0BR^HF9=VI<Z;3/3/B,,.>A-3&20"GDL&"
|
|
||||||
+M2O*AJJ$K`'3#X"@L61'"0N\_-&J])J,%%(*O_R0A*R3X>_<_]4=+TNCF/6?<
|
|
||||||
+M]IGY%UQ&M/IX7^;)C'TSL++)C1,MUVW257A0K(-$P.$V@S/RDA=MA.W#)`^<
|
|
||||||
+MI.1!C(@-*E;AB)^IQOD_^YWQ:2]K^31Z+%2J$@W$OT7PD.02BH.>E@'022(E
|
|
||||||
+M3@Y$+>HD)''<X_^[Q9E<G8)L?9]R_X3L2TLN(::ZWJ)!F6F4AID@*_Z3Z?>I
|
|
||||||
+MK!<&,1@9T",6@FYM(V?[Q8KX6%]RJ`*8F:0\/6K-)X%%08$0"I?TTOH7J&:2
|
|
||||||
+MP"RV[FF`@B!MYU]ZA5,A0DG2_Q)37"OW#@@D%P1P53,Y9BTRN'V=+Z4!-QP>
|
|
||||||
+M0Y0QJ(A,6"07X?-ZWOBHFM&@L1]UFNEG^IKIM+R/9>.LI"N99-[D[:+A+S@]
|
|
||||||
+M9SU/\?K]_\Q%2,`!A(D20!4>@D8$G;HBBL(!"(2`J'98-5R/N2MRE[9.N+,!
|
|
||||||
+MO"/VT9Y%Q@(TM(/8\%_VL"*'2P^*D+N2<O=WB`H+SS-YB;;<UE-#-N:Y9@?!
|
|
||||||
+M^#+W*IA0`QB-#D#`YB!!01448@B,1%$2",51!%BP%4BP5!&"1B(HJ"@2)$C&
|
|
||||||
+M,D#TNA0$!`_!_//C_\:,LO33YN;-]UX[=NL$NWM-W#2&/RRVQM#F%?ZYS-(C
|
|
||||||
+M!:"*BO%^GER_)Y^/U\1'3UP<.4C&$>,C?4!XXM?3VL;&:5WJ^+#L>F7!H_,N
|
|
||||||
+MIUM`#L5Y[#M_O]A6"9J&&AI_78:(A$4RYACP^Q[,#B9?EORFBL,[/%'C)]'[
|
|
||||||
+M.CACW"3O$#=`(=[_-\UU>&,/=25L+C^"'BK/E0!N1^$_"JB+_JPA`*]8CO(:
|
|
||||||
+M`,.^+BG;`ZF7BV09<[-_][:8^4KLHF.(1`0<SWGYJ3I.3K!0![LX-.34%X
|
|
||||||
+MKYZ.+[/.9+T`A+UD=Y@88X+<D[;(9[$K8+5I?Z$&^</H*6JWR3"CB_,77/+_
|
|
||||||
+MX^DG*!-6>WRYRQ#Z.0GAL_X^DU8%6CXLM.6/V<%ZXA\X\>Z?;"LR((5^)BH[
|
|
||||||
+M9YVM6QCU[L+>4:^0@[(+A[*2R473>#_#80G05=[MO!0B83]S4Y#69SL\FU;,
|
|
||||||
+MM[%]++><ZV/:Y5)WN%_&CUF;?Z:</"R<V\VOFXR?C$\?+,?MAET205[+6I!J
|
|
||||||
+MRA5AYEG26<>'XGB[M<9CU9H/*ZY^J8LEQ/Y>=4H#=<EIJ8&40/&J$?"Z818<
|
|
||||||
+MIQ6H\)F_";T.[2M_F=)VW!@'ND!QI,[BE=GR^B_,X7I0+3JJ4]A6Q-]XV1_5
|
|
||||||
+MU'M[]=[#.PYEXCJ&:P)_3RZ#"([W['6=LW(OD+4"CHU(W$?2=PS]B!N"A`>D
|
|
||||||
+M076@OV1*HU!09+VY&I##%336?/5%)M>9>5%%"0;X0^D(!5LP%ZR;J#4AL2A(
|
|
||||||
+M<S2DL$I55=_1LS*$$M0$ST<MVA),QC^IJ^!V\86P1":U`)2(R._\EYKN--VK
|
|
||||||
+MKDVDP]$@@CE/F](,R"?T>VL=+2L3>4N`V%1T%AG`R@("$$@E`4)0]>@`6#Y_
|
|
||||||
+M!?KZ5D(#B^G8"OV,(-.'8LE-"R&W?C;5W&U,*%TS9#DQGG02?L<W(#+,*L5`
|
|
||||||
+M3W\)2.M&$X]T'R#@C7)1N>I;-V'6_'VD:/[B\[^!BK._+R4O,AIRU>SJ67X@
|
|
||||||
+M9BGP5'Z*.")D_)5(1^2U>5IE7MC^?6;KS0@W,1]%[_1Q>7T[6YJ6XJQ.^W;Y
|
|
||||||
+M/EBI?KRW$W[U(3Z"^#'K&C9:437[_,^`K\[(S?[&%\T)U''KMU:$5SAVI&?1
|
|
||||||
+MO)WDB92)(QL1_:14'+!3-4<$"%!A'EL<M,6PH"93>*M:SVOPL/C22OB0/^XF
|
|
||||||
+MK<69BJ[(VD8/"J7=>==O$-;WW//)P10\;N+6!'EH$U.A3!PVG>^?[V.QP)[E
|
|
||||||
+MM#M7!J:JJ5FI.V-&A9([(@[VAQ'!<$'(1S;SN=_.6>^5#L1AQ&_D'TL&-9`/
|
|
||||||
+M68$)7J_190&=D@#5'\F^+AINR/5:*)DDUZ[PNR9<+9KN3=Z?U+GOLD3<33S=
|
|
||||||
+MITE&9$Q@::(*8DUSZ<4:QI+(U)BWK2;WBIFENWDW[`N'(FMFG:Z>V\N0-.!C
|
|
||||||
+M]U#!U]T8<9HC9P8<^B_][RM5^;"??IE6G\((HDSM:T1.%M7\:[:DU2F*_DM4
|
|
||||||
+MYS/(B9,$-F_^*?"5:RW^<#:*&>C'":.!%4R6T1D?:_G=$H[JG;^K-&;DAU5X
|
|
||||||
+M&\$R"F*J1F;BV>]?N_E7K/--@V7(QI0@&I.NR=19-&!(=T.&_,X7T=/'`?1*
|
|
||||||
+M%W!R_DXWII`J:7?>BE$CIAWG*'YBZ$Q'_%_<27$JIQGYCU"!+X5C(PDS@W[\
|
|
||||||
+M7\*E`_CB_W[+#`2HNE+Z5(.<CG9DS>40BX]1`,]W]9L2=-5S\JMIA,-W<&@;
|
|
||||||
+M^[8^O76V>0CBYD0'SW%)\GD[WPO%X,)C%,*J;0T`C:JCB'+92>O:H';H,-[R
|
|
||||||
+M=DRZ#I]-'NVA`SO3(FDOZW8P4EL?@9A=5^0Y7FCDLWBFFUTVRG&%.[D2V^=`
|
|
||||||
+M5#K.+)QE0NXQY^M7*(C1-,N?>U93STMV@CGTY>&R$>RPK3'2R2*?5I5(24S/
|
|
||||||
+M3K0$S`PJ(?/0Q9_SG%)RTTU3HP8:\7'A72DJ57`^O/MG`YY><>SSD?WAH=M:
|
|
||||||
+M"RO5HS+T!`\:(`9QAYB=#3-8"F2'/%UT1%Q3?D&F$[TQ2-M#%>'(OH`!2E./
|
|
||||||
+M)389QV:(LHH6GG+(3N1L[?82L*K4K0&9XD2X6@M+0N,)U%K,T-":?/Y]\MK5
|
|
||||||
+MK_Z:_I>'2UZ7+0:AKH\.K%VYPA6E!DHVG,PO?KU25M)+DT,P/AGJ<1$85R9%
|
|
||||||
+MPF!G=#T]<HR$?#[2E@+NC"6RWM$3#I[5-<Z/6[2%1ZFE73CH4URF96")%C.<
|
|
||||||
+MUS4Y90$A."A4S:-LK4[5U/+UM):-H<SSX#P(*-.@5&,JF@[R4F9.)J@T%S6&
|
|
||||||
+MY-7"0,'GK!AS[U94MKW798VT*`7T_MZ=JT=23U]YB:[5ZZC$)W<.AIMBB3:&
|
|
||||||
+M_8,[9C"SU:MY%I#G1P*,.%"7H-.MJ!L1<,-93X25*-A70/1;AU7,W4?.63TX
|
|
||||||
+M]6(=)M]%&!<M@U?E(SK#DN0I)JZEJT>U45@%VRRB)A-TW^ZQ(Q_ZZED+F:K/
|
|
||||||
+M%[7I:0$4UD$#WL$0]Y40\#A.AW7;\'O>+#S^/JY/1OZ/3K>4XW>>[AD]#5PU
|
|
||||||
+M:AAQU[/W.(AMMJ>4Q`29&#B9U_*;%>_:VI]+:'MP6ICV=R&`\X8;_^^!.GMS
|
|
||||||
+M[CNN,)<#02E3:J,LVK(;7-QHKD@J'][T+:HKY^3V'XE@FQ3YWDML=KUMVS9T
|
|
||||||
+M--UE*6'ES*\2<L#VF)@Z.*G"/L#%@/+XH^NZ]:G%Y#6=6-,6K*1L8T^J:KMN
|
|
||||||
+MP4V*$YQXT8=J[5=H0%G&1`:`(&`!2N8*%Q%,H=_@0=\O(9E#/)`D(2#`DC(Q
|
|
||||||
+M3<]9[G9P^?PUZN7?L<7/&!%`1`@!(NVVQ>LIZ+T;BH^&&6:[X%`OG)G&&W,6
|
|
||||||
+M)H$T1"14@OL:/PY6'YT^RE4`/70$D`%\6*J_[>]LELD`/3H$F<BGYO7W#-P#
|
|
||||||
+M)(+"(18=3Z.PLD1!A(L6?39=WB8-50HDFLR"P*C^G[ZY9`1/(3_#Q*Q&$F]*
|
|
||||||
+M@A`\#X%A8B2?ZU1)$9%)(Q%@"@LDG-D`8'(&,"(8(YS�!3:QMRG/,TU?%R
|
|
||||||
+MG7'NZ/Y>C6R':]3T>]R:N[G/F>L^-Z8W(@05",604",9-Y"A3TN;K^7U_D?5
|
|
||||||
+M]+)>,!C#_7R<;\D\CX1PL]S$<S^5PCQ;Y]N7OG-3"G1I4&VM7_;EN(G/K_I[
|
|
||||||
+MN:N:C<>^X[C@`P,/0"-31'T61;6DR@][DZ>GRX>I6>`E\3;J]#&J;J-QZDEZ
|
|
||||||
+MN`Z"S<>Q9D;G8<GSMW1G=>V4DQ'4T:78NL=:(*1TE&S_R-!0N)EE'3[0&B*!
|
|
||||||
+MXQ*NL=1!1^MME#CP3"#Z\>EWS"6?=]^))<L/*'D&0)_+'NT37FKB6HHED8[\
|
|
||||||
+MP@8?\?J3Q]N@LL\X@V,1(0:0)L21V28:XQN,AB[Z8TJAUKCT1M]NHG:;H(B@
|
|
||||||
+MS^R5=M$+[^_8K"^&BP,&JT$M,/?@J\LZP'!<-A.;DV<5D0!J$((TAJ[I<=8O
|
|
||||||
+M<WXT`V#3<Y.[4_ZJ&0Q+;CH%#^?(=#@2S:]3(($2XI=O_SZY(DP\(RP(.)68
|
|
||||||
+MXW^IE\%0)2B[NW^6>"@K:@'@@WDG:-N)I=7TH:&]V:HU#$8H@2H7&5C!B8/<
|
|
||||||
+M>+*R`ZN=[,`1\>^V(NU#+I]][;J]J$$)=@@8!C&8F38Z2ZYW@!C;&*7UJH?S
|
|
||||||
+MQ*8,+&MJ!D'$H2WJ"=:##R1L!V.SV:FBB#KMJZ-A8U=P'F)%DBD+Y(]`W<76
|
|
||||||
+M0"B`P'7/I#2C1W`Q//G]JRCF4N!U6V.,:6B(^'F_PM]?37_I^G\>W:F,#`!L
|
|
||||||
+M#$,?SLN]D@92+./&PT_IX_D\#C]]P.?H=A[GX8-3>EHG#-5Y:9#51"%*"@8,
|
|
||||||
+MR,#P4(,M6C4*U0!009;_,O-S^;=Q%1U4]/RN)VFLJGPB`SJ%?B]A6)UT%0>\
|
|
||||||
+M7?CM)8U>&P!P_@=A7"`%&/ZL=2/B:J/Z>/Q_QN./XO]HL>FR%6\R]CX<7IV1
|
|
||||||
+MM0K6BSY&M4Q1/\^R5ZB<#`'BZ1KJHV!@LE\&)<,`$827-VNZ1PXSI0/%T;N2
|
|
||||||
+M:'A7:2NQC\#-SZFY*DG.9SA'QL/C0XYFJ`..@)-DDV29VD5#RDE>]G8Q^3VW
|
|
||||||
+ML)IY;;C3C--_D9B/%?0-[\A)B^]1S.A,'R5))?(UTRN%AZ[R=7^#1>8QD6;?
|
|
||||||
+M\\>9'WS7+Q2MMQB$4G'&LKKE_5:P6VHX=!IXC/A?V!&;E12BA`S"D%5]>PD&
|
|
||||||
+MLS[;Q-_NX\>E1,6!J!`.E>BKU-7><]ML_>YUY`*]=J1"%3^'=ZG#M`_=FP\5
|
|
||||||
+M_1@U\L5HC!6/M^AK=6RKL$<4WMRZ#=/)WD-JE[^K[$5:2F,WF$W:PM9.*M4Y
|
|
||||||
+M,1F3/&3Z4AKF[0P[+OYJE&NVX5N("$H-U)M)Q]U1O+/^/[+5!F0AOSIW)JO1
|
|
||||||
+M-W"XB@\FPFF^^+'I5<9E=\R":I,J$XM:0Y$V!"D*0/[J>C4]94.6F>7>N3E^
|
|
||||||
+MZS4N7`.VR=BDAPI]W\W2SM;LA4L[C%P*HES%0]GNJ_4,L#<[Z^]\A0P/G_9<
|
|
||||||
+M-GJDQ,;U!M7+G$4.Q774HG@<3ZR^,@.(C5#=9R1V,1BJ>G;B^X1G8:0*J9PI
|
|
||||||
+M0O;M#TOG'I,BH@=IM=C3M.?3S+JKI7#,9^+T0K`E=MSFF.*<'F(&]5Y[G99G
|
|
||||||
+M$Q0MHQB/4_,W&S73.T(4?>X?VDZ)REP[?IQJS%,A"CV=$(_EC6+=\=C[AZ^L
|
|
||||||
+MT6_?WU:<<"*P,*F!BTVR-7-UZ8R*<(0Z,?*JV<():T68@T1[:_##<>AN:?DT
|
|
||||||
+MFK>X6UN;;41]M,=73:_5`8T)T.!>[ADD@M$)!&9DX4_BU5+'$2![3L[L]J^Z
|
|
||||||
+MNB>(E(74J3W"%&E0J0Z!0A1"@K/[XD5C,*BGM#&WV3BL+08N0>"'P6\JH&%[
|
|
||||||
+M_'ONYQUCK5P8Z@\6BSVU0/@G(./1*RH.1^?4F$S2GX":4R%3D!X_,0:@()!,
|
|
||||||
+MX.-/LI6"D^5H9QOY(BMN;Y[FTCO5U^=_V]-005[^R6@N"H]!I"@*J2I9445_
|
|
||||||
+M?LM+4&A$:4*A`@3/(K`5895(TB768N-]$Y",C9W-PTE8>7<6FSV_800?X^2Q
|
|
||||||
+ML6'"\!JHI4"AC#]EJ"+343WC0<ZAD@1A"H"(J`@@>"P%!X6Z=Z+>/#;E\:3H
|
|
||||||
+M*J9Z)ZHG?FL$!@@([X%`13X]*>3\4W=4+!:?80*1;@X_:7`V2$",%O%+Y;NW
|
|
||||||
+MSK?IH.1]7FZJ%F6T;`NP\"[HC>M:RB9@9<!0@5"8`P*!0@1$`LLUJIW\LM)S
|
|
||||||
+MF[S%QOO]V&GJZZ7=Y^!.7U#[F<<`H4I]\$##HI(@BL0*84T)]KZODY'.!>CM
|
|
||||||
+MN5V'C^C]SZ+:[B[]+=^EM]A+]F_!\*>SA;M^^UT*,[^Z802/D8,&I$20.<B(
|
|
||||||
+MCG.#[O,*QA>*F'Q/!Z_P-@_2/8^OT^"0@))K'@?MU`W<04B($7/6DU3`./KY
|
|
||||||
+M:1.?^/Y_JBD3"%"(29.P4)IHI_DA+0R?6Z%LR#'D>>-RY]_<[&]";4S'N9LZ
|
|
||||||
+M"Y_Z2\H5#%Z.7J?>2_*H\+?3*3@?E2><BI;"X*(;,/-+C,[=@5'(68`+PB!`
|
|
||||||
+M#C_4Q&I:S[CCH7Y:*R(MYAZ3$#(('E4F32%9#TE.LCN?!L.UW0)R1?-163@K
|
|
||||||
+MO!L)_7#I?&D`X'CGK&)`F`0($&-=4.70?Q[8?'Y'=?L7-;)4HWWPM+-;Q<?\
|
|
||||||
+MPHWN=Q_5QAJX)>)5$*M1;0//-@K!L7>5:>)F4[WO4.>,LM,94O5/E$SMAZ>H
|
|
||||||
+M\![?H>XT]I<WJ1C!D"Q\E)CXE^',%,QY\#?+K(L,A+-J!*'@`E7""M'JSH[0
|
|
||||||
+MUB@AHPP#0@JTHUF+"76.<IL,-PG^56DB=_X26G4W"#V!U`"%2_G9](:V%<B%
|
|
||||||
+M8D2#0B*R5^%$):,5*PP%)5UR0$23)=/4U*ZKG[YHVWO^<L\[K9S52*(GH-%8
|
|
||||||
+M.AT9AJE>?,L*YE4(_XY&?7:=O,PS0::.'M8IM8F#)34%%76)^HW?:5.<Q"C'
|
|
||||||
+M2:=*$+RR0P"&_NARU_58F=B!'.CV6U<3$SB/0]<\S`,Q`RYR@UGN_@3[D2$A
|
|
||||||
+M2@\5)7=&<#+6DAP&6G1<Y0?K)I'^0?*I;KT-36H=7@XN\CH+O%4M8SN]0Y71
|
|
||||||
+M5+6*G'.H$8AY0:/,=+=![_R=V&ZU[O#-+:+#/%EZM=YPV];`,V`I2IW'O-@:
|
|
||||||
+MTR\CFZ#1#1MY4,,!/NLBSMLDH*+&FJ^>S=Y6&,4AE,AE@%G2V47(DXEPJT)0
|
|
||||||
+M..PL_..*EQ<M%G=D73[G&VS+Y]`Y,;1*H49.QW2.+@L=M`K2F;+-E>-^+I,4
|
|
||||||
+M56.:ST1Q#2EAT>"]%8+(?\>5O`*'!.B37T7>L6.7PW*[?5@`6%UD\A!('2L+
|
|
||||||
+M.$R'/6!C>GKC#<5U,GN3M%F9WZDL`#J<E\*\/W>-4OYO1/K#W'8/.+L-B!CG
|
|
||||||
+MX>C5+"2X.U^#\@\X%#M@H7^B?UMO@_`IC<6<>OX?O"ZMQ?_D-P]Z(A[$]Z_%
|
|
||||||
+M+`/EE#J)UQ1L@*%@C[$1"K]>"A+B&;O@8'Q?I;)U?/;1OP=SD7<Z1,"Q'K2J
|
|
||||||
+M&8*.,0G/J6["QSZC4H^$KDKMLP$UIEA7KG..+UK'S4LB]:_+Y2>X(0+@/D`C
|
|
||||||
+M/D>5DIGL#VVM`4V40(D($48(AZH0`3N`(J^_Z7C^-$K2C]+3I-44+?CE2BE:
|
|
||||||
+M#.]`(@$(E,*(A?*OS&D'J%0$X>>2#.C>W]UAB?==P[^@X@.USAH$4HVQ5N0`
|
|
||||||
+MZODUS#,W(T.=7,.=4Z"1PJ7D&>!D_"SMO9HN>!IEBHY@LWU&4`A2C*%!*P@F
|
|
||||||
+M8:NPEZZ1OJ+8!2PM4`I5D,(BM2`%DHF4@!@-D)G$G;9"2$@VMR@%5`*C5O"T
|
|
||||||
+M4`BYZ*`8%I9>WMXV(`8>GP<;"C@H!&EW$,0`H)-61KVF4`"BE8`&6*P(T5MY
|
|
||||||
+M[,,;ND@P0:%;$:!6,4@"?R*`@&(I`?/V.OR$P*:HNV,TP%#5A;Z`2JI_A9J'
|
|
||||||
+M][V!`!.$/:?0EGVF8TSR<_YI`4.0%0RB(=X"A!$/`!0OJ`)50["B$$0M!0I0
|
|
||||||
+M2"H11'R04*J-04+S-FYJBAX210"0]YV;<VQ?3JG\W</I?IJ?0;"&6#OQLOO:
|
|
||||||
+M>I/?,69?B1'DF7D;]MP`1`).+&>KUBK4B?4=S:MC<=XWW$U4KM[G[J2EVCN;
|
|
||||||
+M/@/-;<73F[?O[4P!0W`4.`%#R=[`2!W.O9K37>X]!V]56Z^)X;I9Q1+C!41$
|
|
||||||
+MA)"20]?3*9`AEP?L?*3)N`Q3!3D0`LC0"E*)%1I%>]!0VP4.J"ALW`8GBTD@
|
|
||||||
+M#L^)$P#&[CW_!W%E/`IFIAB>S2DGPA)&9)!F9F`A"*L=/@R,)LXZQI19P9&2
|
|
||||||
+M15")D#(0,00(D`:\P,X<1RJ9G3.Q+U&^0G`B'FW@#<8A8&_T9K"I@@00;!0V
|
|
||||||
+MFV+(\9;GZW-.K6N_:8*<.7D+*!;[0KZ.DM+/;Q1#DO]1P=U<X&3$<1$.0%"*
|
|
||||||
+MH<`*'E@2@$0$5RP`1`-WN-,0AUS2828S:@01!X.]G)S7NM%=TJNDV/?;4LNK
|
|
||||||
+M9==J]QN<W=-HVD=HVIY8(+3K@H5#U'4Q[`N.(E/ZR\FGLB#GL'$&0`SMZ<IM
|
|
||||||
+M0''1*9&)%*8X2[=1)6&V:])@<X\`/.E:&%G2(^"PVUD9M`.6ZEG[0T*!?XE7
|
|
||||||
+M*)NJBN5KJ^!WS"V*^K3[TX(8P@Q9C?XV^B!<F-!/`)_$P0<6L!@6\&;4)*0:
|
|
||||||
+M&Y]1?6>0K$SDMIB"0,=)TI=B1D1`&1@9+]015`AUX.G%YCZTQSMP&.NF[Q2D
|
|
||||||
+MLFF^%S/`X*6,"GT/\-3\<Q7JRJ4003DG:>I.+EJ[:-C*DVU%JVK?RT55HA5M
|
|
||||||
+M=IL\W`ZX8X'%R6G6UJ($"HG#NPH6)[9)5#I>#661&#'.,(R#0BA?#,(=4P<9
|
|
||||||
+MC849O*SG1$]L9,1UH*!1HCV=J7?)NP'\_L2T\!H*$(67:P!AE18K\Z$!Z8K#
|
|
||||||
+M3<BJ0S<9XFVSY4)'@Q'==>**H"OOKTP&`WF3K!\@2',QTC=T"G1R-J+][XLV
|
|
||||||
+M(+8U@=`1MFP\,V/E5"&F8=JAMA>ST4A8R]DFB-V.8J;>MYL^"G(IU)_!1T1S
|
|
||||||
+M1ZKUQC]A"6W+L==(4)^N[[/IW.W'V>OI3ZQ3I)5#=,;"[4`WYH:H"EIO#QP]
|
|
||||||
+MSLR@!H'@:TL;M]IPBL<^H8]HE8\TV##;I=QSPY_<XST^OOP\'_QP8U>]QF;P
|
|
||||||
+MM/>O"3T)[*80=VMJ@'7HE+(S=H(%<+PY^)\@S<S(YO;%WJ,P^Q(GUFG48GD\
|
|
||||||
+MSS=G`-LA=((YY8/GUFD`N^9-KZ<U.6L5,N0),)!"")LGCS71M,"L:S=[>]_<
|
|
||||||
+M;HPZ-X4BF#W(*'(0`K;8HF.\+K,J(@7U(\$0%_L?>;GX@ZBQQ8+SQM-(KZ,T
|
|
||||||
+M9C:"/-1$LP6-!UB!H'J`"Z[BU1&&*B])JICY7IM$"$[=1A]Z(`N00(;F^!CC
|
|
||||||
+M5^P%&$;?H8DTT347F=$+184JB<Q,?@UJPRZEVLNV,M;F81Y6W*E@8F-@:UW+
|
|
||||||
+MUCE\O;C^9QGZN\AOP.GI?,(3UYO5//\C5J\WO?ZOCGWOHGAO*2,@R&)`"9BU
|
|
||||||
+M["+8KH`$+7&@&Z4>Y0.(9!0,+$N[M:9UZ'XN<E/AUZW;U/DPCMHB0"*]#D#^
|
|
||||||
+M_VR]PLKFTC<0TYX!26Z*67#0#.`5B05(;M=<(K='`Y!WC;<K`NI[;MT+6A3*
|
|
||||||
+MD`9\`(NC+0,%F#@A`TAR1`BB3V>^`PG`&KU$<SX&CQE>+X:VQP^/<A5[6J*S
|
|
||||||
+M!/4M6\;"HA!RDBH@?3RBPKBIEH32=%7I;"K<Z0EZ_,I6[07?[4-:1=_'4[-S
|
|
||||||
+MP9F-I"D)V=7>6EA!K$],NI#&V[..-H-1%"/>\UILE?@CGDZ_->"R,B!V.L@$
|
|
||||||
+M\&)YAC4=[_/OLTGHN.\HM45P\AYL%3UTXX8UK89FA0IA!,I6./VBK\XR="PY
|
|
||||||
+MX$>0E!].'NBXP53HL[#=M+887P^KJ$O*\J%%R3%HS53F3>PW"W)RE^0XP`&B
|
|
||||||
+MX5S4FXKO7KFF=!'B*40SE(LCGE4:[%<'28D=N(EZTAK?KT,J8/+0;J:&KD4Q
|
|
||||||
+MB[OTEDH1OBO+GDKUP8>/$/I/K&79VH!DW(/A#%O11Q,@?43>'>UDD\ER#*FT
|
|
||||||
+M')J(=2J>5.VW66K+2X(DT)IN(PK1W!R2F&OY&3M18,?"*L,:G@I^8P.Q>&WF
|
|
||||||
+M#.EZ:?20E*9N80_^%7)T<D'&5M0J$6&RB+T(USCCMKU739O\/1518<*YIG-0
|
|
||||||
+M#65V@+'Y%U6DOF2-F>'JNIOAM2U8J7U%SQ!5SP<%>O\CD:[T#9<P6C))@P9F
|
|
||||||
+MXA#D)&#<BYHDU%EY4Z)&<30'1LTC]25P84V4D'%1LVS6@>,"[%5=`GHARQIT
|
|
||||||
+M%\QD4*(FQ4)1^"94)MT,<05.QG++X<\&]/K$6S/WCS493!P1"*-:=F<4IPIN
|
|
||||||
+M/+HA_?]9K12Z4?9#B^ZG``&8)YPC&'J`:.$+6*I=A&GX74>)[[HP]&G1Q'WD
|
|
||||||
+M&I$34#4[D:E&0X>6!PZ:3'B0^W>(,D=*^/92`7Q>Q9-VAPUEQY3OTL_HZO#;
|
|
||||||
+M>#LA+:6P2J`"-2V,RA8$1Z7F[]*K)3,'CQHY$78K\B']@`8P%]=;,/U'E7#N
|
|
||||||
+M*&)X?MY1EQ%FK,8H:9K><W!,3A+XJ7WC>;;!S?'N^@'EQ,87%WG+>)!%3C>!
|
|
||||||
+MPG)6ZNZG!P'@4%04Y;)`BM,$\7AB]3RL4:\XW7W00(".LJFSTKGT*M2TN^L7
|
|
||||||
+M%@0`B`(A<`$"(1N!QX5FD<SH=5450P&>\?@KO;H<;O.81WCXCX0Q*/U9@/0C
|
|
||||||
+M%(`V()O@A7*8\:4@&#F)EC0I05R7\PBCBCE#2XF,#"KCFN@W<DX")&7&2Q%U
|
|
||||||
+M#O13N<&2B9&HDMZKMM0,]DIS60L1JBKZ01&R=S*!1\9-8U7.?SM9E<+5'C]>
|
|
||||||
+M>X>>N2Q1:\ZY(2F0,Q?:''2/&A[N9<9W,W"C.BFA"X6`#S/>PH?FQ$NZU?L5
|
|
||||||
+M:%KJY31\`:46RYB8<C4G8&[Y>I12>4+@=KUF'V84*AZ9)<=+3`TMQSW!&4&1
|
|
||||||
+MOVK3F)P\F'+M>@6I@UR)FR&V&]@54]WN43U=;>HIBQ14'9V"IBLL3##*Q],)
|
|
||||||
+M]QWNQWGS@"VU^,'ZK(O"&XX73+[$P:JK;=PJN[)<HRDVO8<U1[*Q-UY0SL%'
|
|
||||||
+M/WY"1A*,7:^X[^'K4RX?([G;.-QYYN`'K@D#KM8RHW,O:;&,_:T"^M`+*E*E
|
|
||||||
+M+79L^KAV(>=#R\,!3RVIIE4%#$M#M:[T;+*^L[L\_E->?;7GBTF.WV'SA^,C
|
|
||||||
+MI_(U5I*^F0K_A\E2M,7C("1S"";,76BQS-J0\@"(!@A7K8LPYTN8I$"81B%1
|
|
||||||
+M`2=VC#?M08HPA"!^5`AU)@H2LH%WI7IIQW$(44H5I@A&_(*0&2]9BH$/S424
|
|
||||||
+MA[ID(4F0PG+%CL8%'F96&M\T#-$984"5((`<NZN89TN`%QI6,JR;F?(Y#K];
|
|
||||||
+MTW,[F5"RU555SJEF<,8,<G[#W?6<[YKPOF/&LPZ32F8Z1HT>GI9O\^J`G)"3
|
|
||||||
+MF$F&UPO%T7I"-_4@?=<7448N.,D(T:\SOC/B0Q[.&;'-BYP3#<._R"(7]"@2
|
|
||||||
+MB;[:-2ACE"YUZ)"\@RP@*&P7C0%#GO?PG1<VFPRE-.NY$NW7,W!;O\J3[+KI
|
|
||||||
+M4Z-E)T7A["ERR(`0@6'W$QV])]<:,6/5R*`)ZX%"Y`3KF9>Z($QPJPJX;0J%
|
|
||||||
+MM77KK\]``=R#J10T14"4D%<\6L+ME\?UG3^>^5U.OD!0]L0`3B!0@@KR<9-P
|
|
||||||
+MXQ-;L=B_?>*S;KP@@@<.\Z#.-M"Q%IPM$S$,EA?"(H)'AE%@E>(`38$0KENH
|
|
||||||
+M]!A=)P]Y_=LLSAE$R%+").Z_8;-;K9`DT\WCWG0Y"P]#];[*TR"=W$V,V91A
|
|
||||||
+M71,P*$:G9H`TMG,HETJ\/!38KNF;OK\P*&5H!OJJO>I!4(\(*&-IF"F@%#?:
|
|
||||||
+MYPX,&FHI(<=[S*;`*%B<R!K\*VFQX6WU[K78U-Z*&LE9"8[6N1=@I0I:6BU*
|
|
||||||
+MDZZ;!:UO34V.1L-QA5R@8UP=L.`*9/85?J_JH!D`1'SD(B!#-P*C!$NG>V3+
|
|
||||||
+M@P&<#C!ZMB!2%%`=4,*!O.H4S#`@H%NK\B\5#*>?XGQMCF8W'\*G4SGM?J3$
|
|
||||||
+M.[`K2U%`44!BQ&16V,KX'0*3KCCC(@8G90&TX@*';F\]9.BEPZ+322R/-M10
|
|
||||||
+MR5`$IZ@@N9>,I984,W=;)`QC)JX*%<D70I#0,L/'L#HP'.DM!0M!0L=C5=''
|
|
||||||
+M14W+0!*UU''>>Y?0&'-AM15=<-%!(&;ZK>!O.*&]IL/,LNP44\D;(=EVWGN.
|
|
||||||
+M<:*;Y.R9TN"O:[A73N%1/,)PN)6#(&+%6B&Y"2A!;:[G-0<O!LKJ]=W&^;>(
|
|
||||||
+M^-\(=F/B/>'L(+-)POFTHV%?R5\SNC[ABBN!J7%-YELS%@L5(H5@58P5D`B`
|
|
||||||
+MQ/D!-HQ7,::HBH&,@RH3&"0PAK<0`BHRSV)WVT<&3@">YM+7(7/6<0U33JH%
|
|
||||||
+MFYS:'!VWP`!*]J2!E)"0B0B*((HQ$11B/WIB!1L2$UPD9"-3(1C`4W^Z@.T2
|
|
||||||
+M$RV=VM%5165C3(]7JSZ`N=#Z<"=NM9G/\83I['_K/4_HWCFKHWV:J:Y?Y'7A
|
|
||||||
+M?DI$1`BM`$0%(``A]#ENPDS3Z^)MN7]3\W6%<T-&>.*Z'<&R.8+:@@0!@(0%
|
|
||||||
+M"09`0($!0@H)Q;WT=+2$%0GCY,%<C811E_?+U:6R.#+0NHZS]YRS=_SY1%7^
|
|
||||||
+M5G?HC\/?M15/RPB@`/!S,N^=WR5*':Y8?')V/`\/I/*RLVF#JS#JB:"[02*`
|
|
||||||
+M(@,L`B`8VC"`T1V#0(X948JAZ&79='7Y?9/I#DH9\FJ9FA)"2LKEYN(?4URS
|
|
||||||
+MK.S,^\-'K^>V.FV#8+C555,5:JE1I*&A64J4TRPD#?A"`A7A?E=V;H^5^.-Z
|
|
||||||
+M6;9:`B>RV7/ZWMF<\GFAL7@"0.W=<"A9CT-E%!,43[^,@)S]'FB,H9"!IZQH
|
|
||||||
+MH1S!EM)#>P@B%+J@H=P:#%`(H!&-^E\:4(U/%V"IIP!0VP4,!8N3#&7E(4*%
|
|
||||||
+M)0E+QR`H8:"X`T;-Y?41POCSN=O=DYGW<]63['4"AD9$])!#N0$%Y%49R1H]
|
|
||||||
+M6*"?%YJ!HJ9E39'VPG`9;O/EH#D8L95,.A8F&DHX/>60794`1,M0S,&B"%^>
|
|
||||||
+M[P>L"]1T,P1:P($'TD0"Y41OAU@4,@*&P>W@],!U&R'%CMFQ:HY5&CU!-N[:
|
|
||||||
+M:`]:H6HH)F;`H[WL[.Z[\^9ZZ[8.CHFX(ZCAF4T3E@H1&D:F)3>UXW%).3O]
|
|
||||||
+MRT3:,VU>!F(A42\]S]WA?`OT/W'0ZPB&3&:)2,V*VM25/IZA($,I-Z0HI"08
|
|
||||||
+M-.R5&JC:35G(%UE`@`EGDP"BC`(HW^#4+@4(!-L%"/8+F@V"(0E!$*(9H2M"
|
|
||||||
+MHP<I@(A3.EH*%/A10BIZG)RGTY"X'GC!0"*`08_BV;4):=,W*'1$>D"AN&["
|
|
||||||
+MHYN6'+C&PP%&S;A:II;HDMNP,&X`2"C<T`$\BWO'G`H<X1#048]X,!(!5';5
|
|
||||||
+M9!`7Q65`NR`#)@+Q?`%PB!9N'JL.24`"=TBC8<^264I[CX?H76/"[!!S/&:.
|
|
||||||
+M%X#M7\\`373'H-'>@&373*.8%#/6+@=`;!$.`>9,UQMY*T*=9H'VFCSJY7!1
|
|
||||||
+MH?-G*<O,SZM)H[S5ACLRWLNC#>%!;>7G+:^;0H7;MI8I6M-//XE"IS@R@H7E
|
|
||||||
+MY\2C1W-"$VZCS`4,FYEC"$C)Q.UJUX'<V"C-8*&,!0P.5E--UX7@*&H.B;%0
|
|
||||||
+ML+&6EQKHA_$SSME2NEX/@\11XBG.X,`4--8G3ED+.WP7^'FY4Y7)CEWI**H9
|
|
||||||
+M44)PT)$0/,^UQZ'N/X]?+\725]GGS$W`4(.Y4IXFLYV[SPZ/.7ID;*W5,DZ7
|
|
||||||
+M6NO,9"[`%LY37W7WV2T8:.]H"AB:H&G4F3,'3ADO=?%))6R;'4M$0U]M1N4<
|
|
||||||
+M,V)O"@MH*''QS7D)N`H?*TZ#32Y1#:TPJ%X*%502"V(;4JY>2_3P_3?C7Y81
|
|
||||||
+MP,^I,KDUEX*'2RG3Z1TR=K[S57UI`^G-6<@AIA:KW**=FLHRLF,>RE9I:;CV
|
|
||||||
+M4C_OU2_?Z=CQ.71PKA'F+1J.K@V'#!L0F\Q=I##\/`0="-8S0ZE_`R/TQ<ZV
|
|
||||||
+M&3,_K3)<4$0*N!0XCG>F'CHT4`W8<[TPTZU!0+[.[FW,VK1354`PU6:N@I$Y
|
|
||||||
+M1)%S)K0='IB5-T]&)5RK!@S/9"_3E$4!NNR>F!0@9T1/(CV^`DDA/[34!0RQ
|
|
||||||
+M%#(P6<\X#56L2%-:EHOT6QP7!X.0;!#X&/ASC>:8LLPWEBS*LKKB9-)5-!59
|
|
||||||
+M;6UU`W:U?"X$VMI5J-"JJM33NIPX&OL!*OGM;9XNSKN6C=V;OA4M:TIL8[8*
|
|
||||||
+M%^J)980DA-L3E:P4-XO,2W1]3!ORDA(8FT"AA0<T0`B0@@$AD<IIX]K7)))?
|
|
||||||
+M<.[GHCS^J;>@TH(;+`IJ,.ZW<J;D-%3:3/3Q\*J;-,MSQHN:?A,B!F[43+*A
|
|
||||||
+M3T`NL]D$+W",F=1;?[324]FE`>.(-U!^J\((H=5D)E'S]CYGC\FGS[,.=D#,
|
|
||||||
+M(@6/J18(LK%TQ`B`(48]'1WW<%0RDAXIVF(Y#P3)VT/;XM<X*$(=^2K1'24&
|
|
||||||
+M55^C@6F/V]WOI]OR"@NK\CN)K%SO$([H`B`/5XM7"(&62-<CT\*JF+[2+_WG
|
|
||||||
+MKXK0J9>?VC8[E<)6]2F'B^O^_4N,>`RGOW`@G[W'RU`?#%[PDA$DU(]^8A?^
|
|
||||||
+MDQ/MS"1D8>ER,>3H3/'H7"ZZZZZ8`23.A,Z?;PB*/NR+C\>IA[S;IO[X\L(U
|
|
||||||
+M*8+6$!40?^>X!1K^-^)7O8>D0_%NKYCSH<TR'OLV.OQ`4@X0_2\83>ZS]:)(
|
|
||||||
+M#/7AQ%$8&:1AS>,M=[MMCGM6%&D&#F`2`,8!0\5[J>,"A_;L#]"=R+AE/7]C
|
|
||||||
+M8_=MCV(DO(2>>\_GL\JRX/G?045JAA`"?.G7@>0?@4#[;Q3V6/>^I+CR_SZ/
|
|
||||||
+M,QH'S_0_0J>U@>)/_$/5:-1JY7&7'UTX3B"P`2@J&]3PK1Y37045.-[&RU@C
|
|
||||||
+MRZE!QRM1S7R%'CX/#[_R-&9Z3/H$A9[*ITAY+H87N/MQ^XRSN=4GN]8J"*9T
|
|
||||||
+M4R?\IT_Z'OD_W1@',I\5%O.?>V!^_>KA%_VPS55;10&&]E*IK?KLI,/7_/>L
|
|
||||||
+M^UO:R&]I_AK"3J<UAO"':52CZ0SHW&=@[_]DDT5E69\1(RM#Y('517P>+\;_
|
|
||||||
+M27^:>[[K:'0_IRO#AY]*0D\W_]V,W?7WO7[;][\4N]4J;74]OKR<YX+,3HS5
|
|
||||||
+M-^>#I("ZF)[\D.+7[JW<1M_S+T\R07]^.GHN2N_V9W^UAH/?M6L(]G=;K8`^
|
|
||||||
+MNGF*OQV7S(P>`QF$K9K.8#_/:_`86%)Q#=W]L'PKE*TZ/Q/>W0X:[]Z!=<AP
|
|
||||||
+M[M,3V:G65?K3L9DD?V^Q*VB.OE[QI9PM'#=^<;.7QLQSN>MVAGZ3XE<T)#Y?
|
|
||||||
+MF*H8QF?OJ!!W!F41S*"'QE"1;W2$G@CFMLBQZBT?S1KV.)RT(3((Y1TN%]N\
|
|
||||||
+M[?\DP3J"1[<&#L#@)<<.!W^8K$$/A-T3CHK\\@8_A2\!>^R4@7Z<;!&Y2#\_
|
|
||||||
+MZ)!2!?*E\$B%&8XI)1DC5[YX0Q.D!U5!X>T_#9.<7W8\W8*\2(#[7OKPL/%P
|
|
||||||
+MMCZ'U_NJ)T\='S>((D_7A^ELI=U(3,[P-9[+TT'PWDE'"$\!X=_\_).ROW^?
|
|
||||||
+MC=.S-W,8.>T2CBVG&3T>S'H/R<V,(]17Y\?Z9949J%A>==M"JX)?-VOP7GM-
|
|
||||||
+M?2\':;;5N;OB<3>9^20W4&3S:/LW:AA<AG0Q/QE^%$C9;^YY5[*/TX4]:U)+
|
|
||||||
+MR.=ENOC<%J+`\(2[L7FL9$7U_UQ["R"69C;JW556R,+O.,RK&&>RVH-G6TXL
|
|
||||||
+MDV\!)L(@OU(`.H@8<80FQRK)$PE(T\YV=T-QZICXH'U:!W.%:XYY4M:_.D`5
|
|
||||||
+M6YB":A=D94"H`(#`W"$#%A,')0]-U:>&S":X@W%\BOH3^V+%,$"HQKE""HB-
|
|
||||||
+M0A!C@V((WR@$O#G3>I#[/G[2P@U&5UR47BO1?WMZ5$;Y`0%V0?IONU7!O;OQ
|
|
||||||
+M$->N4W#HL,OL_MU_I-KT.>\Z;3O>4:*LX#Q,&CM7">7Z$\6]4ZMY7I=NTYM%
|
|
||||||
+MZ)IY48P2K*WEJ^2V-(B`/`IKS(?6MQ2E'=>U[*5&>8($I,!YRH*,FI%59T3G
|
|
||||||
+MCT@9#11"[,IUXXTZJ=+@L^BO,#!,@8`B,,'D:[,(IRKJN!N(PCUN7ETFMNQ>
|
|
||||||
+MT.M,<5L4#9FB*%?$W!57FM?/^ZBA@2T-7E"Z%F;\[:8XR0<6)_+$E*H!FF8.
|
|
||||||
+M-XG<(8#8^U:S%08IU0*`6B3A$>0E<[+<ZK@N!FS4:YV48;0PM!EH/5%A[CMP
|
|
||||||
+M$&^(`B?L%`P>JG_>:@;>-`Y1E`&`8=(RYUE')]1`TYY(A:#RB0FG3$PE+)8S
|
|
||||||
+MGU.@!,R[6^+K@E&1>47'U:5Y9^H"9N$SLJ5J?%:_%JV9"PQ"#C%I;C:?MTG)
|
|
||||||
+M<_+^*U#T[J#O`$?NA$H`J5@CT><;M?J"+89:J5'/N15EU7F7>F1"I0/G+">Y
|
|
||||||
+M3+-@8%+J^"D)LAGHE1:IW4%D>L70=!S'KQZ=T/&:X3,<[QS#1;Q0:L.Y4(WR
|
|
||||||
+MIS8('-XK,_=EA`C,5^$HZS9@[X!)(&TP;5L0+F9IIL:86^R:&;<$8IY<9"=$
|
|
||||||
+M980D2B%BWIQ8MF1**D<C'(B(H>]I;;CK69[X^A0WPLO@0K_*(X]F;<'PTXE7
|
|
||||||
+M=W36:V(H)-<H3-9VJ2*8<)R3>CY_U'(8WEH]4NH>1WYRQ+BR</?UNR'F7?3D
|
|
||||||
+MMT2R'C%XN48K6]_0=R98O.?AXM=&"^,8F;?1F5KU"<RW6$%"J"HU6`[)>@4%
|
|
||||||
+M$1U.K,)S+4!]61]+Q!Q];=1<:0H&&9F^&`@320!JS8'6STZ[:=E*IZ;&BDC7
|
|
||||||
+M0Z/7-5O>MY:IK*BM/5>;X56^9&U^#42.H)OFI54HV1)`TJC7_B33GAVXJ]7O
|
|
||||||
+M;?1"OI([IPP,[MV,/M;SJ$X)F]1/8&A&510:&ID)5D![*U)9=_1^5X(."9$3
|
|
||||||
+MAKAD3Q"G(58]/R>7K9'EWM'SQL4<(VSXPXG5&YKMU-_C3ND*S57\G4:0+B9,
|
|
||||||
+MJ5UN=Z]5!0TZS\:=[S.J>H-<K0YH6-N7,(0P<'BJ!U.&WQQQ+M=8D`JJ%TC`
|
|
||||||
+MV8O[\4"(>)[0]<R`YSOCG4S:@B1`=(&#*9Q5"$!`TZ\[P<5B!VH%*9$H@-=[
|
|
||||||
+M@OO8,]4"KEF@KLC'OVU1@TC.JJ5E+%4@H:S!+"N5'H0`/I[O@]/6&@/E8.VK
|
|
||||||
+M1A8',GW)\Y&$!8FA`9,)%T=LD&Q69%/J(]AM-J[P;/M==J8K$*&@89V&ME8"
|
|
||||||
+MND7RM#$V]AD=V*V[6[S=23=Z!389@HD9G;3JULY3B57)>6K0B-@S.BC387!M
|
|
||||||
+M$S)!YJMA-!`JT[;'[Z^+^[0R-)::%H%<W@K)X=V]%EM'[L1N-/H$+/ZPK=PZ
|
|
||||||
+M90IF0PY)Q1"6)NO=H,!ANF>GHKM=7G#8VW_]:.U^;<&A9&M/6UP?W""!BY%`
|
|
||||||
+M#![EE,U-#7?W49=0ZXLS<=KZ:P-?Z3.X9G9?7W,9U.N2TLZ.@I-#Z@G7\7TV
|
|
||||||
+MWHSA0AEJ*,1,`G^Y-'RV*AEKF,/?,:P^UZ&F<"J&#J0NMG0&<\V@F>9R#G`8
|
|
||||||
+M8"2$M4:2?X:&&W[K8\*=>CQHL8G]'<]@CN1F#'"X-ZO8\(=;X+BJT=]2+C:H
|
|
||||||
+M4PL_D99">XRIU6^@S@B;6=;A"S6J!DD&;F8.@CY3\G*1J,;<LF7<C4PQ,D/U
|
|
||||||
+M<-TY*?E&G^YK2P,`]W0X8'Q->%1,\3U?C65;#&*>6O<Z/7LG$Y-:=(5M<>E!
|
|
||||||
+MFVJJJM,IDRO),/K661%M4\6#1,IBT04O9HXN64;!]\FH*H#<46AK6%-'LCF9
|
|
||||||
+MR+1L24TY4/W_$$4`;*4R6-)=-<[!3VX70!7=GKY%5A/>5U.!K<CQI^/OK%BE
|
|
||||||
+M6S8>P4`/<AR`HXY(>^X".'H%Q?;P',T8(,[(O1T\\K!%">*#TZ3L)AZ$/:3#
|
|
||||||
+MN#L_''38,`!CF+]:(8[7>H+[G4L`8'8$'2;(;A-TB>Y-?`Z0SHGO<-&]>=?1
|
|
||||||
+M.%\D]#]-"\?6"0!S,$=]"\WZJKFWW+0,KN8@H5#,P4JO+2[I8+)K.GE;OZ'7
|
|
||||||
+MW6^-;6=X]"-%4;W@V9C.#*N(]M'VAWIC7&N_#'E;W?3^T'>]-2-X=9B^4;U\
|
|
||||||
+MT'*-(H-.>>8:,Q(3.V46OUD]TQT7D-PM+!C5]1&$A5_.0$FU.WL(&AB[^J(W
|
|
||||||
+MC9_.U;3@%I%C#)%M;R_(%(ZBT`U7Z%$^2K53FF"->R$&0GTQ1HJCRC*ZNL1@
|
|
||||||
+M;F!0>FK6OK[E(YYHF^=GYS,F>9DC+2@>J2@N@/>\BL^-6Z=!H*-?OLIAZ_NK
|
|
||||||
+MLDN"E,GB8]*I2!;=UH7JBS.6AF88^:>-ZOR=_N7A"M\B,YE=CK<O+*-R,X#L
|
|
||||||
+MY9<)!(/=I<-GKYE)T>V?B(2%+;-$FTH0P@=0=)7(@D5HIYCOV$EW.MZP_:HB
|
|
||||||
+M&,OED]W=BZGUITM#NKAC8,`1SO"V/<*,?4Q+AGF/V=O(_QZ9Q08'TG;(.%W>
|
|
||||||
+M3QI"^R0+9F25\+`V81V6@)V/X&8HAATY-]YTO.V[=I1-2`X6_"5%@0JCBP0?
|
|
||||||
+M!4@"!(7#-S*G*12#Q7ISP]OR(^?&&48%!EP>;\@B($4F'_XNY(IPH2!)0!**
|
|
||||||
+`
|
|
||||||
+end
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/tab-crash.exp b/gdb/testsuite/gdb.base/tab-crash.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.base/tab-crash.exp
|
|
||||||
@@ -0,0 +1,43 @@
|
|
||||||
+# This testcase is part of GDB, the GNU debugger.
|
|
||||||
+
|
|
||||||
+# Copyright 2017 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 { ![istarget x86_64-*-* ] || ![is_lp64_target] } {
|
|
||||||
+ return
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+standard_testfile
|
|
||||||
+
|
|
||||||
+# gcc-base-debuginfo-6.3.1-1.fc25.x86_64
|
|
||||||
+# /usr/lib/debug/lib64/libgcc_s-6.3.1-20161221.so.1.debug
|
|
||||||
+# objcopy -R .debug_loc -R .debug_ranges -R .debug_info -R .debug_abbrev -R .debug_aranges -R .debug_str -R .comment ...
|
|
||||||
+
|
|
||||||
+set debugfilebz2uu ${srcdir}/${subdir}/${testfile}.bz2.uu
|
|
||||||
+set debugfile [standard_output_file ${testfile}]
|
|
||||||
+
|
|
||||||
+if {[catch "system \"uudecode -o - ${debugfilebz2uu} | bzip2 -dc >${debugfile}\""] != 0} {
|
|
||||||
+ untested "failed uudecode or bzip2"
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+file stat ${debugfile} debugfilestat
|
|
||||||
+if {$debugfilestat(size) != 71936} {
|
|
||||||
+ untested "uudecode or bzip2 produce invalid result"
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+clean_restart ${debugfile}
|
|
||||||
+
|
|
||||||
+gdb_test "complete p si" "complete p si\r\np size_of_encoded_value"
|
|
@ -1,323 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Gary Benson <gbenson@redhat.com>
|
|
||||||
Date: Wed, 29 Aug 2018 16:11:50 +0100
|
|
||||||
Subject: gdb-rhbz1491128-batch-mode-exit-status-1of2.patch
|
|
||||||
|
|
||||||
;; Fix for 'gdb in batch mode always exit with status 0' (Gary Benson)
|
|
||||||
;; RHBZ #1491128
|
|
||||||
|
|
||||||
Indicate batch mode failures by exiting with nonzero status
|
|
||||||
|
|
||||||
This commit causes GDB in batch mode to exit with nonzero status
|
|
||||||
if the last command to be executed fails.
|
|
||||||
|
|
||||||
gdb/ChangeLog:
|
|
||||||
|
|
||||||
PR gdb/13000:
|
|
||||||
* gdb/main.c (captured_main_1): Exit with nonzero status
|
|
||||||
in batch mode if the last command to be executed failed.
|
|
||||||
* NEWS: Mention the above.
|
|
||||||
|
|
||||||
gdb/testsuite/ChangeLog:
|
|
||||||
|
|
||||||
PR gdb/13000:
|
|
||||||
* gdb.base/batch-exit-status.exp: New file.
|
|
||||||
* gdb.base/batch-exit-status.good-commands: Likewise.
|
|
||||||
* gdb.base/batch-exit-status.bad-commands: Likewise.
|
|
||||||
|
|
||||||
diff --git a/gdb/ChangeLog b/gdb/ChangeLog
|
|
||||||
--- a/gdb/ChangeLog
|
|
||||||
+++ b/gdb/ChangeLog
|
|
||||||
@@ -1,3 +1,10 @@
|
|
||||||
+2018-08-16 Gary Benson <gbenson@redhat.com>
|
|
||||||
+
|
|
||||||
+ PR gdb/13000:
|
|
||||||
+ * gdb/main.c (captured_main_1): Exit with nonzero status
|
|
||||||
+ in batch mode if the last command to be executed failed.
|
|
||||||
+ * NEWS: Mention the above.
|
|
||||||
+
|
|
||||||
2018-08-03 Sergio Durigan Junior <sergiodj@redhat.com>
|
|
||||||
|
|
||||||
* ser-tcp.c (net_open): Fix thinko when deciding whether to
|
|
||||||
diff --git a/gdb/NEWS b/gdb/NEWS
|
|
||||||
--- a/gdb/NEWS
|
|
||||||
+++ b/gdb/NEWS
|
|
||||||
@@ -7,6 +7,9 @@
|
|
||||||
can be passed using the '[ADDRESS]:PORT' notation, or the regular
|
|
||||||
'ADDRESS:PORT' method.
|
|
||||||
|
|
||||||
+* GDB in batch mode now exits with status 1 if the last command to be
|
|
||||||
+ executed failed.
|
|
||||||
+
|
|
||||||
*** Changes in GDB 8.2
|
|
||||||
|
|
||||||
* The 'set disassembler-options' command now supports specifying options
|
|
||||||
diff --git a/gdb/main.c b/gdb/main.c
|
|
||||||
--- a/gdb/main.c
|
|
||||||
+++ b/gdb/main.c
|
|
||||||
@@ -518,6 +518,7 @@ captured_main_1 (struct captured_main_args *context, int &python_script)
|
|
||||||
int i;
|
|
||||||
int save_auto_load;
|
|
||||||
struct objfile *objfile;
|
|
||||||
+ int ret = 1;
|
|
||||||
|
|
||||||
#ifdef HAVE_SBRK
|
|
||||||
/* Set this before constructing scoped_command_stats. */
|
|
||||||
@@ -1051,7 +1052,7 @@ captured_main_1 (struct captured_main_args *context, int &python_script)
|
|
||||||
processed; it sets global parameters, which are independent of
|
|
||||||
what file you are debugging or what directory you are in. */
|
|
||||||
if (system_gdbinit && !inhibit_gdbinit)
|
|
||||||
- catch_command_errors (source_script, system_gdbinit, 0);
|
|
||||||
+ ret = catch_command_errors (source_script, system_gdbinit, 0);
|
|
||||||
|
|
||||||
/* Read and execute $HOME/.gdbinit file, if it exists. This is done
|
|
||||||
*before* all the command line arguments are processed; it sets
|
|
||||||
@@ -1059,7 +1060,7 @@ captured_main_1 (struct captured_main_args *context, int &python_script)
|
|
||||||
debugging or what directory you are in. */
|
|
||||||
|
|
||||||
if (home_gdbinit && !inhibit_gdbinit && !inhibit_home_gdbinit)
|
|
||||||
- catch_command_errors (source_script, home_gdbinit, 0);
|
|
||||||
+ ret = catch_command_errors (source_script, home_gdbinit, 0);
|
|
||||||
|
|
||||||
/* Process '-ix' and '-iex' options early. */
|
|
||||||
for (i = 0; i < cmdarg_vec.size (); i++)
|
|
||||||
@@ -1069,12 +1070,12 @@ captured_main_1 (struct captured_main_args *context, int &python_script)
|
|
||||||
switch (cmdarg_p.type)
|
|
||||||
{
|
|
||||||
case CMDARG_INIT_FILE:
|
|
||||||
- catch_command_errors (source_script, cmdarg_p.string,
|
|
||||||
- !batch_flag);
|
|
||||||
+ ret = catch_command_errors (source_script, cmdarg_p.string,
|
|
||||||
+ !batch_flag);
|
|
||||||
break;
|
|
||||||
case CMDARG_INIT_COMMAND:
|
|
||||||
- catch_command_errors (execute_command, cmdarg_p.string,
|
|
||||||
- !batch_flag);
|
|
||||||
+ ret = catch_command_errors (execute_command, cmdarg_p.string,
|
|
||||||
+ !batch_flag);
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
@@ -1082,11 +1083,11 @@ captured_main_1 (struct captured_main_args *context, int &python_script)
|
|
||||||
/* Now perform all the actions indicated by the arguments. */
|
|
||||||
if (cdarg != NULL)
|
|
||||||
{
|
|
||||||
- catch_command_errors (cd_command, cdarg, 0);
|
|
||||||
+ ret = catch_command_errors (cd_command, cdarg, 0);
|
|
||||||
}
|
|
||||||
|
|
||||||
for (i = 0; i < dirarg.size (); i++)
|
|
||||||
- catch_command_errors (directory_switch, dirarg[i], 0);
|
|
||||||
+ ret = catch_command_errors (directory_switch, dirarg[i], 0);
|
|
||||||
|
|
||||||
/* Skip auto-loading section-specified scripts until we've sourced
|
|
||||||
local_gdbinit (which is often used to augment the source search
|
|
||||||
@@ -1115,19 +1116,19 @@ captured_main_1 (struct captured_main_args *context, int &python_script)
|
|
||||||
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. */
|
|
||||||
- if (catch_command_errors (func, execarg, !batch_flag)
|
|
||||||
- && core_bfd == NULL)
|
|
||||||
- catch_command_errors (symbol_file_add_main_adapter, symarg,
|
|
||||||
- !batch_flag);
|
|
||||||
+ 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);
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
if (execarg != NULL)
|
|
||||||
- catch_command_errors (exec_file_attach, execarg,
|
|
||||||
- !batch_flag);
|
|
||||||
+ ret = catch_command_errors (exec_file_attach, execarg,
|
|
||||||
+ !batch_flag);
|
|
||||||
if (symarg != NULL)
|
|
||||||
- catch_command_errors (symbol_file_add_main_adapter, symarg,
|
|
||||||
- !batch_flag);
|
|
||||||
+ ret = catch_command_errors (symbol_file_add_main_adapter,
|
|
||||||
+ symarg, !batch_flag);
|
|
||||||
}
|
|
||||||
|
|
||||||
if (corearg && pidarg)
|
|
||||||
@@ -1135,9 +1136,14 @@ captured_main_1 (struct captured_main_args *context, int &python_script)
|
|
||||||
"a core file at the same time."));
|
|
||||||
|
|
||||||
if (corearg != NULL)
|
|
||||||
- catch_command_errors (core_file_command, corearg, !batch_flag);
|
|
||||||
+ {
|
|
||||||
+ ret = catch_command_errors (core_file_command, corearg,
|
|
||||||
+ !batch_flag);
|
|
||||||
+ }
|
|
||||||
else if (pidarg != NULL)
|
|
||||||
- catch_command_errors (attach_command, pidarg, !batch_flag);
|
|
||||||
+ {
|
|
||||||
+ ret = catch_command_errors (attach_command, pidarg, !batch_flag);
|
|
||||||
+ }
|
|
||||||
else if (pid_or_core_arg)
|
|
||||||
{
|
|
||||||
/* The user specified 'gdb program pid' or gdb program core'.
|
|
||||||
@@ -1146,17 +1152,23 @@ captured_main_1 (struct captured_main_args *context, int &python_script)
|
|
||||||
|
|
||||||
if (isdigit (pid_or_core_arg[0]))
|
|
||||||
{
|
|
||||||
- if (catch_command_errors (attach_command, pid_or_core_arg,
|
|
||||||
- !batch_flag) == 0
|
|
||||||
+ ret = catch_command_errors (attach_command, pid_or_core_arg,
|
|
||||||
+ !batch_flag);
|
|
||||||
+ if (ret == 0
|
|
||||||
/* attach_command could succeed partially and core_file_command
|
|
||||||
would try to kill it. */
|
|
||||||
&& !have_inferiors ())
|
|
||||||
- catch_command_errors (core_file_command, pid_or_core_arg,
|
|
||||||
- !batch_flag);
|
|
||||||
+ ret = catch_command_errors (core_file_command,
|
|
||||||
+ pid_or_core_arg,
|
|
||||||
+ !batch_flag);
|
|
||||||
+ }
|
|
||||||
+ else
|
|
||||||
+ {
|
|
||||||
+ /* Can't be a pid, better be a corefile. */
|
|
||||||
+ ret = catch_command_errors (core_file_command,
|
|
||||||
+ pid_or_core_arg,
|
|
||||||
+ !batch_flag);
|
|
||||||
}
|
|
||||||
- else /* Can't be a pid, better be a corefile. */
|
|
||||||
- catch_command_errors (core_file_command, pid_or_core_arg,
|
|
||||||
- !batch_flag);
|
|
||||||
}
|
|
||||||
|
|
||||||
if (ttyarg != NULL)
|
|
||||||
@@ -1180,7 +1192,7 @@ captured_main_1 (struct captured_main_args *context, int &python_script)
|
|
||||||
{
|
|
||||||
auto_load_local_gdbinit_loaded = 1;
|
|
||||||
|
|
||||||
- catch_command_errors (source_script, local_gdbinit, 0);
|
|
||||||
+ ret = catch_command_errors (source_script, local_gdbinit, 0);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
@@ -1200,12 +1212,12 @@ captured_main_1 (struct captured_main_args *context, int &python_script)
|
|
||||||
switch (cmdarg_p.type)
|
|
||||||
{
|
|
||||||
case CMDARG_FILE:
|
|
||||||
- catch_command_errors (source_script, cmdarg_p.string,
|
|
||||||
- !batch_flag);
|
|
||||||
+ ret = catch_command_errors (source_script, cmdarg_p.string,
|
|
||||||
+ !batch_flag);
|
|
||||||
break;
|
|
||||||
case CMDARG_COMMAND:
|
|
||||||
- catch_command_errors (execute_command, cmdarg_p.string,
|
|
||||||
- !batch_flag);
|
|
||||||
+ ret = catch_command_errors (execute_command, cmdarg_p.string,
|
|
||||||
+ !batch_flag);
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
@@ -1217,8 +1229,11 @@ captured_main_1 (struct captured_main_args *context, int &python_script)
|
|
||||||
|
|
||||||
if (batch_flag)
|
|
||||||
{
|
|
||||||
+ int error_status = EXIT_FAILURE;
|
|
||||||
+ int *exit_arg = ret == 0 ? &error_status : NULL;
|
|
||||||
+
|
|
||||||
/* We have hit the end of the batch file. */
|
|
||||||
- quit_force (NULL, 0);
|
|
||||||
+ quit_force (exit_arg, 0);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
|
|
||||||
--- a/gdb/testsuite/ChangeLog
|
|
||||||
+++ b/gdb/testsuite/ChangeLog
|
|
||||||
@@ -1,3 +1,10 @@
|
|
||||||
+2018-08-16 Gary Benson <gbenson@redhat.com>
|
|
||||||
+
|
|
||||||
+ PR gdb/13000:
|
|
||||||
+ * gdb.base/batch-exit-status.exp: New file.
|
|
||||||
+ * gdb.base/batch-exit-status.good-commands: Likewise.
|
|
||||||
+ * gdb.base/batch-exit-status.bad-commands: Likewise.
|
|
||||||
+
|
|
||||||
2018-07-11 Sergio Durigan Junior <sergiodj@redhat.com>
|
|
||||||
Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
Paul Fertser <fercerpav@gmail.com>
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/batch-exit-status.bad-commands b/gdb/testsuite/gdb.base/batch-exit-status.bad-commands
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.base/batch-exit-status.bad-commands
|
|
||||||
@@ -0,0 +1 @@
|
|
||||||
+bork
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/batch-exit-status.exp b/gdb/testsuite/gdb.base/batch-exit-status.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.base/batch-exit-status.exp
|
|
||||||
@@ -0,0 +1,63 @@
|
|
||||||
+# Copyright (C) 2018 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 -batch" exits with appropriate status.
|
|
||||||
+
|
|
||||||
+standard_testfile
|
|
||||||
+
|
|
||||||
+set good_commands "$srcdir/$subdir/batch-exit-status.good-commands"
|
|
||||||
+set bad_commands "$srcdir/$subdir/batch-exit-status.bad-commands"
|
|
||||||
+
|
|
||||||
+proc _test_exit_status {expect_status cmdline_opts} {
|
|
||||||
+ global gdb_spawn_id
|
|
||||||
+
|
|
||||||
+ gdb_exit
|
|
||||||
+ if {[gdb_spawn_with_cmdline_opts $cmdline_opts] != 0} {
|
|
||||||
+ fail "spawn"
|
|
||||||
+ return
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+ set result [wait -i $gdb_spawn_id]
|
|
||||||
+ verbose $result
|
|
||||||
+ gdb_assert { [lindex $result 2] == 0 }
|
|
||||||
+ set actual_status [lindex $result 3]
|
|
||||||
+ gdb_assert { $actual_status == $expect_status }
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+proc test_exit_status {expect_status cmdline_opts} {
|
|
||||||
+ with_test_prefix $cmdline_opts {
|
|
||||||
+ _test_exit_status $expect_status $cmdline_opts
|
|
||||||
+ }
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+# gdb -batch with nothing to do should exit 0.
|
|
||||||
+test_exit_status 0 "-batch"
|
|
||||||
+
|
|
||||||
+# Bad command-line options should cause exit 1.
|
|
||||||
+test_exit_status 1 "-batch -jslkflsdjlkfjlksdjf"
|
|
||||||
+
|
|
||||||
+# gdb -batch with good commands should exit 0.
|
|
||||||
+test_exit_status 0 "-batch -ex \"info source\""
|
|
||||||
+test_exit_status 0 "-batch -x $good_commands"
|
|
||||||
+
|
|
||||||
+# gdb -batch with bad commands should exit 1.
|
|
||||||
+test_exit_status 1 "-batch -ex \"set not-a-thing 4\""
|
|
||||||
+test_exit_status 1 "-batch -x $bad_commands"
|
|
||||||
+
|
|
||||||
+# Success or failure of the last thing determines the exit code.
|
|
||||||
+test_exit_status 0 "-batch -ex \"set not-a-thing 4\" -x $good_commands"
|
|
||||||
+test_exit_status 0 "-batch -x $bad_commands -ex \"info source\""
|
|
||||||
+test_exit_status 1 "-batch -x $good_commands -x $bad_commands"
|
|
||||||
+test_exit_status 1 "-batch -x $good_commands -ex \"set not-a-thing 4\""
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/batch-exit-status.good-commands b/gdb/testsuite/gdb.base/batch-exit-status.good-commands
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.base/batch-exit-status.good-commands
|
|
||||||
@@ -0,0 +1 @@
|
|
||||||
+info mem
|
|
@ -1,65 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Gary Benson <gbenson@redhat.com>
|
|
||||||
Date: Mon, 3 Sep 2018 16:14:55 +0100
|
|
||||||
Subject: gdb-rhbz1491128-batch-mode-exit-status-2of2.patch
|
|
||||||
|
|
||||||
;; Fix for 'gdb in batch mode always exit with status 0' (Gary Benson)
|
|
||||||
;; RHBZ #1491128
|
|
||||||
|
|
||||||
Fix batch exit status test failure on Fedora 28
|
|
||||||
|
|
||||||
This commit adds calls to remote_close and clear_gdb_spawn_id to
|
|
||||||
gdb.base/batch-exit-status.exp, fixing failures reported by buildbot
|
|
||||||
on Fedora 28 where gdb_spawn_id not being reset by the previous test
|
|
||||||
caused default_gdb_spawn to return without spawning.
|
|
||||||
|
|
||||||
This commit also changes the test to use detect GDB's exit using
|
|
||||||
gdb_test_multiple expecting 'eof', rather than using 'wait -i' alone.
|
|
||||||
This means the testcase won't hang forever on failure as fixed in
|
|
||||||
gdb.base/quit.exp by commit 15763a09d4ae ("Fix 'gdb.base/quit.exp
|
|
||||||
hangs forever' if the test fails").
|
|
||||||
|
|
||||||
gdb/testsuite/ChangeLog:
|
|
||||||
|
|
||||||
* gdb.base/batch-exit-status.exp: Use gdb_test_multiple and expect
|
|
||||||
'eof' before 'wait -i'. Use remote_close and clear_gdb_spawn_id.
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
|
|
||||||
--- a/gdb/testsuite/ChangeLog
|
|
||||||
+++ b/gdb/testsuite/ChangeLog
|
|
||||||
@@ -1,3 +1,8 @@
|
|
||||||
+2018-09-04 Gary Benson <gbenson@redhat.com>
|
|
||||||
+
|
|
||||||
+ * gdb.base/batch-exit-status.exp: Use gdb_test_multiple and expect
|
|
||||||
+ 'eof' before 'wait -i'. Use remote_close and clear_gdb_spawn_id.
|
|
||||||
+
|
|
||||||
2018-08-16 Gary Benson <gbenson@redhat.com>
|
|
||||||
|
|
||||||
PR gdb/13000:
|
|
||||||
diff --git a/gdb/testsuite/gdb.base/batch-exit-status.exp b/gdb/testsuite/gdb.base/batch-exit-status.exp
|
|
||||||
--- a/gdb/testsuite/gdb.base/batch-exit-status.exp
|
|
||||||
+++ b/gdb/testsuite/gdb.base/batch-exit-status.exp
|
|
||||||
@@ -29,11 +29,18 @@ proc _test_exit_status {expect_status cmdline_opts} {
|
|
||||||
return
|
|
||||||
}
|
|
||||||
|
|
||||||
- set result [wait -i $gdb_spawn_id]
|
|
||||||
- verbose $result
|
|
||||||
- gdb_assert { [lindex $result 2] == 0 }
|
|
||||||
- set actual_status [lindex $result 3]
|
|
||||||
- gdb_assert { $actual_status == $expect_status }
|
|
||||||
+ gdb_test_multiple "" "run til exit" {
|
|
||||||
+ eof {
|
|
||||||
+ set result [wait -i $gdb_spawn_id]
|
|
||||||
+ verbose $result
|
|
||||||
+
|
|
||||||
+ gdb_assert { [lindex $result 2] == 0 }
|
|
||||||
+ gdb_assert { [lindex $result 3] == $expect_status }
|
|
||||||
+
|
|
||||||
+ remote_close host
|
|
||||||
+ clear_gdb_spawn_id
|
|
||||||
+ }
|
|
||||||
+ }
|
|
||||||
}
|
|
||||||
|
|
||||||
proc test_exit_status {expect_status cmdline_opts} {
|
|
@ -1,81 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
||||||
Date: Fri, 23 Mar 2018 20:42:44 +0100
|
|
||||||
Subject: gdb-rhbz1553104-s390x-arch12-test.patch
|
|
||||||
|
|
||||||
;; [s390x] Backport arch12 instructions decoding (RH BZ 1553104).
|
|
||||||
;; =fedoratest
|
|
||||||
|
|
||||||
diff --git a/gdb/testsuite/gdb.arch/s390x-arch12.S b/gdb/testsuite/gdb.arch/s390x-arch12.S
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.arch/s390x-arch12.S
|
|
||||||
@@ -0,0 +1,4 @@
|
|
||||||
+.text
|
|
||||||
+.globl load_guarded
|
|
||||||
+load_guarded:
|
|
||||||
+.byte 0xeb,0xbf,0xf0,0x58,0x00,0x24,0xe3,0xf0,0xff,0x50,0xff,0x71,0xb9,0x04,0x00,0xbf,0xe3,0x20,0xb0,0xa0,0x00,0x24,0xe3,0x10,0xb0,0xa0,0x00,0x04,0xe3,0x10,0x10,0x00,0x00,0x4c,0xe3,0x10,0xb0,0xa8,0x00,0x24,0xe3,0x10,0xb0,0xa8,0x00,0x04,0xb9,0x04,0x00,0x21,0xe3,0x40,0xb1,0x20,0x00,0x04,0xeb,0xbf,0xb1,0x08,0x00,0x04,0x07,0xf4
|
|
||||||
diff --git a/gdb/testsuite/gdb.arch/s390x-arch12.exp b/gdb/testsuite/gdb.arch/s390x-arch12.exp
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.arch/s390x-arch12.exp
|
|
||||||
@@ -0,0 +1,34 @@
|
|
||||||
+# Copyright 2018 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 { ![istarget s390x-*linux-*] || ![is_lp64_target] } {
|
|
||||||
+# verbose "Skipping s390x-prologue-skip.exp"
|
|
||||||
+# return
|
|
||||||
+#}
|
|
||||||
+
|
|
||||||
+set testfile "s390x-arch12"
|
|
||||||
+set uufile "${srcdir}/${subdir}/${testfile}.o.uu"
|
|
||||||
+set ofile "${srcdir}/${subdir}/${testfile}.o"
|
|
||||||
+
|
|
||||||
+if { [catch "system \"uudecode -o ${ofile} ${uufile}\"" ] != 0 } {
|
|
||||||
+ untested "failed uudecode"
|
|
||||||
+ return -1
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+gdb_exit
|
|
||||||
+gdb_start
|
|
||||||
+gdb_load $ofile
|
|
||||||
+
|
|
||||||
+gdb_test "disas load_guarded" " <\\+28>:\tlgg\t%r1,0\\(%r1\\)\r\n\[^\r\n\]* <\\+34>:\tstg\t%r1,168\\(%r11\\)\r\n.*"
|
|
||||||
diff --git a/gdb/testsuite/gdb.arch/s390x-arch12.o.uu b/gdb/testsuite/gdb.arch/s390x-arch12.o.uu
|
|
||||||
new file mode 100644
|
|
||||||
--- /dev/null
|
|
||||||
+++ b/gdb/testsuite/gdb.arch/s390x-arch12.o.uu
|
|
||||||
@@ -0,0 +1,20 @@
|
|
||||||
+begin 644 s390x-arch12.o
|
|
||||||
+M?T5,1@("`0`````````````!`!8````!````````````````````````````
|
|
||||||
+M``$X``````!```````!```<`!.N_\%@`)./P_U#_<;D$`+_C(+"@`"3C$+"@
|
|
||||||
+M``3C$!```$SC$+"H`"3C$+"H``2Y!``AXT"Q(``$Z[^Q"``$!_0`+G-Y;71A
|
|
||||||
+M8@`N<W1R=&%B`"YS:'-T<G1A8@`N=&5X=``N9&%T80`N8G-S````````````
|
|
||||||
+M`````````````````````````````````P```0``````````````````````
|
|
||||||
+M`````P```@```````````````````````````P```P``````````````````
|
|
||||||
+M```````!$````0``````````````````````;&]A9%]G=6%R9&5D````````
|
|
||||||
+M````````````````````````````````````````````````````````````
|
|
||||||
+M`````````````````````````!L````!``````````8`````````````````
|
|
||||||
+M``!``````````$`````````````````````$```````````````A`````0``
|
|
||||||
+M```````#````````````````````@```````````````````````````````
|
|
||||||
+M!```````````````)P````@``````````P```````````````````(``````
|
|
||||||
+M``````````````````````````0``````````````!$````#````````````
|
|
||||||
+M``````````````````"``````````"P````````````````````!````````
|
|
||||||
+M```````!`````@``````````````````````````````L`````````!X````
|
|
||||||
+M!@````0`````````"``````````8````"0````,`````````````````````
|
|
||||||
+H`````````2@`````````#@````````````````````$`````````````
|
|
||||||
+`
|
|
||||||
+end
|
|
@ -1,746 +0,0 @@
|
|||||||
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
||||||
From: Sergio Durigan Junior <sergiodj@redhat.com>
|
|
||||||
Date: Fri, 11 Jan 2019 10:52:17 -0500
|
|
||||||
Subject:
|
|
||||||
gdb-rhbz1560010-fix-assertion-symbol-language-dict-language-1of5.patch
|
|
||||||
|
|
||||||
;; Fix 'Assertion `SYMBOL_LANGUAGE (sym) == DICT_LANGUAGE (dict)->la_language' failed.'
|
|
||||||
;; Keith Seitz, RHBZ#1560010.
|
|
||||||
|
|
||||||
gdb/23712: Introduce multidictionary's
|
|
||||||
|
|
||||||
gdb/23712 is a new manifestation of the now-infamous (at least to me)
|
|
||||||
symtab/23010 assertion failure (DICT_LANGUAGE == SYMBOL_LANGAUGE).
|
|
||||||
|
|
||||||
An example of the problem (using test case from symtab/23010):
|
|
||||||
|
|
||||||
Reading symbols from /home/rdiez/rdiez/arduino/JtagDue/BuildOutput/JtagDue-obj-release/firmware.elf...done.
|
|
||||||
(gdb) p SysTick_Handler
|
|
||||||
dwarf2read.c:9715: internal-error: void dw2_add_symbol_to_list(symbol*, pending**): Assertion `(*listhead) == NULL || (SYMBOL_LANGUAGE ((*listhead)->symbol[0]) == SYMBOL_LANGUAGE (symbol))' failed.
|
|
||||||
A problem internal to GDB has been detected,
|
|
||||||
further debugging may prove unreliable.
|
|
||||||
Quit this debugging session? (y or n)
|
|
||||||
|
|
||||||
This assertion was added specifically to catch this condition (of adding
|
|
||||||
symbols of different languages to a single pending list).
|
|
||||||
|
|
||||||
The problems we're now seeing on systems utilizing DWARF debugging seem to
|
|
||||||
be caused by the use of LTO, which adds a CU with an artificial DIE of
|
|
||||||
language C99 which references DIEs in other CUs of language C++.
|
|
||||||
|
|
||||||
Thus, we create a dictionary containing symbols of C99 but end up
|
|
||||||
stuffing C++ symbols into it, and the dw2_add_symbol_to_list triggers.
|
|
||||||
|
|
||||||
The approach taken here to fix this is to introduce multi-language
|
|
||||||
dictionaries to "replace" the standard, single-language dictionaries
|
|
||||||
used today.
|
|
||||||
|
|
||||||
Note to reviewers: This patch introduces some temporary functions to
|
|
||||||
aide with review. This and other artifacts (such as "See dictionary.h"
|
|
||||||
which appear incorrect) will all be valid at the end of the series.
|
|
||||||
|
|
||||||
This first patch introduces the new multidictionary and its API (which
|
|
||||||
is, by design, identical to the old dictionary interface). It also
|
|
||||||
mutates dict_create_hashed and dict_create_linear so that they take
|
|
||||||
a std::vector instead of the usual struct pending linked list. This will
|
|
||||||
be needed later on.
|
|
||||||
|
|
||||||
This patch does /not/ actually enable multidictionary's. That is left
|
|
||||||
for a subsequent patch in the series.
|
|
||||||
|
|
||||||
I've done exhaustive performance testing with this approach, and I've
|
|
||||||
attempted to minimize the overhead for the (overwhelmingly) most common
|
|
||||||
one-language scenario.
|
|
||||||
|
|
||||||
On average, a -g3 -O0 GDB (the one we developers use) will see
|
|
||||||
approximately a 4% slowdown when initially reading symbols. [I've
|
|
||||||
tested only GDB and firefox with -readnow.] When using -O2, this
|
|
||||||
difference shrinks to ~0.5%. Since a number of runs with these
|
|
||||||
patches actually run /faster/ than unpatched GDB, I conclude that
|
|
||||||
these tests have at least a 0.5% error margin.
|
|
||||||
|
|
||||||
On our own gdb.perf test suite, again, results appear to be pretty
|
|
||||||
negligible. Differences to unpatched GDB range from -7.8% (yes,
|
|
||||||
patched version is again faster than unpatched) to 27%. All tests
|
|
||||||
lying outside "negligible," such as the 27% slowdown, involve a total
|
|
||||||
run time of 0.0007 (or less) with smaller numbers of CUs/DSOs (usually 10
|
|
||||||
or 100). In all cases, the follow-up tests with more CUs/DSOs is never
|
|
||||||
more than 3% difference to the baseline, unpatched GDB.
|
|
||||||
|
|
||||||
In my opinion, these results are satisfactory.
|
|
||||||
|
|
||||||
gdb/ChangeLog:
|
|
||||||
|
|
||||||
PR gdb/23712
|
|
||||||
PR symtab/23010
|
|
||||||
* dictionary.c: Include unordered_map.
|
|
||||||
(pending_to_vector): New function.
|
|
||||||
(dict_create_hashed_1, dict_create_linear_1, dict_add_pending_1):
|
|
||||||
Rewrite the non-"_1" functions to take vector instead
|
|
||||||
of linked list.
|
|
||||||
(dict_create_hashed, dict_create_linear, dict_add_pending): Use the
|
|
||||||
"new" _1 versions of the same name.
|
|
||||||
(multidictionary): Define.
|
|
||||||
(std::hash<enum language): New definition.
|
|
||||||
(collate_pending_symbols_by_language, mdict_create_hashed)
|
|
||||||
(mdict_create_hashed_expandable, mdict_create_linear)
|
|
||||||
(mdict_create_linear_expandable, mdict_free)
|
|
||||||
(find_language_dictionary, create_new_language_dictionary)
|
|
||||||
(mdict_add_symbol, mdict_add_pending, mdict_iterator_first)
|
|
||||||
(mdict_iterator_next, mdict_iter_match_first, mdict_iter_match_next)
|
|
||||||
(mdict_size, mdict_empty): New functions.
|
|
||||||
* dictionary.h (mdict_iterator): Define.
|
|
||||||
|
|
||||||
diff --git a/gdb/dictionary.c b/gdb/dictionary.c
|
|
||||||
--- a/gdb/dictionary.c
|
|
||||||
+++ b/gdb/dictionary.c
|
|
||||||
@@ -27,6 +27,7 @@
|
|
||||||
#include "buildsym.h"
|
|
||||||
#include "dictionary.h"
|
|
||||||
#include "safe-ctype.h"
|
|
||||||
+#include <unordered_map>
|
|
||||||
|
|
||||||
/* This file implements dictionaries, which are tables that associate
|
|
||||||
symbols to names. They are represented by an opaque type 'struct
|
|
||||||
@@ -341,53 +342,66 @@ static void insert_symbol_hashed (struct dictionary *dict,
|
|
||||||
|
|
||||||
static void expand_hashtable (struct dictionary *dict);
|
|
||||||
|
|
||||||
+/* A function to convert a linked list into a vector. */
|
|
||||||
+
|
|
||||||
+static std::vector<symbol *>
|
|
||||||
+pending_to_vector (const struct pending *symbol_list)
|
|
||||||
+{
|
|
||||||
+ std::vector<symbol *> symlist;
|
|
||||||
+
|
|
||||||
+ for (const struct pending *list_counter = symbol_list;
|
|
||||||
+ list_counter != nullptr; list_counter = list_counter->next)
|
|
||||||
+ {
|
|
||||||
+ for (int i = list_counter->nsyms - 1; i >= 0; --i)
|
|
||||||
+ symlist.push_back (list_counter->symbol[i]);
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+ return symlist;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
/* The creation functions. */
|
|
||||||
|
|
||||||
-/* See dictionary.h. */
|
|
||||||
+/* A function to transition dict_create_hashed to new API. */
|
|
||||||
|
|
||||||
-struct dictionary *
|
|
||||||
-dict_create_hashed (struct obstack *obstack,
|
|
||||||
- enum language language,
|
|
||||||
- const struct pending *symbol_list)
|
|
||||||
+static struct dictionary *
|
|
||||||
+dict_create_hashed_1 (struct obstack *obstack,
|
|
||||||
+ enum language language,
|
|
||||||
+ const std::vector<symbol *> &symbol_list)
|
|
||||||
{
|
|
||||||
- struct dictionary *retval;
|
|
||||||
- int nsyms = 0, nbuckets, i;
|
|
||||||
- struct symbol **buckets;
|
|
||||||
- const struct pending *list_counter;
|
|
||||||
-
|
|
||||||
- retval = XOBNEW (obstack, struct dictionary);
|
|
||||||
+ /* Allocate the dictionary. */
|
|
||||||
+ struct dictionary *retval = XOBNEW (obstack, struct dictionary);
|
|
||||||
DICT_VECTOR (retval) = &dict_hashed_vector;
|
|
||||||
DICT_LANGUAGE (retval) = language_def (language);
|
|
||||||
|
|
||||||
- /* Calculate the number of symbols, and allocate space for them. */
|
|
||||||
- for (list_counter = symbol_list;
|
|
||||||
- list_counter != NULL;
|
|
||||||
- list_counter = list_counter->next)
|
|
||||||
- {
|
|
||||||
- nsyms += list_counter->nsyms;
|
|
||||||
- }
|
|
||||||
- nbuckets = DICT_HASHTABLE_SIZE (nsyms);
|
|
||||||
+ /* Allocate space for symbols. */
|
|
||||||
+ int nsyms = symbol_list.size ();
|
|
||||||
+ int nbuckets = DICT_HASHTABLE_SIZE (nsyms);
|
|
||||||
DICT_HASHED_NBUCKETS (retval) = nbuckets;
|
|
||||||
- buckets = XOBNEWVEC (obstack, struct symbol *, nbuckets);
|
|
||||||
+ struct symbol **buckets = XOBNEWVEC (obstack, struct symbol *, nbuckets);
|
|
||||||
memset (buckets, 0, nbuckets * sizeof (struct symbol *));
|
|
||||||
DICT_HASHED_BUCKETS (retval) = buckets;
|
|
||||||
|
|
||||||
/* Now fill the buckets. */
|
|
||||||
- for (list_counter = symbol_list;
|
|
||||||
- list_counter != NULL;
|
|
||||||
- list_counter = list_counter->next)
|
|
||||||
- {
|
|
||||||
- for (i = list_counter->nsyms - 1; i >= 0; --i)
|
|
||||||
- {
|
|
||||||
- insert_symbol_hashed (retval, list_counter->symbol[i]);
|
|
||||||
- }
|
|
||||||
- }
|
|
||||||
+ for (const auto &sym : symbol_list)
|
|
||||||
+ insert_symbol_hashed (retval, sym);
|
|
||||||
|
|
||||||
return retval;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* See dictionary.h. */
|
|
||||||
|
|
||||||
+struct dictionary *
|
|
||||||
+dict_create_hashed (struct obstack *obstack,
|
|
||||||
+ enum language language,
|
|
||||||
+ const struct pending *symbol_list)
|
|
||||||
+{
|
|
||||||
+ std::vector<symbol *> symlist = pending_to_vector (symbol_list);
|
|
||||||
+
|
|
||||||
+ return dict_create_hashed_1 (obstack, language, symlist);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+/* See dictionary.h. */
|
|
||||||
+
|
|
||||||
extern struct dictionary *
|
|
||||||
dict_create_hashed_expandable (enum language language)
|
|
||||||
{
|
|
||||||
@@ -403,52 +417,45 @@ dict_create_hashed_expandable (enum language language)
|
|
||||||
return retval;
|
|
||||||
}
|
|
||||||
|
|
||||||
-/* See dictionary.h. */
|
|
||||||
+/* A function to transition dict_create_linear to new API. */
|
|
||||||
|
|
||||||
-struct dictionary *
|
|
||||||
-dict_create_linear (struct obstack *obstack,
|
|
||||||
- enum language language,
|
|
||||||
- const struct pending *symbol_list)
|
|
||||||
+static struct dictionary *
|
|
||||||
+dict_create_linear_1 (struct obstack *obstack,
|
|
||||||
+ enum language language,
|
|
||||||
+ const std::vector<symbol *> &symbol_list)
|
|
||||||
{
|
|
||||||
- struct dictionary *retval;
|
|
||||||
- int nsyms = 0, i, j;
|
|
||||||
- struct symbol **syms;
|
|
||||||
- const struct pending *list_counter;
|
|
||||||
-
|
|
||||||
- retval = XOBNEW (obstack, struct dictionary);
|
|
||||||
+ struct dictionary *retval = XOBNEW (obstack, struct dictionary);
|
|
||||||
DICT_VECTOR (retval) = &dict_linear_vector;
|
|
||||||
DICT_LANGUAGE (retval) = language_def (language);
|
|
||||||
|
|
||||||
- /* Calculate the number of symbols, and allocate space for them. */
|
|
||||||
- for (list_counter = symbol_list;
|
|
||||||
- list_counter != NULL;
|
|
||||||
- list_counter = list_counter->next)
|
|
||||||
- {
|
|
||||||
- nsyms += list_counter->nsyms;
|
|
||||||
- }
|
|
||||||
+ /* Allocate space for symbols. */
|
|
||||||
+ int nsyms = symbol_list.size ();
|
|
||||||
DICT_LINEAR_NSYMS (retval) = nsyms;
|
|
||||||
- syms = XOBNEWVEC (obstack, struct symbol *, nsyms );
|
|
||||||
+ struct symbol **syms = XOBNEWVEC (obstack, struct symbol *, nsyms);
|
|
||||||
DICT_LINEAR_SYMS (retval) = syms;
|
|
||||||
|
|
||||||
- /* Now fill in the symbols. Start filling in from the back, so as
|
|
||||||
- to preserve the original order of the symbols. */
|
|
||||||
- for (list_counter = symbol_list, j = nsyms - 1;
|
|
||||||
- list_counter != NULL;
|
|
||||||
- list_counter = list_counter->next)
|
|
||||||
- {
|
|
||||||
- for (i = list_counter->nsyms - 1;
|
|
||||||
- i >= 0;
|
|
||||||
- --i, --j)
|
|
||||||
- {
|
|
||||||
- syms[j] = list_counter->symbol[i];
|
|
||||||
- }
|
|
||||||
- }
|
|
||||||
+ /* Now fill in the symbols. */
|
|
||||||
+ int idx = nsyms - 1;
|
|
||||||
+ for (const auto &sym : symbol_list)
|
|
||||||
+ syms[idx--] = sym;
|
|
||||||
|
|
||||||
return retval;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* See dictionary.h. */
|
|
||||||
|
|
||||||
+struct dictionary *
|
|
||||||
+dict_create_linear (struct obstack *obstack,
|
|
||||||
+ enum language language,
|
|
||||||
+ const struct pending *symbol_list)
|
|
||||||
+{
|
|
||||||
+ std::vector<symbol *> symlist = pending_to_vector (symbol_list);
|
|
||||||
+
|
|
||||||
+ return dict_create_linear_1 (obstack, language, symlist);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+/* See dictionary.h. */
|
|
||||||
+
|
|
||||||
struct dictionary *
|
|
||||||
dict_create_linear_expandable (enum language language)
|
|
||||||
{
|
|
||||||
@@ -483,20 +490,26 @@ dict_add_symbol (struct dictionary *dict, struct symbol *sym)
|
|
||||||
(DICT_VECTOR (dict))->add_symbol (dict, sym);
|
|
||||||
}
|
|
||||||
|
|
||||||
+/* A function to transition dict_add_pending to new API. */
|
|
||||||
+
|
|
||||||
+static void
|
|
||||||
+dict_add_pending_1 (struct dictionary *dict,
|
|
||||||
+ const std::vector<symbol *> &symbol_list)
|
|
||||||
+{
|
|
||||||
+ /* Preserve ordering by reversing the list. */
|
|
||||||
+ for (auto sym = symbol_list.rbegin (); sym != symbol_list.rend (); ++sym)
|
|
||||||
+ dict_add_symbol (dict, *sym);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
/* Utility to add a list of symbols to a dictionary.
|
|
||||||
DICT must be an expandable dictionary. */
|
|
||||||
|
|
||||||
void
|
|
||||||
dict_add_pending (struct dictionary *dict, const struct pending *symbol_list)
|
|
||||||
{
|
|
||||||
- const struct pending *list;
|
|
||||||
- int i;
|
|
||||||
+ std::vector<symbol *> symlist = pending_to_vector (symbol_list);
|
|
||||||
|
|
||||||
- for (list = symbol_list; list != NULL; list = list->next)
|
|
||||||
- {
|
|
||||||
- for (i = 0; i < list->nsyms; ++i)
|
|
||||||
- dict_add_symbol (dict, list->symbol[i]);
|
|
||||||
- }
|
|
||||||
+ dict_add_pending_1 (dict, symlist);
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Initialize ITERATOR to point at the first symbol in DICT, and
|
|
||||||
@@ -929,3 +942,408 @@ add_symbol_linear_expandable (struct dictionary *dict,
|
|
||||||
|
|
||||||
DICT_LINEAR_SYM (dict, nsyms - 1) = sym;
|
|
||||||
}
|
|
||||||
+
|
|
||||||
+/* Multi-language dictionary support. */
|
|
||||||
+
|
|
||||||
+/* The structure describing a multi-language dictionary. */
|
|
||||||
+
|
|
||||||
+struct multidictionary
|
|
||||||
+{
|
|
||||||
+ /* An array of dictionaries, one per language. All dictionaries
|
|
||||||
+ must be of the same type. This should be free'd for expandable
|
|
||||||
+ dictionary types. */
|
|
||||||
+ struct dictionary **dictionaries;
|
|
||||||
+
|
|
||||||
+ /* The number of language dictionaries currently allocated.
|
|
||||||
+ Only used for expandable dictionaries. */
|
|
||||||
+ unsigned short n_allocated_dictionaries;
|
|
||||||
+};
|
|
||||||
+
|
|
||||||
+/* A hasher for enum language. Injecting this into std is a convenience
|
|
||||||
+ when using unordered_map with C++11. */
|
|
||||||
+
|
|
||||||
+namespace std
|
|
||||||
+{
|
|
||||||
+ template<> struct hash<enum language>
|
|
||||||
+ {
|
|
||||||
+ typedef enum language argument_type;
|
|
||||||
+ typedef std::size_t result_type;
|
|
||||||
+
|
|
||||||
+ result_type operator() (const argument_type &l) const noexcept
|
|
||||||
+ {
|
|
||||||
+ return static_cast<result_type> (l);
|
|
||||||
+ }
|
|
||||||
+ };
|
|
||||||
+} /* namespace std */
|
|
||||||
+
|
|
||||||
+/* A helper function to collate symbols on the pending list by language. */
|
|
||||||
+
|
|
||||||
+static std::unordered_map<enum language, std::vector<symbol *>>
|
|
||||||
+collate_pending_symbols_by_language (const struct pending *symbol_list)
|
|
||||||
+{
|
|
||||||
+ std::unordered_map<enum language, std::vector<symbol *>> nsyms;
|
|
||||||
+
|
|
||||||
+ for (const struct pending *list_counter = symbol_list;
|
|
||||||
+ list_counter != nullptr; list_counter = list_counter->next)
|
|
||||||
+ {
|
|
||||||
+ for (int i = list_counter->nsyms - 1; i >= 0; --i)
|
|
||||||
+ {
|
|
||||||
+ enum language language = SYMBOL_LANGUAGE (list_counter->symbol[i]);
|
|
||||||
+ nsyms[language].push_back (list_counter->symbol[i]);
|
|
||||||
+ }
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+ return nsyms;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+/* See dictionary.h. */
|
|
||||||
+
|
|
||||||
+struct multidictionary *
|
|
||||||
+mdict_create_hashed (struct obstack *obstack,
|
|
||||||
+ const struct pending *symbol_list)
|
|
||||||
+{
|
|
||||||
+ struct multidictionary *retval
|
|
||||||
+ = XOBNEW (obstack, struct multidictionary);
|
|
||||||
+ std::unordered_map<enum language, std::vector<symbol *>> nsyms
|
|
||||||
+ = collate_pending_symbols_by_language (symbol_list);
|
|
||||||
+
|
|
||||||
+ /* Loop over all languages and create/populate dictionaries. */
|
|
||||||
+ retval->dictionaries
|
|
||||||
+ = XOBNEWVEC (obstack, struct dictionary *, nsyms.size ());
|
|
||||||
+ retval->n_allocated_dictionaries = nsyms.size ();
|
|
||||||
+
|
|
||||||
+ int idx = 0;
|
|
||||||
+ for (const auto &pair : nsyms)
|
|
||||||
+ {
|
|
||||||
+ enum language language = pair.first;
|
|
||||||
+ std::vector<symbol *> symlist = pair.second;
|
|
||||||
+
|
|
||||||
+ retval->dictionaries[idx++]
|
|
||||||
+ = dict_create_hashed_1 (obstack, language, symlist);
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+ return retval;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+/* See dictionary.h. */
|
|
||||||
+
|
|
||||||
+struct multidictionary *
|
|
||||||
+mdict_create_hashed_expandable (enum language language)
|
|
||||||
+{
|
|
||||||
+ struct multidictionary *retval = XNEW (struct multidictionary);
|
|
||||||
+
|
|
||||||
+ /* We have no symbol list to populate, but we create an empty
|
|
||||||
+ dictionary of the requested language to populate later. */
|
|
||||||
+ retval->n_allocated_dictionaries = 1;
|
|
||||||
+ retval->dictionaries = XNEW (struct dictionary *);
|
|
||||||
+ retval->dictionaries[0] = dict_create_hashed_expandable (language);
|
|
||||||
+
|
|
||||||
+ return retval;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+/* See dictionary.h. */
|
|
||||||
+
|
|
||||||
+struct multidictionary *
|
|
||||||
+mdict_create_linear (struct obstack *obstack,
|
|
||||||
+ const struct pending *symbol_list)
|
|
||||||
+{
|
|
||||||
+ struct multidictionary *retval
|
|
||||||
+ = XOBNEW (obstack, struct multidictionary);
|
|
||||||
+ std::unordered_map<enum language, std::vector<symbol *>> nsyms
|
|
||||||
+ = collate_pending_symbols_by_language (symbol_list);
|
|
||||||
+
|
|
||||||
+ /* Loop over all languages and create/populate dictionaries. */
|
|
||||||
+ retval->dictionaries
|
|
||||||
+ = XOBNEWVEC (obstack, struct dictionary *, nsyms.size ());
|
|
||||||
+ retval->n_allocated_dictionaries = nsyms.size ();
|
|
||||||
+
|
|
||||||
+ int idx = 0;
|
|
||||||
+ for (const auto &pair : nsyms)
|
|
||||||
+ {
|
|
||||||
+ enum language language = pair.first;
|
|
||||||
+ std::vector<symbol *> symlist = pair.second;
|
|
||||||
+
|
|
||||||
+ retval->dictionaries[idx++]
|
|
||||||
+ = dict_create_linear_1 (obstack, language, symlist);
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+ return retval;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+/* See dictionary.h. */
|
|
||||||
+
|
|
||||||
+struct multidictionary *
|
|
||||||
+mdict_create_linear_expandable (enum language language)
|
|
||||||
+{
|
|
||||||
+ struct multidictionary *retval = XNEW (struct multidictionary);
|
|
||||||
+
|
|
||||||
+ /* We have no symbol list to populate, but we create an empty
|
|
||||||
+ dictionary to populate later. */
|
|
||||||
+ retval->n_allocated_dictionaries = 1;
|
|
||||||
+ retval->dictionaries = XNEW (struct dictionary *);
|
|
||||||
+ retval->dictionaries[0] = dict_create_linear_expandable (language);
|
|
||||||
+
|
|
||||||
+ return retval;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+/* See dictionary.h. */
|
|
||||||
+
|
|
||||||
+void
|
|
||||||
+mdict_free (struct multidictionary *mdict)
|
|
||||||
+{
|
|
||||||
+ /* Grab the type of dictionary being used. */
|
|
||||||
+ enum dict_type type = mdict->dictionaries[0]->vector->type;
|
|
||||||
+
|
|
||||||
+ /* Loop over all dictionaries and free them. */
|
|
||||||
+ for (unsigned short idx = 0; idx < mdict->n_allocated_dictionaries; ++idx)
|
|
||||||
+ dict_free (mdict->dictionaries[idx]);
|
|
||||||
+
|
|
||||||
+ /* Free the dictionary list, if needed. */
|
|
||||||
+ switch (type)
|
|
||||||
+ {
|
|
||||||
+ case DICT_HASHED:
|
|
||||||
+ case DICT_LINEAR:
|
|
||||||
+ /* Memory was allocated on an obstack when created. */
|
|
||||||
+ break;
|
|
||||||
+
|
|
||||||
+ case DICT_HASHED_EXPANDABLE:
|
|
||||||
+ case DICT_LINEAR_EXPANDABLE:
|
|
||||||
+ xfree (mdict->dictionaries);
|
|
||||||
+ break;
|
|
||||||
+ }
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+/* Helper function to find the dictionary associated with LANGUAGE
|
|
||||||
+ or NULL if there is no dictionary of that language. */
|
|
||||||
+
|
|
||||||
+static struct dictionary *
|
|
||||||
+find_language_dictionary (const struct multidictionary *mdict,
|
|
||||||
+ enum language language)
|
|
||||||
+{
|
|
||||||
+ for (unsigned short idx = 0; idx < mdict->n_allocated_dictionaries; ++idx)
|
|
||||||
+ {
|
|
||||||
+ if (DICT_LANGUAGE (mdict->dictionaries[idx])->la_language == language)
|
|
||||||
+ return mdict->dictionaries[idx];
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+ return nullptr;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+/* Create a new language dictionary for LANGUAGE and add it to the
|
|
||||||
+ multidictionary MDICT's list of dictionaries. If MDICT is not
|
|
||||||
+ based on expandable dictionaries, this function throws an
|
|
||||||
+ internal error. */
|
|
||||||
+
|
|
||||||
+static struct dictionary *
|
|
||||||
+create_new_language_dictionary (struct multidictionary *mdict,
|
|
||||||
+ enum language language)
|
|
||||||
+{
|
|
||||||
+ struct dictionary *retval = nullptr;
|
|
||||||
+
|
|
||||||
+ /* We use the first dictionary entry to decide what create function
|
|
||||||
+ to call. Not optimal but sufficient. */
|
|
||||||
+ gdb_assert (mdict->dictionaries[0] != nullptr);
|
|
||||||
+ switch (mdict->dictionaries[0]->vector->type)
|
|
||||||
+ {
|
|
||||||
+ case DICT_HASHED:
|
|
||||||
+ case DICT_LINEAR:
|
|
||||||
+ internal_error (__FILE__, __LINE__,
|
|
||||||
+ _("create_new_language_dictionary: attempted to expand "
|
|
||||||
+ "non-expandable multidictionary"));
|
|
||||||
+
|
|
||||||
+ case DICT_HASHED_EXPANDABLE:
|
|
||||||
+ retval = dict_create_hashed_expandable (language);
|
|
||||||
+ break;
|
|
||||||
+
|
|
||||||
+ case DICT_LINEAR_EXPANDABLE:
|
|
||||||
+ retval = dict_create_linear_expandable (language);
|
|
||||||
+ break;
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+ /* Grow the dictionary vector and save the new dictionary. */
|
|
||||||
+ mdict->dictionaries
|
|
||||||
+ = (struct dictionary **) xrealloc (mdict->dictionaries,
|
|
||||||
+ (++mdict->n_allocated_dictionaries
|
|
||||||
+ * sizeof (struct dictionary *)));
|
|
||||||
+ mdict->dictionaries[mdict->n_allocated_dictionaries - 1] = retval;
|
|
||||||
+
|
|
||||||
+ return retval;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+/* See dictionary.h. */
|
|
||||||
+
|
|
||||||
+void
|
|
||||||
+mdict_add_symbol (struct multidictionary *mdict, struct symbol *sym)
|
|
||||||
+{
|
|
||||||
+ struct dictionary *dict
|
|
||||||
+ = find_language_dictionary (mdict, SYMBOL_LANGUAGE (sym));
|
|
||||||
+
|
|
||||||
+ if (dict == nullptr)
|
|
||||||
+ {
|
|
||||||
+ /* SYM is of a new language that we haven't previously seen.
|
|
||||||
+ Create a new dictionary for it. */
|
|
||||||
+ dict = create_new_language_dictionary (mdict, SYMBOL_LANGUAGE (sym));
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+ dict_add_symbol (dict, sym);
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+/* See dictionary.h. */
|
|
||||||
+
|
|
||||||
+void
|
|
||||||
+mdict_add_pending (struct multidictionary *mdict,
|
|
||||||
+ const struct pending *symbol_list)
|
|
||||||
+{
|
|
||||||
+ std::unordered_map<enum language, std::vector<symbol *>> nsyms
|
|
||||||
+ = collate_pending_symbols_by_language (symbol_list);
|
|
||||||
+
|
|
||||||
+ for (const auto &pair : nsyms)
|
|
||||||
+ {
|
|
||||||
+ enum language language = pair.first;
|
|
||||||
+ std::vector<symbol *> symlist = pair.second;
|
|
||||||
+ struct dictionary *dict = find_language_dictionary (mdict, language);
|
|
||||||
+
|
|
||||||
+ if (dict == nullptr)
|
|
||||||
+ {
|
|
||||||
+ /* The language was not previously seen. Create a new dictionary
|
|
||||||
+ for it. */
|
|
||||||
+ dict = create_new_language_dictionary (mdict, language);
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+ dict_add_pending_1 (dict, symlist);
|
|
||||||
+ }
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+/* See dictionary.h. */
|
|
||||||
+
|
|
||||||
+struct symbol *
|
|
||||||
+mdict_iterator_first (const multidictionary *mdict,
|
|
||||||
+ struct mdict_iterator *miterator)
|
|
||||||
+{
|
|
||||||
+ miterator->mdict = mdict;
|
|
||||||
+ miterator->current_idx = 0;
|
|
||||||
+
|
|
||||||
+ for (unsigned short idx = miterator->current_idx;
|
|
||||||
+ idx < mdict->n_allocated_dictionaries; ++idx)
|
|
||||||
+ {
|
|
||||||
+ struct symbol *result
|
|
||||||
+ = dict_iterator_first (mdict->dictionaries[idx], &miterator->iterator);
|
|
||||||
+
|
|
||||||
+ if (result != nullptr)
|
|
||||||
+ {
|
|
||||||
+ miterator->current_idx = idx;
|
|
||||||
+ return result;
|
|
||||||
+ }
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+ return nullptr;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+/* See dictionary.h. */
|
|
||||||
+
|
|
||||||
+struct symbol *
|
|
||||||
+mdict_iterator_next (struct mdict_iterator *miterator)
|
|
||||||
+{
|
|
||||||
+ struct symbol *result = dict_iterator_next (&miterator->iterator);
|
|
||||||
+
|
|
||||||
+ if (result != nullptr)
|
|
||||||
+ return result;
|
|
||||||
+
|
|
||||||
+ /* The current dictionary had no matches -- move to the next
|
|
||||||
+ dictionary, if any. */
|
|
||||||
+ for (unsigned short idx = ++miterator->current_idx;
|
|
||||||
+ idx < miterator->mdict->n_allocated_dictionaries; ++idx)
|
|
||||||
+ {
|
|
||||||
+ result
|
|
||||||
+ = dict_iterator_first (miterator->mdict->dictionaries[idx],
|
|
||||||
+ &miterator->iterator);
|
|
||||||
+ if (result != nullptr)
|
|
||||||
+ {
|
|
||||||
+ miterator->current_idx = idx;
|
|
||||||
+ return result;
|
|
||||||
+ }
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+ return nullptr;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+/* See dictionary.h. */
|
|
||||||
+
|
|
||||||
+struct symbol *
|
|
||||||
+mdict_iter_match_first (const struct multidictionary *mdict,
|
|
||||||
+ const lookup_name_info &name,
|
|
||||||
+ struct mdict_iterator *miterator)
|
|
||||||
+{
|
|
||||||
+ miterator->mdict = mdict;
|
|
||||||
+ miterator->current_idx = 0;
|
|
||||||
+
|
|
||||||
+ for (unsigned short idx = miterator->current_idx;
|
|
||||||
+ idx < mdict->n_allocated_dictionaries; ++idx)
|
|
||||||
+ {
|
|
||||||
+ struct symbol *result
|
|
||||||
+ = dict_iter_match_first (mdict->dictionaries[idx], name,
|
|
||||||
+ &miterator->iterator);
|
|
||||||
+
|
|
||||||
+ if (result != nullptr)
|
|
||||||
+ return result;
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+ return nullptr;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+/* See dictionary.h. */
|
|
||||||
+
|
|
||||||
+struct symbol *
|
|
||||||
+mdict_iter_match_next (const lookup_name_info &name,
|
|
||||||
+ struct mdict_iterator *miterator)
|
|
||||||
+{
|
|
||||||
+ /* Search the current dictionary. */
|
|
||||||
+ struct symbol *result = dict_iter_match_next (name, &miterator->iterator);
|
|
||||||
+
|
|
||||||
+ if (result != nullptr)
|
|
||||||
+ return result;
|
|
||||||
+
|
|
||||||
+ /* The current dictionary had no matches -- move to the next
|
|
||||||
+ dictionary, if any. */
|
|
||||||
+ for (unsigned short idx = ++miterator->current_idx;
|
|
||||||
+ idx < miterator->mdict->n_allocated_dictionaries; ++idx)
|
|
||||||
+ {
|
|
||||||
+ result
|
|
||||||
+ = dict_iter_match_first (miterator->mdict->dictionaries[idx],
|
|
||||||
+ name, &miterator->iterator);
|
|
||||||
+ if (result != nullptr)
|
|
||||||
+ {
|
|
||||||
+ miterator->current_idx = idx;
|
|
||||||
+ return result;
|
|
||||||
+ }
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+ return nullptr;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+/* See dictionary.h. */
|
|
||||||
+
|
|
||||||
+int
|
|
||||||
+mdict_size (const struct multidictionary *mdict)
|
|
||||||
+{
|
|
||||||
+ int size = 0;
|
|
||||||
+
|
|
||||||
+ for (unsigned short idx = 0; idx < mdict->n_allocated_dictionaries; ++idx)
|
|
||||||
+ size += dict_size (mdict->dictionaries[idx]);
|
|
||||||
+
|
|
||||||
+ return size;
|
|
||||||
+}
|
|
||||||
+
|
|
||||||
+/* See dictionary.h. */
|
|
||||||
+
|
|
||||||
+bool
|
|
||||||
+mdict_empty (const struct multidictionary *mdict)
|
|
||||||
+{
|
|
||||||
+ for (unsigned short idx = 0; idx < mdict->n_allocated_dictionaries; ++idx)
|
|
||||||
+ {
|
|
||||||
+ if (!dict_empty (mdict->dictionaries[idx]))
|
|
||||||
+ return false;
|
|
||||||
+ }
|
|
||||||
+
|
|
||||||
+ return true;
|
|
||||||
+}
|
|
||||||
diff --git a/gdb/dictionary.h b/gdb/dictionary.h
|
|
||||||
--- a/gdb/dictionary.h
|
|
||||||
+++ b/gdb/dictionary.h
|
|
||||||
@@ -113,6 +113,21 @@ struct dict_iterator
|
|
||||||
struct symbol *current;
|
|
||||||
};
|
|
||||||
|
|
||||||
+/* The multi-language dictionary iterator. Like dict_iterator above,
|
|
||||||
+ these contents should be considered private. */
|
|
||||||
+
|
|
||||||
+struct mdict_iterator
|
|
||||||
+{
|
|
||||||
+ /* The multidictionary with whcih this iterator is associated. */
|
|
||||||
+ const struct multidictionary *mdict;
|
|
||||||
+
|
|
||||||
+ /* The iterator used to iterate through individual dictionaries. */
|
|
||||||
+ struct dict_iterator iterator;
|
|
||||||
+
|
|
||||||
+ /* The current index of the dictionary being iterated over. */
|
|
||||||
+ unsigned short current_idx;
|
|
||||||
+};
|
|
||||||
+
|
|
||||||
/* Initialize ITERATOR to point at the first symbol in DICT, and
|
|
||||||
return that first symbol, or NULL if DICT is empty. */
|
|
||||||
|
|
Some files were not shown because too many files have changed in this diff Show More
Loading…
Reference in New Issue
Block a user