From 0045c4b162d2a68a85b8e7844dca97834f888dd5 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Fri, 12 Aug 2016 05:00:17 -0400 Subject: separate error code for already exsisting object store --- Gpg.hs | 21 +++++++++++++++++++++ 1 file changed, 21 insertions(+) create mode 100644 Gpg.hs (limited to 'Gpg.hs') diff --git a/Gpg.hs b/Gpg.hs new file mode 100644 index 0000000..bf4cbe6 --- /dev/null +++ b/Gpg.hs @@ -0,0 +1,21 @@ +{- Copyright 2016 Joey Hess + - + - Licensed under the GNU AGPL version 3 or higher. + -} + +module Gpg where + +import Types +import System.Process + +-- | Converts an input KeyId, which can be short, or even a name or email, +-- to a long-form gpg KeyId of a secret key. +getFullKeyId :: KeyId -> IO (Maybe KeyId) +-- gpg --batch --with-colons --list-secret-keys +-- extract from eg, sec::4096:1:C910D9222512E3C7:... + +-- | Check if a given gpg key is present on the keyserver. +-- (Without downloading the key.) +knownByKeyServer :: KeyId -> IO Bool +-- gpg --batch --with-colons --search-keys 2>/dev/null +-- check if output includes pub: line -- cgit v1.2.3