busybox/libbb/inet_common.c

/* vi: set sw=4 ts=4: */
/*
 * stolen from net-tools-1.59 and stripped down for busybox by
 *                      Erik Andersen <andersen@codepoet.org>
 *
 * Heavily modified by Manuel Novoa III       Mar 12, 2001
 *
 * Licensed under GPLv2, see file LICENSE in this tarball for details.
 */

#include "libbb.h"
#include "inet_common.h"

int FAST_FUNC INET_resolve(const char *name, struct sockaddr_in *s_in, int hostfirst)
{
	struct hostent *hp;
#if ENABLE_FEATURE_ETC_NETWORKS
	struct netent *np;
#endif

	/* Grmpf. -FvK */
	s_in->sin_family = AF_INET;
	s_in->sin_port = 0;

	/* Default is special, meaning 0.0.0.0. */
	if (!strcmp(name, bb_str_default)) {
		s_in->sin_addr.s_addr = INADDR_ANY;
		return 1;
	}
	/* Look to see if it's a dotted quad. */
	if (inet_aton(name, &s_in->sin_addr)) {
		return 0;
	}
	/* If we expect this to be a hostname, try hostname database first */
#ifdef DEBUG
	if (hostfirst) {
		bb_error_msg("gethostbyname(%s)", name);
	}
#endif
	if (hostfirst) {
		hp = gethostbyname(name);
		if (hp != NULL) {
			memcpy(&s_in->sin_addr, hp->h_addr_list[0],
				sizeof(struct in_addr));
			return 0;
		}
	}
#if ENABLE_FEATURE_ETC_NETWORKS
	/* Try the NETWORKS database to see if this is a known network. */
#ifdef DEBUG
	bb_error_msg("getnetbyname(%s)", name);
#endif
	np = getnetbyname(name);
	if (np != NULL) {
		s_in->sin_addr.s_addr = htonl(np->n_net);
		return 1;
	}
#endif
	if (hostfirst) {
		/* Don't try again */
		return -1;
	}
#ifdef DEBUG
	res_init();
	_res.options |= RES_DEBUG;
	bb_error_msg("gethostbyname(%s)", name);
#endif
	hp = gethostbyname(name);
	if (hp == NULL) {
		return -1;
	}
	memcpy(&s_in->sin_addr, hp->h_addr_list[0], sizeof(struct in_addr));
	return 0;
}


/* numeric: & 0x8000: default instead of *,
 *          & 0x4000: host instead of net,
 *          & 0x0fff: don't resolve
 */
char* FAST_FUNC INET_rresolve(struct sockaddr_in *s_in, int numeric, uint32_t netmask)
{
	/* addr-to-name cache */
	struct addr {
		struct addr *next;
		struct sockaddr_in addr;
		int host;
		char name[1];
	};
	static struct addr *cache = NULL;

	struct addr *pn;
	char *name;
	uint32_t ad, host_ad;
	int host = 0;

	if (s_in->sin_family != AF_INET) {
#ifdef DEBUG
		bb_error_msg("rresolve: unsupported address family %d!",
				  s_in->sin_family);
#endif
		errno = EAFNOSUPPORT;
		return NULL;
	}
	ad = s_in->sin_addr.s_addr;
#ifdef DEBUG
	bb_error_msg("rresolve: %08x, mask %08x, num %08x", (unsigned)ad, netmask, numeric);
#endif
	if (ad == INADDR_ANY) {
		if ((numeric & 0x0FFF) == 0) {
			if (numeric & 0x8000)
				return xstrdup(bb_str_default);
			return xstrdup("*");
		}
	}
	if (numeric & 0x0FFF)
		return xstrdup(inet_ntoa(s_in->sin_addr));

	if ((ad & (~netmask)) != 0 || (numeric & 0x4000))
		host = 1;
	pn = cache;
	while (pn) {
		if (pn->addr.sin_addr.s_addr == ad && pn->host == host) {
#ifdef DEBUG
			bb_error_msg("rresolve: found %s %08x in cache",
					  (host ? "host" : "net"), (unsigned)ad);
#endif
			return xstrdup(pn->name);
		}
		pn = pn->next;
	}

	host_ad = ntohl(ad);
	name = NULL;
	if (host) {
		struct hostent *ent;
#ifdef DEBUG
		bb_error_msg("gethostbyaddr (%08x)", (unsigned)ad);
#endif
		ent = gethostbyaddr((char *) &ad, 4, AF_INET);
		if (ent)
			name = xstrdup(ent->h_name);
	} else if (ENABLE_FEATURE_ETC_NETWORKS) {
		struct netent *np;
#ifdef DEBUG
		bb_error_msg("getnetbyaddr (%08x)", (unsigned)host_ad);
#endif
		np = getnetbyaddr(host_ad, AF_INET);
		if (np)
			name = xstrdup(np->n_name);
	}
	if (!name)
		name = xstrdup(inet_ntoa(s_in->sin_addr));
	pn = xmalloc(sizeof(*pn) + strlen(name)); /* no '+ 1', it's already accounted for */
	pn->next = cache;
	pn->addr = *s_in;
	pn->host = host;
	strcpy(pn->name, name);
	cache = pn;
	return name;
}

