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