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