Support key fetching using HTTP.
[gnupg.git] / dirmngr / ks-engine-finger.c
1 /* ks-engine-finger.c - Finger OpenPGP key access
2  * Copyright (C) 2011 Free Software Foundation, Inc.
3  *
4  * This file is part of GnuPG.
5  *
6  * GnuPG is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 3 of the License, or
9  * (at your option) any later version.
10  *
11  * GnuPG is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, see <http://www.gnu.org/licenses/>.
18  */
19
20 #include <config.h>
21
22 #include <stdio.h>
23 #include <stdlib.h>
24 #include <string.h>
25 #include <assert.h>
26
27 #include "dirmngr.h"
28 #include "misc.h"
29 #include "userids.h"
30 #include "ks-engine.h"
31
32
33 /* Get the key from URI which is expected to specify a finger scheme.
34    On success R_FP has an open stream to read the data.  */
35 gpg_error_t
36 ks_finger_fetch (ctrl_t ctrl, parsed_uri_t uri, estream_t *r_fp)
37 {
38   gpg_error_t err;
39   estream_t fp;
40   char *server;
41   char *name;
42   http_t http;
43
44   (void)ctrl;
45   *r_fp = NULL;
46
47   if (strcmp (uri->scheme, "finger") || !uri->opaque || !uri->path)
48     return gpg_error (GPG_ERR_INV_ARG);
49
50   name = xtrystrdup (uri->path);
51   if (!name)
52     return gpg_error_from_syserror ();
53
54   server = strchr (name, '@');
55   if (!server)
56     {
57       err = gpg_error (GPG_ERR_INV_URI);
58       xfree (name);
59       return err;
60     }
61   *server++ = 0;
62
63   err = http_raw_connect (&http, server, 79, 0, NULL);
64   if (err)
65     {
66       xfree (name);
67       return err;
68     }
69
70   fp = http_get_write_ptr (http);
71   if (!fp)
72     {
73       err = gpg_error (GPG_ERR_INTERNAL);
74       http_close (http, 0);
75       xfree (name);
76       return err;
77     }
78
79   if (es_fputs (name, fp) || es_fputs ("\r\n", fp) || es_fflush (fp))
80     {
81       err = gpg_error_from_syserror ();
82       http_close (http, 0);
83       xfree (name);
84       return err;
85     }
86   xfree (name);
87   es_fclose (fp);
88
89   fp = http_get_read_ptr (http);
90   if (!fp)
91     {
92       err = gpg_error (GPG_ERR_INTERNAL);
93       http_close (http, 0);
94       return err;
95     }
96
97   http_close (http, 1 /* Keep read ptr.  */);
98
99   *r_fp = fp;
100   return 0;
101 }