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

问题描述 投票:3回答:1

我想编写一个通用的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,因为我想覆盖提示。我认为没有任何方法可以预测提示会是什么,因此,我不知道会有什么样的模式。从上面看,看起来提示没有改变。你如何解决这样的问题?

tcl expect
1个回答
1
投票

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

exp_debug 1

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

© www.soinside.com 2019 - 2024. All rights reserved.