diff options
author | Alan Modra <amodra@gmail.com> | 2022-10-19 18:52:43 +1030 |
---|---|---|
committer | Alan Modra <amodra@gmail.com> | 2022-10-19 22:23:53 +1030 |
commit | 2b06e59de0675c2cb526af2de6803dae29703d15 (patch) | |
tree | 22d5051221ca00d3881d61e14385368123d12a5c /binutils | |
parent | f2ba47d69ea5f0b7c16b9373b0c4c8942c7252aa (diff) | |
download | gdb-2b06e59de0675c2cb526af2de6803dae29703d15.zip gdb-2b06e59de0675c2cb526af2de6803dae29703d15.tar.gz gdb-2b06e59de0675c2cb526af2de6803dae29703d15.tar.bz2 |
Fix addr2line test for ppc64 elfv1 and mingw
* testsuite/binutils-all/addr2line.exp: Tidy. For powerpc64
arrange to pass --synthetic to nm, and extract .main and .fn
symbol address for addr2line test. Handle default executable
extension on cygwin/mingw compilers.
Diffstat (limited to 'binutils')
-rw-r--r-- | binutils/testsuite/binutils-all/addr2line.exp | 66 |
1 files changed, 39 insertions, 27 deletions
diff --git a/binutils/testsuite/binutils-all/addr2line.exp b/binutils/testsuite/binutils-all/addr2line.exp index 15e6036..66a2d5d 100644 --- a/binutils/testsuite/binutils-all/addr2line.exp +++ b/binutils/testsuite/binutils-all/addr2line.exp @@ -14,48 +14,60 @@ # along with this program; if not, write to the Free Software # Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA. -global $NM -global $ADDR2LINE - set testname "addr2line" +set opts "" +set dot "" +set exe [exeext] + +# powerpc64 function symbols are on descriptors rather than code. +if [istarget powerpc64-*-*] { + set opts --synthetic + set dot {\.} +} + if { [target_compile $srcdir/$subdir/testprog.c tmpdir/testprog executable debug] != "" } { verbose "Unable to compile test file." - untested "addr2line" + untested "$testname" return } #testcase for default option. #Run nm command and input the main symbol address to addr2line. -set output [binutils_run $NM "tmpdir/testprog"] -regexp -line {^([0-9a-fA-F]+)?[ ]+T main} $output contents -set list [regexp -inline -all -- {\S+} $contents] -set got [binutils_run $ADDR2LINE "-e tmpdir/testprog [lindex $list 0]"] -set want "$srcdir/$subdir/testprog.c:\[0-9\]+" -if ![regexp $want $got] then { - fail "$testname $got\n" +set output [binutils_run $NM "$opts tmpdir/testprog$exe"] +if ![regexp -line "^(\[0-9a-fA-F\]+)? +T ${dot}main" $output contents] then { + fail "$testname" } else { - pass "$testname" + set list [regexp -inline -all -- {\S+} $contents] + set got [binutils_run $ADDR2LINE "-e tmpdir/testprog$exe [lindex $list 0]"] + set want "$srcdir/$subdir/testprog.c:\[0-9\]+" + if ![regexp $want $got] then { + fail "$testname $got\n" + } else { + pass "$testname" + } } #testcase for -f option. #Run nm command and input the fn function symbol address to addr2line. -regexp -line {^([0-9a-fA-F]+)?[ ]+T fn} $output contents -pass "output is $output \n contents is $contents\n" -set list [regexp -inline -all -- {\S+} $contents] -set got [binutils_run $ADDR2LINE "-f -e tmpdir/testprog [lindex $list 0]"] -set want "fn\n$srcdir/$subdir/testprog.c:\[0-9\]+" -if ![regexp $want $got] then { - fail "$testname -f option $got\n" +if ![regexp -line "^(\[0-9a-fA-F\]+)? +T ${dot}fn" $output contents] then { + fail "$testname -f option" } else { - pass "$testname -f option" -} + set list [regexp -inline -all -- {\S+} $contents] + set got [binutils_run $ADDR2LINE "-f -e tmpdir/testprog$exe [lindex $list 0]"] + set want "fn\n$srcdir/$subdir/testprog.c:\[0-9\]+" + if ![regexp $want $got] then { + fail "$testname -f option $got\n" + } else { + pass "$testname -f option" + } #testcase for -s option. #Using the same fn function address used in -f option. -set got [binutils_run $ADDR2LINE "-s -e tmpdir/testprog [lindex $list 0]"] -set want "testprog.c:\[0-9\]+" -if ![regexp $want $got] then { - fail "$testname -s option $got\n" -} else { - pass "$testname -s option" + set got [binutils_run $ADDR2LINE "-s -e tmpdir/testprog$exe [lindex $list 0]"] + set want "testprog.c:\[0-9\]+" + if ![regexp $want $got] then { + fail "$testname -s option $got\n" + } else { + pass "$testname -s option" + } } |