mirror of
git://git.gnupg.org/gnupg.git
synced 2024-12-23 10:29:58 +01:00
Oops commited binary instead of source.
This commit is contained in:
Werner Koch
parent
5bdb171026
commit
b15e268c8a
Binary file not shown.
550
keyserver/gpgkeys_finger.c
Normal file
550
keyserver/gpgkeys_finger.c
Normal file
@ -0,0 +1,550 @@
|
|||||||
|
/* gpgkeys_finger.c - fetch a key via finger
|
||||||
|
* Copyright (C) 2004 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
|
||||||
|
*/
|
||||||
|
|
||||||
|
#include <config.h>
|
||||||
|
#include <stdio.h>
|
||||||
|
#include <string.h>
|
||||||
|
#include <stdlib.h>
|
||||||
|
#include <errno.h>
|
||||||
|
#include <unistd.h>
|
||||||
|
#ifdef HAVE_GETOPT_H
|
||||||
|
#include <getopt.h>
|
||||||
|
#endif
|
||||||
|
|
||||||
|
#ifdef _WIN32
|
||||||
|
#include <windows.h>
|
||||||
|
#else
|
||||||
|
#include <unistd.h>
|
||||||
|
#include <sys/types.h>
|
||||||
|
#include <sys/socket.h>
|
||||||
|
#include <sys/time.h>
|
||||||
|
#include <time.h>
|
||||||
|
#include <netinet/in.h>
|
||||||
|
#include <arpa/inet.h>
|
||||||
|
#include <netdb.h>
|
||||||
|
#endif
|
||||||
|
|
||||||
|
#define INCLUDED_BY_MAIN_MODULE 1
|
||||||
|
#include "util.h"
|
||||||
|
#include "keyserver.h"
|
||||||
|
|
||||||
|
#ifdef _WIN32
|
||||||
|
#define sock_close(a) closesocket(a)
|
||||||
|
#else
|
||||||
|
#define sock_close(a) close(a)
|
||||||
|
#endif
|
||||||
|
|
||||||
|
|
||||||
|
extern char *optarg;
|
||||||
|
extern int optind;
|
||||||
|
|
||||||
|
#define GET 0
|
||||||
|
#define MAX_LINE 80
|
||||||
|
|
||||||
|
static int verbose=0;
|
||||||
|
static char path[1024];
|
||||||
|
static FILE *input, *output, *console;
|
||||||
|
|
||||||
|
#define BEGIN "-----BEGIN PGP PUBLIC KEY BLOCK-----"
|
||||||
|
#define END "-----END PGP PUBLIC KEY BLOCK-----"
|
||||||
|
|
||||||
|
|
||||||
|
#ifdef _WIN32
|
||||||
|
static void
|
||||||
|
deinit_sockets (void)
|
||||||
|
{
|
||||||
|
WSACleanup();
|
||||||
|
}
|
||||||
|
|
||||||
|
static void
|
||||||
|
init_sockets (void)
|
||||||
|
{
|
||||||
|
static int initialized;
|
||||||
|
static WSADATA wsdata;
|
||||||
|
|
||||||
|
if (initialized)
|
||||||
|
return;
|
||||||
|
|
||||||
|
if (WSAStartup (0x0101, &wsdata) )
|
||||||
|
{
|
||||||
|
fprintf (console, "error initializing socket library: ec=%d\n",
|
||||||
|
(int)WSAGetLastError () );
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
if (wsdata.wVersion < 0x0001)
|
||||||
|
{
|
||||||
|
fprintf (console, "socket library version is %x.%x - but 1.1 needed\n",
|
||||||
|
LOBYTE(wsdata.wVersion), HIBYTE(wsdata.wVersion));
|
||||||
|
WSACleanup();
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
atexit (deinit_sockets);
|
||||||
|
initialized = 1;
|
||||||
|
}
|
||||||
|
#endif /*_WIN32*/
|
||||||
|
|
||||||
|
|
||||||
|
/* Connect to SERVER at PORT and return a file descriptor or -1 on
|
||||||
|
error. */
|
||||||
|
static int
|
||||||
|
connect_server (const char *server, unsigned short port)
|
||||||
|
{
|
||||||
|
int sock = -1;
|
||||||
|
|
||||||
|
#ifdef _WIN32
|
||||||
|
struct hostent *hp;
|
||||||
|
struct sockaddr_in addr;
|
||||||
|
unsigned long l;
|
||||||
|
|
||||||
|
init_sockets ();
|
||||||
|
|
||||||
|
memset (&addr, 0, sizeof addr);
|
||||||
|
addr.sin_family = AF_INET;
|
||||||
|
addr.sin_port = htons (port);
|
||||||
|
|
||||||
|
/* Win32 gethostbyname doesn't handle IP addresses internally, so we
|
||||||
|
try inet_addr first on that platform only. */
|
||||||
|
if ((l = inet_addr (server)) != SOCKET_ERROR)
|
||||||
|
memcpy (&ad.sin_addr, &l, sizeof l);
|
||||||
|
else if ((hp = gethostbyname (server)))
|
||||||
|
{
|
||||||
|
if (hp->h_addrtype != AF_INET)
|
||||||
|
{
|
||||||
|
fprintf (console, "gpgkeys: unknown address family for `%s'\n",
|
||||||
|
server);
|
||||||
|
return -1;
|
||||||
|
}
|
||||||
|
if (hp->h_length != 4)
|
||||||
|
{
|
||||||
|
fprintf (console, "gpgkeys: illegal address length for`%s'\n",
|
||||||
|
server);
|
||||||
|
return -1;
|
||||||
|
}
|
||||||
|
memcpy (&addr.sin_addr, hp->h_addr, hp->h_length);
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
fprintf (console, "gpgkeys: host `%s' not found: ec=%d\n",
|
||||||
|
server, (int)WSAGetLastError ());
|
||||||
|
return -1;
|
||||||
|
}
|
||||||
|
|
||||||
|
sock = socket (AF_INET, SOCK_STREAM, 0);
|
||||||
|
if (sock == INVALID_SOCKET)
|
||||||
|
{
|
||||||
|
fprintf (console, "gpgkeys: error creating socket: ec=%d\n",
|
||||||
|
(int)WSAGetLastError ());
|
||||||
|
return -1;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (connect (sock, (struct sockaddr *)&addr, sizeof addr))
|
||||||
|
{
|
||||||
|
fprintf (console, "gpgkeys: error connecting `%s': ec=%d\n",
|
||||||
|
server, (int)WSAGetLastError ());
|
||||||
|
sock_close (sock);
|
||||||
|
return -1;
|
||||||
|
}
|
||||||
|
|
||||||
|
#else
|
||||||
|
|
||||||
|
struct sockaddr_in addr;
|
||||||
|
struct hostent *host;
|
||||||
|
|
||||||
|
addr.sin_family = AF_INET;
|
||||||
|
addr.sin_port = htons (port);
|
||||||
|
host = gethostbyname ((char*)server);
|
||||||
|
if (!host)
|
||||||
|
{
|
||||||
|
fprintf (console, "gpgkeys: host `%s' not found: %s\n",
|
||||||
|
server, strerror (errno));
|
||||||
|
return -1;
|
||||||
|
}
|
||||||
|
|
||||||
|
addr.sin_addr = *(struct in_addr*)host->h_addr;
|
||||||
|
|
||||||
|
sock = socket (AF_INET, SOCK_STREAM, 0);
|
||||||
|
if (sock == -1)
|
||||||
|
{
|
||||||
|
fprintf (console, "gpgkeys: error creating socket: %s\n",
|
||||||
|
strerror (errno));
|
||||||
|
return -1;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (connect (sock, (struct sockaddr *)&addr, sizeof addr) == -1)
|
||||||
|
{
|
||||||
|
fprintf (console, "gpgkeys: error connecting `%s': %s\n",
|
||||||
|
server, strerror (errno));
|
||||||
|
close (sock);
|
||||||
|
return -1;
|
||||||
|
}
|
||||||
|
#endif
|
||||||
|
|
||||||
|
return sock;
|
||||||
|
}
|
||||||
|
|
||||||
|
static int
|
||||||
|
write_server (int sock, const char *data, size_t length)
|
||||||
|
{
|
||||||
|
int nleft;
|
||||||
|
|
||||||
|
nleft = length;
|
||||||
|
while (nleft > 0)
|
||||||
|
{
|
||||||
|
int nwritten;
|
||||||
|
|
||||||
|
#ifdef _WIN32
|
||||||
|
nwritten = send (sock, data, nleft, 0);
|
||||||
|
if ( nwritten == SOCKET_ERROR )
|
||||||
|
{
|
||||||
|
fprintf (console, "gpgkeys: write failed: ec=%d\n",
|
||||||
|
(int)WSAGetLastError ());
|
||||||
|
return -1;
|
||||||
|
}
|
||||||
|
#else
|
||||||
|
nwritten = write (sock, data, nleft);
|
||||||
|
if (nwritten == -1)
|
||||||
|
{
|
||||||
|
if (errno == EINTR)
|
||||||
|
continue;
|
||||||
|
if (errno == EAGAIN)
|
||||||
|
{
|
||||||
|
struct timeval tv;
|
||||||
|
|
||||||
|
tv.tv_sec = 0;
|
||||||
|
tv.tv_usec = 50000;
|
||||||
|
select(0, NULL, NULL, NULL, &tv);
|
||||||
|
continue;
|
||||||
|
}
|
||||||
|
fprintf (console, "gpgkeys: write failed: %s\n", strerror(errno));
|
||||||
|
return -1;
|
||||||
|
}
|
||||||
|
#endif
|
||||||
|
nleft -=nwritten;
|
||||||
|
data += nwritten;
|
||||||
|
}
|
||||||
|
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
/* Send the finger REQUEST to the server. Returns 0 and a file descriptor
|
||||||
|
in R_SOCK if the request was sucessful. */
|
||||||
|
static int
|
||||||
|
send_request (const char *request, int *r_sock)
|
||||||
|
{
|
||||||
|
char *server;
|
||||||
|
char *name;
|
||||||
|
int sock;
|
||||||
|
|
||||||
|
*r_sock = -1;
|
||||||
|
name = strdup (request);
|
||||||
|
if (!name)
|
||||||
|
{
|
||||||
|
fprintf(console,"gpgkeys: out of memory\n");
|
||||||
|
return KEYSERVER_NO_MEMORY;
|
||||||
|
}
|
||||||
|
|
||||||
|
server = strchr (name, '@');
|
||||||
|
if (!server)
|
||||||
|
{
|
||||||
|
fprintf (console, "gpgkeys: no name included in request\n");
|
||||||
|
free (name);
|
||||||
|
return KEYSERVER_GENERAL_ERROR;
|
||||||
|
}
|
||||||
|
*server++ = 0;
|
||||||
|
|
||||||
|
sock = connect_server (server, 79);
|
||||||
|
if (sock == -1)
|
||||||
|
{
|
||||||
|
free (name);
|
||||||
|
return KEYSERVER_UNREACHABLE;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (write_server (sock, name, strlen (name))
|
||||||
|
|| write_server (sock, "\r\n", 2))
|
||||||
|
{
|
||||||
|
free (name);
|
||||||
|
sock_close (sock);
|
||||||
|
return KEYSERVER_GENERAL_ERROR;
|
||||||
|
}
|
||||||
|
free (name);
|
||||||
|
*r_sock = sock;
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
static int
|
||||||
|
get_key (char *getkey)
|
||||||
|
{
|
||||||
|
int rc;
|
||||||
|
int sock;
|
||||||
|
IOBUF fp_read;
|
||||||
|
unsigned int maxlen, buflen, gotit=0;
|
||||||
|
unsigned char *line = NULL;
|
||||||
|
|
||||||
|
if (strncmp (getkey,"0x",2)==0)
|
||||||
|
getkey+=2;
|
||||||
|
|
||||||
|
/* Frankly we don't know what keys the server will return; we
|
||||||
|
indicated the requested key anyway. */
|
||||||
|
fprintf(output,"KEY 0x%s BEGIN\n",getkey);
|
||||||
|
|
||||||
|
rc = send_request (path, &sock);
|
||||||
|
if(rc)
|
||||||
|
{
|
||||||
|
fprintf(output,"KEY 0x%s FAILED %d\n",getkey, rc);
|
||||||
|
sock_close (sock);
|
||||||
|
return KEYSERVER_OK;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Hmmm, we use iobuf here only to cope with Windows socket
|
||||||
|
peculiarities (we can't used fdopen). */
|
||||||
|
fp_read = iobuf_sockopen (sock , "r");
|
||||||
|
if (!fp_read)
|
||||||
|
{
|
||||||
|
fprintf(output,"KEY 0x%s FAILED %d\n",getkey, KEYSERVER_INTERNAL_ERROR);
|
||||||
|
sock_close (sock);
|
||||||
|
return KEYSERVER_OK;
|
||||||
|
}
|
||||||
|
|
||||||
|
while ( iobuf_read_line ( fp_read, &line, &buflen, &maxlen))
|
||||||
|
{
|
||||||
|
maxlen=1024;
|
||||||
|
|
||||||
|
if(gotit)
|
||||||
|
{
|
||||||
|
fputs (line, output);
|
||||||
|
if (!strncmp(line,END,strlen(END)))
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
else if(!strncmp(line,BEGIN,strlen(BEGIN)))
|
||||||
|
{
|
||||||
|
fputs (line,output);
|
||||||
|
gotit=1;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
if(gotit)
|
||||||
|
fprintf (output,"KEY 0x%s END\n", getkey);
|
||||||
|
else
|
||||||
|
{
|
||||||
|
fprintf (console,"gpgkeys: key %s not found on keyserver\n",getkey);
|
||||||
|
fprintf (output,"KEY 0x%s FAILED %d\n",
|
||||||
|
getkey,KEYSERVER_KEY_NOT_FOUND);
|
||||||
|
}
|
||||||
|
|
||||||
|
m_free(line);
|
||||||
|
iobuf_close (fp_read);
|
||||||
|
|
||||||
|
return KEYSERVER_OK;
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
int
|
||||||
|
main(int argc,char *argv[])
|
||||||
|
{
|
||||||
|
int arg,action=-1,ret=KEYSERVER_INTERNAL_ERROR;
|
||||||
|
char line[MAX_LINE];
|
||||||
|
char *thekey=NULL;
|
||||||
|
|
||||||
|
console=stderr;
|
||||||
|
|
||||||
|
while((arg=getopt(argc,argv,"hVo:"))!=-1)
|
||||||
|
switch(arg)
|
||||||
|
{
|
||||||
|
default:
|
||||||
|
case 'h':
|
||||||
|
fprintf(console,"-h\thelp\n");
|
||||||
|
fprintf(console,"-V\tversion\n");
|
||||||
|
fprintf(console,"-o\toutput to this file\n");
|
||||||
|
return KEYSERVER_OK;
|
||||||
|
|
||||||
|
case 'V':
|
||||||
|
fprintf(stdout,"%d\n%s\n",KEYSERVER_PROTO_VERSION,VERSION);
|
||||||
|
return KEYSERVER_OK;
|
||||||
|
|
||||||
|
case 'o':
|
||||||
|
output=fopen(optarg,"w");
|
||||||
|
if(output==NULL)
|
||||||
|
{
|
||||||
|
fprintf(console,"gpgkeys: Cannot open output file \"%s\": %s\n",
|
||||||
|
optarg,strerror(errno));
|
||||||
|
return KEYSERVER_INTERNAL_ERROR;
|
||||||
|
}
|
||||||
|
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
|
||||||
|
if(argc>optind)
|
||||||
|
{
|
||||||
|
input=fopen(argv[optind],"r");
|
||||||
|
if(input==NULL)
|
||||||
|
{
|
||||||
|
fprintf(console,"gpgkeys: Cannot open input file \"%s\": %s\n",
|
||||||
|
argv[optind],strerror(errno));
|
||||||
|
return KEYSERVER_INTERNAL_ERROR;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
if(input==NULL)
|
||||||
|
input=stdin;
|
||||||
|
|
||||||
|
if(output==NULL)
|
||||||
|
output=stdout;
|
||||||
|
|
||||||
|
/* Get the command and info block */
|
||||||
|
|
||||||
|
while(fgets(line,MAX_LINE,input)!=NULL)
|
||||||
|
{
|
||||||
|
int version;
|
||||||
|
char commandstr[7];
|
||||||
|
char optionstr[256];
|
||||||
|
char hash;
|
||||||
|
|
||||||
|
if(line[0]=='\n')
|
||||||
|
break;
|
||||||
|
|
||||||
|
if(sscanf(line,"%c",&hash)==1 && hash=='#')
|
||||||
|
continue;
|
||||||
|
|
||||||
|
if(sscanf(line,"COMMAND %6s\n",commandstr)==1)
|
||||||
|
{
|
||||||
|
commandstr[6]='\0';
|
||||||
|
|
||||||
|
if(strcasecmp(commandstr,"get")==0)
|
||||||
|
action=GET;
|
||||||
|
|
||||||
|
continue;
|
||||||
|
}
|
||||||
|
|
||||||
|
if(sscanf(line,"OPAQUE %1023s\n",path)==1)
|
||||||
|
{
|
||||||
|
path[1023]='\0';
|
||||||
|
continue;
|
||||||
|
}
|
||||||
|
|
||||||
|
if(sscanf(line,"VERSION %d\n",&version)==1)
|
||||||
|
{
|
||||||
|
if(version!=KEYSERVER_PROTO_VERSION)
|
||||||
|
{
|
||||||
|
ret=KEYSERVER_VERSION_ERROR;
|
||||||
|
goto fail;
|
||||||
|
}
|
||||||
|
|
||||||
|
continue;
|
||||||
|
}
|
||||||
|
|
||||||
|
if(sscanf(line,"OPTION %255s\n",optionstr)==1)
|
||||||
|
{
|
||||||
|
int no=0;
|
||||||
|
char *start=&optionstr[0];
|
||||||
|
|
||||||
|
optionstr[255]='\0';
|
||||||
|
|
||||||
|
if(strncasecmp(optionstr,"no-",3)==0)
|
||||||
|
{
|
||||||
|
no=1;
|
||||||
|
start=&optionstr[3];
|
||||||
|
}
|
||||||
|
|
||||||
|
if(strcasecmp(start,"verbose")==0)
|
||||||
|
{
|
||||||
|
if(no)
|
||||||
|
verbose--;
|
||||||
|
else
|
||||||
|
verbose++;
|
||||||
|
}
|
||||||
|
|
||||||
|
continue;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
/* If it's a GET or a SEARCH, the next thing to come in is the
|
||||||
|
keyids. If it's a SEND, then there are no keyids. */
|
||||||
|
|
||||||
|
if(action==GET)
|
||||||
|
{
|
||||||
|
/* Eat the rest of the file */
|
||||||
|
for(;;)
|
||||||
|
{
|
||||||
|
if(fgets(line,MAX_LINE,input)==NULL)
|
||||||
|
break;
|
||||||
|
else
|
||||||
|
{
|
||||||
|
if(line[0]=='\n' || line[0]=='\0')
|
||||||
|
break;
|
||||||
|
|
||||||
|
if(!thekey)
|
||||||
|
{
|
||||||
|
thekey=strdup(line);
|
||||||
|
if(!thekey)
|
||||||
|
{
|
||||||
|
fprintf(console,"gpgkeys: out of memory while "
|
||||||
|
"building key list\n");
|
||||||
|
ret=KEYSERVER_NO_MEMORY;
|
||||||
|
goto fail;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Trim the trailing \n */
|
||||||
|
thekey[strlen(line)-1]='\0';
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
fprintf(console,
|
||||||
|
"gpgkeys: this keyserver type only supports key retrieval\n");
|
||||||
|
goto fail;
|
||||||
|
}
|
||||||
|
|
||||||
|
if(!thekey || !*path)
|
||||||
|
{
|
||||||
|
fprintf(console,"gpgkeys: invalid keyserver instructions\n");
|
||||||
|
goto fail;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Send the response */
|
||||||
|
|
||||||
|
fprintf(output,"VERSION %d\n",KEYSERVER_PROTO_VERSION);
|
||||||
|
fprintf(output,"PROGRAM %s\n\n",VERSION);
|
||||||
|
|
||||||
|
if (verbose>1)
|
||||||
|
{
|
||||||
|
if(path[0])
|
||||||
|
fprintf(console,"Path:\t\t%s\n",path);
|
||||||
|
fprintf(console,"Command:\tGET\n");
|
||||||
|
}
|
||||||
|
|
||||||
|
ret = get_key(thekey);
|
||||||
|
|
||||||
|
fail:
|
||||||
|
|
||||||
|
free(thekey);
|
||||||
|
|
||||||
|
if(input!=stdin)
|
||||||
|
fclose(input);
|
||||||
|
|
||||||
|
if(output!=stdout)
|
||||||
|
fclose(output);
|
||||||
|
|
||||||
|
return ret;
|
||||||
|
}
|
||||||
Loading…
x
Reference in New Issue
Block a user