contrib/collection3: GenericStacked: Use stacking by default.
[collectd.git] / src / utils_dns.c
1 /*
2  * collectd - src/utils_dns.c
3  * Modifications Copyright (C) 2006  Florian octo Forster
4  * Copyright (C) 2002  The Measurement Factory, Inc.
5  * All rights reserved.
6  * 
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions are met:
9  * 
10  * 1. Redistributions of source code must retain the above copyright notice,
11  *    this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright notice,
13  *    this list of conditions and the following disclaimer in the documentation
14  *    and/or other materials provided with the distribution.
15  * 3. Neither the name of The Measurement Factory nor the names of its
16  *    contributors may be used to endorse or promote products derived from this
17  *    software without specific prior written permission.
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
20  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
23  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29  * POSSIBILITY OF SUCH DAMAGE.
30  *
31  * Authors:
32  *   The Measurement Factory, Inc. <http://www.measurement-factory.com/>
33  *   Florian octo Forster <octo at verplant.org>
34  */
35
36 #include "collectd.h"
37 #include "plugin.h"
38 #include "common.h"
39
40 #if HAVE_NETINET_IN_SYSTM_H
41 # include <netinet/in_systm.h>
42 #endif
43 #if HAVE_NETINET_IN_H
44 # include <netinet/in.h>
45 #endif
46 #if HAVE_ARPA_INET_H
47 # include <arpa/inet.h>
48 #endif
49 #if HAVE_SYS_SOCKET_H
50 # include <sys/socket.h>
51 #endif
52
53 #if HAVE_ARPA_NAMESER_H
54 # include <arpa/nameser.h>
55 #endif
56 #if HAVE_ARPA_NAMESER_COMPAT_H
57 # include <arpa/nameser_compat.h>
58 #endif
59
60 #if HAVE_NET_IF_ARP_H
61 # include <net/if_arp.h>
62 #endif
63 #if HAVE_NET_IF_H
64 # include <net/if.h>
65 #endif
66 #if HAVE_NETINET_IF_ETHER_H
67 # include <netinet/if_ether.h>
68 #endif
69 #if HAVE_NET_PPP_DEFS_H
70 # include <net/ppp_defs.h>
71 #endif
72 #if HAVE_NET_IF_PPP_H
73 # include <net/if_ppp.h>
74 #endif
75
76 #if HAVE_NETDB_H
77 # include <netdb.h>
78 #endif
79
80 #if HAVE_NETINET_IP_H
81 # include <netinet/ip.h>
82 #endif
83 #ifdef HAVE_NETINET_IP_VAR_H
84 # include <netinet/ip_var.h>
85 #endif
86 #if HAVE_NETINET_IP6_H
87 # include <netinet/ip6.h>
88 #endif
89 #if HAVE_NETINET_UDP_H
90 # include <netinet/udp.h>
91 #endif
92
93 #if HAVE_PCAP_H
94 # include <pcap.h>
95 #endif
96
97 #define PCAP_SNAPLEN 1460
98 #ifndef ETHER_HDR_LEN
99 #define ETHER_ADDR_LEN 6
100 #define ETHER_TYPE_LEN 2
101 #define ETHER_HDR_LEN (ETHER_ADDR_LEN * 2 + ETHER_TYPE_LEN)
102 #endif
103 #ifndef ETHERTYPE_8021Q
104 # define ETHERTYPE_8021Q 0x8100
105 #endif
106 #ifndef ETHERTYPE_IPV6
107 # define ETHERTYPE_IPV6 0x86DD
108 #endif
109
110 #ifndef PPP_ADDRESS_VAL
111 # define PPP_ADDRESS_VAL 0xff   /* The address byte value */
112 #endif
113 #ifndef PPP_CONTROL_VAL
114 # define PPP_CONTROL_VAL 0x03   /* The control byte value */
115 #endif
116
117 #if HAVE_STRUCT_UDPHDR_UH_DPORT && HAVE_STRUCT_UDPHDR_UH_SPORT
118 # define UDP_DEST uh_dport
119 # define UDP_SRC  uh_dport
120 #elif HAVE_STRUCT_UDPHDR_DEST && HAVE_STRUCT_UDPHDR_SOURCE
121 # define UDP_DEST dest
122 # define UDP_SRC  source
123 #else
124 # error "`struct udphdr' is unusable."
125 #endif
126
127 #include "utils_dns.h"
128
129 /*
130  * Type definitions
131  */
132 struct ip_list_s
133 {
134     struct in6_addr addr;
135     void *data;
136     struct ip_list_s *next;
137 };
138 typedef struct ip_list_s ip_list_t;
139
140 typedef int (printer)(const char *, ...);
141
142 /*
143  * flags/features for non-interactive mode
144  */
145
146 #ifndef T_A6
147 #define T_A6 38
148 #endif
149 #ifndef T_SRV
150 #define T_SRV 33
151 #endif
152
153 /*
154  * Global variables
155  */
156 int qtype_counts[T_MAX];
157 int opcode_counts[OP_MAX];
158 int qclass_counts[C_MAX];
159
160 #if HAVE_PCAP_H
161 static pcap_t *pcap_obj = NULL;
162 #endif
163
164 static ip_list_t *IgnoreList = NULL;
165
166 #if HAVE_PCAP_H
167 static void (*Callback) (const rfc1035_header_t *) = NULL;
168
169 static int query_count_intvl = 0;
170 static int query_count_total = 0;
171 # ifdef __OpenBSD__
172 static struct bpf_timeval last_ts;
173 # else
174 static struct timeval last_ts;
175 # endif /* __OpenBSD__ */
176 #endif /* HAVE_PCAP_H */
177
178 static int cmp_in6_addr (const struct in6_addr *a,
179         const struct in6_addr *b)
180 {
181     int i;
182
183     assert (sizeof (struct in6_addr) == 16);
184
185     for (i = 0; i < 16; i++)
186         if (a->s6_addr[i] != b->s6_addr[i])
187             break;
188
189     if (i >= 16)
190         return (0);
191
192     return (a->s6_addr[i] > b->s6_addr[i] ? 1 : -1);
193 } /* int cmp_addrinfo */
194
195 static inline int ignore_list_match (const struct in6_addr *addr)
196 {
197     ip_list_t *ptr;
198
199     for (ptr = IgnoreList; ptr != NULL; ptr = ptr->next)
200         if (cmp_in6_addr (addr, &ptr->addr) == 0)
201             return (1);
202     return (0);
203 } /* int ignore_list_match */
204
205 static void ignore_list_add (const struct in6_addr *addr)
206 {
207     ip_list_t *new;
208
209     if (ignore_list_match (addr) != 0)
210         return;
211
212     new = malloc (sizeof (ip_list_t));
213     if (new == NULL)
214     {
215         perror ("malloc");
216         return;
217     }
218
219     memcpy (&new->addr, addr, sizeof (struct in6_addr));
220     new->next = IgnoreList;
221
222     IgnoreList = new;
223 } /* void ignore_list_add */
224
225 void ignore_list_add_name (const char *name)
226 {
227     struct addrinfo *ai_list;
228     struct addrinfo *ai_ptr;
229     struct in6_addr  addr;
230     int status;
231
232     status = getaddrinfo (name, NULL, NULL, &ai_list);
233     if (status != 0)
234         return;
235
236     for (ai_ptr = ai_list; ai_ptr != NULL; ai_ptr = ai_ptr->ai_next)
237     {
238         if (ai_ptr->ai_family == AF_INET)
239         {
240             memset (&addr, '\0', sizeof (addr));
241             addr.s6_addr[10] = 0xFF;
242             addr.s6_addr[11] = 0xFF;
243             memcpy (addr.s6_addr + 12, &((struct sockaddr_in *) ai_ptr->ai_addr)->sin_addr, 4);
244
245             ignore_list_add (&addr);
246         }
247         else
248         {
249             ignore_list_add (&((struct sockaddr_in6 *) ai_ptr->ai_addr)->sin6_addr);
250         }
251     } /* for */
252
253     freeaddrinfo (ai_list);
254 }
255
256 #if HAVE_PCAP_H
257 static void in6_addr_from_buffer (struct in6_addr *ia,
258         const void *buf, size_t buf_len,
259         int family)
260 {
261     memset (ia, 0, sizeof (struct in6_addr));
262     if ((AF_INET == family) && (sizeof (uint32_t) == buf_len))
263     {
264         ia->s6_addr[10] = 0xFF;
265         ia->s6_addr[11] = 0xFF;
266         memcpy (ia->s6_addr + 12, buf, buf_len);
267     }
268     else if ((AF_INET6 == family) && (sizeof (struct in6_addr) == buf_len))
269     {
270         memcpy (ia, buf, buf_len);
271     }
272 } /* void in6_addr_from_buffer */
273
274 void dnstop_set_pcap_obj (pcap_t *po)
275 {
276         pcap_obj = po;
277 }
278
279 void dnstop_set_callback (void (*cb) (const rfc1035_header_t *))
280 {
281         Callback = cb;
282 }
283
284 #define RFC1035_MAXLABELSZ 63
285 static int
286 rfc1035NameUnpack(const char *buf, size_t sz, off_t * off, char *name, size_t ns
287 )
288 {
289     off_t no = 0;
290     unsigned char c;
291     size_t len;
292     assert(ns > 0);
293     do {
294         if ((*off) >= sz)
295             break;
296         c = *(buf + (*off));
297         if (c > 191) {
298             /* blasted compression */
299             unsigned short s;
300             off_t ptr;
301             memcpy(&s, buf + (*off), sizeof(s));
302             s = ntohs(s);
303             (*off) += sizeof(s);
304             /* Sanity check */
305             if ((*off) >= sz)
306                 return 1;
307             ptr = s & 0x3FFF;
308             /* Make sure the pointer is inside this message */
309             if (ptr >= sz)
310                 return 2;
311             return rfc1035NameUnpack(buf, sz, &ptr, name + no, ns - no);
312         } else if (c > RFC1035_MAXLABELSZ) {
313             /*
314              * "(The 10 and 01 combinations are reserved for future use.)"
315              */
316             break;
317             return 3;
318         } else {
319             (*off)++;
320             len = (size_t) c;
321             if (len == 0)
322                 break;
323             if (len > (ns - 1))
324                 len = ns - 1;
325             if ((*off) + len > sz)      /* message is too short */
326                 return 4;
327             memcpy(name + no, buf + (*off), len);
328             (*off) += len;
329             no += len;
330             *(name + (no++)) = '.';
331         }
332     } while (c > 0);
333     *(name + no - 1) = '\0';
334     /* make sure we didn't allow someone to overflow the name buffer */
335     assert(no <= ns);
336     return 0;
337 }
338
339 static int
340 handle_dns(const char *buf, int len)
341 {
342     rfc1035_header_t qh;
343     uint16_t us;
344     off_t offset;
345     char *t;
346     int x;
347
348     /* The DNS header is 12 bytes long */
349     if (len < 12)
350         return 0;
351
352     memcpy(&us, buf + 0, 2);
353     qh.id = ntohs(us);
354
355     memcpy(&us, buf + 2, 2);
356     us = ntohs(us);
357     qh.qr = (us >> 15) & 0x01;
358     qh.opcode = (us >> 11) & 0x0F;
359     qh.aa = (us >> 10) & 0x01;
360     qh.tc = (us >> 9) & 0x01;
361     qh.rd = (us >> 8) & 0x01;
362     qh.ra = (us >> 7) & 0x01;
363     qh.z  = (us >> 6) & 0x01;
364     qh.ad = (us >> 5) & 0x01;
365     qh.cd = (us >> 4) & 0x01;
366     qh.rcode = us & 0x0F;
367
368     memcpy(&us, buf + 4, 2);
369     qh.qdcount = ntohs(us);
370
371     memcpy(&us, buf + 6, 2);
372     qh.ancount = ntohs(us);
373
374     memcpy(&us, buf + 8, 2);
375     qh.nscount = ntohs(us);
376
377     memcpy(&us, buf + 10, 2);
378     qh.arcount = ntohs(us);
379
380     offset = 12;
381     memset(qh.qname, '\0', MAX_QNAME_SZ);
382     x = rfc1035NameUnpack(buf, len, &offset, qh.qname, MAX_QNAME_SZ);
383     if (0 != x)
384         return 0;
385     if ('\0' == qh.qname[0])
386         sstrncpy (qh.qname, ".", sizeof (qh.qname));
387     while ((t = strchr(qh.qname, '\n')))
388         *t = ' ';
389     while ((t = strchr(qh.qname, '\r')))
390         *t = ' ';
391     for (t = qh.qname; *t; t++)
392         *t = tolower((int) *t);
393
394     memcpy(&us, buf + offset, 2);
395     qh.qtype = ntohs(us);
396     memcpy(&us, buf + offset + 2, 2);
397     qh.qclass = ntohs(us);
398
399     qh.length = (uint16_t) len;
400
401     /* gather stats */
402     qtype_counts[qh.qtype]++;
403     qclass_counts[qh.qclass]++;
404     opcode_counts[qh.opcode]++;
405
406     if (Callback != NULL)
407             Callback (&qh);
408
409     return 1;
410 }
411
412 static int
413 handle_udp(const struct udphdr *udp, int len)
414 {
415     char buf[PCAP_SNAPLEN];
416     if ((ntohs (udp->UDP_DEST) != 53)
417                     && (ntohs (udp->UDP_SRC) != 53))
418         return 0;
419     memcpy(buf, udp + 1, len - sizeof(*udp));
420     if (0 == handle_dns(buf, len - sizeof(*udp)))
421         return 0;
422     return 1;
423 }
424
425 static int
426 handle_ipv6 (struct ip6_hdr *ipv6, int len)
427 {
428     char buf[PCAP_SNAPLEN];
429     unsigned int offset;
430     int nexthdr;
431
432     struct in6_addr s_addr;
433     struct in6_addr d_addr;
434     uint16_t payload_len;
435
436     if (0 > len)
437         return (0);
438
439     offset = sizeof (struct ip6_hdr);
440     nexthdr = ipv6->ip6_nxt;
441     s_addr = ipv6->ip6_src;
442     d_addr = ipv6->ip6_dst;
443     payload_len = ntohs (ipv6->ip6_plen);
444
445     if (ignore_list_match (&s_addr))
446             return (0);
447
448     /* Parse extension headers. This only handles the standard headers, as
449      * defined in RFC 2460, correctly. Fragments are discarded. */
450     while ((IPPROTO_ROUTING == nexthdr) /* routing header */
451             || (IPPROTO_HOPOPTS == nexthdr) /* Hop-by-Hop options. */
452             || (IPPROTO_FRAGMENT == nexthdr) /* fragmentation header. */
453             || (IPPROTO_DSTOPTS == nexthdr) /* destination options. */
454             || (IPPROTO_DSTOPTS == nexthdr) /* destination options. */
455             || (IPPROTO_AH == nexthdr) /* destination options. */
456             || (IPPROTO_ESP == nexthdr)) /* encapsulating security payload. */
457     {
458         struct ip6_ext ext_hdr;
459         uint16_t ext_hdr_len;
460
461         /* Catch broken packets */
462         if ((offset + sizeof (struct ip6_ext)) > (unsigned int)len)
463             return (0);
464
465         /* Cannot handle fragments. */
466         if (IPPROTO_FRAGMENT == nexthdr)
467             return (0);
468
469         memcpy (&ext_hdr, (char *) ipv6 + offset, sizeof (struct ip6_ext));
470         nexthdr = ext_hdr.ip6e_nxt;
471         ext_hdr_len = (8 * (ntohs (ext_hdr.ip6e_len) + 1));
472
473         /* This header is longer than the packets payload.. WTF? */
474         if (ext_hdr_len > payload_len)
475             return (0);
476
477         offset += ext_hdr_len;
478         payload_len -= ext_hdr_len;
479     } /* while */
480
481     /* Catch broken and empty packets */
482     if (((offset + payload_len) > (unsigned int)len)
483             || (payload_len == 0)
484             || (payload_len > PCAP_SNAPLEN))
485         return (0);
486
487     if (IPPROTO_UDP != nexthdr)
488         return (0);
489
490     memcpy (buf, (char *) ipv6 + offset, payload_len);
491     if (handle_udp ((struct udphdr *) buf, payload_len) == 0)
492         return (0);
493
494     return (1); /* Success */
495 } /* int handle_ipv6 */
496
497 static int
498 handle_ip(const struct ip *ip, int len)
499 {
500     char buf[PCAP_SNAPLEN];
501     int offset = ip->ip_hl << 2;
502     struct in6_addr s_addr;
503     struct in6_addr d_addr;
504
505     if (ip->ip_v == 6)
506         return (handle_ipv6 ((struct ip6_hdr *) ip, len));
507
508     in6_addr_from_buffer (&s_addr, &ip->ip_src.s_addr, sizeof (ip->ip_src.s_addr), AF_INET);
509     in6_addr_from_buffer (&d_addr, &ip->ip_dst.s_addr, sizeof (ip->ip_dst.s_addr), AF_INET);
510     if (ignore_list_match (&s_addr))
511             return (0);
512     if (IPPROTO_UDP != ip->ip_p)
513         return 0;
514     memcpy(buf, (void *) ip + offset, len - offset);
515     if (0 == handle_udp((struct udphdr *) buf, len - offset))
516         return 0;
517     return 1;
518 }
519
520 #if HAVE_NET_IF_PPP_H
521 static int
522 handle_ppp(const u_char * pkt, int len)
523 {
524     char buf[PCAP_SNAPLEN];
525     unsigned short us;
526     unsigned short proto;
527     if (len < 2)
528         return 0;
529     if (*pkt == PPP_ADDRESS_VAL && *(pkt + 1) == PPP_CONTROL_VAL) {
530         pkt += 2;               /* ACFC not used */
531         len -= 2;
532     }
533     if (len < 2)
534         return 0;
535     if (*pkt % 2) {
536         proto = *pkt;           /* PFC is used */
537         pkt++;
538         len--;
539     } else {
540         memcpy(&us, pkt, sizeof(us));
541         proto = ntohs(us);
542         pkt += 2;
543         len -= 2;
544     }
545     if (ETHERTYPE_IP != proto && PPP_IP != proto)
546         return 0;
547     memcpy(buf, pkt, len);
548     return handle_ip((struct ip *) buf, len);
549 }
550 #endif /* HAVE_NET_IF_PPP_H */
551
552 static int
553 handle_null(const u_char * pkt, int len)
554 {
555     unsigned int family;
556     memcpy(&family, pkt, sizeof(family));
557     if (AF_INET != family)
558         return 0;
559     return handle_ip((struct ip *) (pkt + 4), len - 4);
560 }
561
562 #ifdef DLT_LOOP
563 static int
564 handle_loop(const u_char * pkt, int len)
565 {
566     unsigned int family;
567     memcpy(&family, pkt, sizeof(family));
568     if (AF_INET != ntohl(family))
569         return 0;
570     return handle_ip((struct ip *) (pkt + 4), len - 4);
571 }
572
573 #endif
574
575 #ifdef DLT_RAW
576 static int
577 handle_raw(const u_char * pkt, int len)
578 {
579     return handle_ip((struct ip *) pkt, len);
580 }
581
582 #endif
583
584 static int
585 handle_ether(const u_char * pkt, int len)
586 {
587     char buf[PCAP_SNAPLEN];
588     struct ether_header *e = (void *) pkt;
589     unsigned short etype = ntohs(e->ether_type);
590     if (len < ETHER_HDR_LEN)
591         return 0;
592     pkt += ETHER_HDR_LEN;
593     len -= ETHER_HDR_LEN;
594     if (ETHERTYPE_8021Q == etype) {
595         etype = ntohs(*(unsigned short *) (pkt + 2));
596         pkt += 4;
597         len -= 4;
598     }
599     if ((ETHERTYPE_IP != etype)
600             && (ETHERTYPE_IPV6 != etype))
601         return 0;
602     memcpy(buf, pkt, len);
603     if (ETHERTYPE_IPV6 == etype)
604         return (handle_ipv6 ((struct ip6_hdr *) buf, len));
605     else
606         return handle_ip((struct ip *) buf, len);
607 }
608
609 #ifdef DLT_LINUX_SLL
610 static int
611 handle_linux_sll (const u_char *pkt, int len)
612 {
613     struct sll_header
614     {
615         uint16_t pkt_type;
616         uint16_t dev_type;
617         uint16_t addr_len;
618         uint8_t  addr[8];
619         uint16_t proto_type;
620     } *hdr;
621     uint16_t etype;
622
623     if ((0 > len) || ((unsigned int)len < sizeof (struct sll_header)))
624         return (0);
625
626     hdr  = (struct sll_header *) pkt;
627     pkt  = (u_char *) (hdr + 1);
628     len -= sizeof (struct sll_header);
629
630     etype = ntohs (hdr->proto_type);
631
632     if ((ETHERTYPE_IP != etype)
633             && (ETHERTYPE_IPV6 != etype))
634         return 0;
635
636     if (ETHERTYPE_IPV6 == etype)
637         return (handle_ipv6 ((struct ip6_hdr *) pkt, len));
638     else
639         return handle_ip((struct ip *) pkt, len);
640 }
641 #endif /* DLT_LINUX_SLL */
642
643 /* public function */
644 void handle_pcap(u_char *udata, const struct pcap_pkthdr *hdr, const u_char *pkt)
645 {
646     int status;
647
648     DEBUG ("handle_pcap (udata = %p, hdr = %p, pkt = %p): hdr->caplen = %i\n",
649                     (void *) udata, (void *) hdr, (void *) pkt,
650                     hdr->caplen);
651
652     if (hdr->caplen < ETHER_HDR_LEN)
653         return;
654
655     switch (pcap_datalink (pcap_obj))
656     {
657         case DLT_EN10MB:
658             status = handle_ether (pkt, hdr->caplen);
659             break;
660 #if HAVE_NET_IF_PPP_H
661         case DLT_PPP:
662             status = handle_ppp (pkt, hdr->caplen);
663             break;
664 #endif
665 #ifdef DLT_LOOP
666         case DLT_LOOP:
667             status = handle_loop (pkt, hdr->caplen);
668             break;
669 #endif
670 #ifdef DLT_RAW
671         case DLT_RAW:
672             status = handle_raw (pkt, hdr->caplen);
673             break;
674 #endif
675 #ifdef DLT_LINUX_SLL
676         case DLT_LINUX_SLL:
677             status = handle_linux_sll (pkt, hdr->caplen);
678             break;
679 #endif
680         case DLT_NULL:
681             status = handle_null (pkt, hdr->caplen);
682             break;
683
684         default:
685             ERROR ("handle_pcap: unsupported data link type %d\n",
686                     pcap_datalink(pcap_obj));
687             status = 0;
688             break;
689     } /* switch (pcap_datalink(pcap_obj)) */
690
691     if (0 == status)
692         return;
693
694     query_count_intvl++;
695     query_count_total++;
696     last_ts = hdr->ts;
697 }
698 #endif /* HAVE_PCAP_H */
699
700 const char *qtype_str(int t)
701 {
702     static char buf[32];
703     switch (t) {
704 #if (defined (__NAMESER)) && (__NAMESER >= 19991001)
705             case ns_t_a:        return ("A");
706             case ns_t_ns:       return ("NS");
707             case ns_t_md:       return ("MD");
708             case ns_t_mf:       return ("MF");
709             case ns_t_cname:    return ("CNAME");
710             case ns_t_soa:      return ("SOA");
711             case ns_t_mb:       return ("MB");
712             case ns_t_mg:       return ("MG");
713             case ns_t_mr:       return ("MR");
714             case ns_t_null:     return ("NULL");
715             case ns_t_wks:      return ("WKS");
716             case ns_t_ptr:      return ("PTR");
717             case ns_t_hinfo:    return ("HINFO");
718             case ns_t_minfo:    return ("MINFO");
719             case ns_t_mx:       return ("MX");
720             case ns_t_txt:      return ("TXT");
721             case ns_t_rp:       return ("RP");
722             case ns_t_afsdb:    return ("AFSDB");
723             case ns_t_x25:      return ("X25");
724             case ns_t_isdn:     return ("ISDN");
725             case ns_t_rt:       return ("RT");
726             case ns_t_nsap:     return ("NSAP");
727             case ns_t_nsap_ptr: return ("NSAP-PTR");
728             case ns_t_sig:      return ("SIG");
729             case ns_t_key:      return ("KEY");
730             case ns_t_px:       return ("PX");
731             case ns_t_gpos:     return ("GPOS");
732             case ns_t_aaaa:     return ("AAAA");
733             case ns_t_loc:      return ("LOC");
734             case ns_t_nxt:      return ("NXT");
735             case ns_t_eid:      return ("EID");
736             case ns_t_nimloc:   return ("NIMLOC");
737             case ns_t_srv:      return ("SRV");
738             case ns_t_atma:     return ("ATMA");
739             case ns_t_naptr:    return ("NAPTR");
740             case ns_t_kx:       return ("KX");
741             case ns_t_cert:     return ("CERT");
742             case ns_t_a6:       return ("A6");
743             case ns_t_dname:    return ("DNAME");
744             case ns_t_sink:     return ("SINK");
745             case ns_t_opt:      return ("OPT");
746 # if __NAMESER >= 19991006
747             case ns_t_tsig:     return ("TSIG");
748 # endif
749             case ns_t_ixfr:     return ("IXFR");
750             case ns_t_axfr:     return ("AXFR");
751             case ns_t_mailb:    return ("MAILB");
752             case ns_t_maila:    return ("MAILA");
753             case ns_t_any:      return ("ANY");
754             case ns_t_zxfr:     return ("ZXFR");
755 /* #endif __NAMESER >= 19991006 */
756 #elif (defined (__BIND)) && (__BIND >= 19950621)
757             case T_A:           return ("A"); /* 1 ... */
758             case T_NS:          return ("NS");
759             case T_MD:          return ("MD");
760             case T_MF:          return ("MF");
761             case T_CNAME:       return ("CNAME");
762             case T_SOA:         return ("SOA");
763             case T_MB:          return ("MB");
764             case T_MG:          return ("MG");
765             case T_MR:          return ("MR");
766             case T_NULL:        return ("NULL");
767             case T_WKS:         return ("WKS");
768             case T_PTR:         return ("PTR");
769             case T_HINFO:       return ("HINFO");
770             case T_MINFO:       return ("MINFO");
771             case T_MX:          return ("MX");
772             case T_TXT:         return ("TXT");
773             case T_RP:          return ("RP");
774             case T_AFSDB:       return ("AFSDB");
775             case T_X25:         return ("X25");
776             case T_ISDN:        return ("ISDN");
777             case T_RT:          return ("RT");
778             case T_NSAP:        return ("NSAP");
779             case T_NSAP_PTR:    return ("NSAP_PTR");
780             case T_SIG:         return ("SIG");
781             case T_KEY:         return ("KEY");
782             case T_PX:          return ("PX");
783             case T_GPOS:        return ("GPOS");
784             case T_AAAA:        return ("AAAA");
785             case T_LOC:         return ("LOC");
786             case T_NXT:         return ("NXT");
787             case T_EID:         return ("EID");
788             case T_NIMLOC:      return ("NIMLOC");
789             case T_SRV:         return ("SRV");
790             case T_ATMA:        return ("ATMA");
791             case T_NAPTR:       return ("NAPTR"); /* ... 35 */
792 #if (__BIND >= 19960801)
793             case T_KX:          return ("KX"); /* 36 ... */
794             case T_CERT:        return ("CERT");
795             case T_A6:          return ("A6");
796             case T_DNAME:       return ("DNAME");
797             case T_SINK:        return ("SINK");
798             case T_OPT:         return ("OPT");
799             case T_APL:         return ("APL");
800             case T_DS:          return ("DS");
801             case T_SSHFP:       return ("SSHFP");
802             case T_RRSIG:       return ("RRSIG");
803             case T_NSEC:        return ("NSEC");
804             case T_DNSKEY:      return ("DNSKEY"); /* ... 48 */
805             case T_TKEY:        return ("TKEY"); /* 249 */
806 #endif /* __BIND >= 19960801 */
807             case T_TSIG:        return ("TSIG"); /* 250 ... */
808             case T_IXFR:        return ("IXFR");
809             case T_AXFR:        return ("AXFR");
810             case T_MAILB:       return ("MAILB");
811             case T_MAILA:       return ("MAILA");
812             case T_ANY:         return ("ANY"); /* ... 255 */
813 #endif /* __BIND >= 19950621 */
814             default:
815                     ssnprintf (buf, sizeof (buf), "#%i", t);
816                     return (buf);
817     }; /* switch (t) */
818     /* NOTREACHED */
819     return (NULL);
820 }
821
822 const char *opcode_str (int o)
823 {
824     static char buf[30];
825     switch (o) {
826     case 0:
827         return "Query";
828         break;
829     case 1:
830         return "Iquery";
831         break;
832     case 2:
833         return "Status";
834         break;
835     case 4:
836         return "Notify";
837         break;
838     case 5:
839         return "Update";
840         break;
841     default:
842         ssnprintf(buf, sizeof (buf), "Opcode%d", o);
843         return buf;
844     }
845     /* NOTREACHED */
846 }
847
848 const char *rcode_str (int rcode)
849 {
850         static char buf[32];
851         switch (rcode)
852         {
853 #if (defined (__NAMESER)) && (__NAMESER >= 19991006)
854                 case ns_r_noerror:  return ("NOERROR");
855                 case ns_r_formerr:  return ("FORMERR");
856                 case ns_r_servfail: return ("SERVFAIL");
857                 case ns_r_nxdomain: return ("NXDOMAIN");
858                 case ns_r_notimpl:  return ("NOTIMPL");
859                 case ns_r_refused:  return ("REFUSED");
860                 case ns_r_yxdomain: return ("YXDOMAIN");
861                 case ns_r_yxrrset:  return ("YXRRSET");
862                 case ns_r_nxrrset:  return ("NXRRSET");
863                 case ns_r_notauth:  return ("NOTAUTH");
864                 case ns_r_notzone:  return ("NOTZONE");
865                 case ns_r_max:      return ("MAX");
866                 case ns_r_badsig:   return ("BADSIG");
867                 case ns_r_badkey:   return ("BADKEY");
868                 case ns_r_badtime:  return ("BADTIME");
869 /* #endif __NAMESER >= 19991006 */
870 #elif (defined (__BIND)) && (__BIND >= 19950621)
871                 case NOERROR:       return ("NOERROR");
872                 case FORMERR:       return ("FORMERR");
873                 case SERVFAIL:      return ("SERVFAIL");
874                 case NXDOMAIN:      return ("NXDOMAIN");
875                 case NOTIMP:        return ("NOTIMP");
876                 case REFUSED:       return ("REFUSED");
877 #if defined (YXDOMAIN) && defined (NXRRSET)
878                 case YXDOMAIN:      return ("YXDOMAIN");
879                 case YXRRSET:       return ("YXRRSET");
880                 case NXRRSET:       return ("NXRRSET");
881                 case NOTAUTH:       return ("NOTAUTH");
882                 case NOTZONE:       return ("NOTZONE");
883 #endif  /* RFC2136 rcodes */
884 #endif /* __BIND >= 19950621 */
885                 default:
886                         ssnprintf (buf, sizeof (buf), "RCode%i", rcode);
887                         return (buf);
888         }
889         /* Never reached */
890         return (NULL);
891 } /* const char *rcode_str (int rcode) */
892
893 #if 0
894 static int
895 main(int argc, char *argv[])
896 {
897     char errbuf[PCAP_ERRBUF_SIZE];
898     int x;
899     struct stat sb;
900     int readfile_state = 0;
901     struct bpf_program fp;
902
903     port53 = htons(53);
904     SubReport = Sources_report;
905     ignore_addr.s_addr = 0;
906     progname = strdup(strrchr(argv[0], '/') ? strchr(argv[0], '/') + 1 : argv[0]);
907     srandom(time(NULL));
908     ResetCounters();
909
910     while ((x = getopt(argc, argv, "ab:f:i:pst")) != -1) {
911         switch (x) {
912         case 'a':
913             anon_flag = 1;
914             break;
915         case 's':
916             sld_flag = 1;
917             break;
918         case 't':
919             nld_flag = 1;
920             break;
921         case 'p':
922             promisc_flag = 0;
923             break;
924         case 'b':
925             bpf_program_str = strdup(optarg);
926             break;
927         case 'i':
928             ignore_addr.s_addr = inet_addr(optarg);
929             break;
930         case 'f':
931             set_filter(optarg);
932             break;
933         default:
934             usage();
935             break;
936         }
937     }
938     argc -= optind;
939     argv += optind;
940
941     if (argc < 1)
942         usage();
943     device = strdup(argv[0]);
944
945     if (0 == stat(device, &sb))
946         readfile_state = 1;
947     if (readfile_state) {
948         pcap_obj = pcap_open_offline(device, errbuf);
949     } else {
950         pcap_obj = pcap_open_live(device, PCAP_SNAPLEN, promisc_flag, 1000, errbuf);
951     }
952     if (NULL == pcap_obj) {
953         fprintf(stderr, "pcap_open_*: %s\n", errbuf);
954         exit(1);
955     }
956
957     if (0 == isatty(1)) {
958         if (0 == readfile_state) {
959             fprintf(stderr, "Non-interactive mode requires savefile argument\n");
960             exit(1);
961         }
962         interactive = 0;
963         print_func = printf;
964     }
965
966     memset(&fp, '\0', sizeof(fp));
967     x = pcap_compile(pcap_obj, &fp, bpf_program_str, 1, 0);
968     if (x < 0) {
969         fprintf(stderr, "pcap_compile failed\n");
970         exit(1);
971     }
972     x = pcap_setfilter(pcap_obj, &fp);
973     if (x < 0) {
974         fprintf(stderr, "pcap_setfilter failed\n");
975         exit(1);
976     }
977
978     /*
979      * non-blocking call added for Mac OS X bugfix.  Sent by Max Horn.
980      * ref http://www.tcpdump.org/lists/workers/2002/09/msg00033.html
981      */
982     x = pcap_setnonblock(pcap_obj, 1, errbuf);
983     if (x < 0) {
984         fprintf(stderr, "pcap_setnonblock failed: %s\n", errbuf);
985         exit(1);
986     }
987
988     switch (pcap_datalink(pcap_obj)) {
989     case DLT_EN10MB:
990         handle_datalink = handle_ether;
991         break;
992 #if HAVE_NET_IF_PPP_H
993     case DLT_PPP:
994         handle_datalink = handle_ppp;
995         break;
996 #endif
997 #ifdef DLT_LOOP
998     case DLT_LOOP:
999         handle_datalink = handle_loop;
1000         break;
1001 #endif
1002 #ifdef DLT_RAW
1003     case DLT_RAW:
1004         handle_datalink = handle_raw;
1005         break;
1006 #endif
1007     case DLT_NULL:
1008         handle_datalink = handle_null;
1009         break;
1010     default:
1011         fprintf(stderr, "unsupported data link type %d\n",
1012             pcap_datalink(pcap_obj));
1013         return 1;
1014         break;
1015     }
1016     if (interactive) {
1017         init_curses();
1018         while (0 == Quit) {
1019             if (readfile_state < 2) {
1020                 /*
1021                  * On some OSes select() might return 0 even when
1022                  * there are packets to process.  Thus, we always
1023                  * ignore its return value and just call pcap_dispatch()
1024                  * anyway.
1025                  */
1026                 if (0 == readfile_state)        /* interactive */
1027                     pcap_select(pcap_obj, 1, 0);
1028                 x = pcap_dispatch(pcap_obj, 50, handle_pcap, NULL);
1029             }
1030             if (0 == x && 1 == readfile_state) {
1031                 /* block on keyboard until user quits */
1032                 readfile_state++;
1033                 nodelay(w, 0);
1034             }
1035             keyboard();
1036             cron_pre();
1037             report();
1038             cron_post();
1039         }
1040         endwin();               /* klin, Thu Nov 28 08:56:51 2002 */
1041     } else {
1042         while (pcap_dispatch(pcap_obj, 50, handle_pcap, NULL))
1043                 (void) 0;
1044         cron_pre();
1045         Sources_report(); print_func("\n");
1046         Destinatioreport(); print_func("\n");
1047         Qtypes_report(); print_func("\n");
1048         Opcodes_report(); print_func("\n");
1049         Tld_report(); print_func("\n");
1050         Sld_report(); print_func("\n");
1051         Nld_report(); print_func("\n");
1052         SldBySource_report();
1053     }
1054
1055     pcap_close(pcap_obj);
1056     return 0;
1057 } /* static int main(int argc, char *argv[]) */
1058 #endif
1059 /*
1060  * vim:shiftwidth=4:tabstop=8:softtabstop=4
1061  */