textual changes
[gnupg.git] / g10 / pkclist.c
1 /* pkclist.c
2  *      Copyright (C) 1998 Free Software Foundation, Inc.
3  *
4  * This file is part of GNUPG.
5  *
6  * GNUPG 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  * GNUPG 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 #include <string.h>
25 #include <errno.h>
26 #include <assert.h>
27
28 #include "options.h"
29 #include "packet.h"
30 #include "errors.h"
31 #include "keydb.h"
32 #include "memory.h"
33 #include "util.h"
34 #include "trustdb.h"
35 #include "ttyio.h"
36 #include "i18n.h"
37
38 /****************
39  * Returns true if an ownertrust has changed.
40  */
41 static int
42 query_ownertrust( ulong lid )
43 {
44     char *p;
45     int rc;
46     size_t n;
47     u32 keyid[2];
48     PKT_public_key *pk ;
49     int changed=0;
50
51     rc = keyid_from_trustdb( lid, keyid );
52     if( rc ) {
53         log_error("ooops: can't get keyid for lid %lu\n", lid);
54         return 0;
55     }
56
57     pk = m_alloc_clear( sizeof *pk );
58     rc = get_pubkey( pk, keyid );
59     if( rc ) {
60         log_error("keyid %08lX: pubkey not found: %s\n",
61                                 (ulong)keyid[1], g10_errstr(rc) );
62         return 0;
63     }
64
65     tty_printf(_("No ownertrust defined for %lu:\n"
66                "%4u%c/%08lX %s \""), lid,
67               nbits_from_pk( pk ), pubkey_letter( pk->pubkey_algo ),
68               (ulong)keyid[1], datestr_from_pk( pk ) );
69     p = get_user_id( keyid, &n );
70     tty_print_string( p, n ),
71     m_free(p);
72     tty_printf(_("\"\n\n"
73 "Please decide how far you trust this user to correctly\n"
74 "verify other users' keys (by looking at passports,\n"
75 "checking fingerprints from different sources...)?\n\n"
76 " 1 = Don't know\n"
77 " 2 = I do NOT trust\n"
78 " 3 = I trust marginally\n"
79 " 4 = I trust fully\n"
80 " s = please show me more information\n\n") );
81
82     for(;;) {
83         p = tty_get(_("Your decision? "));
84         trim_spaces(p);
85         tty_kill_prompt();
86         if( *p && p[1] )
87             ;
88         else if( *p == '?' ) {
89             tty_printf(_(
90 "It's up to you to assign a value here; this value will never be exported\n"
91 "to any 3rd party.  We need it to implement the web-of-trust; it has nothing\n"
92 "to do with the (implicitly created) web-of-certificates.\n"));
93         }
94         else if( !p[1] && (*p >= '1' && *p <= '4') ) {
95             unsigned trust;
96             switch( *p ) {
97               case '1': trust = TRUST_UNDEFINED; break;
98               case '2': trust = TRUST_NEVER    ; break;
99               case '3': trust = TRUST_MARGINAL ; break;
100               case '4': trust = TRUST_FULLY    ; break;
101               default: BUG();
102             }
103             if( !update_ownertrust( lid, trust ) )
104                 changed++;
105             break;
106         }
107         else if( *p == 's' || *p == 'S' ) {
108             tty_printf(_("You will see a list of signators etc. here\n"));
109         }
110         m_free(p); p = NULL;
111     }
112     m_free(p);
113     m_free(pk);
114     return changed;
115 }
116
117
118 /****************
119  * Try to add some more owner trusts (interactive)
120  * Returns: -1 if no ownertrust were added.
121  */
122 static int
123 add_ownertrust( PKT_public_key *pk )
124 {
125     int rc;
126     void *context = NULL;
127     ulong lid;
128     unsigned trust;
129     int any=0;
130
131     tty_printf(
132 _("Could not find a valid trust path to the key.  Let's see whether we\n"
133   "can assign some missing owner trust values.\n\n"));
134
135     rc = query_trust_record( pk );
136     if( rc ) {
137         log_error("Ooops: not in trustdb\n");
138         return -1;
139     }
140
141     lid = pk->local_id;
142     while( !(rc=enum_trust_web( &context, &lid )) ) {
143         rc = get_ownertrust( lid, &trust );
144         if( rc )
145             log_fatal("Ooops: couldn't get ownertrust for %lu\n", lid);
146         if( trust == TRUST_UNDEFINED || trust == TRUST_EXPIRED ||
147             trust == TRUST_UNKNOWN ) {
148             if( query_ownertrust( lid ) )
149                 any=1;
150         }
151     }
152     if( rc == -1 )
153         rc = 0;
154     enum_trust_web( &context, NULL ); /* close */
155
156     if( !any )
157         tty_printf(_("No ownertrust values changed.\n\n") );
158
159     return rc? rc : any? 0:-1;
160 }
161
162 /****************
163  * Check whether we can trust this pk which has a trustlevel of TRUSTLEVEL
164  * Returns: true if we trust.
165  */
166 static int
167 do_we_trust( PKT_public_key *pk, int trustlevel )
168 {
169     int rc;
170
171     if( (trustlevel & TRUST_FLAG_REVOKED) ) {
172         char *answer;
173         int yes;
174
175         log_info("key has been revoked!\n");
176         if( opt.batch )
177             return 0;
178
179         answer = tty_get("Use this key anyway? ");
180         tty_kill_prompt();
181         yes = answer_is_yes(answer);
182         m_free(answer);
183         if( !yes )
184             return 0;
185     }
186
187
188     switch( (trustlevel & TRUST_MASK) ) {
189       case TRUST_UNKNOWN: /* No pubkey in trustDB: Insert and check again */
190         rc = insert_trust_record( pk );
191         if( rc ) {
192             log_error("failed to insert it into the trustdb: %s\n",
193                                                       g10_errstr(rc) );
194             return 0; /* no */
195         }
196         rc = check_trust( pk, &trustlevel );
197         if( rc )
198             log_fatal("trust check after insert failed: %s\n",
199                                                       g10_errstr(rc) );
200         if( trustlevel == TRUST_UNKNOWN || trustlevel == TRUST_EXPIRED )
201             BUG();
202         return do_we_trust( pk, trustlevel );
203
204       case TRUST_EXPIRED:
205         log_info("key has expired\n");
206         return 0; /* no */
207
208       case TRUST_UNDEFINED:
209         if( opt.batch || opt.answer_no )
210             log_info("no info to calculate a trust probability\n");
211         else {
212             rc = add_ownertrust( pk );
213             if( !rc ) {
214                 rc = check_trust( pk, &trustlevel );
215                 if( rc )
216                     log_fatal("trust check after add_ownertrust failed: %s\n",
217                                                               g10_errstr(rc) );
218                 /* fixme: this is recursive; we should unroll it */
219                 return do_we_trust( pk, trustlevel );
220             }
221         }
222         return 0;
223
224       case TRUST_NEVER:
225         log_info("We do NOT trust this key\n");
226         return 0; /* no */
227
228       case TRUST_MARGINAL:
229         log_info("I'm not sure whether this key really belongs to the owner\n"
230                  "but I proceed anyway\n");
231         return 1; /* yes */
232
233       case TRUST_FULLY:
234         if( opt.verbose )
235             log_info("This key probably belongs to the owner\n");
236         return 1; /* yes */
237
238       case TRUST_ULTIMATE:
239         if( opt.verbose )
240             log_info("This key belongs to us (we have the secret key)\n");
241         return 1; /* yes */
242
243       default: BUG();
244     }
245
246
247     /* Eventuell fragen falls der trustlevel nicht ausreichend ist */
248
249
250     return 1; /* yes */
251 }
252
253
254 /****************
255  * wrapper around do_we_trust, so we can ask whether to use the
256  * key anyway.
257  */
258 static int
259 do_we_trust_pre( PKT_public_key *pk, int trustlevel )
260 {
261     int rc = do_we_trust( pk, trustlevel );
262
263     if( !opt.batch && !rc ) {
264         char *answer;
265
266         tty_printf(_(
267 "It is NOT certain that the key belongs to its owner.\n"
268 "If you *really* know what you are doing, you may answer\n"
269 "the next question with yes\n\n") );
270
271         answer = tty_get("Use this key anyway? ");
272         tty_kill_prompt();
273         if( answer_is_yes(answer) )
274             rc = 1;
275         m_free(answer);
276     }
277     else if( opt.always_trust && !rc ) {
278         log_info(_("WARNING: Using untrusted key!\n"));
279         rc = 1;
280     }
281     return rc;
282 }
283
284
285 void
286 release_pk_list( PK_LIST pk_list )
287 {
288     PK_LIST pk_rover;
289
290     for( ; pk_list; pk_list = pk_rover ) {
291         pk_rover = pk_list->next;
292         free_public_key( pk_list->pk );
293         m_free( pk_list );
294     }
295 }
296
297 int
298 build_pk_list( STRLIST remusr, PK_LIST *ret_pk_list, unsigned usage )
299 {
300     PK_LIST pk_list = NULL;
301     PKT_public_key *pk=NULL;
302     int rc=0;
303
304     if( !remusr && !opt.batch ) { /* ask */
305         char *answer=NULL;
306
307         tty_printf(_(
308                 "You did not specify a user ID. (you may use \"-r\")\n\n"));
309         for(;;) {
310             rc = 0;
311             m_free(answer);
312             answer = tty_get(_("Enter the user ID: "));
313             trim_spaces(answer);
314             tty_kill_prompt();
315             if( !*answer )
316                 break;
317             if( pk )
318                 free_public_key( pk );
319             pk = m_alloc_clear( sizeof *pk );
320             rc = get_pubkey_byname( pk, answer );
321             if( rc )
322                 tty_printf("No such user ID.\n");
323             else if( !(rc=check_pubkey_algo2(pk->pubkey_algo, usage)) ) {
324                 int trustlevel;
325
326                 rc = check_trust( pk, &trustlevel );
327                 if( rc ) {
328                     log_error("error checking pk of '%s': %s\n",
329                                                       answer, g10_errstr(rc) );
330                 }
331                 else if( do_we_trust_pre( pk, trustlevel ) ) {
332                     PK_LIST r;
333
334                     r = m_alloc( sizeof *r );
335                     r->pk = pk; pk = NULL;
336                     r->next = pk_list;
337                     r->mark = 0;
338                     pk_list = r;
339                     break;
340                 }
341             }
342         }
343         m_free(answer);
344         if( pk ) {
345             free_public_key( pk );
346             pk = NULL;
347         }
348     }
349     else {
350         for(; remusr; remusr = remusr->next ) {
351
352             pk = m_alloc_clear( sizeof *pk );
353             if( (rc = get_pubkey_byname( pk, remusr->d )) ) {
354                 free_public_key( pk ); pk = NULL;
355                 log_error("skipped '%s': %s\n", remusr->d, g10_errstr(rc) );
356             }
357             else if( !(rc=check_pubkey_algo2(pk->pubkey_algo, usage )) ) {
358                 int trustlevel;
359
360                 rc = check_trust( pk, &trustlevel );
361                 if( rc ) {
362                     free_public_key( pk ); pk = NULL;
363                     log_error("error checking pk of '%s': %s\n",
364                                                       remusr->d, g10_errstr(rc) );
365                 }
366                 else if( do_we_trust_pre( pk, trustlevel ) ) {
367                     /* note: do_we_trust may have changed the trustlevel */
368                     PK_LIST r;
369
370                     r = m_alloc( sizeof *r );
371                     r->pk = pk; pk = NULL;
372                     r->next = pk_list;
373                     r->mark = 0;
374                     pk_list = r;
375                 }
376                 else { /* we don't trust this pk */
377                     free_public_key( pk ); pk = NULL;
378                 }
379             }
380             else {
381                 free_public_key( pk ); pk = NULL;
382                 log_error("skipped '%s': %s\n", remusr->d, g10_errstr(rc) );
383             }
384         }
385     }
386
387
388     if( !rc && !pk_list ) {
389         log_error("no valid addressees\n");
390         rc = G10ERR_NO_USER_ID;
391     }
392
393     if( rc )
394         release_pk_list( pk_list );
395     else
396         *ret_pk_list = pk_list;
397     return rc;
398 }
399
400