1
0
mirror of git://git.gnupg.org/gnupg.git synced 2024-12-24 10:39:57 +01:00
gnupg/g10/revoke.c

355 lines
8.7 KiB
C
Raw Normal View History

1998-02-16 20:05:02 +00:00
/* revoke.c
* Copyright (C) 1998, 1999, 2000 Free Software Foundation, Inc.
1998-02-16 20:05:02 +00:00
*
* This file is part of GnuPG.
1998-02-16 20:05:02 +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.
*
* 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>
#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
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;
KBPOS kbpos;
struct revocation_reason_info *reason = NULL;
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 );
/* search the userid */
rc = find_secret_keyblock_byname( &kbpos, uname );
if( rc ) {
log_error(_("secret key for user `%s' not found\n"), uname );
1998-02-16 20:05:02 +00:00
goto leave;
}
/* read the keyblock */
rc = read_keyblock( &kbpos, &keyblock );
if( rc ) {
1998-10-12 20:16:38 +00:00
log_error(_("error reading the certificate: %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 );
1998-02-16 20:05:02 +00:00
if( !node ) { /* maybe better to use log_bug ? */
1998-10-12 20:16:38 +00:00
log_error(_("Oops; secret key not found anymore!\n"));
1998-02-16 20:05:02 +00:00
rc = G10ERR_GENERAL;
goto leave;
}
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 ),
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 );
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 );
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");
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;
}
/* 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;
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 */
rc = make_keysig_packet( &sig, pk, NULL, NULL, sk, 0x20, 0,
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 );
if( rc )
iobuf_cancel(out);
else
iobuf_close(out);
release_revocation_reason_info( reason );
1998-02-16 20:05:02 +00:00
return rc;
}
struct revocation_reason_info *
ask_revocation_reason( int key_rev, int cert_rev, int hint )
{
int code;
char *description = NULL;
struct revocation_reason_info *reason;
const char *text_1 = _("Key has been compromised");
const char *text_2 = _("Key is superseded");
const char *text_3 = _("Key is no longer used");
const char *text_4 = _("User ID is non longer valid");
const char *code_text = NULL;
do {
m_free(description);
description = NULL;
tty_printf(_("Please select the reason for the revocation:\n"));
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 );
tty_printf( " 0 = %s\n", _("Cancel") );
if( hint )
tty_printf(_("(Probably you want to select %d here)\n"), hint );
for(code = 0; !code;) {
int n;
char *answer = cpr_get("ask_revocation_reason.code",
_("Your decision? "));
trim_spaces( answer );
cpr_kill_prompt();
if( *answer == 'q' || *answer == 'Q' )
n = 0;
else if( !isdigit( *answer ) )
n = -1;
else if( hint && !*answer )
n = hint;
else
n = atoi(answer);
m_free(answer);
if( !n )
return NULL; /* cancel */
else if( key_rev && n == 1 ) {
code = 0x02; /* key has been compromised */
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 ) {
code = 0x20; /* uid is non longer valid */
code_text = text_4;
}
else
tty_printf(_("Invalid selection.\n"));
}
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);
}
tty_printf(_("Reason for revocation: %s\n"), code_text );
if( !description )
tty_printf(_("(No description given)\n") );
else
tty_printf("%s\n", description );
} while( !cpr_get_answer_is_yes("ask_revocation_reason.okay",
_("Is this okay? ")) );
reason = m_alloc( sizeof *reason );
reason->code = code;
reason->desc = description;
return reason;
}
void
release_revocation_reason_info( struct revocation_reason_info *reason )
{
if( reason ) {
m_free( reason->desc );
m_free( reason );
}
}
1998-02-16 20:05:02 +00:00