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

Diff of /trunk/Src/wptKeyManagerDlg.cpp

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

revision 20 by twoaday, Wed Jul 27 11:17:22 2005 UTC revision 207 by twoaday, Fri Apr 28 10:28:24 2006 UTC
# Line 1  Line 1 
1  /* wptKeyManagerDlg.cpp - WinPT Key Manager  /* wptKeyManagerDlg.cpp - WinPT Key Manager
2   *      Copyright (C) 2000-2005 Timo Schulz   *      Copyright (C) 2000-2006 Timo Schulz
3   *      Copyright (C) 2004 Andreas Jobs   *      Copyright (C) 2004 Andreas Jobs
4   *   *
5   * This file is part of WinPT.   * This file is part of WinPT.
6   *   *
7   * WinPT is free software; you can redistribute it and/or modify   * WinPT is free software; you can redistribute it and/or modify
8   * it under the terms of the GNU General Public License as published by   * it under the terms of the GNU General Public License as published by
9   * the Free Software Foundation; either version 2 of the License, or   * the Free Software Foundation; either version 2 of the License, or
10   * (at your option) any later version.   * (at your option) any later version.
11   *   *
12   * WinPT is distributed in the hope that it will be useful,   * WinPT is distributed in the hope that it will be useful,
13   * but WITHOUT ANY WARRANTY; without even the implied warranty of   * but WITHOUT ANY WARRANTY; without even the implied warranty of
14   * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the   * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15   * GNU General Public License for more details.   * GNU General Public License for more details.
16   *   *
17   * You should have received a copy of the GNU General Public License   * You should have received a copy of the GNU General Public License
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
22  #include <windows.h>  #include <config.h>
23  #include <commctrl.h>  #endif
24    
25  #include "../resource.h"  #include <windows.h>
26  #include "wptTypes.h"  #include <commctrl.h>
27  #include "wptGPG.h"  
28  #include "wptCommonCtl.h"  #include "resource.h"
29  #include "wptContext.h" /* for passphrase_s */  #include "wptTypes.h"
30  #include "wptDlgs.h"  #include "wptGPG.h"
31  #include "wptW32API.h"  #include "wptCommonCtl.h"
32  #include "wptVersion.h"  #include "wptContext.h" /* for passphrase_s */
33  #include "wptKeylist.h"  #include "wptDlgs.h"
34  #include "wptNLS.h"  #include "wptW32API.h"
35  #include "wptErrors.h"  #include "wptVersion.h"
36  #include "wptHotkey.h"  #include "wptKeylist.h"
37  #include "wptKeyManager.h"  #include "wptNLS.h"
38  #include "wptKeyserver.h"  #include "wptErrors.h"
39  #include "wptKeyEdit.h"  #include "wptHotkey.h"
40  #include "wptRegistry.h"  #include "wptKeyManager.h"
41    #include "wptKeyserver.h"
42    #include "wptKeyEdit.h"
43  #define WINDOWCLASS_SEPARATOR_CHILD "WINPT_SEP_CHILD"  #include "wptRegistry.h"
44  #define SEPARATOR_HEIGHT            5  #include "wptUTF8.h"
45    
46  int treeview_add_item (HWND tree, HTREEITEM parent, const char * text);  /* Name and ID of the separator window. */
47    #define KM_SEPARATOR_ID                 10000
48  static subclass_s keylist_proc;  #define WINDOWCLASS_SEPARATOR_CHILD     "WINPT_SEP_CHILD"
49  static int km_index = -1;  
50  static int km_def_pos = 0;  /* Virtual key codes. */
51    #ifndef VK_F
52  HIMAGELIST glob_imagelist;  #define VK_F 70
53    #endif
54  struct km_info {  #ifndef VK_A
55      /* Window positions */  #define VK_A 65
56      int pos_x, pos_y;  #endif
57      int ypos_sep;  #ifndef VK_C
58      int ypercent_sep;  #define VK_C 67
59    #endif
60      HWND hwnd_sep;  #ifndef VK_P
61      HWND toolbar;  #define VK_P 80
62      HWND statbar;  #endif
63    
64      listview_ctrl_t lv;  static subclass_s keylist_proc;
65      int keylist_sortby;  
66  };  /* Handle to the global image list. */
67    HIMAGELIST glob_imagelist;
68  struct mybuttons {  
69      long icon;  struct km_info_s {
70      long command;      /* Window positions */
71      char *text;      int pos_x, pos_y;
72  };      int ypos_sep;
73        int ypercent_sep;
74  struct mybuttons myb[] = {  
75      {IMI_KEY_DELETE, ID_KEYMISC_DELETE, "Delete"},      /* Different kind of windows. */
76      {IMI_KEY_PROPS,  ID_KEYMISC_PROPS,  "Properties"},      HWND dlg;
77      {IMI_KEY_SIGN,   ID_KEYMISC_SIGN,   "Sign"},      HWND hwnd_sep;
78      {IMI_KEY_IMPORT, ID_KEYMISC_IMPORT, "Import"},      HWND toolbar;
79      {IMI_KEY_EXPORT, ID_KEYMISC_EXPORT, "Export"},      HWND statbar;
80  };  
81        listview_ctrl_t lv;
82        int             lv_idx;
83  static BOOL CALLBACK      int keylist_sortby;
84  keylist_subclass_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)  };
85  {  
86      switch (msg)  /* Toolbar button structure. */
87      {  struct mybuttons {
88      case WM_LBUTTONDBLCLK:      long icon;
89          send_cmd_id( keylist_proc.dlg, ID_KEYMISC_PROPS );      long command;
90          break;      char *text;
91            };
92      case WM_KEYUP:  
93          int virt_key = (int)wparam;  struct mybuttons myb[] = {
94          if (virt_key == VK_SPACE)      {IMI_KEY_DELETE, ID_KEYMISC_DELETE, "Delete"},
95          {      {IMI_KEY_PROPS,  ID_KEYMISC_PROPS,  "Properties"},
96              send_cmd_id( keylist_proc.dlg, ID_KEYMISC_PROPS );      {IMI_KEY_SIGN,   ID_KEYMISC_SIGN,   "Sign"},
97              break;      {IMI_KEY_IMPORT, ID_KEYMISC_IMPORT, "Import"},
98          }      {IMI_KEY_EXPORT, ID_KEYMISC_EXPORT, "Export"},
99          if (virt_key == VK_DELETE)  };
100          {  
101              send_cmd_id( keylist_proc.dlg, ID_KEYMISC_DELETE );  
102              break;  static void km_gui_import (struct km_info_s *kmi, int cmd_id, void *param);
103          }  
104          if (virt_key == VK_INSERT)  /* Subclass the keylist listview control to allow extended commands. */
105          {  static BOOL CALLBACK
106              send_cmd_id (keylist_proc.dlg, ID_KEYMISC_PASTE);  keylist_subclass_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
107              break;  {
108          }      struct listview_ctrl_s lv;
109          break;      struct km_info_s *kmi;
110      }  
111            switch (msg) {
112      return CallWindowProc( keylist_proc.old, dlg, msg, wparam, lparam );      case WM_DROPFILES:
113  } /* keylist_subclass_proc */          kmi = (km_info_s *)keylist_proc.opaque;
114            km_gui_import (kmi, WM_DROPFILES, (void*)wparam);
115            break;
116  static HWND  
117  load_toolbar (HWND dlg, struct km_info * kmi)      case WM_LBUTTONDBLCLK:
118  {          send_cmd_id (keylist_proc.dlg, ID_KEYMISC_PROPS);
119      HWND tbwnd;          break;
120      TBSAVEPARAMS tbsp;          
121      TBBUTTON tb_buttons[] = {      case WM_KEYUP:
122          /*{imagelist_getindex(IMI_EXIT),       ID_KEYMISC_QUIT,   TBSTATE_ENABLED, TBSTYLE_BUTTON, 0, 0L, 0},*/          int virt_key = (int)wparam;
123          {imagelist_getindex(IMI_KEY_DELETE), ID_KEYMISC_DELETE, TBSTATE_ENABLED, TBSTYLE_BUTTON, {0}, 0L, 0},          switch (virt_key) {
124          {imagelist_getindex(IMI_KEY_PROPS),  ID_KEYMISC_PROPS,  TBSTATE_ENABLED, TBSTYLE_BUTTON, {0}, 0L, 0},          case VK_SPACE:
125          {imagelist_getindex(IMI_KEY_SIGN),   ID_KEYMISC_SIGN,   TBSTATE_ENABLED, TBSTYLE_BUTTON, {0}, 0L, 0},              send_cmd_id (keylist_proc.dlg, ID_KEYMISC_PROPS);
126          {0,                                  0,                 0,               TBSTYLE_SEP,    {0}, 0L, 0},              break;
127          {imagelist_getindex(IMI_KEY_IMPORT), ID_KEYMISC_IMPORT, TBSTATE_ENABLED, TBSTYLE_BUTTON, {0}, 0L, 0},          
128          {imagelist_getindex(IMI_KEY_EXPORT), ID_KEYMISC_EXPORT, TBSTATE_ENABLED, TBSTYLE_BUTTON, {0}, 0L, 0},          case VK_DELETE:
129       };              send_cmd_id (keylist_proc.dlg, ID_KEYMISC_DELETE);
130                    break;
131      tbwnd = CreateWindowEx (0, TOOLBARCLASSNAME, NULL,          
132                              WS_CHILD|TBSTYLE_TOOLTIPS|TBSTYLE_FLAT|CCS_ADJUSTABLE,          case VK_INSERT:
133                              0, 0, 0, 0, dlg, (HMENU)IDR_WINPT_KMTB, glob_hinst, NULL);              send_cmd_id (keylist_proc.dlg, ID_KEYMISC_PASTE);
134      if (tbwnd) {              break;
135          SendMessage (tbwnd, TB_BUTTONSTRUCTSIZE, (WPARAM) sizeof(TBBUTTON), 0);  
136          SendMessage (tbwnd, TB_SETIMAGELIST, 0, (LPARAM)glob_imagelist);          case VK_A:
137                  SendMessage (tbwnd, TB_AUTOSIZE, 0, 0);              if (GetAsyncKeyState (VK_CONTROL)) {
138          ShowWindow (tbwnd, SW_SHOW);                  lv.ctrl = GetDlgItem (keylist_proc.dlg, IDC_KEYMISC_KEYLIST);
139                    listview_select_all (&lv);
140          /* Restore toolbar */              }
141          tbsp.hkr = HKEY_CURRENT_USER;              break;
142          tbsp.pszSubKey = "Software\\WinPT";              
143          tbsp.pszValueName = "KM_toolbar";          case VK_C:
144          if (SendMessage(tbwnd, TB_SAVERESTORE, FALSE, (LPARAM)&tbsp ) == 0)              if (GetAsyncKeyState (VK_CONTROL)) {
145              SendMessage (tbwnd, TB_ADDBUTTONS, sizeof(tb_buttons) / sizeof(tb_buttons[0]), (LONG)&tb_buttons[0]);                  lv.ctrl = GetDlgItem (keylist_proc.dlg, IDC_KEYMISC_KEYLIST);
146       }                  km_clip_export (keylist_proc.dlg, &lv);
147       return tbwnd;              }
148  } /* load_toolbar */              break;
149    
150            case VK_P:
151  static void              if (GetAsyncKeyState (VK_CONTROL))
152  do_center_window (HWND dlg, struct km_info * kmi)                  send_cmd_id (keylist_proc.dlg, ID_KEYMISC_PASTE);
153  {              break;
154      RECT rect;  
155      char * p;          case VK_F:
156      int pos_x = 0, pos_y = 0;              if (GetAsyncKeyState (VK_CONTROL)) {
157                            lv.ctrl = GetDlgItem (keylist_proc.dlg, IDC_KEYMISC_KEYLIST);
158      /* Find bottom of keylist */                  km_find_key (dlg, &lv);
159      GetWindowRect (GetDlgItem(dlg, IDC_KEYMISC_KEYLIST), &rect);              }
160      MapWindowPoints (NULL, dlg, (POINT*)&rect, 2);              break;
161            }
162      kmi->ypos_sep = rect.bottom;          break;
163        }
164      p = get_reg_entry( HKEY_CURRENT_USER, "Software\\WinPT", "KM_Pos_X" );      
165      if( p && !strcmp( p, " " ) ) {      return CallWindowProc (keylist_proc.old, dlg, msg, wparam, lparam);
166          free_if_alloc( p );      }
167          center_window( dlg );  
168          return;  
169      }  #define ico2idx(ico) imagelist_getindex((ico))
170      else if( p )  
171          pos_x = atol( p );  static HWND
172    load_toolbar (HWND dlg, struct km_info_s *kmi)
173      p = get_reg_entry( HKEY_CURRENT_USER, "Software\\WinPT", "KM_Pos_Y" );  {
174      if( p && !strcmp( p, " " ) ) {      HWND tbwnd;
175          free_if_alloc( p );      TBSAVEPARAMS tbsp;
176          center_window( dlg );      TBBUTTON tb_buttons[] = {
177          return;          {ico2idx (IMI_KEY_NEW),    ID_KEYMISC_KEYWIZARD, TBSTATE_ENABLED, TBSTYLE_BUTTON, {0}, 0L},
178      }          {ico2idx (IMI_KEY_DELETE), ID_KEYMISC_DELETE, TBSTATE_ENABLED, TBSTYLE_BUTTON, {0}, 0L, 0},
179      else if( p )          {ico2idx (IMI_KEY_PROPS),  ID_KEYMISC_PROPS,  TBSTATE_ENABLED, TBSTYLE_BUTTON, {0}, 0L, 0},
180          pos_y = atol( p );          {ico2idx (IMI_KEY_SIGN),   ID_KEYMISC_SIGN,   TBSTATE_ENABLED, TBSTYLE_BUTTON, {0}, 0L, 0},
181            {ico2idx (IMI_KEY_SEARCH), ID_KEYMISC_SENDRECV, TBSTATE_ENABLED, TBSTYLE_BUTTON, {0}, 0L, 0},
182      if( !pos_y && !pos_x ) {          {0,                                  0,                 0,               TBSTYLE_SEP,    {0}, 0L, 0},
183          center_window( dlg );          {ico2idx (IMI_KEY_FILE_IMPORT), ID_KEYMISC_IMPORT, TBSTATE_ENABLED, TBSTYLE_BUTTON, {0}, 0L, 0},
184          return;          {ico2idx (IMI_KEY_FILE_EXPORT), ID_KEYMISC_EXPORT, TBSTATE_ENABLED, TBSTYLE_BUTTON, {0}, 0L, 0},
185      }          {ico2idx (IMI_KEY_IMPORT), ID_KEYCTX_PASTE, TBSTATE_ENABLED, TBSTYLE_BUTTON, {0}, 0L, 0},
186                {ico2idx (IMI_KEY_EXPORT), ID_KEYCTX_COPY, TBSTATE_ENABLED, TBSTYLE_BUTTON, {0}, 0L, 0},
187      if( pos_x > GetSystemMetrics( SM_CXSCREEN )       };
188          || pos_y > GetSystemMetrics( SM_CYSCREEN ) ) {      
189          pos_x = pos_y = 0;      tbwnd = CreateWindowEx (0, TOOLBARCLASSNAME, NULL,
190      }                              WS_CHILD|TBSTYLE_TOOLTIPS|TBSTYLE_FLAT|CCS_ADJUSTABLE,
191      GetClientRect( dlg, &rect );                              0, 0, 0, 0, dlg, (HMENU)IDR_WINPT_KMTB, glob_hinst, NULL);
192      MoveWindow( dlg, pos_x, pos_y, rect.right, rect.bottom, TRUE );      if (tbwnd) {
193  }          SendMessage (tbwnd, TB_BUTTONSTRUCTSIZE, (WPARAM) sizeof(TBBUTTON), 0);
194            SendMessage (tbwnd, TB_SETIMAGELIST, 0, (LPARAM)glob_imagelist);
195                    SendMessage (tbwnd, TB_AUTOSIZE, 0, 0);
196  static void          ShowWindow (tbwnd, SW_SHOW);
197  do_resize_window( HWND dlg, struct km_info *kmi)  
198  {          /* Restore toolbar */
199      HWND h;          tbsp.hkr = HKEY_CURRENT_USER;
200      RECT rclient, rect;          tbsp.pszSubKey = "Software\\WinPT";
201      BOOL bRepaint = FALSE;          tbsp.pszValueName = "KM_toolbar";
202            if (SendMessage(tbwnd, TB_SAVERESTORE, FALSE, (LPARAM)&tbsp ) == 0)
203      /* Get rect of client area and make life easier */              SendMessage (tbwnd, TB_ADDBUTTONS, sizeof(tb_buttons) / sizeof(tb_buttons[0]),
204      GetClientRect( dlg, &rclient );                           (LONG)&tb_buttons[0]);
205         }
206      /* Move toolbar to the top of the window */       return tbwnd;
207      if (kmi->toolbar) {  }
208          GetWindowRect(kmi->toolbar, &rect);  
209          ScreenToClient(dlg, (POINT*)&rect);  
210          ScreenToClient(dlg, (POINT*)&(rect.right));  /* Restore the width of the columns from the registry.
211       If no bitstring was found, the default size is used. */
212          rclient.top += rect.bottom - rect.top;  int
213          MoveWindow (kmi->toolbar, 0, 0, rclient.right - rclient.left,  restore_column_info (struct km_info_s *kmi)
214                      rect.bottom - rect.top, bRepaint);  {
215      }      WORD *buf;
216        HKEY root;
217      /* Move statusbar to the bottom of the window */      DWORD type;
218      if (kmi->statbar) {      DWORD size = kmi->lv->cols*sizeof (WORD), i;
219          GetWindowRect( kmi->statbar, &rect );      LONG ec;
220          ScreenToClient(dlg, (POINT*)&rect);  
221          ScreenToClient(dlg, (POINT*)&(rect.right));      ec = RegOpenKeyEx (HKEY_CURRENT_USER, "Software\\WinPT", 0,
222                           KEY_ALL_ACCESS, &root);
223          rclient.bottom -= rect.bottom - rect.top;      if (ec != ERROR_SUCCESS)
224          MoveWindow (kmi->statbar, 0, rclient.bottom, rclient.right - rclient.left,          return -1;
225                      rect.bottom - rect.top, bRepaint);  
226      }      buf = new WORD[size/2];
227        if (!buf)
228      // Obtain separator information and move it to the desired posistion          BUG (NULL);
229      if (kmi->ypercent_sep)      ec = RegQueryValueEx (root, "KMColumnSize", NULL, &type,
230          kmi->ypos_sep = (rclient.bottom - rclient.top) * kmi->ypercent_sep / 100;                            (BYTE*)buf, &size);    
231      else      if (ec != ERROR_SUCCESS) {
232          kmi->ypercent_sep = kmi->ypos_sep * 100 / (rclient.bottom - rclient.top);          RegCloseKey (root);
233                    free_if_alloc (buf);
234      // Don't move away          return -1;
235      if (kmi->ypos_sep+5 > rclient.bottom)      }
236          kmi->ypos_sep = rclient.bottom - 5;  
237      if (kmi->ypos_sep < rclient.top)      /* check for garbled values. */
238          kmi->ypos_sep = rclient.top;      for (i=0; i < size/2; i++) {
239      MoveWindow (kmi->hwnd_sep, 0, kmi->ypos_sep, (rclient.right - rclient.left), 5, bRepaint);          if (buf[i] == 0 || buf[i] > 512) {
240                        free_if_alloc (buf);
241      // Place the keylist above the separator              return -1;
242      h = GetDlgItem( dlg, IDC_KEYMISC_KEYLIST );          }
243      MoveWindow (h, rclient.left, rclient.top, rclient.right - rclient.left,      }
244                  kmi->ypos_sep - rclient.top, bRepaint);      for (i=0; i < size/2; i++)
245      rclient.top = kmi->ypos_sep + 5 + 8;          listview_set_column_width (kmi->lv, i, buf[i]);
246        free_if_alloc (buf);
247      /* Place the group text and the group box below the separator */  
248      h = GetDlgItem( dlg, IDC_KEYMISC_GTEXT );      size = sizeof (kmi->keylist_sortby);
249      MoveWindow( h, rclient.left, rclient.top, 100, 14, bRepaint);      ec = RegQueryValueEx (root, "KMSortBy", NULL, &type,
250      rclient.top += 18;                            (BYTE*)&kmi->keylist_sortby, &size);
251        if (ec != ERROR_SUCCESS)
252      h = GetDlgItem( dlg, IDC_KEYMISC_GROUP );          kmi->keylist_sortby = KEY_SORT_USERID;
253      MoveWindow (h, rclient.left, rclient.top, rclient.right - rclient.left,      RegCloseKey (root);
254                  (rclient.bottom < rclient.top) ? 0 : rclient.bottom - rclient.top, bRepaint);      return 0;
255        }
256      /* Repaint the whole thing */  
257      InvalidateRect (dlg, NULL, TRUE);  
258  } /* do_resize_window */  /* Save the current column width to the registry. */
259    int
260    save_column_info (struct km_info_s *kmi)
261  static void  {    
262  do_create_minpopup (HWND dlg)      HKEY root;
263  {      WORD *buf;
264      HMENU hm;      LONG ec;
265      MENUITEMINFO mi;      int i;
266      char * s;  
267      POINT p;      buf = new WORD[kmi->lv->cols];
268            if (!buf)
269      if (gpg_read_only)          BUG (NULL);
270          return;      for (i=0; i < kmi->lv->cols; i++) {
271      hm = CreatePopupMenu ();          LVCOLUMN lvc;
272      if (!hm)  
273          BUG( NULL );          memset (&lvc, 0, sizeof (lvc));
274      memset (&mi, 0, sizeof mi);          lvc.mask = LVCF_WIDTH;
275      mi.cbSize = sizeof mi;          ListView_GetColumn (kmi->lv->ctrl, i, &lvc);
276      s = (char *)_("Paste Key from Clipboard");          buf[i] = lvc.cx;
277      mi.fType = MF_STRING;      }
278      mi.dwTypeData = s;  
279      mi.cch = strlen (s);      ec = RegOpenKeyEx (HKEY_CURRENT_USER, "Software\\WinPT", 0,
280      mi.fMask = MIIM_DATA | MIIM_ID | MIIM_TYPE;                         KEY_ALL_ACCESS, &root);
281      mi.wID = ID_KEYCTX_PASTE;      if (ec != ERROR_SUCCESS) {
282      InsertMenuItem (hm, 0, FALSE, &mi);          free_if_alloc (buf);
283      GetCursorPos (&p);          return -1;
284      TrackPopupMenu (hm, 0, p.x, p.y, 0, dlg, NULL);      }
285      DestroyMenu (hm);  
286  } /* do_create_minpopup */      ec = RegSetValueEx (root, "KMColumnSize", 0, REG_BINARY,
287                            (const BYTE*)buf, 2*kmi->lv->cols);
288        if (ec == ERROR_SUCCESS) {
289  static void          ec = RegSetValueEx (root, "KMSortBy", 0, REG_DWORD_BIG_ENDIAN,
290  do_check_cache( listview_ctrl_t lv, HWND dlg, HWND sb  )                              (const BYTE*)&kmi->keylist_sortby,
291  {                              sizeof (kmi->keylist_sortby));
292      gpgme_keycache_t cache;      }
293        RegCloseKey (root);
294      if( keycache_get_reload( ) ) {      free_if_alloc (buf);
295          keycache_reload( dlg );      return ec == ERROR_SUCCESS? 0 : -1;
296          keycache_set_reload( 0 );  }
297          cache = keycache_get_ctx( 1 );  
298          if( !cache )  
299              BUG( dlg );  /* Center window @dlg. */
300          keylist_reload( lv, cache, KEYLIST_LIST, GPGME_ATTR_USERID );  static void
301          km_complete_status_bar (sb, lv, km_def_pos);  do_center_window (HWND dlg, struct km_info_s *kmi)
302      }  {
303  } /* do_check_cache */      RECT rect;
304        char *p;
305        int pos_x = 0;
306  long CALLBACK      int pos_y = 0;
307  separator_wnd_proc( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam )          
308  {      /* Find bottom of keylist */
309      static POINT last_mouse_pos;      GetWindowRect (GetDlgItem(dlg, IDC_KEYMISC_KEYLIST), &rect);
310        MapWindowPoints (NULL, dlg, (POINT*)&rect, 2);
311      if (msg == WM_CREATE)  
312          SetWindowLong (hwnd, GWL_USERDATA, (long)(((CREATESTRUCT*)lparam)->lpCreateParams));      kmi->ypos_sep = rect.bottom;
313    
314      switch (msg) {      p = get_reg_entry (HKEY_CURRENT_USER, "Software\\WinPT", "KM_Pos_X");
315      case WM_PAINT:      if (p && !strcmp (p, " ")) {
316          PAINTSTRUCT ps;          free_if_alloc (p);      
317          RECT rect;          center_window (dlg, NULL);
318          HPEN hpen;          return;
319        }
320          GetClientRect (hwnd, &rect);      else if (p)
321          BeginPaint (hwnd, &ps);          pos_x = atol (p);
322    
323          // Background      p = get_reg_entry (HKEY_CURRENT_USER, "Software\\WinPT", "KM_Pos_Y");
324          FillRect (ps.hdc, &rect, (HBRUSH)(COLOR_3DFACE+1));      if (p && !strcmp (p, " ")) {
325            free_if_alloc (p);
326          // The lines from the light into the dark          center_window (dlg, NULL);
327          MoveToEx(ps.hdc, 0,0, NULL);          return;
328          if ((hpen = CreatePen(PS_SOLID, 0, GetSysColor(COLOR_3DHILIGHT))) != NULL) {      }
329              SelectObject(ps.hdc, (LPVOID)hpen);      else if (p)
330              LineTo(ps.hdc, rect.right, 0);          pos_y = atol (p);
331              DeleteObject(hpen);  
332          }      if (!pos_y && !pos_x) {
333          MoveToEx(ps.hdc, 0, 1, NULL);          center_window (dlg, NULL);
334          if ((hpen = CreatePen(PS_SOLID, 0, GetSysColor(COLOR_3DLIGHT))) != NULL) {          return;
335               SelectObject(ps.hdc, (LPVOID)hpen);      }
336               LineTo(ps.hdc, rect.right, rect.bottom);      
337               DeleteObject(hpen);      if (pos_x < 0 || pos_y < 0)
338           }          pos_x = pos_y = 0;
339        if (pos_x > GetSystemMetrics (SM_CXSCREEN)
340          MoveToEx(ps.hdc, 0, rect.bottom-1, NULL);          || pos_y > GetSystemMetrics (SM_CYSCREEN)) {
341          if ((hpen = CreatePen(PS_SOLID, 0, GetSysColor(COLOR_3DSHADOW))) != NULL) {          pos_x = pos_y = 0;
342              SelectObject(ps.hdc, (LPVOID)hpen);      }
343              LineTo(ps.hdc, rect.right, rect.bottom-1);      GetClientRect (dlg, &rect);
344              DeleteObject(hpen);      MoveWindow (dlg, pos_x, pos_y, rect.right, rect.bottom, TRUE);
345          }  }
346          MoveToEx(ps.hdc, 0, rect.bottom, NULL);  
347          if ((hpen = CreatePen(PS_SOLID, 0, GetSysColor(COLOR_3DDKSHADOW))) != NULL) {  
348              SelectObject(ps.hdc, (LPVOID)hpen);  /* Resize the key manager window with the information from @kmi. */
349              LineTo(ps.hdc, rect.right, rect.bottom);  static void
350              DeleteObject(hpen);  do_resize_window (HWND dlg, struct km_info_s *kmi)
351          }  {
352        HWND h;
353          EndPaint (hwnd, &ps);      RECT rclient, rect;
354          return 0;      BOOL bRepaint = FALSE;
355    
356      case WM_LBUTTONDOWN:      /* Get rect of client area and make life easier */
357          last_mouse_pos.x = LOWORD(lparam);      GetClientRect (dlg, &rclient);
358          last_mouse_pos.y = HIWORD(lparam);  
359          ClientToScreen (hwnd, &last_mouse_pos);      /* Move toolbar to the top of the window */
360          SetCapture (hwnd);      if (kmi->toolbar) {
361          return 0;          GetWindowRect (kmi->toolbar, &rect);
362            ScreenToClient (dlg, (POINT*)&rect);
363      case WM_LBUTTONUP:          ScreenToClient (dlg, (POINT*)&(rect.right));
364          ReleaseCapture ();  
365          return 0;          rclient.top += rect.bottom - rect.top;
366            MoveWindow (kmi->toolbar, 0, 0, rclient.right - rclient.left,
367      case WM_MOUSEMOVE:                      rect.bottom - rect.top, bRepaint);
368          if (wparam == MK_LBUTTON) {      }
369              struct km_info *kmi;  
370              POINT p;      /* Move statusbar to the bottom of the window */
371              RECT rect;      if (kmi->statbar) {
372            GetWindowRect (kmi->statbar, &rect);
373              if ((kmi = (struct km_info *)GetWindowLong (hwnd, GWL_USERDATA)) == NULL)          ScreenToClient (dlg, (POINT*)&rect);
374                  break;          ScreenToClient (dlg, (POINT*)&(rect.right));
375    
376              // Calculate mouse movement          rclient.bottom -= rect.bottom - rect.top;
377              p.x = LOWORD(lparam);          MoveWindow (kmi->statbar, 0, rclient.bottom,
378              p.y = HIWORD(lparam);                      rclient.right - rclient.left,
379              ClientToScreen (hwnd, &p);                      rect.bottom - rect.top, bRepaint);
380        }
381              GetWindowRect (hwnd, &rect);  
382              rect.top += (short)(p.y - last_mouse_pos.y);      /* Obtain separator information and move it to the desired posistion */
383              rect.bottom += (short)(p.y - last_mouse_pos.y);      if (kmi->ypercent_sep)
384            kmi->ypos_sep = (rclient.bottom - rclient.top) * kmi->ypercent_sep / 100;
385              last_mouse_pos.y = p.y;      else
386            kmi->ypercent_sep = kmi->ypos_sep * 100 / (rclient.bottom - rclient.top);
387              // Apply mouse movement to window. Beware the MoveWindow is relaive          
388              // to parent NOT screen      /* Don't move away */
389              MapWindowPoints (NULL, GetParent(hwnd), (POINT*)&rect, 2);      if (kmi->ypos_sep+5 > rclient.bottom)
390              kmi->ypos_sep = rect.top;          kmi->ypos_sep = rclient.bottom - 5;
391              kmi->ypercent_sep = 0; // This forces do_resize_window to use abs. position      if (kmi->ypos_sep < rclient.top)
392              do_resize_window (GetParent(hwnd), kmi);          kmi->ypos_sep = rclient.top;
393              return 0;      MoveWindow (kmi->hwnd_sep, 0, kmi->ypos_sep,
394          }                  (rclient.right - rclient.left), 5, bRepaint);
395      }          
396        /* Place the keylist above the separator */
397      return DefWindowProc (hwnd, msg, wparam, lparam);      h = GetDlgItem (dlg, IDC_KEYMISC_KEYLIST);
398  }      MoveWindow (h, rclient.left, rclient.top, rclient.right - rclient.left,
399                    kmi->ypos_sep - rclient.top, bRepaint);
400        rclient.top = kmi->ypos_sep + 5 + 8;
401  static HWND  
402  regist_sep_wnd (HWND dlg, struct km_info * kmi)  #if 0 /* Disable the code until we support groups again. */
403  {      /* Place the group text and the group box below the separator */
404      WNDCLASS wndclass;      h = GetDlgItem (dlg, IDC_KEYMISC_GTEXT);
405      HWND h;      MoveWindow (h, rclient.left, rclient.top, 100, 14, bRepaint);
406        rclient.top += 18;
407      wndclass.style         = CS_DBLCLKS | CS_HREDRAW | CS_VREDRAW;  
408      wndclass.lpfnWndProc   = separator_wnd_proc;      h = GetDlgItem (dlg, IDC_KEYMISC_GROUP);
409      wndclass.cbClsExtra    = 0;      MoveWindow (h, rclient.left, rclient.top, rclient.right - rclient.left,
410      wndclass.cbWndExtra    = sizeof (long);                  (rclient.bottom < rclient.top) ?
411      wndclass.hInstance     = glob_hinst;                  0 : rclient.bottom - rclient.top, bRepaint);
412      wndclass.hIcon         = NULL;  #endif
413      wndclass.hCursor       = LoadCursor (NULL, IDC_SIZENS);      
414      wndclass.hbrBackground = (HBRUSH) GetStockObject (LTGRAY_BRUSH);      /* Repaint the whole thing */
415      wndclass.lpszMenuName  = 0;      InvalidateRect (dlg, NULL, TRUE);
416      wndclass.lpszClassName = WINDOWCLASS_SEPARATOR_CHILD;  }
417      RegisterClass (&wndclass);  
418    
419      h = CreateWindowEx (WS_EX_WINDOWEDGE, WINDOWCLASS_SEPARATOR_CHILD, NULL,  /* Return true if the clipboard contains an OpenPGP key. */
420                          WS_CHILD | WS_CLIPCHILDREN | WS_VISIBLE,  static bool
421                          0, 400, 2000, 5, dlg, (HMENU) 0, glob_hinst, kmi);      clip_contains_pgpkey (void)
422      ShowWindow (h, SW_SHOW);  {
423      return h;      char *ctxt;
424  } /* regist_sep_wnd */      bool val = false;
425    
426        ctxt = get_clip_text (NULL);
427        if (!ctxt || strlen (ctxt) < 512)
428  #define enable_button(hwnd, cid) \          val = false;
429      SendMessage ((hwnd), TB_ENABLEBUTTON, (cid), MAKELONG (key_selected, 0))      else if (strstr (ctxt, "BEGIN PGP") && strstr (ctxt, "KEY BLOCK") &&
430                 strstr (ctxt, "END PGP"))
431  void          val = true;
432  update_ui_items (HWND hwnd, listview_ctrl_t lv)      free_if_alloc (ctxt);
433  {      return val;
434      int key_selected = 0, key_has_sec = 0;  }
435      int i, key_inv = 0;  
436      HWND hwnd_child;  
437      HMENU hmenu;  /* Show a mini popup menu to import keys. */
438        static void
439      /* Get some states */  do_create_minpopup (HWND dlg)
440      key_selected = SendMessage (GetDlgItem (hwnd, IDC_KEYMISC_KEYLIST),  {
441                                             LVM_GETSELECTEDCOUNT, 0, 0)      HMENU hm;
442                                             ? TRUE : FALSE;      POINT p;
443      key_has_sec = FALSE;      
444      if (key_selected) {      if (gpg_read_only || !clip_contains_pgpkey ())
445          i = listview_get_curr_pos (lv);          return;
446          key_has_sec = km_check_for_seckey( lv, i, NULL ) ? TRUE : FALSE;              hm = CreatePopupMenu ();
447          key_inv = km_get_key_status (lv, i) & KM_FLAG_REVOKED;      if (!hm)
448      }          BUG (0);
449        insert_menu_item (hm, 0, ID_KEYCTX_PASTE, _("Paste Key from Clipboard"));
450      /* Enable / disable toolbar buttons */      GetCursorPos (&p);
451      hwnd_child = GetDlgItem(hwnd, IDR_WINPT_KMTB);      TrackPopupMenu (hm, 0, p.x, p.y, 0, dlg, NULL);
452      enable_button (hwnd_child, ID_KEYMISC_DELETE);      DestroyMenu (hm);
453      enable_button (hwnd_child, ID_KEYMISC_PROPS);  }
454      enable_button (hwnd_child, ID_KEYMISC_SIGN);  
455      enable_button (hwnd_child, ID_KEYMISC_EXPORT);  
456    /* Update the default key entry in the status bar for dialog @dlg. */
457      /* Enable / disable menu items */  void
458      hmenu = GetMenu (hwnd);  update_default_key_str (HWND dlg)
459      set_menu_state (hmenu, ID_KEYMISC_EXPORT, key_selected ? MF_ENABLED : MF_GRAYED);  {
460      set_menu_state (hmenu, ID_KEYMISC_EXPORT_PRIVKEY, key_has_sec ? MF_ENABLED : MF_GRAYED);      const char *fmt;
461      set_menu_state (hmenu, ID_KEYMISC_REVCERT, key_has_sec ? MF_ENABLED : MF_GRAYED);      char *keyid;
462      set_menu_state (hmenu, ID_KEYMISC_DELETE, key_selected ? MF_ENABLED : MF_GRAYED);      char defkeyinf[128];
463      set_menu_state (hmenu, ID_KEYMISC_PROPS, key_selected ? MF_ENABLED : MF_GRAYED);  
464      set_menu_state (hmenu, ID_KEYMISC_SIGN, key_selected && !key_inv ? MF_ENABLED : MF_GRAYED);          keyid = get_gnupg_default_key ();
465  } /* update_ui_items */      if (!keyid)
466            return;
467        if ((keyid[0] >= 'A' && keyid[0] <= 'Z') ||
468  static void          (keyid[0] >= 'a' && keyid[0] <= 'z') ||
469  popup_gpg_readonly (HWND dlg, HMENU hm)          (keyid[0] == '0' && keyid[1] == 'x'))
470  {          fmt = _("Default Key: %s");
471      int resids[] = {      else
472          ID_KEYCTX_PASTE,          fmt = _("Default Key: 0x%s");
473          ID_KEYCTX_EDIT,      _snprintf (defkeyinf, sizeof (defkeyinf) - 1, fmt, keyid);
474          ID_KEYCTX_SIGN,      SendMessage (dlg, SB_SETTEXT, 0, (LPARAM)defkeyinf);
475          ID_KEYCTX_REV,      gpg_keycache_set_default_key (keycache_get_ctx (0), keyid);
476          ID_KEYCTX_DEL,      free_if_alloc (keyid);
477          ID_KEYCTX_ENABLE,  }
478          ID_KEYCTX_DISABLE,  
479          ID_KEYCTX_RECVFROM,  
480          ID_KEYCTX_ADDKEY,  /* Count all keys and show from @lv results in the status bar @sb. */
481          ID_KEYCTX_ADDPHOTO,  void
482          ID_KEYCTX_ADDUID,  update_status_bar (HWND sb, listview_ctrl_t lv)
483          ID_KEYCTX_ADDREV,  {
484          0      char txt_sec[128], txt_pub[128];
485      };      int nkeys = 0, nsec = 0;
486      int i;      int i;
487    
488      if (gpg_read_only == 0)      nkeys = listview_count_items (lv, 0);
489          return;      for (i = 0; i < nkeys; i++) {
490      for (i=0; resids[i] != 0; i++)          if (km_check_for_seckey (lv, i, NULL))
491          set_menu_state (hm, resids[i], MF_GRAYED);              nsec++;
492  }      }
493        _snprintf (txt_sec, sizeof (txt_sec)-1, _("%d secret keys"), nsec);
494        _snprintf (txt_pub, sizeof (txt_pub)-1, _("%d keys"), nkeys);
495  static void      SendMessage (sb, SB_SETTEXT, 1, (LPARAM)txt_sec);
496  menu_gpg_readonly (HWND dlg, HMENU hm, int id)      SendMessage (sb, SB_SETTEXT, 2, (LPARAM)txt_pub);
497  {  }
498      int key_resids[] = {  
499          ID_KEYMISC_SIGN,  
500          ID_KEYMISC_DELETE,  long CALLBACK
501          ID_KEYMISC_REVCERT,  separator_wnd_proc (HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam)
502          ID_KEYMISC_IMPORT_HTTP,  {
503          ID_KEYMISC_IMPORT,      static POINT last_mouse_pos;
504          ID_KEYMISC_REFRESH_KEYS,  
505          ID_KEYMISC_REBUILD,      if (msg == WM_CREATE)
506          ID_KEYMISC_KEYWIZARD,          SetWindowLong (hwnd, GWL_USERDATA,
507          ID_KEYMISC_CARDNEW,                         (long)(((CREATESTRUCT*)lparam)->lpCreateParams));
508          ID_KEYMISC_NEWKEY,  
509          0,      switch (msg) {
510      };      case WM_PAINT:
511      int edit_resids[] = {          PAINTSTRUCT ps;
512          ID_KEYMISC_PASTE,          RECT rect;
513          ID_KEYMISC_OT,          HPEN hpen;
514          ID_KEYMISC_EDITKEY,  
515          0          GetClientRect (hwnd, &rect);
516      };          BeginPaint (hwnd, &ps);
517      int * resids;  
518      int i;          /* Background */
519            FillRect (ps.hdc, &rect, (HBRUSH)(COLOR_3DFACE+1));
520        
521      if (gpg_read_only == 0)          /* The lines from the light into the dark */
522          return;          MoveToEx(ps.hdc, 0,0, NULL);
523      switch (id) {          if ((hpen = CreatePen (PS_SOLID, 0, GetSysColor(COLOR_3DHILIGHT))) != NULL) {
524      case 0: return;              SelectObject (ps.hdc, (LPVOID)hpen);
525      case 3: resids = key_resids; break;              LineTo (ps.hdc, rect.right, 0);
526      case 1: resids = edit_resids;break;              DeleteObject (hpen);
527      }          }
528            MoveToEx(ps.hdc, 0, 1, NULL);
529      for (i=0; resids[i] != 0; i++)          if ((hpen = CreatePen (PS_SOLID, 0, GetSysColor(COLOR_3DLIGHT))) != NULL) {
530          set_menu_state (hm, resids[i], MF_GRAYED);               SelectObject (ps.hdc, (LPVOID)hpen);
531  }               LineTo (ps.hdc, rect.right, rect.bottom);
532                 DeleteObject (hpen);
533             }
534  BOOL CALLBACK  
535  keymanager_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)          MoveToEx(ps.hdc, 0, rect.bottom-1, NULL);
536  {          if ((hpen = CreatePen (PS_SOLID, 0, GetSysColor(COLOR_3DSHADOW))) != NULL) {
537      struct km_info *kmi;              SelectObject (ps.hdc, (LPVOID)hpen);
538      static km_group_s *gc = NULL;              LineTo (ps.hdc, rect.right, rect.bottom-1);
539      static HMENU menu = NULL;              DeleteObject (hpen);
540      static int refresh_keys = 0;              }
541      INITCOMMONCONTROLSEX icex;          MoveToEx(ps.hdc, 0, rect.bottom, NULL);
542      HWND kl;          if ((hpen = CreatePen(PS_SOLID, 0, GetSysColor(COLOR_3DDKSHADOW))) != NULL) {
543      HMENU hm;              SelectObject (ps.hdc, (LPVOID)hpen);
544      gpgme_keycache_t c;              LineTo (ps.hdc, rect.right, rect.bottom);
545      gpgme_key_t pk;              DeleteObject (hpen);
546      km_group_cb_s gcb;          }
547      struct genkey_s genkey;  
548      struct winpt_key_s k = {0};          EndPaint (hwnd, &ps);
549      struct URL_ctx_s *url;          return 0;
550      refresh_cache_s rcs = {0};  
551      char keyid[48], uid[128], type[32], * q;      case WM_LBUTTONDOWN:
552      const char *t, * host;          last_mouse_pos.x = LOWORD (lparam);
553      u16 port = 0;          last_mouse_pos.y = HIWORD (lparam);
554      int idx = 0, i=0, rc;          ClientToScreen (hwnd, &last_mouse_pos);
555      size_t size = 0;          SetCapture (hwnd);
556            return 0;
557      if ((msg != WM_INITDIALOG)  
558          && ((kmi = (struct km_info*)GetWindowLong (dlg, GWL_USERDATA)) == NULL))      case WM_LBUTTONUP:
559          return FALSE;          ReleaseCapture ();
560            return 0;
561      switch (msg) {  
562      case WM_INITDIALOG:      case WM_MOUSEMOVE:
563          kmi = new struct km_info;          if (wparam == MK_LBUTTON) {
564          memset (kmi, 0, sizeof (struct km_info));              struct km_info_s *kmi;
565          icex.dwSize = sizeof (INITCOMMONCONTROLSEX);              POINT p;
566          icex.dwICC  = ICC_BAR_CLASSES;              RECT r;
567          InitCommonControlsEx (&icex);  
568          kmi->hwnd_sep = regist_sep_wnd (dlg, kmi);              kmi = (struct km_info_s *)GetWindowLong (hwnd, GWL_USERDATA);
569          imagelist_load (dlg);              if (kmi == NULL)
570                    break;
571  #ifndef LANG_DE  
572          SetWindowText( dlg, _("Key Manager") );              /* Calculate mouse movement */
573  #endif                      p.x = LOWORD(lparam);
574          menu = LoadMenu( glob_hinst, (LPCSTR)IDR_WINPT_KEYMISC );              p.y = HIWORD(lparam);
575  #ifndef LANG_DE              ClientToScreen (hwnd, &p);
576          set_menu_text( menu, ID_KEYMISC_QUIT, _("&Quit") );  
577          set_menu_text( menu, ID_KEYMISC_UID, _("User ID") );              GetWindowRect (hwnd, &r);
578          set_menu_text( menu, ID_KEYMISC_NEWKEY, _("&Expert") );              r.top += (short)(p.y - last_mouse_pos.y);
579          set_menu_text( menu, ID_KEYMISC_KEYWIZARD, _("&Normal") );              r.bottom += (short)(p.y - last_mouse_pos.y);
580          set_menu_text( menu, ID_KEYMISC_EDIT, _("Edit") );  
581          set_menu_text( menu, ID_KEYMISC_SIGN, _("&Sign") );              last_mouse_pos.y = p.y;
582          set_menu_text( menu, ID_KEYMISC_DELETE, _("&Delete") );  
583          set_menu_text( menu, ID_KEYMISC_REVCERT, _("&Revoke") );              /* Apply mouse movement to window. Beware the MoveWindow is relaive
584          set_menu_text( menu, ID_KEYMISC_CHECKSIGS, _("&List Signatures") );                 to parent NOT screen */
585          set_menu_text( menu, ID_KEYMISC_TRUSTPATH, _("List Trust Path") );              MapWindowPoints (NULL, GetParent(hwnd), (POINT*)&r, 2);
586          set_menu_text( menu, ID_KEYMISC_PROPS, _("&Properties") );              kmi->ypos_sep = r.top;
587          set_menu_text( menu, ID_KEYMISC_GPGOPT, _("Options") );              kmi->ypercent_sep = 0; /* This forces do_resize_window to use abs. position */
588          set_menu_text( menu, ID_KEYMISC_GPGPREFS, _("Preferences") );              do_resize_window (GetParent(hwnd), kmi);
589          set_menu_text( menu, ID_KEYMISC_SENDRECV, _("Keyserver") );              return 0;
590          set_menu_text( menu, ID_KEYMISC_RECACHE, _("Re&load Key Cache") );          }
591          set_menu_text( menu, ID_KEYMISC_REBUILD, _("R&everify Signatures") );      }
592          set_menu_text( menu, ID_KEYMISC_INFO, _("Info") );  
593          set_menu_text (menu, ID_KEYMISC_HELP, _("Help"));      return DefWindowProc (hwnd, msg, wparam, lparam);
594  #endif  }
595          SetMenu( dlg, menu );  
596          if( keyring_check_last_access() )  
597              keycache_set_reload( 1 );  /* Register the separator window with @dlg as the parent window. */
598          if( keycache_get_reload( ) )  static HWND
599              keycache_reload( dlg );  regist_sep_wnd (HWND dlg, struct km_info_s *kmi)
600          c = keycache_get_ctx( KEYCACHE_PUB );  {
601          if( !c )      WNDCLASS wndclass;
602              BUG( NULL );      HWND h;
603          kmi->keylist_sortby = GPGME_ATTR_USERID;  
604          Header_SetImageList(ListView_GetHeader(GetDlgItem( dlg, IDC_KEYMISC_KEYLIST )),      wndclass.style         = CS_DBLCLKS | CS_HREDRAW | CS_VREDRAW;
605                              glob_imagelist);      wndclass.lpfnWndProc   = separator_wnd_proc;
606          kmi->lv = keylist_load( GetDlgItem( dlg, IDC_KEYMISC_KEYLIST ), c,      wndclass.cbClsExtra    = 0;
607                                  NULL, KEYLIST_LIST, kmi->keylist_sortby );      wndclass.cbWndExtra    = sizeof (long);
608          /* init subclassing for the listview */      wndclass.hInstance     = glob_hinst;
609          kl = GetDlgItem( dlg, IDC_KEYMISC_KEYLIST );      wndclass.hIcon         = NULL;
610          keylist_proc.dlg = dlg;      wndclass.hCursor       = LoadCursor (NULL, IDC_SIZENS);
611          keylist_proc.current = (WNDPROC)keylist_subclass_proc;      wndclass.hbrBackground = (HBRUSH) GetStockObject (LTGRAY_BRUSH);
612          keylist_proc.old = (WNDPROC)GetWindowLong( kl, GWL_WNDPROC );      wndclass.lpszMenuName  = 0;
613          if( keylist_proc.old ) {      wndclass.lpszClassName = WINDOWCLASS_SEPARATOR_CHILD;
614              if( !SetWindowLong( kl, GWL_WNDPROC, (LONG)keylist_proc.current) ) {      RegisterClass (&wndclass);
615                  msg_box( dlg, _("Could not set keylist window procedure."), _("Key Manager"), MB_ERR );  
616                  BUG( NULL );      h = CreateWindowEx (WS_EX_WINDOWEDGE, WINDOWCLASS_SEPARATOR_CHILD, NULL,
617              }                          WS_CHILD | WS_CLIPCHILDREN | WS_VISIBLE,
618          }                          0, 400, 2000, 5, dlg, (HMENU) 0, glob_hinst, kmi);    
619          km_groups_new( &gc, GetDlgItem( dlg, IDC_KEYMISC_GROUP ) );      ShowWindow (h, SW_SHOW);
620          km_groups_load( gc );      return h;
621          SetForegroundWindow( dlg );  }
622            
623          kmi->statbar = CreateStatusWindow( WS_CHILD | WS_VISIBLE | CCS_BOTTOM, "status bar", dlg, 100000 );  
624          ShowWindow( kmi->statbar, SW_SHOW );  #define enable_button(hwnd, cid, item_selected) \
625          km_update_default_key_str (kmi->statbar, &km_def_pos);      SendMessage ((hwnd), TB_ENABLEBUTTON, (cid), MAKELONG ((item_selected), 0))
626          km_complete_status_bar( kmi->statbar, kmi->lv, km_def_pos );  
627    
628          SetWindowLong (dlg, GWL_USERDATA, (LONG)kmi);  /* Interactive modification of the dialog item which depend if an item
629          kmi->toolbar = load_toolbar (dlg, kmi);     is selected or not and what kind of item. @lv is the list view with
630       the items. */
631          do_center_window( dlg, kmi );  void
632          do_resize_window( dlg, kmi );  update_ui_items (HWND hwnd, listview_ctrl_t lv)
633          update_ui_items (dlg, kmi->lv);  {
634          return TRUE;      HWND tb_hwnd;
635                HMENU hmenu;
636      case WM_DESTROY:      int mult_resids[] = {ID_KEYMISC_PROPS, ID_KEYMISC_SIGN, ID_KEYMISC_EDITKEY,
637          if (kmi->lv) {                           ID_KEYMISC_CHECKSIGS, ID_KEYMISC_REVCERT, 0};
638              keylist_delete (kmi->lv);      int key_selected = 0;
639              kmi->lv = NULL;            int key_has_sec = 0;
640                    int key_inv = 0;
641           if (gc) {      int i, state=0;
642              km_groups_release (gc);  
643              gc = NULL;      /* Get some states */
644          }      key_selected = SendMessage (GetDlgItem (hwnd, IDC_KEYMISC_KEYLIST),
645         imagelist_destroy ();                                             LVM_GETSELECTEDCOUNT, 0, 0)
646                                               ? TRUE : FALSE;
647         char buf[32];      key_has_sec = FALSE;
648         ltoa (kmi->pos_x, buf, 10);      if (key_selected) {
649         set_reg_entry( HKEY_CURRENT_USER, "Software\\WinPT", "KM_Pos_X", buf );          i = listview_get_curr_pos (lv);
650         ltoa (kmi->pos_y, buf, 10);          key_has_sec = km_check_for_seckey (lv, i, NULL) ? TRUE : FALSE;
651         set_reg_entry (HKEY_CURRENT_USER, "Software\\WinPT", "KM_Pos_Y", buf);          key_inv = km_get_key_status (lv, i) & KM_FLAG_REVOKED ||
652         /* Remove runtime information. This should be the last action taken here. */                    km_get_key_status (lv, i) & KM_FLAG_EXPIRED;
653         delete kmi; kmi = NULL;      }
654         SetWindowLong (dlg, GWL_USERDATA, NULL);      
655         keycache_set_reload (refresh_keys);      /* Enable / disable toolbar buttons */
656         return FALSE;      tb_hwnd = GetDlgItem (hwnd, IDR_WINPT_KMTB);
657        enable_button (tb_hwnd, ID_KEYMISC_DELETE, key_selected);
658      case WM_MOVE:            enable_button (tb_hwnd, ID_KEYMISC_PROPS, key_selected);
659          /* kmi->pos_x = (int)(short)LOWORD(lparam);      enable_button (tb_hwnd, ID_KEYMISC_SIGN, key_selected && !key_inv);
660             kmi->pos_y = (int)(short)HIWORD(lparam); */      enable_button (tb_hwnd, ID_KEYMISC_EXPORT, key_selected);
661          RECT r;      enable_button (tb_hwnd, ID_KEYCTX_COPY, key_selected);
662          GetWindowRect (dlg, &r);      enable_button (tb_hwnd, ID_KEYCTX_PASTE, clip_contains_pgpkey ());
663          kmi->pos_x = r.left;  
664          kmi->pos_y = r.top;          /* Enable / disable menu items */
665          break;      state = key_selected? MF_ENABLED : MF_DISABLED|MF_GRAYED;
666                hmenu = GetMenu (hwnd);
667        set_menu_state (hmenu, ID_KEYMISC_EXPORT, state);
668      case WM_RBUTTONUP:      set_menu_state (hmenu, ID_KEYMISC_DELETE, state);
669          do_create_minpopup (dlg);      set_menu_state (hmenu, ID_KEYMISC_PROPS, state);
670          break;      set_menu_state (hmenu, ID_KEYMISC_EDITKEY, state);
671        set_menu_state (hmenu, ID_KEYMISC_CHECKSIGS, state);
672      case WM_NOTIFY:                  set_menu_state (hmenu, ID_KEYMISC_SIGN,
673          NMHDR * notify;                      key_selected && !key_inv ? MF_ENABLED : MF_GRAYED);
674          POINT p;      set_menu_state (hmenu, ID_KEYMISC_EXPORT_PRIVKEY,
675          HMENU popup;                      key_selected && key_has_sec? MF_ENABLED : MF_GRAYED);
676                set_menu_state (hmenu, ID_KEYMISC_REVCERT,
677          notify = (NMHDR *)lparam;                      key_selected && key_has_sec? MF_ENABLED : MF_GRAYED);
678          if (notify == NULL)  
679              break;      /* Disable some menu items when multiple keys are selected. */
680          switch (notify->code)      if (listview_count_items (lv, 1) > 1) {
681          {          for (i=0; mult_resids[i] != 0; i++)
682          case TBN_QUERYDELETE:              set_menu_state (hmenu, mult_resids[i], MF_GRAYED);
683              SetWindowLong(dlg, DWL_MSGRESULT, TRUE);      }
684              return TRUE;  
685                /* Disable all secret-key functions when no secret key is available. */
686          case TBN_QUERYINSERT:      {
687              SetWindowLong(dlg, DWL_MSGRESULT, TRUE);          gpg_keycache_t sec = keycache_get_ctx (0);
688              return TRUE;          if (gpg_keycache_get_size (sec) == 0) {
689                enable_button (tb_hwnd, ID_KEYMISC_SIGN, FALSE);
690          case TBN_GETBUTTONINFO:              set_menu_state (hmenu, ID_KEYMISC_SIGN, MF_GRAYED);
691              LPTBNOTIFY lpTbNotify;          }
692              lpTbNotify = (LPTBNOTIFY)lparam;      }
693              if (lpTbNotify->iItem < (sizeof(myb) / sizeof(mybuttons))) {  }
694                  lpTbNotify->tbButton.iBitmap = imagelist_getindex(myb[lpTbNotify->iItem].icon);  
695                  lpTbNotify->tbButton.idCommand = myb[lpTbNotify->iItem].command;  
696                  lpTbNotify->tbButton.fsState = TBSTATE_ENABLED;  /* Disable some context menu items when multiple keys are selected. */
697                  lpTbNotify->tbButton.fsStyle = TBSTYLE_BUTTON;  static void
698                  lpTbNotify->tbButton.iString = 0;  popup_multiple (HWND dlg, HMENU hm)
699                  strncpy (lpTbNotify->pszText, myb[lpTbNotify->iItem].text, lpTbNotify->cchText);  {
700                  SetWindowLong(dlg, DWL_MSGRESULT, TRUE);      int resids[] = {
701              }          ID_KEYCTX_EDIT,
702              return TRUE;          ID_KEYCTX_SIGN,
703            ID_KEYCTX_REV,
704          case TBN_RESET: /* Restore last saved toolbar status */          ID_KEYCTX_ENABLE,
705              TBSAVEPARAMS tbsp;          ID_KEYCTX_DISABLE,
706            ID_KEYCTX_ADDKEY,
707              tbsp.hkr = HKEY_CURRENT_USER;          ID_KEYCTX_ADDPHOTO,
708              tbsp.pszSubKey = "Software\\WinPT";          ID_KEYCTX_ADDUID,
709              tbsp.pszValueName = "KM_toolbar";          ID_KEYCTX_ADDREV,
710              SendMessage (notify->hwndFrom, TB_SAVERESTORE, FALSE, (LPARAM)&tbsp);          ID_KEYCTX_LISTSIGS,
711              break;          ID_KEYCTX_MAXTRUST,
712            ID_KEYCTX_PROPS,
713          case TBN_BEGINADJUST: /* User is about to change the toolbar. Save it */          ID_KEYCTX_SENDMAIL,
714              tbsp.hkr = HKEY_CURRENT_USER;          0};
715              tbsp.pszSubKey = "Software\\WinPT";      int i;
716              tbsp.pszValueName = "KM_toolbar";      for (i=0; i < resids[i] != 0; i++)
717              SendMessage (notify->hwndFrom, TB_SAVERESTORE, TRUE, (LPARAM)&tbsp);          set_menu_state (hm, resids[i], MF_GRAYED);
718              break;  }
719    
720          case TBN_ENDADJUST: /* User has finished customizing the toolbar. Save it. */  
721              tbsp.hkr = HKEY_CURRENT_USER;  /* The items which are shown when GPG is in read-only mode. */
722              tbsp.pszSubKey = "Software\\WinPT";  static void
723              tbsp.pszValueName = "KM_toolbar";  popup_gpg_readonly (HWND dlg, HMENU hm)
724              SendMessage (notify->hwndFrom, TB_SAVERESTORE, TRUE, (LPARAM)&tbsp);  {
725              break;      int resids[] = {
726            ID_KEYCTX_PASTE,
727          case TTN_GETDISPINFO:          ID_KEYCTX_EDIT,
728              LPTOOLTIPTEXT lpttt;          ID_KEYCTX_SIGN,
729              lpttt = (LPTOOLTIPTEXT)lparam;          ID_KEYCTX_REV,
730            ID_KEYCTX_DEL,
731              lpttt->hinst = NULL;          ID_KEYCTX_ENABLE,
732              switch (lpttt->hdr.idFrom) {          ID_KEYCTX_DISABLE,
733              case ID_KEYMISC_DELETE:          ID_KEYCTX_RECVFROM,
734                  lpttt->lpszText = (char *)_("Delete key from keyring");          ID_KEYCTX_ADDKEY,
735                  break;          ID_KEYCTX_ADDPHOTO,
736            ID_KEYCTX_ADDUID,
737              case ID_KEYMISC_PROPS:          ID_KEYCTX_ADDREV,
738                  lpttt->lpszText = (char *)_("Show key properties");          0
739                  break;      };
740        int i;
741              case ID_KEYMISC_SIGN:  
742                  lpttt->lpszText = (char *)_("Sign key");      if (gpg_read_only == 0)
743                  break;          return;
744        for (i=0; resids[i] != 0; i++)
745              case ID_KEYMISC_IMPORT:          set_menu_state (hm, resids[i], MF_GRAYED);
746                  lpttt->lpszText = (char *)_("Import key to keyring");  }
747                  break;  
748    
749              case ID_KEYMISC_EXPORT:  /* Change the 'Edit' menu based on the current state. */
750                  lpttt->lpszText = (char *)_("Export key to a file");  static void
751                  break;  change_edit_menu (listview_ctrl_t lv, HMENU hm, int id)
752              }  {
753              return TRUE;      enum item { EDIT_MENU = 1 };
754                    int no_sel;
755          case LVN_ITEMCHANGED:  
756              if (((LPNMLISTVIEW)lparam)->uNewState) /* item selected? */      if (id != EDIT_MENU)
757              {          return;
758                  update_ui_items (dlg, kmi->lv);  
759                  return TRUE;      if (!clip_contains_pgpkey ())
760              }          set_menu_state (hm, ID_KEYMISC_PASTE, MF_GRAYED);
761              break;      else
762            set_menu_state (hm, ID_KEYMISC_PASTE, MF_ENABLED);
763          case NM_RCLICK:      no_sel = listview_get_curr_pos (lv) == -1? 1 : 0;
764              if (notify->idFrom == IDC_KEYMISC_KEYLIST)      set_menu_state (hm, ID_KEYMISC_DELETE2, no_sel? MF_GRAYED: MF_ENABLED);
765              {      set_menu_state (hm, ID_KEYMISC_COPY, no_sel? MF_GRAYED : MF_ENABLED);
766                  if (listview_get_curr_pos (kmi->lv) == -1)  }
767                      return TRUE; /* Popup only when a item was selected */  
768                  do_check_cache (kmi->lv, dlg, kmi->statbar);  
769                  GetCursorPos (&p);  
770                  hm = LoadMenu (glob_hinst, MAKEINTRESOURCE (IDR_WINPT_KEYMISC_CTX));  /* Show limited key menu entries when GPG is in read-only mode. */
771                  popup = GetSubMenu (hm, 0);  static void
772              #ifndef LANG_DE  change_key_menu (HMENU hm, int id)
773                  set_menu_text( popup, ID_KEYCTX_UID_COPY, _("Copy User ID to Clipboard") );  {
774                  set_menu_text( popup, ID_KEYCTX_COPY, _("Copy Key to Clipboard") );      int key_resids[] = {
775                  set_menu_text( popup, ID_KEYCTX_PASTE, _("Paste Key from Clipboard") );                      ID_KEYMISC_SIGN,
776                  set_menu_text( popup, ID_KEYCTX_RECVFROM, _("Refresh from Keyserver") );          ID_KEYMISC_DELETE,
777              #endif          ID_KEYMISC_REVCERT,
778                  idx = listview_get_curr_pos (kmi->lv);          ID_KEYMISC_IMPORT_HTTP,
779                  if (km_check_for_seckey (kmi->lv, idx, &i) && i == 0) {          ID_KEYMISC_IMPORT,
780                      set_menu_state (popup, ID_KEYCTX_SETDEFKEY, MF_ENABLED);          ID_KEYMISC_REFRESH_KEYS,
781                      set_menu_state (popup, ID_KEYCTX_MAXTRUST, MF_ENABLED);          ID_KEYMISC_REBUILD,
782                  }          ID_KEYMISC_KEYWIZARD,
783                  if (!km_check_for_seckey (kmi->lv, idx, NULL)) {          ID_KEYMISC_CARDNEW,
784                      set_menu_state( popup, ID_KEYCTX_REV, MF_DISABLED|MF_GRAYED );          ID_KEYMISC_NEWKEY,
785                      set_menu_state( popup, ID_KEYCTX_ADDKEY, MF_DISABLED|MF_GRAYED );          0,
786                      set_menu_state( popup, ID_KEYCTX_ADDUID, MF_DISABLED|MF_GRAYED );      };
787                      set_menu_state( popup, ID_KEYCTX_ADDREV, MF_DISABLED|MF_GRAYED );      int edit_resids[] = {
788                      set_menu_state( popup, ID_KEYCTX_ADDPHOTO, MF_DISABLED|MF_GRAYED );          ID_KEYMISC_PASTE,
789                      set_menu_state (popup, ID_KEYCTX_SETPREFKS, MF_DISABLED|MF_GRAYED);          ID_KEYMISC_OT,
790                  }          ID_KEYMISC_EDITKEY,
791                  else if( km_check_for_seckey( kmi->lv, idx, NULL )          0
792                        && km_key_is_v3( kmi->lv, idx ) )      };
793                  {      int *resids;
794                      /* PGP 2 keys, version 3 have no no support for photo-id's,      int i;
795                         designated revokers and secondary keys. */  
796                      set_menu_state (popup, ID_KEYCTX_ADDKEY, MF_DISABLED|MF_GRAYED);      
797                      set_menu_state (popup, ID_KEYCTX_ADDREV, MF_DISABLED|MF_GRAYED);      if (gpg_read_only == 0)
798                      set_menu_state (popup, ID_KEYCTX_ADDPHOTO, MF_DISABLED|MF_GRAYED);          return;
799                  }      switch (id) {
800                  if( km_get_key_status( kmi->lv, idx ) & KM_FLAG_DISABLED )      case 0: return;
801                      set_menu_state( popup, ID_KEYCTX_DISABLE, MF_DISABLED|MF_GRAYED );      case 3: resids = key_resids; break;
802                  else      case 1: resids = edit_resids;break;
803                      set_menu_state( popup, ID_KEYCTX_ENABLE, MF_DISABLED|MF_GRAYED );      default:resids = edit_resids; break;
804                  if (km_get_key_status (kmi->lv, idx) & KM_FLAG_REVOKED)      }
805                      set_menu_state (popup, ID_KEYCTX_SIGN, MF_DISABLED|MF_GRAYED);  
806                  if( mapi_init() )      for (i=0; resids[i] != 0; i++)
807                      set_menu_state( popup, ID_KEYCTX_SENDMAIL, MF_DISABLED|MF_GRAYED );          set_menu_state (hm, resids[i], MF_GRAYED);
808                  popup_gpg_readonly (dlg, popup);  }
809                  TrackPopupMenu( popup, TPM_RIGHTALIGN, p.x, p.y, 0, dlg, NULL );  
810                  DestroyMenu( popup );  
811                  DestroyMenu( hm );  /* Reload a single key in the cache. */
812                  return TRUE;  static void
813              }  update_key (listview_ctrl_t lv, int pos, const char *keyid, int keypair)
814              if( notify->idFrom == IDC_KEYMISC_GROUP ) {  {
815                  HWND tree = GetDlgItem( dlg, IDC_KEYMISC_GROUP );      struct winpt_key_s key;
816                  if( TreeView_GetSelection( tree ) ) {  
817                      GetCursorPos( &p );      keycache_update (0, keyid);
818                      hm = LoadMenu( glob_hinst, MAKEINTRESOURCE(IDR_WINPT_GROUP_CTX) );      if (keypair)
819                      popup = GetSubMenu( hm, 0 );          keycache_update (1, keyid);
820                      if( km_index == -1 )  
821                          set_menu_state( popup, ID_GROUP_PASTE, MF_DISABLED|MF_GRAYED );      /* because we replaced the key item, we need to update the
822                      set_menu_text( popup, ID_GROUP_PASTE, _("Paste into this group") );         address of the pointer in the ListView control. */
823                      set_menu_text( popup, ID_GROUP_DELETE, _("Delete") );      memset (&key, 0, sizeof (key));
824                      TrackPopupMenu( popup, TPM_RIGHTALIGN, p.x, p.y, 0, dlg, NULL );      winpt_get_pubkey (keyid, &key);
825                      DestroyMenu( popup );      keylist_upd_key (lv, pos, key.ext, key.ctx);
826                      DestroyMenu( hm );      keyring_check_last_access ();
827                      return TRUE;  }
828                  }  
829              }  
830              break;  /* Setup status bar for the main window @dlg. */
831    static HWND
832          case LVN_COLUMNCLICK:  setup_status_bar (HWND dlg, listview_ctrl_t lv)
833              if (notify->idFrom == IDC_KEYMISC_KEYLIST) {  {      
834                  NMLISTVIEW * p = (LPNMLISTVIEW) lparam;      HWND statbar;
835                  int sortby = 0;      RECT r;
836                  switch (p->iSubItem) {      int partpos[3];
837                  case 0:  sortby = GPGME_ATTR_USERID; break;      int i;
838                  case 1:  sortby = GPGME_ATTR_KEYID; break;  
839                  case 2:  sortby = GPGME_ATTR_IS_SECRET; break;      GetClientRect (dlg, &r);
840                  case 3:  sortby = GPGME_ATTR_LEN; break;      for (i=1; i <= 3; i++)
841                  case 5:  sortby = GPGME_ATTR_VALIDITY; break;          partpos[i-1] = r.right/3*i;
842                  case 6:  sortby = GPGME_ATTR_OTRUST; break;      statbar = CreateStatusWindow (WS_CHILD | WS_VISIBLE | CCS_BOTTOM,
843                  case 7:  sortby = GPGME_ATTR_CREATED; break;                                    "status bar", dlg, KM_SEPARATOR_ID);
844                  case 8:  sortby = GPGME_ATTR_ALGO; break;  
845                  default: return TRUE; //sortby = GPGME_ATTR_USERID; break;      ShowWindow (statbar, SW_SHOW);
846                  }      SendMessage (statbar, SB_SETPARTS, (WPARAM)3, (LPARAM)partpos);
847    
848                  if ((kmi->keylist_sortby & ~KEYLIST_SORT_DESC) == sortby)      update_default_key_str (statbar);
849                      kmi->keylist_sortby ^= KEYLIST_SORT_DESC;      update_status_bar (statbar, lv);
850                  else  
851                      kmi->keylist_sortby = sortby;      return statbar;
852                  keylist_sort (kmi->lv, kmi->keylist_sortby);  }
853                  return TRUE;  
854              }  
855              break;  /* Remove or add columns which depends on the state of @checked. */
856          }  void
857          break;  modify_listview_columns (km_info_s *kmi, UINT m_uid, BOOL checked)
858          }  {
859        UINT resids[] = {
860      case WM_WINDOWPOSCHANGING:          0,
861          if (((WINDOWPOS*)lparam)->cx < 400)          ID_KEYMISC_VIEWKEYID,
862              ((WINDOWPOS*)lparam)->cx = 400;          ID_KEYMISC_VIEWTYPE,
863          if (((WINDOWPOS*)lparam)->cy < 200)          0,
864              ((WINDOWPOS*)lparam)->cy = 200;          ID_KEYMISC_VIEWCIPHER,
865           return TRUE;          0,
866                    0,
867      case WM_SIZE:          ID_KEYMISC_VIEWCREAT,
868          do_resize_window (dlg, kmi);          ID_KEYMISC_VIEWDESC,
869          return TRUE;          -1
870                };
871      case WM_SYSCOMMAND:      listview_column_s cols[] = {
872          if( LOWORD (wparam) == SC_CLOSE )      {0, 240, (char *)_("User ID")},
873              EndDialog( dlg, TRUE );      {1, 78, (char *)_("Key ID")},
874          return FALSE;      {2, 52, (char *)_("Type")},    
875                {3, 66, (char *)_("Size")},
876      case WM_MENUSELECT:      {4, 60, (char *)_("Cipher")},
877          menu_gpg_readonly (dlg, (HMENU)lparam, LOWORD (wparam));      {5, 66, (char *)_("Validity")},
878          break;      {6, 58, (char *)_("Trust")},
879        {7, 72, (char *)_("Creation")},
880      case WM_COMMAND:      {8, 160,(char *)_("Description")},
881          if( gnupg_access_keyring( 1 ) ) {      {0, 0, NULL}
882              msg_box( dlg, _("Could not access public keyring"), _("Key Manager"), MB_ERR );      };
883              return FALSE;      UINT pos;
884          }  
885          do_check_cache( kmi->lv, dlg, kmi->statbar );      for (pos=0; resids[pos] != -1; pos++) {
886          switch( LOWORD( wparam ) ) {          if (m_uid == resids[pos])
887          case ID_KEYMISC_QUIT:              break;
888              EndDialog( dlg, TRUE );      }
889              return TRUE;      if (!checked)
890                        listview_del_column (kmi->lv, (int)pos);
891          case ID_KEYMISC_MAIL:      else {      
892              DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_MAIL, GetDesktopWindow (),          listview_add_column (kmi->lv, &cols[pos]);
893                              winpt_mail_proc, NULL);          keylist_upd_col (kmi->lv, pos);
894              break;      }
895                }
896          case ID_KEYMISC_DELETE:  
897              if (km_delete_keys (kmi->lv, dlg))  
898                  return FALSE;  /* Helper to handle the help file. If @check is 1
899              refresh_keys = 1;     the existence of the file is checked.
900              return TRUE;     Otherwise the help file will be loaded. */
901                static bool
902          case ID_KEYMISC_SIGN:  start_help (HWND dlg, int check)
903              gpgme_key_t key;  {
904        DWORD n;
905              if ( (idx = listview_get_curr_pos( kmi->lv )) == -1 ) {      char path[MAX_PATH+1+32];
906                  msg_box( dlg, _("Please select a key."),  _("Key Manager"),  
907                           MB_ERR );      n = GetModuleFileName (NULL, path, sizeof (path)-1-32);
908                  return FALSE;      if (!n)
909              }          return false;
910              if( !km_check_key_status( kmi->lv, idx ) )      path[n] = 0;
911                  return FALSE;      while (n-- && path[n] != '\\')
912              listview_get_item_text( kmi->lv, idx, 1, keyid, sizeof keyid );          ;
913              listview_get_item_text( kmi->lv, idx, 2, type, sizeof type -1 );      path[n+1] = 0;
914              rc = get_pubkey( keyid, &key );      strcat (path, "winpt.chm");
915              if( rc )      if (!check)
916                  BUG( dlg );          ShellExecute (dlg, "open", path, NULL, NULL, SW_SHOW);
917              if( key )      return file_exist_check (path) == 0? true : false;
918                  dialog_box_param( glob_hinst, (LPCSTR)IDD_WINPT_KEYSIGN, dlg,  }
919                                    keysign_dlg_proc, (LPARAM)key,  
920                                    _("Key Signing"), IDS_WINPT_KEYSIGN);  /* Translate all menu strings. */
921              return TRUE;  static void
922                translate_menu_strings (HWND dlg)
923          case ID_KEYMISC_REVCERT:  {
924              idx = listview_get_curr_pos( kmi->lv );      HMENU menu;
925              if( idx == -1 ) {  
926                  msg_box( dlg, _("Please select a key."), _("Key Manager"), MB_ERR );      menu = LoadMenu (glob_hinst, (LPCSTR)IDR_WINPT_KEYMISC);
927                  return FALSE;      set_menu_text_bypos (menu, 0, _("File"));
928              }      set_menu_text_bypos (menu, 1, _("Edit"));
929              listview_get_item_text( kmi->lv, idx, 0, uid, sizeof uid -1 );      set_menu_text_bypos (menu, 2, _("View"));
930              listview_get_item_text( kmi->lv, idx, 1, keyid, sizeof keyid-1 );      set_menu_text_bypos (menu, 3, _("Key"));
931              if ( !km_check_for_seckey( kmi->lv, idx, NULL ) ) {      set_menu_text_bypos (menu, 4, _("Groups"));
932                  msg_box( dlg, _("There is no secret key available!"), _("Key Manager"), MB_ERR );  
933                  return FALSE;      set_menu_text (menu, ID_KEYMISC_EDITKEY, _("Edit"));
934              }      set_menu_text (menu, ID_KEYMISC_MAIL, _("Send Mail..."));
935                    set_menu_text (menu, ID_KEYMISC_OT, _("Ownertrust")); /* XXX */
936              {      set_menu_text (menu, ID_KEYMISC_COPY, _("&Copy\tCtrl+C"));
937                  char t[128];      set_menu_text (menu, ID_KEYMISC_PASTE, _("&Paste\tCtrl+V"));
938                  listview_get_item_text( kmi->lv, idx, 5, t, sizeof t -1 );      set_menu_text (menu, ID_KEYMISC_FIND, _("Search...\tCtrl+F"));
939                  if( strchr( t, 'R' ) ) {      set_menu_text (menu, ID_KEYMISC_SELALL, _("Select All\tCtrl+A"));
940                      msg_box( dlg, _("Key already revoked!"), _("Key Manager"), MB_INFO );      set_menu_text (menu, ID_KEYMISC_QUIT, _("&Quit"));
941                      return FALSE;      set_menu_text (menu, ID_KEYMISC_UID, _("User ID"));
942                  }      set_menu_text (menu, ID_KEYMISC_NEWKEY, _("&Expert"));
943              }      set_menu_text (menu, ID_KEYMISC_KEYWIZARD, _("&Normal"));
944                    set_menu_text (menu, ID_KEYMISC_EDIT, _("Edit"));
945              q = km_quote_uid (uid);      set_menu_text (menu, ID_KEYMISC_SIGN, _("&Sign"));
946              memset (&k, 0, sizeof (k));      set_menu_text (menu, ID_KEYMISC_DELETE, _("&Delete"));
947              k.key_pair = 1;      set_menu_text (menu, ID_KEYMISC_DELETE2, _("&Delete"));
948              k.keyid = keyid;      set_menu_text (menu, ID_KEYMISC_REVCERT, _("&Revoke Cert"));
949              k.uid = q;      set_menu_text (menu, ID_KEYMISC_CHECKSIGS, _("&List Signatures"));
950              k.is_protected = km_check_if_protected( kmi->lv, idx );      set_menu_text (menu, ID_KEYMISC_TRUSTPATH, _("List Trust Path"));
951              dialog_box_param( glob_hinst, (LPCSTR)IDD_WINPT_KEYREVOKE, dlg,      set_menu_text (menu, ID_KEYMISC_EXPORT, _("&Export..."));
952                               key_revoke_dlg_proc, (LPARAM)&k,      set_menu_text (menu, ID_KEYMISC_IMPORT, _("&Import..."));
953                               _("Key Revocation"), IDS_WINPT_KEYREVOKE );      set_menu_text (menu, ID_KEYMISC_PROPS, _("&Properties"));
954              free_if_alloc( q );      set_menu_text (menu, ID_KEYMISC_GPGOPT, _("Options"));
955              return TRUE;      set_menu_text (menu, ID_KEYMISC_GPGPREFS, _("Preferences"));
956                    set_menu_text (menu, ID_KEYMISC_SENDRECV, _("Keyserver") );
957          case ID_KEYMISC_TRUSTPATH:      set_menu_text (menu, ID_KEYMISC_EXPORT_PRIVKEY, _("E&xport Secret Key"));
958              idx = listview_get_curr_pos( kmi->lv );      set_menu_text (menu, ID_KEYMISC_RECACHE, _("Re&load Key Cache"));
959              if( idx == -1 ) {      set_menu_text (menu, ID_KEYMISC_REBUILD, _("R&everify Signatures"));
960                  msg_box( dlg, _("Please select a key."), _("Key Manager"), MB_ERR );      set_menu_text (menu, ID_KEYMISC_REFRESH_KEYS, _("Refresh &Keys (Keyserver)"));
961                  return FALSE;      set_menu_text (menu, ID_KEYMISC_INFO, _("Info") );
962              }      set_menu_text (menu, ID_KEYMISC_HELP, _("&Help"));
963              listview_get_item_text( kmi->lv, idx, 0, uid, sizeof uid -1 );  
964              listview_get_item_text( kmi->lv, idx, 1, keyid, sizeof keyid -1 );      set_menu_text (menu, ID_KEYMISC_VIEWKEYID, _("Key ID"));
965              if( km_check_for_seckey( kmi->lv, idx, NULL ) ) {      set_menu_text (menu, ID_KEYMISC_VIEWCIPHER, _("Cipher"));
966                  msg_box( dlg, _("It does not make any sense with a key pair!"), _("Key Manager"), MB_OK );      set_menu_text (menu, ID_KEYMISC_VIEWTYPE, _("Type"));
967                  return FALSE;      set_menu_text (menu, ID_KEYMISC_VIEWCREAT, _("Creation"));
968              }  
969              memset (&k, 0, sizeof (k));      if (!start_help (NULL, 1))
970              k.keyid = keyid;          set_menu_state (menu, ID_KEYMISC_HELP, MF_GRAYED);
971              k.uid = uid;  
972              dialog_box_param( glob_hinst, (LPCSTR)IDD_WINPT_KEYTRUST, dlg,      SetMenu (dlg, menu);
973                                keytrust_dlg_proc, (LPARAM)&k,  }
974                                _("List Trust Path"), IDS_WINPT_KEYTRUST );  
975              return TRUE;  
976                /* Translate popup menu strings. */
977          case ID_KEYMISC_CHECKSIGS:  static void
978              idx = listview_get_curr_pos( kmi->lv );  translate_popupmenu_strings (HMENU popup)
979              if( idx == -1 ) {  {
980                  msg_box( dlg, _("Please select a key."), _("Key Manager"), MB_ERR );      set_menu_text (popup, ID_KEYCTX_UID_COPY, _("Copy User ID to Clipboard"));
981                  return FALSE;      set_menu_text (popup, ID_KEYCTX_KEYID_COPY, _("Copy Key ID to Clipboard"));
982              }      set_menu_text (popup, ID_KEYCTX_FPR_COPY, _("Copy Fingerprint to Clipboard"));
983              listview_get_item_text (kmi->lv, idx, 0, uid, DIM (uid)-1);      set_menu_text (popup, ID_KEYCTX_KINFO_COPY, _("Copy Key Info to Clipboard"));
984              listview_get_item_text (kmi->lv, idx, 1, keyid, DIM (keyid)-1);      set_menu_text (popup, ID_KEYCTX_COPY, _("Copy Key to Clipboard"));
985              memset (&k, 0, sizeof (k));      set_menu_text (popup, ID_KEYCTX_PASTE, _("Paste Key from Clipboard"));
986              k.keyid = keyid;      set_menu_text (popup, ID_KEYCTX_RECVFROM, _("Refresh from Keyserver"));
987              k.uid = uid;      set_menu_text (popup, ID_KEYCTX_MAXTRUST, _("Set Implicit &Trust"));
988              dialog_box_param (glob_hinst, (LPCSTR)IDD_WINPT_KEYSIG, dlg,      set_menu_text (popup, ID_KEYCTX_LISTSIGS, _("&List Signatures"));
989                                keysig_dlg_proc, (LPARAM)&k,      set_menu_text (popup, ID_KEYCTX_PROPS, _("&Properties"));
990                                _("Key Signature List" ), IDS_WINPT_KEYSIG);      set_menu_text (popup, ID_KEYCTX_EDIT, _("Key Edit"));
991              return TRUE;      set_menu_text (popup, ID_KEYCTX_DEL, _("&Delete"));
992                    set_menu_text (popup, ID_KEYCTX_REV, _("&Revoke Cert"));
993          case ID_KEYMISC_PROPS:      set_menu_text (popup, ID_KEYCTX_SIGN, _("&Sign"));
994              idx = listview_get_curr_pos( kmi->lv );      set_menu_text (popup, ID_KEYCTX_ENABLE, _("&Enable"));
995              if( idx == -1 ) {      set_menu_text (popup, ID_KEYCTX_DISABLE, _("&Disable"));
996                  msg_box( dlg, _("Please select a key."), _("Key Manager"), MB_ERR );      set_menu_text (popup, ID_KEYCTX_RECVFROM, _("Re&fresh from Keyserver"));
997                  return FALSE;      set_menu_text (popup, ID_KEYCTX_SETPREFKS, _("Set preferred Keyserver URL"));
998              }      set_menu_text (popup, ID_KEYCTX_SENDMAIL, _("Send Key to Mail Recipient"));
999              listview_get_item_text( kmi->lv, idx, 1, keyid, sizeof keyid -1 );      set_menu_text (popup, ID_KEYCTX_SETDEFKEY, _("Set as Default Key"));
1000              listview_get_item_text( kmi->lv, idx, 2, type, sizeof type -1 );  
1001              memset (&k, 0, sizeof (k));      set_menu_text (popup, ID_KEYCTX_ADDKEY, _("Key..."));
1002              k.key_pair = 0;      set_menu_text (popup, ID_KEYCTX_ADDUID, _("User ID..."));
1003              k.keyid = keyid;      set_menu_text (popup, ID_KEYCTX_ADDPHOTO, _("Photo ID..."));
1004              if( !strcmp( type, "pub/sec" ) || !strcmp( type, "pub/crd" ) )      set_menu_text (popup, ID_KEYCTX_ADDREV, _("Revoker..."));
1005                  k.key_pair = 1;  
1006              k.callback.ctl = kmi->lv;      /* change popup texts */
1007              k.callback.idx = idx;      set_menu_text_bypos (popup, 0, _("Key Attributes"));
1008              dialog_box_param( glob_hinst, (LPCSTR)IDD_WINPT_KEYPROPS, dlg,      set_menu_text_bypos (popup, 6, _("Add"));
1009                                keyprops_dlg_proc, (LPARAM)&k,      set_menu_text_bypos (popup, 19, _("Send to Keyserver"));
1010                                _("Key Properties"), IDS_WINPT_KEYPROPS );  }
1011              if (k.callback.new_val != 0)  
1012              {  
1013                  t = get_key_trust_str (k.callback.new_val);  /* Return true if the cache contain marked keys. */
1014                  listview_add_sub_item (kmi->lv, idx, 6, t);  static bool
1015              }  updated_keys_avail (void)
1016              return TRUE;  {
1017                    gpg_keycache_t kc = keycache_get_ctx (1);
1018          case ID_KEYMISC_RECACHE:      struct keycache_s *k;
1019              /* If there is already a reload request, don't bother the user with a message. */  
1020              if( keycache_get_reload() == 1 )      for (k = kc->item; k; k = k->next) {
1021                  idx = IDYES;          if (k->flags)
1022              else {              return true;
1023                  char t[256];      }
1024                  _snprintf( t, sizeof t -1,      return false;
1025                             _("This is only useful when the keyring has been "  }
1026                               "modified (sign a key...).\n"  
1027                               "Do you really want to reload the keycache?") );  
1028                  idx = msg_box( dlg, t, _("Key Manager"), MB_YESNO );  /* Find the index of the key identified by @key. */
1029              }  static int
1030              if( idx == IDYES ) {  find_keypos (listview_ctrl_t lv, gpgme_key_t key)
1031                  rcs.kr_reload = rcs.kr_update = 1;  {
1032                  rcs.tr_update = 0;      char keyid[16+1];
1033                  DialogBoxParam( glob_hinst, (LPCSTR)IDD_WINPT_KEYCACHE, dlg,      int i;
1034                                  keycache_dlg_proc, (LPARAM)&rcs );  
1035                  c = keycache_get_ctx( 1 );      for (i=0; i < listview_count_items (lv, 0); i++) {
1036                  if( !c )          listview_get_item_text (lv, i, KM_COL_KEYID, keyid, sizeof (keyid)-1);
1037                      BUG( dlg );          if (!strcmp (key->subkeys->keyid+8, keyid+2))
1038                  keylist_reload( kmi->lv, c, KEYLIST_LIST, GPGME_ATTR_USERID );              return i;
1039                  refresh_keys = 0;      }
1040              }      return -1;
1041              return TRUE;  }
1042                
1043          case ID_KEYMISC_REBUILD:  
1044              rcs.kr_reload = rcs.kr_update = 1;  /* Add all recently updated keys in the cache to the list
1045              rcs.tr_update = 1;     and refresh all GUI elements. */
1046              DialogBoxParam( glob_hinst, (LPCSTR)IDD_WINPT_KEYCACHE, dlg,  static void
1047                              keycache_dlg_proc, (LPARAM)&rcs );  refresh_keylist (struct km_info_s *kmi)
1048              c = keycache_get_ctx( 1 );  {
1049              if( !c )      struct keycache_s *ctx;
1050                  BUG( dlg );      gpg_keycache_t kc;
1051              keylist_reload( kmi->lv, c, KEYLIST_LIST, GPGME_ATTR_USERID );      int status=0, pos;
1052              return TRUE;  
1053                    kc = keycache_get_ctx (1);
1054          case ID_KEYMISC_NEWKEY:      while (!gpg_keycache_next_updated_key (kc, &ctx, &status)) {
1055              memset (&genkey, 0, sizeof (genkey));          if (status == KC_FLAG_ADD)
1056              dialog_box_param (glob_hinst, (LPCSTR)IDD_WINPT_KEYGEN, dlg,              keylist_add_key (kmi->lv, KEYLIST_LIST, ctx, ctx->key);
1057                                keygen_dlg_proc, (LPARAM)&genkey, _("Key Generation"),          else {
1058                                IDS_WINPT_KEYGEN);              pos = find_keypos (kmi->lv, ctx->key);
1059              if (genkey.newkey)              if (pos != -1)
1060                  keylist_add_key (kmi->lv, KEYLIST_LIST, genkey.newkey);                  keylist_upd_key (kmi->lv, pos, ctx, ctx->key);
1061              return TRUE;          }
1062        }
1063          case ID_KEYMISC_CARDNEW:      keylist_sort (kmi->lv, KEY_SORT_USERID);
1064              if( !scard_support ) {      update_status_bar (kmi->statbar, kmi->lv);
1065                  msg_box( dlg, _("Smart Card support is not available."), _("Key Manager"), MB_INFO );      keyring_check_last_access ();
1066                  return FALSE;  }
1067              }  
1068              dialog_box_param( glob_hinst, (LPCSTR)IDD_WINPT_CARD_KEYGEN, dlg,  
1069                                card_keygen_dlg_proc, NULL, _("Card Key Generation"),  static void
1070                                IDS_WINPT_CARD_KEYGEN );  reload_keylist (struct km_info_s *kmi)
1071              if( keycache_get_reload() )  {
1072                  send_cmd_id( dlg, ID_KEYMISC_RECACHE );      keycache_reload (kmi->dlg);
1073              return TRUE;      keylist_reload (kmi->lv, keycache_get_ctx (1),
1074                        KEYLIST_LIST, KEY_SORT_USERID);
1075          case ID_KEYMISC_KEYWIZARD:      update_status_bar (kmi->statbar, kmi->lv);
1076              memset (&genkey, 0, sizeof (genkey));      keyring_check_last_access ();
1077              dialog_box_param (glob_hinst, (LPCSTR)IDD_WINPT_KEYWIZARD, dlg,  }
1078                                keygen_wizard_dlg_proc, (LPARAM)&genkey, _("Key Generation Wizard"),  
1079                                IDS_WINPT_KEYWIZARD);  
1080              if (genkey.newkey)  /* Reload the entire key cache and update the listview. */
1081                  keylist_add_key (kmi->lv, KEYLIST_LIST, genkey.newkey);  static void
1082              return TRUE;  reload_keycache (struct km_info_s *kmi)
1083                {
1084          case ID_KEYMISC_SENDRECV:      refresh_cache_s rcs = {0};
1085              dialog_box_param( glob_hinst, (LPCSTR)IDD_WINPT_KEYSERVER, dlg,      gpg_keycache_t c;
1086                                keyserver_dlg_proc, NULL, _("Keyserver Access"),  
1087                                IDS_WINPT_KEYSERVER );      rcs.kr_reload = rcs.kr_update = 1;
1088              return TRUE;      rcs.tr_update = 0;
1089                    DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_KEYCACHE, kmi->dlg,
1090          case ID_KEYMISC_GPGPREFS:                      keycache_dlg_proc, (LPARAM)&rcs);
1091              dialog_box_param( glob_hinst, (LPCSTR)IDD_WINPT_GPGPREFS, dlg,      c = keycache_get_ctx (1);
1092                                gpgprefs_dlg_proc, NULL, _("GnuPG Preferences"),      if (!c)
1093                                IDS_WINPT_GPGPREFS );          BUG (0);
1094              return TRUE;      keylist_reload (kmi->lv, c, KEYLIST_LIST, KEY_SORT_USERID);
1095                    update_status_bar (kmi->statbar, kmi->lv);
1096          case ID_KEYMISC_GPGOPT:      SetForegroundWindow (kmi->dlg);
1097              dialog_box_param( glob_hinst, (LPCSTR)IDD_WINPT_GPGOPT, dlg,  }
1098                                gpgopt_dlg_proc, NULL, _("GnuPG Options" ),  
1099                                IDS_WINPT_GPGOPT );  
1100              return TRUE;  /* Handle all import request. */
1101                static void
1102          case ID_KEYMISC_IMPORT:  km_gui_import (struct km_info_s *kmi, int cmd_id, void *param)
1103              t = get_filename_dlg( dlg, FILE_OPEN, _("Choose Name of the Key File"), NULL, NULL );  {
1104              if( t )      int newkeys=0, newsks=0;
1105                  km_file_import( dlg, t );      int err = 0;
1106              return TRUE;  
1107        switch (cmd_id) {
1108          case ID_KEYMISC_IMPORT_HTTP:      case ID_KEYMISC_PASTE:
1109              url = (struct URL_ctx_s*)get_http_file_dlg (dlg);          err = km_clip_import (kmi->dlg, &newkeys, &newsks);
1110              if (url->cancel == 0)          break;
1111                  km_http_import (dlg, url->url);  
1112              delete url; url=NULL;      case ID_KEYMISC_IMPORT:
1113              break;          err = km_file_import (kmi->dlg, NULL, &newkeys, &newsks);
1114                        break;
1115          case ID_KEYMISC_EXPORT:  
1116              idx = listview_get_curr_pos( kmi->lv );      case WM_DROPFILES:
1117              if( idx == -1 ) {          err = km_dropped_file_import (kmi->dlg, (HDROP)param,
1118                  msg_box( dlg, _("Please select a key."), _("Key Manager"), MB_ERR );                                        &newkeys, &newsks);
1119                  return FALSE;          break;
1120              }  
1121              if( listview_count_items( kmi->lv, 1 ) > 1 )      default:
1122                  strcpy( keyid, _("Exported_GPG_Keys.asc") );          err = 1;
1123              else {          break;
1124                  listview_get_item_text( kmi->lv, idx, 1, keyid, sizeof keyid-1 );      }
1125                  strcat( keyid, ".asc" );  
1126              }      if (!err && !newsks && (newkeys > 0 && newkeys < KM_PRELOAD_KEYS))
1127              t = get_filename_dlg( dlg, FILE_SAVE, _("Choose Name for Key File"), NULL, keyid );          refresh_keylist (kmi);
1128              if( !t || overwrite_file( t ) == 0 )      else if (!err) /* avoid to spawn too much processes. */
1129                  return FALSE;          reload_keylist (kmi);
1130              km_file_export( dlg, kmi->lv, t );  
1131              return TRUE;      SetForegroundWindow (kmi->dlg);
1132                    center_window (kmi->dlg, NULL);
1133          case ID_KEYMISC_EXPORT_PRIVKEY:  }
1134              idx = listview_get_curr_pos( kmi->lv );  
1135              if( idx == -1 ) {  
1136                  msg_box( dlg, _("Please select a key."), _("Key Manager"), MB_ERR );  /* Dialog box procedure for the Key Manager. */
1137                  return FALSE;  BOOL CALLBACK
1138              }  keymanager_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
1139              if( !km_check_for_seckey( kmi->lv, idx, NULL ) ) {  {
1140                  msg_box( dlg, _("There is no corresponding secret key for this key."),      struct km_info_s *kmi = NULL;
1141                          _("Key Manager"), MB_ERR );      HWND kl;
1142                  return FALSE;      HMENU hm;
1143              }      struct keycache_s *kci;
1144              if( listview_count_items( kmi->lv, 1 ) > 1 ) {      gpg_keycache_t c;
1145                  msg_box( dlg, _("You can only export one secret key."), _("Key Manager"), MB_ERR );      gpgme_key_t key;
1146                  return FALSE;      struct genkey_s genkey;
1147              }      struct winpt_key_s k = {0};
1148              idx = msg_box( dlg,      struct URL_ctx_s *url;
1149                            _("This operation will export your *SECRET* key!\n\n"      char type[32], *name;
1150                              "Never send this key to ANYONE, it should be available\n"      const char *t, *host;
1151                              "ONLY on your machine and you may use this function\n"      WORD port = 0;
1152                              "to copy the key to a safe place.\n\n"      int l_idx = 0, i=0, rc;
1153                              "Do you really want to export the key?"),  
1154                            _("WARNING"), MB_INFO|MB_YESNO );      if ((msg != WM_INITDIALOG)
1155              if( idx == IDYES ) {          && ((kmi = (struct km_info_s*)GetWindowLong (dlg, GWL_USERDATA)) == NULL))
1156                  idx = listview_get_curr_pos( kmi->lv );          return FALSE;
1157                  listview_get_item_text( kmi->lv, idx, 1, keyid, sizeof (keyid)-8 );      
1158                  strcat( keyid, ".sec.asc" );      /* handle dynamic popup items in the keyserver menu. */
1159                  t = get_filename_dlg( dlg, 1, _("Choose Name for Key File"), NULL, keyid );      if (msg == WM_COMMAND && LOWORD (wparam) >= WM_APP &&
1160                  if( t && !file_exist_check( t ) ) {                               LOWORD (wparam) <= WM_APP+MAX_KEYSERVERS) {
1161                      idx = log_box( _("Key Manager"), MB_INFO|MB_YESNO,          l_idx = LOWORD (wparam)-WM_APP;
1162                                     _("File %s already exists.\nOverwrite?"), t );          if (l_idx < 0)
1163                      if( idx == IDNO )              return TRUE;
1164                          return FALSE;          host = kserver_get_hostname (l_idx, 0, &port);
1165                  }          if (host != NULL)
1166                  if( t )              km_send_to_keyserver (kmi->lv, dlg, host, port);
1167                      km_privkey_export( dlg, kmi->lv, t );          return TRUE;
1168              }      }
1169              break;  
1170        switch (msg) {
1171          case ID_KEYMISC_INFO:      case WM_INITDIALOG:
1172              dialog_box_param( glob_hinst, (LPCSTR)IDD_WINPT_ABOUT, glob_hwnd,          kmi = new struct km_info_s;
1173                                about_winpt_dlg_proc, NULL, _("About WinPT"),          memset (kmi, 0, sizeof (struct km_info_s));
1174                                IDS_WINPT_ABOUT );          kmi->lv_idx = -1;
1175              break;          kmi->hwnd_sep = regist_sep_wnd (dlg, kmi);
1176            imagelist_load (dlg);
1177          case ID_KEYMISC_HELP:          translate_menu_strings (dlg);
1178              ShellExecute (dlg, "open", "winpt.chm", NULL, NULL, SW_SHOW);          SetWindowText (dlg, _("Key Manager"));
1179              break;  
1180            c = keycache_get_ctx (KEYCACHE_PUB);
1181          case ID_KEYMISC_OT:          if (!c)
1182              dialog_box_param( glob_hinst, (LPCTSTR)IDD_WINPT_OWNERTRUST, glob_hwnd,              BUG (NULL);
1183                                ownertrust_dlg_proc, NULL,          kl = GetDlgItem (dlg, IDC_KEYMISC_KEYLIST);
1184                                _("Ownertrust"), IDS_WINPT_OWNERTRUST );          kmi->keylist_sortby = KEY_SORT_USERID;
1185              break;          Header_SetImageList(ListView_GetHeader (kl), glob_imagelist);
1186            kmi->lv = keylist_load (GetDlgItem (dlg, IDC_KEYMISC_KEYLIST), c,
1187          case ID_KEYMISC_EDITKEY:                                  NULL, KEYLIST_LIST, kmi->keylist_sortby);
1188              idx = listview_get_curr_pos (kmi->lv);          if (check_ultimate_trusted_key ()) {
1189              if (idx == -1)              msg_box (dlg, _("No ultimately trusted key found.\n"
1190                  break;                              "Please set at least one secret key to ultimate trust."),
1191              listview_get_item_text (kmi->lv, idx, 1, keyid, sizeof (keyid)-1);                              _("Key Manager"), MB_WARN);
1192              /* XXX: pub/crd = secret key does not work */          }
1193              memset (&k, 0, sizeof (k));          /* init subclassing for the listview */
1194              k.is_protected = km_check_if_protected (kmi->lv, idx);          keylist_proc.opaque = kmi;
1195              k.key_pair = km_check_for_seckey (kmi->lv, idx, NULL);          keylist_proc.dlg = dlg;
1196              k.keyid = keyid;          keylist_proc.current = (WNDPROC)keylist_subclass_proc;
1197              k.is_v3 = km_key_is_v3 (kmi->lv, idx);          keylist_proc.old = (WNDPROC)GetWindowLong(kl, GWL_WNDPROC);
1198              k.flags = km_get_key_status (kmi->lv, idx);          if (keylist_proc.old) {
1199              dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_KEYEDIT, dlg,              if( !SetWindowLong (kl, GWL_WNDPROC, (LONG)keylist_proc.current)) {
1200                                keyedit_main_dlg_proc, (LPARAM)&k,                  msg_box (dlg, _("Could not set keylist window procedure."),
1201                                _("Key Edit"), IDS_KEYCTX_EDIT);                           _("Key Manager"), MB_ERR);
1202              break;                  BUG (NULL);
1203                            }
1204          case ID_GROUP_NEW:          }
1205              memset (&gcb, 0, sizeof (gcb));          kmi->statbar = setup_status_bar (dlg, kmi->lv);
1206              gcb.gc = gc;          SetWindowLong (dlg, GWL_USERDATA, (LONG)kmi);
1207              dialog_box_param (glob_hinst, (LPCSTR)IDD_WINPT_GROUP, glob_hwnd,          kmi->toolbar = load_toolbar (dlg, kmi);
1208                               group_manager_dlg_proc, (LPARAM)&gcb, _("New Group"),          kmi->dlg = dlg;
1209                               IDS_WINPT_GROUP);  
1210              if( gcb.use_name )          do_center_window (dlg, kmi);
1211                  treeview_add_item( GetDlgItem(dlg, IDC_KEYMISC_GROUP), NULL, gcb.name );          do_resize_window (dlg, kmi);
1212              return TRUE;          update_ui_items (dlg, kmi->lv);
1213                        restore_column_info (kmi);
1214          case ID_KEYMISC_COPY:          keylist_sort (kmi->lv, kmi->keylist_sortby);
1215              km_index = listview_get_curr_pos( kmi->lv );  
1216              km_clip_export( dlg, kmi->lv );          SetDlgItemText (dlg, IDC_KEYMISC_GTEXT, _("Groups"));
1217              break;          SetClassLong (dlg, GCL_HICON, (LONG)LoadIcon (glob_hinst,
1218                                      (LPCTSTR)IDI_WINPT));
1219          case ID_KEYMISC_SELALL:          SetForegroundWindow (dlg);
1220              listview_select_all (kmi->lv);          force_foreground_window (dlg, 1000);
1221              break;          return TRUE;
1222            
1223          case ID_KEYMISC_PASTE:      case WM_DESTROY:
1224              km_index = -1;          save_column_info (kmi);
1225              km_clip_import (dlg);          if (kmi->lv) {
1226              break;              keylist_delete (kmi->lv);
1227                            kmi->lv = NULL;      
1228          case ID_KEYCTX_SETPREFKS:          }
1229              listview_get_item_text (kmi->lv, idx, 1, keyid, DIM(keyid)-1);          imagelist_destroy ();
1230              memset (&k, 0, sizeof (k));  
1231              k.keyid = keyid;          ltoa (kmi->pos_x, type, 10);
1232              keyedit_set_pref_keyserver (&k, dlg);          set_reg_entry (HKEY_CURRENT_USER, "Software\\WinPT", "KM_Pos_X", type);
1233              break;          ltoa (kmi->pos_y, type, 10);
1234            set_reg_entry (HKEY_CURRENT_USER, "Software\\WinPT", "KM_Pos_Y", type);
1235          case ID_KEYMISC_REFRESH_KEYS:          /* XXX: store window size. */
1236              if (listview_count_items (kmi->lv, 1) == 0) {          
1237                  msg_box (dlg, _("No key was selected, select all by default."), _("Key Manager"), MB_INFO);          /* Remove runtime information. This should be the last action taken here. */
1238                  listview_select_all (kmi->lv);          delete kmi; kmi = NULL;
1239              }          SetWindowLong (dlg, GWL_USERDATA, 0);
1240              km_refresh_from_keyserver (kmi->lv, dlg);          return FALSE;
1241              break;  
1242                                case WM_SHOWWINDOW:
1243          /** Context menu **/          break;
1244          case ID_KEYCTX_EDIT:  
1245              send_cmd_id( dlg, ID_KEYMISC_EDITKEY );      case WM_MOVE:
1246              break;          RECT r;
1247            GetWindowRect (dlg, &r);
1248          case ID_KEYCTX_PROPS:          kmi->pos_x = r.left;
1249              send_cmd_id( dlg, ID_KEYMISC_PROPS );          kmi->pos_y = r.top;    
1250              break;          break;
1251            
1252          case ID_KEYCTX_UIDS:  
1253              send_cmd_id( dlg, ID_KEYMISC_UID );      case WM_RBUTTONUP:
1254              break;          do_create_minpopup (dlg);
1255            break;
1256          case ID_KEYCTX_SIGN:  
1257              send_cmd_id( dlg, ID_KEYMISC_SIGN );      case WM_NOTIFY:            
1258              break;          NMHDR *notify;
1259            POINT p;
1260          case ID_KEYCTX_DEL:          HMENU popup;
1261              send_cmd_id (dlg, ID_KEYMISC_DELETE);          
1262              break;          notify = (NMHDR *)lparam;
1263            if (!notify)
1264          case ID_KEYCTX_REV:              break;
1265              send_cmd_id( dlg, ID_KEYMISC_REVCERT );          switch (notify->code) {
1266              break;          case TBN_QUERYDELETE:
1267                SetWindowLong (dlg, DWL_MSGRESULT, TRUE);
1268          case ID_KEYCTX_SENDMAIL:              return TRUE;
1269              km_send_to_mail_recipient( kmi->lv, dlg );          
1270              break;          case TBN_QUERYINSERT:
1271                SetWindowLong (dlg, DWL_MSGRESULT, TRUE);
1272          case ID_KEYCTX_KS_DEFAULT:              return TRUE;
1273              host = kserver_get_hostname (0, -1, &port);  
1274              km_send_to_keyserver (kmi->lv, dlg, host, port);          case TBN_GETBUTTONINFO:
1275              break;              LPTBNOTIFY lpTbNotify;
1276                lpTbNotify = (LPTBNOTIFY)lparam;
1277          case ID_KEYCTX_ADDKEY:              if (lpTbNotify->iItem < (sizeof(myb) / sizeof(mybuttons))) {
1278              idx = listview_get_curr_pos( kmi->lv );                  lpTbNotify->tbButton.iBitmap = imagelist_getindex (myb[lpTbNotify->iItem].icon);
1279              listview_get_item_text( kmi->lv, idx, 1, keyid, DIM (keyid)-1);                  lpTbNotify->tbButton.idCommand = myb[lpTbNotify->iItem].command;
1280              memset (&k, 0, sizeof (k));                  lpTbNotify->tbButton.fsState = TBSTATE_ENABLED;
1281              k.key_pair = km_check_for_seckey( kmi->lv, idx, NULL );                  lpTbNotify->tbButton.fsStyle = TBSTYLE_BUTTON;
1282              k.is_protected = km_check_if_protected( kmi->lv, idx );                  lpTbNotify->tbButton.iString = 0;
1283              k.keyid = keyid;                  strncpy (lpTbNotify->pszText, myb[lpTbNotify->iItem].text, lpTbNotify->cchText);
1284              keyedit_add_subkey( &k, dlg, NULL );                  SetWindowLong(dlg, DWL_MSGRESULT, TRUE);
1285              break;              }
1286                return TRUE;
1287          case ID_KEYCTX_ADDUID:  
1288              idx = listview_get_curr_pos( kmi->lv );          case TBN_RESET: /* Restore last saved toolbar status */
1289              listview_get_item_text( kmi->lv, idx, 1, keyid, DIM (keyid)-1);              TBSAVEPARAMS tbsp;
1290              memset (&k, 0, sizeof (k));  
1291              k.key_pair = km_check_for_seckey( kmi->lv, idx, NULL );              tbsp.hkr = HKEY_CURRENT_USER;
1292              k.is_protected = km_check_if_protected( kmi->lv, idx );              tbsp.pszSubKey = "Software\\WinPT";
1293              k.keyid = keyid;              tbsp.pszValueName = "KM_toolbar";
1294              keyedit_add_userid( &k, dlg, NULL );              SendMessage (notify->hwndFrom, TB_SAVERESTORE, FALSE, (LPARAM)&tbsp);
1295              break;              break;
1296    
1297          case ID_KEYCTX_ADDREV:          case TBN_BEGINADJUST: /* User is about to change the toolbar. Save it */
1298              idx = listview_get_curr_pos (kmi->lv);              tbsp.hkr = HKEY_CURRENT_USER;
1299              listview_get_item_text (kmi->lv, idx, 1, keyid, DIM (keyid)-1);              tbsp.pszSubKey = "Software\\WinPT";
1300              memset (&k, 0, sizeof (k));              tbsp.pszValueName = "KM_toolbar";
1301              k.keyid = keyid;              SendMessage (notify->hwndFrom, TB_SAVERESTORE, TRUE, (LPARAM)&tbsp);
1302              k.is_protected = km_check_if_protected( kmi->lv, idx );              break;
1303              k.key_pair = km_check_for_seckey( kmi->lv, idx, NULL );  
1304              keyedit_add_revoker( &k, dlg );          case TBN_ENDADJUST: /* User has finished customizing the toolbar. Save it. */
1305              break;              tbsp.hkr = HKEY_CURRENT_USER;
1306                tbsp.pszSubKey = "Software\\WinPT";
1307          case ID_KEYCTX_ADDPHOTO:              tbsp.pszValueName = "KM_toolbar";
1308              idx = listview_get_curr_pos (kmi->lv);              SendMessage (notify->hwndFrom, TB_SAVERESTORE, TRUE, (LPARAM)&tbsp);
1309              listview_get_item_text (kmi->lv, idx, 1, keyid, DIM (keyid)-1);              break;
1310              memset (&k, 0, sizeof (k));  
1311              k.keyid = keyid;          case TTN_GETDISPINFO:
1312              k.is_protected = km_check_if_protected (kmi->lv, idx);              LPTOOLTIPTEXT lpttt;
1313              k.key_pair = km_check_for_seckey (kmi->lv, idx, NULL);              lpttt = (LPTOOLTIPTEXT)lparam;
1314              keyedit_add_photo (&k, dlg);  
1315              break;              lpttt->hinst = NULL;
1316                switch (lpttt->hdr.idFrom) {
1317          case ID_KEYCTX_KS_NL:              case ID_KEYMISC_KEYWIZARD:
1318          case ID_KEYCTX_KS_PL:                  lpttt->lpszText = (char*)_("Generate new key pair");
1319          case ID_KEYCTX_KS_AT:                  break;
1320          case ID_KEYCTX_KS_DE:  
1321          case ID_KEYCTX_KS_DK:              case ID_KEYMISC_SENDRECV:
1322          case ID_KEYCTX_KS_CZ:                  lpttt->lpszText = (char*)_("Search for a specific key");
1323          case ID_KEYCTX_KS_ES:                  break;
1324          case ID_KEYCTX_KS_UK:  
1325              host = kserver_get_hostname (LOWORD (wparam) - 40107, 0, &port);              case ID_KEYMISC_DELETE:
1326              km_send_to_keyserver (kmi->lv, dlg, host, port);                  lpttt->lpszText = (char *)_("Delete key from keyring");
1327              break;                  break;
1328    
1329          case ID_KEYCTX_RECVFROM:              case ID_KEYMISC_PROPS:
1330              km_refresh_from_keyserver (kmi->lv, dlg);                  lpttt->lpszText = (char *)_("Show key properties");
1331              break;                  break;
1332    
1333          case ID_KEYCTX_UID_COPY:              case ID_KEYMISC_SIGN:
1334              /* XXX: add generic function to support multiple selection                  lpttt->lpszText = (char *)_("Sign key");
1335                      with a callback */                  break;
1336              idx = listview_get_curr_pos( kmi->lv );  
1337              listview_get_item_text( kmi->lv, idx, 0, uid, sizeof uid-1 );              case ID_KEYCTX_COPY:
1338              set_clip_text( NULL, uid, strlen( uid ) );                  lpttt->lpszText = (char *)_("Copy key to clipboard");
1339              break;                  break;
1340    
1341          case ID_KEYCTX_KEYID_COPY:              case ID_KEYCTX_PASTE:
1342              idx = listview_get_curr_pos( kmi->lv );                  lpttt->lpszText = (char*)_("Paste key from clipboard");
1343              listview_get_item_text( kmi->lv, idx, 1, uid, sizeof uid-1 );                  break;
1344              set_clip_text( NULL, uid, strlen( uid ) );  
1345              break;              case ID_KEYMISC_IMPORT:
1346                    lpttt->lpszText = (char *)_("Import key to keyring");
1347          case ID_KEYCTX_FPR_COPY:                  break;
1348              idx = listview_get_curr_pos( kmi->lv );  
1349              listview_get_item_text( kmi->lv, idx, 1, uid, sizeof uid-1 );              case ID_KEYMISC_EXPORT:
1350              get_pubkey( uid, &pk );                  lpttt->lpszText = (char *)_("Export key to a file");
1351              if( pk ) {                  break;
1352                  const char * s = get_key_fpr( pk );              }
1353                  set_clip_text( NULL, s? s : "", s? strlen( s ): 0 );              return TRUE;
1354              }              
1355              break;          case LVN_ITEMCHANGED:
1356                if (((LPNMLISTVIEW)lparam)->uNewState) { /* item selected? */
1357          case ID_KEYCTX_KINFO_COPY:                  kmi->lv_idx = listview_get_curr_pos (kmi->lv);
1358              idx = listview_get_curr_pos( kmi->lv );                  update_ui_items (dlg, kmi->lv);
1359              listview_get_item_text( kmi->lv, idx, 1, uid, sizeof uid-1 );                  return TRUE;
1360              km_set_clip_info( uid );                      }
1361              break;              break;
1362    
1363          case ID_KEYCTX_COPY:          case NM_RCLICK:
1364              km_index = listview_get_curr_pos (kmi->lv);              if (notify->idFrom == IDC_KEYMISC_KEYLIST) {
1365              km_clip_export (dlg, kmi->lv);                  l_idx =listview_get_curr_pos (kmi->lv);
1366              break;                  if (l_idx == -1)
1367                        return TRUE; /* Popup only when a item was selected */              
1368          case ID_KEYCTX_PASTE:                    GetCursorPos (&p);
1369              km_index = -1;                  hm = LoadMenu (glob_hinst, MAKEINTRESOURCE (IDR_WINPT_KEYMISC_CTX));
1370              km_clip_import (dlg);                  popup = GetSubMenu (hm, 0);
1371              break;                  translate_popupmenu_strings (popup);
1372    
1373          case ID_KEYCTX_DISABLE:                  if (km_check_for_seckey (kmi->lv, l_idx, &i))
1374              idx = listview_get_curr_pos (kmi->lv);                      set_menu_state (popup, ID_KEYCTX_SETDEFKEY, MF_ENABLED);
1375              km_enable_disable_key (kmi->lv, dlg, idx, 0);                  if (i == 0)
1376              break;                      set_menu_state (popup, ID_KEYCTX_MAXTRUST, MF_ENABLED);
1377                    if (!km_check_for_seckey (kmi->lv, l_idx, NULL) ||
1378          case ID_KEYCTX_ENABLE:                      (km_get_key_status (kmi->lv, l_idx) & KM_FLAG_REVOKED)) {
1379              idx = listview_get_curr_pos (kmi->lv);                      set_menu_state (popup, ID_KEYCTX_REV, MF_DISABLED|MF_GRAYED);
1380              km_enable_disable_key (kmi->lv, dlg, idx, 1);                      set_menu_state (popup, ID_KEYCTX_ADDKEY, MF_DISABLED|MF_GRAYED);
1381              break;                      set_menu_state (popup, ID_KEYCTX_ADDUID, MF_DISABLED|MF_GRAYED);
1382                        set_menu_state (popup, ID_KEYCTX_ADDREV, MF_DISABLED|MF_GRAYED);
1383          case ID_KEYCTX_LISTSIGS:                      set_menu_state (popup, ID_KEYCTX_ADDPHOTO, MF_DISABLED|MF_GRAYED );
1384              send_cmd_id (dlg, ID_KEYMISC_CHECKSIGS);                      set_menu_state (popup, ID_KEYCTX_SETPREFKS, MF_DISABLED|MF_GRAYED);
1385              break;                  }
1386                    else if (km_check_for_seckey (kmi->lv, l_idx, NULL) &&
1387          case ID_KEYCTX_MAXTRUST:                           km_key_is_v3 (kmi->lv, l_idx)) {
1388              idx = listview_get_curr_pos (kmi->lv);                      /* PGP 2 keys, version 3 have no no support for photo-id's,
1389              km_set_implicit_trust (dlg, kmi->lv, idx);                         designated revokers and secondary keys. */
1390              break;                      set_menu_state (popup, ID_KEYCTX_ADDKEY, MF_DISABLED|MF_GRAYED);
1391                        set_menu_state (popup, ID_KEYCTX_ADDREV, MF_DISABLED|MF_GRAYED);
1392          case ID_KEYCTX_SETDEFKEY:                      set_menu_state (popup, ID_KEYCTX_ADDPHOTO, MF_DISABLED|MF_GRAYED);
1393              idx = listview_get_curr_pos (kmi->lv);                  }
1394              if (km_check_key_status (kmi->lv, idx))                  if (km_get_key_status( kmi->lv, l_idx ) & KM_FLAG_DISABLED)
1395              {                      set_menu_state (popup, ID_KEYCTX_DISABLE, MF_DISABLED|MF_GRAYED);
1396                  listview_get_item_text (kmi->lv, idx, 1, keyid, sizeof keyid -1);                  else
1397                  rc = set_gnupg_default_key (keyid);                      set_menu_state (popup, ID_KEYCTX_ENABLE, MF_DISABLED|MF_GRAYED);
1398                  if (rc)                  if (km_get_key_status (kmi->lv, l_idx) & KM_FLAG_REVOKED ||
1399                      msg_box( dlg, winpt_strerror (rc), _("Key Manager"), MB_ERR);                      km_get_key_status (kmi->lv, l_idx) & KM_FLAG_EXPIRED)
1400                  km_update_default_key_str (kmi->statbar, &km_def_pos);                      set_menu_state (popup, ID_KEYCTX_SIGN, MF_DISABLED|MF_GRAYED);
1401              }                  if (!clip_contains_pgpkey ())
1402              break;                      set_menu_state (popup, ID_KEYCTX_PASTE, MF_DISABLED|MF_GRAYED);
1403                                if (mapi_init ())
1404          case ID_GROUP_PASTE:                      set_menu_state (popup, ID_KEYCTX_SENDMAIL, MF_DISABLED|MF_GRAYED);
1405              km_groups_add (gc, kmi->lv, km_index);  
1406              break;                  /* Override 'Default Keyserver' with the actual name. */
1407                                host = kserver_get_hostname (0, -1, &port);
1408          case ID_GROUP_DELETE:                  if (!host)
1409              km_groups_del (gc);                      host = DEF_HKP_KEYSERVER;
1410              break;                  set_menu_text (popup, ID_KEYCTX_KS_DEFAULT, host);
1411          }                        {
1412          break;                      HMENU ks = GetSubMenu (popup, 19);
1413      }                      for (i=0; server[i].name != NULL; i++)                      
1414                                insert_menu_item (ks, i+2, WM_APP+i, server[i].name);
1415      return FALSE;                  }
1416  } /* keymanager_dlg_proc */                  popup_gpg_readonly (dlg, popup);
1417                    if (listview_count_items (kmi->lv, 1) > 1)
1418                        popup_multiple (dlg, popup);
1419                    TrackPopupMenu (popup, TPM_RIGHTALIGN, p.x, p.y, 0, dlg, NULL);
1420                    DestroyMenu (popup);
1421                    DestroyMenu (hm);
1422                    return TRUE;
1423                }
1424                break;
1425    
1426            case LVN_COLUMNCLICK:
1427                if (notify->idFrom == IDC_KEYMISC_KEYLIST) {
1428                    NMLISTVIEW *nft = (LPNMLISTVIEW) lparam;
1429                    int sortby = 0;
1430                    switch (nft->iSubItem) {
1431                    case 0:  sortby = KEY_SORT_USERID; break;
1432                    case 1:  sortby = KEY_SORT_KEYID; break;
1433                    case 2:  sortby = KEY_SORT_IS_SECRET; break;
1434                    case 3:  sortby = KEY_SORT_LEN; break;
1435                    case 5:  sortby = KEY_SORT_VALIDITY; break;
1436                    case 6:  sortby = KEY_SORT_OTRUST; break;
1437                    case 7:  sortby = KEY_SORT_CREATED; break;
1438                    case 8:  sortby = KEY_SORT_ALGO; break;
1439                    default: return TRUE; //sortby = KEY_SORT_USERID; break;
1440                    }
1441    
1442                    if ((kmi->keylist_sortby & ~KEYLIST_SORT_DESC) == sortby)
1443                        kmi->keylist_sortby ^= KEYLIST_SORT_DESC;
1444                    else
1445                        kmi->keylist_sortby = sortby;
1446                    keylist_sort (kmi->lv, kmi->keylist_sortby);
1447                    return TRUE;
1448                }
1449                break;
1450            }
1451            break;
1452    
1453        case WM_WINDOWPOSCHANGING:
1454            if (((WINDOWPOS*)lparam)->cx < 400)
1455                ((WINDOWPOS*)lparam)->cx = 400;
1456            if (((WINDOWPOS*)lparam)->cy < 200)
1457                ((WINDOWPOS*)lparam)->cy = 200;
1458             return TRUE;
1459            
1460        case WM_SIZE:
1461            do_resize_window (dlg, kmi);
1462            return TRUE;
1463            
1464        case WM_SYSCOMMAND:
1465            if (LOWORD (wparam) == SC_CLOSE)
1466                EndDialog (dlg, TRUE);
1467            return FALSE;
1468            
1469        case WM_MENUSELECT:
1470            change_edit_menu (kmi->lv, (HMENU)lparam, LOWORD (wparam));
1471            change_key_menu ((HMENU)lparam, LOWORD (wparam));
1472            break;
1473    
1474        case WM_INITMENUPOPUP:
1475            if ((UINT)LOWORD (lparam) == 3) {
1476                HMENU h = (HMENU)wparam;
1477                set_menu_text_bypos (h, 0, _("New"));
1478            }
1479            /* XXX: before we can use it, we need to find a way to
1480                    update the gpg access timestamp after each operation.
1481            if (keyring_check_last_access ())
1482                reload_keylist (kmi);
1483            */
1484            return FALSE;
1485    
1486        case WM_COMMAND:
1487            /* Allow at least 'Exit' in such a case. */
1488            if (gnupg_access_keyring (1) && LOWORD (wparam) != ID_KEYMISC_QUIT) {
1489                msg_box (dlg, _("Could not access public keyring"),
1490                         _("Key Manager"), MB_ERR);
1491                return FALSE;
1492            }
1493    
1494            switch (LOWORD (wparam)) {
1495            case ID_KEYMISC_QUIT:
1496                EndDialog (dlg, TRUE);
1497                return TRUE;
1498            
1499            case ID_KEYMISC_FIND:
1500                km_find_key (dlg, kmi->lv);
1501                break;
1502    
1503            case ID_KEYMISC_DELETE:
1504            case ID_KEYMISC_DELETE2:
1505                if (!km_delete_keys (kmi->lv, dlg))
1506                    update_status_bar (kmi->statbar, kmi->lv);
1507                return TRUE;
1508                
1509            case ID_KEYMISC_SIGN:
1510                if (kmi->lv_idx == -1) {
1511                    msg_box (dlg, _("Please select a key."),  
1512                             _("Key Manager"), MB_ERR);
1513                    return TRUE;
1514                }
1515                if (km_check_key_status (kmi->lv, kmi->lv_idx))
1516                    return TRUE;
1517                km_get_key (kmi->lv, kmi->lv_idx, &k);
1518                dialog_box_param (glob_hinst, (LPCSTR)IDD_WINPT_KEYSIGN, dlg,
1519                                  keysign_dlg_proc, (LPARAM)&k,
1520                                  _("Key Signing"), IDS_WINPT_KEYSIGN);
1521                if (k.update)
1522                    update_key (kmi->lv, kmi->lv_idx, k.tmp_keyid, 0);
1523                return TRUE;
1524                
1525            case ID_KEYMISC_REVCERT:
1526                if (kmi->lv_idx == -1) {
1527                    msg_box (dlg, _("Please select a key."), _("Key Manager"), MB_ERR);
1528                    return TRUE;
1529                }
1530                    
1531                {
1532                    char state[64];
1533                    listview_get_item_text (kmi->lv, kmi->lv_idx, 5,
1534                                            state, sizeof (state) -1);
1535                    if (strchr (state, 'R' )) {
1536                        msg_box (dlg, _("Key already revoked!"),
1537                                 _("Key Manager"), MB_INFO);
1538                        return TRUE;
1539                    }
1540                }
1541    
1542                km_get_key (kmi->lv, kmi->lv_idx, &k);
1543                if (!k.key_pair) {
1544                    msg_box (dlg, _("There is no secret key available!"),
1545                            _("Key Manager"), MB_ERR);
1546                    return TRUE;
1547                }
1548                dialog_box_param(glob_hinst, (LPCSTR)IDD_WINPT_KEYREVOKE, dlg,
1549                                 key_revoke_dlg_proc, (LPARAM)&k,
1550                                 _("Key Revocation Cert"), IDS_WINPT_KEYREVOKE);
1551                return TRUE;
1552                
1553            case ID_KEYMISC_TRUSTPATH:
1554                if (kmi->lv_idx == -1) {
1555                    msg_box (dlg, _("Please select a key."), _("Key Manager"), MB_ERR);
1556                    return TRUE;
1557                }
1558                km_get_key (kmi->lv, kmi->lv_idx, &k);
1559                if (!k.key_pair) {
1560                    msg_box (dlg, _("It does not make any sense with a key pair!"),
1561                             _("Key Manager"), MB_ERR);
1562                    return TRUE;
1563                }
1564                dialog_box_param (glob_hinst, (LPCSTR)IDD_WINPT_KEYTRUST, dlg,
1565                                  keytrust_dlg_proc, (LPARAM)&k,
1566                                  _("List Trust Path"), IDS_WINPT_KEYTRUST);
1567                return TRUE;
1568                
1569            case ID_KEYMISC_CHECKSIGS:          
1570                if (kmi->lv_idx == -1) {
1571                    msg_box (dlg, _("Please select a key."), _("Key Manager"), MB_ERR);
1572                    return TRUE;
1573                }
1574                km_get_key (kmi->lv, kmi->lv_idx, &k);
1575                dialog_box_param (glob_hinst, (LPCSTR)IDD_WINPT_KEYSIG_TREE, dlg,
1576                                  sigtree_dlg_proc, (LPARAM)&k,
1577                                  _("Key Signature List"), IDS_WINPT_KEYSIG);
1578                if (k.update)
1579                    update_key (kmi->lv, kmi->lv_idx, k.tmp_keyid, 0);
1580                return TRUE;
1581                
1582            case ID_KEYMISC_PROPS:      
1583                if (kmi->lv_idx == -1) {
1584                    msg_box (dlg, _("Please select a key."), _("Key Manager"), MB_ERR);
1585                    return TRUE;
1586                }
1587                km_get_key (kmi->lv, kmi->lv_idx, &k);
1588                k.callback.ctl = kmi->lv;
1589                k.callback.idx = kmi->lv_idx;
1590                dialog_box_param (glob_hinst, (LPCSTR)IDD_WINPT_KEYPROPS, dlg,
1591                                  keyprops_dlg_proc, (LPARAM)&k,
1592                                  _("Key Properties"), IDS_WINPT_KEYPROPS);
1593                if (k.update)
1594                    update_key (kmi->lv, kmi->lv_idx, k.tmp_keyid, k.key_pair);
1595                return TRUE;
1596                
1597            case ID_KEYMISC_RECACHE:
1598                if (updated_keys_avail ())
1599                    l_idx = IDYES;
1600                else {
1601                    l_idx = log_box (_("Key Manager"), MB_YESNO,
1602                               _("This is only useful when the keyring has been "
1603                                 "modified (sign a key...).\n"
1604                                 "Do you really want to reload the keycache?"));
1605                }
1606                if (l_idx == IDYES)
1607                    reload_keycache (kmi);
1608                return TRUE;
1609                
1610            case ID_KEYMISC_REBUILD:
1611                name = NULL;
1612                gpg_rebuild_cache (&name);
1613                if (name != NULL) {
1614                    char *line = strchr (name, '\n');
1615                    show_msg (dlg, 2000, line? name + (line-name)+1 : name);
1616                    safe_free (name);
1617                }
1618                SetForegroundWindow (dlg);
1619                return TRUE;
1620                
1621            case ID_KEYMISC_NEWKEY:
1622                memset (&genkey, 0, sizeof (genkey));
1623                dialog_box_param (glob_hinst, (LPCSTR)IDD_WINPT_KEYGEN, dlg,
1624                                  keygen_dlg_proc, (LPARAM)&genkey, _("Key Generation"),
1625                                  IDS_WINPT_KEYGEN);
1626                if (genkey.cancel == 0)
1627                    refresh_keylist (kmi);
1628                return TRUE;
1629    
1630            case ID_KEYMISC_CARDNEW:
1631                if (!scard_support) {
1632                    msg_box (dlg, _("Smart Card support is not available."),
1633                             _("Key Manager"), MB_INFO);
1634                    return TRUE;
1635                }
1636                dialog_box_param (glob_hinst, (LPCSTR)IDD_WINPT_CARD_KEYGEN, dlg,
1637                                  card_keygen_dlg_proc, 0, _("Card Key Generation"),
1638                                  IDS_WINPT_CARD_KEYGEN);
1639                if (updated_keys_avail ())
1640                    send_cmd_id (dlg, ID_KEYMISC_RECACHE);
1641                return TRUE;
1642    
1643            case ID_KEYMISC_KEYWIZARD:
1644                memset (&genkey, 0, sizeof (genkey));
1645                dialog_box_param (glob_hinst, (LPCSTR)IDD_WINPT_KEYWIZARD, dlg,
1646                                  keygen_wizard_dlg_proc, (LPARAM)&genkey,
1647                                  _("Key Generation Wizard"),
1648                                  IDS_WINPT_KEYWIZARD);
1649                if (genkey.cancel == 0)
1650                    refresh_keylist (kmi);
1651                return TRUE;
1652                
1653            case ID_KEYMISC_SENDRECV:
1654                dialog_box_param (glob_hinst, (LPCSTR)IDD_WINPT_KEYSERVER, dlg,
1655                                  keyserver_dlg_proc, 0, _("Keyserver Access"),
1656                                  IDS_WINPT_KEYSERVER);
1657                refresh_keylist (kmi);
1658                return TRUE;
1659                
1660            case ID_KEYMISC_GPGPREFS:
1661                rc = dialog_box_param (glob_hinst, (LPCSTR)IDD_WINPT_GPGPREFS,
1662                                       dlg, gpgprefs_dlg_proc, 0,
1663                                       _("GnuPG Preferences"), IDS_WINPT_GPGPREFS);
1664                if (rc == TRUE) {
1665                    reload_keycache (kmi);
1666                    update_default_key_str (kmi->statbar);
1667                }
1668                return TRUE;
1669                
1670            case ID_KEYMISC_GPGOPT:
1671                dialog_box_param (glob_hinst, (LPCSTR)IDD_WINPT_GPGOPT, dlg,
1672                                  gpgopt_dlg_proc, 0, _("GnuPG Options"),
1673                                  IDS_WINPT_GPGOPT);
1674                return TRUE;
1675                
1676            case ID_KEYMISC_IMPORT:
1677                km_gui_import (kmi, LOWORD (wparam), NULL);
1678                return TRUE;
1679    
1680            case ID_KEYMISC_IMPORT_HTTP:
1681                url = (struct URL_ctx_s*)get_http_file_dlg (dlg);
1682                if (url && url->cancel == 0) {
1683                    km_http_import (dlg, url->url);
1684                    refresh_keylist (kmi);
1685                }
1686                free_if_alloc (url);
1687                break;
1688                
1689            case ID_KEYMISC_EXPORT:
1690                if (kmi->lv_idx == -1) {
1691                    msg_box (dlg, _("Please select a key."),
1692                             _("Key Manager"), MB_ERR);
1693                    return TRUE;
1694                }
1695                if (listview_count_items (kmi->lv, 1) > 1)
1696                    name = m_strdup ("Exported_GPG_Keys.asc");
1697                else {
1698                    key = km_get_key_ptr (kmi->lv, kmi->lv_idx, NULL);
1699                    name = km_gen_export_filename (key->subkeys->keyid+8, 0);
1700                }
1701                t = get_filesave_dlg (dlg, _("Choose Name for Key File"), NULL, name);
1702                free_if_alloc (name);
1703                if (t == NULL)
1704                    return TRUE;
1705                km_file_export (dlg, kmi->lv, t);
1706                return TRUE;
1707                
1708            case ID_KEYMISC_EXPORT_PRIVKEY:
1709                if (kmi->lv_idx == -1) {
1710                    msg_box (dlg, _("Please select a key."), _("Key Manager"), MB_ERR);
1711                    return TRUE;
1712                }
1713                if( !km_check_for_seckey( kmi->lv, kmi->lv_idx, NULL ) ) {
1714                    msg_box (dlg, _("There is no corresponding secret key for this key."),
1715                             _("Key Manager"), MB_ERR);
1716                    return TRUE;
1717                }
1718                if (listview_count_items (kmi->lv, 1) > 1) {
1719                    msg_box (dlg, _("You can only export one secret key."),
1720                             _("Key Manager"), MB_ERR);
1721                    return TRUE;
1722                }
1723                i = msg_box (dlg,
1724                              _("This operation will export your *SECRET* key!\n\n"
1725                                "Never send this key to ANYONE, it should be available\n"
1726                                "ONLY on your machine and you may use this function\n"
1727                                "to copy the key to a safe place.\n\n"
1728                                "Do you really want to export the key?"),
1729                              _("WARNING"), MB_INFO|MB_YESNO);
1730                if (i == IDYES) {
1731                    key = km_get_key_ptr (kmi->lv, kmi->lv_idx, NULL);
1732                    name = km_gen_export_filename (key->subkeys->keyid+8, 1);
1733                    t = get_filesave_dlg (dlg, _("Choose Name for Key File"), NULL, name);
1734                    if (t != NULL)          
1735                        km_privkey_export (dlg, kmi->lv, t);
1736                }
1737                return TRUE;
1738    
1739            case ID_KEYMISC_INFO:
1740                dialog_box_param (glob_hinst, (LPCSTR)IDD_WINPT_ABOUT, dlg,
1741                                  about_winpt_dlg_proc, 0, _("About WinPT"),
1742                                  IDS_WINPT_ABOUT);
1743                break;
1744    
1745            case ID_KEYMISC_WEBSITE:
1746                ShellExecute (dlg, "open", "http://www.winpt.org",
1747                              NULL, NULL, SW_SHOW);
1748                break;
1749    
1750            case ID_KEYMISC_HELP:
1751                start_help (dlg, 0);
1752                break;
1753    
1754            case ID_KEYMISC_OT:
1755                dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_OWNERTRUST,
1756                                  dlg, ownertrust_dlg_proc, 0,
1757                                  _("Ownertrust"), IDS_WINPT_OWNERTRUST);
1758                break;
1759    
1760            case ID_KEYMISC_EDITKEY:
1761                if (km_get_key (kmi->lv, kmi->lv_idx, &k))
1762                    break;
1763                dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_KEYEDIT, dlg,
1764                                  keyedit_main_dlg_proc, (LPARAM)&k,
1765                                  _("Key Edit"), IDS_KEYCTX_EDIT);
1766                if (k.update)
1767                    update_key (kmi->lv,  kmi->lv_idx, k.tmp_keyid, 1);
1768                break;
1769                
1770            case ID_KEYMISC_COPY:
1771                km_clip_export (dlg, kmi->lv);
1772                break;
1773                
1774            case ID_KEYMISC_SELALL:
1775                listview_select_all (kmi->lv);
1776                break;
1777    
1778            case ID_KEYMISC_PASTE:
1779                km_gui_import (kmi, LOWORD (wparam), NULL);
1780                break;
1781                
1782            case ID_KEYCTX_SETPREFKS:
1783                if (km_get_key (kmi->lv, kmi->lv_idx, &k))
1784                    break;
1785                keyedit_set_pref_keyserver (&k, dlg);
1786                break;
1787    
1788            case ID_KEYMISC_REFRESH_KEYS:
1789                if (listview_count_items (kmi->lv, 1) == 0) {
1790                    msg_box (dlg, _("No key was selected, select all by default."),
1791                             _("Key Manager"), MB_INFO);
1792                    listview_select_all (kmi->lv);
1793                }
1794                km_refresh_from_keyserver (kmi->lv, dlg);
1795                break;
1796                            
1797            /** Context menu **/
1798            case ID_KEYCTX_EDIT:
1799                send_cmd_id( dlg, ID_KEYMISC_EDITKEY );
1800                break;
1801    
1802            case ID_KEYCTX_PROPS:
1803                send_cmd_id( dlg, ID_KEYMISC_PROPS );
1804                break;
1805    
1806            case ID_KEYCTX_UIDS:
1807                send_cmd_id( dlg, ID_KEYMISC_UID );
1808                break;
1809    
1810            case ID_KEYCTX_SIGN:
1811                send_cmd_id( dlg, ID_KEYMISC_SIGN );
1812                break;
1813    
1814            case ID_KEYCTX_DEL:
1815                send_cmd_id (dlg, ID_KEYMISC_DELETE);
1816                break;
1817    
1818            case ID_KEYCTX_REV:
1819                send_cmd_id( dlg, ID_KEYMISC_REVCERT );
1820                break;
1821    
1822            case ID_KEYCTX_SENDMAIL:
1823                km_send_to_mail_recipient (kmi->lv, dlg);
1824                break;
1825    
1826            case ID_KEYCTX_KS_DEFAULT:
1827                host = kserver_get_hostname (0, -1, &port);
1828                km_send_to_keyserver (kmi->lv, dlg, host, port);
1829                break;
1830    
1831            case ID_KEYCTX_ADDKEY:
1832                km_get_key (kmi->lv, kmi->lv_idx, &k);
1833                keyedit_add_subkey (&k, dlg, NULL);
1834                if (k.update)
1835                    update_key (kmi->lv, kmi->lv_idx, k.tmp_keyid, 1);
1836                break;
1837    
1838            case ID_KEYCTX_ADDUID:
1839                km_get_key (kmi->lv, kmi->lv_idx, &k);
1840                keyedit_add_userid (&k, dlg, NULL);
1841                if (k.update)
1842                    update_key (kmi->lv, kmi->lv_idx, k.tmp_keyid, 1);
1843                break;
1844    
1845            case ID_KEYCTX_ADDREV:
1846                km_get_key (kmi->lv, kmi->lv_idx, &k);
1847                keyedit_add_revoker (&k, dlg);
1848                if (k.update)
1849                    update_key (kmi->lv, kmi->lv_idx, k.tmp_keyid, 1);
1850                break;
1851    
1852            case ID_KEYCTX_ADDPHOTO:
1853                km_get_key (kmi->lv, kmi->lv_idx, &k);
1854                keyedit_add_photo (&k, dlg);
1855                if (k.update)
1856                    update_key (kmi->lv, kmi->lv_idx, k.tmp_keyid, 1);
1857                break;
1858    
1859            case ID_KEYCTX_RECVFROM:
1860                km_refresh_from_keyserver (kmi->lv, dlg);
1861                if (updated_keys_avail ())
1862                    refresh_keylist (kmi);
1863                break;
1864    
1865            case ID_KEYCTX_UID_COPY:
1866                /* XXX: add generic function to support multiple selection
1867                        with a callback */
1868                key = km_get_key_ptr (kmi->lv, kmi->lv_idx, &kci);
1869                name = kci->uids->name;
1870                set_clip_text (NULL, name, strlen (name));
1871                break;
1872    
1873            case ID_KEYCTX_KEYID_COPY:
1874                key = km_get_key_ptr (kmi->lv, kmi->lv_idx, NULL);
1875                set_clip_text (NULL, key->subkeys->keyid+8,
1876                               strlen (key->subkeys->keyid+8));
1877                break;
1878    
1879            case ID_KEYCTX_FPR_COPY:
1880                key = km_get_key_ptr (kmi->lv, kmi->lv_idx, NULL);
1881                t = key->subkeys->fpr;
1882                set_clip_text (NULL, t? t : "", t? strlen (t): 0);
1883                break;
1884    
1885            case ID_KEYCTX_KINFO_COPY:
1886                key = km_get_key_ptr (kmi->lv, kmi->lv_idx, NULL);
1887                km_set_clip_info (key->subkeys->keyid+8);
1888                break;
1889    
1890            case ID_KEYCTX_COPY:
1891                send_cmd_id (dlg, ID_KEYMISC_COPY);
1892                break;
1893    
1894            case ID_KEYCTX_PASTE:
1895                send_cmd_id (dlg, ID_KEYMISC_PASTE);
1896                break;
1897    
1898            case ID_KEYCTX_DISABLE:
1899            case ID_KEYCTX_ENABLE:
1900                i = LOWORD (wparam) == ID_KEYCTX_ENABLE? 1 : 0;
1901                if (km_get_key (kmi->lv, kmi->lv_idx, &k))
1902                    break;
1903                rc = km_enable_disable_key (kmi->lv, dlg, kmi->lv_idx, i);
1904                if (!rc)
1905                    update_key (kmi->lv, kmi->lv_idx, k.tmp_keyid, 0);
1906                break;
1907    
1908            case ID_KEYCTX_LISTSIGS:
1909                send_cmd_id (dlg, ID_KEYMISC_CHECKSIGS);
1910                break;
1911    
1912            case ID_KEYCTX_MAXTRUST:
1913                if (km_get_key (kmi->lv, kmi->lv_idx, &k))
1914                    break;
1915                rc = km_set_implicit_trust (dlg, kmi->lv, kmi->lv_idx);
1916                if (!rc)
1917                    update_key (kmi->lv, kmi->lv_idx, k.tmp_keyid, 0);
1918                break;
1919    
1920            case ID_KEYCTX_SETDEFKEY:
1921                if (!km_check_key_status (kmi->lv, kmi->lv_idx)) {
1922                    key = km_get_key_ptr (kmi->lv, kmi->lv_idx, NULL);
1923                    rc = set_gnupg_default_key (key->subkeys->keyid+8);
1924                    if (rc)
1925                        msg_box (dlg, winpt_strerror (rc), _("Key Manager"), MB_ERR);
1926                    update_default_key_str (kmi->statbar);
1927                }
1928                break;
1929    
1930            case ID_KEYMISC_VIEWKEYID:
1931            case ID_KEYMISC_VIEWCIPHER:
1932            case ID_KEYMISC_VIEWTYPE:
1933            case ID_KEYMISC_VIEWCREAT:
1934            case ID_KEYMISC_VIEWDESC:
1935                hm = GetMenu (dlg);
1936                i = get_menu_state (hm, LOWORD (wparam));
1937                set_menu_state (hm, LOWORD (wparam),
1938                                i & MFS_CHECKED? MFS_UNCHECKED : MFS_CHECKED);
1939                modify_listview_columns (kmi, LOWORD (wparam), !(i & MFS_CHECKED));
1940                break;
1941    
1942            case ID_GROUP_NEW:
1943            case ID_GROUP_PASTE:
1944            case ID_GROUP_DELETE:
1945                /* XXX: Implement group manager. */
1946                return TRUE;
1947    
1948            case IDCANCEL:
1949                EndDialog (dlg, TRUE);
1950                return TRUE;
1951            }
1952            
1953            break;
1954        }
1955        
1956        return FALSE;
1957    }

Legend:
Removed from v.20  
changed lines
  Added in v.207

[email protected]
ViewVC Help
Powered by ViewVC 1.1.26