xref: /haiku/src/libs/compat/freebsd_network/fbsd_if_media.c (revision 3be9edf8da228afd9fec0390f408c964766122aa)
1 /*	$NetBSD: if_media.c,v 1.1 1997/03/17 02:55:15 thorpej Exp $	*/
2 /* $FreeBSD: src/sys/net/if_media.c,v 1.21.2.1 2006/03/17 20:17:43 glebius Exp $ */
3 
4 /*-
5  * Copyright (c) 1997
6  *	Jonathan Stone and Jason R. Thorpe.  All rights reserved.
7  *
8  * This software is derived from information provided by Matt Thomas.
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 Jonathan Stone
21  *	and Jason R. Thorpe for the NetBSD Project.
22  * 4. The names of the authors may not be used to endorse or promote products
23  *    derived from this software without specific prior written permission.
24  *
25  * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR
26  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
27  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
28  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
29  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
30  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
31  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
32  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
33  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
34  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
35  * SUCH DAMAGE.
36  */
37 
38 /*
39  * BSD/OS-compatible network interface media selection.
40  *
41  * Where it is safe to do so, this code strays slightly from the BSD/OS
42  * design.  Software which uses the API (device drivers, basically)
43  * shouldn't notice any difference.
44  *
45  * Many thanks to Matt Thomas for providing the information necessary
46  * to implement this interface.
47  */
48 #include <string.h>
49 
50 #include <sys/param.h>
51 #include <sys/systm.h>
52 #include <sys/socket.h>
53 #include <sys/sockio.h>
54 #include <sys/malloc.h>
55 #include <sys/sysctl.h>
56 
57 #include <net/if.h>
58 #include <net/if_media.h>
59 
60 /*
61  * Compile-time options:
62  * IFMEDIA_DEBUG:
63  *	turn on implementation-level debug printfs.
64  * 	Useful for debugging newly-ported  drivers.
65  */
66 
67 #define IFMEDIA_DEBUG
68 
69 static struct ifmedia_entry *ifmedia_match(struct ifmedia *ifm,
70     int flags, int mask);
71 
72 #ifdef IFMEDIA_DEBUG
73 int	ifmedia_debug = 1;
74 static	void ifmedia_printword(int);
75 #endif
76 
77 /*
78  * Initialize if_media struct for a specific interface instance.
79  */
80 void
81 ifmedia_init(ifm, dontcare_mask, change_callback, status_callback)
82 	struct ifmedia *ifm;
83 	int dontcare_mask;
84 	ifm_change_cb_t change_callback;
85 	ifm_stat_cb_t status_callback;
86 {
87 
88 	LIST_INIT(&ifm->ifm_list);
89 	ifm->ifm_cur = NULL;
90 	ifm->ifm_media = 0;
91 	ifm->ifm_mask = dontcare_mask;		/* IF don't-care bits */
92 	ifm->ifm_change = change_callback;
93 	ifm->ifm_status = status_callback;
94 }
95 
96 void
97 ifmedia_removeall(ifm)
98 	struct ifmedia *ifm;
99 {
100 	struct ifmedia_entry *entry;
101 
102 	for (entry = LIST_FIRST(&ifm->ifm_list); entry;
103 	     entry = LIST_FIRST(&ifm->ifm_list)) {
104 		LIST_REMOVE(entry, ifm_list);
105 		kernel_free(entry, M_IFADDR);
106 	}
107 }
108 
109 /*
110  * Add a media configuration to the list of supported media
111  * for a specific interface instance.
112  */
113 void
114 ifmedia_add(ifm, mword, data, aux)
115 	struct ifmedia *ifm;
116 	int mword;
117 	int data;
118 	void *aux;
119 {
120 	register struct ifmedia_entry *entry;
121 
122 #ifdef IFMEDIA_DEBUG
123 	if (ifmedia_debug) {
124 		if (ifm == NULL) {
125 			printf("ifmedia_add: null ifm\n");
126 			return;
127 		}
128 		printf("Adding entry for ");
129 		ifmedia_printword(mword);
130 	}
131 #endif
132 
133 	entry = kernel_malloc(sizeof(*entry), M_IFADDR, M_NOWAIT);
134 	if (entry == NULL)
135 		panic("ifmedia_add: can't malloc entry");
136 
137 	entry->ifm_media = mword;
138 	entry->ifm_data = data;
139 	entry->ifm_aux = aux;
140 
141 	LIST_INSERT_HEAD(&ifm->ifm_list, entry, ifm_list);
142 }
143 
144 /*
145  * Add an array of media configurations to the list of
146  * supported media for a specific interface instance.
147  */
148 void
149 ifmedia_list_add(ifm, lp, count)
150 	struct ifmedia *ifm;
151 	struct ifmedia_entry *lp;
152 	int count;
153 {
154 	int i;
155 
156 	for (i = 0; i < count; i++)
157 		ifmedia_add(ifm, lp[i].ifm_media, lp[i].ifm_data,
158 		    lp[i].ifm_aux);
159 }
160 
161 /*
162  * Set the default active media.
163  *
164  * Called by device-specific code which is assumed to have already
165  * selected the default media in hardware.  We do _not_ call the
166  * media-change callback.
167  */
168 void
169 ifmedia_set(ifm, target)
170 	struct ifmedia *ifm;
171 	int target;
172 
173 {
174 	struct ifmedia_entry *match;
175 
176 	match = ifmedia_match(ifm, target, ifm->ifm_mask);
177 
178 	if (match == NULL) {
179 		printf("ifmedia_set: no match for 0x%x/0x%x\n",
180 		    target, ~ifm->ifm_mask);
181 		panic("ifmedia_set");
182 	}
183 	ifm->ifm_cur = match;
184 
185 #ifdef IFMEDIA_DEBUG
186 	if (ifmedia_debug) {
187 		printf("ifmedia_set: target ");
188 		ifmedia_printword(target);
189 		printf("ifmedia_set: setting to ");
190 		ifmedia_printword(ifm->ifm_cur->ifm_media);
191 	}
192 #endif
193 }
194 
195 /*
196  * Device-independent media ioctl support function.
197  */
198 int
199 ifmedia_ioctl(ifp, ifr, ifm, cmd)
200 	struct ifnet *ifp;
201 	struct ifreq *ifr;
202 	struct ifmedia *ifm;
203 	u_long cmd;
204 {
205 	struct ifmedia_entry *match;
206 	struct ifmediareq *ifmr = (struct ifmediareq *) ifr;
207 	int error = 0, sticky;
208 
209 	if (ifp == NULL || ifr == NULL || ifm == NULL)
210 		return(EINVAL);
211 
212 	switch (cmd) {
213 
214 	/*
215 	 * Set the current media.
216 	 */
217 	case  SIOCSIFMEDIA:
218 	{
219 		struct ifmedia_entry *oldentry;
220 		int oldmedia;
221 		int newmedia = ifr->ifr_media;
222 
223 		match = ifmedia_match(ifm, newmedia, ifm->ifm_mask);
224 		if (match == NULL) {
225 #ifdef IFMEDIA_DEBUG
226 			if (ifmedia_debug) {
227 				printf(
228 				    "ifmedia_ioctl: no media found for 0x%x\n",
229 				    newmedia);
230 			}
231 #endif
232 			return (ENXIO);
233 		}
234 
235 		/*
236 		 * If no change, we're done.
237 		 * XXX Automedia may invole software intervention.
238 		 *     Keep going in case the the connected media changed.
239 		 *     Similarly, if best match changed (kernel debugger?).
240 		 */
241 		if ((IFM_SUBTYPE(newmedia) != IFM_AUTO) &&
242 		    (newmedia == ifm->ifm_media) &&
243 		    (match == ifm->ifm_cur))
244 			return 0;
245 
246 		/*
247 		 * We found a match, now make the driver switch to it.
248 		 * Make sure to preserve our old media type in case the
249 		 * driver can't switch.
250 		 */
251 #ifdef IFMEDIA_DEBUG
252 		if (ifmedia_debug) {
253 			printf("ifmedia_ioctl: switching %s to ",
254 			    ifp->if_xname);
255 			ifmedia_printword(match->ifm_media);
256 		}
257 #endif
258 		oldentry = ifm->ifm_cur;
259 		oldmedia = ifm->ifm_media;
260 		ifm->ifm_cur = match;
261 		ifm->ifm_media = newmedia;
262 		error = (*ifm->ifm_change)(ifp);
263 		if (error) {
264 			ifm->ifm_cur = oldentry;
265 			ifm->ifm_media = oldmedia;
266 		}
267 		break;
268 	}
269 
270 	/*
271 	 * Get list of available media and current media on interface.
272 	 */
273 	case  SIOCGIFMEDIA:
274 	{
275 		struct ifmedia_entry *ep;
276 		int *kptr, count;
277 		int usermax;	/* user requested max */
278 
279 		kptr = NULL;		/* XXX gcc */
280 
281 		ifmr->ifm_active = ifmr->ifm_current = ifm->ifm_cur ?
282 		    ifm->ifm_cur->ifm_media : IFM_NONE;
283 		ifmr->ifm_mask = ifm->ifm_mask;
284 		ifmr->ifm_status = 0;
285 		(*ifm->ifm_status)(ifp, ifmr);
286 
287 		count = 0;
288 		usermax = 0;
289 
290 		/*
291 		 * If there are more interfaces on the list, count
292 		 * them.  This allows the caller to set ifmr->ifm_count
293 		 * to 0 on the first call to know how much space to
294 		 * allocate.
295 		 */
296 		LIST_FOREACH(ep, &ifm->ifm_list, ifm_list)
297 			usermax++;
298 
299 		/*
300 		 * Don't allow the user to ask for too many
301 		 * or a negative number.
302 		 */
303 		if (ifmr->ifm_count > usermax)
304 			ifmr->ifm_count = usermax;
305 		else if (ifmr->ifm_count < 0)
306 			return (EINVAL);
307 
308 		if (ifmr->ifm_count != 0) {
309 			kptr = (int *)kernel_malloc(ifmr->ifm_count * sizeof(int),
310 			    M_TEMP, M_NOWAIT);
311 
312 			if (kptr == NULL)
313 				return (ENOMEM);
314 			/*
315 			 * Get the media words from the interface's list.
316 			 */
317 			ep = LIST_FIRST(&ifm->ifm_list);
318 			for (; ep != NULL && count < ifmr->ifm_count;
319 			    ep = LIST_NEXT(ep, ifm_list), count++)
320 				kptr[count] = ep->ifm_media;
321 
322 			if (ep != NULL)
323 				error = E2BIG;	/* oops! */
324 		} else {
325 			count = usermax;
326 		}
327 
328 		/*
329 		 * We do the copyout on E2BIG, because that's
330 		 * just our way of telling userland that there
331 		 * are more.  This is the behavior I've observed
332 		 * under BSD/OS 3.0
333 		 */
334 		sticky = error;
335 		if ((error == 0 || error == E2BIG) && ifmr->ifm_count != 0) {
336 #if 0
337 			error = copyout((caddr_t)kptr,
338 			    (caddr_t)ifmr->ifm_ulist,
339 			    ifmr->ifm_count * sizeof(int));
340 #endif
341 			/* this ioctl() is only called from within the kernel -hugo */
342 			memcpy(kptr, ifmr->ifm_ulist, ifmr->ifm_count * sizeof(int));
343 		}
344 
345 		if (error == 0)
346 			error = sticky;
347 
348 		if (ifmr->ifm_count != 0)
349 			kernel_free(kptr, M_TEMP);
350 
351 		ifmr->ifm_count = count;
352 		break;
353 	}
354 
355 	default:
356 		return (EINVAL);
357 	}
358 
359 	return (error);
360 }
361 
362 /*
363  * Find media entry matching a given ifm word.
364  *
365  */
366 static struct ifmedia_entry *
367 ifmedia_match(ifm, target, mask)
368 	struct ifmedia *ifm;
369 	int target;
370 	int mask;
371 {
372 	struct ifmedia_entry *match, *next;
373 
374 	match = NULL;
375 	mask = ~mask;
376 
377 	LIST_FOREACH(next, &ifm->ifm_list, ifm_list) {
378 		if ((next->ifm_media & mask) == (target & mask)) {
379 #if defined(IFMEDIA_DEBUG) || defined(DIAGNOSTIC)
380 			if (match) {
381 				printf("ifmedia_match: multiple match for "
382 				    "0x%x/0x%x\n", target, mask);
383 			}
384 #endif
385 			match = next;
386 		}
387 	}
388 
389 	return match;
390 }
391 
392 /*
393  * Compute the interface `baudrate' from the media, for the interface
394  * metrics (used by routing daemons).
395  */
396 static const struct ifmedia_baudrate ifmedia_baudrate_descriptions[] =
397     IFM_BAUDRATE_DESCRIPTIONS;
398 
399 uint64_t
400 ifmedia_baudrate(int mword)
401 {
402 	int i;
403 
404 	for (i = 0; ifmedia_baudrate_descriptions[i].ifmb_word != 0; i++) {
405 		if ((mword & (IFM_NMASK|IFM_TMASK)) ==
406 		    ifmedia_baudrate_descriptions[i].ifmb_word)
407 			return (ifmedia_baudrate_descriptions[i].ifmb_baudrate);
408 	}
409 
410 	/* Not known. */
411 	return (0);
412 }
413 
414 #ifdef IFMEDIA_DEBUG
415 struct ifmedia_description ifm_type_descriptions[] =
416     IFM_TYPE_DESCRIPTIONS;
417 
418 struct ifmedia_description ifm_subtype_ethernet_descriptions[] =
419     IFM_SUBTYPE_ETHERNET_DESCRIPTIONS;
420 
421 struct ifmedia_description ifm_subtype_ethernet_option_descriptions[] =
422     IFM_SUBTYPE_ETHERNET_OPTION_DESCRIPTIONS;
423 
424 struct ifmedia_description ifm_subtype_tokenring_descriptions[] =
425     IFM_SUBTYPE_TOKENRING_DESCRIPTIONS;
426 
427 struct ifmedia_description ifm_subtype_tokenring_option_descriptions[] =
428     IFM_SUBTYPE_TOKENRING_OPTION_DESCRIPTIONS;
429 
430 struct ifmedia_description ifm_subtype_fddi_descriptions[] =
431     IFM_SUBTYPE_FDDI_DESCRIPTIONS;
432 
433 struct ifmedia_description ifm_subtype_fddi_option_descriptions[] =
434     IFM_SUBTYPE_FDDI_OPTION_DESCRIPTIONS;
435 
436 struct ifmedia_description ifm_subtype_ieee80211_descriptions[] =
437     IFM_SUBTYPE_IEEE80211_DESCRIPTIONS;
438 
439 struct ifmedia_description ifm_subtype_ieee80211_option_descriptions[] =
440     IFM_SUBTYPE_IEEE80211_OPTION_DESCRIPTIONS;
441 
442 struct ifmedia_description ifm_subtype_ieee80211_mode_descriptions[] =
443     IFM_SUBTYPE_IEEE80211_MODE_DESCRIPTIONS;
444 
445 struct ifmedia_description ifm_subtype_atm_descriptions[] =
446     IFM_SUBTYPE_ATM_DESCRIPTIONS;
447 
448 struct ifmedia_description ifm_subtype_atm_option_descriptions[] =
449     IFM_SUBTYPE_ATM_OPTION_DESCRIPTIONS;
450 
451 struct ifmedia_description ifm_subtype_shared_descriptions[] =
452     IFM_SUBTYPE_SHARED_DESCRIPTIONS;
453 
454 struct ifmedia_description ifm_shared_option_descriptions[] =
455     IFM_SHARED_OPTION_DESCRIPTIONS;
456 
457 struct ifmedia_type_to_subtype {
458 	struct ifmedia_description *subtypes;
459 	struct ifmedia_description *options;
460 	struct ifmedia_description *modes;
461 };
462 
463 /* must be in the same order as IFM_TYPE_DESCRIPTIONS */
464 struct ifmedia_type_to_subtype ifmedia_types_to_subtypes[] = {
465 	{
466 	  &ifm_subtype_ethernet_descriptions[0],
467 	  &ifm_subtype_ethernet_option_descriptions[0],
468 	  NULL,
469 	},
470 	{
471 	  &ifm_subtype_tokenring_descriptions[0],
472 	  &ifm_subtype_tokenring_option_descriptions[0],
473 	  NULL,
474 	},
475 	{
476 	  &ifm_subtype_fddi_descriptions[0],
477 	  &ifm_subtype_fddi_option_descriptions[0],
478 	  NULL,
479 	},
480 	{
481 	  &ifm_subtype_ieee80211_descriptions[0],
482 	  &ifm_subtype_ieee80211_option_descriptions[0],
483 	  &ifm_subtype_ieee80211_mode_descriptions[0]
484 	},
485 	{
486 	  &ifm_subtype_atm_descriptions[0],
487 	  &ifm_subtype_atm_option_descriptions[0],
488 	  NULL,
489 	},
490 };
491 
492 /*
493  * print a media word.
494  */
495 static void
496 ifmedia_printword(ifmw)
497 	int ifmw;
498 {
499 	struct ifmedia_description *desc;
500 	struct ifmedia_type_to_subtype *ttos;
501 	int seen_option = 0;
502 
503 	/* Find the top-level interface type. */
504 	for (desc = ifm_type_descriptions, ttos = ifmedia_types_to_subtypes;
505 	    desc->ifmt_string != NULL; desc++, ttos++)
506 		if (IFM_TYPE(ifmw) == desc->ifmt_word)
507 			break;
508 	if (desc->ifmt_string == NULL) {
509 		printf("<unknown type>\n");
510 		return;
511 	}
512 	printf(desc->ifmt_string);
513 
514 	/* Any mode. */
515 	for (desc = ttos->modes; desc && desc->ifmt_string != NULL; desc++)
516 		if (IFM_MODE(ifmw) == desc->ifmt_word) {
517 			if (desc->ifmt_string != NULL)
518 				printf(" mode %s", desc->ifmt_string);
519 			break;
520 		}
521 
522 	/*
523 	 * Check for the shared subtype descriptions first, then the
524 	 * type-specific ones.
525 	 */
526 	for (desc = ifm_subtype_shared_descriptions;
527 	    desc->ifmt_string != NULL; desc++)
528 		if (IFM_SUBTYPE(ifmw) == desc->ifmt_word)
529 			goto got_subtype;
530 
531 	for (desc = ttos->subtypes; desc->ifmt_string != NULL; desc++)
532 		if (IFM_SUBTYPE(ifmw) == desc->ifmt_word)
533 			break;
534 	if (desc->ifmt_string == NULL) {
535 		printf(" <unknown subtype>\n");
536 		return;
537 	}
538 
539  got_subtype:
540 	printf(" %s", desc->ifmt_string);
541 
542 	/*
543 	 * Look for shared options.
544 	 */
545 	for (desc = ifm_shared_option_descriptions;
546 	    desc->ifmt_string != NULL; desc++) {
547 		if (ifmw & desc->ifmt_word) {
548 			if (seen_option == 0)
549 				printf(" <");
550 			printf("%s%s", seen_option++ ? "," : "",
551 			    desc->ifmt_string);
552 		}
553 	}
554 
555 	/*
556 	 * Look for subtype-specific options.
557 	 */
558 	for (desc = ttos->options; desc->ifmt_string != NULL; desc++) {
559 		if (ifmw & desc->ifmt_word) {
560 			if (seen_option == 0)
561 				printf(" <");
562 			printf("%s%s", seen_option++ ? "," : "",
563 			    desc->ifmt_string);
564 		}
565 	}
566 	printf("%s\n", seen_option ? ">" : "");
567 }
568 #endif /* IFMEDIA_DEBUG */
569