2 * Copyright (c) 2007 Bruce M. Simpson.
3 * Copyright (c) 2005 Robert N. M. Watson.
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 * 3. The name of the author may not be used to endorse or promote
15 * products derived from this software without specific prior written
18 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
19 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
20 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
21 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
22 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
23 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
24 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
25 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
26 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
27 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 * IPv4 multicast socket, group, and socket option processing module.
33 * Until further notice, this file requires INET to compile.
34 * TODO: Make this infrastructure independent of address family.
35 * TODO: Teach netinet6 to use this code.
36 * TODO: Hook up SSM logic to IGMPv3/MLDv2.
39 #include <sys/cdefs.h>
40 __FBSDID("$FreeBSD$");
42 #include <sys/param.h>
43 #include <sys/systm.h>
44 #include <sys/kernel.h>
45 #include <sys/malloc.h>
47 #include <sys/protosw.h>
48 #include <sys/socket.h>
49 #include <sys/socketvar.h>
50 #include <sys/sysctl.h>
51 #include <sys/vimage.h>
54 #include <net/if_dl.h>
55 #include <net/route.h>
57 #include <netinet/in.h>
58 #include <netinet/in_systm.h>
59 #include <netinet/in_pcb.h>
60 #include <netinet/in_var.h>
61 #include <netinet/ip_var.h>
62 #include <netinet/igmp_var.h>
64 #ifndef __SOCKUNION_DECLARED
66 struct sockaddr_storage ss;
68 struct sockaddr_dl sdl;
69 struct sockaddr_in sin;
71 struct sockaddr_in6 sin6;
74 typedef union sockunion sockunion_t;
75 #define __SOCKUNION_DECLARED
76 #endif /* __SOCKUNION_DECLARED */
78 static MALLOC_DEFINE(M_IPMADDR, "in_multi", "IPv4 multicast group");
79 static MALLOC_DEFINE(M_IPMOPTS, "ip_moptions", "IPv4 multicast options");
80 static MALLOC_DEFINE(M_IPMSOURCE, "in_msource", "IPv4 multicast source filter");
83 * The IPv4 multicast list (in_multihead and associated structures) are
84 * protected by the global in_multi_mtx. See in_var.h for more details. For
85 * now, in_multi_mtx is marked as recursible due to IGMP's calling back into
86 * ip_output() to send IGMP packets while holding the lock; this probably is
87 * not quite desirable.
89 struct in_multihead in_multihead; /* XXX BSS initialization */
90 struct mtx in_multi_mtx;
91 MTX_SYSINIT(in_multi_mtx, &in_multi_mtx, "in_multi_mtx", MTX_DEF | MTX_RECURSE);
94 * Functions with non-static linkage defined in this file should be
95 * declared in in_var.h:
100 * in_delmulti_locked()
106 static int imo_grow(struct ip_moptions *);
107 static int imo_join_source(struct ip_moptions *, size_t, sockunion_t *);
108 static int imo_leave_source(struct ip_moptions *, size_t, sockunion_t *);
109 static int inp_change_source_filter(struct inpcb *, struct sockopt *);
110 static struct ip_moptions *
111 inp_findmoptions(struct inpcb *);
112 static int inp_get_source_filters(struct inpcb *, struct sockopt *);
113 static int inp_join_group(struct inpcb *, struct sockopt *);
114 static int inp_leave_group(struct inpcb *, struct sockopt *);
115 static int inp_set_multicast_if(struct inpcb *, struct sockopt *);
116 static int inp_set_source_filters(struct inpcb *, struct sockopt *);
119 * Resize the ip_moptions vector to the next power-of-two minus 1.
120 * May be called with locks held; do not sleep.
123 imo_grow(struct ip_moptions *imo)
125 struct in_multi **nmships;
126 struct in_multi **omships;
127 struct in_mfilter *nmfilters;
128 struct in_mfilter *omfilters;
135 omships = imo->imo_membership;
136 omfilters = imo->imo_mfilters;
137 oldmax = imo->imo_max_memberships;
138 newmax = ((oldmax + 1) * 2) - 1;
140 if (newmax <= IP_MAX_MEMBERSHIPS) {
141 nmships = (struct in_multi **)realloc(omships,
142 sizeof(struct in_multi *) * newmax, M_IPMOPTS, M_NOWAIT);
143 nmfilters = (struct in_mfilter *)realloc(omfilters,
144 sizeof(struct in_mfilter) * newmax, M_IPMSOURCE, M_NOWAIT);
145 if (nmships != NULL && nmfilters != NULL) {
146 /* Initialize newly allocated source filter heads. */
147 for (idx = oldmax; idx < newmax; idx++) {
148 nmfilters[idx].imf_fmode = MCAST_EXCLUDE;
149 nmfilters[idx].imf_nsources = 0;
150 TAILQ_INIT(&nmfilters[idx].imf_sources);
152 imo->imo_max_memberships = newmax;
153 imo->imo_membership = nmships;
154 imo->imo_mfilters = nmfilters;
158 if (nmships == NULL || nmfilters == NULL) {
160 free(nmships, M_IPMOPTS);
161 if (nmfilters != NULL)
162 free(nmfilters, M_IPMSOURCE);
163 return (ETOOMANYREFS);
170 * Add a source to a multicast filter list.
171 * Assumes the associated inpcb is locked.
174 imo_join_source(struct ip_moptions *imo, size_t gidx, sockunion_t *src)
176 struct in_msource *ims, *nims;
177 struct in_mfilter *imf;
179 KASSERT(src->ss.ss_family == AF_INET, ("%s: !AF_INET", __func__));
180 KASSERT(imo->imo_mfilters != NULL,
181 ("%s: imo_mfilters vector not allocated", __func__));
183 imf = &imo->imo_mfilters[gidx];
184 if (imf->imf_nsources == IP_MAX_SOURCE_FILTER)
187 ims = imo_match_source(imo, gidx, &src->sa);
189 return (EADDRNOTAVAIL);
191 /* Do not sleep with inp lock held. */
192 MALLOC(nims, struct in_msource *, sizeof(struct in_msource),
193 M_IPMSOURCE, M_NOWAIT | M_ZERO);
197 nims->ims_addr = src->ss;
198 TAILQ_INSERT_TAIL(&imf->imf_sources, nims, ims_next);
205 imo_leave_source(struct ip_moptions *imo, size_t gidx, sockunion_t *src)
207 struct in_msource *ims;
208 struct in_mfilter *imf;
210 KASSERT(src->ss.ss_family == AF_INET, ("%s: !AF_INET", __func__));
211 KASSERT(imo->imo_mfilters != NULL,
212 ("%s: imo_mfilters vector not allocated", __func__));
214 imf = &imo->imo_mfilters[gidx];
215 if (imf->imf_nsources == IP_MAX_SOURCE_FILTER)
218 ims = imo_match_source(imo, gidx, &src->sa);
220 return (EADDRNOTAVAIL);
222 TAILQ_REMOVE(&imf->imf_sources, ims, ims_next);
223 FREE(ims, M_IPMSOURCE);
230 * Find an IPv4 multicast group entry for this ip_moptions instance
231 * which matches the specified group, and optionally an interface.
232 * Return its index into the array, or -1 if not found.
235 imo_match_group(struct ip_moptions *imo, struct ifnet *ifp,
236 struct sockaddr *group)
239 struct in_multi **pinm;
243 gsa = (sockunion_t *)group;
245 /* The imo_membership array may be lazy allocated. */
246 if (imo->imo_membership == NULL || imo->imo_num_memberships == 0)
249 nmships = imo->imo_num_memberships;
250 pinm = &imo->imo_membership[0];
251 for (idx = 0; idx < nmships; idx++, pinm++) {
255 printf("%s: trying ifp = %p, inaddr = %s ", __func__,
256 ifp, inet_ntoa(gsa->sin.sin_addr));
257 printf("against %p, %s\n",
258 (*pinm)->inm_ifp, inet_ntoa((*pinm)->inm_addr));
260 if ((ifp == NULL || ((*pinm)->inm_ifp == ifp)) &&
261 (*pinm)->inm_addr.s_addr == gsa->sin.sin_addr.s_addr) {
272 * Find a multicast source entry for this imo which matches
273 * the given group index for this socket, and source address.
276 imo_match_source(struct ip_moptions *imo, size_t gidx, struct sockaddr *src)
278 struct in_mfilter *imf;
279 struct in_msource *ims, *pims;
281 KASSERT(src->sa_family == AF_INET, ("%s: !AF_INET", __func__));
282 KASSERT(gidx != -1 && gidx < imo->imo_num_memberships,
283 ("%s: invalid index %d\n", __func__, (int)gidx));
285 /* The imo_mfilters array may be lazy allocated. */
286 if (imo->imo_mfilters == NULL)
290 imf = &imo->imo_mfilters[gidx];
291 TAILQ_FOREACH(ims, &imf->imf_sources, ims_next) {
293 * Perform bitwise comparison of two IPv4 addresses.
294 * TODO: Do the same for IPv6.
295 * Do not use sa_equal() for this as it is not aware of
296 * deeper structure in sockaddr_in or sockaddr_in6.
298 if (((struct sockaddr_in *)&ims->ims_addr)->sin_addr.s_addr ==
299 ((struct sockaddr_in *)src)->sin_addr.s_addr) {
309 * Join an IPv4 multicast group.
312 in_addmulti(struct in_addr *ap, struct ifnet *ifp)
314 struct in_multi *inm;
321 IN_LOOKUP_MULTI(*ap, ifp, inm);
324 * If we already joined this group, just bump the
325 * refcount and return it.
327 KASSERT(inm->inm_refcount >= 1,
328 ("%s: bad refcount %d", __func__, inm->inm_refcount));
332 struct ifmultiaddr *ifma;
333 struct in_multi *ninm;
336 memset(&gsa, 0, sizeof(gsa));
337 gsa.sin.sin_family = AF_INET;
338 gsa.sin.sin_len = sizeof(struct sockaddr_in);
339 gsa.sin.sin_addr = *ap;
342 * Check if a link-layer group is already associated
343 * with this network-layer group on the given ifnet.
344 * If so, bump the refcount on the existing network-layer
345 * group association and return it.
347 error = if_addmulti(ifp, &gsa.sa, &ifma);
350 if (ifma->ifma_protospec != NULL) {
351 inm = (struct in_multi *)ifma->ifma_protospec;
353 if (inm->inm_ifma != ifma || inm->inm_ifp != ifp ||
354 inm->inm_addr.s_addr != ap->s_addr)
355 panic("%s: ifma is inconsistent", __func__);
362 * A new membership is needed; construct it and
363 * perform the IGMP join.
365 ninm = malloc(sizeof(*ninm), M_IPMADDR, M_NOWAIT | M_ZERO);
367 if_delmulti_ifma(ifma);
370 ninm->inm_addr = *ap;
372 ninm->inm_ifma = ifma;
373 ninm->inm_refcount = 1;
374 ifma->ifma_protospec = ninm;
375 LIST_INSERT_HEAD(&V_in_multihead, ninm, inm_link);
377 igmp_joingroup(ninm);
383 IFF_UNLOCKGIANT(ifp);
389 * Leave an IPv4 multicast group.
390 * It is OK to call this routine if the underlying ifnet went away.
392 * XXX: To deal with the ifp going away, we cheat; the link-layer code in net
393 * will set ifma_ifp to NULL when the associated ifnet instance is detached
396 * The only reason we need to violate layers and check ifma_ifp here at all
397 * is because certain hardware drivers still require Giant to be held,
398 * and it must always be taken before other locks.
401 in_delmulti(struct in_multi *inm)
405 KASSERT(inm != NULL, ("%s: inm is NULL", __func__));
406 KASSERT(inm->inm_ifma != NULL, ("%s: no ifma", __func__));
407 ifp = inm->inm_ifma->ifma_ifp;
411 * Sanity check that netinet's notion of ifp is the
414 KASSERT(inm->inm_ifp == ifp, ("%s: bad ifp", __func__));
419 in_delmulti_locked(inm);
423 IFF_UNLOCKGIANT(ifp);
427 * Delete a multicast address record, with locks held.
429 * It is OK to call this routine if the ifp went away.
430 * Assumes that caller holds the IN_MULTI lock, and that
431 * Giant was taken before other locks if required by the hardware.
434 in_delmulti_locked(struct in_multi *inm)
436 struct ifmultiaddr *ifma;
438 IN_MULTI_LOCK_ASSERT();
439 KASSERT(inm->inm_refcount >= 1, ("%s: freeing freed inm", __func__));
441 if (--inm->inm_refcount == 0) {
442 igmp_leavegroup(inm);
444 ifma = inm->inm_ifma;
447 printf("%s: purging ifma %p\n", __func__, ifma);
449 KASSERT(ifma->ifma_protospec == inm,
450 ("%s: ifma_protospec != inm", __func__));
451 ifma->ifma_protospec = NULL;
453 LIST_REMOVE(inm, inm_link);
454 free(inm, M_IPMADDR);
456 if_delmulti_ifma(ifma);
461 * Block or unblock an ASM/SSM multicast source on an inpcb.
464 inp_change_source_filter(struct inpcb *inp, struct sockopt *sopt)
466 struct group_source_req gsr;
467 sockunion_t *gsa, *ssa;
469 struct in_mfilter *imf;
470 struct ip_moptions *imo;
471 struct in_msource *ims;
480 memset(&gsr, 0, sizeof(struct group_source_req));
481 gsa = (sockunion_t *)&gsr.gsr_group;
482 ssa = (sockunion_t *)&gsr.gsr_source;
484 switch (sopt->sopt_name) {
485 case IP_BLOCK_SOURCE:
486 case IP_UNBLOCK_SOURCE: {
487 struct ip_mreq_source mreqs;
489 error = sooptcopyin(sopt, &mreqs,
490 sizeof(struct ip_mreq_source),
491 sizeof(struct ip_mreq_source));
495 gsa->sin.sin_family = AF_INET;
496 gsa->sin.sin_len = sizeof(struct sockaddr_in);
497 gsa->sin.sin_addr = mreqs.imr_multiaddr;
499 ssa->sin.sin_family = AF_INET;
500 ssa->sin.sin_len = sizeof(struct sockaddr_in);
501 ssa->sin.sin_addr = mreqs.imr_sourceaddr;
503 if (mreqs.imr_interface.s_addr != INADDR_ANY)
504 INADDR_TO_IFP(mreqs.imr_interface, ifp);
506 if (sopt->sopt_name == IP_BLOCK_SOURCE)
511 printf("%s: imr_interface = %s, ifp = %p\n",
512 __func__, inet_ntoa(mreqs.imr_interface), ifp);
518 case MCAST_BLOCK_SOURCE:
519 case MCAST_UNBLOCK_SOURCE:
520 error = sooptcopyin(sopt, &gsr,
521 sizeof(struct group_source_req),
522 sizeof(struct group_source_req));
526 if (gsa->sin.sin_family != AF_INET ||
527 gsa->sin.sin_len != sizeof(struct sockaddr_in))
530 if (ssa->sin.sin_family != AF_INET ||
531 ssa->sin.sin_len != sizeof(struct sockaddr_in))
534 if (gsr.gsr_interface == 0 || V_if_index < gsr.gsr_interface)
535 return (EADDRNOTAVAIL);
537 ifp = ifnet_byindex(gsr.gsr_interface);
539 if (sopt->sopt_name == MCAST_BLOCK_SOURCE)
546 printf("%s: unknown sopt_name %d\n", __func__,
555 if (!IN_MULTICAST(ntohl(gsa->sin.sin_addr.s_addr)))
559 * Check if we are actually a member of this group.
561 imo = inp_findmoptions(inp);
562 idx = imo_match_group(imo, ifp, &gsa->sa);
563 if (idx == -1 || imo->imo_mfilters == NULL) {
564 error = EADDRNOTAVAIL;
568 KASSERT(imo->imo_mfilters != NULL,
569 ("%s: imo_mfilters not allocated", __func__));
570 imf = &imo->imo_mfilters[idx];
573 * SSM multicast truth table for block/unblock operations.
575 * Operation Filter Mode Entry exists? Action
577 * block exclude no add source to filter
578 * unblock include no add source to filter
579 * block include no EINVAL
580 * unblock exclude no EINVAL
581 * block exclude yes EADDRNOTAVAIL
582 * unblock include yes EADDRNOTAVAIL
583 * block include yes remove source from filter
584 * unblock exclude yes remove source from filter
586 * FreeBSD does not explicitly distinguish between ASM and SSM
587 * mode sockets; all sockets are assumed to have a filter list.
591 printf("%s: imf_fmode is %s\n", __func__,
592 imf->imf_fmode == MCAST_INCLUDE ? "include" : "exclude");
595 ims = imo_match_source(imo, idx, &ssa->sa);
597 if ((block == 1 && imf->imf_fmode == MCAST_EXCLUDE) ||
598 (block == 0 && imf->imf_fmode == MCAST_INCLUDE)) {
601 printf("%s: adding %s to filter list\n",
602 __func__, inet_ntoa(ssa->sin.sin_addr));
605 error = imo_join_source(imo, idx, ssa);
607 if ((block == 1 && imf->imf_fmode == MCAST_INCLUDE) ||
608 (block == 0 && imf->imf_fmode == MCAST_EXCLUDE)) {
610 * If the socket is in inclusive mode:
611 * the source is already blocked as it has no entry.
612 * If the socket is in exclusive mode:
613 * the source is already unblocked as it has no entry.
617 printf("%s: ims %p; %s already [un]blocked\n",
619 inet_ntoa(ssa->sin.sin_addr));
625 if ((block == 1 && imf->imf_fmode == MCAST_EXCLUDE) ||
626 (block == 0 && imf->imf_fmode == MCAST_INCLUDE)) {
628 * If the socket is in exclusive mode:
629 * the source is already blocked as it has an entry.
630 * If the socket is in inclusive mode:
631 * the source is already unblocked as it has an entry.
635 printf("%s: ims %p; %s already [un]blocked\n",
637 inet_ntoa(ssa->sin.sin_addr));
640 error = EADDRNOTAVAIL;
642 if ((block == 1 && imf->imf_fmode == MCAST_INCLUDE) ||
643 (block == 0 && imf->imf_fmode == MCAST_EXCLUDE)) {
646 printf("%s: removing %s from filter list\n",
647 __func__, inet_ntoa(ssa->sin.sin_addr));
650 error = imo_leave_source(imo, idx, ssa);
660 * Given an inpcb, return its multicast options structure pointer. Accepts
661 * an unlocked inpcb pointer, but will return it locked. May sleep.
663 static struct ip_moptions *
664 inp_findmoptions(struct inpcb *inp)
666 struct ip_moptions *imo;
667 struct in_multi **immp;
668 struct in_mfilter *imfp;
672 if (inp->inp_moptions != NULL)
673 return (inp->inp_moptions);
677 imo = (struct ip_moptions *)malloc(sizeof(*imo), M_IPMOPTS,
679 immp = (struct in_multi **)malloc(sizeof(*immp) * IP_MIN_MEMBERSHIPS,
680 M_IPMOPTS, M_WAITOK | M_ZERO);
681 imfp = (struct in_mfilter *)malloc(
682 sizeof(struct in_mfilter) * IP_MIN_MEMBERSHIPS,
683 M_IPMSOURCE, M_WAITOK);
685 imo->imo_multicast_ifp = NULL;
686 imo->imo_multicast_addr.s_addr = INADDR_ANY;
687 imo->imo_multicast_vif = -1;
688 imo->imo_multicast_ttl = IP_DEFAULT_MULTICAST_TTL;
689 imo->imo_multicast_loop = IP_DEFAULT_MULTICAST_LOOP;
690 imo->imo_num_memberships = 0;
691 imo->imo_max_memberships = IP_MIN_MEMBERSHIPS;
692 imo->imo_membership = immp;
694 /* Initialize per-group source filters. */
695 for (idx = 0; idx < IP_MIN_MEMBERSHIPS; idx++) {
696 imfp[idx].imf_fmode = MCAST_EXCLUDE;
697 imfp[idx].imf_nsources = 0;
698 TAILQ_INIT(&imfp[idx].imf_sources);
700 imo->imo_mfilters = imfp;
703 if (inp->inp_moptions != NULL) {
704 free(imfp, M_IPMSOURCE);
705 free(immp, M_IPMOPTS);
706 free(imo, M_IPMOPTS);
707 return (inp->inp_moptions);
709 inp->inp_moptions = imo;
714 * Discard the IP multicast options (and source filters).
717 inp_freemoptions(struct ip_moptions *imo)
719 struct in_mfilter *imf;
720 struct in_msource *ims, *tims;
723 KASSERT(imo != NULL, ("%s: ip_moptions is NULL", __func__));
725 nmships = imo->imo_num_memberships;
726 for (idx = 0; idx < nmships; ++idx) {
727 in_delmulti(imo->imo_membership[idx]);
729 if (imo->imo_mfilters != NULL) {
730 imf = &imo->imo_mfilters[idx];
731 TAILQ_FOREACH_SAFE(ims, &imf->imf_sources,
733 TAILQ_REMOVE(&imf->imf_sources, ims, ims_next);
734 FREE(ims, M_IPMSOURCE);
737 KASSERT(imf->imf_nsources == 0,
738 ("%s: did not free all imf_nsources", __func__));
742 if (imo->imo_mfilters != NULL)
743 free(imo->imo_mfilters, M_IPMSOURCE);
744 free(imo->imo_membership, M_IPMOPTS);
745 free(imo, M_IPMOPTS);
749 * Atomically get source filters on a socket for an IPv4 multicast group.
750 * Called with INP lock held; returns with lock released.
753 inp_get_source_filters(struct inpcb *inp, struct sockopt *sopt)
755 struct __msfilterreq msfr;
758 struct ip_moptions *imo;
759 struct in_mfilter *imf;
760 struct in_msource *ims;
761 struct sockaddr_storage *ptss;
762 struct sockaddr_storage *tss;
766 INP_WLOCK_ASSERT(inp);
768 imo = inp->inp_moptions;
769 KASSERT(imo != NULL, ("%s: null ip_moptions", __func__));
773 error = sooptcopyin(sopt, &msfr, sizeof(struct __msfilterreq),
774 sizeof(struct __msfilterreq));
778 if (msfr.msfr_ifindex == 0 || V_if_index < msfr.msfr_ifindex)
781 ifp = ifnet_byindex(msfr.msfr_ifindex);
788 * Lookup group on the socket.
790 gsa = (sockunion_t *)&msfr.msfr_group;
791 idx = imo_match_group(imo, ifp, &gsa->sa);
792 if (idx == -1 || imo->imo_mfilters == NULL) {
794 return (EADDRNOTAVAIL);
797 imf = &imo->imo_mfilters[idx];
798 msfr.msfr_fmode = imf->imf_fmode;
799 msfr.msfr_nsrcs = imf->imf_nsources;
802 * If the user specified a buffer, copy out the source filter
803 * entries to userland gracefully.
804 * msfr.msfr_nsrcs is always set to the total number of filter
805 * entries which the kernel currently has for this group.
808 if (msfr.msfr_srcs != NULL && msfr.msfr_nsrcs > 0) {
810 * Make a copy of the source vector so that we do not
811 * thrash the inpcb lock whilst copying it out.
812 * We only copy out the number of entries which userland
813 * has asked for, but we always tell userland how big the
814 * buffer really needs to be.
816 MALLOC(tss, struct sockaddr_storage *,
817 sizeof(struct sockaddr_storage) * msfr.msfr_nsrcs,
823 TAILQ_FOREACH(ims, &imf->imf_sources, ims_next) {
824 memcpy(ptss++, &ims->ims_addr,
825 sizeof(struct sockaddr_storage));
833 error = copyout(tss, msfr.msfr_srcs,
834 sizeof(struct sockaddr_storage) * msfr.msfr_nsrcs);
841 error = sooptcopyout(sopt, &msfr, sizeof(struct __msfilterreq));
847 * Return the IP multicast options in response to user getsockopt().
850 inp_getmoptions(struct inpcb *inp, struct sockopt *sopt)
852 struct ip_mreqn mreqn;
853 struct ip_moptions *imo;
855 struct in_ifaddr *ia;
860 imo = inp->inp_moptions;
862 * If socket is neither of type SOCK_RAW or SOCK_DGRAM,
863 * or is a divert socket, reject it.
865 if (inp->inp_socket->so_proto->pr_protocol == IPPROTO_DIVERT ||
866 (inp->inp_socket->so_proto->pr_type != SOCK_RAW &&
867 inp->inp_socket->so_proto->pr_type != SOCK_DGRAM)) {
873 switch (sopt->sopt_name) {
874 case IP_MULTICAST_VIF:
876 optval = imo->imo_multicast_vif;
880 error = sooptcopyout(sopt, &optval, sizeof(int));
883 case IP_MULTICAST_IF:
884 memset(&mreqn, 0, sizeof(struct ip_mreqn));
886 ifp = imo->imo_multicast_ifp;
887 if (imo->imo_multicast_addr.s_addr != INADDR_ANY) {
888 mreqn.imr_address = imo->imo_multicast_addr;
889 } else if (ifp != NULL) {
890 mreqn.imr_ifindex = ifp->if_index;
894 IA_SIN(ia)->sin_addr;
899 if (sopt->sopt_valsize == sizeof(struct ip_mreqn)) {
900 error = sooptcopyout(sopt, &mreqn,
901 sizeof(struct ip_mreqn));
903 error = sooptcopyout(sopt, &mreqn.imr_address,
904 sizeof(struct in_addr));
908 case IP_MULTICAST_TTL:
910 optval = coptval = IP_DEFAULT_MULTICAST_TTL;
912 optval = coptval = imo->imo_multicast_ttl;
914 if (sopt->sopt_valsize == sizeof(u_char))
915 error = sooptcopyout(sopt, &coptval, sizeof(u_char));
917 error = sooptcopyout(sopt, &optval, sizeof(int));
920 case IP_MULTICAST_LOOP:
922 optval = coptval = IP_DEFAULT_MULTICAST_LOOP;
924 optval = coptval = imo->imo_multicast_loop;
926 if (sopt->sopt_valsize == sizeof(u_char))
927 error = sooptcopyout(sopt, &coptval, sizeof(u_char));
929 error = sooptcopyout(sopt, &optval, sizeof(int));
934 error = EADDRNOTAVAIL;
937 error = inp_get_source_filters(inp, sopt);
947 INP_UNLOCK_ASSERT(inp);
953 * Join an IPv4 multicast group, possibly with a source.
956 inp_join_group(struct inpcb *inp, struct sockopt *sopt)
958 struct group_source_req gsr;
959 sockunion_t *gsa, *ssa;
961 struct in_mfilter *imf;
962 struct ip_moptions *imo;
963 struct in_multi *inm;
970 memset(&gsr, 0, sizeof(struct group_source_req));
971 gsa = (sockunion_t *)&gsr.gsr_group;
972 gsa->ss.ss_family = AF_UNSPEC;
973 ssa = (sockunion_t *)&gsr.gsr_source;
974 ssa->ss.ss_family = AF_UNSPEC;
976 switch (sopt->sopt_name) {
977 case IP_ADD_MEMBERSHIP:
978 case IP_ADD_SOURCE_MEMBERSHIP: {
979 struct ip_mreq_source mreqs;
981 if (sopt->sopt_name == IP_ADD_MEMBERSHIP) {
982 error = sooptcopyin(sopt, &mreqs,
983 sizeof(struct ip_mreq),
984 sizeof(struct ip_mreq));
986 * Do argument switcharoo from ip_mreq into
987 * ip_mreq_source to avoid using two instances.
989 mreqs.imr_interface = mreqs.imr_sourceaddr;
990 mreqs.imr_sourceaddr.s_addr = INADDR_ANY;
991 } else if (sopt->sopt_name == IP_ADD_SOURCE_MEMBERSHIP) {
992 error = sooptcopyin(sopt, &mreqs,
993 sizeof(struct ip_mreq_source),
994 sizeof(struct ip_mreq_source));
999 gsa->sin.sin_family = AF_INET;
1000 gsa->sin.sin_len = sizeof(struct sockaddr_in);
1001 gsa->sin.sin_addr = mreqs.imr_multiaddr;
1003 if (sopt->sopt_name == IP_ADD_SOURCE_MEMBERSHIP) {
1004 ssa->sin.sin_family = AF_INET;
1005 ssa->sin.sin_len = sizeof(struct sockaddr_in);
1006 ssa->sin.sin_addr = mreqs.imr_sourceaddr;
1010 * Obtain ifp. If no interface address was provided,
1011 * use the interface of the route in the unicast FIB for
1012 * the given multicast destination; usually, this is the
1014 * If this lookup fails, attempt to use the first non-loopback
1015 * interface with multicast capability in the system as a
1016 * last resort. The legacy IPv4 ASM API requires that we do
1017 * this in order to allow groups to be joined when the routing
1018 * table has not yet been populated during boot.
1019 * If all of these conditions fail, return EADDRNOTAVAIL, and
1020 * reject the IPv4 multicast join.
1022 if (mreqs.imr_interface.s_addr != INADDR_ANY) {
1023 INADDR_TO_IFP(mreqs.imr_interface, ifp);
1028 *(struct sockaddr_in *)&ro.ro_dst = gsa->sin;
1029 in_rtalloc_ign(&ro, RTF_CLONING,
1030 inp->inp_inc.inc_fibnum);
1031 if (ro.ro_rt != NULL) {
1032 ifp = ro.ro_rt->rt_ifp;
1033 KASSERT(ifp != NULL, ("%s: null ifp",
1037 struct in_ifaddr *ia;
1038 struct ifnet *mfp = NULL;
1039 TAILQ_FOREACH(ia, &V_in_ifaddrhead, ia_link) {
1041 if (!(mfp->if_flags & IFF_LOOPBACK) &&
1042 (mfp->if_flags & IFF_MULTICAST)) {
1051 printf("%s: imr_interface = %s, ifp = %p\n",
1052 __func__, inet_ntoa(mreqs.imr_interface), ifp);
1058 case MCAST_JOIN_GROUP:
1059 case MCAST_JOIN_SOURCE_GROUP:
1060 if (sopt->sopt_name == MCAST_JOIN_GROUP) {
1061 error = sooptcopyin(sopt, &gsr,
1062 sizeof(struct group_req),
1063 sizeof(struct group_req));
1064 } else if (sopt->sopt_name == MCAST_JOIN_SOURCE_GROUP) {
1065 error = sooptcopyin(sopt, &gsr,
1066 sizeof(struct group_source_req),
1067 sizeof(struct group_source_req));
1072 if (gsa->sin.sin_family != AF_INET ||
1073 gsa->sin.sin_len != sizeof(struct sockaddr_in))
1077 * Overwrite the port field if present, as the sockaddr
1078 * being copied in may be matched with a binary comparison.
1081 gsa->sin.sin_port = 0;
1082 if (sopt->sopt_name == MCAST_JOIN_SOURCE_GROUP) {
1083 if (ssa->sin.sin_family != AF_INET ||
1084 ssa->sin.sin_len != sizeof(struct sockaddr_in))
1086 ssa->sin.sin_port = 0;
1092 if (gsr.gsr_interface == 0 || V_if_index < gsr.gsr_interface)
1093 return (EADDRNOTAVAIL);
1094 ifp = ifnet_byindex(gsr.gsr_interface);
1101 printf("%s: unknown sopt_name %d\n", __func__,
1105 return (EOPNOTSUPP);
1109 if (!IN_MULTICAST(ntohl(gsa->sin.sin_addr.s_addr)))
1112 if (ifp == NULL || (ifp->if_flags & IFF_MULTICAST) == 0)
1113 return (EADDRNOTAVAIL);
1116 * Check if we already hold membership of this group for this inpcb.
1117 * If so, we do not need to perform the initial join.
1119 imo = inp_findmoptions(inp);
1120 idx = imo_match_group(imo, ifp, &gsa->sa);
1122 if (ssa->ss.ss_family != AF_UNSPEC) {
1124 * Attempting to join an ASM group (when already
1125 * an ASM or SSM member) is an error.
1127 error = EADDRNOTAVAIL;
1129 imf = &imo->imo_mfilters[idx];
1130 if (imf->imf_nsources == 0) {
1132 * Attempting to join an SSM group (when
1133 * already an ASM member) is an error.
1138 * Attempting to join an SSM group (when
1139 * already an SSM member) means "add this
1140 * source to the inclusive filter list".
1142 error = imo_join_source(imo, idx, ssa);
1149 * Call imo_grow() to reallocate the membership and source filter
1150 * vectors if they are full. If the size would exceed the hard limit,
1151 * then we know we've really run out of entries. We keep the INP
1152 * lock held to avoid introducing a race condition.
1154 if (imo->imo_num_memberships == imo->imo_max_memberships) {
1155 error = imo_grow(imo);
1161 * So far, so good: perform the layer 3 join, layer 2 join,
1162 * and make an IGMP announcement if needed.
1164 inm = in_addmulti(&gsa->sin.sin_addr, ifp);
1169 idx = imo->imo_num_memberships;
1170 imo->imo_membership[idx] = inm;
1171 imo->imo_num_memberships++;
1173 KASSERT(imo->imo_mfilters != NULL,
1174 ("%s: imf_mfilters vector was not allocated", __func__));
1175 imf = &imo->imo_mfilters[idx];
1176 KASSERT(TAILQ_EMPTY(&imf->imf_sources),
1177 ("%s: imf_sources not empty", __func__));
1180 * If this is a new SSM group join (i.e. a source was specified
1181 * with this group), add this source to the filter list.
1183 if (ssa->ss.ss_family != AF_UNSPEC) {
1185 * An initial SSM join implies that this socket's membership
1186 * of the multicast group is now in inclusive mode.
1188 imf->imf_fmode = MCAST_INCLUDE;
1190 error = imo_join_source(imo, idx, ssa);
1193 * Drop inp lock before calling in_delmulti(),
1194 * to prevent a lock order reversal.
1196 --imo->imo_num_memberships;
1209 * Leave an IPv4 multicast group on an inpcb, possibly with a source.
1212 inp_leave_group(struct inpcb *inp, struct sockopt *sopt)
1214 struct group_source_req gsr;
1215 struct ip_mreq_source mreqs;
1216 sockunion_t *gsa, *ssa;
1218 struct in_mfilter *imf;
1219 struct ip_moptions *imo;
1220 struct in_msource *ims, *tims;
1221 struct in_multi *inm;
1228 memset(&gsr, 0, sizeof(struct group_source_req));
1229 gsa = (sockunion_t *)&gsr.gsr_group;
1230 gsa->ss.ss_family = AF_UNSPEC;
1231 ssa = (sockunion_t *)&gsr.gsr_source;
1232 ssa->ss.ss_family = AF_UNSPEC;
1234 switch (sopt->sopt_name) {
1235 case IP_DROP_MEMBERSHIP:
1236 case IP_DROP_SOURCE_MEMBERSHIP:
1237 if (sopt->sopt_name == IP_DROP_MEMBERSHIP) {
1238 error = sooptcopyin(sopt, &mreqs,
1239 sizeof(struct ip_mreq),
1240 sizeof(struct ip_mreq));
1242 * Swap interface and sourceaddr arguments,
1243 * as ip_mreq and ip_mreq_source are laid
1246 mreqs.imr_interface = mreqs.imr_sourceaddr;
1247 mreqs.imr_sourceaddr.s_addr = INADDR_ANY;
1248 } else if (sopt->sopt_name == IP_DROP_SOURCE_MEMBERSHIP) {
1249 error = sooptcopyin(sopt, &mreqs,
1250 sizeof(struct ip_mreq_source),
1251 sizeof(struct ip_mreq_source));
1256 gsa->sin.sin_family = AF_INET;
1257 gsa->sin.sin_len = sizeof(struct sockaddr_in);
1258 gsa->sin.sin_addr = mreqs.imr_multiaddr;
1260 if (sopt->sopt_name == IP_DROP_SOURCE_MEMBERSHIP) {
1261 ssa->sin.sin_family = AF_INET;
1262 ssa->sin.sin_len = sizeof(struct sockaddr_in);
1263 ssa->sin.sin_addr = mreqs.imr_sourceaddr;
1266 if (gsa->sin.sin_addr.s_addr != INADDR_ANY)
1267 INADDR_TO_IFP(mreqs.imr_interface, ifp);
1271 printf("%s: imr_interface = %s, ifp = %p\n",
1272 __func__, inet_ntoa(mreqs.imr_interface), ifp);
1277 case MCAST_LEAVE_GROUP:
1278 case MCAST_LEAVE_SOURCE_GROUP:
1279 if (sopt->sopt_name == MCAST_LEAVE_GROUP) {
1280 error = sooptcopyin(sopt, &gsr,
1281 sizeof(struct group_req),
1282 sizeof(struct group_req));
1283 } else if (sopt->sopt_name == MCAST_LEAVE_SOURCE_GROUP) {
1284 error = sooptcopyin(sopt, &gsr,
1285 sizeof(struct group_source_req),
1286 sizeof(struct group_source_req));
1291 if (gsa->sin.sin_family != AF_INET ||
1292 gsa->sin.sin_len != sizeof(struct sockaddr_in))
1295 if (sopt->sopt_name == MCAST_LEAVE_SOURCE_GROUP) {
1296 if (ssa->sin.sin_family != AF_INET ||
1297 ssa->sin.sin_len != sizeof(struct sockaddr_in))
1301 if (gsr.gsr_interface == 0 || V_if_index < gsr.gsr_interface)
1302 return (EADDRNOTAVAIL);
1304 ifp = ifnet_byindex(gsr.gsr_interface);
1310 printf("%s: unknown sopt_name %d\n", __func__,
1314 return (EOPNOTSUPP);
1318 if (!IN_MULTICAST(ntohl(gsa->sin.sin_addr.s_addr)))
1322 * Find the membership in the membership array.
1324 imo = inp_findmoptions(inp);
1325 idx = imo_match_group(imo, ifp, &gsa->sa);
1327 error = EADDRNOTAVAIL;
1330 imf = &imo->imo_mfilters[idx];
1333 * If we were instructed only to leave a given source, do so.
1335 if (ssa->ss.ss_family != AF_UNSPEC) {
1336 if (imf->imf_nsources == 0 ||
1337 imf->imf_fmode == MCAST_EXCLUDE) {
1339 * Attempting to SSM leave an ASM group
1340 * is an error; should use *_BLOCK_SOURCE instead.
1341 * Attempting to SSM leave a source in a group when
1342 * the socket is in 'exclude mode' is also an error.
1346 error = imo_leave_source(imo, idx, ssa);
1349 * If an error occurred, or this source is not the last
1350 * source in the group, do not leave the whole group.
1352 if (error || imf->imf_nsources > 0)
1357 * Give up the multicast address record to which the membership points.
1359 inm = imo->imo_membership[idx];
1363 * Free any source filters for this group if they exist.
1364 * Revert inpcb to the default MCAST_EXCLUDE state.
1366 if (imo->imo_mfilters != NULL) {
1367 TAILQ_FOREACH_SAFE(ims, &imf->imf_sources, ims_next, tims) {
1368 TAILQ_REMOVE(&imf->imf_sources, ims, ims_next);
1369 FREE(ims, M_IPMSOURCE);
1370 imf->imf_nsources--;
1372 KASSERT(imf->imf_nsources == 0,
1373 ("%s: imf_nsources not 0", __func__));
1374 KASSERT(TAILQ_EMPTY(&imf->imf_sources),
1375 ("%s: imf_sources not empty", __func__));
1376 imf->imf_fmode = MCAST_EXCLUDE;
1380 * Remove the gap in the membership array.
1382 for (++idx; idx < imo->imo_num_memberships; ++idx)
1383 imo->imo_membership[idx-1] = imo->imo_membership[idx];
1384 imo->imo_num_memberships--;
1392 * Select the interface for transmitting IPv4 multicast datagrams.
1394 * Either an instance of struct in_addr or an instance of struct ip_mreqn
1395 * may be passed to this socket option. An address of INADDR_ANY or an
1396 * interface index of 0 is used to remove a previous selection.
1397 * When no interface is selected, one is chosen for every send.
1400 inp_set_multicast_if(struct inpcb *inp, struct sockopt *sopt)
1402 struct in_addr addr;
1403 struct ip_mreqn mreqn;
1405 struct ip_moptions *imo;
1408 if (sopt->sopt_valsize == sizeof(struct ip_mreqn)) {
1410 * An interface index was specified using the
1411 * Linux-derived ip_mreqn structure.
1413 error = sooptcopyin(sopt, &mreqn, sizeof(struct ip_mreqn),
1414 sizeof(struct ip_mreqn));
1418 if (mreqn.imr_ifindex < 0 || V_if_index < mreqn.imr_ifindex)
1421 if (mreqn.imr_ifindex == 0) {
1424 ifp = ifnet_byindex(mreqn.imr_ifindex);
1426 return (EADDRNOTAVAIL);
1430 * An interface was specified by IPv4 address.
1431 * This is the traditional BSD usage.
1433 error = sooptcopyin(sopt, &addr, sizeof(struct in_addr),
1434 sizeof(struct in_addr));
1437 if (addr.s_addr == INADDR_ANY) {
1440 INADDR_TO_IFP(addr, ifp);
1442 return (EADDRNOTAVAIL);
1446 printf("%s: ifp = %p, addr = %s\n",
1447 __func__, ifp, inet_ntoa(addr)); /* XXX INET6 */
1452 /* Reject interfaces which do not support multicast. */
1453 if (ifp != NULL && (ifp->if_flags & IFF_MULTICAST) == 0)
1454 return (EOPNOTSUPP);
1456 imo = inp_findmoptions(inp);
1457 imo->imo_multicast_ifp = ifp;
1458 imo->imo_multicast_addr.s_addr = INADDR_ANY;
1465 * Atomically set source filters on a socket for an IPv4 multicast group.
1468 inp_set_source_filters(struct inpcb *inp, struct sockopt *sopt)
1470 struct __msfilterreq msfr;
1473 struct in_mfilter *imf;
1474 struct ip_moptions *imo;
1475 struct in_msource *ims, *tims;
1479 error = sooptcopyin(sopt, &msfr, sizeof(struct __msfilterreq),
1480 sizeof(struct __msfilterreq));
1484 if (msfr.msfr_nsrcs > IP_MAX_SOURCE_FILTER ||
1485 (msfr.msfr_fmode != MCAST_EXCLUDE &&
1486 msfr.msfr_fmode != MCAST_INCLUDE))
1489 if (msfr.msfr_group.ss_family != AF_INET ||
1490 msfr.msfr_group.ss_len != sizeof(struct sockaddr_in))
1493 gsa = (sockunion_t *)&msfr.msfr_group;
1494 if (!IN_MULTICAST(ntohl(gsa->sin.sin_addr.s_addr)))
1497 gsa->sin.sin_port = 0; /* ignore port */
1499 if (msfr.msfr_ifindex == 0 || V_if_index < msfr.msfr_ifindex)
1500 return (EADDRNOTAVAIL);
1502 ifp = ifnet_byindex(msfr.msfr_ifindex);
1504 return (EADDRNOTAVAIL);
1507 * Take the INP lock.
1508 * Check if this socket is a member of this group.
1510 imo = inp_findmoptions(inp);
1511 idx = imo_match_group(imo, ifp, &gsa->sa);
1512 if (idx == -1 || imo->imo_mfilters == NULL) {
1513 error = EADDRNOTAVAIL;
1516 imf = &imo->imo_mfilters[idx];
1520 printf("%s: clearing source list\n", __func__);
1524 * Remove any existing source filters.
1526 TAILQ_FOREACH_SAFE(ims, &imf->imf_sources, ims_next, tims) {
1527 TAILQ_REMOVE(&imf->imf_sources, ims, ims_next);
1528 FREE(ims, M_IPMSOURCE);
1529 imf->imf_nsources--;
1531 KASSERT(imf->imf_nsources == 0,
1532 ("%s: source list not cleared", __func__));
1535 * Apply any new source filters, if present.
1537 if (msfr.msfr_nsrcs > 0) {
1538 struct in_msource **pnims;
1539 struct in_msource *nims;
1540 struct sockaddr_storage *kss;
1541 struct sockaddr_storage *pkss;
1546 * Drop the inp lock so we may sleep if we need to
1547 * in order to satisfy a malloc request.
1548 * We will re-take it before changing socket state.
1553 printf("%s: loading %lu source list entries\n",
1554 __func__, (unsigned long)msfr.msfr_nsrcs);
1558 * Make a copy of the user-space source vector so
1559 * that we may copy them with a single copyin. This
1560 * allows us to deal with page faults up-front.
1562 MALLOC(kss, struct sockaddr_storage *,
1563 sizeof(struct sockaddr_storage) * msfr.msfr_nsrcs,
1565 error = copyin(msfr.msfr_srcs, kss,
1566 sizeof(struct sockaddr_storage) * msfr.msfr_nsrcs);
1573 * Perform argument checking on every sockaddr_storage
1574 * structure in the vector provided to us. Overwrite
1575 * fields which should not apply to source entries.
1576 * TODO: Check for duplicate sources on this pass.
1578 psu = (sockunion_t *)kss;
1579 for (i = 0; i < msfr.msfr_nsrcs; i++, psu++) {
1580 switch (psu->ss.ss_family) {
1582 if (psu->sin.sin_len !=
1583 sizeof(struct sockaddr_in)) {
1586 psu->sin.sin_port = 0;
1591 if (psu->sin6.sin6_len !=
1592 sizeof(struct sockaddr_in6)) {
1595 psu->sin6.sin6_port = 0;
1596 psu->sin6.sin6_flowinfo = 0;
1601 error = EAFNOSUPPORT;
1613 * Allocate a block to track all the in_msource
1614 * entries we are about to allocate, in case we
1615 * abruptly need to free them.
1617 MALLOC(pnims, struct in_msource **,
1618 sizeof(struct in_msource *) * msfr.msfr_nsrcs,
1619 M_TEMP, M_WAITOK | M_ZERO);
1622 * Allocate up to nsrcs individual chunks.
1623 * If we encounter an error, backtrack out of
1624 * all allocations cleanly; updates must be atomic.
1628 for (i = 0; i < msfr.msfr_nsrcs; i++, pkss++) {
1629 MALLOC(nims, struct in_msource *,
1630 sizeof(struct in_msource) * msfr.msfr_nsrcs,
1631 M_IPMSOURCE, M_WAITOK | M_ZERO);
1634 if (i < msfr.msfr_nsrcs) {
1635 for (j = 0; j < i; j++) {
1636 if (pnims[j] != NULL)
1637 FREE(pnims[j], M_IPMSOURCE);
1639 FREE(pnims, M_TEMP);
1644 INP_UNLOCK_ASSERT(inp);
1647 * Finally, apply the filters to the socket.
1648 * Re-take the inp lock; we are changing socket state.
1652 for (i = 0; i < msfr.msfr_nsrcs; i++, pkss++) {
1653 memcpy(&(pnims[i]->ims_addr), pkss,
1654 sizeof(struct sockaddr_storage));
1655 TAILQ_INSERT_TAIL(&imf->imf_sources, pnims[i],
1657 imf->imf_nsources++;
1659 FREE(pnims, M_TEMP);
1664 * Update the filter mode on the socket before releasing the inpcb.
1666 INP_WLOCK_ASSERT(inp);
1667 imf->imf_fmode = msfr.msfr_fmode;
1675 * Set the IP multicast options in response to user setsockopt().
1677 * Many of the socket options handled in this function duplicate the
1678 * functionality of socket options in the regular unicast API. However,
1679 * it is not possible to merge the duplicate code, because the idempotence
1680 * of the IPv4 multicast part of the BSD Sockets API must be preserved;
1681 * the effects of these options must be treated as separate and distinct.
1684 inp_setmoptions(struct inpcb *inp, struct sockopt *sopt)
1686 struct ip_moptions *imo;
1692 * If socket is neither of type SOCK_RAW or SOCK_DGRAM,
1693 * or is a divert socket, reject it.
1694 * XXX Unlocked read of inp_socket believed OK.
1696 if (inp->inp_socket->so_proto->pr_protocol == IPPROTO_DIVERT ||
1697 (inp->inp_socket->so_proto->pr_type != SOCK_RAW &&
1698 inp->inp_socket->so_proto->pr_type != SOCK_DGRAM))
1699 return (EOPNOTSUPP);
1701 switch (sopt->sopt_name) {
1702 case IP_MULTICAST_VIF: {
1705 * Select a multicast VIF for transmission.
1706 * Only useful if multicast forwarding is active.
1708 if (legal_vif_num == NULL) {
1712 error = sooptcopyin(sopt, &vifi, sizeof(int), sizeof(int));
1715 if (!legal_vif_num(vifi) && (vifi != -1)) {
1719 imo = inp_findmoptions(inp);
1720 imo->imo_multicast_vif = vifi;
1725 case IP_MULTICAST_IF:
1726 error = inp_set_multicast_if(inp, sopt);
1729 case IP_MULTICAST_TTL: {
1733 * Set the IP time-to-live for outgoing multicast packets.
1734 * The original multicast API required a char argument,
1735 * which is inconsistent with the rest of the socket API.
1736 * We allow either a char or an int.
1738 if (sopt->sopt_valsize == sizeof(u_char)) {
1739 error = sooptcopyin(sopt, &ttl, sizeof(u_char),
1746 error = sooptcopyin(sopt, &ittl, sizeof(u_int),
1756 imo = inp_findmoptions(inp);
1757 imo->imo_multicast_ttl = ttl;
1762 case IP_MULTICAST_LOOP: {
1766 * Set the loopback flag for outgoing multicast packets.
1767 * Must be zero or one. The original multicast API required a
1768 * char argument, which is inconsistent with the rest
1769 * of the socket API. We allow either a char or an int.
1771 if (sopt->sopt_valsize == sizeof(u_char)) {
1772 error = sooptcopyin(sopt, &loop, sizeof(u_char),
1779 error = sooptcopyin(sopt, &iloop, sizeof(u_int),
1783 loop = (u_char)iloop;
1785 imo = inp_findmoptions(inp);
1786 imo->imo_multicast_loop = !!loop;
1791 case IP_ADD_MEMBERSHIP:
1792 case IP_ADD_SOURCE_MEMBERSHIP:
1793 case MCAST_JOIN_GROUP:
1794 case MCAST_JOIN_SOURCE_GROUP:
1795 error = inp_join_group(inp, sopt);
1798 case IP_DROP_MEMBERSHIP:
1799 case IP_DROP_SOURCE_MEMBERSHIP:
1800 case MCAST_LEAVE_GROUP:
1801 case MCAST_LEAVE_SOURCE_GROUP:
1802 error = inp_leave_group(inp, sopt);
1805 case IP_BLOCK_SOURCE:
1806 case IP_UNBLOCK_SOURCE:
1807 case MCAST_BLOCK_SOURCE:
1808 case MCAST_UNBLOCK_SOURCE:
1809 error = inp_change_source_filter(inp, sopt);
1813 error = inp_set_source_filters(inp, sopt);
1821 INP_UNLOCK_ASSERT(inp);