blob: db0721d25005f8f3a47e2a68f812e2a0967ca7a9 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
|
#!/usr/bin/expect -f
set timeout 10
spawn $env(SHELL)
match_max 100000
send -- "ssh bingo@0\r"
expect {
timeout {puts "TESTING ERROR 0\n";exit}
"password:" {
puts "\nTESTING: please enter SSH password"
set oldmode [stty -echo -raw]
expect_user -re "(.*)\n"
send_user "\n"
eval stty $oldmode
# stty echo
set pass $expect_out(1,string)
send -- "$pass\r"
puts "TESTING: password sent to the server"
}
"Child process initialized"
}
sleep 1
# test default gw
send -- "bash\r"
sleep 1
send -- "ps aux; pwd\r"
expect {
timeout {puts "TESTING ERROR 1\n";exit}
"/bin/bash"
}
expect {
timeout {puts "TESTING ERROR 2\n";exit}
"bash"
}
expect {
timeout {puts "TESTING ERROR 3\n";exit}
"ps aux"
}
expect {
timeout {puts "TESTING ERROR 4\n";exit}
"home"
}
sleep 1
send -- "ps aux |wc -l; pwd\r"
expect {
timeout {puts "TESTING ERROR 5\n";exit}
"6"
}
expect {
timeout {puts "TESTING ERROR 6\n";exit}
"home"
}
sleep 1
puts "\nall done\n"
|
