trunk/Src/wptKeysigDlg.cpp

/* wptKeysigDlg.cpp - Key signature listing
 *      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 "wptCommonCtl.h"
#include "wptContext.h" /* for passphrase_s */
#include "wptDlgs.h"
#include "wptW32API.h"
#include "wptNLS.h"
#include "wptKeylist.h"
#include "wptKeyserver.h"
#include "wptUTF8.h"
#include "wptTypes.h"
#include "wptVersion.h"
#include "wptErrors.h"
#include "wptKeyEdit.h"

static subclass_s siglist_proc;


static int
is_sig (listview_ctrl_t lv, int pos)
{
    char tmpbuf[200];

    if (pos == -1)
        pos = listview_get_curr_pos (lv);
    if (pos == -1)
        return 0;
    listview_get_item_text (lv, pos, SL_COL_UID, tmpbuf, sizeof (tmpbuf)-1);
    if (*tmpbuf == ' ')
        return -1;
    return 0;
}


/* Delete the selected signature from list view @lv. The
   key is given in @key. */
static int
do_delsig (HWND dlg, listview_ctrl_t lv, winpt_key_t key)
{
    gpgme_error_t err;
    GpgKeyEdit *ke;
    char keyid[32];
    int pos, npos, id, is_selfsig=0;
    int signo=0, uidno=0;

    npos = pos = listview_get_curr_pos (lv);
    if (!is_sig (lv, -1))
        return -1;
    listview_get_item_text (lv, pos, SL_COL_KEYID, keyid, sizeof (keyid)-1);
    if (!strncmp (key->keyid, keyid+2, 8))
        is_selfsig = 1;
    
    while (pos > 0 && is_sig (lv, pos)) {
        signo++;
        pos--;
    }
    pos = npos;
    while (npos > 0) {
        if (!is_sig (lv, npos))
            uidno++;
        npos--;
    }
    uidno++;

    /* XXX: do not allow to delete the self signature */
    id = log_box (_("Key Manager"), is_selfsig? MB_WARN_ASK : MB_QUEST_ASK,
                  _("Are you really sure you want to delete this %s from\n\n"
                  "  \"%s\""), is_selfsig? _("self signature") : _("signature"),
                  key->uid);
    if (id == IDNO)
        return 0;

    ke = new GpgKeyEdit (key->keyid);
    if (!ke)
        BUG (NULL);    
    err = ke->delUseridSignature (uidno, signo);
    if (err)
        msg_box (dlg, gpgme_strerror (err), _("Key Manager"), MB_ERR);
    else
        listview_del_item (lv, pos);
    delete ke;
    if (!err)
        key->update = 1;
    return err? -1 : 0;
}


