initially checkin
[gnupg.git] / g10 / g10.c
1 /* g10.c - The G10 re-install utility
2  *      Copyright (c) 1997 by Werner Koch (dd9jn)
3  *
4  * This file is part of G10.
5  *
6  * G10 is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * G10 is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
19  */
20
21 #include <config.h>
22 #include <stdio.h>
23 #include <stdlib.h>
24
25 #include "packet.h"
26 #include "iobuf.h"
27 #include "memory.h"
28 #include "util.h"
29 #include "main.h"
30 #include "options.h"
31 #include "keydb.h"
32 #include "mpi.h"
33 #include "cipher.h"
34
35
36 const char *
37 strusage( int level )
38 {
39     const char *p;
40     switch( level ) {
41       case 10:
42       case 0:   p = "g10 - v" VERSION "; "
43                     "Copyright 1997 Werner Koch (dd9jn)" ; break;
44       case 13:  p = "g10"; break;
45       case 14:  p = VERSION; break;
46       case 1:
47       case 11:  p = "Usage: g10 [options] [files] (-h for help)";
48                 break;
49       case 2:
50       case 12:  p =
51     "\nSyntax: g10 [options] [files]\n"
52     "sign, check, encrypt or decrypt\n"
53     "default operation depends on the input data\n";
54         break;
55       default:  p = default_strusage(level);
56     }
57     return p;
58 }
59
60 static void
61 set_debug(void)
62 {
63     if( opt.debug & DBG_MEMORY_VALUE )
64         memory_debug_mode = 1;
65     if( opt.debug & DBG_MEMSTAT_VALUE )
66         memory_stat_debug_mode = 1;
67     if( opt.debug & DBG_MPI_VALUE )
68         mpi_debug_mode = 1;
69     if( opt.debug & DBG_CIPHER_VALUE )
70         cipher_debug_mode = 1;
71 }
72
73
74 int
75 main( int argc, char **argv )
76 {
77     static ARGPARSE_OPTS opts[] = {
78     { 'a', "armor",     0, "create ascii armored output"},
79     { 'v', "verbose",   0, "verbose" },
80     { 'z', NULL,        1, "set compress level (0 disables)" },
81     { 'b', "batch",     0, "batch mode: never ask" },
82     { 'n', "dry-run",   0, "don't make any changes" },
83     { 'c', "symmetric", 0, "do only a symmetric encryption" },
84     { 'o', "output",    2, "use as output file" },
85     { 501, "yes",       0, "assume yes on most questions"},
86     { 502, "no",        0, "assume no on most questions"},
87     { 503, "make-key",  0, "generate a new key pair" },
88     { 504, "add-key",   0, "add key to the public keyring" },
89     { 505, "delete-key",0, "remove key from public keyring" },
90     { 506, "sign-key"  ,0, "make a signature on a key in the keyring" },
91     { 507, "store",     0, "store only" },
92     { 508, "check-key" ,0, "check signatures on a key in the keyring" },
93     { 509, "keyring"   ,2, "add this keyring to the list of keyrings" },
94     { 's', "sign",      0, "make a signature"},
95     { 'e', "encrypt",   0, "encrypt data" },
96     { 'd', "decrypt",   0, "decrypt data (default)" },
97     { 'c', "check",     0, "check a signature (default)" },
98     { 'l', "local-user",2, "use this user-id to sign or decrypt" },
99     { 'r', "remote-user", 2, "use this user-id for encryption" },
100     { 510, "debug"     ,4|16, "set debugging flags" },
101     { 511, "debug-all" ,0, "enable full debugging"},
102     { 512, "cache-all" ,0, "hold everything in memory"},
103     { 513, "gen-prime" , 1, "generate a prime of length n" },
104     { 514, "gen-key"   , 0, "generate a key pair" },
105     {0} };
106     ARGPARSE_ARGS pargs = { &argc, &argv, 0 };
107     IOBUF a;
108     int rc;
109     enum { aNull, aSym, aStore, aEncr, aPrimegen, aKeygen,
110     } action = aNull;
111     const char *fname, *fname_print;
112     STRLIST sl, remusr= NULL;
113     int nrings=0;
114
115     opt.compress = -1; /* defaults to default compression level */
116     while( arg_parse( &pargs, opts) ) {
117         switch( pargs.r_opt ) {
118           case 'v': opt.verbose++; break;
119           case 'z':
120             opt.compress = pargs.r.ret_int;
121             break;
122           case 'a': opt.armor = 1; break;
123           case 'c': action = aSym; break;
124           case 'e': action = aEncr; break;
125           case 'o': opt.outfile = pargs.r.ret_str;
126                     if( opt.outfile[0] == '-' && !opt.outfile[1] )
127                         opt.outfile_is_stdout = 1;
128                     break;
129           case 'b': opt.batch = 1; break;
130           case 501: opt.answer_yes = 1; break;
131           case 502: opt.answer_no = 1; break;
132           case 507: action = aStore; break;
133           case 508: opt.check_sigs = 1; break;
134           case 509: add_keyring(pargs.r.ret_str); nrings++; break;
135           case 510: opt.debug |= pargs.r.ret_ulong; break;
136           case 511: opt.debug = ~0; break;
137           case 512: opt.cache_all = 1; break;
138           case 'r': /* store the remote users */
139             sl = m_alloc( sizeof *sl + strlen(pargs.r.ret_str));
140             strcpy(sl->d, pargs.r.ret_str);
141             sl->next = remusr;
142             remusr = sl;
143             break;
144           case 513: action = aPrimegen; break;
145           case 514: action = aKeygen; break;
146           default : pargs.err = 2; break;
147         }
148     }
149     set_debug();
150     if( opt.verbose > 1 )
151         set_packet_list_mode(1);
152
153     if( !nrings ) { /* add default rings */
154         add_keyring("../keys/ring.pgp");
155         add_keyring("../keys/pubring.g10");
156     }
157
158     if( argc ) {
159         fname_print = fname = *argv;
160     }
161     else {
162         fname_print = "[stdin]";
163         fname = NULL;
164     }
165
166     switch( action ) {
167       case aStore: /* only store the file */
168         if( argc > 1 )
169             usage(1);
170         if( (rc = encode_store(fname)) )
171             log_error("encode_store('%s'): %s\n",
172                                     fname_print, g10_errstr(rc) );
173         break;
174
175       case aSym: /* encrypt the given file only with the symmetric cipher */
176         if( argc > 1 )
177             usage(1);
178         if( (rc = encode_symmetric(fname)) )
179             log_error("encode_symmetric('%s'): %s\n",
180                                     fname_print, g10_errstr(rc) );
181         break;
182
183       case aEncr: /* encrypt the given file */
184         if( argc > 1 )
185             usage(1);
186         if( (rc = encode_crypt(fname,remusr)) )
187             log_error("encode_crypt('%s'): %s\n",
188                                     fname_print, g10_errstr(rc) );
189         break;
190
191       case aPrimegen:
192         if( argc )
193             usage(1);
194         mpi_print( stdout, generate_random_prime( pargs.r.ret_int ), 1);
195         putchar('\n');
196         break;
197
198       case aKeygen: /* generate a key (interactive) */
199         if( argc )
200             usage(1);
201         generate_keypair();
202         break;
203
204       default:
205         if( argc > 1 )
206             usage(1);
207         if( !(a = iobuf_open(fname)) )
208             log_fatal("can't open '%s'\n", fname_print);
209         proc_packets( a );
210         iobuf_close(a);
211         break;
212     }
213
214     /* cleanup */
215     FREE_STRLIST(remusr);
216     return 0;
217 }
218
219