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