1
0
mirror of git://git.gnupg.org/gnupg.git synced 2024-12-23 10:29:58 +01:00
gnupg/g10/revoke.c

391 lines
9.9 KiB
C
Raw Normal View History

1998-02-16 20:05:02 +00:00
/* revoke.c
1998-02-24 18:50:46 +00:00
* Copyright (C) 1998 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 "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
/****************
* 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;
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;
}
/* FIXME: ask for the reason of revocation
0x00 - No reason specified (key revocations or cert revocations)
Does not make sense!
0x01 - Key is superceded (key revocations)
0x02 - Key material has been compromised (key revocations)
0x03 - Key is no longer used (key revocations)
0x20 - User id information is no longer valid (cert revocations)
Following the revocation code is a string of octets which gives
information about the reason for revocation in human-readable form
*/
1998-02-16 20:05:02 +00:00
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 );
1998-02-16 20:05:02 +00:00
tty_print_string( p, n );
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;
}
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 */
1998-06-29 12:30:57 +00:00
rc = make_keysig_packet( &sig, pk, NULL, NULL, sk, 0x20, 0, NULL, NULL);
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);
return rc;
}
#if 0 /* The code is not complete but anyway, now we use */
/* the edit menu to revoke signature */
/****************
* Return true if there is already a revocation signature for KEYID
* in KEYBLOCK at point node.
*/
static int
already_revoked( const KBNODE keyblock, const KBNODE node, u32 *keyid ) ) {
{
const KBNODE n = find_prev_kbnode( keyblock, node, PKT_USER_ID );
for( ; n; n = n->next ) {
PKT_signature *sig;
if( n->pkt->pkttype == PKT_SIGNATURE
&& (sig = node->pkt->pkt.signature)->sig_class == 0x30
&& sig->keyid[0] == keyid[0]
&& sig->keyid[1] == keyid[1] )
return 1;
}
else if( n->pkt->pkttype == PKT_USER_ID
break;
else if( n->pkt->pkttype == PKT_PUBLIC_SUBKEY
break;
}
return 0;
}
/****************
* Ask whether the signature should be revoked. If the user commits this,
* flag bit 0 is set.
*/
static void
ask_revoke_sig( KBNODE keyblock, KBNODE node, PKT_signature *sig ) ) {
{
KBNODE unode = find_prev_kbnode( keyblock, node, PKT_USER_ID );
if( !unode ) {
log_error("Oops: no user ID for signature\n");
return;
}
tty_printf(_("user ID: \""));
tty_print_string( unode->pkt->pkt.user_id->name,
unode->pkt->pkt.user_id->len, 0 );
tty_printf(_("\"\nsigned with your key %08lX at %s\n"),
sig->keyid[1], datestr_from_sig(sig) );
if( cpr_get_answer_is_yes("ask_revoke_sig.one",
_("Create a revocation certificate for this signature? (y/N)")) ) {
node->flag |= 1;
}
}
/****************
* Generate a signature revocation certificate for UNAME
*/
int
gen_sig_revoke( const char *uname )
{
int rc = 0;
armor_filter_context_t afx;
compress_filter_context_t zfx;
PACKET pkt;
IOBUF out = NULL;
KBNODE keyblock = NULL;
KBNODE node;
KBPOS kbpos;
int uidchg;
if( opt.batch ) {
log_error(_("sorry, can't do this in batch mode\n"));
return G10ERR_GENERAL;
}
memset( &afx, 0, sizeof afx);
memset( &zfx, 0, sizeof zfx);
init_packet( &pkt );
/* get the keyblock */
rc = find_keyblock_byname( &kbpos, uname );
if( rc ) {
log_error(_("public key for user `%s' not found\n"), uname );
goto leave;
}
/* read the keyblock */
rc = read_keyblock( &kbpos, &keyblock );
if( rc ) {
log_error(_("error reading the certificate: %s\n"), g10_errstr(rc) );
goto leave;
}
/* get the keyid from the keyblock */
node = find_kbnode( keyblock, PKT_PUBLIC_KEY );
if( !node ) {
log_error(_("Oops; public key lost!\n"));
rc = G10ERR_GENERAL;
goto leave;
}
if( (rc = open_outfile( NULL, 0, &out )) )
goto leave;
if( opt.armor ) {
afx.what = 1;
iobuf_push_filter( out, armor_filter, &afx );
}
/* Now walk over all signatures which we did with one of
* our secret keys. Hmmm: Should we check for duplicate signatures */
clear_kbnode_flags( flags );
for( node = keyblock; node; node = node->next ) {
PKT_signature *sig;
if( node->pkt->pkttype == PKT_SIGNATURE
&& ((sig = node->pkt->pkt.signature)->sig_class&~3) == 0x10
&& seckey_available( sig->keyid )
&& !already_revoked( keyblock, node, sig->keyid ) ) { ) {
ask_revoke_sig( keyblock, node, sig )
}
else if( node->pkt->pkttype == PKT_PUBLIC_SUBKEY
break;
}
for( node = keyblock; node; node = node->next ) { {
if( (node->flag & 1) )
break;
}
if( !node ) {
log_info(_("nothing to revoke\n"));
iobuf_cancel(out);
out = NULL;
goto leave;
}
init_packet( &pkt );
pkt.pkttype = PKT_PUBLIC_KEY;
pkt.pkt.public_key = keyblock->pkt->pkt.public_key;
rc = build_packet( out, &pkt );
if( rc ) {
log_error(_("build_packet failed: %s\n"), g10_errstr(rc) );
goto leave;
}
uidchg = 1;
for( node = keyblock; node; node = node->next ) {
if( node->pkt->pkttype == PKT_USER_ID )
uidchg = 1;
if( !(node->flag & 1) )
continue;
if( uidchg ) {
/* create a user ID packet */
.......
uidchg = 0;
}
/* create it */
rc = make_keysig_packet( &sig, pk, NULL, NULL, sk, 0x30, 0, NULL, NULL);
if( rc ) {
log_error(_("make_keysig_packet failed: %s\n"), g10_errstr(rc));
goto leave;
}
init_packet( &pkt );
pkt.pkttype = PKT_SIGNATURE;
pkt.pkt.signature = sig;
rc = build_packet( out, &pkt );
if( rc ) {
log_error(_("build_packet failed: %s\n"), g10_errstr(rc) );
goto leave;
}
}
leave:
release_kbnode( keyblock );
if( !out )
;
else if( rc )
iobuf_cancel(out);
else
iobuf_close(out);
return rc;
}
#endif /* unused code */
1998-02-16 20:05:02 +00:00