From 8cfab42bc3a063f48a3934326818f1c5f2ca9721 Mon Sep 17 00:00:00 2001 From: David Bremner Date: Thu, 5 May 2022 08:29:21 -0300 Subject: refactor use of gnupg in CONSFIGURATOR.DATA.PGP Add a new low level function GPG, and a function GPG-FILE-AS-STRING intended for use in the pgp data source and the future pass(1) data source. Both of these functions support a new parameter *DATA-SOURCE-GNUPGHOME*, which allows the user (or test suite) to control where key material is stored for accessing data sources. Signed-off-by: David Bremner --- src/package.lisp | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'src/package.lisp') diff --git a/src/package.lisp b/src/package.lisp index df59785..0ea8241 100644 --- a/src/package.lisp +++ b/src/package.lisp @@ -323,6 +323,7 @@ #:wrap-passphrase #:unwrap-passphrase #:get-data-protected-string + #:*data-source-gnupghome* ;; image.lisp #:eval-in-grandchild @@ -1003,11 +1004,12 @@ (#:lxc #:consfigurator.property.lxc))) (package :consfigurator.data.util - (:export #:literal-data-pathname)) + (:export #:literal-data-pathname #:gpg-file-as-string #:gpg)) (package :consfigurator.data.asdf) (package :consfigurator.data.pgp + (:use #:consfigurator.data.util) (:export #:list-data #:get-data #:set-data #:set-data-from-file)) (package :consfigurator.data.git-snapshot) -- cgit v1.2.3