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