/* Dialog box procedure to display the signature properties. */
BOOL CALLBACK
sigprops_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
{
    static gpgme_key_sig_t ks;
    gpgme_key_t issuer;
    char tmpbuf[256];
    struct {
        unsigned int exportable:1;
        unsigned int expired:1;
        unsigned int nrev:1;
        unsigned int rev:1;
        const char *alg;
        int _class;
    } ctx;
    const char *fmt_templ = _("%s %s signature");
    const char *s;

    switch (msg) {
    case WM_SYSCOMMAND:
        if (LOWORD (wparam) == SC_CLOSE)
            EndDialog (dlg, TRUE);
        return FALSE;

    case WM_INITDIALOG:
        SetWindowText (dlg, _("Signature Properties"));
        SetDlgItemText (dlg, IDC_SIGPROPS_EXP, _("Exportable"));
        SetDlgItemText (dlg, IDC_SIGPROPS_NREV, _("Non-revocably"));
        SetDlgItemText (dlg, IDC_SIGPROPS_EXPIRED, _("Expired"));
        SetDlgItemText (dlg, IDC_SIGPROPS_REV, _("Revoked"));
        SetDlgItemText (dlg, IDC_SIGPROPS_CLASSINF, _("Class"));
        SetDlgItemText (dlg, IDC_SIGPROPS_EXPSTR, _("Expire date"));
        SetDlgItemText (dlg, IDC_SIGPROPS_KEYINF, _("Issuer key"));
        SetDlgItemText (dlg, IDC_SIGPROPS_KEYIDINF, _("Issuer key ID"));
        ks = (gpgme_key_sig_t)lparam;
        if (!ks)
            BUG (0);
        memset (&ctx, 0, sizeof ctx);
        ctx._class = ks->sig_class;
        if (ctx._class == 0)
            ctx._class = 16;    
        ctx._class -= 6;
        if (ks->pubkey_algo == GPGME_PK_DSA)
            ctx.alg = "DSA";
        else if (ks->pubkey_algo == GPGME_PK_RSA)
            ctx.alg = "RSA";
        else
            ctx.alg = "ELG";
        ctx.exportable = ks->exportable;
        _snprintf (tmpbuf, DIM (tmpbuf)-1, fmt_templ,
                   ctx.exportable? _("Exportable") : _("Non-exportable"), ctx.alg);
        SetDlgItemText (dlg, IDC_SIGPROPS_INFO, tmpbuf);
        
        SetDlgItemText (dlg, IDC_SIGPROPS_KEYID, ks->keyid+8);
        SetDlgItemInt (dlg, IDC_SIGPROPS_CLASS, ctx._class, FALSE);
        if (ctx.exportable)
            CheckDlgButton (dlg, IDC_SIGPROPS_EXP, BST_CHECKED);
        if (!get_pubkey (ks->keyid+8, &issuer))
            s = issuer->uids->uid;
        else
            s = _("  user ID not found");
        SetDlgItemText_utf8 (dlg, IDC_SIGPROPS_ISSUER, s);
        if (ks->expires == 0) {
            ShowWindow (GetDlgItem (dlg, IDC_SIGPROPS_EXPSTR), SW_HIDE);
            ShowWindow (GetDlgItem (dlg, IDC_SIGPROPS_EXPDATE), SW_HIDE);
        }
        else {
            SYSTEMTIME st;
            struct tm *tm;
            time_t t = time (NULL);
            time_t tmp = ks->expires;

            tm = localtime (&tmp);
            memset (&st, 0, sizeof st);
            st.wYear = tm->tm_year+1900;
            st.wMonth = tm->tm_mon;
            st.wDay = tm->tm_mday;
            DateTime_SetSystemtime (GetDlgItem (dlg, IDC_SIGPROPS_EXPDATE),
                                    GDT_VALID, &st);

            tm = localtime (&t);
            tm->tm_mon++;
            tm->tm_year += 1900;
            if (tm->tm_year > st.wYear)
                ctx.expired = 1;
            else if (tm->tm_mon > st.wMonth)
                ctx.expired = 1;
            if (ctx.expired)
                CheckDlgButton (dlg, IDC_SIGPROPS_EXPIRED, BST_CHECKED);
        }
        SetDlgItemText (dlg, IDC_SIGPROPS_EXP, _("Exportable"));
        SetDlgItemText (dlg, IDC_SIGPROPS_NREV, _("Non-revocably"));
        SetDlgItemText (dlg, IDC_SIGPROPS_REV, _("Revoked"));
        SetDlgItemText (dlg, IDC_SIGPROPS_EXPIRED, _("Expired"));
        SetWindowText (dlg, _("Signature Properties"));
        SetForegroundWindow (dlg);
        center_window (dlg, NULL);
        return TRUE;

    case WM_COMMAND:
        switch (LOWORD (wparam)) {
        case IDOK:
            EndDialog (dlg, TRUE);
            break;

        case IDCANCEL:
            EndDialog (dlg, FALSE);
            break;
        }
    }

    return FALSE;
}


static BOOL CALLBACK
subclass_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
{
    listview_ctrl_t lv;
    winpt_key_t key;
    gpgme_key_sig_t ks;

    switch (msg) {
    case WM_KEYUP:
        int virt_key = (int)wparam;
        key = (winpt_key_t)siglist_proc.opaque;
        lv = key->callback.ctl;
        if (virt_key == VK_SPACE) {
            if (is_sig (lv, -1)) {
                ks = (gpgme_key_sig_t)listview_get_item2 (lv, listview_get_curr_pos (lv));
                DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_SIGPROPS, dlg,
                                sigprops_dlg_proc, (LPARAM)ks);
            }
        }
        else if (virt_key == VK_DELETE)
            do_delsig (dlg, lv, key);
        break;
    }
    return CallWindowProc (siglist_proc.old, dlg, msg, wparam, lparam);
}


/* Return 1 if the list view @lv contains non-available keys. */
static int
check_for_missing_keys (listview_ctrl_t lv)
{
    int i, n;
    char id[128];
    
    n = listview_count_items( lv, 0 );
    for( i = 0; i < n; i++ ) {
        listview_get_item_text (lv, i, SL_COL_VALID, id, sizeof (id) - 1);
        if (!strncmp (id, "NOKEY", 5))
            return 1;
    }
    
    return 0;
}


