]> The Tcpdump Group git mirrors - tcpdump/blobdiff - addrtoname.c
Handle very large -f files by rejecting them.
[tcpdump] / addrtoname.c
index 1d7e60f967d36f196e3c10fb2c3ae6847b7ea452..15e57411f52c6be2c1bee49af3d254014c5bd35d 100644 (file)
@@ -26,7 +26,7 @@
 #include "config.h"
 #endif
 
-#include <tcpdump-stdinc.h>
+#include <netdissect-stdinc.h>
 
 #ifdef USE_ETHER_NTOHOST
 #ifdef HAVE_NETINET_IF_ETHER_H
@@ -57,8 +57,10 @@ extern int ether_ntohost(char *, const struct ether_addr *);
 #include <string.h>
 #include <stdlib.h>
 
-#include "interface.h"
+#include "netdissect.h"
 #include "addrtoname.h"
+#include "addrtostr.h"
+#include "ethertype.h"
 #include "llc.h"
 #include "setsignal.h"
 #include "extract.h"
@@ -71,13 +73,13 @@ extern int ether_ntohost(char *, const struct ether_addr *);
 /*
  * hash tables for whatever-to-name translations
  *
- * XXX there has to be error checks against strdup(3) failure
+ * ndo_error() called on strdup(3) failure
  */
 
 #define HASHNAMESIZE 4096
 
 struct hnamemem {
-       u_int32_t addr;
+       uint32_t addr;
        const char *name;
        struct hnamemem *nxt;
 };
@@ -89,7 +91,7 @@ static struct hnamemem eprototable[HASHNAMESIZE];
 static struct hnamemem dnaddrtable[HASHNAMESIZE];
 static struct hnamemem ipxsaptable[HASHNAMESIZE];
 
-#if defined(INET6) && defined(WIN32)
+#ifdef _WIN32
 /*
  * fake gethostbyaddr for Win2k/XP
  * gethostbyaddr() returns incorrect value when AF_INET6 is passed
@@ -118,7 +120,7 @@ win32_gethostbyaddr(const char *addr, int len, int type)
                    hname, sizeof(hname), NULL, 0, 0)) {
                        return NULL;
                } else {
-                       strcpy(host.h_name, hname);
+                       strlcpy(host.h_name, hname, NI_MAXHOST);
                        return &host;
                }
                break;
@@ -127,9 +129,8 @@ win32_gethostbyaddr(const char *addr, int len, int type)
        }
 }
 #define gethostbyaddr win32_gethostbyaddr
-#endif /* INET6 & WIN32 */
+#endif /* _WIN32 */
 
