trunk/Src/wptKeysignDlg.cpp

/* wptKeysignDlg.cpp - Key signing dialog
 *      Copyright (C) 2001-2006 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 <commctrl.h>
#include <time.h>

#include "resource.h"
#include "wptGPG.h"
#include "wptNLS.h"
#include "wptW32API.h"
#include "wptVersion.h"
#include "wptTypes.h"
#include "wptErrors.h"
#include "wptCommonCtl.h"
#include "wptContext.h"
#include "wptDlgs.h"
#include "wptUTF8.h"
#include "wptRegistry.h"
#include "wptKeylist.h"
#include "wptKeyEdit.h"


/* Return a beautified printable fingerprint of @fpr. */
static const char*
get_printable_fpr (const char *fpr)
{
    static char pfpr[64];    
    int pos = 0;
    size_t i;

    for (i = 0; i < strlen (fpr); i += 4) {
        pfpr[pos++] = fpr[i];
        pfpr[pos++] = fpr[i+1];
        pfpr[pos++] = fpr[i+2];
        pfpr[pos++] = fpr[i+3];
        pfpr[pos++] = ' ';
    }
    return pfpr;
}


/* Return human friendly information about the key @key. */
static const char*
get_keyinfo (gpgme_key_t key)
{
    static char buf[64+16];
    struct winpt_key_s k;

    memset (&k, 0, sizeof (k));
    winpt_get_seckey (key->subkeys->keyid, &k);
    _snprintf (buf, DIM (buf)-1-16, _("%d-bit %s key, ID 0x%s"), 
        key->subkeys->length,
        get_key_pubalgo (key->subkeys->pubkey_algo),
        key->subkeys->keyid+8);
    if (k.ext->gloflags.divert_to_card)
        strcat (buf, " (Card)");
    return buf;
}


/* Fill the secret key combo-box with all entries from the cache.
   @dlg is the handle to the combo-box. @keyid show which key to skip.
   Return value: 0 on success. */
static int
do_fill_seckeylist (HWND dlg, const char *keyid)
{
    gpg_keycache_t sec;
    gpgme_key_t pk, defkey;
    const char *s;
    char *uid, *p;
    int i = 0, n = 0, curr_sel = 0;

    sec = keycache_get_ctx (0);
    if (!sec)
        BUG (0);
    gpg_keycache_get_default_key (sec, &defkey);
    gpg_keycache_rewind (sec);
    while (!gpg_keycache_next_key (sec, 1, &pk)) {
        if (!pk)
            continue;
        s = pk->subkeys->keyid;
        if (!strcmp (s, keyid))
            continue;
        /* skip all ElGamal sign+encrypt keys */
        if (pk->subkeys->pubkey_algo == GPGME_PK_ELG)
            continue;
        /* make sure the public key is okay not: revoked, expired or disabled. */
        if (pk->expired ||pk->revoked || pk->disabled)
            continue;
        s = pk->uids->name;
        if (!s)
            continue;
        if (defkey && !strcmp (defkey->subkeys->keyid, pk->subkeys->keyid))
            curr_sel = i;
        uid = utf8_to_native (s);
        p = new char[strlen (uid) + 64];
        if (!p)
            BUG (NULL);
        _snprintf (p, strlen (uid) + 63, "%s (%s)", uid, get_keyinfo (pk));
        SendDlgItemMessage (dlg, IDC_KEYSIGN_KEYLIST, 
                            CB_ADDSTRING, i, (LPARAM)(char *)p);
        SendDlgItemMessage (dlg, IDC_KEYSIGN_KEYLIST, 
                            CB_SETITEMDATA, i++, (LPARAM)(DWORD)pk);
        free_if_alloc (p);
        free (uid);
        n++;
    }
    SendDlgItemMessage (dlg, IDC_KEYSIGN_KEYLIST, 
                        CB_SETCURSEL, (WPARAM)curr_sel, 0);
    if (!n)
        return -1;
    return 0;
}


/* Check if the selected key is protected and en- or disable the 
   passphrase control. */
