SFTP로 파일 전송 자동화

# If we get an end-of-file (eof) it means that the sftp process
# terminated. Report the last command that was sent.
#
proc goteof {cmd} {
puts "sftp connection unexpectedly closed n"
puts "last text received wasn"
puts "<<"
puts $cmd
puts ">>nnn"
exit
}# 이 절차는 키 문자열을 찾는 정규 식 일치를 수행합니다.
# 실행된 명령에서 수집된 출력입니다. 이 경우
# 난 그냥 오류의 유형을보고하지만 다른 일을 할 수 있습니다
#뿐만 아니라. 나는 또한 2 개의 오류만 확인합니다. 다른 사람들이 있습니다. 당신은
# 당신이 그들을 찾을 때 그들을 추가합니다.
#
프로크 검사 오류 {buf cmd} {
[regexp {.*찾을 수 없는} $buf] {
"$cmd 실패 : 미인"
반환 1
}
[regexp {.*권한 거부} $buf] {
"$cmd 실패 : 액세스 문제 nnn"을 넣습니다.
반환 1
}
반환 0
}#시간 시간을 -1로 설정하여 시간 제전에 대한 시간이 없습니다. 기본값은 10초입니다.
# 대부분의 파일 전송은 그보다 더 오래 걸린다. 나는 아니오를 설정하기로 결정
# 시간 시간, 당신은 그것을 변경할 수 있습니다.
설정 시간 -1

# 시작 sftp
스폰 sftp [email protected]

# Sftp 프롬프트를 기다리지만 인증 프롬프트가 발생하면
# 예/ 아니요 보안 문제를 보고하고 종료합니다.
예상 {
"네/아니오?" { 풋
"nnnWe가 잘못된 서버에 연결했거나 서버가 다시 로드되었습니다."
박 았
"이 스크립트를 다시 실행하려면 먼저 서버 키의 유효성을 검사해야 합니다."
종료 }
sftp>
}

# 테스트를 위한 간결한 디렉터리 변경
"cd sftp_testr" 보내기
예상 {
eof { 고테of "cd sftp_test" }
sftp>
}

# 모든 수집 된 문자를 전달 하는 오류에 대 한 호출 확인
# sftp> 프롬프트. 또한 sftp에 전송 된 명령입니다.
# 검사 오류 절차는 스크립트를 종료 1 을 반환합니다. 다시 말하지만, 당신은 할 수 있습니다
# 다른 일을.
{[체크포어 $expect_out(버퍼) "cd sftp_test"] == 1} {종료}

"푸를 넣어" 보내기
예상 {
eof { goteof "푸 넣어"}
sftp>
}
{[검사 오류 $expect_out(버퍼) "foo 넣기"] == 1} {종료}

"바 받기" 보내기
예상 {
eof { goteof "바 받기" }
sftp>
}
{[검사 오류 $expect_out(버퍼) "바"] == 1} {종료}

"종료자"를 보내십시오.
eof를 기대
"스크립트 도넨"을 넣습니다.

expect sftp3.exp
spawn sftp [email protected]
Connecting to 172.16.1.116...
sftp> cd sftp_test
sftp> put foo
Uploading foo to /SysAdmin/Noah_Davids/sftp_test/foosftp> 바 받기
원격 파일을 통계할 수 없음: 그러한 파일이나 디렉토리없음
파일 "/SysAdmin/Noah_Davids/sftp_test/bar"를 찾을 수 없습니다.
sftp> 바 실패를 얻을 : 찾을 준비가 되지 않은 10:42:11