/[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 101 by twoaday, Fri Nov 25 10:56:05 2005 UTC revision 181 by twoaday, Tue Mar 14 11:01:22 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-2005 Timo Schulz
3     *      Copyright (C) 2005 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
# Line 38  Line 38 
38  #include "wptKeyManager.h"  #include "wptKeyManager.h"
39  #include "wptContext.h" /* for passphrase_s */  #include "wptContext.h" /* for passphrase_s */
40  #include "wptDlgs.h"  #include "wptDlgs.h"
41    #include "wptUTF8.h"
42    
43  #define MAX_KEYSIZE 70000  #define MAX_KEYSIZE 70000
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    enum { KS_COL_NAME = 0, KS_COL_PORT, KS_COL_DEFAULT };
49    
50    /* Callback context to modify (add, edit) keyserver items. */
51    struct keyserver_rec_s {
52        char name[200];     /* hostname */
53        int  proto;         /* protocol */
54        int  port;          /* used port */
55        bool mode;          /* true = edit */
56        bool cancel;
57    };
58    typedef struct keyserver_rec_s *keyserver_rec_t;
59    
60    /* Print out keyserver error and a possible Winsock error. */
61  static void  static void
62  hkp_err_box (HWND dlg, const char * host, u16 port, int rc)  hkp_err_box (HWND dlg, const char *host, WORD port, int rc)
63  {  {
64      const char *err = kserver_strerror();      const char *err = kserver_strerror ();
65    
66      log_box( _("Keyserver"), MB_ERR, "%s:%d: %s", host, port, winpt_strerror (rc));      log_box (_("Keyserver"), MB_ERR, "%s:%d: %s",
67                 host, port, winpt_strerror (rc));
68      if (err)      if (err)
69          msg_box (dlg, err, wsock_strerror (), MB_ERR);          msg_box (dlg, err, wsock_strerror (), MB_ERR);
70  } /* hkp_err_box */  }
71    
72    
73    /* Send the extracted key with keyid @pattern to the
74       keyserver @kserver (port @port).
75       Return value: 0 on success. */
76  int  int
77  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)
78  {  {
79      gpgme_ctx_t c;      gpgme_ctx_t ctx;
80      gpgme_data_t keydata;      gpgme_data_t keydata;
81      gpgme_error_t ec;      gpgme_error_t ec;
82      char *rawkey = NULL, msg[1024];      char *rawkey = NULL;
83        char msg[384];
84      size_t n;      size_t n;
     int rc;  
85            
86      ec = gpgme_new( &c );      ec = gpgme_new (&ctx);
87      if( ec )      if (ec)
88          BUG( NULL );          BUG (NULL);
89      gpgme_set_armor (c, 1);      gpgme_set_armor (ctx, 1);
90      ec = gpgme_data_new( &keydata );      ec = gpgme_data_new (&keydata);
91      if( ec )      if (ec)
92          BUG( NULL );          BUG (NULL);
93      rc = (int) gpgme_op_export( c, pattern, 0, keydata );      ec = gpgme_op_export (ctx, pattern, 0, keydata);
94      if( rc ) {      if (ec) {
95          msg_box( dlg, gpgme_strerror( (gpgme_error_t)rc ), _("Export"), MB_ERR );          msg_box (dlg, gpgme_strerror (ec), _("Export"), MB_ERR);
96          goto leave;          goto leave;
97      }      }
98      rawkey = gpgme_data_release_and_get_mem (keydata, &n);      rawkey = gpgme_data_release_and_get_mem (keydata, &n);
99      rc = kserver_sendkey (kserver, port, rawkey, n);      ec = kserver_sendkey (kserver, port, rawkey, n);
100      if (rc) {      if (ec) {
101          hkp_err_box (dlg, kserver, port, rc);          hkp_err_box (dlg, kserver, port, ec);
102          goto leave;          goto leave;
103      }      }
104            
# Line 90  hkp_send_key (HWND dlg, const char *kser Line 106  hkp_send_key (HWND dlg, const char *kser
106      status_box (dlg, msg, _("GnuPG status"));      status_box (dlg, msg, _("GnuPG status"));
107            
108  leave:  leave:
109      gpgme_release (c);      gpgme_release (ctx);
110      if (rawkey)      if (rawkey)
111          gpgme_free (rawkey);          gpgme_free (rawkey);
112      return rc;      return ec? -1 : 0;
113  } /* hkp_send_key */  }
114    
115    
116  int  
117  hkp_recv_key (HWND dlg, const char *kserver, u16 port,  /* Show all received keys from the keyserver. */
118                const char *pattern, int proto, int flags)  static void
119    show_imported_keys (gpgme_import_result_t res)
120    {
121        gpgme_import_status_t t;
122        gpgme_key_t key;
123        gpgme_data_t msg;
124        gpgme_ctx_t ctx;
125        gpgme_error_t err;
126        const char *s;
127        char *p, *uid;
128        size_t n=0;
129    
130        if (!res)
131            return;
132    
133        err = gpgme_data_new (&msg);
134        if (err)
135            BUG (NULL);
136        err = gpgme_new (&ctx);
137        if (err)
138            BUG (NULL);
139        if (res->considered > 1) {
140            s = _("WARNING: multiple keys matched request.\n\n");
141            gpgme_data_write (msg, s, strlen (s));
142        }
143    
144        if (res->unchanged == res->considered)
145            s = _("Key(s) successfully received but nothing was changed.");
146        else
147            s = _("Key(s) sucessfully received and imported.");
148        gpgme_data_write (msg, s, strlen (s));
149        gpgme_data_write (msg, "\n\n", 2);
150    
151        for (t=res->imports; t; t = t->next) {
152            if (!gpgme_get_key (ctx, t->fpr, &key, 0)) {
153                s = uid = utf8_to_wincp2 (key->uids->uid);
154                gpgme_data_write (msg, s, strlen (s));
155                gpgme_data_write (msg, "\n", 1);
156                gpgme_key_release (key);
157                free (uid);
158            }
159        }
160        gpgme_data_write (msg, "\0", 1);
161        p = gpgme_data_release_and_get_mem (msg, &n);
162        if (p != NULL) {
163            msg_box (NULL, p, _("Imported Keys"), MB_INFO);
164            gpgme_free (p);
165        }
166        gpgme_release (ctx);
167    }
168    
169    
170    /* Receive a key from the keyserver @kserver (port @port)
171       with the pattern @pattern.
172       Return value: 0 on success. */
173    static int
174    keyserver_recv_key (HWND dlg, const char *kserver, WORD port,
175                        const char *pattern, int proto, int flags,
176                        char **r_fpr)
177  {  {
178      gpgme_ctx_t ctx;      gpgme_ctx_t ctx;
179      gpgme_data_t keydata;      gpgme_data_t keydata;
180      gpgme_error_t ec;      gpgme_error_t ec;
181      gpgme_import_result_t import_res = NULL;      gpgme_import_result_t import_res = NULL;    
182        char *rawkey = NULL;
183      int rc;      int rc;
     char *rawkey = NULL, msg[384];  
184            
185        /* XXX: implement dynamic buffers. */
186      rawkey = new char[MAX_KEYSIZE];      rawkey = new char[MAX_KEYSIZE];
187      if (!rawkey)      if (!rawkey)
188          BUG (0);          BUG (0);
189      memset (rawkey, 0, MAX_KEYSIZE);      memset (rawkey, 0, MAX_KEYSIZE);
190      if( proto == KSPROTO_LDAP ) {      if (proto == KSPROTO_LDAP) {
191          rc = ldap_recvkey( kserver, pattern, rawkey, MAX_KEYSIZE-1 );          rc = ldap_recvkey (kserver, pattern, rawkey, MAX_KEYSIZE-1);
192          if( rc ) {          if (rc) {
193              msg_box( dlg, _("LDAP key import failed.\n"              msg_box (dlg, _("LDAP key import failed.\n"
194                              "Please make sure you have an online connection"                              "Please make sure you have an online connection"
195                              " and gpgkeys_ldap.exe is installed"),                              " and gpgkeys_ldap.exe is installed"),
196                              _("Keyserver"), MB_ERR );                              _("Keyserver"), MB_ERR);
197              free_if_alloc( rawkey );              free_if_alloc (rawkey);
198              return rc;              return rc;
199          }          }
200      }      }
201      else if (proto == KSPROTO_FINGER) {      else if (proto == KSPROTO_FINGER) {
202          rc = finger_recvkey (kserver, pattern, rawkey, MAX_KEYSIZE-1);          rc = finger_recvkey (kserver, pattern, rawkey, MAX_KEYSIZE-1);
203          if (rc) {          if (rc) {
204              log_box (_("Keyserver"), MB_ERR, _("Finger key import failed: %s\n"),              log_box (_("Keyserver"), MB_ERR,
205                       winpt_strerror (rc));                       _("Finger key import failed: %s\n"), winpt_strerror (rc));
206              free_if_alloc (rawkey);              free_if_alloc (rawkey);
207              return rc;              return rc;
208          }          }
209      }      }
210      else if( ( rc = kserver_recvkey( kserver, port, kserver_check_keyid( pattern ),      else if ((rc = kserver_recvkey (kserver, port,
211                                       rawkey, MAX_KEYSIZE-1 ) ) ) {                                      kserver_check_keyid (pattern),
212                                        rawkey, MAX_KEYSIZE-1))) {
213          hkp_err_box (dlg, kserver, port, rc);          hkp_err_box (dlg, kserver, port, rc);
214          free_if_alloc (rawkey);          free_if_alloc (rawkey);
215          return rc;          return rc;
216      }      }
217      else {      else {
218          if( !strstr( rawkey, "BEGIN PGP PUBLIC KEY BLOCK" ) ) {          if (!strstr (rawkey, "BEGIN PGP PUBLIC KEY BLOCK")) {
219              msg_box( dlg, _("This is not a valid OpenPGP key."), _("Keyserver"), MB_ERR );              msg_box (dlg, _("This is not a valid OpenPGP key."),
220                         _("Keyserver"), MB_ERR);
221              goto leave;              goto leave;
222          }          }
223          ec = gpgme_new( &ctx );          ec = gpgme_new (&ctx);
224          if( ec )          if (ec)
225              BUG( NULL );              BUG (NULL);
226          gpgme_data_new_from_mem( &keydata, rawkey, strlen( rawkey ), 1 );          gpgme_data_new_from_mem (&keydata, rawkey, strlen (rawkey), 1);
227          rc = gpgme_op_import( ctx, keydata );          rc = gpgme_op_import (ctx, keydata);
228          if( rc ) {          if (rc) {
229              msg_box( dlg, gpgme_strerror( (gpgme_error_t)rc ), _("Import"), MB_ERR );              msg_box (dlg, gpgme_strerror ((gpgme_error_t)rc), _("Import"), MB_ERR);
230              goto leave;              goto leave;
231          }          }
232          import_res = gpgme_op_import_result (ctx);          import_res = gpgme_op_import_result (ctx);
233            if (import_res && r_fpr)
234                *r_fpr = m_strdup (import_res->imports->fpr);
235      }      }
236            
237      /* 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
238         a summarize at the end is presented and not for each key. */         a summarize at the end is presented and not for each key. */
239      if (!(flags & KM_KS_REFRESH)) {      if (!(flags & KM_KS_REFRESH)) {
240          if (import_res && import_res->new_user_ids == 0) {          show_imported_keys (import_res);
241              _snprintf (msg, DIM (msg)-1,          if (import_res && import_res->unchanged == import_res->considered) {
242                         _("Key '%s' successfully received but nothing was changed."), pattern );              rc = WPTERR_GENERAL; /* no keys updated. */
             status_box (dlg, msg, _("GnuPG Status"));  
             rc = WPTERR_GENERAL;  
243              goto leave;              goto leave;
244          }          }
         _snprintf (msg, DIM (msg)-1, _("Key '%s' sucessfully received and imported."), pattern);  
         status_box (dlg, msg, _("GnuPG Status"));  
245      }      }
246        
247  leave:  leave:
248      free_if_alloc (rawkey);      free_if_alloc (rawkey);
249      gpgme_release (ctx);      gpgme_release (ctx);
250      gpgme_data_release (keydata);      gpgme_data_release (keydata);
251    
252      return rc;      return rc;
253  } /* hkp_recv_key */  }
254    
255    
256  #define my_iskeychar(a) ( ( (a) >='0' && (a) <= '9' ) || ( (a) >= 'A' && (a) <= 'F' ) )  /* Alias for keyserver_recv_key but without the ability to return
257       the fingerprint of the key. */
258    int
259    hkp_recv_key (HWND dlg, const char *kserver, WORD port,
260                  const char *pattern, int proto, int flags)
261    {
262        return keyserver_recv_key (dlg, kserver, port, pattern,
263                                   proto, flags, NULL);
264    }
265    
266    int
267    hkp_recv_key2 (HWND dlg, const char *kserver, WORD port,
268                   const char *pattern, int proto, char **r_fpr)
269    {
270        return keyserver_recv_key (dlg, kserver, port, pattern, proto, 0,
271                                   r_fpr);
272    }
273    
274    
275    #define my_iskeychar(a) (((a) >='0' && (a) <= '9' ) || ((a) >= 'A' && (a) <= 'F'))
276    
277  static int  static int
278  check_pattern( const char *pattern )  check_pattern (const char *pattern)
279  {  {
280      int rc = 1;      int rc = 1;
281            
282      /* Whitespace are not allowed! */      /* Whitespace are not allowed! */
283      if( strchr( pattern, ' ') ) {      if (strchr (pattern, ' ')) {
284          rc = WPTERR_GENERAL;          rc = WPTERR_GENERAL;
285          goto leave;          goto leave;
286      }      }
287            
288      if( (( strstr( pattern, "0x" ) ) && ( strlen( pattern ) == 10 ) )      if (((strstr (pattern, "0x")) && (strlen (pattern) == 10)) ||
289           || (strstr(pattern, "0x")) && ( strlen( pattern )  == 18 ) ) {           (strstr(pattern, "0x")) && (strlen (pattern)  == 18)) {
290          rc = 0;          rc = 0; /* Either long or short keyid */
291          goto leave;          goto leave;
292      }      }
293            
# Line 203  check_pattern( const char *pattern ) Line 297  check_pattern( const char *pattern )
297          goto leave;          goto leave;
298      }      }
299            
300      if( ( strchr( pattern, '@' ) ) && ( strlen( pattern ) >= 3 ) ) {      if ((strchr (pattern, '@')) &&
301            (strlen (pattern) >= 3)) {
302          rc = 0;          rc = 0;
303          goto leave;          goto leave;
304      }      }
# Line 213  leave: Line 308  leave:
308  } /* check_pattern */  } /* check_pattern */
309    
310    
311    /* Return human readable name for the proxy protocol. */
312    static const char*
313    name_from_proto (int proto)
314    {
315        const char *s;
316    
317        switch (proto) {
318        case PROXY_PROTO_HTTP: s = "HTTP"; break;
319        case PROXY_PROTO_SOCKS5: s =  "SOCKS5"; break;
320        default: s= "HTTP"; break;
321        }
322        return s;
323    }
324    
325    
326  static void  static void
327  set_proxy (HWND dlg)  set_proxy (HWND dlg)
328  {  {
329      char proxy[384];      char buf[384];
330      int port = 0;  
331            if (proxy.host)
332      strcpy (proxy, "HTTP proxy: ");          _snprintf (buf, sizeof (buf)-1, "%s proxy: \"%s:%d\"",
333      if (kserver_get_proxy (&port)) {                     name_from_proto (proxy.proto), proxy.host, proxy.port);
         char t[256];  
         const char *http = kserver_get_proxy (&port);  
         _snprintf (t, sizeof (t) - 1, "\"%s:%d\"", http, port);  
         strcat (proxy, t);  
     }  
334      else      else
335          strcat( proxy, "none" );          strcpy (buf, _("Proxy: none"));
336      SetDlgItemText( dlg, IDC_KEYSERVER_PROXY, proxy );      SetDlgItemText (dlg, IDC_KEYSERVER_PROXY, buf);
337  } /* set_proxy */  }
338    
339    
340  static int inline  static int inline
# Line 241  kserver_get_pos (listview_ctrl_t lv) Line 346  kserver_get_pos (listview_ctrl_t lv)
346  }  }
347    
348    
349  static u16 inline  static WORD inline
350  kserver_get_port (listview_ctrl_t lv)  kserver_get_port (listview_ctrl_t lv)
351  {  {
352      char buf[16];      char buf[16];
353    
354      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);
355      return (u16)strtoul (buf, NULL, 10);      return (WORD)strtoul (buf, NULL, 10);
356  }  }
357    
358    
359    /* Load the default keyserver and mark it in @lv. */
360  static void  static void
361  load_default_ks (listview_ctrl_t lv)  load_default_ks (listview_ctrl_t lv)
362  {  {
# Line 259  load_default_ks (listview_ctrl_t lv) Line 366  load_default_ks (listview_ctrl_t lv)
366      p = get_reg_entry_keyserver ("Default");      p = get_reg_entry_keyserver ("Default");
367      if (!p)      if (!p)
368          return;          return;
369      for( i = 0; i < listview_count_items( lv, 0 ); i++ ) {      for (i = 0; i < listview_count_items (lv, 0); i++) {
370          listview_get_item_text( lv, i, 0, buf, sizeof (buf)-1 );          listview_get_item_text (lv, i, KS_COL_NAME, buf, sizeof (buf)-1);
371          if( !strncmp( p, buf, strlen( p ) ) ) {          if (!strncmp (p, buf, strlen (p))) {
372              listview_add_sub_item( lv, i, 2, "x" );              listview_add_sub_item (lv, i, KS_COL_DEFAULT, "x");
373              break;              break;
374          }          }
375      }      }
376      free_if_alloc (p);      free_if_alloc (p);
377  } /* load_default_ks */  }
   
