core,w32: Fix minor potential memleak
[gpgme.git] / tests / run-sign.c
1 /* run-sign.c  - Helper to perform a sign operation
2  * Copyright (C) 2009 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 <https://gnu.org/licenses/>.
18  * SPDX-License-Identifier: LGPL-2.1-or-later
19  */
20
21 /* We need to include config.h so that we know whether we are building
22    with large file system (LFS) support. */
23 #ifdef HAVE_CONFIG_H
24 #include <config.h>
25 #endif
26
27 #include <stdlib.h>
28 #include <stdio.h>
29 #include <string.h>
30
31 #include <gpgme.h>
32
33 #define PGM "run-sign"
34
35 #include "run-support.h"
36
37
38 static int verbose;
39
40 static gpg_error_t
41 status_cb (void *opaque, const char *keyword, const char *value)
42 {
43   (void)opaque;
44   printf ("status_cb: %s %s\n", keyword, value);
45   return 0;
46 }
47
48
49 static void
50 print_result (gpgme_sign_result_t result, gpgme_sig_mode_t type)
51 {
52   gpgme_invalid_key_t invkey;
53   gpgme_new_signature_t sig;
54
55   (void)type;
56
57   for (invkey = result->invalid_signers; invkey; invkey = invkey->next)
58     printf ("Signing key `%s' not used: %s <%s>\n",
59             nonnull (invkey->fpr),
60             gpg_strerror (invkey->reason), gpg_strsource (invkey->reason));
61
62   for (sig = result->signatures; sig; sig = sig->next)
63     {
64       printf ("Key fingerprint: %s\n", nonnull (sig->fpr));
65       printf ("Signature type : %d\n", sig->type);
66       printf ("Public key algo: %d\n", sig->pubkey_algo);
67       printf ("Hash algo .....: %d\n", sig->hash_algo);
68       printf ("Creation time .: %ld\n", sig->timestamp);
69       printf ("Sig class .....: 0x%u\n", sig->sig_class);
70     }
71 }
72
73
74
75 static int
76 show_usage (int ex)
77 {
78   fputs ("usage: " PGM " [options] FILE\n\n"
79          "Options:\n"
80          "  --verbose        run in verbose mode\n"
81          "  --status         print status lines from the backend\n"
82          "  --openpgp        use the OpenPGP protocol (default)\n"
83          "  --cms            use the CMS protocol\n"
84          "  --uiserver       use the UI server\n"
85          "  --loopback       use a loopback pinentry\n"
86          "  --key NAME       use key NAME for signing\n"
87          "  --sender MBOX    use MBOX as sender address\n"
88          , stderr);
89   exit (ex);
90 }
91
92
93 int
94 main (int argc, char **argv)
95 {
96   int last_argc = -1;
97   gpgme_error_t err;
98   gpgme_ctx_t ctx;
99   const char *key_string = NULL;
100   gpgme_protocol_t protocol = GPGME_PROTOCOL_OpenPGP;
101   gpgme_sig_mode_t sigmode = GPGME_SIG_MODE_NORMAL;
102   gpgme_data_t in, out;
103   gpgme_sign_result_t result;
104   int print_status = 0;
105   int use_loopback = 0;
106   const char *sender = NULL;
107   const char *s;
108
109   if (argc)
110     { argc--; argv++; }
111
112   while (argc && last_argc != argc )
113     {
114       last_argc = argc;
115       if (!strcmp (*argv, "--"))
116         {
117           argc--; argv++;
118           break;
119         }
120       else if (!strcmp (*argv, "--help"))
121         show_usage (0);
122       else if (!strcmp (*argv, "--verbose"))
123         {
124           verbose = 1;
125           argc--; argv++;
126         }
127       else if (!strcmp (*argv, "--status"))
128         {
129           print_status = 1;
130           argc--; argv++;
131         }
132       else if (!strcmp (*argv, "--openpgp"))
133         {
134           protocol = GPGME_PROTOCOL_OpenPGP;
135           argc--; argv++;
136         }
137       else if (!strcmp (*argv, "--cms"))
138         {
139           protocol = GPGME_PROTOCOL_CMS;
140           argc--; argv++;
141         }
142       else if (!strcmp (*argv, "--uiserver"))
143         {
144           protocol = GPGME_PROTOCOL_UISERVER;
145           argc--; argv++;
146         }
147       else if (!strcmp (*argv, "--key"))
148         {
149           argc--; argv++;
150           if (!argc)
151             show_usage (1);
152           key_string = *argv;
153           argc--; argv++;
154         }
155       else if (!strcmp (*argv, "--sender"))
156         {
157           argc--; argv++;
158           if (!argc)
159             show_usage (1);
160           sender = *argv;
161           argc--; argv++;
162         }
163       else if (!strcmp (*argv, "--loopback"))
164         {
165           use_loopback = 1;
166           argc--; argv++;
167         }
168       else if (!strncmp (*argv, "--", 2))
169         show_usage (1);
170
171     }
172
173   if (argc != 1)
174     show_usage (1);
175
176   if (key_string && protocol == GPGME_PROTOCOL_UISERVER)
177     {
178       fprintf (stderr, PGM ": ignoring --key in UI-server mode\n");
179       key_string = NULL;
180     }
181
182   init_gpgme (protocol);
183
184   err = gpgme_new (&ctx);
185   fail_if_err (err);
186   gpgme_set_protocol (ctx, protocol);
187   gpgme_set_armor (ctx, 1);
188   if (print_status)
189     gpgme_set_status_cb (ctx, status_cb, NULL);
190   if (use_loopback)
191     gpgme_set_pinentry_mode (ctx, GPGME_PINENTRY_MODE_LOOPBACK);
192
193   if (key_string)
194     {
195       gpgme_key_t akey;
196
197       err = gpgme_get_key (ctx, key_string, &akey, 1);
198       if (err)
199         {
200           exit (1);
201         }
202       err = gpgme_signers_add (ctx, akey);
203       fail_if_err (err);
204       gpgme_key_unref (akey);
205     }
206
207   if (sender)
208     {
209       err = gpgme_set_sender (ctx, sender);
210       fail_if_err (err);
211     }
212
213   err = gpgme_data_new_from_file (&in, *argv, 1);
214   if (err)
215     {
216       fprintf (stderr, PGM ": error reading `%s': %s\n",
217                *argv, gpg_strerror (err));
218       exit (1);
219     }
220
221   err = gpgme_data_new (&out);
222   fail_if_err (err);
223
224   err = gpgme_op_sign (ctx, in, out, sigmode);
225   result = gpgme_op_sign_result (ctx);
226   if (result)
227     print_result (result, sigmode);
228   if (err)
229     {
230       fprintf (stderr, PGM ": signing failed: %s\n", gpg_strerror (err));
231       exit (1);
232     }
233
234   if ((s = gpgme_get_ctx_flag (ctx, "redraw")) && *s)
235     fputs ("Screen redraw suggested\n", stdout);
236
237   fputs ("Begin Output:\n", stdout);
238   print_data (out);
239   fputs ("End Output.\n", stdout);
240   gpgme_data_release (out);
241
242   gpgme_data_release (in);
243
244   gpgme_release (ctx);
245   return 0;
246 }