packaging: Add missing quotes in smbprint
[Samba.git] / lib / replace / inet_ntop.c
blobd6d4158d97543fde6acbfaeed754f3bb1c68bed0
1 /*
2 * Copyright (C) 1996-2001 Internet Software Consortium.
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.
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.
19 #include "replace.h"
20 #include "system/network.h"
22 #define NS_INT16SZ 2
23 #define NS_IN6ADDRSZ 16
26 * WARNING: Don't even consider trying to compile this on a system where
27 * sizeof(int) < 4. sizeof(int) > 4 is fine; all the world's not a VAX.
30 static const char *inet_ntop4(const unsigned char *src, char *dst,
31 socklen_t size);
33 #ifdef AF_INET6
34 static const char *inet_ntop6(const unsigned char *src, char *dst,
35 socklen_t size);
36 #endif
38 /* char *
39 * isc_net_ntop(af, src, dst, size)
40 * convert a network format address to presentation format.
41 * return:
42 * pointer to presentation format address (`dst'), or NULL (see errno).
43 * author:
44 * Paul Vixie, 1996.
46 const char *
47 rep_inet_ntop(int af, const void *src, char *dst, socklen_t size)
49 switch (af) {
50 case AF_INET:
51 return (inet_ntop4(src, dst, size));
52 #ifdef AF_INET6
53 case AF_INET6:
54 return (inet_ntop6(src, dst, size));
55 #endif
56 default:
57 errno = EAFNOSUPPORT;
58 return (NULL);
60 /* NOTREACHED */
63 /* const char *
64 * inet_ntop4(src, dst, size)
65 * format an IPv4 address
66 * return:
67 * `dst' (as a const)
68 * author:
69 * Paul Vixie, 1996.
71 static const char *
72 inet_ntop4(const unsigned char *src, char *dst, socklen_t size)
74 char tmp[sizeof("255.255.255.255")];
75 size_t len;
77 len = snprintf(tmp,
78 sizeof(tmp),
79 "%hhu.%hhu.%hhu.%hhu",
80 src[0],
81 src[1],
82 src[2],
83 src[3]);
84 if (len >= size) {
85 errno = ENOSPC;
86 return (NULL);
88 memcpy(dst, tmp, len + 1);
90 return (dst);
93 /* const char *
94 * isc_inet_ntop6(src, dst, size)
95 * convert IPv6 binary address into presentation (printable) format
96 * author:
97 * Paul Vixie, 1996.
99 #ifdef AF_INET6
100 static const char *
101 inet_ntop6(const unsigned char *src, char *dst, socklen_t size)
104 * Note that int32_t and int16_t need only be "at least" large enough
105 * to contain a value of the specified size. On some systems, like
106 * Crays, there is no such thing as an integer variable with 16 bits.
107 * Keep this in mind if you think this function should have been coded
108 * to use pointer overlays. All the world's not a VAX.
110 char tmp[sizeof "ffff:ffff:ffff:ffff:ffff:ffff:255.255.255.255"], *tp;
111 struct { int base, len; } best, cur;
112 unsigned int words[NS_IN6ADDRSZ / NS_INT16SZ];
113 int i, inc;
116 * Preprocess:
117 * Copy the input (bytewise) array into a wordwise array.
118 * Find the longest run of 0x00's in src[] for :: shorthanding.
120 memset(words, '\0', sizeof words);
121 for (i = 0; i < NS_IN6ADDRSZ; i++)
122 words[i / 2] |= (src[i] << ((1 - (i % 2)) << 3));
123 best.base = -1;
124 best.len = 0;
125 cur.base = -1;
126 cur.len = 0;
127 for (i = 0; i < (NS_IN6ADDRSZ / NS_INT16SZ); i++) {
128 if (words[i] == 0) {
129 if (cur.base == -1)
130 cur.base = i, cur.len = 1;
131 else
132 cur.len++;
133 } else {
134 if (cur.base != -1) {
135 if (best.base == -1 || cur.len > best.len)
136 best = cur;
137 cur.base = -1;
141 if (cur.base != -1) {
142 if (best.base == -1 || cur.len > best.len)
143 best = cur;
145 if (best.base != -1 && best.len < 2)
146 best.base = -1;
149 * Format the result.
151 tp = tmp;
152 for (i = 0; i < (NS_IN6ADDRSZ / NS_INT16SZ); i++) {
153 /* Are we inside the best run of 0x00's? */
154 if (best.base != -1 && i >= best.base &&
155 i < (best.base + best.len)) {
156 if (i == best.base)
157 *tp++ = ':';
158 continue;
160 /* Are we following an initial run of 0x00s or any real hex? */
161 if (i != 0)
162 *tp++ = ':';
163 /* Is this address an encapsulated IPv4? */
164 if (i == 6 && best.base == 0 &&
165 (best.len == 6 || (best.len == 5 && words[5] == 0xffff))) {
166 if (!inet_ntop4(src+12, tp, sizeof tmp - (tp - tmp)))
167 return (NULL);
168 tp += strlen(tp);
169 break;
171 inc = snprintf(tp, 5, "%x", words[i]);
172 if (inc >= 5) {
173 abort();
175 tp += inc;
177 /* Was it a trailing run of 0x00's? */
178 if (best.base != -1 && (best.base + best.len) ==
179 (NS_IN6ADDRSZ / NS_INT16SZ))
180 *tp++ = ':';
181 *tp++ = '\0';
184 * Check for overflow, copy, and we're done.
186 if ((size_t)(tp - tmp) > size) {
187 errno = ENOSPC;
188 return (NULL);
190 memcpy(dst, tmp, tp - tmp);
191 return (dst);
193 #endif /* AF_INET6 */