This is the mail archive of the gdb-patches@sources.redhat.com mailing list for the GDB project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]

[RFA]: fixes to testsuite/config/sid.exp


These come from trusted sources within the sid group.
2001-01-26  Felix Lee  <flee@redhat.com>

	* sid.exp (sid_exit): Pass host, not target, to remote_close.

2001-01-25  matthew green  <mrg@redhat.com>

	* config/sid.exp (sid_start): Call `remote_push_conn' after firing
	up sid.
	(sid_exit): Call `remote_pop_conn' after GDB is gone.

2001-01-25  matthew green  <mrg@redhat.com>

	* config/sid.exp (sid_start): Use `remote_spawn' instead of `spawn.'
	Deprecate $sid_spawn_id. 
	(sid_exit): Remove code necessary only for `spawn.'

2001-01-25  matthew green  <mrg@redhat.com>

	* config/sid.exp (sid_start): Handle sim,protocol of `sid.'

Index: sid.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/config/sid.exp,v
retrieving revision 1.2
diff -c -3 -p -r1.2 sid.exp
*** sid.exp	2001/03/06 08:21:48	1.2
--- sid.exp	2001/05/03 22:18:53
***************
*** 18,24 ****
  load_lib gdb.exp
  
  proc sid_start {} {
-     global sid_spawn_id
      global verbose
  
      set port [lindex [split [target_info netport] ":"] 1]
--- 18,23 ----
*************** proc sid_start {} {
*** 50,56 ****
  	    set env(MKSID) "../../sid/main/static/mksid"
  	    if {! [file exists $env(SID)]} then { error "Cannot find sid in build tree" }
  	}
! 	set spawncmd "../../sid/bsp/[target_info sim] $sidverbose $sidendian --persistent --gdb=$port [target_info sim,options]"
  	set post_spawn {
  	    global env
  	    unset env(SID_LIBRARY_PATH)
--- 49,59 ----
  	    set env(MKSID) "../../sid/main/static/mksid"
  	    if {! [file exists $env(SID)]} then { error "Cannot find sid in build tree" }
  	}
! 	if { [board_info target sim,protocol] == "sid" } {
! 	    set spawncmd "[target_info sim] [target_info sim,options] -e \"set gdb-socket sockaddr-local 0.0.0.0:$port\""
! 	} else {
! 	    set spawncmd "../../sid/bsp/[target_info sim] $sidverbose $sidendian --gdb=$port [target_info sim,options]"
! 	}
  	set post_spawn {
  	    global env
  	    unset env(SID_LIBRARY_PATH)
*************** proc sid_start {} {
*** 58,70 ****
  	    unset env(SID)
  	}
      } else {
  	set pre_spawn {}
! 	set spawncmd "[target_info sim] $sidverbose $sidendian --persistent --gdb=$port [target_info sim,options]"
  	set post_spawn {}
      }
  
      eval $pre_spawn
!     if {[catch "spawn $spawncmd" msg]} {
  	perror $msg
  	exit 1
      }
--- 61,81 ----
  	    unset env(SID)
  	}
      } else {
+ 	global find_rawsid;
+ 
  	set pre_spawn {}
! 	if { [board_info target sim,protocol] == "sid" } {
! 	    # FIXME: sim,options may be from the build tree, should find
! 	    # it in the install tree.
! 	    set spawncmd "sid [target_info sim,options] -e \"set gdb-socket sockaddr-local 0.0.0.0:$port\""
! 	} else {
! 	    set spawncmd "[target_info sim] $sidverbose $sidendian --gdb=$port [target_info sim,options]"
! 	}
  	set post_spawn {}
      }
  
      eval $pre_spawn
!     if {[catch [list remote_spawn host $spawncmd] msg]} {
  	perror $msg
  	exit 1
      }
*************** proc sid_start {} {
*** 81,87 ****
      # GDB would wait for a fair while for the stub to respond.
      sleep 4
  
!     set sid_spawn_id $spawn_id
  }
  
  #
--- 92,100 ----
      # GDB would wait for a fair while for the stub to respond.
      sleep 4
  
!     if ![target_info exists gdb,no_push_conn] {
!         remote_push_conn host;
!     }
  }
  
  #
*************** proc gdb_start {} {
*** 94,105 ****
  }
  
  proc sid_exit {} {
!     global sid_spawn_id 
!     if {[info exists sid_spawn_id]} {
! 	catch {exec kill [exp_pid -i $sid_spawn_id]}
! 	catch {wait -i $sid_spawn_id}
! 	unset sid_spawn_id
!         sleep 4
      }
  }
  
--- 107,115 ----
  }
  
  proc sid_exit {} {
!     if ![target_info exists gdb,no_push_conn] {
! 	remote_close host;
! 	remote_pop_conn host;
      }
  }
  


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]