2001-11-15 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 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
32 #define SKIP_TOKEN_OR_RETURN(a) do { \
33     while (*(a) && *(a) != ' ') (a)++; \
34     while (*(a) == ' ') (a)++; \
35     if (!*(a)) \
36         return; /* oops */ \
37 } while (0)
38
39 struct encrypt_result_s
40 {
41   int no_recipients;
42   GpgmeData xmlinfo;
43 };
44
45 void
46 _gpgme_release_encrypt_result (EncryptResult result)
47 {
48   if (!result)
49     return;
50   gpgme_data_release (result->xmlinfo);
51   xfree (result);
52 }
53
54 /* 
55  * Parse the args and save the information 
56  * in an XML structure.
57  * With args of NULL the xml structure is closed.
58  */
59 static void
60 append_xml_encinfo (GpgmeData *rdh, char *args)
61 {
62     GpgmeData dh;
63     char helpbuf[100];
64
65     if ( !*rdh ) {
66         if (gpgme_data_new (rdh)) {
67             return; /* fixme: We are ignoring out-of-core */
68         }
69         dh = *rdh;
70         _gpgme_data_append_string (dh, "<GnupgOperationInfo>\n");
71     }
72     else {
73         dh = *rdh;
74         _gpgme_data_append_string (dh, "  </encryption>\n");
75     }
76
77     if (!args) { /* just close the XML containter */
78         _gpgme_data_append_string (dh, "</GnupgOperationInfo>\n");
79         return;
80     }
81
82     _gpgme_data_append_string (dh, "  <encryption>\n"
83                                    "    <error>\n"
84                                    "      <invalidRecipient/>\n");
85     
86     sprintf (helpbuf, "      <reason>%d</reason>\n", atoi (args));
87     _gpgme_data_append_string (dh, helpbuf);
88     SKIP_TOKEN_OR_RETURN (args);
89
90     _gpgme_data_append_string (dh, "      <name>");
91     _gpgme_data_append_percentstring_for_xml (dh, args);
92     _gpgme_data_append_string (dh, "</name>\n"
93                                    "    </error>\n");
94 }
95
96
97
98
99
100 static void
101 encrypt_status_handler (GpgmeCtx ctx, GpgStatusCode code, char *args)
102 {
103     if (ctx->out_of_core)
104       return;
105     if (!ctx->result.encrypt)
106       {
107         ctx->result.encrypt = xtrycalloc (1, sizeof *ctx->result.encrypt);
108         if (!ctx->result.encrypt)
109           {
110             ctx->out_of_core = 1;
111             return;
112           }
113       }
114
115     switch (code) {
116       case STATUS_EOF:
117         if (ctx->result.encrypt->xmlinfo) {
118             append_xml_encinfo (&ctx->result.encrypt->xmlinfo, NULL);
119             _gpgme_set_op_info (ctx, ctx->result.encrypt->xmlinfo);
120             ctx->result.encrypt->xmlinfo = NULL;
121         }
122         break;
123
124       case STATUS_INV_RECP:
125         append_xml_encinfo (&ctx->result.encrypt->xmlinfo, args);
126         break;
127
128       case STATUS_NO_RECP:
129         ctx->result.encrypt->no_recipients = 1; /* i.e. no usable ones */
130         break;
131
132       default:
133         break;
134     }
135
136 }
137
138
139
140 GpgmeError
141 gpgme_op_encrypt_start ( GpgmeCtx c, GpgmeRecipients recp,
142                          GpgmeData plain, GpgmeData ciph )
143 {
144     int rc = 0;
145     int i;
146
147     fail_on_pending_request( c );
148     c->pending = 1;
149
150     _gpgme_release_result (c);
151     c->out_of_core = 0;
152
153     /* do some checks */
154     if ( !gpgme_recipients_count ( recp ) ) {
155         /* Fixme: In this case we should do symmentric encryption */
156         rc = mk_error (No_Recipients);
157         goto leave;
158     }
159         
160     /* create a process object */
161     _gpgme_gpg_release (c->gpg); c->gpg = NULL;
162     rc = _gpgme_gpg_new ( &c->gpg );
163     if (rc)
164         goto leave;
165
166     _gpgme_gpg_set_status_handler ( c->gpg, encrypt_status_handler, c );
167
168     /* build the commandline */
169     _gpgme_gpg_add_arg ( c->gpg, "--encrypt" );
170     if ( c->use_armor )
171         _gpgme_gpg_add_arg ( c->gpg, "--armor" );
172     for ( i=0; i < c->verbosity; i++ )
173         _gpgme_gpg_add_arg ( c->gpg, "--verbose" );
174     /* If we know that all recipients are valid (full or ultimate trust)
175      * we can suppress further checks */
176     if ( _gpgme_recipients_all_valid (recp) )
177         _gpgme_gpg_add_arg ( c->gpg, "--always-trust" );
178     
179     _gpgme_append_gpg_args_from_recipients ( recp, c->gpg );
180
181     /* Check the supplied data */
182     if ( gpgme_data_get_type (plain) == GPGME_DATA_TYPE_NONE ) {
183         rc = mk_error (No_Data);
184         goto leave;
185     }
186     _gpgme_data_set_mode (plain, GPGME_DATA_MODE_OUT );
187     if ( !ciph || gpgme_data_get_type (ciph) != GPGME_DATA_TYPE_NONE ) {
188         rc = mk_error (Invalid_Value);
189         goto leave;
190     }
191     _gpgme_data_set_mode (ciph, GPGME_DATA_MODE_IN );
192     /* Tell the gpg object about the data */
193     _gpgme_gpg_add_arg ( c->gpg, "--output" );
194     _gpgme_gpg_add_arg ( c->gpg, "-" );
195     _gpgme_gpg_add_data ( c->gpg, ciph, 1 );
196     _gpgme_gpg_add_arg ( c->gpg, "--" );
197     _gpgme_gpg_add_data ( c->gpg, plain, 0 );
198
199     /* and kick off the process */
200     rc = _gpgme_gpg_spawn ( c->gpg, c );
201
202  leave:
203     if (rc) {
204         c->pending = 0; 
205         _gpgme_gpg_release ( c->gpg ); c->gpg = NULL;
206     }
207     return rc;
208 }
209
210
211 /**
212  * gpgme_op_encrypt:
213  * @c: The context
214  * @recp: A set of recipients 
215  * @in: plaintext input
216  * @out: ciphertext output
217  * 
218  * This function encrypts @in to @out for all recipients from
219  * @recp.  Other parameters are take from the context @c.
220  * The function does wait for the result.
221  * 
222  * Return value:  0 on success or an errorcode. 
223  **/
224 GpgmeError
225 gpgme_op_encrypt ( GpgmeCtx c, GpgmeRecipients recp,
226                    GpgmeData in, GpgmeData out )
227 {
228     int err = gpgme_op_encrypt_start ( c, recp, in, out );
229     if ( !err ) {
230         gpgme_wait (c, 1);
231         if (!c->result.encrypt)
232             err = mk_error (General_Error);
233         else if (c->out_of_core)
234             err = mk_error (Out_Of_Core);
235         else {
236             if (c->result.encrypt->no_recipients) 
237                 err = mk_error (No_Recipients);
238         }
239         c->pending = 0;
240         /* Old gpg versions don't return status info for invalid
241          * recipients, so we simply check whether we got any output at
242          * all and if not assume that we don't have valid recipients
243          * */
244         if (!err && gpgme_data_get_type (out) == GPGME_DATA_TYPE_NONE)
245             err = mk_error (No_Recipients);
246     }
247     return err;
248 }
249
250
251
252
253
254
255