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