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