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

Annotation of /trunk/Src/wptKeyManagerDlg.cpp

Parent Directory Parent Directory | Revision Log Revision Log


Revision 133 - (hide annotations)
Mon Jan 9 09:15:29 2006 UTC (19 years, 1 month ago) by twoaday
File size: 60109 byte(s)
A lot of minor bug fixes.
New icons.

For a complete history, see the ChangeLog entries.


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

Properties

Name Value
svn:eol-style native

[email protected]
ViewVC Help
Powered by ViewVC 1.1.26