#if ENABLE_FEATURE_IPV6

int FAST_FUNC INET6_resolve(const char *name, struct sockaddr_in6 *sin6)
{
	struct addrinfo req, *ai;
	int s;

	memset(&req, '\0', sizeof req);
	req.ai_family = AF_INET6;
	s = getaddrinfo(name, NULL, &req, &ai);
	if (s) {
		bb_error_msg("getaddrinfo: %s: %d", name, s);
		return -1;
	}
	memcpy(sin6, ai->ai_addr, sizeof(struct sockaddr_in6));
	freeaddrinfo(ai);
	return 0;
}

#ifndef IN6_IS_ADDR_UNSPECIFIED
# define IN6_IS_ADDR_UNSPECIFIED(a) \
	(((uint32_t *) (a))[0] == 0 && ((uint32_t *) (a))[1] == 0 && \
	 ((uint32_t *) (a))[2] == 0 && ((uint32_t *) (a))[3] == 0)
#endif


char* FAST_FUNC INET6_rresolve(struct sockaddr_in6 *sin6, int numeric)
{
	char name[128];
	int s;

	if (sin6->sin6_family != AF_INET6) {
#ifdef DEBUG
		bb_error_msg("rresolve: unsupported address family %d!",
				  sin6->sin6_family);
#endif
		errno = EAFNOSUPPORT;
		return NULL;
	}
	if (numeric & 0x7FFF) {
		inet_ntop(AF_INET6, &sin6->sin6_addr, name, sizeof(name));
		return xstrdup(name);
	}
	if (IN6_IS_ADDR_UNSPECIFIED(&sin6->sin6_addr)) {
		if (numeric & 0x8000)
			return xstrdup(bb_str_default);
		return xstrdup("*");
	}

	s = getnameinfo((struct sockaddr *) sin6, sizeof(struct sockaddr_in6),
				name, sizeof(name), NULL, 0, 0);
	if (s) {
		bb_error_msg("getnameinfo failed");
		return NULL;
	}
	return xstrdup(name);
}

