trunk/Src/wptSigList.cpp

/* wptSigList.cpp - Listview for key signatures
 *      Copyright (C) 2001-2006 Timo Schulz
 *      Copyright (C) 2005, 2006 g10 Code GmbH
 *
 * 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 <time.h>

#include "wptGPG.h"
#include "wptCommonCtl.h"
#include "wptKeylist.h"
#include "wptNLS.h"
#include "wptUTF8.h"
#include "wptErrors.h"
#include "wptTypes.h"
#include "wptW32API.h"


/* Is the given signature an user-id signature? */
#define IS_UID_CERT(_class) ((_class) >= 0x10 && (_class) <= 0x13)


/* Create a signature list control in @lv with the parent window
   given in @ctrl.
   Return value: 0 on success. */
static int
siglist_build (listview_ctrl_t * lv, HWND ctrl)
{
    struct listview_ctrl_s *c;
    struct listview_column_s implist[] = {
        {0, 240, (char *)_("User ID")},
        {1,  50, (char *)_("Valid")},
        {2,  44, (char *)_("Class")},
        {3,  68, (char *)_("Creation")},
        {4,  80, (char *)_("Key ID")},
        {5,  68, (char *)_("Expiration")},
        {6,  56, (char *)_("Algorithm")},
        {0,   0, NULL}
    };  
    int j, rc = 0;
    
    rc = listview_new (&c);
    if (rc)
        return rc;
    c->ctrl = ctrl;
    for  (j=0; implist[j].fieldname != NULL; j++)
        listview_add_column (c, &implist[j]);
    listview_set_ext_style (c);
    listview_del_all_items (c);
    *lv = c;
    return 0;
}


/* Delete the signature control in @lv. */
void 
siglist_delete( listview_ctrl_t lv )
{
    if (lv) {
        listview_release (lv);
    }
}


/* Indent the string in @old with the level @ilvl.
    Return value: indented string. */
static char *
indent_string (const char * old, int ilvl)
{
    char * p;
    int i;

    p = new char[strlen (old) + 1 + ilvl];
    if (!p)
        BUG (NULL);
    for (i = 0; i < ilvl; i++)
        p[i] = ' ';
    strcpy (p+i, old);
    return p;
}


/* Add an item at the given pos @pos with the opaque param @ks. */
int 
add_keysig_item (listview_ctrl_t ctx, int pos, gpgme_key_sig_t ks)
{
    LV_ITEM lvi;

    memset (&lvi, 0, sizeof lvi);
    lvi.iItem = pos;
    lvi.lParam = (LPARAM)ks;
    lvi.mask = LVIF_PARAM;
    if (ListView_InsertItem (ctx->ctrl, &lvi) != pos)
        return -1;
    return 0;
}


/* Add an userid signature @ks from the userid @uid to the sig list 
   control @lv.
   Return value: 0 on success. */
static int
siglist_add_key (listview_ctrl_t lv, gpgme_user_id_t uid, 
                 gpgme_key_sig_t ks, int pos)
{
    gpgme_key_t key=NULL;
    char t[128];
    const char *attr;
    const char *s;
    int key_attr, no_uid = 0;
    int rc = 0;

    if (ks && !IS_UID_CERT (ks->sig_class))
        return 0;
    
    rc = add_keysig_item (lv, pos, ks);
    if (rc)
        return rc;

    attr = NULL;
    if (!uid) {
        get_pubkey (ks->keyid, &key);
        if (key)
            attr = key->uids->uid;
    }
    else
        attr = uid->uid;
    if (attr && strlen (attr)) {
        char *uid_utf8 = utf8_to_native (attr);
        char *p = uid? m_strdup (uid_utf8) : indent_string (uid_utf8, 2);
        listview_add_sub_item (lv, pos, 0, p);
        free (uid_utf8);
        free_if_alloc (p);
    }
    else {
        listview_add_sub_item (lv, pos, 0, _("  user ID not found"));
        no_uid = 1;
    }

    if (uid)
        return 0;

    switch (gpgme_err_code (ks->status)) {
    case GPG_ERR_NO_ERROR:     s = "YES";   break;
    case GPG_ERR_NO_PUBKEY:    s = "NOKEY"; break;
    case GPG_ERR_BAD_SIGNATURE:s = "NO";    break;
    default:                   s = "ERROR"; break;
    }
    if (no_uid)
        s = "NOKEY";
    listview_add_sub_item (lv, pos, 1, s);

    switch (ks->sig_class) {
    case 0x10: strcpy (t, " "); break;
    case 0x11: strcpy (t, "1"); break;
    case 0x12: strcpy (t, "2"); break;
    case 0x13: strcpy (t, "3"); break;
    }
        
    strcat (t, " ");
    if (!ks->exportable)
        strcat (t, "L");
    /*if (key_attr & GPGME_SIGF_NREV)
        strcat (t, "R");*/
    listview_add_sub_item (lv, pos, 2, t);

    key_attr = ks->timestamp;
    if( key_attr ) {
        s = get_key_created (key_attr);
        listview_add_sub_item (lv, pos, 3, s);
    }
    
    attr = ks->keyid;
    if (attr && strlen (attr) == 16) {
        _snprintf (t, sizeof (t) -1, "0x%s", attr + 8);
        listview_add_sub_item (lv, pos, 4, t);
    }

    key_attr = ks->expires;
    if (key_attr) {
        s = get_key_created (key_attr);
        listview_add_sub_item (lv, pos, 5, s);
    }

    attr = get_key_pubalgo (ks->pubkey_algo);
    if (attr)
        listview_add_sub_item (lv, pos, 6, (char *)attr);

    return 0;
}


