trunk/Src/wptKeysigDlg.cpp

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

#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[256];

    if (pos == -1)
        pos = listview_get_curr_pos (lv);
    if (pos == -1)
        return 0;
    listview_get_item_text (lv, pos, 0, tmpbuf, 200);
    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)
{
    int pos, npos, id;
    int signo=0, uidno=0;
    GpgKeyEdit *ke;
    gpgme_error_t err;

    npos = pos = listview_get_curr_pos (lv);
    if (!is_sig (lv, -1))
        return -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"), MB_YESNO,
                  _("Are you really sure you want to delete this signature from\n"
                    "  \"%s\""), 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;
    key->update = 1; /*update*/
    return err? -1 : 0;
}


/* Dialog box procedure to display the signature properties. */
static BOOL CALLBACK
sigprops_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
{
    static listview_ctrl_t lv;
    char tmpbuf[256];
    int n;
    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");

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

    case WM_INITDIALOG:
        lv = (listview_ctrl_t)lparam;
        if (!lv)
            dlg_fatal_error (dlg, "could not get dialog param");
        memset (&ctx, 0, sizeof ctx);
        n = listview_get_curr_pos (lv);
        listview_get_item_text (lv, n, 2, tmpbuf, DIM (tmpbuf)-1);
        if (!strstr (tmpbuf, "L"))
            ctx.exportable = 1;
        ctx._class = atoi (tmpbuf);
        if (ctx._class == 0)
            ctx._class = 10;
        else if (ctx._class < 10)
            ctx._class += 10;
        listview_get_item_text (lv, n, 6, tmpbuf, DIM (tmpbuf)-1);
        if (strstr (tmpbuf, "DSA"))         
            ctx.alg = "DSA";
        else if (strstr (tmpbuf, "RSA"))
            ctx.alg = "RSA";
        else
            ctx.alg = "ELG";
        _snprintf (tmpbuf, DIM (tmpbuf)-1, fmt_templ,
                   ctx.exportable? _("Exportable") : _("Non-exportable"), ctx.alg);
        SetDlgItemText (dlg, IDC_SIGPROPS_INFO, tmpbuf);
        listview_get_item_text (lv, n, 4, tmpbuf, DIM (tmpbuf)-1);
        SetDlgItemText (dlg, IDC_SIGPROPS_KEYID, tmpbuf);
        SetDlgItemInt (dlg, IDC_SIGPROPS_CLASS, ctx._class, FALSE);
        if (ctx.exportable)
            CheckDlgButton (dlg, IDC_SIGPROPS_EXP, BST_CHECKED);
        listview_get_item_text (lv, n, 0, tmpbuf, DIM (tmpbuf)-1);
        SetDlgItemText (dlg, IDC_SIGPROPS_ISSUER, tmpbuf+1);
        tmpbuf[0] = 0;
        listview_get_item_text (lv, n, 5, tmpbuf, DIM (tmpbuf)-1);
        if (strlen (tmpbuf) == 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);

            memset (&st, 0, sizeof st);
            st.wYear = atoi (tmpbuf);
            st.wMonth = atoi (tmpbuf+5);
            st.wDay = atoi (tmpbuf+8);
            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;
        }
    }

    return FALSE;
}


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

    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))
                DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_SIGPROPS, dlg,
                                sigprops_dlg_proc, (LPARAM)lv);
        }
        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, 1, 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)
{
    int i, n, rc;
    char id[128], keyid[18+1];
    
    n = listview_count_items (lv, 0);
    for( i = 0; i < n; i++ ) {
        listview_get_item_text( lv, i, 1, id, sizeof id - 1 );
        if( !strncmp( id, "NOKEY", 5 ) ) {
            listview_get_item_text( lv, i, 4, keyid, sizeof keyid -1 );
            rc = hkp_recv_key( dlg, default_keyserver, default_keyserver_port, keyid, 0, 0 );
            if( rc )               
                break;
        }
    }
    
    return rc;
}


