trunk/Src/wptKeyPropsDlg.cpp

/* wptKeyPropsDlg.cpp - WinPT key properties dialog
 *      Copyright (C) 2000, 2001, 2002, 2003, 2005 Timo Schulz
 *
 * This file is part of WinPT.
 *
 * WinPT is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 * 
 * WinPT is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with WinPT; if not, write to the Free Software Foundation,
 * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
 */

#ifdef HAVE_CONFIG_H
#include <config.h>
#endif

#include <windows.h>

#include "resource.h"
#include "wptErrors.h"
#include "wptGPG.h"
#include "wptCommonCtl.h"
#include "wptContext.h" /* for passphrase_s */
#include "wptNLS.h"
#include "wptDlgs.h" 
#include "wptTypes.h"
#include "wptKeylist.h"
#include "wptW32API.h"
#include "wptVersion.h"
#include "wptKeyEdit.h"


/* Check that the key is not expired or revoked. */
static int
do_check_key (gpgme_key_t key)
{
    int okay = 0;
    okay = key->expired;
    if (!okay)
        okay = key->revoked;
    return okay;
}


/* Convert a trust integer into a string representation. */
static const char*
ownertrust_to_string (int val)
{
    const char *inf;
    int id = val;

    switch (id) {
    case 1: inf = _("Don't know");         break;
    case 2: inf = _("I do NOT trust");     break;
    case 3: inf = _("I trust marginally"); break;
    case 4: inf = _("I trust fully");      break;
    case 5:
    case 6: inf = _("I trust ultimately"); break;
    default:inf = _("Unknown");            break;
    }
    
    return inf;
}


/* Generate a unique temp name for the photo which
   depends on the dialog handle and return it. */
static const char*
get_photo_tmpname (HWND dlg)
{
    static char buf[64];

    _snprintf (buf, sizeof (buf)-1, "winpt_photo_%08lX.tmp", (DWORD)dlg);
    return buf;
}


/* Load the photo from the key @key */
static int
keyprops_load_photo (HWND dlg, gpgme_key_t key, gpgme_validity_t *r_valid)
{
    winpt_key_s k;
    FILE *f;
    const BYTE *img;
    DWORD imglen = 0;
    int pos=0;

    winpt_get_pubkey (key->subkeys->keyid, &k);
    img = k.ext->attrib.d;
    imglen = k.ext->attrib.len;
    if (!k.ext->attrib.validity)
        get_uat_validity (key->subkeys->keyid, &k.ext->attrib.validity);
    *r_valid = k.ext->attrib.validity;

    if (!img || !imglen)
        return -1;
    f = fopen (get_photo_tmpname (dlg), "wb");
    if (f) {
        for (pos = 0; img[pos] != 0x10; pos++)
                ;
        pos += 16;
        fwrite (img + pos, 1, imglen - pos, f);
        fwrite (img, 1, imglen, f);
        fclose (f);
    }
    return 0;
}


/* Display the photo in the image control in the dialog @dlg. */
static int
keyprops_show_photo (HWND dlg)
{
    RECT r;     
    POINT p;
    HWND h;

    h = GetDlgItem (dlg, IDC_KEYPROPS_IMG);
    GetWindowRect (h, &r);
    p.x = r.left + 5;
    p.y = r.top - 2;
    memset (&p, 0, sizeof (p));
    PTD_jpg_show (h, &p, get_photo_tmpname (dlg));
    
    return 0;
}


/* Return string representation of the key validity. @key. */
static const char*
get_validity (gpgme_key_t key)
{
    int val;
    val = key->expired;
    if (val)
        return _("Expired");    
    val = key->revoked;
    if (val)
        return _("Revoked");
    val = key->disabled;
    if (val)
        return _("Disabled");
    return get_key_trust2 (NULL, key->uids->validity, 0, 0);
}


