sockaddr_snprintf.c revision 1.3 1 /* $NetBSD: sockaddr_snprintf.c,v 1.3 2004/12/11 06:41:16 christos Exp $ */
2
3 /*-
4 * Copyright (c) 2004 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Christos Zoulas.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. All advertising materials mentioning features or use of this software
19 * must display the following acknowledgement:
20 * This product includes software developed by the NetBSD
21 * Foundation, Inc. and its contributors.
22 * 4. Neither the name of The NetBSD Foundation nor the names of its
23 * contributors may be used to endorse or promote products derived
24 * from this software without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 * POSSIBILITY OF SUCH DAMAGE.
37 */
38 #include <sys/cdefs.h>
39 #if defined(LIBC_SCCS) && !defined(lint)
40 __RCSID("$NetBSD: sockaddr_snprintf.c,v 1.3 2004/12/11 06:41:16 christos Exp $");
41 #endif /* LIBC_SCCS and not lint */
42
43 #include <sys/types.h>
44 #include <sys/socket.h>
45 #include <sys/un.h>
46
47 #include <netinet/in.h>
48 #include <netatalk/at.h>
49 #include <net/if_dl.h>
50
51 #include <stdio.h>
52 #include <string.h>
53 #include <errno.h>
54 #include <util.h>
55 #include <netdb.h>
56
57 int
58 sockaddr_snprintf(char *buf, size_t len, const char *fmt,
59 const struct sockaddr *sa)
60 {
61 const void *a = NULL;
62 char abuf[1024], nbuf[1024], *addr, *w;
63 char *ebuf = &buf[len - 1], *sbuf = buf;
64 const char *ptr, *s;
65 in_port_t p = (in_port_t)~0;
66 const struct sockaddr_at *sat = NULL;
67 const struct sockaddr_in *sin4 = NULL;
68 const struct sockaddr_in6 *sin6 = NULL;
69 const struct sockaddr_un *sun = NULL;
70 const struct sockaddr_dl *sdl = NULL;
71
72 #define ADDC(c) if (buf < ebuf) *buf++ = c; else buf++
73 #define ADDN() if (buf < ebuf) *buf++ = '\0'; else buf[len - 1] = '\0'
74 #define ADDS(p) for (s = p; *s; s++) ADDC(*s)
75 #define ADDNA() ADDS("N/A")
76
77 switch (sa->sa_family) {
78 case AF_UNSPEC:
79 goto done;
80 case AF_APPLETALK:
81 sat = ((const struct sockaddr_at *)(const void *)sa);
82 p = ntohs(sat->sat_port);
83 (void)snprintf(addr = abuf, sizeof(abuf), "%u.%u",
84 ntohs(sat->sat_addr.s_net), sat->sat_addr.s_node);
85 break;
86 case AF_LOCAL:
87 sun = ((const struct sockaddr_un *)(const void *)sa);
88 (void)strlcpy(addr = abuf, sun->sun_path, SUN_LEN(sun));
89 break;
90 case AF_INET:
91 sin4 = ((const struct sockaddr_in *)(const void *)sa);
92 p = ntohs(sin4->sin_port);
93 a = &sin4->sin_addr;
94 break;
95 case AF_INET6:
96 sin6 = ((const struct sockaddr_in6 *)(const void *)sa);
97 p = ntohs(sin6->sin6_port);
98 a = &sin6->sin6_addr;
99 break;
100 case AF_LINK:
101 sdl = ((const struct sockaddr_dl *)(const void *)sa);
102 (void)strlcpy(addr = abuf, link_ntoa(sdl), sizeof(abuf));
103 if ((w = strchr(addr, ':')) != 0) {
104 *w++ = '\0';
105 addr = w;
106
107 }
108 break;
109 default:
110 errno = EAFNOSUPPORT;
111 return -1;
112 }
113
114 if (a && getnameinfo(sa, (socklen_t)sa->sa_len, addr = abuf,
115 sizeof(abuf), NULL, 0, NI_NUMERICHOST|NI_NUMERICSERV) != 0)
116 return -1;
117
118 for (ptr = fmt; *ptr; ptr++) {
119 if (*ptr != '%') {
120 ADDC(*ptr);
121 continue;
122 }
123 switch (*++ptr) {
124 case '\0':
125 ADDC('%');
126 goto done;
127 case 'a':
128 ADDS(addr);
129 break;
130 case 'p':
131 if (p != (in_port_t)~0) {
132 (void)snprintf(nbuf, sizeof(nbuf), "%d", p);
133 ADDS(nbuf);
134 } else {
135 ADDNA();
136 }
137 break;
138 case 'f':
139 (void)snprintf(nbuf, sizeof(nbuf), "%d", sa->sa_family);
140 ADDS(nbuf);
141 break;
142 case 'l':
143 (void)snprintf(nbuf, sizeof(nbuf), "%d", sa->sa_len);
144 ADDS(nbuf);
145 break;
146 case 'I':
147 if (sdl && addr != abuf) {
148 ADDS(abuf);
149 } else {
150 ADDNA();
151 }
152 break;
153 case 'F':
154 if (sin6) {
155 (void)snprintf(nbuf, sizeof(nbuf), "%d",
156 sin6->sin6_flowinfo);
157 ADDS(nbuf);
158 break;
159 } else {
160 ADDNA();
161 }
162 break;
163 case 'S':
164 if (sin6) {
165 (void)snprintf(nbuf, sizeof(nbuf), "%d",
166 sin6->sin6_scope_id);
167 ADDS(nbuf);
168 break;
169 } else {
170 ADDNA();
171 }
172 break;
173 case 'R':
174 if (sat) {
175 const struct netrange *n =
176 &sat->sat_range.r_netrange;
177 (void)snprintf(nbuf, sizeof(nbuf),
178 "%d:[%d,%d]", n->nr_phase , n->nr_firstnet,
179 n->nr_lastnet);
180 ADDS(nbuf);
181 } else {
182 ADDNA();
183 }
184 break;
185 default:
186 ADDC('%');
187 ADDC(*ptr);
188 break;
189 }
190 }
191 done:
192 ADDN();
193 return buf - sbuf;
194 }
195