include "start.ver"

timeout -1 

expect
set switchmachine [lindex $argv 3]
set serverport  [lindex $argv 4]
set nic  [lindex $argv 5]
end_expect

#set prompt for guest console
set_prompt GUEST '# '

#set prompt for SAM
set_prompt SAM 'stop: '

#set error patterns
error GUEST "\[Ee]rror|ERR|\[Pp]anic"

#connect to switch.
send_wait SAM "sim$nic connect $switchmachine/$serverport"

#execute commands.
send_wait SAM "stepi 900000000000"
send_fini  SAM   "quit"