2 * Copyright (C) 2001 WIDE Project.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. Neither the name of the project nor the names of its contributors
14 * may be used to endorse or promote products derived from this software
15 * without specific prior written permission.
17 * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31 static const char rcsid
[] =
32 "@(#) $Header: /tcpdump/master/tcpdump/print-lwres.c,v 1.5 2001-06-26 06:19:05 guy Exp $ (LBL)";
39 #include <sys/param.h>
42 #include <netinet/in.h>
49 #include "interface.h"
50 #include "addrtoname.h"
51 #include "extract.h" /* must come after interface.h */
53 /* BIND9 lib/lwres/include/lwres */
54 typedef u_int32_t lwres_uint32_t
;
55 typedef u_int16_t lwres_uint16_t
;
56 typedef u_int8_t lwres_uint8_t
;
58 struct lwres_lwpacket
{
59 lwres_uint32_t length
;
60 lwres_uint16_t version
;
61 lwres_uint16_t pktflags
;
62 lwres_uint32_t serial
;
63 lwres_uint32_t opcode
;
64 lwres_uint32_t result
;
65 lwres_uint32_t recvlength
;
66 lwres_uint16_t authtype
;
67 lwres_uint16_t authlength
;
70 #define LWRES_LWPACKETFLAG_RESPONSE 0x0001U /* if set, pkt is a response */
72 #define LWRES_LWPACKETVERSION_0 0
74 #define LWRES_FLAG_TRUSTNOTREQUIRED 0x00000001U
75 #define LWRES_FLAG_SECUREDATA 0x00000002U
80 #define LWRES_OPCODE_NOOP 0x00000000U
84 lwres_uint16_t datalength
;
86 } lwres_nooprequest_t
;
90 lwres_uint16_t datalength
;
92 } lwres_noopresponse_t
;
95 * get addresses by name
97 #define LWRES_OPCODE_GETADDRSBYNAME 0x00010001U
99 typedef struct lwres_addr lwres_addr_t
;
102 lwres_uint32_t family
;
103 lwres_uint16_t length
;
109 lwres_uint32_t flags
;
110 lwres_uint32_t addrtypes
;
111 lwres_uint16_t namelen
;
113 } lwres_gabnrequest_t
;
117 lwres_uint32_t flags
;
118 lwres_uint16_t naliases
;
119 lwres_uint16_t naddrs
;
120 lwres_uint16_t realnamelen
;
121 /* aliases follows */
123 /* realname follows */
124 } lwres_gabnresponse_t
;
127 * get name by address
129 #define LWRES_OPCODE_GETNAMEBYADDR 0x00010002U
132 lwres_uint32_t flags
;
134 /* addr body follows */
135 } lwres_gnbarequest_t
;
139 lwres_uint32_t flags
;
140 lwres_uint16_t naliases
;
141 lwres_uint16_t realnamelen
;
142 /* aliases follows */
143 /* realname follows */
144 } lwres_gnbaresponse_t
;
149 #define LWRES_OPCODE_GETRDATABYNAME 0x00010003U
153 lwres_uint32_t flags
;
154 lwres_uint16_t rdclass
;
155 lwres_uint16_t rdtype
;
156 lwres_uint16_t namelen
;
158 } lwres_grbnrequest_t
;
162 lwres_uint32_t flags
;
163 lwres_uint16_t rdclass
;
164 lwres_uint16_t rdtype
;
166 lwres_uint16_t nrdatas
;
167 lwres_uint16_t nsigs
;
168 /* realname here (len + name) */
169 /* rdata here (len + name) */
170 /* signatures here (len + name) */
171 } lwres_grbnresponse_t
;
173 #define LWRDATA_VALIDATED 0x00000001
175 #define LWRES_ADDRTYPE_V4 0x00000001U /* ipv4 */
176 #define LWRES_ADDRTYPE_V6 0x00000002U /* ipv6 */
178 #define LWRES_MAX_ALIASES 16 /* max # of aliases */
179 #define LWRES_MAX_ADDRS 64 /* max # of addrs */
181 struct tok opcode
[] = {
182 { LWRES_OPCODE_NOOP
, "noop", },
183 { LWRES_OPCODE_GETADDRSBYNAME
, "getaddrsbyname", },
184 { LWRES_OPCODE_GETNAMEBYADDR
, "getnamebyaddr", },
185 { LWRES_OPCODE_GETRDATABYNAME
, "getrdatabyname", },
190 extern struct tok ns_type2str
[];
191 extern struct tok ns_class2str
[];
193 static int lwres_printname(size_t, const char *);
194 static int lwres_printnamelen(const char *);
195 static int lwres_printbinlen(const char *);
196 static int lwres_printaddr(lwres_addr_t
*);
199 lwres_printname(size_t l
, const char *p0
)
205 /* + 1 for terminating \0 */
206 if (p
+ l
+ 1 > (const char *)snapend
)
210 for (i
= 0; i
< l
; i
++)
212 p
++; /* skip terminating \0 */
221 lwres_printnamelen(const char *p
)
226 if (p
+ 2 > (const char *)snapend
)
228 l
= EXTRACT_16BITS(p
);
229 advance
= lwres_printname(l
, p
+ 2);
239 lwres_printbinlen(const char *p0
)
246 if (p
+ 2 > (const char *)snapend
)
248 l
= EXTRACT_16BITS(p
);
249 if (p
+ 2 + l
> (const char *)snapend
)
252 for (i
= 0; i
< l
; i
++)
253 printf("%02x", *p
++);
261 lwres_printaddr(lwres_addr_t
*ap
)
268 l
= ntohs(ap
->length
);
269 /* XXX ap points to packed struct */
270 p
= (const char *)&ap
->length
+ sizeof(ap
->length
);
271 if (p
+ l
> (const char *)snapend
)
274 switch (ntohl(ap
->family
)) {
276 printf(" %s", ipaddr_string(p
));
277 p
+= sizeof(struct in_addr
);
281 printf(" %s", ip6addr_string(p
));
282 p
+= sizeof(struct in6_addr
);
286 printf(" %lu/", (unsigned long)ntohl(ap
->family
));
287 for (i
= 0; i
< l
; i
++)
288 printf("%02x", *p
++);
291 return p
- (const char *)ap
;
298 lwres_print(register const u_char
*bp
, u_int length
)
300 const struct lwres_lwpacket
*np
;
307 np
= (const struct lwres_lwpacket
*)bp
;
308 TCHECK(np
->authlength
);
311 v
= ntohs(np
->version
);
312 if (vflag
|| v
!= LWRES_LWPACKETVERSION_0
)
314 if (v
!= LWRES_LWPACKETVERSION_0
) {
315 s
= (const char *)np
+ ntohl(np
->length
);
319 response
= ntohs(np
->pktflags
) & LWRES_LWPACKETFLAG_RESPONSE
;
321 /* opcode and pktflags */
322 v
= (u_int32_t
)ntohl(np
->opcode
);
323 s
= tok2str(opcode
, "#0x%x", v
);
324 printf(" %s%s", s
, response
? "" : "?");
327 v
= ntohs(np
->pktflags
);
328 if (v
& ~LWRES_LWPACKETFLAG_RESPONSE
)
333 printf("serial:0x%lx", (unsigned long)ntohl(np
->serial
));
334 printf(" result:0x%lx", (unsigned long)ntohl(np
->result
));
335 printf(" recvlen:%lu", (unsigned long)ntohl(np
->recvlength
));
336 /* BIND910: not used */
338 printf(" authtype:0x%x", ntohs(np
->authtype
));
339 printf(" authlen:%u", ntohs(np
->authlength
));
345 /* per-opcode content */
350 lwres_gabnrequest_t
*gabn
;
351 lwres_gnbarequest_t
*gnba
;
352 lwres_grbnrequest_t
*grbn
;
359 switch (ntohl(np
->opcode
)) {
360 case LWRES_OPCODE_NOOP
:
362 case LWRES_OPCODE_GETADDRSBYNAME
:
363 gabn
= (lwres_gabnrequest_t
*)(np
+ 1);
364 TCHECK(gabn
->namelen
);
365 /* XXX gabn points to packed struct */
366 s
= (const char *)&gabn
->namelen
+
367 sizeof(gabn
->namelen
);
368 l
= ntohs(gabn
->namelen
);
370 /* BIND910: not used */
372 printf(" flags:0x%lx",
373 (unsigned long)ntohl(gabn
->flags
));
376 v
= (u_int32_t
)ntohl(gabn
->addrtypes
);
377 switch (v
& (LWRES_ADDRTYPE_V4
| LWRES_ADDRTYPE_V6
)) {
378 case LWRES_ADDRTYPE_V4
:
381 case LWRES_ADDRTYPE_V6
:
384 case LWRES_ADDRTYPE_V4
| LWRES_ADDRTYPE_V6
:
388 if (v
& ~(LWRES_ADDRTYPE_V4
| LWRES_ADDRTYPE_V6
))
391 advance
= lwres_printname(l
, s
);
396 case LWRES_OPCODE_GETNAMEBYADDR
:
397 gnba
= (lwres_gnbarequest_t
*)(np
+ 1);
400 /* BIND910: not used */
402 printf(" flags:0x%lx",
403 (unsigned long)ntohl(gnba
->flags
));
406 s
= (const char *)&gnba
->addr
;
408 advance
= lwres_printaddr(&gnba
->addr
);
413 case LWRES_OPCODE_GETRDATABYNAME
:
414 /* XXX no trace, not tested */
415 grbn
= (lwres_grbnrequest_t
*)(np
+ 1);
416 TCHECK(grbn
->namelen
);
418 /* BIND910: not used */
420 printf(" flags:0x%lx",
421 (unsigned long)ntohl(grbn
->flags
));
424 printf(" %s", tok2str(ns_type2str
, "Type%d",
425 ntohs(grbn
->rdtype
)));
426 if (ntohs(grbn
->rdclass
) != C_IN
);
427 printf(" %s", tok2str(ns_class2str
, "Class%d",
428 ntohs(grbn
->rdclass
)));
430 /* XXX grbn points to packed struct */
431 s
= (const char *)&grbn
->namelen
+
432 sizeof(grbn
->namelen
);
433 l
= ntohs(gabn
->namelen
);
435 advance
= lwres_printname(l
, s
);
448 lwres_gabnresponse_t
*gabn
;
449 lwres_gnbaresponse_t
*gnba
;
450 lwres_grbnresponse_t
*grbn
;
458 switch (ntohl(np
->opcode
)) {
459 case LWRES_OPCODE_NOOP
:
461 case LWRES_OPCODE_GETADDRSBYNAME
:
462 gabn
= (lwres_gabnresponse_t
*)(np
+ 1);
463 TCHECK(gabn
->realnamelen
);
464 /* XXX gabn points to packed struct */
465 s
= (const char *)&gabn
->realnamelen
+
466 sizeof(gabn
->realnamelen
);
467 l
= ntohs(gabn
->realnamelen
);
469 /* BIND910: not used */
471 printf(" flags:0x%lx",
472 (unsigned long)ntohl(gabn
->flags
));
475 printf(" %u/%u", ntohs(gabn
->naliases
),
476 ntohs(gabn
->naddrs
));
478 advance
= lwres_printname(l
, s
);
484 na
= ntohs(gabn
->naliases
);
485 for (i
= 0; i
< na
; i
++) {
486 advance
= lwres_printnamelen(s
);
493 na
= ntohs(gabn
->naddrs
);
494 for (i
= 0; i
< na
; i
++) {
495 advance
= lwres_printaddr((lwres_addr_t
*)s
);
501 case LWRES_OPCODE_GETNAMEBYADDR
:
502 gnba
= (lwres_gnbaresponse_t
*)(np
+ 1);
503 TCHECK(gnba
->realnamelen
);
504 /* XXX gnba points to packed struct */
505 s
= (const char *)&gnba
->realnamelen
+
506 sizeof(gnba
->realnamelen
);
507 l
= ntohs(gnba
->realnamelen
);
509 /* BIND910: not used */
511 printf(" flags:0x%lx",
512 (unsigned long)ntohl(gnba
->flags
));
515 printf(" %u", ntohs(gnba
->naliases
));
517 advance
= lwres_printname(l
, s
);
523 na
= ntohs(gnba
->naliases
);
524 for (i
= 0; i
< na
; i
++) {
525 advance
= lwres_printnamelen(s
);
531 case LWRES_OPCODE_GETRDATABYNAME
:
532 /* XXX no trace, not tested */
533 grbn
= (lwres_grbnresponse_t
*)(np
+ 1);
536 /* BIND910: not used */
538 printf(" flags:0x%lx",
539 (unsigned long)ntohl(grbn
->flags
));
542 printf(" %s", tok2str(ns_type2str
, "Type%d",
543 ntohs(grbn
->rdtype
)));
544 if (ntohs(grbn
->rdclass
) != C_IN
);
545 printf(" %s", tok2str(ns_class2str
, "Class%d",
546 ntohs(grbn
->rdclass
)));
548 relts_print(ntohl(grbn
->ttl
));
549 printf(" %u/%u", ntohs(grbn
->nrdatas
),
552 /* XXX grbn points to packed struct */
553 s
= (const char *)&grbn
->nsigs
+ sizeof(grbn
->nsigs
);
555 advance
= lwres_printnamelen(s
);
561 na
= ntohs(grbn
->nrdatas
);
562 for (i
= 0; i
< na
; i
++) {
563 /* XXX should decode resource data */
564 advance
= lwres_printbinlen(s
);
571 na
= ntohs(grbn
->nsigs
);
572 for (i
= 0; i
< na
; i
++) {
573 /* XXX how should we print it? */
574 advance
= lwres_printbinlen(s
);
587 /* length mismatch */
588 if (ntohl(np
->length
) != length
) {
589 printf(" [len: %lu != %u]", (unsigned long)ntohl(np
->length
),
592 if (!unsupported
&& s
< (const char *)np
+ ntohl(np
->length
))