static void
do_check_protection (HWND dlg)
{
    gpgme_key_t key;
    struct winpt_key_s k;
    int idx, protec;    

    idx = SendDlgItemMessage (dlg, IDC_KEYSIGN_KEYLIST, CB_GETCURSEL, 0, 0);
    key = (gpgme_key_t)SendDlgItemMessage (dlg, IDC_KEYSIGN_KEYLIST, 
                                           CB_GETITEMDATA, (WPARAM)idx, 0);
    if (key) {
        winpt_get_seckey (key->subkeys->keyid, &k);
        protec = k.is_protected;
        if (!protec)
            protec = k.ext->gloflags.divert_to_card;
        EnableWindow (GetDlgItem (dlg, IDC_KEYSIGN_PASSPHRASE), protec? TRUE : FALSE);
    }
}


/* Dialog box procedure to choose the signature class. */
BOOL CALLBACK
sig_class_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
{
    int sig_class = 0;

    switch (msg) {
    case WM_INITDIALOG:
        SetWindowText (dlg, _("Choose Signature Class"));
        SetDlgItemText (dlg, IDC_SIGCLASS_TITLEINF, _("How carefully have you verified the key you are about to sign actually belongs to the person? If you don't know what to anwser, use \"0\"."));
        SetDlgItemText (dlg, IDC_SIGCLASS_CLASS0, _("(0) I will not answer (default)"));
        SetDlgItemText (dlg, IDC_SIGCLASS_CLASS1, _("(1) I have not checked at all."));
        SetDlgItemText (dlg, IDC_SIGCLASS_CLASS2, _("(2) I have done causal checking."));
        SetDlgItemText (dlg, IDC_SIGCLASS_CLASS3, _("(3) I have done very careful checkings."));
        CheckDlgButton (dlg, IDC_SIGCLASS_CLASS0, BST_CHECKED);
        SetForegroundWindow (dlg);
        center_window (dlg, NULL);
        return TRUE;

    case WM_COMMAND:
        switch (LOWORD (wparam)) {
        case IDOK:
            if (IsDlgButtonChecked (dlg, IDC_SIGCLASS_CLASS0))
                sig_class = 0;
            else if (IsDlgButtonChecked (dlg, IDC_SIGCLASS_CLASS1))
                sig_class = 1;
            else if (IsDlgButtonChecked (dlg, IDC_SIGCLASS_CLASS2))
                sig_class = 2;
            else if (IsDlgButtonChecked (dlg, IDC_SIGCLASS_CLASS3))
                sig_class = 3;
            else
                sig_class = 0;
            EndDialog (dlg, sig_class);
            return TRUE;

        case IDCANCEL:
            EndDialog (dlg, 0);
            return TRUE;
        }
        break;
    }

    return FALSE;
}


/* Return the humand friendly expiration date of @key. */
static const char*
get_expire_date (gpgme_key_t key)
{
    u32 u = key->subkeys->expires;
    if (!u)
        return _("never");
    return get_key_expire_date (u);
}

/* Display photo of key @key in a separate window. */
static void
show_photo (winpt_key_t key)
{
    /* XXX: fill it with life. */
}


/* Check if the given system time @st points to today. */
static int
date_is_today (SYSTEMTIME *st)
{
    time_t t;
    struct tm *tm;

    t = time (NULL);
    tm = localtime (&t);
    if (st->wDay == tm->tm_mday &&
        st->wYear == tm->tm_year+1900 &&
        st->wMonth == tm->tm_mon+1)
        return -1;
    return 0;
}


