/[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 24 by twoaday, Sat Oct 8 10:43:08 2005 UTC revision 260 by twoaday, Wed Aug 16 10:01:30 2006 UTC
# Line 1  Line 1 
1  /* wptGPGME.cpp - WinPT GPGME interface  /* wptGPGME.cpp - WinPT GPGME interface
2   *      Copyright (C) 2001-2005 Timo Schulz   *      Copyright (C) 2001-2006 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  static char *gpg_secring = NULL;  /* 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;  
50    int
51      memset (&rcs, 0, sizeof rcs);  keycache_not_available (void)
52      rcs.kr_reload = rcs.kr_update = 1;  {
53      rcs.tr_update = 0;      return pub == NULL;
54      DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_KEYCACHE, dlg,                                          }
55                      keycache_dlg_proc, (LPARAM)&rcs);  
56  } /* keycache_reload */  /* Release both key cache objects. If @cleanup is 1,
57       also release other global structs. */
58  void  void
59  keycache_release (void)  keycache_release (int cleanup)
60  {  {
61      int n = gpgme_keycache_count (pub);      char tmpbuf[64];
62      char tmpbuf[64];      int n = gpg_keycache_get_size (pub);
63    
64      /* XXX: update the value when the cache has changed. */      /* XXX: update the value when the cache has changed. */
65      sprintf (tmpbuf, "%d", n);      sprintf (tmpbuf, "%d", n);
66      set_reg_key (HKEY_CURRENT_USER, "Software\\WinPT", "nKeys", tmpbuf);      set_reg_key (HKEY_CURRENT_USER, "Software\\WinPT", "nKeys", tmpbuf);
67    
68      if (pub) {      if (pub) {
69          gpgme_keycache_release (pub);          gpg_keycache_release (pub);
70          pub = NULL;          pub = NULL;
71      }      }
72      if (sec) {      if (sec) {
73          gpgme_keycache_release (sec);          gpg_keycache_release (sec);
74          sec = NULL;          sec = NULL;
75      }      }
76  } /* keycache_release */      if (cleanup)
77            safe_free (gpg_secring);
78    }
79  gpgme_error_t  
80  keycache_update (int is_sec, const char *keyid)  
81  {  /* Update the key with the keyid @keyid in the key cache.
82      gpgme_keycache_t ctx = pub;     If @is_sec is 1, the secret key cache is used. */
83      gpgme_error_t err;  gpgme_error_t
84    keycache_update (int is_sec, const char *keyid)
85      if (is_sec)  {
86          ctx = sec;      gpg_keycache_t ctx = pub;
87      err =  gpgme_keycache_update_key (ctx, is_sec, pub, keyid);      gpgme_error_t err;
88      if (is_sec)  
89          gpgme_keycache_prepare_single (ctx, keyid, NULL, gpg_secring);      if (is_sec)
90      return err;          ctx = sec;
91  }      err = gpg_keycache_update_key (ctx, is_sec, pub, keyid);
92        if (is_sec)
93  /* XXX: cache_keyring_names must be called then the GPG homedir changes! */          gpg_keycache_prepare_single (ctx, keyid, NULL, gpg_secring);
94        return err;
95  gpgme_error_t  }
96  keycache_init (const char *pubring, const char * secring)  
97  {  
98      struct progress_filter_s pfx;  /* Initialize both cache contexts. Use @pubring for the public
99      gpgme_error_t err;     keyring and @secring for the secret keyring. */
100      int val = 0;  gpgme_error_t
101      char * p;  keycache_init (const char *pubring, const char *secring)
102    {
103      if (secring != NULL) {      struct progress_filter_s pfx;
104          free_if_alloc (gpg_secring);      gpgme_error_t err;
105          gpg_secring = get_gnupg_keyring (0, NO_STRICT);      int val = 0;
106      }      char *p;
107    
108      if (reload) {      if (secring != NULL) {
109          keycache_release ();          free_if_alloc (gpg_secring);
110          reload = 0;          gpg_secring = get_gnupg_keyring (0, NO_STRICT);
111      }      }
112      p = get_reg_entry (HKEY_CURRENT_USER, "Software\\WinPT", "nKeys");      
113      if (p && *p != ' ') {      p = get_reg_entry (HKEY_CURRENT_USER, "Software\\WinPT", "nKeys");
114          val = atoi (p);      if (p && *p != ' ') {
115          free_if_alloc (p);          val = atoi (p);
116          memset (&pfx, 0, sizeof (pfx));          free_if_alloc (p);      
117      }      }
118    
119      err = gpgme_keycache_new (&pub);      memset (&pfx, 0, sizeof (pfx));
120      if (err)      keycache_release (0); /* Release old contexts first. */
121          return err;  
122      if (val != 0)      err = gpg_keycache_new (&pub);
123          gpgme_keycache_set_cb (pub, progress_callback, &pfx, val);      if (err)
124      err = gpgme_keycache_new (&sec);          return err;
125      if (!err)      if (val != 0)
126          err = gpgme_keycache_init (pub, NULL, 0);          gpg_keycache_set_cb (pub, progress_callback, &pfx, val);
127      if (!err)      err = gpg_keycache_new (&sec);
128          err = gpgme_keycache_init( sec, NULL, 1 );      if (!err)
129      if( !err && pubring && *pubring )          err = gpg_keycache_init (pub, NULL, 0);
130          err = gpgme_keycache_prepare( pub, pubring, NULL );      if (!err)
131      if( !err && secring && * secring )          err = gpg_keycache_init (sec, NULL, 1);
132          err = gpgme_keycache_prepare( sec, NULL, secring );      if (!err && pubring && *pubring)
133      if (!err)          err = gpg_keycache_prepare (pub, pubring, NULL);
134          gpgme_keycache_sync (pub, sec);      if (!err && secring && * secring)
135      if (val != 0)          err = gpg_keycache_prepare (sec, NULL, secring);
136          progress_cleanup (&pfx);      if (!err)
137      return err;          gpg_keycache_sync (pub, sec);
138  } /* keycache_init */      if (val != 0)
139            progress_cleanup (&pfx);
140        return err;
141  void  }
142  keycache_set_reload( int yes )  
143  {  
144      reload = yes;  /* Return the public cache context if @is_pub is set
145  } /* keycache_set_reload */     the secre cache context otherwise. */
146    gpg_keycache_t
147    keycache_get_ctx (int is_pub)
148  int  {
149  keycache_get_reload( void )      gpg_keycache_t ctx;
150  {  
151      return reload;      ctx = is_pub? pub : sec;
152  } /* keycache_get_reload */      if (!ctx)
153            BUG (0);
154        return ctx;
155  gpgme_keycache_t  }
156  keycache_get_ctx (int is_pub)  
157  {  
158      return is_pub? pub : sec;  /* Get the GPG key with keyid @keyid from the cache. Return it
159  } /* keycache_get_ctx */     in @r_key on success. */
160    static gpgme_error_t
161    get_key_from_cache (const char *keyid, int secret, gpgme_key_t *r_key,
162  static int                      struct keycache_s **c)
163  get_key (const char *keyid, gpgme_key_t *r_key, struct keycache_s **c, int secret)  {
164  {      gpg_keycache_t cache;
165      gpgme_keycache_t cache;      gpgme_error_t err;
166      gpgme_error_t err;      int mode = secret? KEYCACHE_PRV : KEYCACHE_PUB;
167      int mode = secret? KEYCACHE_PRV : KEYCACHE_PUB;  
168        if (!keyid)
169      if( !keyid )          return gpg_error (GPG_ERR_INV_VALUE);
170          return WPTERR_GENERAL;      if (r_key)
171      if( r_key )          *r_key = NULL;
172          *r_key = NULL;      cache = keycache_get_ctx (mode);
173      cache = keycache_get_ctx (mode);      if (!c)
174      if( !cache )          err = gpg_keycache_find_key (cache, keyid, 0, r_key);
175          BUG( NULL );      else
176      if (!c)          err = gpg_keycache_find_key2 (cache, keyid, 0, r_key, c);
177          err = gpgme_keycache_find_key( cache, keyid, 0, r_key );      return err;
178      else  }
179          err = gpgme_keycache_find_key2 (cache, keyid, 0, r_key, c);  
180      if( err )  
181          return WPTERR_GENERAL;  /* Release the internal key structure.
182      return 0;     If allocated is 0, assume fixed cache item. */
183  } /* get_key */  void
184    winpt_release_pubkey (winpt_key_s *k)
185    {
186  static int      /*log_box ("debug", 0, "alloc %d", k->allocated);*/
187  get_key2( const char * keyid, gpgme_key_t * r_key, int secret )      if (!k->allocated)
188  {          return;
189      gpg_iobuf_t inp;      gpg_keycache_item_release (k->ext);
190      char * p;      k->ext = NULL;
191      int rc;      k->allocated = 0;
192    }
193      p = get_gnupg_keyring (1, !NO_STRICT);  
194      if( !p )  
195          BUG( NULL );  /* Search the public key with @keyid as the keyid in the cache and
196       return the item in @k. */
197      inp = gpg_iobuf_open( p );  gpgme_error_t
198      if( !inp ) {  winpt_get_pubkey (const char *keyid, winpt_key_s *k)
199          const char *s = winpt_strerror( WPTERR_FILE_OPEN );  {
200          log_box( _("WinPT Error"), 0, "%s: %s", p, s );      gpgme_error_t err = gpg_error (GPG_ERR_NO_ERROR);
201          free_if_alloc( p );      
202          return NULL;      if (pub)
203      }          err = get_key_from_cache (keyid, 0, &k->ctx, &k->ext);
204      gpg_iobuf_ioctl( inp, 3, 1, NULL ); /* disable cache */      else
205      /*rc = gpgme_getkey_bykeyid( inp, keyid, r_key ); XXX */          err = gpg_keycache_fetch_key (keyid, 0, &k->ctx, &k->ext);
206      rc=0;      if (err)
207            return err;
208      gpg_iobuf_close( inp );      k->is_v3 = k->ctx->subkeys->pubkey_algo == GPGME_PK_RSA &&
209      free_if_alloc( p );                  strlen (k->ctx->subkeys->fpr) == 32;
210      return rc;      k->is_protected = k->ext->gloflags.is_protected;
211  } /* get_key2 */      k->keyid = k->ctx->subkeys->keyid+8;
212        k->uid = k->ext->uids->uid;
213        k->allocated = pub? 0 : 1;
214  int      return 0;
215  winpt_get_pubkey (const char *keyid, winpt_key_s *k)  }
216  {  
217      int rc;  
218        gpgme_error_t
219      rc = get_key (keyid, &k->ctx, &k->ext, 0);  winpt_get_seckey (const char *keyid, winpt_key_s *k)
220      if (rc)  {
221          return rc;      gpgme_error_t err;
222      k->is_v3 = k->ctx->subkeys->pubkey_algo == GPGME_PK_RSA && strlen (k->ctx->subkeys->fpr) == 32;  
223      k->is_protected = k->ext->gloflags.is_protected;      if (sec)
224      k->keyid = k->ctx->subkeys->keyid;          err = get_key_from_cache (keyid, 1, &k->ctx, &k->ext);
225      k->uid = k->ctx->uids->uid;      else
226      return rc;          err = gpg_keycache_fetch_key (keyid, 1, &k->ctx, &k->ext);
227  }      if (err)
228            return err;
229        k->is_v3 = k->ctx->subkeys->pubkey_algo == GPGME_PK_RSA &&
230  int                  strlen (k->ctx->subkeys->fpr) == 32;
231  winpt_get_seckey (const char *keyid, winpt_key_s *k)      k->is_protected = k->ext->gloflags.is_protected;
232  {      k->keyid = k->ctx->subkeys->keyid+8;
233      int rc;      k->uid = k->ext->uids->uid;
234      rc = get_key (keyid, &k->ctx, &k->ext, 1);      k->allocated = sec? 0 : 1;
235      if (rc)      return 0;
236          return rc;  }
237      k->is_v3 = k->ctx->subkeys->pubkey_algo == GPGME_PK_RSA && strlen (k->ctx->subkeys->fpr) == 32;  
238      k->is_protected = k->ext->gloflags.is_protected;  
239      k->keyid = k->ctx->subkeys->keyid;  gpgme_error_t
240      k->uid = k->ctx->uids->uid;  get_pubkey (const char *keyid, gpgme_key_t *ret_key)
241      return rc;  {
242  }      return get_key_from_cache (keyid, 0, ret_key, NULL);
243    }
244    
245  int  
246  get_pubkey (const char *keyid, gpgme_key_t *ret_key)  gpgme_error_t
247  {  get_seckey (const char *keyid, gpgme_key_t *ret_skey)
248      int rc = 0;  {
249        return get_key_from_cache (keyid, 1, ret_skey, NULL);
250      if (pub && sec)  }
251          rc = get_key (keyid, ret_key, NULL, 0);  
252      else  
253          rc = get_key2 (keyid, ret_key, 0);  
254      return rc;  /* Map the signature summary in @sum to signature status table index.
255  } /* get_pubkey */     Return value: index to table. */
256    static int
257    sigsum_to_index (gpgme_sigsum_t sum)
258  int  {
259  get_seckey( const char *keyid, gpgme_key_t *ret_skey )      /* xxx: gpgme should set _valid if the sig is good but the
260  {              key has been expired; check the code */
261      int rc = 0;      if ((sum & GPGME_SIGSUM_VALID) && (sum & GPGME_SIGSUM_SIG_EXPIRED))
262            return 8;
263      if( pub && sec )      if ((sum & GPGME_SIGSUM_VALID) && (sum & GPGME_SIGSUM_KEY_REVOKED))
264          rc = get_key( keyid, ret_skey, NULL, 1 );          return 7;
265      else      if ((sum & GPGME_SIGSUM_VALID) && (sum & GPGME_SIGSUM_KEY_EXPIRED))
266          rc = get_key2( keyid, ret_skey, 1 );          return 6;
267      return rc;      if (sum & GPGME_SIGSUM_GREEN)
268  } /* get_seckey */          return 1;
269        else if (sum & GPGME_SIGSUM_RED)
270            return 2;
271  int      else if (sum & GPGME_SIGSUM_KEY_MISSING)
272  count_insecure_elgkeys (void)          return 3;
273  {      return 0;
274      gpgme_keycache_t pc;  }
275      gpgme_key_t key;  
276      int n=0;  
277    /* Return a humand readable description for the signature status @sum. */
278      pc = keycache_get_ctx (1);  const char*
279      if (!pc)  get_gpg_sigstat (gpgme_sigsum_t sum)
280          BUG (0);  {
281      while (!gpgme_keycache_next_key (pc, 0, &key)) {      const char *gpg_sigstat[] = {
282          if (key->subkeys->pubkey_algo == GPGME_PK_ELG)          _("Error during verification process"),
283              n++;          _("The signature is good"),
284      }          _("The signature is BAD!"),
285      gpgme_keycache_rewind (pc);          _("The signature could not be checked due to a missing key"),
286      return n;          _("No valid OpenPGP signature"),
287  }          _("Signature Error"),
288            _("Good signature (Expired Key)"),
289            _("Good signature (Revoked Key)"),
290            _("Good signature (Expired)"),
291            NULL
292        };
293        const unsigned int mask = 9;
294    
295        return gpg_sigstat[sigsum_to_index (sum) % mask];
296    }
297    
298    
299    /* Return true if at least one secret key is available. */
300    bool
301    secret_key_available (void)
302    {
303        if (!sec || gpg_keycache_get_size (sec) == 0)
304            return false;
305        return true;
306    }
Legend:
Removed from v.24  
changed lines
  Added in v.260
[email protected]
 ViewVC Help
Powered by ViewVC 1.1.26