xref: /freebsd/sbin/ifconfig/af_link.c (revision 734e82fe33aa764367791a7d603b383996c6b40b)
1 /*-
2  * SPDX-License-Identifier: BSD-3-Clause
3  *
4  * Copyright (c) 1983, 1993
5  *	The Regents of the University of California.  All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  * 3. Neither the name of the University nor the names of its contributors
16  *    may be used to endorse or promote products derived from this software
17  *    without specific prior written permission.
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29  * SUCH DAMAGE.
30  */
31 
32 #ifndef lint
33 static const char rcsid[] =
34   "$FreeBSD$";
35 #endif /* not lint */
36 
37 #include <sys/types.h>
38 #include <sys/ioctl.h>
39 #include <sys/socket.h>
40 #include <net/if.h>
41 
42 #include <err.h>
43 #include <stdio.h>
44 #include <stdlib.h>
45 #include <string.h>
46 #include <ifaddrs.h>
47 #include <unistd.h>
48 
49 #include <net/if_dl.h>
50 #include <net/if_types.h>
51 #include <net/ethernet.h>
52 
53 #include "ifconfig.h"
54 #include "ifconfig_netlink.h"
55 
56 static struct ifreq link_ridreq;
57 
58 extern char *f_ether;
59 
60 static void
61 print_ether(const struct ether_addr *addr, const char *prefix)
62 {
63 	char *ether_format = ether_ntoa(addr);
64 
65 	if (f_ether != NULL) {
66 		if (strcmp(f_ether, "dash") == 0) {
67 			char *format_char;
68 
69 			while ((format_char = strchr(ether_format, ':')) != NULL) {
70 				*format_char = '-';
71 			}
72 		} else if (strcmp(f_ether, "dotted") == 0) {
73 			/* Indices 0 and 1 is kept as is. */
74 			ether_format[ 2] = ether_format[ 3];
75 			ether_format[ 3] = ether_format[ 4];
76 			ether_format[ 4] = '.';
77 			ether_format[ 5] = ether_format[ 6];
78 			ether_format[ 6] = ether_format[ 7];
79 			ether_format[ 7] = ether_format[ 9];
80 			ether_format[ 8] = ether_format[10];
81 			ether_format[ 9] = '.';
82 			ether_format[10] = ether_format[12];
83 			ether_format[11] = ether_format[13];
84 			ether_format[12] = ether_format[15];
85 			ether_format[13] = ether_format[16];
86 			ether_format[14] = '\0';
87 		}
88 	}
89 	printf("\t%s %s\n", prefix, ether_format);
90 }
91 
92 static void
93 print_lladdr(struct sockaddr_dl *sdl)
94 {
95 	if (match_ether(sdl)) {
96 		print_ether((struct ether_addr *)LLADDR(sdl), "ether");
97 	} else {
98 		int n = sdl->sdl_nlen > 0 ? sdl->sdl_nlen + 1 : 0;
99 		printf("\tlladdr %s\n", link_ntoa(sdl) + n);
100 	}
101 }
102 
103 static void
104 print_pcp(if_ctx *ctx)
105 {
106 	struct ifreq ifr = {};
107 
108 	if (ioctl_ctx_ifr(ctx, SIOCGLANPCP, &ifr) == 0 &&
109 	    ifr.ifr_lan_pcp != IFNET_PCP_NONE)
110 		printf("\tpcp %d\n", ifr.ifr_lan_pcp);
111 }
112 
113 #ifdef WITHOUT_NETLINK
114 static void
115 link_status(if_ctx *ctx, const struct ifaddrs *ifa)
116 {
117 	/* XXX no const 'cuz LLADDR is defined wrong */
118 	struct sockaddr_dl *sdl;
119 	struct ifreq ifr;
120 	int rc, sock_hw;
121 	static const u_char laggaddr[6] = {0};
122 
123 	sdl = satosdl(ifa->ifa_addr);
124 	if (sdl == NULL || sdl->sdl_alen == 0)
125 		return;
126 
127 	print_lladdr(sdl);
128 
129 	/*
130 	 * Best-effort (i.e. failures are silent) to get original
131 	 * hardware address, as read by NIC driver at attach time. Only
132 	 * applies to Ethernet NICs (IFT_ETHER). However, laggX
133 	 * interfaces claim to be IFT_ETHER, and re-type their component
134 	 * Ethernet NICs as IFT_IEEE8023ADLAG. So, check for both. If
135 	 * the MAC is zeroed, then it's actually a lagg.
136 	 */
137 	if ((sdl->sdl_type != IFT_ETHER &&
138 	    sdl->sdl_type != IFT_IEEE8023ADLAG) ||
139 	    sdl->sdl_alen != ETHER_ADDR_LEN)
140 		return;
141 
142 	strncpy(ifr.ifr_name, ifa->ifa_name, sizeof(ifr.ifr_name));
143 	memcpy(&ifr.ifr_addr, ifa->ifa_addr, sizeof(ifa->ifa_addr->sa_len));
144 	ifr.ifr_addr.sa_family = AF_LOCAL;
145 	if ((sock_hw = socket(AF_LOCAL, SOCK_DGRAM, 0)) < 0) {
146 		warn("socket(AF_LOCAL,SOCK_DGRAM)");
147 		return;
148 	}
149 	rc = ioctl(sock_hw, SIOCGHWADDR, &ifr);
150 	close(sock_hw);
151 	if (rc != 0)
152 		return;
153 
154 	/*
155 	 * If this is definitely a lagg device or the hwaddr
156 	 * matches the link addr, don't bother.
157 	 */
158 	if (memcmp(ifr.ifr_addr.sa_data, laggaddr, sdl->sdl_alen) == 0 ||
159 	    memcmp(ifr.ifr_addr.sa_data, LLADDR(sdl), sdl->sdl_alen) == 0)
160 		goto pcp;
161 
162 	print_ether((const struct ether_addr *)&ifr.ifr_addr.sa_data, "hwaddr");
163 pcp:
164 	print_pcp(ctx);
165 }
166 
167 #else
168 static uint8_t
169 convert_iftype(uint8_t iftype)
170 {
171 	switch (iftype) {
172 	case IFT_IEEE8023ADLAG:
173 		return (IFT_ETHER);
174 	case IFT_INFINIBANDLAG:
175 		return (IFT_INFINIBAND);
176 	}
177 	return (iftype);
178 }
179 
180 static void
181 link_status_nl(if_ctx *ctx, if_link_t *link, if_addr_t *ifa __unused)
182 {
183 	if (link->ifla_address != NULL) {
184 		struct sockaddr_dl sdl = {
185 			.sdl_len = sizeof(struct sockaddr_dl),
186 			.sdl_family = AF_LINK,
187 			.sdl_type = convert_iftype(link->ifi_type),
188 			.sdl_alen = NLA_DATA_LEN(link->ifla_address),
189 		};
190 		memcpy(LLADDR(&sdl), NLA_DATA(link->ifla_address), sdl.sdl_alen);
191 		print_lladdr(&sdl);
192 
193 		if (link->iflaf_orig_hwaddr != NULL) {
194 			struct nlattr *hwaddr = link->iflaf_orig_hwaddr;
195 
196 			if (memcmp(NLA_DATA(hwaddr), NLA_DATA(link->ifla_address), sdl.sdl_alen))
197 				print_ether((struct ether_addr *)NLA_DATA(hwaddr), "hwaddr");
198 		}
199 	}
200 	if (convert_iftype(link->ifi_type) == IFT_ETHER)
201 		print_pcp(ctx);
202 }
203 #endif
204 
205 static void
206 link_getaddr(const char *addr, int which)
207 {
208 	char *temp;
209 	struct sockaddr_dl sdl;
210 	struct sockaddr *sa = &link_ridreq.ifr_addr;
211 
212 	if (which != ADDR)
213 		errx(1, "can't set link-level netmask or broadcast");
214 	if (!strcmp(addr, "random")) {
215 		sdl.sdl_len = sizeof(sdl);
216 		sdl.sdl_alen = ETHER_ADDR_LEN;
217 		sdl.sdl_nlen = 0;
218 		sdl.sdl_family = AF_LINK;
219 		arc4random_buf(&sdl.sdl_data, ETHER_ADDR_LEN);
220 		/* Non-multicast and claim it is locally administered. */
221 		sdl.sdl_data[0] &= 0xfc;
222 		sdl.sdl_data[0] |= 0x02;
223 	} else {
224 		if ((temp = malloc(strlen(addr) + 2)) == NULL)
225 			errx(1, "malloc failed");
226 		temp[0] = ':';
227 		strcpy(temp + 1, addr);
228 		sdl.sdl_len = sizeof(sdl);
229 		link_addr(temp, &sdl);
230 		free(temp);
231 	}
232 	if (sdl.sdl_alen > sizeof(sa->sa_data))
233 		errx(1, "malformed link-level address");
234 	sa->sa_family = AF_LINK;
235 	sa->sa_len = sdl.sdl_alen;
236 	bcopy(LLADDR(&sdl), sa->sa_data, sdl.sdl_alen);
237 }
238 
239 static struct afswtch af_link = {
240 	.af_name	= "link",
241 	.af_af		= AF_LINK,
242 #ifdef WITHOUT_NETLINK
243 	.af_status	= link_status,
244 #else
245 	.af_status	= link_status_nl,
246 #endif
247 	.af_getaddr	= link_getaddr,
248 	.af_aifaddr	= SIOCSIFLLADDR,
249 	.af_addreq	= &link_ridreq,
250 	.af_exec	= af_exec_ioctl,
251 };
252 static struct afswtch af_ether = {
253 	.af_name	= "ether",
254 	.af_af		= AF_LINK,
255 #ifdef WITHOUT_NETLINK
256 	.af_status	= link_status,
257 #else
258 	.af_status	= link_status_nl,
259 #endif
260 	.af_getaddr	= link_getaddr,
261 	.af_aifaddr	= SIOCSIFLLADDR,
262 	.af_addreq	= &link_ridreq,
263 	.af_exec	= af_exec_ioctl,
264 };
265 static struct afswtch af_lladdr = {
266 	.af_name	= "lladdr",
267 	.af_af		= AF_LINK,
268 #ifdef WITHOUT_NETLINK
269 	.af_status	= link_status,
270 #else
271 	.af_status	= link_status_nl,
272 #endif
273 	.af_getaddr	= link_getaddr,
274 	.af_aifaddr	= SIOCSIFLLADDR,
275 	.af_addreq	= &link_ridreq,
276 	.af_exec	= af_exec_ioctl,
277 };
278 
279 static __constructor void
280 link_ctor(void)
281 {
282 	af_register(&af_link);
283 	af_register(&af_ether);
284 	af_register(&af_lladdr);
285 }
286