added initial i18n stuff
[gnupg.git] / g10 / pkclist.c
1 /* pkclist.c
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 #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 a 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_cert *pkc ;
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     pkc = m_alloc_clear( sizeof *pkc );
58     rc = get_pubkey( pkc, 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_pkc( pkc ), pubkey_letter( pkc->pubkey_algo ),
68               (ulong)keyid[1], datestr_from_pkc( pkc ) );
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 in how far do you trust this user to\n"
74 "correctly sign other users keys (looking at his passport,\n"
75 "checking the 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 informations\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(pkc);
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_cert *pkc )
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.  Lets see, wether we\n"
133   "can assign some missing owner trust values.\n\n"));
134
135     rc = query_trust_record( pkc );
136     if( rc ) {
137         log_error("Ooops: not in trustdb\n");
138         return -1;
139     }
140
141     lid = pkc->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
157     return rc? rc : any? 0:-1;
158 }
159
160
161 /****************
162  * Check wether we can trust this pkc which has a trustlevel of TRUSTLEVEL
163  * Returns: true if we trust.
164  */
165 static int
166 do_we_trust( PKT_public_cert *pkc, int trustlevel )
167 {
168     int rc;
169
170     switch( trustlevel ) {
171       case TRUST_UNKNOWN: /* No pubkey in trustDB: Insert and check again */
172         rc = insert_trust_record( pkc );
173         if( rc ) {
174             log_error("failed to insert it into the trustdb: %s\n",
175                                                       g10_errstr(rc) );
176             return 0; /* no */
177         }
178         rc = check_trust( pkc, &trustlevel );
179         if( rc )
180             log_fatal("trust check after insert failed: %s\n",
181                                                       g10_errstr(rc) );
182         if( trustlevel == TRUST_UNKNOWN || trustlevel == TRUST_EXPIRED )
183             BUG();
184         return do_we_trust( pkc, trustlevel );
185
186       case TRUST_EXPIRED:
187         log_error("trust has expired: NOT yet implemented\n");
188         return 0; /* no */
189
190       case TRUST_UNDEFINED:
191         if( opt.batch || opt.answer_no )
192             log_info("no info to calculate a trust probability\n");
193         else {
194             rc = add_ownertrust( pkc );
195             if( !rc ) {
196                 rc = check_trust( pkc, &trustlevel );
197                 if( rc )
198                     log_fatal("trust check after add_ownertrust failed: %s\n",
199                                                               g10_errstr(rc) );
200                 /* FIXME: this is recursive; we better should unroll it */
201                 return do_we_trust( pkc, trustlevel );
202             }
203         }
204         return 0; /* no */
205
206       case TRUST_NEVER:
207         log_info("We do NOT trust this key\n");
208         return 0; /* no */
209
210       case TRUST_MARGINAL:
211         log_info("I'm not sure wether this keys really belongs to the owner\n"
212                  "but I proceed anyway\n");
213         return 1; /* yes */
214
215       case TRUST_FULLY:
216         log_info("This key probably belongs to the owner\n");
217         return 1; /* yes */
218
219       case TRUST_ULTIMATE:
220         log_info("Our own keys is always good.\n");
221         return 1; /* yes */
222
223       default: BUG();
224     }
225
226
227     /* Eventuell fragen falls der trustlevel nicht ausreichend ist */
228
229
230     return 1; /* yes */
231 }
232
233
234
235 void
236 release_pkc_list( PKC_LIST pkc_list )
237 {
238     PKC_LIST pkc_rover;
239
240     for( ; pkc_list; pkc_list = pkc_rover ) {
241         pkc_rover = pkc_list->next;
242         free_public_cert( pkc_list->pkc );
243         m_free( pkc_list );
244     }
245 }
246
247 int
248 build_pkc_list( STRLIST remusr, PKC_LIST *ret_pkc_list )
249 {
250     PKC_LIST pkc_list = NULL;
251     int rc;
252
253     if( !remusr ) { /* ask!!! */
254         log_bug("ask for public key nyi\n");
255     }
256     else {
257         for(; remusr; remusr = remusr->next ) {
258             PKT_public_cert *pkc;
259
260             pkc = m_alloc_clear( sizeof *pkc );
261             if( (rc = get_pubkey_byname( pkc, remusr->d )) ) {
262                 free_public_cert( pkc ); pkc = NULL;
263                 log_error("skipped '%s': %s\n", remusr->d, g10_errstr(rc) );
264             }
265             else if( !(rc=check_pubkey_algo(pkc->pubkey_algo)) ) {
266                 int trustlevel;
267
268                 rc = check_trust( pkc, &trustlevel );
269                 if( rc ) {
270                     free_public_cert( pkc ); pkc = NULL;
271                     log_error("error checking pkc of '%s': %s\n",
272                                                       remusr->d, g10_errstr(rc) );
273                 }
274                 else if( do_we_trust( pkc, trustlevel ) ) {
275                     /* note: do_we_trust may have changed the trustlevel */
276                     PKC_LIST r;
277
278                     r = m_alloc( sizeof *r );
279                     r->pkc = pkc; pkc = NULL;
280                     r->next = pkc_list;
281                     r->mark = 0;
282                     pkc_list = r;
283                 }
284                 else { /* we don't trust this pkc */
285                     free_public_cert( pkc ); pkc = NULL;
286                 }
287             }
288             else {
289                 free_public_cert( pkc ); pkc = NULL;
290                 log_error("skipped '%s': %s\n", remusr->d, g10_errstr(rc) );
291             }
292         }
293     }
294
295
296     if( !rc && !pkc_list ) {
297         log_error("no valid addressees\n");
298         rc = G10ERR_NO_USER_ID;
299     }
300
301     if( rc )
302         release_pkc_list( pkc_list );
303     else
304         *ret_pkc_list = pkc_list;
305     return rc;
306 }
307
308