aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorNIIBE Yutaka <[email protected]>2023-10-03 02:53:00 +0000
committerNIIBE Yutaka <[email protected]>2023-10-03 02:53:00 +0000
commit321f9c0a3f2873cb3007e2bc2a542bbd0b2cc974 (patch)
tree416c6bebaf5d88640296ba777d352f4f850b5e5f
parenttests:gpgscm: Fix process select loop. (diff)
downloadgnupg-321f9c0a3f2873cb3007e2bc2a542bbd0b2cc974.tar.gz
gnupg-321f9c0a3f2873cb3007e2bc2a542bbd0b2cc974.zip
tests:tpm2dtests: Fix tests with TPM2D.
* tests/tpm2dtests/Makefile.am (TESTS_ENVIRONMENT): Fix. * tests/tpm2dtests/all-tests.scm: Follow the change of gpgscm. * tests/tpm2dtests/run-tests.scm: Likewise. -- GnuPG-bug-id: 6052 Signed-off-by: NIIBE Yutaka <[email protected]>
-rw-r--r--tests/tpm2dtests/Makefile.am4
-rw-r--r--tests/tpm2dtests/all-tests.scm21
-rw-r--r--tests/tpm2dtests/run-tests.scm2
3 files changed, 16 insertions, 11 deletions
diff --git a/tests/tpm2dtests/Makefile.am b/tests/tpm2dtests/Makefile.am
index 72ad11d9b..6048d201c 100644
--- a/tests/tpm2dtests/Makefile.am
+++ b/tests/tpm2dtests/Makefile.am
@@ -34,10 +34,10 @@ TESTS_ENVIRONMENT = LC_ALL=C \
PATH="../gpgscm:$(PATH)" \
abs_top_srcdir="$(abs_top_srcdir)" \
objdir="$(abs_top_builddir)" \
- TPMSERVER="$(TPMSERVER)" \
+ TPMSERVER="$(TPMSERVER)" TSSSTARTUP="$(TSSSTARTUP)" \
SWTPM="$(SWTPM)" \
SWTPM_IOCTL="$(SWTPM_IOCTL)" \
- GNUPG_BUILD_ROOT="$(abs_top_builddir)/tests" \
+ GNUPG_BUILD_ROOT="$(abs_top_builddir)" \
GNUPG_IN_TEST_SUITE=fact \
GPGSCM_PATH="$(abs_top_srcdir)/tests/gpgscm"
diff --git a/tests/tpm2dtests/all-tests.scm b/tests/tpm2dtests/all-tests.scm
index bf7a981ca..8934f01f2 100644
--- a/tests/tpm2dtests/all-tests.scm
+++ b/tests/tpm2dtests/all-tests.scm
@@ -30,8 +30,9 @@
(make-environment-cache
(test::scm
#f
- (path-join "tests" "openpgp" "setup.scm")
- (in-srcdir "tests" "openpgp" "setup.scm"))))
+ #f
+ (path-join "tests" "tpm2dtests" "setup.scm")
+ (in-srcdir "tests" "tpm2dtests" "setup.scm"))))
(define (qualify path variant)
(string-append "<" variant ">" path))
@@ -40,8 +41,9 @@
(make-environment-cache
(test::scm
#f
- (qualify (path-join "tests" "openpgp" "setup.scm") variant)
- (in-srcdir "tests" "openpgp" "setup.scm")
+ variant
+ (path-join "tests" "tpm2dtests" "setup.scm")
+ (in-srcdir "tests" "tpm2dtests" "setup.scm")
(string-append "--" variant))))
(define setup-use-keyring (setup* "use-keyring"))
@@ -55,7 +57,8 @@
(define tests
(map (lambda (name)
(test::scm setup
- (qualify (path-join "tests" "tpm2dtests" name) "standard")
+ "standards"
+ (path-join "tests" "tpm2dtests" name)
(in-srcdir "tests" "tpm2dtests" name))) all-tests))
(when *run-all-tests*
@@ -65,15 +68,15 @@
;; The second pass uses the keyboxd
(map (lambda (name)
(test::scm setup-use-keyboxd
- (qualify (path-join "tests" "tpm2dtests" name)
- "keyboxd")
+ "keyboxd"
+ (path-join "tests" "tpm2dtests" name)
(in-srcdir "tests" "tpm2dtests" name)
"--use-keyboxd")) all-tests)
;; The third pass uses the legact pubring.gpg
(map (lambda (name)
(test::scm setup-use-keyring
- (qualify (path-join "tests" "tpm2dtests" name)
- "keyring")
+ "keyring"
+ (path-join "tests" "tpm2dtests" name)
(in-srcdir "tests" "tpm2dtests" name)
"--use-keyring")) all-tests)
)))
diff --git a/tests/tpm2dtests/run-tests.scm b/tests/tpm2dtests/run-tests.scm
index fdf1859a8..638d3a8a1 100644
--- a/tests/tpm2dtests/run-tests.scm
+++ b/tests/tpm2dtests/run-tests.scm
@@ -29,6 +29,7 @@
(define setup
(make-environment-cache (test::scm
#f
+ #f
(path-join "tests" "tpm2dtests" "setup.scm")
(in-srcdir "tests" "tpm2dtests" "setup.scm"))))
@@ -38,6 +39,7 @@
(load-tests "tests" "tpm2dtests")
(map (lambda (name)
(test::scm setup
+ #f
(path-join "tests" "tpm2dtests" name)
(in-srcdir "tests" "tpm2dtests" name)
"--use-keyring")) tests)))