123456789101112131415161718192021222324252627282930313233343536373839 |
- #! /usr/bin/expect -f
- #
- # Copyright (c) International Business Machines Corp., 2005
- #
- # This program is free software; you can redistribute it and#or modify
- # it under the terms of the GNU General Public License as published by
- # the Free Software Foundation; either version 2 of the License, or
- # (at your option) any later version.
- #
- # This program is distributed in the hope that it will be useful, but
- # WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
- # or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
- # for more details.
- #
- # You should have received a copy of the GNU General Public License
- # along with this program; if not, write to the Free Software
- # Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
- #
- set P11_SO_PWD $env(P11_SO_PWD)
- set NEW_P11_SO_PWD $env(NEW_P11_SO_PWD)
- set P11_USER_PWD $env(P11_USER_PWD)
- set NEW_P11_USER_PWD $env(NEW_P11_USER_PWD)
- set timeout 30
- # Initiate the tpmtoken_setpasswd command
- spawn tpmtoken_setpasswd
- expect -re "Enter your TPM user password: "
- send "$P11_USER_PWD\n"
- expect -re "Enter new password: "
- send "$NEW_P11_USER_PWD\n"
- expect -re "Confirm password: "
- send "$NEW_P11_USER_PWD\n"
- expect timeout
- set rc_list [wait -i $spawn_id]
- set rc [lindex $rc_list {3}]
- exit $rc
|