1998-02-16 20:05:02 +00:00
|
|
|
/* revoke.c
|
2001-03-08 14:33:24 +00:00
|
|
|
* Copyright (C) 1998, 1999, 2000, 2001 Free Software Foundation, Inc.
|
1998-02-16 20:05:02 +00:00
|
|
|
*
|
1998-12-23 12:41:40 +00:00
|
|
|
* This file is part of GnuPG.
|
1998-02-16 20:05:02 +00:00
|
|
|
*
|
1998-12-23 12:41:40 +00:00
|
|
|
* GnuPG is free software; you can redistribute it and/or modify
|
1998-02-16 20:05:02 +00:00
|
|
|
* it under the terms of the GNU General Public License as published by
|
|
|
|
* the Free Software Foundation; either version 2 of the License, or
|
|
|
|
* (at your option) any later version.
|
|
|
|
*
|
1998-12-23 12:41:40 +00:00
|
|
|
* GnuPG is distributed in the hope that it will be useful,
|
1998-02-16 20:05:02 +00:00
|
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
* GNU General Public License for more details.
|
|
|
|
*
|
|
|
|
* You should have received a copy of the GNU General Public License
|
|
|
|
* along with this program; if not, write to the Free Software
|
|
|
|
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include <config.h>
|
|
|
|
#include <stdio.h>
|
|
|
|
#include <stdlib.h>
|
|
|
|
#include <string.h>
|
|
|
|
#include <errno.h>
|
|
|
|
#include <assert.h>
|
2000-02-17 12:41:58 +00:00
|
|
|
#include <ctype.h>
|
1998-02-16 20:05:02 +00:00
|
|
|
|
|
|
|
#include "options.h"
|
|
|
|
#include "packet.h"
|
|
|
|
#include "errors.h"
|
|
|
|
#include "keydb.h"
|
|
|
|
#include "memory.h"
|
|
|
|
#include "util.h"
|
|
|
|
#include "main.h"
|
|
|
|
#include "ttyio.h"
|
1998-08-08 19:27:00 +00:00
|
|
|
#include "status.h"
|
|
|
|
#include "i18n.h"
|
1998-02-16 20:05:02 +00:00
|
|
|
|
|
|
|
|
2000-02-17 12:41:58 +00:00
|
|
|
struct revocation_reason_info {
|
|
|
|
int code;
|
|
|
|
char *desc;
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
|
|
int
|
|
|
|
revocation_reason_build_cb( PKT_signature *sig, void *opaque )
|
|
|
|
{
|
|
|
|
struct revocation_reason_info *reason = opaque;
|
|
|
|
char *ud = NULL;
|
|
|
|
byte *buffer;
|
|
|
|
size_t buflen = 1;
|
|
|
|
|
|
|
|
if( reason->desc ) {
|
|
|
|
ud = native_to_utf8( reason->desc );
|
|
|
|
buflen += strlen(ud);
|
|
|
|
}
|
|
|
|
buffer = m_alloc( buflen );
|
|
|
|
*buffer = reason->code;
|
|
|
|
if( ud ) {
|
|
|
|
memcpy(buffer+1, ud, strlen(ud) );
|
|
|
|
m_free( ud );
|
|
|
|
}
|
|
|
|
|
|
|
|
build_sig_subpkt( sig, SIGSUBPKT_REVOC_REASON, buffer, buflen );
|
|
|
|
m_free( buffer );
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
1998-02-16 20:05:02 +00:00
|
|
|
/****************
|
|
|
|
* Generate a revocation certificate for UNAME
|
|
|
|
*/
|
|
|
|
int
|
|
|
|
gen_revoke( const char *uname )
|
|
|
|
{
|
|
|
|
int rc = 0;
|
|
|
|
armor_filter_context_t afx;
|
|
|
|
compress_filter_context_t zfx;
|
|
|
|
PACKET pkt;
|
1998-06-29 12:30:57 +00:00
|
|
|
PKT_secret_key *sk; /* used as pointer into a kbnode */
|
|
|
|
PKT_public_key *pk = NULL;
|
1998-02-16 20:05:02 +00:00
|
|
|
PKT_signature *sig = NULL;
|
1998-06-29 12:30:57 +00:00
|
|
|
u32 sk_keyid[2];
|
1998-02-16 20:05:02 +00:00
|
|
|
IOBUF out = NULL;
|
|
|
|
KBNODE keyblock = NULL;
|
|
|
|
KBNODE node;
|
2001-09-06 17:10:00 +00:00
|
|
|
KEYDB_HANDLE kdbhd;
|
2000-02-17 12:41:58 +00:00
|
|
|
struct revocation_reason_info *reason = NULL;
|
2001-09-06 17:10:00 +00:00
|
|
|
KEYDB_SEARCH_DESC desc;
|
1998-02-16 20:05:02 +00:00
|
|
|
|
|
|
|
if( opt.batch ) {
|
1998-10-12 20:16:38 +00:00
|
|
|
log_error(_("sorry, can't do this in batch mode\n"));
|
1998-02-16 20:05:02 +00:00
|
|
|
return G10ERR_GENERAL;
|
|
|
|
}
|
|
|
|
|
|
|
|
memset( &afx, 0, sizeof afx);
|
|
|
|
memset( &zfx, 0, sizeof zfx);
|
|
|
|
init_packet( &pkt );
|
|
|
|
|
2001-09-06 17:10:00 +00:00
|
|
|
/* search the userid:
|
|
|
|
* We don't want the whole getkey stuff here but the entire keyblock
|
|
|
|
*/
|
|
|
|
kdbhd = keydb_new (1);
|
2001-09-07 07:57:51 +00:00
|
|
|
classify_user_id (uname, &desc);
|
2001-09-06 17:10:00 +00:00
|
|
|
rc = desc.mode? keydb_search (kdbhd, &desc, 1) : G10ERR_INV_USER_ID;
|
|
|
|
if (rc) {
|
|
|
|
log_error (_("secret key `%s' not found: %s\n"),
|
|
|
|
uname, g10_errstr (rc));
|
1998-02-16 20:05:02 +00:00
|
|
|
goto leave;
|
|
|
|
}
|
|
|
|
|
2001-09-06 17:10:00 +00:00
|
|
|
rc = keydb_get_keyblock (kdbhd, &keyblock );
|
1998-02-16 20:05:02 +00:00
|
|
|
if( rc ) {
|
2001-09-06 17:10:00 +00:00
|
|
|
log_error (_("error reading keyblock: %s\n"), g10_errstr(rc) );
|
1998-02-16 20:05:02 +00:00
|
|
|
goto leave;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* get the keyid from the keyblock */
|
1998-06-29 12:30:57 +00:00
|
|
|
node = find_kbnode( keyblock, PKT_SECRET_KEY );
|
2001-09-06 17:10:00 +00:00
|
|
|
if( !node )
|
|
|
|
BUG ();
|
1998-02-16 20:05:02 +00:00
|
|
|
|
1998-04-02 10:30:03 +00:00
|
|
|
/* fixme: should make a function out of this stuff,
|
1998-02-16 20:05:02 +00:00
|
|
|
* it's used all over the source */
|
1998-06-29 12:30:57 +00:00
|
|
|
sk = node->pkt->pkt.secret_key;
|
|
|
|
keyid_from_sk( sk, sk_keyid );
|
1998-02-16 20:05:02 +00:00
|
|
|
tty_printf("\nsec %4u%c/%08lX %s ",
|
1998-06-29 12:30:57 +00:00
|
|
|
nbits_from_sk( sk ),
|
|
|
|
pubkey_letter( sk->pubkey_algo ),
|
2001-05-25 07:22:34 +00:00
|
|
|
(ulong)sk_keyid[1], datestr_from_sk(sk) );
|
1998-02-16 20:05:02 +00:00
|
|
|
{
|
|
|
|
size_t n;
|
1998-06-29 12:30:57 +00:00
|
|
|
char *p = get_user_id( sk_keyid, &n );
|
1999-09-23 17:26:15 +00:00
|
|
|
tty_print_utf8_string( p, n );
|
1998-02-16 20:05:02 +00:00
|
|
|
m_free(p);
|
|
|
|
tty_printf("\n");
|
|
|
|
}
|
1998-06-29 12:30:57 +00:00
|
|
|
pk = m_alloc_clear( sizeof *pk );
|
2001-09-06 17:10:00 +00:00
|
|
|
|
|
|
|
/* FIXME: We should get the public key direct from the secret one */
|
1998-06-29 12:30:57 +00:00
|
|
|
rc = get_pubkey( pk, sk_keyid );
|
1998-02-16 20:05:02 +00:00
|
|
|
if( rc ) {
|
1998-10-12 20:16:38 +00:00
|
|
|
log_error(_("no corresponding public key: %s\n"), g10_errstr(rc) );
|
1998-02-16 20:05:02 +00:00
|
|
|
goto leave;
|
|
|
|
}
|
1998-06-29 12:30:57 +00:00
|
|
|
if( cmp_public_secret_key( pk, sk ) ) {
|
1998-10-12 20:16:38 +00:00
|
|
|
log_error(_("public key does not match secret key!\n") );
|
1998-02-16 20:05:02 +00:00
|
|
|
rc = G10ERR_GENERAL;
|
|
|
|
goto leave;
|
|
|
|
}
|
|
|
|
|
|
|
|
tty_printf("\n");
|
1998-11-27 11:42:49 +00:00
|
|
|
if( !cpr_get_answer_is_yes("gen_revoke.okay",
|
1998-08-08 19:27:00 +00:00
|
|
|
_("Create a revocation certificate for this key? ")) ){
|
1998-02-16 20:05:02 +00:00
|
|
|
rc = 0;
|
|
|
|
goto leave;
|
|
|
|
}
|
|
|
|
|
2000-02-17 12:41:58 +00:00
|
|
|
/* get the reason for the revocation */
|
|
|
|
reason = ask_revocation_reason( 1, 0, 1 );
|
|
|
|
if( !reason ) { /* user decided to cancel */
|
|
|
|
rc = 0;
|
|
|
|
goto leave;
|
|
|
|
}
|
|
|
|
|
1998-06-29 12:30:57 +00:00
|
|
|
switch( is_secret_key_protected( sk ) ) {
|
1998-02-16 20:05:02 +00:00
|
|
|
case -1:
|
1998-10-12 20:16:38 +00:00
|
|
|
log_error(_("unknown protection algorithm\n"));
|
1998-02-16 20:05:02 +00:00
|
|
|
rc = G10ERR_PUBKEY_ALGO;
|
|
|
|
break;
|
|
|
|
case 0:
|
1998-11-10 12:59:59 +00:00
|
|
|
tty_printf(_("NOTE: This key is not protected!\n"));
|
1998-02-16 20:05:02 +00:00
|
|
|
break;
|
|
|
|
default:
|
1998-09-11 05:47:32 +00:00
|
|
|
rc = check_secret_key( sk, 0 );
|
1998-02-16 20:05:02 +00:00
|
|
|
break;
|
|
|
|
}
|
|
|
|
if( rc )
|
|
|
|
goto leave;
|
|
|
|
|
|
|
|
|
|
|
|
if( !opt.armor )
|
1998-10-12 20:16:38 +00:00
|
|
|
tty_printf(_("ASCII armored output forced.\n"));
|
1998-02-16 20:05:02 +00:00
|
|
|
|
1998-08-11 17:29:34 +00:00
|
|
|
if( (rc = open_outfile( NULL, 0, &out )) )
|
1998-02-16 20:05:02 +00:00
|
|
|
goto leave;
|
|
|
|
|
|
|
|
afx.what = 1;
|
1998-02-18 13:58:46 +00:00
|
|
|
afx.hdrlines = "Comment: A revocation certificate should follow\n";
|
1998-02-16 20:05:02 +00:00
|
|
|
iobuf_push_filter( out, armor_filter, &afx );
|
|
|
|
|
|
|
|
/* create it */
|
2001-12-21 21:02:05 +00:00
|
|
|
rc = make_keysig_packet( &sig, pk, NULL, NULL, sk, 0x20, 0, 0, 0, 0,
|
2000-02-17 12:41:58 +00:00
|
|
|
revocation_reason_build_cb,
|
|
|
|
reason );
|
1998-02-16 20:05:02 +00:00
|
|
|
if( rc ) {
|
1998-10-12 20:16:38 +00:00
|
|
|
log_error(_("make_keysig_packet failed: %s\n"), g10_errstr(rc));
|
1998-02-16 20:05:02 +00:00
|
|
|
goto leave;
|
|
|
|
}
|
|
|
|
init_packet( &pkt );
|
|
|
|
pkt.pkttype = PKT_SIGNATURE;
|
|
|
|
pkt.pkt.signature = sig;
|
|
|
|
|
|
|
|
rc = build_packet( out, &pkt );
|
|
|
|
if( rc ) {
|
1998-10-12 20:16:38 +00:00
|
|
|
log_error(_("build_packet failed: %s\n"), g10_errstr(rc) );
|
1998-02-16 20:05:02 +00:00
|
|
|
goto leave;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* and issue a usage notice */
|
1998-10-12 20:16:38 +00:00
|
|
|
tty_printf(_("Revocation certificate created.\n\n"
|
1998-04-14 17:51:16 +00:00
|
|
|
"Please move it to a medium which you can hide away; if Mallory gets\n"
|
1998-02-16 20:05:02 +00:00
|
|
|
"access to this certificate he can use it to make your key unusable.\n"
|
1998-04-14 17:51:16 +00:00
|
|
|
"It is smart to print this certificate and store it away, just in case\n"
|
|
|
|
"your media become unreadable. But have some caution: The print system of\n"
|
1998-10-12 20:16:38 +00:00
|
|
|
"your machine might store the data and make it available to others!\n"));
|
1998-02-16 20:05:02 +00:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
leave:
|
1998-06-29 12:30:57 +00:00
|
|
|
if( pk )
|
|
|
|
free_public_key( pk );
|
1998-02-16 20:05:02 +00:00
|
|
|
if( sig )
|
|
|
|
free_seckey_enc( sig );
|
|
|
|
release_kbnode( keyblock );
|
2001-09-06 17:10:00 +00:00
|
|
|
keydb_release (kdbhd);
|
1998-02-16 20:05:02 +00:00
|
|
|
if( rc )
|
|
|
|
iobuf_cancel(out);
|
|
|
|
else
|
|
|
|
iobuf_close(out);
|
2000-02-17 12:41:58 +00:00
|
|
|
release_revocation_reason_info( reason );
|
1998-02-16 20:05:02 +00:00
|
|
|
return rc;
|
|
|
|
}
|
|
|
|
|
1999-04-26 15:53:01 +00:00
|
|
|
|
|
|
|
|
2000-02-17 12:41:58 +00:00
|
|
|
struct revocation_reason_info *
|
|
|
|
ask_revocation_reason( int key_rev, int cert_rev, int hint )
|
1999-04-26 15:53:01 +00:00
|
|
|
{
|
2001-11-08 13:26:00 +00:00
|
|
|
int code=-1;
|
2000-02-17 12:41:58 +00:00
|
|
|
char *description = NULL;
|
|
|
|
struct revocation_reason_info *reason;
|
2001-11-08 13:26:00 +00:00
|
|
|
const char *text_0 = _("No reason specified");
|
2000-02-17 12:41:58 +00:00
|
|
|
const char *text_1 = _("Key has been compromised");
|
|
|
|
const char *text_2 = _("Key is superseded");
|
|
|
|
const char *text_3 = _("Key is no longer used");
|
2001-05-06 10:53:36 +00:00
|
|
|
const char *text_4 = _("User ID is no longer valid");
|
2000-02-17 12:41:58 +00:00
|
|
|
const char *code_text = NULL;
|
|
|
|
|
|
|
|
do {
|
|
|
|
m_free(description);
|
|
|
|
description = NULL;
|
|
|
|
|
|
|
|
tty_printf(_("Please select the reason for the revocation:\n"));
|
2001-11-08 13:26:00 +00:00
|
|
|
tty_printf( " 0 = %s\n", text_0 );
|
2000-02-17 12:41:58 +00:00
|
|
|
if( key_rev )
|
|
|
|
tty_printf(" 1 = %s\n", text_1 );
|
|
|
|
if( key_rev )
|
|
|
|
tty_printf(" 2 = %s\n", text_2 );
|
|
|
|
if( key_rev )
|
|
|
|
tty_printf(" 3 = %s\n", text_3 );
|
|
|
|
if( cert_rev )
|
|
|
|
tty_printf(" 4 = %s\n", text_4 );
|
2001-11-08 13:26:00 +00:00
|
|
|
tty_printf( " Q = %s\n", _("Cancel") );
|
2000-02-17 12:41:58 +00:00
|
|
|
if( hint )
|
|
|
|
tty_printf(_("(Probably you want to select %d here)\n"), hint );
|
|
|
|
|
2001-11-08 13:26:00 +00:00
|
|
|
while(code==-1) {
|
2000-02-17 12:41:58 +00:00
|
|
|
int n;
|
|
|
|
char *answer = cpr_get("ask_revocation_reason.code",
|
|
|
|
_("Your decision? "));
|
|
|
|
trim_spaces( answer );
|
|
|
|
cpr_kill_prompt();
|
2001-11-08 13:26:00 +00:00
|
|
|
if( *answer == 'q' || *answer == 'Q')
|
|
|
|
return NULL; /* cancel */
|
|
|
|
if( hint && !*answer )
|
2000-02-17 12:41:58 +00:00
|
|
|
n = hint;
|
2001-11-08 13:26:00 +00:00
|
|
|
else if(!isdigit( *answer ) )
|
|
|
|
n = -1;
|
2000-02-17 12:41:58 +00:00
|
|
|
else
|
|
|
|
n = atoi(answer);
|
|
|
|
m_free(answer);
|
2001-11-08 13:26:00 +00:00
|
|
|
if( n == 0 ) {
|
|
|
|
code = 0x00; /* no particular reason */
|
|
|
|
code_text = text_0;
|
|
|
|
}
|
2000-02-17 12:41:58 +00:00
|
|
|
else if( key_rev && n == 1 ) {
|
2001-11-08 13:26:00 +00:00
|
|
|
code = 0x02; /* key has been compromised */
|
2000-02-17 12:41:58 +00:00
|
|
|
code_text = text_1;
|
|
|
|
}
|
|
|
|
else if( key_rev && n == 2 ) {
|
|
|
|
code = 0x01; /* key is superseded */
|
|
|
|
code_text = text_2;
|
|
|
|
}
|
|
|
|
else if( key_rev && n == 3 ) {
|
|
|
|
code = 0x03; /* key is no longer used */
|
|
|
|
code_text = text_3;
|
|
|
|
}
|
|
|
|
else if( cert_rev && n == 4 ) {
|
2001-05-06 10:53:36 +00:00
|
|
|
code = 0x20; /* uid is no longer valid */
|
2000-02-17 12:41:58 +00:00
|
|
|
code_text = text_4;
|
|
|
|
}
|
|
|
|
else
|
|
|
|
tty_printf(_("Invalid selection.\n"));
|
|
|
|
}
|
1999-04-26 15:53:01 +00:00
|
|
|
|
2000-02-17 12:41:58 +00:00
|
|
|
tty_printf(_("Enter an optional description; "
|
|
|
|
"end it with an empty line:\n") );
|
|
|
|
for(;;) {
|
|
|
|
char *answer = cpr_get("ask_revocation_reason.text", "> " );
|
|
|
|
trim_trailing_ws( answer, strlen(answer) );
|
|
|
|
cpr_kill_prompt();
|
|
|
|
if( !*answer ) {
|
|
|
|
m_free(answer);
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
|
|
|
|
{
|
|
|
|
char *p = make_printable_string( answer, strlen(answer), 0 );
|
|
|
|
m_free(answer);
|
|
|
|
answer = p;
|
|
|
|
}
|
|
|
|
|
|
|
|
if( !description )
|
|
|
|
description = m_strdup(answer);
|
|
|
|
else {
|
|
|
|
char *p = m_alloc( strlen(description) + strlen(answer) + 2 );
|
|
|
|
strcpy(stpcpy(stpcpy( p, description),"\n"),answer);
|
|
|
|
m_free(description);
|
|
|
|
description = p;
|
|
|
|
}
|
|
|
|
m_free(answer);
|
1999-04-26 15:53:01 +00:00
|
|
|
}
|
|
|
|
|
2000-02-17 12:41:58 +00:00
|
|
|
tty_printf(_("Reason for revocation: %s\n"), code_text );
|
|
|
|
if( !description )
|
|
|
|
tty_printf(_("(No description given)\n") );
|
|
|
|
else
|
|
|
|
tty_printf("%s\n", description );
|
1999-04-26 15:53:01 +00:00
|
|
|
|
2000-02-17 12:41:58 +00:00
|
|
|
} while( !cpr_get_answer_is_yes("ask_revocation_reason.okay",
|
|
|
|
_("Is this okay? ")) );
|
1999-04-26 15:53:01 +00:00
|
|
|
|
2000-02-17 12:41:58 +00:00
|
|
|
reason = m_alloc( sizeof *reason );
|
|
|
|
reason->code = code;
|
|
|
|
reason->desc = description;
|
|
|
|
return reason;
|
|
|
|
}
|
1999-04-26 15:53:01 +00:00
|
|
|
|
2000-02-17 12:41:58 +00:00
|
|
|
void
|
|
|
|
release_revocation_reason_info( struct revocation_reason_info *reason )
|
|
|
|
{
|
|
|
|
if( reason ) {
|
|
|
|
m_free( reason->desc );
|
|
|
|
m_free( reason );
|
1999-04-26 15:53:01 +00:00
|
|
|
}
|
|
|
|
}
|
1998-02-16 20:05:02 +00:00
|
|
|
|