gpg: move to compat.

1 files changed, 49 insertions, 0 deletions

diff --git a/Library/Homebrew/compat/gpg.rb b/Library/Homebrew/compat/gpg.rb
new file mode 100644
index 000000000..01880f71e
--- /dev/null
+++ b/Library/Homebrew/compat/gpg.rb
@@ -0,0 +1,49 @@
+require "utils"
+
+module Gpg
+  module_function
+
+  def executable
+    which "gpg"
+  end
+
+  def available?
+    File.executable?(executable.to_s)
+  end
+
+  def create_test_key(path)
+    odie "No GPG present to test against!" unless available?
+
+    (path/"batch.gpg").write <<~EOS
+      Key-Type: RSA
+      Key-Length: 2048
+      Subkey-Type: RSA
+      Subkey-Length: 2048
+      Name-Real: Testing
+      Name-Email: testing@foo.bar
+      Expire-Date: 1d
+      %no-protection
+      %commit
+    EOS
+    system executable, "--batch", "--gen-key", "batch.gpg"
+  end
+
+  def cleanup_test_processes!
+    odie "No GPG present to test against!" unless available?
+
+    gpgconf = Pathname.new(executable).parent/"gpgconf"
+
+    system gpgconf, "--kill", "gpg-agent"
+    system gpgconf, "--homedir", "keyrings/live", "--kill",
+                                 "gpg-agent"
+  end
+
+  def test(path)
+    create_test_key(path)
+    begin
+      yield
+    ensure
+      cleanup_test_processes!
+    end
+  end
+end