doc/
[gpgme.git] / tests / gpg / t-genkey.c
1 /* t-genkey.c  - regression test
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 <stdio.h>
23 #include <stdlib.h>
24 #include <string.h>
25 #include <assert.h>
26
27 #include <gpgme.h>
28
29 #define fail_if_err(a) do { if(a) {                                       \
30                                fprintf (stderr, "%s:%d: GpgmeError %s\n", \
31                                 __FILE__, __LINE__, gpgme_strerror(a));   \
32                                 exit (1); }                               \
33                              } while(0)
34
35
36 static void
37 progress ( void *self, const char *what, int type, int current, int total)
38 {
39     fprintf (stderr, "progress `%s' %d %d %d\n", what, type, current, total);
40 }
41
42
43 int 
44 main (int argc, char **argv )
45 {
46     GpgmeCtx ctx;
47     GpgmeError err;
48     const char *format;
49     char *parms;
50     int count = 0;
51
52   do {
53     err = gpgme_new (&ctx);
54     fail_if_err (err);
55
56     gpgme_set_progress_cb (ctx, progress, NULL);
57
58     format = "<GnupgKeyParms format=\"internal\">\n"
59              "Key-Type: DSA\n"
60              "Key-Length: 1024\n"
61              "Subkey-Type: ELG-E\n"
62              "Subkey-Length: 1024\n"
63              "Name-Real: Joe Tester\n"
64              "Name-Comment: (pp=abc,try=%d)\n"
65              "Name-Email: joe@foo.bar\n"
66              "Expire-Date: 0\n"
67              "Passphrase: abc\n"
68              "</GnupgKeyParms>\n";
69     parms = malloc ( strlen (format) + 1 + 20 );
70     if (!parms)
71         exit (8);
72     sprintf (parms, format, ++count );
73     err = gpgme_op_genkey (ctx, parms, NULL, NULL, NULL);
74     fail_if_err (err);
75     free (parms);
76
77     gpgme_release (ctx);
78   } while ( argc > 1 && !strcmp( argv[1], "--loop" ) );
79    
80     return 0;
81 }
82
83
84