1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
|
/* ISC license. */
#include <string.h>
#include <stdint.h>
#include <errno.h>
#include <skalibs/types.h>
#include <skalibs/bitarray.h>
#include <skalibs/strerr.h>
#include <skalibs/sgetopt.h>
#include <skalibs/buffer.h>
#include <skalibs/genwrite.h>
#include <skalibs/tai.h>
#include <skalibs/ip46.h>
#include <s6-dns/s6dns.h>
#include <s6-dns/s6dns-analyze.h>
#include <s6-dns/s6dns-debug.h>
#define USAGE "s6-dnsq [ -1 | -2 ] [ -t timeout ] [ -D debuglevel ] qtype query serverip..."
#define dieusage() strerr_dieusage(100, USAGE)
int main (int argc, char const *const *argv)
{
tain deadline ;
unsigned int debuglevel = 0 ;
uint16_t qtype ;
genwrite *where = &genwrite_stderr ;
PROG = "s6-dnsq" ;
{
subgetopt l = SUBGETOPT_ZERO ;
unsigned int t = 0 ;
for (;;)
{
int opt = subgetopt_r(argc, argv, "12t:D:", &l) ;
if (opt == -1) break ;
switch (opt)
{
case '1' : where = &genwrite_stdout ; break ;
case '2' : where = &genwrite_stderr ; break ;
case 't' : if (!uint0_scan(l.arg, &t)) dieusage() ; break ;
case 'D' : if (!uint0_scan(l.arg, &debuglevel)) dieusage() ; break ;
default : dieusage() ;
}
}
argc -= l.ind ; argv += l.ind ;
if (t) tain_from_millisecs(&deadline, t) ; else deadline = tain_infinite_relative ;
}
if (argc < 3) dieusage() ;
{
s6dns_debughook_t dbh = { .post_recv = 0, .pre_send = 0, .post_send = 0 } ;
s6dns_ip46list_t servers ;
s6dns_domain_t d ;
unsigned int i = 0, j = 0 ;
qtype = s6dns_analyze_qtype_parse(argv[0]) ;
if (!qtype) dieusage() ;
if (!s6dns_domain_fromstring_noqualify_encode(&d, argv[1], strlen(argv[1])))
strerr_diefu2sys(100, "encode ", argv[1]) ;
dbh.external = where ;
memset(&servers, 0, sizeof(s6dns_ip46list_t)) ;
for (; (i < (unsigned int)(argc - 2)) && (j < S6DNS_MAX_SERVERS) ; i++)
{
ip46 z[S6DNS_MAX_SERVERS] ;
size_t n ;
unsigned int k = 0 ;
if (!*argv[2+i]) continue ;
if (!ip46_scanlist(z, S6DNS_MAX_SERVERS - j, argv[2 + i], &n))
strerr_diefu2sys(100, "make an IP address list out of ", argv[2+i]) ;
for (; k < n ; k++)
{
memcpy(s6dns_ip46list_ip(&servers, j + k), z[k].ip, SKALIBS_IP_SIZE) ;
#ifdef SKALIBS_IPV6_ENABLED
if (ip46_is6(z + k)) bitarray_set(servers.is6, j + k) ;
#endif
}
j += n ;
}
if (debuglevel & 1) dbh.post_recv = &s6dns_debug_dumpdt_post_recv ;
if (debuglevel & 2) { dbh.pre_send = &s6dns_debug_dumpdt_pre_send ; dbh.post_send = &s6dns_debug_dumpdt_post_send ; }
tain_now_set_stopwatch_g() ;
tain_add_g(&deadline, &deadline) ;
if (!s6dns_engine_init_r_g(&s6dns_engine_here, &servers, 0, d.s, d.len, qtype, &dbh, &deadline))
strerr_diefu1sys(111, "initialize query") ;
}
if (!s6dns_resolve_loop_g(&deadline))
{
char fmt[UINT16_FMT] ;
fmt[uint16_fmt(fmt, qtype)] = 0 ;
strerr_diefu6x((errno == ETIMEDOUT) ? 99 : 2, "resolve query ", argv[0], " of qtype ", fmt, ": ", s6dns_constants_error_str(errno)) ;
}
if (!s6dns_analyze_packet(&genwrite_stdout, s6dns_engine_packet(&s6dns_engine_here), s6dns_engine_packetlen(&s6dns_engine_here), 0))
{
int e = errno ;
buffer_flush(buffer_1) ;
errno = e ;
strerr_diefu1sys(111, "analyze response") ;
}
if (!buffer_flush(buffer_1)) strerr_diefu1sys(111, "write to stdout") ;
return 0 ;
}
|
