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 %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)
{
    int idx, protec;
    gpgme_key_t key;
    struct winpt_key_s k;

    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];
    char *uid = NULL;
    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;
        s = key->ctx->uids->uid;
        uid = utf8_to_native (s);
        _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),
                   uid);
        safe_free (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);
        }
        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			_snprintf (buf, DIM (buf)-1-16, "%d-bit %s key, ID %s",
73			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			int idx, protec;
143			gpgme_key_t key;
144			struct winpt_key_s k;
145
146			idx = SendDlgItemMessage( dlg, IDC_KEYSIGN_KEYLIST, CB_GETCURSEL, 0, 0 );
147			key = (gpgme_key_t)SendDlgItemMessage( dlg, IDC_KEYSIGN_KEYLIST, CB_GETITEMDATA, (WPARAM)idx, 0 );
148			if (key) {
149			winpt_get_seckey (key->subkeys->keyid, &k);
150			protec = k.is_protected;
151			if (!protec)
152			protec = k.ext->gloflags.divert_to_card;
153			EnableWindow (GetDlgItem (dlg, IDC_KEYSIGN_PASSPHRASE), protec? TRUE : FALSE);
154			}
155			}
156
157
158			/* Dialog box procedure to choose the signature class. */
159			BOOL CALLBACK
160			sig_class_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
161			{
162	twoaday	170	int sig_class = 0;
163
164	werner	36	switch (msg) {
165			case WM_INITDIALOG:
166			SetWindowText (dlg, _("Choose Signature Class"));
167			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\"."));
168			SetDlgItemText (dlg, IDC_SIGCLASS_CLASS0, _("(0) I will not answer (default)"));
169			SetDlgItemText (dlg, IDC_SIGCLASS_CLASS1, _("(1) I have not checked at all."));
170			SetDlgItemText (dlg, IDC_SIGCLASS_CLASS2, _("(2) I have done causal checking."));
171			SetDlgItemText (dlg, IDC_SIGCLASS_CLASS3, _("(3) I have done very careful checkings."));
172			CheckDlgButton (dlg, IDC_SIGCLASS_CLASS0, BST_CHECKED);
173			SetForegroundWindow (dlg);
174			center_window (dlg, NULL);
175			return TRUE;
176
177			case WM_COMMAND:
178	twoaday	170	switch (LOWORD (wparam)) {
179	werner	36	case IDOK:
180			if (IsDlgButtonChecked (dlg, IDC_SIGCLASS_CLASS0))
181	twoaday	170	sig_class = 0;
182	werner	36	else if (IsDlgButtonChecked (dlg, IDC_SIGCLASS_CLASS1))
183	twoaday	170	sig_class = 1;
184	werner	36	else if (IsDlgButtonChecked (dlg, IDC_SIGCLASS_CLASS2))
185	twoaday	170	sig_class = 2;
186	werner	36	else if (IsDlgButtonChecked (dlg, IDC_SIGCLASS_CLASS3))
187	twoaday	170	sig_class = 3;
188	werner	36	else
189	twoaday	170	sig_class = 0;
190			EndDialog (dlg, sig_class);
191	werner	36	return TRUE;
192	twoaday	170
193			case IDCANCEL:
194			EndDialog (dlg, 0);
195			return TRUE;
196	werner	36	}
197			break;
198			}
199
200			return FALSE;
201			}
202
203
204			/* Return the humand friendly expiration date of @key. */
205			static const char*
206			get_expire_date (gpgme_key_t key)
207			{
208			u32 u = key->subkeys->expires;
209			if (!u)
210			return _("never");
211			return get_key_expire_date (u);
212			}
213
214			/* Display photo of key @key in a separate window. */
215			static void
216			show_photo (winpt_key_t key)
217			{
218			/* XXX: fill it with life. */
219			}
220
221
222	twoaday	181	/* Check if the given system time @st points to today. */
223			static int
224			date_is_today (SYSTEMTIME *st)
225			{
226			time_t t;
227			struct tm *tm;
228
229			t = time (NULL);
230			tm = localtime (&t);
231			if (st->wDay == tm->tm_mday &&
232			st->wYear == tm->tm_year+1900 &&
233			st->wMonth == tm->tm_mon+1)
234			return -1;
235			return 0;
236			}
237
238
239	werner	36	/* Dialog box procedure to sign a key. */
240			BOOL CALLBACK
241			keysign_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
242			{
243			static winpt_key_t key;
244			GpgKeyEdit *ke;
245			gpgme_error_t err;
246			gpgme_key_t k;
247			SYSTEMTIME st;
248			HWND h;
249			char keymsg[2048], pwd[256];
250			char *uid = NULL;
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			s = key->ctx->uids->uid;
262	twoaday	187	uid = utf8_to_native (s);
263	werner	36	_snprintf (keymsg, sizeof keymsg -1,
264			_("pub %d/%s created: %s expires: %s\n\n"
265			"Primary key fingerprint: %s\n\n"
266			"\t%s\n\n"
267			"\nAre you really sure that you want to sign this key with YOUR key?\n"),
268			key->ctx->subkeys->length,
269			key->ctx->subkeys->keyid+8,
270			get_key_created (key->ctx->subkeys->timestamp),
271			get_expire_date (key->ctx),
272			get_printable_fpr (key->ctx->subkeys->fpr),
273			uid);
274	twoaday	176	safe_free (uid);
275	werner	36	s = key->ctx->subkeys->keyid;
276			if (do_fill_seckeylist (dlg, s)) {
277			msg_box (dlg, _("No valid secret key found."), _("Key Signing"), MB_ERR);
278			EndDialog (dlg, FALSE);
279			}
280	twoaday	176	do_check_protection (dlg);
281	werner	36	SetDlgItemText (dlg, IDC_KEYSIGN_INFOS, keymsg);
282			SetDlgItemText (dlg, IDC_KEYSIGN_LOCAL, _("Sign local only (non exportable signature)"));
283			SetDlgItemText (dlg, IDC_KEYSIGN_EXPSIG, _("Signature expires on"));
284			SetDlgItemText (dlg, IDC_KEYSIGN_NREV, _("Sign non-revocably"));
285			SetDlgItemText (dlg, IDC_KEYSIGN_ASKLEVEL, _("&Ask for certification level"));
286			SetDlgItemText (dlg, IDC_KEYSIGN_PWDINF, _("Passphrase"));
287	twoaday	88	SetDlgItemText (dlg, IDCANCEL, _("&Cancel"));
288			SetDlgItemText (dlg, IDC_KEYSIGN_SHOWIMG, _("&Show photo"));
289	twoaday	178	SetDlgItemText (dlg, IDC_KEYSIGN_HIDE, _("&Hide Typing"));
290	werner	36	CheckDlgButton (dlg, IDC_KEYSIGN_LOCAL, BST_CHECKED);
291			CheckDlgButton (dlg, IDC_KEYSIGN_EXPSIG, BST_UNCHECKED);
292			CheckDlgButton (dlg, IDC_KEYSIGN_ASKLEVEL, BST_UNCHECKED);
293			EnableWindow (GetDlgItem (dlg, IDC_KEYSIGN_EXPIRES), FALSE);
294			if (reg_prefs.expert == 0)
295			ShowWindow (GetDlgItem (dlg, IDC_KEYSIGN_NREV), SW_HIDE);
296			if (key->ext && key->ext->attrib.len > 0)
297			EnableWindow (GetDlgItem (dlg, IDC_KEYSIGN_SHOWIMG), TRUE);
298	twoaday	41	if (!reg_prefs.gpg.ask_cert_level)
299			EnableWindow (GetDlgItem (dlg, IDC_KEYSIGN_ASKLEVEL), FALSE);
300	twoaday	181	if (!reg_prefs.gpg.ask_cert_expire)
301			EnableWindow (GetDlgItem (dlg, IDC_KEYSIGN_EXPSIG), FALSE);
302	twoaday	177	CheckDlgButton (dlg, IDC_KEYSIGN_HIDE, BST_CHECKED);
303	werner	36	SetForegroundWindow (dlg);
304			h = GetDlgItem (dlg, IDC_KEYSIGN_PASSPHRASE);
305			SetFocus (h);
306			return FALSE;
307
308			case WM_SYSCOMMAND:
309	twoaday	177	if (LOWORD (wparam) == SC_CLOSE) {
310			SetDlgItemText (dlg, IDC_KEYSIGN_PASSPHRASE, "");
311			EndDialog (dlg, TRUE);
312	werner	36	}
313			return FALSE;
314
315			case WM_COMMAND:
316	twoaday	176	if (HIWORD (wparam) == CBN_SELCHANGE) {
317	werner	36	do_check_protection (dlg);
318			break;
319			}
320	twoaday	177	if (HIWORD (wparam) == BN_CLICKED &&
321			LOWORD (wparam) == IDC_KEYSIGN_EXPSIG) {
322	werner	36	int enable = IsDlgButtonChecked (dlg, IDC_KEYSIGN_EXPSIG);
323			EnableWindow (GetDlgItem (dlg, IDC_KEYSIGN_EXPIRES), enable? TRUE : FALSE);
324			}
325	twoaday	177	if (HIWORD (wparam) == BN_CLICKED &&
326			LOWORD (wparam) == IDC_KEYSIGN_HIDE) {
327			HWND hwnd = GetDlgItem (dlg, IDC_KEYSIGN_PASSPHRASE);
328			int hide = IsDlgButtonChecked (dlg, IDC_KEYSIGN_HIDE);
329			SendMessage (hwnd, EM_SETPASSWORDCHAR, hide? '*' : 0, 0);
330			SetFocus (hwnd);
331			}
332	werner	36
333	twoaday	170	switch (LOWORD (wparam)) {
334	werner	36	case IDOK:
335			if (IsDlgButtonChecked (dlg, IDC_KEYSIGN_ASKLEVEL))
336	twoaday	170	sig_class = dialog_box_param (glob_hinst,
337			(LPCSTR)IDD_WINPT_SIGCLASS, dlg,
338			sig_class_dlg_proc, (LPARAM)NULL,
339			_("Choose Signature Class"),
340			IDS_WINPT_SIGCLASS);
341	werner	36	type = IsDlgButtonChecked (dlg, IDC_KEYSIGN_LOCAL);
342			if (type)
343			type = GPG_EDITKEY_LSIGN;
344			else
345			type = GPG_EDITKEY_SIGN;
346
347			if (reg_prefs.expert && IsDlgButtonChecked (dlg, IDC_KEYSIGN_NREV)) {
348			type = GPG_EDITKEY_NRSIGN;
349			if (type == GPG_EDITKEY_LSIGN)
350			type = GPG_EDITKEY_NRLSIGN;
351			}
352			if (IsDlgButtonChecked (dlg, IDC_KEYSIGN_EXPSIG)) {
353			DateTime_GetSystemtime (GetDlgItem (dlg, IDC_KEYSIGN_EXPIRES), &st);
354	twoaday	181	if (date_is_today (&st)) {
355			msg_box (dlg, _("You cannot select today as the expiration date."),
356			_("Key Signing"), MB_INFO);
357			return TRUE;
358			}
359			else
360			expires = 1;
361	werner	36	sprintf (keymsg, "%04d-%02d-%02d", st.wYear, st.wMonth, st.wDay);
362			}
363
364			/* XXX: check for --ask-cert-level and --ask-cert-expire in the gpg.conf
365			if an advanced button is checked and offer to add it to the config
366			file. */
367
368			GetDlgItemText( dlg, IDC_KEYSIGN_PASSPHRASE, pwd, DIM (pwd)-1);
369			keyid = key->ctx->subkeys->keyid;
370			if( !keyid ) {
371			msg_box( dlg, _("Could not get Key ID from key."), _("Key Signing"), MB_ERR );
372			return TRUE;
373			}
374			ke = new GpgKeyEdit (keyid);
375			if (!ke)
376			BUG (NULL);
377			ke->setPassphrase (pwd);
378			idx = SendDlgItemMessage (dlg, IDC_KEYSIGN_KEYLIST, CB_GETCURSEL, 0, 0);
379			k = (gpgme_key_t)SendDlgItemMessage (dlg, IDC_KEYSIGN_KEYLIST,
380			CB_GETITEMDATA, (WPARAM)idx, 0);
381			if (k)
382			ke->setLocalUser (k);
383
384	twoaday	170	err = ke->signKey (type, sig_class, expires? keymsg : "0");
385	twoaday	129	wipememory (pwd, sizeof (pwd));
386	werner	36	if (err) {
387			delete ke;
388			msg_box (dlg, gpgme_strerror (err), _("Key Signing"), MB_ERR);
389			return TRUE;
390			}
391			if (ke->getResult () != 0)
392	twoaday	129	msg_box (dlg, _("This key is already signed by your key"),
393			_("Key Signing"), MB_INFO);
394	werner	36	else {
395	twoaday	170	status_box (dlg, _("Key successfully signed."), _("Key Signing"));
396	werner	36	key->update = 1;
397			}
398			delete ke;
399			EndDialog (dlg, TRUE);
400			return TRUE;
401
402			case IDCANCEL:
403			EndDialog (dlg, FALSE);
404			return TRUE;
405
406			case IDC_KEYSIGN_SHOWIMG:
407			show_photo (key);
408			return TRUE;
409			}
410			break;
411			}
412
413			return FALSE;
414			}
415