/* Load a signature list with the signatures of the key with
   the keyID @keyid. The parent window is in @ctrl.
   Return value is the handle to the listview control. */
listview_ctrl_t
siglist_load (HWND ctrl, const char *keyid)
{    
    gpgme_key_t key;
    gpgme_user_id_t u;
    gpgme_key_sig_t s;
    listview_ctrl_t lv;
    int pos = 0;
    int rc;

    if (siglist_build (&lv, ctrl))
        BUG (NULL);
    rc = get_pubkey(keyid, &key);
    if (rc)
        BUG (NULL);

    for (u=key->uids; u; u = u->next) {
        siglist_add_key (lv, u, NULL, pos++);
        for (s = u->signatures; s; s = s->next) {
            if (!IS_UID_CERT (s->sig_class))
                continue;
            rc = siglist_add_key (lv, NULL, s, pos++);
            if (rc)
                break;
        }
    }
    if (rc) {
        siglist_delete (lv);
        lv = NULL;
    }
    return lv;
}


/* Integer comparsion of @a and @b. 
   Return values: same as in strcmp. */
static inline int
int_cmp (int a, int b)
{
    if (a == b) return 0;       
    else if (a > b) return 1;
    else return -1;
    return 0;
}


/* Sorting callback for the signature list. */
static int CALLBACK
siglist_cmp_cb (LPARAM first, LPARAM second, LPARAM sortby)
{
    gpgme_key_sig_t a, b;
    int cmpresult=0;

    a = (gpgme_key_sig_t)first;
    b = (gpgme_key_sig_t)second;
    if (!a || !b)
        return -1; /* this indicates that one item is a root item. */

    switch (sortby) {
    case KEY_SORT_KEYID: 
        cmpresult = strcmp (a->keyid, b->keyid);
        break;

    case KEY_SORT_CREATED:
        cmpresult = int_cmp (a->timestamp, b->timestamp);
        break;

    case KEY_SORT_ALGO:
        cmpresult = int_cmp (a->pubkey_algo, b->pubkey_algo);
        break;

    case KEY_SORT_VALIDITY:
        cmpresult = int_cmp (a->status, b->status);
        break;

    case SIG_SORT_EXPIRE:
        cmpresult = int_cmp (a->expires, a->expires);
        break;

    case SIG_SORT_CLASS:
        cmpresult = int_cmp (a->sig_class, b->sig_class);
        break;
    }
    return cmpresult;
}


