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