2001-12-16 Marcus Brinkmann <marcus@g10code.de>
[gpgme.git] / tests / gpgsm / t-keylist.c
1 /* t-keylist.c  - regression test
2  *      Copyright (C) 2000 Werner Koch (dd9jn)
3  *      Copyright (C) 2001 g10 Code GmbH
4  *
5  * This file is part of GPGME.
6  *
7  * GPGME is free software; you can redistribute it and/or modify
8  * it under the terms of the GNU General Public License as published by
9  * the Free Software Foundation; either version 2 of the License, or
10  * (at your option) any later version.
11  *
12  * GPGME 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
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with this program; if not, write to the Free Software
19  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
20  */
21
22 #include <stdio.h>
23 #include <stdlib.h>
24 #include <string.h>
25 #include <assert.h>
26
27 #include <gpgme.h>
28
29 #define fail_if_err(a) do { if(a) {                                       \
30                                fprintf (stderr, "%s:%d: GpgmeError %s\n", \
31                                 __FILE__, __LINE__, gpgme_strerror(a));   \
32                                 exit (1); }                               \
33                              } while(0)
34
35 static void
36 doit ( GpgmeCtx ctx, const char *pattern )
37 {
38     GpgmeError err;
39     GpgmeKey key;
40
41     err = gpgme_op_keylist_start (ctx, pattern, 0 );
42     fail_if_err (err);
43     
44     while ( !(err = gpgme_op_keylist_next ( ctx, &key )) ) {
45         char *p;
46         const char *s;
47         int i;
48
49         printf ("<!-- Begin key object (%p) -->\n", key );
50         p = gpgme_key_get_as_xml ( key );
51         if ( p ) {
52             fputs ( p, stdout );
53             free (p);
54         }
55         else
56             fputs("<!-- Ooops: gpgme_key_get_as_xml failed -->\n", stdout );
57
58         
59         for (i=0; ; i++ ) {
60             s = gpgme_key_get_string_attr (key, GPGME_ATTR_KEYID, NULL, i );
61             if (!s)
62                 break;
63             printf ("<!-- keyid.%d=%s -->\n", i, s );
64             s = gpgme_key_get_string_attr (key, GPGME_ATTR_ALGO, NULL, i );
65             printf ("<!-- algo.%d=%s -->\n", i, s );
66             s = gpgme_key_get_string_attr (key, GPGME_ATTR_KEY_CAPS, NULL, i );
67             printf ("<!-- caps.%d=%s -->\n", i, s );
68         }
69         for (i=0; ; i++ ) {
70             s = gpgme_key_get_string_attr (key, GPGME_ATTR_NAME, NULL, i );
71             if (!s)
72                 break;
73             printf ("<!-- name.%d=%s -->\n", i, s );
74             s = gpgme_key_get_string_attr (key, GPGME_ATTR_EMAIL, NULL, i );
75             printf ("<!-- email.%d=%s -->\n", i, s );
76             s = gpgme_key_get_string_attr (key, GPGME_ATTR_COMMENT, NULL, i );
77             printf ("<!-- comment.%d=%s -->\n", i, s );
78         }
79         
80         fputs ("<!-- usable for:", stdout );
81         if ( gpgme_key_get_ulong_attr (key, GPGME_ATTR_CAN_ENCRYPT, NULL, 0 ))
82             fputs (" encryption", stdout);
83         if ( gpgme_key_get_ulong_attr (key, GPGME_ATTR_CAN_SIGN, NULL, 0 ))
84             fputs (" signing", stdout);
85         if ( gpgme_key_get_ulong_attr (key, GPGME_ATTR_CAN_CERTIFY, NULL, 0 ))
86             fputs (" certification", stdout);
87         fputs (" -->\n", stdout );
88
89         printf ("<!-- End key object (%p) -->\n", key );
90         gpgme_key_release (key);
91     }
92     if ( err != GPGME_EOF )
93         fail_if_err (err);
94 }
95
96
97 /* 
98  * Check that there are no problems when we are using two context for
99  * listing keys. 
100  */
101 static void
102 check_two_contexts (void)
103 {
104     GpgmeError err;
105     GpgmeCtx ctx1, ctx2;
106     GpgmeKey key;
107         
108     err = gpgme_new(&ctx1);
109     fail_if_err (err);
110     gpgme_set_protocol (ctx1, GPGME_PROTOCOL_CMS);
111
112     err = gpgme_op_keylist_start(ctx1, "", 1);
113     fail_if_err (err);
114     err = gpgme_new(&ctx2); fail_if_err (err);
115     gpgme_set_protocol (ctx2, GPGME_PROTOCOL_CMS);
116     err = gpgme_op_keylist_start(ctx2, "", 1);
117     fail_if_err (err);
118
119     while ( (err=gpgme_op_keylist_next(ctx2, &key)) != GPGME_EOF) {
120         gpgme_key_release (key);
121     }
122     if (err != GPGME_EOF)
123         fail_if_err (err);
124     while ( (err=gpgme_op_keylist_next(ctx1, &key)) != GPGME_EOF) {
125         gpgme_key_release (key);
126     }
127     if (err != GPGME_EOF)
128         fail_if_err (err);
129 }
130
131 int 
132 main (int argc, char **argv )
133 {
134     GpgmeCtx ctx;
135     GpgmeError err;
136     int loop = 0;
137     const char *pattern;
138     
139     if( argc ) {
140         argc--; argv++;
141     }
142     
143     if (argc && !strcmp( *argv, "--loop" ) ) {
144         loop = 1;
145         argc--; argv++;
146     }
147     pattern = argc? *argv : NULL;
148
149     err = gpgme_check_engine();
150     fail_if_err (err);
151
152     err = gpgme_new (&ctx);
153     fail_if_err (err);
154     gpgme_set_protocol (ctx, GPGME_PROTOCOL_CMS);
155
156     gpgme_set_keylist_mode (ctx, 1); /* no validity calculation */
157     do {
158         fprintf (stderr, "** pattern=`%s'\n", pattern );
159         doit ( ctx, pattern );
160     } while ( loop );
161     gpgme_release (ctx);
162
163     check_two_contexts ();
164
165     return 0;
166 }