2002-10-10 Marcus Brinkmann <marcus@g10code.de>
[gpgme.git] / gpgme / encrypt.c
1 /* encrypt.c -  encrypt functions
2  *      Copyright (C) 2000 Werner Koch (dd9jn)
3  *      Copyright (C) 2001, 2002 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 <config.h>
23 #include <stdio.h>
24 #include <stdlib.h>
25 #include <string.h>
26 #include <assert.h>
27
28 #include "util.h"
29 #include "context.h"
30 #include "ops.h"
31 #include "wait.h"
32
33 #define SKIP_TOKEN_OR_RETURN(a) do { \
34     while (*(a) && *(a) != ' ') (a)++; \
35     while (*(a) == ' ') (a)++; \
36     if (!*(a)) \
37         return; /* oops */ \
38 } while (0)
39
40 struct encrypt_result_s
41 {
42   int no_valid_recipients;
43   int invalid_recipients;
44   GpgmeData xmlinfo;
45 };
46
47 void
48 _gpgme_release_encrypt_result (EncryptResult result)
49 {
50   if (!result)
51     return;
52   gpgme_data_release (result->xmlinfo);
53   free (result);
54 }
55
56 /* 
57  * Parse the args and save the information 
58  * in an XML structure.
59  * With args of NULL the xml structure is closed.
60  */
61 static void
62 append_xml_encinfo (GpgmeData *rdh, char *args)
63 {
64   GpgmeData dh;
65   char helpbuf[100];
66
67   if (!*rdh)
68     {
69       if (gpgme_data_new (rdh))
70         return; /* FIXME: We are ignoring out-of-core.  */
71       dh = *rdh;
72       _gpgme_data_append_string (dh, "<GnupgOperationInfo>\n");
73     }
74   else
75     {
76       dh = *rdh;
77       _gpgme_data_append_string (dh, "  </encryption>\n");
78     }
79
80   if (!args)
81     {
82       /* Just close the XML containter.  */
83       _gpgme_data_append_string (dh, "</GnupgOperationInfo>\n");
84       return;
85     }
86
87   _gpgme_data_append_string (dh, "  <encryption>\n"
88                              "    <error>\n"
89                              "      <invalidRecipient/>\n");
90     
91   sprintf (helpbuf, "      <reason>%d</reason>\n", atoi (args));
92   _gpgme_data_append_string (dh, helpbuf);
93   SKIP_TOKEN_OR_RETURN (args);
94
95   _gpgme_data_append_string (dh, "      <name>");
96   _gpgme_data_append_percentstring_for_xml (dh, args);
97   _gpgme_data_append_string (dh, "</name>\n"
98                              "    </error>\n");
99 }
100
101
102 static void
103 status_handler_finish (GpgmeCtx ctx)
104 {
105   if (ctx->result.encrypt->xmlinfo)
106     {
107       append_xml_encinfo (&ctx->result.encrypt->xmlinfo, NULL);
108       _gpgme_set_op_info (ctx, ctx->result.encrypt->xmlinfo);
109       ctx->result.encrypt->xmlinfo = NULL;
110     }
111   if (ctx->error)
112     ; /* already set by kludge in engine-gpgsm */
113   else if (ctx->result.encrypt->no_valid_recipients) 
114     ctx->error = mk_error (No_Recipients);
115   else if (ctx->result.encrypt->invalid_recipients) 
116     ctx->error = mk_error (Invalid_Recipients);
117 }
118
119 void
120 _gpgme_encrypt_status_handler (GpgmeCtx ctx, GpgmeStatusCode code, char *args)
121 {
122   if (ctx->error)
123     {
124       if (ctx->result.encrypt) /* check that we have allocated it. */
125         status_handler_finish (ctx);
126       return;
127     }
128   test_and_allocate_result (ctx, encrypt);
129
130   switch (code)
131     {
132     case GPGME_STATUS_EOF:
133       status_handler_finish (ctx);
134       break;
135
136     case GPGME_STATUS_INV_RECP:
137       ctx->result.encrypt->invalid_recipients++;
138       append_xml_encinfo (&ctx->result.encrypt->xmlinfo, args);
139       break;
140
141     case GPGME_STATUS_NO_RECP:
142       ctx->result.encrypt->no_valid_recipients = 1;
143       break;
144
145     default:
146       break;
147     }
148 }
149
150
151 void
152 _gpgme_encrypt_sym_status_handler (GpgmeCtx ctx, GpgmeStatusCode code, char *args)
153 {
154   _gpgme_passphrase_status_handler (ctx, code, args);
155 }
156
157
158 static GpgmeError
159 _gpgme_op_encrypt_start (GpgmeCtx ctx, int synchronous,
160                          GpgmeRecipients recp, GpgmeData plain, GpgmeData ciph)
161 {
162   GpgmeError err = 0;
163   int symmetric = 0;
164
165   /* Do some checks.  */
166   if (!recp)
167     symmetric = 1;
168   else if (!gpgme_recipients_count (recp))
169     {
170       err = mk_error (No_Recipients);
171       goto leave;
172     }
173
174   err = _gpgme_op_reset (ctx, synchronous);
175   if (err)
176     goto leave;
177
178   if (symmetric)
179     {
180       err = _gpgme_passphrase_start (ctx);
181       if (err)
182         goto leave;
183     }
184
185   _gpgme_engine_set_status_handler (ctx->engine,
186                                     symmetric
187                                     ? _gpgme_encrypt_sym_status_handler
188                                     : _gpgme_encrypt_status_handler,
189                                     ctx);
190   _gpgme_engine_set_verbosity (ctx->engine, ctx->verbosity);
191
192   /* Check the supplied data */
193   if (!plain)
194     {
195       err = mk_error (No_Data);
196       goto leave;
197     }
198   if (!ciph)
199     {
200       err = mk_error (Invalid_Value);
201       goto leave;
202     }
203
204   err = _gpgme_engine_op_encrypt (ctx->engine, recp, plain, ciph, ctx->use_armor);
205
206
207   if (!err)     /* And kick off the process.  */
208     err = _gpgme_engine_start (ctx->engine, ctx);
209
210  leave:
211   if (err)
212     {
213       ctx->pending = 0; 
214       _gpgme_engine_release (ctx->engine);
215       ctx->engine = NULL;
216     }
217   return err;
218 }
219
220
221 GpgmeError
222 gpgme_op_encrypt_start (GpgmeCtx ctx, GpgmeRecipients recp, GpgmeData plain,
223                         GpgmeData ciph)
224 {
225   return _gpgme_op_encrypt_start (ctx, 0, recp, plain, ciph);
226 }
227
228
229 /**
230  * gpgme_op_encrypt:
231  * @c: The context
232  * @recp: A set of recipients 
233  * @in: plaintext input
234  * @out: ciphertext output
235  * 
236  * This function encrypts @in to @out for all recipients from
237  * @recp.  Other parameters are take from the context @c.
238  * The function does wait for the result.
239  * 
240  * Return value:  0 on success or an errorcode. 
241  **/
242 GpgmeError
243 gpgme_op_encrypt (GpgmeCtx ctx, GpgmeRecipients recp,
244                   GpgmeData plain, GpgmeData cipher)
245 {
246   int err = _gpgme_op_encrypt_start (ctx, 1, recp, plain, cipher);
247   if (!err)
248     err = _gpgme_wait_one (ctx);
249   return err;
250 }