tpmtoken_import_tests_exp02.sh 1.5 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647
  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. set P11_SO_PWD $env(P11_SO_PWD)
  20. set P11_USER_PWD $env(P11_USER_PWD)
  21. set TPM_CERTFILE $env(TPM_CERTFILE)
  22. set TPM_KEYFILE $env(TPM_KEYFILE)
  23. set TPM_COMBFILE $env(TPM_COMBFILE)
  24. set SSL_PWD $env(SSL_PWD)
  25. set TCID $env(TCID)
  26. set timeout 30
  27. # Import the combined certificate and key as public objects
  28. # there should already be a cert and key objects
  29. spawn tpmtoken_import -n "$TCID" $TPM_COMBFILE
  30. expect -re "Enter PEM pass phrase:"
  31. send "$SSL_PWD\n"
  32. expect -re "Enter your TPM user password: "
  33. send "$P11_USER_PWD\n"
  34. # Replace the cert object
  35. expect -re "Import the object?"
  36. send "y\n"
  37. # Replace the key objects
  38. expect -re "Import the object?"
  39. send "y\n"
  40. expect timeout
  41. set rc_list [wait -i $spawn_id]
  42. set rc [lindex $rc_list {3}]
  43. exit $rc