/[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 195 by twoaday, Mon Apr 3 17:10:47 2006 UTC revision 248 by twoaday, Fri Jul 28 11:11:09 2006 UTC
# Line 1  Line 1 
1  /* wptKeyserverDlg.cpp - Keyserver dialog  /* wptKeyserverDlg.cpp - Keyserver dialog
2   *      Copyright (C) 2000-2006 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 36  Line 36 
36  #include "wptVersion.h"  #include "wptVersion.h"
37  #include "wptGPG.h"  #include "wptGPG.h"
38  #include "wptGPGME.h"  #include "wptGPGME.h"
 #include "wptKeyManager.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    
 #define MAX_KEYSIZE 80000  
44    
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 };  enum { KS_COL_NAME = 0, KS_COL_PORT };
50    
51  /* Callback context to modify (add, edit) keyserver items. */  /* Callback context to modify (add, edit) keyserver items. */
# Line 58  struct keyserver_rec_s { Line 58  struct keyserver_rec_s {
58  };  };
59  typedef struct keyserver_rec_s *keyserver_rec_t;  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 80  hkp_send_key (HWND dlg, const char *kser Line 83  hkp_send_key (HWND dlg, const char *kser
83      GPGME *gpg;      GPGME *gpg;
84      gpgme_error_t ec;      gpgme_error_t ec;
85      char *rawkey = NULL;      char *rawkey = NULL;
86      char msg[384];      char msg[256];
87            
88      gpg = new GPGME ();      gpg = new GPGME ();
89      gpg->setArmor (true);      gpg->setArmor (true);
# Line 169  keyserver_recv_key (HWND dlg, const char Line 172  keyserver_recv_key (HWND dlg, const char
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 193  keyserver_recv_key (HWND dlg, const char Line 192  keyserver_recv_key (HWND dlg, const char
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 203  keyserver_recv_key (HWND dlg, const char Line 202  keyserver_recv_key (HWND dlg, const char
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 240  keyserver_recv_key (HWND dlg, const char Line 237  keyserver_recv_key (HWND dlg, const char
237    
238  leave:  leave:
239      free_if_alloc (rawkey);      free_if_alloc (rawkey);
240      gpgme_release (ctx);      if (ctx != NULL)
241      gpgme_data_release (keydata);          gpgme_release (ctx);
242        if (keydata != NULL)
243            gpgme_data_release (keydata);
244      return rc;      return rc;
245  }  }
246    
# Line 261  int Line 259  int
259  hkp_recv_key2 (HWND dlg, const char *kserver, WORD port,  hkp_recv_key2 (HWND dlg, const char *kserver, WORD port,
260                 const char *pattern, int proto, char **r_fpr)                 const char *pattern, int proto, char **r_fpr)
261  {  {
262      return keyserver_recv_key (dlg, kserver, port, pattern, proto, 0,      return keyserver_recv_key (dlg, kserver, port, pattern,
263                                 r_fpr);                                 proto, 0, r_fpr);
264  }  }
265    
266    
267  #define my_iskeychar(a) (((a) >='0' && (a) <= '9' ) || ((a) >= 'A' && (a) <= 'F'))  /* Check if the given pattern are either a valid
268       email address, a {long, short} keyid or a fingerprint.
269       Return 0 on success. */
270  static int  static int
271  check_pattern (const char *pattern)  check_pattern (const char *pattern)
272  {  {    
273      int rc = 1;      size_t i;
274        
275      /* Whitespace are not allowed! */      if (strchr (pattern, ' '))
276      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;  
     }  
277            
278      if ((strchr (pattern, '@')) &&      if (strchr (pattern, '@') && strlen (pattern) >= 3 &&
279          (strlen (pattern) >= 3)) {          !check_email_address (pattern))
280          rc = 0;          return 0;
281          goto leave;  
282        if (strstr (pattern, "0x"))
283            pattern += 2;
284        if (strlen (pattern) != 8 &&
285            strlen (pattern) != 16 &&
286            strlen (pattern) != 40)
287            return WPTERR_GENERAL;
288    
289        for (i=0; i < strlen (pattern); i++) {
290            if (!isxdigit (pattern[i]))
291                return WPTERR_GENERAL;
292      }      }
293            return 0;
 leave:  
     return rc;  
294  }  }
295    
296    
# Line 311  name_from_proto (int proto) Line 303  name_from_proto (int proto)
303      switch (proto) {      switch (proto) {
304      case PROXY_PROTO_NONE:      s = ""; break;      case PROXY_PROTO_NONE:      s = ""; break;
305      case PROXY_PROTO_HTTP:      s = "HTTP"; break;      case PROXY_PROTO_HTTP:      s = "HTTP"; break;
306      case PROXY_PROTO_SOCKS5:    s =  "SOCKS5"; break;      case PROXY_PROTO_SOCKS5:    s = "SOCKS5"; break;
307      default:                    s= "HTTP"; break;      default:                    s = "HTTP"; break;
308      }      }
309      return s;      return s;
310  }  }
# Line 348  set_default_ks (listview_ctrl_t lv) Line 340  set_default_ks (listview_ctrl_t lv)
340          return;          return;
341      for (i=0; i < listview_count_items (lv, 0); i++) {      for (i=0; i < listview_count_items (lv, 0); i++) {
342          listview_get_item_text (lv, i, KS_COL_NAME, buf, sizeof (buf)-1);                listview_get_item_text (lv, i, KS_COL_NAME, buf, sizeof (buf)-1);      
343          if (!strcmp (buf, p)) {          if (!stricmp (buf, p)) {        
344              listview_select_one (lv, i);              listview_select_one (lv, i);
345              break;              break;
346          }          }
# Line 356  set_default_ks (listview_ctrl_t lv) Line 348  set_default_ks (listview_ctrl_t lv)
348      free_if_alloc (p);      free_if_alloc (p);
349  }  }
350    
351    
352  /* Save the selected keyserver from @lv as the default server. */  /* Save the selected keyserver from @lv as the default server. */
353  static int  static int
354  save_default_ks (listview_ctrl_t lv)  save_default_ks (listview_ctrl_t lv)
# Line 369  save_default_ks (listview_ctrl_t lv) Line 362  save_default_ks (listview_ctrl_t lv)
362          return -1;          return -1;
363      }      }
364      listview_get_item_text (lv, idx, KS_COL_NAME, buf, sizeof (buf)-1);      listview_get_item_text (lv, idx, KS_COL_NAME, buf, sizeof (buf)-1);
365      if (strncmp (buf, "http", 4) && strncmp (buf, "hkp", 3)) {      if (strnicmp (buf, "http", 4) && strnicmp (buf, "hkp", 3)) {
366          msg_box (NULL, _("Only HTTP keyserver can be used."),          msg_box (NULL, _("Only HTTP keyserver can be used."),
367                   _("Keyserver"), MB_ERR);                   _("Keyserver"), MB_ERR);
368          return -1;          return -1;
# Line 397  keyserver_list_build (listview_ctrl_t *r Line 390  keyserver_list_build (listview_ctrl_t *r
390      int j;      int j;
391    
392      ico[0] = LoadIcon (glob_hinst, (LPCTSTR)IDI_COMPUTER);      ico[0] = LoadIcon (glob_hinst, (LPCTSTR)IDI_COMPUTER);
393      listview_new (&lv);          listview_new (&lv, hwnd);    
     lv->ctrl = hwnd;  
394      for (j=0; keyserver[j].fieldname; j++)      for (j=0; keyserver[j].fieldname; j++)
395          listview_add_column (lv, &keyserver[j]);          listview_add_column (lv, &keyserver[j]);
396      listview_set_image_list (lv, 16, 16, ico, 1);      listview_set_image_list (lv, 16, 16, ico, 1);
# Line 429  keyserver_remove (listview_ctrl_t lv) Line 421  keyserver_remove (listview_ctrl_t lv)
421    
422      listview_get_item_text (lv, pos, KS_COL_NAME, name, sizeof (name)-1);      listview_get_item_text (lv, pos, KS_COL_NAME, name, sizeof (name)-1);
423      for (i=0; i < MAX_KEYSERVERS; i++) {      for (i=0; i < MAX_KEYSERVERS; i++) {
424          if (server[i].name && strcmp (server[i].name, name) == 0)          if (server[i].name && stricmp (server[i].name, name) == 0)
425              server[i].used = 0;              server[i].used = 0;
426      }      }
427      listview_del_item (lv, pos);      listview_del_item (lv, pos);
# Line 444  keyserver_edit (listview_ctrl_t lv, keys Line 436  keyserver_edit (listview_ctrl_t lv, keys
436      int i;      int i;
437    
438      for (i=0; i < MAX_KEYSERVERS; i++) {      for (i=0; i < MAX_KEYSERVERS; i++) {
439          if (server[i].name && strcmp (server[i].name, ctx->name) == 0) {          if (server[i].name && stricmp (server[i].name, ctx->name) == 0) {
440              fnd = true;              fnd = true;
441              break;              break;
442          }          }
# Line 587  keyserver_dlg_proc (HWND dlg, UINT msg, Line 579  keyserver_dlg_proc (HWND dlg, UINT msg,
579          SetDlgItemText (dlg, IDC_KEYSERVER_SEND,          SetDlgItemText (dlg, IDC_KEYSERVER_SEND,
580                          _("Send key (default is receiving)"));                          _("Send key (default is receiving)"));
581          SetDlgItemText (dlg, IDC_KEYSERVER_INFO,          SetDlgItemText (dlg, IDC_KEYSERVER_INFO,
582                          _("Please enter the key ID or email address you search for"));                          _("Key ID or email address you want to search for"));
583          SetDlgItemText (dlg, IDC_KEYSERVER_INDEX, _("&Search"));          SetDlgItemText (dlg, IDC_KEYSERVER_INDEX, _("&Search"));
584          SetDlgItemText (dlg, IDC_KEYSERVER_PROXSETT, _("C&hange proxy"));          SetDlgItemText (dlg, IDC_KEYSERVER_PROXSETT, _("C&hange proxy"));
585          SetDlgItemText (dlg, IDC_KEYSERVER_DEFAULT, _("Set &default"));          SetDlgItemText (dlg, IDC_KEYSERVER_DEFAULT, _("Set &default"));
# Line 621  keyserver_dlg_proc (HWND dlg, UINT msg, Line 613  keyserver_dlg_proc (HWND dlg, UINT msg,
613              DestroyMenu (hm);              DestroyMenu (hm);
614              DestroyMenu (pop);              DestroyMenu (pop);
615          }          }
616            else if (notify->code == LVN_ITEMCHANGED &&
617                     ((LPNMLISTVIEW)lparam)->uNewState) {
618                listview_get_item_text (lv, listview_get_curr_pos (lv),
619                                        KS_COL_NAME, kserver, sizeof (kserver)-1);
620                if (!strnicmp (kserver, "ldap://", 7))
621                    EnableWindow (GetDlgItem (dlg, IDC_KEYSERVER_INDEX), FALSE);
622                else
623                    EnableWindow (GetDlgItem (dlg, IDC_KEYSERVER_INDEX), TRUE);
624            }
625          return TRUE;          return TRUE;
626                    
627      case WM_DESTROY:      case WM_DESTROY:
# Line 635  keyserver_dlg_proc (HWND dlg, UINT msg, Line 635  keyserver_dlg_proc (HWND dlg, UINT msg,
635      case WM_SYSCOMMAND:      case WM_SYSCOMMAND:
636          if (LOWORD (wparam) == SC_CLOSE)          if (LOWORD (wparam) == SC_CLOSE)
637              EndDialog (dlg, TRUE);              EndDialog (dlg, TRUE);
638          return FALSE;          return FALSE;  
639            
640      case WM_COMMAND:      case WM_COMMAND:
641          switch (LOWORD (wparam)) {          switch (LOWORD (wparam)) {
642          case IDC_KEYSERVER_PROXSETT:          case IDC_KEYSERVER_PROXSETT:
643              dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_KEYSERVER_PROXY,              dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_KEYSERVER_PROXY,
644                                dlg, keyserver_proxy_dlg_proc, NULL,                                dlg, keyserver_proxy_dlg_proc, 0,
645                                _("Proxy Settings"), IDS_WINPT_KEYSERVER_PROXY);                                _("Proxy Settings"), IDS_WINPT_KEYSERVER_PROXY);
646              return TRUE;              return TRUE;
647                            
648          case IDC_KEYSERVER_INDEX:          case IDC_KEYSERVER_INDEX:
649              if (!lv_idx) {              if (!lv_idx)
650                  lv_idx = kserver_get_pos (lv);                  lv_idx = kserver_get_pos (lv);
651                  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, KS_COL_NAME,  
                                     proto, sizeof (proto)-1);  
             if (!strncmp (proto, "ldap", 4)) {  
                 msg_box (dlg, _("This is not implemented yet!"),  
                          _("Keyserver"), MB_ERR);  
                 return FALSE;  
             }  
             listview_get_item_text (lv, lv_idx, KS_COL_NAME,  
                                     kserver, sizeof (kserver)-1);  
652              if (!GetDlgItemText (dlg, IDC_KEYSERVER_SEARCH, pattern, sizeof (pattern)-1)) {              if (!GetDlgItemText (dlg, IDC_KEYSERVER_SEARCH, pattern, sizeof (pattern)-1)) {
653                  msg_box (dlg, _("Please enter the search pattern."),                  msg_box (dlg, _("Please enter the search pattern."),
654                           _("Keyserver"), MB_INFO);                           _("Keyserver"), MB_INFO);
655                  return FALSE;                  return FALSE;
656              }              }
657              ksc.name = kserver;  
658                if (lv_idx != -1) {
659                    listview_get_item_text (lv, lv_idx, KS_COL_NAME,
660                                            kserver, sizeof (kserver)-1);
661                    ksc.name = kserver;
662                    ksc.port = kserver_get_port (lv);
663                }
664                else {
665                    ksc.name = DEF_HKP_KEYSERVER;
666                    ksc.port = HKP_PORT;
667                }
668              ksc.pattern = pattern;              ksc.pattern = pattern;
             ksc.port = kserver_get_port (lv);  
669              DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_HKPSEARCH, dlg,              DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_HKPSEARCH, dlg,
670                              hkpsearch_dlg_proc, (LPARAM) &ksc);                              hkpsearch_dlg_proc, (LPARAM) &ksc);
671              return TRUE;              return TRUE;
# Line 688  keyserver_dlg_proc (HWND dlg, UINT msg, Line 683  keyserver_dlg_proc (HWND dlg, UINT msg,
683              listview_get_item_text (lv, lv_idx, KS_COL_NAME,              listview_get_item_text (lv, lv_idx, KS_COL_NAME,
684                                      proto, sizeof (proto)-1);                                      proto, sizeof (proto)-1);
685              proto_nr = KSPROTO_HTTP;              proto_nr = KSPROTO_HTTP;
686              if (!strncmp  (proto, "ldap", 4))              if (!strnicmp  (proto, "ldap", 4))
687                  proto_nr = KSPROTO_LDAP;                  proto_nr = KSPROTO_LDAP;
688              else if (!strncmp (proto, "finger", 6))              else if (!strnicmp (proto, "finger", 6))
689                  proto_nr = KSPROTO_FINGER;                  proto_nr = KSPROTO_FINGER;
690              listview_get_item_text (lv, lv_idx, KS_COL_NAME,              listview_get_item_text (lv, lv_idx, KS_COL_NAME,
691                                      kserver, sizeof (kserver)-1);                                      kserver, sizeof (kserver)-1);
# Line 747  keyserver_dlg_proc (HWND dlg, UINT msg, Line 742  keyserver_dlg_proc (HWND dlg, UINT msg,
742                                      edit.name, sizeof (edit.name)-1);                                      edit.name, sizeof (edit.name)-1);
743              listview_get_item_text (lv, lv_idx, KS_COL_PORT, pattern, 32);              listview_get_item_text (lv, lv_idx, KS_COL_PORT, pattern, 32);
744              edit.port = atoi (pattern);              edit.port = atoi (pattern);
745              if (!strncmp (edit.name, "hkp", 3) || !strncmp (edit.name, "http", 4))              if (!strnicmp (edit.name, "hkp", 3) || !strnicmp (edit.name, "http", 4))
746                  edit.proto = KSPROTO_HTTP;                  edit.proto = KSPROTO_HTTP;
747              else if (!strncmp (edit.name, "ldap", 4))              else if (!strnicmp (edit.name, "ldap", 4))
748                  edit.proto = KSPROTO_LDAP;                  edit.proto = KSPROTO_LDAP;
749              else              else
750                  edit.proto = KSPROTO_FINGER;                  edit.proto = KSPROTO_FINGER;
Legend:
Removed from v.195  
changed lines
  Added in v.248
[email protected]
 ViewVC Help
Powered by ViewVC 1.1.26