2 * Copyright (C) 2004, 2005, 2007, 2010-2012, 2014 Internet Systems Consortium, Inc. ("ISC")
3 * Copyright (C) 1999-2002 Internet Software Consortium.
5 * Permission to use, copy, modify, and/or distribute this software for any
6 * purpose with or without fee is hereby granted, provided that the above
7 * copyright notice and this permission notice appear in all copies.
9 * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES WITH
10 * REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
11 * AND FITNESS. IN NO EVENT SHALL ISC BE LIABLE FOR ANY SPECIAL, DIRECT,
12 * INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
13 * LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE
14 * OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
15 * PERFORMANCE OF THIS SOFTWARE.
26 #include <isc/buffer.h>
29 #include <isc/netaddr.h>
30 #include <isc/print.h>
31 #include <isc/sockaddr.h>
32 #include <isc/string.h>
36 isc_netaddr_equal(const isc_netaddr_t *a, const isc_netaddr_t *b) {
37 REQUIRE(a != NULL && b != NULL);
39 if (a->family != b->family)
42 if (a->zone != b->zone)
47 if (a->type.in.s_addr != b->type.in.s_addr)
51 if (memcmp(&a->type.in6, &b->type.in6,
52 sizeof(a->type.in6)) != 0 ||
56 #ifdef ISC_PLATFORM_HAVESYSUNH
58 if (strcmp(a->type.un, b->type.un) != 0)
69 isc_netaddr_eqprefix(const isc_netaddr_t *a, const isc_netaddr_t *b,
70 unsigned int prefixlen)
72 const unsigned char *pa = NULL, *pb = NULL;
73 unsigned int ipabytes = 0; /* Length of whole IP address in bytes */
74 unsigned int nbytes; /* Number of significant whole bytes */
75 unsigned int nbits; /* Number of significant leftover bits */
77 REQUIRE(a != NULL && b != NULL);
79 if (a->family != b->family)
82 if (a->zone != b->zone && b->zone != 0)
87 pa = (const unsigned char *) &a->type.in;
88 pb = (const unsigned char *) &b->type.in;
92 pa = (const unsigned char *) &a->type.in6;
93 pb = (const unsigned char *) &b->type.in6;
101 * Don't crash if we get a pattern like 10.0.0.1/9999999.
103 if (prefixlen > ipabytes * 8)
104 prefixlen = ipabytes * 8;
106 nbytes = prefixlen / 8;
107 nbits = prefixlen % 8;
110 if (memcmp(pa, pb, nbytes) != 0)
114 unsigned int bytea, byteb, mask;
115 INSIST(nbytes < ipabytes);
119 mask = (0xFF << (8-nbits)) & 0xFF;
120 if ((bytea & mask) != (byteb & mask))
127 isc_netaddr_totext(const isc_netaddr_t *netaddr, isc_buffer_t *target) {
128 char abuf[sizeof("xxxx:xxxx:xxxx:xxxx:xxxx:xxxx:255.255.255.255")];
129 char zbuf[sizeof("%4294967295")];
135 REQUIRE(netaddr != NULL);
137 switch (netaddr->family) {
139 type = &netaddr->type.in;
142 type = &netaddr->type.in6;
144 #ifdef ISC_PLATFORM_HAVESYSUNH
146 alen = strlen(netaddr->type.un);
147 if (alen > isc_buffer_availablelength(target))
148 return (ISC_R_NOSPACE);
149 isc_buffer_putmem(target,
150 (const unsigned char *)(netaddr->type.un),
152 return (ISC_R_SUCCESS);
155 return (ISC_R_FAILURE);
157 r = inet_ntop(netaddr->family, type, abuf, sizeof(abuf));
159 return (ISC_R_FAILURE);
162 INSIST(alen < sizeof(abuf));
165 if (netaddr->family == AF_INET6 && netaddr->zone != 0) {
166 zlen = snprintf(zbuf, sizeof(zbuf), "%%%u", netaddr->zone);
168 return (ISC_R_FAILURE);
169 INSIST((unsigned int)zlen < sizeof(zbuf));
172 if (alen + zlen > isc_buffer_availablelength(target))
173 return (ISC_R_NOSPACE);
175 isc_buffer_putmem(target, (unsigned char *)abuf, alen);
176 isc_buffer_putmem(target, (unsigned char *)zbuf, zlen);
178 return (ISC_R_SUCCESS);
182 isc_netaddr_format(const isc_netaddr_t *na, char *array, unsigned int size) {
186 isc_buffer_init(&buf, array, size);
187 result = isc_netaddr_totext(na, &buf);
195 if (result == ISC_R_SUCCESS) {
196 if (isc_buffer_availablelength(&buf) >= 1)
197 isc_buffer_putuint8(&buf, 0);
199 result = ISC_R_NOSPACE;
202 if (result != ISC_R_SUCCESS) {
203 snprintf(array, size,
204 isc_msgcat_get(isc_msgcat, ISC_MSGSET_NETADDR,
206 "<unknown address, family %u>"),
208 array[size - 1] = '\0';
214 isc_netaddr_prefixok(const isc_netaddr_t *na, unsigned int prefixlen) {
215 static const unsigned char zeros[16];
216 unsigned int nbits, nbytes, ipbytes = 0;
217 const unsigned char *p;
219 switch (na->family) {
221 p = (const unsigned char *) &na->type.in;
224 return (ISC_R_RANGE);
227 p = (const unsigned char *) &na->type.in6;
230 return (ISC_R_RANGE);
233 return (ISC_R_NOTIMPLEMENTED);
235 nbytes = prefixlen / 8;
236 nbits = prefixlen % 8;
238 if ((p[nbytes] & (0xff>>nbits)) != 0U)
239 return (ISC_R_FAILURE);
242 if (memcmp(p + nbytes, zeros, ipbytes - nbytes) != 0)
243 return (ISC_R_FAILURE);
244 return (ISC_R_SUCCESS);
248 isc_netaddr_masktoprefixlen(const isc_netaddr_t *s, unsigned int *lenp) {
249 unsigned int nbits = 0, nbytes = 0, ipbytes = 0, i;
250 const unsigned char *p;
254 p = (const unsigned char *) &s->type.in;
258 p = (const unsigned char *) &s->type.in6;
262 return (ISC_R_NOTIMPLEMENTED);
264 for (i = 0; i < ipbytes; i++) {
270 unsigned int c = p[nbytes];
271 while ((c & 0x80) != 0 && nbits < 8) {
275 return (ISC_R_MASKNONCONTIG);
278 for (; i < ipbytes; i++) {
280 return (ISC_R_MASKNONCONTIG);
283 *lenp = nbytes * 8 + nbits;
284 return (ISC_R_SUCCESS);
288 isc_netaddr_fromin(isc_netaddr_t *netaddr, const struct in_addr *ina) {
289 memset(netaddr, 0, sizeof(*netaddr));
290 netaddr->family = AF_INET;
291 netaddr->type.in = *ina;
295 isc_netaddr_fromin6(isc_netaddr_t *netaddr, const struct in6_addr *ina6) {
296 memset(netaddr, 0, sizeof(*netaddr));
297 netaddr->family = AF_INET6;
298 netaddr->type.in6 = *ina6;
302 isc_netaddr_frompath(isc_netaddr_t *netaddr, const char *path) {
303 #ifdef ISC_PLATFORM_HAVESYSUNH
304 if (strlen(path) > sizeof(netaddr->type.un) - 1)
305 return (ISC_R_NOSPACE);
307 memset(netaddr, 0, sizeof(*netaddr));
308 netaddr->family = AF_UNIX;
309 strcpy(netaddr->type.un, path);
311 return (ISC_R_SUCCESS);
315 return (ISC_R_NOTIMPLEMENTED);
321 isc_netaddr_setzone(isc_netaddr_t *netaddr, isc_uint32_t zone) {
322 /* we currently only support AF_INET6. */
323 REQUIRE(netaddr->family == AF_INET6);
325 netaddr->zone = zone;
329 isc_netaddr_getzone(const isc_netaddr_t *netaddr) {
330 return (netaddr->zone);
334 isc_netaddr_fromsockaddr(isc_netaddr_t *t, const isc_sockaddr_t *s) {
335 int family = s->type.sa.sa_family;
339 t->type.in = s->type.sin.sin_addr;
343 memmove(&t->type.in6, &s->type.sin6.sin6_addr, 16);
344 #ifdef ISC_PLATFORM_HAVESCOPEID
345 t->zone = s->type.sin6.sin6_scope_id;
350 #ifdef ISC_PLATFORM_HAVESYSUNH
352 memmove(t->type.un, s->type.sunix.sun_path, sizeof(t->type.un));
362 isc_netaddr_any(isc_netaddr_t *netaddr) {
363 memset(netaddr, 0, sizeof(*netaddr));
364 netaddr->family = AF_INET;
365 netaddr->type.in.s_addr = INADDR_ANY;
369 isc_netaddr_any6(isc_netaddr_t *netaddr) {
370 memset(netaddr, 0, sizeof(*netaddr));
371 netaddr->family = AF_INET6;
372 netaddr->type.in6 = in6addr_any;
376 isc_netaddr_ismulticast(isc_netaddr_t *na) {
377 switch (na->family) {
379 return (ISC_TF(ISC_IPADDR_ISMULTICAST(na->type.in.s_addr)));
381 return (ISC_TF(IN6_IS_ADDR_MULTICAST(&na->type.in6)));
383 return (ISC_FALSE); /* XXXMLG ? */
388 isc_netaddr_isexperimental(isc_netaddr_t *na) {
389 switch (na->family) {
391 return (ISC_TF(ISC_IPADDR_ISEXPERIMENTAL(na->type.in.s_addr)));
393 return (ISC_FALSE); /* XXXMLG ? */
398 isc_netaddr_islinklocal(isc_netaddr_t *na) {
399 switch (na->family) {
403 return (ISC_TF(IN6_IS_ADDR_LINKLOCAL(&na->type.in6)));
410 isc_netaddr_issitelocal(isc_netaddr_t *na) {
411 switch (na->family) {
415 return (ISC_TF(IN6_IS_ADDR_SITELOCAL(&na->type.in6)));
422 isc_netaddr_fromv4mapped(isc_netaddr_t *t, const isc_netaddr_t *s) {
425 DE_CONST(s, src); /* Must come before IN6_IS_ADDR_V4MAPPED. */
427 REQUIRE(s->family == AF_INET6);
428 REQUIRE(IN6_IS_ADDR_V4MAPPED(&src->type.in6));
430 memset(t, 0, sizeof(*t));
432 memmove(&t->type.in, (char *)&src->type.in6 + 12, 4);