aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite/boards/remote-stdio-gdbserver.exp
diff options
context:
space:
mode:
Diffstat (limited to 'gdb/testsuite/boards/remote-stdio-gdbserver.exp')
-rw-r--r--gdb/testsuite/boards/remote-stdio-gdbserver.exp31
1 files changed, 4 insertions, 27 deletions
diff --git a/gdb/testsuite/boards/remote-stdio-gdbserver.exp b/gdb/testsuite/boards/remote-stdio-gdbserver.exp
index 3d76829..7570dfe 100644
--- a/gdb/testsuite/boards/remote-stdio-gdbserver.exp
+++ b/gdb/testsuite/boards/remote-stdio-gdbserver.exp
@@ -24,7 +24,7 @@
# REMOTE_USERNAME=... REMOTE_HOSTNAME=... REMOTE_PORTNUM=... \
# [REMOTE_TMPDIR=${remote_dir}] [GDBSERVER=${remote_gdbserver}]"
-load_board_description "native-stdio-gdbserver"
+load_board_description "stdio-gdbserver-base"
# Test machine info. The generic_config gdbserver reads some of these
# values from board_info, so this file must set them there.
@@ -56,12 +56,6 @@ if [info exists REMOTE_TMPDIR] {
set_board_info remotedir $REMOTE_TMPDIR
}
-unset_board_info gdb_server_prog
-set_board_info gdb_server_prog "/usr/bin/gdbserver"
-
-# Used to pass a value between ${board}_spawn and ${board}_get_remote_address.
-set stdio_gdbserver_command "--unset--"
-
proc get_remote_login { } {
set result ""
if {[board_info [target_info name] exists username]} {
@@ -73,27 +67,10 @@ proc get_remote_login { } {
return $result
}
-proc ${board}_get_remote_address { host port } {
- global stdio_gdbserver_command
+proc get_target_remote_pipe_cmd { } {
+ set target_exec [gdbserver_download_current_prog]
set rsh_cmd "[board_info [target_info name] rsh_prog] [get_remote_login]"
- return "| $rsh_cmd $stdio_gdbserver_command"
-}
-
-proc ${board}_get_comm_port { port } {
- return $port
-}
-
-proc ${board}_download { board host dest } {
- if { [board_info [target_info name] exists remotedir] } {
- set remotedir "[board_info [target_info name] remotedir]/"
- } else {
- set remotedir ""
- }
- return [standard_download $board $host "$remotedir$dest"]
-}
-
-proc ${board}_upload {dest srcfile args} {
- return [standard_upload $dest $srcfile $args]
+ return "$rsh_cmd /usr/bin/gdbserver --once stdio $target_exec"
}
proc ${board}_file { dest op args } {