378    
379    /* Save the selected keyserver from @lv as the default server. */
380  static int  static int
381  save_default_ks (listview_ctrl_t lv)  save_default_ks (listview_ctrl_t lv)
382  {  {
383      char buf[192], port[32];      char buf[192], port[32];
384      int idx, i;        int idx, i;  
385    
386      idx = listview_get_curr_pos( lv );      idx = listview_get_curr_pos (lv);
387      if( idx == -1 ) {      if (idx == -1) {
388          msg_box( NULL, _("Please select one of the servers."), _("Keyserver"), MB_ERR );          msg_box (NULL, _("Please select one of the servers."), _("Keyserver"), MB_ERR);
389          return -1;          return -1;
390      }      }
391      listview_get_item_text( lv, idx, 1, buf, sizeof (buf)-1 );      listview_get_item_text (lv, idx, KS_COL_NAME, buf, sizeof (buf)-1);
392      if( *buf != 'H' ) {      if (!strncmp (buf, "http", 4) && !strncmp (buf, "hkp", 3)) {
393          msg_box( NULL, _("Only HTTP keyserver can be used."), _("Keyserver"), MB_ERR );          msg_box (NULL, _("Only HTTP keyserver can be used."),
394                     _("Keyserver"), MB_ERR);
395          return -1;          return -1;
396      }      }
397      for (i = 0; i < listview_count_items( lv, 0 ); i++)      for (i = 0; i < listview_count_items (lv, 0); i++)
398          listview_add_sub_item (lv, i, 2, "");          listview_add_sub_item (lv, i, KS_COL_DEFAULT, "");
399      listview_add_sub_item (lv, idx, 2, "x");      listview_add_sub_item (lv, idx, KS_COL_DEFAULT, "x");
400      listview_get_item_text (lv, idx, 0, buf, sizeof (buf)-1);      listview_get_item_text (lv, idx, KS_COL_NAME, buf, sizeof (buf)-1);
401      set_reg_entry_keyserver ("Default", buf);      set_reg_entry_keyserver ("Default", buf);
402      i = kserver_get_port (lv);      i = kserver_get_port (lv);
403      sprintf (port, "%d", i);      sprintf (port, "%d", i);
404      set_reg_entry_keyserver ("Default_Port", port);      set_reg_entry_keyserver ("Default_Port", port);
405      keyserver_set_default (buf, (u16)i);      keyserver_set_default (buf, (WORD)i);
406      return 0;      return 0;
407  } /* save_default_ks */  }
408    
409    
410  int  int
411  keyserver_list_build (listview_ctrl_t *r_lv, HWND hwnd)  keyserver_list_build (listview_ctrl_t *r_lv, HWND hwnd)
412  {  {
413      struct listview_column_s keyserver[] = {      struct listview_column_s keyserver[] = {
414          {0, 160, (char *)_("DNS Name")},                  {0, 160, (char *)_("DNS Name")},
415          {1,  52, (char *)_("Protocol")},          {1,  46, (char *)_("Port")},
416          {2,  46, (char *)_("Default")},          {2,  60, (char *)_("Default")},
         {3,  46, (char *)_("Port")},  
417          {0,   0, NULL}          {0,   0, NULL}
418      };      };
419        HICON ico[1];
420      listview_ctrl_t lv;      listview_ctrl_t lv;
421      char buf[32];      char buf[32];
422      int j;      int j;
423    
424        ico[0] = LoadIcon (glob_hinst, (LPCTSTR)IDI_COMPUTER);
425      listview_new (&lv);          listview_new (&lv);    
426      lv->ctrl = hwnd;            lv->ctrl = hwnd;
427      for (j=0; keyserver[j].fieldname; j++)      for (j=0; keyserver[j].fieldname; j++)
428          listview_add_column (lv, &keyserver[j]);                  listview_add_column (lv, &keyserver[j]);
429        listview_set_image_list (lv, 16, 16, ico, 1);
430      for (j = 0; j<MAX_KEYSERVERS; j++) {      for (j = 0; j<MAX_KEYSERVERS; j++) {
431          if (!server[j].used)          if (!server[j].used)
432              continue;              continue;
433          listview_add_item (lv, " ");          listview_add_item_image (lv, " ", 0);
434          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;  
         }  
435          sprintf (buf, "%d", server[j].port);          sprintf (buf, "%d", server[j].port);
436          listview_add_sub_item (lv, 0, 3, buf);          listview_add_sub_item (lv, 0, KS_COL_PORT, buf);
437      }      }
438      load_default_ks (lv);      load_default_ks (lv);
439      if (listview_count_items (lv, 0) == 0) {      if (listview_count_items (lv, 0) == 0) {
440          listview_add_item (lv, "");          listview_add_item (lv, "");
441          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");  
442      }      }
443      listview_set_ext_style (lv);      listview_set_ext_style (lv);
444      *r_lv = lv;      *r_lv = lv;
# Line 345  keyserver_list_build (listview_ctrl_t *r Line 446  keyserver_list_build (listview_ctrl_t *r
446  }  }
447    
448    
449    static void
450    keyserver_remove (listview_ctrl_t lv)
451    {
452        char name[100];
453        int pos = listview_get_curr_pos (lv);
454        int i;
455    
456        listview_get_item_text (lv, pos, KS_COL_NAME, name, sizeof (name)-1);
457        for (i=0; i < MAX_KEYSERVERS; i++) {
458            if (server[i].name && strcmp (server[i].name, name) == 0)
459                server[i].used = 0;
460        }
461        listview_del_item (lv, pos);
462    }
463    
464    
465    static void
466    keyserver_edit (listview_ctrl_t lv, keyserver_rec_t ctx)
467    {
468        char buf[16];
469        bool fnd = false;
470        int i;
471    
472        for (i=0; i < MAX_KEYSERVERS; i++) {
473            if (server[i].name && strcmp (server[i].name, ctx->name) == 0) {
474                fnd = true;
475                break;
476            }
477        }
478        if (!fnd)
479            return;
480        server[i].port = ctx->port;
481    
482        i = listview_get_curr_pos (lv);
483        sprintf (buf, "%d", ctx->port);
484        listview_add_sub_item (lv, i, KS_COL_NAME, ctx->name);
485        listview_add_sub_item (lv, i, KS_COL_PORT, buf);
486    }
487    
488    static void
489    keyserver_add (listview_ctrl_t lv, keyserver_rec_t ctx)
490    {
491        char buf[16];
492        bool fnd = false;
493        int i;
494    
495        for (i=0; i < MAX_KEYSERVERS; i++) {
496            if (server[i].used == 0) {
497                fnd = true;
498                break;
499            }
500        }
501        if (!fnd) {
502            msg_box (NULL, _("No space for new keyserver entry"),
503                     _("Keyserver"), MB_ERR);
504            return;
505        }
506        free_if_alloc (server[i].name);
507        server[i].name = m_strdup (ctx->name);
508        server[i].port = ctx->port;
509        server[i].proto = ctx->proto;
510        server[i].used = 1;
511    
512        sprintf (buf, "%d", ctx->port);
513        listview_add_item (lv, " ");
514        listview_add_sub_item (lv, 0, KS_COL_NAME, ctx->name);
515        listview_add_sub_item (lv, 0, KS_COL_PORT, buf);
516    }
517    
518    
519    static void
520    fill_keyserv_types (HWND dlg)
521    {
522        HWND h = GetDlgItem (dlg, IDC_KSERVADD_TYPES);
523        combox_add_string (h, _("HKP Keyserver"));
524        combox_add_string (h, _("LDAP Keyserver"));
525        combox_add_string (h, _("Finger Keyserver"));
526        SendMessage (h, CB_SETCURSEL, 0, 0);
527    }
528    
529    
530    /* Dialog box procedure for modify keyservers. */
531    BOOL CALLBACK
532    keyserver_modify_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
533    {
534        static keyserver_rec_t ctx;
535        char tmp[128];
536    
537        switch (msg) {
538        case WM_INITDIALOG:
539            fill_keyserv_types (dlg);
540            ctx = (keyserver_rec_t)lparam;
541            if (ctx->mode) {
542                SendDlgItemMessage (dlg, IDC_KSERVADD_TYPES, CB_SETCURSEL, ctx->proto, 0);
543                SetDlgItemText (dlg, IDC_KSERVADD_HOST, ctx->name);
544                SetDlgItemInt (dlg, IDC_KSERVADD_PORT, ctx->port, FALSE);
545                EnableWindow (GetDlgItem (dlg, IDC_KSERVADD_HOST), FALSE);
546                EnableWindow (GetDlgItem (dlg, IDC_KSERVADD_TYPES), FALSE);
547            }
548            else
549                SetDlgItemInt (dlg, IDC_KSERVADD_PORT, 11371, FALSE);
550            SetWindowText (dlg, _("Edit Keyserver"));
551            SetDlgItemText (dlg, IDOK, _("&Add"));
552            SetDlgItemText (dlg, IDCANCEL, _("&Cancel"));
553            SetDlgItemText (dlg, IDC_KSERVADD_TYPEINF, _("Type:"));
554            SetDlgItemText (dlg, IDC_KSERVADD_PORTINF, _("Port:"));
555            SetDlgItemText (dlg, IDC_KSERVADD_HOSTINF, _("Host name:"));
556            SetForegroundWindow (dlg);
557            break;
558    
559        case WM_COMMAND:
560            switch (LOWORD (wparam)) {
561            case IDOK:
562                if (!GetDlgItemText (dlg, IDC_KSERVADD_HOST, tmp, sizeof (tmp)-1)) {
563                    msg_box (dlg, _("Please enter a host name"), _("Keyserver"), MB_ERR);
564                    return FALSE;
565                }      
566                ctx->port = GetDlgItemInt (dlg, IDC_KSERVADD_PORT, NULL, FALSE);
567                if (ctx->port > 65535) {
568                    msg_box (dlg, _("Invalid port, valid numbers are < 65535"), _("Keyserver"), MB_ERR);
569                    return FALSE;
570                }
571                ctx->proto = SendDlgItemMessage (dlg, IDC_KSERVADD_TYPES, CB_GETCURSEL, 0, 0);
572                ctx->cancel = false;
573                ctx->name[0] = '\0';
574                if (!strstr (tmp, "://")) {
575                    switch (ctx->proto) {
576                    case KSPROTO_HTTP: strcpy (ctx->name, "http://"); break;
577                    case KSPROTO_LDAP: strcpy (ctx->name, "ldap://"); break;
578                    case KSPROTO_FINGER:strcpy (ctx->name, "finger://"); break;
579                    }
580                }
581                strcat (ctx->name, tmp);
582                ctx->cancel = false;
583                EndDialog (dlg, TRUE);
584                break;
585    
586            case IDCANCEL:
587                ctx->cancel = true;
588                EndDialog (dlg, FALSE);
589                break;
590            }
591            break;
592        }
593    
594        return FALSE;
595    }
596    
597    /* Dialog box procedure to access keyservers. */
598  BOOL CALLBACK  BOOL CALLBACK
599  keyserver_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)  keyserver_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
600  {  {
601      static listview_ctrl_t lv = NULL;      static listview_ctrl_t lv = NULL;
602      static int lv_idx = 0;      static int lv_idx = 0;
     int rc, proto_nr = 0;  
     char kserver[128], pattern[128];  
     char proto[16];      
603      keyserver_ctx ksc;      keyserver_ctx ksc;
604        struct keyserver_rec_s edit;
605        char kserver[128], pattern[128];
606        char proto[16], *fpr = NULL;
607        int rc, proto_nr = 0;
608            
609      switch ( msg ) {      switch (msg) {
610      case WM_INITDIALOG:      case WM_INITDIALOG:
611          SetWindowText (dlg, _("Keyserver Access"));          SetWindowText (dlg, _("Keyserver Access"));
612          SetDlgItemText (dlg, IDC_KEYSERVER_RECV, _("&Receive"));          SetDlgItemText (dlg, IDC_KEYSERVER_RECV, _("&Receive"));
# Line 366  keyserver_dlg_proc (HWND dlg, UINT msg, Line 617  keyserver_dlg_proc (HWND dlg, UINT msg,
617          SetDlgItemText (dlg, IDC_KEYSERVER_INDEX, _("&Search"));          SetDlgItemText (dlg, IDC_KEYSERVER_INDEX, _("&Search"));
618          SetDlgItemText (dlg, IDC_KEYSERVER_PROXSETT, _("C&hange"));          SetDlgItemText (dlg, IDC_KEYSERVER_PROXSETT, _("C&hange"));
619          SetDlgItemText (dlg, IDC_KEYSERVER_DEFAULT, _("Set &default"));          SetDlgItemText (dlg, IDC_KEYSERVER_DEFAULT, _("Set &default"));
620          SetDlgItemText (dlg, IDCANCEL, _("&Cancel"));          SetDlgItemText (dlg, IDCANCEL, _("&Close"));
621    
622          set_proxy (dlg);          set_proxy (dlg);
623          keyserver_list_build (&lv, GetDlgItem (dlg, IDC_KEYSERVER_LIST));          keyserver_list_build (&lv, GetDlgItem (dlg, IDC_KEYSERVER_LIST));
# Line 377  keyserver_dlg_proc (HWND dlg, UINT msg, Line 628  keyserver_dlg_proc (HWND dlg, UINT msg,
628      case WM_NOTIFY:      case WM_NOTIFY:
629          NMHDR *notify;          NMHDR *notify;
630          notify = (NMHDR *)lparam;          notify = (NMHDR *)lparam;
631          if( notify && notify->code == NM_CLICK          if (!notify)
632              && notify->idFrom == IDC_KEYSERVER_LIST )              break;
633              lv_idx = listview_get_curr_pos( lv );          if (notify->code == NM_CLICK
634                && notify->idFrom == IDC_KEYSERVER_LIST)
635                lv_idx = listview_get_curr_pos (lv);
636            else if (notify->code == NM_RCLICK &&
637                     notify->idFrom == IDC_KEYSERVER_LIST) {
638                POINT p;
639                GetCursorPos (&p);
640                HMENU hm, pop;
641                hm = LoadMenu (glob_hinst, (LPCTSTR)IDR_WINPT_KEYSERVER_CTX);
642                pop = GetSubMenu (hm, 0);
643                set_menu_text (pop, ID_KSERVCTX_ADD, _("&Add"));
644                set_menu_text (pop, ID_KSERVCTX_DEL, _("&Remove"));
645                set_menu_text (pop, ID_KSERVCTX_EDIT, _("&Edit"));
646                TrackPopupMenu (pop, 0, p.x, p.y, 0, dlg, NULL);
647                DestroyMenu (hm);
648                DestroyMenu (pop);
649            }
650    
651          return TRUE;          return TRUE;
652                    
653      case WM_DESTROY:      case WM_DESTROY:
654          if( lv ) {          if (lv) {
655              listview_release( lv );              listview_release (lv);
656              lv = NULL;              lv = NULL;
657          }          }
658          lv_idx = 0;          lv_idx = 0;
659          return FALSE;          return FALSE;
660                    
661      case WM_SYSCOMMAND:      case WM_SYSCOMMAND:
662          if( LOWORD( wparam ) == SC_CLOSE )          if (LOWORD (wparam) == SC_CLOSE)
663              EndDialog( dlg, TRUE );              EndDialog (dlg, TRUE);
664          return FALSE;          return FALSE;
665                    
666      case WM_COMMAND:      case WM_COMMAND:
667          switch( LOWORD( wparam ) ) {          switch (LOWORD (wparam)) {
668          case IDC_KEYSERVER_PROXSETT:          case IDC_KEYSERVER_PROXSETT:
669              dialog_box_param( glob_hinst, (LPCTSTR)IDD_WINPT_KEYSERVER_PROXY, glob_hwnd,              dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_KEYSERVER_PROXY,
670                                keyserver_proxy_dlg_proc, 0,                                dlg, keyserver_proxy_dlg_proc, NULL,
671                                _("Proxy Settings"), IDS_WINPT_KEYSERVER_PROXY );                                _("Proxy Settings"), IDS_WINPT_KEYSERVER_PROXY);
672              set_proxy( dlg );              set_proxy (dlg);
673              return TRUE;              return TRUE;
674                            
675          case IDC_KEYSERVER_INDEX:          case IDC_KEYSERVER_INDEX:
676              if (!lv_idx) {              if (!lv_idx) {
677                  lv_idx = kserver_get_pos (lv);                  lv_idx = kserver_get_pos (lv);
678                  if (lv_idx == -1) {                  if (lv_idx == -1) {
679                      msg_box (dlg, _("Please select one of the keyservers."), _("Keyserver"), MB_INFO);                      msg_box (dlg, _("Please select one of the keyservers."),
680                                 _("Keyserver"), MB_INFO);
681                      return FALSE;                      return FALSE;
682                  }                  }
683              }              }
684              listview_get_item_text (lv, lv_idx, 1, proto, sizeof (proto)-1);              listview_get_item_text (lv, lv_idx, KS_COL_NAME,
685              if (*proto == 'L') {                                      proto, sizeof (proto)-1);
686                  msg_box( dlg, _("This is not implemented yet!"), _("Keyserver"), MB_ERR );              if (!strncmp (proto, "ldap", 4)) {
687                    msg_box (dlg, _("This is not implemented yet!"),
688                             _("Keyserver"), MB_ERR);
689                  return FALSE;                  return FALSE;
690              }              }
691              listview_get_item_text (lv, lv_idx, 0, kserver, sizeof (kserver)-1);              listview_get_item_text (lv, lv_idx, KS_COL_NAME,
692                                        kserver, sizeof (kserver)-1);
693              if (!GetDlgItemText (dlg, IDC_KEYSERVER_SEARCH, pattern, sizeof (pattern)-1)) {              if (!GetDlgItemText (dlg, IDC_KEYSERVER_SEARCH, pattern, sizeof (pattern)-1)) {
694                  msg_box (dlg, _("Please enter the search pattern."), _("Keyserver"), MB_INFO);                  msg_box (dlg, _("Please enter the search pattern."),
695                             _("Keyserver"), MB_INFO);
696                  return FALSE;                  return FALSE;
697              }              }
698              ksc.name = kserver;              ksc.name = kserver;
699              ksc.pattern = pattern;              ksc.pattern = pattern;
700              ksc.port = kserver_get_port (lv);              ksc.port = kserver_get_port (lv);
701              DialogBoxParam( glob_hinst, (LPCSTR)IDD_WINPT_HKPSEARCH, dlg,              DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_HKPSEARCH, dlg,
702                              hkpsearch_dlg_proc, (LPARAM) &ksc );                              hkpsearch_dlg_proc, (LPARAM) &ksc);
703              return TRUE;              return TRUE;
704                            
705          case IDC_KEYSERVER_RECV:          case IDC_KEYSERVER_RECV:
# Line 434  keyserver_dlg_proc (HWND dlg, UINT msg, Line 707  keyserver_dlg_proc (HWND dlg, UINT msg,
707              if (!lv_idx) {              if (!lv_idx) {
708                  lv_idx = kserver_get_pos (lv);                  lv_idx = kserver_get_pos (lv);
709                  if (lv_idx == -1) {                  if (lv_idx == -1) {
710                      msg_box( dlg, _("Please select one of the keyservers."), _("Keyserver"), MB_INFO );                      msg_box (dlg, _("Please select one of the keyservers."),
711                                _("Keyserver"), MB_INFO);
712                      return FALSE;                      return FALSE;
713                  }                  }
714              }              }
715              listview_get_item_text( lv, lv_idx, 1, proto, sizeof (proto)-1 );              listview_get_item_text (lv, lv_idx, KS_COL_NAME,
716                                        proto, sizeof (proto)-1);
717              proto_nr = KSPROTO_HTTP;              proto_nr = KSPROTO_HTTP;
718              if( *proto == 'L' )              if (!strncmp  (proto, "ldap", 4))
719                  proto_nr = KSPROTO_LDAP;                  proto_nr = KSPROTO_LDAP;
720              else if( *proto == 'F' )              else if (!strncmp (proto, "finger", 6))
721                  proto_nr = KSPROTO_FINGER;                  proto_nr = KSPROTO_FINGER;
722              listview_get_item_text( lv, lv_idx, 0, kserver, sizeof (kserver)-1 );              listview_get_item_text (lv, lv_idx, KS_COL_NAME,
723              if( !GetDlgItemText( dlg, IDC_KEYSERVER_SEARCH, pattern, sizeof (pattern)-1 ) ) {                                      kserver, sizeof (kserver)-1);
724                  msg_box( dlg, _("Please enter the search pattern."), _("Keyserver"), MB_INFO );              if (!GetDlgItemText(dlg, IDC_KEYSERVER_SEARCH,
725                                    pattern, sizeof (pattern)-1)) {
726                    msg_box (dlg, _("Please enter the search pattern."),
727                             _("Keyserver"), MB_INFO);
728                  return FALSE;                  return FALSE;
729              }              }
730              if( proto_nr == KSPROTO_LDAP && strchr( pattern, '@' ) ) {              if (proto_nr == KSPROTO_LDAP && strchr (pattern, '@')) {
731                  msg_box( dlg, _("Only keyids are allowed."), _("LDAP Keyserver"), MB_INFO );                  msg_box (dlg, _("Only keyids are allowed."),
732                             _("Keyserver"), MB_INFO);
733                  return FALSE;                  return FALSE;
734              }              }
735              else if (proto_nr == KSPROTO_FINGER) {              else if (proto_nr == KSPROTO_FINGER) {
736                  if (strchr (pattern, '@') || strchr (pattern, ' ')) {                  if (strchr (pattern, '@') || strchr (pattern, ' ')) {
737                      msg_box (dlg, _("Only enter the name of the user."), _("FINGER Keyserver"), MB_INFO);                      msg_box (dlg, _("Only enter the name of the user."),
738                                 _("Keyserver"), MB_INFO);
739                      return FALSE;                      return FALSE;
740                  }                  }
741              }              }
742              else if( check_pattern( pattern ) ) {              else if (check_pattern (pattern)) {
743                  msg_box( dlg, _("Only email addresses or keyids are allowed."), _("HKP Keyserver"), MB_INFO );                  msg_box (dlg, _("Only email addresses or keyids are allowed."),
744                            _("Keyserver"), MB_INFO);
745                  return FALSE;                  return FALSE;
746              }              }
747              rc = hkp_recv_key (dlg, kserver, kserver_get_port (lv), pattern, proto_nr, 0);              rc = keyserver_recv_key (dlg, kserver, kserver_get_port (lv),
748              if (!rc)                                       pattern, proto_nr, 0,
749                  keycache_set_reload (1);                                       &fpr);
750                if (!rc && fpr != NULL) {
751                    keycache_update (0, fpr);
752                    free_if_alloc (fpr);
753                }
754              return TRUE;              return TRUE;
755    
756          case IDC_KEYSERVER_DEFAULT:          case IDC_KEYSERVER_DEFAULT:
757              save_default_ks( lv );              save_default_ks (lv);
758              break;              break;
759    
760            case ID_KSERVCTX_ADD:
761                memset (&edit, 0, sizeof (edit));
762                edit.mode = false;
763                dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_KEYSERVER_ADD, dlg,
764                                    keyserver_modify_dlg_proc,
765                                    (LPARAM)&edit, _("Edit Keyserver"), 0);
766                if (!edit.cancel)
767                    keyserver_add (lv, &edit);
768                return TRUE;
769    
770            case ID_KSERVCTX_EDIT:
771                memset (&edit, 0, sizeof (edit));
772                edit.mode = true;
773                listview_get_item_text (lv, lv_idx, KS_COL_NAME,
774                                        edit.name, sizeof (edit.name)-1);
775                listview_get_item_text (lv, lv_idx, KS_COL_PORT, pattern, 32);
776                edit.port = atoi (pattern);
777                if (!strncmp (edit.name, "hkp", 3) || !strncmp (edit.name, "http", 4))
778                    edit.proto = KSPROTO_HTTP;
779                else if (!strncmp (edit.name, "ldap", 4))
780                    edit.proto = KSPROTO_LDAP;
781                else
782                    edit.proto = KSPROTO_FINGER;
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_edit (lv, &edit);
788                break;
789    
790            case ID_KSERVCTX_DEL:
791                keyserver_remove (lv);
792                return TRUE;
793                            
794          case IDCANCEL:          case IDCANCEL:
795              EndDialog( dlg, FALSE );              EndDialog (dlg, FALSE);
796              return FALSE;              return FALSE;
797          }          }
798          break;          break;
799      }      }
800            
801      return FALSE;      return FALSE;
802  } /* keyserver_dlg_proc */  }
Legend:
Removed from v.101  
changed lines
  Added in v.181
[email protected]
 ViewVC Help
Powered by ViewVC 1.1.26