#!/bin/bash
#
# $Id: makelist.sh,v 1.2 2003/01/18 22:48:19 mitch Exp $
#
# 2003 (c) by Christian Garbs <mitch@cgarbs.de>
# Licensed under Gnu GPL.
#
# Read OpenPGP keyring file and print list of Key-IDs and
# eMail-addresses to stdout.

############################################################

die() {
    echo $*
    exit 1
}

[ -z "${1}" ] && die "no keyring file given"

KEYRING="$1"

[ -r "${KEYRING}" ] || die "can't read keyring file <${KEYRING}>"

gpg < "${KEYRING}" \
    | egrep '^(pub|uid)' \
    | (
    while read LINE; do
	TYPE="${LINE:0:3}"
	[ ${TYPE} = "pub" ] && KEYID="${LINE:11:8}"
	MAIL="${LINE:31}"
	echo ${KEYID} ${MAIL}
    done
)