/[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 47 by werner, Mon Oct 31 14:04:59 2005 UTC revision 262 by twoaday, Sat Sep 30 10:24:34 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, 2006 g10 Code GmbH
4   *   *
5   * This file is part of WinPT.   * This file is part of WinPT.
6   *   *
# Line 17  Line 18 
18   * along with WinPT; if not, write to the Free Software Foundation,   * along with WinPT; if not, write to the Free Software Foundation,
19   * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA   * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
20   */   */
   
21  #ifdef HAVE_CONFIG_H  #ifdef HAVE_CONFIG_H
22  #include <config.h>  #include <config.h>
23  #endif  #endif
24    
25  #include <windows.h>  #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 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"
43    #include "wptRegistry.h"
44    
45    
46  #define MAX_KEYSIZE 70000  char* get_reg_entry_keyserver (const char *);
   
 char * get_reg_entry_keyserver (const char *);  
47  int set_reg_entry_keyserver (const char *, const char *);  int set_reg_entry_keyserver (const char *, const char *);
48    
49    /* Symbolic column IDs */
50    enum { KS_COL_NAME = 0, KS_COL_PORT };
51    
52    /* Callback context to modify (add, edit) keyserver items. */
53    struct keyserver_rec_s {
54        char name[200];     /* hostname */
55        int  proto;         /* protocol */
56        int  port;          /* used port */
57        bool mode;          /* true = edit */
58        bool cancel;
59    };
60    typedef struct keyserver_rec_s *keyserver_rec_t;
61    
62    
63    /* Print out keyserver error and a possible Winsock error. */
64  static void  static void
65  hkp_err_box (HWND dlg, const char * host, u16 port, int rc)  hkp_err_box (HWND dlg, const char *host, WORD port, int rc)
66  {  {
67      const char *err = kserver_strerror();      const char *err = kserver_strerror ();
68        const char *ws_err = wsock_strerror ();
69      log_box( _("Keyserver"), MB_ERR, "%s:%d: %s", host, port, winpt_strerror (rc));      
70      if (err)      if (ws_err && strlen (ws_err) > 0)
71          msg_box (dlg, err, wsock_strerror (), MB_ERR);          log_box (_("Keyserver"), MB_ERR, "%s:%d: %s", host, port, ws_err);
72  } /* hkp_err_box */      else
73            log_box (_("Keyserver"), MB_ERR, "%s:%d: %s\n%s",
74                     host, port, winpt_strerror (rc), err? err : "");
75    }
76    
77    
78    /* Send the extracted key with keyid @pattern to the
79       keyserver @kserver (port @port).
80       Return value: 0 on success. */
81  int  int
82  hkp_send_key (HWND dlg, const char *kserver, u16 port, const char *pattern)  hkp_send_key (HWND dlg, const char *kserver, WORD port, const char *pattern)
83  {  {
84      gpgme_ctx_t c;      GPGME *gpg;
     gpgme_data_t keydata;  
85      gpgme_error_t ec;      gpgme_error_t ec;
86      char *rawkey = NULL, msg[1024];      char *rawkey = NULL;
87      size_t n;      char msg[256];
     int rc;  
88            
89      ec = gpgme_new( &c );      gpg = new GPGME ();
90      if( ec )      gpg->setArmor (true);
91          BUG( NULL );      ec = gpg->exportToBuffer (pattern, &rawkey);
92      gpgme_set_armor (c, 1);      if (ec) {
93      ec = gpgme_data_new( &keydata );          msg_box (dlg, gpgme_strerror (ec), _("Export"), MB_ERR);
     if( ec )  
         BUG( NULL );  
     rc = (int) gpgme_op_export( c, pattern, 0, keydata );  
     if( rc ) {  
         msg_box( dlg, gpgme_strerror( (gpgme_error_t)rc ), _("Export"), MB_ERR );  
94          goto leave;          goto leave;
95      }      }
96      rawkey = gpgme_data_release_and_get_mem (keydata, &n);      op_begin ();
97      rc = kserver_sendkey (kserver, port, rawkey, n);      ec = kserver_sendkey (kserver, port, rawkey, strlen (rawkey));
98      if (rc) {      op_end ();
99          hkp_err_box (dlg, kserver, port, rc);      if (ec) {
100            hkp_err_box (dlg, kserver, port, ec);
101          goto leave;          goto leave;
102      }      }
103            
# Line 91  hkp_send_key (HWND dlg, const char *kser Line 105  hkp_send_key (HWND dlg, const char *kser
105      status_box (dlg, msg, _("GnuPG status"));      status_box (dlg, msg, _("GnuPG status"));
106            
107  leave:  leave:
108      gpgme_release (c);      delete gpg;
109      if (rawkey)      free_if_alloc (rawkey);
110          gpgme_free (rawkey);      return ec? -1 : 0;
111      return rc;  }
 } /* hkp_send_key */  
112    
113    
114  int  
115  hkp_recv_key (HWND dlg, const char *kserver, u16 port,  /* Show all received keys from the keyserver. */
116                const char *pattern, int proto, int flags)  static void
117    show_imported_keys (gpgme_import_result_t res)
118  {  {
119        gpgme_import_status_t t;
120        gpgme_key_t key;
121        gpgme_data_t msg;
122      gpgme_ctx_t ctx;      gpgme_ctx_t ctx;
123      gpgme_data_t keydata;      gpgme_error_t err;
124      gpgme_error_t ec;      const char *s;
125      gpgme_import_result_t import_res;      char *p, *uid;
126        size_t n=0;
127    
128        if (!res)
129            return;
130    
131        err = gpgme_data_new (&msg);
132        if (err)
133            BUG (NULL);
134        err = gpgme_new (&ctx);
135        if (err)
136            BUG (NULL);
137        if (res->considered > 1) {
138            s = _("WARNING: multiple keys matched request.\n\n");
139            gpgme_data_write (msg, s, strlen (s));
140        }
141    
142        if (res->unchanged == res->considered)
143            s = _("Key(s) successfully received but nothing was changed.");
144        else
145            s = _("Key(s) sucessfully received and imported.");
146            // nice to have the amount of new signatures...
147        gpgme_data_write (msg, s, strlen (s));
148        gpgme_data_write (msg, "\n\n", 2);
149    
150        for (t=res->imports; t; t = t->next) {
151            if (!gpgme_get_key (ctx, t->fpr, &key, 0)) {
152                s = uid = utf8_to_native (key->uids->uid);
153                gpgme_data_write (msg, s, strlen (s));
154                gpgme_data_write (msg, "\n", 1);
155                gpgme_key_release (key);
156                safe_free (uid);
157            }
158        }
159        gpgme_data_write (msg, "\0", 1);
160        p = gpgme_data_release_and_get_mem (msg, &n);
161        if (p != NULL) {
162            msg_box (NULL, p, _("Imported Keys"), MB_INFO);
163            gpgme_free (p);
164        }
165        gpgme_release (ctx);
166    }
167    
168    
169    /* Receive a key from the keyserver @kserver (port @port)
170       with the pattern @pattern.
171       Return value: 0 on success. */
172    static int
173    keyserver_recv_key (HWND dlg, const char *kserver, WORD port,
174                        const char *pattern, int proto, int flags,
175                        char **r_fpr)
176    {    
177        gpgme_import_result_t import_res = NULL;
178        gpgme_error_t err;
179        GPGME *gpg = NULL;
180        char *rawkey = NULL;
181        int keylen = 0;
182      int rc;      int rc;
183      char *rawkey = NULL, msg[384];  
184            if (proto == KSPROTO_LDAP) {
185      rawkey = new char[MAX_KEYSIZE];          rc = ldap_recvkey (kserver, pattern, &rawkey, &keylen);
186      if (!rawkey)          if (rc) {
187          BUG (0);              msg_box (dlg, _("LDAP key import failed.\n"
     memset (rawkey, 0, MAX_KEYSIZE);  
     if( proto == KSPROTO_LDAP ) {  
         rc = ldap_recvkey( kserver, pattern, rawkey, MAX_KEYSIZE-1 );  
         if( rc ) {  
             msg_box( dlg, _("LDAP key import failed.\n"  
188                              "Please make sure you have an online connection"                              "Please make sure you have an online connection"
189                              " and gpgkeys_ldap.exe is installed"),                              " and gpgkeys_ldap.exe is installed"),
190                              _("Keyserver"), MB_ERR );                              _("Keyserver"), MB_ERR);
191              free_if_alloc( rawkey );              free_if_alloc (rawkey);
192              return rc;              return rc;
193          }          }
194      }      }
195      else if (proto == KSPROTO_FINGER) {      else if (proto == KSPROTO_FINGER) {
196          rc = finger_recvkey (kserver, pattern, rawkey, MAX_KEYSIZE-1);          rc = finger_recvkey (kserver, pattern, &rawkey, &keylen);
197          if (rc) {          if (rc) {
198              log_box (_("Keyserver"), MB_ERR, _("Finger key import failed: %s\n"),              log_box (_("Keyserver"), MB_ERR,
199                       winpt_strerror (rc));                       _("Finger key import failed: %s\n"), winpt_strerror (rc));
200              free_if_alloc (rawkey);              free_if_alloc (rawkey);
201              return rc;              return rc;
202          }          }
203      }      }
204      else if( ( rc = kserver_recvkey( kserver, port, kserver_check_keyid( pattern ),      else if ((rc = kserver_recvkey (kserver, port,
205                                       rawkey, MAX_KEYSIZE-1 ) ) ) {                                      kserver_check_keyid (pattern),
206                                        &rawkey, &keylen))) {
207          hkp_err_box (dlg, kserver, port, rc);          hkp_err_box (dlg, kserver, port, rc);
208          free_if_alloc (rawkey);          free_if_alloc (rawkey);
209          return rc;          return rc;
210      }      }
211      else {  
212          if( !strstr( rawkey, "BEGIN PGP PUBLIC KEY BLOCK" ) ) {      if (!strstr (rawkey, "BEGIN PGP PUBLIC KEY BLOCK")) {
213              msg_box( dlg, _("This is not a valid OpenPGP key."), _("Keyserver"), MB_ERR );          msg_box (dlg, _("This is not a valid OpenPGP key."),
214              goto leave;                   _("Keyserver"), MB_ERR);
215          }          goto leave;
216          ec = gpgme_new( &ctx );      }
217          if( ec )      gpg = new GPGME ();
218              BUG( NULL );      err = gpg->importFromBuffer (rawkey);
219          gpgme_data_new_from_mem( &keydata, rawkey, strlen( rawkey ), 1 );      if (err) {
220          rc = gpgme_op_import( ctx, keydata );          msg_box (dlg, gpgme_strerror (err), _("Import"), MB_ERR);
221          if( rc ) {          goto leave;
222              msg_box( dlg, gpgme_strerror( (gpgme_error_t)rc ), _("Import"), MB_ERR );      }
223              goto leave;      import_res = gpg->importGetResult ();
224          }      if (import_res && r_fpr)
225          import_res = gpgme_op_import_result (ctx);          *r_fpr = m_strdup (import_res->imports->fpr);
     }  
226            
227      /* 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
228         a summarize at the end is presented and not for each key. */         a summarize at the end is presented and not for each key. */
229      if (!(flags & KM_KS_REFRESH)) {      if (import_res && !(flags & KM_KS_REFRESH)) {
230          if (import_res->new_user_ids == 0) {          show_imported_keys (import_res);
231              _snprintf (msg, DIM (msg)-1,          if (import_res->unchanged == import_res->considered) {
232                         _("Key '%s' successfully received but nothing was changed."), pattern );              rc = WPTERR_GENERAL; /* no keys updated. */
             status_box (dlg, msg, _("GnuPG Status"));  
             rc = WPTERR_GENERAL;  
233              goto leave;              goto leave;
234          }          }
         _snprintf (msg, DIM (msg)-1, _("Key '%s' sucessfully received and imported."), pattern);  
         status_box (dlg, msg, _("GnuPG Status"));  
235      }      }
236        
237  leave:  leave:
238      free_if_alloc (rawkey);      free_if_alloc (rawkey);
239      gpgme_release (ctx);      if (gpg != NULL)
240      gpgme_data_release (keydata);          delete gpg;
   
241      return rc;      return rc;
242  } /* hkp_recv_key */  }
243    
244    
245  #define my_iskeychar(a) ( ( (a) >='0' && (a) <= '9' ) || ( (a) >= 'A' && (a) <= 'F' ) )  /* Alias for keyserver_recv_key but without the ability to return
246       the fingerprint of the key. */
247    int
248    hkp_recv_key (HWND dlg, const char *kserver, WORD port,
249                  const char *pattern, int proto, int flags)
250    {
251        return keyserver_recv_key (dlg, kserver, port, pattern,
252                                   proto, flags, NULL);
253    }
254    
255  static int  int
256  check_pattern( const char *pattern )  hkp_recv_key2 (HWND dlg, const char *kserver, WORD port,
257                   const char *pattern, int proto, char **r_fpr)
258  {  {
259      int rc = 1;      return keyserver_recv_key (dlg, kserver, port, pattern,
260                                       proto, 0, r_fpr);
261      /* Whitespace are not allowed! */  }
262      if( strchr( pattern, ' ') ) {  
263          rc = WPTERR_GENERAL;  
264          goto leave;  /* Check if the given pattern are either a valid
265      }     email address, a {long, short} keyid or a fingerprint.
266           Return 0 on success. */
267      if( (( strstr( pattern, "0x" ) ) && ( strlen( pattern ) == 10 ) )  static int
268           || (strstr(pattern, "0x")) && ( strlen( pattern )  == 18 ) ) {  check_pattern (const char *pattern)
269          rc = 0;  {    
270          goto leave;      size_t i;
271      }  
272            if (strchr (pattern, ' '))
273      if( (( my_iskeychar( pattern[0] )) && ( strlen( pattern )  == 8 ) )          return WPTERR_GENERAL; /* do not allow white spaces. */
274           || (my_iskeychar(pattern[0])) && ( strlen( pattern ) == 16) ) {      
275          rc = 0;      if (strchr (pattern, '@') && strlen (pattern) >= 3 &&
276          goto leave;          !check_email_address (pattern))
277      }          return 0;
278        
279      if( ( strchr( pattern, '@' ) ) && ( strlen( pattern ) >= 3 ) ) {      if (strstr (pattern, "0x"))
280          rc = 0;          pattern += 2;
281          goto leave;      if (strlen (pattern) != 8 &&
282            strlen (pattern) != 16 &&
283            strlen (pattern) != 40)
284            return WPTERR_GENERAL;
285    
286        for (i=0; i < strlen (pattern); i++) {
287            if (!isxdigit (pattern[i]))
288                return WPTERR_GENERAL;
289      }      }
290            return 0;
291  leave:  }
     return rc;  
 } /* check_pattern */  
292    
293    
294  static void  /* Return human readable name for the proxy protocol. */
295  set_proxy (HWND dlg)  static const char*
296  {  name_from_proto (int proto)
297      char proxy[384];  {
298      int port = 0;      const char *s;
299        
300      strcpy (proxy, "HTTP proxy: ");      switch (proto) {
301      if (kserver_get_proxy (&port)) {      case PROXY_PROTO_NONE:      s = ""; break;
302          char t[256];      case PROXY_PROTO_HTTP:      s = "HTTP"; break;
303          const char *http = kserver_get_proxy (&port);      case PROXY_PROTO_SOCKS5:    s = "SOCKS5"; break;
304          _snprintf (t, sizeof (t) - 1, "\"%s:%d\"", http, port);      default:                    s = "HTTP"; break;
         strcat (proxy, t);  
305      }      }
306      else      return s;
307          strcat( proxy, "none" );  }
     SetDlgItemText( dlg, IDC_KEYSERVER_PROXY, proxy );  
 } /* set_proxy */  
308    
309    
310  static int inline  static int inline
# Line 242  kserver_get_pos (listview_ctrl_t lv) Line 316  kserver_get_pos (listview_ctrl_t lv)
316  }  }
317    
318    
319  static u16 inline  static WORD inline
320  kserver_get_port (listview_ctrl_t lv)  kserver_get_port (listview_ctrl_t lv)
321  {  {
322      char buf[16];      char buf[16];
323    
324      listview_get_item_text (lv, kserver_get_pos (lv), 3, buf, 15);      listview_get_item_text (lv, kserver_get_pos (lv),
325      return (u16)strtoul (buf, NULL, 10);                              KS_COL_PORT, buf, sizeof (buf)-1);
326        return (WORD)strtoul (buf, NULL, 10);
327  }  }
328    
329    
330  static void  static void
331  load_default_ks (listview_ctrl_t lv)  set_default_ks (listview_ctrl_t lv)
332  {  {
333      char * p, buf[192];      char *p, buf[128];
334      int i;      int i;
335    
336      p = get_reg_entry_keyserver ("Default");      p = get_reg_entry_keyserver ("Default");
337      if (!p)      if (!p)
338          return;          return;
339      for( i = 0; i < listview_count_items( lv, 0 ); i++ ) {      for (i=0; i < listview_count_items (lv, 0); i++) {
340          listview_get_item_text( lv, i, 0, buf, sizeof (buf)-1 );          listview_get_item_text (lv, i, KS_COL_NAME, buf, sizeof (buf)-1);      
341          if( !strncmp( p, buf, strlen( p ) ) ) {          if (!stricmp (buf, p)) {
342              listview_add_sub_item( lv, i, 2, "x" );              listview_select_one (lv, i);
343              break;              break;
344          }          }
345      }      }
346      free_if_alloc (p);      free_if_alloc (p);
347  } /* load_default_ks */  }
348    
349    
350    /* Save the selected keyserver from @lv as the default server. */
351  static int  static int
352  save_default_ks (listview_ctrl_t lv)  save_default_ks (listview_ctrl_t lv)
353  {  {
354      char buf[192], port[32];      char buf[192], port[32];
355      int idx, i;        int idx, i;  
356    
357      idx = listview_get_curr_pos( lv );      idx = listview_get_curr_pos (lv);
358      if( idx == -1 ) {      if (idx == -1) {
359          msg_box( NULL, _("Please select one of the servers."), _("Keyserver"), MB_ERR );          msg_box (NULL, _("Please select one of the servers."),
360                     _("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 HKP 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      for (j = 0; j<MAX_KEYSERVERS; j++) {      listview_set_image_list (lv, 16, 16, ico, 1);
396        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 346  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    
563    /* Add search pattern @patt to the combo box if it is
564       not already available in the list. */
565    static void
566    add_pattern_to_combox (HWND dlg, int ctlid, const char *patt)
567    {
568        int err;
569    
570        err = SendDlgItemMessage (dlg, ctlid, CB_FINDSTRINGEXACT,
571                                  0, (LPARAM)(LPCSTR)patt);
572        if (err != CB_ERR)
573            return;
574        SendDlgItemMessage (dlg, IDC_KEYSERVER_SEARCH, CB_ADDSTRING,
575                            0, (LPARAM)(LPCSTR)patt);
576    }
577    
578    static void
579    load_pattern_to_combox (HWND dlg, int ctlid, const char *rkey_name)
580    {
581    }
582    
583    static void
584    save_pattern_from_combox (HWND dlg, int ctlid, const char *rkey_name)
585    {
586        char *p, tmp[64];
587        int i;
588        int n, len=0;
589    
590        n = SendDlgItemMessage (dlg, ctlid, CB_GETCOUNT, 0, 0);
591        if (n == 0 || n == CB_ERR)
592            return;
593        /* it is very unlikely that the combox contain hundred of pattern
594           but even so we limit the value to 16 which should be sufficient. */
595        if (n > 16) n = 16;
596        for (i=0; i < n; i++)
597            len += SendDlgItemMessage (dlg, ctlid, CB_GETLBTEXTLEN,
598                                       (WPARAM)i, 0) + 1 + 1;
599        p = new char[len+1];
600        memset (p, 0, len+1);
601        for (i=0; i < n; i++) {
602            memset (tmp, 0, sizeof (tmp));
603            SendDlgItemMessage (dlg, ctlid, CB_GETLBTEXT,
604                                (WPARAM)i, (LPARAM)tmp);
605            strcat (p, tmp);
606            strcat (p, "$");
607        }
608        set_reg_entry (HKEY_CURRENT_USER, "Software\\WinPT", rkey_name, p);
609        free_if_alloc (p);
610    }
611    
612    
613    /* Dialog box procedure to access keyservers. */
614  BOOL CALLBACK  BOOL CALLBACK
615  keyserver_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)  keyserver_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
616  {  {
617      static listview_ctrl_t lv = NULL;      static listview_ctrl_t lv = NULL;
618      static int lv_idx = 0;      static int lv_idx = 0;
     int rc, proto_nr = 0;  
     char kserver[128], pattern[128];  
     char proto[16];      
619      keyserver_ctx ksc;      keyserver_ctx ksc;
620        struct keyserver_rec_s edit;
621        char kserver[128], pattern[128];
622        char proto[16], *fpr = NULL;
623        int rc, proto_nr = 0;
624            
625      switch ( msg ) {      switch (msg) {
626      case WM_INITDIALOG:      case WM_INITDIALOG:
     #ifndef LANG_DE  
627          SetWindowText (dlg, _("Keyserver Access"));          SetWindowText (dlg, _("Keyserver Access"));
628          SetDlgItemText (dlg, IDC_KEYSERVER_RECV, _("&Receive"));          SetDlgItemText (dlg, IDC_KEYSERVER_RECV, _("&Receive"));
629          SetDlgItemText (dlg, IDC_KEYSERVER_SEND,          SetDlgItemText (dlg, IDC_KEYSERVER_SEND,
630                          _("Send key (default is receiving)"));                          _("Send key (default is receiving)"));
631          SetDlgItemText (dlg, IDC_KEYSERVER_INFO,          SetDlgItemText (dlg, IDC_KEYSERVER_INFO,
632                          _("Please enter the key ID or email address you search for"));                          _("Key ID or email address you want to search for"));
633          SetDlgItemText (dlg, IDC_KEYSERVER_INDEX, _("&Search"));          SetDlgItemText (dlg, IDC_KEYSERVER_INDEX, _("&Search"));
634          SetDlgItemText (dlg, IDC_KEYSERVER_PROXSETT, _("C&hange"));          SetDlgItemText (dlg, IDC_KEYSERVER_PROXSETT, _("C&hange proxy"));
635          SetDlgItemText (dlg, IDC_KEYSERVER_DEFAULT, _("Set &default"));          SetDlgItemText (dlg, IDC_KEYSERVER_DEFAULT, _("Set &default"));
636      #endif          SetDlgItemText (dlg, IDCANCEL, _("&Close"));
637          set_proxy (dlg);          
638          keyserver_list_build (&lv, GetDlgItem (dlg, IDC_KEYSERVER_LIST));          keyserver_list_build (&lv, GetDlgItem (dlg, IDC_KEYSERVER_LIST));
639            set_default_ks (lv);
640          center_window (dlg, NULL);          center_window (dlg, NULL);
641          SetForegroundWindow (dlg);          SetForegroundWindow (dlg);
642          return TRUE;          return TRUE;
# Line 378  keyserver_dlg_proc (HWND dlg, UINT msg, Line 644  keyserver_dlg_proc (HWND dlg, UINT msg,
644      case WM_NOTIFY:      case WM_NOTIFY:
645          NMHDR *notify;          NMHDR *notify;
646          notify = (NMHDR *)lparam;          notify = (NMHDR *)lparam;
647          if( notify && notify->code == NM_CLICK          if (!notify)
648              && notify->idFrom == IDC_KEYSERVER_LIST )              break;
649              lv_idx = listview_get_curr_pos( lv );          if (notify->code == NM_CLICK
650                && notify->idFrom == IDC_KEYSERVER_LIST)
651                lv_idx = listview_get_curr_pos (lv);
652            else if (notify->code == NM_RCLICK &&
653                     notify->idFrom == IDC_KEYSERVER_LIST) {
654                POINT p;
655                GetCursorPos (&p);
656                HMENU hm, pop;
657                hm = LoadMenu (glob_hinst, (LPCTSTR)IDR_WINPT_KEYSERVER_CTX);
658                pop = GetSubMenu (hm, 0);
659                set_menu_text (pop, ID_KSERVCTX_ADD, _("&Add"));
660                set_menu_text (pop, ID_KSERVCTX_DEL, _("&Remove"));
661                set_menu_text (pop, ID_KSERVCTX_EDIT, _("&Edit"));
662                TrackPopupMenu (pop, 0, p.x, p.y, 0, dlg, NULL);
663                DestroyMenu (hm);
664                DestroyMenu (pop);
665            }
666            else if (notify->code == LVN_ITEMCHANGED &&
667                     ((LPNMLISTVIEW)lparam)->uNewState) {
668                listview_get_item_text (lv, listview_get_curr_pos (lv),
669                                        KS_COL_NAME, kserver, sizeof (kserver)-1);
670                if (!strnicmp (kserver, "ldap://", 7))
671                    EnableWindow (GetDlgItem (dlg, IDC_KEYSERVER_INDEX), FALSE);
672                else
673                    EnableWindow (GetDlgItem (dlg, IDC_KEYSERVER_INDEX), TRUE);
674            }
675          return TRUE;          return TRUE;
676                    
677      case WM_DESTROY:      case WM_DESTROY:
678          if( lv ) {          if (lv) {
679              listview_release( lv );              listview_release (lv);
680              lv = NULL;              lv = NULL;
681          }          }
682          lv_idx = 0;          lv_idx = 0;
683            save_pattern_from_combox (dlg, IDC_KEYSERVER_SEARCH, "KSsearch");
684          return FALSE;          return FALSE;
685                    
686      case WM_SYSCOMMAND:      case WM_SYSCOMMAND:
687          if( LOWORD( wparam ) == SC_CLOSE )          if (LOWORD (wparam) == SC_CLOSE)
688              EndDialog( dlg, TRUE );              EndDialog (dlg, TRUE);
689          return FALSE;          return FALSE;  
690            
691      case WM_COMMAND:      case WM_COMMAND:
692          switch( LOWORD( wparam ) ) {          switch (LOWORD (wparam)) {
693          case IDC_KEYSERVER_PROXSETT:          case IDC_KEYSERVER_PROXSETT:
694              dialog_box_param( glob_hinst, (LPCTSTR)IDD_WINPT_KEYSERVER_PROXY, glob_hwnd,              dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_KEYSERVER_PROXY,
695                                keyserver_proxy_dlg_proc, NULL,                                dlg, keyserver_proxy_dlg_proc, 0,
696                                _("Proxy Settings"), IDS_WINPT_KEYSERVER_PROXY );                                _("Proxy Settings"), IDS_WINPT_KEYSERVER_PROXY);
             set_proxy( dlg );  
697              return TRUE;              return TRUE;
698                            
699          case IDC_KEYSERVER_INDEX:          case IDC_KEYSERVER_INDEX:
700              if (!lv_idx) {              if (!lv_idx)
701                  lv_idx = kserver_get_pos (lv);                  lv_idx = kserver_get_pos (lv);
702                  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);  
703              if (!GetDlgItemText (dlg, IDC_KEYSERVER_SEARCH, pattern, sizeof (pattern)-1)) {              if (!GetDlgItemText (dlg, IDC_KEYSERVER_SEARCH, pattern, sizeof (pattern)-1)) {
704                  msg_box (dlg, _("Please enter the search pattern."), _("Keyserver"), MB_INFO);                  msg_box (dlg, _("Please enter the search pattern."),
705                  return FALSE;                           _("Keyserver"), MB_INFO);
706                    return TRUE;
707              }              }
708              ksc.name = kserver;  
709                if (lv_idx != -1) {
710                    listview_get_item_text (lv, lv_idx, KS_COL_NAME,
711                                            kserver, sizeof (kserver)-1);
712                    ksc.name = kserver;
713                    ksc.port = kserver_get_port (lv);
714                }
715                else {
716                    ksc.name = DEF_HKP_KEYSERVER;
717                    ksc.port = HKP_PORT;
718                }
719              ksc.pattern = pattern;              ksc.pattern = pattern;
720              ksc.port = kserver_get_port (lv);              DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_HKPSEARCH, dlg,
721              DialogBoxParam( glob_hinst, (LPCSTR)IDD_WINPT_HKPSEARCH, dlg,                              hkpsearch_dlg_proc, (LPARAM) &ksc);
                             hkpsearch_dlg_proc, (LPARAM) &ksc );  
722              return TRUE;              return TRUE;
723                            
724          case IDC_KEYSERVER_RECV:          case IDC_KEYSERVER_RECV:            
725              memset (&kserver, 0, sizeof (kserver));              memset (&kserver, 0, sizeof (kserver));
726              if (!lv_idx) {              if (!lv_idx) {
727                  lv_idx = kserver_get_pos (lv);                  lv_idx = kserver_get_pos (lv);
728                  if (lv_idx == -1) {                  if (lv_idx == -1) {
729                      msg_box( dlg, _("Please select one of the keyservers."), _("Keyserver"), MB_INFO );                      msg_box (dlg, _("Please select one of the keyservers."),
730                      return FALSE;                              _("Keyserver"), MB_INFO);
731                        return TRUE;
732                  }                  }
733              }              }
734              listview_get_item_text( lv, lv_idx, 1, proto, sizeof (proto)-1 );              listview_get_item_text (lv, lv_idx, KS_COL_NAME,
735                                        proto, sizeof (proto)-1);
736              proto_nr = KSPROTO_HTTP;              proto_nr = KSPROTO_HTTP;
737              if( *proto == 'L' )              if (!strnicmp  (proto, "ldap", 4))
738                  proto_nr = KSPROTO_LDAP;                  proto_nr = KSPROTO_LDAP;
739              else if( *proto == 'F' )              else if (!strnicmp (proto, "finger", 6))
740                  proto_nr = KSPROTO_FINGER;                  proto_nr = KSPROTO_FINGER;
741              listview_get_item_text( lv, lv_idx, 0, kserver, sizeof (kserver)-1 );              listview_get_item_text (lv, lv_idx, KS_COL_NAME,
742              if( !GetDlgItemText( dlg, IDC_KEYSERVER_SEARCH, pattern, sizeof (pattern)-1 ) ) {                                      kserver, sizeof (kserver)-1);
743                  msg_box( dlg, _("Please enter the search pattern."), _("Keyserver"), MB_INFO );              if (!GetDlgItemText(dlg, IDC_KEYSERVER_SEARCH,
744                                    pattern, sizeof (pattern)-1)) {
745                    msg_box (dlg, _("Please enter the search pattern."),
746                             _("Keyserver"), MB_INFO);
747                  return FALSE;                  return FALSE;
748              }              }
749              if( proto_nr == KSPROTO_LDAP && strchr( pattern, '@' ) ) {              add_pattern_to_combox (dlg, IDC_KEYSERVER_SEARCH, pattern);
750                  msg_box( dlg, _("Only keyids are allowed."), _("LDAP Keyserver"), MB_INFO );              if (proto_nr == KSPROTO_LDAP && strchr (pattern, '@')) {
751                    msg_box (dlg, _("Only keyids are allowed."),
752                             _("Keyserver"), MB_INFO);
753                  return FALSE;                  return FALSE;
754              }              }
755              else if (proto_nr == KSPROTO_FINGER) {              else if (proto_nr == KSPROTO_FINGER) {
756                  if (strchr (pattern, '@') || strchr (pattern, ' ')) {                  if (strchr (pattern, '@') || strchr (pattern, ' ')) {
757                      msg_box (dlg, _("Only enter the name of the user."), _("FINGER Keyserver"), MB_INFO);                      msg_box (dlg, _("Only enter the name of the user."),
758                      return FALSE;                               _("Keyserver"), MB_INFO);
759                        return TRUE;
760                  }                  }
761              }              }
762              else if( check_pattern( pattern ) ) {              else if (check_pattern (pattern)) {
763                  msg_box( dlg, _("Only email addresses or keyids are allowed."), _("HKP Keyserver"), MB_INFO );                  msg_box (dlg, _("Only email addresses or keyids are allowed."),
764                  return FALSE;                          _("Keyserver"), MB_INFO);
765                    return TRUE;
766              }              }
767              rc = hkp_recv_key (dlg, kserver, kserver_get_port (lv), pattern, proto_nr, 0);              rc = keyserver_recv_key (dlg, kserver, kserver_get_port (lv),
768              if (!rc)                                       pattern, proto_nr, 0,
769                  keycache_set_reload (1);                                       &fpr);
770                if (!rc && fpr != NULL) {
771                    keycache_update (0, fpr);
772                    free_if_alloc (fpr);
773                }
774              return TRUE;              return TRUE;
775    
776          case IDC_KEYSERVER_DEFAULT:          case IDC_KEYSERVER_DEFAULT:
777              save_default_ks( lv );              save_default_ks (lv);
778                return TRUE;
779    
780            case ID_KSERVCTX_ADD:
781                memset (&edit, 0, sizeof (edit));
782                edit.mode = false;
783                dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_KEYSERVER_ADD, dlg,
784                                    keyserver_modify_dlg_proc,
785                                    (LPARAM)&edit, _("Edit Keyserver"), 0);
786                if (!edit.cancel)
787                    keyserver_add (lv, &edit);
788                return TRUE;
789    
790            case ID_KSERVCTX_EDIT:
791                memset (&edit, 0, sizeof (edit));
792                edit.mode = true;
793                listview_get_item_text (lv, lv_idx, KS_COL_NAME,
794                                        edit.name, sizeof (edit.name)-1);
795                listview_get_item_text (lv, lv_idx, KS_COL_PORT, pattern, 32);
796                edit.port = atoi (pattern);
797                if (!strnicmp (edit.name, "hkp", 3) || !strnicmp (edit.name, "http", 4))
798                    edit.proto = KSPROTO_HTTP;
799                else if (!strnicmp (edit.name, "ldap", 4))
800                    edit.proto = KSPROTO_LDAP;
801                else
802                    edit.proto = KSPROTO_FINGER;
803                dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_KEYSERVER_ADD, dlg,
804                                    keyserver_modify_dlg_proc,
805                                    (LPARAM)&edit, _("Edit Keyserver"), 0);
806                if (!edit.cancel)
807                    keyserver_edit (lv, &edit);
808              break;              break;
809    
810            case ID_KSERVCTX_DEL:
811                keyserver_remove (lv);
812                return TRUE;
813                            
814          case IDCANCEL:          case IDCANCEL:
815              EndDialog( dlg, FALSE );              EndDialog (dlg, FALSE);
816              return FALSE;              return TRUE;
817          }          }
818          break;          break;
819      }      }
820            
821      return FALSE;      return FALSE;
822  } /* keyserver_dlg_proc */  }
Legend:
Removed from v.47  
changed lines
  Added in v.262
[email protected]
 ViewVC Help
Powered by ViewVC 1.1.26