/* Return the preferred sym. algorithm from @key as a string. */
static const char*
get_pref_cipher (winpt_key_t k)
{
    if (k->is_v3)
        return "IDEA";
    if (!k->ext->sym_prefs)
        return "3DES";
    switch (*k->ext->sym_prefs) {
    case 1: return "IDEA";
    case 2: return "3DES";
    case 3: return "CAST5";
    case 4: return "Blowfish";
    case 7:
    case 8:
    case 9: return "AES";
    case 10:return "Twofish";
    }
    return "Unknown";
}


/* Return true if the key has designated revokers. */
static bool
check_for_desig_rev (gpgme_key_t key)
{
    winpt_key_s k;
    memset (&k, 0, sizeof (k));
    if (!winpt_get_pubkey (key->subkeys->keyid, &k))
        return k.ext->gloflags.has_desig_rev? true : false;
    return false;
}


/* Print information (name) of the smart card. */
static const char*
get_card_type (winpt_key_t k)
{    
    static char buf[64];

    if (!k->ext->card_type)
        return "";
    _snprintf (buf, sizeof (buf)-1, _("Card-Type: %s\r\n"), k->ext->card_type);
    return buf;
}


/* Display the key information for key @k.
   Return value: gpgme key on success. */
static void
display_key_info (HWND dlg, winpt_key_t k, gpgme_key_t *r_key)
{
    struct winpt_key_s k2;
    gpgme_key_t sk, key;
    char info[512];
    const char *inf;
    u32 created, expires;    

    memset (&k2, 0, sizeof (k2));       
    if (k->key_pair)
        winpt_get_seckey (k->keyid, &k2);
    else    
        winpt_get_pubkey (k->keyid, &k2);
    sk = k2.ctx;        
    if (sk)
        k->is_protected = k2.is_protected;
    if (get_pubkey (k->keyid, &key))
        BUG (0);    
    created = key->subkeys->timestamp;  
    expires = key->subkeys->expires;    
    _snprintf (info, DIM (info)-1,
               _("Type: %s\r\n"
               "Key ID: %s\r\n"
               "Algorithm: %s\r\n"
               "Size: %s\r\n"
               "Created: %s\r\n"
               "Expires: %s\r\n"
               "Validity: %s\r\n"
               "Cipher: %s\r\n"
               "%s\r\n"),
               get_key_type (key),
               k->keyid,
               get_key_algo (key, 0),
               get_key_size (key, 0),
               get_key_created (created),
               get_key_expire_date (expires),
               get_validity (key), 
               get_pref_cipher (&k2),
               get_card_type (&k2));

    SetDlgItemText (dlg, IDC_KEYPROPS_INFO, info);
    SetDlgItemText (dlg, IDC_KEYPROPS_FPR, get_key_fpr (key));  
    inf = ownertrust_to_string (key->owner_trust);
    SetDlgItemText (dlg, IDC_KEYPROPS_OT, inf);

    *r_key = key;
}


