2012-08-07 07:16:31 +02:00
|
|
|
#!/usr/bin/expect -f
|
|
|
|
|
|
|
|
|
|
# script to log on to a BeBox router [ST Speedtouch 780] and gather line stats
|
|
|
|
|
|
|
|
|
|
# set timeout for response from router to 30 seconds
|
|
|
|
|
set timeout 30
|
|
|
|
|
set router "host.or.ip.of.router"
|
|
|
|
|
set port "23"
|
|
|
|
|
set username "Administrator"
|
|
|
|
|
set password "routerpassword"
|
|
|
|
|
|
|
|
|
|
# telnet to $router on $port
|
|
|
|
|
spawn telnet $router $port
|
|
|
|
|
|
|
|
|
|
expect "Username :"
|
|
|
|
|
send "$username\r"
|
|
|
|
|
|
|
|
|
|
expect "Password :"
|
|
|
|
|
send "$password\r"
|
|
|
|
|
|
|
|
|
|
expect "}=>"
|
2013-04-06 17:26:30 +02:00
|
|
|
send "adsl info expand=enabled\r"
|
2012-08-07 07:16:31 +02:00
|
|
|
|
|
|
|
|
expect "}=>"
|
|
|
|
|
send "exit\r"
|
