From 9382b621ad2ba2769442157c400c5e8882160abe Mon Sep 17 00:00:00 2001 From: Werner Koch Date: Sat, 10 Aug 2002 09:14:21 +0000 Subject: * keylist.c (list_cert_colon): Print the short fingerprint in the key ID field. * fingerprint.c (gpgsm_get_short_fingerprint): New. * verify.c (gpgsm_verify): Print more verbose info for a good signature. --- sm/keylist.c | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) (limited to 'sm/keylist.c') diff --git a/sm/keylist.c b/sm/keylist.c index 5431e1b00..e73eb1f3a 100644 --- a/sm/keylist.c +++ b/sm/keylist.c @@ -151,6 +151,7 @@ list_cert_colon (KsbaCert cert, FILE *fp, int have_secret) int idx, trustletter = 0; char *p; KsbaSexp sexp; + char *fpr; fputs (have_secret? "crs:":"crt:", fp); trustletter = 0; @@ -168,9 +169,11 @@ list_cert_colon (KsbaCert cert, FILE *fp, int have_secret) putc (trustletter, fp); } - fprintf (fp, ":%u:%d::", + fpr = gpgsm_get_fingerprint_hexstring (cert, GCRY_MD_SHA1); + fprintf (fp, ":%u:%d:%s:", /*keylen_of_cert (cert)*/1024, - /* pubkey_algo_of_cert (cert)*/1); + /* pubkey_algo_of_cert (cert)*/1, + fpr+24); /* we assume --fixed-list-mode for gpgsm */ print_time ( ksba_cert_get_validity (cert, 0), fp); @@ -212,9 +215,8 @@ list_cert_colon (KsbaCert cert, FILE *fp, int have_secret) putc ('\n', fp); /* FPR record */ - p = gpgsm_get_fingerprint_hexstring (cert, GCRY_MD_SHA1); - fprintf (fp, "fpr:::::::::%s:::", p); - xfree (p); + fprintf (fp, "fpr:::::::::%s:::", fpr); + xfree (fpr); fpr = NULL; /* print chaining ID (field 13)*/ { KsbaCert next; -- cgit v1.2.3