#endif		/* CONFIG_FEATURE_IPV6 */
1	niro	532	/* vi: set sw=4 ts=4: */
2			/*
3			* stolen from net-tools-1.59 and stripped down for busybox by
4			* Erik Andersen <andersen@codepoet.org>
5			*
6			* Heavily modified by Manuel Novoa III Mar 12, 2001
7			*
8	niro	984	* Licensed under GPLv2, see file LICENSE in this tarball for details.
9	niro	532	*/
10
11			#include "libbb.h"
12			#include "inet_common.h"
13
14	niro	816	int FAST_FUNC INET_resolve(const char name, struct sockaddr_in s_in, int hostfirst)
15	niro	532	{
16			struct hostent *hp;
17	niro	816	#if ENABLE_FEATURE_ETC_NETWORKS
18	niro	532	struct netent *np;
19	niro	816	#endif
20	niro	532
21			/* Grmpf. -FvK */
22			s_in->sin_family = AF_INET;
23			s_in->sin_port = 0;
24
25			/* Default is special, meaning 0.0.0.0. */
26			if (!strcmp(name, bb_str_default)) {
27			s_in->sin_addr.s_addr = INADDR_ANY;
28			return 1;
29			}
30			/* Look to see if it's a dotted quad. */
31			if (inet_aton(name, &s_in->sin_addr)) {
32			return 0;
33			}
34			/* If we expect this to be a hostname, try hostname database first */
35			#ifdef DEBUG
36			if (hostfirst) {
37	niro	816	bb_error_msg("gethostbyname(%s)", name);
38	niro	532	}
39			#endif
40	niro	816	if (hostfirst) {
41			hp = gethostbyname(name);
42			if (hp != NULL) {
43			memcpy(&s_in->sin_addr, hp->h_addr_list[0],
44			sizeof(struct in_addr));
45			return 0;
46			}
47	niro	532	}
48	niro	816	#if ENABLE_FEATURE_ETC_NETWORKS
49	niro	532	/* Try the NETWORKS database to see if this is a known network. */
50			#ifdef DEBUG
51	niro	816	bb_error_msg("getnetbyname(%s)", name);
52	niro	532	#endif
53	niro	816	np = getnetbyname(name);
54			if (np != NULL) {
55	niro	532	s_in->sin_addr.s_addr = htonl(np->n_net);
56			return 1;
57			}
58	niro	816	#endif
59	niro	532	if (hostfirst) {
60			/* Don't try again */
61			return -1;
62			}
63			#ifdef DEBUG
64			res_init();
65			_res.options \|= RES_DEBUG;
66	niro	816	bb_error_msg("gethostbyname(%s)", name);
67	niro	532	#endif
68	niro	816	hp = gethostbyname(name);
69			if (hp == NULL) {
70	niro	532	return -1;
71			}
72	niro	816	memcpy(&s_in->sin_addr, hp->h_addr_list[0], sizeof(struct in_addr));
73	niro	532	return 0;
74			}
75
76
77			/* numeric: & 0x8000: default instead of *,
78			* & 0x4000: host instead of net,
79			* & 0x0fff: don't resolve
80			*/
81	niro	816	char* FAST_FUNC INET_rresolve(struct sockaddr_in *s_in, int numeric, uint32_t netmask)
82	niro	532	{
83	niro	816	/* addr-to-name cache */
84			struct addr {
85			struct addr *next;
86			struct sockaddr_in addr;
87			int host;
88			char name[1];
89			};
90			static struct addr *cache = NULL;
91
92	niro	532	struct addr *pn;
93	niro	816	char *name;
94			uint32_t ad, host_ad;
95	niro	532	int host = 0;
96
97			if (s_in->sin_family != AF_INET) {
98			#ifdef DEBUG
99	niro	816	bb_error_msg("rresolve: unsupported address family %d!",
100	niro	532	s_in->sin_family);
101			#endif
102			errno = EAFNOSUPPORT;
103	niro	816	return NULL;
104	niro	532	}
105	niro	816	ad = s_in->sin_addr.s_addr;
106	niro	532	#ifdef DEBUG
107	niro	816	bb_error_msg("rresolve: %08x, mask %08x, num %08x", (unsigned)ad, netmask, numeric);
108	niro	532	#endif
109			if (ad == INADDR_ANY) {
110			if ((numeric & 0x0FFF) == 0) {
111			if (numeric & 0x8000)
112	niro	816	return xstrdup(bb_str_default);
113			return xstrdup("*");
114	niro	532	}
115			}
116	niro	816	if (numeric & 0x0FFF)
117			return xstrdup(inet_ntoa(s_in->sin_addr));
118	niro	532
119			if ((ad & (~netmask)) != 0 \|\| (numeric & 0x4000))
120			host = 1;
121	niro	816	pn = cache;
122			while (pn) {
123	niro	532	if (pn->addr.sin_addr.s_addr == ad && pn->host == host) {
124			#ifdef DEBUG
125	niro	816	bb_error_msg("rresolve: found %s %08x in cache",
126			(host ? "host" : "net"), (unsigned)ad);
127	niro	532	#endif
128	niro	816	return xstrdup(pn->name);
129	niro	532	}
130			pn = pn->next;
131			}
132
133			host_ad = ntohl(ad);
134	niro	816	name = NULL;
135	niro	532	if (host) {
136	niro	816	struct hostent *ent;
137	niro	532	#ifdef DEBUG
138	niro	816	bb_error_msg("gethostbyaddr (%08x)", (unsigned)ad);
139	niro	532	#endif
140			ent = gethostbyaddr((char *) &ad, 4, AF_INET);
141	niro	816	if (ent)
142			name = xstrdup(ent->h_name);
143			} else if (ENABLE_FEATURE_ETC_NETWORKS) {
144			struct netent *np;
145	niro	532	#ifdef DEBUG
146	niro	816	bb_error_msg("getnetbyaddr (%08x)", (unsigned)host_ad);
147	niro	532	#endif
148			np = getnetbyaddr(host_ad, AF_INET);
149	niro	816	if (np)
150			name = xstrdup(np->n_name);
151	niro	532	}
152	niro	816	if (!name)
153			name = xstrdup(inet_ntoa(s_in->sin_addr));
154			pn = xmalloc(sizeof(pn) + strlen(name)); / no '+ 1', it's already accounted for */
155			pn->next = cache;
156	niro	532	pn->addr = *s_in;
157			pn->host = host;
158	niro	816	strcpy(pn->name, name);
159			cache = pn;
160			return name;
161	niro	532	}
162
163	niro	816	#if ENABLE_FEATURE_IPV6
164	niro	532
165	niro	816	int FAST_FUNC INET6_resolve(const char name, struct sockaddr_in6 sin6)
166	niro	532	{
167			struct addrinfo req, *ai;
168			int s;
169
170			memset(&req, '\0', sizeof req);
171			req.ai_family = AF_INET6;
172			s = getaddrinfo(name, NULL, &req, &ai);
173			if (s) {
174			bb_error_msg("getaddrinfo: %s: %d", name, s);
175			return -1;
176			}
177			memcpy(sin6, ai->ai_addr, sizeof(struct sockaddr_in6));
178			freeaddrinfo(ai);
179			return 0;
180			}
181
182			#ifndef IN6_IS_ADDR_UNSPECIFIED
183			# define IN6_IS_ADDR_UNSPECIFIED(a) \
184			(((uint32_t ) (a))[0] == 0 && ((uint32_t ) (a))[1] == 0 && \
185			((uint32_t ) (a))[2] == 0 && ((uint32_t ) (a))[3] == 0)
186			#endif
187
188
189	niro	816	char* FAST_FUNC INET6_rresolve(struct sockaddr_in6 *sin6, int numeric)
190	niro	532	{
191	niro	816	char name[128];
192	niro	532	int s;
193
194			if (sin6->sin6_family != AF_INET6) {
195			#ifdef DEBUG
196	niro	984	bb_error_msg("rresolve: unsupported address family %d!",
197	niro	532	sin6->sin6_family);
198			#endif
199			errno = EAFNOSUPPORT;
200	niro	816	return NULL;
201	niro	532	}
202			if (numeric & 0x7FFF) {
203	niro	816	inet_ntop(AF_INET6, &sin6->sin6_addr, name, sizeof(name));
204			return xstrdup(name);
205	niro	532	}
206			if (IN6_IS_ADDR_UNSPECIFIED(&sin6->sin6_addr)) {
207	niro	816	if (numeric & 0x8000)
208			return xstrdup(bb_str_default);
209			return xstrdup("*");
210	niro	532	}
211
212	niro	816	s = getnameinfo((struct sockaddr *) sin6, sizeof(struct sockaddr_in6),
213			name, sizeof(name), NULL, 0, 0);
214	niro	532	if (s) {
215			bb_error_msg("getnameinfo failed");
216	niro	816	return NULL;
217	niro	532	}
218	niro	816	return xstrdup(name);
219	niro	532	}
220
221	niro	816	#endif /* CONFIG_FEATURE_IPV6 */