A script to dump out GPG signatures from emails.

ChangeLog:

	* gpg-dump.sh: Created.

ChangeLog

@@ -1,3 +1,7 @@
+2019-02-21  Jeremy Bennett  <[email protected]>
+
+	* gpg-dump.sh: Created.
+
 2018-11-06  Jeremy Bennett  <[email protected]>
 
 	A wondrous script to dump out Thunderbird prefs in an order and

gpg-dump.sh

@@ -0,0 +1,44 @@
+#!/bin/sh
+# Script to dump public GPG keys
+
+# Copyright (C) 2019 Embecosm Limited
+
+# This program is free software: you can redistribute it and/or modify it
+# under the terms of the GNU General Public License as published by the Free
+# Software Foundation, either version 3 of the License, or (at your option)
+# any later version.
+
+# This program is distributed in the hope that it will be useful, but WITHOUT
+# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+# FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
+# more details.
+
+# You should have received a copy of the GNU General Public License along with
+# this program.  If not, see <http://www.gnu.org/licenses/>.
+
+# SPDX-License-Identifier: GPL-3.0-or-later
+
+# Get arg(s)
+
+if [ $# -lt 2 ]
+then
+    echo "Usage: $0 <dump-file> <key> ..."
+    exit 1
+fi
+
+file=$1
+shift
+emails="$*"
+
+gpg --armor --output ${file} --export ${emails}
+
+for e in ${emails}
+do
+    k=$(gpg --keyid-format long -k ${e} | \
+	sed -n -e 's/^pub   //p' | \
+	sed -e 's/ \[[[:alpha:]]\+\].#$//'   \
+	    -e 's/rsa\([[:digit:]]\+\)/\1R/' \
+	    -e 's/dsa\([[:digit:]]\+\)/\1D/')
+
+    printf "  %s %s\n" "${k}" "${e}"
+done