-#ifdef INET6
 struct h6namemem {
        struct in6_addr addr;
        char *name;
@@ -137,7 +138,6 @@ struct h6namemem {
 };
 
 static struct h6namemem h6nametable[HASHNAMESIZE];
-#endif /* INET6 */
 
 struct enamemem {
        u_short e_addr0;
@@ -145,16 +145,26 @@ struct enamemem {
        u_short e_addr2;
        const char *e_name;
        u_char *e_nsap;                 /* used only for nsaptable[] */
-#define e_bs e_nsap                    /* for bytestringtable */
        struct enamemem *e_nxt;
 };
 
 static struct enamemem enametable[HASHNAMESIZE];
 static struct enamemem nsaptable[HASHNAMESIZE];
-static struct enamemem bytestringtable[HASHNAMESIZE];
+
+struct bsnamemem {
+       u_short bs_addr0;
+       u_short bs_addr1;
+       u_short bs_addr2;
+       const char *bs_name;
+       u_char *bs_bytes;
+       unsigned int bs_nbytes;
+       struct bsnamemem *bs_nxt;
+};
+
+static struct bsnamemem bytestringtable[HASHNAMESIZE];
 
 struct protoidmem {
-       u_int32_t p_oui;
+       uint32_t p_oui;
        u_short p_proto;
        const char *p_name;
        struct protoidmem *p_nxt;
@@ -166,7 +176,7 @@ static struct protoidmem protoidtable[HASHNAMESIZE];
  * A faster replacement for inet_ntoa().
  */
 const char *
-intoa(u_int32_t addr)
+intoa(uint32_t addr)
 {
        register char *cp;
        register u_int byte;
@@ -195,8 +205,8 @@ intoa(u_int32_t addr)
        return cp + 1;
 }
 
-static u_int32_t f_netmask;
-static u_int32_t f_localnet;
+static uint32_t f_netmask;
+static uint32_t f_localnet;
 
 /*
  * Return a name for the IP address pointed to by ap.  This address
@@ -204,7 +214,7 @@ static u_int32_t f_localnet;
  *
  * NOTE: ap is *NOT* necessarily part of the packet data (not even if
  * this is being called with the "ipaddr_string()" macro), so you
- * *CANNOT* use the TCHECK{2}/TTEST{2} macros on it.  Furthermore,
+ * *CANNOT* use the ND_TCHECK{2}/ND_TTEST{2} macros on it.  Furthermore,
  * even in cases where it *is* part of the packet data, the caller
  * would still have to check for a null return value, even if it's
  * just printing the return value with "%s" - not all versions of
@@ -218,11 +228,11 @@ static u_int32_t f_localnet;
  * also needs to check whether they're present in the packet buffer.
  */
 const char *
-getname(const u_char *ap)
+getname(netdissect_options *ndo, const u_char *ap)
 {
        register struct hostent *hp;
-       u_int32_t addr;
-       static struct hnamemem *p;              /* static for longjmp() */
+       uint32_t addr;
+       struct hnamemem *p;
 
        memcpy(&addr, ap, sizeof(addr));
        p = &hnametable[addr & (HASHNAMESIZE-1)];
@@ -231,7 +241,7 @@ getname(const u_char *ap)
                        return (p->name);
        }
        p->addr = addr;
-       p->nxt = newhnamemem();
+       p->nxt = newhnamemem(ndo);
 
        /*
         * Print names unless:
@@ -240,14 +250,17 @@ getname(const u_char *ap)
         *          given, f_netmask and f_localnet are 0 and the test
         *          evaluates to true)
         */
-       if (!nflag &&
+       if (!ndo->ndo_nflag &&
            (addr & f_netmask) == f_localnet) {
                hp = gethostbyaddr((char *)&addr, 4, AF_INET);
                if (hp) {
                        char *dotp;
 
                        p->name = strdup(hp->h_name);
-                       if (Nflag) {
+                       if (p->name == NULL)
+                               (*ndo->ndo_error)(ndo,
+                                                 "getname: strdup(hp->h_name)");
+                       if (ndo->ndo_Nflag) {
                                /* Remove domain qualifications */
                                dotp = strchr(p->name, '.');
                                if (dotp)
@@ -257,26 +270,27 @@ getname(const u_char *ap)
                }
        }
        p->name = strdup(intoa(addr));
+       if (p->name == NULL)
+               (*ndo->ndo_error)(ndo, "getname: strdup(intoa(addr))");
        return (p->name);
 }
 
-#ifdef INET6
 /*
  * Return a name for the IP6 address pointed to by ap.  This address
  * is assumed to be in network byte order.
  */
 const char *
-getname6(const u_char *ap)
+getname6(netdissect_options *ndo, const u_char *ap)
 {
        register struct hostent *hp;
        union {
                struct in6_addr addr;
                struct for_hash_addr {
                        char fill[14];
-                       u_int16_t d;
+                       uint16_t d;
                } addra;
        } addr;
-       static struct h6namemem *p;             /* static for longjmp() */
+       struct h6namemem *p;
        register const char *cp;
        char ntop_buf[INET6_ADDRSTRLEN];
 
@@ -287,18 +301,21 @@ getname6(const u_char *ap)
                        return (p->name);
        }
        p->addr = addr.addr;
-       p->nxt = newh6namemem();
+       p->nxt = newh6namemem(ndo);
 
        /*
         * Do not print names if -n was given.
         */
-       if (!nflag) {
+       if (!ndo->ndo_nflag) {
                hp = gethostbyaddr((char *)&addr, sizeof(addr), AF_INET6);
                if (hp) {
                        char *dotp;
 
                        p->name = strdup(hp->h_name);
-                       if (Nflag) {
+                       if (p->name == NULL)
+                               (*ndo->ndo_error)(ndo,
+                                                 "getname6: strdup(hp->h_name)");
+                       if (ndo->ndo_Nflag) {
                                /* Remove domain qualifications */
                                dotp = strchr(p->name, '.');
                                if (dotp)
@@ -307,19 +324,20 @@ getname6(const u_char *ap)
                        return (p->name);
                }
        }
-       cp = inet_ntop(AF_INET6, &addr, ntop_buf, sizeof(ntop_buf));
+       cp = addrtostr6(ap, ntop_buf, sizeof(ntop_buf));
        p->name = strdup(cp);
+       if (p->name == NULL)
+               (*ndo->ndo_error)(ndo, "getname6: strdup(cp)");
        return (p->name);
 }
-#endif /* INET6 */
 
-static const char hex[] = "0123456789abcdef";
+static const char hex[16] = "0123456789abcdef";
 
 
 /* Find the hash node that corresponds the ether address 'ep' */
 
 static inline struct enamemem *
-lookup_emem(const u_char *ep)
+lookup_emem(netdissect_options *ndo, const u_char *ep)
 {
        register u_int i, j, k;
        struct enamemem *tp;
@@ -341,7 +359,7 @@ lookup_emem(const u_char *ep)
        tp->e_addr2 = k;
        tp->e_nxt = (struct enamemem *)calloc(1, sizeof(*tp));
        if (tp->e_nxt == NULL)
-               error("lookup_emem: calloc");
+               (*ndo->ndo_error)(ndo, "lookup_emem: calloc");
 
        return tp;
 }
@@ -351,10 +369,11 @@ lookup_emem(const u_char *ep)
  * with length 'nlen'
  */
 
-static inline struct enamemem *
-lookup_bytestring(register const u_char *bs, const unsigned int nlen)
+static inline struct bsnamemem *
+lookup_bytestring(netdissect_options *ndo, register const u_char *bs,
+                 const unsigned int nlen)
 {
-       struct enamemem *tp;
+       struct bsnamemem *tp;
        register u_int i, j, k;
 
        if (nlen >= 6) {
@@ -369,27 +388,29 @@ lookup_bytestring(register const u_char *bs, const unsigned int nlen)
                i = j = k = 0;
 
        tp = &bytestringtable[(i ^ j) & (HASHNAMESIZE-1)];
-       while (tp->e_nxt)
-               if (tp->e_addr0 == i &&
-                   tp->e_addr1 == j &&
-                   tp->e_addr2 == k &&
-                   memcmp((const char *)bs, (const char *)(tp->e_bs), nlen) == 0)
+       while (tp->bs_nxt)
+               if (nlen == tp->bs_nbytes &&
+                   tp->bs_addr0 == i &&
+                   tp->bs_addr1 == j &&
+                   tp->bs_addr2 == k &&
+                   memcmp((const char *)bs, (const char *)(tp->bs_bytes), nlen) == 0)
                        return tp;
                else
-                       tp = tp->e_nxt;
+                       tp = tp->bs_nxt;
 
-       tp->e_addr0 = i;
-       tp->e_addr1 = j;
-       tp->e_addr2 = k;
+       tp->bs_addr0 = i;
+       tp->bs_addr1 = j;
+       tp->bs_addr2 = k;
 
-       tp->e_bs = (u_char *) calloc(1, nlen + 1);
-       if (tp->e_bs == NULL)
-               error("lookup_bytestring: calloc");
+       tp->bs_bytes = (u_char *) calloc(1, nlen);
+       if (tp->bs_bytes == NULL)
+               (*ndo->ndo_error)(ndo, "lookup_bytestring: calloc");
 
-       memcpy(tp->e_bs, bs, nlen);
-       tp->e_nxt = (struct enamemem *)calloc(1, sizeof(*tp));
-       if (tp->e_nxt == NULL)
-               error("lookup_bytestring: calloc");
+       memcpy(tp->bs_bytes, bs, nlen);
+       tp->bs_nbytes = nlen;
+       tp->bs_nxt = (struct bsnamemem *)calloc(1, sizeof(*tp));
+       if (tp->bs_nxt == NULL)
+               (*ndo->ndo_error)(ndo, "lookup_bytestring: calloc");
 
        return tp;
 }
@@ -397,14 +418,15 @@ lookup_bytestring(register const u_char *bs, const unsigned int nlen)
 /* Find the hash node that corresponds the NSAP 'nsap' */
 
 static inline struct enamemem *
-lookup_nsap(register const u_char *nsap)
+lookup_nsap(netdissect_options *ndo, register const u_char *nsap,
+           register u_int nsap_length)
 {
        register u_int i, j, k;
-       unsigned int nlen = *nsap;
        struct enamemem *tp;
-       const u_char *ensap = nsap + nlen - 6;
+       const u_char *ensap;
 
-       if (nlen > 6) {
+       if (nsap_length > 6) {
+               ensap = nsap + nsap_length - 6;
                k = (ensap[0] << 8) | ensap[1];
                j = (ensap[2] << 8) | ensap[3];
                i = (ensap[4] << 8) | ensap[5];
@@ -414,25 +436,26 @@ lookup_nsap(register const u_char *nsap)
 
        tp = &nsaptable[(i ^ j) & (HASHNAMESIZE-1)];
        while (tp->e_nxt)
-               if (tp->e_addr0 == i &&
+               if (nsap_length == tp->e_nsap[0] &&
+                   tp->e_addr0 == i &&
                    tp->e_addr1 == j &&
                    tp->e_addr2 == k &&
-                   tp->e_nsap[0] == nlen &&
-                   memcmp((const char *)&(nsap[1]),
-                       (char *)&(tp->e_nsap[1]), nlen) == 0)
+                   memcmp((const char *)nsap,
+                       (char *)&(tp->e_nsap[1]), nsap_length) == 0)
                        return tp;
                else
                        tp = tp->e_nxt;
        tp->e_addr0 = i;
        tp->e_addr1 = j;
        tp->e_addr2 = k;
-       tp->e_nsap = (u_char *)malloc(nlen + 1);
+       tp->e_nsap = (u_char *)malloc(nsap_length + 1);
        if (tp->e_nsap == NULL)
-               error("lookup_nsap: malloc");
-       memcpy((char *)tp->e_nsap, (const char *)nsap, nlen + 1);
+               (*ndo->ndo_error)(ndo, "lookup_nsap: malloc");
+       tp->e_nsap[0] = (u_char)nsap_length;    /* guaranteed < ISONSAP_MAX_LENGTH */
+       memcpy((char *)&tp->e_nsap[1], (const char *)nsap, nsap_length);
        tp->e_nxt = (struct enamemem *)calloc(1, sizeof(*tp));
        if (tp->e_nxt == NULL)
-               error("lookup_nsap: calloc");
+               (*ndo->ndo_error)(ndo, "lookup_nsap: calloc");
 
        return tp;
 }
@@ -440,7 +463,7 @@ lookup_nsap(register const u_char *nsap)
 /* Find the hash node that corresponds the protoid 'pi'. */
 
 static inline struct protoidmem *
-lookup_protoid(const u_char *pi)
+lookup_protoid(netdissect_options *ndo, const u_char *pi)
 {
        register u_int i, j;
        struct protoidmem *tp;
@@ -460,13 +483,13 @@ lookup_protoid(const u_char *pi)
        tp->p_proto = j;
        tp->p_nxt = (struct protoidmem *)calloc(1, sizeof(*tp));
        if (tp->p_nxt == NULL)
-               error("lookup_protoid: calloc");
+               (*ndo->ndo_error)(ndo, "lookup_protoid: calloc");
 
        return tp;
 }
 
 const char *
-etheraddr_string(register const u_char *ep)
+etheraddr_string(netdissect_options *ndo, register const u_char *ep)
 {
        register int i;
        register char *cp;
@@ -474,21 +497,18 @@ etheraddr_string(register const u_char *ep)
        int oui;
        char buf[BUFSIZE];
 
-       tp = lookup_emem(ep);
+       tp = lookup_emem(ndo, ep);
        if (tp->e_name)
                return (tp->e_name);
 #ifdef USE_ETHER_NTOHOST
-       if (!nflag) {
+       if (!ndo->ndo_nflag) {
                char buf2[BUFSIZE];
 
-               /*
-                * We don't cast it to "const struct ether_addr *"
-                * because some systems fail to declare the second
-                * argument as a "const" pointer, even though they
-                * don't modify what it points to.
-                */
-               if (ether_ntohost(buf2, (struct ether_addr *)ep) == 0) {
+               if (ether_ntohost(buf2, (const struct ether_addr *)ep) == 0) {
                        tp->e_name = strdup(buf2);
+                       if (tp->e_name == NULL)
+                               (*ndo->ndo_error)(ndo,
+                                                 "etheraddr_string: strdup(buf2)");
                        return (tp->e_name);
                }
        }
@@ -503,27 +523,29 @@ etheraddr_string(register const u_char *ep)
                *cp++ = hex[*ep++ & 0xf];
        }
 
-       if (!nflag) {
+       if (!ndo->ndo_nflag) {
                snprintf(cp, BUFSIZE - (2 + 5*3), " (oui %s)",
                    tok2str(oui_values, "Unknown", oui));
        } else
                *cp = '\0';
        tp->e_name = strdup(buf);
+       if (tp->e_name == NULL)
+               (*ndo->ndo_error)(ndo, "etheraddr_string: strdup(buf)");
        return (tp->e_name);
 }
 
 const char *
-le64addr_string(const u_char *ep)
+le64addr_string(netdissect_options *ndo, const u_char *ep)
 {
        const unsigned int len = 8;
        register u_int i;
        register char *cp;
-       register struct enamemem *tp;
+       register struct bsnamemem *tp;
        char buf[BUFSIZE];
 
-       tp = lookup_bytestring(ep, len);
-       if (tp->e_name)
-               return (tp->e_name);
+       tp = lookup_bytestring(ndo, ep, len);
+       if (tp->bs_name)
+               return (tp->bs_name);
 
        cp = buf;
        for (i = len; i > 0 ; --i) {
@@ -535,34 +557,37 @@ le64addr_string(const u_char *ep)
 
        *cp = '\0';
 
-       tp->e_name = strdup(buf);
+       tp->bs_name = strdup(buf);
+       if (tp->bs_name == NULL)
+               (*ndo->ndo_error)(ndo, "le64addr_string: strdup(buf)");
 
-       return (tp->e_name);
+       return (tp->bs_name);
 }
 
 const char *
-linkaddr_string(const u_char *ep, const unsigned int type, const unsigned int len)
+linkaddr_string(netdissect_options *ndo, const u_char *ep,
+               const unsigned int type, const unsigned int len)
 {
        register u_int i;
        register char *cp;
-       register struct enamemem *tp;
+       register struct bsnamemem *tp;
 
        if (len == 0)
                return ("<empty>");
 
        if (type == LINKADDR_ETHER && len == ETHER_ADDR_LEN)
-               return (etheraddr_string(ep));
+               return (etheraddr_string(ndo, ep));
 
        if (type == LINKADDR_FRELAY)
-               return (q922_string(ep));
+               return (q922_string(ndo, ep, len));
 
-       tp = lookup_bytestring(ep, len);
-       if (tp->e_name)
-               return (tp->e_name);
+       tp = lookup_bytestring(ndo, ep, len);
+       if (tp->bs_name)
+               return (tp->bs_name);
 
-       tp->e_name = cp = (char *)malloc(len*3);
-       if (tp->e_name == NULL)
-               error("linkaddr_string: malloc");
+       tp->bs_name = cp = (char *)malloc(len*3);
+       if (tp->bs_name == NULL)
+               (*ndo->ndo_error)(ndo, "linkaddr_string: malloc");
        *cp++ = hex[*ep >> 4];
        *cp++ = hex[*ep++ & 0xf];
        for (i = len-1; i > 0 ; --i) {
@@ -571,15 +596,15 @@ linkaddr_string(const u_char *ep, const unsigned int type, const unsigned int le
                *cp++ = hex[*ep++ & 0xf];
        }
        *cp = '\0';
-       return (tp->e_name);
+       return (tp->bs_name);
 }
 
 const char *
-etherproto_string(u_short port)
+etherproto_string(netdissect_options *ndo, u_short port)
 {
        register char *cp;
        register struct hnamemem *tp;
-       register u_int32_t i = port;
+       register uint32_t i = port;
        char buf[sizeof("0000")];
 
        for (tp = &eprototable[i & (HASHNAMESIZE-1)]; tp->nxt; tp = tp->nxt)
@@ -587,7 +612,7 @@ etherproto_string(u_short port)
                        return (tp->name);
 
        tp->addr = i;
-       tp->nxt = newhnamemem();
+       tp->nxt = newhnamemem(ndo);
 
        cp = buf;
        NTOHS(port);
@@ -597,18 +622,20 @@ etherproto_string(u_short port)
        *cp++ = hex[port & 0xf];
        *cp++ = '\0';
        tp->name = strdup(buf);
+       if (tp->name == NULL)
+               (*ndo->ndo_error)(ndo, "etherproto_string: strdup(buf)");
        return (tp->name);
 }
 
 const char *
-protoid_string(register const u_char *pi)
+protoid_string(netdissect_options *ndo, register const u_char *pi)
 {
        register u_int i, j;
        register char *cp;
        register struct protoidmem *tp;
        char buf[sizeof("00:00:00:00:00")];
 
-       tp = lookup_protoid(pi);
+       tp = lookup_protoid(ndo, pi);
        if (tp->p_name)
                return tp->p_name;
 
@@ -624,12 +651,15 @@ protoid_string(register const u_char *pi)
        }
        *cp = '\0';
        tp->p_name = strdup(buf);
+       if (tp->p_name == NULL)
+               (*ndo->ndo_error)(ndo, "protoid_string: strdup(buf)");
        return (tp->p_name);
 }
 
 #define ISONSAP_MAX_LENGTH 20
 const char *
-isonsap_string(const u_char *nsap, register u_int nsap_length)
+isonsap_string(netdissect_options *ndo, const u_char *nsap,
+              register u_int nsap_length)
 {
        register u_int nsap_idx;
        register char *cp;
@@ -638,13 +668,13 @@ isonsap_string(const u_char *nsap, register u_int nsap_length)
        if (nsap_length < 1 || nsap_length > ISONSAP_MAX_LENGTH)
                return ("isonsap_string: illegal length");
 
-       tp = lookup_nsap(nsap);
+       tp = lookup_nsap(ndo, nsap, nsap_length);
        if (tp->e_name)
                return tp->e_name;
 
        tp->e_name = cp = (char *)malloc(sizeof("xx.xxxx.xxxx.xxxx.xxxx.xxxx.xxxx.xxxx.xxxx.xxxx.xx"));
        if (cp == NULL)
-               error("isonsap_string: malloc");
+               (*ndo->ndo_error)(ndo, "isonsap_string: malloc");
 
        for (nsap_idx = 0; nsap_idx < nsap_length; nsap_idx++) {
                *cp++ = hex[*nsap >> 4];
@@ -659,10 +689,10 @@ isonsap_string(const u_char *nsap, register u_int nsap_length)
 }
 
 const char *
-tcpport_string(u_short port)
+tcpport_string(netdissect_options *ndo, u_short port)
 {
        register struct hnamemem *tp;
-       register u_int32_t i = port;
+       register uint32_t i = port;
        char buf[sizeof("00000")];
 
        for (tp = &tporttable[i & (HASHNAMESIZE-1)]; tp->nxt; tp = tp->nxt)
@@ -670,18 +700,20 @@ tcpport_string(u_short port)
                        return (tp->name);
 
        tp->addr = i;
-       tp->nxt = newhnamemem();
+       tp->nxt = newhnamemem(ndo);
 
        (void)snprintf(buf, sizeof(buf), "%u", i);
        tp->name = strdup(buf);
+       if (tp->name == NULL)
+               (*ndo->ndo_error)(ndo, "tcpport_string: strdup(buf)");
        return (tp->name);
 }
 
 const char *
-udpport_string(register u_short port)
+udpport_string(netdissect_options *ndo, register u_short port)
 {
        register struct hnamemem *tp;
-       register u_int32_t i = port;
+       register uint32_t i = port;
        char buf[sizeof("00000")];
 
        for (tp = &uporttable[i & (HASHNAMESIZE-1)]; tp->nxt; tp = tp->nxt)
@@ -689,19 +721,21 @@ udpport_string(register u_short port)
                        return (tp->name);
 
        tp->addr = i;
-       tp->nxt = newhnamemem();
+       tp->nxt = newhnamemem(ndo);
 
        (void)snprintf(buf, sizeof(buf), "%u", i);
        tp->name = strdup(buf);
+       if (tp->name == NULL)
+               (*ndo->ndo_error)(ndo, "udpport_string: strdup(buf)");
        return (tp->name);
 }
 
 const char *
-ipxsap_string(u_short port)
+ipxsap_string(netdissect_options *ndo, u_short port)
 {
        register char *cp;
        register struct hnamemem *tp;
-       register u_int32_t i = port;
+       register uint32_t i = port;
        char buf[sizeof("0000")];
 
        for (tp = &ipxsaptable[i & (HASHNAMESIZE-1)]; tp->nxt; tp = tp->nxt)
@@ -709,7 +743,7 @@ ipxsap_string(u_short port)
                        return (tp->name);
 
        tp->addr = i;
-       tp->nxt = newhnamemem();
+       tp->nxt = newhnamemem(ndo);
 
        cp = buf;
        NTOHS(port);
@@ -719,11 +753,13 @@ ipxsap_string(u_short port)
        *cp++ = hex[port & 0xf];
        *cp++ = '\0';
        tp->name = strdup(buf);
+       if (tp->name == NULL)
+               (*ndo->ndo_error)(ndo, "ipxsap_string: strdup(buf)");
        return (tp->name);
 }
 
 static void
-init_servarray(void)
+init_servarray(netdissect_options *ndo)
 {
        struct servent *sv;
        register struct hnamemem *table;
@@ -742,30 +778,49 @@ init_servarray(void)
 
                while (table->name)
                        table = table->nxt;
-               if (nflag) {
+               if (ndo->ndo_nflag) {
                        (void)snprintf(buf, sizeof(buf), "%d", port);
                        table->name = strdup(buf);
                } else
                        table->name = strdup(sv->s_name);
+               if (table->name == NULL)
+                       (*ndo->ndo_error)(ndo, "init_servarray: strdup");
+
                table->addr = port;
-               table->nxt = newhnamemem();
+               table->nxt = newhnamemem(ndo);
        }
        endservent();
 }
 
-/* in libpcap.a (nametoaddr.c) */
-#if defined(WIN32) && !defined(USE_STATIC_LIBPCAP)
-__declspec(dllimport)
-#else
-extern
-#endif
-const struct eproto {
+static const struct eproto {
        const char *s;
        u_short p;
-} eproto_db[];
+} eproto_db[] = {
+       { "pup", ETHERTYPE_PUP },
+       { "xns", ETHERTYPE_NS },
+       { "ip", ETHERTYPE_IP },
+       { "ip6", ETHERTYPE_IPV6 },
+       { "arp", ETHERTYPE_ARP },
+       { "rarp", ETHERTYPE_REVARP },
+       { "sprite", ETHERTYPE_SPRITE },
+       { "mopdl", ETHERTYPE_MOPDL },
+       { "moprc", ETHERTYPE_MOPRC },
+       { "decnet", ETHERTYPE_DN },
+       { "lat", ETHERTYPE_LAT },
+       { "sca", ETHERTYPE_SCA },
+       { "lanbridge", ETHERTYPE_LANBRIDGE },
+       { "vexp", ETHERTYPE_VEXP },
+       { "vprod", ETHERTYPE_VPROD },
+       { "atalk", ETHERTYPE_ATALK },
+       { "atalkarp", ETHERTYPE_AARP },
+       { "loopback", ETHERTYPE_LOOPBACK },
+       { "decdts", ETHERTYPE_DECDTS },
+       { "decdns", ETHERTYPE_DECDNS },
+       { (char *)0, 0 }
+};
 
 static void
-init_eprotoarray(void)
+init_eprotoarray(netdissect_options *ndo)
 {
        register int i;
        register struct hnamemem *table;
@@ -777,7 +832,7 @@ init_eprotoarray(void)
                        table = table->nxt;
                table->name = eproto_db[i].s;
                table->addr = htons(eproto_db[i].p);
-               table->nxt = newhnamemem();
+               table->nxt = newhnamemem(ndo);
        }
 }
 
@@ -798,7 +853,7 @@ static const struct protoidlist {
  * types.
  */
 static void
-init_protoidarray(void)
+init_protoidarray(netdissect_options *ndo)
 {
        register int i;
        register struct protoidmem *tp;
@@ -812,12 +867,15 @@ init_protoidarray(void)
                u_short etype = htons(eproto_db[i].p);
 
                memcpy((char *)&protoid[3], (char *)&etype, 2);
-               tp = lookup_protoid(protoid);
+               tp = lookup_protoid(ndo, protoid);
                tp->p_name = strdup(eproto_db[i].s);
+               if (tp->p_name == NULL)
+                       (*ndo->ndo_error)(ndo,
+                                         "init_protoidarray: strdup(eproto_db[i].s)");
        }
        /* Hardwire some SNAP proto ID names */
        for (pl = protoidlist; pl->name != NULL; ++pl) {
-               tp = lookup_protoid(pl->protoid);
+               tp = lookup_protoid(ndo, pl->protoid);
                /* Don't override existing name */
                if (tp->p_name != NULL)
                        continue;
@@ -849,7 +907,7 @@ static const struct etherlist {
  * translation, so we just pcap_next_etherent as a convenience.
  */
 static void
-init_etherarray(void)
+init_etherarray(netdissect_options *ndo)
 {
        register const struct etherlist *el;
        register struct enamemem *tp;
@@ -863,8 +921,11 @@ init_etherarray(void)
        fp = fopen(PCAP_ETHERS_FILE, "r");
        if (fp != NULL) {
                while ((ep = pcap_next_etherent(fp)) != NULL) {
-                       tp = lookup_emem(ep->addr);
+                       tp = lookup_emem(ndo, ep->addr);
                        tp->e_name = strdup(ep->name);
+                       if (tp->e_name == NULL)
+                               (*ndo->ndo_error)(ndo,
+                                                 "init_etherarray: strdup(ep->addr)");
                }
                (void)fclose(fp);
        }
@@ -872,7 +933,7 @@ init_etherarray(void)
 
        /* Hardwire some ethernet names */
        for (el = etherlist; el->name != NULL; ++el) {
-               tp = lookup_emem(el->addr);
+               tp = lookup_emem(ndo, el->addr);
                /* Don't override existing name */
                if (tp->e_name != NULL)
                        continue;
@@ -880,14 +941,12 @@ init_etherarray(void)
 #ifdef USE_ETHER_NTOHOST
                /*
                 * Use YP/NIS version of name if available.
-                *
-                * We don't cast it to "const struct ether_addr *"
-                * because some systems don't modify the Ethernet
-                * address but fail to declare the second argument
-                * as a "const" pointer.
                 */
-               if (ether_ntohost(name, (struct ether_addr *)el->addr) == 0) {
+               if (ether_ntohost(name, (const struct ether_addr *)el->addr) == 0) {
                        tp->e_name = strdup(name);
+                       if (tp->e_name == NULL)
+                               (*ndo->ndo_error)(ndo,
+                                                 "init_etherarray: strdup(name)");
                        continue;
                }
 #endif
@@ -1113,7 +1172,7 @@ static const struct tok ipxsap_db[] = {
 };
 
 static void
-init_ipxsaparray(void)
+init_ipxsaparray(netdissect_options *ndo)
 {
        register int i;
        register struct hnamemem *table;
@@ -1125,59 +1184,56 @@ init_ipxsaparray(void)
                        table = table->nxt;
                table->name = ipxsap_db[i].s;
                table->addr = htons(ipxsap_db[i].v);
-               table->nxt = newhnamemem();
+               table->nxt = newhnamemem(ndo);
        }
 }
 
 /*
  * Initialize the address to name translation machinery.  We map all
- * non-local IP addresses to numeric addresses if fflag is true (i.e.,
- * to prevent blocking on the nameserver).  localnet is the IP address
+ * non-local IP addresses to numeric addresses if ndo->ndo_fflag is true
+ * (i.e., to prevent blocking on the nameserver).  localnet is the IP address
  * of the local network.  mask is its subnet mask.
  */
 void
-init_addrtoname(u_int32_t localnet, u_int32_t mask)
+init_addrtoname(netdissect_options *ndo, uint32_t localnet, uint32_t mask)
 {
-       if (fflag) {
+       if (ndo->ndo_fflag) {
                f_localnet = localnet;
                f_netmask = mask;
        }
-       if (nflag)
+       if (ndo->ndo_nflag)
                /*
                 * Simplest way to suppress names.
                 */
                return;
 
-       init_etherarray();
-       init_servarray();
-       init_eprotoarray();
-       init_protoidarray();
-       init_ipxsaparray();
+       init_etherarray(ndo);
+       init_servarray(ndo);
+       init_eprotoarray(ndo);
+       init_protoidarray(ndo);
+       init_ipxsaparray(ndo);
 }
 
 const char *
-dnaddr_string(u_short dnaddr)
+dnaddr_string(netdissect_options *ndo, u_short dnaddr)
 {
        register struct hnamemem *tp;
 
-       for (tp = &dnaddrtable[dnaddr & (HASHNAMESIZE-1)]; tp->nxt != 0;
+       for (tp = &dnaddrtable[dnaddr & (HASHNAMESIZE-1)]; tp->nxt != NULL;
             tp = tp->nxt)
                if (tp->addr == dnaddr)
                        return (tp->name);
 
        tp->addr = dnaddr;
-       tp->nxt = newhnamemem();
-       if (nflag)
-               tp->name = dnnum_string(dnaddr);
-       else
-               tp->name = dnname_string(dnaddr);
+       tp->nxt = newhnamemem(ndo);
+       tp->name = dnnum_string(ndo, dnaddr);
 
        return(tp->name);
 }
 
 /* Return a zero'ed hnamemem struct and cuts down on calloc() overhead */
 struct hnamemem *
-newhnamemem(void)
+newhnamemem(netdissect_options *ndo)
 {
        register struct hnamemem *p;
        static struct hnamemem *ptr = NULL;
@@ -1187,17 +1243,16 @@ newhnamemem(void)
                num = 64;
                ptr = (struct hnamemem *)calloc(num, sizeof (*ptr));
                if (ptr == NULL)
-                       error("newhnamemem: calloc");
+                       (*ndo->ndo_error)(ndo, "newhnamemem: calloc");
        }
        --num;
        p = ptr++;
        return (p);
 }
 
-#ifdef INET6
 /* Return a zero'ed h6namemem struct and cuts down on calloc() overhead */
 struct h6namemem *
-newh6namemem(void)
+newh6namemem(netdissect_options *ndo)
 {
        register struct h6namemem *p;
        static struct h6namemem *ptr = NULL;
@@ -1207,10 +1262,21 @@ newh6namemem(void)
                num = 64;
                ptr = (struct h6namemem *)calloc(num, sizeof (*ptr));
                if (ptr == NULL)
-                       error("newh6namemem: calloc");
+                       (*ndo->ndo_error)(ndo, "newh6namemem: calloc");
        }
        --num;
        p = ptr++;
        return (p);
 }
-#endif /* INET6 */
+
+/* Represent TCI part of the 802.1Q 4-octet tag as text. */
+const char *
+ieee8021q_tci_string(const uint16_t tci)
+{
+       static char buf[128];
+       snprintf(buf, sizeof(buf), "vlan %u, p %u%s",
+                tci & 0xfff,
+                tci >> 13,
+                (tci & 0x1000) ? ", DEI" : "");
+       return buf;
+}