/* Dialog box procedure to sign a key. */
BOOL CALLBACK
keysign_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
{
    static winpt_key_t key;
    GpgKeyEdit *ke;
    gpgme_error_t err;
    gpgme_key_t k;
    SYSTEMTIME st;
    HWND h;
    char keymsg[2048], pwd[256];
    const char *keyid, *s;
    int type, expires=0, idx;
    int sig_class = 0;
    
    switch (msg)  {
    case WM_INITDIALOG:
        if (lparam == 0)
            dlg_fatal_error (dlg, "could not get dialog param.");
        SetWindowText (dlg, _("Key Signing"));
        key = (winpt_key_t) lparam;
        _snprintf (keymsg, sizeof keymsg -1,
                   _("pub %d/%s  created: %s    expires: %s\n\n"
                     "Primary key fingerprint: %s\n\n"
                     "\t%s\n\n"
                     "\nAre you really sure that you want to sign this key with YOUR key?\n"),
                   key->ctx->subkeys->length,
                   key->ctx->subkeys->keyid+8,
                   get_key_created (key->ctx->subkeys->timestamp),
                   get_expire_date (key->ctx),
                   get_printable_fpr (key->ctx->subkeys->fpr),
                   key->ext->uids->uid);
        s = key->ctx->subkeys->keyid;
        if (do_fill_seckeylist (dlg, s)) {
            msg_box (dlg, _("No valid secret key found."), _("Key Signing"), MB_ERR);
            EndDialog (dlg, FALSE);
            break;
        }
        do_check_protection (dlg);
        SetDlgItemText (dlg, IDC_KEYSIGN_INFOS, keymsg);
        SetDlgItemText (dlg, IDC_KEYSIGN_LOCAL, _("Sign local only (non exportable signature)"));
        SetDlgItemText (dlg, IDC_KEYSIGN_EXPSIG, _("Signature expires on"));
        SetDlgItemText (dlg, IDC_KEYSIGN_NREV, _("Sign non-revocably"));
        SetDlgItemText (dlg, IDC_KEYSIGN_ASKLEVEL, _("&Ask for certification level"));
        SetDlgItemText (dlg, IDC_KEYSIGN_PWDINF, _("Passphrase"));
        SetDlgItemText (dlg, IDCANCEL, _("&Cancel"));
        SetDlgItemText (dlg, IDC_KEYSIGN_SHOWIMG, _("&Show photo"));
        SetDlgItemText (dlg, IDC_KEYSIGN_HIDE, _("&Hide Typing"));
        CheckDlgButton (dlg, IDC_KEYSIGN_LOCAL, BST_CHECKED);
        CheckDlgButton (dlg, IDC_KEYSIGN_EXPSIG, BST_UNCHECKED);
        CheckDlgButton (dlg, IDC_KEYSIGN_ASKLEVEL, BST_UNCHECKED);
        EnableWindow (GetDlgItem (dlg, IDC_KEYSIGN_EXPIRES), FALSE);
        if (reg_prefs.expert == 0)
            ShowWindow (GetDlgItem (dlg, IDC_KEYSIGN_NREV), SW_HIDE);
        if (key->ext && key->ext->attrib.len > 0)
            EnableWindow (GetDlgItem (dlg, IDC_KEYSIGN_SHOWIMG), TRUE);
        if (!reg_prefs.gpg.ask_cert_level)
            EnableWindow (GetDlgItem (dlg, IDC_KEYSIGN_ASKLEVEL), FALSE);
        if (!reg_prefs.gpg.ask_cert_expire)
            EnableWindow (GetDlgItem (dlg, IDC_KEYSIGN_EXPSIG), FALSE);
        CheckDlgButton (dlg, IDC_KEYSIGN_HIDE, BST_CHECKED);
        SetForegroundWindow (dlg);
        h = GetDlgItem (dlg, IDC_KEYSIGN_PASSPHRASE);
        SetFocus (h);
        return FALSE;

    case WM_SYSCOMMAND:
        if (LOWORD (wparam) == SC_CLOSE) {
            SetDlgItemText (dlg, IDC_KEYSIGN_PASSPHRASE, "");
            EndDialog (dlg, TRUE);
        }
        return FALSE;
        
    case WM_COMMAND:
        if (HIWORD (wparam) == CBN_SELCHANGE) {
            do_check_protection (dlg);
            break;
        }
        if (HIWORD (wparam) == BN_CLICKED && 
            LOWORD (wparam) == IDC_KEYSIGN_EXPSIG) {
            int enable = IsDlgButtonChecked (dlg, IDC_KEYSIGN_EXPSIG);
            EnableWindow (GetDlgItem (dlg, IDC_KEYSIGN_EXPIRES), enable? TRUE : FALSE);
        }
        if (HIWORD (wparam) == BN_CLICKED && 
            LOWORD (wparam) == IDC_KEYSIGN_HIDE) {
            HWND hwnd = GetDlgItem (dlg, IDC_KEYSIGN_PASSPHRASE);
            int hide = IsDlgButtonChecked (dlg, IDC_KEYSIGN_HIDE);
            SendMessage (hwnd, EM_SETPASSWORDCHAR, hide? '*' : 0, 0);
            SetFocus (hwnd);
        }

        switch (LOWORD (wparam)) {
        case IDOK:
            if (IsDlgButtonChecked (dlg, IDC_KEYSIGN_ASKLEVEL))
                sig_class = dialog_box_param (glob_hinst, 
                                              (LPCSTR)IDD_WINPT_SIGCLASS, dlg,
                                              sig_class_dlg_proc, (LPARAM)NULL,
                                              _("Choose Signature Class"), 
                                              IDS_WINPT_SIGCLASS);
            type = IsDlgButtonChecked (dlg, IDC_KEYSIGN_LOCAL);
            if (type)
                type = GPG_EDITKEY_LSIGN;
            else
                type = GPG_EDITKEY_SIGN;

            if (reg_prefs.expert && IsDlgButtonChecked (dlg, IDC_KEYSIGN_NREV)) {
                type = GPG_EDITKEY_NRSIGN;
                if (type == GPG_EDITKEY_LSIGN)
                    type = GPG_EDITKEY_NRLSIGN;
            }
            if (IsDlgButtonChecked (dlg, IDC_KEYSIGN_EXPSIG)) {
                DateTime_GetSystemtime (GetDlgItem (dlg, IDC_KEYSIGN_EXPIRES), &st);
                if (date_is_today (&st)) {
                    msg_box (dlg, _("You cannot select today as the expiration date."),
                             _("Key Signing"), MB_INFO);
                    return TRUE;
                }
                else
                    expires = 1;
                sprintf (keymsg, "%04d-%02d-%02d", st.wYear, st.wMonth, st.wDay);
            }

            /* XXX: check for --ask-cert-level and --ask-cert-expire in the gpg.conf
                    if an advanced button is checked and offer to add it to the config
                    file. */

            GetDlgItemText( dlg, IDC_KEYSIGN_PASSPHRASE, pwd, DIM (pwd)-1);
            keyid = key->ctx->subkeys->keyid;
            if( !keyid ) {
                msg_box( dlg, _("Could not get Key ID from key."), _("Key Signing"), MB_ERR );
                return TRUE;
            }
            ke = new GpgKeyEdit (keyid);
            if (!ke)
                BUG (NULL);
            ke->setPassphrase (pwd);
            idx = SendDlgItemMessage (dlg, IDC_KEYSIGN_KEYLIST, CB_GETCURSEL, 0, 0);
            k = (gpgme_key_t)SendDlgItemMessage (dlg, IDC_KEYSIGN_KEYLIST, 
                                                 CB_GETITEMDATA, (WPARAM)idx, 0);
            if (k)
                ke->setLocalUser (k);

            err = ke->signKey (type, sig_class, expires? keymsg : "0");
            wipememory (pwd, sizeof (pwd));
            if (err) {
                delete ke;
                msg_box (dlg, gpgme_strerror (err), _("Key Signing"), MB_ERR);
                return TRUE;
            }
            if (ke->getResult () != 0)
                msg_box (dlg, _("This key is already signed by your key"), 
                         _("Key Signing"), MB_INFO);
            else {
                status_box (dlg, _("Key successfully signed."), _("Key Signing"));
                key->update = 1;
            }
            delete ke;
            EndDialog (dlg, TRUE);
            return TRUE;
            
        case IDCANCEL:
            EndDialog (dlg, FALSE);
            return TRUE;

        case IDC_KEYSIGN_SHOWIMG:
            show_photo (key);
            return TRUE;
        }
        break;
    }
    
    return FALSE;
}

