gpgme/
[gpgme.git] / tests / gpg / t-edit.c
1 /* t-edit.c  - regression test
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 <stdio.h>
23 #include <stdlib.h>
24 #include <string.h>
25 #include <assert.h>
26 #include <errno.h>
27
28 #include <gpgme.h>
29
30 struct passphrase_cb_info_s {
31     GpgmeCtx c;
32     int did_it;
33 };
34
35
36 #define fail_if_err(a) do { if(a) { int my_errno = errno; \
37             fprintf (stderr, "%s:%d: GpgmeError %s\n", \
38                  __FILE__, __LINE__, gpgme_strerror(a));   \
39             if ((a) == GPGME_File_Error)                       \
40                    fprintf (stderr, "\terrno=`%s'\n", strerror (my_errno)); \
41                    exit (1); }                               \
42                              } while(0)
43
44 static void
45 flush_data (GpgmeData dh)
46 {
47   char buf[100];
48   int ret;
49   
50   ret = gpgme_data_seek (dh, 0, SEEK_SET);
51   if (ret)
52     fail_if_err (GPGME_File_Error);
53   while ((ret = gpgme_data_read (dh, buf, 100)) > 0)
54     fwrite (buf, ret, 1, stdout);
55   if (ret < 0)
56     fail_if_err (GPGME_File_Error);
57 }
58
59
60 static const char *
61 passphrase_cb (void *opaque, const char *desc, void **r_hd)
62 {
63   const char *pass;
64
65   if (!desc)
66     {
67       /* cleanup by looking at *r_hd */
68       return NULL;
69     }
70
71   pass = "abc";
72   fprintf (stderr, "%% requesting passphrase for `%s': ", desc);
73   fprintf (stderr, "sending `%s'\n", pass );
74
75   return pass;
76 }
77
78
79 GpgmeError
80 edit_fnc (void *opaque, GpgmeStatusCode status, const char *args, const char **result)
81 {
82   GpgmeData out = (GpgmeData) opaque;
83
84   fputs ("[-- Response --]\n", stdout);
85   flush_data (out); 
86
87   fprintf (stdout, "[-- Code: %i, %s --]\n", status, args);
88  
89   if (result)
90     {
91       if (!strcmp (args, "keyedit.prompt"))
92         {
93           static int step = 0;
94
95           switch (step)
96             {
97             case 0:
98               *result = "fpr";
99               break;
100             case 1:
101               *result = "expire";
102               break;
103             default:
104               *result = "quit";
105               break;
106             }
107           step++;
108         }
109       else if (!strcmp (args, "keyedit.save.okay"))
110         {
111           *result = "Y";
112         }
113       else if (!strcmp (args, "keygen.valid"))
114         {
115           *result = "0";
116         }
117     }
118
119   return 0;
120 }
121
122
123 int 
124 main (int argc, char **argv)
125 {
126   GpgmeCtx ctx;
127   GpgmeError err;
128   GpgmeData out = NULL;
129   GpgmeKey key = NULL;
130   struct passphrase_cb_info_s info;
131   const char *pattern = "Alpha";
132   char *p;
133
134   do
135     {
136       err = gpgme_new (&ctx);
137       fail_if_err (err);
138       err = gpgme_data_new (&out);
139       fail_if_err (err);
140
141       p = getenv("GPG_AGENT_INFO");
142       if (!(p && strchr (p, ':')))
143         {
144           memset (&info, 0, sizeof info);
145           info.c = ctx;
146           gpgme_set_passphrase_cb (ctx, passphrase_cb, &info);
147         } 
148
149       err = gpgme_op_keylist_start (ctx, pattern, 0);
150       fail_if_err (err);
151       err = gpgme_op_keylist_next (ctx, &key);
152       fail_if_err (err);
153       err = gpgme_op_keylist_end (ctx);
154       fail_if_err (err);
155
156       p = gpgme_key_get_as_xml (key);
157       if (p)
158         {
159           fputs (p, stdout);
160           free (p);
161         }
162
163       err = gpgme_op_edit (ctx, key, edit_fnc, out, out);
164       fail_if_err (err);
165
166       fputs ("[-- Last response --]\n", stdout);
167       flush_data (out);
168
169       gpgme_data_release (out);
170       gpgme_key_release (key);
171       gpgme_release (ctx);
172     }
173   while (argc > 1 && !strcmp( argv[1], "--loop"));
174
175   return 0;
176 }
177
178