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

Annotation of /trunk/Src/wptKeyManagerDlg.cpp

Parent Directory Parent Directory | Revision Log Revision Log


Revision 208 - (hide annotations)
Mon May 1 12:22:18 2006 UTC (18 years, 10 months ago) by twoaday
File size: 60473 byte(s)
See ChangeLog.


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

Properties

Name Value
svn:eol-style native

[email protected]
ViewVC Help
Powered by ViewVC 1.1.26