1	werner	36	/* wptKeysignDlg.cpp - Key signing dialog
2	twoaday	170	* Copyright (C) 2001-2006 Timo Schulz
3	werner	36	*
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	werner	42	#ifdef HAVE_CONFIG_H
21			#include <config.h>
22			#endif
23
24	werner	36	#include <windows.h>
25			#include <commctrl.h>
26	twoaday	181	#include <time.h>
27	werner	36
28	werner	47	#include "resource.h"
29	werner	36	#include "wptGPG.h"
30			#include "wptNLS.h"
31			#include "wptW32API.h"
32			#include "wptVersion.h"
33			#include "wptTypes.h"
34			#include "wptErrors.h"
35			#include "wptCommonCtl.h"
36			#include "wptContext.h"
37			#include "wptDlgs.h"
38			#include "wptUTF8.h"
39			#include "wptRegistry.h"
40	werner	47	#include "wptKeylist.h"
41	werner	36	#include "wptKeyEdit.h"
42
43
44			/* Return a beautified printable fingerprint of @fpr. */
45			static const char*
46			get_printable_fpr (const char *fpr)
47			{
48			static char pfpr[64];
49			int pos = 0;
50			size_t i;
51
52			for (i = 0; i < strlen (fpr); i += 4) {
53			pfpr[pos++] = fpr[i];
54			pfpr[pos++] = fpr[i+1];
55			pfpr[pos++] = fpr[i+2];
56			pfpr[pos++] = fpr[i+3];
57			pfpr[pos++] = ' ';
58			}
59			return pfpr;
60			}
61
62
63			/* Return human friendly information about the key @key. */
64			static const char*
65			get_keyinfo (gpgme_key_t key)
66			{
67			static char buf[64+16];
68			struct winpt_key_s k;
69
70			memset (&k, 0, sizeof (k));
71			winpt_get_seckey (key->subkeys->keyid, &k);
72	twoaday	211	_snprintf (buf, DIM (buf)-1-16, _("%d-bit %s key, ID 0x%s"),
73	werner	36	key->subkeys->length,
74			get_key_pubalgo (key->subkeys->pubkey_algo),
75			key->subkeys->keyid+8);
76			if (k.ext->gloflags.divert_to_card)
77			strcat (buf, " (Card)");
78			return buf;
79			}
80
81
82			/* Fill the secret key combo-box with all entries from the cache.
83			@dlg is the handle to the combo-box. @keyid show which key to skip.
84			Return value: 0 on success. */
85			static int
86			do_fill_seckeylist (HWND dlg, const char *keyid)
87			{
88			gpg_keycache_t sec;
89	twoaday	167	gpgme_key_t pk, defkey;
90			const char *s;
91			char uid, p;
92			int i = 0, n = 0, curr_sel = 0;
93	werner	36
94			sec = keycache_get_ctx (0);
95			if (!sec)
96			BUG (0);
97	twoaday	167	gpg_keycache_get_default_key (sec, &defkey);
98	werner	36	gpg_keycache_rewind (sec);
99			while (!gpg_keycache_next_key (sec, 1, &pk)) {
100			if (!pk)
101			continue;
102			s = pk->subkeys->keyid;
103			if (!strcmp (s, keyid))
104			continue;
105			/* skip all ElGamal sign+encrypt keys */
106			if (pk->subkeys->pubkey_algo == GPGME_PK_ELG)
107			continue;
108			/* make sure the public key is okay not: revoked, expired or disabled. */
109			if (pk->expired \|\|pk->revoked \|\| pk->disabled)
110			continue;
111			s = pk->uids->name;
112			if (!s)
113			continue;
114	twoaday	167	if (defkey && !strcmp (defkey->subkeys->keyid, pk->subkeys->keyid))
115			curr_sel = i;
116	twoaday	187	uid = utf8_to_native (s);
117	werner	36	p = new char[strlen (uid) + 64];
118			if (!p)
119			BUG (NULL);
120			_snprintf (p, strlen (uid) + 63, "%s (%s)", uid, get_keyinfo (pk));
121	twoaday	167	SendDlgItemMessage (dlg, IDC_KEYSIGN_KEYLIST,
122			CB_ADDSTRING, i, (LPARAM)(char *)p);
123			SendDlgItemMessage (dlg, IDC_KEYSIGN_KEYLIST,
124			CB_SETITEMDATA, i++, (LPARAM)(DWORD)pk);
125	werner	36	free_if_alloc (p);
126			free (uid);
127			n++;
128			}
129	twoaday	167	SendDlgItemMessage (dlg, IDC_KEYSIGN_KEYLIST,
130			CB_SETCURSEL, (WPARAM)curr_sel, 0);
131	werner	36	if (!n)
132			return -1;
133			return 0;
134			}
135
136
137			/* Check if the selected key is protected and en- or disable the
138			passphrase control. */
139			static void
140			do_check_protection (HWND dlg)
141			{
142			gpgme_key_t key;
143			struct winpt_key_s k;
144	twoaday	212	int idx, protec;
145	werner	36
146	twoaday	212	idx = SendDlgItemMessage (dlg, IDC_KEYSIGN_KEYLIST, CB_GETCURSEL, 0, 0);
147			key = (gpgme_key_t)SendDlgItemMessage (dlg, IDC_KEYSIGN_KEYLIST,
148			CB_GETITEMDATA, (WPARAM)idx, 0);
149	werner	36	if (key) {
150			winpt_get_seckey (key->subkeys->keyid, &k);
151			protec = k.is_protected;
152			if (!protec)
153			protec = k.ext->gloflags.divert_to_card;
154			EnableWindow (GetDlgItem (dlg, IDC_KEYSIGN_PASSPHRASE), protec? TRUE : FALSE);
155			}
156			}
157
158
159			/* Dialog box procedure to choose the signature class. */
160			BOOL CALLBACK
161			sig_class_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
162			{
163	twoaday	170	int sig_class = 0;
164
165	werner	36	switch (msg) {
166			case WM_INITDIALOG:
167			SetWindowText (dlg, _("Choose Signature Class"));
168			SetDlgItemText (dlg, IDC_SIGCLASS_TITLEINF, _("How carefully have you verified the key you are about to sign actually belongs to the person? If you don't know what to anwser, use \"0\"."));
169			SetDlgItemText (dlg, IDC_SIGCLASS_CLASS0, _("(0) I will not answer (default)"));
170			SetDlgItemText (dlg, IDC_SIGCLASS_CLASS1, _("(1) I have not checked at all."));
171			SetDlgItemText (dlg, IDC_SIGCLASS_CLASS2, _("(2) I have done causal checking."));
172			SetDlgItemText (dlg, IDC_SIGCLASS_CLASS3, _("(3) I have done very careful checkings."));
173			CheckDlgButton (dlg, IDC_SIGCLASS_CLASS0, BST_CHECKED);
174			SetForegroundWindow (dlg);
175			center_window (dlg, NULL);
176			return TRUE;
177
178			case WM_COMMAND:
179	twoaday	170	switch (LOWORD (wparam)) {
180	werner	36	case IDOK:
181			if (IsDlgButtonChecked (dlg, IDC_SIGCLASS_CLASS0))
182	twoaday	170	sig_class = 0;
183	werner	36	else if (IsDlgButtonChecked (dlg, IDC_SIGCLASS_CLASS1))
184	twoaday	170	sig_class = 1;
185	werner	36	else if (IsDlgButtonChecked (dlg, IDC_SIGCLASS_CLASS2))
186	twoaday	170	sig_class = 2;
187	werner	36	else if (IsDlgButtonChecked (dlg, IDC_SIGCLASS_CLASS3))
188	twoaday	170	sig_class = 3;
189	werner	36	else
190	twoaday	170	sig_class = 0;
191			EndDialog (dlg, sig_class);
192	werner	36	return TRUE;
193	twoaday	170
194			case IDCANCEL:
195			EndDialog (dlg, 0);
196			return TRUE;
197	werner	36	}
198			break;
199			}
200
201			return FALSE;
202			}
203
204
205			/* Return the humand friendly expiration date of @key. */
206			static const char*
207			get_expire_date (gpgme_key_t key)
208			{
209			u32 u = key->subkeys->expires;
210			if (!u)
211			return _("never");
212			return get_key_expire_date (u);
213			}
214
215			/* Display photo of key @key in a separate window. */
216			static void
217			show_photo (winpt_key_t key)
218			{
219			/* XXX: fill it with life. */
220			}
221
222
223	twoaday	181	/* Check if the given system time @st points to today. */
224			static int
225			date_is_today (SYSTEMTIME *st)
226			{
227			time_t t;
228			struct tm *tm;
229
230			t = time (NULL);
231			tm = localtime (&t);
232			if (st->wDay == tm->tm_mday &&
233			st->wYear == tm->tm_year+1900 &&
234			st->wMonth == tm->tm_mon+1)
235			return -1;
236			return 0;
237			}
238
239
240	werner	36	/* Dialog box procedure to sign a key. */
241			BOOL CALLBACK
242			keysign_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
243			{
244			static winpt_key_t key;
245			GpgKeyEdit *ke;
246			gpgme_error_t err;
247			gpgme_key_t k;
248			SYSTEMTIME st;
249			HWND h;
250			char keymsg[2048], pwd[256];
251			const char keyid, s;
252			int type, expires=0, idx;
253	twoaday	170	int sig_class = 0;
254	werner	36
255	twoaday	177	switch (msg) {
256	werner	36	case WM_INITDIALOG:
257	twoaday	77	if (lparam == 0)
258	twoaday	177	dlg_fatal_error (dlg, "could not get dialog param.");
259	werner	36	SetWindowText (dlg, _("Key Signing"));
260			key = (winpt_key_t) lparam;
261			_snprintf (keymsg, sizeof keymsg -1,
262			_("pub %d/%s created: %s expires: %s\n\n"
263			"Primary key fingerprint: %s\n\n"
264			"\t%s\n\n"
265			"\nAre you really sure that you want to sign this key with YOUR key?\n"),
266			key->ctx->subkeys->length,
267			key->ctx->subkeys->keyid+8,
268			get_key_created (key->ctx->subkeys->timestamp),
269			get_expire_date (key->ctx),
270			get_printable_fpr (key->ctx->subkeys->fpr),
271	twoaday	205	key->ext->uids->uid);
272	werner	36	s = key->ctx->subkeys->keyid;
273			if (do_fill_seckeylist (dlg, s)) {
274			msg_box (dlg, _("No valid secret key found."), _("Key Signing"), MB_ERR);
275			EndDialog (dlg, FALSE);
276	twoaday	204	break;
277	werner	36	}
278	twoaday	176	do_check_protection (dlg);
279	twoaday	205	SetDlgItemText (dlg, IDC_KEYSIGN_INFOS, keymsg);
280	werner	36	SetDlgItemText (dlg, IDC_KEYSIGN_LOCAL, _("Sign local only (non exportable signature)"));
281			SetDlgItemText (dlg, IDC_KEYSIGN_EXPSIG, _("Signature expires on"));
282			SetDlgItemText (dlg, IDC_KEYSIGN_NREV, _("Sign non-revocably"));
283			SetDlgItemText (dlg, IDC_KEYSIGN_ASKLEVEL, _("&Ask for certification level"));
284			SetDlgItemText (dlg, IDC_KEYSIGN_PWDINF, _("Passphrase"));
285	twoaday	88	SetDlgItemText (dlg, IDCANCEL, _("&Cancel"));
286			SetDlgItemText (dlg, IDC_KEYSIGN_SHOWIMG, _("&Show photo"));
287	twoaday	178	SetDlgItemText (dlg, IDC_KEYSIGN_HIDE, _("&Hide Typing"));
288	werner	36	CheckDlgButton (dlg, IDC_KEYSIGN_LOCAL, BST_CHECKED);
289			CheckDlgButton (dlg, IDC_KEYSIGN_EXPSIG, BST_UNCHECKED);
290			CheckDlgButton (dlg, IDC_KEYSIGN_ASKLEVEL, BST_UNCHECKED);
291			EnableWindow (GetDlgItem (dlg, IDC_KEYSIGN_EXPIRES), FALSE);
292			if (reg_prefs.expert == 0)
293			ShowWindow (GetDlgItem (dlg, IDC_KEYSIGN_NREV), SW_HIDE);
294			if (key->ext && key->ext->attrib.len > 0)
295			EnableWindow (GetDlgItem (dlg, IDC_KEYSIGN_SHOWIMG), TRUE);
296	twoaday	41	if (!reg_prefs.gpg.ask_cert_level)
297			EnableWindow (GetDlgItem (dlg, IDC_KEYSIGN_ASKLEVEL), FALSE);
298	twoaday	181	if (!reg_prefs.gpg.ask_cert_expire)
299			EnableWindow (GetDlgItem (dlg, IDC_KEYSIGN_EXPSIG), FALSE);
300	twoaday	177	CheckDlgButton (dlg, IDC_KEYSIGN_HIDE, BST_CHECKED);
301	werner	36	SetForegroundWindow (dlg);
302			h = GetDlgItem (dlg, IDC_KEYSIGN_PASSPHRASE);
303			SetFocus (h);
304			return FALSE;
305
306			case WM_SYSCOMMAND:
307	twoaday	177	if (LOWORD (wparam) == SC_CLOSE) {
308			SetDlgItemText (dlg, IDC_KEYSIGN_PASSPHRASE, "");
309			EndDialog (dlg, TRUE);
310	werner	36	}
311			return FALSE;
312
313			case WM_COMMAND:
314	twoaday	176	if (HIWORD (wparam) == CBN_SELCHANGE) {
315	werner	36	do_check_protection (dlg);
316			break;
317			}
318	twoaday	177	if (HIWORD (wparam) == BN_CLICKED &&
319			LOWORD (wparam) == IDC_KEYSIGN_EXPSIG) {
320	werner	36	int enable = IsDlgButtonChecked (dlg, IDC_KEYSIGN_EXPSIG);
321			EnableWindow (GetDlgItem (dlg, IDC_KEYSIGN_EXPIRES), enable? TRUE : FALSE);
322			}
323	twoaday	177	if (HIWORD (wparam) == BN_CLICKED &&
324			LOWORD (wparam) == IDC_KEYSIGN_HIDE) {
325			HWND hwnd = GetDlgItem (dlg, IDC_KEYSIGN_PASSPHRASE);
326			int hide = IsDlgButtonChecked (dlg, IDC_KEYSIGN_HIDE);
327			SendMessage (hwnd, EM_SETPASSWORDCHAR, hide? '*' : 0, 0);
328			SetFocus (hwnd);
329			}
330	werner	36
331	twoaday	170	switch (LOWORD (wparam)) {
332	werner	36	case IDOK:
333			if (IsDlgButtonChecked (dlg, IDC_KEYSIGN_ASKLEVEL))
334	twoaday	170	sig_class = dialog_box_param (glob_hinst,
335			(LPCSTR)IDD_WINPT_SIGCLASS, dlg,
336			sig_class_dlg_proc, (LPARAM)NULL,
337			_("Choose Signature Class"),
338			IDS_WINPT_SIGCLASS);
339	werner	36	type = IsDlgButtonChecked (dlg, IDC_KEYSIGN_LOCAL);
340			if (type)
341			type = GPG_EDITKEY_LSIGN;
342			else
343			type = GPG_EDITKEY_SIGN;
344
345			if (reg_prefs.expert && IsDlgButtonChecked (dlg, IDC_KEYSIGN_NREV)) {
346			type = GPG_EDITKEY_NRSIGN;
347			if (type == GPG_EDITKEY_LSIGN)
348			type = GPG_EDITKEY_NRLSIGN;
349			}
350			if (IsDlgButtonChecked (dlg, IDC_KEYSIGN_EXPSIG)) {
351			DateTime_GetSystemtime (GetDlgItem (dlg, IDC_KEYSIGN_EXPIRES), &st);
352	twoaday	181	if (date_is_today (&st)) {
353			msg_box (dlg, _("You cannot select today as the expiration date."),
354			_("Key Signing"), MB_INFO);
355			return TRUE;
356			}
357			else
358			expires = 1;
359	werner	36	sprintf (keymsg, "%04d-%02d-%02d", st.wYear, st.wMonth, st.wDay);
360			}
361
362			/* XXX: check for --ask-cert-level and --ask-cert-expire in the gpg.conf
363			if an advanced button is checked and offer to add it to the config
364			file. */
365
366			GetDlgItemText( dlg, IDC_KEYSIGN_PASSPHRASE, pwd, DIM (pwd)-1);
367			keyid = key->ctx->subkeys->keyid;
368			if( !keyid ) {
369			msg_box( dlg, _("Could not get Key ID from key."), _("Key Signing"), MB_ERR );
370			return TRUE;
371			}
372			ke = new GpgKeyEdit (keyid);
373			if (!ke)
374			BUG (NULL);
375			ke->setPassphrase (pwd);
376			idx = SendDlgItemMessage (dlg, IDC_KEYSIGN_KEYLIST, CB_GETCURSEL, 0, 0);
377			k = (gpgme_key_t)SendDlgItemMessage (dlg, IDC_KEYSIGN_KEYLIST,
378			CB_GETITEMDATA, (WPARAM)idx, 0);
379			if (k)
380			ke->setLocalUser (k);
381
382	twoaday	170	err = ke->signKey (type, sig_class, expires? keymsg : "0");
383	twoaday	129	wipememory (pwd, sizeof (pwd));
384	werner	36	if (err) {
385			delete ke;
386			msg_box (dlg, gpgme_strerror (err), _("Key Signing"), MB_ERR);
387			return TRUE;
388			}
389			if (ke->getResult () != 0)
390	twoaday	129	msg_box (dlg, _("This key is already signed by your key"),
391			_("Key Signing"), MB_INFO);
392	werner	36	else {
393	twoaday	170	status_box (dlg, _("Key successfully signed."), _("Key Signing"));
394	werner	36	key->update = 1;
395			}
396			delete ke;
397			EndDialog (dlg, TRUE);
398			return TRUE;
399
400			case IDCANCEL:
401			EndDialog (dlg, FALSE);
402			return TRUE;
403
404			case IDC_KEYSIGN_SHOWIMG:
405			show_photo (key);
406			return TRUE;
407			}
408			break;
409			}
410
411			return FALSE;
412			}
413