summaryrefslogtreecommitdiffstats
path: root/tests/log/faillog/47_faillog-m-a-u_user/login.exp
blob: 5df090326de92888eb34e227a13e8a88e8c175f5 (plain)
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
#!/usr/bin/expect

if {$argc == 1} {
        set user     [lindex $argv 0]
} else {
        set user     "foo"
}

set timeout 2
expect_after default {puts "\nFAIL"; exit 1}

set timeout 5
expect_after default {puts "\nFAIL"; exit 1}

spawn /bin/bash
expect "# "

send "login $user\r"
expect "Password: "
sleep 0.1
send "badpass\r"
send_user "\n# password 'badpass' sent\n\n"
expect "login: "

send "exit\r"
exit 0