使用expect来SSH到服务器并执行命令

时间:2012-10-23 19:19:54

标签: tcl expect

我想编写一个通用的expect脚本,通过SSH登录系统并执行一些命令。我发现的一个例子如下:

#!/usr/bin/expect

set fid [open ./.secret]
set password [read $fid]
close $fid
spawn /usr/bin/ssh root@[lindex $argv 0]
expect {
  -re ".*Are.*.*yes.*no.*" {
    send "yes\n"
    exp_continue
    #look for the password prompt
  }

  "*?assword:*" {
    send $password
    send "\n"
  }
}

send -- "PS1='>'\r"
expect -re ">$" { send "hostname\r" }
expect -re ">$" { send "pwd\r" }

...脚本似乎正确登录但它没有执行最后2次发送。想法?

编辑: 启用exp_internal后,我注意到以下内容:

expect: does "" (spawn_id exp4) match glob pattern "*"? yes
expect: set expect_out(0,string) ""
expect: set expect_out(spawn_id) "exp4"
expect: set expect_out(buffer) ""
send: sending "PS1='>'\r" to { exp4 }
Gate keeper glob pattern for '>$' is '>'. Activating booster.

expect: does "" (spawn_id exp4) match regular expression ">$"? Gate ">"? gate=no


expect: does "\r\n" (spawn_id exp4) match regular expression ">$"? Gate ">"? gate=no
Last login: Tue Nov  6 14:13:31 2012 from 1.x.x.x

expect: does "\r\nLast login: Tue Nov  6 14:13:31 2012 from 1.x.x.x\r\r\n" (spawn_id exp4) match regular expression ">$"? Gate ">"? gate=no

我正在尝试发送PS1='>'\r,因为我想覆盖提示。我认为没有任何方法可以预测提示会是什么,因此,我不知道会有什么样的模式。从上面看,看起来提示没有改变。你如何解决这样的问题?

1 个答案:

答案 0 :(得分:1)

您的脚本似乎没有任何明显错误(尽管使用不同的提示可能会使匹配更容易)。这意味着它是微妙的东西。我建议加上这个:

exp_debug 1

到你脚本的早期某个地方。这将使Expect引擎更多地了解它正在做什么,这将(可能)帮助您了解出了什么问题,或者失败了帮助这里的人帮助您......