1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
|
/*
* Author: Steven Barth <steven at midlink.org>
*
* Copyright 2015 Deutsche Telekom AG
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
* See the License for the specific language governing permissions and
* limitations under the License.
*
*/
#include <errno.h>
#include <stdlib.h>
#include <arpa/inet.h>
#include <sys/ioctl.h>
#include <sys/socket.h>
#include <sys/timerfd.h>
#include <netinet/in.h>
#include <netinet/ip6.h>
#include <netinet/icmp6.h>
#include <unistd.h>
#include <ifaddrs.h>
#include <linux/mroute6.h>
#include "mrib.h"
#include "querier.h"
struct mld_query {
struct mld_hdr mld;
uint8_t s_qrv;
uint8_t qqic;
uint16_t nsrc;
struct in6_addr addrs[0];
};
// Test whether group address is valid and interesting
static inline bool mld_is_valid_group(const struct in6_addr *addr)
{
return IN6_IS_ADDR_MULTICAST(addr);
}
// Handle Multicast Address Record from MLD-Packets (called by mld_receive)
static ssize_t mld_handle_record(struct groups *groups, const uint8_t *data, size_t len)
{
struct mld_record {
uint8_t type;
uint8_t aux;
uint16_t nsrc;
struct in6_addr addr;
struct in6_addr sources[];
} *r = (struct mld_record*)data;
if (len < sizeof(*r))
return -1;
size_t nsrc = ntohs(r->nsrc);
size_t read = sizeof(*r) + nsrc * sizeof(struct in6_addr) + r->aux;
if (len < read)
return -1;
if (r->type >= UPDATE_IS_INCLUDE && r->type <= UPDATE_BLOCK && mld_is_valid_group(&r->addr))
groups_update_state(groups, &r->addr, r->sources, nsrc, r->type);
return read;
}
// Receive an MLD-Packet from a node (called by uloop as callback)
void mld_handle(struct mrib_querier *mrib, const struct mld_hdr *hdr, size_t len,
const struct sockaddr_in6 *from)
{
char addrbuf[INET_ADDRSTRLEN];
omgp_time_t now = omgp_time();
inet_ntop(AF_INET6, &hdr->mld_addr, addrbuf, sizeof(addrbuf));
struct querier_iface *q = container_of(mrib, struct querier_iface, mrib);
if (hdr->mld_icmp6_hdr.icmp6_type == ICMPV6_MGM_QUERY) {
struct mld_query *query = (struct mld_query*)hdr;
if (len != 24 && ((size_t)len < sizeof(*query) ||
(size_t)len < sizeof(*query) + ntohs(query->nsrc) * sizeof(struct in6_addr)))
return;
if (!IN6_IS_ADDR_UNSPECIFIED(&query->mld.mld_addr) &&
!mld_is_valid_group(&query->mld.mld_addr))
return;
// Detect local source address
struct in6_addr addr;
if (mrib_mld_source(mrib, &addr))
return;
bool suppress = false;
size_t nsrc = 0;
int robustness = 2;
omgp_time_t mrd = 10000;
omgp_time_t query_interval = 125000;
if (query->mld.mld_icmp6_hdr.icmp6_dataun.icmp6_un_data16[0])
mrd = (len == 24) ? ntohs(query->mld.mld_icmp6_hdr.icmp6_dataun.icmp6_un_data16[0]) :
querier_mrd(query->mld.mld_icmp6_hdr.icmp6_dataun.icmp6_un_data16[0]);
if (len > 24) {
if (query->s_qrv & 0x7)
robustness = query->s_qrv & 0x7;
if (query->qqic)
query_interval = querier_qqi(query->qqic) * 1000;
}
if (!suppress && !IN6_IS_ADDR_UNSPECIFIED(&query->mld.mld_addr))
groups_update_timers(&q->groups, &query->mld.mld_addr, query->addrs, nsrc);
int election = memcmp(&from->sin6_addr, &addr, sizeof(from->sin6_addr));
L_INFO("%s: detected other querier %s with priority %d on %d",
__FUNCTION__, addrbuf, election, q->ifindex);
// TODO: we ignore MLDv1 queriers for now, since a lot of them are dumb switches
if (election < 0 && IN6_IS_ADDR_UNSPECIFIED(&query->mld.mld_addr) && len > 24) {
groups_update_config(&q->groups, true, mrd, query_interval, robustness);
q->mld_other_querier = true;
q->mld_next_query = now + (q->groups.cfg_v6.query_response_interval / 2) +
(q->groups.cfg_v6.robustness * q->groups.cfg_v6.query_interval);
}
} else if (hdr->mld_icmp6_hdr.icmp6_type == ICMPV6_MLD2_REPORT) {
struct icmp6_hdr *mld_report = (struct icmp6_hdr *)hdr;
if ((size_t)len <= sizeof(*mld_report))
return;
uint8_t *buf = (uint8_t*)hdr;
size_t count = ntohs(mld_report->icmp6_dataun.icmp6_un_data16[1]);
ssize_t offset = sizeof(*mld_report);
while (count > 0 && offset < (ssize_t)len) {
ssize_t read = mld_handle_record(&q->groups, &buf[offset], len - offset);
if (read < 0)
break;
offset += read;
--count;
}
} else if (hdr->mld_icmp6_hdr.icmp6_type == MLD_LISTENER_REPORT ||
hdr->mld_icmp6_hdr.icmp6_type == MLD_LISTENER_REDUCTION) {
if (len != 24 || !mld_is_valid_group(&hdr->mld_addr))
return;
groups_update_state(&q->groups, &hdr->mld_addr, NULL, 0,
(hdr->mld_icmp6_hdr.icmp6_type == MLD_LISTENER_REPORT) ? UPDATE_REPORT : UPDATE_DONE);
}
uloop_timeout_set(&q->timeout, 0);
}
// Send generic / group-specific / group-and-source-specific queries
ssize_t mld_send_query(struct querier_iface *q, const struct in6_addr *group,
const struct list_head *sources, bool suppress)
{
uint16_t mrc = querier_mrc((group) ? q->groups.cfg_v6.last_listener_query_interval :
q->groups.cfg_v6.query_response_interval);
struct {
struct mld_query q;
struct in6_addr addrs[QUERIER_MAX_SOURCE];
} query = {.q = {
.mld = {.mld_icmp6_hdr = {MLD_LISTENER_QUERY, 0, 0, {.icmp6_un_data16 = {mrc, 0}}}},
.s_qrv = (q->groups.cfg_v6.robustness & 0x7) | (suppress ? QUERIER_SUPPRESS : 0),
.qqic = querier_qqic(q->groups.cfg_v6.query_interval / 1000),
}};
struct group_source *s;
size_t cnt = 0;
if (sources) {
list_for_each_entry(s, sources, head) {
if (cnt >= QUERIER_MAX_SOURCE)
break; // TODO: log source overflow
query.addrs[cnt++] = s->addr;
}
}
query.q.nsrc = htons(cnt);
struct sockaddr_in6 dest = {AF_INET6, 0, 0, IPV6_ALL_NODES_INIT, q->ifindex};
if (group)
query.q.mld.mld_addr = dest.sin6_addr = *group;
return mrib_send_mld(&q->mrib, &query.q.mld,
sizeof(query.q) + cnt * sizeof(query.addrs[0]), &dest);
}
|
