1/*
2 * Copyright (c) 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1997
3 *	The Regents of the University of California.  All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that: (1) source code distributions
7 * retain the above copyright notice and this paragraph in its entirety, (2)
8 * distributions including binary code include the above copyright notice and
9 * this paragraph in its entirety in the documentation or other materials
10 * provided with the distribution, and (3) all advertising materials mentioning
11 * features or use of this software display the following acknowledgement:
12 * ``This product includes software developed by the University of California,
13 * Lawrence Berkeley Laboratory and its contributors.'' Neither the name of
14 * the University nor the names of its contributors may be used to endorse
15 * or promote products derived from this software without specific prior
16 * written permission.
17 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
18 * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
19 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
20 *
21 *  Internet, ethernet, port, and protocol string to address
22 *  and address to string conversion routines
23 */
24#ifndef lint
25static const char rcsid[] _U_ =
26    "@(#) $Header: /tcpdump/master/tcpdump/addrtoname.c,v 1.119 2007-08-08 14:06:34 hannes Exp $ (LBL)";
27#endif
28
29#ifdef HAVE_CONFIG_H
30#include "config.h"
31#endif
32
33#include <tcpdump-stdinc.h>
34
35#ifdef USE_ETHER_NTOHOST
36#ifdef HAVE_NETINET_IF_ETHER_H
37struct mbuf;		/* Squelch compiler warnings on some platforms for */
38struct rtentry;		/* declarations in <net/if.h> */
39#include <net/if.h>	/* for "struct ifnet" in "struct arpcom" on Solaris */
40#include <netinet/if_ether.h>
41#endif /* HAVE_NETINET_IF_ETHER_H */
42#ifdef NETINET_ETHER_H_DECLARES_ETHER_NTOHOST
43#include <netinet/ether.h>
44#endif /* NETINET_ETHER_H_DECLARES_ETHER_NTOHOST */
45
46#if !defined(HAVE_DECL_ETHER_NTOHOST) || !HAVE_DECL_ETHER_NTOHOST
47#ifndef HAVE_STRUCT_ETHER_ADDR
48struct ether_addr {
49	unsigned char ether_addr_octet[6];
50};
51#endif
52extern int ether_ntohost(char *, const struct ether_addr *);
53#endif
54
55#endif /* USE_ETHER_NTOHOST */
56
57#include <pcap.h>
58#include <pcap-namedb.h>
59#include <signal.h>
60#include <stdio.h>
61#include <string.h>
62#include <stdlib.h>
63
64#include "interface.h"
65#include "addrtoname.h"
66#include "llc.h"
67#include "setsignal.h"
68#include "extract.h"
69#include "oui.h"
70
71#ifndef ETHER_ADDR_LEN
72#define ETHER_ADDR_LEN	6
73#endif
74
75/*
76 * hash tables for whatever-to-name translations
77 *
78 * XXX there has to be error checks against strdup(3) failure
79 */
80
81#define HASHNAMESIZE 4096
82
83struct hnamemem {
84	u_int32_t addr;
85	const char *name;
86	struct hnamemem *nxt;
87};
88
89static struct hnamemem hnametable[HASHNAMESIZE];
90static struct hnamemem tporttable[HASHNAMESIZE];
91static struct hnamemem uporttable[HASHNAMESIZE];
92static struct hnamemem eprototable[HASHNAMESIZE];
93static struct hnamemem dnaddrtable[HASHNAMESIZE];
94static struct hnamemem ipxsaptable[HASHNAMESIZE];
95
96#if defined(INET6) && defined(WIN32)
97/*
98 * fake gethostbyaddr for Win2k/XP
99 * gethostbyaddr() returns incorrect value when AF_INET6 is passed
100 * to 3rd argument.
101 *
102 * h_name in struct hostent is only valid.
103 */
104static struct hostent *
105win32_gethostbyaddr(const char *addr, int len, int type)
106{
107	static struct hostent host;
108	static char hostbuf[NI_MAXHOST];
109	char hname[NI_MAXHOST];
110	struct sockaddr_in6 addr6;
111
112	host.h_name = hostbuf;
113	switch (type) {
114	case AF_INET:
115		return gethostbyaddr(addr, len, type);
116		break;
117	case AF_INET6:
118		memset(&addr6, 0, sizeof(addr6));
119		addr6.sin6_family = AF_INET6;
120		memcpy(&addr6.sin6_addr, addr, len);
121		if (getnameinfo((struct sockaddr *)&addr6, sizeof(addr6),
122		    hname, sizeof(hname), NULL, 0, 0)) {
123			return NULL;
124		} else {
125			strcpy(host.h_name, hname);
126			return &host;
127		}
128		break;
129	default:
130		return NULL;
131	}
132}
133#define gethostbyaddr win32_gethostbyaddr
134#endif /* INET6 & WIN32 */
135
136#ifdef INET6
137struct h6namemem {
138	struct in6_addr addr;
139	char *name;
140	struct h6namemem *nxt;
141};
142
143static struct h6namemem h6nametable[HASHNAMESIZE];
144#endif /* INET6 */
145
146struct enamemem {
147	u_short e_addr0;
148	u_short e_addr1;
149	u_short e_addr2;
150	const char *e_name;
151	u_char *e_nsap;			/* used only for nsaptable[] */
152#define e_bs e_nsap			/* for bytestringtable */
153	struct enamemem *e_nxt;
154};
155
156static struct enamemem enametable[HASHNAMESIZE];
157static struct enamemem nsaptable[HASHNAMESIZE];
158static struct enamemem bytestringtable[HASHNAMESIZE];
159
160struct protoidmem {
161	u_int32_t p_oui;
162	u_short p_proto;
163	const char *p_name;
164	struct protoidmem *p_nxt;
165};
166
167static struct protoidmem protoidtable[HASHNAMESIZE];
168
169/*
170 * A faster replacement for inet_ntoa().
171 */
172const char *
173intoa(u_int32_t addr)
174{
175	register char *cp;
176	register u_int byte;
177	register int n;
178	static char buf[sizeof(".xxx.xxx.xxx.xxx")];
179
180	NTOHL(addr);
181	cp = buf + sizeof(buf);
182	*--cp = '\0';
183
184	n = 4;
185	do {
186		byte = addr & 0xff;
187		*--cp = byte % 10 + '0';
188		byte /= 10;
189		if (byte > 0) {
190			*--cp = byte % 10 + '0';
191			byte /= 10;
192			if (byte > 0)
193				*--cp = byte + '0';
194		}
195		*--cp = '.';
196		addr >>= 8;
197	} while (--n > 0);
198
199	return cp + 1;
200}
201
202static u_int32_t f_netmask;
203static u_int32_t f_localnet;
204
205/*
206 * Return a name for the IP address pointed to by ap.  This address
207 * is assumed to be in network byte order.
208 *
209 * NOTE: ap is *NOT* necessarily part of the packet data (not even if
210 * this is being called with the "ipaddr_string()" macro), so you
211 * *CANNOT* use the TCHECK{2}/TTEST{2} macros on it.  Furthermore,
212 * even in cases where it *is* part of the packet data, the caller
213 * would still have to check for a null return value, even if it's
214 * just printing the return value with "%s" - not all versions of
215 * printf print "(null)" with "%s" and a null pointer, some of them
216 * don't check for a null pointer and crash in that case.
217 *
218 * The callers of this routine should, before handing this routine
219 * a pointer to packet data, be sure that the data is present in
220 * the packet buffer.  They should probably do those checks anyway,
221 * as other data at that layer might not be IP addresses, and it
222 * also needs to check whether they're present in the packet buffer.
223 */
224const char *
225getname(const u_char *ap)
226{
227	register struct hostent *hp;
228	u_int32_t addr;
229	static struct hnamemem *p;		/* static for longjmp() */
230
231	memcpy(&addr, ap, sizeof(addr));
232	p = &hnametable[addr & (HASHNAMESIZE-1)];
233	for (; p->nxt; p = p->nxt) {
234		if (p->addr == addr)
235			return (p->name);
236	}
237	p->addr = addr;
238	p->nxt = newhnamemem();
239
240	/*
241	 * Print names unless:
242	 *	(1) -n was given.
243	 *      (2) Address is foreign and -f was given. (If -f was not
244	 *	    given, f_netmask and f_localnet are 0 and the test
245	 *	    evaluates to true)
246	 */
247	if (!nflag &&
248	    (addr & f_netmask) == f_localnet) {
249		hp = gethostbyaddr((char *)&addr, 4, AF_INET);
250		if (hp) {
251			char *dotp;
252
253			p->name = strdup(hp->h_name);
254			if (Nflag) {
255				/* Remove domain qualifications */
256				dotp = strchr(p->name, '.');
257				if (dotp)
258					*dotp = '\0';
259			}
260			return (p->name);
261		}
262	}
263	p->name = strdup(intoa(addr));
264	return (p->name);
265}
266
267#ifdef INET6
268/*
269 * Return a name for the IP6 address pointed to by ap.  This address
270 * is assumed to be in network byte order.
271 */
272const char *
273getname6(const u_char *ap)
274{
275	register struct hostent *hp;
276	struct in6_addr addr;
277	static struct h6namemem *p;		/* static for longjmp() */
278	register const char *cp;
279	char ntop_buf[INET6_ADDRSTRLEN];
280
281	memcpy(&addr, ap, sizeof(addr));
282	p = &h6nametable[*(u_int16_t *)&addr.s6_addr[14] & (HASHNAMESIZE-1)];
283	for (; p->nxt; p = p->nxt) {
284		if (memcmp(&p->addr, &addr, sizeof(addr)) == 0)
285			return (p->name);
286	}
287	p->addr = addr;
288	p->nxt = newh6namemem();
289
290	/*
291	 * Do not print names if -n was given.
292	 */
293	if (!nflag) {
294		hp = gethostbyaddr((char *)&addr, sizeof(addr), AF_INET6);
295		if (hp) {
296			char *dotp;
297
298			p->name = strdup(hp->h_name);
299			if (Nflag) {
300				/* Remove domain qualifications */
301				dotp = strchr(p->name, '.');
302				if (dotp)
303					*dotp = '\0';
304			}
305			return (p->name);
306		}
307	}
308	cp = inet_ntop(AF_INET6, &addr, ntop_buf, sizeof(ntop_buf));
309	p->name = strdup(cp);
310	return (p->name);
311}
312#endif /* INET6 */
313
314static const char hex[] = "0123456789abcdef";
315
316
317/* Find the hash node that corresponds the ether address 'ep' */
318
319static inline struct enamemem *
320lookup_emem(const u_char *ep)
321{
322	register u_int i, j, k;
323	struct enamemem *tp;
324
325	k = (ep[0] << 8) | ep[1];
326	j = (ep[2] << 8) | ep[3];
327	i = (ep[4] << 8) | ep[5];
328
329	tp = &enametable[(i ^ j) & (HASHNAMESIZE-1)];
330	while (tp->e_nxt)
331		if (tp->e_addr0 == i &&
332		    tp->e_addr1 == j &&
333		    tp->e_addr2 == k)
334			return tp;
335		else
336			tp = tp->e_nxt;
337	tp->e_addr0 = i;
338	tp->e_addr1 = j;
339	tp->e_addr2 = k;
340	tp->e_nxt = (struct enamemem *)calloc(1, sizeof(*tp));
341	if (tp->e_nxt == NULL)
342		error("lookup_emem: calloc");
343
344	return tp;
345}
346
347/*
348 * Find the hash node that corresponds to the bytestring 'bs'
349 * with length 'nlen'
350 */
351
352static inline struct enamemem *
353lookup_bytestring(register const u_char *bs, const unsigned int nlen)
354{
355	struct enamemem *tp;
356	register u_int i, j, k;
357
358	if (nlen >= 6) {
359		k = (bs[0] << 8) | bs[1];
360		j = (bs[2] << 8) | bs[3];
361		i = (bs[4] << 8) | bs[5];
362	} else if (nlen >= 4) {
363		k = (bs[0] << 8) | bs[1];
364		j = (bs[2] << 8) | bs[3];
365		i = 0;
366	} else
367		i = j = k = 0;
368
369	tp = &bytestringtable[(i ^ j) & (HASHNAMESIZE-1)];
370	while (tp->e_nxt)
371		if (tp->e_addr0 == i &&
372		    tp->e_addr1 == j &&
373		    tp->e_addr2 == k &&
374		    memcmp((const char *)bs, (const char *)(tp->e_bs), nlen) == 0)
375			return tp;
376		else
377			tp = tp->e_nxt;
378
379	tp->e_addr0 = i;
380	tp->e_addr1 = j;
381	tp->e_addr2 = k;
382
383	tp->e_bs = (u_char *) calloc(1, nlen + 1);
384	if (tp->e_bs == NULL)
385		error("lookup_bytestring: calloc");
386
387	memcpy(tp->e_bs, bs, nlen);
388	tp->e_nxt = (struct enamemem *)calloc(1, sizeof(*tp));
389	if (tp->e_nxt == NULL)
390		error("lookup_bytestring: calloc");
391
392	return tp;
393}
394
395/* Find the hash node that corresponds the NSAP 'nsap' */
396
397static inline struct enamemem *
398lookup_nsap(register const u_char *nsap)
399{
400	register u_int i, j, k;
401	unsigned int nlen = *nsap;
402	struct enamemem *tp;
403	const u_char *ensap = nsap + nlen - 6;
404
405	if (nlen > 6) {
406		k = (ensap[0] << 8) | ensap[1];
407		j = (ensap[2] << 8) | ensap[3];
408		i = (ensap[4] << 8) | ensap[5];
409	}
410	else
411		i = j = k = 0;
412
413	tp = &nsaptable[(i ^ j) & (HASHNAMESIZE-1)];
414	while (tp->e_nxt)
415		if (tp->e_addr0 == i &&
416		    tp->e_addr1 == j &&
417		    tp->e_addr2 == k &&
418		    tp->e_nsap[0] == nlen &&
419		    memcmp((const char *)&(nsap[1]),
420			(char *)&(tp->e_nsap[1]), nlen) == 0)
421			return tp;
422		else
423			tp = tp->e_nxt;
424	tp->e_addr0 = i;
425	tp->e_addr1 = j;
426	tp->e_addr2 = k;
427	tp->e_nsap = (u_char *)malloc(nlen + 1);
428	if (tp->e_nsap == NULL)
429		error("lookup_nsap: malloc");
430	memcpy((char *)tp->e_nsap, (const char *)nsap, nlen + 1);
431	tp->e_nxt = (struct enamemem *)calloc(1, sizeof(*tp));
432	if (tp->e_nxt == NULL)
433		error("lookup_nsap: calloc");
434
435	return tp;
436}
437
438/* Find the hash node that corresponds the protoid 'pi'. */
439
440static inline struct protoidmem *
441lookup_protoid(const u_char *pi)
442{
443	register u_int i, j;
444	struct protoidmem *tp;
445
446	/* 5 octets won't be aligned */
447	i = (((pi[0] << 8) + pi[1]) << 8) + pi[2];
448	j =   (pi[3] << 8) + pi[4];
449	/* XXX should be endian-insensitive, but do big-endian testing  XXX */
450
451	tp = &protoidtable[(i ^ j) & (HASHNAMESIZE-1)];
452	while (tp->p_nxt)
453		if (tp->p_oui == i && tp->p_proto == j)
454			return tp;
455		else
456			tp = tp->p_nxt;
457	tp->p_oui = i;
458	tp->p_proto = j;
459	tp->p_nxt = (struct protoidmem *)calloc(1, sizeof(*tp));
460	if (tp->p_nxt == NULL)
461		error("lookup_protoid: calloc");
462
463	return tp;
464}
465
466const char *
467etheraddr_string(register const u_char *ep)
468{
469	register int i;
470	register char *cp;
471	register struct enamemem *tp;
472	int oui;
473	char buf[BUFSIZE];
474
475	tp = lookup_emem(ep);
476	if (tp->e_name)
477		return (tp->e_name);
478#ifdef USE_ETHER_NTOHOST
479	if (!nflag) {
480		char buf2[BUFSIZE];
481
482		/*
483		 * We don't cast it to "const struct ether_addr *"
484		 * because some systems fail to declare the second
485		 * argument as a "const" pointer, even though they
486		 * don't modify what it points to.
487		 */
488		if (ether_ntohost(buf2, (struct ether_addr *)ep) == 0) {
489			tp->e_name = strdup(buf2);
490			return (tp->e_name);
491		}
492	}
493#endif
494	cp = buf;
495	oui = EXTRACT_24BITS(ep);
496	*cp++ = hex[*ep >> 4 ];
497	*cp++ = hex[*ep++ & 0xf];
498	for (i = 5; --i >= 0;) {
499		*cp++ = ':';
500		*cp++ = hex[*ep >> 4 ];
501		*cp++ = hex[*ep++ & 0xf];
502	}
503
504	if (!nflag) {
505		snprintf(cp, BUFSIZE - (2 + 5*3), " (oui %s)",
506		    tok2str(oui_values, "Unknown", oui));
507	} else
508		*cp = '\0';
509	tp->e_name = strdup(buf);
510	return (tp->e_name);
511}
512
513const char *
514le64addr_string(const u_char *ep)
515{
516	const unsigned int len = 8;
517	register u_int i;
518	register char *cp;
519	register struct enamemem *tp;
520	char buf[BUFSIZE];
521
522	tp = lookup_bytestring(ep, len);
523	if (tp->e_name)
524		return (tp->e_name);
525
526	cp = buf;
527	for (i = len; i > 0 ; --i) {
528		*cp++ = hex[*(ep + i - 1) >> 4];
529		*cp++ = hex[*(ep + i - 1) & 0xf];
530		*cp++ = ':';
531	}
532	cp --;
533
534	*cp = '\0';
535
536	tp->e_name = strdup(buf);
537
538	return (tp->e_name);
539}
540
541const char *
542linkaddr_string(const u_char *ep, const unsigned int type, const unsigned int len)
543{
544	register u_int i;
545	register char *cp;
546	register struct enamemem *tp;
547
548	if (len == 0)
549		return ("<empty>");
550
551	if (type == LINKADDR_ETHER && len == ETHER_ADDR_LEN)
552		return (etheraddr_string(ep));
553
554	if (type == LINKADDR_FRELAY)
555		return (q922_string(ep));
556
557	tp = lookup_bytestring(ep, len);
558	if (tp->e_name)
559		return (tp->e_name);
560
561	tp->e_name = cp = (char *)malloc(len*3);
562	if (tp->e_name == NULL)
563		error("linkaddr_string: malloc");
564	*cp++ = hex[*ep >> 4];
565	*cp++ = hex[*ep++ & 0xf];
566	for (i = len-1; i > 0 ; --i) {
567		*cp++ = ':';
568		*cp++ = hex[*ep >> 4];
569		*cp++ = hex[*ep++ & 0xf];
570	}
571	*cp = '\0';
572	return (tp->e_name);
573}
574
575const char *
576etherproto_string(u_short port)
577{
578	register char *cp;
579	register struct hnamemem *tp;
580	register u_int32_t i = port;
581	char buf[sizeof("0000")];
582
583	for (tp = &eprototable[i & (HASHNAMESIZE-1)]; tp->nxt; tp = tp->nxt)
584		if (tp->addr == i)
585			return (tp->name);
586
587	tp->addr = i;
588	tp->nxt = newhnamemem();
589
590	cp = buf;
591	NTOHS(port);
592	*cp++ = hex[port >> 12 & 0xf];
593	*cp++ = hex[port >> 8 & 0xf];
594	*cp++ = hex[port >> 4 & 0xf];
595	*cp++ = hex[port & 0xf];
596	*cp++ = '\0';
597	tp->name = strdup(buf);
598	return (tp->name);
599}
600
601const char *
602protoid_string(register const u_char *pi)
603{
604	register u_int i, j;
605	register char *cp;
606	register struct protoidmem *tp;
607	char buf[sizeof("00:00:00:00:00")];
608
609	tp = lookup_protoid(pi);
610	if (tp->p_name)
611		return tp->p_name;
612
613	cp = buf;
614	if ((j = *pi >> 4) != 0)
615		*cp++ = hex[j];
616	*cp++ = hex[*pi++ & 0xf];
617	for (i = 4; (int)--i >= 0;) {
618		*cp++ = ':';
619		if ((j = *pi >> 4) != 0)
620			*cp++ = hex[j];
621		*cp++ = hex[*pi++ & 0xf];
622	}
623	*cp = '\0';
624	tp->p_name = strdup(buf);
625	return (tp->p_name);
626}
627
628#define ISONSAP_MAX_LENGTH 20
629const char *
630isonsap_string(const u_char *nsap, register u_int nsap_length)
631{
632	register u_int nsap_idx;
633	register char *cp;
634	register struct enamemem *tp;
635
636	if (nsap_length < 1 || nsap_length > ISONSAP_MAX_LENGTH)
637		return ("isonsap_string: illegal length");
638
639	tp = lookup_nsap(nsap);
640	if (tp->e_name)
641		return tp->e_name;
642
643	tp->e_name = cp = (char *)malloc(sizeof("xx.xxxx.xxxx.xxxx.xxxx.xxxx.xxxx.xxxx.xxxx.xxxx.xx"));
644	if (cp == NULL)
645		error("isonsap_string: malloc");
646
647	for (nsap_idx = 0; nsap_idx < nsap_length; nsap_idx++) {
648		*cp++ = hex[*nsap >> 4];
649		*cp++ = hex[*nsap++ & 0xf];
650		if (((nsap_idx & 1) == 0) &&
651		     (nsap_idx + 1 < nsap_length)) {
652		     	*cp++ = '.';
653		}
654	}
655	*cp = '\0';
656	return (tp->e_name);
657}
658
659const char *
660tcpport_string(u_short port)
661{
662	register struct hnamemem *tp;
663	register u_int32_t i = port;
664	char buf[sizeof("00000")];
665
666	for (tp = &tporttable[i & (HASHNAMESIZE-1)]; tp->nxt; tp = tp->nxt)
667		if (tp->addr == i)
668			return (tp->name);
669
670	tp->addr = i;
671	tp->nxt = newhnamemem();
672
673	(void)snprintf(buf, sizeof(buf), "%u", i);
674	tp->name = strdup(buf);
675	return (tp->name);
676}
677
678const char *
679udpport_string(register u_short port)
680{
681	register struct hnamemem *tp;
682	register u_int32_t i = port;
683	char buf[sizeof("00000")];
684
685	for (tp = &uporttable[i & (HASHNAMESIZE-1)]; tp->nxt; tp = tp->nxt)
686		if (tp->addr == i)
687			return (tp->name);
688
689	tp->addr = i;
690	tp->nxt = newhnamemem();
691
692	(void)snprintf(buf, sizeof(buf), "%u", i);
693	tp->name = strdup(buf);
694	return (tp->name);
695}
696
697const char *
698ipxsap_string(u_short port)
699{
700	register char *cp;
701	register struct hnamemem *tp;
702	register u_int32_t i = port;
703	char buf[sizeof("0000")];
704
705	for (tp = &ipxsaptable[i & (HASHNAMESIZE-1)]; tp->nxt; tp = tp->nxt)
706		if (tp->addr == i)
707			return (tp->name);
708
709	tp->addr = i;
710	tp->nxt = newhnamemem();
711
712	cp = buf;
713	NTOHS(port);
714	*cp++ = hex[port >> 12 & 0xf];
715	*cp++ = hex[port >> 8 & 0xf];
716	*cp++ = hex[port >> 4 & 0xf];
717	*cp++ = hex[port & 0xf];
718	*cp++ = '\0';
719	tp->name = strdup(buf);
720	return (tp->name);
721}
722
723static void
724init_servarray(void)
725{
726	struct servent *sv;
727	register struct hnamemem *table;
728	register int i;
729	char buf[sizeof("0000000000")];
730
731	while ((sv = getservent()) != NULL) {
732		int port = ntohs(sv->s_port);
733		i = port & (HASHNAMESIZE-1);
734		if (strcmp(sv->s_proto, "tcp") == 0)
735			table = &tporttable[i];
736		else if (strcmp(sv->s_proto, "udp") == 0)
737			table = &uporttable[i];
738		else
739			continue;
740
741		while (table->name)
742			table = table->nxt;
743		if (nflag) {
744			(void)snprintf(buf, sizeof(buf), "%d", port);
745			table->name = strdup(buf);
746		} else
747			table->name = strdup(sv->s_name);
748		table->addr = port;
749		table->nxt = newhnamemem();
750	}
751	endservent();
752}
753
754/* in libpcap.a (nametoaddr.c) */
755#if defined(WIN32) && !defined(USE_STATIC_LIBPCAP)
756__declspec(dllimport)
757#else
758extern
759#endif
760const struct eproto {
761	const char *s;
762	u_short p;
763} eproto_db[];
764
765static void
766init_eprotoarray(void)
767{
768	register int i;
769	register struct hnamemem *table;
770
771	for (i = 0; eproto_db[i].s; i++) {
772		int j = htons(eproto_db[i].p) & (HASHNAMESIZE-1);
773		table = &eprototable[j];
774		while (table->name)
775			table = table->nxt;
776		table->name = eproto_db[i].s;
777		table->addr = htons(eproto_db[i].p);
778		table->nxt = newhnamemem();
779	}
780}
781
782static const struct protoidlist {
783	const u_char protoid[5];
784	const char *name;
785} protoidlist[] = {
786	{{ 0x00, 0x00, 0x0c, 0x01, 0x07 }, "CiscoMLS" },
787	{{ 0x00, 0x00, 0x0c, 0x20, 0x00 }, "CiscoCDP" },
788	{{ 0x00, 0x00, 0x0c, 0x20, 0x01 }, "CiscoCGMP" },
789	{{ 0x00, 0x00, 0x0c, 0x20, 0x03 }, "CiscoVTP" },
790	{{ 0x00, 0xe0, 0x2b, 0x00, 0xbb }, "ExtremeEDP" },
791	{{ 0x00, 0x00, 0x00, 0x00, 0x00 }, NULL }
792};
793
794/*
795 * SNAP proto IDs with org code 0:0:0 are actually encapsulated Ethernet
796 * types.
797 */
798static void
799init_protoidarray(void)
800{
801	register int i;
802	register struct protoidmem *tp;
803	const struct protoidlist *pl;
804	u_char protoid[5];
805
806	protoid[0] = 0;
807	protoid[1] = 0;
808	protoid[2] = 0;
809	for (i = 0; eproto_db[i].s; i++) {
810		u_short etype = htons(eproto_db[i].p);
811
812		memcpy((char *)&protoid[3], (char *)&etype, 2);
813		tp = lookup_protoid(protoid);
814		tp->p_name = strdup(eproto_db[i].s);
815	}
816	/* Hardwire some SNAP proto ID names */
817	for (pl = protoidlist; pl->name != NULL; ++pl) {
818		tp = lookup_protoid(pl->protoid);
819		/* Don't override existing name */
820		if (tp->p_name != NULL)
821			continue;
822
823		tp->p_name = pl->name;
824	}
825}
826
827static const struct etherlist {
828	const u_char addr[6];
829	const char *name;
830} etherlist[] = {
831	{{ 0xff, 0xff, 0xff, 0xff, 0xff, 0xff }, "Broadcast" },
832	{{ 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 }, NULL }
833};
834
835/*
836 * Initialize the ethers hash table.  We take two different approaches
837 * depending on whether or not the system provides the ethers name
838 * service.  If it does, we just wire in a few names at startup,
839 * and etheraddr_string() fills in the table on demand.  If it doesn't,
840 * then we suck in the entire /etc/ethers file at startup.  The idea
841 * is that parsing the local file will be fast, but spinning through
842 * all the ethers entries via NIS & next_etherent might be very slow.
843 *
844 * XXX pcap_next_etherent doesn't belong in the pcap interface, but
845 * since the pcap module already does name-to-address translation,
846 * it's already does most of the work for the ethernet address-to-name
847 * translation, so we just pcap_next_etherent as a convenience.
848 */
849static void
850init_etherarray(void)
851{
852	register const struct etherlist *el;
853	register struct enamemem *tp;
854#ifdef USE_ETHER_NTOHOST
855	char name[256];
856#else
857	register struct pcap_etherent *ep;
858	register FILE *fp;
859
860	/* Suck in entire ethers file */
861	fp = fopen(PCAP_ETHERS_FILE, "r");
862	if (fp != NULL) {
863		while ((ep = pcap_next_etherent(fp)) != NULL) {
864			tp = lookup_emem(ep->addr);
865			tp->e_name = strdup(ep->name);
866		}
867		(void)fclose(fp);
868	}
869#endif
870
871	/* Hardwire some ethernet names */
872	for (el = etherlist; el->name != NULL; ++el) {
873		tp = lookup_emem(el->addr);
874		/* Don't override existing name */
875		if (tp->e_name != NULL)
876			continue;
877
878#ifdef USE_ETHER_NTOHOST
879		/*
880		 * Use YP/NIS version of name if available.
881		 *
882		 * We don't cast it to "const struct ether_addr *"
883		 * because some systems don't modify the Ethernet
884		 * address but fail to declare the second argument
885		 * as a "const" pointer.
886		 */
887		if (ether_ntohost(name, (struct ether_addr *)el->addr) == 0) {
888			tp->e_name = strdup(name);
889			continue;
890		}
891#endif
892		tp->e_name = el->name;
893	}
894}
895
896static const struct tok ipxsap_db[] = {
897	{ 0x0000, "Unknown" },
898	{ 0x0001, "User" },
899	{ 0x0002, "User Group" },
900	{ 0x0003, "PrintQueue" },
901	{ 0x0004, "FileServer" },
902	{ 0x0005, "JobServer" },
903	{ 0x0006, "Gateway" },
904	{ 0x0007, "PrintServer" },
905	{ 0x0008, "ArchiveQueue" },
906	{ 0x0009, "ArchiveServer" },
907	{ 0x000a, "JobQueue" },
908	{ 0x000b, "Administration" },
909	{ 0x000F, "Novell TI-RPC" },
910	{ 0x0017, "Diagnostics" },
911	{ 0x0020, "NetBIOS" },
912	{ 0x0021, "NAS SNA Gateway" },
913	{ 0x0023, "NACS AsyncGateway" },
914	{ 0x0024, "RemoteBridge/RoutingService" },
915	{ 0x0026, "BridgeServer" },
916	{ 0x0027, "TCP/IP Gateway" },
917	{ 0x0028, "Point-to-point X.25 BridgeServer" },
918	{ 0x0029, "3270 Gateway" },
919	{ 0x002a, "CHI Corp" },
920	{ 0x002c, "PC Chalkboard" },
921	{ 0x002d, "TimeSynchServer" },
922	{ 0x002e, "ARCserve5.0/PalindromeBackup" },
923	{ 0x0045, "DI3270 Gateway" },
924	{ 0x0047, "AdvertisingPrintServer" },
925	{ 0x004a, "NetBlazerModems" },
926	{ 0x004b, "BtrieveVAP" },
927	{ 0x004c, "NetwareSQL" },
928	{ 0x004d, "XtreeNetwork" },
929	{ 0x0050, "BtrieveVAP4.11" },
930	{ 0x0052, "QuickLink" },
931	{ 0x0053, "PrintQueueUser" },
932	{ 0x0058, "Multipoint X.25 Router" },
933	{ 0x0060, "STLB/NLM" },
934	{ 0x0064, "ARCserve" },
935	{ 0x0066, "ARCserve3.0" },
936	{ 0x0072, "WAN CopyUtility" },
937	{ 0x007a, "TES-NetwareVMS" },
938	{ 0x0092, "WATCOM Debugger/EmeraldTapeBackupServer" },
939	{ 0x0095, "DDA OBGYN" },
940	{ 0x0098, "NetwareAccessServer" },
941	{ 0x009a, "Netware for VMS II/NamedPipeServer" },
942	{ 0x009b, "NetwareAccessServer" },
943	{ 0x009e, "PortableNetwareServer/SunLinkNVT" },
944	{ 0x00a1, "PowerchuteAPC UPS" },
945	{ 0x00aa, "LAWserve" },
946	{ 0x00ac, "CompaqIDA StatusMonitor" },
947	{ 0x0100, "PIPE STAIL" },
948	{ 0x0102, "LAN ProtectBindery" },
949	{ 0x0103, "OracleDataBaseServer" },
950	{ 0x0107, "Netware386/RSPX RemoteConsole" },
951	{ 0x010f, "NovellSNA Gateway" },
952	{ 0x0111, "TestServer" },
953	{ 0x0112, "HP PrintServer" },
954	{ 0x0114, "CSA MUX" },
955	{ 0x0115, "CSA LCA" },
956	{ 0x0116, "CSA CM" },
957	{ 0x0117, "CSA SMA" },
958	{ 0x0118, "CSA DBA" },
959	{ 0x0119, "CSA NMA" },
960	{ 0x011a, "CSA SSA" },
961	{ 0x011b, "CSA STATUS" },
962	{ 0x011e, "CSA APPC" },
963	{ 0x0126, "SNA TEST SSA Profile" },
964	{ 0x012a, "CSA TRACE" },
965	{ 0x012b, "NetwareSAA" },
966	{ 0x012e, "IKARUS VirusScan" },
967	{ 0x0130, "CommunicationsExecutive" },
968	{ 0x0133, "NNS DomainServer/NetwareNamingServicesDomain" },
969	{ 0x0135, "NetwareNamingServicesProfile" },
970	{ 0x0137, "Netware386 PrintQueue/NNS PrintQueue" },
971	{ 0x0141, "LAN SpoolServer" },
972	{ 0x0152, "IRMALAN Gateway" },
973	{ 0x0154, "NamedPipeServer" },
974	{ 0x0166, "NetWareManagement" },
975	{ 0x0168, "Intel PICKIT CommServer/Intel CAS TalkServer" },
976	{ 0x0173, "Compaq" },
977	{ 0x0174, "Compaq SNMP Agent" },
978	{ 0x0175, "Compaq" },
979	{ 0x0180, "XTreeServer/XTreeTools" },
980	{ 0x018A, "NASI ServicesBroadcastServer" },
981	{ 0x01b0, "GARP Gateway" },
982	{ 0x01b1, "Binfview" },
983	{ 0x01bf, "IntelLanDeskManager" },
984	{ 0x01ca, "AXTEC" },
985	{ 0x01cb, "ShivaNetModem/E" },
986	{ 0x01cc, "ShivaLanRover/E" },
987	{ 0x01cd, "ShivaLanRover/T" },
988	{ 0x01ce, "ShivaUniversal" },
989	{ 0x01d8, "CastelleFAXPressServer" },
990	{ 0x01da, "CastelleLANPressPrintServer" },
991	{ 0x01dc, "CastelleFAX/Xerox7033 FaxServer/ExcelLanFax" },
992	{ 0x01f0, "LEGATO" },
993	{ 0x01f5, "LEGATO" },
994	{ 0x0233, "NMS Agent/NetwareManagementAgent" },
995	{ 0x0237, "NMS IPX Discovery/LANternReadWriteChannel" },
996	{ 0x0238, "NMS IP Discovery/LANternTrapAlarmChannel" },
997	{ 0x023a, "LANtern" },
998	{ 0x023c, "MAVERICK" },
999	{ 0x023f, "NovellSMDR" },
1000	{ 0x024e, "NetwareConnect" },
1001	{ 0x024f, "NASI ServerBroadcast Cisco" },
1002	{ 0x026a, "NMS ServiceConsole" },
1003	{ 0x026b, "TimeSynchronizationServer Netware 4.x" },
1004	{ 0x0278, "DirectoryServer Netware 4.x" },
1005	{ 0x027b, "NetwareManagementAgent" },
1006	{ 0x0280, "Novell File and Printer Sharing Service for PC" },
1007	{ 0x0304, "NovellSAA Gateway" },
1008	{ 0x0308, "COM/VERMED" },
1009	{ 0x030a, "GalacticommWorldgroupServer" },
1010	{ 0x030c, "IntelNetport2/HP JetDirect/HP Quicksilver" },
1011	{ 0x0320, "AttachmateGateway" },
1012	{ 0x0327, "MicrosoftDiagnostiocs" },
1013	{ 0x0328, "WATCOM SQL Server" },
1014	{ 0x0335, "MultiTechSystems MultisynchCommServer" },
1015	{ 0x0343, "Xylogics RemoteAccessServer/LANModem" },
1016	{ 0x0355, "ArcadaBackupExec" },
1017	{ 0x0358, "MSLCD1" },
1018	{ 0x0361, "NETINELO" },
1019	{ 0x037e, "Powerchute UPS Monitoring" },
1020	{ 0x037f, "ViruSafeNotify" },
1021	{ 0x0386, "HP Bridge" },
1022	{ 0x0387, "HP Hub" },
1023	{ 0x0394, "NetWare SAA Gateway" },
1024	{ 0x039b, "LotusNotes" },
1025	{ 0x03b7, "CertusAntiVirus" },
1026	{ 0x03c4, "ARCserve4.0" },
1027	{ 0x03c7, "LANspool3.5" },
1028	{ 0x03d7, "LexmarkPrinterServer" },
1029	{ 0x03d8, "LexmarkXLE PrinterServer" },
1030	{ 0x03dd, "BanyanENS NetwareClient" },
1031	{ 0x03de, "GuptaSequelBaseServer/NetWareSQL" },
1032	{ 0x03e1, "UnivelUnixware" },
1033	{ 0x03e4, "UnivelUnixware" },
1034	{ 0x03fc, "IntelNetport" },
1035	{ 0x03fd, "PrintServerQueue" },
1036	{ 0x040A, "ipnServer" },
1037	{ 0x040D, "LVERRMAN" },
1038	{ 0x040E, "LVLIC" },
1039	{ 0x0414, "NET Silicon (DPI)/Kyocera" },
1040	{ 0x0429, "SiteLockVirus" },
1041	{ 0x0432, "UFHELPR???" },
1042	{ 0x0433, "Synoptics281xAdvancedSNMPAgent" },
1043	{ 0x0444, "MicrosoftNT SNA Server" },
1044	{ 0x0448, "Oracle" },
1045	{ 0x044c, "ARCserve5.01" },
1046	{ 0x0457, "CanonGP55" },
1047	{ 0x045a, "QMS Printers" },
1048	{ 0x045b, "DellSCSI Array" },
1049	{ 0x0491, "NetBlazerModems" },
1050	{ 0x04ac, "OnTimeScheduler" },
1051	{ 0x04b0, "CD-Net" },
1052	{ 0x0513, "EmulexNQA" },
1053	{ 0x0520, "SiteLockChecks" },
1054	{ 0x0529, "SiteLockChecks" },
1055	{ 0x052d, "CitrixOS2 AppServer" },
1056	{ 0x0535, "Tektronix" },
1057	{ 0x0536, "Milan" },
1058	{ 0x055d, "Attachmate SNA gateway" },
1059	{ 0x056b, "IBM8235 ModemServer" },
1060	{ 0x056c, "ShivaLanRover/E PLUS" },
1061	{ 0x056d, "ShivaLanRover/T PLUS" },
1062	{ 0x0580, "McAfeeNetShield" },
1063	{ 0x05B8, "NLM to workstation communication (Revelation Software)" },
1064	{ 0x05BA, "CompatibleSystemsRouters" },
1065	{ 0x05BE, "CheyenneHierarchicalStorageManager" },
1066	{ 0x0606, "JCWatermarkImaging" },
1067	{ 0x060c, "AXISNetworkPrinter" },
1068	{ 0x0610, "AdaptecSCSIManagement" },
1069	{ 0x0621, "IBM AntiVirus" },
1070	{ 0x0640, "Windows95 RemoteRegistryService" },
1071	{ 0x064e, "MicrosoftIIS" },
1072	{ 0x067b, "Microsoft Win95/98 File and Print Sharing for NetWare" },
1073	{ 0x067c, "Microsoft Win95/98 File and Print Sharing for NetWare" },
1074	{ 0x076C, "Xerox" },
1075	{ 0x079b, "ShivaLanRover/E 115" },
1076	{ 0x079c, "ShivaLanRover/T 115" },
1077	{ 0x07B4, "CubixWorldDesk" },
1078	{ 0x07c2, "Quarterdeck IWare Connect V2.x NLM" },
1079	{ 0x07c1, "Quarterdeck IWare Connect V3.x NLM" },
1080	{ 0x0810, "ELAN License Server Demo" },
1081	{ 0x0824, "ShivaLanRoverAccessSwitch/E" },
1082	{ 0x086a, "ISSC Collector" },
1083	{ 0x087f, "ISSC DAS AgentAIX" },
1084	{ 0x0880, "Intel Netport PRO" },
1085	{ 0x0881, "Intel Netport PRO" },
1086	{ 0x0b29, "SiteLock" },
1087	{ 0x0c29, "SiteLockApplications" },
1088	{ 0x0c2c, "LicensingServer" },
1089	{ 0x2101, "PerformanceTechnologyInstantInternet" },
1090	{ 0x2380, "LAI SiteLock" },
1091	{ 0x238c, "MeetingMaker" },
1092	{ 0x4808, "SiteLockServer/SiteLockMetering" },
1093	{ 0x5555, "SiteLockUser" },
1094	{ 0x6312, "Tapeware" },
1095	{ 0x6f00, "RabbitGateway" },
1096	{ 0x7703, "MODEM" },
1097	{ 0x8002, "NetPortPrinters" },
1098	{ 0x8008, "WordPerfectNetworkVersion" },
1099	{ 0x85BE, "Cisco EIGRP" },
1100	{ 0x8888, "WordPerfectNetworkVersion/QuickNetworkManagement" },
1101	{ 0x9000, "McAfeeNetShield" },
1102	{ 0x9604, "CSA-NT_MON" },
1103	{ 0xb6a8, "OceanIsleReachoutRemoteControl" },
1104	{ 0xf11f, "SiteLockMetering" },
1105	{ 0xf1ff, "SiteLock" },
1106	{ 0xf503, "Microsoft SQL Server" },
1107	{ 0xF905, "IBM TimeAndPlace" },
1108	{ 0xfbfb, "TopCallIII FaxServer" },
1109	{ 0xffff, "AnyService/Wildcard" },
1110	{ 0, (char *)0 }
1111};
1112
1113static void
1114init_ipxsaparray(void)
1115{
1116	register int i;
1117	register struct hnamemem *table;
1118
1119	for (i = 0; ipxsap_db[i].s != NULL; i++) {
1120		int j = htons(ipxsap_db[i].v) & (HASHNAMESIZE-1);
1121		table = &ipxsaptable[j];
1122		while (table->name)
1123			table = table->nxt;
1124		table->name = ipxsap_db[i].s;
1125		table->addr = htons(ipxsap_db[i].v);
1126		table->nxt = newhnamemem();
1127	}
1128}
1129
1130/*
1131 * Initialize the address to name translation machinery.  We map all
1132 * non-local IP addresses to numeric addresses if fflag is true (i.e.,
1133 * to prevent blocking on the nameserver).  localnet is the IP address
1134 * of the local network.  mask is its subnet mask.
1135 */
1136void
1137init_addrtoname(u_int32_t localnet, u_int32_t mask)
1138{
1139	if (fflag) {
1140		f_localnet = localnet;
1141		f_netmask = mask;
1142	}
1143	if (nflag)
1144		/*
1145		 * Simplest way to suppress names.
1146		 */
1147		return;
1148
1149	init_etherarray();
1150	init_servarray();
1151	init_eprotoarray();
1152	init_protoidarray();
1153	init_ipxsaparray();
1154}
1155
1156const char *
1157dnaddr_string(u_short dnaddr)
1158{
1159	register struct hnamemem *tp;
1160
1161	for (tp = &dnaddrtable[dnaddr & (HASHNAMESIZE-1)]; tp->nxt != 0;
1162	     tp = tp->nxt)
1163		if (tp->addr == dnaddr)
1164			return (tp->name);
1165
1166	tp->addr = dnaddr;
1167	tp->nxt = newhnamemem();
1168	if (nflag)
1169		tp->name = dnnum_string(dnaddr);
1170	else
1171		tp->name = dnname_string(dnaddr);
1172
1173	return(tp->name);
1174}
1175
1176/* Return a zero'ed hnamemem struct and cuts down on calloc() overhead */
1177struct hnamemem *
1178newhnamemem(void)
1179{
1180	register struct hnamemem *p;
1181	static struct hnamemem *ptr = NULL;
1182	static u_int num = 0;
1183
1184	if (num  <= 0) {
1185		num = 64;
1186		ptr = (struct hnamemem *)calloc(num, sizeof (*ptr));
1187		if (ptr == NULL)
1188			error("newhnamemem: calloc");
1189	}
1190	--num;
1191	p = ptr++;
1192	return (p);
1193}
1194
1195#ifdef INET6
1196/* Return a zero'ed h6namemem struct and cuts down on calloc() overhead */
1197struct h6namemem *
1198newh6namemem(void)
1199{
1200	register struct h6namemem *p;
1201	static struct h6namemem *ptr = NULL;
1202	static u_int num = 0;
1203
1204	if (num  <= 0) {
1205		num = 64;
1206		ptr = (struct h6namemem *)calloc(num, sizeof (*ptr));
1207		if (ptr == NULL)
1208			error("newh6namemem: calloc");
1209	}
1210	--num;
1211	p = ptr++;
1212	return (p);
1213}
1214#endif /* INET6 */
1215