summaryrefslogtreecommitdiff
path: root/src/share/ma
diff options
context:
space:
mode:
authorDaniel Kahn Gillmor <dkg@fifthhorseman.net>2009-02-17 00:56:34 -0500
committerDaniel Kahn Gillmor <dkg@fifthhorseman.net>2009-02-17 00:56:34 -0500
commit440ee625fb6bd21ccb21f458a3d2474b19a174fe (patch)
treec0cffb12330920cb210bcf081c46a72dc800c863 /src/share/ma
parent54e5dd2bd3d63238142c748c64fdf66135a47136 (diff)
update m-a list-identity-certifiers: output is not yet human-readable, but it should be more accurate.
Diffstat (limited to 'src/share/ma')
-rw-r--r--src/share/ma/list_certifiers43
1 files changed, 32 insertions, 11 deletions
diff --git a/src/share/ma/list_certifiers b/src/share/ma/list_certifiers
index d8b8f33..5a0388e 100644
--- a/src/share/ma/list_certifiers
+++ b/src/share/ma/list_certifiers
@@ -17,21 +17,42 @@ list_certifiers() {
local keys
local key
+local authfpr
# find trusted keys in sphere keychain
log debug "finding trusted keys..."
-# NOTE: looking for only 'f' keys here (used to be '(u|f)'), since the
-# only key that should be 'u' is the core key, which is not
-# technically a certifier in the sense we're worried about. Is this
-# not correct? Should we be sorting out the certifier keys in a
-# different way?
-keys=$(gpg_sphere "--list-keys --with-colons --fingerprint" | \
- grep ^pub: | cut -d: -f2,5 | egrep '^f:' | cut -d: -f2)
-
-# output keys
-for key in $keys ; do
- gpg_sphere "--list-key --fingerprint 0x${key}!"
+# FIXME: this assumes that the keygrip (16 hex chars) is unique; we're
+# only searching by keygrip at the moment.
+
+authgrip=$(core_fingerprint | cut -b 25-40)
+
+# We're walking the list of known signatures, and extracting all trust
+# signatures made by the core fingerprint and known to the sphere
+# keyring.
+
+# for each one of these, we're printing (colon-delimited): the
+# fingerprint, the trust depth, the trust level (60 == marginal, 120
+# == full), and the domain regex (if any):
+
+gpg_sphere "--fingerprint --with-colons --fixed-list-mode --check-sigs" | \
+ cut -f 1,2,5,8,9,10 -d: | \
+ egrep '^(fpr:::::|sig:!:'"$authgrip"':[[:digit:]]+ [[:digit:]]+:)' | \
+ while IFS=: read -r type validity grip trustparams trustdomain fpr ; do
+ case $type in
+ 'fpr') # this is a new key
+ keyfpr=$fpr
+ ;;
+ 'sig') # print all trust signatures, including regexes if present
+ trustdepth=${trustparams%% *}
+ trustlevel=${trustparams##* }
+
+ # FIXME: this is clumsy and not human-friendly. we should
+ # print out more human-readable information, if possible.
+ printf "%s:%d:%d:%s\n" "$keyfpr" "$trustdepth" "$trustlevel" "$trustdomain"
+ ;;
+ esac
done
+
}