02f76b210004760274dde35a6a4e360bf47ae5f5
3 # ============================================================================
5 # Copyright (C) THALES. All rights reserved
6 # Author: Laurent Mazet
8 # Script de connection au switchs
10 # 2014-10-06 V1.0 : Creation
12 # ============================================================================
18 set password
"thalescom02"
21 proc usage
{script_name rc
} {
22 puts "usage: [exec basename $script_name] \[host\] \[-b blade\] \[-h\] \[-l login\] \[-p password\] \[-x prompt\]"
28 for {set i
0} {$i < [llength $argv]} {incr i
} {
29 set arg
[lindex $argv $i]
31 -b { set action
"-blade" }
33 -l { set action
"-login" }
34 -p { set action
"-password" }
35 -x { set action
"-prompt" }
38 -blade { set blade
$arg }
39 -login { set login
$arg }
40 -password { set password
$arg }
41 -prompt { set prompt
$arg }
42 default { set host
$arg }
49 puts "missing arguments"
61 "username:" { send "$login\r" }
62 timeout
{ send_user
"connection to host failed\n"; exit 1 }
63 eof { send_user
"connection to host failed\n"; exit 1 }
69 "password:" { send "$password\r" }
70 timeout
{ send_user
"connection to host failed\n"; exit 1 }
71 eof { send_user
"connection to host failed\n"; exit 1 }
75 "$prompt" { send "mt -b $blade\r" }
76 "username:" { send_user
"connection to host failed\n"; exit 1 }
80 "OK" { send "exit\r" }
81 "$prompt" { send_user
"error\n"; exit 1 }
86 # vim:set tabstop=4 shiftwidth=4 softtabstop=4: