]> The Tcpdump Group git mirrors - tcpdump/blobdiff - addrtoname.c
CVE-2017-13687/CHDLC: Improve bounds and length checks.
[tcpdump] / addrtoname.c
index d0437fe490a37e11f3fb399264cfd8347dec44ca..6975b7134e23c39e91eef115885b63dc6e8e1ac3 100644 (file)
  *  and address to string conversion routines
  */
 
-#define NETDISSECT_REWORKED
 #ifdef HAVE_CONFIG_H
 #include "config.h"
 #endif
 
-#include <tcpdump-stdinc.h>
+#include <netdissect-stdinc.h>
 
 #ifdef USE_ETHER_NTOHOST
 #ifdef HAVE_NETINET_IF_ETHER_H
@@ -58,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"
@@ -72,7 +73,7 @@ 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
@@ -90,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
@@ -128,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;
@@ -138,7 +138,6 @@ struct h6namemem {
 };
 
 static struct h6namemem h6nametable[HASHNAMESIZE];
-#endif /* INET6 */
 
 struct enamemem {
        u_short e_addr0;
@@ -205,7 +204,7 @@ static uint32_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
@@ -223,7 +222,7 @@ getname(netdissect_options *ndo, const u_char *ap)
 {
        register struct hostent *hp;
        uint32_t addr;
-       static struct hnamemem *p;              /* static for longjmp() */
+       struct hnamemem *p;
 
        memcpy(&addr, ap, sizeof(addr));
        p = &hnametable[addr & (HASHNAMESIZE-1)];
@@ -232,7 +231,7 @@ getname(netdissect_options *ndo, const u_char *ap)
                        return (p->name);
        }
        p->addr = addr;
-       p->nxt = newhnamemem();
+       p->nxt = newhnamemem(ndo);
 
        /*
         * Print names unless:
@@ -248,6 +247,9 @@ getname(netdissect_options *ndo, const u_char *ap)
                        char *dotp;
 
                        p->name = strdup(hp->h_name);
+                       if (p->name == NULL)
+                               (*ndo->ndo_error)(ndo,
+                                                 "getname: strdup(hp->h_name)");
                        if (ndo->ndo_Nflag) {
                                /* Remove domain qualifications */
                                dotp = strchr(p->name, '.');
@@ -258,10 +260,11 @@ getname(netdissect_options *ndo, 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.
@@ -277,7 +280,7 @@ getname6(netdissect_options *ndo, const u_char *ap)
                        uint16_t d;
                } addra;
        } addr;
-       static struct h6namemem *p;             /* static for longjmp() */
+       struct h6namemem *p;
        register const char *cp;
        char ntop_buf[INET6_ADDRSTRLEN];
 
@@ -288,7 +291,7 @@ getname6(netdissect_options *ndo, 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.
@@ -299,6 +302,9 @@ getname6(netdissect_options *ndo, const u_char *ap)
                        char *dotp;
 
                        p->name = strdup(hp->h_name);
+                       if (p->name == NULL)
+                               (*ndo->ndo_error)(ndo,
+                                                 "getname6: strdup(hp->h_name)");
                        if (ndo->ndo_Nflag) {
                                /* Remove domain qualifications */
                                dotp = strchr(p->name, '.');
@@ -308,11 +314,12 @@ getname6(netdissect_options *ndo, 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";
 
@@ -320,7 +327,7 @@ static const char hex[] = "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;
@@ -342,7 +349,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;
 }
@@ -353,7 +360,8 @@ lookup_emem(const u_char *ep)
  */
 
 static inline struct enamemem *
-lookup_bytestring(register const u_char *bs, const unsigned int nlen)
+lookup_bytestring(netdissect_options *ndo, register const u_char *bs,
+                 const unsigned int nlen)
 {
        struct enamemem *tp;
        register u_int i, j, k;
@@ -385,12 +393,12 @@ lookup_bytestring(register const u_char *bs, const unsigned int nlen)
 
        tp->e_bs = (u_char *) calloc(1, nlen + 1);
        if (tp->e_bs == NULL)
-               error("lookup_bytestring: calloc");
+               (*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");
+               (*ndo->ndo_error)(ndo, "lookup_bytestring: calloc");
 
        return tp;
 }
@@ -398,14 +406,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];
@@ -418,22 +427,23 @@ lookup_nsap(register const u_char *nsap)
                if (tp->e_addr0 == i &&
                    tp->e_addr1 == j &&
                    tp->e_addr2 == k &&
-                   tp->e_nsap[0] == nlen &&
+                   tp->e_nsap[0] == nsap_length &&
                    memcmp((const char *)&(nsap[1]),
-                       (char *)&(tp->e_nsap[1]), nlen) == 0)
+                       (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;
 }
@@ -441,7 +451,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;
@@ -461,7 +471,7 @@ 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;
 }
@@ -475,21 +485,18 @@ etheraddr_string(netdissect_options *ndo, 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 (!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);
                }
        }
