X-Git-Url: http://dolda2000.com/gitweb/?p=utils.git;a=blobdiff_plain;f=gpotp;fp=gpotp;h=ced1910beae77ba706166767e4e8a4f8a39d9019;hp=0000000000000000000000000000000000000000;hb=bc5421bd7da76e351621a156bebcbad0aa7e7c60;hpb=5c2f7dad5f92029da6a965aa001e94e1a014252e

diff --git a/gpotp b/gpotp
new file mode 100755
index 0000000..ced1910
--- /dev/null
+++ b/gpotp
@@ -0,0 +1,39 @@
+#!/bin/sh
+
+usage() {
+    echo "usage: gpotp KEY-NAME"
+}
+
+set -e
+while getopts h opt; do
+    case "$opt" in
+	h)
+	    usage
+	    exit 0
+	    ;;
+	*)
+	    usage >&2
+	    exit 1
+	    ;;
+    esac
+done
+shift $((OPTIND - 1))
+if [ $# -lt 1 ]; then
+    usage >&2
+    exit 1
+fi
+
+if ! echo "$1" | grep -q /; then
+    key="$HOME/passwd/otp/$1.gpg"
+else
+    key="$1"
+fi
+if [ ! -e "$key" ]; then
+    echo "gpotp: $key: does not exist" >&2
+    exit 1
+fi
+
+gpg --quiet --decrypt --armor <"$key" | (
+    read type secret dig
+    oathtool "--$type" -d "$dig" "$secret"
+)