mirror of
git://git.gnupg.org/gnupg.git
synced 2024-10-31 20:08:43 +01:00
5a9ea8ff5c
Added new cipher mode and updated cipher test program.
333 lines
6.9 KiB
C
333 lines
6.9 KiB
C
/* kbxfile.c - KBX file handling
|
|
* Copyright (C) 2000 Free Software Foundation, Inc.
|
|
*
|
|
* This file is part of GnuPG.
|
|
*
|
|
* GnuPG is free software; you can redistribute it and/or modify
|
|
* 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,
|
|
* 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
|
|
*/
|
|
|
|
/****************
|
|
* We will change the whole system to use only KBX. This file here
|
|
* will implement the methods needed to operate on plain KBXfiles.
|
|
* Most stuff from getkey and ringedit will be replaced by stuff here.
|
|
* To make things even more easier we will only allow one updateable kbxfile
|
|
* and optionally some read-only files.
|
|
*/
|
|
|
|
#include <config.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <errno.h>
|
|
#include <assert.h>
|
|
#include <gcrypt.h>
|
|
|
|
#include "kbx.h"
|
|
#include "options.h"
|
|
#include "util.h"
|
|
#include "i18n.h"
|
|
#include "main.h"
|
|
|
|
/****************
|
|
* Read the blob at the current fileposition and return an allocated
|
|
* pointer nto the blob if it was found.
|
|
* Fixme: return a blob object.
|
|
*/
|
|
static int
|
|
do_search_by_fpr ( const char *filename, FILE *a, const char *fpr,
|
|
KBXBLOB *r_blob )
|
|
{
|
|
KBXBLOB blob;
|
|
int rc;
|
|
|
|
*r_blob = NULL;
|
|
rc = kbx_read_blob ( &blob, a );
|
|
if ( rc && rc != -1 ) {
|
|
log_error (_("file `%s': error reading blob\n"), filename );
|
|
}
|
|
else if ( !rc ) {
|
|
rc = kbx_blob_has_fpr ( blob, fpr );
|
|
}
|
|
else
|
|
log_info ("eof\n");
|
|
|
|
if ( !rc ) {
|
|
*r_blob = blob;
|
|
}
|
|
else {
|
|
kbx_release_blob ( blob );
|
|
}
|
|
return rc;
|
|
}
|
|
|
|
int
|
|
kbxfile_search_by_fpr( const char *filename, const byte *fpr )
|
|
{
|
|
FILE *fp;
|
|
KBXBLOB blob;
|
|
int rc;
|
|
|
|
fp = fopen ( filename, "rb" );
|
|
if( !fp ) {
|
|
log_error(_("can't open `%s': %s\n"), filename, strerror(errno) );
|
|
return 1;
|
|
}
|
|
|
|
while ( (rc=do_search_by_fpr ( filename, fp, fpr, &blob )) == -1 )
|
|
;
|
|
if ( !rc ) {
|
|
fputs ("FOUND\n", stderr );
|
|
kbx_dump_blob ( stderr, blob );
|
|
kbx_release_blob ( blob );
|
|
}
|
|
|
|
fclose (fp);
|
|
return -1;
|
|
}
|
|
|
|
|
|
/****************
|
|
* Read the blob at the current fileposition and return an allocated
|
|
* pointer nto the blob if it was found.
|
|
* Fixme: return a blob object.
|
|
*/
|
|
static int
|
|
do_search_by_keyid ( const char *filename, FILE *a,
|
|
const byte *keyidbuf, size_t keyidlen, KBXBLOB *r_blob )
|
|
{
|
|
KBXBLOB blob;
|
|
int rc;
|
|
|
|
*r_blob = NULL;
|
|
rc = kbx_read_blob ( &blob, a );
|
|
if ( rc && rc != -1 ) {
|
|
log_error (_("file `%s': error reading blob\n"), filename );
|
|
}
|
|
else if ( !rc ) {
|
|
rc = kbx_blob_has_kid ( blob, keyidbuf, keyidlen );
|
|
}
|
|
else
|
|
rc = GPGERR_GENERAL; /* eof */
|
|
|
|
if ( !rc ) {
|
|
*r_blob = blob;
|
|
}
|
|
else {
|
|
kbx_release_blob ( blob );
|
|
}
|
|
return rc;
|
|
}
|
|
|
|
/****************
|
|
* Look for a KBX described by an keyid. This function will in
|
|
* turn return each matching keyid because there may me duplicates
|
|
* (which can't happen for fingerprints)
|
|
* mode 10 = short keyid
|
|
* 11 = long keyid
|
|
*/
|
|
int
|
|
kbxfile_search_by_kid ( const char *filename, u32 *kid, int mode )
|
|
{
|
|
FILE *fp;
|
|
KBXBLOB blob;
|
|
int rc;
|
|
byte kbuf[8], *kbufptr;
|
|
int kbuflen;
|
|
|
|
fp = fopen ( filename, "rb" );
|
|
if( !fp ) {
|
|
log_error(_("can't open `%s': %s\n"), filename, strerror(errno) );
|
|
return 1;
|
|
}
|
|
|
|
kbuf[0] = kid[0] >> 24;
|
|
kbuf[1] = kid[0] >> 16;
|
|
kbuf[2] = kid[0] >> 8;
|
|
kbuf[3] = kid[0];
|
|
kbuf[4] = kid[1] >> 24;
|
|
kbuf[5] = kid[1] >> 16;
|
|
kbuf[6] = kid[1] >> 8;
|
|
kbuf[7] = kid[1];
|
|
if ( mode == 10 ) {
|
|
kbufptr=kbuf+4;
|
|
kbuflen = 4;
|
|
}
|
|
else if (mode == 11 ) {
|
|
kbufptr=kbuf;
|
|
kbuflen = 8;
|
|
}
|
|
else {
|
|
BUG();
|
|
}
|
|
|
|
do {
|
|
while ( (rc=do_search_by_keyid ( filename, fp,
|
|
kbufptr, kbuflen, &blob )) == -1 )
|
|
;
|
|
if ( !rc ) {
|
|
fputs ("FOUND:\n", stderr );
|
|
kbx_dump_blob ( stderr, blob );
|
|
kbx_release_blob ( blob );
|
|
}
|
|
} while ( !rc );
|
|
|
|
fclose (fp);
|
|
return -1;
|
|
}
|
|
|
|
|
|
static int
|
|
do_search_by_uid ( const char *filename, FILE *a,
|
|
int (*cmpfnc)(const byte*,size_t,void*), void *cmpdata,
|
|
KBXBLOB *r_blob )
|
|
{
|
|
KBXBLOB blob;
|
|
int rc;
|
|
|
|
*r_blob = NULL;
|
|
rc = kbx_read_blob ( &blob, a );
|
|
if ( rc && rc != -1 ) {
|
|
log_error (_("file `%s': error reading blob\n"), filename );
|
|
}
|
|
else if ( !rc ) {
|
|
rc = kbx_blob_has_uid ( blob, cmpfnc, cmpdata );
|
|
}
|
|
else
|
|
rc = GPGERR_GENERAL; /* eof */
|
|
|
|
if ( !rc ) {
|
|
*r_blob = blob;
|
|
}
|
|
else {
|
|
kbx_release_blob ( blob );
|
|
}
|
|
return rc;
|
|
}
|
|
|
|
|
|
static int
|
|
substr_compare ( const byte *buf, size_t buflen, void *opaque )
|
|
{
|
|
return !!memistr ( buf, buflen, opaque );
|
|
}
|
|
|
|
|
|
int
|
|
kbxfile_search_by_uid ( const char *filename, const char *name )
|
|
{
|
|
FILE *fp;
|
|
KBXBLOB blob;
|
|
int rc;
|
|
byte kbuf[8], *kbufptr;
|
|
int kbuflen;
|
|
|
|
fp = fopen ( filename, "rb" );
|
|
if( !fp ) {
|
|
log_error(_("can't open `%s': %s\n"), filename, strerror(errno) );
|
|
return 1;
|
|
}
|
|
|
|
|
|
do {
|
|
while ( (rc=do_search_by_uid ( filename, fp,
|
|
substr_compare, name, &blob )) == -1 )
|
|
;
|
|
if ( !rc ) {
|
|
fputs ("FOUND:\n", stderr );
|
|
kbx_dump_blob ( stderr, blob );
|
|
kbx_release_blob ( blob );
|
|
}
|
|
} while ( !rc );
|
|
|
|
fclose ( fp );
|
|
return -1;
|
|
}
|
|
|
|
|
|
|
|
void
|
|
export_as_kbxfile(void)
|
|
{
|
|
|
|
KBPOS kbpos;
|
|
KBNODE keyblock = NULL;
|
|
int rc=0;
|
|
|
|
rc = enum_keyblocks_begin( &kbpos, 0 );
|
|
if( rc ) {
|
|
if( rc != -1 )
|
|
log_error("enum_keyblocks(open) failed: %s\n", gpg_errstr(rc) );
|
|
goto leave;
|
|
}
|
|
|
|
while( !(rc = enum_keyblocks_next( kbpos, 1, &keyblock )) ) {
|
|
KBXBLOB blob;
|
|
const char *p;
|
|
size_t n;
|
|
|
|
merge_keys_and_selfsig( keyblock );
|
|
rc = kbx_create_blob ( &blob, keyblock );
|
|
if( rc ) {
|
|
log_error("kbx_create_blob failed: %s\n", gpg_errstr(rc) );
|
|
goto leave;
|
|
}
|
|
p = kbx_get_blob_image ( blob, &n );
|
|
fwrite( p, n, 1, stdout );
|
|
kbx_release_blob ( blob );
|
|
}
|
|
|
|
if( rc && rc != -1 )
|
|
log_error("enum_keyblocks(read) failed: %s\n", gpg_errstr(rc));
|
|
|
|
leave:
|
|
enum_keyblocks_end( kbpos );
|
|
release_kbnode( keyblock );
|
|
}
|
|
|
|
|
|
static int
|
|
do_print_kbxfile( const char *filename, FILE *a )
|
|
{
|
|
KBXBLOB blob;
|
|
int rc;
|
|
|
|
rc = kbx_read_blob ( &blob, a );
|
|
if ( rc && rc != -1 ) {
|
|
log_error (_("file `%s': error reading blob\n"), filename );
|
|
}
|
|
else if ( ! rc )
|
|
kbx_dump_blob ( stdout, blob );
|
|
kbx_release_blob ( blob );
|
|
return rc;
|
|
}
|
|
|
|
void
|
|
print_kbxfile( const char *filename )
|
|
{
|
|
FILE *fp;
|
|
|
|
fp = fopen ( filename, "rb" );
|
|
if( !fp ) {
|
|
log_error(_("can't open `%s': %s\n"), filename, strerror(errno) );
|
|
return;
|
|
}
|
|
|
|
while ( !do_print_kbxfile( filename, fp ) )
|
|
;
|
|
|
|
fclose (fp);
|
|
}
|
|
|