Annotation of embedaddon/rsync/lib/inet_ntop.c, revision 1.1
1.1 ! misho 1: /*
! 2: * Copyright (C) 1996-2001 Internet Software Consortium.
! 3: *
! 4: * Permission to use, copy, modify, and distribute this software for any
! 5: * purpose with or without fee is hereby granted, provided that the above
! 6: * copyright notice and this permission notice appear in all copies.
! 7: *
! 8: * THE SOFTWARE IS PROVIDED "AS IS" AND INTERNET SOFTWARE CONSORTIUM
! 9: * DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL
! 10: * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL
! 11: * INTERNET SOFTWARE CONSORTIUM BE LIABLE FOR ANY SPECIAL, DIRECT,
! 12: * INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING
! 13: * FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT,
! 14: * NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION
! 15: * WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
! 16: */
! 17:
! 18:
! 19: #include "rsync.h"
! 20:
! 21: #define NS_INT16SZ 2
! 22: #define NS_IN6ADDRSZ 16
! 23:
! 24: /*
! 25: * WARNING: Don't even consider trying to compile this on a system where
! 26: * sizeof(int) < 4. sizeof(int) > 4 is fine; all the world's not a VAX.
! 27: */
! 28:
! 29: static const char *inet_ntop4(const unsigned char *src, char *dst,
! 30: size_t size);
! 31:
! 32: #ifdef AF_INET6
! 33: static const char *inet_ntop6(const unsigned char *src, char *dst,
! 34: size_t size);
! 35: #endif
! 36:
! 37: /* char *
! 38: * isc_net_ntop(af, src, dst, size)
! 39: * convert a network format address to presentation format.
! 40: * return:
! 41: * pointer to presentation format address (`dst'), or NULL (see errno).
! 42: * author:
! 43: * Paul Vixie, 1996.
! 44: */
! 45: const char *
! 46: inet_ntop(int af, const void *src, char *dst, size_t size)
! 47: {
! 48: switch (af) {
! 49: case AF_INET:
! 50: return (inet_ntop4(src, dst, size));
! 51: #ifdef AF_INET6
! 52: case AF_INET6:
! 53: return (inet_ntop6(src, dst, size));
! 54: #endif
! 55: default:
! 56: errno = EAFNOSUPPORT;
! 57: return (NULL);
! 58: }
! 59: /* NOTREACHED */
! 60: }
! 61:
! 62: /* const char *
! 63: * inet_ntop4(src, dst, size)
! 64: * format an IPv4 address
! 65: * return:
! 66: * `dst' (as a const)
! 67: * notes:
! 68: * (1) uses no statics
! 69: * (2) takes a unsigned char* not an in_addr as input
! 70: * author:
! 71: * Paul Vixie, 1996.
! 72: */
! 73: static const char *
! 74: inet_ntop4(const unsigned char *src, char *dst, size_t size)
! 75: {
! 76: static const char *fmt = "%u.%u.%u.%u";
! 77: char tmp[sizeof "255.255.255.255"];
! 78: size_t len;
! 79:
! 80: len = snprintf(tmp, sizeof tmp, fmt, src[0], src[1], src[2], src[3]);
! 81: if (len >= size) {
! 82: errno = ENOSPC;
! 83: return (NULL);
! 84: }
! 85: memcpy(dst, tmp, len + 1);
! 86:
! 87: return (dst);
! 88: }
! 89:
! 90: /* const char *
! 91: * isc_inet_ntop6(src, dst, size)
! 92: * convert IPv6 binary address into presentation (printable) format
! 93: * author:
! 94: * Paul Vixie, 1996.
! 95: */
! 96: #ifdef AF_INET6
! 97: static const char *
! 98: inet_ntop6(const unsigned char *src, char *dst, size_t size)
! 99: {
! 100: /*
! 101: * Note that int32_t and int16_t need only be "at least" large enough
! 102: * to contain a value of the specified size. On some systems, like
! 103: * Crays, there is no such thing as an integer variable with 16 bits.
! 104: * Keep this in mind if you think this function should have been coded
! 105: * to use pointer overlays. All the world's not a VAX.
! 106: */
! 107: char tmp[sizeof "ffff:ffff:ffff:ffff:ffff:ffff:255.255.255.255"], *tp;
! 108: struct { int base, len; } best, cur;
! 109: unsigned int words[NS_IN6ADDRSZ / NS_INT16SZ];
! 110: int i, inc;
! 111:
! 112: /*
! 113: * Preprocess:
! 114: * Copy the input (bytewise) array into a wordwise array.
! 115: * Find the longest run of 0x00's in src[] for :: shorthanding.
! 116: */
! 117: memset(words, '\0', sizeof words);
! 118: for (i = 0; i < NS_IN6ADDRSZ; i++)
! 119: words[i / 2] |= (src[i] << ((1 - (i % 2)) << 3));
! 120: best.base = -1;
! 121: cur.base = -1;
! 122: for (i = 0; i < (NS_IN6ADDRSZ / NS_INT16SZ); i++) {
! 123: if (words[i] == 0) {
! 124: if (cur.base == -1)
! 125: cur.base = i, cur.len = 1;
! 126: else
! 127: cur.len++;
! 128: } else {
! 129: if (cur.base != -1) {
! 130: if (best.base == -1 || cur.len > best.len)
! 131: best = cur;
! 132: cur.base = -1;
! 133: }
! 134: }
! 135: }
! 136: if (cur.base != -1) {
! 137: if (best.base == -1 || cur.len > best.len)
! 138: best = cur;
! 139: }
! 140: if (best.base != -1 && best.len < 2)
! 141: best.base = -1;
! 142:
! 143: /*
! 144: * Format the result.
! 145: */
! 146: tp = tmp;
! 147: for (i = 0; i < (NS_IN6ADDRSZ / NS_INT16SZ); i++) {
! 148: /* Are we inside the best run of 0x00's? */
! 149: if (best.base != -1 && i >= best.base &&
! 150: i < (best.base + best.len)) {
! 151: if (i == best.base)
! 152: *tp++ = ':';
! 153: continue;
! 154: }
! 155: /* Are we following an initial run of 0x00s or any real hex? */
! 156: if (i != 0)
! 157: *tp++ = ':';
! 158: /* Is this address an encapsulated IPv4? */
! 159: if (i == 6 && best.base == 0 &&
! 160: (best.len == 6 || (best.len == 5 && words[5] == 0xffff))) {
! 161: if (!inet_ntop4(src+12, tp, sizeof tmp - (tp - tmp)))
! 162: return (NULL);
! 163: tp += strlen(tp);
! 164: break;
! 165: }
! 166: inc = snprintf(tp, 5, "%x", words[i]);
! 167: assert(inc < 5);
! 168: tp += inc;
! 169: }
! 170: /* Was it a trailing run of 0x00's? */
! 171: if (best.base != -1 && (best.base + best.len) ==
! 172: (NS_IN6ADDRSZ / NS_INT16SZ))
! 173: *tp++ = ':';
! 174: *tp++ = '\0';
! 175:
! 176: /*
! 177: * Check for overflow, copy, and we're done.
! 178: */
! 179: if ((size_t)(tp - tmp) > size) {
! 180: errno = ENOSPC;
! 181: return (NULL);
! 182: }
! 183: memcpy(dst, tmp, tp - tmp);
! 184: return (dst);
! 185: }
! 186: #endif /* AF_INET6 */
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>