[PATCH] [testsuite] Fix in board_file native-gdbserver.exp
Yao Qi
yao@codesourcery.com
Thu Jun 21 07:55:00 GMT 2012
Hi,
When I use following statement in test case with native-gdbserver.exp board_file,
I got one error,
remote_exec target "sh -c { \[ -f /bin/ls \] }"
WARNING: program timed out.
FAIL: gdb.base/foo.exp: exists /bin/ls
Examine the verbose log shows that dejagnu thinks native-gdbserver is a
remote target, and will try to use remote method, rsh for example, to
access files,
Executing on target: sh -c { [ -f /bin/ls ] } (timeout = 300)
calling is_remote target
board_info build name
getting qiyao name
board_info host name
getting qiyao name
calling is_remote native-gdbserver
board_info build name
getting qiyao name
board_info host name
getting qiyao name
board_info native-gdbserver exists isremote
board_info native-gdbserver isremote
getting native-gdbserver isremote
board is native-gdbserver, isremote is 1
This patch add new proc ${board}_exec to wrap remote_exec with setting
isremote to 0 temporarily. Running test suite with native-gdbserver,
no change on result.
Note that such problem doesn't exist on board_file
native-extended-gdbserver.exp because isremote always is set to 0 in it.
gdb/testsuite:
2012-06-21 Yao Qi <yao@codesourcery.com>
* boards/native-gdbserver.exp: New proc ${board}_exec.
---
gdb/testsuite/boards/native-gdbserver.exp | 12 ++++++++++++
1 files changed, 12 insertions(+), 0 deletions(-)
diff --git a/gdb/testsuite/boards/native-gdbserver.exp b/gdb/testsuite/boards/native-gdbserver.exp
index 5fa02a4..89702df 100644
--- a/gdb/testsuite/boards/native-gdbserver.exp
+++ b/gdb/testsuite/boards/native-gdbserver.exp
@@ -64,6 +64,18 @@ proc ${board}_spawn { board cmd } {
return $result
}
+proc ${board}_exec { hostname program args } {
+ global board_info
+
+ set baseboard [lindex [split $hostname "/"] 0]
+
+ set board_info($baseboard,isremote) 0
+ set result [remote_exec $hostname $program $args]
+ set board_info($baseboard,isremote) 1
+
+ return $result
+}
+
proc ${board}_download { board host dest } {
return $host
}
--
1.7.7.6
More information about the Gdb-patches
mailing list