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