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