We have reached a state where we are able to import certs and
[gnupg.git] / sm / fingerprint.c
1 /* fingerprint.c - Get the fingerprint
2  *      Copyright (C) 2001 Free Software Foundation, Inc.
3  *
4  * This file is part of GnuPG.
5  *
6  * GnuPG is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * GnuPG is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
19  */
20
21 #include <config.h>
22 #include <stdio.h>
23 #include <stdlib.h>
24 #include <string.h>
25 #include <errno.h>
26 #include <unistd.h> 
27 #include <time.h>
28 #include <assert.h>
29
30 #include <gcrypt.h>
31 #include <ksba.h>
32
33 #include "gpgsm.h"
34
35 /* Return the fingerprint of the certificate (we can't put this into
36    libksba becuase we need libgcrypt support).  The caller must
37    provide an array of sufficient length or NULL so that the function
38    allocates the array.  If r_len is not NULL, the length of the
39    digest is return, well, this can also be done by using
40    gcry_md_get_algo_dlen().  If algo is 0, a SHA-1 will be used.
41    
42    If there is a problem , the function does never return NULL but a
43    digest of all 0xff.
44  */
45 char *
46 gpgsm_get_fingerprint (KsbaCert cert, int algo, char *array, int *r_len)
47 {
48   GCRY_MD_HD md;
49   int rc, len;
50   
51   if (!algo)
52     algo = GCRY_MD_SHA1;
53
54   len = gcry_md_get_algo_dlen (algo);
55   assert (len);
56   if (!array)
57     array = xmalloc (len);
58
59   if (r_len)
60     *r_len = len;
61
62   md = gcry_md_open (algo, 0);
63   if (!md)
64     {
65       log_error ("md_open failed: %s\n", gcry_strerror (-1));
66       memset (array, 0xff, len); /* better return an invalid fpr than NULL */
67       return array;
68     }
69
70   rc = ksba_cert_hash (cert, 0, HASH_FNC, md);
71   if (rc)
72     {
73       log_error ("ksba_cert_hash failed: %s\n", ksba_strerror (rc));
74       gcry_md_close (md);
75       memset (array, 0xff, len); /* better return an invalid fpr than NULL */
76       return array;
77     }
78   gcry_md_final (md);
79   memcpy (array, gcry_md_read(md, algo), len );
80   return array;
81 }
82
83
84 /* Return an allocated buffer with the formatted fungerprint */
85 char *
86 gpgsm_get_fingerprint_string (KsbaCert cert, int algo)
87 {
88   unsigned char digest[MAX_DIGEST_LEN];
89   char *buf;
90   int len, i;
91
92   if (!algo)
93     algo = GCRY_MD_SHA1;
94
95   len = gcry_md_get_algo_dlen (algo);
96   assert (len <= MAX_DIGEST_LEN );
97   gpgsm_get_fingerprint (cert, algo, digest, NULL);
98   buf = xmalloc (len*3+1);
99   *buf = 0;
100   for (i=0; i < len; i++ )
101     sprintf (buf+strlen(buf), i? ":%02X":"%02X", digest[i]);
102   return buf;
103 }
104