version 1.22.2.4, 2005/03/04 16:53:31 |
version 1.84, 2017/03/01 08:54:12 |
|
|
#include <sys/cdefs.h> |
#include <sys/cdefs.h> |
__KERNEL_RCSID(0, "$NetBSD$"); |
__KERNEL_RCSID(0, "$NetBSD$"); |
|
|
|
#ifdef _KERNEL_OPT |
#include "opt_inet.h" |
#include "opt_inet.h" |
|
#include "opt_net_mpsafe.h" |
|
#endif |
|
|
#include <sys/param.h> |
#include <sys/param.h> |
#include <sys/systm.h> |
#include <sys/systm.h> |
#include <sys/mbuf.h> |
#include <sys/mbuf.h> |
#include <sys/socket.h> |
#include <sys/socket.h> |
#include <sys/protosw.h> |
#include <sys/socketvar.h> |
#include <sys/syslog.h> |
#include <sys/syslog.h> |
|
#include <sys/sysctl.h> |
|
#include <sys/kernel.h> |
|
#include <sys/callout.h> |
|
#include <sys/cprng.h> |
|
|
#include <net/if.h> |
#include <net/if.h> |
|
|
#include <netinet/in.h> |
#include <netinet/in.h> |
#include <netinet/in_var.h> |
#include <netinet/in_var.h> |
|
#include <netinet6/in6_var.h> |
#include <netinet/ip6.h> |
#include <netinet/ip6.h> |
#include <netinet6/ip6_var.h> |
#include <netinet6/ip6_var.h> |
|
#include <netinet6/scope6_var.h> |
#include <netinet/icmp6.h> |
#include <netinet/icmp6.h> |
|
#include <netinet6/icmp6_private.h> |
#include <netinet6/mld6_var.h> |
#include <netinet6/mld6_var.h> |
|
|
#include <net/net_osdep.h> |
#include <net/net_osdep.h> |
|
|
|
|
/* |
/* |
* Protocol constants |
* Protocol constants |
*/ |
*/ |
|
|
/* denotes that the MLD max response delay field specifies time in milliseconds */ |
|
#define MLD_TIMER_SCALE 1000 |
|
/* |
/* |
* time between repetitions of a node's initial report of interest in a |
* time between repetitions of a node's initial report of interest in a |
* multicast address(in seconds) |
* multicast address(in seconds) |
Line 137 __KERNEL_RCSID(0, "$NetBSD$"); |
|
Line 146 __KERNEL_RCSID(0, "$NetBSD$"); |
|
#define MLD_UNSOLICITED_REPORT_INTERVAL 10 |
#define MLD_UNSOLICITED_REPORT_INTERVAL 10 |
|
|
static struct ip6_pktopts ip6_opts; |
static struct ip6_pktopts ip6_opts; |
static int mld_timers_are_running; |
|
/* XXX: These are necessary for KAME's link-local hack */ |
|
static struct in6_addr mld_all_nodes_linklocal = IN6ADDR_LINKLOCAL_ALLNODES_INIT; |
|
static struct in6_addr mld_all_routers_linklocal = IN6ADDR_LINKLOCAL_ALLROUTERS_INIT; |
|
|
|
static void mld6_sendpkt __P((struct in6_multi *, int, const struct in6_addr *)); |
static void mld_start_listening(struct in6_multi *); |
|
static void mld_stop_listening(struct in6_multi *); |
|
|
|
static struct mld_hdr * mld_allocbuf(struct mbuf **, int, struct in6_multi *, |
|
int); |
|
static void mld_sendpkt(struct in6_multi *, int, const struct in6_addr *); |
|
static void mld_starttimer(struct in6_multi *); |
|
static void mld_stoptimer(struct in6_multi *); |
|
static u_long mld_timerresid(struct in6_multi *); |
|
|
void |
void |
mld6_init() |
mld_init(void) |
{ |
{ |
static u_int8_t hbh_buf[8]; |
static u_int8_t hbh_buf[8]; |
struct ip6_hbh *hbh = (struct ip6_hbh *)hbh_buf; |
struct ip6_hbh *hbh = (struct ip6_hbh *)hbh_buf; |
u_int16_t rtalert_code = htons((u_int16_t)IP6OPT_RTALERT_MLD); |
u_int16_t rtalert_code = htons((u_int16_t)IP6OPT_RTALERT_MLD); |
|
|
mld_timers_are_running = 0; |
|
|
|
/* ip6h_nxt will be fill in later */ |
/* ip6h_nxt will be fill in later */ |
hbh->ip6h_len = 0; /* (8 >> 3) - 1 */ |
hbh->ip6h_len = 0; /* (8 >> 3) - 1 */ |
|
|
|
|
hbh_buf[3] = 0; |
hbh_buf[3] = 0; |
hbh_buf[4] = IP6OPT_RTALERT; |
hbh_buf[4] = IP6OPT_RTALERT; |
hbh_buf[5] = IP6OPT_RTALERT_LEN - 2; |
hbh_buf[5] = IP6OPT_RTALERT_LEN - 2; |
bcopy((caddr_t)&rtalert_code, &hbh_buf[6], sizeof(u_int16_t)); |
memcpy(&hbh_buf[6], (void *)&rtalert_code, sizeof(u_int16_t)); |
|
|
ip6_opts.ip6po_hbh = hbh; |
ip6_opts.ip6po_hbh = hbh; |
/* We will specify the hoplimit by a multicast option. */ |
/* We will specify the hoplimit by a multicast option. */ |
ip6_opts.ip6po_hlim = -1; |
ip6_opts.ip6po_hlim = -1; |
|
ip6_opts.ip6po_prefer_tempaddr = IP6PO_TEMPADDR_NOTPREFER; |
} |
} |
|
|
void |
static void |
mld6_start_listening(in6m) |
mld_starttimer(struct in6_multi *in6m) |
struct in6_multi *in6m; |
{ |
|
struct timeval now; |
|
|
|
KASSERT(in6m->in6m_timer != IN6M_TIMER_UNDEF); |
|
|
|
microtime(&now); |
|
in6m->in6m_timer_expire.tv_sec = now.tv_sec + in6m->in6m_timer / hz; |
|
in6m->in6m_timer_expire.tv_usec = now.tv_usec + |
|
(in6m->in6m_timer % hz) * (1000000 / hz); |
|
if (in6m->in6m_timer_expire.tv_usec > 1000000) { |
|
in6m->in6m_timer_expire.tv_sec++; |
|
in6m->in6m_timer_expire.tv_usec -= 1000000; |
|
} |
|
|
|
/* start or restart the timer */ |
|
callout_schedule(&in6m->in6m_timer_ch, in6m->in6m_timer); |
|
} |
|
|
|
static void |
|
mld_stoptimer(struct in6_multi *in6m) |
|
{ |
|
if (in6m->in6m_timer == IN6M_TIMER_UNDEF) |
|
return; |
|
|
|
callout_stop(&in6m->in6m_timer_ch); |
|
|
|
in6m->in6m_timer = IN6M_TIMER_UNDEF; |
|
} |
|
|
|
static void |
|
mld_timeo(void *arg) |
|
{ |
|
struct in6_multi *in6m = arg; |
|
|
|
/* XXX NOMPSAFE still need softnet_lock */ |
|
mutex_enter(softnet_lock); |
|
KERNEL_LOCK(1, NULL); |
|
|
|
if (in6m->in6m_timer == IN6M_TIMER_UNDEF) |
|
goto out; |
|
|
|
in6m->in6m_timer = IN6M_TIMER_UNDEF; |
|
|
|
switch (in6m->in6m_state) { |
|
case MLD_REPORTPENDING: |
|
mld_start_listening(in6m); |
|
break; |
|
default: |
|
mld_sendpkt(in6m, MLD_LISTENER_REPORT, NULL); |
|
break; |
|
} |
|
|
|
out: |
|
KERNEL_UNLOCK_ONE(NULL); |
|
mutex_exit(softnet_lock); |
|
} |
|
|
|
static u_long |
|
mld_timerresid(struct in6_multi *in6m) |
{ |
{ |
|
struct timeval now, diff; |
|
|
|
microtime(&now); |
|
|
|
if (now.tv_sec > in6m->in6m_timer_expire.tv_sec || |
|
(now.tv_sec == in6m->in6m_timer_expire.tv_sec && |
|
now.tv_usec > in6m->in6m_timer_expire.tv_usec)) { |
|
return (0); |
|
} |
|
diff = in6m->in6m_timer_expire; |
|
diff.tv_sec -= now.tv_sec; |
|
diff.tv_usec -= now.tv_usec; |
|
if (diff.tv_usec < 0) { |
|
diff.tv_sec--; |
|
diff.tv_usec += 1000000; |
|
} |
|
|
|
/* return the remaining time in milliseconds */ |
|
return diff.tv_sec * 1000 + diff.tv_usec / 1000; |
|
} |
|
|
|
static void |
|
mld_start_listening(struct in6_multi *in6m) |
|
{ |
|
struct in6_addr all_in6; |
|
|
/* |
/* |
* RFC2710 page 10: |
* RFC2710 page 10: |
* The node never sends a Report or Done for the link-scope all-nodes |
* The node never sends a Report or Done for the link-scope all-nodes |
Line 179 mld6_start_listening(in6m) |
|
Line 275 mld6_start_listening(in6m) |
|
* MLD messages are never sent for multicast addresses whose scope is 0 |
* MLD messages are never sent for multicast addresses whose scope is 0 |
* (reserved) or 1 (node-local). |
* (reserved) or 1 (node-local). |
*/ |
*/ |
mld_all_nodes_linklocal.s6_addr16[1] = |
all_in6 = in6addr_linklocal_allnodes; |
htons(in6m->in6m_ifp->if_index); /* XXX */ |
if (in6_setscope(&all_in6, in6m->in6m_ifp, NULL)) { |
if (IN6_ARE_ADDR_EQUAL(&in6m->in6m_addr, &mld_all_nodes_linklocal) || |
/* XXX: this should not happen! */ |
IPV6_ADDR_MC_SCOPE(&in6m->in6m_addr) < IPV6_ADDR_SCOPE_LINKLOCAL) { |
|
in6m->in6m_timer = 0; |
in6m->in6m_timer = 0; |
in6m->in6m_state = MLD_OTHERLISTENER; |
in6m->in6m_state = MLD_OTHERLISTENER; |
|
} |
|
if (IN6_ARE_ADDR_EQUAL(&in6m->in6m_addr, &all_in6) || |
|
IPV6_ADDR_MC_SCOPE(&in6m->in6m_addr) < IPV6_ADDR_SCOPE_LINKLOCAL) { |
|
in6m->in6m_timer = IN6M_TIMER_UNDEF; |
|
in6m->in6m_state = MLD_OTHERLISTENER; |
} else { |
} else { |
mld6_sendpkt(in6m, MLD_LISTENER_REPORT, NULL); |
mld_sendpkt(in6m, MLD_LISTENER_REPORT, NULL); |
in6m->in6m_timer = |
in6m->in6m_timer = cprng_fast32() % |
MLD_RANDOM_DELAY(MLD_UNSOLICITED_REPORT_INTERVAL * |
(MLD_UNSOLICITED_REPORT_INTERVAL * hz); |
PR_FASTHZ); |
|
in6m->in6m_state = MLD_IREPORTEDLAST; |
in6m->in6m_state = MLD_IREPORTEDLAST; |
mld_timers_are_running = 1; |
|
|
mld_starttimer(in6m); |
} |
} |
} |
} |
|
|
void |
static void |
mld6_stop_listening(in6m) |
mld_stop_listening(struct in6_multi *in6m) |
struct in6_multi *in6m; |
|
{ |
{ |
mld_all_nodes_linklocal.s6_addr16[1] = |
struct in6_addr allnode, allrouter; |
htons(in6m->in6m_ifp->if_index); /* XXX */ |
|
mld_all_routers_linklocal.s6_addr16[1] = |
allnode = in6addr_linklocal_allnodes; |
htons(in6m->in6m_ifp->if_index); /* XXX: necessary when mrouting */ |
if (in6_setscope(&allnode, in6m->in6m_ifp, NULL)) { |
|
/* XXX: this should not happen! */ |
|
return; |
|
} |
|
allrouter = in6addr_linklocal_allrouters; |
|
if (in6_setscope(&allrouter, in6m->in6m_ifp, NULL)) { |
|
/* XXX impossible */ |
|
return; |
|
} |
|
|
if (in6m->in6m_state == MLD_IREPORTEDLAST && |
if (in6m->in6m_state == MLD_IREPORTEDLAST && |
(!IN6_ARE_ADDR_EQUAL(&in6m->in6m_addr, &mld_all_nodes_linklocal)) && |
(!IN6_ARE_ADDR_EQUAL(&in6m->in6m_addr, &allnode)) && |
IPV6_ADDR_MC_SCOPE(&in6m->in6m_addr) > IPV6_ADDR_SCOPE_NODELOCAL) |
IPV6_ADDR_MC_SCOPE(&in6m->in6m_addr) > |
mld6_sendpkt(in6m, MLD_LISTENER_DONE, |
IPV6_ADDR_SCOPE_INTFACELOCAL) { |
&mld_all_routers_linklocal); |
mld_sendpkt(in6m, MLD_LISTENER_DONE, &allrouter); |
|
} |
} |
} |
|
|
void |
void |
mld6_input(m, off) |
mld_input(struct mbuf *m, int off) |
struct mbuf *m; |
|
int off; |
|
{ |
{ |
struct ip6_hdr *ip6 = mtod(m, struct ip6_hdr *); |
struct ip6_hdr *ip6; |
struct mld_hdr *mldh; |
struct mld_hdr *mldh; |
struct ifnet *ifp = m->m_pkthdr.rcvif; |
struct ifnet *ifp; |
struct in6_multi *in6m; |
struct in6_multi *in6m = NULL; |
struct in6_ifaddr *ia; |
struct in6_addr mld_addr, all_in6; |
int timer; /* timer value in the MLD query header */ |
u_long timer = 0; /* timer value in the MLD query header */ |
|
struct psref psref; |
|
|
|
ifp = m_get_rcvif_psref(m, &psref); |
|
if (__predict_false(ifp == NULL)) |
|
goto out; |
IP6_EXTHDR_GET(mldh, struct mld_hdr *, m, off, sizeof(*mldh)); |
IP6_EXTHDR_GET(mldh, struct mld_hdr *, m, off, sizeof(*mldh)); |
if (mldh == NULL) { |
if (mldh == NULL) { |
icmp6stat.icp6s_tooshort++; |
ICMP6_STATINC(ICMP6_STAT_TOOSHORT); |
return; |
goto out_nodrop; |
} |
} |
|
|
/* source address validation */ |
/* source address validation */ |
ip6 = mtod(m, struct ip6_hdr *);/* in case mpullup */ |
ip6 = mtod(m, struct ip6_hdr *);/* in case mpullup */ |
if (!IN6_IS_ADDR_LINKLOCAL(&ip6->ip6_src)) { |
if (!IN6_IS_ADDR_LINKLOCAL(&ip6->ip6_src)) { |
|
/* |
|
* RFC3590 allows the IPv6 unspecified address as the source |
|
* address of MLD report and done messages. However, as this |
|
* same document says, this special rule is for snooping |
|
* switches and the RFC requires routers to discard MLD packets |
|
* with the unspecified source address. The RFC only talks |
|
* about hosts receiving an MLD query or report in Security |
|
* Considerations, but this is probably the correct intention. |
|
* RFC3590 does not talk about other cases than link-local and |
|
* the unspecified source addresses, but we believe the same |
|
* rule should be applied. |
|
* As a result, we only allow link-local addresses as the |
|
* source address; otherwise, simply discard the packet. |
|
*/ |
#if 0 |
#if 0 |
log(LOG_ERR, |
|
"mld_input: src %s is not link-local (grp=%s)\n", |
|
ip6_sprintf(&ip6->ip6_src), |
|
ip6_sprintf(&mldh->mld_addr)); |
|
#endif |
|
/* |
/* |
* spec (RFC2710) does not explicitly |
* XXX: do not log in an input path to avoid log flooding, |
* specify to discard the packet from a non link-local |
* though RFC3590 says "SHOULD log" if the source of a query |
* source address. But we believe it's expected to do so. |
* is the unspecified address. |
* XXX: do we have to allow :: as source? |
|
*/ |
*/ |
m_freem(m); |
char ip6bufs[INET6_ADDRSTRLEN]; |
return; |
char ip6bufm[INET6_ADDRSTRLEN]; |
|
log(LOG_INFO, |
|
"mld_input: src %s is not link-local (grp=%s)\n", |
|
IN6_PRINT(ip6bufs,&ip6->ip6_src), |
|
IN6_PRINT(ip6bufm, &mldh->mld_addr)); |
|
#endif |
|
goto out; |
} |
} |
|
|
/* |
/* |
* In the MLD6 specification, there are 3 states and a flag. |
* make a copy for local work (in6_setscope() may modify the 1st arg) |
|
*/ |
|
mld_addr = mldh->mld_addr; |
|
if (in6_setscope(&mld_addr, ifp, NULL)) { |
|
/* XXX: this should not happen! */ |
|
goto out; |
|
} |
|
|
|
/* |
|
* In the MLD specification, there are 3 states and a flag. |
* |
* |
* In Non-Listener state, we simply don't have a membership record. |
* In Non-Listener state, we simply don't have a membership record. |
* In Delaying Listener state, our timer is running (in6m->in6m_timer) |
* In Delaying Listener state, our timer is running (in6m->in6m_timer) |
* In Idle Listener state, our timer is not running (in6m->in6m_timer==0) |
* In Idle Listener state, our timer is not running |
|
* (in6m->in6m_timer==IN6M_TIMER_UNDEF) |
* |
* |
* The flag is in6m->in6m_state, it is set to MLD_OTHERLISTENER if |
* The flag is in6m->in6m_state, it is set to MLD_OTHERLISTENER if |
* we have heard a report from another member, or MLD_IREPORTEDLAST |
* we have heard a report from another member, or MLD_IREPORTEDLAST |
* if we sent the last report. |
* if we sent the last report. |
*/ |
*/ |
switch (mldh->mld_type) { |
switch (mldh->mld_type) { |
case MLD_LISTENER_QUERY: |
case MLD_LISTENER_QUERY: { |
if (ifp->if_flags & IFF_LOOPBACK) |
if (ifp->if_flags & IFF_LOOPBACK) |
break; |
break; |
|
|
if (!IN6_IS_ADDR_UNSPECIFIED(&mldh->mld_addr) && |
if (!IN6_IS_ADDR_UNSPECIFIED(&mld_addr) && |
!IN6_IS_ADDR_MULTICAST(&mldh->mld_addr)) |
!IN6_IS_ADDR_MULTICAST(&mld_addr)) |
break; /* print error or log stat? */ |
break; /* print error or log stat? */ |
if (IN6_IS_ADDR_MC_LINKLOCAL(&mldh->mld_addr)) |
|
mldh->mld_addr.s6_addr16[1] = |
all_in6 = in6addr_linklocal_allnodes; |
htons(ifp->if_index); /* XXX */ |
if (in6_setscope(&all_in6, ifp, NULL)) { |
|
/* XXX: this should not happen! */ |
|
break; |
|
} |
|
|
/* |
/* |
* - Start the timers in all of our membership records |
* - Start the timers in all of our membership records |
Line 277 mld6_input(m, off) |
|
Line 414 mld6_input(m, off) |
|
* which the query arrived excl. those that belong |
* which the query arrived excl. those that belong |
* to the "all-nodes" group (ff02::1). |
* to the "all-nodes" group (ff02::1). |
* - Restart any timer that is already running but has |
* - Restart any timer that is already running but has |
* A value longer than the requested timeout. |
* a value longer than the requested timeout. |
* - Use the value specified in the query message as |
* - Use the value specified in the query message as |
* the maximum timeout. |
* the maximum timeout. |
*/ |
*/ |
IFP_TO_IA6(ifp, ia); |
timer = ntohs(mldh->mld_maxdelay); |
if (ia == NULL) |
|
break; |
|
|
|
/* |
LIST_FOREACH(in6m, &ifp->if_multiaddrs, in6m_entry) { |
* XXX: System timer resolution is too low to handle Max |
if (IN6_ARE_ADDR_EQUAL(&in6m->in6m_addr, &all_in6) || |
* Response Delay, so set 1 to the internal timer even if |
|
* the calculated value equals to zero when Max Response |
|
* Delay is positive. |
|
*/ |
|
timer = ntohs(mldh->mld_maxdelay)*PR_FASTHZ/MLD_TIMER_SCALE; |
|
if (timer == 0 && mldh->mld_maxdelay) |
|
timer = 1; |
|
mld_all_nodes_linklocal.s6_addr16[1] = |
|
htons(ifp->if_index); /* XXX */ |
|
|
|
for (in6m = ia->ia6_multiaddrs.lh_first; |
|
in6m; |
|
in6m = in6m->in6m_entry.le_next) |
|
{ |
|
if (IN6_ARE_ADDR_EQUAL(&in6m->in6m_addr, |
|
&mld_all_nodes_linklocal) || |
|
IPV6_ADDR_MC_SCOPE(&in6m->in6m_addr) < |
IPV6_ADDR_MC_SCOPE(&in6m->in6m_addr) < |
IPV6_ADDR_SCOPE_LINKLOCAL) |
IPV6_ADDR_SCOPE_LINKLOCAL) |
continue; |
continue; |
|
|
if (IN6_IS_ADDR_UNSPECIFIED(&mldh->mld_addr) || |
if (in6m->in6m_state == MLD_REPORTPENDING) |
IN6_ARE_ADDR_EQUAL(&mldh->mld_addr, |
continue; /* we are not yet ready */ |
&in6m->in6m_addr)) |
|
{ |
if (!IN6_IS_ADDR_UNSPECIFIED(&mld_addr) && |
if (timer == 0) { |
!IN6_ARE_ADDR_EQUAL(&mld_addr, &in6m->in6m_addr)) |
/* send a report immediately */ |
continue; |
mld6_sendpkt(in6m, MLD_LISTENER_REPORT, |
|
NULL); |
if (timer == 0) { |
in6m->in6m_timer = 0; /* reset timer */ |
/* send a report immediately */ |
in6m->in6m_state = MLD_IREPORTEDLAST; |
mld_stoptimer(in6m); |
} |
mld_sendpkt(in6m, MLD_LISTENER_REPORT, NULL); |
else if (in6m->in6m_timer == 0 || /*idle state*/ |
in6m->in6m_state = MLD_IREPORTEDLAST; |
in6m->in6m_timer > timer) { |
} else if (in6m->in6m_timer == IN6M_TIMER_UNDEF || |
in6m->in6m_timer = |
mld_timerresid(in6m) > timer) { |
MLD_RANDOM_DELAY(timer); |
in6m->in6m_timer = |
mld_timers_are_running = 1; |
1 + (cprng_fast32() % timer) * hz / 1000; |
} |
mld_starttimer(in6m); |
} |
} |
} |
} |
|
|
if (IN6_IS_ADDR_MC_LINKLOCAL(&mldh->mld_addr)) |
|
mldh->mld_addr.s6_addr16[1] = 0; /* XXX */ |
|
break; |
break; |
|
} |
|
|
case MLD_LISTENER_REPORT: |
case MLD_LISTENER_REPORT: |
/* |
/* |
* For fast leave to work, we have to know that we are the |
* For fast leave to work, we have to know that we are the |
Line 346 mld6_input(m, off) |
|
Line 464 mld6_input(m, off) |
|
if (!IN6_IS_ADDR_MULTICAST(&mldh->mld_addr)) |
if (!IN6_IS_ADDR_MULTICAST(&mldh->mld_addr)) |
break; |
break; |
|
|
if (IN6_IS_ADDR_MC_LINKLOCAL(&mldh->mld_addr)) |
|
mldh->mld_addr.s6_addr16[1] = |
|
htons(ifp->if_index); /* XXX */ |
|
/* |
/* |
* If we belong to the group being reported, stop |
* If we belong to the group being reported, stop |
* our timer for that group. |
* our timer for that group. |
*/ |
*/ |
IN6_LOOKUP_MULTI(mldh->mld_addr, ifp, in6m); |
in6m = in6_lookup_multi(&mld_addr, ifp); |
if (in6m) { |
if (in6m) { |
in6m->in6m_timer = 0; /* transit to idle state */ |
mld_stoptimer(in6m); /* transit to idle state */ |
in6m->in6m_state = MLD_OTHERLISTENER; /* clear flag */ |
in6m->in6m_state = MLD_OTHERLISTENER; /* clear flag */ |
} |
} |
|
|
if (IN6_IS_ADDR_MC_LINKLOCAL(&mldh->mld_addr)) |
|
mldh->mld_addr.s6_addr16[1] = 0; /* XXX */ |
|
break; |
break; |
default: /* this is impossible */ |
default: /* this is impossible */ |
#if 0 |
#if 0 |
Line 369 mld6_input(m, off) |
|
Line 481 mld6_input(m, off) |
|
* icmp6_input(). But we explicitly disabled this part |
* icmp6_input(). But we explicitly disabled this part |
* just in case. |
* just in case. |
*/ |
*/ |
log(LOG_ERR, "mld_input: illegal type(%d)", mldh->mld6_type); |
log(LOG_ERR, "mld_input: illegal type(%d)", mldh->mld_type); |
#endif |
#endif |
break; |
break; |
} |
} |
|
|
|
out: |
m_freem(m); |
m_freem(m); |
} |
out_nodrop: |
|
m_put_rcvif_psref(ifp, &psref); |
void |
|
mld6_fasttimeo() |
|
{ |
|
struct in6_multi *in6m; |
|
struct in6_multistep step; |
|
int s; |
|
/* |
|
* Quick check to see if any work needs to be done, in order |
|
* to minimize the overhead of fasttimo processing. |
|
*/ |
|
if (!mld_timers_are_running) |
|
return; |
|
|
|
s = splsoftnet(); |
|
mld_timers_are_running = 0; |
|
IN6_FIRST_MULTI(step, in6m); |
|
while (in6m != NULL) { |
|
if (in6m->in6m_timer == 0) { |
|
/* do nothing */ |
|
} else if (--in6m->in6m_timer == 0) { |
|
mld6_sendpkt(in6m, MLD_LISTENER_REPORT, NULL); |
|
in6m->in6m_state = MLD_IREPORTEDLAST; |
|
} else { |
|
mld_timers_are_running = 1; |
|
} |
|
IN6_NEXT_MULTI(step, in6m); |
|
} |
|
splx(s); |
|
} |
} |
|
|
static void |
static void |
mld6_sendpkt(in6m, type, dst) |
mld_sendpkt(struct in6_multi *in6m, int type, |
struct in6_multi *in6m; |
const struct in6_addr *dst) |
int type; |
|
const struct in6_addr *dst; |
|
{ |
{ |
struct mbuf *mh, *md; |
struct mbuf *mh; |
struct mld_hdr *mldh; |
struct mld_hdr *mldh; |
struct ip6_hdr *ip6; |
struct ip6_hdr *ip6 = NULL; |
struct ip6_moptions im6o; |
struct ip6_moptions im6o; |
struct in6_ifaddr *ia; |
struct in6_ifaddr *ia = NULL; |
struct ifnet *ifp = in6m->in6m_ifp; |
struct ifnet *ifp = in6m->in6m_ifp; |
int ignflags; |
int ignflags; |
|
struct psref psref; |
|
int bound; |
|
|
/* |
/* |
* At first, find a link local address on the outgoing interface |
* At first, find a link local address on the outgoing interface |
Line 428 mld6_sendpkt(in6m, type, dst) |
|
Line 513 mld6_sendpkt(in6m, type, dst) |
|
* the case where we first join a link-local address. |
* the case where we first join a link-local address. |
*/ |
*/ |
ignflags = (IN6_IFF_NOTREADY|IN6_IFF_ANYCAST) & ~IN6_IFF_TENTATIVE; |
ignflags = (IN6_IFF_NOTREADY|IN6_IFF_ANYCAST) & ~IN6_IFF_TENTATIVE; |
if ((ia = in6ifa_ifpforlinklocal(ifp, ignflags)) == NULL) |
bound = curlwp_bind(); |
|
ia = in6ifa_ifpforlinklocal_psref(ifp, ignflags, &psref); |
|
if (ia == NULL) { |
|
curlwp_bindx(bound); |
return; |
return; |
if ((ia->ia6_flags & IN6_IFF_TENTATIVE)) |
} |
|
if ((ia->ia6_flags & IN6_IFF_TENTATIVE)) { |
|
ia6_release(ia, &psref); |
ia = NULL; |
ia = NULL; |
|
} |
|
|
/* |
/* Allocate two mbufs to store IPv6 header and MLD header */ |
* Allocate mbufs to store ip6 header and MLD header. |
mldh = mld_allocbuf(&mh, sizeof(struct mld_hdr), in6m, type); |
* We allocate 2 mbufs and make chain in advance because |
if (mldh == NULL) { |
* it is more convenient when inserting the hop-by-hop option later. |
ia6_release(ia, &psref); |
*/ |
curlwp_bindx(bound); |
MGETHDR(mh, M_DONTWAIT, MT_HEADER); |
|
if (mh == NULL) |
|
return; |
|
MGET(md, M_DONTWAIT, MT_DATA); |
|
if (md == NULL) { |
|
m_free(mh); |
|
return; |
return; |
} |
} |
mh->m_next = md; |
|
|
|
mh->m_pkthdr.rcvif = NULL; |
|
mh->m_pkthdr.len = sizeof(struct ip6_hdr) + sizeof(struct mld_hdr); |
|
mh->m_len = sizeof(struct ip6_hdr); |
|
MH_ALIGN(mh, sizeof(struct ip6_hdr)); |
|
|
|
/* fill in the ip6 header */ |
/* fill src/dst here */ |
ip6 = mtod(mh, struct ip6_hdr *); |
ip6 = mtod(mh, struct ip6_hdr *); |
ip6->ip6_flow = 0; |
ip6->ip6_src = ia ? ia->ia_addr.sin6_addr : in6addr_any; |
ip6->ip6_vfc &= ~IPV6_VERSION_MASK; |
ip6->ip6_dst = dst ? *dst : in6m->in6m_addr; |
ip6->ip6_vfc |= IPV6_VERSION; |
ia6_release(ia, &psref); |
/* ip6_plen will be set later */ |
curlwp_bindx(bound); |
ip6->ip6_nxt = IPPROTO_ICMPV6; |
|
/* ip6_hlim will be set by im6o.im6o_multicast_hlim */ |
|
ip6->ip6_src = ia ? ia->ia_addr.sin6_addr : in6addr_any; |
|
ip6->ip6_dst = dst ? *dst : in6m->in6m_addr; |
|
|
|
/* fill in the MLD header */ |
|
md->m_len = sizeof(struct mld_hdr); |
|
mldh = mtod(md, struct mld_hdr *); |
|
mldh->mld_type = type; |
|
mldh->mld_code = 0; |
|
mldh->mld_cksum = 0; |
|
/* XXX: we assume the function will not be called for query messages */ |
|
mldh->mld_maxdelay = 0; |
|
mldh->mld_reserved = 0; |
|
mldh->mld_addr = in6m->in6m_addr; |
mldh->mld_addr = in6m->in6m_addr; |
if (IN6_IS_ADDR_MC_LINKLOCAL(&mldh->mld_addr)) |
in6_clearscope(&mldh->mld_addr); /* XXX */ |
mldh->mld_addr.s6_addr16[1] = 0; /* XXX */ |
|
mldh->mld_cksum = in6_cksum(mh, IPPROTO_ICMPV6, sizeof(struct ip6_hdr), |
mldh->mld_cksum = in6_cksum(mh, IPPROTO_ICMPV6, sizeof(struct ip6_hdr), |
sizeof(struct mld_hdr)); |
sizeof(struct mld_hdr)); |
|
|
/* construct multicast option */ |
/* construct multicast option */ |
bzero(&im6o, sizeof(im6o)); |
memset(&im6o, 0, sizeof(im6o)); |
im6o.im6o_multicast_ifp = ifp; |
im6o.im6o_multicast_if_index = if_get_index(ifp); |
im6o.im6o_multicast_hlim = 1; |
im6o.im6o_multicast_hlim = 1; |
|
|
/* |
/* |
Line 491 mld6_sendpkt(in6m, type, dst) |
|
Line 556 mld6_sendpkt(in6m, type, dst) |
|
im6o.im6o_multicast_loop = (ip6_mrouter != NULL); |
im6o.im6o_multicast_loop = (ip6_mrouter != NULL); |
|
|
/* increment output statictics */ |
/* increment output statictics */ |
icmp6stat.icp6s_outhist[type]++; |
ICMP6_STATINC(ICMP6_STAT_OUTHIST + type); |
icmp6_ifstat_inc(ifp, ifs6_out_msg); |
icmp6_ifstat_inc(ifp, ifs6_out_msg); |
switch (type) { |
switch (type) { |
case MLD_LISTENER_QUERY: |
case MLD_LISTENER_QUERY: |
Line 506 mld6_sendpkt(in6m, type, dst) |
|
Line 571 mld6_sendpkt(in6m, type, dst) |
|
} |
} |
|
|
ip6_output(mh, &ip6_opts, NULL, ia ? 0 : IPV6_UNSPECSRC, |
ip6_output(mh, &ip6_opts, NULL, ia ? 0 : IPV6_UNSPECSRC, |
&im6o, (struct socket *)NULL, NULL); |
&im6o, NULL, NULL); |
|
} |
|
|
|
static struct mld_hdr * |
|
mld_allocbuf(struct mbuf **mh, int len, struct in6_multi *in6m, |
|
int type) |
|
{ |
|
struct mbuf *md; |
|
struct mld_hdr *mldh; |
|
struct ip6_hdr *ip6; |
|
|
|
/* |
|
* Allocate mbufs to store ip6 header and MLD header. |
|
* We allocate 2 mbufs and make chain in advance because |
|
* it is more convenient when inserting the hop-by-hop option later. |
|
*/ |
|
MGETHDR(*mh, M_DONTWAIT, MT_HEADER); |
|
if (*mh == NULL) |
|
return NULL; |
|
MGET(md, M_DONTWAIT, MT_DATA); |
|
if (md == NULL) { |
|
m_free(*mh); |
|
*mh = NULL; |
|
return NULL; |
|
} |
|
(*mh)->m_next = md; |
|
md->m_next = NULL; |
|
|
|
m_reset_rcvif((*mh)); |
|
(*mh)->m_pkthdr.len = sizeof(struct ip6_hdr) + len; |
|
(*mh)->m_len = sizeof(struct ip6_hdr); |
|
MH_ALIGN(*mh, sizeof(struct ip6_hdr)); |
|
|
|
/* fill in the ip6 header */ |
|
ip6 = mtod(*mh, struct ip6_hdr *); |
|
memset(ip6, 0, sizeof(*ip6)); |
|
ip6->ip6_flow = 0; |
|
ip6->ip6_vfc &= ~IPV6_VERSION_MASK; |
|
ip6->ip6_vfc |= IPV6_VERSION; |
|
/* ip6_plen will be set later */ |
|
ip6->ip6_nxt = IPPROTO_ICMPV6; |
|
/* ip6_hlim will be set by im6o.im6o_multicast_hlim */ |
|
/* ip6_src/dst will be set by mld_sendpkt() or mld_sendbuf() */ |
|
|
|
/* fill in the MLD header as much as possible */ |
|
md->m_len = len; |
|
mldh = mtod(md, struct mld_hdr *); |
|
memset(mldh, 0, len); |
|
mldh->mld_type = type; |
|
return mldh; |
|
} |
|
|
|
/* |
|
* Add an address to the list of IP6 multicast addresses for a given interface. |
|
*/ |
|
struct in6_multi * |
|
in6_addmulti(struct in6_addr *maddr6, struct ifnet *ifp, |
|
int *errorp, int timer) |
|
{ |
|
struct sockaddr_in6 sin6; |
|
struct in6_multi *in6m; |
|
int s = splsoftnet(); |
|
|
|
*errorp = 0; |
|
|
|
/* |
|
* See if address already in list. |
|
*/ |
|
in6m = in6_lookup_multi(maddr6, ifp); |
|
if (in6m != NULL) { |
|
/* |
|
* Found it; just increment the refrence count. |
|
*/ |
|
in6m->in6m_refcount++; |
|
} else { |
|
/* |
|
* New address; allocate a new multicast record |
|
* and link it into the interface's multicast list. |
|
*/ |
|
in6m = (struct in6_multi *) |
|
malloc(sizeof(*in6m), M_IPMADDR, M_NOWAIT|M_ZERO); |
|
if (in6m == NULL) { |
|
splx(s); |
|
*errorp = ENOBUFS; |
|
return (NULL); |
|
} |
|
|
|
in6m->in6m_addr = *maddr6; |
|
in6m->in6m_ifp = ifp; |
|
in6m->in6m_refcount = 1; |
|
in6m->in6m_timer = IN6M_TIMER_UNDEF; |
|
callout_init(&in6m->in6m_timer_ch, CALLOUT_MPSAFE); |
|
callout_setfunc(&in6m->in6m_timer_ch, mld_timeo, in6m); |
|
|
|
/* FIXME NOMPSAFE: need to lock */ |
|
LIST_INSERT_HEAD(&ifp->if_multiaddrs, in6m, in6m_entry); |
|
|
|
/* |
|
* Ask the network driver to update its multicast reception |
|
* filter appropriately for the new address. |
|
*/ |
|
sockaddr_in6_init(&sin6, maddr6, 0, 0, 0); |
|
*errorp = if_mcast_op(ifp, SIOCADDMULTI, sin6tosa(&sin6)); |
|
if (*errorp) { |
|
callout_destroy(&in6m->in6m_timer_ch); |
|
LIST_REMOVE(in6m, in6m_entry); |
|
free(in6m, M_IPMADDR); |
|
splx(s); |
|
return (NULL); |
|
} |
|
|
|
in6m->in6m_timer = timer; |
|
if (in6m->in6m_timer > 0) { |
|
in6m->in6m_state = MLD_REPORTPENDING; |
|
mld_starttimer(in6m); |
|
|
|
splx(s); |
|
return (in6m); |
|
} |
|
|
|
/* |
|
* Let MLD6 know that we have joined a new IP6 multicast |
|
* group. |
|
*/ |
|
mld_start_listening(in6m); |
|
} |
|
splx(s); |
|
return (in6m); |
|
} |
|
|
|
/* |
|
* Delete a multicast address record. |
|
*/ |
|
void |
|
in6_delmulti(struct in6_multi *in6m) |
|
{ |
|
struct sockaddr_in6 sin6; |
|
struct in6_ifaddr *ia; |
|
int s = splsoftnet(); |
|
|
|
mld_stoptimer(in6m); |
|
|
|
if (--in6m->in6m_refcount == 0) { |
|
int _s; |
|
|
|
/* |
|
* No remaining claims to this record; let MLD6 know |
|
* that we are leaving the multicast group. |
|
*/ |
|
mld_stop_listening(in6m); |
|
|
|
/* |
|
* Unlink from list. |
|
*/ |
|
/* FIXME NOMPSAFE: need to lock */ |
|
LIST_REMOVE(in6m, in6m_entry); |
|
|
|
/* |
|
* Delete all references of this multicasting group from |
|
* the membership arrays |
|
*/ |
|
_s = pserialize_read_enter(); |
|
IN6_ADDRLIST_READER_FOREACH(ia) { |
|
struct in6_multi_mship *imm; |
|
LIST_FOREACH(imm, &ia->ia6_memberships, i6mm_chain) { |
|
if (imm->i6mm_maddr == in6m) |
|
imm->i6mm_maddr = NULL; |
|
} |
|
} |
|
pserialize_read_exit(_s); |
|
|
|
/* |
|
* Notify the network driver to update its multicast |
|
* reception filter. |
|
*/ |
|
sockaddr_in6_init(&sin6, &in6m->in6m_addr, 0, 0, 0); |
|
if_mcast_op(in6m->in6m_ifp, SIOCDELMULTI, sin6tosa(&sin6)); |
|
|
|
/* Tell mld_timeo we're halting the timer */ |
|
in6m->in6m_timer = IN6M_TIMER_UNDEF; |
|
if (mutex_owned(softnet_lock)) |
|
callout_halt(&in6m->in6m_timer_ch, softnet_lock); |
|
else |
|
callout_halt(&in6m->in6m_timer_ch, NULL); |
|
callout_destroy(&in6m->in6m_timer_ch); |
|
|
|
free(in6m, M_IPMADDR); |
|
} |
|
splx(s); |
|
} |
|
|
|
/* |
|
* Look up the in6_multi record for a given IP6 multicast address |
|
* on a given interface. If no matching record is found, "in6m" |
|
* returns NULL. |
|
*/ |
|
struct in6_multi * |
|
in6_lookup_multi(const struct in6_addr *addr, const struct ifnet *ifp) |
|
{ |
|
struct in6_multi *in6m; |
|
|
|
/* XXX NOMPSAFE */ |
|
LIST_FOREACH(in6m, &ifp->if_multiaddrs, in6m_entry) { |
|
if (IN6_ARE_ADDR_EQUAL(&in6m->in6m_addr, addr)) |
|
break; |
|
} |
|
return in6m; |
|
} |
|
|
|
bool |
|
in6_multi_group(const struct in6_addr *addr, const struct ifnet *ifp) |
|
{ |
|
bool ingroup; |
|
|
|
ingroup = in6_lookup_multi(addr, ifp) != NULL; |
|
|
|
return ingroup; |
|
} |
|
|
|
/* |
|
* Purge in6_multi records associated to the interface. |
|
*/ |
|
void |
|
in6_purge_multi(struct ifnet *ifp) |
|
{ |
|
struct in6_multi *in6m, *next; |
|
|
|
/* XXX NOMPSAFE */ |
|
LIST_FOREACH_SAFE(in6m, &ifp->if_multiaddrs, in6m_entry, next) { |
|
in6_delmulti(in6m); |
|
} |
|
} |
|
|
|
struct in6_multi_mship * |
|
in6_joingroup(struct ifnet *ifp, struct in6_addr *addr, |
|
int *errorp, int timer) |
|
{ |
|
struct in6_multi_mship *imm; |
|
|
|
imm = malloc(sizeof(*imm), M_IPMADDR, M_NOWAIT|M_ZERO); |
|
if (imm == NULL) { |
|
*errorp = ENOBUFS; |
|
return NULL; |
|
} |
|
|
|
imm->i6mm_maddr = in6_addmulti(addr, ifp, errorp, timer); |
|
if (!imm->i6mm_maddr) { |
|
/* *errorp is already set */ |
|
free(imm, M_IPMADDR); |
|
return NULL; |
|
} |
|
return imm; |
|
} |
|
|
|
int |
|
in6_leavegroup(struct in6_multi_mship *imm) |
|
{ |
|
|
|
if (imm->i6mm_maddr) { |
|
in6_delmulti(imm->i6mm_maddr); |
|
} |
|
free(imm, M_IPMADDR); |
|
return 0; |
|
} |
|
|
|
/* |
|
* DEPRECATED: keep it just to avoid breaking old sysctl users. |
|
*/ |
|
static int |
|
in6_mkludge_sysctl(SYSCTLFN_ARGS) |
|
{ |
|
|
|
if (namelen != 1) |
|
return EINVAL; |
|
*oldlenp = 0; |
|
return 0; |
|
} |
|
|
|
static int |
|
in6_multicast_sysctl(SYSCTLFN_ARGS) |
|
{ |
|
struct ifnet *ifp; |
|
struct ifaddr *ifa; |
|
struct in6_ifaddr *ia6; |
|
struct in6_multi *in6m; |
|
uint32_t tmp; |
|
int error; |
|
size_t written; |
|
struct psref psref, psref_ia; |
|
int bound, s; |
|
|
|
if (namelen != 1) |
|
return EINVAL; |
|
|
|
bound = curlwp_bind(); |
|
ifp = if_get_byindex(name[0], &psref); |
|
if (ifp == NULL) { |
|
curlwp_bindx(bound); |
|
return ENODEV; |
|
} |
|
|
|
if (oldp == NULL) { |
|
*oldlenp = 0; |
|
s = pserialize_read_enter(); |
|
IFADDR_READER_FOREACH(ifa, ifp) { |
|
LIST_FOREACH(in6m, &ifp->if_multiaddrs, in6m_entry) { |
|
*oldlenp += 2 * sizeof(struct in6_addr) + |
|
sizeof(uint32_t); |
|
} |
|
} |
|
pserialize_read_exit(s); |
|
if_put(ifp, &psref); |
|
curlwp_bindx(bound); |
|
return 0; |
|
} |
|
|
|
error = 0; |
|
written = 0; |
|
s = pserialize_read_enter(); |
|
IFADDR_READER_FOREACH(ifa, ifp) { |
|
if (ifa->ifa_addr->sa_family != AF_INET6) |
|
continue; |
|
|
|
ifa_acquire(ifa, &psref_ia); |
|
pserialize_read_exit(s); |
|
|
|
ia6 = ifatoia6(ifa); |
|
LIST_FOREACH(in6m, &ifp->if_multiaddrs, in6m_entry) { |
|
if (written + 2 * sizeof(struct in6_addr) + |
|
sizeof(uint32_t) > *oldlenp) |
|
goto done; |
|
/* |
|
* XXX return the first IPv6 address to keep backward |
|
* compatibility, however now multicast addresses |
|
* don't belong to any IPv6 addresses so it should be |
|
* unnecessary. |
|
*/ |
|
error = sysctl_copyout(l, &ia6->ia_addr.sin6_addr, |
|
oldp, sizeof(struct in6_addr)); |
|
if (error) |
|
goto done; |
|
oldp = (char *)oldp + sizeof(struct in6_addr); |
|
written += sizeof(struct in6_addr); |
|
error = sysctl_copyout(l, &in6m->in6m_addr, |
|
oldp, sizeof(struct in6_addr)); |
|
if (error) |
|
goto done; |
|
oldp = (char *)oldp + sizeof(struct in6_addr); |
|
written += sizeof(struct in6_addr); |
|
tmp = in6m->in6m_refcount; |
|
error = sysctl_copyout(l, &tmp, oldp, sizeof(tmp)); |
|
if (error) |
|
goto done; |
|
oldp = (char *)oldp + sizeof(tmp); |
|
written += sizeof(tmp); |
|
} |
|
|
|
s = pserialize_read_enter(); |
|
ifa_release(ifa, &psref_ia); |
|
|
|
break; |
|
} |
|
pserialize_read_exit(s); |
|
done: |
|
ifa_release(ifa, &psref_ia); |
|
if_put(ifp, &psref); |
|
curlwp_bindx(bound); |
|
*oldlenp = written; |
|
return error; |
|
} |
|
|
|
void |
|
in6_sysctl_multicast_setup(struct sysctllog **clog) |
|
{ |
|
|
|
sysctl_createv(clog, 0, NULL, NULL, |
|
CTLFLAG_PERMANENT, |
|
CTLTYPE_NODE, "inet6", NULL, |
|
NULL, 0, NULL, 0, |
|
CTL_NET, PF_INET6, CTL_EOL); |
|
|
|
sysctl_createv(clog, 0, NULL, NULL, |
|
CTLFLAG_PERMANENT, |
|
CTLTYPE_NODE, "multicast", |
|
SYSCTL_DESCR("Multicast information"), |
|
in6_multicast_sysctl, 0, NULL, 0, |
|
CTL_NET, PF_INET6, CTL_CREATE, CTL_EOL); |
|
|
|
sysctl_createv(clog, 0, NULL, NULL, |
|
CTLFLAG_PERMANENT, |
|
CTLTYPE_NODE, "multicast_kludge", |
|
SYSCTL_DESCR("multicast kludge information"), |
|
in6_mkludge_sysctl, 0, NULL, 0, |
|
CTL_NET, PF_INET6, CTL_CREATE, CTL_EOL); |
} |
} |