@@ -510,11 +517,13 @@ etheraddr_string(netdissect_options *ndo, register const u_char *ep)
        } 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;
@@ -522,7 +531,7 @@ le64addr_string(const u_char *ep)
        register struct enamemem *tp;
        char buf[BUFSIZE];
 
-       tp = lookup_bytestring(ep, len);
+       tp = lookup_bytestring(ndo, ep, len);
        if (tp->e_name)
                return (tp->e_name);
 
@@ -537,12 +546,15 @@ le64addr_string(const u_char *ep)
        *cp = '\0';
 
        tp->e_name = strdup(buf);
+       if (tp->e_name == NULL)
+               (*ndo->ndo_error)(ndo, "le64addr_string: strdup(buf)");
 
        return (tp->e_name);
 }
 
 const char *
-linkaddr_string(netdissect_options *ndo, 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;
@@ -557,13 +569,13 @@ linkaddr_string(netdissect_options *ndo, const u_char *ep, const unsigned int ty
        if (type == LINKADDR_FRELAY)
                return (q922_string(ndo, ep, len));
 
-       tp = lookup_bytestring(ep, len);
+       tp = lookup_bytestring(ndo, ep, len);
        if (tp->e_name)
                return (tp->e_name);
 
        tp->e_name = cp = (char *)malloc(len*3);
        if (tp->e_name == NULL)
-               error("linkaddr_string: malloc");
+               (*ndo->ndo_error)(ndo, "linkaddr_string: malloc");
        *cp++ = hex[*ep >> 4];
        *cp++ = hex[*ep++ & 0xf];
        for (i = len-1; i > 0 ; --i) {
@@ -576,7 +588,7 @@ linkaddr_string(netdissect_options *ndo, const u_char *ep, const unsigned int ty
 }
 
 const char *
-etherproto_string(u_short port)
+etherproto_string(netdissect_options *ndo, u_short port)
 {
        register char *cp;
        register struct hnamemem *tp;
@@ -588,7 +600,7 @@ etherproto_string(u_short port)
                        return (tp->name);
 
        tp->addr = i;
-       tp->nxt = newhnamemem();
+       tp->nxt = newhnamemem(ndo);
 
        cp = buf;
        NTOHS(port);
@@ -598,18 +610,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;
 
@@ -625,12 +639,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;
@@ -639,13 +656,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];
@@ -660,7 +677,7 @@ 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 uint32_t i = port;
@@ -671,15 +688,17 @@ 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 uint32_t i = port;
@@ -690,15 +709,17 @@ 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;
@@ -710,7 +731,7 @@ ipxsap_string(u_short port)
                        return (tp->name);
 
        tp->addr = i;
-       tp->nxt = newhnamemem();
+       tp->nxt = newhnamemem(ndo);
 
        cp = buf;
        NTOHS(port);
@@ -720,6 +741,8 @@ 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);
 }
 
@@ -748,25 +771,44 @@ init_servarray(netdissect_options *ndo)
                        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)
-extern __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;
@@ -778,7 +820,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);
        }
 }
 
@@ -799,7 +841,7 @@ static const struct protoidlist {
  * types.
  */
 static void
-init_protoidarray(void)
+init_protoidarray(netdissect_options *ndo)
 {
        register int i;
        register struct protoidmem *tp;
@@ -813,12 +855,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;
@@ -850,7 +895,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;
@@ -864,8 +909,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);
        }
@@ -873,7 +921,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;
@@ -881,14 +929,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
@@ -1114,7 +1160,7 @@ static const struct tok ipxsap_db[] = {
 };
 
 static void
-init_ipxsaparray(void)
+init_ipxsaparray(netdissect_options *ndo)
 {
        register int i;
        register struct hnamemem *table;
@@ -1126,7 +1172,7 @@ 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);
        }
 }
 
@@ -1149,11 +1195,11 @@ init_addrtoname(netdissect_options *ndo, uint32_t localnet, uint32_t mask)
                 */
                return;
 
-       init_etherarray();
+       init_etherarray(ndo);
        init_servarray(ndo);
-       init_eprotoarray();
-       init_protoidarray();
-       init_ipxsaparray();
+       init_eprotoarray(ndo);
+       init_protoidarray(ndo);
+       init_ipxsaparray(ndo);
 }
 
 const char *
@@ -1161,24 +1207,24 @@ 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();
+       tp->nxt = newhnamemem(ndo);
        if (ndo->ndo_nflag)
-               tp->name = dnnum_string(dnaddr);
+               tp->name = dnnum_string(ndo, dnaddr);
        else
-               tp->name = dnname_string(dnaddr);
+               tp->name = dnname_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;
@@ -1188,17 +1234,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;
@@ -1208,13 +1253,12 @@ 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 *