'expect'안에 조건문 사용하기

Question

을 사용하여 TELNET 세션에 로그인하는 것을 자동화해야하는데,이 필요하지만 같은 사용자 이름에 대해 여러 암호를 처리해야합니다.

1. 오픈 TELNET 세션의 IP
2. 보내기 사용자 이름
3. 에게 보내기 비밀번호를
4. 잘못된 암호 :

   여기에 내가 만들 필요가 흐름인가? 그것은 가치가 무엇인지를 들어 ...

5. 가 성공적으로 로그인 한 했어야
이 시점에서 다음 다른 암호를 다시

을 동일한 사용자 이름 보내기, 여기에 내가 지금까지있어 무엇 :

#!/usr/bin/expect 
spawn telnet 192.168.40.100 
expect "login:" 
send "spongebob\r" 
expect "password:" 
send "squarepants\r" 
expect "login incorrect" { 
    expect "login:" 
    send "spongebob\r" 
    expect "password:" 
    send "rhombuspants\r" 
} 
expect "prompt\>" { 
    send_user "success!\r" 
} 
send "blah...blah...blah\r" 

말할 필요도없이 이것이 작동하지 않으며 매우 아름답게 보이지 않습니다. Google 으로 모험에서는 어두운 예술의 무언가 인 것을 보인다. 이 문제에 도움을 주신 모든 분들께 미리 감사드립니다!

Answer 1

프로그래머를위한 모든 기대를위한 Exploring Expect 책을 꼭 기억해야합니다. (테스트되지 않은)

proc login {user pass} { 
    expect "login:" 
    send "$user\r" 
    expect "password:" 
    send "$pass\r" 
} 

set username spongebob 
set passwords {squarepants rhombuspants} 
set index 0 

spawn telnet 192.168.40.100 
login $username [lindex $passwords $index] 
expect { 
    "login incorrect" { 
     send_user "failed with $username:[lindex $passwords $index]\n" 
     incr index 
     if {$index == [llength $passwords]} { 
      error "ran out of possible passwords" 
     } 
     login $username [lindex $passwords $index] 
     exp_continue 
    } 
    "prompt>" 
} 
send_user "success!\n" 
# ... 

exp_continue 다시 기대 블록의 시작 부분에 루프 - 그것은 "다시"문처럼 :

난 당신의 코드를 다시 작성했습니다.

send_user가 \n로 끝나는 참고하지 \r

당신은 당신의 프롬프트에 > 문자를 이스케이프 할 필요가 없습니다 : 그것은 Tcl의 특별한 아니다.

Answer 2

사용자 ID와 암호를 알고있는 경우 어떤 시스템과 정렬 된 사용자 ID/암호 쌍이 있는지 알아야합니다. 어떤 사용자 ID/암호 쌍이 어떤 시스템과 연결되어 있는지 그 정보를 추출하고 올바른 정보를 사용하는 맵을 유지하는 것이 더 나을 것이라고 생각합니다.

내 충고가 마음에 들지 않으므로 wikipedia page을보고 성공하면 0을, 예상 시간을 초과하면 1을 반환하는 절차를 구현하는 것이 좋습니다. 이렇게하면 제공된 암호가 실패했을 때 즉, 예상 시간이 초과 된 경우를 감지하고 다시 시도 할 수 있습니다. 이것이 도움이된다면, 편집 한 downvote를 제거 할 수 있습니다.

회상시 암호를 변경하면 실패한 로그인을 감지하기 때문에지도와 함께이 작업을 수행하는 것이 좋습니다.

Answer 3

약간의 강타로 해결책을 찾았습니다. expect가 TCL 구문을 사용하여 내가 익숙하지 않다는 것을 알게되었습니다 :

#!/usr/bin/expect 
set pass(0) "squarepants" 
set pass(1) "rhombuspants" 
set pass(2) "trapezoidpants" 
set count 0 
set prompt "> " 
spawn telnet 192.168.40.100 
expect { 
    "$prompt" { 
    send_user "successfully logged in!\r" 
    } 
    "password:" { 
    send "$pass($count)\r" 
    exp_continue 
    } 
    "login incorrect" { 
    incr count 
    exp_continue 
    } 
    "username:" { 
    send "spongebob\r" 
    exp_continue 
    } 
} 
send "command1\r" 
expect "$prompt" 
send "command2\r" 
expect "$prompt" 
send "exit\r" 
expect eof 
exit 

다른 사람들에게 유용하게 사용되기를 바랍니다.