409 lines
8.4 KiB
C
409 lines
8.4 KiB
C
/*
|
|
* Copyright (c) 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998
|
|
* The Regents of the University of California. All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that: (1) source code distributions
|
|
* retain the above copyright notice and this paragraph in its entirety, (2)
|
|
* distributions including binary code include the above copyright notice and
|
|
* this paragraph in its entirety in the documentation or other materials
|
|
* provided with the distribution, and (3) all advertising materials mentioning
|
|
* features or use of this software display the following acknowledgement:
|
|
* ``This product includes software developed by the University of California,
|
|
* Lawrence Berkeley Laboratory and its contributors.'' Neither the name of
|
|
* the University nor the names of its contributors may be used to endorse
|
|
* or promote products derived from this software without specific prior
|
|
* written permission.
|
|
* THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
|
|
* WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
|
|
* MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
|
|
*
|
|
* Name to id translation routines used by the scanner.
|
|
* These functions are not time critical.
|
|
*
|
|
* $FreeBSD$
|
|
*/
|
|
|
|
#ifndef lint
|
|
static const char rcsid[] =
|
|
"@(#) $Header: /tcpdump/master/libpcap/nametoaddr.c,v 1.51 1999/11/25 08:25:35 itojun Exp $ (LBL)";
|
|
#endif
|
|
|
|
#include <sys/param.h>
|
|
#include <sys/types.h> /* concession to AIX */
|
|
#include <sys/socket.h>
|
|
#include <sys/time.h>
|
|
|
|
#if __STDC__
|
|
struct mbuf;
|
|
struct rtentry;
|
|
#endif
|
|
|
|
#include <net/if.h>
|
|
#include <net/ethernet.h>
|
|
#include <netinet/in.h>
|
|
#include <arpa/inet.h>
|
|
#ifdef INET6
|
|
#include <netdb.h>
|
|
#include <sys/socket.h>
|
|
#endif /*INET6*/
|
|
|
|
#include <ctype.h>
|
|
#include <errno.h>
|
|
#include <stdlib.h>
|
|
#include <memory.h>
|
|
#include <netdb.h>
|
|
#include <stdio.h>
|
|
|
|
#include "pcap-int.h"
|
|
|
|
#include "gencode.h"
|
|
#include <pcap-namedb.h>
|
|
|
|
#include "gnuc.h"
|
|
#ifdef HAVE_OS_PROTO_H
|
|
#include "os-proto.h"
|
|
#endif
|
|
|
|
#ifndef NTOHL
|
|
#define NTOHL(x) (x) = ntohl(x)
|
|
#define NTOHS(x) (x) = ntohs(x)
|
|
#endif
|
|
|
|
static inline int xdtoi(int);
|
|
|
|
/*
|
|
* Convert host name to internet address.
|
|
* Return 0 upon failure.
|
|
*/
|
|
#ifndef INET6
|
|
bpf_u_int32 **
|
|
pcap_nametoaddr(const char *name)
|
|
{
|
|
#ifndef h_addr
|
|
static bpf_u_int32 *hlist[2];
|
|
#endif
|
|
bpf_u_int32 **p;
|
|
struct hostent *hp;
|
|
|
|
if ((hp = gethostbyname(name)) != NULL) {
|
|
#ifndef h_addr
|
|
hlist[0] = (bpf_u_int32 *)hp->h_addr;
|
|
NTOHL(hp->h_addr);
|
|
return hlist;
|
|
#else
|
|
for (p = (bpf_u_int32 **)hp->h_addr_list; *p; ++p)
|
|
NTOHL(**p);
|
|
return (bpf_u_int32 **)hp->h_addr_list;
|
|
#endif
|
|
}
|
|
else
|
|
return 0;
|
|
}
|
|
#else
|
|
struct addrinfo *
|
|
pcap_nametoaddr(const char *name)
|
|
{
|
|
struct addrinfo hints, *res;
|
|
int error;
|
|
|
|
memset(&hints, 0, sizeof(hints));
|
|
hints.ai_family = PF_UNSPEC;
|
|
hints.ai_socktype = SOCK_STREAM; /*not really*/
|
|
error = getaddrinfo(name, NULL, &hints, &res);
|
|
if (error)
|
|
return NULL;
|
|
else
|
|
return res;
|
|
}
|
|
#endif /*INET6*/
|
|
|
|
/*
|
|
* Convert net name to internet address.
|
|
* Return 0 upon failure.
|
|
*/
|
|
bpf_u_int32
|
|
pcap_nametonetaddr(const char *name)
|
|
{
|
|
struct netent *np;
|
|
|
|
if ((np = getnetbyname(name)) != NULL)
|
|
return np->n_net;
|
|
else
|
|
return 0;
|
|
}
|
|
|
|
/*
|
|
* Convert a port name to its port and protocol numbers.
|
|
* We assume only TCP or UDP.
|
|
* Return 0 upon failure.
|
|
*/
|
|
int
|
|
pcap_nametoport(const char *name, int *port, int *proto)
|
|
{
|
|
struct servent *sp;
|
|
char *other;
|
|
|
|
sp = getservbyname(name, (char *)0);
|
|
if (sp != NULL) {
|
|
NTOHS(sp->s_port);
|
|
*port = sp->s_port;
|
|
*proto = pcap_nametoproto(sp->s_proto);
|
|
/*
|
|
* We need to check /etc/services for ambiguous entries.
|
|
* If we find the ambiguous entry, and it has the
|
|
* same port number, change the proto to PROTO_UNDEF
|
|
* so both TCP and UDP will be checked.
|
|
*/
|
|
if (*proto == IPPROTO_TCP)
|
|
other = "udp";
|
|
else
|
|
other = "tcp";
|
|
|
|
sp = getservbyname(name, other);
|
|
if (sp != 0) {
|
|
NTOHS(sp->s_port);
|
|
#ifdef notdef
|
|
if (*port != sp->s_port)
|
|
/* Can't handle ambiguous names that refer
|
|
to different port numbers. */
|
|
warning("ambiguous port %s in /etc/services",
|
|
name);
|
|
#endif
|
|
*proto = PROTO_UNDEF;
|
|
}
|
|
return 1;
|
|
}
|
|
#if defined(ultrix) || defined(__osf__)
|
|
/* Special hack in case NFS isn't in /etc/services */
|
|
if (strcmp(name, "nfs") == 0) {
|
|
*port = 2049;
|
|
*proto = PROTO_UNDEF;
|
|
return 1;
|
|
}
|
|
#endif
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
pcap_nametoproto(const char *str)
|
|
{
|
|
struct protoent *p;
|
|
|
|
p = getprotobyname(str);
|
|
if (p != 0)
|
|
return p->p_proto;
|
|
else
|
|
return PROTO_UNDEF;
|
|
}
|
|
|
|
#include "ethertype.h"
|
|
|
|
struct eproto {
|
|
char *s;
|
|
u_short p;
|
|
};
|
|
|
|
/* Static data base of ether protocol types. */
|
|
struct eproto eproto_db[] = {
|
|
#if 0
|
|
/* The FreeBSD elf linker generates a request to copy this array
|
|
* (including its size) when you link with -lpcap. In order to
|
|
* not bump the major version number of this libpcap.so, we need
|
|
* to ensure that the array stays the same size. Since PUP is
|
|
* likely never seen in real life any more, it's the first to
|
|
* be sacrificed (in favor of ip6).
|
|
*/
|
|
{ "pup", ETHERTYPE_PUP },
|
|
#endif
|
|
{ "xns", ETHERTYPE_NS },
|
|
{ "ip", ETHERTYPE_IP },
|
|
#ifdef INET6
|
|
{ "ip6", ETHERTYPE_IPV6 },
|
|
#endif
|
|
{ "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 }
|
|
};
|
|
|
|
int
|
|
pcap_nametoeproto(const char *s)
|
|
{
|
|
struct eproto *p = eproto_db;
|
|
|
|
while (p->s != 0) {
|
|
if (strcmp(p->s, s) == 0)
|
|
return p->p;
|
|
p += 1;
|
|
}
|
|
return PROTO_UNDEF;
|
|
}
|
|
|
|
/* Hex digit to integer. */
|
|
static inline int
|
|
xdtoi(c)
|
|
register int c;
|
|
{
|
|
if (isdigit(c))
|
|
return c - '0';
|
|
else if (islower(c))
|
|
return c - 'a' + 10;
|
|
else
|
|
return c - 'A' + 10;
|
|
}
|
|
|
|
int
|
|
__pcap_atoin(const char *s, bpf_u_int32 *addr)
|
|
{
|
|
u_int n;
|
|
int len;
|
|
|
|
*addr = 0;
|
|
len = 0;
|
|
while (1) {
|
|
n = 0;
|
|
while (*s && *s != '.')
|
|
n = n * 10 + *s++ - '0';
|
|
*addr <<= 8;
|
|
*addr |= n & 0xff;
|
|
len += 8;
|
|
if (*s == '\0')
|
|
return len;
|
|
++s;
|
|
}
|
|
/* NOTREACHED */
|
|
}
|
|
|
|
int
|
|
__pcap_atodn(const char *s, bpf_u_int32 *addr)
|
|
{
|
|
#define AREASHIFT 10
|
|
#define AREAMASK 0176000
|
|
#define NODEMASK 01777
|
|
|
|
u_int node, area;
|
|
|
|
if (sscanf((char *)s, "%d.%d", &area, &node) != 2)
|
|
bpf_error("malformed decnet address '%s'", s);
|
|
|
|
*addr = (area << AREASHIFT) & AREAMASK;
|
|
*addr |= (node & NODEMASK);
|
|
|
|
return(32);
|
|
}
|
|
|
|
/*
|
|
* Convert 's' which has the form "xx:xx:xx:xx:xx:xx" into a new
|
|
* ethernet address. Assumes 's' is well formed.
|
|
*/
|
|
u_char *
|
|
pcap_ether_aton(const char *s)
|
|
{
|
|
register u_char *ep, *e;
|
|
register u_int d;
|
|
|
|
e = ep = (u_char *)malloc(6);
|
|
|
|
while (*s) {
|
|
if (*s == ':')
|
|
s += 1;
|
|
d = xdtoi(*s++);
|
|
if (isxdigit(*s)) {
|
|
d <<= 4;
|
|
d |= xdtoi(*s++);
|
|
}
|
|
*ep++ = d;
|
|
}
|
|
|
|
return (e);
|
|
}
|
|
|
|
#ifndef HAVE_ETHER_HOSTTON
|
|
/* Roll our own */
|
|
u_char *
|
|
pcap_ether_hostton(const char *name)
|
|
{
|
|
register struct pcap_etherent *ep;
|
|
register u_char *ap;
|
|
static FILE *fp = NULL;
|
|
static init = 0;
|
|
|
|
if (!init) {
|
|
fp = fopen(PCAP_ETHERS_FILE, "r");
|
|
++init;
|
|
if (fp == NULL)
|
|
return (NULL);
|
|
} else if (fp == NULL)
|
|
return (NULL);
|
|
else
|
|
rewind(fp);
|
|
|
|
while ((ep = pcap_next_etherent(fp)) != NULL) {
|
|
if (strcmp(ep->name, name) == 0) {
|
|
ap = (u_char *)malloc(6);
|
|
if (ap != NULL) {
|
|
memcpy(ap, ep->addr, 6);
|
|
return (ap);
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
return (NULL);
|
|
}
|
|
#else
|
|
|
|
#if !defined(sgi) && !defined(__NetBSD__) && !defined(__FreeBSD__)
|
|
extern int ether_hostton(char *, struct ether_addr *);
|
|
#endif
|
|
|
|
/* Use the os supplied routines */
|
|
u_char *
|
|
pcap_ether_hostton(const char *name)
|
|
{
|
|
register u_char *ap;
|
|
u_char a[6];
|
|
|
|
ap = NULL;
|
|
if (ether_hostton((char *)name, (struct ether_addr *)a) == 0) {
|
|
ap = (u_char *)malloc(6);
|
|
if (ap != NULL)
|
|
memcpy((char *)ap, (char *)a, 6);
|
|
}
|
|
return (ap);
|
|
}
|
|
#endif
|
|
|
|
u_short
|
|
__pcap_nametodnaddr(const char *name)
|
|
{
|
|
#ifdef DECNETLIB
|
|
struct nodeent *getnodebyname();
|
|
struct nodeent *nep;
|
|
unsigned short res;
|
|
|
|
nep = getnodebyname(name);
|
|
if (nep == ((struct nodeent *)0))
|
|
bpf_error("unknown decnet host name '%s'\n", name);
|
|
|
|
memcpy((char *)&res, (char *)nep->n_addr, sizeof(unsigned short));
|
|
return(res);
|
|
#else
|
|
bpf_error("decnet name support not included, '%s' cannot be translated\n",
|
|
name);
|
|
#endif
|
|
}
|