1#! /usr/bin/expect -f
2#
3# Copyright (c) International Business Machines  Corp., 2005
4#
5# This program is free software;  you can redistribute it and#or modify
6# it under the terms of the GNU General Public License as published by
7# the Free Software Foundation; either version 2 of the License, or
8# (at your option) any later version.
9#
10# This program is distributed in the hope that it will be useful, but
11# WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
12# or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
13# for more details.
14#
15# You should have received a copy of the GNU General Public License
16# along with this program;  if not, write to the Free Software
17# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
18#
19
20set P11_SO_PWD $env(P11_SO_PWD)
21set NEW_P11_SO_PWD $env(NEW_P11_SO_PWD)
22set P11_USER_PWD $env(P11_USER_PWD)
23set NEW_P11_USER_PWD $env(NEW_P11_USER_PWD)
24set timeout 30
25
26# Initiate the tpmtoken_setpasswd command
27spawn tpmtoken_setpasswd
28expect -re "Enter your TPM user password: "
29send "$NEW_P11_USER_PWD\n"
30expect -re "Enter new password: "
31send "$P11_USER_PWD\n"
32expect -re "Confirm password: "
33send "$P11_USER_PWD\n"
34expect timeout
35
36set rc_list [wait -i $spawn_id]
37set rc [lindex $rc_list {3}]
38
39exit $rc
40