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

Annotation of /trunk/Src/wptKeyManagerDlg.cpp

Parent Directory Parent Directory | Revision Log Revision Log


Revision 200 - (hide annotations)
Mon Apr 17 09:12:50 2006 UTC (18 years, 10 months ago) by twoaday
File size: 59872 byte(s)
2006-04-16  Timo Schulz  <ts@g10code.de>
 
        * wptHTTP.cpp (getErrorCode): New.
        (connect): Store winsock error code.
        * wptGPGMEData.cpp (is_armor_header): New.
        * wptGPG.cpp (check_gnupg_engine): Free context.
        (gnupg_backup_keyrings): Do not use global vars.
        * wptGPGUtil.cpp (gpg_export_seckey): Export in ascii format.
         
2006-04-15  Timo Schulz  <ts@g10code.de>
 
        * wptKeyManager.cpp (km_get_key): New.
        (km_key_show_revoc_info): New.
        * wptKeyRevokeDlg.cpp (key_revoke_dlg): Cleanups.
        (on_init_dialog): New.
        * wptKeyManagerDlg.cpp (key_manager_dlg_proc): Factour
        out some common code and use km_get_key() instead.
        * wptKeyEditDlgs.cpp (do_init_keylist): Change second
        param type. Change all callers.
        * wptKeyEdit.cpp (addNotation): New.
        * wptKeyEditCB.cpp (editkey_command_handler): Remove 'step'
        param everywhere. Change all callers.


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

Properties

Name Value
svn:eol-style native

[email protected]
ViewVC Help
Powered by ViewVC 1.1.26