как зацикливать код в секции try и catch в TCL - PullRequest
0 голосов
/ 28 апреля 2018

У меня есть код TCL, который я хочу зациклить в случае, если я получаю «Соединение закрыто внешним хостом»

подключение к роутеру (IOL router)

Telnet to routem PC
connect sys -match_max 500000 "telnet $linux_machine $port"
# using the system passed login credentials
receive sys  {login:} 120
sleep 5
transmit sys "$ta_user_id\r"
receive sys  {Password: $}
transmit sys "$ta_user_passwd\r"
receive sys  {%$}
transmit sys "su\r"
receive sys  {Password: $} 20
transmit sys "$root_passwd\r"

журнал сценарий журнала ошибок

++++ 05:13:50 sys Control::connect +++
Connect: sys -match_max 500000 {telnet ssr-lnx-iol 5012}
+--- 05:13:50 ---
++++ 05:13:50 sys Control::receive +++
Trying 172.25.195.183...
Connected to ssr-lnx-iol.
Escape character is '^]'.
Fedora release 9 (Sulphur)
Kernel 2.6.25-14.fc9.i686 on an i686 (0)
login: 
--- 05:14:01 ---
++++ 05:14:06 sys Control::transmit +++
Transmit: root
+--- 05:14:06 ---
++++ 05:14:06 sys Control::receive +++
root
Password: 
devtest-
Connection closed by foreign host.
...