/* Dialog box procedure to show the key properties. */
BOOL CALLBACK
keyprops_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
{
    static winpt_key_t k;
    static gpgme_key_t key;
    gpgme_validity_t valid;
    refresh_cache_s rcs = {0};
    const char *inf;
    int rc;
    
    /* XXX: static variable (k) prevent that the dialog can 
            be opened twice. */
    switch (msg) {
    case WM_INITDIALOG:
        if (!lparam)
            dlg_fatal_error (dlg, "Could not get dialog param!");
        k = (winpt_key_t)lparam;
        SetWindowText (dlg, _("Key Properties"));
        SetDlgItemText (dlg, IDC_KEYPROPS_OT_CHANGE, _("&Change"));
        SetDlgItemText (dlg, IDC_KEYPROPS_REVOKERS, _("&Revokers"));
        SetDlgItemText (dlg, IDC_KEYPROPS_CHANGE_PWD, _("Change &Passwd"));
        SetDlgItemText (dlg, IDC_KEYPROPS_OTINF, _("Ownertrust"));

        display_key_info (dlg, k, &key);
        if (!keyprops_load_photo (dlg, key, &valid)) {
            k->has_photo = 1;   
            if (valid < GPGME_VALIDITY_MARGINAL)
                SetDlgItemText (dlg, IDC_KEYPROPS_IMGINF, _("Photo-ID not validated."));
        }
        if (k->key_pair)
            EnableWindow (GetDlgItem (dlg, IDC_KEYPROPS_CHANGE_PWD), TRUE);
        if (check_for_desig_rev (key))
            EnableWindow (GetDlgItem (dlg, IDC_KEYPROPS_REVOKERS), TRUE);
        center_window (dlg, NULL);
        SetForegroundWindow (dlg);      
        return TRUE;

    case WM_DESTROY:
        remove (get_photo_tmpname (dlg));
        break;
      
    case WM_PAINT:
        if (k->has_photo)
            keyprops_show_photo (dlg);
        break;

    case WM_SYSCOMMAND:
        if (LOWORD (wparam) == SC_CLOSE)
            EndDialog (dlg, TRUE);
        return FALSE;
        
    case WM_COMMAND:
        switch (LOWORD (wparam)) {
        case IDOK:
            EndDialog (dlg, TRUE);
            return TRUE;
            
        case IDC_KEYPROPS_OT_CHANGE:
            if (do_check_key (key)) {
                msg_box (dlg, _("The status of this key is 'revoked' or 'expired'.\n"
                                "You cannot change the ownertrust of such keys."),
                                _("WinPT Warning"), MB_ERR);
                return TRUE;
            }
            if( !k->key_pair && key->uids->validity < 3 ) {
                rc = msg_box( dlg, _("This is a non-valid key.\n"
                                     "Modifying the ownertrust has no effect on such keys.\n\n"
                                     "Do you really want to continue?"), 
                                     _("WinPT Warning"), MB_ICONWARNING|MB_YESNO );
                if (rc == IDNO)
                    return TRUE;
            }

            dialog_box_param (glob_hinst, (LPCSTR)IDD_WINPT_KEYEDIT_OWNERTRUST,
                              dlg, (DLGPROC)keyedit_ownertrust_dlg_proc,
                              (LPARAM)k, _("Change Ownertrust"),
                              IDS_WINPT_KEYEDIT_OWNERTRUST);
            if (k->callback.new_val == -1) { /* Cancel */
                EndDialog (dlg, FALSE);
                break;
            }

            inf = ownertrust_to_string (k->callback.new_val);
            SetDlgItemText (dlg, IDC_KEYPROPS_OT, inf);
            msg_box (dlg, _("Ownertrust successfully changed."), 
                     _("GnuPG Status"), MB_OK);
            
            /* XXX: modified ownertrust values can effect the entire
                    WoT so we reload the cache. But this is very slow. */
            memset (&rcs, 0, sizeof (rcs));
            rcs.kr_reload = 1; rcs.kr_update = 1; /* reload only keylist */
            DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_KEYCACHE, dlg,
                            keycache_dlg_proc, (LPARAM)&rcs);
            return TRUE;
            
        case IDC_KEYPROPS_CHANGE_PWD:
            keyedit_change_passwd (k, dlg);         
            return TRUE;

        case IDC_KEYPROPS_REVOKERS:
            dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_KEYREVOKERS, dlg,
                              key_revokers_dlg_proc, (LPARAM)key, 
                              _("Key Revokers"), IDS_WINPT_KEY_REVOKERS);
            break;
        }
    }
    
    return FALSE;
}
1	/* wptKeyPropsDlg.cpp - WinPT key properties dialog
2	* Copyright (C) 2000, 2001, 2002, 2003, 2005 Timo Schulz
3	*
4	* This file is part of WinPT.
5	*
6	* WinPT is free software; you can redistribute it and/or modify
7	* it under the terms of the GNU General Public License as published by
8	* the Free Software Foundation; either version 2 of the License, or
9	* (at your option) any later version.
10	*
11	* WinPT is distributed in the hope that it will be useful,
12	* but WITHOUT ANY WARRANTY; without even the implied warranty of
13	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14	* GNU General Public License for more details.
15	*
16	* You should have received a copy of the GNU General Public License
17	* along with WinPT; if not, write to the Free Software Foundation,
18	* Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
19	*/
20
21	#ifdef HAVE_CONFIG_H
22	#include <config.h>
23	#endif
24
25	#include <windows.h>
26
27	#include "resource.h"
28	#include "wptErrors.h"
29	#include "wptGPG.h"
30	#include "wptCommonCtl.h"
31	#include "wptContext.h" /* for passphrase_s */
32	#include "wptNLS.h"
33	#include "wptDlgs.h"
34	#include "wptTypes.h"
35	#include "wptKeylist.h"
36	#include "wptW32API.h"
37	#include "wptVersion.h"
38	#include "wptKeyEdit.h"
39
40
41	/* Check that the key is not expired or revoked. */
42	static int
43	do_check_key (gpgme_key_t key)
44	{
45	int okay = 0;
46	okay = key->expired;
47	if (!okay)
48	okay = key->revoked;
49	return okay;
50	}
51
52
53	/* Convert a trust integer into a string representation. */
54	static const char*
55	ownertrust_to_string (int val)
56	{
57	const char *inf;
58	int id = val;
59
60	switch (id) {
61	case 1: inf = _("Don't know"); break;
62	case 2: inf = _("I do NOT trust"); break;
63	case 3: inf = _("I trust marginally"); break;
64	case 4: inf = _("I trust fully"); break;
65	case 5:
66	case 6: inf = _("I trust ultimately"); break;
67	default:inf = _("Unknown"); break;
68	}
69
70	return inf;
71	}
72
73
74	/* Generate a unique temp name for the photo which
75	depends on the dialog handle and return it. */
76	static const char*
77	get_photo_tmpname (HWND dlg)
78	{
79	static char buf[64];
80
81	_snprintf (buf, sizeof (buf)-1, "winpt_photo_%08lX.tmp", (DWORD)dlg);
82	return buf;
83	}
84
85
86	/* Load the photo from the key @key */
87	static int
88	keyprops_load_photo (HWND dlg, gpgme_key_t key, gpgme_validity_t *r_valid)
89	{
90	winpt_key_s k;
91	FILE *f;
92	const BYTE *img;
93	DWORD imglen = 0;
94	int pos=0;
95
96	winpt_get_pubkey (key->subkeys->keyid, &k);
97	img = k.ext->attrib.d;
98	imglen = k.ext->attrib.len;
99	if (!k.ext->attrib.validity)
100	get_uat_validity (key->subkeys->keyid, &k.ext->attrib.validity);
101	*r_valid = k.ext->attrib.validity;
102
103	if (!img \|\| !imglen)
104	return -1;
105	f = fopen (get_photo_tmpname (dlg), "wb");
106	if (f) {
107	for (pos = 0; img[pos] != 0x10; pos++)
108	;
109	pos += 16;
110	fwrite (img + pos, 1, imglen - pos, f);
111	fwrite (img, 1, imglen, f);
112	fclose (f);
113	}
114	return 0;
115	}
116
117
118	/* Display the photo in the image control in the dialog @dlg. */
119	static int
120	keyprops_show_photo (HWND dlg)
121	{
122	RECT r;
123	POINT p;
124	HWND h;
125
126	h = GetDlgItem (dlg, IDC_KEYPROPS_IMG);
127	GetWindowRect (h, &r);
128	p.x = r.left + 5;
129	p.y = r.top - 2;
130	memset (&p, 0, sizeof (p));
131	PTD_jpg_show (h, &p, get_photo_tmpname (dlg));
132
133	return 0;
134	}
135
136
137	/* Return string representation of the key validity. @key. */
138	static const char*
139	get_validity (gpgme_key_t key)
140	{
141	int val;
142	val = key->expired;
143	if (val)
144	return _("Expired");
145	val = key->revoked;
146	if (val)
147	return _("Revoked");
148	val = key->disabled;
149	if (val)
150	return _("Disabled");
151	return get_key_trust2 (NULL, key->uids->validity, 0, 0);
152	}
153
154
155	/* Return the preferred sym. algorithm from @key as a string. */
156	static const char*
157	get_pref_cipher (winpt_key_t k)
158	{
159	if (k->is_v3)
160	return "IDEA";
161	if (!k->ext->sym_prefs)
162	return "3DES";
163	switch (*k->ext->sym_prefs) {
164	case 1: return "IDEA";
165	case 2: return "3DES";
166	case 3: return "CAST5";
167	case 4: return "Blowfish";
168	case 7:
169	case 8:
170	case 9: return "AES";
171	case 10:return "Twofish";
172	}
173	return "Unknown";
174	}
175
176
177	/* Return true if the key has designated revokers. */
178	static bool
179	check_for_desig_rev (gpgme_key_t key)
180	{
181	winpt_key_s k;
182	memset (&k, 0, sizeof (k));
183	if (!winpt_get_pubkey (key->subkeys->keyid, &k))
184	return k.ext->gloflags.has_desig_rev? true : false;
185	return false;
186	}
187
188
189	/* Print information (name) of the smart card. */
190	static const char*
191	get_card_type (winpt_key_t k)
192	{
193	static char buf[64];
194
195	if (!k->ext->card_type)
196	return "";
197	_snprintf (buf, sizeof (buf)-1, _("Card-Type: %s\r\n"), k->ext->card_type);
198	return buf;
199	}
200
201
202	/* Display the key information for key @k.
203	Return value: gpgme key on success. */
204	static void
205	display_key_info (HWND dlg, winpt_key_t k, gpgme_key_t *r_key)
206	{
207	struct winpt_key_s k2;
208	gpgme_key_t sk, key;
209	char info[512];
210	const char *inf;
211	u32 created, expires;
212
213	memset (&k2, 0, sizeof (k2));
214	if (k->key_pair)
215	winpt_get_seckey (k->keyid, &k2);
216	else
217	winpt_get_pubkey (k->keyid, &k2);
218	sk = k2.ctx;
219	if (sk)
220	k->is_protected = k2.is_protected;
221	if (get_pubkey (k->keyid, &key))
222	BUG (0);
223	created = key->subkeys->timestamp;
224	expires = key->subkeys->expires;
225	_snprintf (info, DIM (info)-1,
226	_("Type: %s\r\n"
227	"Key ID: %s\r\n"
228	"Algorithm: %s\r\n"
229	"Size: %s\r\n"
230	"Created: %s\r\n"
231	"Expires: %s\r\n"
232	"Validity: %s\r\n"
233	"Cipher: %s\r\n"
234	"%s\r\n"),
235	get_key_type (key),
236	k->keyid,
237	get_key_algo (key, 0),
238	get_key_size (key, 0),
239	get_key_created (created),
240	get_key_expire_date (expires),
241	get_validity (key),
242	get_pref_cipher (&k2),
243	get_card_type (&k2));
244
245	SetDlgItemText (dlg, IDC_KEYPROPS_INFO, info);
246	SetDlgItemText (dlg, IDC_KEYPROPS_FPR, get_key_fpr (key));
247	inf = ownertrust_to_string (key->owner_trust);
248	SetDlgItemText (dlg, IDC_KEYPROPS_OT, inf);
249
250	*r_key = key;
251	}
252
253
254	/* Dialog box procedure to show the key properties. */
255	BOOL CALLBACK
256	keyprops_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
257	{
258	static winpt_key_t k;
259	static gpgme_key_t key;
260	gpgme_validity_t valid;
261	refresh_cache_s rcs = {0};
262	const char *inf;
263	int rc;
264
265	/* XXX: static variable (k) prevent that the dialog can
266	be opened twice. */
267	switch (msg) {
268	case WM_INITDIALOG:
269	if (!lparam)
270	dlg_fatal_error (dlg, "Could not get dialog param!");
271	k = (winpt_key_t)lparam;
272	SetWindowText (dlg, _("Key Properties"));
273	SetDlgItemText (dlg, IDC_KEYPROPS_OT_CHANGE, _("&Change"));
274	SetDlgItemText (dlg, IDC_KEYPROPS_REVOKERS, _("&Revokers"));
275	SetDlgItemText (dlg, IDC_KEYPROPS_CHANGE_PWD, _("Change &Passwd"));
276	SetDlgItemText (dlg, IDC_KEYPROPS_OTINF, _("Ownertrust"));
277
278	display_key_info (dlg, k, &key);
279	if (!keyprops_load_photo (dlg, key, &valid)) {
280	k->has_photo = 1;
281	if (valid < GPGME_VALIDITY_MARGINAL)
282	SetDlgItemText (dlg, IDC_KEYPROPS_IMGINF, _("Photo-ID not validated."));
283	}
284	if (k->key_pair)
285	EnableWindow (GetDlgItem (dlg, IDC_KEYPROPS_CHANGE_PWD), TRUE);
286	if (check_for_desig_rev (key))
287	EnableWindow (GetDlgItem (dlg, IDC_KEYPROPS_REVOKERS), TRUE);
288	center_window (dlg, NULL);
289	SetForegroundWindow (dlg);
290	return TRUE;
291
292	case WM_DESTROY:
293	remove (get_photo_tmpname (dlg));
294	break;
295
296	case WM_PAINT:
297	if (k->has_photo)
298	keyprops_show_photo (dlg);
299	break;
300
301	case WM_SYSCOMMAND:
302	if (LOWORD (wparam) == SC_CLOSE)
303	EndDialog (dlg, TRUE);
304	return FALSE;
305
306	case WM_COMMAND:
307	switch (LOWORD (wparam)) {
308	case IDOK:
309	EndDialog (dlg, TRUE);
310	return TRUE;
311
312	case IDC_KEYPROPS_OT_CHANGE:
313	if (do_check_key (key)) {
314	msg_box (dlg, _("The status of this key is 'revoked' or 'expired'.\n"
315	"You cannot change the ownertrust of such keys."),
316	_("WinPT Warning"), MB_ERR);
317	return TRUE;
318	}
319	if( !k->key_pair && key->uids->validity < 3 ) {
320	rc = msg_box( dlg, _("This is a non-valid key.\n"
321	"Modifying the ownertrust has no effect on such keys.\n\n"
322	"Do you really want to continue?"),
323	_("WinPT Warning"), MB_ICONWARNING\|MB_YESNO );
324	if (rc == IDNO)
325	return TRUE;
326	}
327
328	dialog_box_param (glob_hinst, (LPCSTR)IDD_WINPT_KEYEDIT_OWNERTRUST,
329	dlg, (DLGPROC)keyedit_ownertrust_dlg_proc,
330	(LPARAM)k, _("Change Ownertrust"),
331	IDS_WINPT_KEYEDIT_OWNERTRUST);
332	if (k->callback.new_val == -1) { /* Cancel */
333	EndDialog (dlg, FALSE);
334	break;
335	}
336
337	inf = ownertrust_to_string (k->callback.new_val);
338	SetDlgItemText (dlg, IDC_KEYPROPS_OT, inf);
339	msg_box (dlg, _("Ownertrust successfully changed."),
340	_("GnuPG Status"), MB_OK);
341
342	/* XXX: modified ownertrust values can effect the entire
343	WoT so we reload the cache. But this is very slow. */
344	memset (&rcs, 0, sizeof (rcs));
345	rcs.kr_reload = 1; rcs.kr_update = 1; /* reload only keylist */
346	DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_KEYCACHE, dlg,
347	keycache_dlg_proc, (LPARAM)&rcs);
348	return TRUE;
349
350	case IDC_KEYPROPS_CHANGE_PWD:
351	keyedit_change_passwd (k, dlg);
352	return TRUE;
353
354	case IDC_KEYPROPS_REVOKERS:
355	dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_KEYREVOKERS, dlg,
356	key_revokers_dlg_proc, (LPARAM)key,
357	_("Key Revokers"), IDS_WINPT_KEY_REVOKERS);
358	break;
359	}
360	}
361
362	return FALSE;
363	}