/* Receive all missing keys marked in the list @lv. */
static int
recv_missing_keys (HWND dlg, listview_ctrl_t lv)
{
    char id[128], keyid[18+1];
    int i, n, cnt=0;

    i = msg_box (dlg, _("Really receive all missing keys?"),
                 _("Key Manager"), MB_YESNO|MB_INFO);
    if (i == IDNO)
        return 0;
    
    n = listview_count_items (lv, 0);
    for (i = 0; i < n; i++) {
        listview_get_item_text (lv, i, SL_COL_VALID, id, sizeof (id) - 1);
        if (!strncmp (id, "NOKEY", 5)) {
            listview_get_item_text (lv, i, SL_COL_KEYID, 
                                    keyid, sizeof (keyid) -1);
            if (!hkp_recv_key (dlg, default_keyserver,
                               default_keyserver_port, keyid, 0, 0)) {
                keycache_update (0, keyid);
                cnt++;
            }
            else
                break;
        }
    }
    return cnt;
}


/* Create a mini popup with available choices. */
static void
do_create_popup (HWND dlg)
{
    HMENU hm, sm;
    POINT p;

    GetCursorPos (&p);
    hm = LoadMenu (glob_hinst, MAKEINTRESOURCE (IDR_WINPT_KEYSIG_CTX));
    sm = GetSubMenu (hm, 0);
    set_menu_text (sm, ID_SIGCTX_PROPS, _("Signature &Properties"));
    set_menu_text (sm, ID_SIGCTX_KEYPROPS, _("Signing &Key Properties"));
    TrackPopupMenu (sm, TPM_RIGHTALIGN, p.x, p.y, 0, dlg, NULL);
    DestroyMenu (hm);
    DestroyMenu (sm);
}


/* Fetch a single key and extract the keyid from the listview
   entry at the pos @idx. */
static int
recv_single_key (HWND dlg, listview_ctrl_t lv, int idx)
{
    char keyid[32];
    int rc;

    listview_get_item_text (lv, idx, SL_COL_KEYID, keyid, DIM (keyid)-1);       
    rc = hkp_recv_key (dlg, default_keyserver, 
                       default_keyserver_port, keyid, 0, 0);
                
    if (!rc)
        keycache_update (0, keyid);
    return rc;
}


/* Load the key property dialog with the selected key from @lv. */
static void
do_load_keyprops (HWND dlg, listview_ctrl_t lv)
{
    winpt_key_s k;
    gpgme_key_t key;
    char keyid[32] = {0};
    char status[64] = {0}, creation[64] = {0};
    int n = listview_get_curr_pos (lv);

    listview_get_item_text (lv, n, SL_COL_VALID, status, DIM (status)-1);
    listview_get_item_text (lv, n, SL_COL_CREATE, creation, DIM (creation)-1);
    listview_get_item_text (lv, n, SL_COL_KEYID, keyid, DIM (keyid)-1);
    if (!strcmp (status, "NOKEY")) {
        int id = msg_box (dlg, _("Key not found in keyring, do you want to fetch it from the keyserver?"),
                          _("Key Manager"), MB_QUEST_ASK);
        if (id == IDNO)
            return;
        if (recv_single_key (dlg, lv, n))               
            return;
    }
    
    if ((strlen (keyid) < 3 ||get_pubkey (keyid, &key))) {
        if (strlen (creation) > 0)
            msg_box (dlg, _("Key not found in keyring."), _("Key Manager"), MB_INFO);
        return;
    }
    memset (&k, 0, sizeof k);
    k.keyid = keyid;
    DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_KEYPROPS, dlg,
                    keyprops_dlg_proc, (LPARAM)&k);
}


