shadow/tests/grouptools/gpasswd/22_gpasswd_change_passwd-myuser/gpasswd.exp
Serge Hallyn b999d48941 Add tests from the old svn tree
We're losing the svn history (which we could probably keep if we tried
hard enough) but don't consider that worthwhile.

Note these tests are destructive, so run them only in a throwaway
environment like a chroot, container, or vm.

The tests/run.all script should be the one which launches all the tests.

Signed-off-by: Serge Hallyn <serge.hallyn@ubuntu.com>
2014-09-17 14:42:55 -05:00

71 lines
1.7 KiB
Plaintext
Executable File

#!/usr/bin/expect
set timeout 2
expect_after default {puts "\nFAIL"; exit 1}
if {$argc != 4} {
puts "usage: gpasswd.exp <run_user> <group> <g_password> <user_prompt>"
exit 1
}
set run_user [lindex $argv 0]
set group [lindex $argv 1]
set g_password [lindex $argv 2]
set user_prompt [lindex $argv 3]
# First, switch to the testsuite user
# (otherwise, no password will be asked)
send_user "# switch to user '$run_user'\n"
send_user "# and expect a '$user_prompt' prompt\n"
spawn /bin/su $run_user
expect "$user_prompt" ;# Wait for the prompt
send_user "\n# make sure we are now '$run_user'"
send_user "\n# whoami should return '$run_user'"
send "\r" ;# restore the prompt for the logs
send "whoami\r" ;# Verify we are really testsuite
expect {
timeout {
puts "\ntimeout...FAIL"
exit 1
}
"$run_user"
}
expect "$user_prompt" ;# Wait for the prompt
send_user "\n\n"
send_user "# now change '$group' 's password to '$g_password'\n"
send_user "# and expect a password prompt"
send "\r" ;# restore the prompt for the logs
send "gpasswd $group\r" ;# Change the password
expect "New Password: " ;# Wait for the Password: prompt
# Wait a little bit more (gpasswd is not ready to receive the password)
sleep 0.1
send "$g_password\r" ;# Send the password
send_user "\n# password '$g_password' sent\n\n"
send_user "Expect a new password prompt\n"
expect "Re-enter new password: " ;# Wait for the Password: prompt
# Wait a little bit more (gpasswd is not ready to receive the password)
sleep 0.1
send "$g_password\r" ;# Send the password
send_user "# expect prompt '$user_prompt'"
expect {
# Wait for the new prompt
"$user_prompt" {
send "exit\r"
expect "$ "
puts "\nPASS"
exit 0
}
}
puts "\ntimeout...FAIL"
exit 1