/[winpt]/trunk/Src/wptGPGME.cpp
ViewVC logotype

Diff of /trunk/Src/wptGPGME.cpp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 19 by twoaday, Fri May 20 08:39:15 2005 UTC revision 212 by twoaday, Tue May 9 10:29:07 2006 UTC
# Line 1  Line 1 
1  /* wptGPGME.cpp - WinPT GPGME interface  /* wptGPGME.cpp - WinPT GPGME interface
2   *      Copyright (C) 2001-2004 Timo Schulz   *      Copyright (C) 2001-2005 Timo Schulz
3   *   *
4   * This file is part of WinPT.   * This file is part of WinPT.
5   *   *
6   * WinPT is free software; you can redistribute it and/or   * WinPT is free software; you can redistribute it and/or
7   * modify it under the terms of the GNU General Public License   * modify it under the terms of the GNU General Public License
8   * as published by the Free Software Foundation; either version 2   * as published by the Free Software Foundation; either version 2
9   * of the License, or (at your option) any later version.   * of the License, or (at your option) any later version.
10   *     *  
11   * WinPT is distributed in the hope that it will be useful,   * WinPT is distributed in the hope that it will be useful,
12   * but WITHOUT ANY WARRANTY; without even the implied warranty of   * but WITHOUT ANY WARRANTY; without even the implied warranty of
13   * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU   * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14   * General Public License for more details.   * General Public License for more details.
15   *   *
16   * You should have received a copy of the GNU General Public License   * You should have received a copy of the GNU General Public License
17   * along with WinPT; if not, write to the Free Software Foundation,   * along with WinPT; if not, write to the Free Software Foundation,
18   * Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA   * Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
19   */   */
20    #ifdef HAVE_CONFIG_H
21  #include <sys/types.h>  #include <config.h>
22  #include <windows.h>  #endif
23    
24  #include "../resource.h"  #include <sys/types.h>
25  #include "wptNLS.h"  #include <windows.h>
26  #include "wptGPG.h"  
27  #include "wptErrors.h"  #include "resource.h"
28  #include "wptTypes.h"  #include "wptNLS.h"
29  #include "wptW32API.h"  #include "wptGPG.h"
30  #include "wptVersion.h"  #include "wptErrors.h"
31  #include "wptCommonCtl.h"  #include "wptTypes.h"
32  #include "wptContext.h"  #include "wptW32API.h"
33  #include "wptRegistry.h"  #include "wptVersion.h"
34  #include "wptDlgs.h"  #include "wptCommonCtl.h"
35    #include "wptContext.h"
36  #include "openpgp.h"  #include "wptRegistry.h"
37    #include "wptDlgs.h"
38  BOOL CALLBACK  keycache_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam);  
39  void progress_cleanup (progress_filter_s * pfx);  #include "openpgp.h"
40    
41  static gpgme_keycache_t pub = NULL;  BOOL CALLBACK  keycache_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam);
42  static gpgme_keycache_t sec = NULL;  void progress_cleanup (progress_filter_s * pfx);
43  static unsigned int reload = 0;  
44    /* Global GPG key cache contexts. */
45    static gpg_keycache_t pub = NULL;
46  void  static gpg_keycache_t sec = NULL;
47  keycache_reload (HWND dlg)  static char *gpg_secring = NULL;
48  {        
49      refresh_cache_s rcs = {0};  
50    /* Reload the key cache. */
51      rcs.kr_reload = rcs.kr_update = 1;  void
52      rcs.tr_update = 1;  keycache_reload (HWND dlg)
53      DialogBoxParam( glob_hinst, (LPCSTR)IDD_WINPT_KEYCACHE, dlg,                                          {      
54                      keycache_dlg_proc, (LPARAM)&rcs );      refresh_cache_s rcs;
55  } /* keycache_reload */  
56        memset (&rcs, 0, sizeof rcs);
57  void      rcs.kr_reload = rcs.kr_update = 1;
58  keycache_release (void)      rcs.tr_update = 0;
59  {      DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_KEYCACHE, dlg,                                        
60      int n = gpgme_keycache_count (pub);                      keycache_dlg_proc, (LPARAM)&rcs);
61      char tmpbuf[64];  }
62    
63      sprintf (tmpbuf, "%d", n);  
64      set_reg_key (HKEY_CURRENT_USER, "Software\\WinPT", "nKeys", tmpbuf);  /* Release both key cache objects. If @cleanup is 1,
65       also release other global structs. */
66      if (pub) {  void
67          gpgme_keycache_release( pub );  keycache_release (int cleanup)
68          pub = NULL;  {
69      }      int n = gpg_keycache_get_size (pub);
70      if (sec) {      char tmpbuf[64];
71          gpgme_keycache_release( sec );  
72          sec = NULL;      /* XXX: update the value when the cache has changed. */
73      }      sprintf (tmpbuf, "%d", n);
74  } /* keycache_release */      set_reg_key (HKEY_CURRENT_USER, "Software\\WinPT", "nKeys", tmpbuf);
75    
76        if (pub) {
77  gpgme_error_t          gpg_keycache_release (pub);
78  keycache_update (const char *keyid)          pub = NULL;
79  {      }
80      return gpgme_keycache_update_key (pub, keyid);      if (sec) {
81  }          gpg_keycache_release (sec);
82            sec = NULL;
83        }
84  gpgme_error_t      if (cleanup)
85  keycache_init (const char *pubring, const char * secring)          safe_free (gpg_secring);
86  {  }
87      struct progress_filter_s pfx;  
88      gpgme_error_t err;  
89      int val = 0;  /* Update the key with the keyid @keyid in the key cache.
90      char * p;     If @is_sec is 1, the secret key cache is used. */
91    gpgme_error_t
92      if (reload) {  keycache_update (int is_sec, const char *keyid)
93          keycache_release ();  {
94          reload = 0;      gpg_keycache_t ctx = pub;
95      }      gpgme_error_t err;
96      p = get_reg_entry (HKEY_CURRENT_USER, "Software\\WinPT", "nKeys");  
97      if (p && *p != ' ') {      if (is_sec)
98          val = atoi (p);          ctx = sec;
99          free_if_alloc (p);      err = gpg_keycache_update_key (ctx, is_sec, pub, keyid);
100          memset (&pfx, 0, sizeof pfx);      if (is_sec)
101      }          gpg_keycache_prepare_single (ctx, keyid, NULL, gpg_secring);
102        return err;
103      err = gpgme_keycache_new (&pub);  }
104      if (err)  
105          return err;  
106      if (val != 0)  /* Initialize both cache contexts. Use @pubring for the public
107          gpgme_keycache_set_cb (pub, progress_callback, &pfx, val);     keyring and @secring for the secret keyring. */
108      err = gpgme_keycache_new (&sec);  gpgme_error_t
109      if (!err)  keycache_init (const char *pubring, const char *secring)
110          err = gpgme_keycache_init (pub, NULL, 0);  {
111      if (!err)      struct progress_filter_s pfx;
112          err = gpgme_keycache_init( sec, NULL, 1 );      gpgme_error_t err;
113      if( !err && pubring && *pubring )      int val = 0;
114          err = gpgme_keycache_prepare( pub, pubring, NULL );      char *p;
115      if( !err && secring && * secring )  
116          err = gpgme_keycache_prepare( sec, NULL, secring );      if (secring != NULL) {
117      if (!err)          free_if_alloc (gpg_secring);
118          gpgme_keycache_sync (pub, sec);          gpg_secring = get_gnupg_keyring (0, NO_STRICT);
119      if (val != 0)      }
120          progress_cleanup (&pfx);      
121      return err;      p = get_reg_entry (HKEY_CURRENT_USER, "Software\\WinPT", "nKeys");
122  } /* keycache_init */      if (p && *p != ' ') {
123            val = atoi (p);
124            free_if_alloc (p);      
125  void      }
126  keycache_set_reload( int yes )  
127  {      memset (&pfx, 0, sizeof (pfx));
128      reload = yes;      /* Release old contexts first. */
129  } /* keycache_set_reload */      keycache_release (0);
130    
131        err = gpg_keycache_new (&pub);
132  int      if (err)
133  keycache_get_reload( void )          return err;
134  {      if (val != 0)
135      return reload;          gpg_keycache_set_cb (pub, progress_callback, &pfx, val);
136  } /* keycache_get_reload */      err = gpg_keycache_new (&sec);
137        if (!err)
138            err = gpg_keycache_init (pub, NULL, 0);
139  gpgme_keycache_t      if (!err)
140  keycache_get_ctx( int is_pub )          err = gpg_keycache_init (sec, NULL, 1);
141  {      if (!err && pubring && *pubring)
142      return is_pub? pub : sec;          err = gpg_keycache_prepare (pub, pubring, NULL);
143  } /* keycache_get_ctx */      if (!err && secring && * secring)
144            err = gpg_keycache_prepare (sec, NULL, secring);
145        if (!err)
146  static int          gpg_keycache_sync (pub, sec);
147  get_key( const char *keyid, gpgme_key_t *r_key, int secret )      if (val != 0)
148  {          progress_cleanup (&pfx);
149      gpgme_keycache_t cache;      return err;
150      gpgme_error_t err;  }
151      int mode = secret? KEYCACHE_PRV : KEYCACHE_PUB;  
152    
153      if( !keyid )  /* Return the public cache context if @is_pub is set
154          return WPTERR_GENERAL;     the secre cache context otherwise. */
155      if( r_key )  gpg_keycache_t
156          *r_key = NULL;  keycache_get_ctx (int is_pub)
157      cache = keycache_get_ctx( mode );  {
158      if( !cache )      gpg_keycache_t ctx;
159          BUG( NULL );  
160      err = gpgme_keycache_find_key( cache, keyid, 0, r_key );      ctx = is_pub? pub : sec;
161      if( err )      if (!ctx)
162          return WPTERR_GENERAL;          BUG (0);
163      return 0;      return ctx;
164  } /* get_key */  }
165    
166    
167  static int  /* Get the GPG key with keyid @keyid from the cache. Return it
168  get_key2( const char * keyid, gpgme_key_t * r_key, int secret )     in @r_key on success. */
169  {  static gpgme_error_t
170      gpg_iobuf_t inp;  get_key_from_cache (const char *keyid, gpgme_key_t *r_key,
171      char * p;                      struct keycache_s **c, int secret)
172      int rc;  {
173        gpg_keycache_t cache;
174      p = get_gnupg_keyring (1, !NO_STRICT);      gpgme_error_t err;
175      if( !p )      int mode = secret? KEYCACHE_PRV : KEYCACHE_PUB;
176          BUG( NULL );  
177        if (!keyid)
178      inp = gpg_iobuf_open( p );          return gpg_error (GPG_ERR_INV_VALUE);
179      if( !inp ) {      if (r_key)
180          const char *s = winpt_strerror( WPTERR_FILE_OPEN );          *r_key = NULL;
181          log_box( _("WinPT Error"), 0, "%s: %s", p, s );      cache = keycache_get_ctx (mode);
182          free_if_alloc( p );      if (!c)
183          return NULL;          err = gpg_keycache_find_key (cache, keyid, 0, r_key);
184      }      else
185      gpg_iobuf_ioctl( inp, 3, 1, NULL ); /* disable cache */          err = gpg_keycache_find_key2 (cache, keyid, 0, r_key, c);
186      rc = gpgme_getkey_bykeyid( inp, keyid, r_key );      return err;
187    }
188      gpg_iobuf_close( inp );  
189      free_if_alloc( p );  
190      return rc;  /* Get GPG key with keyid @keyid directly from GPG and return
191  } /* get_key2 */     it in @r_key on success. */
192    static gpgme_error_t
193    get_key_directly (const char *keyid, gpgme_key_t *r_key, int secret)
194  int  {
195  get_pubkey( const char *keyid, gpgme_key_t *ret_key )      gpgme_ctx_t ctx;
196  {      gpgme_error_t err;
197      int rc = 0;  
198        err = gpgme_new (&ctx);
199      if( pub && sec )      if (err)
200          rc = get_key( keyid, ret_key, 0 );          return err;
201      else      err = gpgme_get_key (ctx, keyid, r_key, secret);
202          rc = get_key2( keyid, ret_key, 0 );      gpgme_release (ctx);
203      return rc;      return err;
204  } /* get_pubkey */  }
205    
206    
207  int  /* Search the public key with @keyid as the keyid in the cache and
208  get_seckey( const char *keyid, gpgme_key_t *ret_skey )     return the item in @k. */
209  {  gpgme_error_t
210      int rc = 0;  winpt_get_pubkey (const char *keyid, winpt_key_s *k)
211    {
212      if( pub && sec )      gpgme_error_t err;
213          rc = get_key( keyid, ret_skey, 1 );      
214      else      err = get_key_from_cache (keyid, &k->ctx, &k->ext, 0);
215          rc = get_key2( keyid, ret_skey, 1 );      if (err)
216      return rc;          return err;
217  } /* get_seckey */      k->is_v3 = k->ctx->subkeys->pubkey_algo == GPGME_PK_RSA &&
218                    strlen (k->ctx->subkeys->fpr) == 32;
219        k->is_protected = k->ext->gloflags.is_protected;
220  int      k->keyid = k->ctx->subkeys->keyid+8;
221  count_insecure_elgkeys (void)      k->uid = k->ext->uids->uid;
222  {      return 0;
223      gpgme_keycache_t pc;  }
224      gpgme_key_t key;  
225      int n=0;  
226    gpgme_error_t
227      pc = keycache_get_ctx (1);  winpt_get_seckey (const char *keyid, winpt_key_s *k)
228      if (!pc)  {
229          BUG (0);      gpgme_error_t err;
230      while (!gpgme_keycache_next_key (pc, 0, &key)) {  
231          if (gpgme_key_get_ulong_attr (key, GPGME_ATTR_ALGO, NULL, 0)      err = get_key_from_cache (keyid, &k->ctx, &k->ext, 1);
232              == GPGME_PK_ELG_ES)      if (err)
233              n++;          return err;
234      }      k->is_v3 = k->ctx->subkeys->pubkey_algo == GPGME_PK_RSA &&
235      gpgme_keycache_rewind (pc);                  strlen (k->ctx->subkeys->fpr) == 32;
236      return n;      k->is_protected = k->ext->gloflags.is_protected;
237  }      k->keyid = k->ctx->subkeys->keyid+8;
238        k->uid = k->ext->uids->uid;
239        return 0;
240    }
241    
242    
243    gpgme_error_t
244    get_pubkey (const char *keyid, gpgme_key_t *ret_key)
245    {
246        gpgme_error_t rc;
247    
248        if (pub && sec)
249            rc = get_key_from_cache (keyid, ret_key, NULL, 0);
250        else
251            rc = get_key_directly (keyid, ret_key, 0);
252        return rc;
253    }
254    
255    
256    gpgme_error_t
257    get_seckey (const char *keyid, gpgme_key_t *ret_skey)
258    {
259        gpgme_error_t rc;
260    
261        if (pub && sec)
262            rc = get_key_from_cache (keyid, ret_skey, NULL, 1);
263        else
264            rc = get_key_directly (keyid, ret_skey, 1);
265        return rc;
266    }
267    
268    
269    /* Search for insecure ElGamal keys and return the
270       number of founded keys. */
271    int
272    count_insecure_elgkeys (void)
273    {
274        gpg_keycache_t pc;
275        gpgme_key_t key;
276        int n=0;
277    
278        pc = keycache_get_ctx (1);
279        while (!gpg_keycache_next_key (pc, 0, &key)) {
280            if (key->subkeys->pubkey_algo == GPGME_PK_ELG)
281                n++;
282        }
283        gpg_keycache_rewind (pc);
284        return n;
285    }
286    
287    
288    
289    /* Map the signature summary in @sum to signature status table index.
290       Return value: index to table. */
291    static int
292    sigsum_to_index (gpgme_sigsum_t sum)
293    {
294        if ((sum & GPGME_SIGSUM_VALID) && (sum & GPGME_SIGSUM_KEY_REVOKED))
295            return 7;
296        if ((sum & GPGME_SIGSUM_VALID) && (sum & GPGME_SIGSUM_SIG_EXPIRED))
297            return 6;
298        if (sum & GPGME_SIGSUM_GREEN)
299            return 1;
300        else if (sum & GPGME_SIGSUM_RED)
301            return 2;
302        else if (sum & GPGME_SIGSUM_KEY_MISSING)
303            return 3;
304        return 0;
305    }
306    
307    
308    /* Return a humand readable description for the signature status @sum. */
309    const char*
310    get_gpg_sigstat (gpgme_sigsum_t sum)
311    {
312        const char *gpg_sigstat[] = {
313            _("Error during verification process."),
314            _("The signature is good."),
315            _("The signature is BAD!"),
316            _("The signature could not be checked due to a missing key."),
317            _("No valid OpenPGP signature."),
318            _("Signature Error"),
319            _("Good Signature (Expired Key)"),
320            _("Good Signature (Revoked Key)"),
321            NULL
322        };
323        const unsigned int mask = 8;
324    
325        return gpg_sigstat[sigsum_to_index (sum) % mask];
326    }
327    
328    
329    /* Check if the secret keyring contains at least one
330       key with ultimate trust.
331       Return value: 0 on success. */
332    int
333    check_ultimate_trusted_key (void)
334    {
335        struct keycache_s *n;
336    
337        for (n = sec->item; n; n = n->next) {
338            if (n->pubpart &&
339                n->pubpart->key->owner_trust == GPGME_VALIDITY_ULTIMATE)
340            return 0;
341        }
342        return -1;
343    }
Legend:
Removed from v.19  
changed lines
  Added in v.212
[email protected]
 ViewVC Help
Powered by ViewVC 1.1.26