/* Dialog box procedure to list signatures. */
BOOL CALLBACK
keysig_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
{
    static listview_ctrl_t lv = NULL;
    static struct winpt_key_s *k;
    gpgme_key_sig_t ks;
    HWND sl;
    char inf[384];
    int idx = 0;    
    
    switch (msg) {
    case WM_INITDIALOG:
        k = (winpt_key_t) lparam;
        if (!k)
            BUG (0);
        if (k->uid)
            _snprintf (inf, DIM (inf)-1, _("Signature List for \"%s\""), k->uid);
        SetWindowText_utf8 (dlg, inf);
        SetDlgItemText (dlg, IDC_KEYSIG_RECVKEY, _("&Receive Key"));
        SetDlgItemText (dlg, IDC_KEYSIG_SIGPROPS, _("&Properties"));

        lv = siglist_load (GetDlgItem (dlg, IDC_KEYSIG_LIST), k->keyid);
        if (!check_for_missing_keys (lv))
            EnableWindow (GetDlgItem (dlg, IDC_KEYSIG_RECVKEY), FALSE);
        EnableWindow (GetDlgItem (dlg, IDC_KEYSIG_SIGPROPS), FALSE);
        k->callback.ctl = lv;
        sl = GetDlgItem (dlg, IDC_KEYSIG_LIST);
        siglist_proc.dlg = dlg;
        siglist_proc.opaque = k;
        siglist_proc.current = (WNDPROC)subclass_dlg_proc;
        siglist_proc.old = (WNDPROC)GetWindowLong (sl, GWL_WNDPROC);
        if (siglist_proc.old) {
            if (!SetWindowLong (sl, GWL_WNDPROC, (LONG)siglist_proc.current))  {
                msg_box (dlg, "Could not set keylist window procedure.",
                         _("Key Manager"), MB_ERR);
                BUG (0);
            }
        }
        SetForegroundWindow (dlg);
        center_window (dlg, NULL);
        return TRUE;
        
    case WM_DESTROY:
        if (lv) {
            siglist_delete (lv);
            lv = NULL;
        }
        return FALSE;
        
    case WM_SYSCOMMAND:
        if (LOWORD (wparam) == SC_CLOSE)
            EndDialog (dlg, TRUE);
        return FALSE;

    case WM_NOTIFY:
        NMHDR *notify;
        
        notify = (NMHDR *)lparam;
        if (!notify)
            return FALSE;
        if (notify->code == NM_DBLCLK 
            && notify->idFrom == IDC_KEYSIG_LIST)
            do_load_keyprops (dlg, lv);
        if (notify->code == NM_RCLICK &&
            notify->idFrom == IDC_KEYSIG_LIST &&
            is_sig (lv, -1))
            do_create_popup (dlg);
        if (notify->code == LVN_ITEMCHANGED &&
            ((LPNMLISTVIEW)lparam)->uNewState) {
            idx = listview_get_curr_pos (lv);
            listview_get_item_text (lv, idx, SL_COL_VALID, inf, DIM (inf)-1);
            EnableWindow (GetDlgItem (dlg, IDC_KEYSIG_RECVKEY),
                          strcmp (inf, "NOKEY") == 0? TRUE: FALSE);
            EnableWindow (GetDlgItem (dlg, IDC_KEYSIG_SIGPROPS),
                          is_sig (lv, -1)? TRUE : FALSE);
        }
        if (notify->code == LVN_COLUMNCLICK) {
            NMLISTVIEW *nft = (LPNMLISTVIEW) lparam;
            int sortby = 0;
            switch (nft->iSubItem) {
            //case 0:  sortby = KEY_SORT_USERID; break;
            case 1: sortby = KEY_SORT_VALIDITY; break;
            case 2: sortby = SIG_SORT_CLASS; break;
            case 3: sortby = KEY_SORT_CREATED; break;
            case 4: sortby = KEY_SORT_KEYID; break;
            case 5: sortby = SIG_SORT_EXPIRE; break;
            case 6: sortby = KEY_SORT_ALGO; break;
            default: return TRUE;
            }
            siglist_sort (lv, sortby);
        }
        break;
        
    case WM_COMMAND:
        switch (LOWORD (wparam)) {
        case ID_SIGCTX_KEYPROPS:
            do_load_keyprops (dlg, lv);
            break;

        case ID_SIGCTX_PROPS:
            if (is_sig (lv, -1)) {
                ks = (gpgme_key_sig_t)listview_get_item2 (lv, listview_get_curr_pos (lv));
                DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_SIGPROPS, dlg,
                                sigprops_dlg_proc, (LPARAM)ks);
            }
            break;

        case IDC_KEYSIG_RECVKEY:
            idx = listview_get_curr_pos (lv);
            if (idx == -1)
                recv_missing_keys (dlg, lv);
            else
                recv_single_key (dlg, lv, idx);
            return TRUE;

        case IDC_KEYSIG_SIGPROPS:
            if (is_sig (lv, -1)) {
                ks = ks = (gpgme_key_sig_t)listview_get_item2 (lv, listview_get_curr_pos (lv));
                DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_SIGPROPS, dlg,
                                sigprops_dlg_proc, (LPARAM)ks);
            }
            return TRUE;
            
        case IDOK:
            EndDialog (dlg, TRUE);
            return TRUE;
        }
        break;
    }
    return FALSE;
}
1	/* wptKeysigDlg.cpp - Key signature listing
2	* Copyright (C) 2001-2006 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	#ifdef HAVE_CONFIG_H
21	#include <config.h>
22	#endif
23
24	#include <windows.h>
25	#include <commctrl.h>
26	#include <time.h>
27
28	#include "resource.h"
29	#include "wptGPG.h"
30	#include "wptCommonCtl.h"
31	#include "wptContext.h" /* for passphrase_s */
32	#include "wptDlgs.h"
33	#include "wptW32API.h"
34	#include "wptNLS.h"
35	#include "wptKeylist.h"
36	#include "wptKeyserver.h"
37	#include "wptUTF8.h"
38	#include "wptTypes.h"
39	#include "wptVersion.h"
40	#include "wptErrors.h"
41	#include "wptKeyEdit.h"
42
43	static subclass_s siglist_proc;
44
45
46	static int
47	is_sig (listview_ctrl_t lv, int pos)
48	{
49	char tmpbuf[200];
50
51	if (pos == -1)
52	pos = listview_get_curr_pos (lv);
53	if (pos == -1)
54	return 0;
55	listview_get_item_text (lv, pos, SL_COL_UID, tmpbuf, sizeof (tmpbuf)-1);
56	if (*tmpbuf == ' ')
57	return -1;
58	return 0;
59	}
60
61
62	/* Delete the selected signature from list view @lv. The
63	key is given in @key. */
64	static int
65	do_delsig (HWND dlg, listview_ctrl_t lv, winpt_key_t key)
66	{
67	gpgme_error_t err;
68	GpgKeyEdit *ke;
69	char keyid[32];
70	int pos, npos, id, is_selfsig=0;
71	int signo=0, uidno=0;
72
73	npos = pos = listview_get_curr_pos (lv);
74	if (!is_sig (lv, -1))
75	return -1;
76	listview_get_item_text (lv, pos, SL_COL_KEYID, keyid, sizeof (keyid)-1);
77	if (!strncmp (key->keyid, keyid+2, 8))
78	is_selfsig = 1;
79
80	while (pos > 0 && is_sig (lv, pos)) {
81	signo++;
82	pos--;
83	}
84	pos = npos;
85	while (npos > 0) {
86	if (!is_sig (lv, npos))
87	uidno++;
88	npos--;
89	}
90	uidno++;
91
92	/* XXX: do not allow to delete the self signature */
93	id = log_box (_("Key Manager"), is_selfsig? MB_WARN_ASK : MB_QUEST_ASK,
94	_("Are you really sure you want to delete this %s from\n\n"
95	" \"%s\""), is_selfsig? _("self signature") : _("signature"),
96	key->uid);
97	if (id == IDNO)
98	return 0;
99
100	ke = new GpgKeyEdit (key->keyid);
101	if (!ke)
102	BUG (NULL);
103	err = ke->delUseridSignature (uidno, signo);
104	if (err)
105	msg_box (dlg, gpgme_strerror (err), _("Key Manager"), MB_ERR);
106	else
107	listview_del_item (lv, pos);
108	delete ke;
109	if (!err)
110	key->update = 1;
111	return err? -1 : 0;
112	}
113
114
115	/* Dialog box procedure to display the signature properties. */
116	BOOL CALLBACK
117	sigprops_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
118	{
119	static gpgme_key_sig_t ks;
120	gpgme_key_t issuer;
121	char tmpbuf[256];
122	struct {
123	unsigned int exportable:1;
124	unsigned int expired:1;
125	unsigned int nrev:1;
126	unsigned int rev:1;
127	const char *alg;
128	int _class;
129	} ctx;
130	const char *fmt_templ = _("%s %s signature");
131	const char *s;
132
133	switch (msg) {
134	case WM_SYSCOMMAND:
135	if (LOWORD (wparam) == SC_CLOSE)
136	EndDialog (dlg, TRUE);
137	return FALSE;
138
139	case WM_INITDIALOG:
140	SetWindowText (dlg, _("Signature Properties"));
141	SetDlgItemText (dlg, IDC_SIGPROPS_EXP, _("Exportable"));
142	SetDlgItemText (dlg, IDC_SIGPROPS_NREV, _("Non-revocably"));
143	SetDlgItemText (dlg, IDC_SIGPROPS_EXPIRED, _("Expired"));
144	SetDlgItemText (dlg, IDC_SIGPROPS_REV, _("Revoked"));
145	SetDlgItemText (dlg, IDC_SIGPROPS_CLASSINF, _("Class"));
146	SetDlgItemText (dlg, IDC_SIGPROPS_EXPSTR, _("Expire date"));
147	SetDlgItemText (dlg, IDC_SIGPROPS_KEYINF, _("Issuer key"));
148	SetDlgItemText (dlg, IDC_SIGPROPS_KEYIDINF, _("Issuer key ID"));
149	ks = (gpgme_key_sig_t)lparam;
150	if (!ks)
151	BUG (0);
152	memset (&ctx, 0, sizeof ctx);
153	ctx._class = ks->sig_class;
154	if (ctx._class == 0)
155	ctx._class = 16;
156	ctx._class -= 6;
157	if (ks->pubkey_algo == GPGME_PK_DSA)
158	ctx.alg = "DSA";
159	else if (ks->pubkey_algo == GPGME_PK_RSA)
160	ctx.alg = "RSA";
161	else
162	ctx.alg = "ELG";
163	ctx.exportable = ks->exportable;
164	_snprintf (tmpbuf, DIM (tmpbuf)-1, fmt_templ,
165	ctx.exportable? _("Exportable") : _("Non-exportable"), ctx.alg);
166	SetDlgItemText (dlg, IDC_SIGPROPS_INFO, tmpbuf);
167
168	SetDlgItemText (dlg, IDC_SIGPROPS_KEYID, ks->keyid+8);
169	SetDlgItemInt (dlg, IDC_SIGPROPS_CLASS, ctx._class, FALSE);
170	if (ctx.exportable)
171	CheckDlgButton (dlg, IDC_SIGPROPS_EXP, BST_CHECKED);
172	if (!get_pubkey (ks->keyid+8, &issuer))
173	s = issuer->uids->uid;
174	else
175	s = _(" user ID not found");
176	SetDlgItemText_utf8 (dlg, IDC_SIGPROPS_ISSUER, s);
177	if (ks->expires == 0) {
178	ShowWindow (GetDlgItem (dlg, IDC_SIGPROPS_EXPSTR), SW_HIDE);
179	ShowWindow (GetDlgItem (dlg, IDC_SIGPROPS_EXPDATE), SW_HIDE);
180	}
181	else {
182	SYSTEMTIME st;
183	struct tm *tm;
184	time_t t = time (NULL);
185	time_t tmp = ks->expires;
186
187	tm = localtime (&tmp);
188	memset (&st, 0, sizeof st);
189	st.wYear = tm->tm_year+1900;
190	st.wMonth = tm->tm_mon;
191	st.wDay = tm->tm_mday;
192	DateTime_SetSystemtime (GetDlgItem (dlg, IDC_SIGPROPS_EXPDATE),
193	GDT_VALID, &st);
194
195	tm = localtime (&t);
196	tm->tm_mon++;
197	tm->tm_year += 1900;
198	if (tm->tm_year > st.wYear)
199	ctx.expired = 1;
200	else if (tm->tm_mon > st.wMonth)
201	ctx.expired = 1;
202	if (ctx.expired)
203	CheckDlgButton (dlg, IDC_SIGPROPS_EXPIRED, BST_CHECKED);
204	}
205	SetDlgItemText (dlg, IDC_SIGPROPS_EXP, _("Exportable"));
206	SetDlgItemText (dlg, IDC_SIGPROPS_NREV, _("Non-revocably"));
207	SetDlgItemText (dlg, IDC_SIGPROPS_REV, _("Revoked"));
208	SetDlgItemText (dlg, IDC_SIGPROPS_EXPIRED, _("Expired"));
209	SetWindowText (dlg, _("Signature Properties"));
210	SetForegroundWindow (dlg);
211	center_window (dlg, NULL);
212	return TRUE;
213
214	case WM_COMMAND:
215	switch (LOWORD (wparam)) {
216	case IDOK:
217	EndDialog (dlg, TRUE);
218	break;
219
220	case IDCANCEL:
221	EndDialog (dlg, FALSE);
222	break;
223	}
224	}
225
226	return FALSE;
227	}
228
229
230	static BOOL CALLBACK
231	subclass_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
232	{
233	listview_ctrl_t lv;
234	winpt_key_t key;
235	gpgme_key_sig_t ks;
236
237	switch (msg) {
238	case WM_KEYUP:
239	int virt_key = (int)wparam;
240	key = (winpt_key_t)siglist_proc.opaque;
241	lv = key->callback.ctl;
242	if (virt_key == VK_SPACE) {
243	if (is_sig (lv, -1)) {
244	ks = (gpgme_key_sig_t)listview_get_item2 (lv, listview_get_curr_pos (lv));
245	DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_SIGPROPS, dlg,
246	sigprops_dlg_proc, (LPARAM)ks);
247	}
248	}
249	else if (virt_key == VK_DELETE)
250	do_delsig (dlg, lv, key);
251	break;
252	}
253	return CallWindowProc (siglist_proc.old, dlg, msg, wparam, lparam);
254	}
255
256
257	/* Return 1 if the list view @lv contains non-available keys. */
258	static int
259	check_for_missing_keys (listview_ctrl_t lv)
260	{
261	int i, n;
262	char id[128];
263
264	n = listview_count_items( lv, 0 );
265	for( i = 0; i < n; i++ ) {
266	listview_get_item_text (lv, i, SL_COL_VALID, id, sizeof (id) - 1);
267	if (!strncmp (id, "NOKEY", 5))
268	return 1;
269	}
270
271	return 0;
272	}
273
274
275	/* Receive all missing keys marked in the list @lv. */
276	static int
277	recv_missing_keys (HWND dlg, listview_ctrl_t lv)
278	{
279	char id[128], keyid[18+1];
280	int i, n, cnt=0;
281
282	i = msg_box (dlg, _("Really receive all missing keys?"),
283	_("Key Manager"), MB_YESNO\|MB_INFO);
284	if (i == IDNO)
285	return 0;
286
287	n = listview_count_items (lv, 0);
288	for (i = 0; i < n; i++) {
289	listview_get_item_text (lv, i, SL_COL_VALID, id, sizeof (id) - 1);
290	if (!strncmp (id, "NOKEY", 5)) {
291	listview_get_item_text (lv, i, SL_COL_KEYID,
292	keyid, sizeof (keyid) -1);
293	if (!hkp_recv_key (dlg, default_keyserver,
294	default_keyserver_port, keyid, 0, 0)) {
295	keycache_update (0, keyid);
296	cnt++;
297	}
298	else
299	break;
300	}
301	}
302	return cnt;
303	}
304
305
306	/* Create a mini popup with available choices. */
307	static void
308	do_create_popup (HWND dlg)
309	{
310	HMENU hm, sm;
311	POINT p;
312
313	GetCursorPos (&p);
314	hm = LoadMenu (glob_hinst, MAKEINTRESOURCE (IDR_WINPT_KEYSIG_CTX));
315	sm = GetSubMenu (hm, 0);
316	set_menu_text (sm, ID_SIGCTX_PROPS, _("Signature &Properties"));
317	set_menu_text (sm, ID_SIGCTX_KEYPROPS, _("Signing &Key Properties"));
318	TrackPopupMenu (sm, TPM_RIGHTALIGN, p.x, p.y, 0, dlg, NULL);
319	DestroyMenu (hm);
320	DestroyMenu (sm);
321	}
322
323
324	/* Fetch a single key and extract the keyid from the listview
325	entry at the pos @idx. */
326	static int
327	recv_single_key (HWND dlg, listview_ctrl_t lv, int idx)
328	{
329	char keyid[32];
330	int rc;
331
332	listview_get_item_text (lv, idx, SL_COL_KEYID, keyid, DIM (keyid)-1);
333	rc = hkp_recv_key (dlg, default_keyserver,
334	default_keyserver_port, keyid, 0, 0);
335
336	if (!rc)
337	keycache_update (0, keyid);
338	return rc;
339	}
340
341
342	/* Load the key property dialog with the selected key from @lv. */
343	static void
344	do_load_keyprops (HWND dlg, listview_ctrl_t lv)
345	{
346	winpt_key_s k;
347	gpgme_key_t key;
348	char keyid[32] = {0};
349	char status[64] = {0}, creation[64] = {0};
350	int n = listview_get_curr_pos (lv);
351
352	listview_get_item_text (lv, n, SL_COL_VALID, status, DIM (status)-1);
353	listview_get_item_text (lv, n, SL_COL_CREATE, creation, DIM (creation)-1);
354	listview_get_item_text (lv, n, SL_COL_KEYID, keyid, DIM (keyid)-1);
355	if (!strcmp (status, "NOKEY")) {
356	int id = msg_box (dlg, _("Key not found in keyring, do you want to fetch it from the keyserver?"),
357	_("Key Manager"), MB_QUEST_ASK);
358	if (id == IDNO)
359	return;
360	if (recv_single_key (dlg, lv, n))
361	return;
362	}
363
364	if ((strlen (keyid) < 3 \|\|get_pubkey (keyid, &key))) {
365	if (strlen (creation) > 0)
366	msg_box (dlg, _("Key not found in keyring."), _("Key Manager"), MB_INFO);
367	return;
368	}
369	memset (&k, 0, sizeof k);
370	k.keyid = keyid;
371	DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_KEYPROPS, dlg,
372	keyprops_dlg_proc, (LPARAM)&k);
373	}
374
375
376	/* Dialog box procedure to list signatures. */
377	BOOL CALLBACK
378	keysig_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
379	{
380	static listview_ctrl_t lv = NULL;
381	static struct winpt_key_s *k;
382	gpgme_key_sig_t ks;
383	HWND sl;
384	char inf[384];
385	int idx = 0;
386
387	switch (msg) {
388	case WM_INITDIALOG:
389	k = (winpt_key_t) lparam;
390	if (!k)
391	BUG (0);
392	if (k->uid)
393	_snprintf (inf, DIM (inf)-1, _("Signature List for \"%s\""), k->uid);
394	SetWindowText_utf8 (dlg, inf);
395	SetDlgItemText (dlg, IDC_KEYSIG_RECVKEY, _("&Receive Key"));
396	SetDlgItemText (dlg, IDC_KEYSIG_SIGPROPS, _("&Properties"));
397
398	lv = siglist_load (GetDlgItem (dlg, IDC_KEYSIG_LIST), k->keyid);
399	if (!check_for_missing_keys (lv))
400	EnableWindow (GetDlgItem (dlg, IDC_KEYSIG_RECVKEY), FALSE);
401	EnableWindow (GetDlgItem (dlg, IDC_KEYSIG_SIGPROPS), FALSE);
402	k->callback.ctl = lv;
403	sl = GetDlgItem (dlg, IDC_KEYSIG_LIST);
404	siglist_proc.dlg = dlg;
405	siglist_proc.opaque = k;
406	siglist_proc.current = (WNDPROC)subclass_dlg_proc;
407	siglist_proc.old = (WNDPROC)GetWindowLong (sl, GWL_WNDPROC);
408	if (siglist_proc.old) {
409	if (!SetWindowLong (sl, GWL_WNDPROC, (LONG)siglist_proc.current)) {
410	msg_box (dlg, "Could not set keylist window procedure.",
411	_("Key Manager"), MB_ERR);
412	BUG (0);
413	}
414	}
415	SetForegroundWindow (dlg);
416	center_window (dlg, NULL);
417	return TRUE;
418
419	case WM_DESTROY:
420	if (lv) {
421	siglist_delete (lv);
422	lv = NULL;
423	}
424	return FALSE;
425
426	case WM_SYSCOMMAND:
427	if (LOWORD (wparam) == SC_CLOSE)
428	EndDialog (dlg, TRUE);
429	return FALSE;
430
431	case WM_NOTIFY:
432	NMHDR *notify;
433
434	notify = (NMHDR *)lparam;
435	if (!notify)
436	return FALSE;
437	if (notify->code == NM_DBLCLK
438	&& notify->idFrom == IDC_KEYSIG_LIST)
439	do_load_keyprops (dlg, lv);
440	if (notify->code == NM_RCLICK &&
441	notify->idFrom == IDC_KEYSIG_LIST &&
442	is_sig (lv, -1))
443	do_create_popup (dlg);
444	if (notify->code == LVN_ITEMCHANGED &&
445	((LPNMLISTVIEW)lparam)->uNewState) {
446	idx = listview_get_curr_pos (lv);
447	listview_get_item_text (lv, idx, SL_COL_VALID, inf, DIM (inf)-1);
448	EnableWindow (GetDlgItem (dlg, IDC_KEYSIG_RECVKEY),
449	strcmp (inf, "NOKEY") == 0? TRUE: FALSE);
450	EnableWindow (GetDlgItem (dlg, IDC_KEYSIG_SIGPROPS),
451	is_sig (lv, -1)? TRUE : FALSE);
452	}
453	if (notify->code == LVN_COLUMNCLICK) {
454	NMLISTVIEW *nft = (LPNMLISTVIEW) lparam;
455	int sortby = 0;
456	switch (nft->iSubItem) {
457	//case 0: sortby = KEY_SORT_USERID; break;
458	case 1: sortby = KEY_SORT_VALIDITY; break;
459	case 2: sortby = SIG_SORT_CLASS; break;
460	case 3: sortby = KEY_SORT_CREATED; break;
461	case 4: sortby = KEY_SORT_KEYID; break;
462	case 5: sortby = SIG_SORT_EXPIRE; break;
463	case 6: sortby = KEY_SORT_ALGO; break;
464	default: return TRUE;
465	}
466	siglist_sort (lv, sortby);
467	}
468	break;
469
470	case WM_COMMAND:
471	switch (LOWORD (wparam)) {
472	case ID_SIGCTX_KEYPROPS:
473	do_load_keyprops (dlg, lv);
474	break;
475
476	case ID_SIGCTX_PROPS:
477	if (is_sig (lv, -1)) {
478	ks = (gpgme_key_sig_t)listview_get_item2 (lv, listview_get_curr_pos (lv));
479	DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_SIGPROPS, dlg,
480	sigprops_dlg_proc, (LPARAM)ks);
481	}
482	break;
483
484	case IDC_KEYSIG_RECVKEY:
485	idx = listview_get_curr_pos (lv);
486	if (idx == -1)
487	recv_missing_keys (dlg, lv);
488	else
489	recv_single_key (dlg, lv, idx);
490	return TRUE;
491
492	case IDC_KEYSIG_SIGPROPS:
493	if (is_sig (lv, -1)) {
494	ks = ks = (gpgme_key_sig_t)listview_get_item2 (lv, listview_get_curr_pos (lv));
495	DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_SIGPROPS, dlg,
496	sigprops_dlg_proc, (LPARAM)ks);
497	}
498	return TRUE;
499
500	case IDOK:
501	EndDialog (dlg, TRUE);
502	return TRUE;
503	}
504	break;
505	}
506	return FALSE;
507	}