]> The Tcpdump Group git mirrors - tcpdump/blob - print-lwres.c
projects / tcpdump / blob
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
Fix the spacing of the UDP checksum reporting.
[tcpdump] / print-lwres.c
1 /*
2 * Copyright (C) 2001 WIDE Project.
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
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.
16 *
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
27 * SUCH DAMAGE.
28 */
29
30 #ifndef lint
31 static const char rcsid[] =
32 "@(#) $Header: /tcpdump/master/tcpdump/print-lwres.c,v 1.4 2001-02-09 05:16:48 guy Exp $ (LBL)";
33 #endif
34
35 #ifdef HAVE_CONFIG_H
36 #include "config.h"
37 #endif
38
39 #include <sys/param.h>
40 #include <sys/time.h>
41
42 #include <netinet/in.h>
43
44 #ifdef NOERROR
45 #undef NOERROR /* Solaris sucks */
46 #endif
47 #ifdef NOERROR
48 #undef T_UNSPEC /* SINIX does too */
49 #endif
50 #include "nameser.h"
51
52 #include <stdio.h>
53 #include <string.h>
54
55 #include "interface.h"
56 #include "addrtoname.h"
57 #include "extract.h" /* must come after interface.h */
58
59 /* BIND9 lib/lwres/include/lwres */
60 typedef u_int32_t lwres_uint32_t;
61 typedef u_int16_t lwres_uint16_t;
62 typedef u_int8_t lwres_uint8_t;
63
64 struct lwres_lwpacket {
65 lwres_uint32_t length;
66 lwres_uint16_t version;
67 lwres_uint16_t pktflags;
68 lwres_uint32_t serial;
69 lwres_uint32_t opcode;
70 lwres_uint32_t result;
71 lwres_uint32_t recvlength;
72 lwres_uint16_t authtype;
73 lwres_uint16_t authlength;
74 };
75
76 #define LWRES_LWPACKETFLAG_RESPONSE 0x0001U /* if set, pkt is a response */
77
78 #define LWRES_LWPACKETVERSION_0 0
79
80 #define LWRES_FLAG_TRUSTNOTREQUIRED 0x00000001U
81 #define LWRES_FLAG_SECUREDATA 0x00000002U
82
83 /*
84 * no-op
85 */
86 #define LWRES_OPCODE_NOOP 0x00000000U
87
88 typedef struct {
89 /* public */
90 lwres_uint16_t datalength;
91 /* data follows */
92 } lwres_nooprequest_t;
93
94 typedef struct {
95 /* public */
96 lwres_uint16_t datalength;
97 /* data follows */
98 } lwres_noopresponse_t;
99
100 /*
101 * get addresses by name
102 */
103 #define LWRES_OPCODE_GETADDRSBYNAME 0x00010001U
104
105 typedef struct lwres_addr lwres_addr_t;
106
107 struct lwres_addr {
108 lwres_uint32_t family;
109 lwres_uint16_t length;
110 /* address folows */
111 };
112
113 typedef struct {
114 /* public */
115 lwres_uint32_t flags;
116 lwres_uint32_t addrtypes;
117 lwres_uint16_t namelen;
118 /* name follows */
119 } lwres_gabnrequest_t;
120
121 typedef struct {
122 /* public */
123 lwres_uint32_t flags;
124 lwres_uint16_t naliases;
125 lwres_uint16_t naddrs;
126 lwres_uint16_t realnamelen;
127 /* aliases follows */
128 /* addrs follows */
129 /* realname follows */
130 } lwres_gabnresponse_t;
131
132 /*
133 * get name by address
134 */
135 #define LWRES_OPCODE_GETNAMEBYADDR 0x00010002U
136 typedef struct {
137 /* public */
138 lwres_uint32_t flags;
139 lwres_addr_t addr;
140 /* addr body follows */
141 } lwres_gnbarequest_t;
142
143 typedef struct {
144 /* public */
145 lwres_uint32_t flags;
146 lwres_uint16_t naliases;
147 lwres_uint16_t realnamelen;
148 /* aliases follows */
149 /* realname follows */
150 } lwres_gnbaresponse_t;
151
152 /*
153 * get rdata by name
154 */
155 #define LWRES_OPCODE_GETRDATABYNAME 0x00010003U
156
157 typedef struct {
158 /* public */
159 lwres_uint32_t flags;
160 lwres_uint16_t rdclass;
161 lwres_uint16_t rdtype;
162 lwres_uint16_t namelen;
163 /* name follows */
164 } lwres_grbnrequest_t;
165
166 typedef struct {
167 /* public */
168 lwres_uint32_t flags;
169 lwres_uint16_t rdclass;
170 lwres_uint16_t rdtype;
171 lwres_uint32_t ttl;
172 lwres_uint16_t nrdatas;
173 lwres_uint16_t nsigs;
174 /* realname here (len + name) */
175 /* rdata here (len + name) */
176 /* signatures here (len + name) */
177 } lwres_grbnresponse_t;
178
179 #define LWRDATA_VALIDATED 0x00000001
180
181 #define LWRES_ADDRTYPE_V4 0x00000001U /* ipv4 */
182 #define LWRES_ADDRTYPE_V6 0x00000002U /* ipv6 */
183
184 #define LWRES_MAX_ALIASES 16 /* max # of aliases */
185 #define LWRES_MAX_ADDRS 64 /* max # of addrs */
186
187 struct tok opcode[] = {
188 { LWRES_OPCODE_NOOP, "noop", },
189 { LWRES_OPCODE_GETADDRSBYNAME, "getaddrsbyname", },
190 { LWRES_OPCODE_GETNAMEBYADDR, "getnamebyaddr", },
191 { LWRES_OPCODE_GETRDATABYNAME, "getrdatabyname", },
192 { 0, NULL, },
193 };
194
195 /* print-domain.c */
196 extern struct tok ns_type2str[];
197 extern struct tok ns_class2str[];
198
199 static int lwres_printname(size_t, const char *);
200 static int lwres_printnamelen(const char *);
201 static int lwres_printbinlen(const char *);
202 static int lwres_printaddr(lwres_addr_t *);
203
204 static int
205 lwres_printname(size_t l, const char *p0)
206 {
207 const char *p;
208 int i;
209
210 p = p0;
211 /* + 1 for terminating \0 */
212 if (p + l + 1 > (const char *)snapend)
213 goto trunc;
214
215 printf(" ");
216 for (i = 0; i < l; i++)
217 safeputchar(*p++);
218 p++; /* skip terminating \0 */
219
220 return p - p0;
221
222 trunc:
223 return -1;
224 }
225
226 static int
227 lwres_printnamelen(const char *p)
228 {
229 u_int16_t l;
230 int advance;
231
232 if (p + 2 > (const char *)snapend)
233 goto trunc;
234 l = EXTRACT_16BITS(p);
235 advance = lwres_printname(l, p + 2);
236 if (advance < 0)
237 goto trunc;
238 return 2 + advance;
239
240 trunc:
241 return -1;
242 }
243
244 static int
245 lwres_printbinlen(const char *p0)
246 {
247 const char *p;
248 u_int16_t l;
249 int i;
250
251 p = p0;
252 if (p + 2 > (const char *)snapend)
253 goto trunc;
254 l = EXTRACT_16BITS(p);
255 if (p + 2 + l > (const char *)snapend)
256 goto trunc;
257 p += 2;
258 for (i = 0; i < l; i++)
259 printf("%02x", *p++);
260 return p - p0;
261
262 trunc:
263 return -1;
264 }
265
266 static int
267 lwres_printaddr(lwres_addr_t *ap)
268 {
269 u_int16_t l;
270 const char *p;
271 int i;
272
273 TCHECK(ap->length);
274 l = ntohs(ap->length);
275 /* XXX ap points to packed struct */
276 p = (const char *)&ap->length + sizeof(ap->length);
277 if (p + l > (const char *)snapend)
278 goto trunc;
279
280 switch (ntohl(ap->family)) {
281 case 1: /* IPv4 */
282 printf(" %s", ipaddr_string(p));
283 p += sizeof(struct in_addr);
284 break;
285 #ifdef INET6
286 case 2: /* IPv6 */
287 printf(" %s", ip6addr_string(p));
288 p += sizeof(struct in6_addr);
289 break;
290 #endif
291 default:
292 printf(" %lu/", (unsigned long)ntohl(ap->family));
293 for (i = 0; i < l; i++)
294 printf("%02x", *p++);
295 }
296
297 return p - (const char *)ap;
298
299 trunc:
300 return -1;
301 }
302
303 void
304 lwres_print(register const u_char *bp, u_int length)
305 {
306 const struct lwres_lwpacket *np;
307 u_int32_t v;
308 const char *s;
309 int response;
310 int advance;
311 int unsupported = 0;
312
313 np = (const struct lwres_lwpacket *)bp;
314 TCHECK(np->authlength);
315
316 printf(" lwres");
317 v = ntohs(np->version);
318 if (vflag || v != LWRES_LWPACKETVERSION_0)
319 printf(" v%u", v);
320 if (v != LWRES_LWPACKETVERSION_0) {
321 s = (const char *)np + ntohl(np->length);
322 goto tail;
323 }
324
325 response = ntohs(np->pktflags) & LWRES_LWPACKETFLAG_RESPONSE;
326
327 /* opcode and pktflags */
328 v = (u_int32_t)ntohl(np->opcode);
329 s = tok2str(opcode, "#0x%x", v);
330 printf(" %s%s", s, response ? "" : "?");
331
332 /* pktflags */
333 v = ntohs(np->pktflags);
334 if (v & ~LWRES_LWPACKETFLAG_RESPONSE)
335 printf("[0x%x]", v);
336
337 if (vflag > 1) {
338 printf(" ("); /*)*/
339 printf("serial:0x%lx", (unsigned long)ntohl(np->serial));
340 printf(" result:0x%lx", (unsigned long)ntohl(np->result));
341 printf(" recvlen:%lu", (unsigned long)ntohl(np->recvlength));
342 /* BIND910: not used */
343 if (vflag > 2) {
344 printf(" authtype:0x%x", ntohs(np->authtype));
345 printf(" authlen:%u", ntohs(np->authlength));
346 }
347 /*(*/
348 printf(")");
349 }
350
351 /* per-opcode content */
352 if (!response) {
353 /*
354 * queries
355 */
356 lwres_gabnrequest_t *gabn;
357 lwres_gnbarequest_t *gnba;
358 lwres_grbnrequest_t *grbn;
359 u_int32_t l;
360
361 gabn = NULL;
362 gnba = NULL;
363 grbn = NULL;
364
365 switch (ntohl(np->opcode)) {
366 case LWRES_OPCODE_NOOP:
367 break;
368 case LWRES_OPCODE_GETADDRSBYNAME:
369 gabn = (lwres_gabnrequest_t *)(np + 1);
370 TCHECK(gabn->namelen);
371 /* XXX gabn points to packed struct */
372 s = (const char *)&gabn->namelen +
373 sizeof(gabn->namelen);
374 l = ntohs(gabn->namelen);
375
376 /* BIND910: not used */
377 if (vflag > 2) {
378 printf(" flags:0x%lx",
379 (unsigned long)ntohl(gabn->flags));
380 }
381
382 v = (u_int32_t)ntohl(gabn->addrtypes);
383 switch (v & (LWRES_ADDRTYPE_V4 | LWRES_ADDRTYPE_V6)) {
384 case LWRES_ADDRTYPE_V4:
385 printf(" IPv4");
386 break;
387 case LWRES_ADDRTYPE_V6:
388 printf(" IPv6");
389 break;
390 case LWRES_ADDRTYPE_V4 | LWRES_ADDRTYPE_V6:
391 printf(" IPv4/6");
392 break;
393 }
394 if (v & ~(LWRES_ADDRTYPE_V4 | LWRES_ADDRTYPE_V6))
395 printf("[0x%x]", v);
396
397 advance = lwres_printname(l, s);
398 if (advance < 0)
399 goto trunc;
400 s += advance;
401 break;
402 case LWRES_OPCODE_GETNAMEBYADDR:
403 gnba = (lwres_gnbarequest_t *)(np + 1);
404 TCHECK(gnba->addr);
405
406 /* BIND910: not used */
407 if (vflag > 2) {
408 printf(" flags:0x%lx",
409 (unsigned long)ntohl(gnba->flags));
410 }
411
412 s = (const char *)&gnba->addr;
413
414 advance = lwres_printaddr(&gnba->addr);
415 if (advance < 0)
416 goto trunc;
417 s += advance;
418 break;
419 case LWRES_OPCODE_GETRDATABYNAME:
420 /* XXX no trace, not tested */
421 grbn = (lwres_grbnrequest_t *)(np + 1);
422 TCHECK(grbn->namelen);
423
424 /* BIND910: not used */
425 if (vflag > 2) {
426 printf(" flags:0x%lx",
427 (unsigned long)ntohl(grbn->flags));
428 }
429
430 printf(" %s", tok2str(ns_type2str, "Type%d",
431 ntohs(grbn->rdtype)));
432 if (ntohs(grbn->rdclass) != C_IN);
433 printf(" %s", tok2str(ns_class2str, "Class%d",
434 ntohs(grbn->rdclass)));
435
436 /* XXX grbn points to packed struct */
437 s = (const char *)&grbn->namelen +
438 sizeof(grbn->namelen);
439 l = ntohs(gabn->namelen);
440
441 advance = lwres_printname(l, s);
442 if (advance < 0)
443 goto trunc;
444 s += advance;
445 break;
446 default:
447 unsupported++;
448 break;
449 }
450 } else {
451 /*
452 * responses
453 */
454 lwres_gabnresponse_t *gabn;
455 lwres_gnbaresponse_t *gnba;
456 lwres_grbnresponse_t *grbn;
457 u_int32_t l, na;
458 int i;
459
460 gabn = NULL;
461 gnba = NULL;
462 grbn = NULL;
463
464 switch (ntohl(np->opcode)) {
465 case LWRES_OPCODE_NOOP:
466 break;
467 case LWRES_OPCODE_GETADDRSBYNAME:
468 gabn = (lwres_gabnresponse_t *)(np + 1);
469 TCHECK(gabn->realnamelen);
470 /* XXX gabn points to packed struct */
471 s = (const char *)&gabn->realnamelen +
472 sizeof(gabn->realnamelen);
473 l = ntohs(gabn->realnamelen);
474
475 /* BIND910: not used */
476 if (vflag > 2) {
477 printf(" flags:0x%lx",
478 (unsigned long)ntohl(gabn->flags));
479 }
480
481 printf(" %u/%u", ntohs(gabn->naliases),
482 ntohs(gabn->naddrs));
483
484 advance = lwres_printname(l, s);
485 if (advance < 0)
486 goto trunc;
487 s += advance;
488
489 /* aliases */
490 na = ntohs(gabn->naliases);
491 for (i = 0; i < na; i++) {
492 advance = lwres_printnamelen(s);
493 if (advance < 0)
494 goto trunc;
495 s += advance;
496 }
497
498 /* addrs */
499 na = ntohs(gabn->naddrs);
500 for (i = 0; i < na; i++) {
501 advance = lwres_printaddr((lwres_addr_t *)s);
502 if (advance < 0)
503 goto trunc;
504 s += advance;
505 }
506 break;
507 case LWRES_OPCODE_GETNAMEBYADDR:
508 gnba = (lwres_gnbaresponse_t *)(np + 1);
509 TCHECK(gnba->realnamelen);
510 /* XXX gnba points to packed struct */
511 s = (const char *)&gnba->realnamelen +
512 sizeof(gnba->realnamelen);
513 l = ntohs(gnba->realnamelen);
514
515 /* BIND910: not used */
516 if (vflag > 2) {
517 printf(" flags:0x%lx",
518 (unsigned long)ntohl(gnba->flags));
519 }
520
521 printf(" %u", ntohs(gnba->naliases));
522
523 advance = lwres_printname(l, s);
524 if (advance < 0)
525 goto trunc;
526 s += advance;
527
528 /* aliases */
529 na = ntohs(gnba->naliases);
530 for (i = 0; i < na; i++) {
531 advance = lwres_printnamelen(s);
532 if (advance < 0)
533 goto trunc;
534 s += advance;
535 }
536 break;
537 case LWRES_OPCODE_GETRDATABYNAME:
538 /* XXX no trace, not tested */
539 grbn = (lwres_grbnresponse_t *)(np + 1);
540 TCHECK(grbn->nsigs);
541
542 /* BIND910: not used */
543 if (vflag > 2) {
544 printf(" flags:0x%lx",
545 (unsigned long)ntohl(grbn->flags));
546 }
547
548 printf(" %s", tok2str(ns_type2str, "Type%d",
549 ntohs(grbn->rdtype)));
550 if (ntohs(grbn->rdclass) != C_IN);
551 printf(" %s", tok2str(ns_class2str, "Class%d",
552 ntohs(grbn->rdclass)));
553 printf(" TTL ");
554 relts_print(ntohl(grbn->ttl));
555 printf(" %u/%u", ntohs(grbn->nrdatas),
556 ntohs(grbn->nsigs));
557
558 /* XXX grbn points to packed struct */
559 s = (const char *)&grbn->nsigs+ sizeof(grbn->nsigs);
560
561 advance = lwres_printnamelen(s);
562 if (advance < 0)
563 goto trunc;
564 s += advance;
565
566 /* rdatas */
567 na = ntohs(grbn->nrdatas);
568 for (i = 0; i < na; i++) {
569 /* XXX should decode resource data */
570 advance = lwres_printbinlen(s);
571 if (advance < 0)
572 goto trunc;
573 s += advance;
574 }
575
576 /* sigs */
577 na = ntohs(grbn->nsigs);
578 for (i = 0; i < na; i++) {
579 /* XXX how should we print it? */
580 advance = lwres_printbinlen(s);
581 if (advance < 0)
582 goto trunc;
583 s += advance;
584 }
585 break;
586 default:
587 unsupported++;
588 break;
589 }
590 }
591
592 tail:
593 /* length mismatch */
594 if (ntohl(np->length) != length) {
595 printf(" [len: %lu != %u]", (unsigned long)ntohl(np->length),
596 length);
597 }
598 if (!unsupported && s < (const char *)np + ntohl(np->length))
599 printf("[extra]");
600 return;
601
602 trunc:
603 printf("[|lwres]");
604 return;
605 }
[mirror] the TCPdump network dissector