darkkirb/old-cross-binutils
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

* gdb/sid connect fix, etc.

Browse source 
2001-08-29  Frank Ch. Eigler  <fche@redhat.com>

        * config/sid.exp (sid_start): Never set sid verbosity; disable
        expect_background {} that consumed its stdout; tolerate </dev/null.
        Attempt to set endianness override in "sid" protocol mode.  Cleanup.
This commit is contained in:
Frank Ch. Eigler 2001-08-29 20:36:06 +00:00
parent f2e55dc2f4
commit 8d6e6f816b
2 changed files with 22 additions and 16 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
gdb/testsuite/ChangeLog
View file

@ -1,3 +1,9 @@
2001-08-29 Frank Ch. Eigler <fche@redhat.com>
* config/sid.exp (sid_start): Never set sid verbosity; disable
expect_background {} that consumed its stdout; tolerate </dev/null.
Attempt to set endianness override in "sid" protocol mode. Cleanup.
2001-08-18 Andrew Cagney <ac131313@redhat.com> 2001-08-18 Andrew Cagney <ac131313@redhat.com>
* lib/mi-support.exp (mi_gdb_start): If a remote target, use the * lib/mi-support.exp (mi_gdb_start): If a remote target, use the

32
gdb/testsuite/config/sid.exp
View file

@ -35,8 +35,11 @@ proc sid_start {} {
} }
} }
} }
# set verbosity conditionally case $sidendian in {
if {$verbose > 0} then { set sidverbose "--verbose" } else { set sidverbose "" } { -EB } { set sidendian2 {-e "set cpu endian big"} }
{ -EL } { set sidendian2 {-e "set cpu endian little"} }
default { set sidendian2 {} }
}
# test to see whether to use use sid in build or install tree # test to see whether to use use sid in build or install tree
set use_build_tree [file exists ../../sid] set use_build_tree [file exists ../../sid]
@ -46,30 +49,26 @@ proc sid_start {} {
global env global env
set env(SID_LIBRARY_PATH) [join [glob "../../sid/component/*"] ":"] set env(SID_LIBRARY_PATH) [join [glob "../../sid/component/*"] ":"]
set env(SID) "../../sid/main/dynamic/sid" set env(SID) "../../sid/main/dynamic/sid"
set env(MKSID) "../../sid/main/static/mksid"
if {! [file exists $env(SID)]} then { error "Cannot find sid in build tree" } if {! [file exists $env(SID)]} then { error "Cannot find sid in build tree" }
} }
if { [board_info target sim,protocol] == "sid" } { if { [board_info target sim,protocol] == "sid" } {
set spawncmd "[target_info sim] [target_info sim,options] -e \"set cpu-gdb-socket sockaddr-local 0.0.0.0:$port\"" set spawncmd "[target_info sim] [target_info sim,options] $sidendian2 -e \"set cpu-gdb-socket sockaddr-local 0.0.0.0:$port\""
} else { } else {
set spawncmd "../../sid/bsp/[target_info sim] $sidverbose $sidendian --gdb=$port [target_info sim,options]" set spawncmd "../../sid/bsp/[target_info sim] $sidendian --gdb=$port [target_info sim,options]"
} }
set post_spawn { set post_spawn {
global env global env
unset env(SID_LIBRARY_PATH) unset env(SID_LIBRARY_PATH)
unset env(MKSID)
unset env(SID) unset env(SID)
} }
} else { } else {
global find_rawsid;
set pre_spawn {} set pre_spawn {}
if { [board_info target sim,protocol] == "sid" } { if { [board_info target sim,protocol] == "sid" } {
# FIXME: sim,options may be from the build tree, should find # FIXME: sim,options may be from the build tree, should find
# it in the install tree. # it in the install tree.
set spawncmd "sid [target_info sim,options] -e \"set cpu-gdb-socket sockaddr-local 0.0.0.0:$port\"" set spawncmd "sid [target_info sim,options] $sidendian2 -e \"set cpu-gdb-socket sockaddr-local 0.0.0.0:$port\""
} else { } else {
set spawncmd "[target_info sim] $sidverbose $sidendian --gdb=$port [target_info sim,options]" set spawncmd "[target_info sim] $sidendian --gdb=$port [target_info sim,options]"
} }
set post_spawn {} set post_spawn {}
} }
@ -81,12 +80,13 @@ proc sid_start {} {
} }
eval $post_spawn eval $post_spawn
expect_background { # Don't do the following any more; it breaks with "runtest ... < /dev/null"
-re \[^\n\]*\n { # expect_background {
regsub "\n" $expect_out(buffer) {} msg # -re \[^\n\]*\n {
verbose "SID: $msg" 2 # regsub "\n" $expect_out(buffer) {} msg
} # verbose "SID: $msg" 2
} # }
# }
# There should be no need to sleep to give SID time to start; # There should be no need to sleep to give SID time to start;
# GDB would wait for a fair while for the stub to respond. # GDB would wait for a fair while for the stub to respond.