trunk/Src/wptKeyRevokeDlg.cpp

/* wptKeyRevokeDlg.cpp - Key revocation dialog
 *      Copyright (C) 2001, 2002, 2003, 2005 Timo Schulz
 *      Copyright (C) 2005 g10 Code GmbH
 *
 * 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 "gpgme.h"
#include "wptErrors.h"
#include "wptGPG.h"
#include "wptW32API.h"
#include "wptTypes.h"
#include "wptCommonCtl.h"
#include "wptContext.h" /* for passphrase_s */
#include "wptDlgs.h"
#include "wptNLS.h"
#include "wptUTF8.h"


/* Generate a file template for the cert based on the key 
   with the keyid @keyid. */
static void
mk_cert_fname (const char *keyid, char *fname, size_t flen)
{
    gpgme_key_t k;
    size_t i;
    char *uid;

    if (get_pubkey (keyid, &k))
        BUG (NULL);
    uid = utf8_to_native (k->uids->name);
    _snprintf (fname, flen-1, "%s_RevocationCert.asc", uid);
    for (i=0; i < strlen (fname); i++) {
        if (fname[i] == ' ')
            fname[i] = '_';
    }
    safe_free (uid);
}


/* Release the cert data and store it in the file @fname. */
static void
release_cert_as_file (char *revcert, const char *fname)
{
    gpgme_error_t err;
    gpgme_data_t rev;

    err = gpgme_data_new_from_mem (&rev, revcert, strlen (revcert), 1);
    if (!err)
        gpg_data_release_and_set_file (rev, fname);
    else
        msg_box (NULL, gpgme_strerror (err), _("Key Revocation Cert"), MB_ERR);
    free (revcert);
}


