#!/usr/bin/expect -f

 

set ip [lindex $argv 0]

set pass [lindex $argv 1]

set enable [lindex $argv 2]

set tftpserver [lindex $argv 3]

set port [lindex $argv 4]

 

set force_conservative 0 ;# set to 1 to force conservative mode even if

;# script wasn't run conservatively originally

if {$force_conservative} {

set send_slow {1 .1}

proc send {ignore arg} {

sleep .1

exp_send -s -- $arg

}

}

 

set timeout -1

spawn $env(SHELL)

match_max 100000

 

send -- "telnet $ip $port\r"

expect "Password:"

send -- "$pass\r"

expect ">"

send -- "enable\r"

expect "Password:"

send -- "$enable\r"

expect "#"

send -- "write mem\r"

expect "#"

send -- "write net\r"

expect "Address or name of remote host"

send -- "$tftpserver\r"

expect "?"

send -- "\r"

expect "confirm"

send -- "\r"

expect "OK"

send -- "exit\r"