/* 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);
}


/* 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, 1, status, DIM (status)-1);
    listview_get_item_text (lv, n, 3, creation, DIM (creation)-1);
    listview_get_item_text (lv, n, 4, keyid, DIM (keyid)-1);
    if (!strcmp (status, "NOKEY")) {
        msg_box (dlg, _("Key not found in keyring, please get it from the keyserver first."),
                 _("Key Manager"), MB_INFO);
        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;
    char inf[384], keyid[18+1];    
    int idx = 0, id, rc;
    HWND sl;
    
    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 (dlg, inf);
        #ifndef LANG_DE
        SetDlgItemText (dlg, IDC_KEYSIG_RECVKEY, _("&Receive Key"));
        SetDlgItemText (dlg, IDC_KEYSIG_SIGPROPS, _("&Properties"));
        #endif
        lv = siglist_load (GetDlgItem (dlg, IDC_KEYSIG_LIST), k->keyid);
        if (!check_for_missing_keys (lv))
            EnableWindow (GetDlgItem( dlg, IDC_KEYSIG_RECVKEY ), 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) {
            if (k->update)
                keycache_update (0, k->keyid);
            EndDialog (dlg, TRUE);
        }
        return FALSE;

    case WM_NOTIFY:
        NMHDR * notify;
        
        notify = (NMHDR *)lparam;
        if( notify && notify->code == NM_DBLCLK 
            && notify->idFrom == IDC_KEYSIG_LIST )
            do_load_keyprops (dlg, lv);
        if (notify && notify->code == NM_RCLICK &&
            notify->idFrom == IDC_KEYSIG_LIST)
            do_create_popup (dlg);
        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))
                DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_SIGPROPS, dlg,
                                sigprops_dlg_proc, (LPARAM)lv);
            break;

        case IDC_KEYSIG_RECVKEY:
            idx = listview_get_curr_pos (lv);
            if (idx == -1) {
                id = msg_box( dlg, _("Really receive all missing keys?"),
                                _("Key Manager"), MB_YESNO|MB_INFO );
                if (id == IDYES) {
                    rc = recv_missing_keys (dlg, lv);
                    if( !rc )
                        keycache_set_reload (1);
                    return TRUE;
                }
                return TRUE;
            }
            listview_get_item_text (lv, idx, 1, inf, DIM (inf)-1);
            if (strcmp (inf, "NOKEY"))
                return FALSE;
            listview_get_item_text (lv, idx, 4, keyid, DIM (keyid)-1);
            rc = hkp_recv_key (dlg, default_keyserver, default_keyserver_port, keyid, 0, 0);
            if (!rc)
                keycache_set_reload (1);
            return TRUE;

        case IDC_KEYSIG_SIGPROPS:
            if (is_sig (lv, -1))
                DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_SIGPROPS, dlg,
                                sigprops_dlg_proc, (LPARAM)lv);
            return TRUE;
            
        case IDOK:
            if (k->update)
                keycache_update (0, k->keyid);
            EndDialog (dlg, TRUE);
            return TRUE;
        }
        break;
    }
    return FALSE;
}
1	/* wptKeysigDlg.cpp - Key signature listing
2	* Copyright (C) 2001-2005 Timo Schulz
3	*
4	* This file is part of WinPT.
5	*
6	* WinPT is free software; you can redistribute it and/or modify
7	* it under the terms of the GNU General Public License as published by
8	* the Free Software Foundation; either version 2 of the License, or
9	* (at your option) any later version.
10	*
11	* WinPT is distributed in the hope that it will be useful,
12	* but WITHOUT ANY WARRANTY; without even the implied warranty of
13	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14	* GNU General Public License for more details.
15	*
16	* You should have received a copy of the GNU General Public License
17	* along with WinPT; if not, write to the Free Software Foundation,
18	* Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
19	*/
20
21	#include <windows.h>
22	#include <commctrl.h>
23	#include <time.h>
24
25	#include "../resource.h"
26	#include "wptGPG.h"
27	#include "wptCommonCtl.h"
28	#include "wptContext.h" /* for passphrase_s */
29	#include "wptDlgs.h"
30	#include "wptW32API.h"
31	#include "wptNLS.h"
32	#include "wptKeyList.h"
33	#include "wptKeyserver.h"
34	#include "wptUTF8.h"
35	#include "wptTypes.h"
36	#include "wptVersion.h"
37	#include "wptErrors.h"
38	#include "wptKeyEdit.h"
39
40	static subclass_s siglist_proc;
41
42
43	static int
44	is_sig (listview_ctrl_t lv, int pos)
45	{
46	char tmpbuf[256];
47
48	if (pos == -1)
49	pos = listview_get_curr_pos (lv);
50	if (pos == -1)
51	return 0;
52	listview_get_item_text (lv, pos, 0, tmpbuf, 200);
53	if (*tmpbuf == ' ')
54	return -1;
55	return 0;
56	}
57
58
59	/* Delete the selected signature from list view @lv. The
60	key is given in @key. */
61	static int
62	do_delsig (HWND dlg, listview_ctrl_t lv, winpt_key_t key)
63	{
64	int pos, npos, id;
65	int signo=0, uidno=0;
66	GpgKeyEdit *ke;
67	gpgme_error_t err;
68
69	npos = pos = listview_get_curr_pos (lv);
70	if (!is_sig (lv, -1))
71	return -1;
72	while (pos > 0 && is_sig (lv, pos)) {
73	signo++;
74	pos--;
75	}
76	pos = npos;
77	while (npos > 0) {
78	if (!is_sig (lv, npos))
79	uidno++;
80	npos--;
81	}
82	uidno++;
83
84	/* XXX: do not allow to delete the self signature */
85	id = log_box (_("Key Manager"), MB_YESNO,
86	_("Are you really sure you want to delete this signature from\n"
87	" \"%s\""), key->uid);
88	if (id == IDNO)
89	return 0;
90
91	ke = new GpgKeyEdit (key->keyid);
92	if (!ke)
93	BUG (NULL);
94	err = ke->delUseridSignature (uidno, signo);
95	if (err)
96	msg_box (dlg, gpgme_strerror (err), _("Key Manager"), MB_ERR);
97	else
98	listview_del_item (lv, pos);
99	delete ke;
100	key->update = 1; /update/
101	return err? -1 : 0;
102	}
103
104
105	/* Dialog box procedure to display the signature properties. */
106	static BOOL CALLBACK
107	sigprops_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
108	{
109	static listview_ctrl_t lv;
110	char tmpbuf[256];
111	int n;
112	struct {
113	unsigned int exportable:1;
114	unsigned int expired:1;
115	unsigned int nrev:1;
116	unsigned int rev:1;
117	const char * alg;
118	int _class;
119	} ctx;
120	const char *fmt_templ = _("%s %s signature");
121
122	switch (msg) {
123	case WM_SYSCOMMAND:
124	if (LOWORD (wparam) == SC_CLOSE)
125	EndDialog (dlg, TRUE);
126	return FALSE;
127
128	case WM_INITDIALOG:
129	lv = (listview_ctrl_t)lparam;
130	if (!lv)
131	dlg_fatal_error (dlg, "could not get dialog param");
132	memset (&ctx, 0, sizeof ctx);
133	n = listview_get_curr_pos (lv);
134	listview_get_item_text (lv, n, 2, tmpbuf, DIM (tmpbuf)-1);
135	if (!strstr (tmpbuf, "L"))
136	ctx.exportable = 1;
137	ctx._class = atoi (tmpbuf);
138	if (ctx._class == 0)
139	ctx._class = 10;
140	else if (ctx._class < 10)
141	ctx._class += 10;
142	listview_get_item_text (lv, n, 6, tmpbuf, DIM (tmpbuf)-1);
143	if (strstr (tmpbuf, "DSA"))
144	ctx.alg = "DSA";
145	else if (strstr (tmpbuf, "RSA"))
146	ctx.alg = "RSA";
147	else
148	ctx.alg = "ELG";
149	_snprintf (tmpbuf, DIM (tmpbuf)-1, fmt_templ,
150	ctx.exportable? _("Exportable") : _("Non-exportable"), ctx.alg);
151	SetDlgItemText (dlg, IDC_SIGPROPS_INFO, tmpbuf);
152	listview_get_item_text (lv, n, 4, tmpbuf, DIM (tmpbuf)-1);
153	SetDlgItemText (dlg, IDC_SIGPROPS_KEYID, tmpbuf);
154	SetDlgItemInt (dlg, IDC_SIGPROPS_CLASS, ctx._class, FALSE);
155	if (ctx.exportable)
156	CheckDlgButton (dlg, IDC_SIGPROPS_EXP, BST_CHECKED);
157	listview_get_item_text (lv, n, 0, tmpbuf, DIM (tmpbuf)-1);
158	SetDlgItemText (dlg, IDC_SIGPROPS_ISSUER, tmpbuf+1);
159	tmpbuf[0] = 0;
160	listview_get_item_text (lv, n, 5, tmpbuf, DIM (tmpbuf)-1);
161	if (strlen (tmpbuf) == 0) {
162	ShowWindow (GetDlgItem (dlg, IDC_SIGPROPS_EXPSTR), SW_HIDE);
163	ShowWindow (GetDlgItem (dlg, IDC_SIGPROPS_EXPDATE), SW_HIDE);
164	}
165	else {
166	SYSTEMTIME st;
167	struct tm * tm;
168	time_t t = time (NULL);
169
170	memset (&st, 0, sizeof st);
171	st.wYear = atoi (tmpbuf);
172	st.wMonth = atoi (tmpbuf+5);
173	st.wDay = atoi (tmpbuf+8);
174	DateTime_SetSystemtime (GetDlgItem (dlg, IDC_SIGPROPS_EXPDATE),
175	GDT_VALID, &st);
176
177	tm = localtime (&t);
178	tm->tm_mon++;
179	tm->tm_year += 1900;
180	if (tm->tm_year > st.wYear)
181	ctx.expired = 1;
182	else if (tm->tm_mon > st.wMonth)
183	ctx.expired = 1;
184	if (ctx.expired)
185	CheckDlgButton (dlg, IDC_SIGPROPS_EXPIRED, BST_CHECKED);
186	}
187	SetDlgItemText (dlg, IDC_SIGPROPS_EXP, _("Exportable"));
188	SetDlgItemText (dlg, IDC_SIGPROPS_NREV, _("Non-revocably"));
189	SetDlgItemText (dlg, IDC_SIGPROPS_REV, _("Revoked"));
190	SetDlgItemText (dlg, IDC_SIGPROPS_EXPIRED, _("Expired"));
191	SetWindowText (dlg, _("Signature Properties"));
192	SetForegroundWindow (dlg);
193	center_window (dlg, NULL);
194	return TRUE;
195
196	case WM_COMMAND:
197	switch (LOWORD (wparam)) {
198	case IDOK:
199	EndDialog (dlg, TRUE);
200	break;
201	}
202	}
203
204	return FALSE;
205	}
206
207
208	static BOOL CALLBACK
209	subclass_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
210	{
211	listview_ctrl_t lv;
212	winpt_key_t key;
213
214	switch (msg) {
215	case WM_KEYUP:
216	int virt_key = (int)wparam;
217	key = (winpt_key_t)siglist_proc.opaque;
218	lv = key->callback.ctl;
219	if (virt_key == VK_SPACE) {
220	if (is_sig (lv, -1))
221	DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_SIGPROPS, dlg,
222	sigprops_dlg_proc, (LPARAM)lv);
223	}
224	else if (virt_key == VK_DELETE)
225	do_delsig (dlg, lv, key);
226	break;
227	}
228	return CallWindowProc (siglist_proc.old, dlg, msg, wparam, lparam);
229	}
230
231
232	/* Return 1 if the list view @lv contains non-available keys. */
233	static int
234	check_for_missing_keys (listview_ctrl_t lv)
235	{
236	int i, n;
237	char id[128];
238
239	n = listview_count_items( lv, 0 );
240	for( i = 0; i < n; i++ ) {
241	listview_get_item_text( lv, i, 1, id, sizeof (id) - 1 );
242	if( !strncmp( id, "NOKEY", 5 ) )
243	return 1;
244	}
245
246	return 0;
247	}
248
249
250	/* Receive all missing keys marked in the list @lv. */
251	static int
252	recv_missing_keys (HWND dlg, listview_ctrl_t lv)
253	{
254	int i, n, rc;
255	char id[128], keyid[18+1];
256
257	n = listview_count_items (lv, 0);
258	for( i = 0; i < n; i++ ) {
259	listview_get_item_text( lv, i, 1, id, sizeof id - 1 );
260	if( !strncmp( id, "NOKEY", 5 ) ) {
261	listview_get_item_text( lv, i, 4, keyid, sizeof keyid -1 );
262	rc = hkp_recv_key( dlg, default_keyserver, default_keyserver_port, keyid, 0, 0 );
263	if( rc )
264	break;
265	}
266	}
267
268	return rc;
269	}
270
271
272	/* Create a mini popup with available choices. */
273	static void
274	do_create_popup (HWND dlg)
275	{
276	HMENU hm, sm;
277	POINT p;
278
279	GetCursorPos (&p);
280	hm = LoadMenu (glob_hinst, MAKEINTRESOURCE (IDR_WINPT_KEYSIG_CTX));
281	sm = GetSubMenu (hm, 0);
282
283	set_menu_text (sm, ID_SIGCTX_PROPS, _("Signature &Properties"));
284	set_menu_text (sm, ID_SIGCTX_KEYPROPS, _("Signing &Key Properties"));
285
286	TrackPopupMenu (sm, TPM_RIGHTALIGN, p.x, p.y, 0, dlg, NULL);
287
288	DestroyMenu (hm);
289	DestroyMenu (sm);
290	}
291
292
293	/* Load the key property dialog with the selected key from @lv. */
294	static void
295	do_load_keyprops (HWND dlg, listview_ctrl_t lv)
296	{
297	winpt_key_s k;
298	gpgme_key_t key;
299	char keyid[32] = {0};
300	char status[64] = {0}, creation[64] = {0};
301	int n = listview_get_curr_pos (lv);
302
303	listview_get_item_text (lv, n, 1, status, DIM (status)-1);
304	listview_get_item_text (lv, n, 3, creation, DIM (creation)-1);
305	listview_get_item_text (lv, n, 4, keyid, DIM (keyid)-1);
306	if (!strcmp (status, "NOKEY")) {
307	msg_box (dlg, _("Key not found in keyring, please get it from the keyserver first."),
308	_("Key Manager"), MB_INFO);
309	return;
310	}
311
312	if ((strlen (keyid) < 3 \|\|get_pubkey (keyid, &key))) {
313	if (strlen (creation) > 0)
314	msg_box (dlg, _("Key not found in keyring."), _("Key Manager"), MB_INFO);
315	return;
316	}
317	memset (&k, 0, sizeof k);
318	k.keyid = keyid;
319	DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_KEYPROPS, dlg,
320	keyprops_dlg_proc, (LPARAM)&k);
321	}
322
323
324	/* Dialog box procedure to list signatures. */
325	BOOL CALLBACK
326	keysig_dlg_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
327	{
328	static listview_ctrl_t lv = NULL;
329	static struct winpt_key_s *k;
330	char inf[384], keyid[18+1];
331	int idx = 0, id, rc;
332	HWND sl;
333
334	switch( msg ) {
335	case WM_INITDIALOG:
336	k = (winpt_key_t) lparam;
337	if (!k)
338	BUG (0);
339	if (k->uid)
340	_snprintf (inf, DIM (inf)-1, _("Signature List for \"%s\""), k->uid);
341	SetWindowText (dlg, inf);
342	#ifndef LANG_DE
343	SetDlgItemText (dlg, IDC_KEYSIG_RECVKEY, _("&Receive Key"));
344	SetDlgItemText (dlg, IDC_KEYSIG_SIGPROPS, _("&Properties"));
345	#endif
346	lv = siglist_load (GetDlgItem (dlg, IDC_KEYSIG_LIST), k->keyid);
347	if (!check_for_missing_keys (lv))
348	EnableWindow (GetDlgItem( dlg, IDC_KEYSIG_RECVKEY ), FALSE);
349	k->callback.ctl = lv;
350	sl = GetDlgItem (dlg, IDC_KEYSIG_LIST);
351	siglist_proc.dlg = dlg;
352	siglist_proc.opaque = k;
353	siglist_proc.current = (WNDPROC)subclass_dlg_proc;
354	siglist_proc.old = (WNDPROC)GetWindowLong (sl, GWL_WNDPROC);
355	if (siglist_proc.old) {
356	if (!SetWindowLong (sl, GWL_WNDPROC, (LONG)siglist_proc.current)) {
357	msg_box (dlg, _("Could not set keylist window procedure."),
358	_("Key Manager"), MB_ERR);
359	BUG (0);
360	}
361	}
362	SetForegroundWindow (dlg);
363	center_window (dlg, NULL);
364	return TRUE;
365
366	case WM_DESTROY:
367	if ( lv ) {
368	siglist_delete( lv );
369	lv = NULL;
370	}
371	return FALSE;
372
373	case WM_SYSCOMMAND:
374	if (LOWORD (wparam) == SC_CLOSE) {
375	if (k->update)
376	keycache_update (0, k->keyid);
377	EndDialog (dlg, TRUE);
378	}
379	return FALSE;
380
381	case WM_NOTIFY:
382	NMHDR * notify;
383
384	notify = (NMHDR *)lparam;
385	if( notify && notify->code == NM_DBLCLK
386	&& notify->idFrom == IDC_KEYSIG_LIST )
387	do_load_keyprops (dlg, lv);
388	if (notify && notify->code == NM_RCLICK &&
389	notify->idFrom == IDC_KEYSIG_LIST)
390	do_create_popup (dlg);
391	break;
392
393	case WM_COMMAND:
394	switch ( LOWORD( wparam ) ) {
395
396	case ID_SIGCTX_KEYPROPS:
397	do_load_keyprops (dlg, lv);
398	break;
399
400	case ID_SIGCTX_PROPS:
401	if (is_sig (lv, -1))
402	DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_SIGPROPS, dlg,
403	sigprops_dlg_proc, (LPARAM)lv);
404	break;
405
406	case IDC_KEYSIG_RECVKEY:
407	idx = listview_get_curr_pos (lv);
408	if (idx == -1) {
409	id = msg_box( dlg, _("Really receive all missing keys?"),
410	_("Key Manager"), MB_YESNO\|MB_INFO );
411	if (id == IDYES) {
412	rc = recv_missing_keys (dlg, lv);
413	if( !rc )
414	keycache_set_reload (1);
415	return TRUE;
416	}
417	return TRUE;
418	}
419	listview_get_item_text (lv, idx, 1, inf, DIM (inf)-1);
420	if (strcmp (inf, "NOKEY"))
421	return FALSE;
422	listview_get_item_text (lv, idx, 4, keyid, DIM (keyid)-1);
423	rc = hkp_recv_key (dlg, default_keyserver, default_keyserver_port, keyid, 0, 0);
424	if (!rc)
425	keycache_set_reload (1);
426	return TRUE;
427
428	case IDC_KEYSIG_SIGPROPS:
429	if (is_sig (lv, -1))
430	DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_SIGPROPS, dlg,
431	sigprops_dlg_proc, (LPARAM)lv);
432	return TRUE;
433
434	case IDOK:
435	if (k->update)
436	keycache_update (0, k->keyid);
437	EndDialog (dlg, TRUE);
438	return TRUE;
439	}
440	break;
441	}
442	return FALSE;
443	}