Move SRV RR code from common/ to dirmngr/.
[gnupg.git] / dirmngr / t-dns-stuff.c
1 /* t-dns-cert.c - Module test for dns-stuff.c
2  * Copyright (C) 2011 Free Software Foundation, Inc.
3  * Copyright (C) 2011, 2015 Werner Koch
4  *
5  * This file is part of GnuPG.
6  *
7  * GnuPG is free software; you can redistribute it and/or modify
8  * it under the terms of the GNU General Public License as published by
9  * the Free Software Foundation; either version 3 of the License, or
10  * (at your option) any later version.
11  *
12  * GnuPG is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with this program; if not, see <http://www.gnu.org/licenses/>.
19  */
20
21 #include <config.h>
22 #include <stdio.h>
23 #include <stdlib.h>
24 #include <assert.h>
25 #ifndef HAVE_W32_SYSTEM
26 # include <netdb.h>
27 #endif
28
29 #include "util.h"
30 #include "dns-stuff.h"
31
32 #define PGM "t-dns-stuff"
33
34 static int verbose;
35 static int debug;
36
37
38
39 int
40 main (int argc, char **argv)
41 {
42   int last_argc = -1;
43   gpg_error_t err;
44   int any_options = 0;
45   int opt_cert = 0;
46   int opt_srv = 0;
47   char const *name = NULL;
48
49   gpgrt_init ();
50   log_set_prefix (PGM, GPGRT_LOG_WITH_PREFIX);
51   if (argc)
52     { argc--; argv++; }
53   while (argc && last_argc != argc )
54     {
55       last_argc = argc;
56       if (!strcmp (*argv, "--"))
57         {
58           argc--; argv++;
59           break;
60         }
61       else if (!strcmp (*argv, "--help"))
62         {
63           fputs ("usage: " PGM " [HOST]\n"
64                  "Options:\n"
65                  "  --verbose         print timings etc.\n"
66                  "  --debug           flyswatter\n"
67                  "  --cert            lookup a CERT RR\n"
68                  "  --srv             lookup a SRV RR\n"
69                  , stdout);
70           exit (0);
71         }
72       else if (!strcmp (*argv, "--verbose"))
73         {
74           verbose++;
75           argc--; argv++;
76         }
77       else if (!strcmp (*argv, "--debug"))
78         {
79           verbose += 2;
80           debug++;
81           argc--; argv++;
82         }
83       else if (!strcmp (*argv, "--cert"))
84         {
85           any_options = opt_cert = 1;
86           argc--; argv++;
87         }
88       else if (!strcmp (*argv, "--srv"))
89         {
90           any_options = opt_srv = 1;
91           argc--; argv++;
92         }
93       else if (!strncmp (*argv, "--", 2))
94         {
95           fprintf (stderr, PGM ": unknown option '%s'\n", *argv);
96           exit (1);
97         }
98     }
99
100   if (!argc && !any_options)
101     {
102       opt_cert = 1;
103       name = "simon.josefsson.org";
104     }
105   else if (argc == 1)
106     name = *argv;
107   else
108     {
109       fprintf (stderr, PGM ": none or too many host names given\n");
110       exit (1);
111     }
112
113   if (opt_cert)
114     {
115       unsigned char *fpr;
116       size_t fpr_len;
117       char *url;
118       void *key;
119       size_t keylen;
120
121       printf ("CERT lookup on '%s'\n", name);
122
123       err = get_dns_cert (name, DNS_CERTTYPE_ANY, &key, &keylen,
124                           &fpr, &fpr_len, &url);
125       if (err)
126         printf ("get_dns_cert failed: %s <%s>\n",
127                 gpg_strerror (err), gpg_strsource (err));
128       else if (key)
129         {
130           printf ("Key found (%u bytes)\n", (unsigned int)keylen);
131         }
132       else
133         {
134           if (fpr)
135             {
136               int i;
137
138               printf ("Fingerprint found (%d bytes): ", (int)fpr_len);
139               for (i = 0; i < fpr_len; i++)
140                 printf ("%02X", fpr[i]);
141               putchar ('\n');
142             }
143           else
144             printf ("No fingerprint found\n");
145
146           if (url)
147             printf ("URL found: %s\n", url);
148           else
149             printf ("No URL found\n");
150
151         }
152
153       xfree (key);
154       xfree (fpr);
155       xfree (url);
156     }
157   else if (opt_srv)
158     {
159       struct srventry *srv;
160       int rc,i;
161
162       rc=getsrv("_hkp._tcp.wwwkeys.pgp.net",&srv);
163       printf("Count=%d\n\n",rc);
164       for(i=0;i<rc;i++)
165         {
166           printf("priority=%hu\n",srv[i].priority);
167           printf("weight=%hu\n",srv[i].weight);
168           printf("port=%hu\n",srv[i].port);
169           printf("target=%s\n",srv[i].target);
170           printf("\n");
171         }
172
173       xfree(srv);
174     }
175   else /* Standard lookup.  */
176     {
177       char *cname;
178       dns_addrinfo_t aibuf, ai;
179       int ret;
180       char hostbuf[1025];
181
182       printf ("Lookup on '%s'\n", name);
183
184       err = resolve_dns_name (name, 0, 0, SOCK_STREAM, &aibuf, &cname);
185       if (err)
186         {
187           fprintf (stderr, PGM": resolving '%s' failed: %s\n",
188                    name, gpg_strerror (err));
189           exit (1);
190         }
191
192       if (cname)
193         printf ("cname: %s\n", cname);
194       for (ai = aibuf; ai; ai = ai->next)
195         {
196           printf ("%s %3d %3d   ",
197                   ai->family == AF_INET6? "inet6" :
198                   ai->family == AF_INET?  "inet4" : "?    ",
199                   ai->socktype, ai->protocol);
200
201           ret = getnameinfo (ai->addr, ai->addrlen,
202                              hostbuf, sizeof hostbuf,
203                              NULL, 0,
204                              NI_NUMERICHOST);
205           if (ret)
206             printf ("[getnameinfo failed: %s]\n", gai_strerror (ret));
207           else
208             printf ("%s\n", hostbuf);
209         }
210       xfree (cname);
211       free_dns_addrinfo (aibuf);
212     }
213
214
215   return 0;
216 }