tpmtoken_import_tests_exp05.sh 1.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445
  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 -p -n "$TCID" $TPM_COMBFILE
  30. expect -re "Enter PEM pass phrase:"
  31. send "$SSL_PWD\n"
  32. # Replace the cert object
  33. expect -re "Import the object?"
  34. send "y\n"
  35. # Replace the key objects
  36. expect -re "Import the object?"
  37. send "y\n"
  38. expect timeout
  39. set rc_list [wait -i $spawn_id]
  40. set rc [lindex $rc_list {3}]
  41. exit $rc