1# Expect script for ELF compressed debug section tests.
2#   Copyright (C) 2010-2016 Free Software Foundation, Inc.
3#
4# This file is part of the GNU Binutils.
5#
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.
10#
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.
15#
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,
19# MA 02110-1301, USA.
20#
21
22# Exclude non-ELF targets.
23
24if ![is_elf_format] {
25    return
26}
27
28# The following tests require running the executable generated by ld.
29if ![isnative] {
30    return
31}
32
33# Check if compiler works
34if { [which $CC] == 0 } {
35    return
36}
37
38global as
39if { ![ld_assemble $as "--compress-debug-sections $srcdir/$subdir/empty.s" tmpdir/empty.o ] } {
40    fail "linker compressed debug sections"
41}
42
43if { ![ld_assemble $as "--compress-debug-sections=zlib-gabi $srcdir/$subdir/empty.s" tmpdir/emptyzlib.o ] } {
44    fail "linker compressed debug sections"
45}
46
47set build_tests {
48  {"Build libfoo.so with compressed debug sections"
49   "-shared" "-fPIC -ggdb3 -Wa,--compress-debug-sections"
50   {foo.c} {} "libfoo.so"}
51  {"Build libbar.so with compressed debug sections"
52   "-shared -Wl,--compress-debug-sections=none"
53   "-fPIC -ggdb3 -Wa,--compress-debug-sections"
54   {begin.c end.c} {} "libbar.so"}
55  {"Build libfoozlib.so with compressed debug sections with zlib-gabi"
56   "-shared" "-fPIC -ggdb3 -Wa,--compress-debug-sections=zlib-gabi"
57   {foo.c} {} "libfoozlib.so"}
58  {"Build libbarzlib.so with compressed debug sections with zlib-gabi"
59   "-shared" "-fPIC -ggdb3 -Wa,--compress-debug-sections=zlib-gabi"
60   {begin.c end.c} {} "libbarzlib.so"}
61  {"Build libzlibfoo.so with zlib compressed debug sections"
62   "-shared -Wl,--compress-debug-sections=zlib"
63   "-fPIC -ggdb3 -Wa,--compress-debug-sections=zlib"
64   {foo.c} {} "libzlibfoo.so"}
65  {"Build libgnufoo.so with zlib-gnu compressed debug sections"
66   "-shared -Wl,--compress-debug-sections=zlib-gnu"
67   "-fPIC -ggdb3 -Wa,--compress-debug-sections=zlib-gnu"
68   {foo.c} {} "libgnufoo.so"}
69  {"Build libgabifoo.so with zlib-gabi compressed debug sections"
70   "-shared -Wl,--compress-debug-sections=zlib-gabi"
71   "-fPIC -ggdb3 -Wa,--compress-debug-sections=zlib-gabi"
72   {foo.c} {} "libgabifoo.so"}
73  {"Build zlibbegin.o with zlib compressed debug sections"
74   "-r -nostdlib -Wl,--compress-debug-sections=zlib"
75   "-ggdb3 -Wa,--compress-debug-sections=zlib"
76   {begin.c} {} "zlibbegin.o"}
77  {"Build gnubegin.o with zlib-gnu compressed debug sections"
78   "-r -nostdlib -Wl,--compress-debug-sections=zlib-gnu"
79   "-ggdb3 -Wa,--compress-debug-sections=zlib-gnu"
80   {begin.c} {} "gnubegin.o"}
81  {"Build gabiend.o with zlib-gabi compressed debug sections"
82   "-r -nostdlib -Wl,--compress-debug-sections=zlib-gabi"
83   "-ggdb3 -Wa,--compress-debug-sections=zlib-gnu"
84   {end.c} {} "gabiend.o"}
85}
86
87set run_tests {
88    {"Run normal with libfoo.so with compressed debug sections"
89     "tmpdir/begin.o tmpdir/libfoo.so tmpdir/end.o" ""
90     {main.c} "normal" "normal.out" "-Wa,--compress-debug-sections"}
91    {"Run normal with libfoozlib.so with compressed debug sections with zlib-gabi"
92     "tmpdir/begin.o tmpdir/libfoozlib.so tmpdir/end.o" ""
93     {main.c} "normal" "normal.out" "-Wa,--compress-debug-sections=zlib-gabi"}
94    {"Run zlibnormal with libzlibfoo.so with zlib compressed debug sections"
95     "tmpdir/begin.o tmpdir/libzlibfoo.so tmpdir/end.o --compress-debug-sections=zlib" ""
96     {main.c} "zlibnormal" "normal.out" "-Wa,--compress-debug-sections=zlib"}
97    {"Run zlibnormal with libfoozlib.so with zlib compressed debug sections"
98     "tmpdir/begin.o tmpdir/libfoozlib.so tmpdir/end.o --compress-debug-sections=zlib" ""
99     {main.c} "zlibnormal" "normal.out" "-Wa,--compress-debug-sections=zlib"}
100    {"Run gnunormal with libgnufoo.so with zlib-gnu compressed debug sections"
101     "tmpdir/gnubegin.o tmpdir/libgnufoo.so tmpdir/end.o --compress-debug-sections=zlib-gnu" ""
102     {main.c} "gnunormal" "normal.out" "-Wa,--compress-debug-sections=zlib-gnu"}
103    {"Run gnunormal with libfoozlib.so with zlib-gnu compressed debug sections"
104     "tmpdir/gnubegin.o tmpdir/libfoozlib.so tmpdir/end.o --compress-debug-sections=zlib-gnu" ""
105     {main.c} "gnunormal" "normal.out" "-Wa,--compress-debug-sections=zlib-gnu"}
106    {"Run gabinormal with libgabifoo.so with zlib-gabi compressed debug sections"
107     "tmpdir/zlibbegin.o tmpdir/libgabifoo.so tmpdir/gabiend.o --compress-debug-sections=zlib-gabi" ""
108     {main.c} "gabinormal" "normal.out" "-Wa,--compress-debug-sections=zlib-gabi"}
109    {"Run gabinormal with libfoozlib.so with zlib-gabi compressed debug sections"
110     "tmpdir/zlibbegin.o tmpdir/libfoozlib.so tmpdir/gabiend.o --compress-debug-sections=zlib-gabi" ""
111     {main.c} "gabinormal" "normal.out" "-Wa,--compress-debug-sections=zlib-gabi"}
112}
113
114run_cc_link_tests $build_tests
115run_ld_link_exec_tests [] $run_tests
116
117set test_name "Link with zlib-gabi compressed debug input"
118send_log "cmp tmpdir/libfoo.so tmpdir/libfoozlib.so\n"
119if { [catch {exec cmp tmpdir/libfoo.so tmpdir/libfoozlib.so}] } then {
120    send_log "tmpdir/libfoo.so tmpdir/libfoozlib.so differ.\n"
121    fail "$test_name"
122} else {
123    pass "$test_name"
124}
125
126global READELF
127
128set test_name "Link -r with zlib compressed debug output"
129set test zlibbegin
130send_log "$READELF -S -W tmpdir/$test.o > tmpdir/$test.out\n"
131set got [remote_exec host "$READELF -S -W tmpdir/$test.o" "" "/dev/null" "tmpdir/$test.out"]
132if { [lindex $got 0] != 0 || ![string match "" [lindex $got 1]] } then {
133    send_log "$got\n"
134    unresolved "$test_name"
135}
136if { [regexp_diff tmpdir/$test.out $srcdir/$subdir/$test.rS] } then {
137    fail "$test_name"
138} else {
139    pass "$test_name"
140}
141
142set test_name "Link -r with zlib-gnu compressed debug output"
143set test gnubegin
144send_log "$READELF -S -W tmpdir/$test.o > tmpdir/$test.out\n"
145set got [remote_exec host "$READELF -S -W tmpdir/$test.o" "" "/dev/null" "tmpdir/$test.out"]
146if { [lindex $got 0] != 0 || ![string match "" [lindex $got 1]] } then {
147    send_log "$got\n"
148    unresolved "$test_name"
149}
150if { [regexp_diff tmpdir/$test.out $srcdir/$subdir/$test.rS] } then {
151    fail "$test_name"
152} else {
153    pass "$test_name"
154}
155
156set test_name "Link -r with zlib-gabi compressed debug output"
157set test gabiend
158send_log "$READELF -t -W tmpdir/$test.o > tmpdir/$test.out\n"
159set got [remote_exec host "$READELF -t -W tmpdir/$test.o" "" "/dev/null" "tmpdir/$test.out"]
160if { [lindex $got 0] != 0 || ![string match "" [lindex $got 1]] } then {
161    send_log "$got\n"
162    unresolved "$test_name"
163}
164if { [regexp_diff tmpdir/$test.out $srcdir/$subdir/$test.rt] } then {
165    fail "$test_name"
166} else {
167    pass "$test_name"
168}
169
170set test_name "Link with zlib compressed debug output"
171set test normal
172send_log "$READELF -w tmpdir/$test > tmpdir/$test.out\n"
173set got [remote_exec host "$READELF -w tmpdir/$test" "" "/dev/null" "tmpdir/$test.out"]
174if { [lindex $got 0] != 0 || ![string match "" [lindex $got 1]] } then {
175    send_log "$got\n"
176    unresolved "$test_name"
177}
178
179set test_name "Link with zlib compressed debug output"
180set test zlibnormal
181send_log "$READELF -w tmpdir/$test | sed -e \"s/.zdebug_/.debug_/\" > tmpdir/$test.out\n"
182set got [remote_exec host "$READELF -w tmpdir/$test | sed -e \"s/.zdebug_/.debug_/\"" "" "/dev/null" "tmpdir/$test.out"]
183if { [lindex $got 0] != 0 || ![string match "" [lindex $got 1]] } then {
184    send_log "$got\n"
185    unresolved "$test_name"
186}
187if { [catch {exec cmp tmpdir/normal.out tmpdir/$test.out}] } then {
188    send_log "tmpdir/normal.out tmpdir/$test.out differ.\n"
189    fail "$test_name"
190} else {
191    pass "$test_name"
192}
193send_log "$READELF -S -W tmpdir/$test' > tmpdir/$test.out\n"
194set got [remote_exec host "$READELF -S -W tmpdir/$test" "" "/dev/null" "tmpdir/$test.out"]
195if { [lindex $got 0] != 0 || ![string match "" [lindex $got 1]] } then {
196    send_log "$got\n"
197    unresolved "$test_name"
198}
199if { [regexp_diff tmpdir/$test.out $srcdir/$subdir/$test.rS] } then {
200    fail "$test_name"
201} else {
202    pass "$test_name"
203}
204
205set test_name "Link with zlib-gnu compressed debug output"
206set test gnunormal
207send_log "$READELF -w tmpdir/$test | sed -e \"s/.zdebug_/.debug_/\" > tmpdir/$test.out\n"
208set got [remote_exec host "$READELF -w tmpdir/$test | sed -e \"s/.zdebug_/.debug_/\"" "" "/dev/null" "tmpdir/$test.out"]
209if { [lindex $got 0] != 0 || ![string match "" [lindex $got 1]] } then {
210    send_log "$got\n"
211    unresolved "$test_name"
212}
213if { [catch {exec cmp tmpdir/normal.out tmpdir/$test.out}] } then {
214    send_log "tmpdir/normal.out tmpdir/$test.out differ.\n"
215    fail "$test_name"
216} else {
217    pass "$test_name"
218}
219send_log "$READELF -S -W tmpdir/$test' > tmpdir/$test.out\n"
220set got [remote_exec host "$READELF -S -W tmpdir/$test" "" "/dev/null" "tmpdir/$test.out"]
221if { [lindex $got 0] != 0 || ![string match "" [lindex $got 1]] } then {
222    send_log "$got\n"
223    unresolved "$test_name"
224}
225if { [regexp_diff tmpdir/$test.out $srcdir/$subdir/$test.rS] } then {
226    fail "$test_name"
227} else {
228    pass "$test_name"
229}
230
231set test gabinormal
232set test_name "Link with zlib-gabi compressed debug output"
233send_log "$READELF -w tmpdir/$test > tmpdir/$test.out\n"
234set got [remote_exec host "$READELF -w tmpdir/$test" "" "/dev/null" "tmpdir/$test.out"]
235if { [lindex $got 0] != 0 || ![string match "" [lindex $got 1]] } then {
236    send_log "$got\n"
237    unresolved "$test_name"
238}
239if { [catch {exec cmp tmpdir/normal.out tmpdir/$test.out}] } then {
240    send_log "tmpdir/normal.out tmpdir/$test.out differ.\n"
241    fail "$test_name"
242} else {
243    pass "$test_name"
244}
245send_log "$READELF -t -W tmpdir/$test > tmpdir/$test.out\n"
246set got [remote_exec host "$READELF -t -W tmpdir/$test" "" "/dev/null" "tmpdir/$test.out"]
247if { [lindex $got 0] != 0 || ![string match "" [lindex $got 1]] } then {
248    send_log "$got\n"
249    unresolved "$test_name"
250}
251if { [regexp_diff tmpdir/$test.out $srcdir/$subdir/$test.rt] } then {
252    fail "$test_name"
253} else {
254    pass "$test_name"
255}
256