/* Sort the signature list @sigl by @sortby. */
void
siglist_sort (listview_ctrl_t sigl, int sortby)
{
    listview_sort_items (sigl, sortby, siglist_cmp_cb);
}
1	/* wptSigList.cpp - Listview for key signatures
2	* Copyright (C) 2001-2006 Timo Schulz
3	* Copyright (C) 2005, 2006 g10 Code GmbH
4	*
5	* This file is part of WinPT.
6	*
7	* WinPT is free software; you can redistribute it and/or
8	* modify it under the terms of the GNU General Public License
9	* as published by the Free Software Foundation; either version 2
10	* of the License, or (at your option) any later version.
11	*
12	* WinPT is distributed in the hope that it will be useful,
13	* but WITHOUT ANY WARRANTY; without even the implied warranty of
14	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15	* General Public License for more details.
16	*
17	* You should have received a copy of the GNU General Public License
18	* along with WinPT; if not, write to the Free Software Foundation,
19	* Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20	*/
21
22	#ifdef HAVE_CONFIG_H
23	#include <config.h>
24	#endif
25
26	#include <windows.h>
27	#include <time.h>
28
29	#include "wptGPG.h"
30	#include "wptCommonCtl.h"
31	#include "wptKeylist.h"
32	#include "wptNLS.h"
33	#include "wptUTF8.h"
34	#include "wptErrors.h"
35	#include "wptTypes.h"
36	#include "wptW32API.h"
37
38
39	/* Is the given signature an user-id signature? */
40	#define IS_UID_CERT(_class) ((_class) >= 0x10 && (_class) <= 0x13)
41
42
43	/* Create a signature list control in @lv with the parent window
44	given in @ctrl.
45	Return value: 0 on success. */
46	static int
47	siglist_build (listview_ctrl_t * lv, HWND ctrl)
48	{
49	struct listview_ctrl_s *c;
50	struct listview_column_s implist[] = {
51	{0, 240, (char *)_("User ID")},
52	{1, 50, (char *)_("Valid")},
53	{2, 44, (char *)_("Class")},
54	{3, 68, (char *)_("Creation")},
55	{4, 80, (char *)_("Key ID")},
56	{5, 68, (char *)_("Expiration")},
57	{6, 56, (char *)_("Algorithm")},
58	{0, 0, NULL}
59	};
60	int j, rc = 0;
61
62	rc = listview_new (&c);
63	if (rc)
64	return rc;
65	c->ctrl = ctrl;
66	for (j=0; implist[j].fieldname != NULL; j++)
67	listview_add_column (c, &implist[j]);
68	listview_set_ext_style (c);
69	listview_del_all_items (c);
70	*lv = c;
71	return 0;
72	}
73
74
75	/* Delete the signature control in @lv. */
76	void
77	siglist_delete( listview_ctrl_t lv )
78	{
79	if (lv) {
80	listview_release (lv);
81	}
82	}
83
84
85	/* Indent the string in @old with the level @ilvl.
86	Return value: indented string. */
87	static char *
88	indent_string (const char * old, int ilvl)
89	{
90	char * p;
91	int i;
92
93	p = new char[strlen (old) + 1 + ilvl];
94	if (!p)
95	BUG (NULL);
96	for (i = 0; i < ilvl; i++)
97	p[i] = ' ';
98	strcpy (p+i, old);
99	return p;
100	}
101
102
103	/* Add an item at the given pos @pos with the opaque param @ks. */
104	int
105	add_keysig_item (listview_ctrl_t ctx, int pos, gpgme_key_sig_t ks)
106	{
107	LV_ITEM lvi;
108
109	memset (&lvi, 0, sizeof lvi);
110	lvi.iItem = pos;
111	lvi.lParam = (LPARAM)ks;
112	lvi.mask = LVIF_PARAM;
113	if (ListView_InsertItem (ctx->ctrl, &lvi) != pos)
114	return -1;
115	return 0;
116	}
117
118
119	/* Add an userid signature @ks from the userid @uid to the sig list
120	control @lv.
121	Return value: 0 on success. */
122	static int
123	siglist_add_key (listview_ctrl_t lv, gpgme_user_id_t uid,
124	gpgme_key_sig_t ks, int pos)
125	{
126	gpgme_key_t key=NULL;
127	char t[128];
128	const char *attr;
129	const char *s;
130	int key_attr, no_uid = 0;
131	int rc = 0;
132
133	if (ks && !IS_UID_CERT (ks->sig_class))
134	return 0;
135
136	rc = add_keysig_item (lv, pos, ks);
137	if (rc)
138	return rc;
139
140	attr = NULL;
141	if (!uid) {
142	get_pubkey (ks->keyid, &key);
143	if (key)
144	attr = key->uids->uid;
145	}
146	else
147	attr = uid->uid;
148	if (attr && strlen (attr)) {
149	char *uid_utf8 = utf8_to_native (attr);
150	char *p = uid? m_strdup (uid_utf8) : indent_string (uid_utf8, 2);
151	listview_add_sub_item (lv, pos, 0, p);
152	free (uid_utf8);
153	free_if_alloc (p);
154	}
155	else {
156	listview_add_sub_item (lv, pos, 0, _(" user ID not found"));
157	no_uid = 1;
158	}
159
160	if (uid)
161	return 0;
162
163	switch (gpgme_err_code (ks->status)) {
164	case GPG_ERR_NO_ERROR: s = "YES"; break;
165	case GPG_ERR_NO_PUBKEY: s = "NOKEY"; break;
166	case GPG_ERR_BAD_SIGNATURE:s = "NO"; break;
167	default: s = "ERROR"; break;
168	}
169	if (no_uid)
170	s = "NOKEY";
171	listview_add_sub_item (lv, pos, 1, s);
172
173	switch (ks->sig_class) {
174	case 0x10: strcpy (t, " "); break;
175	case 0x11: strcpy (t, "1"); break;
176	case 0x12: strcpy (t, "2"); break;
177	case 0x13: strcpy (t, "3"); break;
178	}
179
180	strcat (t, " ");
181	if (!ks->exportable)
182	strcat (t, "L");
183	/*if (key_attr & GPGME_SIGF_NREV)
184	strcat (t, "R");*/
185	listview_add_sub_item (lv, pos, 2, t);
186
187	key_attr = ks->timestamp;
188	if( key_attr ) {
189	s = get_key_created (key_attr);
190	listview_add_sub_item (lv, pos, 3, s);
191	}
192
193	attr = ks->keyid;
194	if (attr && strlen (attr) == 16) {
195	_snprintf (t, sizeof (t) -1, "0x%s", attr + 8);
196	listview_add_sub_item (lv, pos, 4, t);
197	}
198
199	key_attr = ks->expires;
200	if (key_attr) {
201	s = get_key_created (key_attr);
202	listview_add_sub_item (lv, pos, 5, s);
203	}
204
205	attr = get_key_pubalgo (ks->pubkey_algo);
206	if (attr)
207	listview_add_sub_item (lv, pos, 6, (char *)attr);
208
209	return 0;
210	}
211
212
213	/* Load a signature list with the signatures of the key with
214	the keyID @keyid. The parent window is in @ctrl.
215	Return value is the handle to the listview control. */
216	listview_ctrl_t
217	siglist_load (HWND ctrl, const char *keyid)
218	{
219	gpgme_key_t key;
220	gpgme_user_id_t u;
221	gpgme_key_sig_t s;
222	listview_ctrl_t lv;
223	int pos = 0;
224	int rc;
225
226	if (siglist_build (&lv, ctrl))
227	BUG (NULL);
228	rc = get_pubkey(keyid, &key);
229	if (rc)
230	BUG (NULL);
231
232	for (u=key->uids; u; u = u->next) {
233	siglist_add_key (lv, u, NULL, pos++);
234	for (s = u->signatures; s; s = s->next) {
235	if (!IS_UID_CERT (s->sig_class))
236	continue;
237	rc = siglist_add_key (lv, NULL, s, pos++);
238	if (rc)
239	break;
240	}
241	}
242	if (rc) {
243	siglist_delete (lv);
244	lv = NULL;
245	}
246	return lv;
247	}
248
249
250	/* Integer comparsion of @a and @b.
251	Return values: same as in strcmp. */
252	static inline int
253	int_cmp (int a, int b)
254	{
255	if (a == b) return 0;
256	else if (a > b) return 1;
257	else return -1;
258	return 0;
259	}
260
261
262	/* Sorting callback for the signature list. */
263	static int CALLBACK
264	siglist_cmp_cb (LPARAM first, LPARAM second, LPARAM sortby)
265	{
266	gpgme_key_sig_t a, b;
267	int cmpresult=0;
268
269	a = (gpgme_key_sig_t)first;
270	b = (gpgme_key_sig_t)second;
271	if (!a \|\| !b)
272	return -1; /* this indicates that one item is a root item. */
273
274	switch (sortby) {
275	case KEY_SORT_KEYID:
276	cmpresult = strcmp (a->keyid, b->keyid);
277	break;
278
279	case KEY_SORT_CREATED:
280	cmpresult = int_cmp (a->timestamp, b->timestamp);
281	break;
282
283	case KEY_SORT_ALGO:
284	cmpresult = int_cmp (a->pubkey_algo, b->pubkey_algo);
285	break;
286
287	case KEY_SORT_VALIDITY:
288	cmpresult = int_cmp (a->status, b->status);
289	break;
290
291	case SIG_SORT_EXPIRE:
292	cmpresult = int_cmp (a->expires, a->expires);
293	break;
294
295	case SIG_SORT_CLASS:
296	cmpresult = int_cmp (a->sig_class, b->sig_class);
297	break;
298	}
299	return cmpresult;
300	}
301
302
303	/* Sort the signature list @sigl by @sortby. */
304	void
305	siglist_sort (listview_ctrl_t sigl, int sortby)
306	{
307	listview_sort_items (sigl, sortby, siglist_cmp_cb);
308	}