/* Dialog box procedure for key revocation. */
BOOL CALLBACK
key_revoke_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
{       
    static winpt_key_t k;
    gpgme_error_t err;
    HWND list;
    int idx, use_desc;
    char desc[256], file[256];
    char pwd[256];
    char *p = NULL;
    char *inp_data = NULL, *revcert=NULL;
    const char *warning =
        _("Please move this certificate to a medium where it can be"
          "stored in a safe place (floppy, CDR, etc..).\n"
          "If an attacker gets access to this certificate he can use it to "
          "render your key unusable!");
    
    switch( msg ) {
    case WM_INITDIALOG:
        if( !lparam )
            dlg_fatal_error(dlg, "Could not get dialog param!");
        k = (winpt_key_t )lparam;
        SetWindowText (dlg, _("Key Revocation Cert"));
        SetDlgItemText (dlg, IDCANCEL, _("&Cancel"));
        SetDlgItemText (dlg, IDC_KEYREVOKE_REASONINF, _("Reason for revocation"));
        SetDlgItemText (dlg, IDC_KEYREVOKE_OPTINF, _("Optional description text"));
        SetDlgItemText (dlg, IDC_KEYREVOKE_PWDINF, _("&Passphrase"));
        SetDlgItemText (dlg, IDC_KEYREVOKE_OUTINF, _("Output file"));
        list = GetDlgItem (dlg, IDC_KEYREVOKE_REASON);
        listbox_add_string (list, _("0. No reason specified"));
        listbox_add_string (list, _("1. Key has been compromised"));
        listbox_add_string (list, _("2. Key is superseded"));
        listbox_add_string (list, _("3. Key is no longer used"));
        SendMessage (list, LB_SETCURSEL, (WPARAM)0, 0);
        SetForegroundWindow (dlg);
        center_window (dlg, NULL);
        return TRUE;
        
    case WM_SYSCOMMAND:
        if (LOWORD (wparam) == SC_CLOSE) {
            SetDlgItemText (dlg, IDC_KEYREVOKE_PWD, "");
            EndDialog (dlg, TRUE);
        }
        return FALSE;
        
    case WM_COMMAND:
        switch (LOWORD (wparam)) {
        case IDC_KEYREVOKE_CHOOSE:
            const char *s;
            mk_cert_fname (k->keyid, file, sizeof file-1);
            s = get_filesave_dlg (dlg, _("Choose File to save the Certificate"), NULL, file);
            if (s && *s)
                SetDlgItemText (dlg, IDC_KEYREVOKE_FILE, s);
            return TRUE;

        case IDOK:
            list = GetDlgItem (dlg, IDC_KEYREVOKE_REASON);
            idx = SendMessage (list, LB_GETCURSEL, 0, 0);
            if (idx < 0 || idx > 3) {
                msg_box (dlg, _("Please select a reason."), 
                         _("Key Revocation Cert"), MB_ERR);
                return TRUE;
            }
            if (!GetDlgItemText (dlg, IDC_KEYREVOKE_FILE, file, sizeof (file)-1)) {
                msg_box (dlg, _("Please enter a file name."), 
                         _("Key Revocation Cert"), MB_ERR);
                return TRUE;
            }
            use_desc = 1;
            if (!GetDlgItemText (dlg, IDC_KEYREVOKE_TEXT, desc, sizeof (desc)-1))
                use_desc = 0;
            if( !GetDlgItemText (dlg, IDC_KEYREVOKE_PWD, pwd, sizeof (pwd)-1)) {
                msg_box (dlg, _("Please enter the passphrase."), 
                         _("Key Revocation Cert"), MB_ERR);
                return TRUE;
            }
          
            if (use_desc)
                p = native_to_utf8 (desc);
            /* we use the keyid to avoid charset problems and UTF8 encodings.*/
            inp_data = generate_revoke_input (idx, use_desc? p : NULL, pwd);
            
            err = gpg_revoke_cert (inp_data, k->keyid, &revcert);
            wipememory (pwd, sizeof (pwd));
            wipememory (inp_data, strlen (inp_data));
            free (inp_data);
            free_if_alloc (p);

            if (err) {
                msg_box (dlg, gpgme_strerror (err), _("Key Revocation Cert"), MB_ERR);
                if (revcert)
                    free (revcert);
            }
            else {
                show_msg (dlg, 1000, _("Revocation certificate generated."));
                msg_box (dlg, warning, _("Key Revocation Cert"), MB_INFO);
                release_cert_as_file (revcert, file);
            }
            EndDialog (dlg, TRUE);
            return TRUE;
            
        case IDCANCEL:
            EndDialog (dlg, FALSE);
            return FALSE;
        }
        break;
    }
    
    return FALSE;
}
1	/* wptKeyRevokeDlg.cpp - Key revocation dialog
2	* Copyright (C) 2001, 2002, 2003, 2005 Timo Schulz
3	* Copyright (C) 2005 g10 Code GmbH
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
27	#include "resource.h"
28	#include "gpgme.h"
29	#include "wptErrors.h"
30	#include "wptGPG.h"
31	#include "wptW32API.h"
32	#include "wptTypes.h"
33	#include "wptCommonCtl.h"
34	#include "wptContext.h" /* for passphrase_s */
35	#include "wptDlgs.h"
36	#include "wptNLS.h"
37	#include "wptUTF8.h"
38
39
40	/* Generate a file template for the cert based on the key
41	with the keyid @keyid. */
42	static void
43	mk_cert_fname (const char keyid, char fname, size_t flen)
44	{
45	gpgme_key_t k;
46	size_t i;
47	char *uid;
48
49	if (get_pubkey (keyid, &k))
50	BUG (NULL);
51	uid = utf8_to_native (k->uids->name);
52	_snprintf (fname, flen-1, "%s_RevocationCert.asc", uid);
53	for (i=0; i < strlen (fname); i++) {
54	if (fname[i] == ' ')
55	fname[i] = '_';
56	}
57	safe_free (uid);
58	}
59
60
61	/* Release the cert data and store it in the file @fname. */
62	static void
63	release_cert_as_file (char revcert, const char fname)
64	{
65	gpgme_error_t err;
66	gpgme_data_t rev;
67
68	err = gpgme_data_new_from_mem (&rev, revcert, strlen (revcert), 1);
69	if (!err)
70	gpg_data_release_and_set_file (rev, fname);
71	else
72	msg_box (NULL, gpgme_strerror (err), _("Key Revocation Cert"), MB_ERR);
73	free (revcert);
74	}
75
76
77	/* Dialog box procedure for key revocation. */
78	BOOL CALLBACK
79	key_revoke_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
80	{
81	static winpt_key_t k;
82	gpgme_error_t err;
83	HWND list;
84	int idx, use_desc;
85	char desc[256], file[256];
86	char pwd[256];
87	char *p = NULL;
88	char inp_data = NULL, revcert=NULL;
89	const char *warning =
90	_("Please move this certificate to a medium where it can be"
91	"stored in a safe place (floppy, CDR, etc..).\n"
92	"If an attacker gets access to this certificate he can use it to "
93	"render your key unusable!");
94
95	switch( msg ) {
96	case WM_INITDIALOG:
97	if( !lparam )
98	dlg_fatal_error(dlg, "Could not get dialog param!");
99	k = (winpt_key_t )lparam;
100	SetWindowText (dlg, _("Key Revocation Cert"));
101	SetDlgItemText (dlg, IDCANCEL, _("&Cancel"));
102	SetDlgItemText (dlg, IDC_KEYREVOKE_REASONINF, _("Reason for revocation"));
103	SetDlgItemText (dlg, IDC_KEYREVOKE_OPTINF, _("Optional description text"));
104	SetDlgItemText (dlg, IDC_KEYREVOKE_PWDINF, _("&Passphrase"));
105	SetDlgItemText (dlg, IDC_KEYREVOKE_OUTINF, _("Output file"));
106	list = GetDlgItem (dlg, IDC_KEYREVOKE_REASON);
107	listbox_add_string (list, _("0. No reason specified"));
108	listbox_add_string (list, _("1. Key has been compromised"));
109	listbox_add_string (list, _("2. Key is superseded"));
110	listbox_add_string (list, _("3. Key is no longer used"));
111	SendMessage (list, LB_SETCURSEL, (WPARAM)0, 0);
112	SetForegroundWindow (dlg);
113	center_window (dlg, NULL);
114	return TRUE;
115
116	case WM_SYSCOMMAND:
117	if (LOWORD (wparam) == SC_CLOSE) {
118	SetDlgItemText (dlg, IDC_KEYREVOKE_PWD, "");
119	EndDialog (dlg, TRUE);
120	}
121	return FALSE;
122
123	case WM_COMMAND:
124	switch (LOWORD (wparam)) {
125	case IDC_KEYREVOKE_CHOOSE:
126	const char *s;
127	mk_cert_fname (k->keyid, file, sizeof file-1);
128	s = get_filesave_dlg (dlg, _("Choose File to save the Certificate"), NULL, file);
129	if (s && *s)
130	SetDlgItemText (dlg, IDC_KEYREVOKE_FILE, s);
131	return TRUE;
132
133	case IDOK:
134	list = GetDlgItem (dlg, IDC_KEYREVOKE_REASON);
135	idx = SendMessage (list, LB_GETCURSEL, 0, 0);
136	if (idx < 0 \|\| idx > 3) {
137	msg_box (dlg, _("Please select a reason."),
138	_("Key Revocation Cert"), MB_ERR);
139	return TRUE;
140	}
141	if (!GetDlgItemText (dlg, IDC_KEYREVOKE_FILE, file, sizeof (file)-1)) {
142	msg_box (dlg, _("Please enter a file name."),
143	_("Key Revocation Cert"), MB_ERR);
144	return TRUE;
145	}
146	use_desc = 1;
147	if (!GetDlgItemText (dlg, IDC_KEYREVOKE_TEXT, desc, sizeof (desc)-1))
148	use_desc = 0;
149	if( !GetDlgItemText (dlg, IDC_KEYREVOKE_PWD, pwd, sizeof (pwd)-1)) {
150	msg_box (dlg, _("Please enter the passphrase."),
151	_("Key Revocation Cert"), MB_ERR);
152	return TRUE;
153	}
154
155	if (use_desc)
156	p = native_to_utf8 (desc);
157	/* we use the keyid to avoid charset problems and UTF8 encodings.*/
158	inp_data = generate_revoke_input (idx, use_desc? p : NULL, pwd);
159
160	err = gpg_revoke_cert (inp_data, k->keyid, &revcert);
161	wipememory (pwd, sizeof (pwd));
162	wipememory (inp_data, strlen (inp_data));
163	free (inp_data);
164	free_if_alloc (p);
165
166	if (err) {
167	msg_box (dlg, gpgme_strerror (err), _("Key Revocation Cert"), MB_ERR);
168	if (revcert)
169	free (revcert);
170	}
171	else {
172	show_msg (dlg, 1000, _("Revocation certificate generated."));
173	msg_box (dlg, warning, _("Key Revocation Cert"), MB_INFO);
174	release_cert_as_file (revcert, file);
175	}
176	EndDialog (dlg, TRUE);
177	return TRUE;
178
179	case IDCANCEL:
180	EndDialog (dlg, FALSE);
181	return FALSE;
182	}
183	break;
184	}
185
186	return FALSE;
187	}