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

Annotation of /trunk/Src/wptKeyManagerDlg.cpp

Parent Directory Parent Directory | Revision Log Revision Log


Revision 207 - (hide annotations)
Fri Apr 28 10:28:24 2006 UTC (18 years, 10 months ago) by twoaday
File size: 60364 byte(s)
Bug fixes and cleanups.


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

Properties

Name Value
svn:eol-style native

[email protected]
ViewVC Help
Powered by ViewVC 1.1.26