1 # Expect script for AIX 5.2+ tests
2 # Copyright 2009 Free Software Foundation
4 # This file is part of the GNU Binutils.
6 # This program is free software; you can redistribute it and/or modify
7 # it under the terms of the GNU General Public License as published by
8 # the Free Software Foundation; either version 3 of the License, or
9 # (at your option) any later version.
11 # This program is distributed in the hope that it will be useful,
12 # but WITHOUT ANY WARRANTY; without even the implied warranty of
13 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 # GNU General Public License for more details.
16 # You should have received a copy of the GNU General Public License
17 # along with this program; if not, write to the Free Software
18 # Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
22 if { ![istarget "powerpc*-*-aix\[5-9\]*"]
23 || [istarget "powerpc*-*-aix5.\[01\]*"] } {
27 # Run a run_link_tests-style test for AIX. SIZE selects the target size
28 # (32 or 64). The other arguments are elements of a run_link_tests test.
30 # Make the following changes before running the test:
32 # - Mention SIZE in the test name.
33 # - Add "-aSIZE --defsym size=SIZE" to the assembler options.
34 # - Add the source directory to any "-bI:" and "-bE:" linker options.
35 # - Add "-bSIZE" to the linker options.
36 # - Add "-XSIZE" to the archiver options.
37 # - Replace "SIZE" with SIZE in TOOLS.
38 # - When testing 64-bit targets:
39 # - Turn tmpdir/aix-* into tmpdir/aix64-*.
40 # - Turn tmpdir/libaix-* into tmpdir/libaix64-*.
41 # - Turn -laix* into -laix64*, to compensate for the above.
42 proc run_aix_test { size name ldopts asopts sources tools output } {
46 regsub -all {tmpdir/aix-} $ldopts {tmpdir/aix64-} ldopts
47 regsub {^aix} $output {aix64} output
49 regsub -all -- {-laix-} $ldopts {-laix64-} ldopts
50 regsub {^libaix} $output {libaix64} output
52 if { [regexp {.a$} $output] } {
53 append ldopts " -X$size"
55 regsub -all {(-b[IE]):} $ldopts "\\1:$srcdir/$subdir/" ldopts
56 append ldopts " -b$size"
58 regsub -all {SIZE} $tools $size tools
59 run_ld_link_tests [list [list "$name ($size-bit)" \
61 "$asopts -a$size --defsym size=$size" \
67 foreach file { "aix-lineno-1.txt" } {
68 remote_upload host "$srcdir/$subdir/$file" "tmpdir/$file"
72 {"Absolute branch test 1"
73 "-shared -bI:aix-abs-branch-1.im -bE:aix-abs-branch-1.ex"
74 "" {aix-abs-branch-1.s}
75 {{objdump {-dR} aix-abs-branch-1.dd} {nm {} aix-abs-branch-1.nd}}
76 "aix-abs-branch-1.so"}
78 {"Relocations against absolute symbols 1"
79 "-shared -bI:aix-abs-reloc-1.im -bE:aix-abs-reloc-1.ex"
80 {} {aix-abs-reloc-1.s}
81 {{objdump -sRj.data aix-abs-reloc-1.od} {nm {} aix-abs-reloc-1.nd}}
84 {"Core sections test 1" "-shared -bE:aix-core-sec-1.ex"
86 {{objdump -h aix-core-sec-1.hd}}
89 {"Core sections test 2" "-shared -bE:aix-core-sec-2.ex"
91 {{objdump -h aix-core-sec-2.hd}}
94 {"Core sections test 3" "-shared -bE:aix-core-sec-3.ex"
96 {{objdump -h aix-core-sec-3.hd}}
99 {"Duplicate symbol check 1 (rel)" "-r"
100 "" {aix-no-dup-syms-1a.s aix-no-dup-syms-1b.s}
101 {{nm {} aix-no-dup-syms-1-rel.nd} {objdump -r aix-no-dup-syms-1-rel.rd}}
102 "aix-no-dup-syms-1.o"}
104 {"Duplicate symbol check 1 (shared)"
105 "-shared --allow-multiple-definition -bI:aix-no-dup-syms-1.im -bE:aix-no-dup-syms-1.ex"
106 "" {aix-no-dup-syms-1a.s aix-no-dup-syms-1b.s}
107 {{nm {} aix-no-dup-syms-1-dso.nd} {objdump -r aix-no-dup-syms-1-dso.rd}
108 {nm -D aix-no-dup-syms-1-dso.dnd} {objdump -R aix-no-dup-syms-1-dso.drd}}
109 "aix-no-dup-syms-1.so"}
112 "-shared -bE:aix-glink-1.ex --unresolved-symbols=ignore-all"
114 {{objdump {-D -j.text -j.data} aix-glink-1-SIZE.dd}}
117 {"Line number test 1 (no discards)" "-e.main"
119 {{objdump -dS aix-lineno-1a.dd} {nm {} aix-lineno-1a.nd}}
122 {"Line number test 1 (discard locals)" "-e.main -x"
124 {{objdump -dS aix-lineno-1b.dd} {nm {} aix-lineno-1b.nd}}
127 {"TOC test 1" "-shared -bE:aix-toc-1.ex"
128 "" {aix-toc-1a.s aix-toc-1b.s}
129 {{objdump -dr aix-toc-1-SIZE.dd}}
133 foreach test $aix52tests {
134 foreach { name ldopts asopts sources tools output } $test {
135 run_aix_test 32 $name $ldopts $asopts $sources $tools $output
136 run_aix_test 64 $name $ldopts $asopts $sources $tools $output