/[winpt]/trunk/Src/wptKeyserverDlg.cpp
ViewVC logotype

Diff of /trunk/Src/wptKeyserverDlg.cpp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 129 by twoaday, Fri Dec 30 13:56:10 2005 UTC revision 225 by twoaday, Tue Jun 6 13:37:59 2006 UTC
# Line 1  Line 1 
1  /* wptKeyserverDlg.cpp - Keyserver dialog  /* wptKeyserverDlg.cpp - Keyserver dialog
2   *      Copyright (C) 2000-2005 Timo Schulz   *      Copyright (C) 2000-2006 Timo Schulz
3   *      Copyright (C) 2005 g10 Code GmbH   *      Copyright (C) 2005, 2006 g10 Code GmbH
4   *   *
5   * This file is part of WinPT.   * This file is part of WinPT.
6   *   *
# Line 24  Line 24 
24    
25  #include <windows.h>  #include <windows.h>
26  #include <commctrl.h>  #include <commctrl.h>
27  #include <malloc.h>  #include <ctype.h>
28    
29  #include "resource.h"  #include "resource.h"
30  #include "wptKeyserver.h"  #include "wptKeyserver.h"
# Line 35  Line 35 
35  #include "wptW32API.h"  #include "wptW32API.h"
36  #include "wptVersion.h"  #include "wptVersion.h"
37  #include "wptGPG.h"  #include "wptGPG.h"
38  #include "wptKeyManager.h"  #include "wptGPGME.h"
39  #include "wptContext.h" /* for passphrase_s */  #include "wptContext.h" /* for passphrase_s */
40    #include "wptKeyManager.h"
41  #include "wptDlgs.h"  #include "wptDlgs.h"
42  #include "wptUTF8.h"  #include "wptUTF8.h"
43    
44    
 #define MAX_KEYSIZE 70000  
   
