* [pushed 1/2] [gdb/testsuite] Fix gdb.arch/ppc64-symtab-cordic.exp without bzip2
@ 2022-11-16 10:20 Tom de Vries
2022-11-16 10:20 ` [pushed 2/2] [gdb/testsuite] Modernize gdb.arch/i386-biarch-core.exp Tom de Vries
0 siblings, 1 reply; 2+ messages in thread
From: Tom de Vries @ 2022-11-16 10:20 UTC (permalink / raw)
To: gdb-patches
After de-installing bzip2, I run into:
...
Running ppc64-symtab-cordic.exp ...
sh: bzip2: command not found
PATH: gdb.arch/ppc64-symtab-cordic.exp: failed bzip2 for \
src/gdb/testsuite/gdb.arch/cordic.ko.bz2
...
Fix these by:
- using remote_exec instead of catch system, and
- using file tail in the untested message.
I've tried making output redirection work with remote_exec, but that seems to
be broken, so we now:
- copy the file $f.bz2 into the desired location $dir/$f.bz2, and
- decompress the bz2 file using "bzip2 -df $dir/$f.bz2", resulting in a file
$dir/$f.
Factor out new function decompress_bz2 to make the test-case less verbose, and
also use it in gdb.arch/i386-biarch-core.exp.
Tested on x86_64-linux, without and with bzip2 installed.
---
gdb/testsuite/gdb.arch/i386-biarch-core.exp | 5 +++--
.../gdb.arch/ppc64-symtab-cordic.exp | 13 ++++++-----
gdb/testsuite/lib/gdb.exp | 22 +++++++++++++++++++
3 files changed, 32 insertions(+), 8 deletions(-)
diff --git a/gdb/testsuite/gdb.arch/i386-biarch-core.exp b/gdb/testsuite/gdb.arch/i386-biarch-core.exp
index 607a3aaaf85..e1f65900379 100644
--- a/gdb/testsuite/gdb.arch/i386-biarch-core.exp
+++ b/gdb/testsuite/gdb.arch/i386-biarch-core.exp
@@ -45,14 +45,15 @@ gdb_test_multiple "complete set gnutarget " $test {
}
set corebz2file ${srcdir}/${subdir}/${testfile}.core.bz2
-set corefile [standard_output_file ${testfile}.core]
# Entry point of the original executable.
set address 0x400078
-if {[catch "system \"bzip2 -dc ${corebz2file} >${corefile}\""] != 0} {
+set corefile [decompress_bz2 $corebz2file]
+if { $corefile == "" } {
untested "failed bzip2"
return -1
}
+
file stat ${corefile} corestat
if {$corestat(size) != 102400} {
untested "bzip2 produces invalid result"
diff --git a/gdb/testsuite/gdb.arch/ppc64-symtab-cordic.exp b/gdb/testsuite/gdb.arch/ppc64-symtab-cordic.exp
index 5d2e1255d45..4464177b547 100644
--- a/gdb/testsuite/gdb.arch/ppc64-symtab-cordic.exp
+++ b/gdb/testsuite/gdb.arch/ppc64-symtab-cordic.exp
@@ -24,16 +24,17 @@ if { [lsearch -exact $supported_archs "powerpc:common64"] == -1 } {
standard_testfile
set kobz2file ${srcdir}/${subdir}/cordic.ko.bz2
-set kofile [standard_output_file cordic.ko]
set kodebugbz2file ${srcdir}/${subdir}/cordic.ko.debug.bz2
-set kodebugfile [standard_output_file cordic.ko.debug]
-if {[catch "system \"bzip2 -dc ${kobz2file} >${kofile}\""] != 0} {
- untested "failed bzip2 for ${kobz2file}"
+set kofile [decompress_bz2 $kobz2file]
+if { $kofile == "" } {
+ untested "failed bzip2 for [file tail $kobz2file]"
return -1
}
-if {[catch "system \"bzip2 -dc ${kodebugbz2file} >${kodebugfile}\""] != 0} {
- untested "failed bzip2 for ${kodebugbz2file}"
+
+set kodebugfile [decompress_bz2 $kodebugbz2file]
+if { $kodebugfile == "" } {
+ untested "failed bzip2 for [file tail $kodebugbz2file]"
return -1
}
diff --git a/gdb/testsuite/lib/gdb.exp b/gdb/testsuite/lib/gdb.exp
index 698b3f4bd79..f540770189d 100644
--- a/gdb/testsuite/lib/gdb.exp
+++ b/gdb/testsuite/lib/gdb.exp
@@ -9291,5 +9291,27 @@ gdb_caching_proc have_epilogue_line_info {
}
}
+# Decompress file BZ2, and return it.
+
+proc decompress_bz2 { bz2 } {
+ set copy [standard_output_file [file tail $bz2]]
+ set copy [remote_download build $bz2 $copy]
+ if { $copy == "" } {
+ return $copy
+ }
+
+ set res [remote_exec build "bzip2" "-df $copy"]
+ if { [lindex $res 0] == -1 } {
+ return ""
+ }
+
+ set copy [regsub {.bz2$} $copy ""]
+ if { ![remote_file build exists $copy] } {
+ return ""
+ }
+
+ return $copy
+}
+
# Always load compatibility stuff.
load_lib future.exp
base-commit: a715464cd2e25c8bf46190cc8bde9267c9ab6ac0
--
2.35.3
^ permalink raw reply [flat|nested] 2+ messages in thread
* [pushed 2/2] [gdb/testsuite] Modernize gdb.arch/i386-biarch-core.exp
2022-11-16 10:20 [pushed 1/2] [gdb/testsuite] Fix gdb.arch/ppc64-symtab-cordic.exp without bzip2 Tom de Vries
@ 2022-11-16 10:20 ` Tom de Vries
0 siblings, 0 replies; 2+ messages in thread
From: Tom de Vries @ 2022-11-16 10:20 UTC (permalink / raw)
To: gdb-patches
I noticed in test-case gdb.arch/i386-biarch-core.exp that we run into the
completion limit for "complete set gnutarget":
...
set gnutarget vms-libtxt^M
set gnutarget *** List may be truncated, max-completions reached. ***^M
(gdb) PASS: gdb.arch/i386-biarch-core.exp: complete set gnutarget
...
Fix this by using get_set_option_choices.
Also use get_set_option_choices for "complete set architecture i386", which
required extending get_set_option_choices to accept a second argument, such
that we can do:
...
set archs [get_set_option_choices "set architecture" "i386"]
...
because this returns an empty list:
...
set archs [get_set_option_choices "set architecture i386"]
...
because it does "complete set architecture i386 ".
Also clean up the explicit gdb_exit/gdb_start and use clean_restart instead.
Tested on x86_64-linux.
---
gdb/testsuite/gdb.arch/i386-biarch-core.exp | 29 +++++----------------
gdb/testsuite/lib/gdb.exp | 18 ++++++++++---
2 files changed, 21 insertions(+), 26 deletions(-)
diff --git a/gdb/testsuite/gdb.arch/i386-biarch-core.exp b/gdb/testsuite/gdb.arch/i386-biarch-core.exp
index e1f65900379..95e60d0b552 100644
--- a/gdb/testsuite/gdb.arch/i386-biarch-core.exp
+++ b/gdb/testsuite/gdb.arch/i386-biarch-core.exp
@@ -28,20 +28,12 @@ if { ![istarget "i?86-*-*"] && ![istarget "x86_64-*-*"] } then {
standard_testfile
-gdb_exit
-gdb_start
-gdb_reinitialize_dir $srcdir/$subdir
+clean_restart
-set test "complete set gnutarget"
-gdb_test_multiple "complete set gnutarget " $test {
- -re "set gnutarget elf64-little\r\n(.*\r\n)?$gdb_prompt $" {
- pass $test
- }
- -re "\r\n$gdb_prompt $" {
- pass $test
- untested ".text is readable"
- return
- }
+set gnutargets [get_set_option_choices "set gnutarget"]
+if { [lsearch -exact $gnutargets elf64-little] == -1 } {
+ untested ".text is readable"
+ return
}
set corebz2file ${srcdir}/${subdir}/${testfile}.core.bz2
@@ -62,15 +54,8 @@ if {$corestat(size) != 102400} {
# First check if this particular GDB supports i386, otherwise we should not
# expect the i386 core file to be loaded successfully.
-set supports_arch_i386 1
-set test "complete set architecture i386"
-gdb_test_multiple $test $test {
- -re "\r\nset architecture i386\r\n(.*\r\n)?$gdb_prompt $" {
- }
- -re "\r\n$gdb_prompt $" {
- set supports_arch_i386 0
- }
-}
+set archs [get_set_option_choices "set architecture" "i386"]
+set supports_arch_i386 [expr [lsearch -exact $archs i386] != -1]
# Wrongly built GDB complains by:
# "..." is not a core dump: File format not recognized
diff --git a/gdb/testsuite/lib/gdb.exp b/gdb/testsuite/lib/gdb.exp
index f540770189d..042d7ade59f 100644
--- a/gdb/testsuite/lib/gdb.exp
+++ b/gdb/testsuite/lib/gdb.exp
@@ -9146,13 +9146,23 @@ gdb_caching_proc has_hw_wp_support {
return $has_hw_wp_support
}
-# Return a list of all the accepted values of the set command SET_CMD.
+# Return a list of all the accepted values of the set command
+# "SET_CMD SET_ARG".
+# For example get_set_option_choices "set architecture" "i386".
-proc get_set_option_choices {set_cmd} {
+proc get_set_option_choices { set_cmd {set_arg ""} } {
set values {}
- set cmd "complete $set_cmd "
- set test "complete $set_cmd"
+ if { $set_arg == "" } {
+ # Add trailing space to signal that we need completion of the choices,
+ # not of set_cmd itself.
+ set cmd "complete $set_cmd "
+ } else {
+ set cmd "complete $set_cmd $set_arg"
+ }
+
+ # Set test name without trailing space.
+ set test [string trim $cmd]
with_set max-completions unlimited {
gdb_test_multiple $cmd $test {
--
2.35.3
^ permalink raw reply [flat|nested] 2+ messages in thread
end of thread, other threads:[~2022-11-16 10:20 UTC | newest]
Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2022-11-16 10:20 [pushed 1/2] [gdb/testsuite] Fix gdb.arch/ppc64-symtab-cordic.exp without bzip2 Tom de Vries
2022-11-16 10:20 ` [pushed 2/2] [gdb/testsuite] Modernize gdb.arch/i386-biarch-core.exp Tom de Vries
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).