new debug helper program
[gpgme.git] / tests / gpgsm / cms-keylist.c
1 /* cms-keylist.c  - Helper to show a key listing.
2    Copyright (C) 2008 g10 Code GmbH
3
4    This file is part of GPGME.
5  
6    GPGME is free software; you can redistribute it and/or modify it
7    under the terms of the GNU Lesser General Public License as
8    published by the Free Software Foundation; either version 2.1 of
9    the License, or (at your option) any later version.
10    
11    GPGME is distributed in the hope that it will be useful, but
12    WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14    Lesser General Public License for more details.
15    
16    You should have received a copy of the GNU Lesser General Public
17    License along with this program; if not, see <http://www.gnu.org/licenses/>.
18 */
19
20 /* We need to include config.h so that we know whether we are building
21    with large file system (LFS) support. */
22 #ifdef HAVE_CONFIG_H
23 #include <config.h>
24 #endif
25
26 #include <stdlib.h>
27 #include <stdio.h>
28 #include <string.h>
29
30 #include <gpgme.h>
31
32 #define PGM "cms-keylist"
33
34 #include "t-support.h"
35
36 static const char *
37 nonnull (const char *s)
38 {
39   return s? s :"[none]";
40 }
41
42
43 int 
44 main (int argc, char **argv)
45 {
46   gpgme_error_t err;
47   gpgme_ctx_t ctx;
48   gpgme_key_t key;
49   gpgme_keylist_result_t result;
50
51   if (argc)
52     { argc--; argv++; }
53
54   if (argc > 1)
55     {
56       fputs ("usage: " PGM " [USERID]\n", stderr);
57       exit (1);
58     }
59
60   init_gpgme (GPGME_PROTOCOL_CMS);
61
62   err = gpgme_new (&ctx);
63   fail_if_err (err);
64   gpgme_set_protocol (ctx, GPGME_PROTOCOL_CMS);
65
66   err = gpgme_op_keylist_start (ctx, argc? argv[0]:NULL, 0);
67   fail_if_err (err);
68     
69   while (!(err = gpgme_op_keylist_next (ctx, &key)))
70     {
71       gpgme_user_id_t uid;
72       int nuids;
73       
74       for (nuids=0, uid=key->uids; uid; uid = uid->next)
75         nuids++;
76
77       printf ("serial  : %s\n", nonnull (key->issuer_serial));
78       printf ("issuer  : %s\n", nonnull (key->issuer_name));
79       printf ("chain-id: %s\n", nonnull (key->chain_id));
80       printf ("caps    : %s%s%s%s\n",
81               key->can_encrypt? "e":"",
82               key->can_sign? "s":"",
83               key->can_certify? "c":"",
84               key->can_authenticate? "a":"");
85       printf ("flags   :%s%s%s%s%s%s\n",
86               key->secret? " secret":"",
87               key->revoked? " revoked":"",
88               key->expired? " expired":"",
89               key->disabled? " disabled":"",
90               key->invalid? " invalid":"",
91               key->is_qualified? " qualifid":"");
92       for (nuids=0, uid=key->uids; uid; uid = uid->next, nuids++)
93         {
94           printf ("userid %d: %s\n", nuids, nonnull(uid->uid));
95           printf ("valid  %d: %s\n", nuids, 
96                   uid->validity == GPGME_VALIDITY_UNKNOWN? "unknown":
97                   uid->validity == GPGME_VALIDITY_UNDEFINED? "undefined":
98                   uid->validity == GPGME_VALIDITY_NEVER? "never":
99                   uid->validity == GPGME_VALIDITY_MARGINAL? "marginal":
100                   uid->validity == GPGME_VALIDITY_FULL? "full":
101                   uid->validity == GPGME_VALIDITY_ULTIMATE? "ultimate": "[?]");
102         }
103
104       putchar ('\n');
105
106       gpgme_key_unref (key);
107     }
108   if (gpg_err_code (err) != GPG_ERR_EOF)
109     fail_if_err (err);
110   err = gpgme_op_keylist_end (ctx);
111   fail_if_err (err);
112
113   result = gpgme_op_keylist_result (ctx);
114   if (result->truncated)
115     {
116       fprintf (stderr, PGM ": key listing unexpectedly truncated\n");
117       exit (1);
118     }
119
120   gpgme_release (ctx);
121   return 0;
122 }