45  char* get_reg_entry_keyserver (const char *);  char* get_reg_entry_keyserver (const char *);
46  int set_reg_entry_keyserver (const char *, const char *);  int set_reg_entry_keyserver (const char *, const char *);
47    
48    /* Symbolic column IDs */
49    enum { KS_COL_NAME = 0, KS_COL_PORT };
50    
51    /* Callback context to modify (add, edit) keyserver items. */
52    struct keyserver_rec_s {
53        char name[200];     /* hostname */
54        int  proto;         /* protocol */
55        int  port;          /* used port */
56        bool mode;          /* true = edit */
57        bool cancel;
58    };
59    typedef struct keyserver_rec_s *keyserver_rec_t;
60    
61    
62  /* Print out keyserver error and a possible Winsock error. */  /* Print out keyserver error and a possible Winsock error. */
63  static void  static void
64  hkp_err_box (HWND dlg, const char *host, WORD port, int rc)  hkp_err_box (HWND dlg, const char *host, WORD port, int rc)
65  {  {
66      const char *err = kserver_strerror ();      const char *err = kserver_strerror ();
67        const char *ws_err = wsock_strerror ();
68      log_box (_("Keyserver"), MB_ERR, "%s:%d: %s",      
69               host, port, winpt_strerror (rc));      if (ws_err && strlen (ws_err) > 0)
70      if (err)          log_box (_("Keyserver"), MB_ERR, "%s:%d: %s", host, port, ws_err);
71          msg_box (dlg, err, wsock_strerror (), MB_ERR);      else
72            log_box (_("Keyserver"), MB_ERR, "%s:%d: %s\n%s",
73                     host, port, winpt_strerror (rc), err? err : "");
74  }  }
75    
76    
# Line 66  hkp_err_box (HWND dlg, const char *host, Line 80  hkp_err_box (HWND dlg, const char *host,
80  int  int
81  hkp_send_key (HWND dlg, const char *kserver, WORD port, const char *pattern)  hkp_send_key (HWND dlg, const char *kserver, WORD port, const char *pattern)
82  {  {
83      gpgme_ctx_t ctx;      GPGME *gpg;
     gpgme_data_t keydata;  
84      gpgme_error_t ec;      gpgme_error_t ec;
85      char *rawkey = NULL;      char *rawkey = NULL;
86      char msg[384];      char msg[256];
     size_t n;  
87            
88      ec = gpgme_new (&ctx);      gpg = new GPGME ();
89      if (ec)      gpg->setArmor (true);
90          BUG (NULL);      ec = gpg->exportToBuffer (pattern, &rawkey);
     gpgme_set_armor (ctx, 1);  
     ec = gpgme_data_new (&keydata);  
     if (ec)  
         BUG (NULL);  
     ec = gpgme_op_export (ctx, pattern, 0, keydata);  
91      if (ec) {      if (ec) {
92          msg_box (dlg, gpgme_strerror (ec), _("Export"), MB_ERR);          msg_box (dlg, gpgme_strerror (ec), _("Export"), MB_ERR);
93          goto leave;          goto leave;
94      }      }
95      rawkey = gpgme_data_release_and_get_mem (keydata, &n);      op_begin ();
96      ec = kserver_sendkey (kserver, port, rawkey, n);      ec = kserver_sendkey (kserver, port, rawkey, strlen (rawkey));
97        op_end ();
98      if (ec) {      if (ec) {
99          hkp_err_box (dlg, kserver, port, ec);          hkp_err_box (dlg, kserver, port, ec);
100          goto leave;          goto leave;
# Line 96  hkp_send_key (HWND dlg, const char *kser Line 104  hkp_send_key (HWND dlg, const char *kser
104      status_box (dlg, msg, _("GnuPG status"));      status_box (dlg, msg, _("GnuPG status"));
105            
106  leave:  leave:
107      gpgme_release (ctx);      delete gpg;
108      if (rawkey)      free_if_alloc (rawkey);
         gpgme_free (rawkey);  
109      return ec? -1 : 0;      return ec? -1 : 0;
110  }  }
111    
# Line 140  show_imported_keys (gpgme_import_result_ Line 147  show_imported_keys (gpgme_import_result_
147    
148      for (t=res->imports; t; t = t->next) {      for (t=res->imports; t; t = t->next) {
149          if (!gpgme_get_key (ctx, t->fpr, &key, 0)) {          if (!gpgme_get_key (ctx, t->fpr, &key, 0)) {
150              s = uid = utf8_to_wincp2 (key->uids->uid);              s = uid = utf8_to_native (key->uids->uid);
151              gpgme_data_write (msg, s, strlen (s));              gpgme_data_write (msg, s, strlen (s));
152              gpgme_data_write (msg, "\n", 1);              gpgme_data_write (msg, "\n", 1);
153              gpgme_key_release (key);              gpgme_key_release (key);
# Line 160  show_imported_keys (gpgme_import_result_ Line 167  show_imported_keys (gpgme_import_result_
167  /* Receive a key from the keyserver @kserver (port @port)  /* Receive a key from the keyserver @kserver (port @port)
168     with the pattern @pattern.     with the pattern @pattern.
169     Return value: 0 on success. */     Return value: 0 on success. */
170  int  static int
171  hkp_recv_key2 (HWND dlg, const char *kserver, WORD port,  keyserver_recv_key (HWND dlg, const char *kserver, WORD port,
172                 const char *pattern, int proto, int flags,                      const char *pattern, int proto, int flags,
173                 char **r_fpr)                      char **r_fpr)
174  {  {
175      gpgme_ctx_t ctx;      gpgme_ctx_t ctx = NULL;
176      gpgme_data_t keydata;      gpgme_data_t keydata = NULL;
177      gpgme_error_t ec;      gpgme_import_result_t import_res = NULL;
178      gpgme_import_result_t import_res = NULL;          gpgme_error_t err;
179      char *rawkey = NULL;      char *rawkey = NULL;
180        int keylen = 0;
181      int rc;      int rc;
182        
     /* XXX: implement dynamic buffers. */  
     rawkey = new char[MAX_KEYSIZE];  
     if (!rawkey)  
         BUG (0);  
     memset (rawkey, 0, MAX_KEYSIZE);  
183      if (proto == KSPROTO_LDAP) {      if (proto == KSPROTO_LDAP) {
184          rc = ldap_recvkey (kserver, pattern, rawkey, MAX_KEYSIZE-1);          rc = ldap_recvkey (kserver, pattern, &rawkey, &keylen);
185          if (rc) {          if (rc) {
186              msg_box (dlg, _("LDAP key import failed.\n"              msg_box (dlg, _("LDAP key import failed.\n"
187                              "Please make sure you have an online connection"                              "Please make sure you have an online connection"
# Line 189  hkp_recv_key2 (HWND dlg, const char *kse Line 192  hkp_recv_key2 (HWND dlg, const char *kse
192          }          }
193      }      }
194      else if (proto == KSPROTO_FINGER) {      else if (proto == KSPROTO_FINGER) {
195          rc = finger_recvkey (kserver, pattern, rawkey, MAX_KEYSIZE-1);          rc = finger_recvkey (kserver, pattern, &rawkey, &keylen);
196          if (rc) {          if (rc) {
197              log_box (_("Keyserver"), MB_ERR,              log_box (_("Keyserver"), MB_ERR,
198                       _("Finger key import failed: %s\n"), winpt_strerror (rc));                       _("Finger key import failed: %s\n"), winpt_strerror (rc));
# Line 199  hkp_recv_key2 (HWND dlg, const char *kse Line 202  hkp_recv_key2 (HWND dlg, const char *kse
202      }      }
203      else if ((rc = kserver_recvkey (kserver, port,      else if ((rc = kserver_recvkey (kserver, port,
204                                      kserver_check_keyid (pattern),                                      kserver_check_keyid (pattern),
205                                      rawkey, MAX_KEYSIZE-1))) {                                      &rawkey, &keylen))) {
206          hkp_err_box (dlg, kserver, port, rc);          hkp_err_box (dlg, kserver, port, rc);
207          free_if_alloc (rawkey);          free_if_alloc (rawkey);
208          return rc;          return rc;
209      }      }
210      else {  
211          if (!strstr (rawkey, "BEGIN PGP PUBLIC KEY BLOCK")) {      if (!strstr (rawkey, "BEGIN PGP PUBLIC KEY BLOCK")) {
212              msg_box (dlg, _("This is not a valid OpenPGP key."),          msg_box (dlg, _("This is not a valid OpenPGP key."),
213                       _("Keyserver"), MB_ERR);              _("Keyserver"), MB_ERR);
214              goto leave;          goto leave;
         }  
         ec = gpgme_new (&ctx);  
         if (ec)  
             BUG (NULL);  
         gpgme_data_new_from_mem (&keydata, rawkey, strlen (rawkey), 1);  
         rc = gpgme_op_import (ctx, keydata);  
         if (rc) {  
             msg_box (dlg, gpgme_strerror ((gpgme_error_t)rc), _("Import"), MB_ERR);  
             goto leave;  
         }  
         import_res = gpgme_op_import_result (ctx);  
         if (import_res && r_fpr)  
             *r_fpr = m_strdup (import_res->imports->fpr);  
215      }      }
216        if (gpgme_new (&ctx))
217            BUG (NULL);
218        gpgme_data_new_from_mem (&keydata, rawkey, strlen (rawkey), 1);
219        err = gpgme_op_import (ctx, keydata);
220        if (err) {
221            msg_box (dlg, gpgme_strerror (err), _("Import"), MB_ERR);
222            goto leave;
223        }
224        import_res = gpgme_op_import_result (ctx);
225        if (import_res && r_fpr)
226            *r_fpr = m_strdup (import_res->imports->fpr);
227            
228      /* if we use the refresh mode, a lot of keys will be fetched and thus only      /* if we use the refresh mode, a lot of keys will be fetched and thus only
229         a summarize at the end is presented and not for each key. */         a summarize at the end is presented and not for each key. */
# Line 243  leave: Line 244  leave:
244  }  }
245    
246    
247  /* Alias for hkp_recv_key2 but without the ability to return  /* Alias for keyserver_recv_key but without the ability to return
248     the fingerprint of the key. */     the fingerprint of the key. */
249  int  int
250  hkp_recv_key (HWND dlg, const char *kserver, WORD port,  hkp_recv_key (HWND dlg, const char *kserver, WORD port,
251                const char *pattern, int proto, int flags)                const char *pattern, int proto, int flags)
252  {  {
253      return hkp_recv_key2 (dlg, kserver, port, pattern, proto, flags, NULL);      return keyserver_recv_key (dlg, kserver, port, pattern,
254                                   proto, flags, NULL);
255  }  }
256    
257    int
258    hkp_recv_key2 (HWND dlg, const char *kserver, WORD port,
259                   const char *pattern, int proto, char **r_fpr)
260    {
261        return keyserver_recv_key (dlg, kserver, port, pattern,
262                                   proto, 0, r_fpr);
263    }
264    
 #define my_iskeychar(a) (((a) >='0' && (a) <= '9' ) || ((a) >= 'A' && (a) <= 'F'))  
265    
266    /* Check if the given pattern are either a valid
267       email address, a {long, short} keyid or a fingerprint.
268       Return 0 on success. */
269  static int  static int
270  check_pattern (const char *pattern)  check_pattern (const char *pattern)
271  {  {    
272      int rc = 1;      size_t i;
273        
274      /* Whitespace are not allowed! */      if (strchr (pattern, ' '))
275      if (strchr( pattern, ' ')) {          return WPTERR_GENERAL; /* do not allow white spaces. */
         rc = WPTERR_GENERAL;  
         goto leave;  
     }  
       
     if (((strstr (pattern, "0x")) && (strlen (pattern) == 10)) ||  
          (strstr(pattern, "0x")) && (strlen (pattern)  == 18)) {  
         rc = 0; /* Either long or short keyid */  
         goto leave;  
     }  
       
     if( (( my_iskeychar( pattern[0] )) && ( strlen( pattern )  == 8 ) )  
          || (my_iskeychar(pattern[0])) && ( strlen( pattern ) == 16) ) {  
         rc = 0;  
         goto leave;  
     }  
276            
277      if( ( strchr( pattern, '@' ) ) && ( strlen( pattern ) >= 3 ) ) {      if (strchr (pattern, '@') && strlen (pattern) >= 3 &&
278          rc = 0;          !check_email_address (pattern))
279          goto leave;          return 0;
280    
281        if (strstr (pattern, "0x"))
282            pattern += 2;
283        if (strlen (pattern) != 8 &&
284            strlen (pattern) != 16 &&
285            strlen (pattern) != 40)
286            return WPTERR_GENERAL;
287    
288        for (i=0; i < strlen (pattern); i++) {
289            if (!isxdigit (pattern[i]))
290                return WPTERR_GENERAL;
291      }      }
292            return 0;
293  leave:  }
     return rc;  
 } /* check_pattern */  
294    
295    
296  static void  /* Return human readable name for the proxy protocol. */
297  set_proxy (HWND dlg)  static const char*
298    name_from_proto (int proto)
299  {  {
300      char proxy[256];      const char *s;
301      int port = 0;  
302            switch (proto) {
303      strcpy (proxy, "HTTP proxy: ");      case PROXY_PROTO_NONE:      s = ""; break;
304      if (kserver_get_proxy (&port)) {      case PROXY_PROTO_HTTP:      s = "HTTP"; break;
305          char t[128];      case PROXY_PROTO_SOCKS5:    s = "SOCKS5"; break;
306          const char *http = kserver_get_proxy (&port);      default:                    s = "HTTP"; break;
         _snprintf (t, sizeof (t) - 1, "\"%s:%d\"", http, port);  
         strcat (proxy, t);  
307      }      }
308      else      return s;
309          strcat (proxy, "none");  }
     SetDlgItemText (dlg, IDC_KEYSERVER_PROXY, proxy);  
 } /* set_proxy */  
310    
311    
312  static int inline  static int inline
# Line 316  kserver_get_pos (listview_ctrl_t lv) Line 318  kserver_get_pos (listview_ctrl_t lv)
318  }  }
319    
320    
321  static u16 inline  static WORD inline
322  kserver_get_port (listview_ctrl_t lv)  kserver_get_port (listview_ctrl_t lv)
323  {  {
324      char buf[16];      char buf[16];
325    
326      listview_get_item_text (lv, kserver_get_pos (lv), 3, buf, 15);      listview_get_item_text (lv, kserver_get_pos (lv), KS_COL_PORT, buf, 15);
327      return (u16)strtoul (buf, NULL, 10);      return (WORD)strtoul (buf, NULL, 10);
328  }  }
329    
330    
331  static void  static void
332  load_default_ks (listview_ctrl_t lv)  set_default_ks (listview_ctrl_t lv)
333  {  {
334      char * p, buf[192];      char *p, buf[200];
335      int i;      int i;
336    
337      p = get_reg_entry_keyserver ("Default");      p = get_reg_entry_keyserver ("Default");
338      if (!p)      if (!p)
339          return;          return;
340      for( i = 0; i < listview_count_items( lv, 0 ); i++ ) {      for (i=0; i < listview_count_items (lv, 0); i++) {
341          listview_get_item_text( lv, i, 0, buf, sizeof (buf)-1 );          listview_get_item_text (lv, i, KS_COL_NAME, buf, sizeof (buf)-1);      
342          if( !strncmp( p, buf, strlen( p ) ) ) {          if (!stricmp (buf, p)) {        
343              listview_add_sub_item( lv, i, 2, "x" );              listview_select_one (lv, i);
344              break;              break;
345          }          }
346      }      }
347      free_if_alloc (p);      free_if_alloc (p);
348  } /* load_default_ks */  }
349    
350    
351    /* Save the selected keyserver from @lv as the default server. */
352  static int  static int
353  save_default_ks (listview_ctrl_t lv)  save_default_ks (listview_ctrl_t lv)
354  {  {
355      char buf[192], port[32];      char buf[192], port[32];
356      int idx, i;        int idx, i;  
357    
358      idx = listview_get_curr_pos( lv );      idx = listview_get_curr_pos (lv);
359      if( idx == -1 ) {      if (idx == -1) {
360          msg_box( NULL, _("Please select one of the servers."), _("Keyserver"), MB_ERR );          msg_box (NULL, _("Please select one of the servers."), _("Keyserver"), MB_ERR);
361          return -1;          return -1;
362      }      }
363      listview_get_item_text( lv, idx, 1, buf, sizeof (buf)-1 );      listview_get_item_text (lv, idx, KS_COL_NAME, buf, sizeof (buf)-1);
364      if( *buf != 'H' ) {      if (strnicmp (buf, "http", 4) && strnicmp (buf, "hkp", 3)) {
365          msg_box( NULL, _("Only HTTP keyserver can be used."), _("Keyserver"), MB_ERR );          msg_box (NULL, _("Only HTTP keyserver can be used."),
366                     _("Keyserver"), MB_ERR);
367          return -1;          return -1;
368      }      }
     for (i = 0; i < listview_count_items( lv, 0 ); i++)  
         listview_add_sub_item (lv, i, 2, "");  
     listview_add_sub_item (lv, idx, 2, "x");  
     listview_get_item_text (lv, idx, 0, buf, sizeof (buf)-1);  
369      set_reg_entry_keyserver ("Default", buf);      set_reg_entry_keyserver ("Default", buf);
370      i = kserver_get_port (lv);      i = kserver_get_port (lv);
371      sprintf (port, "%d", i);      sprintf (port, "%d", i);
372      set_reg_entry_keyserver ("Default_Port", port);      set_reg_entry_keyserver ("Default_Port", port);
373      keyserver_set_default (buf, (u16)i);      keyserver_set_default (buf, (WORD)i);
374      return 0;      return 0;
375  } /* save_default_ks */  }
376    
377    
378  int  int
379  keyserver_list_build (listview_ctrl_t *r_lv, HWND hwnd)  keyserver_list_build (listview_ctrl_t *r_lv, HWND hwnd)
380  {  {
381      struct listview_column_s keyserver[] = {      struct listview_column_s keyserver[] = {
382          {0, 160, (char *)_("DNS Name")},                  {0, 180, (char *)_("DNS Name")},
383          {1,  52, (char *)_("Protocol")},          {1,  55, (char *)_("Port")},
         {2,  46, (char *)_("Default")},  
         {3,  46, (char *)_("Port")},  
384          {0,   0, NULL}          {0,   0, NULL}
385      };      };
386        HICON ico[1];
387      listview_ctrl_t lv;      listview_ctrl_t lv;
388      char buf[32];      char buf[32];
389      int j;      int j;
390    
391      listview_new (&lv);          ico[0] = LoadIcon (glob_hinst, (LPCTSTR)IDI_COMPUTER);
392      lv->ctrl = hwnd;            listview_new (&lv, hwnd);    
393      for (j=0; keyserver[j].fieldname; j++)      for (j=0; keyserver[j].fieldname; j++)
394          listview_add_column (lv, &keyserver[j]);                  listview_add_column (lv, &keyserver[j]);
395        listview_set_image_list (lv, 16, 16, ico, 1);
396      for (j = 0; j<MAX_KEYSERVERS; j++) {      for (j = 0; j<MAX_KEYSERVERS; j++) {
397          if (!server[j].used)          if (!server[j].used)
398              continue;              continue;
399          listview_add_item (lv, " ");          listview_add_item_image (lv, " ", 0);
400          listview_add_sub_item (lv, 0, 0, server[j].name);          listview_add_sub_item (lv, 0, KS_COL_NAME, server[j].name);
         switch (server[j].proto) {  
         case KSPROTO_HTTP:  
             listview_add_sub_item( lv, 0, 1, "H" ); break;  
         case KSPROTO_LDAP:  
             listview_add_sub_item( lv, 0, 1, "L" ); break;  
         case KSPROTO_FINGER:  
             listview_add_sub_item( lv, 0, 1, "F" ); break;  
         }  
401          sprintf (buf, "%d", server[j].port);          sprintf (buf, "%d", server[j].port);
402          listview_add_sub_item (lv, 0, 3, buf);          listview_add_sub_item (lv, 0, KS_COL_PORT, buf);
403      }      }
     load_default_ks (lv);  
404      if (listview_count_items (lv, 0) == 0) {      if (listview_count_items (lv, 0) == 0) {
405          listview_add_item (lv, "");          listview_add_item (lv, "");
406          listview_add_sub_item (lv, 0, 0, DEF_HKP_KEYSERVER);          listview_add_sub_item (lv, 0, KS_COL_NAME, DEF_HKP_KEYSERVER);
         listview_add_sub_item (lv, 0, 1, "H");  
407      }      }
408      listview_set_ext_style (lv);      listview_set_ext_style (lv);
409      *r_lv = lv;      *r_lv = lv;
# Line 420  keyserver_list_build (listview_ctrl_t *r Line 411  keyserver_list_build (listview_ctrl_t *r
411  }  }
412    
413    
414    static void
415    keyserver_remove (listview_ctrl_t lv)
416    {
417        char name[100];
418        int pos = listview_get_curr_pos (lv);
419        int i;
420    
421        listview_get_item_text (lv, pos, KS_COL_NAME, name, sizeof (name)-1);
422        for (i=0; i < MAX_KEYSERVERS; i++) {
423            if (server[i].name && stricmp (server[i].name, name) == 0)
424                server[i].used = 0;
425        }
426        listview_del_item (lv, pos);
427    }
428    
429    
430    static void
431    keyserver_edit (listview_ctrl_t lv, keyserver_rec_t ctx)
432    {
433        char buf[16];
434        bool fnd = false;
435        int i;
436    
437        for (i=0; i < MAX_KEYSERVERS; i++) {
438            if (server[i].name && stricmp (server[i].name, ctx->name) == 0) {
439                fnd = true;
440                break;
441            }
442        }
443        if (!fnd)
444            return;
445        server[i].port = ctx->port;
446    
447        i = listview_get_curr_pos (lv);
448        sprintf (buf, "%d", ctx->port);
449        listview_add_sub_item (lv, i, KS_COL_NAME, ctx->name);
450        listview_add_sub_item (lv, i, KS_COL_PORT, buf);
451    }
452    
453    static void
454    keyserver_add (listview_ctrl_t lv, keyserver_rec_t ctx)
455    {
456        char buf[16];
457        bool fnd = false;
458        int i;
459    
460        for (i=0; i < MAX_KEYSERVERS; i++) {
461            if (server[i].used == 0) {
462                fnd = true;
463                break;
464            }
465        }
466        if (!fnd) {
467            msg_box (NULL, _("No space for new keyserver entry"),
468                     _("Keyserver"), MB_ERR);
469            return;
470        }
471        free_if_alloc (server[i].name);
472        server[i].name = m_strdup (ctx->name);
473        server[i].port = ctx->port;
474        server[i].proto = ctx->proto;
475        server[i].used = 1;
476    
477        sprintf (buf, "%d", ctx->port);
478        listview_add_item (lv, " ");
479        listview_add_sub_item (lv, 0, KS_COL_NAME, ctx->name);
480        listview_add_sub_item (lv, 0, KS_COL_PORT, buf);
481    }
482    
483    
484    static void
485    fill_keyserv_types (HWND dlg)
486    {
487        HWND h = GetDlgItem (dlg, IDC_KSERVADD_TYPES);
488        combox_add_string (h, _("HKP Keyserver"));
489        combox_add_string (h, _("LDAP Keyserver"));
490        combox_add_string (h, _("Finger Keyserver"));
491        SendMessage (h, CB_SETCURSEL, 0, 0);
492    }
493    
494    
495    /* Dialog box procedure for modify keyservers. */
496    BOOL CALLBACK
497    keyserver_modify_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
498    {
499        static keyserver_rec_t ctx;
500        char tmp[128];
501    
502        switch (msg) {
503        case WM_INITDIALOG:
504            fill_keyserv_types (dlg);
505            ctx = (keyserver_rec_t)lparam;
506            if (ctx->mode) {
507                SendDlgItemMessage (dlg, IDC_KSERVADD_TYPES, CB_SETCURSEL, ctx->proto, 0);
508                SetDlgItemText (dlg, IDC_KSERVADD_HOST, ctx->name);
509                SetDlgItemInt (dlg, IDC_KSERVADD_PORT, ctx->port, FALSE);
510                EnableWindow (GetDlgItem (dlg, IDC_KSERVADD_HOST), FALSE);
511                EnableWindow (GetDlgItem (dlg, IDC_KSERVADD_TYPES), FALSE);
512            }
513            else
514                SetDlgItemInt (dlg, IDC_KSERVADD_PORT, 11371, FALSE);      
515            SetWindowText (dlg, _("Edit Keyserver"));
516            SetDlgItemText (dlg, IDOK, _("&Add"));
517            SetDlgItemText (dlg, IDCANCEL, _("&Cancel"));
518            SetDlgItemText (dlg, IDC_KSERVADD_TYPEINF, _("Type:"));
519            SetDlgItemText (dlg, IDC_KSERVADD_PORTINF, _("Port:"));
520            SetDlgItemText (dlg, IDC_KSERVADD_HOSTINF, _("Host name:"));
521            SetForegroundWindow (dlg);
522            break;
523    
524        case WM_COMMAND:
525            switch (LOWORD (wparam)) {
526            case IDOK:
527                if (!GetDlgItemText (dlg, IDC_KSERVADD_HOST, tmp, sizeof (tmp)-1)) {
528                    msg_box (dlg, _("Please enter a host name"), _("Keyserver"), MB_ERR);
529                    return FALSE;
530                }      
531                ctx->port = GetDlgItemInt (dlg, IDC_KSERVADD_PORT, NULL, FALSE);
532                if (ctx->port > 65535) {
533                    msg_box (dlg, _("Invalid port, valid numbers are < 65535"), _("Keyserver"), MB_ERR);
534                    return FALSE;
535                }
536                ctx->proto = SendDlgItemMessage (dlg, IDC_KSERVADD_TYPES, CB_GETCURSEL, 0, 0);
537                ctx->cancel = false;
538                ctx->name[0] = '\0';
539                if (!strstr (tmp, "://")) {
540                    switch (ctx->proto) {
541                    case KSPROTO_HTTP: strcpy (ctx->name, "http://"); break;
542                    case KSPROTO_LDAP: strcpy (ctx->name, "ldap://"); break;
543                    case KSPROTO_FINGER:strcpy (ctx->name, "finger://"); break;
544                    }
545                }
546                strcat (ctx->name, tmp);
547                ctx->cancel = false;
548                EndDialog (dlg, TRUE);
549                break;
550    
551            case IDCANCEL:
552                ctx->cancel = true;
553                EndDialog (dlg, FALSE);
554                break;
555            }
556            break;
557        }
558    
559        return FALSE;
560    }
561    
562  /* Dialog box procedure to access keyservers. */  /* Dialog box procedure to access keyservers. */
563  BOOL CALLBACK  BOOL CALLBACK
564  keyserver_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)  keyserver_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
565  {  {
566      static listview_ctrl_t lv = NULL;      static listview_ctrl_t lv = NULL;
567      static int lv_idx = 0;      static int lv_idx = 0;
     static struct genkey_s *key;  
568      keyserver_ctx ksc;      keyserver_ctx ksc;
569        struct keyserver_rec_s edit;
570      char kserver[128], pattern[128];      char kserver[128], pattern[128];
571      char proto[16];      char proto[16], *fpr = NULL;
572      int rc, proto_nr = 0;      int rc, proto_nr = 0;
573            
574      switch (msg) {      switch (msg) {
575      case WM_INITDIALOG:      case WM_INITDIALOG:
         if (lparam != 0)  
             key = (struct genkey_s*)lparam;  
576          SetWindowText (dlg, _("Keyserver Access"));          SetWindowText (dlg, _("Keyserver Access"));
577          SetDlgItemText (dlg, IDC_KEYSERVER_RECV, _("&Receive"));          SetDlgItemText (dlg, IDC_KEYSERVER_RECV, _("&Receive"));
578          SetDlgItemText (dlg, IDC_KEYSERVER_SEND,          SetDlgItemText (dlg, IDC_KEYSERVER_SEND,
# Line 443  keyserver_dlg_proc (HWND dlg, UINT msg, Line 580  keyserver_dlg_proc (HWND dlg, UINT msg,
580          SetDlgItemText (dlg, IDC_KEYSERVER_INFO,          SetDlgItemText (dlg, IDC_KEYSERVER_INFO,
581                          _("Please enter the key ID or email address you search for"));                          _("Please enter the key ID or email address you search for"));
582          SetDlgItemText (dlg, IDC_KEYSERVER_INDEX, _("&Search"));          SetDlgItemText (dlg, IDC_KEYSERVER_INDEX, _("&Search"));
583          SetDlgItemText (dlg, IDC_KEYSERVER_PROXSETT, _("C&hange"));          SetDlgItemText (dlg, IDC_KEYSERVER_PROXSETT, _("C&hange proxy"));
584          SetDlgItemText (dlg, IDC_KEYSERVER_DEFAULT, _("Set &default"));          SetDlgItemText (dlg, IDC_KEYSERVER_DEFAULT, _("Set &default"));
585          SetDlgItemText (dlg, IDCANCEL, _("&Close"));          SetDlgItemText (dlg, IDCANCEL, _("&Close"));
586            
         set_proxy (dlg);  
587          keyserver_list_build (&lv, GetDlgItem (dlg, IDC_KEYSERVER_LIST));          keyserver_list_build (&lv, GetDlgItem (dlg, IDC_KEYSERVER_LIST));
588            set_default_ks (lv);
589          center_window (dlg, NULL);          center_window (dlg, NULL);
590          SetForegroundWindow (dlg);          SetForegroundWindow (dlg);
591          return TRUE;          return TRUE;
# Line 456  keyserver_dlg_proc (HWND dlg, UINT msg, Line 593  keyserver_dlg_proc (HWND dlg, UINT msg,
593      case WM_NOTIFY:      case WM_NOTIFY:
594          NMHDR *notify;          NMHDR *notify;
595          notify = (NMHDR *)lparam;          notify = (NMHDR *)lparam;
596          if (notify && notify->code == NM_CLICK          if (!notify)
597                break;
598            if (notify->code == NM_CLICK
599              && notify->idFrom == IDC_KEYSERVER_LIST)              && notify->idFrom == IDC_KEYSERVER_LIST)
600              lv_idx = listview_get_curr_pos (lv);              lv_idx = listview_get_curr_pos (lv);
601            else if (notify->code == NM_RCLICK &&
602                     notify->idFrom == IDC_KEYSERVER_LIST) {
603                POINT p;
604                GetCursorPos (&p);
605                HMENU hm, pop;
606                hm = LoadMenu (glob_hinst, (LPCTSTR)IDR_WINPT_KEYSERVER_CTX);
607                pop = GetSubMenu (hm, 0);
608                set_menu_text (pop, ID_KSERVCTX_ADD, _("&Add"));
609                set_menu_text (pop, ID_KSERVCTX_DEL, _("&Remove"));
610                set_menu_text (pop, ID_KSERVCTX_EDIT, _("&Edit"));
611                TrackPopupMenu (pop, 0, p.x, p.y, 0, dlg, NULL);
612                DestroyMenu (hm);
613                DestroyMenu (pop);
614            }
615            else if (notify->code == LVN_ITEMCHANGED &&
616                     ((LPNMLISTVIEW)lparam)->uNewState) {
617                listview_get_item_text (lv, listview_get_curr_pos (lv),
618                                        KS_COL_NAME, kserver, sizeof (kserver)-1);
619                if (!strnicmp (kserver, "ldap://", 7))
620                    EnableWindow (GetDlgItem (dlg, IDC_KEYSERVER_INDEX), FALSE);
621                else
622                    EnableWindow (GetDlgItem (dlg, IDC_KEYSERVER_INDEX), TRUE);
623            }
624          return TRUE;          return TRUE;
625                    
626      case WM_DESTROY:      case WM_DESTROY:
# Line 472  keyserver_dlg_proc (HWND dlg, UINT msg, Line 634  keyserver_dlg_proc (HWND dlg, UINT msg,
634      case WM_SYSCOMMAND:      case WM_SYSCOMMAND:
635          if (LOWORD (wparam) == SC_CLOSE)          if (LOWORD (wparam) == SC_CLOSE)
636              EndDialog (dlg, TRUE);              EndDialog (dlg, TRUE);
637          return FALSE;          return FALSE;  
638            
639      case WM_COMMAND:      case WM_COMMAND:
640          switch (LOWORD (wparam)) {          switch (LOWORD (wparam)) {
641          case IDC_KEYSERVER_PROXSETT:          case IDC_KEYSERVER_PROXSETT:
642              dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_KEYSERVER_PROXY,              dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_KEYSERVER_PROXY,
643                                dlg, keyserver_proxy_dlg_proc, NULL,                                dlg, keyserver_proxy_dlg_proc, 0,
644                                _("Proxy Settings"), IDS_WINPT_KEYSERVER_PROXY);                                _("Proxy Settings"), IDS_WINPT_KEYSERVER_PROXY);
             set_proxy (dlg);  
645              return TRUE;              return TRUE;
646                            
647          case IDC_KEYSERVER_INDEX:          case IDC_KEYSERVER_INDEX:
648              if (!lv_idx) {              if (!lv_idx)
649                  lv_idx = kserver_get_pos (lv);                  lv_idx = kserver_get_pos (lv);
650                  if (lv_idx == -1) {              
                     msg_box (dlg, _("Please select one of the keyservers."),  
                              _("Keyserver"), MB_INFO);  
                     return FALSE;  
                 }  
             }  
             listview_get_item_text (lv, lv_idx, 1, proto, sizeof (proto)-1);  
             if (*proto == 'L') {  
                 msg_box (dlg, _("This is not implemented yet!"),  
                          _("Keyserver"), MB_ERR);  
                 return FALSE;  
             }  
             listview_get_item_text (lv, lv_idx, 0, kserver, sizeof (kserver)-1);  
651              if (!GetDlgItemText (dlg, IDC_KEYSERVER_SEARCH, pattern, sizeof (pattern)-1)) {              if (!GetDlgItemText (dlg, IDC_KEYSERVER_SEARCH, pattern, sizeof (pattern)-1)) {
652                  msg_box (dlg, _("Please enter the search pattern."),                  msg_box (dlg, _("Please enter the search pattern."),
653                           _("Keyserver"), MB_INFO);                           _("Keyserver"), MB_INFO);
654                  return FALSE;                  return FALSE;
655              }              }
656              ksc.name = kserver;  
657                if (lv_idx != -1) {
658                    listview_get_item_text (lv, lv_idx, KS_COL_NAME,
659                                            kserver, sizeof (kserver)-1);
660                    ksc.name = kserver;
661                    ksc.port = kserver_get_port (lv);
662                }
663                else {
664                    ksc.name = DEF_HKP_KEYSERVER;
665                    ksc.port = HKP_PORT;
666                }
667              ksc.pattern = pattern;              ksc.pattern = pattern;
             ksc.port = kserver_get_port (lv);  
668              DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_HKPSEARCH, dlg,              DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_HKPSEARCH, dlg,
669                              hkpsearch_dlg_proc, (LPARAM) &ksc);                              hkpsearch_dlg_proc, (LPARAM) &ksc);
670              return TRUE;              return TRUE;
# Line 521  keyserver_dlg_proc (HWND dlg, UINT msg, Line 679  keyserver_dlg_proc (HWND dlg, UINT msg,
679                      return FALSE;                      return FALSE;
680                  }                  }
681              }              }
682              listview_get_item_text( lv, lv_idx, 1, proto, sizeof (proto)-1 );              listview_get_item_text (lv, lv_idx, KS_COL_NAME,
683                                        proto, sizeof (proto)-1);
684              proto_nr = KSPROTO_HTTP;              proto_nr = KSPROTO_HTTP;
685              if (*proto == 'L')              if (!strnicmp  (proto, "ldap", 4))
686                  proto_nr = KSPROTO_LDAP;                  proto_nr = KSPROTO_LDAP;
687              else if (*proto == 'F')              else if (!strnicmp (proto, "finger", 6))
688                  proto_nr = KSPROTO_FINGER;                  proto_nr = KSPROTO_FINGER;
689              listview_get_item_text (lv, lv_idx, 0, kserver, sizeof (kserver)-1);              listview_get_item_text (lv, lv_idx, KS_COL_NAME,
690              if( !GetDlgItemText( dlg, IDC_KEYSERVER_SEARCH, pattern, sizeof (pattern)-1)) {                                      kserver, sizeof (kserver)-1);
691                if (!GetDlgItemText(dlg, IDC_KEYSERVER_SEARCH,
692                                    pattern, sizeof (pattern)-1)) {
693                  msg_box (dlg, _("Please enter the search pattern."),                  msg_box (dlg, _("Please enter the search pattern."),
694                           _("Keyserver"), MB_INFO);                           _("Keyserver"), MB_INFO);
695                  return FALSE;                  return FALSE;
696              }              }
697              if (proto_nr == KSPROTO_LDAP && strchr (pattern, '@')) {              if (proto_nr == KSPROTO_LDAP && strchr (pattern, '@')) {
698                  msg_box (dlg, _("Only keyids are allowed."), _("LDAP Keyserver"), MB_INFO);                  msg_box (dlg, _("Only keyids are allowed."),
699                             _("Keyserver"), MB_INFO);
700                  return FALSE;                  return FALSE;
701              }              }
702              else if (proto_nr == KSPROTO_FINGER) {              else if (proto_nr == KSPROTO_FINGER) {
703                  if (strchr (pattern, '@') || strchr (pattern, ' ')) {                  if (strchr (pattern, '@') || strchr (pattern, ' ')) {
704                      msg_box (dlg, _("Only enter the name of the user."),                      msg_box (dlg, _("Only enter the name of the user."),
705                               _("FINGER Keyserver"), MB_INFO);                               _("Keyserver"), MB_INFO);
706                      return FALSE;                      return FALSE;
707                  }                  }
708              }              }
709              else if (check_pattern (pattern)) {              else if (check_pattern (pattern)) {
710                  msg_box (dlg, _("Only email addresses or keyids are allowed."),                  msg_box (dlg, _("Only email addresses or keyids are allowed."),
711                          _("HKP Keyserver"), MB_INFO);                          _("Keyserver"), MB_INFO);
712                  return FALSE;                  return FALSE;
713              }              }
714              rc = hkp_recv_key2 (dlg, kserver, kserver_get_port (lv),              rc = keyserver_recv_key (dlg, kserver, kserver_get_port (lv),
715                                  pattern, proto_nr, 0, key? &key->fpr : NULL);                                       pattern, proto_nr, 0,
716              if (!rc && key->fpr != NULL) {                                       &fpr);
717                  keycache_update (0, key->fpr);              if (!rc && fpr != NULL) {
718                  get_pubkey (key->fpr, &key->newkey);                  keycache_update (0, fpr);
719                  /* we do not need the fingerprint any longer. */                  free_if_alloc (fpr);
                 free_if_alloc (key->fpr);  
720              }              }
721              return TRUE;              return TRUE;
722    
723          case IDC_KEYSERVER_DEFAULT:          case IDC_KEYSERVER_DEFAULT:
724              save_default_ks (lv);              save_default_ks (lv);
725              break;              break;
726    
727            case ID_KSERVCTX_ADD:
728                memset (&edit, 0, sizeof (edit));
729                edit.mode = false;
730                dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_KEYSERVER_ADD, dlg,
731                                    keyserver_modify_dlg_proc,
732                                    (LPARAM)&edit, _("Edit Keyserver"), 0);
733                if (!edit.cancel)
734                    keyserver_add (lv, &edit);
735                return TRUE;
736    
737            case ID_KSERVCTX_EDIT:
738                memset (&edit, 0, sizeof (edit));
739                edit.mode = true;
740                listview_get_item_text (lv, lv_idx, KS_COL_NAME,
741                                        edit.name, sizeof (edit.name)-1);
742                listview_get_item_text (lv, lv_idx, KS_COL_PORT, pattern, 32);
743                edit.port = atoi (pattern);
744                if (!strnicmp (edit.name, "hkp", 3) || !strnicmp (edit.name, "http", 4))
745                    edit.proto = KSPROTO_HTTP;
746                else if (!strnicmp (edit.name, "ldap", 4))
747                    edit.proto = KSPROTO_LDAP;
748                else
749                    edit.proto = KSPROTO_FINGER;
750                dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_KEYSERVER_ADD, dlg,
751                                    keyserver_modify_dlg_proc,
752                                    (LPARAM)&edit, _("Edit Keyserver"), 0);
753                if (!edit.cancel)
754                    keyserver_edit (lv, &edit);
755                break;
756    
757            case ID_KSERVCTX_DEL:
758                keyserver_remove (lv);
759                return TRUE;
760                            
761          case IDCANCEL:          case IDCANCEL:
762              EndDialog (dlg, FALSE);              EndDialog (dlg, FALSE);
Legend:
Removed from v.129  
changed lines
  Added in v.225
[email protected]
 ViewVC Help
Powered by ViewVC 1.1.26